| 31 |
|
|
| 32 |
|
#include "tiff.h" /* for int32 */ |
| 33 |
|
#include "rtio.h" |
| 34 |
+ |
#include "color.h" |
| 35 |
|
#include "resolu.h" |
| 36 |
|
|
| 37 |
|
#define MAXLINE 2048 |
| 58 |
|
{ |
| 59 |
|
fputs(HDRSTR, fp); |
| 60 |
|
fputs(s, fp); |
| 61 |
< |
putc('\n', fp); |
| 61 |
> |
fputc('\n', fp); |
| 62 |
|
} |
| 63 |
|
|
| 64 |
|
|
| 168 |
|
FILE *fp |
| 169 |
|
) |
| 170 |
|
{ |
| 171 |
+ |
#if defined(_WIN32) || defined(_WIN64) |
| 172 |
+ |
extern char *fixargv0(char *arg0); |
| 173 |
+ |
char myav0[128]; |
| 174 |
+ |
/* clean up Windows executable path */ |
| 175 |
+ |
if (ac-- <= 0) return; |
| 176 |
+ |
fputs(fixargv0(strcpy(myav0, *av++)), fp); |
| 177 |
+ |
fputc(ac ? ' ' : '\n', fp); |
| 178 |
+ |
#endif |
| 179 |
|
while (ac-- > 0) { |
| 180 |
|
fputword(*av++, fp); |
| 181 |
|
fputc(ac ? ' ' : '\n', fp); |
| 191 |
|
{ |
| 192 |
|
const char *cp = FMTSTR; |
| 193 |
|
char *r = fmt; |
| 194 |
< |
|
| 194 |
> |
/* check against format string */ |
| 195 |
|
while (*cp) if (*cp++ != *s++) return(0); |
| 196 |
|
while (isspace(*s)) s++; |
| 197 |
|
if (!*s) return(0); |
| 198 |
< |
if (r == NULL) return(1); |
| 199 |
< |
do |
| 198 |
> |
if (r == NULL) /* just checking if format? */ |
| 199 |
> |
return(1); |
| 200 |
> |
do /* copy format ID */ |
| 201 |
|
*r++ = *s++; |
| 202 |
< |
while (*s && !isspace(*s) && r-fmt < MAXFMTLEN-1); |
| 203 |
< |
*r = '\0'; |
| 202 |
> |
while (*s && r-fmt < MAXFMTLEN-1); |
| 203 |
> |
|
| 204 |
> |
do /* remove trailing white space */ |
| 205 |
> |
*r-- = '\0'; |
| 206 |
> |
while (r > fmt && isspace(*r)); |
| 207 |
> |
|
| 208 |
|
return(1); |
| 209 |
|
} |
| 210 |
|
|
| 215 |
|
FILE *fp |
| 216 |
|
) |
| 217 |
|
{ |
| 218 |
+ |
int align = 0; |
| 219 |
+ |
|
| 220 |
|
fputs(FMTSTR, fp); |
| 221 |
|
fputs(s, fp); |
| 222 |
< |
putc('\n', fp); |
| 222 |
> |
/* pad to align binary type for mmap() */ |
| 223 |
> |
if (globmatch(PICFMT, s)) |
| 224 |
> |
align = 0; /* not needed for picture data */ |
| 225 |
> |
else if (!strncmp("float", s, 5)) |
| 226 |
> |
align = sizeof(float); |
| 227 |
> |
else if (!strncmp("double", s, 6)) |
| 228 |
> |
align = sizeof(double); |
| 229 |
> |
else if (!strncmp("16-bit", s, 6)) |
| 230 |
> |
align = 2; |
| 231 |
> |
else if (!strncmp("32-bit", s, 6)) |
| 232 |
> |
align = 4; |
| 233 |
> |
else if (!strncmp("64-bit", s, 6)) |
| 234 |
> |
align = 8; |
| 235 |
> |
if (align) { |
| 236 |
> |
long pos = ftell(fp); |
| 237 |
> |
if (pos >= 0) { |
| 238 |
> |
pos = (pos + 2) % align; |
| 239 |
> |
if (pos) align -= pos; |
| 240 |
> |
else align = 0; |
| 241 |
> |
} else |
| 242 |
> |
align = 0; |
| 243 |
> |
} |
| 244 |
> |
while (align-- > 0) |
| 245 |
> |
putc(' ', fp); |
| 246 |
> |
fputc('\n', fp); |
| 247 |
|
} |
| 248 |
|
|
| 249 |
|
|
| 368 |
|
while (*s++); |
| 369 |
|
return(0); |
| 370 |
|
case '[': /* character set */ |
| 371 |
< |
setmatch = *s == *++p; |
| 371 |
> |
setmatch = (*s == *++p); |
| 372 |
|
if (!*p) |
| 373 |
|
return(0); |
| 374 |
|
while (*++p != ']') { |
| 375 |
|
if (!*p) |
| 376 |
|
return(0); |
| 377 |
|
if (*p == '-') { |
| 378 |
< |
setmatch += (p[-1] <= *s && *s <= p[1]); |
| 378 |
> |
setmatch += (p[-1] <= *s) & (*s <= p[1]); |
| 379 |
|
if (!*++p) |
| 380 |
|
break; |
| 381 |
|
} else |
| 386 |
|
s++; |
| 387 |
|
break; |
| 388 |
|
case '\\': /* literal next */ |
| 389 |
< |
p++; |
| 389 |
> |
if (!*++p) |
| 390 |
> |
return(0); |
| 391 |
|
/* fall through */ |
| 392 |
|
default: /* normal character */ |
| 393 |
|
if (*p != *s) |