2 * libudev - interface to udev device information
4 * Copyright (C) 2008 Kay Sievers <kay.sievers@vrfy.org>
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 2 of the License, or
9 * (at your option) any later version.
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.
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/>.
32 #include "libudev-private.h"
34 static ssize_t get_sys_link(struct udev *udev, const char *slink, const char *syspath, char *subsystem, size_t size)
36 char path[UTIL_PATH_SIZE];
40 util_strlcpy(path, syspath, sizeof(path));
41 util_strlcat(path, "/", sizeof(path));
42 util_strlcat(path, slink, sizeof(path));
43 len = readlink(path, path, sizeof(path));
44 if (len < 0 || len >= (ssize_t) sizeof(path))
47 pos = strrchr(path, '/');
51 info(udev, "resolved link to: '%s'\n", pos);
52 return util_strlcpy(subsystem, pos, size);
55 ssize_t util_get_sys_subsystem(struct udev *udev, const char *syspath, char *subsystem, size_t size)
57 return get_sys_link(udev, "subsystem", syspath, subsystem, size);
60 ssize_t util_get_sys_driver(struct udev *udev, const char *syspath, char *driver, size_t size)
62 return get_sys_link(udev, "driver", syspath, driver, size);
65 int util_resolve_sys_link(struct udev *udev, char *syspath, size_t size)
68 char link_target[UTIL_PATH_SIZE];
74 if (lstat(syspath, &statbuf) < 0)
76 if (!S_ISLNK(statbuf.st_mode))
78 len = readlink(syspath, link_target, sizeof(link_target));
81 link_target[len] = '\0';
82 dbg(udev, "path link '%s' points to '%s'\n", syspath, link_target);
84 for (back = 0; strncmp(&link_target[back * 3], "../", 3) == 0; back++)
86 dbg(udev, "base '%s', tail '%s', back %i\n", syspath, &link_target[back * 3], back);
87 for (i = 0; i <= back; i++) {
88 char *pos = strrchr(syspath, '/');
94 dbg(udev, "after moving back '%s'\n", syspath);
95 util_strlcat(syspath, "/", size);
96 util_strlcat(syspath, &link_target[back * 3], size);
100 int util_log_priority(const char *priority)
105 prio = strtol(priority, &endptr, 10);
106 if (endptr[0] == '\0')
108 if (strncasecmp(priority, "err", 3) == 0)
110 if (strcasecmp(priority, "info") == 0)
112 if (strcasecmp(priority, "debug") == 0)
117 size_t util_path_encode(char *s, size_t len)
123 for (i = 0, j = 0; s[i] != '\0'; i++) {
125 memcpy(&t[j], "\\x2f", 4);
127 } else if (s[i] == '\\') {
128 memcpy(&t[j], "\\x5c", 4);
140 size_t util_path_decode(char *s)
144 for (i = 0, j = 0; s[i] != '\0'; j++) {
145 if (memcmp(&s[i], "\\x2f", 4) == 0) {
148 }else if (memcmp(&s[i], "\\x5c", 4) == 0) {
160 void util_remove_trailing_chars(char *path, char c)
167 while (len > 0 && path[len-1] == c)
171 size_t util_strlcpy(char *dst, const char *src, size_t size)
178 while ((ch = *p++)) {
184 /* If size == 0 there is no space for a final null... */
190 size_t util_strlcat(char *dst, const char *src, size_t size)
197 while (bytes < size && *q) {
202 return (bytes + strlen(src));
204 while ((ch = *p++)) {
214 /* count of characters used to encode one unicode char */
215 static int utf8_encoded_expected_len(const char *str)
217 unsigned char c = (unsigned char)str[0];
221 if ((c & 0xe0) == 0xc0)
223 if ((c & 0xf0) == 0xe0)
225 if ((c & 0xf8) == 0xf0)
227 if ((c & 0xfc) == 0xf8)
229 if ((c & 0xfe) == 0xfc)
234 /* decode one unicode char */
235 static int utf8_encoded_to_unichar(const char *str)
241 len = utf8_encoded_expected_len(str);
246 unichar = str[0] & 0x1f;
249 unichar = (int)str[0] & 0x0f;
252 unichar = (int)str[0] & 0x07;
255 unichar = (int)str[0] & 0x03;
258 unichar = (int)str[0] & 0x01;
264 for (i = 1; i < len; i++) {
265 if (((int)str[i] & 0xc0) != 0x80)
268 unichar |= (int)str[i] & 0x3f;
274 /* expected size used to encode one unicode char */
275 static int utf8_unichar_to_encoded_len(int unichar)
281 if (unichar < 0x10000)
283 if (unichar < 0x200000)
285 if (unichar < 0x4000000)
290 /* check if unicode char has a valid numeric range */
291 static int utf8_unichar_valid_range(int unichar)
293 if (unichar > 0x10ffff)
295 if ((unichar & 0xfffff800) == 0xd800)
297 if ((unichar > 0xfdcf) && (unichar < 0xfdf0))
299 if ((unichar & 0xffff) == 0xffff)
304 /* validate one encoded unicode char and return its length */
305 static int utf8_encoded_valid_unichar(const char *str)
311 len = utf8_encoded_expected_len(str);
319 /* check if expected encoded chars are available */
320 for (i = 0; i < len; i++)
321 if ((str[i] & 0x80) != 0x80)
324 unichar = utf8_encoded_to_unichar(str);
326 /* check if encoded length matches encoded value */
327 if (utf8_unichar_to_encoded_len(unichar) != len)
330 /* check if value has valid range */
331 if (!utf8_unichar_valid_range(unichar))
337 /* allow chars in whitelist, plain ascii, hex-escaping and valid utf8 */
338 int util_replace_chars(char *str, const char *white)
343 while (str[i] != '\0') {
346 /* accept whitelist */
347 if (white != NULL && strchr(white, str[i]) != NULL) {
352 /* accept plain ascii char */
353 if ((str[i] >= '0' && str[i] <= '9') ||
354 (str[i] >= 'A' && str[i] <= 'Z') ||
355 (str[i] >= 'a' && str[i] <= 'z')) {
360 /* accept hex encoding */
361 if (str[i] == '\\' && str[i+1] == 'x') {
366 /* accept valid utf8 */
367 len = utf8_encoded_valid_unichar(&str[i]);
373 /* if space is allowed, replace whitespace with ordinary space */
374 if (isspace(str[i]) && strchr(white, ' ') != NULL) {
381 /* everything else is replaced with '_' */