udev_utils.c

   1 /*
   2  * Copyright (C) 2004-2005 Kay Sievers <kay.sievers@vrfy.org>
   3  *
   4  *      This program is free software; you can redistribute it and/or modify it
   5  *      under the terms of the GNU General Public License as published by the
   6  *      Free Software Foundation version 2 of the License.
   7  *
   8  *      This program is distributed in the hope that it will be useful, but
   9  *      WITHOUT ANY WARRANTY; without even the implied warranty of
  10  *      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  11  *      General Public License for more details.
  12  *
  13  *      You should have received a copy of the GNU General Public License along
  14  *      with this program; if not, write to the Free Software Foundation, Inc.,
  15  *      51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
  16  *
  17  */
  18
  19
  20 #include <stdlib.h>
  21 #include <stdio.h>
  22 #include <stddef.h>
  23 #include <unistd.h>
  24 #include <fcntl.h>
  25 #include <errno.h>
  26 #include <ctype.h>
  27 #include <dirent.h>
  28 #include <syslog.h>
  29 #include <pwd.h>
  30 #include <grp.h>
  31 #include <sys/types.h>
  32 #include <sys/utsname.h>
  33
  34 #include "udev.h"
  35
  36
  37 int log_priority(const char *priority)
  38 {
  39         char *endptr;
  40         int prio;
  41
  42         prio = strtol(priority, &endptr, 10);
  43         if (endptr[0] == '\0')
  44                 return prio;
  45         if (strncasecmp(priority, "err", 3) == 0)
  46                 return LOG_ERR;
  47         if (strcasecmp(priority, "info") == 0)
  48                 return LOG_INFO;
  49         if (strcasecmp(priority, "debug") == 0)
  50                 return LOG_DEBUG;
  51         if (string_is_true(priority))
  52                 return LOG_ERR;
  53
  54         return 0;
  55 }
  56
  57 char *name_list_add(struct list_head *name_list, const char *name, int sort)
  58 {
  59         struct name_entry *loop_name;
  60         struct name_entry *new_name;
  61
  62         list_for_each_entry(loop_name, name_list, node) {
  63                 /* avoid doubles */
  64                 if (strcmp(loop_name->name, name) == 0) {
  65                         dbg("'%s' is already in the list", name);
  66                         return loop_name->name;
  67                 }
  68         }
  69
  70         if (sort)
  71                 list_for_each_entry(loop_name, name_list, node) {
  72                         if (sort && strcmp(loop_name->name, name) > 0)
  73                                 break;
  74                 }
  75
  76         new_name = malloc(sizeof(struct name_entry));
  77         if (new_name == NULL)
  78                 return NULL;
  79
  80         strlcpy(new_name->name, name, sizeof(new_name->name));
  81         dbg("adding '%s'", new_name->name);
  82         list_add_tail(&new_name->node, &loop_name->node);
  83
  84         return new_name->name;
  85 }
  86
  87 char *name_list_key_add(struct list_head *name_list, const char *key, const char *value)
  88 {
  89         struct name_entry *loop_name;
  90         struct name_entry *new_name;
  91
  92         list_for_each_entry(loop_name, name_list, node) {
  93                 if (strncmp(loop_name->name, key, strlen(key)) == 0) {
  94                         dbg("key already present '%s', replace it", loop_name->name);
  95                         snprintf(loop_name->name, sizeof(loop_name->name), "%s=%s", key, value);
  96                         loop_name->name[sizeof(loop_name->name)-1] = '\0';
  97                         return loop_name->name;
  98                 }
  99         }
 100
 101         new_name = malloc(sizeof(struct name_entry));
 102         if (new_name == NULL)
 103                 return NULL;
 104
 105         snprintf(new_name->name, sizeof(new_name->name), "%s=%s", key, value);
 106         new_name->name[sizeof(new_name->name)-1] = '\0';
 107         dbg("adding '%s'", new_name->name);
 108         list_add_tail(&new_name->node, &loop_name->node);
 109
 110         return new_name->name;
 111 }
 112
 113 void name_list_cleanup(struct list_head *name_list)
 114 {
 115         struct name_entry *name_loop;
 116         struct name_entry *temp_loop;
 117
 118         list_for_each_entry_safe(name_loop, temp_loop, name_list, node) {
 119                 list_del(&name_loop->node);
 120                 free(name_loop);
 121         }
 122 }
 123
 124 /* calls function for every file found in specified directory */
 125 int add_matching_files(struct list_head *name_list, const char *dirname, const char *suffix)
 126 {
 127         struct dirent *ent;
 128         DIR *dir;
 129         char filename[PATH_SIZE];
 130
 131         dbg("open directory '%s'", dirname);
 132         dir = opendir(dirname);
 133         if (dir == NULL) {
 134                 err("unable to open '%s': %s", dirname, strerror(errno));
 135                 return -1;
 136         }
 137
 138         while (1) {
 139                 ent = readdir(dir);
 140                 if (ent == NULL || ent->d_name[0] == '\0')
 141                         break;
 142
 143                 if ((ent->d_name[0] == '.') || (ent->d_name[0] == COMMENT_CHARACTER))
 144                         continue;
 145
 146                 /* look for file matching with specified suffix */
 147                 if (suffix != NULL) {
 148                         const char *ext;
 149
 150                         ext = strrchr(ent->d_name, '.');
 151                         if (ext == NULL)
 152                                 continue;
 153                         if (strcmp(ext, suffix) != 0)
 154                                 continue;
 155                 }
 156                 dbg("put file '%s/%s' into list", dirname, ent->d_name);
 157
 158                 snprintf(filename, sizeof(filename), "%s/%s", dirname, ent->d_name);
 159                 filename[sizeof(filename)-1] = '\0';
 160                 name_list_add(name_list, filename, 1);
 161         }
 162
 163         closedir(dir);
 164         return 0;
 165 }
 166
 167 uid_t lookup_user(const char *user)
 168 {
 169         struct passwd *pw;
 170         uid_t uid = 0;
 171
 172         errno = 0;
 173         pw = getpwnam(user);
 174         if (pw == NULL) {
 175                 if (errno == 0 || errno == ENOENT || errno == ESRCH)
 176                         err("specified user '%s' unknown", user);
 177                 else
 178                         err("error resolving user '%s': %s", user, strerror(errno));
 179         } else
 180                 uid = pw->pw_uid;
 181
 182         return uid;
 183 }
 184
 185 extern gid_t lookup_group(const char *group)
 186 {
 187         struct group *gr;
 188         gid_t gid = 0;
 189
 190         errno = 0;
 191         gr = getgrnam(group);
 192         if (gr == NULL) {
 193                 if (errno == 0 || errno == ENOENT || errno == ESRCH)
 194                         err("specified group '%s' unknown", group);
 195                 else
 196                         err("error resolving group '%s': %s", group, strerror(errno));
 197         } else
 198                 gid = gr->gr_gid;
 199
 200         return gid;
 201 }
 202