17c478bd9Sstevel@tonic-gate /* 27c478bd9Sstevel@tonic-gate * CDDL HEADER START 37c478bd9Sstevel@tonic-gate * 47c478bd9Sstevel@tonic-gate * The contents of this file are subject to the terms of the 57c478bd9Sstevel@tonic-gate * Common Development and Distribution License, Version 1.0 only 67c478bd9Sstevel@tonic-gate * (the "License"). You may not use this file except in compliance 77c478bd9Sstevel@tonic-gate * with the License. 87c478bd9Sstevel@tonic-gate * 97c478bd9Sstevel@tonic-gate * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 107c478bd9Sstevel@tonic-gate * or http://www.opensolaris.org/os/licensing. 117c478bd9Sstevel@tonic-gate * See the License for the specific language governing permissions 127c478bd9Sstevel@tonic-gate * and limitations under the License. 137c478bd9Sstevel@tonic-gate * 147c478bd9Sstevel@tonic-gate * When distributing Covered Code, include this CDDL HEADER in each 157c478bd9Sstevel@tonic-gate * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 167c478bd9Sstevel@tonic-gate * If applicable, add the following below this CDDL HEADER, with the 177c478bd9Sstevel@tonic-gate * fields enclosed by brackets "[]" replaced with your own identifying 187c478bd9Sstevel@tonic-gate * information: Portions Copyright [yyyy] [name of copyright owner] 197c478bd9Sstevel@tonic-gate * 207c478bd9Sstevel@tonic-gate * CDDL HEADER END 217c478bd9Sstevel@tonic-gate */ 227c478bd9Sstevel@tonic-gate /* 237c478bd9Sstevel@tonic-gate * Copyright 2004 Sun Microsystems, Inc. All rights reserved. 247c478bd9Sstevel@tonic-gate * Use is subject to license terms. 257c478bd9Sstevel@tonic-gate */ 260a47c91cSRobert Mustacchi /* 27*161294feSRobert Mustacchi * Copyright (c) 2018, Joyent, Inc. 280a47c91cSRobert Mustacchi */ 297c478bd9Sstevel@tonic-gate 307c478bd9Sstevel@tonic-gate /* 317c478bd9Sstevel@tonic-gate * User Process Target Intel 32-bit component 327c478bd9Sstevel@tonic-gate * 337c478bd9Sstevel@tonic-gate * This file provides the ISA-dependent portion of the user process target. 347c478bd9Sstevel@tonic-gate * For more details on the implementation refer to mdb_proc.c. 357c478bd9Sstevel@tonic-gate */ 367c478bd9Sstevel@tonic-gate 377c478bd9Sstevel@tonic-gate #include <mdb/mdb_proc.h> 387c478bd9Sstevel@tonic-gate #include <mdb/mdb_kreg.h> 397c478bd9Sstevel@tonic-gate #include <mdb/mdb_err.h> 407c478bd9Sstevel@tonic-gate #include <mdb/mdb_amd64util.h> 417c478bd9Sstevel@tonic-gate #include <mdb/mdb.h> 427c478bd9Sstevel@tonic-gate 438f88a51fSJoshua M. Clulow #include <sys/ucontext.h> 447c478bd9Sstevel@tonic-gate #include <sys/frame.h> 457c478bd9Sstevel@tonic-gate #include <libproc.h> 467c478bd9Sstevel@tonic-gate #include <sys/fp.h> 477c478bd9Sstevel@tonic-gate #include <ieeefp.h> 487c478bd9Sstevel@tonic-gate 498f88a51fSJoshua M. Clulow #include <stddef.h> 508f88a51fSJoshua M. Clulow 517c478bd9Sstevel@tonic-gate const mdb_tgt_regdesc_t pt_regdesc[] = { 527c478bd9Sstevel@tonic-gate { "r15", REG_R15, MDB_TGT_R_EXPORT }, 530a47c91cSRobert Mustacchi { "r15d", REG_R15, MDB_TGT_R_EXPORT | MDB_TGT_R_32 }, 540a47c91cSRobert Mustacchi { "r15w", REG_R15, MDB_TGT_R_EXPORT | MDB_TGT_R_16 }, 550a47c91cSRobert Mustacchi { "r15l", REG_R15, MDB_TGT_R_EXPORT | MDB_TGT_R_8L }, 567c478bd9Sstevel@tonic-gate { "r14", REG_R14, MDB_TGT_R_EXPORT }, 570a47c91cSRobert Mustacchi { "r14d", REG_R14, MDB_TGT_R_EXPORT | MDB_TGT_R_32 }, 580a47c91cSRobert Mustacchi { "r14w", REG_R14, MDB_TGT_R_EXPORT | MDB_TGT_R_16 }, 590a47c91cSRobert Mustacchi { "r14l", REG_R14, MDB_TGT_R_EXPORT | MDB_TGT_R_8L }, 607c478bd9Sstevel@tonic-gate { "r13", REG_R13, MDB_TGT_R_EXPORT }, 610a47c91cSRobert Mustacchi { "r13d", REG_R13, MDB_TGT_R_EXPORT | MDB_TGT_R_32 }, 620a47c91cSRobert Mustacchi { "r13w", REG_R13, MDB_TGT_R_EXPORT | MDB_TGT_R_16 }, 630a47c91cSRobert Mustacchi { "r13l", REG_R13, MDB_TGT_R_EXPORT | MDB_TGT_R_8L }, 647c478bd9Sstevel@tonic-gate { "r12", REG_R12, MDB_TGT_R_EXPORT }, 650a47c91cSRobert Mustacchi { "r12d", REG_R12, MDB_TGT_R_EXPORT | MDB_TGT_R_32 }, 660a47c91cSRobert Mustacchi { "r12w", REG_R12, MDB_TGT_R_EXPORT | MDB_TGT_R_16 }, 670a47c91cSRobert Mustacchi { "r12l", REG_R12, MDB_TGT_R_EXPORT | MDB_TGT_R_8L }, 687c478bd9Sstevel@tonic-gate { "r11", REG_R11, MDB_TGT_R_EXPORT }, 690a47c91cSRobert Mustacchi { "r11d", REG_R11, MDB_TGT_R_EXPORT | MDB_TGT_R_32 }, 700a47c91cSRobert Mustacchi { "r11w", REG_R11, MDB_TGT_R_EXPORT | MDB_TGT_R_16 }, 710a47c91cSRobert Mustacchi { "r11l", REG_R11, MDB_TGT_R_EXPORT | MDB_TGT_R_8L }, 727c478bd9Sstevel@tonic-gate { "r10", REG_R10, MDB_TGT_R_EXPORT }, 730a47c91cSRobert Mustacchi { "r10d", REG_R10, MDB_TGT_R_EXPORT | MDB_TGT_R_32 }, 740a47c91cSRobert Mustacchi { "r10w", REG_R10, MDB_TGT_R_EXPORT | MDB_TGT_R_16 }, 750a47c91cSRobert Mustacchi { "r10l", REG_R10, MDB_TGT_R_EXPORT | MDB_TGT_R_8L }, 767c478bd9Sstevel@tonic-gate { "r9", REG_R9, MDB_TGT_R_EXPORT }, 77*161294feSRobert Mustacchi { "r9d", REG_R9, MDB_TGT_R_EXPORT | MDB_TGT_R_32 }, 78*161294feSRobert Mustacchi { "r9w", REG_R9, MDB_TGT_R_EXPORT | MDB_TGT_R_16 }, 79*161294feSRobert Mustacchi { "r9l", REG_R9, MDB_TGT_R_EXPORT | MDB_TGT_R_8L }, 807c478bd9Sstevel@tonic-gate { "r8", REG_R8, MDB_TGT_R_EXPORT }, 810a47c91cSRobert Mustacchi { "r8d", REG_R8, MDB_TGT_R_EXPORT | MDB_TGT_R_32 }, 820a47c91cSRobert Mustacchi { "r8w", REG_R8, MDB_TGT_R_EXPORT | MDB_TGT_R_16 }, 830a47c91cSRobert Mustacchi { "r8l", REG_R8, MDB_TGT_R_EXPORT | MDB_TGT_R_8L }, 847c478bd9Sstevel@tonic-gate { "rdi", REG_RDI, MDB_TGT_R_EXPORT }, 850a47c91cSRobert Mustacchi { "edi", REG_RDI, MDB_TGT_R_EXPORT | MDB_TGT_R_32 }, 860a47c91cSRobert Mustacchi { "di", REG_RDI, MDB_TGT_R_EXPORT | MDB_TGT_R_16 }, 870a47c91cSRobert Mustacchi { "dil", REG_RDI, MDB_TGT_R_EXPORT | MDB_TGT_R_8L }, 887c478bd9Sstevel@tonic-gate { "rsi", REG_RSI, MDB_TGT_R_EXPORT }, 890a47c91cSRobert Mustacchi { "esi", REG_RSI, MDB_TGT_R_EXPORT | MDB_TGT_R_32 }, 900a47c91cSRobert Mustacchi { "si", REG_RSI, MDB_TGT_R_EXPORT | MDB_TGT_R_16 }, 910a47c91cSRobert Mustacchi { "sil", REG_RSI, MDB_TGT_R_EXPORT | MDB_TGT_R_8L }, 927c478bd9Sstevel@tonic-gate { "rbp", REG_RBP, MDB_TGT_R_EXPORT }, 930a47c91cSRobert Mustacchi { "ebp", REG_RBP, MDB_TGT_R_EXPORT | MDB_TGT_R_32 }, 940a47c91cSRobert Mustacchi { "bp", REG_RBP, MDB_TGT_R_EXPORT | MDB_TGT_R_16 }, 950a47c91cSRobert Mustacchi { "bpl", REG_RBP, MDB_TGT_R_EXPORT | MDB_TGT_R_8L }, 967c478bd9Sstevel@tonic-gate { "rbx", REG_RBX, MDB_TGT_R_EXPORT }, 970a47c91cSRobert Mustacchi { "ebx", REG_RBX, MDB_TGT_R_EXPORT | MDB_TGT_R_32 }, 980a47c91cSRobert Mustacchi { "bx", REG_RBX, MDB_TGT_R_EXPORT | MDB_TGT_R_16 }, 990a47c91cSRobert Mustacchi { "bh", REG_RBX, MDB_TGT_R_EXPORT | MDB_TGT_R_8H }, 1000a47c91cSRobert Mustacchi { "bl", REG_RBX, MDB_TGT_R_EXPORT | MDB_TGT_R_8L }, 1017c478bd9Sstevel@tonic-gate { "rdx", REG_RDX, MDB_TGT_R_EXPORT }, 1020a47c91cSRobert Mustacchi { "edx", REG_RDX, MDB_TGT_R_EXPORT | MDB_TGT_R_32 }, 1030a47c91cSRobert Mustacchi { "dx", REG_RDX, MDB_TGT_R_EXPORT | MDB_TGT_R_16 }, 1040a47c91cSRobert Mustacchi { "dh", REG_RDX, MDB_TGT_R_EXPORT | MDB_TGT_R_8H }, 1050a47c91cSRobert Mustacchi { "dl", REG_RDX, MDB_TGT_R_EXPORT | MDB_TGT_R_8L }, 1067c478bd9Sstevel@tonic-gate { "rcx", REG_RCX, MDB_TGT_R_EXPORT }, 1070a47c91cSRobert Mustacchi { "ecx", REG_RCX, MDB_TGT_R_EXPORT | MDB_TGT_R_32 }, 1080a47c91cSRobert Mustacchi { "cx", REG_RCX, MDB_TGT_R_EXPORT | MDB_TGT_R_16 }, 1090a47c91cSRobert Mustacchi { "ch", REG_RCX, MDB_TGT_R_EXPORT | MDB_TGT_R_8H }, 1100a47c91cSRobert Mustacchi { "cl", REG_RCX, MDB_TGT_R_EXPORT | MDB_TGT_R_8L }, 1117c478bd9Sstevel@tonic-gate { "rax", REG_RAX, MDB_TGT_R_EXPORT }, 1120a47c91cSRobert Mustacchi { "eax", REG_RAX, MDB_TGT_R_EXPORT | MDB_TGT_R_32 }, 1130a47c91cSRobert Mustacchi { "ax", REG_RAX, MDB_TGT_R_EXPORT | MDB_TGT_R_16 }, 1140a47c91cSRobert Mustacchi { "ah", REG_RAX, MDB_TGT_R_EXPORT | MDB_TGT_R_8H }, 1150a47c91cSRobert Mustacchi { "al", REG_RAX, MDB_TGT_R_EXPORT | MDB_TGT_R_8L }, 1167c478bd9Sstevel@tonic-gate { "trapno", REG_TRAPNO, MDB_TGT_R_EXPORT }, 1177c478bd9Sstevel@tonic-gate { "err", REG_ERR, MDB_TGT_R_EXPORT }, 1187c478bd9Sstevel@tonic-gate { "rip", REG_RIP, MDB_TGT_R_EXPORT }, 1197c478bd9Sstevel@tonic-gate { "cs", REG_CS, MDB_TGT_R_EXPORT }, 1207c478bd9Sstevel@tonic-gate { "rflags", REG_RFL, MDB_TGT_R_EXPORT }, 1210a47c91cSRobert Mustacchi { "eflags", REG_RFL, MDB_TGT_R_EXPORT | MDB_TGT_R_32 }, 1227c478bd9Sstevel@tonic-gate { "rsp", REG_RSP, MDB_TGT_R_EXPORT }, 1230a47c91cSRobert Mustacchi { "esp", REG_RSP, MDB_TGT_R_EXPORT | MDB_TGT_R_32 }, 1240a47c91cSRobert Mustacchi { "sp", REG_RSP, MDB_TGT_R_EXPORT | MDB_TGT_R_16 }, 1250a47c91cSRobert Mustacchi { "spl", REG_RSP, MDB_TGT_R_EXPORT | MDB_TGT_R_8L }, 1267c478bd9Sstevel@tonic-gate { "ss", REG_SS, MDB_TGT_R_EXPORT }, 1277c478bd9Sstevel@tonic-gate { "fs", REG_FS, MDB_TGT_R_EXPORT }, 1287c478bd9Sstevel@tonic-gate { "gs", REG_GS, MDB_TGT_R_EXPORT }, 1297c478bd9Sstevel@tonic-gate { "es", REG_ES, MDB_TGT_R_EXPORT }, 1307c478bd9Sstevel@tonic-gate { "ds", REG_DS, MDB_TGT_R_EXPORT }, 1317c478bd9Sstevel@tonic-gate { "fsbase", REG_FSBASE, MDB_TGT_R_EXPORT }, 1327c478bd9Sstevel@tonic-gate { "gsbase", REG_GSBASE, MDB_TGT_R_EXPORT }, 1337c478bd9Sstevel@tonic-gate { NULL, 0, 0 } 1347c478bd9Sstevel@tonic-gate }; 1357c478bd9Sstevel@tonic-gate 1367c478bd9Sstevel@tonic-gate /* 1377c478bd9Sstevel@tonic-gate * We cannot rely on pr_instr, because if we hit a breakpoint or the user has 1387c478bd9Sstevel@tonic-gate * artifically modified memory, it will no longer be correct. 1397c478bd9Sstevel@tonic-gate */ 1407c478bd9Sstevel@tonic-gate static uint8_t 1417c478bd9Sstevel@tonic-gate pt_read_instr(mdb_tgt_t *t) 1427c478bd9Sstevel@tonic-gate { 1437c478bd9Sstevel@tonic-gate const lwpstatus_t *psp = &Pstatus(t->t_pshandle)->pr_lwp; 1447c478bd9Sstevel@tonic-gate uint8_t ret = 0; 1457c478bd9Sstevel@tonic-gate 1467c478bd9Sstevel@tonic-gate (void) mdb_tgt_vread(t, &ret, sizeof (ret), psp->pr_reg[REG_RIP]); 1477c478bd9Sstevel@tonic-gate 1487c478bd9Sstevel@tonic-gate return (ret); 1497c478bd9Sstevel@tonic-gate } 1507c478bd9Sstevel@tonic-gate 1517c478bd9Sstevel@tonic-gate /*ARGSUSED*/ 1527c478bd9Sstevel@tonic-gate int 1537c478bd9Sstevel@tonic-gate pt_regs(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) 1547c478bd9Sstevel@tonic-gate { 1557c478bd9Sstevel@tonic-gate mdb_tgt_t *t = mdb.m_target; 1567c478bd9Sstevel@tonic-gate mdb_tgt_tid_t tid; 1577c478bd9Sstevel@tonic-gate prgregset_t grs; 1587c478bd9Sstevel@tonic-gate prgreg_t rflags; 1598f88a51fSJoshua M. Clulow boolean_t from_ucontext = B_FALSE; 1607c478bd9Sstevel@tonic-gate 1618f88a51fSJoshua M. Clulow if (mdb_getopts(argc, argv, 1628f88a51fSJoshua M. Clulow 'u', MDB_OPT_SETBITS, B_TRUE, &from_ucontext, NULL) != argc) { 1637c478bd9Sstevel@tonic-gate return (DCMD_USAGE); 1648f88a51fSJoshua M. Clulow } 1658f88a51fSJoshua M. Clulow 1668f88a51fSJoshua M. Clulow if (from_ucontext) { 1678f88a51fSJoshua M. Clulow int off; 1688f88a51fSJoshua M. Clulow int o0, o1; 1698f88a51fSJoshua M. Clulow 1708f88a51fSJoshua M. Clulow if (!(flags & DCMD_ADDRSPEC)) { 1718f88a51fSJoshua M. Clulow mdb_warn("-u requires a ucontext_t address\n"); 1728f88a51fSJoshua M. Clulow return (DCMD_ERR); 1738f88a51fSJoshua M. Clulow } 1748f88a51fSJoshua M. Clulow 1758f88a51fSJoshua M. Clulow o0 = mdb_ctf_offsetof_by_name("ucontext_t", "uc_mcontext"); 1768f88a51fSJoshua M. Clulow o1 = mdb_ctf_offsetof_by_name("mcontext_t", "gregs"); 1778f88a51fSJoshua M. Clulow if (o0 == -1 || o1 == -1) { 1788f88a51fSJoshua M. Clulow off = offsetof(ucontext_t, uc_mcontext) + 1798f88a51fSJoshua M. Clulow offsetof(mcontext_t, gregs); 1808f88a51fSJoshua M. Clulow } else { 1818f88a51fSJoshua M. Clulow off = o0 + o1; 1828f88a51fSJoshua M. Clulow } 1838f88a51fSJoshua M. Clulow 1848f88a51fSJoshua M. Clulow if (mdb_vread(&grs, sizeof (grs), addr + off) != sizeof (grs)) { 1858f88a51fSJoshua M. Clulow mdb_warn("failed to read from ucontext_t %p", addr); 1868f88a51fSJoshua M. Clulow return (DCMD_ERR); 1878f88a51fSJoshua M. Clulow } 1888f88a51fSJoshua M. Clulow goto print_regs; 1898f88a51fSJoshua M. Clulow } 1907c478bd9Sstevel@tonic-gate 1917c478bd9Sstevel@tonic-gate if (t->t_pshandle == NULL || Pstate(t->t_pshandle) == PS_UNDEAD) { 1927c478bd9Sstevel@tonic-gate mdb_warn("no process active\n"); 1937c478bd9Sstevel@tonic-gate return (DCMD_ERR); 1947c478bd9Sstevel@tonic-gate } 1957c478bd9Sstevel@tonic-gate 1967c478bd9Sstevel@tonic-gate if (Pstate(t->t_pshandle) == PS_LOST) { 1977c478bd9Sstevel@tonic-gate mdb_warn("debugger has lost control of process\n"); 1987c478bd9Sstevel@tonic-gate return (DCMD_ERR); 1997c478bd9Sstevel@tonic-gate } 2007c478bd9Sstevel@tonic-gate 2017c478bd9Sstevel@tonic-gate if (flags & DCMD_ADDRSPEC) 2027c478bd9Sstevel@tonic-gate tid = (mdb_tgt_tid_t)addr; 2037c478bd9Sstevel@tonic-gate else 2047c478bd9Sstevel@tonic-gate tid = PTL_TID(t); 2057c478bd9Sstevel@tonic-gate 2067c478bd9Sstevel@tonic-gate if (PTL_GETREGS(t, tid, grs) != 0) { 2077c478bd9Sstevel@tonic-gate mdb_warn("failed to get current register set"); 2087c478bd9Sstevel@tonic-gate return (DCMD_ERR); 2097c478bd9Sstevel@tonic-gate } 2107c478bd9Sstevel@tonic-gate 2118f88a51fSJoshua M. Clulow print_regs: 2127c478bd9Sstevel@tonic-gate rflags = grs[REG_RFL]; 2137c478bd9Sstevel@tonic-gate 2147c478bd9Sstevel@tonic-gate mdb_printf("%%rax = 0x%0?p\t%%r8 = 0x%0?p\n", 2157c478bd9Sstevel@tonic-gate grs[REG_RAX], grs[REG_R8]); 2167c478bd9Sstevel@tonic-gate mdb_printf("%%rbx = 0x%0?p\t%%r9 = 0x%0?p\n", 2177c478bd9Sstevel@tonic-gate grs[REG_RBX], grs[REG_R9]); 2187c478bd9Sstevel@tonic-gate mdb_printf("%%rcx = 0x%0?p\t%%r10 = 0x%0?p\n", 2197c478bd9Sstevel@tonic-gate grs[REG_RCX], grs[REG_R10]); 2207c478bd9Sstevel@tonic-gate mdb_printf("%%rdx = 0x%0?p\t%%r11 = 0x%0?p\n", 2217c478bd9Sstevel@tonic-gate grs[REG_RDX], grs[REG_R11]); 2227c478bd9Sstevel@tonic-gate mdb_printf("%%rsi = 0x%0?p\t%%r12 = 0x%0?p\n", 2237c478bd9Sstevel@tonic-gate grs[REG_RSI], grs[REG_R12]); 2247c478bd9Sstevel@tonic-gate mdb_printf("%%rdi = 0x%0?p\t%%r13 = 0x%0?p\n", 2257c478bd9Sstevel@tonic-gate grs[REG_RDI], grs[REG_R13]); 2267c478bd9Sstevel@tonic-gate mdb_printf(" %?s\t%%r14 = 0x%0?p\n", 2277c478bd9Sstevel@tonic-gate "", grs[REG_R14]); 2287c478bd9Sstevel@tonic-gate mdb_printf(" %?s\t%%r15 = 0x%0?p\n", 2297c478bd9Sstevel@tonic-gate "", grs[REG_R15]); 2307c478bd9Sstevel@tonic-gate 2317c478bd9Sstevel@tonic-gate mdb_printf("\n"); 2327c478bd9Sstevel@tonic-gate 2337c478bd9Sstevel@tonic-gate mdb_printf("%%cs = 0x%04x\t%%fs = 0x%04x\t%%gs = 0x%04x\n", 2347c478bd9Sstevel@tonic-gate grs[REG_CS], grs[REG_FS], grs[REG_GS]); 2357c478bd9Sstevel@tonic-gate mdb_printf("%%ds = 0x%04x\t%%es = 0x%04x\t%%ss = 0x%04x\n", 2367c478bd9Sstevel@tonic-gate grs[REG_DS], grs[REG_ES], grs[REG_SS]); 2377c478bd9Sstevel@tonic-gate 2387c478bd9Sstevel@tonic-gate mdb_printf("\n"); 2397c478bd9Sstevel@tonic-gate 2407c478bd9Sstevel@tonic-gate mdb_printf("%%rip = 0x%0?p %A\n", grs[REG_RIP], grs[REG_RIP]); 2417c478bd9Sstevel@tonic-gate mdb_printf("%%rbp = 0x%0?p\n", grs[REG_RBP], grs[REG_RBP]); 2427c478bd9Sstevel@tonic-gate mdb_printf("%%rsp = 0x%0?p\n", grs[REG_RSP], grs[REG_RSP]); 2437c478bd9Sstevel@tonic-gate 2447c478bd9Sstevel@tonic-gate mdb_printf("\n"); 2457c478bd9Sstevel@tonic-gate 2467c478bd9Sstevel@tonic-gate mdb_printf("%%rflags = 0x%08x\n", rflags); 2477c478bd9Sstevel@tonic-gate 2487c478bd9Sstevel@tonic-gate mdb_printf(" id=%u vip=%u vif=%u ac=%u vm=%u rf=%u nt=%u iopl=0x%x\n", 2497c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_ID_MASK) >> KREG_EFLAGS_ID_SHIFT, 2507c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_VIP_MASK) >> KREG_EFLAGS_VIP_SHIFT, 2517c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_VIF_MASK) >> KREG_EFLAGS_VIF_SHIFT, 2527c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_AC_MASK) >> KREG_EFLAGS_AC_SHIFT, 2537c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_VM_MASK) >> KREG_EFLAGS_VM_SHIFT, 2547c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_RF_MASK) >> KREG_EFLAGS_RF_SHIFT, 2557c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_NT_MASK) >> KREG_EFLAGS_NT_SHIFT, 2567c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_IOPL_MASK) >> KREG_EFLAGS_IOPL_SHIFT); 2577c478bd9Sstevel@tonic-gate 2587c478bd9Sstevel@tonic-gate mdb_printf(" status=<%s,%s,%s,%s,%s,%s,%s,%s,%s>\n", 2597c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_OF_MASK) ? "OF" : "of", 2607c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_DF_MASK) ? "DF" : "df", 2617c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_IF_MASK) ? "IF" : "if", 2627c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_TF_MASK) ? "TF" : "tf", 2637c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_SF_MASK) ? "SF" : "sf", 2647c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_ZF_MASK) ? "ZF" : "zf", 2657c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_AF_MASK) ? "AF" : "af", 2667c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_PF_MASK) ? "PF" : "pf", 2677c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_CF_MASK) ? "CF" : "cf"); 2687c478bd9Sstevel@tonic-gate 2697c478bd9Sstevel@tonic-gate mdb_printf("\n"); 2707c478bd9Sstevel@tonic-gate 2717c478bd9Sstevel@tonic-gate mdb_printf("%%gsbase = 0x%0?p\n", grs[REG_GSBASE]); 2727c478bd9Sstevel@tonic-gate mdb_printf("%%fsbase = 0x%0?p\n", grs[REG_FSBASE]); 2737c478bd9Sstevel@tonic-gate mdb_printf("%%trapno = 0x%x\n", grs[REG_TRAPNO]); 2747c478bd9Sstevel@tonic-gate mdb_printf(" %%err = 0x%x\n", grs[REG_ERR]); 2757c478bd9Sstevel@tonic-gate 2767c478bd9Sstevel@tonic-gate return (set_errno(ENOTSUP)); 2777c478bd9Sstevel@tonic-gate } 2787c478bd9Sstevel@tonic-gate 2797c478bd9Sstevel@tonic-gate static const char * 2807c478bd9Sstevel@tonic-gate fpcw2str(uint32_t cw, char *buf, size_t nbytes) 2817c478bd9Sstevel@tonic-gate { 2827c478bd9Sstevel@tonic-gate char *end = buf + nbytes; 2837c478bd9Sstevel@tonic-gate char *p = buf; 2847c478bd9Sstevel@tonic-gate 2857c478bd9Sstevel@tonic-gate buf[0] = '\0'; 2867c478bd9Sstevel@tonic-gate 2877c478bd9Sstevel@tonic-gate /* 2887c478bd9Sstevel@tonic-gate * Decode all masks in the 80387 control word. 2897c478bd9Sstevel@tonic-gate */ 2907c478bd9Sstevel@tonic-gate if (cw & FPIM) 2917c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|IM"); 2927c478bd9Sstevel@tonic-gate if (cw & FPDM) 2937c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|DM"); 2947c478bd9Sstevel@tonic-gate if (cw & FPZM) 2957c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|ZM"); 2967c478bd9Sstevel@tonic-gate if (cw & FPOM) 2977c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|OM"); 2987c478bd9Sstevel@tonic-gate if (cw & FPUM) 2997c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|UM"); 3007c478bd9Sstevel@tonic-gate if (cw & FPPM) 3017c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|PM"); 3027c478bd9Sstevel@tonic-gate if (cw & FPPC) 3037c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|PC"); 3047c478bd9Sstevel@tonic-gate if (cw & FPRC) 3057c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|RC"); 3067c478bd9Sstevel@tonic-gate if (cw & FPIC) 3077c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|IC"); 3087c478bd9Sstevel@tonic-gate 3097c478bd9Sstevel@tonic-gate /* 3107c478bd9Sstevel@tonic-gate * Decode precision, rounding, and infinity options in control word. 3117c478bd9Sstevel@tonic-gate */ 3127c478bd9Sstevel@tonic-gate if (cw & FPSIG24) 3137c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|SIG24"); 3147c478bd9Sstevel@tonic-gate if (cw & FPSIG53) 3157c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|SIG53"); 3167c478bd9Sstevel@tonic-gate if (cw & FPSIG64) 3177c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|SIG64"); 3187c478bd9Sstevel@tonic-gate 3197c478bd9Sstevel@tonic-gate if ((cw & FPRC) == (FPRD|FPRU)) 3207c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|RTZ"); 3217c478bd9Sstevel@tonic-gate else if (cw & FPRD) 3227c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|RD"); 3237c478bd9Sstevel@tonic-gate else if (cw & FPRU) 3247c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|RU"); 3257c478bd9Sstevel@tonic-gate else 3267c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|RTN"); 3277c478bd9Sstevel@tonic-gate 3287c478bd9Sstevel@tonic-gate if (cw & FPA) 3297c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|A"); 3307c478bd9Sstevel@tonic-gate else 3317c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|P"); 3327c478bd9Sstevel@tonic-gate if (cw & WFPB17) 3337c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|WFPB17"); 3347c478bd9Sstevel@tonic-gate if (cw & WFPB24) 3357c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|WFPB24"); 3367c478bd9Sstevel@tonic-gate 3377c478bd9Sstevel@tonic-gate if (buf[0] == '|') 3387c478bd9Sstevel@tonic-gate return (buf + 1); 3397c478bd9Sstevel@tonic-gate 3407c478bd9Sstevel@tonic-gate return ("0"); 3417c478bd9Sstevel@tonic-gate } 3427c478bd9Sstevel@tonic-gate 3437c478bd9Sstevel@tonic-gate static const char * 3447c478bd9Sstevel@tonic-gate fpsw2str(uint32_t cw, char *buf, size_t nbytes) 3457c478bd9Sstevel@tonic-gate { 3467c478bd9Sstevel@tonic-gate char *end = buf + nbytes; 3477c478bd9Sstevel@tonic-gate char *p = buf; 3487c478bd9Sstevel@tonic-gate 3497c478bd9Sstevel@tonic-gate buf[0] = '\0'; 3507c478bd9Sstevel@tonic-gate 3517c478bd9Sstevel@tonic-gate /* 3527c478bd9Sstevel@tonic-gate * Decode all masks in the 80387 status word. 3537c478bd9Sstevel@tonic-gate */ 3547c478bd9Sstevel@tonic-gate if (cw & FPS_IE) 3557c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|IE"); 3567c478bd9Sstevel@tonic-gate if (cw & FPS_DE) 3577c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|DE"); 3587c478bd9Sstevel@tonic-gate if (cw & FPS_ZE) 3597c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|ZE"); 3607c478bd9Sstevel@tonic-gate if (cw & FPS_OE) 3617c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|OE"); 3627c478bd9Sstevel@tonic-gate if (cw & FPS_UE) 3637c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|UE"); 3647c478bd9Sstevel@tonic-gate if (cw & FPS_PE) 3657c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|PE"); 3667c478bd9Sstevel@tonic-gate if (cw & FPS_SF) 3677c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|SF"); 3687c478bd9Sstevel@tonic-gate if (cw & FPS_ES) 3697c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|ES"); 3707c478bd9Sstevel@tonic-gate if (cw & FPS_C0) 3717c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|C0"); 3727c478bd9Sstevel@tonic-gate if (cw & FPS_C1) 3737c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|C1"); 3747c478bd9Sstevel@tonic-gate if (cw & FPS_C2) 3757c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|C2"); 3767c478bd9Sstevel@tonic-gate if (cw & FPS_C3) 3777c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|C3"); 3787c478bd9Sstevel@tonic-gate if (cw & FPS_B) 3797c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|B"); 3807c478bd9Sstevel@tonic-gate 3817c478bd9Sstevel@tonic-gate if (buf[0] == '|') 3827c478bd9Sstevel@tonic-gate return (buf + 1); 3837c478bd9Sstevel@tonic-gate 3847c478bd9Sstevel@tonic-gate return ("0"); 3857c478bd9Sstevel@tonic-gate } 3867c478bd9Sstevel@tonic-gate 3877c478bd9Sstevel@tonic-gate static const char * 3887c478bd9Sstevel@tonic-gate fpmxcsr2str(uint32_t mxcsr, char *buf, size_t nbytes) 3897c478bd9Sstevel@tonic-gate { 3907c478bd9Sstevel@tonic-gate char *end = buf + nbytes; 3917c478bd9Sstevel@tonic-gate char *p = buf; 3927c478bd9Sstevel@tonic-gate 3937c478bd9Sstevel@tonic-gate buf[0] = '\0'; 3947c478bd9Sstevel@tonic-gate 3957c478bd9Sstevel@tonic-gate /* 3967c478bd9Sstevel@tonic-gate * Decode the MXCSR word 3977c478bd9Sstevel@tonic-gate */ 3987c478bd9Sstevel@tonic-gate if (mxcsr & SSE_IE) 3997c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|IE"); 4007c478bd9Sstevel@tonic-gate if (mxcsr & SSE_DE) 4017c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|DE"); 4027c478bd9Sstevel@tonic-gate if (mxcsr & SSE_ZE) 4037c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|ZE"); 4047c478bd9Sstevel@tonic-gate if (mxcsr & SSE_OE) 4057c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|OE"); 4067c478bd9Sstevel@tonic-gate if (mxcsr & SSE_UE) 4077c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|UE"); 4087c478bd9Sstevel@tonic-gate if (mxcsr & SSE_PE) 4097c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|PE"); 4107c478bd9Sstevel@tonic-gate 4117c478bd9Sstevel@tonic-gate if (mxcsr & SSE_DAZ) 4127c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|DAZ"); 4137c478bd9Sstevel@tonic-gate 4147c478bd9Sstevel@tonic-gate if (mxcsr & SSE_IM) 4157c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|IM"); 4167c478bd9Sstevel@tonic-gate if (mxcsr & SSE_DM) 4177c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|DM"); 4187c478bd9Sstevel@tonic-gate if (mxcsr & SSE_ZM) 4197c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|ZM"); 4207c478bd9Sstevel@tonic-gate if (mxcsr & SSE_OM) 4217c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|OM"); 4227c478bd9Sstevel@tonic-gate if (mxcsr & SSE_UM) 4237c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|UM"); 4247c478bd9Sstevel@tonic-gate if (mxcsr & SSE_PM) 4257c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|PM"); 4267c478bd9Sstevel@tonic-gate 4277c478bd9Sstevel@tonic-gate if ((mxcsr & SSE_RC) == (SSE_RD|SSE_RU)) 4287c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|RTZ"); 4297c478bd9Sstevel@tonic-gate else if (mxcsr & SSE_RD) 4307c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|RD"); 4317c478bd9Sstevel@tonic-gate else if (mxcsr & SSE_RU) 4327c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|RU"); 4337c478bd9Sstevel@tonic-gate else 4347c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|RTN"); 4357c478bd9Sstevel@tonic-gate 4367c478bd9Sstevel@tonic-gate if (mxcsr & SSE_FZ) 4377c478bd9Sstevel@tonic-gate p += mdb_snprintf(p, (size_t)(end - p), "|FZ"); 4387c478bd9Sstevel@tonic-gate 4397c478bd9Sstevel@tonic-gate if (buf[0] == '|') 4407c478bd9Sstevel@tonic-gate return (buf + 1); 4417c478bd9Sstevel@tonic-gate return ("0"); 4427c478bd9Sstevel@tonic-gate } 4437c478bd9Sstevel@tonic-gate 4447c478bd9Sstevel@tonic-gate /*ARGSUSED*/ 4457c478bd9Sstevel@tonic-gate int 4467c478bd9Sstevel@tonic-gate pt_fpregs(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv) 4477c478bd9Sstevel@tonic-gate { 4487c478bd9Sstevel@tonic-gate mdb_tgt_t *t = mdb.m_target; 4497c478bd9Sstevel@tonic-gate mdb_tgt_tid_t tid; 4507c478bd9Sstevel@tonic-gate prfpregset_t fprs; 451bc0e9132SGordon Ross struct _fpchip_state fps; 4527c478bd9Sstevel@tonic-gate char buf[256]; 4537c478bd9Sstevel@tonic-gate uint_t top; 4547c478bd9Sstevel@tonic-gate int i; 4557c478bd9Sstevel@tonic-gate 4567c478bd9Sstevel@tonic-gate /* 4577c478bd9Sstevel@tonic-gate * Union for overlaying _fpreg structure on to quad-precision 4587c478bd9Sstevel@tonic-gate * floating-point value (long double). 4597c478bd9Sstevel@tonic-gate */ 4607c478bd9Sstevel@tonic-gate union { 4617c478bd9Sstevel@tonic-gate struct _fpreg reg; 4627c478bd9Sstevel@tonic-gate long double ld; 4637c478bd9Sstevel@tonic-gate } fpru; 4647c478bd9Sstevel@tonic-gate 4657c478bd9Sstevel@tonic-gate /* 4667c478bd9Sstevel@tonic-gate * Array of strings corresponding to FPU tag word values (see 4677c478bd9Sstevel@tonic-gate * section 7.3.6 of the Intel Programmer's Reference Manual). 4687c478bd9Sstevel@tonic-gate */ 4697c478bd9Sstevel@tonic-gate const char *tag_strings[] = { "valid", "zero", "special", "empty" }; 4707c478bd9Sstevel@tonic-gate 4717c478bd9Sstevel@tonic-gate if (argc != 0) 4727c478bd9Sstevel@tonic-gate return (DCMD_USAGE); 4737c478bd9Sstevel@tonic-gate 4747c478bd9Sstevel@tonic-gate if (t->t_pshandle == NULL || Pstate(t->t_pshandle) == PS_UNDEAD) { 4757c478bd9Sstevel@tonic-gate mdb_warn("no process active\n"); 4767c478bd9Sstevel@tonic-gate return (DCMD_ERR); 4777c478bd9Sstevel@tonic-gate } 4787c478bd9Sstevel@tonic-gate 4797c478bd9Sstevel@tonic-gate if (Pstate(t->t_pshandle) == PS_LOST) { 4807c478bd9Sstevel@tonic-gate mdb_warn("debugger has lost control of process\n"); 4817c478bd9Sstevel@tonic-gate return (DCMD_ERR); 4827c478bd9Sstevel@tonic-gate } 4837c478bd9Sstevel@tonic-gate 4847c478bd9Sstevel@tonic-gate if (flags & DCMD_ADDRSPEC) 4857c478bd9Sstevel@tonic-gate tid = (mdb_tgt_tid_t)addr; 4867c478bd9Sstevel@tonic-gate else 4877c478bd9Sstevel@tonic-gate tid = PTL_TID(t); 4887c478bd9Sstevel@tonic-gate 4897c478bd9Sstevel@tonic-gate mdb_printf("AMD64 (80486 chip with SSE)\n"); 4907c478bd9Sstevel@tonic-gate 4917c478bd9Sstevel@tonic-gate if (PTL_GETFPREGS(t, tid, &fprs) != 0) { 4927c478bd9Sstevel@tonic-gate mdb_warn("failed to get floating point registers"); 4937c478bd9Sstevel@tonic-gate return (DCMD_ERR); 4947c478bd9Sstevel@tonic-gate } 4957c478bd9Sstevel@tonic-gate 4967c478bd9Sstevel@tonic-gate bcopy(&fprs.fp_reg_set.fpchip_state, &fps, sizeof (fps)); 4977c478bd9Sstevel@tonic-gate 4987c478bd9Sstevel@tonic-gate fps.status &= 0xffff; /* saved status word is really 16 bits */ 4997c478bd9Sstevel@tonic-gate 5007c478bd9Sstevel@tonic-gate mdb_printf("cw 0x%04x (%s)\n", fps.cw, 5017c478bd9Sstevel@tonic-gate fpcw2str(fps.cw, buf, sizeof (buf))); 5027c478bd9Sstevel@tonic-gate 5037c478bd9Sstevel@tonic-gate top = (fps.sw & FPS_TOP) >> 11; 5047c478bd9Sstevel@tonic-gate mdb_printf("sw 0x%04x (TOP=0t%u) (%s)\n", fps.sw, 5057c478bd9Sstevel@tonic-gate top, fpsw2str(fps.sw, buf, sizeof (buf))); 5067c478bd9Sstevel@tonic-gate 5077c478bd9Sstevel@tonic-gate mdb_printf("xcp sw 0x%04x (%s)\n\n", fps.status, 5087c478bd9Sstevel@tonic-gate fpsw2str(fps.status, buf, sizeof (buf))); 5097c478bd9Sstevel@tonic-gate 5107c478bd9Sstevel@tonic-gate mdb_printf("fop 0x%x\n", fps.fop); 5117c478bd9Sstevel@tonic-gate mdb_printf("rip 0x%x\n", fps.rip); 5127c478bd9Sstevel@tonic-gate mdb_printf("rdp 0x%x\n\n", fps.rdp); 5137c478bd9Sstevel@tonic-gate 5147c478bd9Sstevel@tonic-gate for (i = 0; i < 8; i++) { 5157c478bd9Sstevel@tonic-gate /* 5167c478bd9Sstevel@tonic-gate * Recall that we need to use the current TOP-of-stack value to 5177c478bd9Sstevel@tonic-gate * associate the _st[] index back to a physical register number, 5187c478bd9Sstevel@tonic-gate * since tag word indices are physical register numbers. Then 5197c478bd9Sstevel@tonic-gate * to get the tag value, we shift over two bits for each tag 5207c478bd9Sstevel@tonic-gate * index, and then grab the bottom two bits. 5217c478bd9Sstevel@tonic-gate */ 5227c478bd9Sstevel@tonic-gate uint_t tag_index = (i + top) & 7; 5237c478bd9Sstevel@tonic-gate uint_t tag_fctw = (fps.fctw >> tag_index) & 1; 5247c478bd9Sstevel@tonic-gate uint_t tag_value; 5257c478bd9Sstevel@tonic-gate uint_t exp; 5267c478bd9Sstevel@tonic-gate 5277c478bd9Sstevel@tonic-gate /* 5287c478bd9Sstevel@tonic-gate * AMD64 stores the tag in a compressed form. It is 5297c478bd9Sstevel@tonic-gate * necessary to extract the original 2-bit tag value. 5307c478bd9Sstevel@tonic-gate * See AMD64 Architecture Programmer's Manual Volume 2: 5317c478bd9Sstevel@tonic-gate * System Programming, Chapter 11. 5327c478bd9Sstevel@tonic-gate */ 5337c478bd9Sstevel@tonic-gate 5347c478bd9Sstevel@tonic-gate fpru.ld = fps.st[i].__fpr_pad._q; 5357c478bd9Sstevel@tonic-gate exp = fpru.reg.exponent & 0x7fff; 5367c478bd9Sstevel@tonic-gate 5377c478bd9Sstevel@tonic-gate if (tag_fctw == 0) { 5387c478bd9Sstevel@tonic-gate tag_value = 3; /* empty */ 5397c478bd9Sstevel@tonic-gate } else if (exp == 0) { 5407c478bd9Sstevel@tonic-gate if (fpru.reg.significand[0] == 0 && 5417c478bd9Sstevel@tonic-gate fpru.reg.significand[1] == 0 && 5427c478bd9Sstevel@tonic-gate fpru.reg.significand[2] == 0 && 5437c478bd9Sstevel@tonic-gate fpru.reg.significand[3] == 0) 5447c478bd9Sstevel@tonic-gate tag_value = 1; /* zero */ 5457c478bd9Sstevel@tonic-gate else 5467c478bd9Sstevel@tonic-gate tag_value = 2; /* special: denormal */ 5477c478bd9Sstevel@tonic-gate } else if (exp == 0x7fff) { 5487c478bd9Sstevel@tonic-gate tag_value = 2; /* special: infinity or NaN */ 5497c478bd9Sstevel@tonic-gate } else if (fpru.reg.significand[3] & 0x8000) { 5507c478bd9Sstevel@tonic-gate tag_value = 0; /* valid */ 5517c478bd9Sstevel@tonic-gate } else { 5527c478bd9Sstevel@tonic-gate tag_value = 2; /* special: unnormal */ 5537c478bd9Sstevel@tonic-gate } 5547c478bd9Sstevel@tonic-gate 5557c478bd9Sstevel@tonic-gate mdb_printf("%%st%d 0x%04x.%04x%04x%04x%04x = %lg %s\n", 5567c478bd9Sstevel@tonic-gate i, fpru.reg.exponent, 5577c478bd9Sstevel@tonic-gate fpru.reg.significand[3], fpru.reg.significand[2], 5587c478bd9Sstevel@tonic-gate fpru.reg.significand[1], fpru.reg.significand[0], 5597c478bd9Sstevel@tonic-gate fpru.ld, tag_strings[tag_value]); 5607c478bd9Sstevel@tonic-gate } 5617c478bd9Sstevel@tonic-gate 5627c478bd9Sstevel@tonic-gate mdb_printf("\nmxcsr 0x%04x (%s)\n", fps.mxcsr, 5637c478bd9Sstevel@tonic-gate fpmxcsr2str(fps.mxcsr, buf, sizeof (buf))); 5647c478bd9Sstevel@tonic-gate mdb_printf("xcp 0x%04x (%s)\n\n", fps.xstatus, 5657c478bd9Sstevel@tonic-gate fpmxcsr2str(fps.xstatus, buf, sizeof (buf))); 5667c478bd9Sstevel@tonic-gate 5677c478bd9Sstevel@tonic-gate for (i = 0; i < 8; i++) 5687c478bd9Sstevel@tonic-gate mdb_printf("%%xmm%d 0x%08x%08x%08x%08x\n", i, 5697c478bd9Sstevel@tonic-gate fps.xmm[i]._l[3], fps.xmm[i]._l[2], 5707c478bd9Sstevel@tonic-gate fps.xmm[i]._l[1], fps.xmm[i]._l[0]); 5717c478bd9Sstevel@tonic-gate 5727c478bd9Sstevel@tonic-gate return (DCMD_OK); 5737c478bd9Sstevel@tonic-gate } 5747c478bd9Sstevel@tonic-gate 5757c478bd9Sstevel@tonic-gate /*ARGSUSED*/ 5767c478bd9Sstevel@tonic-gate int 5777c478bd9Sstevel@tonic-gate pt_getfpreg(mdb_tgt_t *t, mdb_tgt_tid_t tid, ushort_t rd_num, 5787c478bd9Sstevel@tonic-gate ushort_t rd_flags, mdb_tgt_reg_t *rp) 5797c478bd9Sstevel@tonic-gate { 5807c478bd9Sstevel@tonic-gate return (set_errno(ENOTSUP)); 5817c478bd9Sstevel@tonic-gate } 5827c478bd9Sstevel@tonic-gate 5837c478bd9Sstevel@tonic-gate /*ARGSUSED*/ 5847c478bd9Sstevel@tonic-gate int 5857c478bd9Sstevel@tonic-gate pt_putfpreg(mdb_tgt_t *t, mdb_tgt_tid_t tid, ushort_t rd_num, 5867c478bd9Sstevel@tonic-gate ushort_t rd_flags, mdb_tgt_reg_t rval) 5877c478bd9Sstevel@tonic-gate { 5887c478bd9Sstevel@tonic-gate return (set_errno(ENOTSUP)); 5897c478bd9Sstevel@tonic-gate } 5907c478bd9Sstevel@tonic-gate 5917c478bd9Sstevel@tonic-gate /*ARGSUSED*/ 5927c478bd9Sstevel@tonic-gate void 5937c478bd9Sstevel@tonic-gate pt_addfpregs(mdb_tgt_t *t) 5947c478bd9Sstevel@tonic-gate { 5957c478bd9Sstevel@tonic-gate /* not implemented */ 5967c478bd9Sstevel@tonic-gate } 5977c478bd9Sstevel@tonic-gate 5987c478bd9Sstevel@tonic-gate /*ARGSUSED*/ 5997c478bd9Sstevel@tonic-gate int 6007c478bd9Sstevel@tonic-gate pt_frameregs(void *arglim, uintptr_t pc, uint_t argc, const long *argv, 6017c478bd9Sstevel@tonic-gate const mdb_tgt_gregset_t *gregs, boolean_t pc_faked) 6027c478bd9Sstevel@tonic-gate { 6037c478bd9Sstevel@tonic-gate return (set_errno(ENOTSUP)); 6047c478bd9Sstevel@tonic-gate } 6057c478bd9Sstevel@tonic-gate 6067c478bd9Sstevel@tonic-gate /*ARGSUSED*/ 6077c478bd9Sstevel@tonic-gate const char * 6087c478bd9Sstevel@tonic-gate pt_disasm(const GElf_Ehdr *ehp) 6097c478bd9Sstevel@tonic-gate { 6107c478bd9Sstevel@tonic-gate return ("amd64"); 6117c478bd9Sstevel@tonic-gate } 6127c478bd9Sstevel@tonic-gate 6137c478bd9Sstevel@tonic-gate /* 6147c478bd9Sstevel@tonic-gate * Determine the return address for the current frame. 6157c478bd9Sstevel@tonic-gate */ 6167c478bd9Sstevel@tonic-gate int 6177c478bd9Sstevel@tonic-gate pt_step_out(mdb_tgt_t *t, uintptr_t *p) 6187c478bd9Sstevel@tonic-gate { 6197c478bd9Sstevel@tonic-gate const lwpstatus_t *psp = &Pstatus(t->t_pshandle)->pr_lwp; 6207c478bd9Sstevel@tonic-gate 6217c478bd9Sstevel@tonic-gate if (Pstate(t->t_pshandle) != PS_STOP) 6227c478bd9Sstevel@tonic-gate return (set_errno(EMDB_TGTBUSY)); 6237c478bd9Sstevel@tonic-gate 6247c478bd9Sstevel@tonic-gate return (mdb_amd64_step_out(t, p, psp->pr_reg[EIP], psp->pr_reg[EBP], 6257c478bd9Sstevel@tonic-gate psp->pr_reg[UESP], psp->pr_instr)); 6267c478bd9Sstevel@tonic-gate } 6277c478bd9Sstevel@tonic-gate 6287c478bd9Sstevel@tonic-gate /* 6297c478bd9Sstevel@tonic-gate * Return the address of the next instruction following a call, or return -1 6307c478bd9Sstevel@tonic-gate * and set errno to EAGAIN if the target should just single-step. 6317c478bd9Sstevel@tonic-gate */ 6327c478bd9Sstevel@tonic-gate int 6337c478bd9Sstevel@tonic-gate pt_next(mdb_tgt_t *t, uintptr_t *p) 6347c478bd9Sstevel@tonic-gate { 6357c478bd9Sstevel@tonic-gate const lwpstatus_t *psp = &Pstatus(t->t_pshandle)->pr_lwp; 6367c478bd9Sstevel@tonic-gate 6377c478bd9Sstevel@tonic-gate if (Pstate(t->t_pshandle) != PS_STOP) 6387c478bd9Sstevel@tonic-gate return (set_errno(EMDB_TGTBUSY)); 6397c478bd9Sstevel@tonic-gate 6407c478bd9Sstevel@tonic-gate return (mdb_amd64_next(t, p, psp->pr_reg[REG_RIP], pt_read_instr(t))); 6417c478bd9Sstevel@tonic-gate } 642