| 1 |
– |
/* Copyright (c) 1999 Silicon Graphics, Inc. */ |
| 2 |
– |
|
| 1 |
|
#ifndef lint |
| 2 |
< |
static char SCCSid[] = "$SunId$ SGI"; |
| 2 |
> |
static const char RCSid[] = "$Id$"; |
| 3 |
|
#endif |
| 6 |
– |
|
| 4 |
|
/* |
| 5 |
|
* Radiance holodeck picture generator |
| 6 |
|
*/ |
| 7 |
|
|
| 8 |
+ |
#include <string.h> |
| 9 |
+ |
|
| 10 |
+ |
#include "platform.h" |
| 11 |
|
#include "rholo.h" |
| 12 |
|
#include "view.h" |
| 13 |
– |
#include "resolu.h" |
| 13 |
|
|
| 14 |
|
char *progname; /* our program name */ |
| 15 |
|
char *hdkfile; /* holodeck file name */ |
| 16 |
+ |
char gargc; /* global argc */ |
| 17 |
+ |
char **gargv; /* global argv */ |
| 18 |
|
|
| 19 |
|
VIEW myview = STDVIEW; /* current output view */ |
| 20 |
|
int xres = 512, yres = 512; /* max. horizontal and vertical resolution */ |
| 38 |
|
{ |
| 39 |
|
int i, rval; |
| 40 |
|
|
| 41 |
+ |
gargc = argc; gargv = argv; |
| 42 |
|
progname = argv[0]; /* get arguments */ |
| 43 |
|
for (i = 1; i < argc && argv[i][0] == '-'; i++) { |
| 44 |
|
rval = getviewopt(&myview, argc-i, argv+i); |
| 57 |
|
pixaspect = atof(argv[++i]); |
| 58 |
|
else if (argv[i][2] == 'e') { |
| 59 |
|
expval = atof(argv[++i]); |
| 60 |
< |
if (argv[i][0] == '-' | argv[i][0] == '+') |
| 60 |
> |
if ((argv[i][0] == '-') | (argv[i][0] == '+')) |
| 61 |
|
expval = pow(2., expval); |
| 62 |
|
} else |
| 63 |
|
goto userr; |
| 146 |
|
/* render image */ |
| 147 |
|
if (blist.nb > 0) { |
| 148 |
|
render_frame(blist.bl, blist.nb); |
| 149 |
< |
free((char *)blist.bl); |
| 149 |
> |
free((void *)blist.bl); |
| 150 |
|
} else { |
| 151 |
|
sprintf(errmsg, "no section visible in frame %d", fn); |
| 152 |
|
error(WARNING, errmsg); |
| 170 |
|
register PACKHEAD *bl; |
| 171 |
|
int nb; |
| 172 |
|
{ |
| 173 |
< |
extern int pixBeam(); |
| 173 |
> |
extern void pixBeam(); |
| 174 |
|
register HDBEAMI *bil; |
| 175 |
|
register int i; |
| 176 |
|
|
| 183 |
|
} |
| 184 |
|
hdloadbeams(bil, nb, pixBeam); |
| 185 |
|
pixFinish(randfrac); |
| 186 |
< |
free((char *)bil); |
| 186 |
> |
free((void *)bil); |
| 187 |
|
} |
| 188 |
|
|
| 189 |
|
|
| 207 |
|
/* write header */ |
| 208 |
|
newheader("RADIANCE", stdout); |
| 209 |
|
printf("SOFTWARE= %s\n", VersionID); |
| 210 |
< |
printf("%s %s\n", progname, hdkfile); |
| 210 |
> |
printargs(gargc, gargv, stdout); |
| 211 |
|
if (fn) |
| 212 |
|
printf("FRAME=%d\n", fn); |
| 213 |
|
fputs(VIEWSTR, stdout); |
| 214 |
|
fprintview(&myview, stdout); |
| 215 |
|
fputc('\n', stdout); |
| 216 |
< |
if (pa < 0.99 | pa > 1.01) |
| 216 |
> |
if ((pa < 0.99) | (pa > 1.01)) |
| 217 |
|
fputaspect(pa, stdout); |
| 218 |
< |
if (expval < 0.99 | expval > 1.01) |
| 218 |
> |
if ((expval < 0.99) | (expval > 1.01)) |
| 219 |
|
fputexpos(expval, stdout); |
| 220 |
|
fputformat(COLRFMT, stdout); |
| 221 |
|
fputc('\n', stdout); |
| 222 |
|
/* write resolution (standard order) */ |
| 223 |
|
fprtresolu(hres, vres, stdout); |
| 224 |
|
/* prepare image buffers */ |
| 225 |
< |
bzero((char *)mypixel, hres*vres*sizeof(COLOR)); |
| 226 |
< |
bzero((char *)myweight, hres*vres*sizeof(float)); |
| 227 |
< |
bzero((char *)mydepth, hres*vres*sizeof(float)); |
| 225 |
> |
memset((char *)mypixel, '\0', hres*vres*sizeof(COLOR)); |
| 226 |
> |
memset((char *)myweight, '\0', hres*vres*sizeof(float)); |
| 227 |
> |
memset((char *)mydepth, '\0', hres*vres*sizeof(float)); |
| 228 |
|
} |
| 229 |
|
|
| 230 |
|
|
| 232 |
|
endpicture() /* finish and write out pixels */ |
| 233 |
|
{ |
| 234 |
|
int lastr = -1, nunrend = 0; |
| 235 |
< |
int4 lastp, lastrp; |
| 236 |
< |
register int4 p; |
| 235 |
> |
int32 lastp, lastrp; |
| 236 |
> |
register int32 p; |
| 237 |
|
register double d; |
| 238 |
|
/* compute final pixel values */ |
| 239 |
|
for (p = hres*vres; p--; ) { |
| 240 |
|
if (myweight[p] <= FTINY) { |
| 241 |
< |
if (lastr >= 0) |
| 241 |
> |
if (lastr >= 0) { |
| 242 |
|
if (p/hres == lastp/hres) |
| 243 |
|
copycolor(mypixel[p], mypixel[lastp]); |
| 244 |
|
else |
| 245 |
|
copycolor(mypixel[p], mypixel[lastrp]); |
| 246 |
+ |
} |
| 247 |
|
nunrend++; |
| 248 |
|
continue; |
| 249 |
|
} |
| 264 |
|
|
| 265 |
|
initialize() /* initialize holodeck and buffers */ |
| 266 |
|
{ |
| 264 |
– |
extern long ftell(); |
| 267 |
|
int fd; |
| 268 |
|
FILE *fp; |
| 269 |
|
int n; |
| 270 |
< |
int4 nextloc; |
| 270 |
> |
int32 nextloc; |
| 271 |
|
/* open holodeck file */ |
| 272 |
|
if ((fp = fopen(hdkfile, "r")) == NULL) { |
| 273 |
|
sprintf(errmsg, "cannot open \"%s\" for reading", hdkfile); |
| 285 |
|
fd = dup(fileno(fp)); /* dup file descriptor */ |
| 286 |
|
fclose(fp); /* done with stdio */ |
| 287 |
|
for (n = 0; nextloc > 0L; n++) { /* initialize each section */ |
| 288 |
< |
lseek(fd, (long)nextloc, 0); |
| 288 |
> |
lseek(fd, (off_t)nextloc, SEEK_SET); |
| 289 |
|
read(fd, (char *)&nextloc, sizeof(nextloc)); |
| 290 |
|
hdinit(fd, NULL); |
| 291 |
|
} |
| 293 |
|
mypixel = (COLOR *)bmalloc(xres*yres*sizeof(COLOR)); |
| 294 |
|
myweight = (float *)bmalloc(xres*yres*sizeof(float)); |
| 295 |
|
mydepth = (float *)bmalloc(xres*yres*sizeof(float)); |
| 296 |
< |
if (mypixel == NULL | myweight == NULL | mydepth == NULL) |
| 296 |
> |
if ((mypixel == NULL) | (myweight == NULL) | (mydepth == NULL)) |
| 297 |
|
error(SYSTEM, "out of memory in initialize"); |
| 298 |
|
} |
| 299 |
|
|
| 300 |
|
|
| 301 |
+ |
void |
| 302 |
|
eputs(s) /* put error message to stderr */ |
| 303 |
|
register char *s; |
| 304 |
|
{ |
