src/mesa/drivers/dri/r300/compiler/radeon_code.c

   1 /*
   2  * Copyright (C) 2009 Nicolai Haehnle.
   3  *
   4  * All Rights Reserved.
   5  *
   6  * Permission is hereby granted, free of charge, to any person obtaining
   7  * a copy of this software and associated documentation files (the
   8  * "Software"), to deal in the Software without restriction, including
   9  * without limitation the rights to use, copy, modify, merge, publish,
  10  * distribute, sublicense, and/or sell copies of the Software, and to
  11  * permit persons to whom the Software is furnished to do so, subject to
  12  * the following conditions:
  13  *
  14  * The above copyright notice and this permission notice (including the
  15  * next paragraph) shall be included in all copies or substantial
  16  * portions of the Software.
  17  *
  18  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
  19  * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  20  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
  21  * IN NO EVENT SHALL THE COPYRIGHT OWNER(S) AND/OR ITS SUPPLIERS BE
  22  * LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
  23  * OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
  24  * WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  25  *
  26  */
  27
  28 #include "radeon_code.h"
  29
  30 #include <stdlib.h>
  31 #include <stdio.h>
  32 #include <string.h>
  33
  34 #include "radeon_program.h"
  35
  36 void rc_constants_init(struct rc_constant_list * c)
  37 {
  38         memset(c, 0, sizeof(*c));
  39 }
  40
  41 /**
  42  * Copy a constants structure, assuming that the destination structure
  43  * is not initialized.
  44  */
  45 void rc_constants_copy(struct rc_constant_list * dst, struct rc_constant_list * src)
  46 {
  47         dst->Constants = malloc(sizeof(struct rc_constant) * src->Count);
  48         memcpy(dst->Constants, src->Constants, sizeof(struct rc_constant) * src->Count);
  49         dst->Count = src->Count;
  50         dst->_Reserved = src->Count;
  51 }
  52
  53 void rc_constants_destroy(struct rc_constant_list * c)
  54 {
  55         free(c->Constants);
  56         memset(c, 0, sizeof(*c));
  57 }
  58
  59 unsigned rc_constants_add(struct rc_constant_list * c, struct rc_constant * constant)
  60 {
  61         unsigned index = c->Count;
  62
  63         if (c->Count >= c->_Reserved) {
  64                 struct rc_constant * newlist;
  65
  66                 c->_Reserved = c->_Reserved * 2;
  67                 if (!c->_Reserved)
  68                         c->_Reserved = 16;
  69
  70                 newlist = malloc(sizeof(struct rc_constant) * c->_Reserved);
  71                 memcpy(newlist, c->Constants, sizeof(struct rc_constant) * c->Count);
  72
  73                 free(c->Constants);
  74                 c->Constants = newlist;
  75         }
  76
  77         c->Constants[index] = *constant;
  78         c->Count++;
  79
  80         return index;
  81 }
  82
  83
  84 /**
  85  * Add a state vector to the constant list, while trying to avoid duplicates.
  86  */
  87 unsigned rc_constants_add_state(struct rc_constant_list * c, unsigned state0, unsigned state1)
  88 {
  89         unsigned index;
  90         struct rc_constant constant;
  91
  92         for(index = 0; index < c->Count; ++index) {
  93                 if (c->Constants[index].Type == RC_CONSTANT_STATE) {
  94                         if (c->Constants[index].u.State[0] == state0 &&
  95                             c->Constants[index].u.State[1] == state1)
  96                                 return index;
  97                 }
  98         }
  99
 100         memset(&constant, 0, sizeof(constant));
 101         constant.Type = RC_CONSTANT_STATE;
 102         constant.Size = 4;
 103         constant.u.State[0] = state0;
 104         constant.u.State[1] = state1;
 105
 106         return rc_constants_add(c, &constant);
 107 }
 108
 109
 110 /**
 111  * Add an immediate vector to the constant list, while trying to avoid
 112  * duplicates.
 113  */
 114 unsigned rc_constants_add_immediate_vec4(struct rc_constant_list * c, const float * data)
 115 {
 116         unsigned index;
 117         struct rc_constant constant;
 118
 119         for(index = 0; index < c->Count; ++index) {
 120                 if (c->Constants[index].Type == RC_CONSTANT_IMMEDIATE) {
 121                         if (!memcmp(c->Constants[index].u.Immediate, data, sizeof(float)*4))
 122                                 return index;
 123                 }
 124         }
 125
 126         memset(&constant, 0, sizeof(constant));
 127         constant.Type = RC_CONSTANT_IMMEDIATE;
 128         constant.Size = 4;
 129         memcpy(constant.u.Immediate, data, sizeof(float) * 4);
 130
 131         return rc_constants_add(c, &constant);
 132 }
 133
 134
 135 /**
 136  * Add an immediate scalar to the constant list, while trying to avoid
 137  * duplicates.
 138  */
 139 unsigned rc_constants_add_immediate_scalar(struct rc_constant_list * c, float data, unsigned * swizzle)
 140 {
 141         unsigned index;
 142         int free_index = -1;
 143         struct rc_constant constant;
 144
 145         for(index = 0; index < c->Count; ++index) {
 146                 if (c->Constants[index].Type == RC_CONSTANT_IMMEDIATE) {
 147                         unsigned comp;
 148                         for(comp = 0; comp < c->Constants[index].Size; ++comp) {
 149                                 if (c->Constants[index].u.Immediate[comp] == data) {
 150                                         *swizzle = RC_MAKE_SWIZZLE_SMEAR(comp);
 151                                         return index;
 152                                 }
 153                         }
 154
 155                         if (c->Constants[index].Size < 4)
 156                                 free_index = index;
 157                 }
 158         }
 159
 160         if (free_index >= 0) {
 161                 unsigned comp = c->Constants[free_index].Size++;
 162                 c->Constants[free_index].u.Immediate[comp] = data;
 163                 *swizzle = RC_MAKE_SWIZZLE_SMEAR(comp);
 164                 return free_index;
 165         }
 166
 167         memset(&constant, 0, sizeof(constant));
 168         constant.Type = RC_CONSTANT_IMMEDIATE;
 169         constant.Size = 1;
 170         constant.u.Immediate[0] = data;
 171         *swizzle = RC_SWIZZLE_XXXX;
 172
 173         return rc_constants_add(c, &constant);
 174 }
 175
 176 void rc_constants_print(struct rc_constant_list * c)
 177 {
 178         unsigned int i;
 179         for(i = 0; i < c->Count; i++) {
 180                 if (c->Constants[i].Type == RC_CONSTANT_IMMEDIATE) {
 181                         float * values = c->Constants[i].u.Immediate;
 182                         fprintf(stderr, "CONST[%u] = "
 183                                 "{ %10.4f %10.4f %10.4f %10.4f }\n",
 184                                 i, values[0],values[1], values[2], values[3]);
 185                 }
 186         }
 187 }