1 #include "EXTERN.h"
2 #include "perl.h"
3 #include "XSUB.h"
4 
5 #ifdef I_SYSLOG
6 #include <syslog.h>
7 #endif
8 
9 #include "const-c.inc"
10 
11 MODULE = Sys::Syslog		PACKAGE = Sys::Syslog
12 
13 INCLUDE: const-xs.inc
14 
15 int
16 LOG_FAC(p)
17     INPUT:
18 	int		p
19     CODE:
20 #ifdef LOG_FAC
21 	RETVAL = LOG_FAC(p);
22 #else
23 	croak("Your vendor has not defined the Sys::Syslog macro LOG_FAC");
24 	RETVAL = -1;
25 #endif
26     OUTPUT:
27 	RETVAL
28 
29 int
30 LOG_PRI(p)
31     INPUT:
32 	int		p
33     CODE:
34 #ifdef LOG_PRI
35 	RETVAL = LOG_PRI(p);
36 #else
37 	croak("Your vendor has not defined the Sys::Syslog macro LOG_PRI");
38 	RETVAL = -1;
39 #endif
40     OUTPUT:
41 	RETVAL
42 
43 int
44 LOG_MAKEPRI(fac,pri)
45     INPUT:
46 	int		fac
47 	int		pri
48     CODE:
49 #ifdef LOG_MAKEPRI
50 	RETVAL = LOG_MAKEPRI(fac,pri);
51 #else
52 	croak("Your vendor has not defined the Sys::Syslog macro LOG_MAKEPRI");
53 	RETVAL = -1;
54 #endif
55     OUTPUT:
56 	RETVAL
57 
58 int
59 LOG_MASK(pri)
60     INPUT:
61 	int		pri
62     CODE:
63 #ifdef LOG_MASK
64 	RETVAL = LOG_MASK(pri);
65 #else
66 	croak("Your vendor has not defined the Sys::Syslog macro LOG_MASK");
67 	RETVAL = -1;
68 #endif
69     OUTPUT:
70 	RETVAL
71 
72 int
73 LOG_UPTO(pri)
74     INPUT:
75 	int		pri
76     CODE:
77 #ifdef LOG_UPTO
78 	RETVAL = LOG_UPTO(pri);
79 #else
80 	croak("Your vendor has not defined the Sys::Syslog macro LOG_UPTO");
81 	RETVAL = -1;
82 #endif
83     OUTPUT:
84 	RETVAL
85