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_preprocess.h"
  34
  35 static const char *slang_version_syn =
  36 #include "library/slang_version_syn.h"
  37 ;
  38
  39 int _slang_preprocess_version (const char *text, unsigned int *version, unsigned int *eaten,
  40         slang_info_log *log)
  41 {
  42         grammar id;
  43         byte *prod, *I;
  44         unsigned int size;
  45
  46         id = grammar_load_from_text ((const byte *) slang_version_syn);
  47         if (id == 0)
  48         {
  49                 char buf[1024];
  50                 unsigned int pos;
  51                 grammar_get_last_error ( (unsigned char*) buf, 1024, (int*) &pos);
  52                 slang_info_log_error (log, buf);
  53                 return 0;
  54         }
  55
  56         if (!grammar_fast_check (id, (const byte *) text, &prod, &size, 8))
  57         {
  58                 char buf[1024];
  59                 unsigned int pos;
  60                 grammar_get_last_error ( (unsigned char*) buf, 1024, (int*) &pos);
  61                 slang_info_log_error (log, buf);
  62                 grammar_destroy (id);
  63                 return 0;
  64         }
  65
  66         grammar_destroy (id);
  67
  68         /* there can be multiple #version directives - grab the last one */
  69         I = prod;
  70         while (I < prod + size)
  71         {
  72                 *version =
  73                         (unsigned int) I[0] +
  74                         (unsigned int) I[1] * 100;
  75                 *eaten =
  76                         ((unsigned int) I[2]) +
  77                         ((unsigned int) I[3] << 8) +
  78                         ((unsigned int) I[4] << 16) +
  79                         ((unsigned int) I[5] << 24);
  80                 I += 6;
  81         }
  82
  83         grammar_alloc_free (prod);
  84         return 1;
  85 }
  86