1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
|
/*
* Process id output.
* Copyright (C) 1998, 1999 Kunihiro Ishiguro
*
* This file is part of GNU Zebra.
*
* GNU Zebra 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, or (at your option) any
* later version.
*
* GNU Zebra 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 GNU Zebra; see the file COPYING. If not, write to the Free
* Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
* 02111-1307, USA.
*/
#include <zebra.h>
#include <fcntl.h>
#include <log.h>
#include "version.h"
#define PIDFILE_MASK 0644
#ifndef HAVE_FCNTL
pid_t
pid_output (const char *path)
{
FILE *fp;
pid_t pid;
mode_t oldumask;
pid = getpid();
oldumask = umask(0777 & ~PIDFILE_MASK);
fp = fopen (path, "w");
if (fp != NULL)
{
fprintf (fp, "%d\n", (int) pid);
fclose (fp);
umask(oldumask);
return pid;
}
/* XXX Why do we continue instead of exiting? This seems incompatible
with the behavior of the fcntl version below. */
zlog_warn("Can't fopen pid lock file %s (%s), continuing",
path, safe_strerror(errno));
umask(oldumask);
return -1;
}
#else /* HAVE_FCNTL */
pid_t
pid_output (const char *path)
{
int tmp;
int fd;
pid_t pid;
char buf[16];
struct flock lock;
mode_t oldumask;
pid = getpid ();
oldumask = umask(0777 & ~PIDFILE_MASK);
fd = open (path, O_RDWR | O_CREAT, PIDFILE_MASK);
if (fd < 0)
{
zlog_err("Can't create pid lock file %s (%s), exiting",
path, safe_strerror(errno));
umask(oldumask);
exit(1);
}
else
{
size_t pidsize;
umask(oldumask);
memset (&lock, 0, sizeof(lock));
lock.l_type = F_WRLCK;
lock.l_whence = SEEK_SET;
if (fcntl(fd, F_SETLK, &lock) < 0)
{
zlog_err("Could not lock pid_file %s, exiting", path);
exit(1);
}
sprintf (buf, "%d\n", (int) pid);
pidsize = strlen(buf);
if ((tmp = write (fd, buf, pidsize)) != (int)pidsize)
zlog_err("Could not write pid %d to pid_file %s, rc was %d: %s",
(int)pid,path,tmp,safe_strerror(errno));
else if (ftruncate(fd, pidsize) < 0)
zlog_err("Could not truncate pid_file %s to %u bytes: %s",
path,(u_int)pidsize,safe_strerror(errno));
}
return pid;
}
#endif /* HAVE_FCNTL */
|
