src/ot/writeoct.c

#ifndef lint
static const char RCSid[] = "$Id$";
#endif
/*
 *  writeoct.c - routines for writing octree information to stdout.
 *
 *     7/30/85
 */

#include  "standard.h"

#include  "octree.h"

#include  "object.h"

static int  oputint(), oputstr(), puttree();


writeoct(store, scene, ofn)             /* write octree structures to stdout */
int  store;
CUBE  *scene;
char  *ofn[];
{
        char  sbuf[64];
        int  i;
                                        /* write format number */
        oputint((long)(OCTMAGIC+sizeof(OBJECT)), 2);

        if (!(store & IO_BOUNDS))
                return;
                                        /* write boundaries */
        for (i = 0; i < 3; i++) {
                sprintf(sbuf, "%.12g", scene->cuorg[i]);
                oputstr(sbuf);
        }
        sprintf(sbuf, "%.12g", scene->cusize);
        oputstr(sbuf);
                                        /* write object file names */
        if (store & IO_FILES)
                for (i = 0; ofn[i] != NULL; i++)
                        oputstr(ofn[i]);
        oputstr("");
                                        /* write number of objects */
        oputint((long)nobjects, sizeof(OBJECT));

        if (!(store & IO_TREE))
                return;
                                        /* write the octree */
        puttree(scene->cutree);

        if (store & IO_FILES || !(store & IO_SCENE))
                return;
                                        /* write the scene */
        writescene(0, nobjects, stdout);
}


static
oputstr(s)                      /* write null-terminated string to stdout */
register char  *s;
{
        putstr(s, stdout);
        if (ferror(stdout))
                error(SYSTEM, "write error in putstr");
}


static
putfullnode(fn)                 /* write out a full node */
OCTREE  fn;
{
        OBJECT  oset[MAXSET+1];
        register int  i;

        objset(oset, fn);
        for (i = 0; i <= oset[0]; i++)
                oputint((long)oset[i], sizeof(OBJECT));
}


static
oputint(i, siz)                 /* write a siz-byte integer to stdout */
register long  i;
register int  siz;
{
        putint(i, siz, stdout);
        if (ferror(stdout))
                error(SYSTEM, "write error in putint");
}


static
oputflt(f)                      /* put out floating point number */
double  f;
{
        putflt(f, stdout);
        if (ferror(stdout))
                error(SYSTEM, "write error in putflt");
}


static
puttree(ot)                     /* write octree to stdout in pre-order form */
register OCTREE  ot;
{
        register int  i;
        
        if (istree(ot)) {
                putc(OT_TREE, stdout);          /* indicate tree */
                for (i = 0; i < 8; i++)         /* write tree */
                        puttree(octkid(ot, i));
        } else if (isfull(ot)) {
                putc(OT_FULL, stdout);          /* indicate fullnode */
                putfullnode(ot);                /* write fullnode */
        } else
                putc(OT_EMPTY, stdout);         /* indicate empty */
}
Revision:	2.4
Committed:	Fri Mar 14 21:27:46 2003 UTC (22 years, 7 months ago) by greg
Content type:	text/plain
Branch:	MAIN
CVS Tags:	rad3R5
Changes since 2.3:	+4 -38 lines
Log Message:	Added -a option to obj2mesh to incorporate materials in mesh
#	User	Rev	Content
1	greg	1.1	#ifndef lint
2	greg	2.4	static const char RCSid[] = "$Id$";
3	greg	1.1	#endif
4			/*
5			* writeoct.c - routines for writing octree information to stdout.
6			*
7			* 7/30/85
8			*/
9
10			#include "standard.h"
11
12			#include "octree.h"
13
14			#include "object.h"
15
16	greg	2.4	static int oputint(), oputstr(), puttree();
17	greg	1.6
18	greg	1.1
19			writeoct(store, scene, ofn) /* write octree structures to stdout */
20			int store;
21			CUBE *scene;
22			char *ofn[];
23			{
24			char sbuf[64];
25	greg	2.4	int i;
26	greg	1.1	/* write format number */
27	greg	2.2	oputint((long)(OCTMAGIC+sizeof(OBJECT)), 2);
28	greg	1.1
29			if (!(store & IO_BOUNDS))
30			return;
31			/* write boundaries */
32			for (i = 0; i < 3; i++) {
33			sprintf(sbuf, "%.12g", scene->cuorg[i]);
34	greg	2.2	oputstr(sbuf);
35	greg	1.1	}
36			sprintf(sbuf, "%.12g", scene->cusize);
37	greg	2.2	oputstr(sbuf);
38	greg	1.1	/* write object file names */
39			if (store & IO_FILES)
40			for (i = 0; ofn[i] != NULL; i++)
41	greg	2.2	oputstr(ofn[i]);
42			oputstr("");
43	greg	1.3	/* write number of objects */
44	greg	2.2	oputint((long)nobjects, sizeof(OBJECT));
45	greg	1.1
46			if (!(store & IO_TREE))
47			return;
48			/* write the octree */
49			puttree(scene->cutree);
50
51			if (store & IO_FILES \|\| !(store & IO_SCENE))
52			return;
53			/* write the scene */
54	greg	2.4	writescene(0, nobjects, stdout);
55	greg	1.1	}
56
57
58			static
59	greg	2.2	oputstr(s) /* write null-terminated string to stdout */
60	greg	1.1	register char *s;
61			{
62	greg	2.2	putstr(s, stdout);
63	greg	1.1	if (ferror(stdout))
64			error(SYSTEM, "write error in putstr");
65			}
66
67
68			static
69			putfullnode(fn) /* write out a full node */
70			OCTREE fn;
71			{
72			OBJECT oset[MAXSET+1];
73			register int i;
74
75			objset(oset, fn);
76			for (i = 0; i <= oset[0]; i++)
77	greg	2.2	oputint((long)oset[i], sizeof(OBJECT));
78	greg	1.1	}
79
80
81			static
82	greg	2.2	oputint(i, siz) /* write a siz-byte integer to stdout */
83	greg	1.1	register long i;
84			register int siz;
85			{
86	greg	2.2	putint(i, siz, stdout);
87	greg	1.1	if (ferror(stdout))
88			error(SYSTEM, "write error in putint");
89			}
90
91
92			static
93	greg	2.2	oputflt(f) /* put out floating point number */
94	greg	1.1	double f;
95			{
96	greg	2.2	putflt(f, stdout);
97			if (ferror(stdout))
98			error(SYSTEM, "write error in putflt");
99	greg	1.1	}
100
101
102			static
103			puttree(ot) /* write octree to stdout in pre-order form */
104			register OCTREE ot;
105			{
106			register int i;
107
108			if (istree(ot)) {
109			putc(OT_TREE, stdout); /* indicate tree */
110			for (i = 0; i < 8; i++) /* write tree */
111			puttree(octkid(ot, i));
112			} else if (isfull(ot)) {
113			putc(OT_FULL, stdout); /* indicate fullnode */
114			putfullnode(ot); /* write fullnode */
115			} else
116			putc(OT_EMPTY, stdout); /* indicate empty */
117			}