kernel/fiasco/src/jdb/jdb_attach_irq.cpp

   1 IMPLEMENTATION:
   2
   3 #include <cstdio>
   4
   5 #include "irq_chip.h"
   6 #include "irq.h"
   7 #include "jdb_module.h"
   8 #include "kernel_console.h"
   9 #include "static_init.h"
  10 #include "thread.h"
  11 #include "types.h"
  12
  13
  14 //===================
  15 // Std JDB modules
  16 //===================
  17
  18 /**
  19  * 'IRQ' module.
  20  *
  21  * This module handles the 'R' command that
  22  * provides IRQ attachment and listing functions.
  23  */
  24 class Jdb_attach_irq : public Jdb_module
  25 {
  26 public:
  27   Jdb_attach_irq() FIASCO_INIT;
  28 private:
  29   static char     subcmd;
  30 };
  31
  32 char     Jdb_attach_irq::subcmd;
  33 static Jdb_attach_irq jdb_attach_irq INIT_PRIORITY(JDB_MODULE_INIT_PRIO);
  34
  35 IMPLEMENT
  36 Jdb_attach_irq::Jdb_attach_irq()
  37   : Jdb_module("INFO")
  38 {}
  39
  40 PUBLIC
  41 Jdb_module::Action_code
  42 Jdb_attach_irq::action( int cmd, void *&args, char const *&, int & )
  43 {
  44   if (cmd!=0)
  45     return NOTHING;
  46
  47   if ((char*)args == &subcmd)
  48     {
  49       switch(subcmd)
  50         {
  51         case 'l': // list
  52             {
  53               Irq *r;
  54               putchar('\n');
  55               for (unsigned i = 0; i < Config::Max_num_irqs; ++i)
  56                 {
  57                   r = static_cast<Irq*>(Irq_chip::hw_chip->irq(i));
  58                   if (!r)
  59                     continue;
  60                   printf("IRQ %02x/%02d\n", i, i);
  61                 }
  62             }
  63           return NOTHING;
  64         }
  65     }
  66   return NOTHING;
  67 }
  68
  69 PUBLIC
  70 int
  71 Jdb_attach_irq::num_cmds() const
  72 {
  73   return 1;
  74 }
  75
  76 PUBLIC
  77 Jdb_module::Cmd const *
  78 Jdb_attach_irq::cmds() const
  79 {
  80   static Cmd cs[] =
  81     {   { 0, "R", "irq", " [l]ist/[a]ttach: %c",
  82            "R{l}\tlist IRQ threads", &subcmd }
  83     };
  84
  85   return cs;
  86 }
  87
  88
  89 IMPLEMENTATION:
  90
  91 #include "jdb_kobject.h"
  92 #include "irq.h"
  93
  94 class Jdb_kobject_irq : public Jdb_kobject_handler
  95 {
  96 };
  97
  98 #define FIASCO_JDB_CMP_VTABLE(n, o) \
  99   extern char n[]; \
 100   char const *const *z = reinterpret_cast<char const* const*>(o); \
 101   return *z == n + 12 ? (o) : 0
 102
 103
 104 PUBLIC static
 105 Irq_sender *
 106 Jdb_kobject_irq::dcast_h(Irq_sender *i)
 107 {
 108   FIASCO_JDB_CMP_VTABLE(_ZTV10Irq_sender, i);
 109 }
 110
 111 PUBLIC static
 112 Irq_muxer *
 113 Jdb_kobject_irq::dcast_h(Irq_muxer *i)
 114 {
 115   FIASCO_JDB_CMP_VTABLE(_ZTV9Irq_muxer, i);
 116 }
 117
 118 PUBLIC template<typename T>
 119 static
 120 T
 121 Jdb_kobject_irq::dcast(Kobject *o)
 122 {
 123   Irq *i = Kobject::dcast<Irq*>(o);
 124   if (!i)
 125     return 0;
 126
 127   return dcast_h(static_cast<T>(i));
 128 }
 129
 130 PUBLIC inline
 131 Jdb_kobject_irq::Jdb_kobject_irq()
 132   : Jdb_kobject_handler(Irq::static_kobj_type)
 133 {
 134   Jdb_kobject::module()->register_handler(this);
 135 }
 136
 137 PUBLIC
 138 char const *
 139 Jdb_kobject_irq::kobject_type() const
 140 {
 141   return JDB_ANSI_COLOR(white) "IRQ" JDB_ANSI_COLOR(default);
 142 }
 143
 144
 145 PUBLIC
 146 bool
 147 Jdb_kobject_irq::handle_key(Kobject_common *o, int key)
 148 {
 149   if (key != 'x')
 150     return false;
 151
 152   Irq *t = Kobject::dcast<Irq*>(o);
 153
 154   if (!t)
 155     return true;
 156
 157   Irq_sender *i = static_cast<Irq_sender*>(t);
 158
 159   printf("IRQ: owner = %p\n     cnt = %d\n", i->owner(), i->queued());
 160
 161   Jdb::getchar();
 162
 163   return true;
 164 }
 165
 166
 167 PUBLIC
 168 Kobject_common *
 169 Jdb_kobject_irq::follow_link(Kobject_common *o)
 170 {
 171   Irq_sender *t = dcast<Irq_sender*>(Kobject::from_dbg(o->dbg_info()));
 172   if (!t || !t->owner() || (Smword)t->owner() == -1)
 173     return o;
 174
 175   return Kobject::from_dbg(static_cast<Thread*>(t->owner())->dbg_info());
 176 }
 177
 178 PUBLIC
 179 bool
 180 Jdb_kobject_irq::show_kobject(Kobject_common *, int)
 181 { return true; }
 182 #if 0
 183   Thread *t = Kobject::dcast<Thread*>(o);
 184   return show(t, level);
 185 #endif
 186
 187 PUBLIC
 188 int
 189 Jdb_kobject_irq::show_kobject_short(char *buf, int max, Kobject_common *o)
 190 {
 191   Irq *t = Kobject::dcast<Irq*>(o);
 192   Kobject_common *d = follow_link(o);
 193   int cnt = 0;
 194   return cnt + snprintf(buf, max, " I=%3lx %s L=%lx T=%lx F=%x",
 195                         t->irq(), t->pin()->pin_type(), t->obj_id(),
 196                         d ? d->dbg_info()->dbg_id() : 0, (unsigned)t->pin()->flags());
 197 }
 198
 199 static
 200 bool
 201 filter_irqs(Kobject_common const *o)
 202 { return Kobject::dcast<Irq const *>(o); }
 203
 204 static Jdb_kobject_list::Mode INIT_PRIORITY(JDB_MODULE_INIT_PRIO) tnt("[IRQs]", filter_irqs);
 205
 206 static Jdb_kobject_irq jdb_kobject_irq INIT_PRIORITY(JDB_MODULE_INIT_PRIO);