usr/src/cmd/mdb/common/modules/libsysevent/libsysevent.c

   1 /*
   2  * CDDL HEADER START
   3  *
   4  * The contents of this file are subject to the terms of the
   5  * Common Development and Distribution License, Version 1.0 only
   6  * (the "License").  You may not use this file except in compliance
   7  * with the License.
   8  *
   9  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
  10  * or http://www.opensolaris.org/os/licensing.
  11  * See the License for the specific language governing permissions
  12  * and limitations under the License.
  13  *
  14  * When distributing Covered Code, include this CDDL HEADER in each
  15  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
  16  * If applicable, add the following below this CDDL HEADER, with the
  17  * fields enclosed by brackets "[]" replaced with your own identifying
  18  * information: Portions Copyright [yyyy] [name of copyright owner]
  19  *
  20  * CDDL HEADER END
  21  */
  22 /*
  23  * Copyright 2002-2003 Sun Microsystems, Inc.  All rights reserved.
  24  * Use is subject to license terms.
  25  */
  26
  27 #pragma ident   "%Z%%M% %I%     %E% SMI"
  28
  29 #include <sys/sysevent.h>
  30 #include <sys/sysevent_impl.h>
  31 #include <libsysevent.h>
  32 #include <libsysevent_impl.h>
  33 #include "../genunix/sysevent.h"
  34
  35 int
  36 sysevent(uintptr_t addr, uint_t flags, int argc, const mdb_arg_t *argv)
  37 {
  38         if ((flags & DCMD_ADDRSPEC) == 0)
  39                 return (DCMD_USAGE);
  40
  41         if ((flags & DCMD_LOOP) == 0) {
  42                 if (mdb_pwalk_dcmd("sysevent", "sysevent", argc, argv,
  43                     addr) == -1) {
  44                         mdb_warn("can't walk sysevent queue");
  45                         return (DCMD_ERR);
  46                 }
  47                 return (DCMD_OK);
  48         }
  49
  50         return (sysevent_buf(addr, flags, 0));
  51 }
  52
  53 /*ARGSUSED*/
  54 int
  55 sysevent_handle(uintptr_t addr, uint_t flags, int argc,
  56     const mdb_arg_t *argv)
  57 {
  58         ssize_t channel_name_sz;
  59         char channel_name[CLASS_LIST_FIELD_MAX];
  60         subscriber_priv_t sub;
  61         sysevent_impl_hdl_t sysevent_hdl;
  62
  63         if ((flags & DCMD_ADDRSPEC) == 0)
  64                 return (DCMD_USAGE);
  65
  66
  67         if (argc != 0)
  68                 return (DCMD_USAGE);
  69
  70
  71         if (mdb_vread(&sysevent_hdl, sizeof (sysevent_hdl),
  72             (uintptr_t)addr) == -1) {
  73                 mdb_warn("failed to read sysevent handle at %p", addr);
  74                 return (DCMD_ERR);
  75         }
  76         if ((channel_name_sz = mdb_readstr(channel_name, CLASS_LIST_FIELD_MAX,
  77             (uintptr_t)sysevent_hdl.sh_channel_name)) == -1) {
  78                 mdb_warn("failed to read channel name at %p",
  79                     sysevent_hdl.sh_channel_name);
  80                 return (DCMD_ERR);
  81         }
  82         if (channel_name_sz >= CLASS_LIST_FIELD_MAX - 1)
  83                 (void) strcpy(&channel_name[CLASS_LIST_FIELD_MAX - 4], "...");
  84
  85         if (sysevent_hdl.sh_type == SUBSCRIBER) {
  86                 if (mdb_vread(&sub, sizeof (sub),
  87                     (uintptr_t)sysevent_hdl.sh_priv_data) == -1) {
  88                         mdb_warn("failed to read sysevent handle at %p", addr);
  89                         return (DCMD_ERR);
  90                 }
  91
  92                 if (DCMD_HDRSPEC(flags))
  93                         mdb_printf("%<u>%-?s %-24s %-13s %-5s %-?s"
  94                             "%</u>\n", "ADDR", "NAME", "TYPE", "ID",
  95                             "EVENT QUEUE ADDR");
  96
  97                 mdb_printf("%-?p %-24s %-13s %-5lu %-?p\n",
  98                     addr, channel_name, "SUBSCRIBER", sysevent_hdl.sh_id,
  99                     (uintptr_t)sub.sp_evq_head);
 100
 101         } else {
 102                 if (DCMD_HDRSPEC(flags))
 103                         mdb_printf("%<u>%-?s %-24s %-13s %-5s %-?s"
 104                             "%</u>\n", "ADDR", "NAME",
 105                             "TYPE", "ID", "CLASS LIST ADDR");
 106
 107                 mdb_printf("%-?p %-24s %-13s %-5lu %-?p\n",
 108                     addr, channel_name, "PUBLISHER", sysevent_hdl.sh_id,
 109                     (uintptr_t)sysevent_hdl.sh_priv_data +
 110                     offsetof(publisher_priv_t, pp_class_hash));
 111         }
 112
 113         return (DCMD_OK);
 114 }
 115
 116 static const mdb_dcmd_t dcmds[] = {
 117         { "sysevent", "?[-v]", "print the contents of a sysevent queue",
 118                 sysevent},
 119         { "sysevent_handle", ":", "print sysevent subscriber/publisher handle",
 120                 sysevent_handle},
 121         { "sysevent_class_list", ":", "print sysevent class list",
 122                 sysevent_class_list },
 123         { "sysevent_subclass_list", ":", "print sysevent subclass list",
 124                 sysevent_subclass_list },
 125         { NULL }
 126 };
 127
 128 int
 129 sysevent_walk_init(mdb_walk_state_t *wsp)
 130 {
 131         if (wsp->walk_addr == NULL) {
 132                 mdb_warn("sysevent does not support global walks");
 133                 return (WALK_ERR);
 134         }
 135
 136         return (WALK_NEXT);
 137 }
 138
 139 int
 140 sysevent_walk_step(mdb_walk_state_t *wsp)
 141 {
 142         int status;
 143         sysevent_queue_t se_q;
 144
 145         if (wsp->walk_addr == NULL)
 146                 return (WALK_DONE);
 147
 148         if (mdb_vread(&se_q, sizeof (se_q), wsp->walk_addr) == -1) {
 149                 mdb_warn("failed to read sysevent queue at %p", wsp->walk_addr);
 150                 return (WALK_ERR);
 151         }
 152
 153         status = wsp->walk_callback((uintptr_t)se_q.sq_ev, NULL,
 154             wsp->walk_cbdata);
 155
 156         wsp->walk_addr = (uintptr_t)se_q.sq_next;
 157
 158         return (status);
 159 }
 160
 161 static const mdb_walker_t walkers[] = {
 162         { "sysevent", "walk sysevent buffer queue",
 163                 sysevent_walk_init, sysevent_walk_step,
 164                 NULL },
 165         { "sysevent_class_list", "walk sysevent subsccription class list",
 166                 sysevent_class_list_walk_init, sysevent_class_list_walk_step,
 167                 sysevent_class_list_walk_fini },
 168         { "sysevent_subclass_list", "walk sysevent subsccription subclass list",
 169                 sysevent_subclass_list_walk_init,
 170                 sysevent_subclass_list_walk_step, NULL },
 171         { NULL }
 172 };
 173
 174 static const mdb_modinfo_t modinfo = {
 175         MDB_API_VERSION, dcmds, walkers
 176 };
 177
 178 const mdb_modinfo_t *
 179 _mdb_init(void)
 180 {
 181         return (&modinfo);
 182 }