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 /*
23 * Copyright 2006 Sun Microsystems, Inc. All rights reserved.
24 * Use is subject to license terms.
25 */
26
27 #pragma ident "%Z%%M% %I% %E% SMI"
28
29 #include <sys/types.h>
30 #include <sys/mkdev.h>
31 #include <sys/regset.h>
32 #include <string.h>
33
34 #if defined(__amd64)
35 #include <sys/fp.h>
36 #include <ieeefp.h>
37 #endif
38
39 #include "P32ton.h"
40
41 dev_t
42 prexpldev(dev32_t d)
43 {
44 if (d != (dev32_t)-1L)
45 return (makedev((d >> NBITSMINOR32) & MAXMAJ32, d & MAXMIN32));
46
47 return ((dev_t)PRNODEV);
48 }
49
50
51 dev32_t
52 prcmpldev(dev_t d)
53 {
54 #ifdef _LP64
55 if (d == PRNODEV) {
56 return (PRNODEV32);
57 } else {
58 major_t maj = major(d);
59 minor_t min = minor(d);
60
61 if (maj == (major_t)PRNODEV || min == (minor_t)PRNODEV)
62 return (PRNODEV32);
63
64 return ((dev32_t)((maj << NBITSMINOR32) | min));
65 }
66 #else
67 return ((dev32_t)d);
68 #endif
69 }
70
71 #ifdef _LP64
72
73 void
74 timestruc_32_to_n(const timestruc32_t *src, timestruc_t *dst)
75 {
76 dst->tv_sec = (time_t)(uint32_t)src->tv_sec;
77 dst->tv_nsec = (long)(uint32_t)src->tv_nsec;
78 }
79
80 void
81 stack_32_to_n(const stack32_t *src, stack_t *dst)
82 {
83 dst->ss_sp = (caddr_t)(uintptr_t)src->ss_sp;
84 dst->ss_size = src->ss_size;
85 dst->ss_flags = src->ss_flags;
86 }
87
88 void
89 sigaction_32_to_n(const struct sigaction32 *src, struct sigaction *dst)
90 {
91 (void) memset(dst, 0, sizeof (struct sigaction));
92 dst->sa_flags = src->sa_flags;
93 dst->sa_handler = (void (*)())(uintptr_t)src->sa_handler;
94 (void) memcpy(&dst->sa_mask, &src->sa_mask, sizeof (dst->sa_mask));
95 }
96
97 void
98 siginfo_32_to_n(const siginfo32_t *src, siginfo_t *dst)
99 {
100 (void) memset(dst, 0, sizeof (siginfo_t));
101
102 /*
103 * The absolute minimum content is si_signo and si_code.
104 */
105 dst->si_signo = src->si_signo;
106 if ((dst->si_code = src->si_code) == SI_NOINFO)
107 return;
108
109 /*
110 * A siginfo generated by user level is structured
111 * differently from one generated by the kernel.
112 */
113 if (SI_FROMUSER(src)) {
114 dst->si_pid = src->si_pid;
115 dst->si_ctid = src->si_ctid;
116 dst->si_zoneid = src->si_zoneid;
117 dst->si_uid = src->si_uid;
118 if (SI_CANQUEUE(src->si_code)) {
119 dst->si_value.sival_int =
120 (long)(uint32_t)src->si_value.sival_int;
121 }
122 return;
123 }
124
125 dst->si_errno = src->si_errno;
126
127 switch (src->si_signo) {
128 default:
129 dst->si_pid = src->si_pid;
130 dst->si_ctid = src->si_ctid;
131 dst->si_zoneid = src->si_zoneid;
132 dst->si_uid = src->si_uid;
133 dst->si_value.sival_int =
134 (long)(uint32_t)src->si_value.sival_int;
135 break;
136 case SIGCLD:
137 dst->si_pid = src->si_pid;
138 dst->si_ctid = src->si_ctid;
139 dst->si_zoneid = src->si_zoneid;
140 dst->si_status = src->si_status;
141 dst->si_stime = src->si_stime;
142 dst->si_utime = src->si_utime;
143 break;
144 case SIGSEGV:
145 case SIGBUS:
146 case SIGILL:
147 case SIGTRAP:
148 case SIGFPE:
149 case SIGEMT:
150 dst->si_addr = (void *)(uintptr_t)src->si_addr;
151 dst->si_trapno = src->si_trapno;
152 dst->si_pc = (void *)(uintptr_t)src->si_pc;
153 break;
154 case SIGPOLL:
155 case SIGXFSZ:
156 dst->si_fd = src->si_fd;
157 dst->si_band = src->si_band;
158 break;
159 case SIGPROF:
160 dst->si_faddr = (void *)(uintptr_t)src->si_faddr;
161 dst->si_tstamp.tv_sec = src->si_tstamp.tv_sec;
162 dst->si_tstamp.tv_nsec = src->si_tstamp.tv_nsec;
163 dst->si_syscall = src->si_syscall;
164 dst->si_nsysarg = src->si_nsysarg;
165 dst->si_fault = src->si_fault;
166 break;
167 }
168 }
169
170 void
171 auxv_32_to_n(const auxv32_t *src, auxv_t *dst)
172 {
173 /*
174 * This is a little sketchy: we have three types of values stored
175 * in an auxv (long, void *, and void (*)()) so the only sign-extension
176 * issue is with the long. We could case on all possible AT_* types,
177 * but this seems silly since currently none of the types which use
178 * a_un.a_val actually use negative numbers as a value. For this
179 * reason, it seems simpler to just do an unsigned expansion for now.
180 */
181 dst->a_type = src->a_type;
182 dst->a_un.a_ptr = (void *)(uintptr_t)src->a_un.a_ptr;
183 }
184
185 #if defined(__sparc)
186 void
187 rwindow_32_to_n(const struct rwindow32 *src, struct rwindow *dst)
188 {
189 int i;
190
191 for (i = 0; i < 8; i++) {
192 dst->rw_local[i] = (uint64_t)(uint32_t)src->rw_local[i];
193 dst->rw_in[i] = (uint64_t)(uint32_t)src->rw_in[i];
194 }
195 }
196
197 void
198 gwindows_32_to_n(const gwindows32_t *src, gwindows_t *dst)
199 {
200 int i;
201
202 (void) memset(dst, 0, sizeof (gwindows_t));
203 dst->wbcnt = src->wbcnt;
204
205 for (i = 0; i < src->wbcnt; i++) {
206 if (src->spbuf[i] != 0) {
207 rwindow_32_to_n(&src->wbuf[i], &dst->wbuf[i]);
208 dst->spbuf[i] = (greg_t *)(uintptr_t)src->spbuf[i];
209 }
210 }
211 }
212 #endif /* __sparc */
213
214 void
215 prgregset_32_to_n(const prgreg32_t *src, prgreg_t *dst)
216 {
217 #ifdef __amd64
218 (void) memset(dst, 0, NPRGREG * sizeof (prgreg_t));
219 dst[REG_GS] = (uint32_t)src[GS];
220 dst[REG_FS] = (uint32_t)src[FS];
221 dst[REG_DS] = (uint32_t)src[DS];
222 dst[REG_ES] = (uint32_t)src[ES];
223 dst[REG_RDI] = (uint32_t)src[EDI];
224 dst[REG_RSI] = (uint32_t)src[ESI];
225 dst[REG_RBP] = (uint32_t)src[EBP];
226 dst[REG_RBX] = (uint32_t)src[EBX];
227 dst[REG_RDX] = (uint32_t)src[EDX];
228 dst[REG_RCX] = (uint32_t)src[ECX];
229 dst[REG_RAX] = (uint32_t)src[EAX];
230 dst[REG_TRAPNO] = (uint32_t)src[TRAPNO];
231 dst[REG_ERR] = (uint32_t)src[ERR];
232 dst[REG_RIP] = (uint32_t)src[EIP];
233 dst[REG_CS] = (uint32_t)src[CS];
234 dst[REG_RFL] = (uint32_t)src[EFL];
235 dst[REG_RSP] = (uint32_t)src[UESP];
236 dst[REG_SS] = (uint32_t)src[SS];
237 #else
238 int i;
239
240 for (i = 0; i < NPRGREG; i++)
241 dst[i] = (prgreg_t)(uint32_t)src[i];
242 #endif
243 }
244
245 void
246 prfpregset_32_to_n(const prfpregset32_t *src, prfpregset_t *dst)
247 {
248 #if defined(__sparc)
249 int i;
250
251 (void) memset(dst, 0, sizeof (prfpregset_t));
252
253 for (i = 0; i < 32; i++)
254 dst->pr_fr.pr_regs[i] = src->pr_fr.pr_regs[i];
255
256 /*
257 * We deliberately do not convert pr_qcnt or pr_q because it is a long-
258 * standing /proc bug that this information is not exported, and another
259 * bug further caused these values to be returned as uninitialized data
260 * when the 64-bit kernel exported them for a 32-bit process with en=0.
261 */
262 dst->pr_filler = src->pr_filler;
263 dst->pr_fsr = src->pr_fsr;
264 dst->pr_q_entrysize = src->pr_q_entrysize;
265 dst->pr_en = src->pr_en;
266
267 #elif defined(__amd64)
268
269 struct _fpstate32 *src32 = (struct _fpstate32 *)src;
270 struct fpchip_state *dst64 = (struct fpchip_state *)dst;
271 int i;
272
273 (void) memcpy(dst64->st, src32->_st, sizeof (src32->_st));
274 (void) memcpy(dst64->xmm, src32->xmm, sizeof (src32->xmm));
275 (void) memset((caddr_t)dst64->xmm + sizeof (src32->xmm), 0,
276 sizeof (dst64->xmm) - sizeof (src32->xmm));
277 dst64->cw = (uint16_t)src32->cw;
278 dst64->sw = (uint16_t)src32->sw;
279 dst64->fop = 0;
280 dst64->rip = src32->ipoff;
281 dst64->rdp = src32->dataoff;
282 dst64->mxcsr = src32->mxcsr;
283 dst64->mxcsr_mask = 0;
284 dst64->status = src32->status;
285 dst64->xstatus = src32->xstatus;
286
287 /*
288 * Converting from the tag field to the compressed fctw is easy.
289 * If the two tag bits are 3, then the register is empty and we
290 * clear the bit in fctw. Otherwise we set the bit.
291 */
292
293 dst64->fctw = 0;
294 for (i = 0; i < 8; i++)
295 if (((src32->tag >> (i * 2)) & 3) != 3)
296 dst64->fctw |= 1 << i;
297 #else
298 #error "unrecognized ISA"
299 #endif
300 }
301
302 void
303 lwpstatus_32_to_n(const lwpstatus32_t *src, lwpstatus_t *dst)
304 {
305 int i;
306
307 dst->pr_flags = src->pr_flags;
308 dst->pr_lwpid = src->pr_lwpid;
309 dst->pr_why = src->pr_why;
310 dst->pr_what = src->pr_what;
311 dst->pr_cursig = src->pr_cursig;
312
313 siginfo_32_to_n(&src->pr_info, &dst->pr_info);
314
315 dst->pr_lwppend = src->pr_lwppend;
316 dst->pr_lwphold = src->pr_lwphold;
317
318 sigaction_32_to_n(&src->pr_action, &dst->pr_action);
319 stack_32_to_n(&src->pr_altstack, &dst->pr_altstack);
320
321 dst->pr_oldcontext = src->pr_oldcontext;
322 dst->pr_syscall = src->pr_syscall;
323 dst->pr_nsysarg = src->pr_nsysarg;
324 dst->pr_errno = src->pr_errno;
325
326 for (i = 0; i < PRSYSARGS; i++)
327 dst->pr_sysarg[i] = (long)(uint32_t)src->pr_sysarg[i];
328
329 dst->pr_rval1 = (long)(uint32_t)src->pr_rval1;
330 dst->pr_rval2 = (long)(uint32_t)src->pr_rval2;
331
332 (void) memcpy(&dst->pr_clname[0], &src->pr_clname[0], PRCLSZ);
333 timestruc_32_to_n(&src->pr_tstamp, &dst->pr_tstamp);
334
335 dst->pr_ustack = src->pr_ustack;
336 dst->pr_instr = src->pr_instr;
337
338 prgregset_32_to_n(src->pr_reg, dst->pr_reg);
339 prfpregset_32_to_n(&src->pr_fpreg, &dst->pr_fpreg);
340 }
341
342 void
343 pstatus_32_to_n(const pstatus32_t *src, pstatus_t *dst)
344 {
345 dst->pr_flags = src->pr_flags;
346 dst->pr_nlwp = src->pr_nlwp;
347 dst->pr_nzomb = src->pr_nzomb;
348 dst->pr_pid = src->pr_pid;
349 dst->pr_ppid = src->pr_ppid;
350 dst->pr_pgid = src->pr_pgid;
351 dst->pr_sid = src->pr_sid;
352 dst->pr_taskid = src->pr_taskid;
353 dst->pr_projid = src->pr_projid;
354 dst->pr_zoneid = src->pr_zoneid;
355 dst->pr_aslwpid = src->pr_aslwpid;
356 dst->pr_agentid = src->pr_agentid;
357 dst->pr_sigpend = src->pr_sigpend;
358 dst->pr_brkbase = src->pr_brkbase;
359 dst->pr_brksize = src->pr_brksize;
360 dst->pr_stkbase = src->pr_stkbase;
361 dst->pr_stksize = src->pr_stksize;
362
363 timestruc_32_to_n(&src->pr_utime, &dst->pr_utime);
364 timestruc_32_to_n(&src->pr_stime, &dst->pr_stime);
365 timestruc_32_to_n(&src->pr_cutime, &dst->pr_cutime);
366 timestruc_32_to_n(&src->pr_cstime, &dst->pr_cstime);
367
368 dst->pr_sigtrace = src->pr_sigtrace;
369 dst->pr_flttrace = src->pr_flttrace;
370 dst->pr_sysentry = src->pr_sysentry;
371 dst->pr_sysexit = src->pr_sysexit;
372 dst->pr_dmodel = src->pr_dmodel;
373
374 lwpstatus_32_to_n(&src->pr_lwp, &dst->pr_lwp);
375 }
376
377 void
378 lwpsinfo_32_to_n(const lwpsinfo32_t *src, lwpsinfo_t *dst)
379 {
380 dst->pr_flag = src->pr_flag;
381 dst->pr_lwpid = src->pr_lwpid;
382 dst->pr_addr = src->pr_addr;
383 dst->pr_wchan = src->pr_wchan;
384 dst->pr_stype = src->pr_stype;
385 dst->pr_state = src->pr_state;
386 dst->pr_sname = src->pr_sname;
387 dst->pr_nice = src->pr_nice;
388 dst->pr_syscall = src->pr_syscall;
389 dst->pr_oldpri = src->pr_oldpri;
390 dst->pr_cpu = src->pr_cpu;
391 dst->pr_pri = src->pr_pri;
392 dst->pr_pctcpu = src->pr_pctcpu;
393
394 timestruc_32_to_n(&src->pr_start, &dst->pr_start);
395 timestruc_32_to_n(&src->pr_time, &dst->pr_time);
396
397 (void) memcpy(&dst->pr_clname[0], &src->pr_clname[0], PRCLSZ);
398 (void) memcpy(&dst->pr_name[0], &src->pr_name[0], PRFNSZ);
399
400 dst->pr_onpro = src->pr_onpro;
401 dst->pr_bindpro = src->pr_bindpro;
402 dst->pr_bindpset = src->pr_bindpset;
403 dst->pr_lgrp = src->pr_lgrp;
404 }
405
406 void
407 psinfo_32_to_n(const psinfo32_t *src, psinfo_t *dst)
408 {
409 dst->pr_flag = src->pr_flag;
410 dst->pr_nlwp = src->pr_nlwp;
411 dst->pr_nzomb = src->pr_nzomb;
412 dst->pr_pid = src->pr_pid;
413 dst->pr_pgid = src->pr_pgid;
414 dst->pr_sid = src->pr_sid;
415 dst->pr_taskid = src->pr_taskid;
416 dst->pr_projid = src->pr_projid;
417 dst->pr_zoneid = src->pr_zoneid;
418 dst->pr_uid = src->pr_uid;
419 dst->pr_euid = src->pr_euid;
420 dst->pr_gid = src->pr_gid;
421 dst->pr_egid = src->pr_egid;
422 dst->pr_addr = src->pr_addr;
423 dst->pr_size = src->pr_size;
424 dst->pr_rssize = src->pr_rssize;
425
426 dst->pr_ttydev = prexpldev(src->pr_ttydev);
427
428 dst->pr_pctcpu = src->pr_pctcpu;
429 dst->pr_pctmem = src->pr_pctmem;
430
431 timestruc_32_to_n(&src->pr_start, &dst->pr_start);
432 timestruc_32_to_n(&src->pr_time, &dst->pr_time);
433 timestruc_32_to_n(&src->pr_ctime, &dst->pr_ctime);
434
435 (void) memcpy(&dst->pr_fname[0], &src->pr_fname[0], PRFNSZ);
436 (void) memcpy(&dst->pr_psargs[0], &src->pr_psargs[0], PRARGSZ);
437
438 dst->pr_wstat = src->pr_wstat;
439 dst->pr_argc = src->pr_argc;
440 dst->pr_argv = src->pr_argv;
441 dst->pr_envp = src->pr_envp;
442 dst->pr_dmodel = src->pr_dmodel;
443
444 lwpsinfo_32_to_n(&src->pr_lwp, &dst->pr_lwp);
445 }
446
447 void
448 timestruc_n_to_32(const timestruc_t *src, timestruc32_t *dst)
449 {
450 dst->tv_sec = (time32_t)src->tv_sec;
451 dst->tv_nsec = (int32_t)src->tv_nsec;
452 }
453
454 void
455 stack_n_to_32(const stack_t *src, stack32_t *dst)
456 {
457 dst->ss_sp = (caddr32_t)(uintptr_t)src->ss_sp;
458 dst->ss_size = src->ss_size;
459 dst->ss_flags = src->ss_flags;
460 }
461
462 void
463 sigaction_n_to_32(const struct sigaction *src, struct sigaction32 *dst)
464 {
465 (void) memset(dst, 0, sizeof (struct sigaction32));
466 dst->sa_flags = src->sa_flags;
467 dst->sa_handler = (caddr32_t)(uintptr_t)src->sa_handler;
468 (void) memcpy(&dst->sa_mask, &src->sa_mask, sizeof (dst->sa_mask));
469 }
470
471 void
472 siginfo_n_to_32(const siginfo_t *src, siginfo32_t *dst)
473 {
474 (void) memset(dst, 0, sizeof (siginfo32_t));
475
476 /*
477 * The absolute minimum content is si_signo and si_code.
478 */
479 dst->si_signo = src->si_signo;
480 if ((dst->si_code = src->si_code) == SI_NOINFO)
481 return;
482
483 /*
484 * A siginfo generated by user level is structured
485 * differently from one generated by the kernel.
486 */
487 if (SI_FROMUSER(src)) {
488 dst->si_pid = src->si_pid;
489 dst->si_ctid = src->si_ctid;
490 dst->si_zoneid = src->si_zoneid;
491 dst->si_uid = src->si_uid;
492 if (SI_CANQUEUE(src->si_code)) {
493 dst->si_value.sival_int =
494 (int32_t)src->si_value.sival_int;
495 }
496 return;
497 }
498
499 dst->si_errno = src->si_errno;
500
501 switch (src->si_signo) {
502 default:
503 dst->si_pid = src->si_pid;
504 dst->si_ctid = src->si_ctid;
505 dst->si_zoneid = src->si_zoneid;
506 dst->si_uid = src->si_uid;
507 dst->si_value.sival_int =
508 (int32_t)src->si_value.sival_int;
509 break;
510 case SIGCLD:
511 dst->si_pid = src->si_pid;
512 dst->si_ctid = src->si_ctid;
513 dst->si_zoneid = src->si_zoneid;
514 dst->si_status = src->si_status;
515 dst->si_stime = src->si_stime;
516 dst->si_utime = src->si_utime;
517 break;
518 case SIGSEGV:
519 case SIGBUS:
520 case SIGILL:
521 case SIGTRAP:
522 case SIGFPE:
523 case SIGEMT:
524 dst->si_addr = (caddr32_t)(uintptr_t)src->si_addr;
525 dst->si_trapno = src->si_trapno;
526 dst->si_pc = (caddr32_t)(uintptr_t)src->si_pc;
527 break;
528 case SIGPOLL:
529 case SIGXFSZ:
530 dst->si_fd = src->si_fd;
531 dst->si_band = src->si_band;
532 break;
533 case SIGPROF:
534 dst->si_faddr = (caddr32_t)(uintptr_t)src->si_faddr;
535 dst->si_tstamp.tv_sec = src->si_tstamp.tv_sec;
536 dst->si_tstamp.tv_nsec = src->si_tstamp.tv_nsec;
537 dst->si_syscall = src->si_syscall;
538 dst->si_nsysarg = src->si_nsysarg;
539 dst->si_fault = src->si_fault;
540 break;
541 }
542 }
543
544 void
545 auxv_n_to_32(const auxv_t *src, auxv32_t *dst)
546 {
547 dst->a_type = src->a_type;
548 dst->a_un.a_ptr = (caddr32_t)(uintptr_t)src->a_un.a_ptr;
549 }
550
551 void
552 prgregset_n_to_32(const prgreg_t *src, prgreg32_t *dst)
553 {
554 #ifdef __amd64
555 (void) memset(dst, 0, NPRGREG32 * sizeof (prgreg32_t));
556 dst[GS] = src[REG_GS];
557 dst[FS] = src[REG_FS];
558 dst[DS] = src[REG_DS];
559 dst[ES] = src[REG_ES];
560 dst[EDI] = src[REG_RDI];
561 dst[ESI] = src[REG_RSI];
562 dst[EBP] = src[REG_RBP];
563 dst[EBX] = src[REG_RBX];
564 dst[EDX] = src[REG_RDX];
565 dst[ECX] = src[REG_RCX];
566 dst[EAX] = src[REG_RAX];
567 dst[TRAPNO] = src[REG_TRAPNO];
568 dst[ERR] = src[REG_ERR];
569 dst[EIP] = src[REG_RIP];
570 dst[CS] = src[REG_CS];
571 dst[EFL] = src[REG_RFL];
572 dst[UESP] = src[REG_RSP];
573 dst[SS] = src[REG_SS];
574 #else
575 int i;
576
577 for (i = 0; i < NPRGREG; i++)
578 dst[i] = (prgreg32_t)src[i];
579 #endif
580 }
581
582 void
583 prfpregset_n_to_32(const prfpregset_t *src, prfpregset32_t *dst)
584 {
585 #if defined(__sparc)
586 int i;
587
588 (void) memset(dst, 0, sizeof (prfpregset32_t));
589
590 for (i = 0; i < 32; i++)
591 dst->pr_fr.pr_regs[i] = src->pr_fr.pr_regs[i];
592
593 dst->pr_filler = src->pr_filler;
594 dst->pr_fsr = src->pr_fsr;
595 dst->pr_q_entrysize = src->pr_q_entrysize;
596 dst->pr_en = src->pr_en;
597
598 #elif defined(__amd64)
599
600 struct _fpstate32 *dst32 = (struct _fpstate32 *)dst;
601 struct fpchip_state *src64 = (struct fpchip_state *)src;
602 uint32_t top;
603 int i;
604
605 (void) memcpy(dst32->_st, src64->st, sizeof (dst32->_st));
606 (void) memcpy(dst32->xmm, src64->xmm, sizeof (dst32->xmm));
607 dst32->cw = src64->cw;
608 dst32->sw = src64->sw;
609 dst32->ipoff = (unsigned int)src64->rip;
610 dst32->cssel = 0;
611 dst32->dataoff = (unsigned int)src64->rdp;
612 dst32->datasel = 0;
613 dst32->status = src64->status;
614 dst32->mxcsr = src64->mxcsr;
615 dst32->xstatus = src64->xstatus;
616
617 /*
618 * AMD64 stores the tag in a compressed form. It is
619 * necessary to extract the original 2-bit tag value.
620 * See AMD64 Architecture Programmer's Manual Volume 2:
621 * System Programming, Chapter 11.
622 */
623
624 top = (src64->sw & FPS_TOP) >> 11;
625 dst32->tag = 0;
626 for (i = 0; i < 8; i++) {
627 /*
628 * Recall that we need to use the current TOP-of-stack value to
629 * associate the _st[] index back to a physical register number,
630 * since tag word indices are physical register numbers. Then
631 * to get the tag value, we shift over two bits for each tag
632 * index, and then grab the bottom two bits.
633 */
634 uint_t tag_index = (i + top) & 7;
635 uint_t tag_fctw = (src64->fctw >> tag_index) & 1;
636 uint_t tag_value;
637 uint_t exp;
638
639 /*
640 * Union for overlaying _fpreg structure on to quad-precision
641 * floating-point value (long double).
642 */
643 union {
644 struct _fpreg reg;
645 long double ld;
646 } fpru;
647
648 fpru.ld = src64->st[i].__fpr_pad._q;
649 exp = fpru.reg.exponent & 0x7fff;
650
651 if (tag_fctw == 0) {
652 tag_value = 3; /* empty */
653 } else if (exp == 0) {
654 if (fpru.reg.significand[0] == 0 &&
655 fpru.reg.significand[1] == 0 &&
656 fpru.reg.significand[2] == 0 &&
657 fpru.reg.significand[3] == 0)
658 tag_value = 1; /* zero */
659 else
660 tag_value = 2; /* special: denormal */
661 } else if (exp == 0x7fff) {
662 tag_value = 2; /* special: infinity or NaN */
663 } else if (fpru.reg.significand[3] & 0x8000) {
664 tag_value = 0; /* valid */
665 } else {
666 tag_value = 2; /* special: unnormal */
667 }
668 dst32->tag |= tag_value << (tag_index * 2);
669 }
670 #else
671 #error "unrecognized ISA"
672 #endif
673 }
674
675 void
676 lwpstatus_n_to_32(const lwpstatus_t *src, lwpstatus32_t *dst)
677 {
678 int i;
679
680 dst->pr_flags = src->pr_flags;
681 dst->pr_lwpid = src->pr_lwpid;
682 dst->pr_why = src->pr_why;
683 dst->pr_what = src->pr_what;
684 dst->pr_cursig = src->pr_cursig;
685
686 siginfo_n_to_32(&src->pr_info, &dst->pr_info);
687
688 dst->pr_lwppend = src->pr_lwppend;
689 dst->pr_lwphold = src->pr_lwphold;
690
691 sigaction_n_to_32(&src->pr_action, &dst->pr_action);
692 stack_n_to_32(&src->pr_altstack, &dst->pr_altstack);
693
694 dst->pr_oldcontext = (caddr32_t)src->pr_oldcontext;
695 dst->pr_syscall = src->pr_syscall;
696 dst->pr_nsysarg = src->pr_nsysarg;
697 dst->pr_errno = src->pr_errno;
698
699 for (i = 0; i < PRSYSARGS; i++)
700 dst->pr_sysarg[i] = (int32_t)src->pr_sysarg[i];
701
702 dst->pr_rval1 = (int32_t)src->pr_rval1;
703 dst->pr_rval2 = (int32_t)src->pr_rval2;
704
705 (void) memcpy(&dst->pr_clname[0], &src->pr_clname[0], PRCLSZ);
706 timestruc_n_to_32(&src->pr_tstamp, &dst->pr_tstamp);
707
708 dst->pr_ustack = (caddr32_t)src->pr_ustack;
709 dst->pr_instr = src->pr_instr;
710
711 prgregset_n_to_32(src->pr_reg, dst->pr_reg);
712 prfpregset_n_to_32(&src->pr_fpreg, &dst->pr_fpreg);
713 }
714
715 void
716 pstatus_n_to_32(const pstatus_t *src, pstatus32_t *dst)
717 {
718 dst->pr_flags = src->pr_flags;
719 dst->pr_nlwp = src->pr_nlwp;
720 dst->pr_nzomb = src->pr_nzomb;
721 dst->pr_pid = (pid32_t)src->pr_pid;
722 dst->pr_ppid = (pid32_t)src->pr_ppid;
723 dst->pr_pgid = (pid32_t)src->pr_pgid;
724 dst->pr_sid = (pid32_t)src->pr_sid;
725 dst->pr_taskid = (id32_t)src->pr_taskid;
726 dst->pr_projid = (id32_t)src->pr_projid;
727 dst->pr_zoneid = (id32_t)src->pr_zoneid;
728 dst->pr_aslwpid = (id32_t)src->pr_aslwpid;
729 dst->pr_agentid = (id32_t)src->pr_agentid;
730 dst->pr_sigpend = src->pr_sigpend;
731 dst->pr_brkbase = (caddr32_t)src->pr_brkbase;
732 dst->pr_brksize = (size32_t)src->pr_brksize;
733 dst->pr_stkbase = (caddr32_t)src->pr_stkbase;
734 dst->pr_stksize = (size32_t)src->pr_stksize;
735
736 timestruc_n_to_32(&src->pr_utime, &dst->pr_utime);
737 timestruc_n_to_32(&src->pr_stime, &dst->pr_stime);
738 timestruc_n_to_32(&src->pr_cutime, &dst->pr_cutime);
739 timestruc_n_to_32(&src->pr_cstime, &dst->pr_cstime);
740
741 dst->pr_sigtrace = src->pr_sigtrace;
742 dst->pr_flttrace = src->pr_flttrace;
743 dst->pr_sysentry = src->pr_sysentry;
744 dst->pr_sysexit = src->pr_sysexit;
745 dst->pr_dmodel = src->pr_dmodel;
746
747 lwpstatus_n_to_32(&src->pr_lwp, &dst->pr_lwp);
748 }
749
750 void
751 lwpsinfo_n_to_32(const lwpsinfo_t *src, lwpsinfo32_t *dst)
752 {
753 dst->pr_flag = src->pr_flag;
754 dst->pr_lwpid = (id32_t)src->pr_lwpid;
755 dst->pr_addr = (caddr32_t)src->pr_addr;
756 dst->pr_wchan = (caddr32_t)src->pr_wchan;
757 dst->pr_stype = src->pr_stype;
758 dst->pr_state = src->pr_state;
759 dst->pr_sname = src->pr_sname;
760 dst->pr_nice = src->pr_nice;
761 dst->pr_syscall = src->pr_syscall;
762 dst->pr_oldpri = src->pr_oldpri;
763 dst->pr_cpu = src->pr_cpu;
764 dst->pr_pri = src->pr_pri;
765 dst->pr_pctcpu = src->pr_pctcpu;
766
767 timestruc_n_to_32(&src->pr_start, &dst->pr_start);
768 timestruc_n_to_32(&src->pr_time, &dst->pr_time);
769
770 (void) memcpy(&dst->pr_clname[0], &src->pr_clname[0], PRCLSZ);
771 (void) memcpy(&dst->pr_name[0], &src->pr_name[0], PRFNSZ);
772
773 dst->pr_onpro = src->pr_onpro;
774 dst->pr_bindpro = src->pr_bindpro;
775 dst->pr_bindpset = src->pr_bindpset;
776 dst->pr_lgrp = src->pr_lgrp;
777 }
778
779 void
780 psinfo_n_to_32(const psinfo_t *src, psinfo32_t *dst)
781 {
782 dst->pr_flag = src->pr_flag;
783 dst->pr_nlwp = src->pr_nlwp;
784 dst->pr_nzomb = src->pr_nzomb;
785 dst->pr_pid = (pid32_t)src->pr_pid;
786 dst->pr_pgid = (pid32_t)src->pr_pgid;
787 dst->pr_sid = (pid32_t)src->pr_sid;
788 dst->pr_taskid = (id32_t)src->pr_taskid;
789 dst->pr_projid = (id32_t)src->pr_projid;
790 dst->pr_zoneid = (id32_t)src->pr_zoneid;
791 dst->pr_uid = (uid32_t)src->pr_uid;
792 dst->pr_euid = (uid32_t)src->pr_euid;
793 dst->pr_gid = (gid32_t)src->pr_gid;
794 dst->pr_egid = (gid32_t)src->pr_egid;
795 dst->pr_addr = (caddr32_t)src->pr_addr;
796 dst->pr_size = (size32_t)src->pr_size;
797 dst->pr_rssize = (size32_t)src->pr_rssize;
798
799 dst->pr_ttydev = prcmpldev(src->pr_ttydev);
800
801 dst->pr_pctcpu = src->pr_pctcpu;
802 dst->pr_pctmem = src->pr_pctmem;
803
804 timestruc_n_to_32(&src->pr_start, &dst->pr_start);
805 timestruc_n_to_32(&src->pr_time, &dst->pr_time);
806 timestruc_n_to_32(&src->pr_ctime, &dst->pr_ctime);
807
808 (void) memcpy(&dst->pr_fname[0], &src->pr_fname[0], PRFNSZ);
809 (void) memcpy(&dst->pr_psargs[0], &src->pr_psargs[0], PRARGSZ);
810
811 dst->pr_wstat = src->pr_wstat;
812 dst->pr_argc = src->pr_argc;
813 dst->pr_argv = (caddr32_t)src->pr_argv;
814 dst->pr_envp = (caddr32_t)src->pr_envp;
815 dst->pr_dmodel = src->pr_dmodel;
816
817 lwpsinfo_n_to_32(&src->pr_lwp, &dst->pr_lwp);
818 }
819
820
821 #endif /* _LP64 */