source3/lib/pidfile.c

   1 /* this code is broken - there is a race condition with the unlink (tridge) */
   2
   3 /*
   4    Unix SMB/CIFS implementation.
   5    pidfile handling
   6    Copyright (C) Andrew Tridgell 1998
   7
   8    This program is free software; you can redistribute it and/or modify
   9    it under the terms of the GNU General Public License as published by
  10    the Free Software Foundation; either version 3 of the License, or
  11    (at your option) any later version.
  12
  13    This program is distributed in the hope that it will be useful,
  14    but WITHOUT ANY WARRANTY; without even the implied warranty of
  15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16    GNU General Public License for more details.
  17
  18    You should have received a copy of the GNU General Public License
  19    along with this program.  If not, see <http://www.gnu.org/licenses/>.
  20 */
  21
  22 #include "includes.h"
  23 #include "system/filesys.h"
  24
  25 #ifndef O_NONBLOCK
  26 #define O_NONBLOCK
  27 #endif
  28
  29 static char *pidFile_name = NULL;
  30
  31 /* return the pid in a pidfile. return 0 if the process (or pidfile)
  32    does not exist */
  33 pid_t pidfile_pid(const char *program_name)
  34 {
  35         int fd;
  36         char pidstr[20];
  37         pid_t pid = 0;
  38         unsigned int ret;
  39         char *name;
  40         const char *short_configfile;
  41         char * pidFile;
  42
  43         /* Add a suffix to the program name if this is a process with a
  44          * none default configuration file name. */
  45         if (strcmp( CONFIGFILE, get_dyn_CONFIGFILE()) == 0) {
  46                 name = SMB_STRDUP(program_name);
  47         } else {
  48                 short_configfile = strrchr( get_dyn_CONFIGFILE(), '/');
  49                 if (short_configfile == NULL) {
  50                         /* conf file in current directory */
  51                         short_configfile = get_dyn_CONFIGFILE();
  52                 } else {
  53                         /* full/relative path provided */
  54                         short_configfile++;
  55                 }
  56                 if (asprintf(&name, "%s-%s", program_name,
  57                                 short_configfile) == -1) {
  58                         smb_panic("asprintf failed");
  59                 }
  60         }
  61
  62         if (asprintf(&pidFile, "%s/%s.pid", lp_piddir(), name) == -1) {
  63                 SAFE_FREE(name);
  64                 return 0;
  65         }
  66
  67         SAFE_FREE(name);
  68
  69         fd = open(pidFile, O_NONBLOCK | O_RDONLY, 0644);
  70         if (fd == -1) {
  71                 SAFE_FREE(pidFile);
  72                 return 0;
  73         }
  74
  75         ZERO_ARRAY(pidstr);
  76
  77         if (read(fd, pidstr, sizeof(pidstr)-1) <= 0) {
  78                 goto noproc;
  79         }
  80
  81         ret = atoi(pidstr);
  82
  83         if (ret == 0) {
  84                 /* Obviously we had some garbage in the pidfile... */
  85                 DEBUG(1, ("Could not parse contents of pidfile %s\n",
  86                           pidFile));
  87                 goto noproc;
  88         }
  89
  90         pid = (pid_t)ret;
  91         if (!process_exists_by_pid(pid)) {
  92                 DEBUG(10, ("Process with PID=%d does not exist.\n", (int)pid));
  93                 goto noproc;
  94         }
  95
  96         if (fcntl_lock(fd,F_SETLK,0,1,F_RDLCK)) {
  97                 /* we could get the lock - it can't be a Samba process */
  98                 DEBUG(10, ("Process with PID=%d is no Samba process.\n",
  99                           (int)pid));
 100                 goto noproc;
 101         }
 102
 103         DEBUG(10, ("Process with PID=%d is running.\n", (int)pid));
 104         SAFE_FREE(pidFile);
 105         close(fd);
 106         return (pid_t)ret;
 107
 108  noproc:
 109         close(fd);
 110         DEBUG(10, ("Deleting %s, since %d is no Samba process.\n", pidFile,
 111                   (int)pid));
 112         unlink(pidFile);
 113         SAFE_FREE(pidFile);
 114         return 0;
 115 }
 116
 117 /* create a pid file in the pid directory. open it and leave it locked */
 118 void pidfile_create(const char *program_name)
 119 {
 120         int     fd;
 121         char    buf[20];
 122         const char    *short_configfile;
 123         char *name;
 124         pid_t pid;
 125
 126         /* Add a suffix to the program name if this is a process with a
 127          * none default configuration file name. */
 128         if (strcmp( CONFIGFILE, get_dyn_CONFIGFILE()) == 0) {
 129                 name = SMB_STRDUP(program_name);
 130         } else {
 131                 short_configfile = strrchr( get_dyn_CONFIGFILE(), '/');
 132                 if (short_configfile == NULL) {
 133                         /* conf file in current directory */
 134                         short_configfile = get_dyn_CONFIGFILE();
 135                 } else {
 136                         /* full/relative path provided */
 137                         short_configfile++;
 138                 }
 139                 if (asprintf(&name, "%s-%s", program_name,
 140                              short_configfile) == -1) {
 141                         smb_panic("asprintf failed");
 142                 }
 143         }
 144
 145         if (asprintf(&pidFile_name, "%s/%s.pid", lp_piddir(), name) == -1) {
 146                 smb_panic("asprintf failed");
 147         }
 148
 149         pid = pidfile_pid(program_name);
 150         if (pid != 0) {
 151                 DEBUG(0,("ERROR: %s is already running. File %s exists and process id %d is running.\n",
 152                          name, pidFile_name, (int)pid));
 153                 exit(1);
 154         }
 155
 156         fd = open(pidFile_name, O_NONBLOCK | O_CREAT | O_WRONLY | O_EXCL,
 157                       0644);
 158         if (fd == -1) {
 159                 DEBUG(0,("ERROR: can't open %s: Error was %s\n", pidFile_name,
 160                          strerror(errno)));
 161                 exit(1);
 162         }
 163
 164         if (fcntl_lock(fd,F_SETLK,0,1,F_WRLCK)==False) {
 165                 DEBUG(0,("ERROR: %s : fcntl lock of file %s failed. Error was %s\n",
 166                          name, pidFile_name, strerror(errno)));
 167                 exit(1);
 168         }
 169
 170         memset(buf, 0, sizeof(buf));
 171         slprintf(buf, sizeof(buf) - 1, "%u\n", (unsigned int)getpid());
 172         if (write(fd, buf, strlen(buf)) != (ssize_t)strlen(buf)) {
 173                 DEBUG(0,("ERROR: can't write to file %s: %s\n",
 174                          pidFile_name, strerror(errno)));
 175                 exit(1);
 176         }
 177         /* Leave pid file open & locked for the duration... */
 178         SAFE_FREE(name);
 179
 180         /* set the close on exec so that we don't leak the fd */
 181         fcntl(fd, F_SETFD, FD_CLOEXEC);
 182 }
 183
 184 void pidfile_unlink(void)
 185 {
 186         if (pidFile_name == NULL) {
 187                 return;
 188         }
 189         unlink(pidFile_name);
 190         SAFE_FREE(pidFile_name);
 191 }