src/gallium/auxiliary/gallivm/lp_bld_struct.c

   1 /**************************************************************************
   2  *
   3  * Copyright 2009 VMware, Inc.
   4  * All Rights Reserved.
   5  *
   6  * Permission is hereby granted, free of charge, to any person obtaining a
   7  * 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, sub license, 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 portions
  16  * of the Software.
  17  *
  18  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
  19  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  20  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT.
  21  * IN NO EVENT SHALL VMWARE AND/OR ITS SUPPLIERS BE LIABLE FOR
  22  * ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
  23  * TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
  24  * SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  25  *
  26  **************************************************************************/
  27
  28
  29 /**
  30  * @file
  31  * Helper functions for manipulation structures.
  32  *
  33  * @author Jose Fonseca <jfonseca@vmware.com>
  34  */
  35
  36
  37 #include "util/u_debug.h"
  38 #include "util/u_memory.h"
  39
  40 #include "lp_bld_debug.h"
  41 #include "lp_bld_struct.h"
  42
  43
  44 LLVMValueRef
  45 lp_build_struct_get_ptr(LLVMBuilderRef builder,
  46                         LLVMValueRef ptr,
  47                         unsigned member,
  48                         const char *name)
  49 {
  50    LLVMValueRef indices[2];
  51    LLVMValueRef member_ptr;
  52    assert(LLVMGetTypeKind(LLVMTypeOf(ptr)) == LLVMPointerTypeKind);
  53    assert(LLVMGetTypeKind(LLVMGetElementType(LLVMTypeOf(ptr))) == LLVMStructTypeKind);
  54    indices[0] = LLVMConstInt(LLVMInt32Type(), 0, 0);
  55    indices[1] = LLVMConstInt(LLVMInt32Type(), member, 0);
  56    member_ptr = LLVMBuildGEP(builder, ptr, indices, Elements(indices), "");
  57    lp_build_name(member_ptr, "%s.%s_ptr", LLVMGetValueName(ptr), name);
  58    return member_ptr;
  59 }
  60
  61
  62 LLVMValueRef
  63 lp_build_struct_get(LLVMBuilderRef builder,
  64                     LLVMValueRef ptr,
  65                     unsigned member,
  66                     const char *name)
  67 {
  68    LLVMValueRef member_ptr;
  69    LLVMValueRef res;
  70    assert(LLVMGetTypeKind(LLVMTypeOf(ptr)) == LLVMPointerTypeKind);
  71    assert(LLVMGetTypeKind(LLVMGetElementType(LLVMTypeOf(ptr))) == LLVMStructTypeKind);
  72    member_ptr = lp_build_struct_get_ptr(builder, ptr, member, name);
  73    res = LLVMBuildLoad(builder, member_ptr, "");
  74    lp_build_name(res, "%s.%s", LLVMGetValueName(ptr), name);
  75    return res;
  76 }
  77
  78
  79 LLVMValueRef
  80 lp_build_array_get_ptr(LLVMBuilderRef builder,
  81                        LLVMValueRef ptr,
  82                        LLVMValueRef index)
  83 {
  84    LLVMValueRef indices[2];
  85    LLVMValueRef element_ptr;
  86    assert(LLVMGetTypeKind(LLVMTypeOf(ptr)) == LLVMPointerTypeKind);
  87    assert(LLVMGetTypeKind(LLVMGetElementType(LLVMTypeOf(ptr))) == LLVMArrayTypeKind);
  88    indices[0] = LLVMConstInt(LLVMInt32Type(), 0, 0);
  89    indices[1] = index;
  90    element_ptr = LLVMBuildGEP(builder, ptr, indices, Elements(indices), "");
  91 #ifdef DEBUG
  92    lp_build_name(element_ptr, "&%s[%s]",
  93                  LLVMGetValueName(ptr), LLVMGetValueName(index));
  94 #endif
  95    return element_ptr;
  96 }
  97
  98
  99 LLVMValueRef
 100 lp_build_array_get(LLVMBuilderRef builder,
 101                    LLVMValueRef ptr,
 102                    LLVMValueRef index)
 103 {
 104    LLVMValueRef element_ptr;
 105    LLVMValueRef res;
 106    assert(LLVMGetTypeKind(LLVMTypeOf(ptr)) == LLVMPointerTypeKind);
 107    assert(LLVMGetTypeKind(LLVMGetElementType(LLVMTypeOf(ptr))) == LLVMArrayTypeKind);
 108    element_ptr = lp_build_array_get_ptr(builder, ptr, index);
 109    res = LLVMBuildLoad(builder, element_ptr, "");
 110 #ifdef DEBUG
 111    lp_build_name(res, "%s[%s]", LLVMGetValueName(ptr), LLVMGetValueName(index));
 112 #endif
 113    return res;
 114 }
 115
 116
 117 void
 118 lp_build_array_set(LLVMBuilderRef builder,
 119                    LLVMValueRef ptr,
 120                    LLVMValueRef index,
 121                    LLVMValueRef value)
 122 {
 123    LLVMValueRef element_ptr;
 124    assert(LLVMGetTypeKind(LLVMTypeOf(ptr)) == LLVMPointerTypeKind);
 125    assert(LLVMGetTypeKind(LLVMGetElementType(LLVMTypeOf(ptr))) == LLVMArrayTypeKind);
 126    element_ptr = lp_build_array_get_ptr(builder, ptr, index);
 127    LLVMBuildStore(builder, value, element_ptr);
 128 }
 129
 130
 131 LLVMValueRef
 132 lp_build_pointer_get(LLVMBuilderRef builder,
 133                      LLVMValueRef ptr,
 134                      LLVMValueRef index)
 135 {
 136    LLVMValueRef element_ptr;
 137    LLVMValueRef res;
 138    assert(LLVMGetTypeKind(LLVMTypeOf(ptr)) == LLVMPointerTypeKind);
 139    element_ptr = LLVMBuildGEP(builder, ptr, &index, 1, "");
 140    res = LLVMBuildLoad(builder, element_ptr, "");
 141 #ifdef DEBUG
 142    lp_build_name(res, "%s[%s]", LLVMGetValueName(ptr), LLVMGetValueName(index));
 143 #endif
 144    return res;
 145 }
 146
 147
 148 void
 149 lp_build_pointer_set(LLVMBuilderRef builder,
 150                      LLVMValueRef ptr,
 151                      LLVMValueRef index,
 152                      LLVMValueRef value)
 153 {
 154    LLVMValueRef element_ptr;
 155    element_ptr = LLVMBuildGEP(builder, ptr, &index, 1, "");
 156    LLVMBuildStore(builder, value, element_ptr);
 157 }