Subversion Repositories Kolibri OS

Rev

Blame | Last modification | View Log | Download | RSS feed

  1. /**************************************************************************
  2.  *
  3.  * Copyright 2008 Tungsten Graphics, Inc., Cedar Park, Texas.
  4.  * All Rights Reserved.
  5.  *
  6.  * Permission is hereby granted, free of charge, to any person obtaining a
  7.  * copy of this software and associated documentation files (the
  8.  * "Software"), to deal in the Software without restriction, including
  9.  * without limitation the rights to use, copy, modify, merge, publish,
  10.  * distribute, sub license, and/or sell copies of the Software, and to
  11.  * permit persons to whom the Software is furnished to do so, subject to
  12.  * the following conditions:
  13.  *
  14.  * The above copyright notice and this permission notice (including the
  15.  * next paragraph) shall be included in all copies or substantial portions
  16.  * of the Software.
  17.  *
  18.  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
  19.  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  20.  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT.
  21.  * IN NO EVENT SHALL TUNGSTEN GRAPHICS AND/OR ITS SUPPLIERS BE LIABLE FOR
  22.  * ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
  23.  * TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
  24.  * SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  25.  *
  26.  **************************************************************************/
  27.  
  28. #include "util/u_debug.h"
  29. #include "tgsi_iterate.h"
  30.  
  31. boolean
  32. tgsi_iterate_shader(
  33.    const struct tgsi_token *tokens,
  34.    struct tgsi_iterate_context *ctx )
  35. {
  36.    struct tgsi_parse_context parse;
  37.  
  38.    if (tgsi_parse_init( &parse, tokens ) != TGSI_PARSE_OK)
  39.       return FALSE;
  40.  
  41.    ctx->processor = parse.FullHeader.Processor;
  42.  
  43.    if (ctx->prolog)
  44.       if (!ctx->prolog( ctx ))
  45.          goto fail;
  46.  
  47.    while (!tgsi_parse_end_of_tokens( &parse )) {
  48.       tgsi_parse_token( &parse );
  49.  
  50.       switch (parse.FullToken.Token.Type) {
  51.       case TGSI_TOKEN_TYPE_INSTRUCTION:
  52.          if (ctx->iterate_instruction)
  53.             if (!ctx->iterate_instruction( ctx, &parse.FullToken.FullInstruction ))
  54.                goto fail;
  55.          break;
  56.  
  57.       case TGSI_TOKEN_TYPE_DECLARATION:
  58.          if (ctx->iterate_declaration)
  59.             if (!ctx->iterate_declaration( ctx, &parse.FullToken.FullDeclaration ))
  60.                goto fail;
  61.          break;
  62.  
  63.       case TGSI_TOKEN_TYPE_IMMEDIATE:
  64.          if (ctx->iterate_immediate)
  65.             if (!ctx->iterate_immediate( ctx, &parse.FullToken.FullImmediate ))
  66.                goto fail;
  67.          break;
  68.  
  69.       case TGSI_TOKEN_TYPE_PROPERTY:
  70.          if (ctx->iterate_property)
  71.             if (!ctx->iterate_property( ctx,  &parse.FullToken.FullProperty ))
  72.                goto fail;
  73.          break;
  74.  
  75.       default:
  76.          assert( 0 );
  77.       }
  78.    }
  79.  
  80.    if (ctx->epilog)
  81.       if (!ctx->epilog( ctx ))
  82.          goto fail;
  83.  
  84.    tgsi_parse_free( &parse );
  85.    return TRUE;
  86.  
  87. fail:
  88.    tgsi_parse_free( &parse );
  89.    return FALSE;
  90. }
  91.