Subversion Repositories Kolibri OS

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
3770 Serge 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
}