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