From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: X-Spam-Checker-Version: SpamAssassin 3.4.0 (2014-02-07) on aws-us-west-2-korg-lkml-1.web.codeaurora.org Received: from lists.gnu.org (lists.gnu.org [209.51.188.17]) (using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits)) (No client certificate requested) by smtp.lore.kernel.org (Postfix) with ESMTPS id 8761EC25B75 for ; Fri, 31 May 2024 14:18:53 +0000 (UTC) Received: from localhost ([::1] helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1sD35Y-0003sO-W7; Fri, 31 May 2024 10:18:37 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1sD35X-0003pg-69 for qemu-devel@nongnu.org; Fri, 31 May 2024 10:18:35 -0400 Received: from mx.treblig.org ([2a00:1098:5b::1]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1sD35U-0004Wf-Du for qemu-devel@nongnu.org; Fri, 31 May 2024 10:18:34 -0400 DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; d=treblig.org ; s=bytemarkmx; h=Content-Type:MIME-Version:Message-ID:Subject:From:Date:From :Subject; bh=/DHcE01KjCGAnk6ZXHIc38i5deoESWvmnDVy8FwueIg=; b=MF5H4jMKANoCFy+1 wLdJ/F2W64ynybHnSxJDgrTnh4K96G84zIUXyStmYuBYDzBucDVlgks3/A5afsCXDxZEV1GvYa7Xs 3PfSIvRWh1jS2yx+0r2doNuJFe4nIBeEsmR1eu54cnFpSawzMGcVATWvRCH4Z2WgPk7QeI11gdUxJ mvRLHdXWnrcxctkkeLRMIiqR+14yj6VCFIlvx6XTkpqv6O/hCNn+KAQPDOtu/eLy4l7S0lZcp193N jEbFAHMctZY521v78DUcKy28T1SiKhpoZsULE62ALr1M1PgX2wJdIt1UHHo/TV28JIls5v+iXfn50 ZyexiODlDvc7kkbXFQ==; Received: from dg by mx.treblig.org with local (Exim 4.96) (envelope-from ) id 1sD35S-003ai9-1G; Fri, 31 May 2024 14:18:30 +0000 Date: Fri, 31 May 2024 14:18:30 +0000 From: "Dr. David Alan Gilbert" To: Don Porter Cc: qemu-devel@nongnu.org, peter.maydell@linaro.org, nadav.amit@gmail.com, richard.henderson@linaro.org Subject: Re: [PATCH v2 2/6] Convert 'info tlb' to use generic iterator Message-ID: References: <20240524170748.1842030-1-porter@cs.unc.edu> <20240524170748.1842030-3-porter@cs.unc.edu> MIME-Version: 1.0 Content-Type: text/plain; charset=iso-8859-1 Content-Disposition: inline In-Reply-To: <20240524170748.1842030-3-porter@cs.unc.edu> X-Chocolate: 70 percent or better cocoa solids preferably X-Operating-System: Linux/6.1.0-21-amd64 (x86_64) X-Uptime: 14:17:48 up 23 days, 1:31, 1 user, load average: 0.05, 0.03, 0.00 User-Agent: Mutt/2.2.12 (2023-09-09) Received-SPF: pass client-ip=2a00:1098:5b::1; envelope-from=dg@treblig.org; helo=mx.treblig.org X-Spam_score_int: -20 X-Spam_score: -2.1 X-Spam_bar: -- X-Spam_report: (-2.1 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1, DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1, DKIM_VALID_EF=-0.1, SPF_HELO_NONE=0.001, SPF_PASS=-0.001, T_SCC_BODY_TEXT_LINE=-0.01 autolearn=ham autolearn_force=no X-Spam_action: no action X-BeenThere: qemu-devel@nongnu.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: qemu-devel-bounces+qemu-devel=archiver.kernel.org@nongnu.org Sender: qemu-devel-bounces+qemu-devel=archiver.kernel.org@nongnu.org * Don Porter (porter@cs.unc.edu) wrote: > Signed-off-by: Don Porter If this changes the output of 'info tlb' could you add a before/after to the commit message please. Also, have a look at glib's g_printf and friends, you might find they're easier; https://www.manpagez.com/html/glib/glib-2.52.3/glib-String-Utility-Functions.php#g-printf Dave > --- > target/i386/monitor.c | 203 ++++++------------------------------------ > 1 file changed, 28 insertions(+), 175 deletions(-) > > diff --git a/target/i386/monitor.c b/target/i386/monitor.c > index d7aae99c73..adf95edfb4 100644 > --- a/target/i386/monitor.c > +++ b/target/i386/monitor.c > @@ -430,201 +430,54 @@ void hmp_info_pg(Monitor *mon, const QDict *qdict) > } > > static void print_pte(Monitor *mon, CPUArchState *env, hwaddr addr, > - hwaddr pte, hwaddr mask) > + hwaddr pte) > { > - addr = addr_canonical(env, addr); > - > - monitor_printf(mon, HWADDR_FMT_plx ": " HWADDR_FMT_plx > - " %c%c%c%c%c%c%c%c%c\n", > - addr, > - pte & mask, > - pte & PG_NX_MASK ? 'X' : '-', > - pte & PG_GLOBAL_MASK ? 'G' : '-', > - pte & PG_PSE_MASK ? 'P' : '-', > - pte & PG_DIRTY_MASK ? 'D' : '-', > - pte & PG_ACCESSED_MASK ? 'A' : '-', > - pte & PG_PCD_MASK ? 'C' : '-', > - pte & PG_PWT_MASK ? 'T' : '-', > - pte & PG_USER_MASK ? 'U' : '-', > - pte & PG_RW_MASK ? 'W' : '-'); > -} > + char buf[128]; > + char *pos = buf; > > -static void tlb_info_32(Monitor *mon, CPUArchState *env) > -{ > - unsigned int l1, l2; > - uint32_t pgd, pde, pte; > + addr = addr_canonical(env, addr); > > - pgd = env->cr[3] & ~0xfff; > - for(l1 = 0; l1 < 1024; l1++) { > - cpu_physical_memory_read(pgd + l1 * 4, &pde, 4); > - pde = le32_to_cpu(pde); > - if (pde & PG_PRESENT_MASK) { > - if ((pde & PG_PSE_MASK) && (env->cr[4] & CR4_PSE_MASK)) { > - /* 4M pages */ > - print_pte(mon, env, (l1 << 22), pde, ~((1 << 21) - 1)); > - } else { > - for(l2 = 0; l2 < 1024; l2++) { > - cpu_physical_memory_read((pde & ~0xfff) + l2 * 4, &pte, 4); > - pte = le32_to_cpu(pte); > - if (pte & PG_PRESENT_MASK) { > - print_pte(mon, env, (l1 << 22) + (l2 << 12), > - pte & ~PG_PSE_MASK, > - ~0xfff); > - } > - } > - } > - } > - } > -} > + pos += sprintf(pos, HWADDR_FMT_plx ": " HWADDR_FMT_plx " ", addr, > + (hwaddr) (pte & PG_ADDRESS_MASK)); > > -static void tlb_info_pae32(Monitor *mon, CPUArchState *env) > -{ > - unsigned int l1, l2, l3; > - uint64_t pdpe, pde, pte; > - uint64_t pdp_addr, pd_addr, pt_addr; > + pos += sprintf(pos, " %s", pg_bits(pte)); > > - pdp_addr = env->cr[3] & ~0x1f; > - for (l1 = 0; l1 < 4; l1++) { > - cpu_physical_memory_read(pdp_addr + l1 * 8, &pdpe, 8); > - pdpe = le64_to_cpu(pdpe); > - if (pdpe & PG_PRESENT_MASK) { > - pd_addr = pdpe & 0x3fffffffff000ULL; > - for (l2 = 0; l2 < 512; l2++) { > - cpu_physical_memory_read(pd_addr + l2 * 8, &pde, 8); > - pde = le64_to_cpu(pde); > - if (pde & PG_PRESENT_MASK) { > - if (pde & PG_PSE_MASK) { > - /* 2M pages with PAE, CR4.PSE is ignored */ > - print_pte(mon, env, (l1 << 30) + (l2 << 21), pde, > - ~((hwaddr)(1 << 20) - 1)); > - } else { > - pt_addr = pde & 0x3fffffffff000ULL; > - for (l3 = 0; l3 < 512; l3++) { > - cpu_physical_memory_read(pt_addr + l3 * 8, &pte, 8); > - pte = le64_to_cpu(pte); > - if (pte & PG_PRESENT_MASK) { > - print_pte(mon, env, (l1 << 30) + (l2 << 21) > - + (l3 << 12), > - pte & ~PG_PSE_MASK, > - ~(hwaddr)0xfff); > - } > - } > - } > - } > - } > - } > + /* Trim line to fit screen */ > + if (pos - buf > 79) { > + strcpy(buf + 77, ".."); > } > -} > > -#ifdef TARGET_X86_64 > -static void tlb_info_la48(Monitor *mon, CPUArchState *env, > - uint64_t l0, uint64_t pml4_addr) > -{ > - uint64_t l1, l2, l3, l4; > - uint64_t pml4e, pdpe, pde, pte; > - uint64_t pdp_addr, pd_addr, pt_addr; > - > - for (l1 = 0; l1 < 512; l1++) { > - cpu_physical_memory_read(pml4_addr + l1 * 8, &pml4e, 8); > - pml4e = le64_to_cpu(pml4e); > - if (!(pml4e & PG_PRESENT_MASK)) { > - continue; > - } > - > - pdp_addr = pml4e & 0x3fffffffff000ULL; > - for (l2 = 0; l2 < 512; l2++) { > - cpu_physical_memory_read(pdp_addr + l2 * 8, &pdpe, 8); > - pdpe = le64_to_cpu(pdpe); > - if (!(pdpe & PG_PRESENT_MASK)) { > - continue; > - } > - > - if (pdpe & PG_PSE_MASK) { > - /* 1G pages, CR4.PSE is ignored */ > - print_pte(mon, env, (l0 << 48) + (l1 << 39) + (l2 << 30), > - pdpe, 0x3ffffc0000000ULL); > - continue; > - } > - > - pd_addr = pdpe & 0x3fffffffff000ULL; > - for (l3 = 0; l3 < 512; l3++) { > - cpu_physical_memory_read(pd_addr + l3 * 8, &pde, 8); > - pde = le64_to_cpu(pde); > - if (!(pde & PG_PRESENT_MASK)) { > - continue; > - } > - > - if (pde & PG_PSE_MASK) { > - /* 2M pages, CR4.PSE is ignored */ > - print_pte(mon, env, (l0 << 48) + (l1 << 39) + (l2 << 30) + > - (l3 << 21), pde, 0x3ffffffe00000ULL); > - continue; > - } > - > - pt_addr = pde & 0x3fffffffff000ULL; > - for (l4 = 0; l4 < 512; l4++) { > - cpu_physical_memory_read(pt_addr > - + l4 * 8, > - &pte, 8); > - pte = le64_to_cpu(pte); > - if (pte & PG_PRESENT_MASK) { > - print_pte(mon, env, (l0 << 48) + (l1 << 39) + > - (l2 << 30) + (l3 << 21) + (l4 << 12), > - pte & ~PG_PSE_MASK, 0x3fffffffff000ULL); > - } > - } > - } > - } > - } > + monitor_printf(mon, "%s\n", buf); > } > > -static void tlb_info_la57(Monitor *mon, CPUArchState *env) > +static > +int mem_print_tlb(CPUState *cs, void *data, PTE_t *pte, > + target_ulong vaddr, int height, int offset) > { > - uint64_t l0; > - uint64_t pml5e; > - uint64_t pml5_addr; > - > - pml5_addr = env->cr[3] & 0x3fffffffff000ULL; > - for (l0 = 0; l0 < 512; l0++) { > - cpu_physical_memory_read(pml5_addr + l0 * 8, &pml5e, 8); > - pml5e = le64_to_cpu(pml5e); > - if (pml5e & PG_PRESENT_MASK) { > - tlb_info_la48(mon, env, l0, pml5e & 0x3fffffffff000ULL); > - } > - } > + struct mem_print_state *state = (struct mem_print_state *) data; > + print_pte(state->mon, state->env, vaddr, pte->pte64_t); > + return 0; > } > -#endif /* TARGET_X86_64 */ > > void hmp_info_tlb(Monitor *mon, const QDict *qdict) > { > - CPUArchState *env; > + struct mem_print_state state; > > - env = mon_get_cpu_env(mon); > - if (!env) { > - monitor_printf(mon, "No CPU available\n"); > + CPUState *cs = mon_get_cpu(mon); > + if (!cs) { > + monitor_printf(mon, "Unable to get CPUState. Internal error\n"); > return; > } > > - if (!(env->cr[0] & CR0_PG_MASK)) { > - monitor_printf(mon, "PG disabled\n"); > + if (!init_iterator(mon, &state)) { > return; > } > - if (env->cr[4] & CR4_PAE_MASK) { > -#ifdef TARGET_X86_64 > - if (env->hflags & HF_LMA_MASK) { > - if (env->cr[4] & CR4_LA57_MASK) { > - tlb_info_la57(mon, env); > - } else { > - tlb_info_la48(mon, env, 0, env->cr[3] & 0x3fffffffff000ULL); > - } > - } else > -#endif > - { > - tlb_info_pae32(mon, env); > - } > - } else { > - tlb_info_32(mon, env); > - } > + > + /** > + * 'info tlb' visits only leaf PTEs marked present. > + * It does not check other protection bits. > + */ > + for_each_pte(cs, &mem_print_tlb, &state, false, false); > } > > static void mem_print(Monitor *mon, CPUArchState *env, > -- > 2.34.1 > -- -----Open up your eyes, open up your mind, open up your code ------- / Dr. David Alan Gilbert | Running GNU/Linux | Happy \ \ dave @ treblig.org | | In Hex / \ _________________________|_____ http://www.treblig.org |_______/