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

Comparing ray/src/cal/lam.c (file contents):
Revision 1.6 by greg, Mon Jun 13 22:40:47 2005 UTC vs.
Revision 1.7 by greg, Sun Sep 25 20:36:02 2005 UTC

# Line 10 | Line 10 | static const char      RCSid[] = "$Id$";
10   #include <stdlib.h>
11   #include <string.h>
12   #include <stdio.h>
13 + #include <ctype.h>
14  
15   #include "platform.h"
16   #include "rtprocess.h"
17  
18 < #define MAXFILE         32              /* maximum number of files */
18 > #define MAXFILE         512             /* maximum number of files */
19  
20 < #define MAXLINE         512             /* maximum input line */
20 > #define MAXLINE         4096            /* maximum input line */
21  
22   FILE    *input[MAXFILE];
23 + int     bytsiz[MAXFILE];
24   char    *tabc[MAXFILE];
25   int     nfiles;
26  
# Line 31 | Line 33 | char   *argv[];
33   {
34          register int    i;
35          char    *curtab;
36 <        int     running;
36 >        int     curbytes;
37 >        int     running, puteol;
38  
39          curtab = "\t";
40 +        curbytes = 0;
41          nfiles = 0;
42          for (i = 1; i < argc; i++) {
43                  if (argv[i][0] == '-') {
# Line 41 | Line 45 | char   *argv[];
45                          case 't':
46                                  curtab = argv[i]+2;
47                                  break;
48 +                        case 'i':
49 +                                switch (argv[i][2]) {
50 +                                case 'f':
51 +                                        curbytes = sizeof(float);
52 +                                        break;
53 +                                case 'd':
54 +                                        curbytes = sizeof(double);
55 +                                        break;
56 +                                case 'w':
57 +                                        curbytes = sizeof(int);
58 +                                        break;
59 +                                case 'a':
60 +                                        curbytes = argv[i][3] ? 1 : 0;
61 +                                        break;
62 +                                default:
63 +                                        goto badopt;
64 +                                }
65 +                                if (isdigit(argv[i][3]))
66 +                                        curbytes *= atoi(argv[i]+3);
67 +                                if (curbytes < 0 || curbytes > MAXLINE) {
68 +                                        fputs(argv[0], stderr);
69 +                                        fputs(": illegal input size\n", stderr);
70 +                                        exit(1);
71 +                                }
72 +                                break;
73                          case '\0':
74                                  tabc[nfiles] = curtab;
75 +                                bytsiz[nfiles] = curbytes;
76                                  input[nfiles++] = stdin;
77                                  break;
78 +                        badopt:;
79                          default:
80                                  fputs(argv[0], stderr);
81                                  fputs(": bad option\n", stderr);
# Line 52 | Line 83 | char   *argv[];
83                          }
84                  } else if (argv[i][0] == '!') {
85                          tabc[nfiles] = curtab;
86 +                        bytsiz[nfiles] = curbytes;
87                          if ((input[nfiles++] = popen(argv[i]+1, "r")) == NULL) {
88                                  fputs(argv[i], stderr);
89                                  fputs(": cannot start command\n", stderr);
# Line 59 | Line 91 | char   *argv[];
91                          }
92                  } else {
93                          tabc[nfiles] = curtab;
94 +                        bytsiz[nfiles] = curbytes;
95                          if ((input[nfiles++] = fopen(argv[i], "r")) == NULL) {
96                                  fputs(argv[i], stderr);
97                                  fputs(": cannot open file\n", stderr);
# Line 71 | Line 104 | char   *argv[];
104                          exit(1);
105                  }
106          }
107 <
107 >        puteol = 0;                             /* check for tab character */
108 >        for (i = nfiles; i--; )
109 >                if (isprint(tabc[i][0]) || tabc[i][0] == '\t') {
110 >                        puteol++;
111 >                        break;
112 >                }
113          do {
114                  running = 0;
115                  for (i = 0; i < nfiles; i++) {
116 <                        if (fgets(buf, MAXLINE, input[i]) != NULL) {
116 >                        if (bytsiz[i]) {                /* binary file */
117 >                                if (fread(buf, bytsiz[i], 1, input[i]) == 1) {
118 >                                        if (i)
119 >                                                fputs(tabc[i], stdout);
120 >                                        fwrite(buf, bytsiz[i], 1, stdout);
121 >                                        running++;
122 >                                }
123 >                        } else if (fgets(buf, MAXLINE, input[i]) != NULL) {
124                                  if (i)
125                                          fputs(tabc[i], stdout);
126                                  buf[strlen(buf)-1] = '\0';
127                                  fputs(buf, stdout);
128 +                                puteol++;
129                                  running++;
130                          }
131                  }
132 <                if (running)
132 >                if (running && puteol)
133                          putchar('\n');
134          } while (running);
135  

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines