src/mesa/shader/slang/slang_preprocess.c

   1 /*
   2  * Mesa 3-D graphics library
   3  * Version:  6.5
   4  *
   5  * Copyright (C) 2005-2006  Brian Paul   All Rights Reserved.
   6  *
   7  * Permission is hereby granted, free of charge, to any person obtaining a
   8  * copy of this software and associated documentation files (the "Software"),
   9  * to deal in the Software without restriction, including without limitation
  10  * the rights to use, copy, modify, merge, publish, distribute, sublicense,
  11  * and/or sell copies of the Software, and to permit persons to whom the
  12  * Software is furnished to do so, subject to the following conditions:
  13  *
  14  * The above copyright notice and this permission notice shall be included
  15  * in all copies or substantial portions of the Software.
  16  *
  17  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
  18  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  19  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
  20  * BRIAN PAUL BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
  21  * AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
  22  * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  23  */
  24
  25 /**
  26  * \file slang_preprocess.c
  27  * slang preprocessor
  28  * \author Michal Krol
  29  */
  30
  31 #include "imports.h"
  32 #include "grammar_mesa.h"
  33 #include "slang_utility.h"
  34 #include "slang_compile.h"
  35 #include "slang_preprocess.h"
  36
  37 static const char *slang_version_syn =
  38 #include "library/slang_version_syn.h"
  39 ;
  40
  41 int _slang_preprocess_version (const char *text, unsigned int *version, unsigned int *eaten,
  42         slang_info_log *log)
  43 {
  44         grammar id;
  45         byte *prod, *I;
  46         unsigned int size;
  47
  48         id = grammar_load_from_text ((const byte *) slang_version_syn);
  49         if (id == 0)
  50         {
  51                 char buf[1024];
  52                 unsigned int pos;
  53                 grammar_get_last_error ( (unsigned char*) buf, 1024, (int*) &pos);
  54                 slang_info_log_error (log, buf);
  55                 return 0;
  56         }
  57
  58         if (!grammar_fast_check (id, (const byte *) text, &prod, &size, 8))
  59         {
  60                 char buf[1024];
  61                 unsigned int pos;
  62                 grammar_get_last_error ( (unsigned char*) buf, 1024, (int*) &pos);
  63                 slang_info_log_error (log, buf);
  64                 grammar_destroy (id);
  65                 return 0;
  66         }
  67
  68         grammar_destroy (id);
  69
  70         /* there can be multiple #version directives - grab the last one */
  71         I = prod;
  72         while (I < prod + size)
  73         {
  74                 *version =
  75                         (unsigned int) I[0] +
  76                         (unsigned int) I[1] * 100;
  77                 *eaten =
  78                         ((unsigned int) I[2]) +
  79                         ((unsigned int) I[3] << 8) +
  80                         ((unsigned int) I[4] << 16) +
  81                         ((unsigned int) I[5] << 24);
  82                 I += 6;
  83         }
  84
  85         grammar_alloc_free (prod);
  86         return 1;
  87 }
  88