Import the lockstat(1) sources from OpenSolaris as of 20080410.
This commit is contained in:
parent
35d0e300ef
commit
d09b8b92d6
Notes:
svn2git
2020-12-20 02:59:44 +00:00
svn path=/vendor/opensolaris/dist/; revision=194450 svn path=/vendor/opensolaris/20080410b/; revision=194451; tag=vendor/opensolaris/20080410b
1858
cmd/lockstat/lockstat.c
Normal file
1858
cmd/lockstat/lockstat.c
Normal file
File diff suppressed because it is too large
Load Diff
253
cmd/lockstat/sym.c
Normal file
253
cmd/lockstat/sym.c
Normal file
@ -0,0 +1,253 @@
|
||||
/*
|
||||
* CDDL HEADER START
|
||||
*
|
||||
* The contents of this file are subject to the terms of the
|
||||
* Common Development and Distribution License, Version 1.0 only
|
||||
* (the "License"). You may not use this file except in compliance
|
||||
* with the License.
|
||||
*
|
||||
* You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
|
||||
* or http://www.opensolaris.org/os/licensing.
|
||||
* See the License for the specific language governing permissions
|
||||
* and limitations under the License.
|
||||
*
|
||||
* When distributing Covered Code, include this CDDL HEADER in each
|
||||
* file and include the License file at usr/src/OPENSOLARIS.LICENSE.
|
||||
* If applicable, add the following below this CDDL HEADER, with the
|
||||
* fields enclosed by brackets "[]" replaced with your own identifying
|
||||
* information: Portions Copyright [yyyy] [name of copyright owner]
|
||||
*
|
||||
* CDDL HEADER END
|
||||
*/
|
||||
/*
|
||||
* Copyright (c) 1997-1999 by Sun Microsystems, Inc.
|
||||
* All rights reserved.
|
||||
*/
|
||||
|
||||
#pragma ident "%Z%%M% %I% %E% SMI"
|
||||
|
||||
#include <stdio.h>
|
||||
#include <fcntl.h>
|
||||
#include <ctype.h>
|
||||
#include <string.h>
|
||||
#include <signal.h>
|
||||
#include <errno.h>
|
||||
#include <stdlib.h>
|
||||
#include <stdarg.h>
|
||||
#include <unistd.h>
|
||||
#include <limits.h>
|
||||
#include <sys/types.h>
|
||||
#include <sys/stat.h>
|
||||
|
||||
#include <libelf.h>
|
||||
#include <link.h>
|
||||
#include <elf.h>
|
||||
#include <sys/machelf.h>
|
||||
|
||||
#include <kstat.h>
|
||||
#include <sys/cpuvar.h>
|
||||
|
||||
typedef struct syment {
|
||||
uintptr_t addr;
|
||||
char *name;
|
||||
size_t size;
|
||||
} syment_t;
|
||||
|
||||
static syment_t *symbol_table;
|
||||
static int nsyms, maxsyms;
|
||||
static char maxsymname[64];
|
||||
|
||||
#ifdef _ELF64
|
||||
#define elf_getshdr elf64_getshdr
|
||||
#else
|
||||
#define elf_getshdr elf32_getshdr
|
||||
#endif
|
||||
|
||||
static void
|
||||
add_symbol(char *name, uintptr_t addr, size_t size)
|
||||
{
|
||||
syment_t *sep;
|
||||
|
||||
if (nsyms >= maxsyms) {
|
||||
maxsyms += 10000;
|
||||
symbol_table = realloc(symbol_table, maxsyms * sizeof (*sep));
|
||||
if (symbol_table == NULL) {
|
||||
(void) fprintf(stderr, "can't allocate symbol table\n");
|
||||
exit(3);
|
||||
}
|
||||
}
|
||||
sep = &symbol_table[nsyms++];
|
||||
|
||||
sep->name = name;
|
||||
sep->addr = addr;
|
||||
sep->size = size;
|
||||
}
|
||||
|
||||
static void
|
||||
remove_symbol(uintptr_t addr)
|
||||
{
|
||||
int i;
|
||||
syment_t *sep = symbol_table;
|
||||
|
||||
for (i = 0; i < nsyms; i++, sep++)
|
||||
if (sep->addr == addr)
|
||||
sep->addr = 0;
|
||||
}
|
||||
|
||||
static void
|
||||
fake_up_certain_popular_kernel_symbols(void)
|
||||
{
|
||||
kstat_ctl_t *kc;
|
||||
kstat_t *ksp;
|
||||
char *name;
|
||||
|
||||
if ((kc = kstat_open()) == NULL)
|
||||
return;
|
||||
|
||||
for (ksp = kc->kc_chain; ksp; ksp = ksp->ks_next) {
|
||||
if (strcmp(ksp->ks_module, "cpu_info") == 0) {
|
||||
if ((name = malloc(20)) == NULL)
|
||||
break;
|
||||
/*
|
||||
* For consistency, keep cpu[0] and toss cpu0
|
||||
* or any other such symbols.
|
||||
*/
|
||||
if (ksp->ks_instance == 0)
|
||||
remove_symbol((uintptr_t)ksp->ks_private);
|
||||
(void) sprintf(name, "cpu[%d]", ksp->ks_instance);
|
||||
add_symbol(name, (uintptr_t)ksp->ks_private,
|
||||
sizeof (struct cpu));
|
||||
}
|
||||
}
|
||||
(void) kstat_close(kc);
|
||||
}
|
||||
|
||||
static int
|
||||
symcmp(const void *p1, const void *p2)
|
||||
{
|
||||
uintptr_t a1 = ((syment_t *)p1)->addr;
|
||||
uintptr_t a2 = ((syment_t *)p2)->addr;
|
||||
|
||||
if (a1 < a2)
|
||||
return (-1);
|
||||
if (a1 > a2)
|
||||
return (1);
|
||||
return (0);
|
||||
}
|
||||
|
||||
int
|
||||
symtab_init(void)
|
||||
{
|
||||
Elf *elf;
|
||||
Elf_Scn *scn = NULL;
|
||||
Sym *symtab, *symp, *lastsym;
|
||||
char *strtab;
|
||||
uint_t cnt;
|
||||
int fd;
|
||||
int i;
|
||||
int strindex = -1;
|
||||
|
||||
if ((fd = open("/dev/ksyms", O_RDONLY)) == -1)
|
||||
return (-1);
|
||||
|
||||
(void) elf_version(EV_CURRENT);
|
||||
|
||||
elf = elf_begin(fd, ELF_C_READ, NULL);
|
||||
|
||||
for (cnt = 1; (scn = elf_nextscn(elf, scn)) != NULL; cnt++) {
|
||||
Shdr *shdr = elf_getshdr(scn);
|
||||
if (shdr->sh_type == SHT_SYMTAB) {
|
||||
symtab = (Sym *)elf_getdata(scn, NULL)->d_buf;
|
||||
nsyms = shdr->sh_size / shdr->sh_entsize;
|
||||
strindex = shdr->sh_link;
|
||||
}
|
||||
}
|
||||
|
||||
for (cnt = 1; (scn = elf_nextscn(elf, scn)) != NULL; cnt++) {
|
||||
if (cnt == strindex)
|
||||
strtab = (char *)elf_getdata(scn, NULL)->d_buf;
|
||||
}
|
||||
|
||||
lastsym = symtab + nsyms;
|
||||
nsyms = 0;
|
||||
for (symp = symtab; symp < lastsym; symp++)
|
||||
if ((uint_t)ELF32_ST_TYPE(symp->st_info) <= STT_FUNC &&
|
||||
symp->st_size != 0)
|
||||
add_symbol(symp->st_name + strtab,
|
||||
(uintptr_t)symp->st_value, (size_t)symp->st_size);
|
||||
|
||||
fake_up_certain_popular_kernel_symbols();
|
||||
(void) sprintf(maxsymname, "0x%lx", ULONG_MAX);
|
||||
add_symbol(maxsymname, ULONG_MAX, 1);
|
||||
|
||||
qsort(symbol_table, nsyms, sizeof (syment_t), symcmp);
|
||||
|
||||
/*
|
||||
* Destroy all duplicate symbols, then sort it again.
|
||||
*/
|
||||
for (i = 0; i < nsyms - 1; i++)
|
||||
if (symbol_table[i].addr == symbol_table[i + 1].addr)
|
||||
symbol_table[i].addr = 0;
|
||||
|
||||
qsort(symbol_table, nsyms, sizeof (syment_t), symcmp);
|
||||
|
||||
while (symbol_table[1].addr == 0) {
|
||||
symbol_table++;
|
||||
nsyms--;
|
||||
}
|
||||
symbol_table[0].name = "(usermode)";
|
||||
symbol_table[0].addr = 0;
|
||||
symbol_table[0].size = 1;
|
||||
|
||||
return (0);
|
||||
}
|
||||
|
||||
char *
|
||||
addr_to_sym(uintptr_t addr, uintptr_t *offset, size_t *sizep)
|
||||
{
|
||||
int lo = 0;
|
||||
int hi = nsyms - 1;
|
||||
int mid;
|
||||
syment_t *sep;
|
||||
|
||||
while (hi - lo > 1) {
|
||||
mid = (lo + hi) / 2;
|
||||
if (addr >= symbol_table[mid].addr) {
|
||||
lo = mid;
|
||||
} else {
|
||||
hi = mid;
|
||||
}
|
||||
}
|
||||
sep = &symbol_table[lo];
|
||||
*offset = addr - sep->addr;
|
||||
*sizep = sep->size;
|
||||
return (sep->name);
|
||||
}
|
||||
|
||||
uintptr_t
|
||||
sym_to_addr(char *name)
|
||||
{
|
||||
int i;
|
||||
syment_t *sep = symbol_table;
|
||||
|
||||
for (i = 0; i < nsyms; i++) {
|
||||
if (strcmp(name, sep->name) == 0)
|
||||
return (sep->addr);
|
||||
sep++;
|
||||
}
|
||||
return (NULL);
|
||||
}
|
||||
|
||||
size_t
|
||||
sym_size(char *name)
|
||||
{
|
||||
int i;
|
||||
syment_t *sep = symbol_table;
|
||||
|
||||
for (i = 0; i < nsyms; i++) {
|
||||
if (strcmp(name, sep->name) == 0)
|
||||
return (sep->size);
|
||||
sep++;
|
||||
}
|
||||
return (0);
|
||||
}
|
Loading…
Reference in New Issue
Block a user