src/rt/devmain.c

#ifndef lint
static const char       RCSid[] = "$Id$";
#endif
/*
 *  devmain.c - main for independent drivers.
 *
 *      Redefine your initialization routine to dinit.
 */

/* ====================================================================
 * The Radiance Software License, Version 1.0
 *
 * Copyright (c) 1990 - 2002 The Regents of the University of California,
 * through Lawrence Berkeley National Laboratory.   All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 *
 * 1. Redistributions of source code must retain the above copyright
 *         notice, this list of conditions and the following disclaimer.
 *
 * 2. Redistributions in binary form must reproduce the above copyright
 *       notice, this list of conditions and the following disclaimer in
 *       the documentation and/or other materials provided with the
 *       distribution.
 *
 * 3. The end-user documentation included with the redistribution,
 *           if any, must include the following acknowledgment:
 *             "This product includes Radiance software
 *                 (http://radsite.lbl.gov/)
 *                 developed by the Lawrence Berkeley National Laboratory
 *               (http://www.lbl.gov/)."
 *       Alternately, this acknowledgment may appear in the software itself,
 *       if and wherever such third-party acknowledgments normally appear.
 *
 * 4. The names "Radiance," "Lawrence Berkeley National Laboratory"
 *       and "The Regents of the University of California" must
 *       not be used to endorse or promote products derived from this
 *       software without prior written permission. For written
 *       permission, please contact [email protected].
 *
 * 5. Products derived from this software may not be called "Radiance",
 *       nor may "Radiance" appear in their name, without prior written
 *       permission of Lawrence Berkeley National Laboratory.
 *
 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESSED OR IMPLIED
 * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
 * DISCLAIMED.   IN NO EVENT SHALL Lawrence Berkeley National Laboratory OR
 * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF
 * USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
 * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
 * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 * ====================================================================
 *
 * This software consists of voluntary contributions made by many
 * individuals on behalf of Lawrence Berkeley National Laboratory.   For more
 * information on Lawrence Berkeley National Laboratory, please see
 * <http://www.lbl.gov/>.
 */

#include "standard.h"

#include "color.h"

#include "driver.h"

struct driver   *dev = NULL;                    /* output device */

FILE    *devin, *devout;                        /* communications channels */

char    *progname;                              /* driver name */

int     r_clear(), r_paintr(), r_getcur(), r_comout(), r_comin(), r_flush();

int     (*dev_func[NREQUESTS])() = {            /* request handlers */
                r_clear, r_paintr,
                r_getcur, r_comout,
                r_comin, r_flush
        };


main(argc, argv)                /* set up communications and main loop */
int     argc;
char    *argv[];
{
        extern struct driver    *dinit();
        int  com;
                                                /* set up I/O */
        progname = argv[0];
        if (argc < 3) {
                eputs("arg count\n");
                quit(1);
        }
        devin = fdopen(atoi(argv[1]), "r");
        devout = fdopen(atoi(argv[2]), "w");
        if (devin == NULL || devout == NULL || getw(devin) != COM_SENDM) {
                eputs("connection failure\n");
                quit(1);
        }
                                                /* open device */
        if ((dev = dinit(argv[0], argv[3])) == NULL)
                quit(1);
        putw(COM_RECVM, devout);                /* verify initialization */
        sendstate();
        fflush(devout);
                                                /* loop on requests */
        while ((com = getc(devin)) != EOF) {
                if (com >= NREQUESTS || dev_func[com] == NULL) {
                        eputs("invalid request\n");
                        quit(1);
                }
                (*dev_func[com])();             /* process request */
        }
        quit(0);                        /* all done, clean up and exit */
}


void
quit(code)                              /* close device and exit */
int     code;
{
        if (dev != NULL)
                (*dev->close)();
        exit(code);
}


r_clear()                               /* clear screen */
{
        int     xres, yres;

        xres = getw(devin);
        yres = getw(devin);
        (*dev->clear)(xres, yres);
}


r_paintr()                              /* paint a rectangle */
{
        COLOR   col;
        int     xmin, ymin, xmax, ymax;

        fread((char *)col, sizeof(COLOR), 1, devin);
        xmin = getw(devin); ymin = getw(devin);
        xmax = getw(devin); ymax = getw(devin);
        (*dev->paintr)(col, xmin, ymin, xmax, ymax);
}


r_flush()                               /* flush output */
{
        if (dev->flush != NULL)
                (*dev->flush)();
        putc(COM_FLUSH, devout);
        sendstate();
        fflush(devout);
}


r_getcur()                              /* get and return cursor position */
{
        int     c;
        int     x, y;
                                        /* get it if we can */
        if (dev->getcur == NULL) {
                c = ABORT;
                x = y = 0;
        } else
                c = (*dev->getcur)(&x, &y);
                                        /* reply */
        putc(COM_GETCUR, devout);
        putc(c, devout);
        putw(x, devout);
        putw(y, devout);
        fflush(devout);
}


r_comout()                              /* print string to command line */
{
        char    str[256];

        mygets(str, devin);
        (*dev->comout)(str);
}


r_comin()                               /* read string from command line */
{
        char    buf[256], *prompt;
                                        /* get prompt */
        if (getc(devin)) {
                mygets(buf, devin);
                prompt = buf;
        } else
                prompt = NULL;
                                        /* get string */
        (*dev->comin)(buf, prompt);
                                        /* reply */
        putc(COM_COMIN, devout);
        myputs(buf, devout);
        sendstate();
        fflush(devout);
}


mygets(s, fp)                           /* get string from file (with nul) */
register char   *s;
register FILE   *fp;
{
        register int    c;

        while ((c = getc(fp)) != EOF)
                if ((*s++ = c) == '\0')
                        return;
        *s = '\0';
}


myputs(s, fp)                           /* put string to file (with nul) */
register char   *s;
register FILE   *fp;
{
        do
                putc(*s, fp);
        while (*s++);
}


void
eputs(s)                                /* put string to stderr */
register char  *s;
{
        static int  midline = 0;

        if (!*s)
                return;
        if (!midline++) {
                fputs(progname, stderr);
                fputs(": ", stderr);
        }
        fputs(s, stderr);
        if (s[strlen(s)-1] == '\n') {
                fflush(stderr);
                midline = 0;
        }
}


sendstate()                             /* send driver state variables */
{
        fwrite((char *)&dev->pixaspect, sizeof(dev->pixaspect), 1, devout);
        putw(dev->xsiz, devout);
        putw(dev->ysiz, devout);
        putw(dev->inpready, devout);
}
Revision:	2.3
Committed:	Sat Feb 22 02:07:28 2003 UTC (22 years, 8 months ago) by greg
Content type:	text/plain
Branch:	MAIN
Changes since 2.2:	+59 -5 lines
Log Message:	Changes and check-in for 3.5 release Includes new source files and modifications not recorded for many years See ray/doc/notes/ReleaseNotes for notes between 3.1 and 3.5 release
#	User	Rev	Content
1	greg	1.1	#ifndef lint
2	greg	2.3	static const char RCSid[] = "$Id$";
3	greg	1.1	#endif
4			/*
5			* devmain.c - main for independent drivers.
6			*
7			* Redefine your initialization routine to dinit.
8	greg	2.3	*/
9
10			/* ====================================================================
11			* The Radiance Software License, Version 1.0
12			*
13			* Copyright (c) 1990 - 2002 The Regents of the University of California,
14			* through Lawrence Berkeley National Laboratory. All rights reserved.
15			*
16			* Redistribution and use in source and binary forms, with or without
17			* modification, are permitted provided that the following conditions
18			* are met:
19			*
20			* 1. Redistributions of source code must retain the above copyright
21			* notice, this list of conditions and the following disclaimer.
22			*
23			* 2. Redistributions in binary form must reproduce the above copyright
24			* notice, this list of conditions and the following disclaimer in
25			* the documentation and/or other materials provided with the
26			* distribution.
27			*
28			* 3. The end-user documentation included with the redistribution,
29			* if any, must include the following acknowledgment:
30			* "This product includes Radiance software
31			* (http://radsite.lbl.gov/)
32			* developed by the Lawrence Berkeley National Laboratory
33			* (http://www.lbl.gov/)."
34			* Alternately, this acknowledgment may appear in the software itself,
35			* if and wherever such third-party acknowledgments normally appear.
36			*
37			* 4. The names "Radiance," "Lawrence Berkeley National Laboratory"
38			* and "The Regents of the University of California" must
39			* not be used to endorse or promote products derived from this
40			* software without prior written permission. For written
41			* permission, please contact [email protected].
42			*
43			* 5. Products derived from this software may not be called "Radiance",
44			* nor may "Radiance" appear in their name, without prior written
45			* permission of Lawrence Berkeley National Laboratory.
46			*
47			* THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESSED OR IMPLIED
48			* WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
49			* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
50			* DISCLAIMED. IN NO EVENT SHALL Lawrence Berkeley National Laboratory OR
51			* ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
52			* SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
53			* LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF
54			* USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
55			* ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
56			* OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
57			* OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
58			* SUCH DAMAGE.
59			* ====================================================================
60	greg	1.1	*
61	greg	2.3	* This software consists of voluntary contributions made by many
62			* individuals on behalf of Lawrence Berkeley National Laboratory. For more
63			* information on Lawrence Berkeley National Laboratory, please see
64			* <http://www.lbl.gov/>.
65	greg	1.1	*/
66
67	gregl	2.2	#include "standard.h"
68	greg	1.1
69			#include "color.h"
70
71			#include "driver.h"
72
73			struct driver dev = NULL; / output device */
74
75			FILE devin, devout; /* communications channels */
76
77			char progname; / driver name */
78
79	greg	1.8	int r_clear(), r_paintr(), r_getcur(), r_comout(), r_comin(), r_flush();
80	greg	1.1
81			int (dev_func[NREQUESTS])() = { / request handlers */
82			r_clear, r_paintr,
83	greg	1.8	r_getcur, r_comout,
84			r_comin, r_flush
85	greg	1.1	};
86
87
88			main(argc, argv) /* set up communications and main loop */
89			int argc;
90			char *argv[];
91			{
92			extern struct driver *dinit();
93			int com;
94			/* set up I/O */
95			progname = argv[0];
96			if (argc < 3) {
97	gregl	2.2	eputs("arg count\n");
98	greg	1.1	quit(1);
99			}
100			devin = fdopen(atoi(argv[1]), "r");
101			devout = fdopen(atoi(argv[2]), "w");
102			if (devin == NULL \|\| devout == NULL \|\| getw(devin) != COM_SENDM) {
103	gregl	2.2	eputs("connection failure\n");
104	greg	1.1	quit(1);
105			}
106			/* open device */
107	greg	1.2	if ((dev = dinit(argv[0], argv[3])) == NULL)
108	greg	1.1	quit(1);
109			putw(COM_RECVM, devout); /* verify initialization */
110	greg	1.11	sendstate();
111	greg	1.1	fflush(devout);
112			/* loop on requests */
113			while ((com = getc(devin)) != EOF) {
114			if (com >= NREQUESTS \|\| dev_func[com] == NULL) {
115	gregl	2.2	eputs("invalid request\n");
116	greg	1.1	quit(1);
117			}
118			(dev_func[com])(); / process request */
119			}
120			quit(0); /* all done, clean up and exit */
121			}
122
123
124	greg	2.3	void
125	greg	1.1	quit(code) /* close device and exit */
126			int code;
127			{
128			if (dev != NULL)
129			(*dev->close)();
130			exit(code);
131			}
132
133
134			r_clear() /* clear screen */
135			{
136			int xres, yres;
137
138			xres = getw(devin);
139			yres = getw(devin);
140			(*dev->clear)(xres, yres);
141			}
142
143
144			r_paintr() /* paint a rectangle */
145			{
146			COLOR col;
147			int xmin, ymin, xmax, ymax;
148
149	greg	1.6	fread((char *)col, sizeof(COLOR), 1, devin);
150	greg	1.1	xmin = getw(devin); ymin = getw(devin);
151			xmax = getw(devin); ymax = getw(devin);
152			(*dev->paintr)(col, xmin, ymin, xmax, ymax);
153	greg	1.8	}
154
155
156			r_flush() /* flush output */
157			{
158			if (dev->flush != NULL)
159			(*dev->flush)();
160	greg	1.9	putc(COM_FLUSH, devout);
161	greg	1.11	sendstate();
162	greg	1.9	fflush(devout);
163	greg	1.1	}
164
165
166			r_getcur() /* get and return cursor position */
167			{
168			int c;
169			int x, y;
170			/* get it if we can */
171			if (dev->getcur == NULL) {
172			c = ABORT;
173			x = y = 0;
174			} else
175			c = (*dev->getcur)(&x, &y);
176			/* reply */
177			putc(COM_GETCUR, devout);
178			putc(c, devout);
179			putw(x, devout);
180			putw(y, devout);
181			fflush(devout);
182			}
183
184
185			r_comout() /* print string to command line */
186			{
187			char str[256];
188
189			mygets(str, devin);
190			(*dev->comout)(str);
191			}
192
193
194			r_comin() /* read string from command line */
195			{
196	greg	1.7	char buf[256], *prompt;
197			/* get prompt */
198			if (getc(devin)) {
199			mygets(buf, devin);
200			prompt = buf;
201			} else
202			prompt = NULL;
203	greg	1.1	/* get string */
204	greg	1.7	(*dev->comin)(buf, prompt);
205	greg	1.1	/* reply */
206			putc(COM_COMIN, devout);
207			myputs(buf, devout);
208	greg	1.11	sendstate();
209	greg	1.1	fflush(devout);
210			}
211
212
213			mygets(s, fp) /* get string from file (with nul) */
214			register char *s;
215			register FILE *fp;
216			{
217			register int c;
218
219			while ((c = getc(fp)) != EOF)
220			if ((*s++ = c) == '\0')
221			return;
222			*s = '\0';
223			}
224
225
226			myputs(s, fp) /* put string to file (with nul) */
227			register char *s;
228			register FILE *fp;
229			{
230			do
231			putc(*s, fp);
232			while (*s++);
233			}
234
235
236	greg	2.3	void
237	gregl	2.2	eputs(s) /* put string to stderr */
238	greg	1.1	register char *s;
239			{
240	greg	1.12	static int midline = 0;
241	greg	1.1
242	greg	1.13	if (!*s)
243			return;
244	greg	1.12	if (!midline++) {
245	greg	1.1	fputs(progname, stderr);
246			fputs(": ", stderr);
247			}
248			fputs(s, stderr);
249	greg	1.13	if (s[strlen(s)-1] == '\n') {
250	greg	1.1	fflush(stderr);
251	greg	1.12	midline = 0;
252	greg	1.1	}
253	greg	1.11	}
254
255
256			sendstate() /* send driver state variables */
257			{
258			fwrite((char *)&dev->pixaspect, sizeof(dev->pixaspect), 1, devout);
259			putw(dev->xsiz, devout);
260			putw(dev->ysiz, devout);
261			putw(dev->inpready, devout);
262	greg	1.1	}