1/*
2 * Copyright © 2010 Intel Corporation
3 *
4 * Permission is hereby granted, free of charge, to any person obtaining a
5 * copy of this software and associated documentation files (the "Software"),
6 * to deal in the Software without restriction, including without limitation
7 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
8 * and/or sell copies of the Software, and to permit persons to whom the
9 * Software is furnished to do so, subject to the following conditions:
10 *
11 * The above copyright notice and this permission notice (including the next
12 * paragraph) shall be included in all copies or substantial portions of the
13 * Software.
14 *
15 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
16 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
17 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
18 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
19 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
20 * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
21 * DEALINGS IN THE SOFTWARE.
22 */
23
24#include <sys/types.h>
25#include <sys/stat.h>
26#include <fcntl.h>
27#include <unistd.h>
28#include <string.h>
29#include <errno.h>
30#include "glcpp.h"
31#include "main/mtypes.h"
32#include "main/shaderobj.h"
33
34extern int yydebug;
35
36void
37_mesa_reference_shader(struct gl_context *ctx, struct gl_shader **ptr,
38                       struct gl_shader *sh)
39{
40   *ptr = sh;
41}
42
43/* Read from fd until EOF and return a string of everything read.
44 */
45static char *
46load_text_fd (void *ctx, int fd)
47{
48#define CHUNK 4096
49	char *text = NULL;
50	ssize_t text_size = 0;
51	ssize_t total_read = 0;
52	ssize_t bytes;
53
54	while (1) {
55		if (total_read + CHUNK + 1 > text_size) {
56			text_size = text_size ? text_size * 2 : CHUNK + 1;
57			text = talloc_realloc_size (ctx, text, text_size);
58			if (text == NULL) {
59				fprintf (stderr, "Out of memory\n");
60				return NULL;
61			}
62		}
63		bytes = read (fd, text + total_read, CHUNK);
64		if (bytes < 0) {
65			fprintf (stderr, "Error while reading: %s\n",
66				 strerror (errno));
67			talloc_free (text);
68			return NULL;
69		}
70
71		if (bytes == 0) {
72			break;
73		}
74
75		total_read += bytes;
76	}
77
78	text[total_read] = '\0';
79
80	return text;
81}
82
83static char *
84load_text_file(void *ctx, const char *filename)
85{
86	char *text;
87	int fd;
88
89	if (filename == NULL || strcmp (filename, "-") == 0)
90		return load_text_fd (ctx, STDIN_FILENO);
91
92	fd = open (filename, O_RDONLY);
93	if (fd < 0) {
94		fprintf (stderr, "Failed to open file %s: %s\n",
95			 filename, strerror (errno));
96		return NULL;
97	}
98
99	text = load_text_fd (ctx, fd);
100
101	close(fd);
102
103	return text;
104}
105
106int
107main (int argc, char *argv[])
108{
109	char *filename = NULL;
110	void *ctx = talloc(NULL, void*);
111	char *info_log = talloc_strdup(ctx, "");
112	const char *shader;
113	int ret;
114
115	if (argc) {
116		filename = argv[1];
117	}
118
119	shader = load_text_file (ctx, filename);
120	if (shader == NULL)
121	   return 1;
122
123	ret = preprocess(ctx, &shader, &info_log, NULL, API_OPENGL);
124
125	printf("%s", shader);
126	fprintf(stderr, "%s", info_log);
127
128	talloc_free(ctx);
129
130	return ret;
131}
132