gvpe/src/util.C

/*
    util.C -- process management and other utility functions
    Copyright (C) 2003-2005 Marc Lehmann <gvpe@schmorp.de>
    
    Some of these are taken from tinc, see the AUTHORS file.
 
    This file is part of GVPE.

    GVPE is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    the Free Software Foundation; either version 2 of the License, or
    (at your option) any later version.
 
    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.
 
    You should have received a copy of the GNU General Public License
    along with gvpe; if not, write to the Free Software
    Foundation, Inc. 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
*/

#include "config.h"

#include <cstdio>
#include <cstdlib>
#include <cstring>

#include <errno.h>
#include <signal.h>
#include <sys/types.h>
#include <sys/wait.h>
#include <unistd.h>
#include <time.h>

#include "netcompat.h"

#include "gettext.h"
#include "pidfile.h"
#include "dropin.h"

#include "global.h"
#include "conf.h"
#include "util.h"
#include "slog.h"

int
write_pidfile (void)
{
  int pid;

  pid = check_pid (conf.pidfilename);

  if (pid)
    {
      fprintf (stderr, _("A gvpe daemon is already running with pid %d.\n"), pid);
      return 1;
    }

  /* if it's locked, write-protected, or whatever */
  if (!write_pid (conf.pidfilename))
    return 1;

  return 0;
}

int
kill_other (int signal)
{
  int pid;

  pid = read_pid (conf.pidfilename);

  if (!pid)
    {
      fprintf (stderr, _("No other gvpe daemon is running.\n"));
      return 1;
    }

  errno = 0;                    /* No error, sometimes errno is only changed on error */

  /* ESRCH is returned when no process with that pid is found */
  if (kill (pid, signal) && errno == ESRCH)
    {
      fprintf (stderr, _("The gvpe daemon is no longer running. "));

      fprintf (stderr, _("Removing stale lock file.\n"));
      remove_pid (conf.pidfilename);
    }

  return 0;
}

int
detach (int do_detach)
{
  /* First check if we can open a fresh new pidfile */

  if (write_pidfile ())
    return -1;

  /* If we succeeded in doing that, detach */

  log_to (0);

  if (do_detach)
    {
      if (daemon (0, 0) < 0)
        {
          log_to (LOGTO_SYSLOG | LOGTO_STDERR);

          slog (L_ERR, _("couldn't detach from terminal: %s"), strerror (errno));
          return -1;
        }

      /* Now UPDATE the pid in the pidfile, because we changed it... */

      if (!write_pid (conf.pidfilename))
        return -1;

      log_to (LOGTO_SYSLOG);
    }
  else
    log_to (LOGTO_SYSLOG | LOGTO_STDERR);

  slog (L_INFO, _("gvpe daemon %s (%s %s) starting"), VERSION, __DATE__, __TIME__);

  return 0;
}

bool run_script (const run_script_cb &cb, bool wait)
{
  int pid;

  if ((pid = fork ()) == 0)
    {
      execl ("/bin/sh", "/bin/sh", "-c", cb (), (char *) 0);
      exit (EXIT_FAILURE);
    }
  else if (pid > 0)
    {
      if (wait)
        {
          int status;

          if (waitpid (pid, &status, 0) < 0)
            {
              slog (L_WARN, _("waiting for an external command failed: %s."),
                    strerror (errno));
              return false;
            }
          else if (!WIFEXITED (status) || WEXITSTATUS (status) != EXIT_SUCCESS)
            {
              slog (L_WARN, _("external command returned with exit status %d (%04x)."),
                    WEXITSTATUS (status), status);
              return false;
            }
        }
    }

  return true;
}

#if ENABLE_HTTP_PROXY
// works like strdup
u8 *
base64_encode (const u8 *data, unsigned int len)
{
  const static char base64[65] = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";

  unsigned int t, i;
  const u8 *end = data + len;
  u8 *res = new u8 [4 * ((len + 2) / 3) + 1];
  u8 *out = res;

  while (data <= end - 3)
    {
      t = (((data[0] << 8) | data[1]) << 8) | data[2];
      data += 3;
      
      *out++ = base64[(t >> 18) & 0x3f];
      *out++ = base64[(t >> 12) & 0x3f];
      *out++ = base64[(t >>  6) & 0x3f];
      *out++ = base64[(t      ) & 0x3f];
    }

  for (t = 0, i = 0; data < end; i++)
    t = (t << 8) | *data++;

  switch (i)
    {
      case 2:
        *out++ = base64[(t >> 10) & 0x3f];
        *out++ = base64[(t >>  4) & 0x3f];
        *out++ = base64[(t <<  2) & 0x3f];
        *out++ = '=';
        break;
      case 1:
        *out++ = base64[(t >>  2) & 0x3f];
        *out++ = base64[(t <<  4) & 0x3f];
        *out++ = '=';
        *out++ = '=';
        break;
    }

  *out++ = 0;

  return res;
}
#endif

void
id2mac (unsigned int id, void *m)
{
  mac &p = *(mac *)m;

  if (id)
    {
      p[0] = 0xfe;
      p[1] = 0xfd;
      p[2] = 0x80;
      p[3] = 0x00;
      p[4] = id >> 8;
      p[5] = id;
    }
  else
    {
      p[0] = 0xff;
      p[1] = 0xff;
      p[2] = 0xff;
      p[3] = 0xff;
      p[4] = 0xff;
      p[5] = 0xff;
    }
}

Revision:	1.19
Committed:	Wed Mar 23 21:55:39 2005 UTC (19 years, 2 months ago) by pcg
Content type:	text/plain
Branch:	MAIN
Changes since 1.18:	+19 -7 lines
Log Message:	* empty log message *
#	User	Rev	Content
1	pcg	1.1	/*
2			util.C -- process management and other utility functions
3	pcg	1.16	Copyright (C) 2003-2005 Marc Lehmann <gvpe@schmorp.de>
4	pcg	1.1
5	pcg	1.3	Some of these are taken from tinc, see the AUTHORS file.
6	pcg	1.1
7	pcg	1.16	This file is part of GVPE.
8
9			GVPE is free software; you can redistribute it and/or modify
10	pcg	1.1	it under the terms of the GNU General Public License as published by
11			the Free Software Foundation; either version 2 of the License, or
12			(at your option) any later version.
13
14			This program is distributed in the hope that it will be useful,
15			but WITHOUT ANY WARRANTY; without even the implied warranty of
16			MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17			GNU General Public License for more details.
18
19			You should have received a copy of the GNU General Public License
20	pcg	1.16	along with gvpe; if not, write to the Free Software
21	pcg	1.1	Foundation, Inc. 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
22			*/
23
24			#include "config.h"
25
26			#include <cstdio>
27	pcg	1.12	#include <cstdlib>
28	pcg	1.1	#include <cstring>
29
30			#include <errno.h>
31			#include <signal.h>
32			#include <sys/types.h>
33	pcg	1.4	#include <sys/wait.h>
34	pcg	1.1	#include <unistd.h>
35			#include <time.h>
36
37	pcg	1.8	#include "netcompat.h"
38	pcg	1.1
39	pcg	1.18	#include "gettext.h"
40	pcg	1.1	#include "pidfile.h"
41			#include "dropin.h"
42
43			#include "global.h"
44			#include "conf.h"
45	pcg	1.5	#include "util.h"
46	pcg	1.1	#include "slog.h"
47
48			int
49			write_pidfile (void)
50			{
51			int pid;
52
53	pcg	1.13	pid = check_pid (conf.pidfilename);
54	pcg	1.1
55			if (pid)
56			{
57	pcg	1.15	fprintf (stderr, _("A gvpe daemon is already running with pid %d.\n"), pid);
58	pcg	1.1	return 1;
59			}
60
61			/* if it's locked, write-protected, or whatever */
62	pcg	1.13	if (!write_pid (conf.pidfilename))
63	pcg	1.1	return 1;
64
65			return 0;
66			}
67
68			int
69			kill_other (int signal)
70			{
71			int pid;
72
73	pcg	1.13	pid = read_pid (conf.pidfilename);
74	pcg	1.1
75			if (!pid)
76			{
77	pcg	1.15	fprintf (stderr, _("No other gvpe daemon is running.\n"));
78	pcg	1.1	return 1;
79			}
80
81			errno = 0; /* No error, sometimes errno is only changed on error */
82
83			/* ESRCH is returned when no process with that pid is found */
84			if (kill (pid, signal) && errno == ESRCH)
85			{
86	pcg	1.15	fprintf (stderr, _("The gvpe daemon is no longer running. "));
87	pcg	1.1
88			fprintf (stderr, _("Removing stale lock file.\n"));
89	pcg	1.13	remove_pid (conf.pidfilename);
90	pcg	1.1	}
91
92			return 0;
93			}
94
95			int
96			detach (int do_detach)
97			{
98			/* First check if we can open a fresh new pidfile */
99
100			if (write_pidfile ())
101			return -1;
102
103			/* If we succeeded in doing that, detach */
104
105			log_to (0);
106
107			if (do_detach)
108			{
109			if (daemon (0, 0) < 0)
110			{
111			log_to (LOGTO_SYSLOG \| LOGTO_STDERR);
112
113			slog (L_ERR, _("couldn't detach from terminal: %s"), strerror (errno));
114			return -1;
115			}
116
117			/* Now UPDATE the pid in the pidfile, because we changed it... */
118
119	pcg	1.13	if (!write_pid (conf.pidfilename))
120	pcg	1.1	return -1;
121
122			log_to (LOGTO_SYSLOG);
123			}
124			else
125			log_to (LOGTO_SYSLOG \| LOGTO_STDERR);
126
127	pcg	1.15	slog (L_INFO, _("gvpe daemon %s (%s %s) starting"), VERSION, __DATE__, __TIME__);
128	pcg	1.1
129			return 0;
130			}
131
132	pcg	1.19	bool run_script (const run_script_cb &cb, bool wait)
133	pcg	1.4	{
134			int pid;
135
136			if ((pid = fork ()) == 0)
137			{
138	pcg	1.19	execl ("/bin/sh", "/bin/sh", "-c", cb (), (char *) 0);
139			exit (EXIT_FAILURE);
140	pcg	1.4	}
141			else if (pid > 0)
142			{
143			if (wait)
144			{
145	pcg	1.19	int status;
146
147			if (waitpid (pid, &status, 0) < 0)
148			{
149			slog (L_WARN, _("waiting for an external command failed: %s."),
150			strerror (errno));
151			return false;
152			}
153			else if (!WIFEXITED (status) \|\| WEXITSTATUS (status) != EXIT_SUCCESS)
154			{
155			slog (L_WARN, _("external command returned with exit status %d (%04x)."),
156			WEXITSTATUS (status), status);
157			return false;
158			}
159	pcg	1.4	}
160			}
161	pcg	1.19
162			return true;
163	pcg	1.4	}
164	pcg	1.7
165			#if ENABLE_HTTP_PROXY
166			// works like strdup
167			u8 *
168			base64_encode (const u8 *data, unsigned int len)
169			{
170			const static char base64[65] = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
171
172			unsigned int t, i;
173			const u8 *end = data + len;
174			u8 res = new u8 [4 ((len + 2) / 3) + 1];
175			u8 *out = res;
176
177			while (data <= end - 3)
178			{
179			t = (((data[0] << 8) \| data[1]) << 8) \| data[2];
180			data += 3;
181
182			*out++ = base64[(t >> 18) & 0x3f];
183			*out++ = base64[(t >> 12) & 0x3f];
184			*out++ = base64[(t >> 6) & 0x3f];
185			*out++ = base64[(t ) & 0x3f];
186			}
187
188			for (t = 0, i = 0; data < end; i++)
189			t = (t << 8) \| *data++;
190
191			switch (i)
192			{
193			case 2:
194			*out++ = base64[(t >> 10) & 0x3f];
195			*out++ = base64[(t >> 4) & 0x3f];
196			*out++ = base64[(t << 2) & 0x3f];
197			*out++ = '=';
198			break;
199			case 1:
200			*out++ = base64[(t >> 2) & 0x3f];
201			*out++ = base64[(t << 4) & 0x3f];
202			*out++ = '=';
203			*out++ = '=';
204			break;
205			}
206
207			*out++ = 0;
208
209			return res;
210			}
211			#endif
212
213	pcg	1.10	void
214			id2mac (unsigned int id, void *m)
215			{
216			mac &p = (mac )m;
217
218			if (id)
219			{
220			p[0] = 0xfe;
221			p[1] = 0xfd;
222			p[2] = 0x80;
223			p[3] = 0x00;
224			p[4] = id >> 8;
225			p[5] = id;
226			}
227			else
228			{
229			p[0] = 0xff;
230			p[1] = 0xff;
231			p[2] = 0xff;
232			p[3] = 0xff;
233			p[4] = 0xff;
234			p[5] = 0xff;
235			}
236			}
237