libbb/find_pid_by_name.c

   1 /* vi: set sw=4 ts=4: */
   2 /*
   3  * Utility routines.
   4  *
   5  * Copyright (C) tons of folks.  Tracking down who wrote what
   6  * isn't something I'm going to worry about...  If you wrote something
   7  * here, please feel free to acknowledge your work.
   8  *
   9  * This program is free software; you can redistribute it and/or modify
  10  * 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 GNU
  17  * General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU General Public License
  20  * along with this program; if not, write to the Free Software
  21  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
  22  *
  23  * Based in part on code from sash, Copyright (c) 1999 by David I. Bell
  24  * Permission has been granted to redistribute this code under the GPL.
  25  *
  26  */
  27
  28 #include <stdio.h>
  29 #include <ctype.h>
  30 #include <string.h>
  31 #include <dirent.h>
  32 #include <stdlib.h>
  33 #include "libbb.h"
  34
  35 #define READ_BUF_SIZE   50
  36
  37
  38 /* For Erik's nifty devps device driver */
  39 #ifdef BB_FEATURE_USE_DEVPS_PATCH
  40 #include <linux/devps.h>
  41
  42 /* find_pid_by_name()
  43  *
  44  *  This finds the pid of the specified process,
  45  *  by using the /dev/ps device driver.
  46  *
  47  *  Returns a list of all matching PIDs
  48  */
  49 extern pid_t* find_pid_by_name( char* pidName)
  50 {
  51         int fd, i, j;
  52         char device[] = "/dev/ps";
  53         pid_t num_pids;
  54         pid_t* pid_array = NULL;
  55         pid_t* pidList=NULL;
  56
  57         /* open device */
  58         fd = open(device, O_RDONLY);
  59         if (fd < 0)
  60                 perror_msg_and_die("open failed for `%s'", device);
  61
  62         /* Find out how many processes there are */
  63         if (ioctl (fd, DEVPS_GET_NUM_PIDS, &num_pids)<0)
  64                 perror_msg_and_die("\nDEVPS_GET_PID_LIST");
  65
  66         /* Allocate some memory -- grab a few extras just in case
  67          * some new processes start up while we wait. The kernel will
  68          * just ignore any extras if we give it too many, and will trunc.
  69          * the list if we give it too few.  */
  70         pid_array = (pid_t*) xcalloc( num_pids+10, sizeof(pid_t));
  71         pid_array[0] = num_pids+10;
  72
  73         /* Now grab the pid list */
  74         if (ioctl (fd, DEVPS_GET_PID_LIST, pid_array)<0)
  75                 perror_msg_and_die("\nDEVPS_GET_PID_LIST");
  76
  77         /* Now search for a match */
  78         for (i=1, j=0; i<pid_array[0] ; i++) {
  79                 char* p;
  80                 struct pid_info info;
  81
  82             info.pid = pid_array[i];
  83             if (ioctl (fd, DEVPS_GET_PID_INFO, &info)<0)
  84                         perror_msg_and_die("\nDEVPS_GET_PID_INFO");
  85
  86                 /* Make sure we only match on the process name */
  87                 p=info.command_line+1;
  88                 while ((*p != 0) && !isspace(*(p)) && (*(p-1) != '\\')) {
  89                         (p)++;
  90                 }
  91                 if (isspace(*(p)))
  92                                 *p='\0';
  93
  94                 if ((strstr(info.command_line, pidName) != NULL)
  95                                 && (strlen(pidName) == strlen(info.command_line))) {
  96                         pidList=xrealloc( pidList, sizeof(pid_t) * (j+2));
  97                         pidList[j++]=info.pid;
  98                 }
  99         }
 100         if (pidList) {
 101                 pidList[j]=0;
 102         } else if ( strcmp(pidName, "init")==0) {
 103                 /* If we found nothing and they were trying to kill "init",
 104                  * guess PID 1 and call it good...  Perhaps we should simply
 105                  * exit if /proc isn't mounted, but this will do for now. */
 106                 pidList=xrealloc( pidList, sizeof(pid_t));
 107                 pidList[0]=1;
 108         } else {
 109                 pidList[0]=-1;
 110         }
 111
 112         /* Free memory */
 113         free( pid_array);
 114
 115         /* close device */
 116         if (close (fd) != 0)
 117                 perror_msg_and_die("close failed for `%s'", device);
 118
 119         return pidList;
 120 }
 121
 122 #else           /* BB_FEATURE_USE_DEVPS_PATCH */
 123
 124 /* find_pid_by_name()
 125  *
 126  *  This finds the pid of the specified process.
 127  *  Currently, it's implemented by rummaging through
 128  *  the proc filesystem.
 129  *
 130  *  Returns a list of all matching PIDs
 131  */
 132 extern pid_t* find_pid_by_name( char* pidName)
 133 {
 134         DIR *dir;
 135         struct dirent *next;
 136         pid_t* pidList=NULL;
 137         int i=0;
 138
 139         dir = opendir("/proc");
 140         if (!dir)
 141                 perror_msg_and_die("Cannot open /proc");
 142
 143         while ((next = readdir(dir)) != NULL) {
 144                 FILE *status;
 145                 char filename[READ_BUF_SIZE];
 146                 char buffer[READ_BUF_SIZE];
 147                 char name[READ_BUF_SIZE];
 148
 149                 /* Must skip ".." since that is outside /proc */
 150                 if (strcmp(next->d_name, "..") == 0)
 151                         continue;
 152
 153                 /* If it isn't a number, we don't want it */
 154                 if (!isdigit(*next->d_name))
 155                         continue;
 156
 157                 sprintf(filename, "/proc/%s/status", next->d_name);
 158                 if (! (status = fopen(filename, "r")) ) {
 159                         continue;
 160                 }
 161                 if (fgets(buffer, READ_BUF_SIZE-1, status) == NULL) {
 162                         fclose(status);
 163                         continue;
 164                 }
 165                 fclose(status);
 166
 167                 /* Buffer should contain a string like "Name:   binary_name" */
 168                 sscanf(buffer, "%*s %s", name);
 169                 if (strcmp(name, pidName) == 0) {
 170                         pidList=xrealloc( pidList, sizeof(pid_t) * (i+2));
 171                         pidList[i++]=strtol(next->d_name, NULL, 0);
 172                 }
 173         }
 174
 175         if (pidList)
 176                 pidList[i]=0;
 177         else if ( strcmp(pidName, "init")==0) {
 178                 /* If we found nothing and they were trying to kill "init",
 179                  * guess PID 1 and call it good...  Perhaps we should simply
 180                  * exit if /proc isn't mounted, but this will do for now. */
 181                 pidList=xrealloc( pidList, sizeof(pid_t));
 182                 pidList[0]=1;
 183         } else {
 184                 pidList[0]=-1;
 185         }
 186         return pidList;
 187 }
 188 #endif                                                  /* BB_FEATURE_USE_DEVPS_PATCH */
 189
 190 /* END CODE */
 191 /*
 192 Local Variables:
 193 c-file-style: "linux"
 194 c-basic-offset: 4
 195 tab-width: 4
 196 End:
 197 */