src/util/getinfo.c

#ifndef lint
static const char       RCSid[] = "$Id: getinfo.c,v 2.12 2014/09/08 18:21:39 greg Exp $";
#endif
/*
 *  getinfo.c - program to read info. header from file.
 *
 *     1/3/86
 */

#include  <stdio.h>
#include  <string.h>

#include  "platform.h"
#include  "resolu.h"

#ifdef getc_unlocked            /* avoid nasty file-locking overhead */
#undef getchar
#undef putchar
#define getchar         getchar_unlocked
#define putchar         putchar_unlocked
#endif

#if defined(_WIN32) || defined(_WIN64)
#include <process.h>
#define execvp  _execvp
#endif

static gethfunc tabstr;
static void getdim(FILE *fp);
static void copycat(void);


static int
tabstr(                         /* put out line followed by tab */
        char  *s,
        void *p
)
{
        while (*s) {
                putchar(*s);
                s++;
        }
        if (*--s == '\n')
                putchar('\t');
        return(0);
}


int
main(
        int  argc,
        char  **argv
)
{
        int  dim = 0;
        FILE  *fp;
        int  i;

        if (argc > 1 && !strcmp(argv[1], "-d")) {
                argc--; argv++;
                dim = 1;
                SET_FILE_BINARY(stdin);
        } else if (argc > 2 && !strcmp(argv[1], "-c")) {
                SET_FILE_BINARY(stdin);
                SET_FILE_BINARY(stdout);
                setvbuf(stdin, NULL, _IONBF, 2);
                getheader(stdin, (gethfunc *)fputs, stdout);
                printargs(argc-2, argv+2, stdout);
                fputc('\n', stdout);
                fflush(stdout);
                execvp(argv[2], argv+2);
                perror(argv[2]);
                return 1;
        } else if (argc == 2 && !strcmp(argv[1], "-")) {
                SET_FILE_BINARY(stdin);
                SET_FILE_BINARY(stdout);
                getheader(stdin, NULL, NULL);
                copycat();
                return 0;
        }
        for (i = 1; i < argc; i++) {
                fputs(argv[i], stdout);
                if ((fp = fopen(argv[i], "r")) == NULL)
                        fputs(": cannot open\n", stdout);
                else {
                        if (dim) {
                                fputs(": ", stdout);
                                getdim(fp);
                        } else {
                                tabstr(":\n", NULL);
                                getheader(fp, tabstr, NULL);
                                fputc('\n', stdout);
                        }
                        fclose(fp);
                }
        }
        if (argc == 1) {
                if (dim) {
                        getdim(stdin);
                } else {
                        getheader(stdin, (gethfunc *)fputs, stdout);
                        fputc('\n', stdout);
                }
        }
        return 0;
}


static void
getdim(                         /* get dimensions from file */
        FILE  *fp
)
{
        int  j;
        int  c;

        getheader(fp, NULL, NULL);      /* skip header */

        switch (c = getc(fp)) {
        case '+':               /* picture */
        case '-':
                do
                        putchar(c);
                while (c != '\n' && (c = getc(fp)) != EOF);
                break;
        case 1:                 /* octree */
                getc(fp);
                j = 0;
                while ((c = getc(fp)) != EOF)
                        if (c == 0) {
                                if (++j >= 4)
                                        break;
                                putchar(' ');
                        } else {
                                putchar(c);
                        }
                putchar('\n');
                break;
        default:                /* ??? */
                fputs("unknown file type\n", stdout);
                break;
        }
}


static void
copycat(void)                   /* copy input to output */
{
        char    buf[8192];
        int     n;

        fflush(stdout);
        while ((n = fread(buf, 1, sizeof(buf), stdin)) > 0)
                if (write(fileno(stdout), buf, n) != n)
                        break;
}
Revision:	2.13
Committed:	Sun Mar 6 01:13:18 2016 UTC (9 years, 7 months ago) by schorsch
Content type:	text/plain
Branch:	MAIN
Changes since 2.12:	+2 -2 lines
Log Message:	Prepare for SCons build on Win32 and Win64
#	User	Rev	Content
1	greg	1.1	#ifndef lint
2	schorsch	2.13	static const char RCSid[] = "$Id: getinfo.c,v 2.12 2014/09/08 18:21:39 greg Exp $";
3	greg	1.1	#endif
4			/*
5			* getinfo.c - program to read info. header from file.
6			*
7			* 1/3/86
8			*/
9
10			#include <stdio.h>
11	schorsch	2.8	#include <string.h>
12	greg	1.1
13	schorsch	2.6	#include "platform.h"
14	schorsch	2.8	#include "resolu.h"
15	greg	2.2
16	greg	2.9	#ifdef getc_unlocked /* avoid nasty file-locking overhead */
17			#undef getchar
18			#undef putchar
19			#define getchar getchar_unlocked
20			#define putchar putchar_unlocked
21			#endif
22
23	schorsch	2.13	#if defined(_WIN32) \|\| defined(_WIN64)
24	greg	2.11	#include <process.h>
25	greg	2.10	#define execvp _execvp
26			#endif
27	greg	2.9
28	schorsch	2.8	static gethfunc tabstr;
29	greg	2.10	static void getdim(FILE *fp);
30	schorsch	2.8	static void copycat(void);
31	greg	1.1
32	greg	1.3
33	schorsch	2.8	static int
34			tabstr( /* put out line followed by tab */
35	greg	2.10	char *s,
36	schorsch	2.8	void *p
37			)
38	greg	1.1	{
39			while (*s) {
40			putchar(*s);
41			s++;
42			}
43			if (*--s == '\n')
44			putchar('\t');
45	gwlarson	2.4	return(0);
46	greg	1.1	}
47
48
49	schorsch	2.8	int
50			main(
51			int argc,
52			char **argv
53			)
54	greg	1.1	{
55			int dim = 0;
56			FILE *fp;
57			int i;
58
59			if (argc > 1 && !strcmp(argv[1], "-d")) {
60			argc--; argv++;
61			dim = 1;
62	schorsch	2.6	SET_FILE_BINARY(stdin);
63	greg	2.10	} else if (argc > 2 && !strcmp(argv[1], "-c")) {
64			SET_FILE_BINARY(stdin);
65			SET_FILE_BINARY(stdout);
66	greg	2.12	setvbuf(stdin, NULL, _IONBF, 2);
67	greg	2.10	getheader(stdin, (gethfunc *)fputs, stdout);
68			printargs(argc-2, argv+2, stdout);
69			fputc('\n', stdout);
70			fflush(stdout);
71			execvp(argv[2], argv+2);
72			perror(argv[2]);
73			return 1;
74	greg	1.2	} else if (argc == 2 && !strcmp(argv[1], "-")) {
75	schorsch	2.6	SET_FILE_BINARY(stdin);
76			SET_FILE_BINARY(stdout);
77	greg	2.3	getheader(stdin, NULL, NULL);
78	greg	1.2	copycat();
79	schorsch	2.8	return 0;
80	greg	1.1	}
81			for (i = 1; i < argc; i++) {
82			fputs(argv[i], stdout);
83			if ((fp = fopen(argv[i], "r")) == NULL)
84			fputs(": cannot open\n", stdout);
85			else {
86			if (dim) {
87			fputs(": ", stdout);
88			getdim(fp);
89			} else {
90	schorsch	2.8	tabstr(":\n", NULL);
91	greg	1.3	getheader(fp, tabstr, NULL);
92	greg	2.10	fputc('\n', stdout);
93	greg	1.1	}
94			fclose(fp);
95			}
96			}
97	schorsch	2.7	if (argc == 1) {
98	greg	1.1	if (dim) {
99			getdim(stdin);
100			} else {
101	greg	2.10	getheader(stdin, (gethfunc *)fputs, stdout);
102			fputc('\n', stdout);
103	greg	1.1	}
104	schorsch	2.7	}
105	schorsch	2.8	return 0;
106	greg	1.1	}
107
108
109	schorsch	2.8	static void
110			getdim( /* get dimensions from file */
111	greg	2.10	FILE *fp
112	schorsch	2.8	)
113	greg	1.1	{
114			int j;
115	greg	2.10	int c;
116	greg	1.1
117	greg	2.3	getheader(fp, NULL, NULL); /* skip header */
118	greg	1.1
119			switch (c = getc(fp)) {
120			case '+': /* picture */
121			case '-':
122			do
123			putchar(c);
124			while (c != '\n' && (c = getc(fp)) != EOF);
125			break;
126			case 1: /* octree */
127			getc(fp);
128			j = 0;
129			while ((c = getc(fp)) != EOF)
130	greg	2.10	if (c == 0) {
131	greg	1.1	if (++j >= 4)
132			break;
133	greg	2.10	putchar(' ');
134			} else {
135	greg	1.1	putchar(c);
136	greg	2.10	}
137	greg	1.1	putchar('\n');
138			break;
139			default: /* ??? */
140			fputs("unknown file type\n", stdout);
141			break;
142			}
143	greg	1.2	}
144
145
146	schorsch	2.8	static void
147			copycat(void) /* copy input to output */
148	greg	1.2	{
149	greg	2.10	char buf[8192];
150	greg	2.11	int n;
151	greg	2.3
152	greg	2.10	fflush(stdout);
153			while ((n = fread(buf, 1, sizeof(buf), stdin)) > 0)
154			if (write(fileno(stdout), buf, n) != n)
155			break;
156	greg	1.1	}