Michal Krol
382 lines
8.6 KiB
C
382 lines
8.6 KiB
C
/**************************************************************************
|
|
*
|
|
* Copyright 2009 VMware, Inc.
|
|
* All Rights Reserved.
|
|
*
|
|
* Permission is hereby granted, free of charge, to any person obtaining a
|
|
* copy of this software and associated documentation files (the
|
|
* "Software"), to deal in the Software without restriction, including
|
|
* without limitation the rights to use, copy, modify, merge, publish,
|
|
* distribute, sub license, and/or sell copies of the Software, and to
|
|
* permit persons to whom the Software is furnished to do so, subject to
|
|
* the following conditions:
|
|
*
|
|
* The above copyright notice and this permission notice (including the
|
|
* next paragraph) shall be included in all copies or substantial portions
|
|
* of the Software.
|
|
*
|
|
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
|
|
* OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
|
|
* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT.
|
|
* IN NO EVENT SHALL TUNGSTEN GRAPHICS AND/OR ITS SUPPLIERS BE LIABLE FOR
|
|
* ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
|
|
* TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
|
|
* SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
|
|
*
|
|
**************************************************************************/
|
|
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <assert.h>
|
|
#include "../pp/sl_pp_public.h"
|
|
|
|
|
|
int
|
|
main(int argc,
|
|
char *argv[])
|
|
{
|
|
FILE *in;
|
|
long size;
|
|
char *inbuf;
|
|
struct sl_pp_purify_options options;
|
|
struct sl_pp_context *context;
|
|
unsigned int version;
|
|
struct sl_pp_token_info *outtokens;
|
|
FILE *out;
|
|
unsigned int i;
|
|
|
|
if (argc != 3) {
|
|
return 1;
|
|
}
|
|
|
|
in = fopen(argv[1], "rb");
|
|
if (!in) {
|
|
return 1;
|
|
}
|
|
|
|
fseek(in, 0, SEEK_END);
|
|
size = ftell(in);
|
|
fseek(in, 0, SEEK_SET);
|
|
|
|
out = fopen(argv[2], "wb");
|
|
if (!out) {
|
|
fclose(in);
|
|
return 1;
|
|
}
|
|
|
|
inbuf = malloc(size + 1);
|
|
if (!inbuf) {
|
|
fprintf(out, "$OOMERROR\n");
|
|
|
|
fclose(out);
|
|
fclose(in);
|
|
return 1;
|
|
}
|
|
|
|
if (fread(inbuf, 1, size, in) != size) {
|
|
fprintf(out, "$READERROR\n");
|
|
|
|
free(inbuf);
|
|
fclose(out);
|
|
fclose(in);
|
|
return 1;
|
|
}
|
|
inbuf[size] = '\0';
|
|
|
|
fclose(in);
|
|
|
|
memset(&options, 0, sizeof(options));
|
|
|
|
context = sl_pp_context_create(inbuf, &options);
|
|
if (!context) {
|
|
fprintf(out, "$CONTEXERROR\n");
|
|
|
|
free(inbuf);
|
|
fclose(out);
|
|
return 1;
|
|
}
|
|
|
|
if (sl_pp_version(context, &version)) {
|
|
fprintf(out, "$ERROR: `%s'\n", sl_pp_context_error_message(context));
|
|
|
|
sl_pp_context_destroy(context);
|
|
free(inbuf);
|
|
fclose(out);
|
|
return -1;
|
|
}
|
|
|
|
if (sl_pp_context_add_extension(context, "ARB_draw_buffers", "GL_ARB_draw_buffers") ||
|
|
sl_pp_context_add_extension(context, "ARB_texture_rectangle", "GL_ARB_texture_rectangle")) {
|
|
fprintf(out, "$ERROR: `%s'\n", sl_pp_context_error_message(context));
|
|
|
|
printf("Error: %s\n", sl_pp_context_error_message(context));
|
|
sl_pp_context_destroy(context);
|
|
free(inbuf);
|
|
fclose(out);
|
|
return 0;
|
|
}
|
|
|
|
if (sl_pp_context_add_predefined(context, "__GLSL_PP_PREDEFINED_MACRO_TEST", "1")) {
|
|
fprintf(out, "$ERROR: `%s'\n", sl_pp_context_error_message(context));
|
|
|
|
printf("Error: %s\n", sl_pp_context_error_message(context));
|
|
sl_pp_context_destroy(context);
|
|
free(inbuf);
|
|
fclose(out);
|
|
return 0;
|
|
}
|
|
|
|
if (sl_pp_process(context, &outtokens)) {
|
|
fprintf(out, "$ERROR: `%s'\n", sl_pp_context_error_message(context));
|
|
|
|
sl_pp_context_destroy(context);
|
|
free(inbuf);
|
|
fclose(out);
|
|
return -1;
|
|
}
|
|
|
|
free(inbuf);
|
|
|
|
for (i = 0; outtokens[i].token != SL_PP_EOF; i++) {
|
|
switch (outtokens[i].token) {
|
|
case SL_PP_NEWLINE:
|
|
fprintf(out, "\n");
|
|
break;
|
|
|
|
case SL_PP_COMMA:
|
|
fprintf(out, ", ");
|
|
break;
|
|
|
|
case SL_PP_SEMICOLON:
|
|
fprintf(out, "; ");
|
|
break;
|
|
|
|
case SL_PP_LBRACE:
|
|
fprintf(out, "{ ");
|
|
break;
|
|
|
|
case SL_PP_RBRACE:
|
|
fprintf(out, "} ");
|
|
break;
|
|
|
|
case SL_PP_LPAREN:
|
|
fprintf(out, "( ");
|
|
break;
|
|
|
|
case SL_PP_RPAREN:
|
|
fprintf(out, ") ");
|
|
break;
|
|
|
|
case SL_PP_LBRACKET:
|
|
fprintf(out, "[ ");
|
|
break;
|
|
|
|
case SL_PP_RBRACKET:
|
|
fprintf(out, "] ");
|
|
break;
|
|
|
|
case SL_PP_DOT:
|
|
fprintf(out, ". ");
|
|
break;
|
|
|
|
case SL_PP_INCREMENT:
|
|
fprintf(out, "++ ");
|
|
break;
|
|
|
|
case SL_PP_ADDASSIGN:
|
|
fprintf(out, "+= ");
|
|
break;
|
|
|
|
case SL_PP_PLUS:
|
|
fprintf(out, "+ ");
|
|
break;
|
|
|
|
case SL_PP_DECREMENT:
|
|
fprintf(out, "-- ");
|
|
break;
|
|
|
|
case SL_PP_SUBASSIGN:
|
|
fprintf(out, "-= ");
|
|
break;
|
|
|
|
case SL_PP_MINUS:
|
|
fprintf(out, "- ");
|
|
break;
|
|
|
|
case SL_PP_BITNOT:
|
|
fprintf(out, "~ ");
|
|
break;
|
|
|
|
case SL_PP_NOTEQUAL:
|
|
fprintf(out, "!= ");
|
|
break;
|
|
|
|
case SL_PP_NOT:
|
|
fprintf(out, "! ");
|
|
break;
|
|
|
|
case SL_PP_MULASSIGN:
|
|
fprintf(out, "*= ");
|
|
break;
|
|
|
|
case SL_PP_STAR:
|
|
fprintf(out, "* ");
|
|
break;
|
|
|
|
case SL_PP_DIVASSIGN:
|
|
fprintf(out, "/= ");
|
|
break;
|
|
|
|
case SL_PP_SLASH:
|
|
fprintf(out, "/ ");
|
|
break;
|
|
|
|
case SL_PP_MODASSIGN:
|
|
fprintf(out, "%%= ");
|
|
break;
|
|
|
|
case SL_PP_MODULO:
|
|
fprintf(out, "%% ");
|
|
break;
|
|
|
|
case SL_PP_LSHIFTASSIGN:
|
|
fprintf(out, "<<= ");
|
|
break;
|
|
|
|
case SL_PP_LSHIFT:
|
|
fprintf(out, "<< ");
|
|
break;
|
|
|
|
case SL_PP_LESSEQUAL:
|
|
fprintf(out, "<= ");
|
|
break;
|
|
|
|
case SL_PP_LESS:
|
|
fprintf(out, "< ");
|
|
break;
|
|
|
|
case SL_PP_RSHIFTASSIGN:
|
|
fprintf(out, ">>= ");
|
|
break;
|
|
|
|
case SL_PP_RSHIFT:
|
|
fprintf(out, ">> ");
|
|
break;
|
|
|
|
case SL_PP_GREATEREQUAL:
|
|
fprintf(out, ">= ");
|
|
break;
|
|
|
|
case SL_PP_GREATER:
|
|
fprintf(out, "> ");
|
|
break;
|
|
|
|
case SL_PP_EQUAL:
|
|
fprintf(out, "== ");
|
|
break;
|
|
|
|
case SL_PP_ASSIGN:
|
|
fprintf(out, "= ");
|
|
break;
|
|
|
|
case SL_PP_AND:
|
|
fprintf(out, "&& ");
|
|
break;
|
|
|
|
case SL_PP_BITANDASSIGN:
|
|
fprintf(out, "&= ");
|
|
break;
|
|
|
|
case SL_PP_BITAND:
|
|
fprintf(out, "& ");
|
|
break;
|
|
|
|
case SL_PP_XOR:
|
|
fprintf(out, "^^ ");
|
|
break;
|
|
|
|
case SL_PP_BITXORASSIGN:
|
|
fprintf(out, "^= ");
|
|
break;
|
|
|
|
case SL_PP_BITXOR:
|
|
fprintf(out, "^ ");
|
|
break;
|
|
|
|
case SL_PP_OR:
|
|
fprintf(out, "|| ");
|
|
break;
|
|
|
|
case SL_PP_BITORASSIGN:
|
|
fprintf(out, "|= ");
|
|
break;
|
|
|
|
case SL_PP_BITOR:
|
|
fprintf(out, "| ");
|
|
break;
|
|
|
|
case SL_PP_QUESTION:
|
|
fprintf(out, "? ");
|
|
break;
|
|
|
|
case SL_PP_COLON:
|
|
fprintf(out, ": ");
|
|
break;
|
|
|
|
case SL_PP_IDENTIFIER:
|
|
fprintf(out, "%s ", sl_pp_context_cstr(context, outtokens[i].data.identifier));
|
|
break;
|
|
|
|
case SL_PP_UINT:
|
|
fprintf(out, "%s ", sl_pp_context_cstr(context, outtokens[i].data._uint));
|
|
break;
|
|
|
|
case SL_PP_FLOAT:
|
|
fprintf(out, "%s ", sl_pp_context_cstr(context, outtokens[i].data._float));
|
|
break;
|
|
|
|
case SL_PP_OTHER:
|
|
fprintf(out, "%c", outtokens[i].data.other);
|
|
break;
|
|
|
|
case SL_PP_PRAGMA_OPTIMIZE:
|
|
fprintf(out, "#pragma optimize(%s)", outtokens[i].data.pragma ? "on" : "off");
|
|
break;
|
|
|
|
case SL_PP_PRAGMA_DEBUG:
|
|
fprintf(out, "#pragma debug(%s)", outtokens[i].data.pragma ? "on" : "off");
|
|
break;
|
|
|
|
case SL_PP_EXTENSION_REQUIRE:
|
|
fprintf(out, "#extension %s : require", sl_pp_context_cstr(context, outtokens[i].data.extension));
|
|
break;
|
|
|
|
case SL_PP_EXTENSION_ENABLE:
|
|
fprintf(out, "#extension %s : enable", sl_pp_context_cstr(context, outtokens[i].data.extension));
|
|
break;
|
|
|
|
case SL_PP_EXTENSION_WARN:
|
|
fprintf(out, "#extension %s : warn", sl_pp_context_cstr(context, outtokens[i].data.extension));
|
|
break;
|
|
|
|
case SL_PP_EXTENSION_DISABLE:
|
|
fprintf(out, "#extension %s : disable", sl_pp_context_cstr(context, outtokens[i].data.extension));
|
|
break;
|
|
|
|
case SL_PP_LINE:
|
|
fprintf(out, "#line %u %u", outtokens[i].data.line.lineno, outtokens[i].data.line.fileno);
|
|
break;
|
|
|
|
default:
|
|
assert(0);
|
|
}
|
|
}
|
|
|
|
sl_pp_context_destroy(context);
|
|
free(outtokens);
|
|
fclose(out);
|
|
|
|
return 0;
|
|
}
|