ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/px/psign.c
(Generate patch)

Comparing ray/src/px/psign.c (file contents):
Revision 2.7 by greg, Thu Jun 18 16:14:43 1992 UTC vs.
Revision 2.21 by greg, Sat Jun 21 15:05:01 2003 UTC

# Line 1 | Line 1
1 /* Copyright (c) 1991 Regents of the University of California */
2
1   #ifndef lint
2 < static char SCCSid[] = "$SunId$ LBL";
2 > static const char       RCSid[] = "$Id$";
3   #endif
6
4   /*
5   *  psign.c - produce picture from text.
6   *
# Line 11 | Line 8 | static char SCCSid[] = "$SunId$ LBL";
8   */
9  
10   #include  "standard.h"
11 <
11 > #include  "platform.h"
12   #include  "color.h"
16
13   #include  "font.h"
14  
15 < #ifndef  SSS
16 < #define  SSS                    3       /* super-sample size */
15 > #ifndef  SSS
16 > #define  SSS                    3       /* super-sample size */
17   #endif
18  
19 < #define  MAXLINE                512     /* longest allowable line */
19 > #define  MAXLINE                512     /* longest allowable line */
20  
25 #ifndef  DEFPATH
26 #define  DEFPATH                ":/usr/local/lib/ray"
27 #endif
28 #ifndef  ULIBVAR
29 #define  ULIBVAR                "RAYPATH"
30 #endif
31
21   char  *fontfile = "helvet.fnt";         /* our font file */
22  
23   COLOR  bgcolor = WHTCOLOR;              /* background color */
# Line 37 | Line 26 | COLOR  fgcolor = BLKCOLOR;             /* foreground color */
26   int  direct = 'r';                      /* direction (right, up, left, down) */
27  
28   int  cheight = 32*SSS;                  /* character height */
29 < double  aspect = 1.67;                  /* height/width character aspect */
30 < double  spacing = 0.0;                  /* character spacing */
29 > double  aspect = 1.67;                  /* height/width character aspect */
30 > double  spacing = 0.0;                  /* character spacing */
31   int  cwidth;                            /* computed character width */
32  
33   unsigned char  *ourbitmap;              /* our output bitmap */
34   int  xsiz, ysiz;                        /* bitmap dimensions */
35   int  xdim;                              /* size of horizontal scan (bytes) */
36  
37 < #define  bitop(x,y,op)          (ourbitmap[(y)*xdim+((x)>>3)] op (1<<((x)&7)))
38 < #define  tstbit(x,y)            bitop(x,y,&)
39 < #define  setbit(x,y)            bitop(x,y,|=)
40 < #define  clrbit(x,y)            bitop(x,y,&=~)
41 < #define  tglbit(x,y)            bitop(x,y,^=)
37 >                                /* conflicting def's in param.h */
38 > #undef  tstbit
39 > #undef  setbit
40 > #undef  clrbit
41 > #undef  tglbit
42  
43 + #define  bitop(x,y,op)          (ourbitmap[(y)*xdim+((x)>>3)] op (1<<((x)&7)))
44 + #define  tstbit(x,y)            bitop(x,y,&)
45 + #define  setbit(x,y)            bitop(x,y,|=)
46 + #define  clrbit(x,y)            bitop(x,y,&=~)
47 + #define  tglbit(x,y)            bitop(x,y,^=)
48 +
49   FONT  *ourfont;                         /* our font */
50  
56 char  *libpath;                         /* library search path */
57
51   typedef struct line {
52          char  *s;               /* line w/o LF */
53          short  *sp;             /* character spacing */
# Line 65 | Line 58 | LINE  *ourtext;                                /* our text */
58   int  nlines, maxline;                   /* text dimensions */
59   int  maxwidth;                          /* maximum line width (dvi) */
60  
68 extern char  *getenv();
69 extern char  *malloc(), *calloc();
61  
71
62   main(argc, argv)
63   int  argc;
64   char  *argv[];
65   {
66          int  an;
67 <
67 >        SET_FILE_BINARY(stdout);
68          for (an = 1; an < argc && argv[an][0] == '-'; an++)
69                  switch (argv[an][1]) {
70                  case 'c':                       /* color */
# Line 110 | Line 100 | char  *argv[];
100                                  goto unkopt;
101                          }
102                          break;
103 +                case 'x':                       /* x resolution */
104 +                        xsiz = atoi(argv[++an])*SSS;
105 +                        break;
106 +                case 'y':
107 +                        ysiz = atoi(argv[++an])*SSS;
108 +                        break;
109                  case 'h':                       /* height of characters */
110                          cheight = atoi(argv[++an])*SSS;
111                          break;
# Line 126 | Line 122 | unkopt:
122                          exit(1);
123                  }
124                                          /* load font file */
129        if ((libpath = getenv(ULIBVAR)) == NULL)
130                libpath = DEFPATH;
125          ourfont = getfont(fontfile);
126                                          /* get text */
127          if (an == argc)
# Line 140 | Line 134 | unkopt:
134                                          /* convert text to bitmap */
135          maptext();
136                                          /* print header */
137 +        newheader("RADIANCE", stdout);
138          printargs(argc, argv, stdout);
139          fputformat(COLRFMT, stdout);
140          putchar('\n');
# Line 152 | Line 147 | unkopt:
147  
148   makemap()                       /* create the bit map */
149   {
150 <        cwidth = cheight/aspect + 0.5;
150 >        double  pictaspect;
151 >        
152          if (direct == 'r' || direct == 'l') {
153 <                xsiz = (long)maxwidth*cwidth >> 8;
154 <                ysiz = nlines*cheight;
153 >                if (xsiz <= 0) {
154 >                        cwidth = cheight/aspect + 0.5;
155 >                        xsiz = (long)maxwidth*cwidth >> 8;
156 >                        ysiz = nlines*cheight;
157 >                } else if (aspect > FTINY) {
158 >                        if (ysiz <= 0)
159 >                                ysiz = cheight*nlines;
160 >                        pictaspect = 256*nlines*aspect/maxwidth;
161 >                        if (pictaspect*xsiz < ysiz)
162 >                                ysiz = pictaspect*xsiz + 0.5;
163 >                        else
164 >                                xsiz = ysiz/pictaspect + 0.5;
165 >                        cheight = ysiz/nlines;
166 >                        cwidth = cheight/aspect;
167 >                } else {
168 >                        if (ysiz <= 0)
169 >                                ysiz = cheight*nlines;
170 >                        pictaspect = (double)ysiz/xsiz;
171 >                        aspect = pictaspect*maxwidth/(256*nlines);
172 >                        cheight = ysiz/nlines;
173 >                        cwidth = cheight/aspect;
174 >                }
175          } else {                        /* reverse orientation */
176 <                xsiz = nlines*cheight;
177 <                ysiz = (long)maxwidth*cwidth >> 8;
176 >                if (ysiz <= 0) {
177 >                        cwidth = cheight/aspect + 0.5;
178 >                        xsiz = nlines*cheight;
179 >                        ysiz = (long)maxwidth*cwidth >> 8;
180 >                } else if (aspect > FTINY) {
181 >                        if (xsiz <= 0)
182 >                                xsiz = cheight*nlines;
183 >                        pictaspect = maxwidth/(256*nlines*aspect);
184 >                        if (pictaspect*xsiz < ysiz)
185 >                                ysiz = pictaspect*xsiz + 0.5;
186 >                        else
187 >                                xsiz = ysiz/pictaspect + 0.5;
188 >                        cheight = xsiz/nlines;
189 >                        cwidth = cheight/aspect;
190 >                } else {
191 >                        if (xsiz <= 0)
192 >                                xsiz = cheight*nlines;
193 >                        pictaspect = (double)ysiz/xsiz;
194 >                        aspect = maxwidth/(256*nlines*pictaspect);
195 >                        cheight = xsiz/nlines;
196 >                        cwidth = cheight/aspect;
197 >                }
198          }
199          if (xsiz % SSS)
200                  xsiz += SSS - xsiz%SSS;
201          if (ysiz % SSS)
202                  ysiz += SSS - ysiz%SSS;
203          xdim = (xsiz+7)/8;
204 <        ourbitmap = (BYTE *)calloc(ysiz, xdim);
204 >        ourbitmap = (BYTE *)bmalloc(ysiz*xdim);
205          if (ourbitmap == NULL)
206                  error(SYSTEM, "Out of memory in makemap");
207 +        bzero((char *)ourbitmap, ysiz*xdim);
208   }
209  
210  
211   gettext(fp)                     /* get text from a file */
212   FILE  *fp;
213   {
177        char  *fgets();
214          char  buf[MAXLINE];
215          register LINE  *curl;
216          int  len;
# Line 187 | Line 223 | FILE  *fp;
223                  if (curl == NULL)
224                          goto memerr;
225                  len = strlen(buf);
226 <                curl->s = malloc(len);
226 >                curl->s = (char *)malloc(len);
227                  curl->sp = (short *)malloc(sizeof(short)*len--);
228                  if (curl->s == NULL | curl->sp == NULL)
229                          goto memerr;
# Line 197 | Line 233 | FILE  *fp;
233                  curl->s[len] = '\0';
234                  if (spacing < -1./256.)
235                          len = squeeztext(curl->sp, curl->s, ourfont,
236 <                                        (int)(spacing*-256.0));
236 >                                        (int)(spacing*-256.));
237                  else if (spacing > 1./256.)
238                          len = proptext(curl->sp, curl->s, ourfont,
239 <                                        (int)(spacing*256.0), 3);
239 >                                        (int)(spacing*256.), 3);
240                  else
241                          len = uniftext(curl->sp, curl->s, ourfont);
242                  if (len > maxwidth)
# Line 224 | Line 260 | char  *av[];
260          ourtext = (LINE *)malloc(sizeof(LINE));
261          if (ourtext == NULL)
262                  goto memerr;
263 <        ourtext->s = malloc(MAXLINE);
263 >        ourtext->s = (char *)malloc(MAXLINE);
264          if (ourtext->s == NULL)
265                  goto memerr;
266          for (cp = ourtext->s; ac-- > 0; av++) {
# Line 238 | Line 274 | char  *av[];
274          ourtext->sp = (short *)malloc(sizeof(short)*(maxline+1));
275          if (ourtext->sp == NULL)
276                  goto memerr;
277 <        if (spacing < 0.0)
277 >        if (spacing < -1./256.)
278                  maxwidth = squeeztext(ourtext->sp, ourtext->s, ourfont,
279 <                                (int)(spacing*-256.0));
280 <        else if (spacing > 0.0)
279 >                                (int)(spacing*-256.));
280 >        else if (spacing > 1./256.)
281                  maxwidth = proptext(ourtext->sp, ourtext->s, ourfont,
282 <                                (int)(spacing*256.0), 3);
282 >                                (int)(spacing*256.), 3);
283          else
284                  maxwidth = uniftext(ourtext->sp, ourtext->s, ourfont);
285          nlines = 1;
# Line 361 | Line 397 | FILE  *fp;
397   {
398          COLR  pixval[SSS*SSS+1];        /* possible pixel values */
399          COLOR  ctmp0, ctmp1;
400 <        double  d;
400 >        double  d;
401          COLR  *scanout;
402          int  x, y;
403          register int  i, j;
# Line 402 | Line 438 | FILE  *fp;
438                          exit(1);
439                  }
440          }
441 <        free((char *)scanout);
441 >        free((void *)scanout);
442   }

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines