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

   1 #include "module.h"
   2
   3 MODULE = Irssi::Masks  PACKAGE = Irssi
   4 PROTOTYPES: ENABLE
   5
   6 int
   7 mask_match(mask, nick, user, host)
   8         char *mask
   9         char *nick
  10         char *user
  11         char *host
  12 CODE:
  13         RETVAL = mask_match(NULL, mask, nick, user, host);
  14 OUTPUT:
  15         RETVAL
  16
  17 int
  18 mask_match_address(mask, nick, address)
  19         char *mask
  20         char *nick
  21         char *address
  22 CODE:
  23         RETVAL = mask_match_address(NULL, mask, nick, address);
  24 OUTPUT:
  25         RETVAL
  26
  27 int
  28 masks_match(masks, nick, address)
  29         char *masks
  30         char *nick
  31         char *address
  32 CODE:
  33         RETVAL = masks_match(NULL, masks, nick, address);
  34 OUTPUT:
  35         RETVAL
  36
  37 #*******************************
  38 MODULE = Irssi::Masks   PACKAGE = Irssi::Server
  39 #*******************************
  40
  41 int
  42 mask_match(server, mask, nick, user, host)
  43         Irssi::Server server
  44         char *mask
  45         char *nick
  46         char *user
  47         char *host
  48
  49 int
  50 mask_match_address(server, mask, nick, address)
  51         Irssi::Server server
  52         char *mask
  53         char *nick
  54         char *address
  55
  56 int
  57 masks_match(server, masks, nick, address)
  58         Irssi::Server server
  59         char *masks
  60         char *nick
  61         char *address