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