]> mj.ucw.cz Git - libucw.git/blobdiff - lib/proctitle.c
Split Perl modules to Sherlock and UCW namespaces as we already do with C libraries.
[libucw.git] / lib / proctitle.c
index ec65012fbeebb36706cbc385d7d6e491f5493d38..4e1541847b81bbd3ee75250622e073aaba544367 100644 (file)
@@ -1,7 +1,7 @@
 /*
  *     UCW Library -- Setting of Process Title
  *
 /*
  *     UCW Library -- Setting of Process Title
  *
- *     (c) 2001 Martin Mares <mj@ucw.cz>
+ *     (c) 2001--2006 Martin Mares <mj@ucw.cz>
  *
  *     This software may be freely distributed and used according to the terms
  *     of the GNU Lesser General Public License.
  *
  *     This software may be freely distributed and used according to the terms
  *     of the GNU Lesser General Public License.
@@ -20,7 +20,7 @@ static char *spt_start, *spt_end;
 void
 setproctitle_init(int argc, char **argv)
 {
 void
 setproctitle_init(int argc, char **argv)
 {
-#ifdef linux
+#ifdef CONFIG_LINUX
   int i, len;
   char **env, **oldenv, *t;
 
   int i, len;
   char **env, **oldenv, *t;
 
@@ -54,7 +54,7 @@ setproctitle_init(int argc, char **argv)
 }
 
 void
 }
 
 void
-setproctitle(char *msg, ...)
+setproctitle(const char *msg, ...)
 {
   va_list args;
   byte buf[256];
 {
   va_list args;
   byte buf[256];
@@ -74,3 +74,9 @@ setproctitle(char *msg, ...)
     }
   va_end(args);
 }
     }
   va_end(args);
 }
+
+char *
+getproctitle(void)
+{
+  return (spt_start < spt_end) ? spt_start : NULL;
+}