usr.sbin/sup/source/setproctitle.c

   1 /*-
   2  * Copyright (c) 2007 The NetBSD Foundation, Inc.
   3  * All rights reserved.
   4  *
   5  * This code is derived from software contributed to The NetBSD Foundation
   6  * by Christos Zoulas.
   7  *
   8  * Redistribution and use in source and binary forms, with or without
   9  * modification, are permitted provided that the following conditions
  10  * are met:
  11  * 1. Redistributions of source code must retain the above copyright
  12  *    notice, this list of conditions and the following disclaimer.
  13  * 2. Redistributions in binary form must reproduce the above copyright
  14  *    notice, this list of conditions and the following disclaimer in the
  15  *    documentation and/or other materials provided with the distribution.
  16  *
  17  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
  18  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
  19  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  20  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
  21  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  22  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  23  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  24  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  25  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  26  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  27  * POSSIBILITY OF SUCH DAMAGE.
  28  */
  29
  30 #include <stdio.h>
  31 #include <stdlib.h>
  32 #include <string.h>
  33 #include <stdarg.h>
  34
  35 #ifdef NEED_SETPROCTITLE
  36
  37 extern char **__environ;
  38
  39 void
  40 setproctitle(const char *fmt, ...)
  41 {
  42         va_list ap;
  43         char buf[1024];
  44         int len;
  45         char *pname, *p;
  46         char **args = __environ - 2;
  47
  48         /*
  49          * Keep going while it looks like a pointer. We'll stop at argc,
  50          * Assume that we have < 10K args.
  51          */
  52         while (*args > (char *)10240)
  53                 args--;
  54
  55         pname = *++args;
  56         *(int *)((int *)pname - 1) = 1; /* *argc = 1; */
  57
  58         /* Just the last component of the name */
  59         if ((p = strrchr(pname, '/')) != NULL)
  60                 pname = p + 1;
  61
  62         /* In case we get called again */
  63         if ((p = strrchr(pname, ':')) != NULL)
  64                 *p = '\0';
  65
  66         va_start(ap, fmt);
  67         if (fmt != NULL) {
  68                 len = snprintf(buf, sizeof(buf), "%s: ", pname);
  69                 if (len >= 0)
  70                         (void)vsnprintf(buf + len, sizeof(buf) - len, fmt, ap);
  71         } else
  72                 (void)snprintf(buf, sizeof(buf), "%s", pname);
  73         va_end(ap);
  74
  75         (void)strcpy(pname, buf);
  76 }
  77 #endif
  78
  79 #ifdef TEST
  80 int
  81 main(int argc, char **argv)
  82 {
  83         setproctitle("foo");
  84         sleep(1000);
  85         return 0;
  86 }
  87 #endif