xref: /illumos-gate/usr/src/lib/libproc/common/P32ton.c (revision b0fe7b8fa79924061f3bdf7f240ea116c2c0b704)
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 */
822