apps/irssi/src/perl/common/Log.xs

   1 #include "module.h"
   2
   3 MODULE = Irssi::Log  PACKAGE = Irssi
   4 PROTOTYPES: ENABLE
   5
   6 void
   7 logs()
   8 PREINIT:
   9         GSList *tmp;
  10 PPCODE:
  11         for (tmp = logs; tmp != NULL; tmp = tmp->next) {
  12                 XPUSHs(sv_2mortal(plain_bless(tmp->data, "Irssi::Log")));
  13         }
  14
  15 Irssi::Log
  16 log_create_rec(fname, level)
  17         char *fname
  18         int level
  19
  20 Irssi::Log
  21 log_find(fname)
  22         char *fname
  23
  24 #*******************************
  25 MODULE = Irssi::Log  PACKAGE = Irssi::Log  PREFIX = log_
  26 #*******************************
  27
  28 void
  29 log_item_add(log, type, name, servertag)
  30         Irssi::Log log
  31         int type
  32         char *name
  33         char *servertag
  34
  35 void
  36 log_item_destroy(log, item)
  37         Irssi::Log log
  38         Irssi::Logitem item
  39
  40 Irssi::Logitem
  41 log_item_find(log, type, item, servertag)
  42         Irssi::Log log
  43         int type
  44         char *item
  45         char *servertag
  46
  47 void
  48 log_update(log)
  49         Irssi::Log log
  50
  51 void
  52 log_close(log)
  53         Irssi::Log log
  54
  55 void
  56 log_write_rec(log, str, level)
  57         Irssi::Log log
  58         char *str
  59         int level
  60
  61 void
  62 log_start_logging(log)
  63         Irssi::Log log
  64
  65 void
  66 log_stop_logging(log)
  67         Irssi::Log log