recctrl/perlread.h.in

   1 /* Perl configuration */
   2 #include <EXTERN.h>
   3 #include <perl.h>
   4
   5 #define PERL_BINARY @PERL_BINARY@
   6 #define PERL_XS_INIT @PERL_XS_INIT@
   7
   8 @PERL_XS_INIT_INCLUDE@
   9
  10 #define GRS_PERL_MODULE_NAME_MAXLEN 255
  11
  12 #include <idzebra/data1.h>
  13
  14 /* Context information for the filter */
  15 struct perl_context {
  16     PerlInterpreter *perli;
  17     PerlInterpreter *origi;
  18     int perli_ready;
  19     char filterClass[GRS_PERL_MODULE_NAME_MAXLEN];
  20     SV *filterRef;
  21
  22     int (*readf)(void *, char *, size_t);
  23     off_t (*seekf)(void *, off_t);
  24     off_t (*tellf)(void *);
  25     void (*endf)(void *, off_t);
  26
  27     void *fh;
  28     data1_handle dh;
  29     NMEM mem;
  30     data1_node *res;
  31     char type[GRS_PERL_MODULE_NAME_MAXLEN];
  32 };