| … | |
… | |
| 13 | |
13 | |
| 14 | PROTOTYPES: ENABLE |
14 | PROTOTYPES: ENABLE |
| 15 | |
15 | |
| 16 | BOOT: |
16 | BOOT: |
| 17 | { |
17 | { |
| 18 | HV *stash = gv_stashpv ("Linux::Inotify2", 0); |
18 | HV *stash = GvSTASH (CvGV (cv)); |
| 19 | |
19 | |
| 20 | newCONSTSUB (stash, "IN_ACCESS" , newSViv (IN_ACCESS)); |
20 | static const struct civ { const char *name; IV iv; } *civ, const_iv[] = { |
| 21 | newCONSTSUB (stash, "IN_MODIFY" , newSViv (IN_MODIFY)); |
21 | { "IN_ACCESS" , IN_ACCESS }, |
| 22 | newCONSTSUB (stash, "IN_ATTRIB" , newSViv (IN_ATTRIB)); |
22 | { "IN_MODIFY" , IN_MODIFY }, |
| 23 | newCONSTSUB (stash, "IN_CLOSE_WRITE" , newSViv (IN_CLOSE_WRITE )); |
23 | { "IN_ATTRIB" , IN_ATTRIB }, |
| 24 | newCONSTSUB (stash, "IN_CLOSE_NOWRITE", newSViv (IN_CLOSE_NOWRITE)); |
24 | { "IN_CLOSE_WRITE" , IN_CLOSE_WRITE }, |
| 25 | newCONSTSUB (stash, "IN_OPEN" , newSViv (IN_OPEN)); |
25 | { "IN_CLOSE_NOWRITE", IN_CLOSE_NOWRITE }, |
| 26 | newCONSTSUB (stash, "IN_MOVED_FROM" , newSViv (IN_MOVED_FROM)); |
26 | { "IN_OPEN" , IN_OPEN }, |
| 27 | newCONSTSUB (stash, "IN_MOVED_TO" , newSViv (IN_MOVED_TO)); |
27 | { "IN_MOVED_FROM" , IN_MOVED_FROM }, |
| 28 | newCONSTSUB (stash, "IN_CREATE" , newSViv (IN_CREATE)); |
28 | { "IN_MOVED_TO" , IN_MOVED_TO }, |
| 29 | newCONSTSUB (stash, "IN_DELETE" , newSViv (IN_DELETE)); |
29 | { "IN_CREATE" , IN_CREATE }, |
| 30 | newCONSTSUB (stash, "IN_DELETE_SELF" , newSViv (IN_DELETE_SELF)); |
30 | { "IN_DELETE" , IN_DELETE }, |
| 31 | newCONSTSUB (stash, "IN_MOVE_SELF" , newSViv (IN_MOVE_SELF)); |
31 | { "IN_DELETE_SELF" , IN_DELETE_SELF }, |
| 32 | newCONSTSUB (stash, "IN_UNMOUNT" , newSViv (IN_UNMOUNT)); |
32 | { "IN_MOVE_SELF" , IN_MOVE_SELF }, |
| 33 | newCONSTSUB (stash, "IN_Q_OVERFLOW" , newSViv (IN_Q_OVERFLOW)); |
33 | { "IN_UNMOUNT" , IN_UNMOUNT }, |
| 34 | newCONSTSUB (stash, "IN_IGNORED" , newSViv (IN_IGNORED)); |
34 | { "IN_Q_OVERFLOW" , IN_Q_OVERFLOW }, |
| 35 | newCONSTSUB (stash, "IN_CLOSE" , newSViv (IN_CLOSE)); |
35 | { "IN_IGNORED" , IN_IGNORED }, |
| 36 | newCONSTSUB (stash, "IN_MOVE" , newSViv (IN_MOVE)); |
36 | { "IN_CLOSE" , IN_CLOSE }, |
| 37 | newCONSTSUB (stash, "IN_ONLYDIR" , newSViv (IN_ONLYDIR)); |
37 | { "IN_MOVE" , IN_MOVE }, |
| 38 | newCONSTSUB (stash, "IN_DONT_FOLLOW" , newSViv (IN_DONT_FOLLOW)); |
38 | { "IN_ONLYDIR" , IN_ONLYDIR }, |
| 39 | newCONSTSUB (stash, "IN_MASK_ADD" , newSViv (IN_MASK_ADD)); |
39 | { "IN_DONT_FOLLOW" , IN_DONT_FOLLOW }, |
| 40 | newCONSTSUB (stash, "IN_ISDIR" , newSViv (IN_ISDIR)); |
40 | { "IN_MASK_ADD" , IN_MASK_ADD }, |
| 41 | newCONSTSUB (stash, "IN_ONESHOT" , newSViv (IN_ONESHOT)); |
41 | { "IN_ISDIR" , IN_ISDIR }, |
| 42 | newCONSTSUB (stash, "IN_ALL_EVENTS" , newSViv (IN_ALL_EVENTS)); |
42 | { "IN_ONESHOT" , IN_ONESHOT }, |
|
|
43 | { "IN_ALL_EVENTS" , IN_ALL_EVENTS }, |
|
|
44 | }; |
|
|
45 | |
|
|
46 | for (civ = const_iv + sizeof (const_iv) / sizeof (const_iv [0]); civ > const_iv; civ--) |
|
|
47 | newCONSTSUB (stash, (char *)civ[-1].name, newSViv (civ[-1].iv)); |
| 43 | } |
48 | } |
| 44 | |
49 | |
| 45 | int |
50 | int |
| 46 | inotify_init () |
51 | inotify_init () |
| 47 | |
52 | |
