1 /*
2 * CDDL HEADER START
3 *
4 * The contents of this file are subject to the terms of the
5 * Common Development and Distribution License (the "License").
6 * You may not use this file except in compliance with the License.
7 *
8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9 * or http://www.opensolaris.org/os/licensing.
10 * See the License for the specific language governing permissions
11 * and limitations under the License.
12 *
13 * When distributing Covered Code, include this CDDL HEADER in each
14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15 * If applicable, add the following below this CDDL HEADER, with the
16 * fields enclosed by brackets "[]" replaced with your own identifying
17 * information: Portions Copyright [yyyy] [name of copyright owner]
18 *
19 * CDDL HEADER END
20 */
21 /*
22 * Copyright 2007 Sun Microsystems, Inc. All rights reserved.
23 * Use is subject to license terms.
24 */
25
26 #include <sys/asm_linkage.h>
27 #include <sys/asm_misc.h>
28 #include <sys/regset.h>
29 #include <sys/panic.h>
30 #include <sys/ontrap.h>
31 #include <sys/privregs.h>
32 #include <sys/segments.h>
33 #include <sys/trap.h>
34
35 #if defined(__lint)
36 #include <sys/types.h>
37 #include <sys/systm.h>
38 #include <sys/thread.h>
39 #include <sys/archsystm.h>
40 #include <sys/byteorder.h>
41 #include <sys/dtrace.h>
42 #include <sys/x86_archext.h>
43 #else /* __lint */
44 #include "assym.h"
45 #endif /* __lint */
46
47 #if defined(__lint)
48
49 /*ARGSUSED*/
50 void
51 rd_idtr(desctbr_t *idtr)
52 {}
53
54 /*ARGSUSED*/
55 void
56 wr_idtr(desctbr_t *idtr)
57 {}
58
59 #else /* __lint */
60
61 #if defined(__amd64)
62
63 ENTRY_NP(rd_idtr)
64 sidt (%rdi)
65 ret
66 SET_SIZE(rd_idtr)
67
68 ENTRY_NP(wr_idtr)
69 lidt (%rdi)
70 ret
71 SET_SIZE(wr_idtr)
72
73 #elif defined(__i386)
74
75 ENTRY_NP(rd_idtr)
76 pushl %ebp
77 movl %esp, %ebp
78 movl 8(%ebp), %edx
79 sidt (%edx)
80 leave
81 ret
82 SET_SIZE(rd_idtr)
83
84 ENTRY_NP(wr_idtr)
85 pushl %ebp
86 movl %esp, %ebp
87 movl 8(%ebp), %edx
88 lidt (%edx)
89 leave
90 ret
91 SET_SIZE(wr_idtr)
92
93 #endif /* __i386 */
94 #endif /* __lint */
95
96 #if defined(__lint)
97
98 /*ARGSUSED*/
99 void
100 rd_gdtr(desctbr_t *gdtr)
101 {}
102
103 /*ARGSUSED*/
104 void
105 wr_gdtr(desctbr_t *gdtr)
106 {}
107
108 #else /* __lint */
109
110 #if defined(__amd64)
111
112 ENTRY_NP(rd_gdtr)
113 pushq %rbp
114 movq %rsp, %rbp
115 sgdt (%rdi)
116 leave
117 ret
118 SET_SIZE(rd_gdtr)
119
120 ENTRY_NP(wr_gdtr)
121 pushq %rbp
122 movq %rsp, %rbp
123 lgdt (%rdi)
124 jmp 1f
125 nop
126 1:
127 leave
128 ret
129 SET_SIZE(wr_gdtr)
130
131 #elif defined(__i386)
132
133 ENTRY_NP(rd_gdtr)
134 pushl %ebp
135 movl %esp, %ebp
136 movl 8(%ebp), %edx
137 sgdt (%edx)
138 leave
139 ret
140 SET_SIZE(rd_gdtr)
141
142 ENTRY_NP(wr_gdtr)
143 pushl %ebp
144 movl %esp, %ebp
145 movl 8(%ebp), %edx
146 lgdt (%edx)
147 jmp 1f
148 nop
149 1:
150 leave
151 ret
152 SET_SIZE(wr_gdtr)
153
154 #endif /* __i386 */
155 #endif /* __lint */
156
157 #if defined(__amd64)
158 #if defined(__lint)
159
160 /*ARGSUSED*/
161 void
162 load_segment_registers(selector_t cs, selector_t fs, selector_t gs,
163 selector_t ss)
164 {}
165
166 selector_t
167 get_cs_register()
168 { return (0); }
169
170 #else /* __lint */
171
172 /*
173 * loads zero selector for ds and es.
174 */
175 ENTRY_NP(load_segment_registers)
176 pushq %rbp
177 movq %rsp, %rbp
178 pushq %rdi
179 pushq $.newcs
180 lretq
181 .newcs:
182 /*
183 * zero %ds and %es - they're ignored anyway
184 */
185 xorl %eax, %eax
186 movw %ax, %ds
187 movw %ax, %es
188 movl %esi, %eax
189 movw %ax, %fs
190 movl %edx, %eax
191 movw %ax, %gs
192 movl %ecx, %eax
193 movw %ax, %ss
194 leave
195 ret
196 SET_SIZE(load_segment_registers)
197
198 ENTRY_NP(get_cs_register)
199 movq %cs, %rax
200 ret
201 SET_SIZE(get_cs_register)
202
203 #endif /* __lint */
204 #elif defined(__i386)
205
206 #if defined(__lint)
207
208 /*ARGSUSED*/
209 void
210 load_segment_registers(
211 selector_t cs, selector_t ds, selector_t es,
212 selector_t fs, selector_t gs, selector_t ss)
213 {}
214
215 selector_t
216 get_cs_register()
217 { return ((selector_t) 0); }
218
219 #else /* __lint */
220
221 ENTRY_NP(load_segment_registers)
222 pushl %ebp
223 movl %esp, %ebp
224
225 pushl 0x8(%ebp)
226 pushl $.newcs
227 lret
228 .newcs:
229 movw 0xc(%ebp), %ax
230 movw %ax, %ds
231 movw 0x10(%ebp), %ax
232 movw %ax, %es
233 movw 0x14(%ebp), %ax
234 movw %ax, %fs
235 movw 0x18(%ebp), %ax
236 movw %ax, %gs
237 movw 0x1c(%ebp), %ax
238 movw %ax, %ss
239 leave
240 ret
241 SET_SIZE(load_segment_registers)
242
243 ENTRY_NP(get_cs_register)
244 movl $0, %eax
245 movw %cs, %ax
246 ret
247 SET_SIZE(get_cs_register)
248
249 #endif /* __lint */
250 #endif /* __i386 */
251
252 #if defined(__lint)
253
254 /*ARGSUSED*/
255 void
256 wr_ldtr(selector_t ldtsel)
257 {}
258
259 selector_t
260 rd_ldtr(void)
261 { return (0); }
262
263 #else /* __lint */
264
265 #if defined(__amd64)
266
267 ENTRY_NP(wr_ldtr)
268 movq %rdi, %rax
269 lldt %ax
270 ret
271 SET_SIZE(wr_ldtr)
272
273 ENTRY_NP(rd_ldtr)
274 xorl %eax, %eax
275 sldt %ax
276 ret
277 SET_SIZE(rd_ldtr)
278
279 #elif defined(__i386)
280
281 ENTRY_NP(wr_ldtr)
282 movw 4(%esp), %ax
283 lldt %ax
284 ret
285 SET_SIZE(wr_ldtr)
286
287 ENTRY_NP(rd_ldtr)
288 xorl %eax, %eax
289 sldt %ax
290 ret
291 SET_SIZE(rd_ldtr)
292
293 #endif /* __i386 */
294 #endif /* __lint */
295
296 #if defined(__lint)
297
298 /*ARGSUSED*/
299 void
300 wr_tsr(selector_t tsssel)
301 {}
302
303 #else /* __lint */
304
305 #if defined(__amd64)
306
307 ENTRY_NP(wr_tsr)
308 movq %rdi, %rax
309 ltr %ax
310 ret
311 SET_SIZE(wr_tsr)
312
313 #elif defined(__i386)
314
315 ENTRY_NP(wr_tsr)
316 movw 4(%esp), %ax
317 ltr %ax
318 ret
319 SET_SIZE(wr_tsr)
320
321 #endif /* __i386 */
322 #endif /* __lint */