d3d2glsl.c
author icculus
Fri, 14 Mar 2008 07:12:31 -0400
branchtrunk
changeset 19 8bca9cb2252f
parent 18 0dbdb2be8bf8
child 20 bb2e8f285acc
permissions -rw-r--r--
[svn] Fixed output for software vertex shader versions.
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;
19
8bca9cb2252f [svn] Fixed output for software vertex shader versions.
icculus
parents: 18
diff changeset
   418
16
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   419
    if (ctx->shader_type == SHADER_TYPE_PIXEL)
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   420
        output_line(ctx, "ps_%u_%u", major, minor);
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   421
    else if (ctx->shader_type == SHADER_TYPE_VERTEX)
19
8bca9cb2252f [svn] Fixed output for software vertex shader versions.
icculus
parents: 18
diff changeset
   422
    {
8bca9cb2252f [svn] Fixed output for software vertex shader versions.
icculus
parents: 18
diff changeset
   423
        char minorstr[16];
8bca9cb2252f [svn] Fixed output for software vertex shader versions.
icculus
parents: 18
diff changeset
   424
        if (minor == 0xFF)
8bca9cb2252f [svn] Fixed output for software vertex shader versions.
icculus
parents: 18
diff changeset
   425
            strcpy(minorstr, "sw");
8bca9cb2252f [svn] Fixed output for software vertex shader versions.
icculus
parents: 18
diff changeset
   426
        else
8bca9cb2252f [svn] Fixed output for software vertex shader versions.
icculus
parents: 18
diff changeset
   427
            snprintf(minorstr, sizeof (minorstr), "%u", (uint) minor);
8bca9cb2252f [svn] Fixed output for software vertex shader versions.
icculus
parents: 18
diff changeset
   428
8bca9cb2252f [svn] Fixed output for software vertex shader versions.
icculus
parents: 18
diff changeset
   429
        output_line(ctx, "vs_%u_%s", major, minorstr);
8bca9cb2252f [svn] Fixed output for software vertex shader versions.
icculus
parents: 18
diff changeset
   430
    } // else if
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   431
    else
16
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   432
    {
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   433
        failf(ctx, "Shader type %u unsupported in this profile.",
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   434
              (uint) ctx->shader_type);
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   435
    } // else
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   436
} // emit_D3D_start
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   437
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   438
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   439
static void emit_D3D_end(Context *ctx)
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   440
{
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   441
    output_line(ctx, "END");
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   442
} // emit_D3D_end
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   443
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   444
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   445
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
   446
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   447
    output_line(ctx, "; %s", str);
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   448
} // 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
   449
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
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_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
   452
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   453
    // do nothing; fails in the state machine.
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   454
} // emit_D3D_RESERVED
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   455
17
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
// 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
   458
//  that call into these...
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   459
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   460
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
   461
{
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   462
    const char *dst1 = get_D3D_destination(ctx);
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   463
    output_line(ctx, "%s %s", opcode, dst1);
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   464
} // emit_D3D_opcode_d
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   465
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   466
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   467
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
   468
{
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   469
    const char *src1 = get_D3D_destination(ctx);
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   470
    output_line(ctx, "%s %s", opcode, src1);
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   471
} // emit_D3D_opcode_s
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   472
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   473
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   474
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
   475
{
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   476
    const char *src1 = get_D3D_destination(ctx);
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   477
    const char *src2 = get_D3D_destination(ctx);
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   478
    output_line(ctx, "%s %s, %s", opcode, src1, src2);
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   479
} // emit_D3D_opcode_s
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   480
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   481
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   482
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
   483
{
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   484
    const char *dst1 = get_D3D_destination(ctx);
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   485
    const char *src1 = get_D3D_source(ctx);
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   486
    output_line(ctx, "%s %s, %s", opcode, dst1, src1);
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   487
} // emit_D3D_opcode_ds
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_dss(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
    output_line(ctx, "%s %s, %s, %s", opcode, dst1, src1, src2);
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   496
} // emit_D3D_opcode_dss
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   497
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   498
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   499
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
   500
{
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   501
    const char *dst1 = get_D3D_destination(ctx);
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   502
    const char *src1 = get_D3D_source(ctx);
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   503
    const char *src2 = get_D3D_source(ctx);
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   504
    const char *src3 = get_D3D_source(ctx);
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   505
    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
   506
} // emit_D3D_opcode_dsss
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   507
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   508
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   509
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
   510
{
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   511
    const char *dst1 = get_D3D_destination(ctx);
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   512
    const char *src1 = get_D3D_source(ctx);
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   513
    const char *src2 = get_D3D_source(ctx);
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   514
    const char *src3 = get_D3D_source(ctx);
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   515
    const char *src4 = get_D3D_source(ctx);
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   516
    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
   517
} // emit_D3D_opcode_dssss
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
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   520
#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
   521
    static void emit_D3D_##op(Context *ctx) { \
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   522
        output_line(ctx, #op); \
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   523
    }
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   524
#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
   525
    static void emit_D3D_##op(Context *ctx) { \
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   526
        emit_D3D_opcode_d(ctx, #op); \
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   527
    }
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   528
#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
   529
    static void emit_D3D_##op(Context *ctx) { \
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   530
        emit_D3D_opcode_s(ctx, #op); \
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   531
    }
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   532
#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
   533
    static void emit_D3D_##op(Context *ctx) { \
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   534
        emit_D3D_opcode_ss(ctx, #op); \
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   535
    }
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   536
#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
   537
    static void emit_D3D_##op(Context *ctx) { \
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   538
        emit_D3D_opcode_ds(ctx, #op); \
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   539
    }
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   540
#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
   541
    static void emit_D3D_##op(Context *ctx) { \
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   542
        emit_D3D_opcode_dss(ctx, #op); \
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
#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
   545
    static void emit_D3D_##op(Context *ctx) { \
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   546
        emit_D3D_opcode_dsss(ctx, #op); \
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   547
    }
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   548
#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
   549
    static void emit_D3D_##op(Context *ctx) { \
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   550
        emit_D3D_opcode_dssss(ctx, #op); \
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   551
    }
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   552
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   553
EMIT_D3D_OPCODE_FUNC(NOP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   554
EMIT_D3D_OPCODE_DS_FUNC(MOV)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   555
EMIT_D3D_OPCODE_DSS_FUNC(ADD)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   556
EMIT_D3D_OPCODE_DSS_FUNC(SUB)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   557
EMIT_D3D_OPCODE_DSSS_FUNC(MAD)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   558
EMIT_D3D_OPCODE_DSS_FUNC(MUL)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   559
EMIT_D3D_OPCODE_DS_FUNC(RCP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   560
EMIT_D3D_OPCODE_DS_FUNC(RSQ)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   561
EMIT_D3D_OPCODE_DSS_FUNC(DP3)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   562
EMIT_D3D_OPCODE_DSS_FUNC(DP4)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   563
EMIT_D3D_OPCODE_DSS_FUNC(MIN)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   564
EMIT_D3D_OPCODE_DSS_FUNC(MAX)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   565
EMIT_D3D_OPCODE_DSS_FUNC(SLT)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   566
EMIT_D3D_OPCODE_DSS_FUNC(SGE)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   567
EMIT_D3D_OPCODE_DS_FUNC(EXP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   568
EMIT_D3D_OPCODE_DS_FUNC(LOG)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   569
EMIT_D3D_OPCODE_DS_FUNC(LIT)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   570
EMIT_D3D_OPCODE_DSS_FUNC(DST)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   571
EMIT_D3D_OPCODE_DSSS_FUNC(LRP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   572
EMIT_D3D_OPCODE_DS_FUNC(FRC)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   573
EMIT_D3D_OPCODE_DSS_FUNC(M4X4)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   574
EMIT_D3D_OPCODE_DSS_FUNC(M4X3)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   575
EMIT_D3D_OPCODE_DSS_FUNC(M3X4)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   576
EMIT_D3D_OPCODE_DSS_FUNC(M3X3)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   577
EMIT_D3D_OPCODE_DSS_FUNC(M3X2)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   578
EMIT_D3D_OPCODE_S_FUNC(CALL)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   579
EMIT_D3D_OPCODE_SS_FUNC(CALLNZ)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   580
EMIT_D3D_OPCODE_S_FUNC(LOOP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   581
EMIT_D3D_OPCODE_FUNC(RET)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   582
EMIT_D3D_OPCODE_FUNC(ENDLOOP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   583
EMIT_D3D_OPCODE_S_FUNC(LABEL)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   584
EMIT_D3D_OPCODE_FUNC(DCL)  // !!! FIXME!
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   585
EMIT_D3D_OPCODE_DSS_FUNC(POW)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   586
EMIT_D3D_OPCODE_DSS_FUNC(CRS)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   587
EMIT_D3D_OPCODE_DSSS_FUNC(SGN)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   588
EMIT_D3D_OPCODE_DS_FUNC(ABS)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   589
EMIT_D3D_OPCODE_DS_FUNC(NRM)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   590
EMIT_D3D_OPCODE_DS_FUNC(SINCOS)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   591
EMIT_D3D_OPCODE_S_FUNC(REP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   592
EMIT_D3D_OPCODE_FUNC(ENDREP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   593
EMIT_D3D_OPCODE_S_FUNC(IF)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   594
EMIT_D3D_OPCODE_SS_FUNC(IFC)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   595
EMIT_D3D_OPCODE_FUNC(ELSE)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   596
EMIT_D3D_OPCODE_FUNC(ENDIF)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   597
EMIT_D3D_OPCODE_FUNC(BREAK)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   598
EMIT_D3D_OPCODE_SS_FUNC(BREAKC)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   599
EMIT_D3D_OPCODE_DS_FUNC(MOVA)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   600
EMIT_D3D_OPCODE_FUNC(DEFB) // !!! FIXME!
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   601
EMIT_D3D_OPCODE_FUNC(DEFI) // !!! FIXME!
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   602
EMIT_D3D_OPCODE_FUNC(TEXCOORD) // !!! FIXME!
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   603
EMIT_D3D_OPCODE_D_FUNC(TEXKILL)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   604
EMIT_D3D_OPCODE_FUNC(TEX) // !!! FIXME!
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   605
EMIT_D3D_OPCODE_DS_FUNC(TEXBEM)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   606
EMIT_D3D_OPCODE_DS_FUNC(TEXBEML)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   607
EMIT_D3D_OPCODE_DS_FUNC(TEXREG2AR)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   608
EMIT_D3D_OPCODE_DS_FUNC(TEXREG2GB)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   609
EMIT_D3D_OPCODE_DS_FUNC(TEXM3X2PAD)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   610
EMIT_D3D_OPCODE_DS_FUNC(TEXM3X2TEX)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   611
EMIT_D3D_OPCODE_DS_FUNC(TEXM3X3PAD)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   612
EMIT_D3D_OPCODE_DS_FUNC(TEXM3X3TEX)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   613
EMIT_D3D_OPCODE_DSS_FUNC(TEXM3X3SPEC)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   614
EMIT_D3D_OPCODE_DS_FUNC(TEXM3X3VSPEC)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   615
EMIT_D3D_OPCODE_DS_FUNC(EXPP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   616
EMIT_D3D_OPCODE_DS_FUNC(LOGP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   617
EMIT_D3D_OPCODE_DSSS_FUNC(CND)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   618
EMIT_D3D_OPCODE_FUNC(DEF) // !!! FIXME!
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   619
EMIT_D3D_OPCODE_DS_FUNC(TEXREG2RGB)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   620
EMIT_D3D_OPCODE_DS_FUNC(TEXDP3TEX)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   621
EMIT_D3D_OPCODE_DS_FUNC(TEXM3X2DEPTH)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   622
EMIT_D3D_OPCODE_DS_FUNC(TEXDP3)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   623
EMIT_D3D_OPCODE_DS_FUNC(TEXM3X3)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   624
EMIT_D3D_OPCODE_D_FUNC(TEXDEPTH)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   625
EMIT_D3D_OPCODE_DSSS_FUNC(CMP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   626
EMIT_D3D_OPCODE_DSS_FUNC(BEM)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   627
EMIT_D3D_OPCODE_DSSS_FUNC(DP2ADD)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   628
EMIT_D3D_OPCODE_DS_FUNC(DSX)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   629
EMIT_D3D_OPCODE_DS_FUNC(DSY)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   630
EMIT_D3D_OPCODE_DSSSS_FUNC(TEXLDD)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   631
EMIT_D3D_OPCODE_DSS_FUNC(SETP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   632
EMIT_D3D_OPCODE_DSS_FUNC(TEXLDL)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   633
EMIT_D3D_OPCODE_DS_FUNC(BREAKP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   634
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   635
#undef EMIT_D3D_OPCODE_FUNC
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   636
#undef EMIT_D3D_OPCODE_D_FUNC
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   637
#undef EMIT_D3D_OPCODE_S_FUNC
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   638
#undef EMIT_D3D_OPCODE_SS_FUNC
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   639
#undef EMIT_D3D_OPCODE_DS_FUNC
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   640
#undef EMIT_D3D_OPCODE_DSS_FUNC
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   641
#undef EMIT_D3D_OPCODE_DSSS_FUNC
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   642
#undef EMIT_D3D_OPCODE_DSSSS_FUNC
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   643
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   644
#endif  // SUPPORT_PROFILE_D3D
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   645
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   646
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
   647
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   648
#if !SUPPORT_PROFILE_GLSL
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   649
#define PROFILE_EMITTER_GLSL(op)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   650
#else
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   651
#undef AT_LEAST_ONE_PROFILE
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   652
#define AT_LEAST_ONE_PROFILE 1
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   653
#define PROFILE_EMITTER_GLSL(op) emit_GLSL_##op,
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   654
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   655
static void emit_GLSL_start(Context *ctx)
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   656
{
16
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   657
    const uint major = (uint) ctx->major_ver;
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   658
    const uint minor = (uint) ctx->minor_ver;
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   659
    if (ctx->shader_type == SHADER_TYPE_PIXEL)
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   660
        output_line(ctx, "// Pixel shader, version %u.%u", major, minor);
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   661
    else if (ctx->shader_type == SHADER_TYPE_VERTEX)
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   662
        output_line(ctx, "// Vertex shader, version %u.%u", major, minor);
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   663
    else
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   664
    {
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   665
        failf(ctx, "Shader type %u unsupported in this profile.",
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   666
              (uint) ctx->shader_type);
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   667
    } // else
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   668
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   669
    output_line(ctx, "void main() {");
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   670
} // emit_GLSL_start
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   671
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   672
static void emit_GLSL_end(Context *ctx)
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   673
{
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   674
    output_line(ctx, "}");
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   675
} // emit_GLSL_end
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   676
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   677
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
   678
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   679
    output_line(ctx, "// %s", str);
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   680
} // 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
   681
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   682
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
   683
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   684
    // no-op is a no-op.  :)
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   685
} // 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
   686
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   687
static void emit_GLSL_MOV(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   688
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   689
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   690
} // emit_GLSL_MOV
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   691
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   692
static void emit_GLSL_ADD(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   693
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   694
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   695
} // emit_GLSL_ADD
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   696
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   697
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
   698
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   699
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   700
} // 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
   701
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   702
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
   703
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   704
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   705
} // 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
   706
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   707
static void emit_GLSL_MUL(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   708
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   709
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   710
} // emit_GLSL_MUL
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   711
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   712
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
   713
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   714
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   715
} // 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
   716
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   717
static void emit_GLSL_RSQ(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   718
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   719
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   720
} // emit_GLSL_RSQ
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   721
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   722
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
   723
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   724
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   725
} // 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
   726
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   727
static void emit_GLSL_DP4(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   728
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   729
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   730
} // emit_GLSL_DP4
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   731
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   732
static void emit_GLSL_MIN(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   733
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   734
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   735
} // emit_GLSL_MIN
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   736
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   737
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
   738
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   739
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   740
} // 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
   741
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   742
static void emit_GLSL_SLT(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   743
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   744
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   745
} // emit_GLSL_SLT
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   746
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   747
static void emit_GLSL_SGE(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   748
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   749
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   750
} // emit_GLSL_SGE
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   751
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   752
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
   753
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   754
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   755
} // 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
   756
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   757
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
   758
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   759
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   760
} // 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
   761
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   762
static void emit_GLSL_LIT(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   763
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   764
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   765
} // emit_GLSL_LIT
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   766
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   767
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
   768
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   769
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   770
} // 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
   771
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   772
static void emit_GLSL_LRP(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   773
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   774
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   775
} // emit_GLSL_LRP
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   776
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   777
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
   778
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   779
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   780
} // 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
   781
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   782
static void emit_GLSL_M4X4(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   783
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   784
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   785
} // emit_GLSL_M4X4
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   786
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   787
static void emit_GLSL_M4X3(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   788
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   789
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   790
} // emit_GLSL_M4X3
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   791
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   792
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
   793
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   794
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   795
} // 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
   796
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   797
static void emit_GLSL_M3X3(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   798
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   799
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   800
} // emit_GLSL_M3X3
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   801
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   802
static void emit_GLSL_M3X2(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   803
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   804
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   805
} // emit_GLSL_M3X2
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   806
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   807
static void emit_GLSL_CALL(Context *ctx)
1
99ac16070d07 [svn] Initial add.
icculus
parents:
diff changeset
   808
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   809
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   810
} // 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
   811
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   812
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
   813
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   814
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   815
} // 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
   816
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   817
static void emit_GLSL_LOOP(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   818
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   819
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   820
} // emit_GLSL_LOOP
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   821
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   822
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
   823
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   824
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   825
} // 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
   826
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   827
static void emit_GLSL_ENDLOOP(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   828
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   829
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   830
} // emit_GLSL_ENDLOOP
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   831
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   832
static void emit_GLSL_LABEL(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   833
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   834
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   835
} // emit_GLSL_LABEL
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   836
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   837
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
   838
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   839
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   840
} // 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
   841
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   842
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
   843
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   844
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   845
} // 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
   846
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   847
static void emit_GLSL_CRS(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   848
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   849
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   850
} // emit_GLSL_CRS
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   851
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   852
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
   853
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   854
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   855
} // 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
   856
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   857
static void emit_GLSL_ABS(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   858
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   859
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   860
} // emit_GLSL_ABS
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   861
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   862
static void emit_GLSL_NRM(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   863
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   864
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   865
} // emit_GLSL_NRM
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   866
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   867
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
   868
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   869
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   870
} // 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
   871
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   872
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
   873
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   874
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   875
} // 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
   876
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   877
static void emit_GLSL_ENDREP(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   878
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   879
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   880
} // emit_GLSL_ENDREP
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   881
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   882
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
   883
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   884
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   885
} // 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
   886
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   887
static void emit_GLSL_IFC(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   888
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   889
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   890
} // emit_GLSL_IFC
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   891
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   892
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
   893
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   894
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   895
} // 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
   896
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   897
static void emit_GLSL_ENDIF(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   898
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   899
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   900
} // emit_GLSL_ENDIF
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   901
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   902
static void emit_GLSL_BREAK(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   903
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   904
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   905
} // emit_GLSL_BREAK
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   906
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   907
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
   908
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   909
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   910
} // 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
   911
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   912
static void emit_GLSL_MOVA(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   913
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   914
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   915
} // emit_GLSL_MOVA
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   916
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   917
static void emit_GLSL_DEFB(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   918
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   919
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   920
} // emit_GLSL_DEFB
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   921
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   922
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
   923
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   924
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   925
} // 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
   926
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   927
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
   928
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   929
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   930
} // 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
   931
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   932
static void emit_GLSL_TEXKILL(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   933
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   934
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   935
} // emit_GLSL_TEXKILL
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   936
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   937
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
   938
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   939
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   940
} // 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
   941
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   942
static void emit_GLSL_TEXBEM(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   943
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   944
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   945
} // emit_GLSL_TEXBEM
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   946
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   947
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
   948
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   949
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   950
} // 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
   951
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   952
static void emit_GLSL_TEXREG2AR(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   953
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   954
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   955
} // emit_GLSL_TEXREG2AR
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   956
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   957
static void emit_GLSL_TEXREG2GB(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   958
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   959
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   960
} // emit_GLSL_TEXREG2GB
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   961
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   962
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
   963
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   964
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   965
} // 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
   966
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   967
static void emit_GLSL_TEXM3X2TEX(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   968
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   969
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   970
} // emit_GLSL_TEXM3X2TEX
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   971
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   972
static void emit_GLSL_TEXM3X3PAD(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   973
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   974
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   975
} // emit_GLSL_TEXM3X3PAD
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   976
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   977
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
   978
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   979
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   980
} // 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
   981
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   982
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
   983
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   984
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   985
} // 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
   986
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   987
static void emit_GLSL_TEXM3X3VSPEC(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   988
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   989
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   990
} // emit_GLSL_TEXM3X3VSPEC
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   991
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   992
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
   993
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   994
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   995
} // 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
   996
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   997
static void emit_GLSL_LOGP(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   998
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   999
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1000
} // emit_GLSL_LOGP
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1001
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1002
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
  1003
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1004
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1005
} // 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
  1006
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1007
static void emit_GLSL_DEF(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1008
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1009
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1010
} // emit_GLSL_DEF
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1011
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1012
static void emit_GLSL_TEXREG2RGB(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1013
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1014
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1015
} // emit_GLSL_TEXREG2RGB
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1016
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1017
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
  1018
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1019
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1020
} // 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
  1021
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1022
static void emit_GLSL_TEXM3X2DEPTH(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1023
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1024
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1025
} // emit_GLSL_TEXM3X2DEPTH
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1026
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1027
static void emit_GLSL_TEXDP3(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1028
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1029
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1030
} // emit_GLSL_TEXDP3
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1031
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1032
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
  1033
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1034
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1035
} // 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
  1036
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1037
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
  1038
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1039
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1040
} // 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
  1041
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1042
static void emit_GLSL_CMP(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1043
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1044
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1045
} // emit_GLSL_CMP
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1046
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1047
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
  1048
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1049
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1050
} // 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
  1051
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1052
static void emit_GLSL_DP2ADD(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1053
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1054
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1055
} // emit_GLSL_DP2ADD
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1056
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1057
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
  1058
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1059
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1060
} // 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
  1061
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1062
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
  1063
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1064
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1065
} // 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
  1066
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1067
static void emit_GLSL_TEXLDD(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1068
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1069
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1070
} // emit_GLSL_TEXLDD
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1071
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1072
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
  1073
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1074
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1075
} // 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
  1076
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1077
static void emit_GLSL_TEXLDL(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1078
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1079
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1080
} // emit_GLSL_TEXLDL
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1081
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1082
static void emit_GLSL_BREAKP(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1083
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1084
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1085
} // emit_GLSL_BREAKP
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1086
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1087
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
  1088
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1089
    // do nothing; fails in the state machine.
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1090
} // emit_GLSL_RESERVED
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1091
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1092
#endif  // SUPPORT_PROFILE_GLSL
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1093
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1094
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1095
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1096
#if !AT_LEAST_ONE_PROFILE
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1097
#error No profiles are supported. Fix your build.
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1098
#endif
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1099
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1100
static const D3D2GLSL_profile profiles[] =
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1101
{
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1102
#if SUPPORT_PROFILE_D3D
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1103
    { "d3d", emit_D3D_start, emit_D3D_end, emit_D3D_comment },
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1104
#endif
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1105
#if SUPPORT_PROFILE_GLSL
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1106
    { "glsl", emit_GLSL_start, emit_GLSL_end, emit_GLSL_comment },
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1107
#endif
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1108
};
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1109
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1110
// The PROFILE_EMITTER_* items MUST be in the same order as profiles[]!
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1111
#define PROFILE_EMITTERS(op) { \
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1112
     PROFILE_EMITTER_D3D(op) \
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1113
     PROFILE_EMITTER_GLSL(op) \
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1114
}
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1115
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1116
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1117
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1118
// State machine functions...
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1119
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1120
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
  1121
{
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
  1122
    return fail(ctx, "Tried to use RESERVED opcode.");
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1123
} // state_RESERVED
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1124
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1125
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1126
7
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
  1127
// 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
  1128
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1129
typedef struct
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1130
{
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1131
    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
  1132
    int arg_tokens;
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1133
    //uint32 shader_requirements;
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1134
    state_function state;
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1135
    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
  1136
} Instruction;
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1137
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1138
// 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
  1139
//  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
  1140
static Instruction instructions[] = {
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1141
    // INSTRUCTION_STATE means this opcode has to update the state machine
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1142
    //  (we're entering an ELSE block, etc). INSTRUCTION means there's no
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1143
    //  state, just go straight to the emitters.
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1144
    #define INSTRUCTION_STATE(op, args) { #op, args, state_##op, PROFILE_EMITTERS(op) }
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1145
    #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
  1146
    INSTRUCTION(NOP, 0),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1147
    INSTRUCTION(MOV, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1148
    INSTRUCTION(ADD, 3),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1149
    INSTRUCTION(SUB, 3),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1150
    INSTRUCTION(MAD, 4),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1151
    INSTRUCTION(MUL, 3),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1152
    INSTRUCTION(RCP, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1153
    INSTRUCTION(RSQ, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1154
    INSTRUCTION(DP3, 3),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1155
    INSTRUCTION(DP4, 3),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1156
    INSTRUCTION(MIN, 3),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1157
    INSTRUCTION(MAX, 3),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1158
    INSTRUCTION(SLT, 3),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1159
    INSTRUCTION(SGE, 3),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1160
    INSTRUCTION(EXP, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1161
    INSTRUCTION(LOG, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1162
    INSTRUCTION(LIT, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1163
    INSTRUCTION(DST, 3),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1164
    INSTRUCTION(LRP, 4),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1165
    INSTRUCTION(FRC, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1166
    INSTRUCTION(M4X4, 3),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1167
    INSTRUCTION(M4X3, 3),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1168
    INSTRUCTION(M3X4, 3),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1169
    INSTRUCTION(M3X3, 3),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1170
    INSTRUCTION(M3X2, 3),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1171
    INSTRUCTION(CALL, 1),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1172
    INSTRUCTION(CALLNZ, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1173
    INSTRUCTION(LOOP, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1174
    INSTRUCTION(RET, 0),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1175
    INSTRUCTION(ENDLOOP, 0),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1176
    INSTRUCTION(LABEL, 1),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1177
    INSTRUCTION(DCL, -1),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1178
    INSTRUCTION(POW, 3),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1179
    INSTRUCTION(CRS, 3),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1180
    INSTRUCTION(SGN, 4),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1181
    INSTRUCTION(ABS, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1182
    INSTRUCTION(NRM, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1183
    INSTRUCTION(SINCOS, 4),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1184
    INSTRUCTION(REP, 1),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1185
    INSTRUCTION(ENDREP, 0),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1186
    INSTRUCTION(IF, 1),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1187
    INSTRUCTION(IFC, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1188
    INSTRUCTION(ELSE, 0),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1189
    INSTRUCTION(ENDIF, 0),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1190
    INSTRUCTION(BREAK, 0),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1191
    INSTRUCTION(BREAKC, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1192
    INSTRUCTION(MOVA, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1193
    INSTRUCTION(DEFB, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1194
    INSTRUCTION(DEFI, 5),
14
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),
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1201
    INSTRUCTION_STATE(RESERVED, 0),
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1202
    INSTRUCTION_STATE(RESERVED, 0),
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1203
    INSTRUCTION_STATE(RESERVED, 0),
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1204
    INSTRUCTION_STATE(RESERVED, 0),
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1205
    INSTRUCTION_STATE(RESERVED, 0),
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1206
    INSTRUCTION_STATE(RESERVED, 0),
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1207
    INSTRUCTION_STATE(RESERVED, 0),
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1208
    INSTRUCTION_STATE(RESERVED, 0),
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1209
    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
  1210
    INSTRUCTION(TEXCOORD, -1),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1211
    INSTRUCTION(TEXKILL, 1),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1212
    INSTRUCTION(TEX, -1),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1213
    INSTRUCTION(TEXBEM, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1214
    INSTRUCTION(TEXBEML, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1215
    INSTRUCTION(TEXREG2AR, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1216
    INSTRUCTION(TEXREG2GB, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1217
    INSTRUCTION(TEXM3X2PAD, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1218
    INSTRUCTION(TEXM3X2TEX, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1219
    INSTRUCTION(TEXM3X3PAD, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1220
    INSTRUCTION(TEXM3X3TEX, 2),
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1221
    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
  1222
    INSTRUCTION(TEXM3X3SPEC, 3),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1223
    INSTRUCTION(TEXM3X3VSPEC, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1224
    INSTRUCTION(EXPP, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1225
    INSTRUCTION(LOGP, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1226
    INSTRUCTION(CND, 4),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1227
    INSTRUCTION(DEF, 5),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1228
    INSTRUCTION(TEXREG2RGB, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1229
    INSTRUCTION(TEXDP3TEX, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1230
    INSTRUCTION(TEXM3X2DEPTH, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1231
    INSTRUCTION(TEXDP3, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1232
    INSTRUCTION(TEXM3X3, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1233
    INSTRUCTION(TEXDEPTH, 1),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1234
    INSTRUCTION(CMP, 4),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1235
    INSTRUCTION(BEM, 3),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1236
    INSTRUCTION(DP2ADD, 4),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1237
    INSTRUCTION(DSX, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1238
    INSTRUCTION(DSY, 2),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1239
    INSTRUCTION(TEXLDD, 5),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1240
    INSTRUCTION(SETP, 3),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1241
    INSTRUCTION(TEXLDL, 3),
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1242
    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
  1243
    #undef INSTRUCTION
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1244
    #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
  1245
};
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1246
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1247
7
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
  1248
// parse various token types...
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
  1249
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1250
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
  1251
{
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
  1252
    const uint32 *start_tokens = ctx->tokens;
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
  1253
    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
  1254
    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
  1255
    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
  1256
    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
  1257
    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
  1258
    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
  1259
    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
  1260
    const Instruction *instruction = &instructions[opcode];
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1261
    const emit_function emitter = instruction->emitter[ctx->profileid];
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1262
    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
  1263
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1264
    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
  1265
        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
  1266
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1267
    if ((token & 0x80000000) != 0)
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
  1268
        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
  1269
16
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
  1270
    if (coissue)  // !!! FIXME: I'm not sure what this means, yet.
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
  1271
        return fail(ctx, "coissue instructions unsupported");
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
  1272
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1273
    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
  1274
    {
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1275
        if (instruction->arg_tokens != insttoks)
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
  1276
        {
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
  1277
            return failf(ctx,
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
  1278
                    "unexpected number of tokens (%u) for instruction '%s'.",
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
  1279
                    (uint) insttoks, instruction->opcode_string);
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
  1280
        } // if
11
c9bb617d9b77 [svn] Pass around a context struct, so we can start tracking state, etc.
icculus
parents: 9
diff changeset
  1281
        else if (ctx->tokencount <= instruction->arg_tokens)
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
  1282
        {
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
  1283
            return failf(ctx,
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
  1284
                    "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
  1285
                    (uint) instruction->arg_tokens, (uint) ctx->tokencount,
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
  1286
                    instruction->opcode_string);
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
  1287
        } // else if
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1288
    } // if
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1289
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1290
    if (instruction->state != NULL)  // update state machine
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1291
        retval = instruction->state(ctx);
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1292
    else
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1293
        retval = insttoks + 1;
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1294
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1295
    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
  1296
        emitter(ctx);  // call the profile's emitter.
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1297
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
  1298
    ctx->tokens = start_tokens;  // in case emitters ate anything.
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
  1299
    ctx->tokencount = start_tokencount;  // in case emitters ate anything.
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
  1300
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1301
    return retval;
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1302
} // parse_instruction_token
1
99ac16070d07 [svn] Initial add.
icculus
parents:
diff changeset
  1303
99ac16070d07 [svn] Initial add.
icculus
parents:
diff changeset
  1304
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1305
static int parse_version_token(Context *ctx)
1
99ac16070d07 [svn] Initial add.
icculus
parents:
diff changeset
  1306
{
11
c9bb617d9b77 [svn] Pass around a context struct, so we can start tracking state, etc.
icculus
parents: 9
diff changeset
  1307
    if (ctx->tokencount == 0)
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
  1308
        return fail(ctx, "Expected version token, got none at all.");
1
99ac16070d07 [svn] Initial add.
icculus
parents:
diff changeset
  1309
11
c9bb617d9b77 [svn] Pass around a context struct, so we can start tracking state, etc.
icculus
parents: 9
diff changeset
  1310
    const uint32 token = SWAP32(*(ctx->tokens));
1
99ac16070d07 [svn] Initial add.
icculus
parents:
diff changeset
  1311
    const uint32 shadertype = ((token >> 16) & 0xFFFF);
16
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
  1312
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
  1313
    ctx->major_ver = (uint32) ((token >> 8) & 0xFF);
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
  1314
    ctx->minor_ver = (uint32) (token & 0xFF);
1
99ac16070d07 [svn] Initial add.
icculus
parents:
diff changeset
  1315
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1316
    // 0xFFFF == pixel shader, 0xFFFE == vertex shader
16
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
  1317
    if (shadertype == 0xFFFF)
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
  1318
        ctx->shader_type = SHADER_TYPE_PIXEL;
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
  1319
    else if (shadertype == 0xFFFE)
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
  1320
        ctx->shader_type = SHADER_TYPE_VERTEX;
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
  1321
    else
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
  1322
        return fail(ctx, "Unsupported shader type or not a shader at all");
1
99ac16070d07 [svn] Initial add.
icculus
parents:
diff changeset
  1323
16
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
  1324
    ctx->profile->start_emitter(ctx);
1
99ac16070d07 [svn] Initial add.
icculus
parents:
diff changeset
  1325
    return 1;  // ate one token.
99ac16070d07 [svn] Initial add.
icculus
parents:
diff changeset
  1326
} // parse_version_token
99ac16070d07 [svn] Initial add.
icculus
parents:
diff changeset
  1327
99ac16070d07 [svn] Initial add.
icculus
parents:
diff changeset
  1328
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1329
static int parse_comment_token(Context *ctx)
1
99ac16070d07 [svn] Initial add.
icculus
parents:
diff changeset
  1330
{
11
c9bb617d9b77 [svn] Pass around a context struct, so we can start tracking state, etc.
icculus
parents: 9
diff changeset
  1331
    const uint32 token = SWAP32(*(ctx->tokens));
1
99ac16070d07 [svn] Initial add.
icculus
parents:
diff changeset
  1332
    if ((token & 0xFFFF) != 0xFFFE)
99ac16070d07 [svn] Initial add.
icculus
parents:
diff changeset
  1333
        return 0;  // not a comment token.
99ac16070d07 [svn] Initial add.
icculus
parents:
diff changeset
  1334
    else if ((token & 0x80000000) != 0)
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
  1335
        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
  1336
    else
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1337
    {
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1338
        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
  1339
        const uint32 len = commenttoks * sizeof (uint32);
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1340
        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
  1341
        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
  1342
                        get_scratch_buffer(ctx));
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1343
        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
  1344
        str[len] = '\0';
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1345
        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
  1346
        if (needmalloc)
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1347
            ctx->free(str);
1
99ac16070d07 [svn] Initial add.
icculus
parents:
diff changeset
  1348
15