1/*
2 * Copyright (c) 2015 Etnaviv Project
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, sub license,
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
12 * next paragraph) shall be included in all copies or substantial portions
13 * of the 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 NON-INFRINGEMENT. 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 * Authors:
24 *    Rob Clark <robclark@freedesktop.org>
25 *    Christian Gmeiner <christian.gmeiner@gmail.com>
26 */
27
28#include <err.h>
29#include <fcntl.h>
30#include <sys/mman.h>
31#include <sys/stat.h>
32#include <unistd.h>
33
34#include "tgsi/tgsi_dump.h"
35#include "tgsi/tgsi_parse.h"
36#include "tgsi/tgsi_text.h"
37
38#include "etnaviv_compiler.h"
39#include "etnaviv_debug.h"
40#include "etnaviv_internal.h"
41#include "etnaviv_shader.h"
42
43#include "util/u_memory.h"
44
45static const struct etna_specs specs_gc2000 = {
46   .vs_need_z_div = 0,
47   .has_sin_cos_sqrt = 1,
48   .has_sign_floor_ceil = 1,
49   .vertex_sampler_offset = 8,
50   .vertex_output_buffer_size = 512,
51   .vertex_cache_size = 16,
52   .shader_core_count = 4,
53   .max_instructions = 512,
54   .max_varyings = 12,
55   .max_registers = 64,
56   .max_vs_uniforms = 168,
57   .max_ps_uniforms = 128,
58   .num_constants = 168,
59};
60
61static int
62read_file(const char *filename, void **ptr, size_t *size)
63{
64   int fd, ret;
65   struct stat st;
66
67   *ptr = MAP_FAILED;
68
69   fd = open(filename, O_RDONLY);
70   if (fd == -1) {
71      warnx("couldn't open `%s'", filename);
72      return 1;
73   }
74
75   ret = fstat(fd, &st);
76   if (ret)
77      errx(1, "couldn't stat `%s'", filename);
78
79   *size = st.st_size;
80   *ptr = mmap(NULL, st.st_size, PROT_READ, MAP_SHARED, fd, 0);
81   if (*ptr == MAP_FAILED)
82      errx(1, "couldn't map `%s'", filename);
83
84   close(fd);
85
86   return 0;
87}
88
89static void
90print_usage(void)
91{
92   printf("Usage: etnaviv_compiler [OPTIONS]... FILE\n");
93   printf("    --verbose         - verbose compiler/debug messages\n");
94   printf("    --frag-rb-swap    - swap rb in color output (FRAG)\n");
95   printf("    --help            - show this message\n");
96}
97
98int
99main(int argc, char **argv)
100{
101   int ret = 0, n = 1;
102   const char *filename;
103   struct tgsi_token toks[65536];
104   struct tgsi_parse_context parse;
105   struct etna_shader s = {};
106   struct etna_shader_key key = {};
107   void *ptr;
108   size_t size;
109
110   struct etna_shader_variant *v = CALLOC_STRUCT(etna_shader_variant);
111   if (!v) {
112      fprintf(stderr, "malloc failed!\n");
113      return 1;
114   }
115
116   etna_mesa_debug = ETNA_DBG_MSGS;
117
118   while (n < argc) {
119      if (!strcmp(argv[n], "--verbose")) {
120         etna_mesa_debug |= ETNA_DBG_COMPILER_MSGS;
121         n++;
122         continue;
123      }
124
125      if (!strcmp(argv[n], "--frag-rb-swap")) {
126         debug_printf(" %s", argv[n]);
127         key.frag_rb_swap = true;
128         n++;
129         continue;
130      }
131
132      if (!strcmp(argv[n], "--help")) {
133         print_usage();
134         return 0;
135      }
136
137      break;
138   }
139
140   filename = argv[n];
141
142   ret = read_file(filename, &ptr, &size);
143   if (ret) {
144      print_usage();
145      return ret;
146   }
147
148   debug_printf("%s\n", (char *)ptr);
149
150   if (!tgsi_text_translate(ptr, toks, ARRAY_SIZE(toks)))
151      errx(1, "could not parse `%s'", filename);
152
153   tgsi_parse_init(&parse, toks);
154
155   s.specs = &specs_gc2000;
156   s.tokens = toks;
157
158   v->shader = &s;
159   v->key = key;
160
161   if (!etna_compile_shader(v)) {
162      fprintf(stderr, "compiler failed!\n");
163      return 1;
164   }
165
166   etna_dump_shader(v);
167   etna_destroy_shader(v);
168}
169