aboutsummaryrefslogtreecommitdiff
path: root/db2/progs/db_stat/db_stat.c
diff options
context:
space:
mode:
Diffstat (limited to 'db2/progs/db_stat/db_stat.c')
-rw-r--r--db2/progs/db_stat/db_stat.c621
1 files changed, 0 insertions, 621 deletions
diff --git a/db2/progs/db_stat/db_stat.c b/db2/progs/db_stat/db_stat.c
deleted file mode 100644
index cef645da00..0000000000
--- a/db2/progs/db_stat/db_stat.c
+++ /dev/null
@@ -1,621 +0,0 @@
-/*-
- * See the file LICENSE for redistribution information.
- *
- * Copyright (c) 1996, 1997, 1998
- * Sleepycat Software. All rights reserved.
- */
-
-#include "config.h"
-
-#ifndef lint
-static const char copyright[] =
-"@(#) Copyright (c) 1996, 1997, 1998\n\
- Sleepycat Software Inc. All rights reserved.\n";
-static const char sccsid[] = "@(#)db_stat.c 8.41 (Sleepycat) 10/3/98";
-#endif
-
-#ifndef NO_SYSTEM_INCLUDES
-#include <sys/types.h>
-
-#include <ctype.h>
-#include <errno.h>
-#include <signal.h>
-#include <stdlib.h>
-#include <string.h>
-#include <time.h>
-#include <unistd.h>
-#endif
-
-#undef stat
-
-#include "db_int.h"
-#include "shqueue.h"
-#include "db_shash.h"
-#include "lock.h"
-#include "mp.h"
-#include "clib_ext.h"
-
-typedef enum { T_NOTSET, T_DB, T_LOCK, T_LOG, T_MPOOL, T_TXN } test_t;
-
-int argcheck __P((char *, const char *));
-void btree_stats __P((DB *));
-DB_ENV *db_init __P((char *, test_t));
-void dl __P((const char *, u_long));
-void hash_stats __P((DB *));
-int lock_ok __P((char *));
-void lock_stats __P((DB_ENV *));
-void log_stats __P((DB_ENV *));
-int main __P((int, char *[]));
-int mpool_ok __P((char *));
-void mpool_stats __P((DB_ENV *));
-void nosig __P((void));
-void prflags __P((u_int32_t, const FN *));
-int txn_compare __P((const void *, const void *));
-void txn_stats __P((DB_ENV *));
-void usage __P((void));
-
-char *internal;
-const char
- *progname = "db_stat"; /* Program name. */
-
-int
-main(argc, argv)
- int argc;
- char *argv[];
-{
- extern char *optarg;
- extern int optind;
- DB *dbp;
- DB_ENV *dbenv;
- test_t ttype;
- int ch;
- char *db, *home;
-
- ttype = T_NOTSET;
- db = home = NULL;
- while ((ch = getopt(argc, argv, "C:cd:h:lM:mNt")) != EOF)
- switch (ch) {
- case 'C':
- ttype = T_LOCK;
- if (!argcheck(internal = optarg, "Acflmo"))
- usage();
- break;
- case 'c':
- ttype = T_LOCK;
- break;
- case 'd':
- db = optarg;
- ttype = T_DB;
- break;
- case 'h':
- home = optarg;
- break;
- case 'l':
- ttype = T_LOG;
- break;
- case 'M':
- ttype = T_MPOOL;
- if (!argcheck(internal = optarg, "Ahlm"))
- usage();
- break;
- case 'm':
- ttype = T_MPOOL;
- break;
- case 'N':
- (void)db_value_set(0, DB_MUTEXLOCKS);
- break;
- case 't':
- ttype = T_TXN;
- break;
- case '?':
- default:
- usage();
- }
- argc -= optind;
- argv += optind;
-
- if (argc != 0 || ttype == T_NOTSET)
- usage();
-
- /*
- * Ignore signals -- we don't want to be interrupted because we're
- * spending all of our time in the DB library.
- */
- nosig();
- dbenv = db_init(home, ttype);
-
- switch (ttype) {
- case T_DB:
- if ((errno = db_open(db, DB_UNKNOWN,
- DB_RDONLY, 0, dbenv, NULL, &dbp)) != 0) {
- warn("%s", db);
- return (1);
- }
- switch (dbp->type) {
- case DB_BTREE:
- case DB_RECNO:
- btree_stats(dbp);
- break;
- case DB_HASH:
- hash_stats(dbp);
- break;
- case DB_UNKNOWN:
- abort(); /* Impossible. */
- /* NOTREACHED */
- }
- (void)dbp->close(dbp, 0);
- break;
- case T_LOCK:
- lock_stats(dbenv);
- break;
- case T_LOG:
- log_stats(dbenv);
- break;
- case T_MPOOL:
- mpool_stats(dbenv);
- break;
- case T_TXN:
- txn_stats(dbenv);
- break;
- case T_NOTSET:
- abort(); /* Impossible. */
- /* NOTREACHED */
- }
-
- if ((errno = db_appexit(dbenv)) != 0) {
- warn(NULL);
- return (1);
- }
- return (0);
-}
-
-/*
- * btree_stats --
- * Display btree/recno statistics.
- */
-void
-btree_stats(dbp)
- DB *dbp;
-{
- static const FN fn[] = {
- { DB_DUP, "DB_DUP" },
- { DB_FIXEDLEN, "DB_FIXEDLEN" },
- { DB_RECNUM, "DB_RECNUM" },
- { DB_RENUMBER, "DB_RENUMBER" },
- { 0 }
- };
- DB_BTREE_STAT *sp;
-
- if (dbp->stat(dbp, &sp, NULL, 0))
- err(1, "dbp->stat");
-
-#define PCT(f, t) \
- (t == 0 ? 0 : \
- (((double)((t * sp->bt_pagesize) - f) / (t * sp->bt_pagesize)) * 100))
-
- printf("%#lx\tBtree magic number.\n", (u_long)sp->bt_magic);
- printf("%lu\tBtree version number.\n", (u_long)sp->bt_version);
- prflags(sp->bt_flags, fn);
- if (dbp->type == DB_BTREE) {
-#ifdef NOT_IMPLEMENTED
- dl("Maximum keys per-page.\n", (u_long)sp->bt_maxkey);
-#endif
- dl("Minimum keys per-page.\n", (u_long)sp->bt_minkey);
- }
- if (dbp->type == DB_RECNO) {
- dl("Fixed-length record size.\n", (u_long)sp->bt_re_len);
- if (isprint(sp->bt_re_pad))
- printf("%c\tFixed-length record pad.\n",
- (int)sp->bt_re_pad);
- else
- printf("0x%x\tFixed-length record pad.\n",
- (int)sp->bt_re_pad);
- }
- dl("Underlying tree page size.\n", (u_long)sp->bt_pagesize);
- dl("Number of levels in the tree.\n", (u_long)sp->bt_levels);
- dl("Number of keys in the tree.\n", (u_long)sp->bt_nrecs);
- dl("Number of tree internal pages.\n", (u_long)sp->bt_int_pg);
- dl("Number of tree leaf pages.\n", (u_long)sp->bt_leaf_pg);
- dl("Number of tree duplicate pages.\n", (u_long)sp->bt_dup_pg);
- dl("Number of tree overflow pages.\n", (u_long)sp->bt_over_pg);
- dl("Number of pages on the free list.\n", (u_long)sp->bt_free);
- dl("Number of bytes free in tree internal pages",
- (u_long)sp->bt_int_pgfree);
- printf(" (%.0f%% ff).\n", PCT(sp->bt_int_pgfree, sp->bt_int_pg));
- dl("Number of bytes free in tree leaf pages",
- (u_long)sp->bt_leaf_pgfree);
- printf(" (%.0f%% ff).\n", PCT(sp->bt_leaf_pgfree, sp->bt_leaf_pg));
- dl("Number of bytes free in tree duplicate pages",
- (u_long)sp->bt_dup_pgfree);
- printf(" (%.0f%% ff).\n", PCT(sp->bt_dup_pgfree, sp->bt_dup_pg));
- dl("Number of bytes free in tree overflow pages",
- (u_long)sp->bt_over_pgfree);
- printf(" (%.0f%% ff).\n", PCT(sp->bt_over_pgfree, sp->bt_over_pg));
-}
-
-/*
- * hash_stats --
- * Display hash statistics.
- */
-void
-hash_stats(dbp)
- DB *dbp;
-{
- COMPQUIET(dbp, NULL);
-
- printf("Hash statistics not currently available.\n");
- return;
-}
-
-/*
- * lock_stats --
- * Display lock statistics.
- */
-void
-lock_stats(dbenv)
- DB_ENV *dbenv;
-{
- DB_LOCK_STAT *sp;
-
- if (internal != NULL) {
- __lock_dump_region(dbenv->lk_info, internal, stdout);
- return;
- }
-
- if (lock_stat(dbenv->lk_info, &sp, NULL))
- err(1, NULL);
-
- printf("%#lx\tLock magic number.\n", (u_long)sp->st_magic);
- printf("%lu\tLock version number.\n", (u_long)sp->st_version);
- dl("Lock region reference count.\n", (u_long)sp->st_refcnt);
- dl("Lock region size.\n", (u_long)sp->st_regsize);
- dl("Maximum number of locks.\n", (u_long)sp->st_maxlocks);
- dl("Number of lock modes.\n", (u_long)sp->st_nmodes);
- dl("Number of lock objects.\n", (u_long)sp->st_numobjs);
- dl("Number of lockers.\n", (u_long)sp->st_nlockers);
- dl("Number of lock conflicts.\n", (u_long)sp->st_nconflicts);
- dl("Number of lock requests.\n", (u_long)sp->st_nrequests);
- dl("Number of lock releases.\n", (u_long)sp->st_nreleases);
- dl("Number of deadlocks.\n", (u_long)sp->st_ndeadlocks);
- dl("The number of region locks granted without waiting.\n",
- (u_long)sp->st_region_nowait);
- dl("The number of region locks granted after waiting.\n",
- (u_long)sp->st_region_wait);
-}
-
-/*
- * log_stats --
- * Display log statistics.
- */
-void
-log_stats(dbenv)
- DB_ENV *dbenv;
-{
- DB_LOG_STAT *sp;
-
- if (log_stat(dbenv->lg_info, &sp, NULL))
- err(1, NULL);
-
- printf("%#lx\tLog magic number.\n", (u_long)sp->st_magic);
- printf("%lu\tLog version number.\n", (u_long)sp->st_version);
- dl("Log region reference count.\n", (u_long)sp->st_refcnt);
- dl("Log region size.\n", (u_long)sp->st_regsize);
- printf("%#o\tLog file mode.\n", sp->st_mode);
- if (sp->st_lg_max % MEGABYTE == 0)
- printf("%luMb\tLog file size.\n",
- (u_long)sp->st_lg_max / MEGABYTE);
- else if (sp->st_lg_max % 1024 == 0)
- printf("%luKb\tLog file size.\n", (u_long)sp->st_lg_max / 1024);
- else
- printf("%lu\tLog file size.\n", (u_long)sp->st_lg_max);
- printf("%luMb\tLog bytes written (+%lu bytes).\n",
- (u_long)sp->st_w_mbytes, (u_long)sp->st_w_bytes);
- printf("%luMb\tLog bytes written since last checkpoint (+%lu bytes).\n",
- (u_long)sp->st_wc_mbytes, (u_long)sp->st_wc_bytes);
- dl("Total log file writes.\n", (u_long)sp->st_wcount);
- dl("Total log file flushes.\n", (u_long)sp->st_scount);
- printf("%lu\tCurrent log file number.\n", (u_long)sp->st_cur_file);
- printf("%lu\tCurrent log file offset.\n", (u_long)sp->st_cur_offset);
- dl("The number of region locks granted without waiting.\n",
- (u_long)sp->st_region_nowait);
- dl("The number of region locks granted after waiting.\n",
- (u_long)sp->st_region_wait);
-}
-
-/*
- * mpool_stats --
- * Display mpool statistics.
- */
-void
-mpool_stats(dbenv)
- DB_ENV *dbenv;
-{
- DB_MPOOL_FSTAT **fsp;
- DB_MPOOL_STAT *gsp;
-
- if (internal != NULL) {
- __memp_dump_region(dbenv->mp_info, internal, stdout);
- return;
- }
-
- if (memp_stat(dbenv->mp_info, &gsp, &fsp, NULL))
- err(1, NULL);
-
- dl("Pool region reference count.\n", (u_long)gsp->st_refcnt);
- dl("Pool region size.\n", (u_long)gsp->st_regsize);
- dl("Cache size", (u_long)gsp->st_cachesize);
- printf(" (%luK).\n", (u_long)gsp->st_cachesize / 1024);
- dl("Requested pages found in the cache", (u_long)gsp->st_cache_hit);
- if (gsp->st_cache_hit + gsp->st_cache_miss != 0)
- printf(" (%.0f%%)", ((double)gsp->st_cache_hit /
- (gsp->st_cache_hit + gsp->st_cache_miss)) * 100);
- printf(".\n");
- dl("Requested pages mapped into the process' address space.\n",
- (u_long)gsp->st_map);
- dl("Requested pages not found in the cache.\n",
- (u_long)gsp->st_cache_miss);
- dl("Pages created in the cache.\n", (u_long)gsp->st_page_create);
- dl("Pages read into the cache.\n", (u_long)gsp->st_page_in);
- dl("Pages written from the cache to the backing file.\n",
- (u_long)gsp->st_page_out);
- dl("Clean pages forced from the cache.\n",
- (u_long)gsp->st_ro_evict);
- dl("Dirty pages forced from the cache.\n",
- (u_long)gsp->st_rw_evict);
- dl("Dirty buffers written by trickle-sync thread.\n",
- (u_long)gsp->st_page_trickle);
- dl("Current clean buffer count.\n",
- (u_long)gsp->st_page_clean);
- dl("Current dirty buffer count.\n",
- (u_long)gsp->st_page_dirty);
- dl("Number of hash buckets used for page location.\n",
- (u_long)gsp->st_hash_buckets);
- dl("Total number of times hash chains searched for a page.\n",
- (u_long)gsp->st_hash_searches);
- dl("The longest hash chain searched for a page.\n",
- (u_long)gsp->st_hash_longest);
- dl("Total number of hash buckets examined for page location.\n",
- (u_long)gsp->st_hash_examined);
- dl("The number of region locks granted without waiting.\n",
- (u_long)gsp->st_region_nowait);
- dl("The number of region locks granted after waiting.\n",
- (u_long)gsp->st_region_wait);
-
- for (; fsp != NULL && *fsp != NULL; ++fsp) {
- printf("%s\n", DB_LINE);
- printf("%s\n", (*fsp)->file_name);
- dl("Page size.\n", (u_long)(*fsp)->st_pagesize);
- dl("Requested pages found in the cache",
- (u_long)(*fsp)->st_cache_hit);
- if ((*fsp)->st_cache_hit + (*fsp)->st_cache_miss != 0)
- printf(" (%.0f%%)", ((double)(*fsp)->st_cache_hit /
- ((*fsp)->st_cache_hit + (*fsp)->st_cache_miss)) *
- 100);
- printf(".\n");
- dl("Requested pages mapped into the process' address space.\n",
- (u_long)(*fsp)->st_map);
- dl("Requested pages not found in the cache.\n",
- (u_long)(*fsp)->st_cache_miss);
- dl("Pages created in the cache.\n",
- (u_long)(*fsp)->st_page_create);
- dl("Pages read into the cache.\n",
- (u_long)(*fsp)->st_page_in);
- dl("Pages written from the cache to the backing file.\n",
- (u_long)(*fsp)->st_page_out);
- }
-}
-
-/*
- * txn_stats --
- * Display transaction statistics.
- */
-void
-txn_stats(dbenv)
- DB_ENV *dbenv;
-{
- DB_TXN_STAT *sp;
- u_int32_t i;
- const char *p;
-
- if (txn_stat(dbenv->tx_info, &sp, NULL))
- err(1, NULL);
-
- dl("Txn region reference count.\n", (u_long)sp->st_refcnt);
- dl("Txn region size.\n", (u_long)sp->st_regsize);
- p = sp->st_last_ckp.file == 0 ?
- "No checkpoint LSN." : "File/offset for last checkpoint LSN.";
- printf("%lu/%lu\t%s\n",
- (u_long)sp->st_last_ckp.file, (u_long)sp->st_last_ckp.offset, p);
- p = sp->st_pending_ckp.file == 0 ?
- "No pending checkpoint LSN." :
- "File/offset for last pending checkpoint LSN.";
- printf("%lu/%lu\t%s\n",
- (u_long)sp->st_pending_ckp.file,
- (u_long)sp->st_pending_ckp.offset, p);
- if (sp->st_time_ckp == 0)
- printf("0\tNo checkpoint timestamp.\n");
- else
- printf("%.24s\tCheckpoint timestamp.\n",
- ctime(&sp->st_time_ckp));
- printf("%lx\tLast transaction ID allocated.\n",
- (u_long)sp->st_last_txnid);
- dl("Maximum number of active transactions.\n", (u_long)sp->st_maxtxns);
- dl("Number of transactions begun.\n", (u_long)sp->st_nbegins);
- dl("Number of transactions aborted.\n", (u_long)sp->st_naborts);
- dl("Number of transactions committed.\n", (u_long)sp->st_ncommits);
- dl("The number of region locks granted without waiting.\n",
- (u_long)sp->st_region_nowait);
- dl("The number of region locks granted after waiting.\n",
- (u_long)sp->st_region_wait);
- dl("Active transactions.\n", (u_long)sp->st_nactive);
- qsort(sp->st_txnarray,
- sp->st_nactive, sizeof(sp->st_txnarray[0]), txn_compare);
- for (i = 0; i < sp->st_nactive; ++i)
- printf("\tid: %lx; initial LSN file/offest %lu/%lu\n",
- (u_long)sp->st_txnarray[i].txnid,
- (u_long)sp->st_txnarray[i].lsn.file,
- (u_long)sp->st_txnarray[i].lsn.offset);
-}
-
-int
-txn_compare(a1, b1)
- const void *a1, *b1;
-{
- const DB_TXN_ACTIVE *a, *b;
-
- a = a1;
- b = b1;
-
- if (a->txnid > b->txnid)
- return (1);
- if (a->txnid < b->txnid)
- return (-1);
- return (0);
-}
-
-/*
- * dl --
- * Display a big value.
- */
-void
-dl(msg, value)
- const char *msg;
- u_long value;
-{
- /*
- * Two formats: if less than 10 million, display as the number, if
- * greater than 10 million display as ###M.
- */
- if (value < 10000000)
- printf("%lu\t%s", value, msg);
- else
- printf("%luM\t%s", value / 1000000, msg);
-}
-
-/*
- * prflags --
- * Print out flag values.
- */
-void
-prflags(flags, fnp)
- u_int32_t flags;
- const FN *fnp;
-{
- const char *sep;
-
- sep = " ";
- printf("Flags:");
- for (; fnp->mask != 0; ++fnp)
- if (fnp->mask & flags) {
- printf("%s%s", sep, fnp->name);
- sep = ", ";
- }
- printf("\n");
-}
-
-/*
- * db_init --
- * Initialize the environment.
- */
-DB_ENV *
-db_init(home, ttype)
- char *home;
- test_t ttype;
-{
- DB_ENV *dbenv;
- u_int32_t flags;
-
- if ((dbenv = (DB_ENV *)malloc(sizeof(DB_ENV))) == NULL) {
- errno = ENOMEM;
- err(1, NULL);
- }
-
- /*
- * Try and use the shared regions when reporting statistics on the
- * DB databases, so our information is as up-to-date as possible,
- * even if the mpool cache hasn't been flushed. If that fails, we
- * turn off the DB_INIT_MPOOL flag and try again.
- */
- flags = DB_USE_ENVIRON;
- switch (ttype) {
- case T_DB:
- case T_MPOOL:
- LF_SET(DB_INIT_MPOOL);
- break;
- case T_LOCK:
- LF_SET(DB_INIT_LOCK);
- break;
- case T_LOG:
- LF_SET(DB_INIT_LOG);
- break;
- case T_TXN:
- LF_SET(DB_INIT_TXN);
- break;
- case T_NOTSET:
- abort();
- /* NOTREACHED */
- }
-
- /*
- * If it works, we're done. Set the error output options so that
- * future errors are correctly reported.
- */
- memset(dbenv, 0, sizeof(*dbenv));
- if ((errno = db_appinit(home, NULL, dbenv, flags)) == 0) {
- dbenv->db_errfile = stderr;
- dbenv->db_errpfx = progname;
- return (dbenv);
- }
-
- /* Turn off the DB_INIT_MPOOL flag if it's a database. */
- if (ttype == T_DB)
- LF_CLR(DB_INIT_MPOOL);
-
- /* Set the error output options -- this time we want a message. */
- memset(dbenv, 0, sizeof(*dbenv));
- dbenv->db_errfile = stderr;
- dbenv->db_errpfx = progname;
-
- /* Try again, and it's fatal if we fail. */
- if ((errno = db_appinit(home, NULL, dbenv, flags)) != 0)
- err(1, "db_appinit");
-
- return (dbenv);
-}
-
-/*
- * argcheck --
- * Return if argument flags are okay.
- */
-int
-argcheck(arg, ok_args)
- char *arg;
- const char *ok_args;
-{
- for (; *arg != '\0'; ++arg)
- if (strchr(ok_args, *arg) == NULL)
- return (0);
- return (1);
-}
-
-/*
- * nosig --
- * We don't want to be interrupted.
- */
-void
-nosig()
-{
-#ifdef SIGHUP
- (void)signal(SIGHUP, SIG_IGN);
-#endif
- (void)signal(SIGINT, SIG_IGN);
- (void)signal(SIGTERM, SIG_IGN);
-}
-
-void
-usage()
-{
- fprintf(stderr,
- "usage: db_stat [-clmNt] [-C Acflmo] [-d file] [-h home] [-M Ahlm]\n");
- exit (1);
-}
generated by cgit v1.2.3 (git 2.25.1) at 2024-11-08 21:10:18 +0000