lib/util/pidfile.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3    pidfile handling
   4    Copyright (C) Andrew Tridgell 1998
   5
   6    This program is free software; you can redistribute it and/or modify
   7    it under the terms of the GNU General Public License as published by
   8    the Free Software Foundation; either version 3 of the License, or
   9    (at your option) any later version.
  10
  11    This program is distributed in the hope that it will be useful,
  12    but WITHOUT ANY WARRANTY; without even the implied warranty of
  13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14    GNU General Public License for more details.
  15
  16    You should have received a copy of the GNU General Public License
  17    along with this program.  If not, see <http://www.gnu.org/licenses/>.
  18 */
  19
  20 #include "includes.h"
  21 #include "system/filesys.h"
  22 #include "lib/util/pidfile.h"
  23
  24 /**
  25  * @file
  26  * @brief Pid file handling
  27  */
  28
  29 /**
  30  * return the pid in a pidfile. return 0 if the process (or pidfile)
  31  * does not exist
  32  */
  33 pid_t pidfile_pid(const char *piddir, const char *name)
  34 {
  35         size_t len = strlen(piddir) + strlen(name) + 6;
  36         char pidFile[len];
  37         int fd;
  38         char pidstr[20];
  39         pid_t ret = -1;
  40
  41         snprintf(pidFile, sizeof(pidFile), "%s/%s.pid", piddir, name);
  42
  43         fd = open(pidFile, O_NONBLOCK | O_RDONLY, 0644);
  44
  45         if (fd == -1) {
  46                 return 0;
  47         }
  48
  49         ZERO_STRUCT(pidstr);
  50
  51         if (read(fd, pidstr, sizeof(pidstr)-1) <= 0) {
  52                 goto noproc;
  53         }
  54
  55         ret = (pid_t)atoi(pidstr);
  56         if (ret <= 0) {
  57                 DEBUG(1, ("Could not parse contents of pidfile %s\n",
  58                         pidFile));
  59                 goto noproc;
  60         }
  61
  62         if (!process_exists_by_pid(ret)) {
  63                 DEBUG(10, ("Process with PID=%d does not exist.\n", (int)ret));
  64                 goto noproc;
  65         }
  66
  67         if (fcntl_lock(fd,F_SETLK,0,1,F_RDLCK)) {
  68                 /* we could get the lock - it can't be a Samba process */
  69                 DEBUG(10, ("Process with PID=%d is not a Samba process.\n",
  70                         (int)ret));
  71                 goto noproc;
  72         }
  73
  74         close(fd);
  75         DEBUG(10, ("Process with PID=%d is running.\n", (int)ret));
  76         return ret;
  77
  78  noproc:
  79         close(fd);
  80         return 0;
  81 }
  82
  83 /**
  84  * create a pid file in the pid directory. open it and leave it locked
  85  */
  86 void pidfile_create(const char *piddir, const char *name)
  87 {
  88         size_t len = strlen(piddir) + strlen(name) + 6;
  89         char pidFile[len];
  90         int     fd;
  91         char    buf[20];
  92         pid_t pid;
  93
  94         snprintf(pidFile, sizeof(pidFile), "%s/%s.pid", piddir, name);
  95
  96         pid = pidfile_pid(piddir, name);
  97         if (pid != 0) {
  98                 DEBUG(0,("ERROR: %s is already running. File %s exists and process id %d is running.\n",
  99                          name, pidFile, (int)pid));
 100                 exit(1);
 101         }
 102
 103         fd = open(pidFile, O_NONBLOCK | O_CREAT | O_WRONLY, 0644);
 104         if (fd == -1) {
 105                 DEBUG(0,("ERROR: can't open %s: Error was %s\n", pidFile,
 106                          strerror(errno)));
 107                 exit(1);
 108         }
 109
 110         smb_set_close_on_exec(fd);
 111
 112         if (fcntl_lock(fd,F_SETLK,0,1,F_WRLCK)==false) {
 113                 DEBUG(0,("ERROR: %s : fcntl lock of file %s failed. Error was %s\n",
 114               name, pidFile, strerror(errno)));
 115                 exit(1);
 116         }
 117
 118         memset(buf, 0, sizeof(buf));
 119         slprintf(buf, sizeof(buf) - 1, "%u\n", (unsigned int) getpid());
 120         if (write(fd, buf, strlen(buf)) != (ssize_t)strlen(buf)) {
 121                 DEBUG(0,("ERROR: can't write to file %s: %s\n",
 122                          pidFile, strerror(errno)));
 123                 exit(1);
 124         }
 125
 126         /* Leave pid file open & locked for the duration... */
 127 }
 128
 129 void pidfile_unlink(const char *piddir, const char *name)
 130 {
 131         int ret;
 132         char *pidFile = NULL;
 133
 134         if (asprintf(&pidFile, "%s/%s.pid", piddir, name) < 0) {
 135                 DEBUG(0,("ERROR: Out of memory\n"));
 136                 exit(1);
 137         }
 138         ret = unlink(pidFile);
 139         if (ret == -1) {
 140                 DEBUG(0,("Failed to delete pidfile %s. Error was %s\n",
 141                         pidFile, strerror(errno)));
 142         }
 143 }