2 * PerlXS module for managing process limits
4 * (c) 2003 Tomas Valla <tom@ucw.cz>
12 #include <sys/resource.h>
16 MODULE = Sherlock::Ulimit PACKAGE = Sherlock::Ulimit
21 setlimit(IN resource, IN soft, IN hard)
31 r = RLIMIT_CPU; break;
33 r = RLIMIT_FSIZE; break;
35 r = RLIMIT_DATA; break;
37 r = RLIMIT_STACK; break;
39 r = RLIMIT_CORE; break;
41 r = RLIMIT_RSS; break;
43 r = RLIMIT_NPROC; break;
45 r = RLIMIT_NOFILE; break;
47 r = RLIMIT_MEMLOCK; break;
53 RETVAL = setrlimit(r, &rl);
59 getlimit(IN resource, OUT soft, OUT hard)
69 r = RLIMIT_CPU; break;
71 r = RLIMIT_FSIZE; break;
73 r = RLIMIT_DATA; break;
75 r = RLIMIT_STACK; break;
77 r = RLIMIT_CORE; break;
79 r = RLIMIT_RSS; break;
81 r = RLIMIT_NPROC; break;
83 r = RLIMIT_NOFILE; break;
85 r = RLIMIT_MEMLOCK; break;
90 RETVAL = getrlimit(r, &rl);