• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
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_const.h"
41 #include "lp_bld_debug.h"
42 #include "lp_bld_struct.h"
43 
44 
45 LLVMValueRef
lp_build_struct_get_ptr(struct gallivm_state * gallivm,LLVMValueRef ptr,unsigned member,const char * name)46 lp_build_struct_get_ptr(struct gallivm_state *gallivm,
47                         LLVMValueRef ptr,
48                         unsigned member,
49                         const char *name)
50 {
51    LLVMValueRef indices[2];
52    LLVMValueRef member_ptr;
53    assert(LLVMGetTypeKind(LLVMTypeOf(ptr)) == LLVMPointerTypeKind);
54    assert(LLVMGetTypeKind(LLVMGetElementType(LLVMTypeOf(ptr))) == LLVMStructTypeKind);
55    indices[0] = lp_build_const_int32(gallivm, 0);
56    indices[1] = lp_build_const_int32(gallivm, member);
57    member_ptr = LLVMBuildGEP(gallivm->builder, ptr, indices, ARRAY_SIZE(indices), "");
58    lp_build_name(member_ptr, "%s.%s_ptr", LLVMGetValueName(ptr), name);
59    return member_ptr;
60 }
61 
62 
63 LLVMValueRef
lp_build_struct_get(struct gallivm_state * gallivm,LLVMValueRef ptr,unsigned member,const char * name)64 lp_build_struct_get(struct gallivm_state *gallivm,
65                     LLVMValueRef ptr,
66                     unsigned member,
67                     const char *name)
68 {
69    LLVMValueRef member_ptr;
70    LLVMValueRef res;
71    assert(LLVMGetTypeKind(LLVMTypeOf(ptr)) == LLVMPointerTypeKind);
72    assert(LLVMGetTypeKind(LLVMGetElementType(LLVMTypeOf(ptr))) == LLVMStructTypeKind);
73    member_ptr = lp_build_struct_get_ptr(gallivm, ptr, member, name);
74    res = LLVMBuildLoad(gallivm->builder, member_ptr, "");
75    lp_build_name(res, "%s.%s", LLVMGetValueName(ptr), name);
76    return res;
77 }
78 
79 
80 LLVMValueRef
lp_build_array_get_ptr(struct gallivm_state * gallivm,LLVMValueRef ptr,LLVMValueRef index)81 lp_build_array_get_ptr(struct gallivm_state *gallivm,
82                        LLVMValueRef ptr,
83                        LLVMValueRef index)
84 {
85    LLVMValueRef indices[2];
86    LLVMValueRef element_ptr;
87    assert(LLVMGetTypeKind(LLVMTypeOf(ptr)) == LLVMPointerTypeKind);
88    assert(LLVMGetTypeKind(LLVMGetElementType(LLVMTypeOf(ptr))) == LLVMArrayTypeKind);
89    indices[0] = lp_build_const_int32(gallivm, 0);
90    indices[1] = index;
91    element_ptr = LLVMBuildGEP(gallivm->builder, ptr, indices, ARRAY_SIZE(indices), "");
92 #ifdef DEBUG
93    lp_build_name(element_ptr, "&%s[%s]",
94                  LLVMGetValueName(ptr), LLVMGetValueName(index));
95 #endif
96    return element_ptr;
97 }
98 
99 
100 LLVMValueRef
lp_build_array_get(struct gallivm_state * gallivm,LLVMValueRef ptr,LLVMValueRef index)101 lp_build_array_get(struct gallivm_state *gallivm,
102                    LLVMValueRef ptr,
103                    LLVMValueRef index)
104 {
105    LLVMValueRef element_ptr;
106    LLVMValueRef res;
107    assert(LLVMGetTypeKind(LLVMTypeOf(ptr)) == LLVMPointerTypeKind);
108    assert(LLVMGetTypeKind(LLVMGetElementType(LLVMTypeOf(ptr))) == LLVMArrayTypeKind);
109    element_ptr = lp_build_array_get_ptr(gallivm, ptr, index);
110    res = LLVMBuildLoad(gallivm->builder, element_ptr, "");
111 #ifdef DEBUG
112    lp_build_name(res, "%s[%s]", LLVMGetValueName(ptr), LLVMGetValueName(index));
113 #endif
114    return res;
115 }
116 
117 
118 void
lp_build_array_set(struct gallivm_state * gallivm,LLVMValueRef ptr,LLVMValueRef index,LLVMValueRef value)119 lp_build_array_set(struct gallivm_state *gallivm,
120                    LLVMValueRef ptr,
121                    LLVMValueRef index,
122                    LLVMValueRef value)
123 {
124    LLVMValueRef element_ptr;
125    assert(LLVMGetTypeKind(LLVMTypeOf(ptr)) == LLVMPointerTypeKind);
126    assert(LLVMGetTypeKind(LLVMGetElementType(LLVMTypeOf(ptr))) == LLVMArrayTypeKind);
127    element_ptr = lp_build_array_get_ptr(gallivm, ptr, index);
128    LLVMBuildStore(gallivm->builder, value, element_ptr);
129 }
130 
131 
132 LLVMValueRef
lp_build_pointer_get(LLVMBuilderRef builder,LLVMValueRef ptr,LLVMValueRef index)133 lp_build_pointer_get(LLVMBuilderRef builder,
134                      LLVMValueRef ptr,
135                      LLVMValueRef index)
136 {
137    LLVMValueRef element_ptr;
138    LLVMValueRef res;
139    assert(LLVMGetTypeKind(LLVMTypeOf(ptr)) == LLVMPointerTypeKind);
140    element_ptr = LLVMBuildGEP(builder, ptr, &index, 1, "");
141    res = LLVMBuildLoad(builder, element_ptr, "");
142 #ifdef DEBUG
143    lp_build_name(res, "%s[%s]", LLVMGetValueName(ptr), LLVMGetValueName(index));
144 #endif
145    return res;
146 }
147 
148 
149 LLVMValueRef
lp_build_pointer_get_unaligned(LLVMBuilderRef builder,LLVMValueRef ptr,LLVMValueRef index,unsigned alignment)150 lp_build_pointer_get_unaligned(LLVMBuilderRef builder,
151                                LLVMValueRef ptr,
152                                LLVMValueRef index,
153                                unsigned alignment)
154 {
155    LLVMValueRef element_ptr;
156    LLVMValueRef res;
157    assert(LLVMGetTypeKind(LLVMTypeOf(ptr)) == LLVMPointerTypeKind);
158    element_ptr = LLVMBuildGEP(builder, ptr, &index, 1, "");
159    res = LLVMBuildLoad(builder, element_ptr, "");
160    LLVMSetAlignment(res, alignment);
161 #ifdef DEBUG
162    lp_build_name(res, "%s[%s]", LLVMGetValueName(ptr), LLVMGetValueName(index));
163 #endif
164    return res;
165 }
166 
167 
168 void
lp_build_pointer_set(LLVMBuilderRef builder,LLVMValueRef ptr,LLVMValueRef index,LLVMValueRef value)169 lp_build_pointer_set(LLVMBuilderRef builder,
170                      LLVMValueRef ptr,
171                      LLVMValueRef index,
172                      LLVMValueRef value)
173 {
174    LLVMValueRef element_ptr;
175    element_ptr = LLVMBuildGEP(builder, ptr, &index, 1, "");
176    LLVMBuildStore(builder, value, element_ptr);
177 }
178 
179 
180 void
lp_build_pointer_set_unaligned(LLVMBuilderRef builder,LLVMValueRef ptr,LLVMValueRef index,LLVMValueRef value,unsigned alignment)181 lp_build_pointer_set_unaligned(LLVMBuilderRef builder,
182                                LLVMValueRef ptr,
183                                LLVMValueRef index,
184                                LLVMValueRef value,
185                                unsigned alignment)
186 {
187    LLVMValueRef element_ptr;
188    LLVMValueRef instr;
189    element_ptr = LLVMBuildGEP(builder, ptr, &index, 1, "");
190    instr = LLVMBuildStore(builder, value, element_ptr);
191    LLVMSetAlignment(instr, alignment);
192 }
193