This is camstream.c in view mode; [Download] [Up]
/* Copyright (c) 1992 The Geometry Center; University of Minnesota
1300 South Second Street; Minneapolis, MN 55454, USA;
This file is part of geomview/OOGL. geomview/OOGL is free software;
you can redistribute it and/or modify it only under the terms given in
the file COPYING, which you should have received along with this file.
This and other related software may be obtained via anonymous ftp from
geom.umn.edu; email: software@geom.umn.edu. */
/* Authors: Charlie Gunn, Stuart Levy, Tamara Munzner, Mark Phillips */
#include <math.h>
#include "handleP.h"
#include "cameraP.h"
#include "transobj.h"
HandleOps CamOps = {
"cam",
CamStreamIn,
CamStreamOut,
CamDelete,
NULL, /* Resync */
NULL /* close pool */
};
/*
* Load Camera from file.
* Syntax:
* [camera] < "filename_containing_camera" [or]
* [camera] { keyword value keyword value ... }
*
*/
int
CamStreamIn(Pool *p, Handle **hp, Camera **camp)
{
char *w, *raww;
FILE *f;
Handle *h = NULL;
Handle *hname = NULL;
Camera *cam = NULL;
int credible = 0;
register int i,j;
float v;
int brack = 0;
int empty = 1, braces = 0;
static struct kw {
char *name;
char args;
int kbit;
} kw[] = {
{ "camtoworld", 0, CAMF_NEWC2W },
{ "worldtocam", 0, CAMF_W2C },
{ "flag", 1, CAMF_PERSP|CAMF_STEREO },
{ "halfyfield", 1, CAMF_FOV },
{ "frameaspect",1, CAMF_ASPECT },
{ "focus", 1, CAMF_FOCUS },
{ "near", 1, CAMF_NEAR },
{ "far", 1, CAMF_FAR },
{ "stereo_sep", 1, CAMF_STEREOGEOM },
{ "stereo_angle",1, CAMF_STEREOGEOM },
{ "stereyes", 0, CAMF_STEREOXFORM },
{ "whicheye", 1, CAMF_EYE },
{ "define", 0, 0 },
{ "camera", 0, 0 },
{ "perspective",1, CAMF_PERSP },
{ "stereo", 1, CAMF_STEREO },
{ "hyperbolic", 1, 0 /* CAMF_HYPERBOLIC is now obsolete */ },
{ "fov", 1, CAMF_FOV },
};
int got, bit;
if((f = PoolInputFile(p)) == NULL)
return NULL;
for(;;) {
switch(i = fnextc(f, 0)) {
case '<':
case ':':
case '@':
fgetc(f);
w = fdelimtok("(){}", f, 0);
if(i == '<' && HandleByName(w, &CamOps) == NULL) {
w = findfile(PoolName(p), raww = w);
if(w == NULL) {
OOGLSyntax(f, "Reading camera from \"%s\": can't find file \"%s\"",
PoolName(p), raww);
}
}
if((h = HandleReferringTo(i, w, &CamOps, hp)) != NULL) {
cam = (Camera *)h->object;
}
if(!brack) goto done;
break;
case '{': brack++; fgetc(f); break;
case '}':
if(brack > 0) { fgetc(f); braces = 1; }
if(--brack <= 0) goto done;
/* Otherwise, fall through into... */
default:
empty = 0;
w = fdelimtok("(){}", f, 0);
if(w == NULL)
goto done;
for(i = sizeof(kw)/sizeof(kw[0]); --i >= 0; )
if(!strcmp(w, kw[i].name))
break;
if(i < 0) {
if(credible)
OOGLSyntax(f, "Reading camera from \"%s\": unknown camera keyword \"%s\"",
PoolName(p), w);
if(cam) CamDelete(cam);
return NULL;
} else if( (got=fgetnf(f, kw[i].args, &v, 0)) != kw[i].args ) {
OOGLSyntax(f, "Reading camera from \"%s\": \"%s\" expects %d values, got %d",
PoolName(p), w, kw[i].args, got);
return NULL;
}
if(i != 13 && cam == NULL) {
cam = CamCreate(CAM_END);
credible = 1;
}
if(cam) cam->changed |= kw[i].kbit;
switch(i) {
case 0:
if(TransStreamIn(p, &cam->c2whandle, cam->camtoworld))
CamSet(cam, CAM_C2W, cam->camtoworld,
CAM_C2WHANDLE, cam->c2whandle, CAM_END);
break;
case 1:
if(TransStreamIn(p, &cam->w2chandle, cam->worldtocam))
CamSet(cam, CAM_W2C, cam->worldtocam,
CAM_W2CHANDLE, cam->w2chandle, CAM_END);
break;
case 2: cam->flag = (int)v; break;
case 3: CamSet(cam, CAM_HALFYFIELD, v, CAM_END); break;
case 4: CamSet(cam, CAM_ASPECT, v, CAM_END); break;
case 5: CamSet(cam, CAM_FOCUS, v, CAM_END); break;
case 6: cam->near = v; break;
case 7: cam->far = v; break;
case 8: CamSet(cam, CAM_STEREOSEP, v, CAM_END); break;
case 9: CamSet(cam, CAM_STEREOANGLE, v, CAM_END); break;
case 10:
if(TransStreamIn(p, &cam->sterhandle[0], cam->stereyes[0]) &&
TransStreamIn(p, &cam->sterhandle[1], cam->stereyes[1]))
CamSet(cam, CAM_STEREYES, cam->stereyes,
CAM_STERHANDLES, cam->sterhandle,
CAM_END);
break;
case 11: cam->whicheye = (int)v; break;
case 12: /* "define" */
hname = HandleCreate( fdelimtok("(){}", f, 0), &CamOps );
break;
case 13: /* "camera" */ break;
case 14: /* "perspective" */
case 15: /* "stereo" */
flagbit:
cam->flag &= ~kw[i].kbit;
if(v != 0) cam->flag |= kw[i].kbit;
break;
case 16: /* "hyperbolic" */
/* The "hyperbolic" field is obsolete (replaced by the
"space" field. Ignore it for now [ Mon Dec 7 14:05:50
1992 ]. After a few months [ say in March 1993 ] add a
warning message to be printed out at this point in the
code, and after a few more months [ say June 1993 ],
remove it completely. -- mbp */
break;
case 17: /* "fov" */ CamSet(cam, CAM_FOV, v, CAM_END); break;
}
}
}
done:
if(hname) {
if(cam)
HandleSetObject(hname, (Ref *)cam);
h = hname;
}
if(h == NULL && cam != NULL && p->ops == &CamOps) {
/*
* Dispose of nameless objects
*/
h = HandleAssign(p->poolname, &CamOps, (Ref *)cam);
}
/*
* Leave results where we're told to
*/
if(h != NULL && hp != NULL && *hp != h) {
if(*hp)
HandlePDelete(hp);
*hp = h;
}
if(camp != NULL) {
RefIncr((Ref *)cam);
if(*camp != NULL)
CamDelete(*camp);
*camp = cam;
}
return (cam != NULL || h != NULL || (empty && braces));
}
int
CamStreamOut(Pool *p, Handle *h, Camera *cam)
{
int putdata;
float fov;
FILE *outf;
if((outf = PoolOutputFile(p)) == NULL)
return 0;
fprintf(outf, "camera {\n");
if(cam == NULL && h != NULL && h->object != NULL)
cam = (Camera *)h->object;
putdata = PoolStreamOutHandle( p, h, cam != NULL );
if(cam != NULL && putdata) {
if(cam->w2chandle) {
fprintf(outf, "worldtocam ");
TransStreamOut(p, cam->w2chandle, cam->worldtocam);
} else {
fprintf(outf, "camtoworld ");
TransStreamOut(p, cam->c2whandle, cam->camtoworld);
}
fprintf(outf, "\tperspective %d stereo %d\n",
cam->flag & CAMF_PERSP ? 1 : 0,
cam->flag & CAMF_STEREO ? 1 : 0);
CamGet(cam, CAM_FOV, &fov);
fprintf(outf, "\tfov %g\n", fov);
fprintf(outf, "\tframeaspect %g\n", cam->frameaspect);
fprintf(outf, "\tfocus %g\n", cam->focus);
fprintf(outf, "\tnear %g\n", cam->near);
fprintf(outf, "\tfar %g\n", cam->far);
if(cam->flag & CAMF_STEREOGEOM) {
fprintf(outf, "\tstereo_sep %g\n", cam->stereo_sep);
fprintf(outf, "\tstereo_angle %g\n", cam->stereo_angle);
}
if(cam->flag & CAMF_EYE)
fprintf(outf, "\twhicheye %d\n", cam->whicheye);
if(cam->flag & CAMF_STEREOXFORM) {
fprintf(outf, "stereyes\n");
TransStreamOut(p, cam->sterhandle[0], cam->stereyes[0]);
fputc('\n', outf);
TransStreamOut(p, cam->sterhandle[1], cam->stereyes[1]);
}
}
fprintf(outf, "}\n");
return !ferror(outf);
}
void
CamHandleScan( Camera *cam, int (*func)(), void *arg )
{
if(cam) {
if(cam->c2whandle)
(*func)(&cam->c2whandle, cam, arg);
if(cam->w2chandle)
(*func)(&cam->w2chandle, cam, arg);
}
}
void
CamTransUpdate( Handle **hp, Camera *cam, Transform T )
{
TransUpdate( hp, (Ref *)cam, T );
if(hp == &cam->c2whandle)
TmInvert( cam->camtoworld, cam->worldtocam );
else if(hp == &cam->w2chandle)
TmInvert( cam->worldtocam, cam->camtoworld );
}
These are the contents of the former NiCE NeXT User Group NeXTSTEP/OpenStep software archive, currently hosted by Netfuture.ch.