mojoshader.c
author icculus
Thu, 27 Mar 2008 17:02:49 -0400
branchtrunk
changeset 44 5d56cf8b4571
parent 43 2f5d9a656dff
child 45 9565678766aa
permissions -rw-r--r--
[svn] Cleaned up fail check, parse_args and state machine semantics, and added check for shader type per-instruction. Probably other stuff.
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
7
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
     1
/**
35
5749d174b537 [svn] Might as well keep the tradition alive.
icculus
parents: 34
diff changeset
     2
 * MojoShader; generate shader programs from bytecode of compiled
5749d174b537 [svn] Might as well keep the tradition alive.
icculus
parents: 34
diff changeset
     3
 *  Direct3D shaders.
7
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
     4
 *
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
     5
 * Please see the file LICENSE.txt in the source's root directory.
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
     6
 *
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
     7
 *  This file written by Ryan C. Gordon.
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
     8
 */
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
     9
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    10
// !!! 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
    11
31
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
    12
// !!! FIXME: do DEF* and DCL_* opcodes have to come before instructions?
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
    13
// !!! FIXME:  my reading of the msdn spec suggests no.
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
    14
7
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
    15
// Shader bytecode format is described at MSDN:
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
    16
//  http://msdn2.microsoft.com/en-us/library/ms800307.aspx
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
    17
1
99ac16070d07 [svn] Initial add.
icculus
parents:
diff changeset
    18
#include <stdio.h>
11
c9bb617d9b77 [svn] Pass around a context struct, so we can start tracking state, etc.
icculus
parents: 9
diff changeset
    19
#include <string.h>
1
99ac16070d07 [svn] Initial add.
icculus
parents:
diff changeset
    20
#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
    21
#include <stdint.h>
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
    22
#include <stdarg.h>
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
    23
#include <assert.h>
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
    24
35
5749d174b537 [svn] Might as well keep the tradition alive.
icculus
parents: 34
diff changeset
    25
#include "mojoshader.h"
9
aea1b254e6a5 [svn] Patched to compile.
icculus
parents: 8
diff changeset
    26
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
    27
// This is the highest shader version we currently support.
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
    28
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
    29
#define MAX_SHADER_MAJOR 3
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
    30
#define MAX_SHADER_MINOR 0
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
    31
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    32
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    33
// 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
    34
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
    35
#ifndef SUPPORT_PROFILE_D3D
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
    36
#define SUPPORT_PROFILE_D3D 1
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
    37
#endif
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
    38
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
    39
#ifndef SUPPORT_PROFILE_GLSL
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
    40
#define SUPPORT_PROFILE_GLSL 1
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
    41
#endif
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
    42
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    43
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    44
// 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
    45
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    46
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
    47
typedef uint8_t uint8;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    48
typedef uint32_t uint32;
31
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
    49
typedef int32_t int32;
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    50
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
    51
#ifdef __GNUC__
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
    52
#define ISPRINTF(x,y) __attribute__((format (printf, x, y)))
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
    53
#else
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
    54
#define ISPRINTF(x,y)
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
    55
#endif
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
    56
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
    57
#define STATICARRAYLEN(x) ( (sizeof ((x))) / (sizeof ((x)[0])) )
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
    58
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
    59
7
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
    60
// Byteswap magic...
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
    61
4
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    62
#if ((defined __GNUC__) && (defined __POWERPC__))
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    63
    static inline uint32 SWAP32(uint32 x)
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    64
    {
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    65
        __asm__ __volatile__("lwbrx %0,0,%1" : "=r" (x) : "r" (&x));
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    66
        return x;
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    67
    } // SWAP32
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    68
#elif defined(__POWERPC__)
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    69
    static inline uint32 SWAP32(uint32 x)
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    70
    {
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    71
        return ( (((x) >> 24) & 0x000000FF) | (((x) >>  8) & 0x0000FF00) |
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    72
                 (((x) <<  8) & 0x00FF0000) | (((x) << 24) & 0xFF000000) );
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    73
    } // SWAP32
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    74
#else
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    75
#   define SWAP32(x) (x)
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    76
#endif
e0b2c5b7210c [svn] Implemented byteswapping.
icculus
parents: 2
diff changeset
    77
7
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
    78
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    79
// predeclare.
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    80
typedef struct Context Context;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    81
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    82
// 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
    83
typedef void (*emit_function)(Context *ctx);
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    84
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    85
// 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
    86
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
    87
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    88
// 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
    89
typedef void (*emit_start)(Context *ctx);
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    90
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    91
// 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
    92
typedef void (*emit_end)(Context *ctx);
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    93
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
    94
// one args function for each possible sequence of opcode arguments.
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
    95
typedef int (*args_function)(Context *ctx);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
    96
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    97
// one state function for each opcode where we have state machine updates.
44
5d56cf8b4571 [svn] Cleaned up fail check, parse_args and state machine semantics, and added check
icculus
parents: 43
diff changeset
    98
typedef void (*state_function)(Context *ctx);
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
    99
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   100
typedef struct
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   101
{
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   102
    const char *name;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   103
    emit_start start_emitter;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   104
    emit_end end_emitter;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   105
    emit_comment comment_emitter;
34
ca4b727ad2ce [svn] Chopped out a bunch of D3D2GLSL_ crap.
icculus
parents: 33
diff changeset
   106
} Profile;
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   107
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   108
44
5d56cf8b4571 [svn] Cleaned up fail check, parse_args and state machine semantics, and added check
icculus
parents: 43
diff changeset
   109
// These are enum values, but they also can be used in bitmasks, so we can
5d56cf8b4571 [svn] Cleaned up fail check, parse_args and state machine semantics, and added check
icculus
parents: 43
diff changeset
   110
//  test if an opcode is acceptable: if (op->shader_types & ourtype) {} ...
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   111
typedef enum
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   112
{
44
5d56cf8b4571 [svn] Cleaned up fail check, parse_args and state machine semantics, and added check
icculus
parents: 43
diff changeset
   113
    SHADER_TYPE_UNKNOWN  = 0,
5d56cf8b4571 [svn] Cleaned up fail check, parse_args and state machine semantics, and added check
icculus
parents: 43
diff changeset
   114
    SHADER_TYPE_PIXEL    = (1 << 0),
5d56cf8b4571 [svn] Cleaned up fail check, parse_args and state machine semantics, and added check
icculus
parents: 43
diff changeset
   115
    SHADER_TYPE_VERTEX   = (1 << 1),
5d56cf8b4571 [svn] Cleaned up fail check, parse_args and state machine semantics, and added check
icculus
parents: 43
diff changeset
   116
    SHADER_TYPE_GEOMETRY = (1 << 2),
5d56cf8b4571 [svn] Cleaned up fail check, parse_args and state machine semantics, and added check
icculus
parents: 43
diff changeset
   117
    SHADER_TYPE_ANY = 0xFFFFFFFF
34
ca4b727ad2ce [svn] Chopped out a bunch of D3D2GLSL_ crap.
icculus
parents: 33
diff changeset
   118
} ShaderType;
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   119
21
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   120
typedef enum
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   121
{
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   122
    REGISTER_TYPE_TEMP = 0,
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   123
    REGISTER_TYPE_INPUT = 1,
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   124
    REGISTER_TYPE_CONST = 2,
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   125
    REGISTER_TYPE_ADDR = 3,
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   126
    REGISTER_TYPE_TEXTURE = 3,  // ALSO 3!
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   127
    REGISTER_TYPE_RASTOUT = 4,
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   128
    REGISTER_TYPE_ATTROUT = 5,
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   129
    REGISTER_TYPE_TEXCRDOUT = 6,
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   130
    REGISTER_TYPE_OUTPUT =  6, // ALSO 6!
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   131
    REGISTER_TYPE_CONSTINT =  7,
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   132
    REGISTER_TYPE_COLOROUT =  8,
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   133
    REGISTER_TYPE_DEPTHOUT =  9,
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   134
    REGISTER_TYPE_SAMPLER = 10,
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   135
    REGISTER_TYPE_CONST2 = 11,
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   136
    REGISTER_TYPE_CONST3 = 12,
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   137
    REGISTER_TYPE_CONST4 = 13,
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   138
    REGISTER_TYPE_CONSTBOOL = 14,
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   139
    REGISTER_TYPE_LOOP = 15,
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   140
    REGISTER_TYPE_TEMPFLOAT16 = 16,
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   141
    REGISTER_TYPE_MISCTYPE = 17,
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   142
    REGISTER_TYPE_LABEL = 18,
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   143
    REGISTER_TYPE_PREDICATE = 19,
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   144
    REGISTER_TYPE_MAX = 19
34
ca4b727ad2ce [svn] Chopped out a bunch of D3D2GLSL_ crap.
icculus
parents: 33
diff changeset
   145
} RegisterType;
21
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   146
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   147
typedef enum
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   148
{
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   149
    RASTOUT_TYPE_POSITION = 0,
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   150
    RASTOUT_TYPE_FOG = 1,
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   151
    RASTOUT_TYPE_POINT_SIZE = 2,
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   152
    RASTOUT_TYPE_MAX = 2
34
ca4b727ad2ce [svn] Chopped out a bunch of D3D2GLSL_ crap.
icculus
parents: 33
diff changeset
   153
} RastOutType;
21
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   154
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   155
typedef enum
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   156
{
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   157
    MISCTYPE_TYPE_POSITION = 0,
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   158
    MISCTYPE_TYPE_FACE = 1,
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   159
    MISCTYPE_TYPE_MAX = 1
34
ca4b727ad2ce [svn] Chopped out a bunch of D3D2GLSL_ crap.
icculus
parents: 33
diff changeset
   160
} MiscTypeType;
21
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   161
31
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   162
typedef enum
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   163
{
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   164
    DECLUSAGE_POSITION = 0,
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   165
    DECLUSAGE_BLENDWEIGHT = 1,
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   166
    DECLUSAGE_BLENDINDICES = 2,
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   167
    DECLUSAGE_NORMAL = 3,
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   168
    DECLUSAGE_PSIZE = 4,
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   169
    DECLUSAGE_TEXCOORD = 5,
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   170
    DECLUSAGE_TANGENT = 6,
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   171
    DECLUSAGE_BINORMAL = 7,
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   172
    DECLUSAGE_TESSFACTOR = 8,
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   173
    DECLUSAGE_POSITIONT = 9,
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   174
    DECLUSAGE_COLOR = 10,
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   175
    DECLUSAGE_FOG = 11,
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   176
    DECLUSAGE_DEPTH = 12,
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   177
    DECLUSAGE_SAMPLE = 13
34
ca4b727ad2ce [svn] Chopped out a bunch of D3D2GLSL_ crap.
icculus
parents: 33
diff changeset
   178
} DeclUsageType;
31
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   179
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   180
typedef enum
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   181
{
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   182
    TEXTURE_TYPE_2D = 2,
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   183
    TEXTURE_TYPE_CUBE = 3,
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   184
    TEXTURE_TYPE_VOLUME = 4,
34
ca4b727ad2ce [svn] Chopped out a bunch of D3D2GLSL_ crap.
icculus
parents: 33
diff changeset
   185
} TextureType;
31
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   186
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   187
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   188
// 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
   189
//  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
   190
//  of the output without much trouble.
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   191
typedef struct OutputList
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   192
{
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   193
    char *str;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   194
    struct OutputList *next;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   195
} OutputList;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   196
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   197
21
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   198
// result modifiers.
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   199
#define MOD_SATURATE 0x01
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   200
#define MOD_PP 0x02
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   201
#define MOD_CENTROID 0x04
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   202
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   203
// source modifiers.
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   204
typedef enum
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   205
{
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   206
    SRCMOD_NONE,
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   207
    SRCMOD_NEGATE,
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   208
    SRCMOD_BIAS,
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   209
    SRCMOD_BIASNEGATE,
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   210
    SRCMOD_SIGN,
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   211
    SRCMOD_SIGNNEGATE,
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   212
    SRCMOD_COMPLEMENT,
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   213
    SRCMOD_X2,
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   214
    SRCMOD_X2NEGATE,
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   215
    SRCMOD_DZ,
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   216
    SRCMOD_DW,
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   217
    SRCMOD_ABS,
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   218
    SRCMOD_ABSNEGATE,
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   219
    SRCMOD_NOT,
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   220
    SRCMOD_TOTAL
34
ca4b727ad2ce [svn] Chopped out a bunch of D3D2GLSL_ crap.
icculus
parents: 33
diff changeset
   221
} SourceMod;
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   222
21
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   223
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   224
typedef struct
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   225
{
21
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   226
    const uint32 *token;   // this is the unmolested token in the stream.
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   227
    int regnum;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   228
    int relative;
21
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   229
    int writemask;   // xyzw or rgba (all four, not split out).
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   230
    int writemask0;  // x or red
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   231
    int writemask1;  // y or green
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   232
    int writemask2;  // z or blue
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   233
    int writemask3;  // w or alpha
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   234
    int result_mod;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   235
    int result_shift;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   236
    int regtype;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   237
} DestArgInfo;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   238
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   239
typedef struct
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   240
{
21
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   241
    const uint32 *token;   // this is the unmolested token in the stream.
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   242
    int regnum;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   243
    int relative;
22
91ab1ed38d63 [svn] Fixed parse_args().
icculus
parents: 21
diff changeset
   244
    int swizzle;  // xyzw (all four, not split out).
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   245
    int swizzle_x;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   246
    int swizzle_y;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   247
    int swizzle_z;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   248
    int swizzle_w;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   249
    int src_mod;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   250
    int regtype;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   251
} SourceArgInfo;
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   252
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   253
34
ca4b727ad2ce [svn] Chopped out a bunch of D3D2GLSL_ crap.
icculus
parents: 33
diff changeset
   254
#define SCRATCH_BUFFER_SIZE 256
ca4b727ad2ce [svn] Chopped out a bunch of D3D2GLSL_ crap.
icculus
parents: 33
diff changeset
   255
#define SCRATCH_BUFFERS 10
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   256
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   257
// 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
   258
struct Context
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   259
{
35
5749d174b537 [svn] Might as well keep the tradition alive.
icculus
parents: 34
diff changeset
   260
    MOJOSHADER_malloc malloc;
5749d174b537 [svn] Might as well keep the tradition alive.
icculus
parents: 34
diff changeset
   261
    MOJOSHADER_free free;
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   262
    const uint32 *tokens;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   263
    uint32 tokencount;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   264
    OutputList output;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   265
    OutputList *output_tail;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   266
    int output_len; // total strlen; prevents walking the list just to malloc.
40
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
   267
    int indent;
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   268
    const char *endline;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   269
    int endline_len;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   270
    const char *failstr;
34
ca4b727ad2ce [svn] Chopped out a bunch of D3D2GLSL_ crap.
icculus
parents: 33
diff changeset
   271
    char scratch[SCRATCH_BUFFERS][SCRATCH_BUFFER_SIZE];
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   272
    int scratchidx;  // current scratch buffer.
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   273
    int profileid;
34
ca4b727ad2ce [svn] Chopped out a bunch of D3D2GLSL_ crap.
icculus
parents: 33
diff changeset
   274
    const Profile *profile;
ca4b727ad2ce [svn] Chopped out a bunch of D3D2GLSL_ crap.
icculus
parents: 33
diff changeset
   275
    ShaderType shader_type;
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   276
    uint32 major_ver;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   277
    uint32 minor_ver;
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   278
    DestArgInfo dest_args[1];
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   279
    SourceArgInfo source_args[4];
31
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   280
    uint32 dwords[4];
25
9664b0f62af6 [svn] Simplified and corrected source arg swizzle.
icculus
parents: 24
diff changeset
   281
    uint32 instruction_count;
28
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
   282
    uint32 instruction_controls;
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   283
};
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   284
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   285
43
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   286
// Shader model version magic.
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   287
static inline uint32 ver_ui32(const uint8 major, const uint8 minor)
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   288
{
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   289
    return ( (((uint32) major) << 16) | (((minor) == 0xFF) ? 0 : (minor)) );
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   290
} // version_ui32
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   291
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   292
static int shader_version_supported(uint8 maj, uint8 min)
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   293
{
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   294
    return (ver_ui32(maj,min) <= ver_ui32(MAX_SHADER_MAJOR, MAX_SHADER_MINOR));
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   295
} // shader_version_supported
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   296
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   297
static int shader_version_atleast(const Context *ctx, uint8 maj, uint8 min)
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   298
{
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   299
    return (ver_ui32(ctx->major_ver, ctx->minor_ver) >= ver_ui32(maj, min));
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   300
} // shader_version_atleast
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   301
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   302
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   303
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   304
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
   305
{
34
ca4b727ad2ce [svn] Chopped out a bunch of D3D2GLSL_ crap.
icculus
parents: 33
diff changeset
   306
    ctx->scratchidx = (ctx->scratchidx + 1) % SCRATCH_BUFFERS;
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   307
    return ctx->scratch[ctx->scratchidx];
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   308
} // get_scratch_buffer
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   309
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   310
7
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
   311
// Special-case return values from the parsing pipeline...
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   312
#define FAIL (-1)
43
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   313
#define NOFAIL (-2)
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   314
#define END_OF_STREAM (-3)
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   315
44
5d56cf8b4571 [svn] Cleaned up fail check, parse_args and state machine semantics, and added check
icculus
parents: 43
diff changeset
   316
static inline isfail(const Context *ctx)
5d56cf8b4571 [svn] Cleaned up fail check, parse_args and state machine semantics, and added check
icculus
parents: 43
diff changeset
   317
{
5d56cf8b4571 [svn] Cleaned up fail check, parse_args and state machine semantics, and added check
icculus
parents: 43
diff changeset
   318
    return (ctx->failstr != NULL);
5d56cf8b4571 [svn] Cleaned up fail check, parse_args and state machine semantics, and added check
icculus
parents: 43
diff changeset
   319
} // isfail
5d56cf8b4571 [svn] Cleaned up fail check, parse_args and state machine semantics, and added check
icculus
parents: 43
diff changeset
   320
5d56cf8b4571 [svn] Cleaned up fail check, parse_args and state machine semantics, and added check
icculus
parents: 43
diff changeset
   321
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   322
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
   323
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
   324
{
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   325
    if (ctx->failstr == NULL)
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   326
        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
   327
    return FAIL;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   328
} // out_of_memory
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   329
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   330
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   331
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
   332
static int failf(Context *ctx, const char *fmt, ...)
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   333
{
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   334
    if (ctx->failstr == NULL)  // don't change existing error.
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   335
    {
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   336
        char *scratch = get_scratch_buffer(ctx);
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   337
        va_list ap;
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   338
        va_start(ap, fmt);
34
ca4b727ad2ce [svn] Chopped out a bunch of D3D2GLSL_ crap.
icculus
parents: 33
diff changeset
   339
        const int len = vsnprintf(scratch,SCRATCH_BUFFER_SIZE,fmt,ap);
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   340
        va_end(ap);
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   341
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   342
        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
   343
        if (failstr == NULL)
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   344
            out_of_memory(ctx);
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   345
        else
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   346
        {
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   347
            // see comments about scratch buffer overflow in output_line().
34
ca4b727ad2ce [svn] Chopped out a bunch of D3D2GLSL_ crap.
icculus
parents: 33
diff changeset
   348
            if (len < SCRATCH_BUFFER_SIZE)
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   349
                strcpy(failstr, scratch);  // copy it over.
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   350
            else
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   351
            {
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   352
                va_start(ap, fmt);
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   353
                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
   354
                va_end(ap);
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   355
            } // else
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   356
            ctx->failstr = failstr;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   357
        } // else
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   358
    } // if
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   359
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   360
    return FAIL;
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   361
} // failf
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   362
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   363
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   364
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
   365
{
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   366
    return failf(ctx, "%s", reason);
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   367
} // fail
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   368
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   369
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   370
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
   371
static int output_line(Context *ctx, const char *fmt, ...)
7
18bf77bb8c07 [svn] Cleanups, split things out.
icculus
parents: 6
diff changeset
   372
{
44
5d56cf8b4571 [svn] Cleaned up fail check, parse_args and state machine semantics, and added check
icculus
parents: 43
diff changeset
   373
    if (isfail(ctx))
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   374
        return FAIL;  // we failed previously, don't go on...
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   375
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   376
    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
   377
    if (item == NULL)
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   378
        return out_of_memory(ctx);
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   379
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   380
    char *scratch = get_scratch_buffer(ctx);
40
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
   381
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
   382
    const int indent = ctx->indent;
41
b857eacdbc68 [svn] More GLSL work.
icculus
parents: 40
diff changeset
   383
    if (indent > 0)
b857eacdbc68 [svn] More GLSL work.
icculus
parents: 40
diff changeset
   384
        memset(scratch, '\t', indent);
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   385
    va_list ap;
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   386
    va_start(ap, fmt);
40
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
   387
    const int len = vsnprintf(scratch+indent, SCRATCH_BUFFER_SIZE-indent, fmt, ap) + indent;
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   388
    va_end(ap);
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   389
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   390
    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
   391
    if (item->str == NULL)
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   392
    {
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   393
        free(item);
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   394
        return out_of_memory(ctx);
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   395
    } // if
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   396
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   397
    // 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
   398
    //  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
   399
    //  run of vsnprintf().
34
ca4b727ad2ce [svn] Chopped out a bunch of D3D2GLSL_ crap.
icculus
parents: 33
diff changeset
   400
    if (len < SCRATCH_BUFFER_SIZE)
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   401
        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
   402
    else
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   403
    {
41
b857eacdbc68 [svn] More GLSL work.
icculus
parents: 40
diff changeset
   404
        if (indent > 0)
b857eacdbc68 [svn] More GLSL work.
icculus
parents: 40
diff changeset
   405
            memset(item->str, '\t', indent);
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   406
        va_start(ap, fmt);
40
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
   407
        vsnprintf(item->str+indent, len + 1, fmt, ap);  // rebuild it.
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   408
        va_end(ap);
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   409
    } // else
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   410
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   411
    item->next = NULL;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   412
    ctx->output_tail->next = item;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   413
    ctx->output_tail = item;
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   414
    ctx->output_len += len + ctx->endline_len;
12
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   415
    return 0;
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   416
} // output_line
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   417
d81712dd1a46 [svn] Cleaned up and improved output and fail state.
icculus
parents: 11
diff changeset
   418
43
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   419
// !!! FIXME: this is sort of nasty.
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   420
static void floatstr(Context *ctx, char *buf, size_t bufsize, float f)
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   421
{
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   422
    const size_t len = snprintf(buf, bufsize, "%f", f);
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   423
    if (len >= bufsize)
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   424
        fail(ctx, "BUG: internal buffer is too small");
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   425
    else
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   426
    {
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   427
        char *end = buf + len;
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   428
        char *ptr = strchr(buf, '.');
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   429
        if (ptr == NULL)
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   430
            return;  // done.
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   431
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   432
        while (--end != ptr)
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   433
        {
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   434
            if (*end != '0')
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   435
            {
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   436
                end++;
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   437
                break;
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   438
            } // if
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   439
        } // while
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   440
        *end = '\0';  // chop extra '0' or all decimal places off.
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   441
    } // else
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
   442
} // floatstr
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
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
// 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
   446
#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
   447
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   448
#if !SUPPORT_PROFILE_D3D
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   449
#define PROFILE_EMITTER_D3D(op)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   450
#else
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   451
#undef AT_LEAST_ONE_PROFILE
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   452
#define AT_LEAST_ONE_PROFILE 1
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   453
#define PROFILE_EMITTER_D3D(op) emit_D3D_##op,
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   454
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   455
static const char *get_D3D_register_string(Context *ctx,
34
ca4b727ad2ce [svn] Chopped out a bunch of D3D2GLSL_ crap.
icculus
parents: 33
diff changeset
   456
                                           RegisterType regtype,
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   457
                                           int regnum, char *regnum_str,
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   458
                                           size_t regnum_size)
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   459
{
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   460
    const char *retval = NULL;
31
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   461
    int has_number = 1;
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   462
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   463
    switch (regtype)
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   464
    {
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   465
        case REGISTER_TYPE_TEMP:
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   466
            retval = "r";
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   467
            break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   468
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   469
        case REGISTER_TYPE_INPUT:
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   470
            retval = "v";
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   471
            break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   472
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   473
        case REGISTER_TYPE_CONST:
31
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   474
            retval = "c";
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   475
            break;
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   476
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   477
        case REGISTER_TYPE_CONST2:
31
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   478
            retval = "c";
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   479
            regnum += 2048;
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   480
            break;
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   481
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   482
        case REGISTER_TYPE_CONST3:
31
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   483
            retval = "c";
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   484
            regnum += 4096;
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   485
            break;
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   486
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   487
        case REGISTER_TYPE_CONST4:
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   488
            retval = "c";
31
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   489
            regnum += 6144;
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   490
            break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   491
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   492
        case REGISTER_TYPE_ADDR:  // (or REGISTER_TYPE_TEXTURE, same value.)
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   493
            retval = (ctx->shader_type == SHADER_TYPE_VERTEX) ? "a" : "t";
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   494
            break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   495
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   496
        case REGISTER_TYPE_RASTOUT:
34
ca4b727ad2ce [svn] Chopped out a bunch of D3D2GLSL_ crap.
icculus
parents: 33
diff changeset
   497
            switch ((RastOutType) regnum)
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   498
            {
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   499
                case RASTOUT_TYPE_POSITION: retval = "oPos"; break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   500
                case RASTOUT_TYPE_FOG: retval = "oFog"; break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   501
                case RASTOUT_TYPE_POINT_SIZE: retval = "oPts"; break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   502
            } // switch
31
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   503
            has_number = 0;
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   504
            break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   505
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   506
        case REGISTER_TYPE_ATTROUT:
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   507
            retval = "oD";
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   508
            break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   509
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   510
        case REGISTER_TYPE_TEXCRDOUT: // (or REGISTER_TYPE_OUTPUT, same value.)
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   511
            if ((ctx->shader_type==SHADER_TYPE_VERTEX) && (ctx->major_ver>=3))
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   512
                retval = "o";
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   513
            else
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   514
                retval = "oT";
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   515
            break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   516
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   517
        case REGISTER_TYPE_CONSTINT:
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   518
            retval = "i";
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   519
            break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   520
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   521
        case REGISTER_TYPE_COLOROUT:
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   522
            retval = "oC";
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   523
            break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   524
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   525
        case REGISTER_TYPE_DEPTHOUT:
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   526
            retval = "oDepth";
31
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   527
            has_number = 0;
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   528
            break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   529
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   530
        case REGISTER_TYPE_SAMPLER:
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   531
            retval = "s";
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   532
            break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   533
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   534
        case REGISTER_TYPE_CONSTBOOL:
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   535
            retval = "b";
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   536
            break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   537
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   538
        case REGISTER_TYPE_LOOP:
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   539
            retval = "aL";
31
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   540
            has_number = 0;
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   541
            break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   542
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   543
        // !!! FIXME: don't know what the asm string is for this..
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   544
        // case REGISTER_TYPE_TEMPFLOAT16:
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   545
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   546
        case REGISTER_TYPE_MISCTYPE:
34
ca4b727ad2ce [svn] Chopped out a bunch of D3D2GLSL_ crap.
icculus
parents: 33
diff changeset
   547
            switch ((MiscTypeType) regnum)
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   548
            {
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   549
                case MISCTYPE_TYPE_POSITION: retval = "vPos"; break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   550
                case MISCTYPE_TYPE_FACE: retval = "vFace"; break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   551
            } // switch
31
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   552
            has_number = 0;
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   553
            break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   554
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   555
        case REGISTER_TYPE_LABEL:
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   556
            retval = "l";
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   557
            break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   558
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   559
        case REGISTER_TYPE_PREDICATE:
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   560
            retval = "p";
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   561
            break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   562
    } // switch
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   563
31
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   564
    if (has_number)
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   565
        snprintf(regnum_str, regnum_size, "%u", (uint) regnum);
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   566
    else
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   567
        regnum_str[0] = '\0';
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
   568
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   569
    return retval;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   570
} // get_D3D_register_string
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   571
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   572
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   573
static char *make_D3D_destarg_string(Context *ctx, const int idx)
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   574
{
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   575
    if (idx >= STATICARRAYLEN(ctx->dest_args))
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   576
    {
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   577
        fail(ctx, "Too many destination args");
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   578
        return "";
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   579
    } // if
16
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   580
21
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   581
    const DestArgInfo *arg = &ctx->dest_args[idx];
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   582
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   583
    const char *result_shift_str = "";
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   584
    switch (arg->result_shift)
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   585
    {
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   586
        case 0x1: result_shift_str = "_x2"; break;
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   587
        case 0x2: result_shift_str = "_x4"; break;
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   588
        case 0x3: result_shift_str = "_x8"; break;
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   589
        case 0xD: result_shift_str = "_d8"; break;
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   590
        case 0xE: result_shift_str = "_d4"; break;
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   591
        case 0xF: result_shift_str = "_d2"; break;
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   592
    } // switch
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   593
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   594
    const char *sat_str = (arg->result_mod & MOD_SATURATE) ? "_sat" : "";
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   595
    const char *pp_str = (arg->result_mod & MOD_PP) ? "_pp" : "";
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   596
    const char *cent_str = (arg->result_mod & MOD_CENTROID) ? "_centroid" : "";
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   597
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   598
    char regnum_str[16];
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   599
    const char *regtype_str = get_D3D_register_string(ctx,
34
ca4b727ad2ce [svn] Chopped out a bunch of D3D2GLSL_ crap.
icculus
parents: 33
diff changeset
   600
                                        (RegisterType) arg->regtype,
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   601
                                        arg->regnum, regnum_str,
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   602
                                        sizeof (regnum_str));
21
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   603
    if (regtype_str == NULL)
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   604
    {
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   605
        fail(ctx, "Unknown destination register type.");
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   606
        return "";
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   607
    } // if
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   608
27
3524701d26fb [svn] Writemask fix.
icculus
parents: 26
diff changeset
   609
    char writemask_str[6];
3524701d26fb [svn] Writemask fix.
icculus
parents: 26
diff changeset
   610
    int i = 0;
3524701d26fb [svn] Writemask fix.
icculus
parents: 26
diff changeset
   611
    if (arg->writemask != 0xF)  // 0xF == 1111. No explicit mask.
3524701d26fb [svn] Writemask fix.
icculus
parents: 26
diff changeset
   612
    {
3524701d26fb [svn] Writemask fix.
icculus
parents: 26
diff changeset
   613
        writemask_str[i++] = '.';
3524701d26fb [svn] Writemask fix.
icculus
parents: 26
diff changeset
   614
        if (arg->writemask0) writemask_str[i++] = 'x';
3524701d26fb [svn] Writemask fix.
icculus
parents: 26
diff changeset
   615
        if (arg->writemask1) writemask_str[i++] = 'y';
3524701d26fb [svn] Writemask fix.
icculus
parents: 26
diff changeset
   616
        if (arg->writemask2) writemask_str[i++] = 'z';
3524701d26fb [svn] Writemask fix.
icculus
parents: 26
diff changeset
   617
        if (arg->writemask3) writemask_str[i++] = 'w';
3524701d26fb [svn] Writemask fix.
icculus
parents: 26
diff changeset
   618
    } // if
3524701d26fb [svn] Writemask fix.
icculus
parents: 26
diff changeset
   619
    writemask_str[i] = '\0';
3524701d26fb [svn] Writemask fix.
icculus
parents: 26
diff changeset
   620
    assert(i < sizeof (writemask_str));
21
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   621
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   622
    // may turn out something like "_x2_sat_pp_centroid r0.xyzw" ...
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   623
    char *retval = get_scratch_buffer(ctx);
34
ca4b727ad2ce [svn] Chopped out a bunch of D3D2GLSL_ crap.
icculus
parents: 33
diff changeset
   624
    snprintf(retval, SCRATCH_BUFFER_SIZE, "%s%s%s%s %s%s%s",
21
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   625
             result_shift_str, sat_str, pp_str, cent_str,
27
3524701d26fb [svn] Writemask fix.
icculus
parents: 26
diff changeset
   626
             regtype_str, regnum_str, writemask_str);
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   627
    return retval;
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   628
} // make_D3D_destarg_string
16
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   629
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   630
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   631
static char *make_D3D_sourcearg_string(Context *ctx, const int idx)
16
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   632
{
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   633
    if (idx >= STATICARRAYLEN(ctx->source_args))
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   634
    {
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   635
        fail(ctx, "Too many source args");
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   636
        return "";
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   637
    } // if
16
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   638
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   639
    const SourceArgInfo *arg = &ctx->source_args[idx];
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   640
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   641
    const char *premod_str = "";
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   642
    const char *postmod_str = "";
34
ca4b727ad2ce [svn] Chopped out a bunch of D3D2GLSL_ crap.
icculus
parents: 33
diff changeset
   643
    switch ((SourceMod) arg->src_mod)
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   644
    {
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   645
        case SRCMOD_NEGATE:
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   646
            premod_str = "-";
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   647
            break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   648
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   649
        case SRCMOD_BIASNEGATE:
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   650
            premod_str = "-";
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   651
            // fall through.
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   652
        case SRCMOD_BIAS:
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   653
            postmod_str = "_bias";
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   654
            break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   655
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   656
        case SRCMOD_SIGNNEGATE:
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   657
            premod_str = "-";
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   658
            // fall through.
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   659
        case SRCMOD_SIGN:
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   660
            postmod_str = "_bx2";
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   661
            break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   662
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   663
        case SRCMOD_COMPLEMENT:
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   664
            premod_str = "1-";
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   665
            break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   666
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   667
        case SRCMOD_X2NEGATE:
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   668
            premod_str = "-";
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   669
            // fall through.
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   670
        case SRCMOD_X2:
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   671
            postmod_str = "_x2";
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   672
            break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   673
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   674
        case SRCMOD_DZ:
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   675
            postmod_str = "_dz";
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   676
            break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   677
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   678
        case SRCMOD_DW:
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   679
            postmod_str = "_dw";
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   680
            break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   681
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   682
        case SRCMOD_ABSNEGATE:
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   683
            premod_str = "-";
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   684
            // fall through.
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   685
        case SRCMOD_ABS:
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   686
            postmod_str = "_abs";
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   687
            break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   688
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   689
        case SRCMOD_NOT:
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   690
            premod_str = "!";
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   691
            break;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   692
    } // switch
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   693
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   694
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   695
    char regnum_str[16];
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   696
    const char *regtype_str = get_D3D_register_string(ctx,
34
ca4b727ad2ce [svn] Chopped out a bunch of D3D2GLSL_ crap.
icculus
parents: 33
diff changeset
   697
                                        (RegisterType) arg->regtype,
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   698
                                        arg->regnum, regnum_str,
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   699
                                        sizeof (regnum_str));
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   700
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   701
    if (regtype_str == NULL)
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   702
    {
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   703
        fail(ctx, "Unknown source register type.");
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   704
        return "";
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   705
    } // if
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   706
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   707
    char swizzle_str[6];
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   708
    int i = 0;
26
ed1dc1eca8b2 [svn] Source swizzle fix.
icculus
parents: 25
diff changeset
   709
    if (arg->swizzle != 0xE4)  // 0xE4 == 11100100 ... 3 2 1 0. No swizzle.
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   710
    {
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   711
        static const char channel[] = { 'x', 'y', 'z', 'w' };
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   712
        swizzle_str[i++] = '.';
25
9664b0f62af6 [svn] Simplified and corrected source arg swizzle.
icculus
parents: 24
diff changeset
   713
        swizzle_str[i++] = channel[arg->swizzle_x];
9664b0f62af6 [svn] Simplified and corrected source arg swizzle.
icculus
parents: 24
diff changeset
   714
        swizzle_str[i++] = channel[arg->swizzle_y];
9664b0f62af6 [svn] Simplified and corrected source arg swizzle.
icculus
parents: 24
diff changeset
   715
        swizzle_str[i++] = channel[arg->swizzle_z];
9664b0f62af6 [svn] Simplified and corrected source arg swizzle.
icculus
parents: 24
diff changeset
   716
        swizzle_str[i++] = channel[arg->swizzle_w];
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   717
25
9664b0f62af6 [svn] Simplified and corrected source arg swizzle.
icculus
parents: 24
diff changeset
   718
        // .xyzz is the same as .xyz, .z is the same as .zzzz, etc.
9664b0f62af6 [svn] Simplified and corrected source arg swizzle.
icculus
parents: 24
diff changeset
   719
        while (swizzle_str[i-1] == swizzle_str[i-2])
9664b0f62af6 [svn] Simplified and corrected source arg swizzle.
icculus
parents: 24
diff changeset
   720
            i--;
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   721
    } // if
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   722
    swizzle_str[i] = '\0';
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   723
    assert(i < sizeof (swizzle_str));
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   724
21
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   725
    char *retval = get_scratch_buffer(ctx);
38
506f3ba0957a [svn] Fixed missing regnum output in D3D profile.
icculus
parents: 36
diff changeset
   726
    snprintf(retval, SCRATCH_BUFFER_SIZE, "%s%s%s%s%s",
506f3ba0957a [svn] Fixed missing regnum output in D3D profile.
icculus
parents: 36
diff changeset
   727
             premod_str, regtype_str, regnum_str, postmod_str, swizzle_str);
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   728
    return retval;
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   729
} // make_D3D_sourcearg_string
16
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   730
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
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_D3D_start(Context *ctx)
16
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   733
{
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   734
    const uint major = (uint) ctx->major_ver;
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   735
    const uint minor = (uint) ctx->minor_ver;
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   736
    const char *shadertype_str = NULL;
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   737
    char minor_str[16];
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   738
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   739
    if (minor == 0xFF)
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   740
        strcpy(minor_str, "sw");
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   741
    else if (minor == 0x1)  // apparently this is "vs_2_x". Weird.
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   742
        strcpy(minor_str, "x");
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   743
    else
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   744
        snprintf(minor_str, sizeof (minor_str), "%u", (uint) minor);
19
8bca9cb2252f [svn] Fixed output for software vertex shader versions.
icculus
parents: 18
diff changeset
   745
16
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   746
    if (ctx->shader_type == SHADER_TYPE_PIXEL)
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   747
        shadertype_str = "ps";
16
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   748
    else if (ctx->shader_type == SHADER_TYPE_VERTEX)
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   749
        shadertype_str = "vs";
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   750
    else
16
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   751
    {
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   752
        failf(ctx, "Shader type %u unsupported in this profile.",
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   753
              (uint) ctx->shader_type);
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   754
        return;
16
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
   755
    } // else
24
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   756
2177c6bee93d [svn] First shot at source args in D3D profile.
icculus
parents: 22
diff changeset
   757
    output_line(ctx, "%s_%u_%s", shadertype_str, major, minor_str);
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   758
} // emit_D3D_start
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   759
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   760
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   761
static void emit_D3D_end(Context *ctx)
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   762
{
30
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
   763
    output_line(ctx, "end");
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
   764
} // emit_D3D_end
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   765
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
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_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
   768
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   769
    output_line(ctx, "; %s", str);
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   770
} // 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
   771
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   772
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   773
static void emit_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
   774
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   775
    // do nothing; fails in the state machine.
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   776
} // emit_D3D_RESERVED
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
   777
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   778
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   779
// 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
   780
//  that call into these...
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   781
30
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
   782
static char *lowercase(char *dst, const char *src)
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
   783
{
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
   784
    int i = 0;
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
   785
    do
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
   786
    {
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
   787
        const char ch = src[i];
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
   788
        dst[i] = (((ch >= 'A') && (ch <= 'Z')) ? (ch - ('A' - 'a')) : ch);
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
   789
    } while (src[i++]);
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
   790
    return dst;
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
   791
} // lowercase
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
   792
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
   793
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   794
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
   795
{
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   796
    const char *dst0 = make_D3D_destarg_string(ctx, 0);
30
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
   797
    opcode = lowercase(get_scratch_buffer(ctx), opcode);
21
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   798
    output_line(ctx, "%s%s", opcode, dst0);
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   799
} // emit_D3D_opcode_d
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   800
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
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_D3D_opcode_s(Context *ctx, const char *opcode)
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   803
{
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   804
    const char *src0 = make_D3D_destarg_string(ctx, 0);
30
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
   805
    opcode = lowercase(get_scratch_buffer(ctx), opcode);
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   806
    output_line(ctx, "%s %s", opcode, src0);
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   807
} // emit_D3D_opcode_s
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   808
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   809
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   810
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
   811
{
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   812
    const char *src0 = make_D3D_sourcearg_string(ctx, 0);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   813
    const char *src1 = make_D3D_sourcearg_string(ctx, 1);
30
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
   814
    opcode = lowercase(get_scratch_buffer(ctx), opcode);
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   815
    output_line(ctx, "%s %s, %s", opcode, src0, src1);
39
4057e8dc3ad0 [svn] Fixed comment.
icculus
parents: 38
diff changeset
   816
} // emit_D3D_opcode_ss
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   817
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   818
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   819
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
   820
{
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   821
    const char *dst0 = make_D3D_destarg_string(ctx, 0);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   822
    const char *src0 = make_D3D_sourcearg_string(ctx, 0);
30
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
   823
    opcode = lowercase(get_scratch_buffer(ctx), opcode);
21
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   824
    output_line(ctx, "%s%s, %s", opcode, dst0, src0);
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   825
} // emit_D3D_opcode_ds
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   826
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   827
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   828
static void emit_D3D_opcode_dss(Context *ctx, const char *opcode)
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   829
{
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   830
    const char *dst0 = make_D3D_destarg_string(ctx, 0);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   831
    const char *src0 = make_D3D_sourcearg_string(ctx, 0);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   832
    const char *src1 = make_D3D_sourcearg_string(ctx, 1);
30
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
   833
    opcode = lowercase(get_scratch_buffer(ctx), opcode);
21
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   834
    output_line(ctx, "%s%s, %s, %s", opcode, dst0, src0, src1);
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   835
} // emit_D3D_opcode_dss
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   836
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   837
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   838
static void emit_D3D_opcode_dsss(Context *ctx, const char *opcode)
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   839
{
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   840
    const char *dst0 = make_D3D_destarg_string(ctx, 0);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   841
    const char *src0 = make_D3D_sourcearg_string(ctx, 0);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   842
    const char *src1 = make_D3D_sourcearg_string(ctx, 1);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   843
    const char *src2 = make_D3D_sourcearg_string(ctx, 2);
30
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
   844
    opcode = lowercase(get_scratch_buffer(ctx), opcode);
21
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   845
    output_line(ctx, "%s%s, %s, %s, %s", opcode, dst0, src0, src1, src2);
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   846
} // emit_D3D_opcode_dsss
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   847
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   848
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
   849
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
   850
{
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   851
    const char *dst0 = make_D3D_destarg_string(ctx, 0);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   852
    const char *src0 = make_D3D_sourcearg_string(ctx, 0);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   853
    const char *src1 = make_D3D_sourcearg_string(ctx, 1);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   854
    const char *src2 = make_D3D_sourcearg_string(ctx, 2);
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   855
    const char *src3 = make_D3D_sourcearg_string(ctx, 3);
30
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
   856
    opcode = lowercase(get_scratch_buffer(ctx), opcode);
21
d43449cf3cb2 [svn] Implemented destination argument output in D3D profile. Untested.
icculus
parents: 20
diff changeset
   857
    output_line(ctx,"%s%s, %s, %s, %s, %s",opcode,dst0,src0,src1,src2,src3);
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   858
} // emit_D3D_opcode_dssss
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   859
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   860
30
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
   861
static void emit_D3D_opcode(Context *ctx, const char *opcode)
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
   862
{
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
   863
    opcode = lowercase(get_scratch_buffer(ctx), opcode);
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
   864
    output_line(ctx, "%s", opcode);
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
   865
} // emit_D3D_opcode_dssss
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
   866
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
   867
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   868
#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
   869
    static void emit_D3D_##op(Context *ctx) { \
30
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
   870
        emit_D3D_opcode(ctx, #op); \
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   871
    }
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   872
#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
   873
    static void emit_D3D_##op(Context *ctx) { \
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   874
        emit_D3D_opcode_d(ctx, #op); \
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   875
    }
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   876
#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
   877
    static void emit_D3D_##op(Context *ctx) { \
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   878
        emit_D3D_opcode_s(ctx, #op); \
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   879
    }
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   880
#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
   881
    static void emit_D3D_##op(Context *ctx) { \
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   882
        emit_D3D_opcode_ss(ctx, #op); \
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   883
    }
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   884
#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
   885
    static void emit_D3D_##op(Context *ctx) { \
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   886
        emit_D3D_opcode_ds(ctx, #op); \
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   887
    }
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   888
#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
   889
    static void emit_D3D_##op(Context *ctx) { \
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   890
        emit_D3D_opcode_dss(ctx, #op); \
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   891
    }
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   892
#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
   893
    static void emit_D3D_##op(Context *ctx) { \
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   894
        emit_D3D_opcode_dsss(ctx, #op); \
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   895
    }
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   896
#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
   897
    static void emit_D3D_##op(Context *ctx) { \
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   898
        emit_D3D_opcode_dssss(ctx, #op); \
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   899
    }
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   900
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   901
EMIT_D3D_OPCODE_FUNC(NOP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   902
EMIT_D3D_OPCODE_DS_FUNC(MOV)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   903
EMIT_D3D_OPCODE_DSS_FUNC(ADD)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   904
EMIT_D3D_OPCODE_DSS_FUNC(SUB)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   905
EMIT_D3D_OPCODE_DSSS_FUNC(MAD)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   906
EMIT_D3D_OPCODE_DSS_FUNC(MUL)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   907
EMIT_D3D_OPCODE_DS_FUNC(RCP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   908
EMIT_D3D_OPCODE_DS_FUNC(RSQ)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   909
EMIT_D3D_OPCODE_DSS_FUNC(DP3)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   910
EMIT_D3D_OPCODE_DSS_FUNC(DP4)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   911
EMIT_D3D_OPCODE_DSS_FUNC(MIN)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   912
EMIT_D3D_OPCODE_DSS_FUNC(MAX)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   913
EMIT_D3D_OPCODE_DSS_FUNC(SLT)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   914
EMIT_D3D_OPCODE_DSS_FUNC(SGE)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   915
EMIT_D3D_OPCODE_DS_FUNC(EXP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   916
EMIT_D3D_OPCODE_DS_FUNC(LOG)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   917
EMIT_D3D_OPCODE_DS_FUNC(LIT)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   918
EMIT_D3D_OPCODE_DSS_FUNC(DST)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   919
EMIT_D3D_OPCODE_DSSS_FUNC(LRP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   920
EMIT_D3D_OPCODE_DS_FUNC(FRC)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   921
EMIT_D3D_OPCODE_DSS_FUNC(M4X4)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   922
EMIT_D3D_OPCODE_DSS_FUNC(M4X3)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   923
EMIT_D3D_OPCODE_DSS_FUNC(M3X4)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   924
EMIT_D3D_OPCODE_DSS_FUNC(M3X3)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   925
EMIT_D3D_OPCODE_DSS_FUNC(M3X2)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   926
EMIT_D3D_OPCODE_S_FUNC(CALL)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   927
EMIT_D3D_OPCODE_SS_FUNC(CALLNZ)
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   928
EMIT_D3D_OPCODE_SS_FUNC(LOOP)
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   929
EMIT_D3D_OPCODE_FUNC(RET)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   930
EMIT_D3D_OPCODE_FUNC(ENDLOOP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   931
EMIT_D3D_OPCODE_S_FUNC(LABEL)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   932
EMIT_D3D_OPCODE_DSS_FUNC(POW)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   933
EMIT_D3D_OPCODE_DSS_FUNC(CRS)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   934
EMIT_D3D_OPCODE_DSSS_FUNC(SGN)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   935
EMIT_D3D_OPCODE_DS_FUNC(ABS)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   936
EMIT_D3D_OPCODE_DS_FUNC(NRM)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   937
EMIT_D3D_OPCODE_DS_FUNC(SINCOS)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   938
EMIT_D3D_OPCODE_S_FUNC(REP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   939
EMIT_D3D_OPCODE_FUNC(ENDREP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   940
EMIT_D3D_OPCODE_S_FUNC(IF)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   941
EMIT_D3D_OPCODE_FUNC(ELSE)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   942
EMIT_D3D_OPCODE_FUNC(ENDIF)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   943
EMIT_D3D_OPCODE_FUNC(BREAK)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   944
EMIT_D3D_OPCODE_DS_FUNC(MOVA)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   945
EMIT_D3D_OPCODE_D_FUNC(TEXKILL)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   946
EMIT_D3D_OPCODE_DS_FUNC(TEXBEM)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   947
EMIT_D3D_OPCODE_DS_FUNC(TEXBEML)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   948
EMIT_D3D_OPCODE_DS_FUNC(TEXREG2AR)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   949
EMIT_D3D_OPCODE_DS_FUNC(TEXREG2GB)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   950
EMIT_D3D_OPCODE_DS_FUNC(TEXM3X2PAD)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   951
EMIT_D3D_OPCODE_DS_FUNC(TEXM3X2TEX)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   952
EMIT_D3D_OPCODE_DS_FUNC(TEXM3X3PAD)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   953
EMIT_D3D_OPCODE_DS_FUNC(TEXM3X3TEX)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   954
EMIT_D3D_OPCODE_DSS_FUNC(TEXM3X3SPEC)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   955
EMIT_D3D_OPCODE_DS_FUNC(TEXM3X3VSPEC)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   956
EMIT_D3D_OPCODE_DS_FUNC(EXPP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   957
EMIT_D3D_OPCODE_DS_FUNC(LOGP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   958
EMIT_D3D_OPCODE_DSSS_FUNC(CND)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   959
EMIT_D3D_OPCODE_DS_FUNC(TEXREG2RGB)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   960
EMIT_D3D_OPCODE_DS_FUNC(TEXDP3TEX)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   961
EMIT_D3D_OPCODE_DS_FUNC(TEXM3X2DEPTH)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   962
EMIT_D3D_OPCODE_DS_FUNC(TEXDP3)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   963
EMIT_D3D_OPCODE_DS_FUNC(TEXM3X3)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   964
EMIT_D3D_OPCODE_D_FUNC(TEXDEPTH)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   965
EMIT_D3D_OPCODE_DSSS_FUNC(CMP)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   966
EMIT_D3D_OPCODE_DSS_FUNC(BEM)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   967
EMIT_D3D_OPCODE_DSSS_FUNC(DP2ADD)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   968
EMIT_D3D_OPCODE_DS_FUNC(DSX)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   969
EMIT_D3D_OPCODE_DS_FUNC(DSY)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   970
EMIT_D3D_OPCODE_DSSSS_FUNC(TEXLDD)
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   971
EMIT_D3D_OPCODE_DSS_FUNC(TEXLDL)
20
bb2e8f285acc [svn] Bunch More Work...higher level parses dest/src tokens before it goes to the
icculus
parents: 19
diff changeset
   972
EMIT_D3D_OPCODE_S_FUNC(BREAKP)
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
   973
28
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
   974
// special cases for comparison opcodes...
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
   975
static const char *get_D3D_comparison_string(Context *ctx)
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
   976
{
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
   977
    static const char *comps[] = {
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
   978
        "", "_gt", "_eq", "_ge", "_lt", "_ne", "_le"
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
   979
    };
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
   980
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
   981
    if (ctx->instruction_controls >= STATICARRAYLEN(comps))
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
   982
    {
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
   983
        fail(ctx, "unknown comparison control");
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
   984
        return "";
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
   985
    } // if
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
   986
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
   987
    return comps[ctx->instruction_controls];
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
   988
} // get_D3D_comparison_string
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
   989
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
   990
static void emit_D3D_BREAKC(Context *ctx)
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
   991
{
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
   992
    char op[16];
30
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
   993
    snprintf(op, sizeof (op), "break%s", get_D3D_comparison_string(ctx));
28
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
   994
    emit_D3D_opcode_ss(ctx, op);
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
   995
} // emit_D3D_BREAKC
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
   996
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
   997
static void emit_D3D_IFC(Context *ctx)
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
   998
{
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
   999
    char op[16];
30
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
  1000
    snprintf(op, sizeof (op), "if%s", get_D3D_comparison_string(ctx));
28
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
  1001
    emit_D3D_opcode_ss(ctx, op);
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
  1002
} // emit_D3D_IFC
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
  1003
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
  1004
static void emit_D3D_SETP(Context *ctx)
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
  1005
{
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
  1006
    char op[16];
30
5e908687dd50 [svn] Lowercase opcodes in the D3D profile.
icculus
parents: 29
diff changeset
  1007
    snprintf(op, sizeof (op), "setp%s", get_D3D_comparison_string(ctx));
28
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
  1008
    emit_D3D_opcode_dss(ctx, op);
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
  1009
} // emit_D3D_SETP
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
  1010
31
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1011
static void emit_D3D_DEF(Context *ctx)
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1012
{
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1013
    const char *dst0 = make_D3D_destarg_string(ctx, 0);
33
8b71012ebf65 [svn] Some heroic coding, since I can't figure out how to get printf() to output
icculus
parents: 32
diff changeset
  1014
    const float *val = (const float *) ctx->dwords; // !!! FIXME: could be int?
8b71012ebf65 [svn] Some heroic coding, since I can't figure out how to get printf() to output
icculus
parents: 32
diff changeset
  1015
    char val0[32];
8b71012ebf65 [svn] Some heroic coding, since I can't figure out how to get printf() to output
icculus
parents: 32
diff changeset
  1016
    char val1[32];
8b71012ebf65 [svn] Some heroic coding, since I can't figure out how to get printf() to output
icculus
parents: 32
diff changeset
  1017
    char val2[32];
8b71012ebf65 [svn] Some heroic coding, since I can't figure out how to get printf() to output
icculus
parents: 32
diff changeset
  1018
    char val3[32];
8b71012ebf65 [svn] Some heroic coding, since I can't figure out how to get printf() to output
icculus
parents: 32
diff changeset
  1019
    floatstr(ctx, val0, sizeof (val0), val[0]);
8b71012ebf65 [svn] Some heroic coding, since I can't figure out how to get printf() to output
icculus
parents: 32
diff changeset
  1020
    floatstr(ctx, val1, sizeof (val1), val[1]);
8b71012ebf65 [svn] Some heroic coding, since I can't figure out how to get printf() to output
icculus
parents: 32
diff changeset
  1021
    floatstr(ctx, val2, sizeof (val2), val[2]);
8b71012ebf65 [svn] Some heroic coding, since I can't figure out how to get printf() to output
icculus
parents: 32
diff changeset
  1022
    floatstr(ctx, val3, sizeof (val3), val[3]);
8b71012ebf65 [svn] Some heroic coding, since I can't figure out how to get printf() to output
icculus
parents: 32
diff changeset
  1023
    output_line(ctx, "def%s, %s, %s, %s, %s", dst0, val0, val1, val2, val3);
31
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1024
} // emit_D3D_DEF
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1025
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1026
static void emit_D3D_DEFI(Context *ctx)
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1027
{
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1028
    const char *dst0 = make_D3D_destarg_string(ctx, 0);
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1029
    const int32 *x = (const int32 *) ctx->dwords;
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1030
    output_line(ctx, "defi%s, %d, %d, %d, %d", dst0,
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1031
                (int) x[0], (int) x[1], (int) x[2], (int) x[3]);
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1032
} // emit_D3D_DEFI
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1033
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1034
static void emit_D3D_DEFB(Context *ctx)
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1035
{
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1036
    const char *dst0 = make_D3D_destarg_string(ctx, 0);
32
bfb775b9baac [svn] Doh. Fixed DEFB output in the D3D profile.
icculus
parents: 31
diff changeset
  1037
    output_line(ctx, "defb%s, %s", dst0, ctx->dwords[0] ? "true" : "false");
31
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1038
} // emit_D3D_DEFB
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1039
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1040
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1041
static void emit_D3D_DCL(Context *ctx)
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1042
{
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1043
    const char *dst0 = make_D3D_destarg_string(ctx, 0);
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1044
    const DestArgInfo *arg = &ctx->dest_args[0];
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1045
    const char *usage_str = "";
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1046
    char index_str[16] = { '\0' };
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1047
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1048
    if (ctx->shader_type == SHADER_TYPE_VERTEX)
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1049
    {
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1050
        static const char *usagestrs[] = {
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1051
            "_position", "_blendweight", "_blendindices", "_normal",
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1052
            "_psize", "_texcoord", "_tangent", "_binormal", "_tessfactor",
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1053
            "_positiont", "_color", "_fog", "_depth", "_sample"
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1054
        };
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1055
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1056
        const uint32 usage = ctx->dwords[0];
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1057
        const uint32 index = ctx->dwords[1];
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1058
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1059
        if (usage >= STATICARRAYLEN(usagestrs))
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1060
        {
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1061
            fail(ctx, "unknown DCL usage");
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1062
            return;
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1063
        } // if
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1064
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1065
        usage_str = usagestrs[usage];
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1066
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1067
        if (index != 0)
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1068
            snprintf(index_str, sizeof (index_str), "%u", (uint) index);
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1069
    } // if
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1070
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1071
    else if (arg->regtype == REGISTER_TYPE_SAMPLER)
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1072
    {
34
ca4b727ad2ce [svn] Chopped out a bunch of D3D2GLSL_ crap.
icculus
parents: 33
diff changeset
  1073
        switch ((const TextureType) ctx->dwords[0])
31
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1074
        {
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1075
            case TEXTURE_TYPE_2D: usage_str = "_2d"; break;
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1076
            case TEXTURE_TYPE_CUBE: usage_str = "_cube"; break;
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1077
            case TEXTURE_TYPE_VOLUME: usage_str = "_volume"; break;
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1078
            default: fail(ctx, "unknown sampler texture type"); return;
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1079
        } // switch
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1080
    } // else if
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1081
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1082
    output_line(ctx, "dcl%s%s%s", usage_str, index_str, dst0);
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1083
} // emit_D3D_DCL
ee4ff9d30b67 [svn] DCL support!
icculus
parents: 30
diff changeset
  1084
28
bdb89e56bb91 [svn] Comparison opcodes...
icculus
parents: 27
diff changeset
  1085
43
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
  1086
static void emit_D3D_TEXCOORD(Context *ctx)
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
  1087
{
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
  1088
    // this opcode looks and acts differently depending on the shader model.
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
  1089
    if (shader_version_atleast(ctx, 1, 4))
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
  1090
        emit_D3D_opcode_ds(ctx, "texcrd");
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
  1091
    else
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
  1092
        emit_D3D_opcode_d(ctx, "texcoord");
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
  1093
} // emit_D3D_TEXCOORD
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
  1094
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
  1095
static void emit_D3D_TEX(Context *ctx)
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
  1096
{
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
  1097
    // this opcode looks and acts differently depending on the shader model.
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
  1098
    if (shader_version_atleast(ctx, 1, 4))
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
  1099
        emit_D3D_opcode_ds(ctx, "tex");
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
  1100
    else
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
  1101
        emit_D3D_opcode_d(ctx, "texld");
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
  1102
} // emit_D3D_TEX
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
  1103
2f5d9a656dff [svn] Bunch More Work. Cleaned up some lingering opcode drama, and state machine
icculus
parents: 42
diff changeset
  1104
17
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
  1105
#undef EMIT_D3D_OPCODE_FUNC
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
  1106
#undef EMIT_D3D_OPCODE_D_FUNC
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
  1107
#undef EMIT_D3D_OPCODE_S_FUNC
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
  1108
#undef EMIT_D3D_OPCODE_SS_FUNC
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
  1109
#undef EMIT_D3D_OPCODE_DS_FUNC
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
  1110
#undef EMIT_D3D_OPCODE_DSS_FUNC
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
  1111
#undef EMIT_D3D_OPCODE_DSSS_FUNC
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
  1112
#undef EMIT_D3D_OPCODE_DSSSS_FUNC
78d605d6641d [svn] Starting to fill in D3D profile...
icculus
parents: 16
diff changeset
  1113
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1114
#endif  // SUPPORT_PROFILE_D3D
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1115
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1116
2
c37210f5e87b [svn] Bunch More Work. Parse out instruction tokens, fail in a bunch of new stubs.
icculus
parents: 1
diff changeset
  1117
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1118
#if !SUPPORT_PROFILE_GLSL
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1119
#define PROFILE_EMITTER_GLSL(op)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1120
#else
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1121
#undef AT_LEAST_ONE_PROFILE
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1122
#define AT_LEAST_ONE_PROFILE 1
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1123
#define PROFILE_EMITTER_GLSL(op) emit_GLSL_##op,
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1124
40
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1125
static char *make_GLSL_destarg_string(Context *ctx, const int idx)
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1126
{
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1127
    if (idx >= STATICARRAYLEN(ctx->dest_args))
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1128
    {
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1129
        fail(ctx, "Too many destination args");
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1130
        return "";
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1131
    } // if
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1132
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1133
    //const DestArgInfo *arg = &ctx->dest_args[idx];
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1134
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1135
    char *retval = get_scratch_buffer(ctx);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1136
    snprintf(retval, SCRATCH_BUFFER_SIZE, "dst%d", idx);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1137
    return retval;
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1138
} // make_GLSL_destarg_string
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1139
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1140
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1141
static char *make_GLSL_sourcearg_string(Context *ctx, const int idx)
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1142
{
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1143
    if (idx >= STATICARRAYLEN(ctx->source_args))
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1144
    {
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1145
        fail(ctx, "Too many source args");
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1146
        return "";
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1147
    } // if
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1148
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1149
    //const SourceArgInfo *arg = &ctx->source_args[idx];
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1150
    char *retval = get_scratch_buffer(ctx);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1151
    snprintf(retval, SCRATCH_BUFFER_SIZE, "src%d", idx);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1152
    return retval;
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1153
} // make_GLSL_sourcearg_string
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1154
41
b857eacdbc68 [svn] More GLSL work.
icculus
parents: 40
diff changeset
  1155
b857eacdbc68 [svn] More GLSL work.
icculus
parents: 40
diff changeset
  1156
// special cases for comparison opcodes...
b857eacdbc68 [svn] More GLSL work.
icculus
parents: 40
diff changeset
  1157
static const char *get_GLSL_comparison_string(Context *ctx)
b857eacdbc68 [svn] More GLSL work.
icculus
parents: 40
diff changeset
  1158
{
b857eacdbc68 [svn] More GLSL work.
icculus
parents: 40
diff changeset
  1159
    static const char *comps[] = {
b857eacdbc68 [svn] More GLSL work.
icculus
parents: 40
diff changeset
  1160
        "", "greaterThan", "equal", "greaterThanEqual", "lessThan",
b857eacdbc68 [svn] More GLSL work.
icculus
parents: 40
diff changeset
  1161
        "notEqual", "lessThanEqual"
b857eacdbc68 [svn] More GLSL work.
icculus
parents: 40
diff changeset
  1162
    };
b857eacdbc68 [svn] More GLSL work.
icculus
parents: 40
diff changeset
  1163
b857eacdbc68 [svn] More GLSL work.
icculus
parents: 40
diff changeset
  1164
    if (ctx->instruction_controls >= STATICARRAYLEN(comps))
b857eacdbc68 [svn] More GLSL work.
icculus
parents: 40
diff changeset
  1165
    {
b857eacdbc68 [svn] More GLSL work.
icculus
parents: 40
diff changeset
  1166
        fail(ctx, "unknown comparison control");
b857eacdbc68 [svn] More GLSL work.
icculus
parents: 40
diff changeset
  1167
        return "";
b857eacdbc68 [svn] More GLSL work.
icculus
parents: 40
diff changeset
  1168
    } // if
b857eacdbc68 [svn] More GLSL work.
icculus
parents: 40
diff changeset
  1169
b857eacdbc68 [svn] More GLSL work.
icculus
parents: 40
diff changeset
  1170
    return comps[ctx->instruction_controls];
b857eacdbc68 [svn] More GLSL work.
icculus
parents: 40
diff changeset
  1171
} // get_D3D_comparison_string
b857eacdbc68 [svn] More GLSL work.
icculus
parents: 40
diff changeset
  1172
b857eacdbc68 [svn] More GLSL work.
icculus
parents: 40
diff changeset
  1173
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1174
static void emit_GLSL_start(Context *ctx)
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1175
{
16
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
  1176
    const uint major = (uint) ctx->major_ver;
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
  1177
    const uint minor = (uint) ctx->minor_ver;
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
  1178
    if (ctx->shader_type == SHADER_TYPE_PIXEL)
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
  1179
        output_line(ctx, "// Pixel shader, version %u.%u", major, minor);
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
  1180
    else if (ctx->shader_type == SHADER_TYPE_VERTEX)
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
  1181
        output_line(ctx, "// Vertex shader, version %u.%u", major, minor);
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
  1182
    else
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
  1183
    {
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
  1184
        failf(ctx, "Shader type %u unsupported in this profile.",
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
  1185
              (uint) ctx->shader_type);
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
  1186
    } // else
0fac78e9ff57 [svn] Bunch More Work.
icculus
parents: 15
diff changeset
  1187
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1188
    output_line(ctx, "void main() {");
40
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1189
    ctx->indent++;
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1190
} // emit_GLSL_start
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1191
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1192
static void emit_GLSL_end(Context *ctx)
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1193
{
40
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1194
    ctx->indent--;
15
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1195
    output_line(ctx, "}");
97ad0050e75b [svn] Still more profile cleanup.
icculus
parents: 14
diff changeset
  1196
} // emit_GLSL_end
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1197
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1198
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
  1199
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1200
    output_line(ctx, "// %s", str);
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1201
} // 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
  1202
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1203
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
  1204
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1205
    // no-op is a no-op.  :)
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1206
} // 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
  1207
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1208
static void emit_GLSL_MOV(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1209
{
40
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1210
    const char *dst0 = make_GLSL_destarg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1211
    const char *src0 = make_GLSL_sourcearg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1212
    output_line(ctx, "%s = %s;", dst0, src0);
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1213
} // emit_GLSL_MOV
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1214
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1215
static void emit_GLSL_ADD(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1216
{
40
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1217
    const char *dst0 = make_GLSL_destarg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1218
    const char *src0 = make_GLSL_sourcearg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1219
    const char *src1 = make_GLSL_sourcearg_string(ctx, 1);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1220
    output_line(ctx, "%s = %s + %s;", dst0, src0, src1);
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1221
} // emit_GLSL_ADD
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1222
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1223
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
  1224
{
40
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1225
    const char *dst0 = make_GLSL_destarg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1226
    const char *src0 = make_GLSL_sourcearg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1227
    const char *src1 = make_GLSL_sourcearg_string(ctx, 1);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1228
    output_line(ctx, "%s = %s - %s;", dst0, src0, src1);
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1229
} // 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
  1230
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1231
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
  1232
{
40
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1233
    const char *dst0 = make_GLSL_destarg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1234
    const char *src0 = make_GLSL_sourcearg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1235
    const char *src1 = make_GLSL_sourcearg_string(ctx, 1);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1236
    const char *src2 = make_GLSL_sourcearg_string(ctx, 2);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1237
    output_line(ctx, "%s = (%s * %s) + %s;", dst0, src0, src1, src2);
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1238
} // 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
  1239
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1240
static void emit_GLSL_MUL(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1241
{
40
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1242
    const char *dst0 = make_GLSL_destarg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1243
    const char *src0 = make_GLSL_sourcearg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1244
    const char *src1 = make_GLSL_sourcearg_string(ctx, 1);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1245
    output_line(ctx, "%s = %s * %s;", dst0, src0, src1);
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1246
} // emit_GLSL_MUL
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1247
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1248
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
  1249
{
40
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1250
    const char *dst0 = make_GLSL_destarg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1251
    const char *src0 = make_GLSL_sourcearg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1252
    output_line(ctx, "%s = 1.0 / %s;", dst0, src0);
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1253
} // 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
  1254
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1255
static void emit_GLSL_RSQ(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1256
{
40
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1257
    const char *dst0 = make_GLSL_destarg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1258
    const char *src0 = make_GLSL_sourcearg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1259
    output_line(ctx, "%s = inversesqrt(%s);", dst0, src0);
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1260
} // emit_GLSL_RSQ
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1261
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1262
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
  1263
{
40
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1264
    const char *dst0 = make_GLSL_destarg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1265
    const char *src0 = make_GLSL_sourcearg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1266
    const char *src1 = make_GLSL_sourcearg_string(ctx, 1);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1267
    output_line(ctx, "%s = dot(vec3(%s), vec3(%s));", dst0, src0, src1);
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1268
} // 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
  1269
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1270
static void emit_GLSL_DP4(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1271
{
40
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1272
    const char *dst0 = make_GLSL_destarg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1273
    const char *src0 = make_GLSL_sourcearg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1274
    const char *src1 = make_GLSL_sourcearg_string(ctx, 1);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1275
    output_line(ctx, "%s = dot(vec4(%s), vec4(%s));", dst0, src0, src1);
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1276
} // emit_GLSL_DP4
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1277
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1278
static void emit_GLSL_MIN(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1279
{
40
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1280
    const char *dst0 = make_GLSL_destarg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1281
    const char *src0 = make_GLSL_sourcearg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1282
    const char *src1 = make_GLSL_sourcearg_string(ctx, 1);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1283
    output_line(ctx, "%s = min(%s, %s);", dst0, src0, src1);
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1284
} // emit_GLSL_MIN
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1285
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1286
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
  1287
{
40
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1288
    const char *dst0 = make_GLSL_destarg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1289
    const char *src0 = make_GLSL_sourcearg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1290
    const char *src1 = make_GLSL_sourcearg_string(ctx, 1);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1291
    output_line(ctx, "%s = max(%s, %s);", dst0, src0, src1);
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1292
} // 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
  1293
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1294
static void emit_GLSL_SLT(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1295
{
40
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1296
    const char *dst0 = make_GLSL_destarg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1297
    const char *src0 = make_GLSL_sourcearg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1298
    const char *src1 = make_GLSL_sourcearg_string(ctx, 1);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1299
    // !!! FIXME: need to cast from bvec to vec...
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1300
    output_line(ctx, "%s = lessThan(%s, %s);", dst0, src0, src1);
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1301
} // emit_GLSL_SLT
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1302
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1303
static void emit_GLSL_SGE(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1304
{
40
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1305
    const char *dst0 = make_GLSL_destarg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1306
    const char *src0 = make_GLSL_sourcearg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1307
    const char *src1 = make_GLSL_sourcearg_string(ctx, 1);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1308
    // !!! FIXME: need to cast from bvec to vec...
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1309
    output_line(ctx, "%s = greaterThanEqual(%s, %s);", dst0, src0, src1);
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1310
} // emit_GLSL_SGE
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1311
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1312
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
  1313
{
40
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1314
    const char *dst0 = make_GLSL_destarg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1315
    const char *src0 = make_GLSL_sourcearg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1316
    output_line(ctx, "%s = exp2(%s);", dst0, src0);
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1317
} // 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
  1318
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1319
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
  1320
{
40
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1321
    const char *dst0 = make_GLSL_destarg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1322
    const char *src0 = make_GLSL_sourcearg_string(ctx, 0);
f54f1635ac8a [svn] Filling in some initial GLSL output. Not even close to done!
icculus
parents: 39
diff changeset
  1323
    output_line(ctx, "%s = log2(%s);", dst0, src0);
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1324
} // 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
  1325
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1326
static void emit_GLSL_LIT(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1327
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1328
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1329
} // emit_GLSL_LIT
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1330
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1331
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
  1332
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1333
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1334
} // 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
  1335
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1336
static void emit_GLSL_LRP(Context *ctx)
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1337
{
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1338
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1339
} // emit_GLSL_LRP
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1340
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: 17
diff changeset
  1341
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
  1342
{
14
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1343
    fail(ctx, "unimplemented.");  // !!! FIXME
7075b6e31471 [svn] More proper split into profiles.
icculus
parents: 13
diff changeset
  1344
} // 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
  1345
18
0dbdb2be8bf8 [svn] Bunch More Work. Cleanups, added app-supplied allocators, flexible output, etc.
icculus
parents: