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.7 by greg, Sun Sep 25 20:36:02 2005 UTC vs.
Revision 1.11 by greg, Fri Jun 18 21:22:49 2010 UTC

# Line 31 | Line 31 | main(argc, argv)
31   int     argc;
32   char    *argv[];
33   {
34 <        register int    i;
34 >        int     unbuff = 0;
35 >        int     i;
36          char    *curtab;
37          int     curbytes;
38 <        int     running, puteol;
38 >        int     puteol;
39  
40          curtab = "\t";
41          curbytes = 0;
# Line 45 | Line 46 | char   *argv[];
46                          case 't':
47                                  curtab = argv[i]+2;
48                                  break;
49 +                        case 'u':
50 +                                unbuff = !unbuff;
51 +                                break;
52                          case 'i':
53                                  switch (argv[i][2]) {
54                                  case 'f':
# Line 53 | Line 57 | char   *argv[];
57                                  case 'd':
58                                          curbytes = sizeof(double);
59                                          break;
60 <                                case 'w':
60 >                                case 'i':
61                                          curbytes = sizeof(int);
62                                          break;
63 +                                case 'w':
64 +                                        curbytes = 2;
65 +                                        break;
66 +                                case 'b':
67 +                                        curbytes = 1;
68 +                                        break;
69                                  case 'a':
70                                          curbytes = argv[i][3] ? 1 : 0;
71                                          break;
# Line 69 | Line 79 | char   *argv[];
79                                          fputs(": illegal input size\n", stderr);
80                                          exit(1);
81                                  }
82 +                                if (curbytes)
83 +                                        curtab = "";
84                                  break;
85                          case '\0':
86                                  tabc[nfiles] = curtab;
# Line 84 | Line 96 | char   *argv[];
96                  } else if (argv[i][0] == '!') {
97                          tabc[nfiles] = curtab;
98                          bytsiz[nfiles] = curbytes;
99 <                        if ((input[nfiles++] = popen(argv[i]+1, "r")) == NULL) {
99 >                        if ((input[nfiles] = popen(argv[i]+1, "r")) == NULL) {
100                                  fputs(argv[i], stderr);
101                                  fputs(": cannot start command\n", stderr);
102                                  exit(1);
103                          }
104 +                        if (bytsiz[nfiles])
105 +                                SET_FILE_BINARY(input[nfiles]);
106 +                        ++nfiles;
107                  } else {
108                          tabc[nfiles] = curtab;
109                          bytsiz[nfiles] = curbytes;
110 <                        if ((input[nfiles++] = fopen(argv[i], "r")) == NULL) {
110 >                        if ((input[nfiles] = fopen(argv[i], "r")) == NULL) {
111                                  fputs(argv[i], stderr);
112                                  fputs(": cannot open file\n", stderr);
113                                  exit(1);
114                          }
115 +                        if (bytsiz[nfiles])
116 +                                SET_FILE_BINARY(input[nfiles]);
117 +                        ++nfiles;
118                  }
119                  if (nfiles >= MAXFILE) {
120                          fputs(argv[0], stderr);
# Line 104 | Line 122 | char   *argv[];
122                          exit(1);
123                  }
124          }
125 <        puteol = 0;                             /* check for tab character */
125 >        puteol = 0;                             /* check for ASCII output */
126          for (i = nfiles; i--; )
127 <                if (isprint(tabc[i][0]) || tabc[i][0] == '\t') {
127 >                if (!bytsiz[i] || isprint(tabc[i][0]) || tabc[i][0] == '\t') {
128                          puteol++;
129                          break;
130                  }
131 <        do {
114 <                running = 0;
131 >        for ( ; ; ) {                           /* main loop */
132                  for (i = 0; i < nfiles; i++) {
133                          if (bytsiz[i]) {                /* binary file */
134 <                                if (fread(buf, bytsiz[i], 1, input[i]) == 1) {
135 <                                        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) {
134 >                                if (fread(buf, bytsiz[i], 1, input[i]) < 1)
135 >                                        break;
136                                  if (i)
137                                          fputs(tabc[i], stdout);
138 +                                fwrite(buf, bytsiz[i], 1, stdout);
139 +                        } else {
140 +                                if (fgets(buf, MAXLINE, input[i]) == NULL)
141 +                                        break;
142 +                                if (i)
143 +                                        fputs(tabc[i], stdout);
144                                  buf[strlen(buf)-1] = '\0';
145                                  fputs(buf, stdout);
128                                puteol++;
129                                running++;
146                          }
147                  }
148 <                if (running && puteol)
148 >                if (i < nfiles)
149 >                        break;
150 >                if (puteol)
151                          putchar('\n');
152 <        } while (running);
153 <
154 <        exit(0);
152 >                if (unbuff)
153 >                        fflush(stdout);
154 >        }
155 >        return(0);
156   }

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines