Commit | Line | Data |
8ce86de8 |
1 | #include "EXTERN.h" |
2 | #include "perl.h" |
3 | #include "XSUB.h" |
4 | |
d76d5647 |
5 | #ifdef I_SYSLOG |
6 | #include <syslog.h> |
7 | #endif |
8ce86de8 |
8 | |
1cb0fb50 |
9 | #include "const-c.inc" |
8ce86de8 |
10 | |
8ce86de8 |
11 | MODULE = Sys::Syslog PACKAGE = Sys::Syslog |
12 | |
1cb0fb50 |
13 | INCLUDE: const-xs.inc |
8ce86de8 |
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"); |
b621ec8a |
24 | RETVAL = -1; |
8ce86de8 |
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"); |
b621ec8a |
38 | RETVAL = -1; |
8ce86de8 |
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"); |
b621ec8a |
53 | RETVAL = -1; |
8ce86de8 |
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"); |
b621ec8a |
67 | RETVAL = -1; |
8ce86de8 |
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"); |
b621ec8a |
81 | RETVAL = -1; |
8ce86de8 |
82 | #endif |
83 | OUTPUT: |
84 | RETVAL |