d3d2glsl.c
author icculus
Sun, 16 Mar 2008 04:22:03 -0400
branchtrunk
changeset 20 bb2e8f285acc
parent 19 8bca9cb2252f
child 21 d43449cf3cb2
permissions -rw-r--r--
[svn] Bunch More Work...higher level parses dest/src tokens before it goes to the emitters now, version info, some other things.
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
7
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
     1
/**
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
     2
 * d3d2glsl; generate GLSL programs from bytecode of compiled Direct3D shaders.
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
     3
 *
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
     4
 * Please see the file LICENSE.txt in the source's root directory.
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
     5
 *
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
     6
 *  This file written by Ryan C. Gordon.
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
     7
 */
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
     8
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
     9
// !!! FIXME: I keep changing coding styles for symbols and typedefs.
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    10
7
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
    11
// Shader bytecode format is described at MSDN:
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
    12
//  http://msdn2.microsoft.com/en-us/library/ms800307.aspx
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
    13
1
99ac16070d07 [svn] Initial add.
icculus
parents:
diff changeset
    14
#include <stdio.h>
11
c9bb617d9b77 [svn] Pass around a context struct, so we can start tracking state, etc.
icculus
parents: 9
diff changeset
    15
#include <string.h>
1
99ac16070d07 [svn] Initial add.
icculus
parents:
diff changeset
    16
#include <stdlib.h>
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
    17
#include <stdint.h>
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
    18
#include <stdarg.h>
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
    19
9
aea1b254e6a5 [svn] Patched to compile.
icculus
parents: 8
diff changeset
    20
#include "d3d2glsl.h"
aea1b254e6a5 [svn] Patched to compile.
icculus
parents: 8
diff changeset
    21
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
    22
// This is the highest shader version we currently support.
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
    23
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
    24
#define MAX_SHADER_MAJOR 3
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
    25
#define MAX_SHADER_MINOR 0
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
    26
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    27
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    28
// You get all the profiles unless you go out of your way to disable them.
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    29
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
    30
#ifndef SUPPORT_PROFILE_D3D
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
    31
#define SUPPORT_PROFILE_D3D 1
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
    32
#endif
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
    33
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
    34
#ifndef SUPPORT_PROFILE_GLSL
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
    35
#define SUPPORT_PROFILE_GLSL 1
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
    36
#endif
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
    37
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    38
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    39
// Get basic wankery out of the way here...
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    40
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    41
typedef unsigned int uint;  // this is a printf() helper. don't use for code.
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    42
typedef uint8_t uint8;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    43
typedef uint32_t uint32;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    44
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
    45
#ifdef __GNUC__
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
    46
#define ISPRINTF(x,y) __attribute__((format (printf, x, y)))
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
    47
#else
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
    48
#define ISPRINTF(x,y)
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
    49
#endif
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
    50
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
    51
#define STATICARRAYLEN(x) ( (sizeof ((x))) / (sizeof ((x)[0])) )
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
    52
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
    53
7
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
    54
// Byteswap magic...
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
    55
4
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    56
#if ((defined __GNUC__) && (defined __POWERPC__))
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    57
    static inline uint32 SWAP32(uint32 x)
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    58
    {
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    59
        __asm__ __volatile__("lwbrx %0,0,%1" : "=r" (x) : "r" (&x));
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    60
        return x;
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    61
    } // SWAP32
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    62
#elif defined(__POWERPC__)
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    63
    static inline uint32 SWAP32(uint32 x)
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    64
    {
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    65
        return ( (((x) >> 24) & 0x000000FF) | (((x) >>  8) & 0x0000FF00) |
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    66
                 (((x) <<  8) & 0x00FF0000) | (((x) << 24) & 0xFF000000) );
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    67
    } // SWAP32
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    68
#else
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    69
#   define SWAP32(x) (x)
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    70
#endif
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    71
7
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
    72
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
    73
// Shader model version magic.
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
    74
static inline uint32 ver_ui32(const uint8 major, const uint8 minor)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
    75
{
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
    76
    return ( (((uint32) major) << 16) | (((minor) == 0xFF) ? 0 : (minor)) );
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
    77
} // version_ui32
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
    78
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
    79
#define SHADER_VERSION_SUPPORTED(maj, min) \
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
    80
    (ver_ui32(maj, min) <= ver_ui32(MAX_SHADER_MAJOR, MAX_SHADER_MINOR))
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
    81
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
    82
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    83
// predeclare.
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    84
typedef struct Context Context;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    85
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    86
// one emit function for each opcode in each profile.
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    87
typedef void (*emit_function)(Context *ctx);
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    88
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    89
// one emit function for comments in each profile.
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    90
typedef void (*emit_comment)(Context *ctx, const char *str);
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    91
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    92
// one emit function for starting output in each profile.
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    93
typedef void (*emit_start)(Context *ctx);
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    94
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    95
// one emit function for ending output in each profile.
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    96
typedef void (*emit_end)(Context *ctx);
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    97
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
    98
// one args function for each possible sequence of opcode arguments.
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
    99
typedef int (*args_function)(Context *ctx);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   100
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   101
// one state function for each opcode where we have state machine updates.
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   102
typedef int (*state_function)(Context *ctx);
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   103
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   104
typedef struct
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   105
{
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   106
    const char *name;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   107
    emit_start start_emitter;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   108
    emit_end end_emitter;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   109
    emit_comment comment_emitter;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   110
} D3D2GLSL_profile;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   111
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   112
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   113
typedef enum
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   114
{
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   115
    SHADER_TYPE_UNKNOWN = -1,
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   116
    SHADER_TYPE_PIXEL,
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   117
    SHADER_TYPE_VERTEX,
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   118
    SHADER_TYPE_TOTAL
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   119
} D3D2GLSL_shaderType;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   120
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   121
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   122
// A simple linked list of strings, so we can build the final output without
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   123
//  realloc()ing for each new line, and easily insert lines into the middle
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   124
//  of the output without much trouble.
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   125
typedef struct OutputList
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   126
{
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   127
    char *str;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   128
    struct OutputList *next;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   129
} OutputList;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   130
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   131
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   132
typedef struct
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   133
{
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   134
    int regnum;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   135
    int relative;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   136
    int writemask;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   137
    int result_mod;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   138
    int result_shift;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   139
    int regtype;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   140
} DestArgInfo;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   141
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   142
typedef struct
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   143
{
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   144
    int regnum;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   145
    int relative;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   146
    int swizzle_x;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   147
    int swizzle_y;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   148
    int swizzle_z;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   149
    int swizzle_w;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   150
    int src_mod;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   151
    int regtype;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   152
} SourceArgInfo;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   153
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   154
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   155
#define D3D2GLSL_SCRATCH_BUFFER_SIZE 256
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   156
#define D3D2GLSL_SCRATCH_BUFFERS 10
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   157
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   158
// Context...this is state that changes as we parse through a shader...
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   159
struct Context
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   160
{
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   161
    D3D2GLSL_malloc malloc;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   162
    D3D2GLSL_free free;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   163
    const uint32 *tokens;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   164
    uint32 tokencount;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   165
    OutputList output;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   166
    OutputList *output_tail;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   167
    int output_len; // total strlen; prevents walking the list just to malloc.
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   168
    const char *endline;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   169
    int endline_len;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   170
    const char *failstr;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   171
    char scratch[D3D2GLSL_SCRATCH_BUFFERS][D3D2GLSL_SCRATCH_BUFFER_SIZE];
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   172
    int scratchidx;  // current scratch buffer.
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   173
    int profileid;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   174
    const D3D2GLSL_profile *profile;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   175
    D3D2GLSL_shaderType shader_type;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   176
    uint32 major_ver;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   177
    uint32 minor_ver;
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   178
    DestArgInfo dest_args[1];
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   179
    SourceArgInfo source_args[4];
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   180
};
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   181
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   182
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   183
static inline char *get_scratch_buffer(Context *ctx)
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   184
{
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   185
    ctx->scratchidx = (ctx->scratchidx + 1) % D3D2GLSL_SCRATCH_BUFFERS;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   186
    return ctx->scratch[ctx->scratchidx];
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   187
} // get_scratch_buffer
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   188
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   189
7
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
   190
// Special-case return values from the parsing pipeline...
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   191
#define FAIL (-1)
7
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
   192
#define END_OF_STREAM (-2)
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   193
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   194
static const char *out_of_mem_string = "Out of memory";
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   195
static inline int out_of_memory(Context *ctx)
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   196
{
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   197
    if (ctx->failstr == NULL)
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   198
        ctx->failstr = out_of_mem_string;  // fail() would call malloc().
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   199
    return FAIL;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   200
} // out_of_memory
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   201
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   202
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   203
static int failf(Context *ctx, const char *fmt, ...) ISPRINTF(2,3);
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   204
static int failf(Context *ctx, const char *fmt, ...)
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   205
{
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   206
    if (ctx->failstr == NULL)  // don't change existing error.
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   207
    {
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   208
        char *scratch = get_scratch_buffer(ctx);
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   209
        va_list ap;
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   210
        va_start(ap, fmt);
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   211
        const int len = vsnprintf(scratch,D3D2GLSL_SCRATCH_BUFFER_SIZE,fmt,ap);
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   212
        va_end(ap);
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   213
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   214
        char *failstr = (char *) ctx->malloc(len + 1);
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   215
        if (failstr == NULL)
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   216
            out_of_memory(ctx);
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   217
        else
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   218
        {
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   219
            // see comments about scratch buffer overflow in output_line().
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   220
            if (len < D3D2GLSL_SCRATCH_BUFFER_SIZE)
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   221
                strcpy(failstr, scratch);  // copy it over.
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   222
            else
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   223
            {
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   224
                va_start(ap, fmt);
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   225
                vsnprintf(failstr, len + 1, fmt, ap);  // rebuild it.
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   226
                va_end(ap);
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   227
            } // else
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   228
            ctx->failstr = failstr;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   229
        } // else
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   230
    } // if
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   231
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   232
    return FAIL;
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   233
} // failf
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   234
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   235
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   236
static inline int fail(Context *ctx, const char *reason)
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   237
{
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   238
    return failf(ctx, "%s", reason);
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   239
} // fail
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   240
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   241
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   242
static int output_line(Context *ctx, const char *fmt, ...) ISPRINTF(2,3);
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   243
static int output_line(Context *ctx, const char *fmt, ...)
7
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
   244
{
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   245
    if (ctx->failstr != NULL)
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   246
        return FAIL;  // we failed previously, don't go on...
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   247
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   248
    OutputList *item = (OutputList *) ctx->malloc(sizeof (OutputList));
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   249
    if (item == NULL)
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   250
        return out_of_memory(ctx);
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   251
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   252
    char *scratch = get_scratch_buffer(ctx);
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   253
    va_list ap;
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   254
    va_start(ap, fmt);
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   255
    const int len = vsnprintf(scratch, D3D2GLSL_SCRATCH_BUFFER_SIZE, fmt, ap);
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   256
    va_end(ap);
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   257
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   258
    item->str = (char *) ctx->malloc(len + 1);
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   259
    if (item->str == NULL)
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   260
    {
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   261
        free(item);
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   262
        return out_of_memory(ctx);
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   263
    } // if
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   264
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   265
    // If we overflowed our scratch buffer, that's okay. We were going to
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   266
    //  allocate anyhow...the scratch buffer just lets us avoid a second
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   267
    //  run of vsnprintf().
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   268
    if (len < D3D2GLSL_SCRATCH_BUFFER_SIZE)
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   269
        strcpy(item->str, scratch);  // copy it over.
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   270
    else
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   271
    {
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   272
        va_start(ap, fmt);
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   273
        vsnprintf(item->str, len + 1, fmt, ap);  // rebuild it.
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   274
        va_end(ap);
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   275
    } // else
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   276
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   277
    item->next = NULL;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   278
    ctx->output_tail->next = item;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   279
    ctx->output_tail = item;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   280
    ctx->output_len += len + ctx->endline_len;
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   281
    return 0;
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   282
} // output_line
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   283
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   284
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   285
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   286
// if SUPPORT_PROFILE_* isn't defined, we assume an implicit desire to support.
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   287
#define AT_LEAST_ONE_PROFILE 0
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   288
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   289
#if !SUPPORT_PROFILE_D3D
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   290
#define PROFILE_EMITTER_D3D(op)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   291
#else
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   292
#undef AT_LEAST_ONE_PROFILE
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   293
#define AT_LEAST_ONE_PROFILE 1
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   294
#define PROFILE_EMITTER_D3D(op) emit_D3D_##op,
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   295
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   296
static char *make_D3D_destarg_string(Context *ctx, const int idx)
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   297
{
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   298
    char *retval = NULL;
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   299
    if (idx >= STATICARRAYLEN(ctx->dest_args))
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   300
    {
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   301
        fail(ctx, "Too many destination args");
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   302
        return "";
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   303
    } // if
16
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   304
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   305
    retval = get_scratch_buffer(ctx);
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   306
    strcpy(retval, "DST");  // !!! FIXME
16
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   307
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   308
    return retval;
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   309
} // make_D3D_destarg_string
16
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   310
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   311
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   312
static char *make_D3D_sourcearg_string(Context *ctx, const int idx)
16
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   313
{
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   314
    char *retval = NULL;
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   315
    if (idx >= STATICARRAYLEN(ctx->source_args))
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   316
    {
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   317
        fail(ctx, "Too many source args");
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   318
        return "";
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   319
    } // if
16
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   320
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   321
    retval = get_scratch_buffer(ctx);
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   322
    strcpy(retval, "SRC");  // !!! FIXME
16
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   323
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   324
    return retval;
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   325
} // make_D3D_sourcearg_string
16
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   326
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   327
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   328
static void emit_D3D_start(Context *ctx)
16
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   329
{
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   330
    const uint major = (uint) ctx->major_ver;
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   331
    const uint minor = (uint) ctx->minor_ver;
19
8bca9cb2252f [svn] Fixed output for software vertex shader versions.
icculus
parents: 18
diff changeset
   332
16
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   333
    if (ctx->shader_type == SHADER_TYPE_PIXEL)
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   334
        output_line(ctx, "ps_%u_%u", major, minor);
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   335
    else if (ctx->shader_type == SHADER_TYPE_VERTEX)
19
8bca9cb2252f [svn] Fixed output for software vertex shader versions.
icculus
parents: 18
diff changeset
   336
    {
8bca9cb2252f [svn] Fixed output for software vertex shader versions.
icculus
parents: 18
diff changeset
   337
        char minorstr[16];
8bca9cb2252f [svn] Fixed output for software vertex shader versions.
icculus
parents: 18
diff changeset
   338
        if (minor == 0xFF)
8bca9cb2252f [svn] Fixed output for software vertex shader versions.
icculus
parents: 18
diff changeset
   339
            strcpy(minorstr, "sw");
8bca9cb2252f [svn] Fixed output for software vertex shader versions.
icculus
parents: 18
diff changeset
   340
        else
8bca9cb2252f [svn] Fixed output for software vertex shader versions.
icculus
parents: 18
diff changeset
   341
            snprintf(minorstr, sizeof (minorstr), "%u", (uint) minor);
8bca9cb2252f [svn] Fixed output for software vertex shader versions.
icculus
parents: 18
diff changeset
   342
8bca9cb2252f [svn] Fixed output for software vertex shader versions.
icculus
parents: 18
diff changeset
   343
        output_line(ctx, "vs_%u_%s", major, minorstr);
8bca9cb2252f [svn] Fixed output for software vertex shader versions.
icculus
parents: 18
diff changeset
   344
    } // else if
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   345
    else
16
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   346
    {
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   347
        failf(ctx, "Shader type %u unsupported in this profile.",
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   348
              (uint) ctx->shader_type);
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   349
    } // else
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   350
} // emit_D3D_start
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   351
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   352
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   353
static void emit_D3D_end(Context *ctx)
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   354
{
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   355
    output_line(ctx, "END");
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   356
} // emit_D3D_end
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   357
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   358
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   359
static void emit_D3D_comment(Context *ctx, const char *str)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   360
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   361
    output_line(ctx, "; %s", str);
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   362
} // emit_D3D_comment
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   363
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   364
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   365
static void emit_D3D_RESERVED(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   366
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   367
    // do nothing; fails in the state machine.
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   368
} // emit_D3D_RESERVED
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   369
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   370
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   371
// Generic D3D opcode emitters. A list of macros generate all the entry points
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   372
//  that call into these...
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   373
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   374
static void emit_D3D_opcode_d(Context *ctx, const char *opcode)
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   375
{
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   376
    const char *dst0 = make_D3D_destarg_string(ctx, 0);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   377
    output_line(ctx, "%s %s", opcode, dst0);
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   378
} // emit_D3D_opcode_d
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   379
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   380
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   381
static void emit_D3D_opcode_s(Context *ctx, const char *opcode)
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   382
{
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   383
    const char *src0 = make_D3D_destarg_string(ctx, 0);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   384
    output_line(ctx, "%s %s", opcode, src0);
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   385
} // emit_D3D_opcode_s
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   386
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   387
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   388
static void emit_D3D_opcode_ss(Context *ctx, const char *opcode)
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   389
{
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   390
    const char *src0 = make_D3D_sourcearg_string(ctx, 0);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   391
    const char *src1 = make_D3D_sourcearg_string(ctx, 1);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   392
    output_line(ctx, "%s %s, %s", opcode, src0, src1);
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   393
} // emit_D3D_opcode_s
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   394
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   395
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   396
static void emit_D3D_opcode_ds(Context *ctx, const char *opcode)
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   397
{
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   398
    const char *dst0 = make_D3D_destarg_string(ctx, 0);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   399
    const char *src0 = make_D3D_sourcearg_string(ctx, 0);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   400
    output_line(ctx, "%s %s, %s", opcode, dst0, src0);
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   401
} // emit_D3D_opcode_ds
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   402
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   403
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   404
static void emit_D3D_opcode_dss(Context *ctx, const char *opcode)
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   405
{
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   406
    const char *dst0 = make_D3D_destarg_string(ctx, 0);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   407
    const char *src0 = make_D3D_sourcearg_string(ctx, 0);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   408
    const char *src1 = make_D3D_sourcearg_string(ctx, 1);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   409
    output_line(ctx, "%s %s, %s, %s", opcode, dst0, src0, src1);
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   410
} // emit_D3D_opcode_dss
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   411
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   412
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   413
static void emit_D3D_opcode_dsss(Context *ctx, const char *opcode)
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   414
{
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   415
    const char *dst0 = make_D3D_destarg_string(ctx, 0);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   416
    const char *src0 = make_D3D_sourcearg_string(ctx, 0);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   417
    const char *src1 = make_D3D_sourcearg_string(ctx, 1);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   418
    const char *src2 = make_D3D_sourcearg_string(ctx, 2);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   419
    output_line(ctx, "%s %s, %s, %s, %s", opcode, dst0, src0, src1, src2);
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   420
} // emit_D3D_opcode_dsss
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   421
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   422
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   423
static void emit_D3D_opcode_dssss(Context *ctx, const char *opcode)
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   424
{
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   425
    const char *dst0 = make_D3D_destarg_string(ctx, 0);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   426
    const char *src0 = make_D3D_sourcearg_string(ctx, 0);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   427
    const char *src1 = make_D3D_sourcearg_string(ctx, 1);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   428
    const char *src2 = make_D3D_sourcearg_string(ctx, 2);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   429
    const char *src3 = make_D3D_sourcearg_string(ctx, 3);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   430
    output_line(ctx,"%s %s, %s, %s, %s, %s",opcode,dst0,src0,src1,src2,src3);
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   431
} // emit_D3D_opcode_dssss
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   432
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   433
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   434
#define EMIT_D3D_OPCODE_FUNC(op) \
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   435
    static void emit_D3D_##op(Context *ctx) { \
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   436
        output_line(ctx, #op); \
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   437
    }
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   438
#define EMIT_D3D_OPCODE_D_FUNC(op) \
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   439
    static void emit_D3D_##op(Context *ctx) { \
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   440
        emit_D3D_opcode_d(ctx, #op); \
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   441
    }
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   442
#define EMIT_D3D_OPCODE_S_FUNC(op) \
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   443
    static void emit_D3D_##op(Context *ctx) { \
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   444
        emit_D3D_opcode_s(ctx, #op); \
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   445
    }
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   446
#define EMIT_D3D_OPCODE_SS_FUNC(op) \
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   447
    static void emit_D3D_##op(Context *ctx) { \
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   448
        emit_D3D_opcode_ss(ctx, #op); \
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   449
    }
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   450
#define EMIT_D3D_OPCODE_DS_FUNC(op) \
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   451
    static void emit_D3D_##op(Context *ctx) { \
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   452
        emit_D3D_opcode_ds(ctx, #op); \
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   453
    }
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   454
#define EMIT_D3D_OPCODE_DSS_FUNC(op) \
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   455
    static void emit_D3D_##op(Context *ctx) { \
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   456
        emit_D3D_opcode_dss(ctx, #op); \
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   457
    }
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   458
#define EMIT_D3D_OPCODE_DSSS_FUNC(op) \
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   459
    static void emit_D3D_##op(Context *ctx) { \
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   460
        emit_D3D_opcode_dsss(ctx, #op); \
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   461
    }
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   462
#define EMIT_D3D_OPCODE_DSSSS_FUNC(op) \
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   463
    static void emit_D3D_##op(Context *ctx) { \
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   464
        emit_D3D_opcode_dssss(ctx, #op); \
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   465
    }
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   466
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   467
EMIT_D3D_OPCODE_FUNC(NOP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   468
EMIT_D3D_OPCODE_DS_FUNC(MOV)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   469
EMIT_D3D_OPCODE_DSS_FUNC(ADD)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   470
EMIT_D3D_OPCODE_DSS_FUNC(SUB)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   471
EMIT_D3D_OPCODE_DSSS_FUNC(MAD)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   472
EMIT_D3D_OPCODE_DSS_FUNC(MUL)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   473
EMIT_D3D_OPCODE_DS_FUNC(RCP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   474
EMIT_D3D_OPCODE_DS_FUNC(RSQ)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   475
EMIT_D3D_OPCODE_DSS_FUNC(DP3)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   476
EMIT_D3D_OPCODE_DSS_FUNC(DP4)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   477
EMIT_D3D_OPCODE_DSS_FUNC(MIN)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   478
EMIT_D3D_OPCODE_DSS_FUNC(MAX)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   479
EMIT_D3D_OPCODE_DSS_FUNC(SLT)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   480
EMIT_D3D_OPCODE_DSS_FUNC(SGE)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   481
EMIT_D3D_OPCODE_DS_FUNC(EXP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   482
EMIT_D3D_OPCODE_DS_FUNC(LOG)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   483
EMIT_D3D_OPCODE_DS_FUNC(LIT)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   484
EMIT_D3D_OPCODE_DSS_FUNC(DST)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   485
EMIT_D3D_OPCODE_DSSS_FUNC(LRP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   486
EMIT_D3D_OPCODE_DS_FUNC(FRC)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   487
EMIT_D3D_OPCODE_DSS_FUNC(M4X4)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   488
EMIT_D3D_OPCODE_DSS_FUNC(M4X3)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   489
EMIT_D3D_OPCODE_DSS_FUNC(M3X4)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   490
EMIT_D3D_OPCODE_DSS_FUNC(M3X3)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   491
EMIT_D3D_OPCODE_DSS_FUNC(M3X2)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   492
EMIT_D3D_OPCODE_S_FUNC(CALL)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   493
EMIT_D3D_OPCODE_SS_FUNC(CALLNZ)
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   494
EMIT_D3D_OPCODE_SS_FUNC(LOOP)
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   495
EMIT_D3D_OPCODE_FUNC(RET)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   496
EMIT_D3D_OPCODE_FUNC(ENDLOOP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   497
EMIT_D3D_OPCODE_S_FUNC(LABEL)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   498
EMIT_D3D_OPCODE_FUNC(DCL)  // !!! FIXME!
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   499
EMIT_D3D_OPCODE_DSS_FUNC(POW)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   500
EMIT_D3D_OPCODE_DSS_FUNC(CRS)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   501
EMIT_D3D_OPCODE_DSSS_FUNC(SGN)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   502
EMIT_D3D_OPCODE_DS_FUNC(ABS)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   503
EMIT_D3D_OPCODE_DS_FUNC(NRM)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   504
EMIT_D3D_OPCODE_DS_FUNC(SINCOS)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   505
EMIT_D3D_OPCODE_S_FUNC(REP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   506
EMIT_D3D_OPCODE_FUNC(ENDREP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   507
EMIT_D3D_OPCODE_S_FUNC(IF)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   508
EMIT_D3D_OPCODE_SS_FUNC(IFC)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   509
EMIT_D3D_OPCODE_FUNC(ELSE)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   510
EMIT_D3D_OPCODE_FUNC(ENDIF)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   511
EMIT_D3D_OPCODE_FUNC(BREAK)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   512
EMIT_D3D_OPCODE_SS_FUNC(BREAKC)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   513
EMIT_D3D_OPCODE_DS_FUNC(MOVA)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   514
EMIT_D3D_OPCODE_FUNC(DEFB) // !!! FIXME!
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   515
EMIT_D3D_OPCODE_FUNC(DEFI) // !!! FIXME!
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   516
EMIT_D3D_OPCODE_FUNC(TEXCOORD) // !!! FIXME!
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   517
EMIT_D3D_OPCODE_D_FUNC(TEXKILL)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   518
EMIT_D3D_OPCODE_FUNC(TEX) // !!! FIXME!
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   519
EMIT_D3D_OPCODE_DS_FUNC(TEXBEM)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   520
EMIT_D3D_OPCODE_DS_FUNC(TEXBEML)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   521
EMIT_D3D_OPCODE_DS_FUNC(TEXREG2AR)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   522
EMIT_D3D_OPCODE_DS_FUNC(TEXREG2GB)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   523
EMIT_D3D_OPCODE_DS_FUNC(TEXM3X2PAD)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   524
EMIT_D3D_OPCODE_DS_FUNC(TEXM3X2TEX)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   525
EMIT_D3D_OPCODE_DS_FUNC(TEXM3X3PAD)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   526
EMIT_D3D_OPCODE_DS_FUNC(TEXM3X3TEX)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   527
EMIT_D3D_OPCODE_DSS_FUNC(TEXM3X3SPEC)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   528
EMIT_D3D_OPCODE_DS_FUNC(TEXM3X3VSPEC)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   529
EMIT_D3D_OPCODE_DS_FUNC(EXPP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   530
EMIT_D3D_OPCODE_DS_FUNC(LOGP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   531
EMIT_D3D_OPCODE_DSSS_FUNC(CND)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   532
EMIT_D3D_OPCODE_FUNC(DEF) // !!! FIXME!
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   533
EMIT_D3D_OPCODE_DS_FUNC(TEXREG2RGB)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   534
EMIT_D3D_OPCODE_DS_FUNC(TEXDP3TEX)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   535
EMIT_D3D_OPCODE_DS_FUNC(TEXM3X2DEPTH)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   536
EMIT_D3D_OPCODE_DS_FUNC(TEXDP3)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   537
EMIT_D3D_OPCODE_DS_FUNC(TEXM3X3)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   538
EMIT_D3D_OPCODE_D_FUNC(TEXDEPTH)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   539
EMIT_D3D_OPCODE_DSSS_FUNC(CMP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   540
EMIT_D3D_OPCODE_DSS_FUNC(BEM)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   541
EMIT_D3D_OPCODE_DSSS_FUNC(DP2ADD)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   542
EMIT_D3D_OPCODE_DS_FUNC(DSX)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   543
EMIT_D3D_OPCODE_DS_FUNC(DSY)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   544
EMIT_D3D_OPCODE_DSSSS_FUNC(TEXLDD)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   545
EMIT_D3D_OPCODE_DSS_FUNC(SETP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   546
EMIT_D3D_OPCODE_DSS_FUNC(TEXLDL)
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   547
EMIT_D3D_OPCODE_S_FUNC(BREAKP)
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   548
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   549
#undef EMIT_D3D_OPCODE_FUNC
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   550
#undef EMIT_D3D_OPCODE_D_FUNC
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   551
#undef EMIT_D3D_OPCODE_S_FUNC
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   552
#undef EMIT_D3D_OPCODE_SS_FUNC
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   553
#undef EMIT_D3D_OPCODE_DS_FUNC
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   554
#undef EMIT_D3D_OPCODE_DSS_FUNC
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   555
#undef EMIT_D3D_OPCODE_DSSS_FUNC
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   556
#undef EMIT_D3D_OPCODE_DSSSS_FUNC
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   557
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   558
#endif  // SUPPORT_PROFILE_D3D
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   559
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   560
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   561
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   562
#if !SUPPORT_PROFILE_GLSL
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   563
#define PROFILE_EMITTER_GLSL(op)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   564
#else
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   565
#undef AT_LEAST_ONE_PROFILE
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   566
#define AT_LEAST_ONE_PROFILE 1
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   567
#define PROFILE_EMITTER_GLSL(op) emit_GLSL_##op,
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   568
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   569
static void emit_GLSL_start(Context *ctx)
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   570
{
16
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   571
    const uint major = (uint) ctx->major_ver;
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   572
    const uint minor = (uint) ctx->minor_ver;
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   573
    if (ctx->shader_type == SHADER_TYPE_PIXEL)
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   574
        output_line(ctx, "// Pixel shader, version %u.%u", major, minor);
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   575
    else if (ctx->shader_type == SHADER_TYPE_VERTEX)
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   576
        output_line(ctx, "// Vertex shader, version %u.%u", major, minor);
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   577
    else
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   578
    {
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   579
        failf(ctx, "Shader type %u unsupported in this profile.",
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   580
              (uint) ctx->shader_type);
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   581
    } // else
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   582
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   583
    output_line(ctx, "void main() {");
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   584
} // emit_GLSL_start
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   585
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   586
static void emit_GLSL_end(Context *ctx)
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   587
{
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   588
    output_line(ctx, "}");
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   589
} // emit_GLSL_end
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   590
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   591
static void emit_GLSL_comment(Context *ctx, const char *str)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   592
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   593
    output_line(ctx, "// %s", str);
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   594
} // emit_GLSL_comment
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   595
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   596
static void emit_GLSL_NOP(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   597
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   598
    // no-op is a no-op.  :)
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   599
} // emit_GLSL_NOP
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   600
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   601
static void emit_GLSL_MOV(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   602
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   603
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   604
} // emit_GLSL_MOV
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   605
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   606
static void emit_GLSL_ADD(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   607
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   608
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   609
} // emit_GLSL_ADD
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   610
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   611
static void emit_GLSL_SUB(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   612
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   613
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   614
} // emit_GLSL_SUB
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   615
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   616
static void emit_GLSL_MAD(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   617
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   618
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   619
} // emit_GLSL_MAD
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   620
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   621
static void emit_GLSL_MUL(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   622
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   623
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   624
} // emit_GLSL_MUL
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   625
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   626
static void emit_GLSL_RCP(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   627
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   628
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   629
} // emit_GLSL_RCP
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   630
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   631
static void emit_GLSL_RSQ(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   632
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   633
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   634
} // emit_GLSL_RSQ
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   635
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   636
static void emit_GLSL_DP3(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   637
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   638
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   639
} // emit_GLSL_DP3
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   640
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   641
static void emit_GLSL_DP4(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   642
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   643
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   644
} // emit_GLSL_DP4
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   645
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   646
static void emit_GLSL_MIN(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   647
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   648
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   649
} // emit_GLSL_MIN
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   650
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   651
static void emit_GLSL_MAX(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   652
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   653
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   654
} // emit_GLSL_MAX
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   655
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   656
static void emit_GLSL_SLT(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   657
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   658
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   659
} // emit_GLSL_SLT
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   660
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   661
static void emit_GLSL_SGE(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   662
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   663
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   664
} // emit_GLSL_SGE
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   665
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   666
static void emit_GLSL_EXP(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   667
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   668
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   669
} // emit_GLSL_EXP
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   670
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   671
static void emit_GLSL_LOG(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   672
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   673
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   674
} // emit_GLSL_LOG
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   675
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   676
static void emit_GLSL_LIT(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   677
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   678
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   679
} // emit_GLSL_LIT
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   680
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   681
static void emit_GLSL_DST(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   682
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   683
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   684
} // emit_GLSL_DST
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   685
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   686
static void emit_GLSL_LRP(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   687
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   688
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   689
} // emit_GLSL_LRP
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   690
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   691
static void emit_GLSL_FRC(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   692
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   693
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   694
} // emit_GLSL_FRC
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   695
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   696
static void emit_GLSL_M4X4(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   697
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   698
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   699
} // emit_GLSL_M4X4
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   700
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   701
static void emit_GLSL_M4X3(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   702
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   703
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   704
} // emit_GLSL_M4X3
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   705
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   706
static void emit_GLSL_M3X4(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   707
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   708
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   709
} // emit_GLSL_M3X4
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   710
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   711
static void emit_GLSL_M3X3(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   712
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   713
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   714
} // emit_GLSL_M3X3
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   715
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   716
static void emit_GLSL_M3X2(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   717
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   718
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   719
} // emit_GLSL_M3X2
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   720
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   721
static void emit_GLSL_CALL(Context *ctx)
1
99ac16070d07 [svn] Initial add.
icculus
parents:
diff changeset
   722
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   723
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   724
} // emit_GLSL_CALL
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   725
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   726
static void emit_GLSL_CALLNZ(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   727
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   728
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   729
} // emit_GLSL_CALLNZ
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   730
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   731
static void emit_GLSL_LOOP(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   732
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   733
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   734
} // emit_GLSL_LOOP
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   735
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   736
static void emit_GLSL_RET(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   737
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   738
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   739
} // emit_GLSL_RET
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   740
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   741
static void emit_GLSL_ENDLOOP(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   742
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   743
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   744
} // emit_GLSL_ENDLOOP
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   745
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   746
static void emit_GLSL_LABEL(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   747
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   748
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   749
} // emit_GLSL_LABEL
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   750
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   751
static void emit_GLSL_DCL(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   752
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   753
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   754
} // emit_GLSL_DCL
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   755
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   756
static void emit_GLSL_POW(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   757
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   758
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   759
} // emit_GLSL_POW
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   760
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   761
static void emit_GLSL_CRS(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   762
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   763
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   764
} // emit_GLSL_CRS
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   765
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   766
static void emit_GLSL_SGN(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   767
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   768
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   769
} // emit_GLSL_SGN
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   770
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   771
static void emit_GLSL_ABS(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   772
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   773
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   774
} // emit_GLSL_ABS
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   775
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   776
static void emit_GLSL_NRM(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   777
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   778
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   779
} // emit_GLSL_NRM
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   780
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   781
static void emit_GLSL_SINCOS(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   782
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   783
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   784
} // emit_GLSL_SINCOS
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   785
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   786
static void emit_GLSL_REP(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   787
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   788
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   789
} // emit_GLSL_REP
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   790
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   791
static void emit_GLSL_ENDREP(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   792
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   793
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   794
} // emit_GLSL_ENDREP
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   795
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   796
static void emit_GLSL_IF(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   797
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   798
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   799
} // emit_GLSL_IF
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   800
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   801
static void emit_GLSL_IFC(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   802
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   803
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   804
} // emit_GLSL_IFC
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   805
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   806
static void emit_GLSL_ELSE(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   807
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   808
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   809
} // emit_GLSL_ELSE
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   810
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   811
static void emit_GLSL_ENDIF(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   812
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   813
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   814
} // emit_GLSL_ENDIF
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   815
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   816
static void emit_GLSL_BREAK(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   817
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   818
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   819
} // emit_GLSL_BREAK
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   820
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   821
static void emit_GLSL_BREAKC(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   822
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   823
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   824
} // emit_GLSL_BREAKC
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   825
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   826
static void emit_GLSL_MOVA(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   827
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   828
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   829
} // emit_GLSL_MOVA
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   830
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   831
static void emit_GLSL_DEFB(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   832
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   833
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   834
} // emit_GLSL_DEFB
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   835
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   836
static void emit_GLSL_DEFI(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   837
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   838
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   839
} // emit_GLSL_DEFI
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   840
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   841
static void emit_GLSL_TEXCOORD(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   842
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   843
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   844
} // emit_GLSL_TEXCOORD
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   845
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   846
static void emit_GLSL_TEXKILL(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   847
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   848
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   849
} // emit_GLSL_TEXKILL
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   850
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   851
static void emit_GLSL_TEX(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   852
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   853
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   854
} // emit_GLSL_TEX
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   855
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   856
static void emit_GLSL_TEXBEM(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   857
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   858
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   859
} // emit_GLSL_TEXBEM
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   860
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   861
static void emit_GLSL_TEXBEML(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   862
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   863
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   864
} // emit_GLSL_TEXBEML
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   865
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   866
static void emit_GLSL_TEXREG2AR(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   867
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   868
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   869
} // emit_GLSL_TEXREG2AR
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   870
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   871
static void emit_GLSL_TEXREG2GB(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   872
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   873
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   874
} // emit_GLSL_TEXREG2GB
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   875
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   876
static void emit_GLSL_TEXM3X2PAD(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   877
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   878
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   879
} // emit_GLSL_TEXM3X2PAD
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   880
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   881
static void emit_GLSL_TEXM3X2TEX(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   882
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   883
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   884
} // emit_GLSL_TEXM3X2TEX
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   885
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   886
static void emit_GLSL_TEXM3X3PAD(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   887
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   888
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   889
} // emit_GLSL_TEXM3X3PAD
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   890
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   891
static void emit_GLSL_TEXM3X3TEX(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   892
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   893
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   894
} // emit_GLSL_TEXM3X3TEX
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   895
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   896
static void emit_GLSL_TEXM3X3SPEC(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   897
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   898
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   899
} // emit_GLSL_TEXM3X3SPEC
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   900
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   901
static void emit_GLSL_TEXM3X3VSPEC(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   902
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   903
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   904
} // emit_GLSL_TEXM3X3VSPEC
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   905
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   906
static void emit_GLSL_EXPP(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   907
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   908
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   909
} // emit_GLSL_EXPP
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   910
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   911
static void emit_GLSL_LOGP(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   912
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   913
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   914
} // emit_GLSL_LOGP
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   915
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   916
static void emit_GLSL_CND(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   917
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   918
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   919
} // emit_GLSL_CND
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   920
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   921
static void emit_GLSL_DEF(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   922
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   923
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   924
} // emit_GLSL_DEF
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   925
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   926
static void emit_GLSL_TEXREG2RGB(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   927
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   928
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   929
} // emit_GLSL_TEXREG2RGB
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   930
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   931
static void emit_GLSL_TEXDP3TEX(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   932
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   933
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   934
} // emit_GLSL_TEXDP3TEX
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   935
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   936
static void emit_GLSL_TEXM3X2DEPTH(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   937
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   938
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   939
} // emit_GLSL_TEXM3X2DEPTH
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   940
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   941
static void emit_GLSL_TEXDP3(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   942
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   943
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   944
} // emit_GLSL_TEXDP3
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   945
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   946
static void emit_GLSL_TEXM3X3(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   947
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   948
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   949
} // emit_GLSL_TEXM3X3
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   950
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   951
static void emit_GLSL_TEXDEPTH(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   952
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   953
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   954
} // emit_GLSL_TEXDEPTH
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   955
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   956
static void emit_GLSL_CMP(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   957
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   958
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   959
} // emit_GLSL_CMP
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   960
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   961
static void emit_GLSL_BEM(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   962
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   963
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   964
} // emit_GLSL_BEM
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   965
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   966
static void emit_GLSL_DP2ADD(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   967
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   968
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   969
} // emit_GLSL_DP2ADD
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   970
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   971
static void emit_GLSL_DSX(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   972
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   973
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   974
} // emit_GLSL_DSX
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   975
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   976
static void emit_GLSL_DSY(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   977
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   978
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   979
} // emit_GLSL_DSY
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   980
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   981
static void emit_GLSL_TEXLDD(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   982
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   983
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   984
} // emit_GLSL_TEXLDD
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   985
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   986
static void emit_GLSL_SETP(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   987
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   988
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   989
} // emit_GLSL_SETP
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   990
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   991
static void emit_GLSL_TEXLDL(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   992
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   993
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   994
} // emit_GLSL_TEXLDL
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   995
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   996
static void emit_GLSL_BREAKP(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   997
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   998
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   999
} // emit_GLSL_BREAKP
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1000
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1001
static void emit_GLSL_RESERVED(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1002
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1003
    // do nothing; fails in the state machine.
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1004
} // emit_GLSL_RESERVED
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1005
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1006
#endif  // SUPPORT_PROFILE_GLSL
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1007
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1008
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1009
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1010
#if !AT_LEAST_ONE_PROFILE
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1011
#error No profiles are supported. Fix your build.
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1012
#endif
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1013
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1014
static const D3D2GLSL_profile profiles[] =
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1015
{
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1016
#if SUPPORT_PROFILE_D3D
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1017
    { "d3d", emit_D3D_start, emit_D3D_end, emit_D3D_comment },
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1018
#endif
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1019
#if SUPPORT_PROFILE_GLSL
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1020
    { "glsl", emit_GLSL_start, emit_GLSL_end, emit_GLSL_comment },
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1021
#endif
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1022
};
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1023
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1024
// The PROFILE_EMITTER_* items MUST be in the same order as profiles[]!
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1025
#define PROFILE_EMITTERS(op) { \
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1026
     PROFILE_EMITTER_D3D(op) \
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1027
     PROFILE_EMITTER_GLSL(op) \
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1028
}
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1029
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1030
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1031
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1032
// State machine functions...
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1033
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1034
static int state_RESERVED(Context *ctx)
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1035
{
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
  1036
    return fail(ctx, "Tried to use RESERVED opcode.");
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1037
} // state_RESERVED
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1038
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1039
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1040
static int parse_destination_token(Context *ctx, DestArgInfo *info)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1041
{
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1042
    if (ctx->failstr != NULL)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1043
        return FAIL;  // already failed elsewhere.
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1044
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1045
    if (ctx->tokencount == 0)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1046
        return fail(ctx, "Out of tokens in destination parameter");
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1047
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1048
    const uint32 token = SWAP32(*(ctx->tokens));
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1049
    const int reserved1 = (int) ((token >> 14) & 0x3); // bits 14 through 15
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1050
    const int reserved2 = (int) ((token >> 31) & 0x1); // bit 31
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1051
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1052
    ctx->tokens++;  // swallow token for now, for multiple calls in a row.
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1053
    ctx->tokencount--;  // swallow token for now, for multiple calls in a row.
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1054
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1055
    info->regnum = (int) (token & 0x7ff);  // bits 0 through 10
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1056
    info->relative = (int) ((token >> 13) & 0x1); // bit 13
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1057
    info->writemask = (int) ((token >> 16) & 0xF); // bits 16 through 19
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1058
    info->result_mod = (int) ((token >> 20) & 0xF); // bits 20 through 23
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1059
    info->result_shift = (int) ((token >> 24) & 0xF); // bits 24 through 27
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1060
    info->regtype = (int) ((token >> 28) & 0x7) | ((token >> 9) & 0x18);  // bits 28-30, 11-12
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1061
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1062
    if (reserved1 != 0x0)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1063
        return fail(ctx, "Reserved bit #1 in destination token must be zero");
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1064
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1065
    if (reserved2 != 0x1)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1066
        return fail(ctx, "Reserved bit #2 in destination token must be one");
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1067
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1068
    if (info->relative)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1069
    {
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1070
        if (ctx->shader_type != SHADER_TYPE_VERTEX)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1071
            return fail(ctx, "Relative addressing in non-vertex shader");
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1072
        else if (ctx->major_ver < 3)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1073
            return fail(ctx, "Relative addressing in vertex shader version < 3.0");
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1074
        return fail(ctx, "Relative addressing is unsupported");  // !!! FIXME
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1075
    } // if
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1076
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1077
    if (info->result_shift != 0)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1078
    {
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1079
        if (ctx->shader_type != SHADER_TYPE_PIXEL)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1080
            return fail(ctx, "Result shift scale in non-pixel shader");
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1081
        else if (ctx->major_ver >= 2)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1082
            return fail(ctx, "Result shift scale in pixel shader version >= 2.0");
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1083
    } // if
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1084
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1085
    if (info->result_mod & 0x1)  // Saturate (vertex shaders only)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1086
    {
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1087
        if (ctx->shader_type != SHADER_TYPE_VERTEX)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1088
            return fail(ctx, "Saturate result mod in non-vertex shader");
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1089
    } // if
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1090
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1091
    if (info->result_mod & 0x2)  // Partial precision (pixel shaders only)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1092
    {
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1093
        if (ctx->shader_type != SHADER_TYPE_PIXEL)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1094
            return fail(ctx, "Partial precision result mod in non-pixel shader");
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1095
    } // if
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1096
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1097
    if (info->result_mod & 0x4)  // Centroid (pixel shaders only)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1098
    {
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1099
        if (ctx->shader_type != SHADER_TYPE_PIXEL)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1100
            return fail(ctx, "Centroid result mod in non-pixel shader");
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1101
    } // if
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1102
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1103
    return 1;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1104
} // parse_destination_token
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1105
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1106
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1107
static int parse_source_token(Context *ctx, SourceArgInfo *info)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1108
{
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1109
    if (ctx->failstr != NULL)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1110
        return FAIL;  // already failed elsewhere.
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1111
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1112
    if (ctx->tokencount == 0)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1113
        return fail(ctx, "Out of tokens in source parameter");
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1114
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1115
    const uint32 token = SWAP32(*(ctx->tokens));
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1116
    const int reserved1 = (int) ((token >> 14) & 0x3); // bits 14 through 15
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1117
    const int reserved2 = (int) ((token >> 31) & 0x1); // bit 31
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1118
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1119
    ctx->tokens++;  // swallow token for now, for multiple calls in a row.
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1120
    ctx->tokencount--;  // swallow token for now, for multiple calls in a row.
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1121
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1122
    info->regnum = (int) (token & 0x7ff);  // bits 0 through 10
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1123
    info->relative = (int) ((token >> 13) & 0x1); // bit 13
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1124
    info->swizzle_x = (int) ((token >> 16) & 0x3); // bits 16 through 17
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1125
    info->swizzle_y = (int) ((token >> 18) & 0x3); // bits 18 through 19
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1126
    info->swizzle_z = (int) ((token >> 20) & 0x3); // bits 20 through 21
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1127
    info->swizzle_w = (int) ((token >> 22) & 0x3); // bits 22 through 23
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1128
    info->src_mod = (int) ((token >> 24) & 0xF); // bits 24 through 27
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1129
    info->regtype = (int) ((token >> 28) & 0x7) | ((token >> 9) & 0x18);  // bits 28-30, 11-12
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1130
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1131
    if (reserved1 != 0x0)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1132
        return fail(ctx, "Reserved bit #1 in source token must be zero");
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1133
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1134
    if (reserved2 != 0x1)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1135
        return fail(ctx, "Reserved bit #2 in source token must be one");
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1136
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1137
    if (info->relative)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1138
    {
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1139
        if ((ctx->shader_type == SHADER_TYPE_PIXEL) && (ctx->major_ver < 3))
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1140
            return fail(ctx, "Relative addressing in pixel shader version < 3.0");
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1141
        return fail(ctx, "Relative addressing is unsupported");  // !!! FIXME
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1142
    } // if
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1143
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1144
    if (info->src_mod >= 0xE)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1145
        return fail(ctx, "Unknown source modifier");
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1146
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1147
    return 1;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1148
} // parse_source_token
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1149
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1150
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1151
static int parse_args_NULL(Context *ctx)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1152
{
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1153
    return ((ctx->failstr != NULL) ? FAIL : 0);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1154
} // parse_args_NULL
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1155
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1156
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1157
static int parse_args_D(Context *ctx)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1158
{
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1159
    if (parse_destination_token(ctx, &ctx->dest_args[0]) == FAIL) return FAIL;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1160
    return ((ctx->failstr != NULL) ? FAIL : 0);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1161
} // parse_args_D
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1162
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1163
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1164
static int parse_args_S(Context *ctx)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1165
{
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1166
    if (parse_source_token(ctx, &ctx->source_args[0]) == FAIL) return FAIL;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1167
    return ((ctx->failstr != NULL) ? FAIL : 0);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1168
} // parse_args_S
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1169
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1170
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1171
static int parse_args_SS(Context *ctx)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1172
{
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1173
    if (parse_source_token(ctx, &ctx->source_args[0]) == FAIL) return FAIL;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1174
    if (parse_source_token(ctx, &ctx->source_args[1]) == FAIL) return FAIL;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1175
    return ((ctx->failstr != NULL) ? FAIL : 0);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1176
} // parse_args_SS
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1177
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1178
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1179
static int parse_args_DS(Context *ctx)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1180
{
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1181
    if (parse_destination_token(ctx, &ctx->dest_args[0]) == FAIL) return FAIL;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1182
    if (parse_source_token(ctx, &ctx->source_args[0]) == FAIL) return FAIL;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1183
    return ((ctx->failstr != NULL) ? FAIL : 0);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1184
} // parse_args_DS
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1185
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1186
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1187
static int parse_args_DSS(Context *ctx)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1188
{
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1189
    if (parse_destination_token(ctx, &ctx->dest_args[0]) == FAIL) return FAIL;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1190
    if (parse_source_token(ctx, &ctx->source_args[0]) == FAIL) return FAIL;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1191
    if (parse_source_token(ctx, &ctx->source_args[1]) == FAIL) return FAIL;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1192
    return ((ctx->failstr != NULL) ? FAIL : 0);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1193
} // parse_args_DSS
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1194
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1195
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1196
static int parse_args_DSSS(Context *ctx)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1197
{
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1198
    if (parse_destination_token(ctx, &ctx->dest_args[0]) == FAIL) return FAIL;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1199
    if (parse_source_token(ctx, &ctx->source_args[0]) == FAIL) return FAIL;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1200
    if (parse_source_token(ctx, &ctx->source_args[1]) == FAIL) return FAIL;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1201
    if (parse_source_token(ctx, &ctx->source_args[2]) == FAIL) return FAIL;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1202
    return ((ctx->failstr != NULL) ? FAIL : 0);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1203
} // parse_args_DSSS
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1204
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1205
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1206
static int parse_args_DSSSS(Context *ctx)
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1207
{
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1208
    if (parse_destination_token(ctx, &ctx->dest_args[0]) == FAIL) return FAIL;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1209
    if (parse_source_token(ctx, &ctx->source_args[0]) == FAIL) return FAIL;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1210
    if (parse_source_token(ctx, &ctx->source_args[1]) == FAIL) return FAIL;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1211
    if (parse_source_token(ctx, &ctx->source_args[2]) == FAIL) return FAIL;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1212
    if (parse_source_token(ctx, &ctx->source_args[3]) == FAIL) return FAIL;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1213
    return ((ctx->failstr != NULL) ? FAIL : 0);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1214
} // parse_args_DSSSS
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1215
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1216
7
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
  1217
// Lookup table for instruction opcodes...
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1218
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1219
typedef struct
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1220
{
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1221
    const char *opcode_string;
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1222
    int arg_tokens;
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1223
    //uint32 shader_requirements;
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1224
    args_function parse_args;
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1225
    state_function state;
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1226
    emit_function emitter[STATICARRAYLEN(profiles)];
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1227
} Instruction;
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1228
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1229
// These have to be in the right order! This array is indexed by the value
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1230
//  of the instruction token.
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1231
static Instruction instructions[] =
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1232
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1233
    // INSTRUCTION_STATE means this opcode has to update the state machine
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1234
    //  (we're entering an ELSE block, etc). INSTRUCTION means there's no
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1235
    //  state, just go straight to the emitters.
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1236
    #define INSTRUCTION_STATE(op, args, argsseq) { \
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1237
        #op, args, parse_args_##argsseq, state_##op, PROFILE_EMITTERS(op) \
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1238
    }
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1239
    #define INSTRUCTION(op, args, argsseq) { \
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1240
        #op, args, parse_args_##argsseq, NULL, PROFILE_EMITTERS(op) \
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1241
    }
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1242
    INSTRUCTION(NOP, 0, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1243
    INSTRUCTION(MOV, 2, DS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1244
    INSTRUCTION(ADD, 3, DSS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1245
    INSTRUCTION(SUB, 3, DSS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1246
    INSTRUCTION(MAD, 4, DSSS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1247
    INSTRUCTION(MUL, 3, DSS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1248
    INSTRUCTION(RCP, 2, DS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1249
    INSTRUCTION(RSQ, 2, DS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1250
    INSTRUCTION(DP3, 3, DSS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1251
    INSTRUCTION(DP4, 3, DSS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1252
    INSTRUCTION(MIN, 3, DSS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1253
    INSTRUCTION(MAX, 3, DSS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1254
    INSTRUCTION(SLT, 3, DSS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1255
    INSTRUCTION(SGE, 3, DSS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1256
    INSTRUCTION(EXP, 2, DS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1257
    INSTRUCTION(LOG, 2, DS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1258
    INSTRUCTION(LIT, 2, DS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1259
    INSTRUCTION(DST, 3, DSS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1260
    INSTRUCTION(LRP, 4, DSSS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1261
    INSTRUCTION(FRC, 2, DS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1262
    INSTRUCTION(M4X4, 3, DSS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1263
    INSTRUCTION(M4X3, 3, DSS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1264
    INSTRUCTION(M3X4, 3, DSS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1265
    INSTRUCTION(M3X3, 3, DSS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1266
    INSTRUCTION(M3X2, 3, DSS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1267
    INSTRUCTION(CALL, 1, S),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1268
    INSTRUCTION(CALLNZ, 2, SS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1269
    INSTRUCTION(LOOP, 2, SS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1270
    INSTRUCTION(RET, 0, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1271
    INSTRUCTION(ENDLOOP, 0, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1272
    INSTRUCTION(LABEL, 1, S),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1273
    INSTRUCTION(DCL, -1, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1274
    INSTRUCTION(POW, 3, DSS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1275
    INSTRUCTION(CRS, 3, DSS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1276
    INSTRUCTION(SGN, 4, DSSS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1277
    INSTRUCTION(ABS, 2, DS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1278
    INSTRUCTION(NRM, 2, DS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1279
    INSTRUCTION(SINCOS, 4, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1280
    INSTRUCTION(REP, 1, S),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1281
    INSTRUCTION(ENDREP, 0, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1282
    INSTRUCTION(IF, 1, S),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1283
    INSTRUCTION(IFC, 2, SS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1284
    INSTRUCTION(ELSE, 0, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1285
    INSTRUCTION(ENDIF, 0, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1286
    INSTRUCTION(BREAK, 0, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1287
    INSTRUCTION(BREAKC, 2, SS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1288
    INSTRUCTION(MOVA, 2, DS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1289
    INSTRUCTION(DEFB, 2, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1290
    INSTRUCTION(DEFI, 5, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1291
    INSTRUCTION_STATE(RESERVED, 0, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1292
    INSTRUCTION_STATE(RESERVED, 0, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1293
    INSTRUCTION_STATE(RESERVED, 0, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1294
    INSTRUCTION_STATE(RESERVED, 0, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1295
    INSTRUCTION_STATE(RESERVED, 0, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1296
    INSTRUCTION_STATE(RESERVED, 0, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1297
    INSTRUCTION_STATE(RESERVED, 0, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1298
    INSTRUCTION_STATE(RESERVED, 0, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1299
    INSTRUCTION_STATE(RESERVED, 0, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1300
    INSTRUCTION_STATE(RESERVED, 0, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1301
    INSTRUCTION_STATE(RESERVED, 0, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1302
    INSTRUCTION_STATE(RESERVED, 0, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1303
    INSTRUCTION_STATE(RESERVED, 0, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1304
    INSTRUCTION_STATE(RESERVED, 0, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1305
    INSTRUCTION_STATE(RESERVED, 0, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1306
    INSTRUCTION(TEXCOORD, -1, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1307
    INSTRUCTION(TEXKILL, 1, D),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1308
    INSTRUCTION(TEX, -1, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1309
    INSTRUCTION(TEXBEM, 2, DS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1310
    INSTRUCTION(TEXBEML, 2, DS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1311
    INSTRUCTION(TEXREG2AR, 2, DS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1312
    INSTRUCTION(TEXREG2GB, 2, DS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1313
    INSTRUCTION(TEXM3X2PAD, 2, DS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1314
    INSTRUCTION(TEXM3X2TEX, 2, DS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1315
    INSTRUCTION(TEXM3X3PAD, 2, DS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1316
    INSTRUCTION(TEXM3X3TEX, 2, DS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1317
    INSTRUCTION_STATE(RESERVED, 0, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1318
    INSTRUCTION(TEXM3X3SPEC, 3, DSS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1319
    INSTRUCTION(TEXM3X3VSPEC, 2, DS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1320
    INSTRUCTION(EXPP, 2, DS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1321
    INSTRUCTION(LOGP, 2, DS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1322
    INSTRUCTION(CND, 4, DSSS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1323
    INSTRUCTION(DEF, 5, NULL),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1324
    INSTRUCTION(TEXREG2RGB, 2, DS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1325
    INSTRUCTION(TEXDP3TEX, 2, DS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1326
    INSTRUCTION(TEXM3X2DEPTH, 2, DS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1327
    INSTRUCTION(TEXDP3, 2, DS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1328
    INSTRUCTION(TEXM3X3, 2, DS),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
  1329
    INSTRUCTION(TEXDEPTH, 1, D),
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset