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 /*
27161294feSRobert Mustacchi * Copyright (c) 2018, Joyent, Inc.
2831779036SDoma Gergő Mihály * Copyright 2019 Doma Gergő Mihály <doma.gergo.mihaly@gmail.com>
29*ed093b41SRobert Mustacchi * Copyright 2023 Oxide Computer Company
300a47c91cSRobert Mustacchi */
317c478bd9Sstevel@tonic-gate
327c478bd9Sstevel@tonic-gate /*
33*ed093b41SRobert Mustacchi * User Process Target Intel 64-bit component
347c478bd9Sstevel@tonic-gate *
357c478bd9Sstevel@tonic-gate * This file provides the ISA-dependent portion of the user process target.
367c478bd9Sstevel@tonic-gate * For more details on the implementation refer to mdb_proc.c.
377c478bd9Sstevel@tonic-gate */
387c478bd9Sstevel@tonic-gate
397c478bd9Sstevel@tonic-gate #include <mdb/mdb_proc.h>
407c478bd9Sstevel@tonic-gate #include <mdb/mdb_kreg.h>
417c478bd9Sstevel@tonic-gate #include <mdb/mdb_err.h>
429c3024a3SHans Rosenfeld #include <mdb/mdb_isautil.h>
437c478bd9Sstevel@tonic-gate #include <mdb/mdb_amd64util.h>
44*ed093b41SRobert Mustacchi #include <mdb/proc_x86util.h>
457c478bd9Sstevel@tonic-gate #include <mdb/mdb.h>
467c478bd9Sstevel@tonic-gate
478f88a51fSJoshua M. Clulow #include <sys/ucontext.h>
487c478bd9Sstevel@tonic-gate #include <sys/frame.h>
497c478bd9Sstevel@tonic-gate #include <libproc.h>
507c478bd9Sstevel@tonic-gate #include <sys/fp.h>
517c478bd9Sstevel@tonic-gate #include <ieeefp.h>
52*ed093b41SRobert Mustacchi #include <sys/sysmacros.h>
537c478bd9Sstevel@tonic-gate
548f88a51fSJoshua M. Clulow #include <stddef.h>
558f88a51fSJoshua M. Clulow
567c478bd9Sstevel@tonic-gate const mdb_tgt_regdesc_t pt_regdesc[] = {
577c478bd9Sstevel@tonic-gate { "r15", REG_R15, MDB_TGT_R_EXPORT },
580a47c91cSRobert Mustacchi { "r15d", REG_R15, MDB_TGT_R_EXPORT | MDB_TGT_R_32 },
590a47c91cSRobert Mustacchi { "r15w", REG_R15, MDB_TGT_R_EXPORT | MDB_TGT_R_16 },
600a47c91cSRobert Mustacchi { "r15l", REG_R15, MDB_TGT_R_EXPORT | MDB_TGT_R_8L },
617c478bd9Sstevel@tonic-gate { "r14", REG_R14, MDB_TGT_R_EXPORT },
620a47c91cSRobert Mustacchi { "r14d", REG_R14, MDB_TGT_R_EXPORT | MDB_TGT_R_32 },
630a47c91cSRobert Mustacchi { "r14w", REG_R14, MDB_TGT_R_EXPORT | MDB_TGT_R_16 },
640a47c91cSRobert Mustacchi { "r14l", REG_R14, MDB_TGT_R_EXPORT | MDB_TGT_R_8L },
657c478bd9Sstevel@tonic-gate { "r13", REG_R13, MDB_TGT_R_EXPORT },
660a47c91cSRobert Mustacchi { "r13d", REG_R13, MDB_TGT_R_EXPORT | MDB_TGT_R_32 },
670a47c91cSRobert Mustacchi { "r13w", REG_R13, MDB_TGT_R_EXPORT | MDB_TGT_R_16 },
680a47c91cSRobert Mustacchi { "r13l", REG_R13, MDB_TGT_R_EXPORT | MDB_TGT_R_8L },
697c478bd9Sstevel@tonic-gate { "r12", REG_R12, MDB_TGT_R_EXPORT },
700a47c91cSRobert Mustacchi { "r12d", REG_R12, MDB_TGT_R_EXPORT | MDB_TGT_R_32 },
710a47c91cSRobert Mustacchi { "r12w", REG_R12, MDB_TGT_R_EXPORT | MDB_TGT_R_16 },
720a47c91cSRobert Mustacchi { "r12l", REG_R12, MDB_TGT_R_EXPORT | MDB_TGT_R_8L },
737c478bd9Sstevel@tonic-gate { "r11", REG_R11, MDB_TGT_R_EXPORT },
740a47c91cSRobert Mustacchi { "r11d", REG_R11, MDB_TGT_R_EXPORT | MDB_TGT_R_32 },
750a47c91cSRobert Mustacchi { "r11w", REG_R11, MDB_TGT_R_EXPORT | MDB_TGT_R_16 },
760a47c91cSRobert Mustacchi { "r11l", REG_R11, MDB_TGT_R_EXPORT | MDB_TGT_R_8L },
777c478bd9Sstevel@tonic-gate { "r10", REG_R10, MDB_TGT_R_EXPORT },
780a47c91cSRobert Mustacchi { "r10d", REG_R10, MDB_TGT_R_EXPORT | MDB_TGT_R_32 },
790a47c91cSRobert Mustacchi { "r10w", REG_R10, MDB_TGT_R_EXPORT | MDB_TGT_R_16 },
800a47c91cSRobert Mustacchi { "r10l", REG_R10, MDB_TGT_R_EXPORT | MDB_TGT_R_8L },
817c478bd9Sstevel@tonic-gate { "r9", REG_R9, MDB_TGT_R_EXPORT },
82161294feSRobert Mustacchi { "r9d", REG_R9, MDB_TGT_R_EXPORT | MDB_TGT_R_32 },
83161294feSRobert Mustacchi { "r9w", REG_R9, MDB_TGT_R_EXPORT | MDB_TGT_R_16 },
84161294feSRobert Mustacchi { "r9l", REG_R9, MDB_TGT_R_EXPORT | MDB_TGT_R_8L },
857c478bd9Sstevel@tonic-gate { "r8", REG_R8, MDB_TGT_R_EXPORT },
860a47c91cSRobert Mustacchi { "r8d", REG_R8, MDB_TGT_R_EXPORT | MDB_TGT_R_32 },
870a47c91cSRobert Mustacchi { "r8w", REG_R8, MDB_TGT_R_EXPORT | MDB_TGT_R_16 },
880a47c91cSRobert Mustacchi { "r8l", REG_R8, MDB_TGT_R_EXPORT | MDB_TGT_R_8L },
897c478bd9Sstevel@tonic-gate { "rdi", REG_RDI, MDB_TGT_R_EXPORT },
900a47c91cSRobert Mustacchi { "edi", REG_RDI, MDB_TGT_R_EXPORT | MDB_TGT_R_32 },
910a47c91cSRobert Mustacchi { "di", REG_RDI, MDB_TGT_R_EXPORT | MDB_TGT_R_16 },
920a47c91cSRobert Mustacchi { "dil", REG_RDI, MDB_TGT_R_EXPORT | MDB_TGT_R_8L },
937c478bd9Sstevel@tonic-gate { "rsi", REG_RSI, MDB_TGT_R_EXPORT },
940a47c91cSRobert Mustacchi { "esi", REG_RSI, MDB_TGT_R_EXPORT | MDB_TGT_R_32 },
950a47c91cSRobert Mustacchi { "si", REG_RSI, MDB_TGT_R_EXPORT | MDB_TGT_R_16 },
960a47c91cSRobert Mustacchi { "sil", REG_RSI, MDB_TGT_R_EXPORT | MDB_TGT_R_8L },
977c478bd9Sstevel@tonic-gate { "rbp", REG_RBP, MDB_TGT_R_EXPORT },
980a47c91cSRobert Mustacchi { "ebp", REG_RBP, MDB_TGT_R_EXPORT | MDB_TGT_R_32 },
990a47c91cSRobert Mustacchi { "bp", REG_RBP, MDB_TGT_R_EXPORT | MDB_TGT_R_16 },
1000a47c91cSRobert Mustacchi { "bpl", REG_RBP, MDB_TGT_R_EXPORT | MDB_TGT_R_8L },
1017c478bd9Sstevel@tonic-gate { "rbx", REG_RBX, MDB_TGT_R_EXPORT },
1020a47c91cSRobert Mustacchi { "ebx", REG_RBX, MDB_TGT_R_EXPORT | MDB_TGT_R_32 },
1030a47c91cSRobert Mustacchi { "bx", REG_RBX, MDB_TGT_R_EXPORT | MDB_TGT_R_16 },
1040a47c91cSRobert Mustacchi { "bh", REG_RBX, MDB_TGT_R_EXPORT | MDB_TGT_R_8H },
1050a47c91cSRobert Mustacchi { "bl", REG_RBX, MDB_TGT_R_EXPORT | MDB_TGT_R_8L },
1067c478bd9Sstevel@tonic-gate { "rdx", REG_RDX, MDB_TGT_R_EXPORT },
1070a47c91cSRobert Mustacchi { "edx", REG_RDX, MDB_TGT_R_EXPORT | MDB_TGT_R_32 },
1080a47c91cSRobert Mustacchi { "dx", REG_RDX, MDB_TGT_R_EXPORT | MDB_TGT_R_16 },
1090a47c91cSRobert Mustacchi { "dh", REG_RDX, MDB_TGT_R_EXPORT | MDB_TGT_R_8H },
1100a47c91cSRobert Mustacchi { "dl", REG_RDX, MDB_TGT_R_EXPORT | MDB_TGT_R_8L },
1117c478bd9Sstevel@tonic-gate { "rcx", REG_RCX, MDB_TGT_R_EXPORT },
1120a47c91cSRobert Mustacchi { "ecx", REG_RCX, MDB_TGT_R_EXPORT | MDB_TGT_R_32 },
1130a47c91cSRobert Mustacchi { "cx", REG_RCX, MDB_TGT_R_EXPORT | MDB_TGT_R_16 },
1140a47c91cSRobert Mustacchi { "ch", REG_RCX, MDB_TGT_R_EXPORT | MDB_TGT_R_8H },
1150a47c91cSRobert Mustacchi { "cl", REG_RCX, MDB_TGT_R_EXPORT | MDB_TGT_R_8L },
1167c478bd9Sstevel@tonic-gate { "rax", REG_RAX, MDB_TGT_R_EXPORT },
1170a47c91cSRobert Mustacchi { "eax", REG_RAX, MDB_TGT_R_EXPORT | MDB_TGT_R_32 },
1180a47c91cSRobert Mustacchi { "ax", REG_RAX, MDB_TGT_R_EXPORT | MDB_TGT_R_16 },
1190a47c91cSRobert Mustacchi { "ah", REG_RAX, MDB_TGT_R_EXPORT | MDB_TGT_R_8H },
1200a47c91cSRobert Mustacchi { "al", REG_RAX, MDB_TGT_R_EXPORT | MDB_TGT_R_8L },
1217c478bd9Sstevel@tonic-gate { "trapno", REG_TRAPNO, MDB_TGT_R_EXPORT },
1227c478bd9Sstevel@tonic-gate { "err", REG_ERR, MDB_TGT_R_EXPORT },
1237c478bd9Sstevel@tonic-gate { "rip", REG_RIP, MDB_TGT_R_EXPORT },
1247c478bd9Sstevel@tonic-gate { "cs", REG_CS, MDB_TGT_R_EXPORT },
1257c478bd9Sstevel@tonic-gate { "rflags", REG_RFL, MDB_TGT_R_EXPORT },
1260a47c91cSRobert Mustacchi { "eflags", REG_RFL, MDB_TGT_R_EXPORT | MDB_TGT_R_32 },
1277c478bd9Sstevel@tonic-gate { "rsp", REG_RSP, MDB_TGT_R_EXPORT },
1280a47c91cSRobert Mustacchi { "esp", REG_RSP, MDB_TGT_R_EXPORT | MDB_TGT_R_32 },
1290a47c91cSRobert Mustacchi { "sp", REG_RSP, MDB_TGT_R_EXPORT | MDB_TGT_R_16 },
1300a47c91cSRobert Mustacchi { "spl", REG_RSP, MDB_TGT_R_EXPORT | MDB_TGT_R_8L },
1317c478bd9Sstevel@tonic-gate { "ss", REG_SS, MDB_TGT_R_EXPORT },
1327c478bd9Sstevel@tonic-gate { "fs", REG_FS, MDB_TGT_R_EXPORT },
1337c478bd9Sstevel@tonic-gate { "gs", REG_GS, MDB_TGT_R_EXPORT },
1347c478bd9Sstevel@tonic-gate { "es", REG_ES, MDB_TGT_R_EXPORT },
1357c478bd9Sstevel@tonic-gate { "ds", REG_DS, MDB_TGT_R_EXPORT },
1367c478bd9Sstevel@tonic-gate { "fsbase", REG_FSBASE, MDB_TGT_R_EXPORT },
1377c478bd9Sstevel@tonic-gate { "gsbase", REG_GSBASE, MDB_TGT_R_EXPORT },
1387c478bd9Sstevel@tonic-gate { NULL, 0, 0 }
1397c478bd9Sstevel@tonic-gate };
1407c478bd9Sstevel@tonic-gate
1417c478bd9Sstevel@tonic-gate /*
1427c478bd9Sstevel@tonic-gate * We cannot rely on pr_instr, because if we hit a breakpoint or the user has
1437c478bd9Sstevel@tonic-gate * artifically modified memory, it will no longer be correct.
1447c478bd9Sstevel@tonic-gate */
1457c478bd9Sstevel@tonic-gate static uint8_t
pt_read_instr(mdb_tgt_t * t)1467c478bd9Sstevel@tonic-gate pt_read_instr(mdb_tgt_t *t)
1477c478bd9Sstevel@tonic-gate {
1487c478bd9Sstevel@tonic-gate const lwpstatus_t *psp = &Pstatus(t->t_pshandle)->pr_lwp;
1497c478bd9Sstevel@tonic-gate uint8_t ret = 0;
1507c478bd9Sstevel@tonic-gate
1519c3024a3SHans Rosenfeld (void) mdb_tgt_aread(t, MDB_TGT_AS_VIRT_I, &ret, sizeof (ret),
1529c3024a3SHans Rosenfeld psp->pr_reg[REG_RIP]);
1537c478bd9Sstevel@tonic-gate
1547c478bd9Sstevel@tonic-gate return (ret);
1557c478bd9Sstevel@tonic-gate }
1567c478bd9Sstevel@tonic-gate
1577c478bd9Sstevel@tonic-gate /*ARGSUSED*/
1587c478bd9Sstevel@tonic-gate int
pt_regs(uintptr_t addr,uint_t flags,int argc,const mdb_arg_t * argv)1597c478bd9Sstevel@tonic-gate pt_regs(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv)
1607c478bd9Sstevel@tonic-gate {
1617c478bd9Sstevel@tonic-gate mdb_tgt_t *t = mdb.m_target;
1627c478bd9Sstevel@tonic-gate mdb_tgt_tid_t tid;
1637c478bd9Sstevel@tonic-gate prgregset_t grs;
1647c478bd9Sstevel@tonic-gate prgreg_t rflags;
1658f88a51fSJoshua M. Clulow boolean_t from_ucontext = B_FALSE;
1667c478bd9Sstevel@tonic-gate
1678f88a51fSJoshua M. Clulow if (mdb_getopts(argc, argv,
1688f88a51fSJoshua M. Clulow 'u', MDB_OPT_SETBITS, B_TRUE, &from_ucontext, NULL) != argc) {
1697c478bd9Sstevel@tonic-gate return (DCMD_USAGE);
1708f88a51fSJoshua M. Clulow }
1718f88a51fSJoshua M. Clulow
1728f88a51fSJoshua M. Clulow if (from_ucontext) {
1738f88a51fSJoshua M. Clulow int off;
1748f88a51fSJoshua M. Clulow int o0, o1;
1758f88a51fSJoshua M. Clulow
1768f88a51fSJoshua M. Clulow if (!(flags & DCMD_ADDRSPEC)) {
1778f88a51fSJoshua M. Clulow mdb_warn("-u requires a ucontext_t address\n");
1788f88a51fSJoshua M. Clulow return (DCMD_ERR);
1798f88a51fSJoshua M. Clulow }
1808f88a51fSJoshua M. Clulow
1818f88a51fSJoshua M. Clulow o0 = mdb_ctf_offsetof_by_name("ucontext_t", "uc_mcontext");
1828f88a51fSJoshua M. Clulow o1 = mdb_ctf_offsetof_by_name("mcontext_t", "gregs");
1838f88a51fSJoshua M. Clulow if (o0 == -1 || o1 == -1) {
1848f88a51fSJoshua M. Clulow off = offsetof(ucontext_t, uc_mcontext) +
1858f88a51fSJoshua M. Clulow offsetof(mcontext_t, gregs);
1868f88a51fSJoshua M. Clulow } else {
1878f88a51fSJoshua M. Clulow off = o0 + o1;
1888f88a51fSJoshua M. Clulow }
1898f88a51fSJoshua M. Clulow
1908f88a51fSJoshua M. Clulow if (mdb_vread(&grs, sizeof (grs), addr + off) != sizeof (grs)) {
1918f88a51fSJoshua M. Clulow mdb_warn("failed to read from ucontext_t %p", addr);
1928f88a51fSJoshua M. Clulow return (DCMD_ERR);
1938f88a51fSJoshua M. Clulow }
1948f88a51fSJoshua M. Clulow goto print_regs;
1958f88a51fSJoshua M. Clulow }
1967c478bd9Sstevel@tonic-gate
1977c478bd9Sstevel@tonic-gate if (t->t_pshandle == NULL || Pstate(t->t_pshandle) == PS_UNDEAD) {
1987c478bd9Sstevel@tonic-gate mdb_warn("no process active\n");
1997c478bd9Sstevel@tonic-gate return (DCMD_ERR);
2007c478bd9Sstevel@tonic-gate }
2017c478bd9Sstevel@tonic-gate
2027c478bd9Sstevel@tonic-gate if (Pstate(t->t_pshandle) == PS_LOST) {
2037c478bd9Sstevel@tonic-gate mdb_warn("debugger has lost control of process\n");
2047c478bd9Sstevel@tonic-gate return (DCMD_ERR);
2057c478bd9Sstevel@tonic-gate }
2067c478bd9Sstevel@tonic-gate
2077c478bd9Sstevel@tonic-gate if (flags & DCMD_ADDRSPEC)
2087c478bd9Sstevel@tonic-gate tid = (mdb_tgt_tid_t)addr;
2097c478bd9Sstevel@tonic-gate else
2107c478bd9Sstevel@tonic-gate tid = PTL_TID(t);
2117c478bd9Sstevel@tonic-gate
2127c478bd9Sstevel@tonic-gate if (PTL_GETREGS(t, tid, grs) != 0) {
2137c478bd9Sstevel@tonic-gate mdb_warn("failed to get current register set");
2147c478bd9Sstevel@tonic-gate return (DCMD_ERR);
2157c478bd9Sstevel@tonic-gate }
2167c478bd9Sstevel@tonic-gate
2178f88a51fSJoshua M. Clulow print_regs:
2187c478bd9Sstevel@tonic-gate rflags = grs[REG_RFL];
2197c478bd9Sstevel@tonic-gate
2207c478bd9Sstevel@tonic-gate mdb_printf("%%rax = 0x%0?p\t%%r8 = 0x%0?p\n",
2217c478bd9Sstevel@tonic-gate grs[REG_RAX], grs[REG_R8]);
2227c478bd9Sstevel@tonic-gate mdb_printf("%%rbx = 0x%0?p\t%%r9 = 0x%0?p\n",
2237c478bd9Sstevel@tonic-gate grs[REG_RBX], grs[REG_R9]);
2247c478bd9Sstevel@tonic-gate mdb_printf("%%rcx = 0x%0?p\t%%r10 = 0x%0?p\n",
2257c478bd9Sstevel@tonic-gate grs[REG_RCX], grs[REG_R10]);
2267c478bd9Sstevel@tonic-gate mdb_printf("%%rdx = 0x%0?p\t%%r11 = 0x%0?p\n",
2277c478bd9Sstevel@tonic-gate grs[REG_RDX], grs[REG_R11]);
2287c478bd9Sstevel@tonic-gate mdb_printf("%%rsi = 0x%0?p\t%%r12 = 0x%0?p\n",
2297c478bd9Sstevel@tonic-gate grs[REG_RSI], grs[REG_R12]);
2307c478bd9Sstevel@tonic-gate mdb_printf("%%rdi = 0x%0?p\t%%r13 = 0x%0?p\n",
2317c478bd9Sstevel@tonic-gate grs[REG_RDI], grs[REG_R13]);
2327c478bd9Sstevel@tonic-gate mdb_printf(" %?s\t%%r14 = 0x%0?p\n",
2337c478bd9Sstevel@tonic-gate "", grs[REG_R14]);
2347c478bd9Sstevel@tonic-gate mdb_printf(" %?s\t%%r15 = 0x%0?p\n",
2357c478bd9Sstevel@tonic-gate "", grs[REG_R15]);
2367c478bd9Sstevel@tonic-gate
2377c478bd9Sstevel@tonic-gate mdb_printf("\n");
2387c478bd9Sstevel@tonic-gate
2397c478bd9Sstevel@tonic-gate mdb_printf("%%cs = 0x%04x\t%%fs = 0x%04x\t%%gs = 0x%04x\n",
2407c478bd9Sstevel@tonic-gate grs[REG_CS], grs[REG_FS], grs[REG_GS]);
2417c478bd9Sstevel@tonic-gate mdb_printf("%%ds = 0x%04x\t%%es = 0x%04x\t%%ss = 0x%04x\n",
2427c478bd9Sstevel@tonic-gate grs[REG_DS], grs[REG_ES], grs[REG_SS]);
2437c478bd9Sstevel@tonic-gate
2447c478bd9Sstevel@tonic-gate mdb_printf("\n");
2457c478bd9Sstevel@tonic-gate
2467c478bd9Sstevel@tonic-gate mdb_printf("%%rip = 0x%0?p %A\n", grs[REG_RIP], grs[REG_RIP]);
2477c478bd9Sstevel@tonic-gate mdb_printf("%%rbp = 0x%0?p\n", grs[REG_RBP], grs[REG_RBP]);
2487c478bd9Sstevel@tonic-gate mdb_printf("%%rsp = 0x%0?p\n", grs[REG_RSP], grs[REG_RSP]);
2497c478bd9Sstevel@tonic-gate
2507c478bd9Sstevel@tonic-gate mdb_printf("\n");
2517c478bd9Sstevel@tonic-gate
2527c478bd9Sstevel@tonic-gate mdb_printf("%%rflags = 0x%08x\n", rflags);
2537c478bd9Sstevel@tonic-gate
2547c478bd9Sstevel@tonic-gate mdb_printf(" id=%u vip=%u vif=%u ac=%u vm=%u rf=%u nt=%u iopl=0x%x\n",
2557c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_ID_MASK) >> KREG_EFLAGS_ID_SHIFT,
2567c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_VIP_MASK) >> KREG_EFLAGS_VIP_SHIFT,
2577c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_VIF_MASK) >> KREG_EFLAGS_VIF_SHIFT,
2587c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_AC_MASK) >> KREG_EFLAGS_AC_SHIFT,
2597c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_VM_MASK) >> KREG_EFLAGS_VM_SHIFT,
2607c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_RF_MASK) >> KREG_EFLAGS_RF_SHIFT,
2617c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_NT_MASK) >> KREG_EFLAGS_NT_SHIFT,
2627c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_IOPL_MASK) >> KREG_EFLAGS_IOPL_SHIFT);
2637c478bd9Sstevel@tonic-gate
2647c478bd9Sstevel@tonic-gate mdb_printf(" status=<%s,%s,%s,%s,%s,%s,%s,%s,%s>\n",
2657c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_OF_MASK) ? "OF" : "of",
2667c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_DF_MASK) ? "DF" : "df",
2677c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_IF_MASK) ? "IF" : "if",
2687c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_TF_MASK) ? "TF" : "tf",
2697c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_SF_MASK) ? "SF" : "sf",
2707c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_ZF_MASK) ? "ZF" : "zf",
2717c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_AF_MASK) ? "AF" : "af",
2727c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_PF_MASK) ? "PF" : "pf",
2737c478bd9Sstevel@tonic-gate (rflags & KREG_EFLAGS_CF_MASK) ? "CF" : "cf");
2747c478bd9Sstevel@tonic-gate
2757c478bd9Sstevel@tonic-gate mdb_printf("\n");
2767c478bd9Sstevel@tonic-gate
2777c478bd9Sstevel@tonic-gate mdb_printf("%%gsbase = 0x%0?p\n", grs[REG_GSBASE]);
2787c478bd9Sstevel@tonic-gate mdb_printf("%%fsbase = 0x%0?p\n", grs[REG_FSBASE]);
2797c478bd9Sstevel@tonic-gate mdb_printf("%%trapno = 0x%x\n", grs[REG_TRAPNO]);
2807c478bd9Sstevel@tonic-gate mdb_printf(" %%err = 0x%x\n", grs[REG_ERR]);
2817c478bd9Sstevel@tonic-gate
2827c478bd9Sstevel@tonic-gate return (set_errno(ENOTSUP));
2837c478bd9Sstevel@tonic-gate }
2847c478bd9Sstevel@tonic-gate
2857c478bd9Sstevel@tonic-gate int
pt_fpregs(uintptr_t addr,uint_t flags,int argc,const mdb_arg_t * argv)2867c478bd9Sstevel@tonic-gate pt_fpregs(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv)
2877c478bd9Sstevel@tonic-gate {
288*ed093b41SRobert Mustacchi int ret;
2897c478bd9Sstevel@tonic-gate prfpregset_t fprs;
290bc0e9132SGordon Ross struct _fpchip_state fps;
2917c478bd9Sstevel@tonic-gate char buf[256];
2927c478bd9Sstevel@tonic-gate uint_t top;
293*ed093b41SRobert Mustacchi size_t i;
2947c478bd9Sstevel@tonic-gate
2957c478bd9Sstevel@tonic-gate /*
2967c478bd9Sstevel@tonic-gate * Union for overlaying _fpreg structure on to quad-precision
2977c478bd9Sstevel@tonic-gate * floating-point value (long double).
2987c478bd9Sstevel@tonic-gate */
2997c478bd9Sstevel@tonic-gate union {
3007c478bd9Sstevel@tonic-gate struct _fpreg reg;
3017c478bd9Sstevel@tonic-gate long double ld;
3027c478bd9Sstevel@tonic-gate } fpru;
3037c478bd9Sstevel@tonic-gate
3047c478bd9Sstevel@tonic-gate /*
305*ed093b41SRobert Mustacchi * We use common code between 32-bit and 64-bit x86 to capture and print
306*ed093b41SRobert Mustacchi * the extended vector state. The remaining classic 387 state is
307*ed093b41SRobert Mustacchi * finicky and different enough that it is left to be dealt with on its
308*ed093b41SRobert Mustacchi * own.
3097c478bd9Sstevel@tonic-gate */
310*ed093b41SRobert Mustacchi if ((ret = x86_pt_fpregs_common(addr, flags, argc, &fprs)) != DCMD_OK)
311*ed093b41SRobert Mustacchi return (ret);
3127c478bd9Sstevel@tonic-gate
3137c478bd9Sstevel@tonic-gate bcopy(&fprs.fp_reg_set.fpchip_state, &fps, sizeof (fps));
314*ed093b41SRobert Mustacchi mdb_printf("387 and FP Control State\n");
3157c478bd9Sstevel@tonic-gate
3167c478bd9Sstevel@tonic-gate fps.status &= 0xffff; /* saved status word is really 16 bits */
3177c478bd9Sstevel@tonic-gate
3187c478bd9Sstevel@tonic-gate mdb_printf("cw 0x%04x (%s)\n", fps.cw,
3197c478bd9Sstevel@tonic-gate fpcw2str(fps.cw, buf, sizeof (buf)));
3207c478bd9Sstevel@tonic-gate
3217c478bd9Sstevel@tonic-gate top = (fps.sw & FPS_TOP) >> 11;
3227c478bd9Sstevel@tonic-gate mdb_printf("sw 0x%04x (TOP=0t%u) (%s)\n", fps.sw,
3237c478bd9Sstevel@tonic-gate top, fpsw2str(fps.sw, buf, sizeof (buf)));
3247c478bd9Sstevel@tonic-gate
3257c478bd9Sstevel@tonic-gate mdb_printf("xcp sw 0x%04x (%s)\n\n", fps.status,
3267c478bd9Sstevel@tonic-gate fpsw2str(fps.status, buf, sizeof (buf)));
3277c478bd9Sstevel@tonic-gate
3287c478bd9Sstevel@tonic-gate mdb_printf("fop 0x%x\n", fps.fop);
3297c478bd9Sstevel@tonic-gate mdb_printf("rip 0x%x\n", fps.rip);
3307c478bd9Sstevel@tonic-gate mdb_printf("rdp 0x%x\n\n", fps.rdp);
3317c478bd9Sstevel@tonic-gate
332*ed093b41SRobert Mustacchi for (i = 0; i < ARRAY_SIZE(fps.st); i++) {
3337c478bd9Sstevel@tonic-gate /*
3347c478bd9Sstevel@tonic-gate * Recall that we need to use the current TOP-of-stack value to
3357c478bd9Sstevel@tonic-gate * associate the _st[] index back to a physical register number,
3367c478bd9Sstevel@tonic-gate * since tag word indices are physical register numbers. Then
3377c478bd9Sstevel@tonic-gate * to get the tag value, we shift over two bits for each tag
3387c478bd9Sstevel@tonic-gate * index, and then grab the bottom two bits.
3397c478bd9Sstevel@tonic-gate */
3407c478bd9Sstevel@tonic-gate uint_t tag_index = (i + top) & 7;
3417c478bd9Sstevel@tonic-gate uint_t tag_fctw = (fps.fctw >> tag_index) & 1;
3427c478bd9Sstevel@tonic-gate uint_t tag_value;
3437c478bd9Sstevel@tonic-gate uint_t exp;
3447c478bd9Sstevel@tonic-gate
3457c478bd9Sstevel@tonic-gate /*
3467c478bd9Sstevel@tonic-gate * AMD64 stores the tag in a compressed form. It is
3477c478bd9Sstevel@tonic-gate * necessary to extract the original 2-bit tag value.
3487c478bd9Sstevel@tonic-gate * See AMD64 Architecture Programmer's Manual Volume 2:
3497c478bd9Sstevel@tonic-gate * System Programming, Chapter 11.
3507c478bd9Sstevel@tonic-gate */
3517c478bd9Sstevel@tonic-gate
3527c478bd9Sstevel@tonic-gate fpru.ld = fps.st[i].__fpr_pad._q;
3537c478bd9Sstevel@tonic-gate exp = fpru.reg.exponent & 0x7fff;
3547c478bd9Sstevel@tonic-gate
3557c478bd9Sstevel@tonic-gate if (tag_fctw == 0) {
3567c478bd9Sstevel@tonic-gate tag_value = 3; /* empty */
3577c478bd9Sstevel@tonic-gate } else if (exp == 0) {
3587c478bd9Sstevel@tonic-gate if (fpru.reg.significand[0] == 0 &&
3597c478bd9Sstevel@tonic-gate fpru.reg.significand[1] == 0 &&
3607c478bd9Sstevel@tonic-gate fpru.reg.significand[2] == 0 &&
3617c478bd9Sstevel@tonic-gate fpru.reg.significand[3] == 0)
3627c478bd9Sstevel@tonic-gate tag_value = 1; /* zero */
3637c478bd9Sstevel@tonic-gate else
3647c478bd9Sstevel@tonic-gate tag_value = 2; /* special: denormal */
3657c478bd9Sstevel@tonic-gate } else if (exp == 0x7fff) {
3667c478bd9Sstevel@tonic-gate tag_value = 2; /* special: infinity or NaN */
3677c478bd9Sstevel@tonic-gate } else if (fpru.reg.significand[3] & 0x8000) {
3687c478bd9Sstevel@tonic-gate tag_value = 0; /* valid */
3697c478bd9Sstevel@tonic-gate } else {
3707c478bd9Sstevel@tonic-gate tag_value = 2; /* special: unnormal */
3717c478bd9Sstevel@tonic-gate }
3727c478bd9Sstevel@tonic-gate
3737c478bd9Sstevel@tonic-gate mdb_printf("%%st%d 0x%04x.%04x%04x%04x%04x = %lg %s\n",
3747c478bd9Sstevel@tonic-gate i, fpru.reg.exponent,
3757c478bd9Sstevel@tonic-gate fpru.reg.significand[3], fpru.reg.significand[2],
3767c478bd9Sstevel@tonic-gate fpru.reg.significand[1], fpru.reg.significand[0],
377*ed093b41SRobert Mustacchi fpru.ld, fptag2str(tag_value));
3787c478bd9Sstevel@tonic-gate }
3797c478bd9Sstevel@tonic-gate
380*ed093b41SRobert Mustacchi x86_pt_fpregs_sse_ctl(fps.mxcsr, fps.xstatus, buf, sizeof (buf));
3817c478bd9Sstevel@tonic-gate
3827c478bd9Sstevel@tonic-gate return (DCMD_OK);
3837c478bd9Sstevel@tonic-gate }
3847c478bd9Sstevel@tonic-gate
3857c478bd9Sstevel@tonic-gate /*ARGSUSED*/
3867c478bd9Sstevel@tonic-gate int
pt_getfpreg(mdb_tgt_t * t,mdb_tgt_tid_t tid,ushort_t rd_num,ushort_t rd_flags,mdb_tgt_reg_t * rp)3877c478bd9Sstevel@tonic-gate pt_getfpreg(mdb_tgt_t *t, mdb_tgt_tid_t tid, ushort_t rd_num,
3887c478bd9Sstevel@tonic-gate ushort_t rd_flags, mdb_tgt_reg_t *rp)
3897c478bd9Sstevel@tonic-gate {
3907c478bd9Sstevel@tonic-gate return (set_errno(ENOTSUP));
3917c478bd9Sstevel@tonic-gate }
3927c478bd9Sstevel@tonic-gate
3937c478bd9Sstevel@tonic-gate /*ARGSUSED*/
3947c478bd9Sstevel@tonic-gate int
pt_putfpreg(mdb_tgt_t * t,mdb_tgt_tid_t tid,ushort_t rd_num,ushort_t rd_flags,mdb_tgt_reg_t rval)3957c478bd9Sstevel@tonic-gate pt_putfpreg(mdb_tgt_t *t, mdb_tgt_tid_t tid, ushort_t rd_num,
3967c478bd9Sstevel@tonic-gate ushort_t rd_flags, mdb_tgt_reg_t rval)
3977c478bd9Sstevel@tonic-gate {
3987c478bd9Sstevel@tonic-gate return (set_errno(ENOTSUP));
3997c478bd9Sstevel@tonic-gate }
4007c478bd9Sstevel@tonic-gate
4017c478bd9Sstevel@tonic-gate /*ARGSUSED*/
4027c478bd9Sstevel@tonic-gate void
pt_addfpregs(mdb_tgt_t * t)4037c478bd9Sstevel@tonic-gate pt_addfpregs(mdb_tgt_t *t)
4047c478bd9Sstevel@tonic-gate {
4057c478bd9Sstevel@tonic-gate /* not implemented */
4067c478bd9Sstevel@tonic-gate }
4077c478bd9Sstevel@tonic-gate
4087c478bd9Sstevel@tonic-gate /*ARGSUSED*/
4097c478bd9Sstevel@tonic-gate int
pt_frameregs(void * arglim,uintptr_t pc,uint_t argc,const long * argv,const mdb_tgt_gregset_t * gregs,boolean_t pc_faked)4107c478bd9Sstevel@tonic-gate pt_frameregs(void *arglim, uintptr_t pc, uint_t argc, const long *argv,
4117c478bd9Sstevel@tonic-gate const mdb_tgt_gregset_t *gregs, boolean_t pc_faked)
4127c478bd9Sstevel@tonic-gate {
4137c478bd9Sstevel@tonic-gate return (set_errno(ENOTSUP));
4147c478bd9Sstevel@tonic-gate }
4157c478bd9Sstevel@tonic-gate
4167c478bd9Sstevel@tonic-gate /*ARGSUSED*/
4177c478bd9Sstevel@tonic-gate const char *
pt_disasm(const GElf_Ehdr * ehp)4187c478bd9Sstevel@tonic-gate pt_disasm(const GElf_Ehdr *ehp)
4197c478bd9Sstevel@tonic-gate {
4207c478bd9Sstevel@tonic-gate return ("amd64");
4217c478bd9Sstevel@tonic-gate }
4227c478bd9Sstevel@tonic-gate
4237c478bd9Sstevel@tonic-gate /*
4247c478bd9Sstevel@tonic-gate * Determine the return address for the current frame.
4257c478bd9Sstevel@tonic-gate */
4267c478bd9Sstevel@tonic-gate int
pt_step_out(mdb_tgt_t * t,uintptr_t * p)4277c478bd9Sstevel@tonic-gate pt_step_out(mdb_tgt_t *t, uintptr_t *p)
4287c478bd9Sstevel@tonic-gate {
4297c478bd9Sstevel@tonic-gate const lwpstatus_t *psp = &Pstatus(t->t_pshandle)->pr_lwp;
4307c478bd9Sstevel@tonic-gate
4317c478bd9Sstevel@tonic-gate if (Pstate(t->t_pshandle) != PS_STOP)
4327c478bd9Sstevel@tonic-gate return (set_errno(EMDB_TGTBUSY));
4337c478bd9Sstevel@tonic-gate
434405e3c92SRichard Lowe return (mdb_amd64_step_out(t, p, psp->pr_reg[REG_RIP],
435405e3c92SRichard Lowe psp->pr_reg[REG_RBP], psp->pr_reg[REG_RSP], psp->pr_instr));
4367c478bd9Sstevel@tonic-gate }
4377c478bd9Sstevel@tonic-gate
4387c478bd9Sstevel@tonic-gate /*
4397c478bd9Sstevel@tonic-gate * Return the address of the next instruction following a call, or return -1
4407c478bd9Sstevel@tonic-gate * and set errno to EAGAIN if the target should just single-step.
4417c478bd9Sstevel@tonic-gate */
4427c478bd9Sstevel@tonic-gate int
pt_next(mdb_tgt_t * t,uintptr_t * p)4437c478bd9Sstevel@tonic-gate pt_next(mdb_tgt_t *t, uintptr_t *p)
4447c478bd9Sstevel@tonic-gate {
4457c478bd9Sstevel@tonic-gate const lwpstatus_t *psp = &Pstatus(t->t_pshandle)->pr_lwp;
4467c478bd9Sstevel@tonic-gate
4477c478bd9Sstevel@tonic-gate if (Pstate(t->t_pshandle) != PS_STOP)
4487c478bd9Sstevel@tonic-gate return (set_errno(EMDB_TGTBUSY));
4497c478bd9Sstevel@tonic-gate
4507c478bd9Sstevel@tonic-gate return (mdb_amd64_next(t, p, psp->pr_reg[REG_RIP], pt_read_instr(t)));
4517c478bd9Sstevel@tonic-gate }
452