--- ray/src/rt/vga.c 1992/09/22 11:42:17 2.1 +++ ray/src/rt/vga.c 2003/02/22 02:07:29 2.8 @@ -1,15 +1,69 @@ -/* Copyright (c) 1992 Regents of the University of California */ - #ifndef lint -static char SCCSid[] = "$SunId$ LBL"; +static const char RCSid[] = "$Id: vga.c,v 2.8 2003/02/22 02:07:29 greg Exp $"; #endif - /* * vga.c - driver for VGA graphics adaptor under MS-DOS */ -#include +/* ==================================================================== + * 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 radiance@radsite.lbl.gov. + * + * 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 + * . + */ +#include "standard.h" + #include #include "driver.h" @@ -19,37 +73,70 @@ static char SCCSid[] = "$SunId$ LBL"; #define GAMMA 2.2 /* exponent for color correction */ -int vga_close(), vga_clear(), vga_paintr(), vga_comout(), vga_comin(); +int vga_close(), vga_clear(), vga_paintr(), vga_comout(), vga_errout(), + vga_comin(); static struct driver vga_driver = { vga_close, vga_clear, vga_paintr, NULL, - vga_comout, vga_comin, NULL + vga_comout, vga_comin, NULL, 1.0 }; +static char fatalerr[128]; + static struct videoconfig config; +extern char *getenv(); + struct driver * vga_init(name, id) /* open VGA */ char *name, *id; { - if (_setvideomode(_MRES256COLOR) == 0) + static short mode_pref[] = {_MRES256COLOR, -1}; + static short smode_pref[] = {_XRES256COLOR, _SVRES256COLOR, + _VRES256COLOR, _MRES256COLOR, -1}; + char *ep; + register short *mp; + + mp = !strcmp(name, "vga") ? mode_pref : smode_pref; + for ( ; *mp != -1; mp++) + if (_setvideomode(*mp)) + break; + if (*mp == -1) { + _setvideomode(_DEFAULTMODE); + eputs(name); + eputs(": card not present or insufficient VGA memory\n"); return(NULL); + } _getvideoconfig(&config); _settextwindow(config.numtextrows-2, 1, config.numtextrows, config.numtextcols); vga_driver.xsiz = config.numxpixels; - vga_driver.ysiz = config.numypixels*(config.numtextrows-3) + vga_driver.ysiz = (long)config.numypixels*(config.numtextrows-3) /config.numtextrows; - vga_driver.pixaspect = .75*config.numxpixels/config.numypixels; + switch (config.mode) { /* correct problems */ + case _XRES256COLOR: + vga_driver.ysiz -= 16; + break; + case _MRES256COLOR: + vga_driver.pixaspect = 1.2; + break; + } _setviewport(0, 0, vga_driver.xsiz, vga_driver.ysiz); - make_gmap(GAMMA); /* make color map */ - _remappalette(1, 0x303030L); + if ((ep = getenv("GAMMA")) != NULL) /* make gamma map */ + make_gmap(atof(ep)); + else + make_gmap(GAMMA); + _remappalette(1, _BRIGHTWHITE); _settextcolor(1); - errvec = vga_comout; - cmdvec = vga_comout; - if (wrnvec != NULL) - wrnvec = vga_comout; + ms_gcinit(&vga_driver); + erract[USER].pf = + erract[SYSTEM].pf = + erract[INTERNAL].pf = + erract[CONSISTENCY].pf = vga_errout; + erract[COMMAND].pf = vga_comout; + if (erract[WARNING].pf != NULL) + erract[WARNING].pf = vga_comout; return(&vga_driver); } @@ -57,11 +144,17 @@ char *name, *id; static vga_close() /* close VGA */ { - errvec = stderr_v; /* reset error vector */ - cmdvec = NULL; - if (wrnvec != NULL) - wrnvec = stderr_v; + ms_gcdone(&vga_driver); _setvideomode(_DEFAULTMODE); + erract[USER].pf = /* reset error vector */ + erract[SYSTEM].pf = + erract[INTERNAL].pf = + erract[CONSISTENCY].pf = eputs; + erract[COMMAND].pf = NULL; + if (erract[WARNING].pf != NULL) + erract[WARNING].pf = wputs; + if (fatalerr[0]) + eputs(fatalerr); /* repeat error message */ } @@ -108,7 +201,7 @@ register char *s; if (*s == '\0') break; tpos = _gettextposition(); - _settextposition(tpos.row, *s=='\r' ? 0 : tpos.col-1); + _settextposition(tpos.row, *s=='\r' ? 1 : tpos.col-1); continue; default: *cp++ = *s; @@ -116,6 +209,22 @@ register char *s; } return(0); } + fatalerr[0] = '\0'; +} + + +static +vga_errout(msg) +register char *msg; +{ + static char *fep = fatalerr; + + _outtext(msg); + while (*msg) + *fep++ = *msg++; + *fep = '\0'; + if (fep > fatalerr && fep[-1] == '\n') + fep = fatalerr; }