]> git.ipfire.org Git - thirdparty/systemd.git/blob - udev/udev-rules.c
OWNER/GROUP: fix if logic
[thirdparty/systemd.git] / udev / udev-rules.c
1 /*
2 * Copyright (C) 2008 Kay Sievers <kay.sievers@vrfy.org>
3 * Copyright (C) 2008 Alan Jenkins <alan-jenkins@tuffmail.co.uk>
4 *
5 * This program is free software: you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation, either version 2 of the License, or
8 * (at your option) any later version.
9 *
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
14 *
15 * You should have received a copy of the GNU General Public License
16 * along with this program. If not, see <http://www.gnu.org/licenses/>.
17 */
18
19 #include <stddef.h>
20 #include <limits.h>
21 #include <stdlib.h>
22 #include <string.h>
23 #include <stdio.h>
24 #include <fcntl.h>
25 #include <ctype.h>
26 #include <unistd.h>
27 #include <errno.h>
28 #include <dirent.h>
29 #include <fnmatch.h>
30
31 #include "udev.h"
32
33 #define PREALLOC_TOKEN 2048
34 #define PREALLOC_STRBUF 32 * 1024
35 #define PREALLOC_TRIE 256
36
37 struct uid_gid {
38 unsigned int name_off;
39 union {
40 uid_t uid;
41 gid_t gid;
42 };
43 };
44
45 struct trie_node {
46 /* this node's first child */
47 unsigned int child_idx;
48 /* the next child of our parent node's child list */
49 unsigned int next_child_idx;
50 /* this node's last child (shortcut for append) */
51 unsigned int last_child_idx;
52 unsigned int value_off;
53 unsigned short value_len;
54 unsigned char key;
55 };
56
57 struct udev_rules {
58 struct udev *udev;
59 int resolve_names;
60
61 /* every key in the rules file becomes a token */
62 struct token *tokens;
63 unsigned int token_cur;
64 unsigned int token_max;
65
66 /* all key strings are copied to a single string buffer */
67 char *buf;
68 size_t buf_cur;
69 size_t buf_max;
70 unsigned int buf_count;
71
72 /* during rule parsing, strings are indexed to find duplicates */
73 struct trie_node *trie_nodes;
74 unsigned int trie_nodes_cur;
75 unsigned int trie_nodes_max;
76
77 /* during rule parsing, uid/gid lookup results are cached */
78 struct uid_gid *uids;
79 unsigned int uids_cur;
80 unsigned int uids_max;
81 struct uid_gid *gids;
82 unsigned int gids_cur;
83 unsigned int gids_max;
84 };
85
86 /* KEY=="", KEY!="", KEY+="", KEY="", KEY:="" */
87 enum operation_type {
88 OP_UNSET,
89
90 OP_MATCH,
91 OP_NOMATCH,
92 OP_MATCH_MAX,
93
94 OP_ADD,
95 OP_ASSIGN,
96 OP_ASSIGN_FINAL,
97 };
98
99 enum string_glob_type {
100 GL_UNSET,
101 GL_PLAIN, /* no special chars */
102 GL_GLOB, /* shell globs ?,*,[] */
103 GL_SPLIT, /* multi-value A|B */
104 GL_SPLIT_GLOB, /* multi-value with glob A*|B* */
105 GL_SOMETHING, /* commonly used "?*" */
106 GL_FORMAT,
107 };
108
109 /* tokens of a rule are sorted/handled in this order */
110 enum token_type {
111 TK_UNSET,
112 TK_RULE,
113
114 TK_M_ACTION, /* val */
115 TK_M_DEVPATH, /* val */
116 TK_M_KERNEL, /* val */
117 TK_M_DEVLINK, /* val */
118 TK_M_NAME, /* val */
119 TK_M_ENV, /* val, attr */
120 TK_M_SUBSYSTEM, /* val */
121 TK_M_DRIVER, /* val */
122 TK_M_WAITFOR, /* val */
123 TK_M_ATTR, /* val, attr */
124
125 TK_M_PARENTS_MIN,
126 TK_M_KERNELS, /* val */
127 TK_M_SUBSYSTEMS, /* val */
128 TK_M_DRIVERS, /* val */
129 TK_M_ATTRS, /* val, attr */
130 TK_M_PARENTS_MAX,
131
132 TK_M_TEST, /* val, mode_t */
133 TK_M_PROGRAM, /* val */
134 TK_M_IMPORT_FILE, /* val */
135 TK_M_IMPORT_PROG, /* val */
136 TK_M_IMPORT_PARENT, /* val */
137 TK_M_RESULT, /* val */
138 TK_M_MAX,
139
140 TK_A_IGNORE_DEVICE,
141 TK_A_STRING_ESCAPE_NONE,
142 TK_A_STRING_ESCAPE_REPLACE,
143 TK_A_INOTIFY_WATCH, /* int */
144 TK_A_NUM_FAKE_PART, /* int */
145 TK_A_DEVLINK_PRIO, /* int */
146 TK_A_OWNER, /* val */
147 TK_A_GROUP, /* val */
148 TK_A_MODE, /* val */
149 TK_A_OWNER_ID, /* uid_t */
150 TK_A_GROUP_ID, /* gid_t */
151 TK_A_MODE_ID, /* mode_t */
152 TK_A_ENV, /* val, attr */
153 TK_A_NAME, /* val */
154 TK_A_DEVLINK, /* val */
155 TK_A_EVENT_TIMEOUT, /* int */
156 TK_A_IGNORE_REMOVE,
157 TK_A_ATTR, /* val, attr */
158 TK_A_RUN, /* val, bool */
159 TK_A_GOTO, /* size_t */
160 TK_A_LAST_RULE,
161
162 TK_END,
163 };
164
165 /* we try to pack stuff in a way that we take only 12 bytes per token */
166 struct token {
167 union {
168 unsigned char type; /* same as in rule and key */
169 struct {
170 unsigned char type;
171 unsigned char flags;
172 unsigned short token_count;
173 unsigned int label_off;
174 unsigned short filename_off;
175 unsigned short filename_line;
176 } rule;
177 struct {
178 unsigned char type;
179 unsigned char flags;
180 unsigned char op;
181 unsigned char glob;
182 unsigned int value_off;
183 union {
184 unsigned int attr_off;
185 int ignore_error;
186 unsigned int rule_goto;
187 mode_t mode;
188 uid_t uid;
189 gid_t gid;
190 int num_fake_part;
191 int devlink_prio;
192 int event_timeout;
193 int watch;
194 };
195 } key;
196 };
197 };
198
199 #define MAX_TK 64
200 struct rule_tmp {
201 struct udev_rules *rules;
202 struct token rule;
203 struct token token[MAX_TK];
204 unsigned int token_cur;
205 };
206
207 #ifdef DEBUG
208 static const char *operation_str(enum operation_type type)
209 {
210 static const char *operation_strs[] = {
211 [OP_UNSET] = "UNSET",
212 [OP_MATCH] = "match",
213 [OP_NOMATCH] = "nomatch",
214 [OP_MATCH_MAX] = "MATCH_MAX",
215
216 [OP_ADD] = "add",
217 [OP_ASSIGN] = "assign",
218 [OP_ASSIGN_FINAL] = "assign-final",
219 } ;
220
221 return operation_strs[type];
222 }
223
224 static const char *string_glob_str(enum string_glob_type type)
225 {
226 static const char *string_glob_strs[] = {
227 [GL_UNSET] = "UNSET",
228 [GL_PLAIN] = "plain",
229 [GL_GLOB] = "glob",
230 [GL_SPLIT] = "split",
231 [GL_SPLIT_GLOB] = "split-glob",
232 [GL_SOMETHING] = "split-glob",
233 [GL_FORMAT] = "format",
234 };
235
236 return string_glob_strs[type];
237 }
238
239 static const char *token_str(enum token_type type)
240 {
241 static const char *token_strs[] = {
242 [TK_UNSET] = "UNSET",
243 [TK_RULE] = "RULE",
244
245 [TK_M_ACTION] = "M ACTION",
246 [TK_M_DEVPATH] = "M DEVPATH",
247 [TK_M_KERNEL] = "M KERNEL",
248 [TK_M_DEVLINK] = "M DEVLINK",
249 [TK_M_NAME] = "M NAME",
250 [TK_M_ENV] = "M ENV",
251 [TK_M_SUBSYSTEM] = "M SUBSYSTEM",
252 [TK_M_DRIVER] = "M DRIVER",
253 [TK_M_WAITFOR] = "M WAITFOR",
254 [TK_M_ATTR] = "M ATTR",
255
256 [TK_M_PARENTS_MIN] = "M PARENTS_MIN",
257 [TK_M_KERNELS] = "M KERNELS",
258 [TK_M_SUBSYSTEMS] = "M SUBSYSTEMS",
259 [TK_M_DRIVERS] = "M DRIVERS",
260 [TK_M_ATTRS] = "M ATTRS",
261 [TK_M_PARENTS_MAX] = "M PARENTS_MAX",
262
263 [TK_M_TEST] = "M TEST",
264 [TK_M_PROGRAM] = "M PROGRAM",
265 [TK_M_IMPORT_FILE] = "M IMPORT_FILE",
266 [TK_M_IMPORT_PROG] = "M IMPORT_PROG",
267 [TK_M_IMPORT_PARENT] = "M MPORT_PARENT",
268 [TK_M_RESULT] = "M RESULT",
269 [TK_M_MAX] = "M MAX",
270
271 [TK_A_IGNORE_DEVICE] = "A IGNORE_DEVICE",
272 [TK_A_STRING_ESCAPE_NONE] = "A STRING_ESCAPE_NONE",
273 [TK_A_STRING_ESCAPE_REPLACE] = "A STRING_ESCAPE_REPLACE",
274 [TK_A_INOTIFY_WATCH] = "A INOTIFY_WATCH",
275 [TK_A_NUM_FAKE_PART] = "A NUM_FAKE_PART",
276 [TK_A_DEVLINK_PRIO] = "A DEVLINK_PRIO",
277 [TK_A_OWNER] = "A OWNER",
278 [TK_A_GROUP] = "A GROUP",
279 [TK_A_MODE] = "A MODE",
280 [TK_A_OWNER_ID] = "A OWNER_ID",
281 [TK_A_GROUP_ID] = "A GROUP_ID",
282 [TK_A_MODE_ID] = "A MODE_ID",
283 [TK_A_ENV] = "A ENV",
284 [TK_A_NAME] = "A NAME",
285 [TK_A_DEVLINK] = "A DEVLINK",
286 [TK_A_EVENT_TIMEOUT] = "A EVENT_TIMEOUT",
287 [TK_A_IGNORE_REMOVE] = "A IGNORE_REMOVE",
288 [TK_A_ATTR] = "A ATTR",
289 [TK_A_RUN] = "A RUN",
290 [TK_A_GOTO] = "A GOTO",
291 [TK_A_LAST_RULE] = "A LAST_RULE",
292
293 [TK_END] = "END",
294 };
295
296 return token_strs[type];
297 }
298
299 static void dump_token(struct udev_rules *rules, struct token *token)
300 {
301 enum token_type type = token->type;
302 enum operation_type op = token->key.op;
303 enum string_glob_type glob = token->key.glob;
304 const char *value = &rules->buf[token->key.value_off];
305 const char *attr = &rules->buf[token->key.attr_off];
306
307 switch (type) {
308 case TK_RULE:
309 {
310 const char *tks_ptr = (char *)rules->tokens;
311 const char *tk_ptr = (char *)token;
312 unsigned int idx = (tk_ptr - tks_ptr) / sizeof(struct token);
313
314 dbg(rules->udev, "* RULE %s:%u, token: %u, count: %u, label: '%s', flags: 0x%02x\n",
315 &rules->buf[token->rule.filename_off], token->rule.filename_line,
316 idx, token->rule.token_count,
317 &rules->buf[token->rule.label_off],
318 token->rule.flags);
319 break;
320 }
321 case TK_M_ACTION:
322 case TK_M_DEVPATH:
323 case TK_M_KERNEL:
324 case TK_M_SUBSYSTEM:
325 case TK_M_DRIVER:
326 case TK_M_WAITFOR:
327 case TK_M_DEVLINK:
328 case TK_M_NAME:
329 case TK_M_KERNELS:
330 case TK_M_SUBSYSTEMS:
331 case TK_M_DRIVERS:
332 case TK_M_PROGRAM:
333 case TK_M_IMPORT_FILE:
334 case TK_M_IMPORT_PROG:
335 case TK_M_IMPORT_PARENT:
336 case TK_M_RESULT:
337 case TK_A_NAME:
338 case TK_A_DEVLINK:
339 case TK_A_OWNER:
340 case TK_A_GROUP:
341 case TK_A_MODE:
342 case TK_A_RUN:
343 dbg(rules->udev, "%s %s '%s'(%s)\n",
344 token_str(type), operation_str(op), value, string_glob_str(glob));
345 break;
346 case TK_M_ATTR:
347 case TK_M_ATTRS:
348 case TK_M_ENV:
349 case TK_A_ATTR:
350 case TK_A_ENV:
351 dbg(rules->udev, "%s %s '%s' '%s'(%s)\n",
352 token_str(type), operation_str(op), attr, value, string_glob_str(glob));
353 break;
354 case TK_A_IGNORE_DEVICE:
355 case TK_A_STRING_ESCAPE_NONE:
356 case TK_A_STRING_ESCAPE_REPLACE:
357 case TK_A_LAST_RULE:
358 case TK_A_IGNORE_REMOVE:
359 dbg(rules->udev, "%s\n", token_str(type));
360 break;
361 case TK_M_TEST:
362 dbg(rules->udev, "%s %s '%s'(%s) %#o\n",
363 token_str(type), operation_str(op), value, string_glob_str(glob), token->key.mode);
364 break;
365 case TK_A_INOTIFY_WATCH:
366 dbg(rules->udev, "%s %u\n", token_str(type), token->key.watch);
367 break;
368 case TK_A_NUM_FAKE_PART:
369 dbg(rules->udev, "%s %u\n", token_str(type), token->key.num_fake_part);
370 break;
371 case TK_A_DEVLINK_PRIO:
372 dbg(rules->udev, "%s %s %u\n", token_str(type), operation_str(op), token->key.devlink_prio);
373 break;
374 case TK_A_OWNER_ID:
375 dbg(rules->udev, "%s %s %u\n", token_str(type), operation_str(op), token->key.uid);
376 break;
377 case TK_A_GROUP_ID:
378 dbg(rules->udev, "%s %s %u\n", token_str(type), operation_str(op), token->key.gid);
379 break;
380 case TK_A_MODE_ID:
381 dbg(rules->udev, "%s %s %#o\n", token_str(type), operation_str(op), token->key.mode);
382 break;
383 case TK_A_EVENT_TIMEOUT:
384 dbg(rules->udev, "%s %s %u\n", token_str(type), operation_str(op), token->key.event_timeout);
385 break;
386 case TK_A_GOTO:
387 dbg(rules->udev, "%s '%s' %u\n", token_str(type), value, token->key.rule_goto);
388 break;
389 case TK_END:
390 dbg(rules->udev, "* %s\n", token_str(type));
391 break;
392 case TK_M_PARENTS_MIN:
393 case TK_M_PARENTS_MAX:
394 case TK_M_MAX:
395 case TK_UNSET:
396 dbg(rules->udev, "unknown type %u\n", type);
397 break;
398 }
399 }
400
401 static void dump_rules(struct udev_rules *rules)
402 {
403 unsigned int i;
404
405 dbg(rules->udev, "dumping %u (%zu bytes) tokens, %u (%zu bytes) strings\n",
406 rules->token_cur,
407 rules->token_cur * sizeof(struct token),
408 rules->buf_count,
409 rules->buf_cur);
410 for(i = 0; i < rules->token_cur; i++)
411 dump_token(rules, &rules->tokens[i]);
412 }
413 #else
414 static inline const char *operation_str(enum operation_type type) { return NULL; }
415 static inline const char *token_str(enum token_type type) { return NULL; }
416 static inline void dump_token(struct udev_rules *rules, struct token *token) {}
417 static inline void dump_rules(struct udev_rules *rules) {}
418 #endif /* DEBUG */
419
420 static int add_new_string(struct udev_rules *rules, const char *str, size_t bytes)
421 {
422 int off;
423
424 /* grow buffer if needed */
425 if (rules->buf_cur + bytes+1 >= rules->buf_max) {
426 char *buf;
427 unsigned int add;
428
429 /* double the buffer size */
430 add = rules->buf_max;
431 if (add < bytes * 8)
432 add = bytes * 8;
433
434 buf = realloc(rules->buf, rules->buf_max + add);
435 if (buf == NULL)
436 return -1;
437 dbg(rules->udev, "extend buffer from %zu to %zu\n", rules->buf_max, rules->buf_max + add);
438 rules->buf = buf;
439 rules->buf_max += add;
440 }
441 off = rules->buf_cur;
442 memcpy(&rules->buf[rules->buf_cur], str, bytes);
443 rules->buf_cur += bytes;
444 rules->buf_count++;
445 return off;
446 }
447
448 static int add_string(struct udev_rules *rules, const char *str)
449 {
450 unsigned int node_idx;
451 struct trie_node *new_node;
452 unsigned int new_node_idx;
453 unsigned char key;
454 unsigned short len;
455 unsigned int depth;
456 unsigned int off;
457 struct trie_node *parent;
458
459 /* walk trie, start from last character of str to find matching tails */
460 len = strlen(str);
461 key = str[len-1];
462 node_idx = 0;
463 for (depth = 0; depth <= len; depth++) {
464 struct trie_node *node;
465 unsigned int child_idx;
466
467 node = &rules->trie_nodes[node_idx];
468 off = node->value_off + node->value_len - len;
469
470 /* match against current node */
471 if (depth == len || (node->value_len >= len && memcmp(&rules->buf[off], str, len) == 0))
472 return off;
473
474 /* lookup child node */
475 key = str[len - 1 - depth];
476 child_idx = node->child_idx;
477 while (child_idx > 0) {
478 struct trie_node *child;
479
480 child = &rules->trie_nodes[child_idx];
481 if (child->key == key)
482 break;
483 child_idx = child->next_child_idx;
484 }
485 if (child_idx == 0)
486 break;
487 node_idx = child_idx;
488 }
489
490 /* string not found, add it */
491 off = add_new_string(rules, str, len + 1);
492
493 /* grow trie nodes if needed */
494 if (rules->trie_nodes_cur >= rules->trie_nodes_max) {
495 struct trie_node *nodes;
496 unsigned int add;
497
498 /* double the buffer size */
499 add = rules->trie_nodes_max;
500 if (add < 8)
501 add = 8;
502
503 nodes = realloc(rules->trie_nodes, (rules->trie_nodes_max + add) * sizeof(struct trie_node));
504 if (nodes == NULL)
505 return -1;
506 dbg(rules->udev, "extend trie nodes from %u to %u\n",
507 rules->trie_nodes_max, rules->trie_nodes_max + add);
508 rules->trie_nodes = nodes;
509 rules->trie_nodes_max += add;
510 }
511
512 /* get a new node */
513 new_node_idx = rules->trie_nodes_cur;
514 rules->trie_nodes_cur++;
515 new_node = &rules->trie_nodes[new_node_idx];
516 memset(new_node, 0x00, sizeof(struct trie_node));
517 new_node->value_off = off;
518 new_node->value_len = len;
519 new_node->key = key;
520
521 /* join the parent's child list */
522 parent = &rules->trie_nodes[node_idx];
523 if (parent->child_idx == 0) {
524 parent->child_idx = new_node_idx;
525 } else {
526 struct trie_node *last_child;
527
528 last_child = &rules->trie_nodes[parent->last_child_idx];
529 last_child->next_child_idx = new_node_idx;
530 }
531 parent->last_child_idx = new_node_idx;
532 return off;
533 }
534
535 static int add_token(struct udev_rules *rules, struct token *token)
536 {
537 /* grow buffer if needed */
538 if (rules->token_cur+1 >= rules->token_max) {
539 struct token *tokens;
540 unsigned int add;
541
542 /* double the buffer size */
543 add = rules->token_max;
544 if (add < 8)
545 add = 8;
546
547 tokens = realloc(rules->tokens, (rules->token_max + add ) * sizeof(struct token));
548 if (tokens == NULL)
549 return -1;
550 dbg(rules->udev, "extend tokens from %u to %u\n", rules->token_max, rules->token_max + add);
551 rules->tokens = tokens;
552 rules->token_max += add;
553 }
554 memcpy(&rules->tokens[rules->token_cur], token, sizeof(struct token));
555 rules->token_cur++;
556 return 0;
557 }
558
559 static uid_t add_uid(struct udev_rules *rules, const char *owner)
560 {
561 unsigned int i;
562 uid_t uid;
563 unsigned int off;
564
565 /* lookup, if we know it already */
566 for (i = 0; i < rules->uids_cur; i++) {
567 off = rules->uids[i].name_off;
568 if (strcmp(&rules->buf[off], owner) == 0) {
569 uid = rules->uids[i].uid;
570 dbg(rules->udev, "return existing %u for '%s'\n", uid, owner);
571 return uid;
572 }
573 }
574 uid = util_lookup_user(rules->udev, owner);
575
576 /* grow buffer if needed */
577 if (rules->uids_cur+1 >= rules->uids_max) {
578 struct uid_gid *uids;
579 unsigned int add;
580
581 /* double the buffer size */
582 add = rules->uids_max;
583 if (add < 1)
584 add = 8;
585
586 uids = realloc(rules->uids, (rules->uids_max + add ) * sizeof(struct uid_gid));
587 if (uids == NULL)
588 return uid;
589 dbg(rules->udev, "extend uids from %u to %u\n", rules->uids_max, rules->uids_max + add);
590 rules->uids = uids;
591 rules->uids_max += add;
592 }
593 rules->uids[rules->uids_cur].uid = uid;
594 off = add_string(rules, owner);
595 if (off <= 0)
596 return uid;
597 rules->uids[rules->uids_cur].name_off = off;
598 rules->uids_cur++;
599 return uid;
600 }
601
602 static gid_t add_gid(struct udev_rules *rules, const char *group)
603 {
604 unsigned int i;
605 gid_t gid;
606 unsigned int off;
607
608 /* lookup, if we know it already */
609 for (i = 0; i < rules->gids_cur; i++) {
610 off = rules->gids[i].name_off;
611 if (strcmp(&rules->buf[off], group) == 0) {
612 gid = rules->gids[i].gid;
613 dbg(rules->udev, "return existing %u for '%s'\n", gid, group);
614 return gid;
615 }
616 }
617 gid = util_lookup_group(rules->udev, group);
618
619 /* grow buffer if needed */
620 if (rules->gids_cur+1 >= rules->gids_max) {
621 struct uid_gid *gids;
622 unsigned int add;
623
624 /* double the buffer size */
625 add = rules->gids_max;
626 if (add < 1)
627 add = 8;
628
629 gids = realloc(rules->gids, (rules->gids_max + add ) * sizeof(struct uid_gid));
630 if (gids == NULL)
631 return gid;
632 dbg(rules->udev, "extend gids from %u to %u\n", rules->gids_max, rules->gids_max + add);
633 rules->gids = gids;
634 rules->gids_max += add;
635 }
636 rules->gids[rules->gids_cur].gid = gid;
637 off = add_string(rules, group);
638 if (off <= 0)
639 return gid;
640 rules->gids[rules->gids_cur].name_off = off;
641 rules->gids_cur++;
642 return gid;
643 }
644
645 static int import_property_from_string(struct udev_device *dev, char *line)
646 {
647 struct udev *udev = udev_device_get_udev(dev);
648 char *key;
649 char *val;
650 size_t len;
651
652 /* find key */
653 key = line;
654 while (isspace(key[0]))
655 key++;
656
657 /* comment or empty line */
658 if (key[0] == '#' || key[0] == '\0')
659 return -1;
660
661 /* split key/value */
662 val = strchr(key, '=');
663 if (val == NULL)
664 return -1;
665 val[0] = '\0';
666 val++;
667
668 /* find value */
669 while (isspace(val[0]))
670 val++;
671
672 /* terminate key */
673 len = strlen(key);
674 if (len == 0)
675 return -1;
676 while (isspace(key[len-1]))
677 len--;
678 key[len] = '\0';
679
680 /* terminate value */
681 len = strlen(val);
682 if (len == 0)
683 return -1;
684 while (isspace(val[len-1]))
685 len--;
686 val[len] = '\0';
687
688 if (len == 0)
689 return -1;
690
691 /* unquote */
692 if (val[0] == '"' || val[0] == '\'') {
693 if (val[len-1] != val[0]) {
694 info(udev, "inconsistent quoting: '%s', skip\n", line);
695 return -1;
696 }
697 val[len-1] = '\0';
698 val++;
699 }
700
701 dbg(udev, "adding '%s'='%s'\n", key, val);
702
703 /* handle device, renamed by external tool, returning new path */
704 if (strcmp(key, "DEVPATH") == 0) {
705 char syspath[UTIL_PATH_SIZE];
706
707 info(udev, "updating devpath from '%s' to '%s'\n",
708 udev_device_get_devpath(dev), val);
709 util_strlcpy(syspath, udev_get_sys_path(udev), sizeof(syspath));
710 util_strlcat(syspath, val, sizeof(syspath));
711 udev_device_set_syspath(dev, syspath);
712 } else {
713 struct udev_list_entry *entry;
714
715 entry = udev_device_add_property(dev, key, val);
716 /* store in db */
717 udev_list_entry_set_flag(entry, 1);
718 }
719 return 0;
720 }
721
722 static int import_file_into_properties(struct udev_device *dev, const char *filename)
723 {
724 FILE *f;
725 char line[UTIL_LINE_SIZE];
726
727 f = fopen(filename, "r");
728 if (f == NULL)
729 return -1;
730 while (fgets(line, sizeof(line), f) != NULL)
731 import_property_from_string(dev, line);
732 fclose(f);
733 return 0;
734 }
735
736 static int import_program_into_properties(struct udev_device *dev, const char *program)
737 {
738 struct udev *udev = udev_device_get_udev(dev);
739 char **envp;
740 char result[4096];
741 size_t reslen;
742 char *line;
743
744 envp = udev_device_get_properties_envp(dev);
745 if (util_run_program(udev, program, envp, result, sizeof(result), &reslen) != 0)
746 return -1;
747
748 line = result;
749 while (line != NULL) {
750 char *pos;
751
752 pos = strchr(line, '\n');
753 if (pos != NULL) {
754 pos[0] = '\0';
755 pos = &pos[1];
756 }
757 import_property_from_string(dev, line);
758 line = pos;
759 }
760 return 0;
761 }
762
763 static int import_parent_into_properties(struct udev_device *dev, const char *filter)
764 {
765 struct udev *udev = udev_device_get_udev(dev);
766 struct udev_device *dev_parent;
767 struct udev_list_entry *list_entry;
768
769 dev_parent = udev_device_get_parent(dev);
770 if (dev_parent == NULL)
771 return -1;
772
773 dbg(udev, "found parent '%s', get the node name\n", udev_device_get_syspath(dev_parent));
774 udev_list_entry_foreach(list_entry, udev_device_get_properties_list_entry(dev_parent)) {
775 const char *key = udev_list_entry_get_name(list_entry);
776 const char *val = udev_list_entry_get_value(list_entry);
777
778 if (fnmatch(filter, key, 0) == 0) {
779 struct udev_list_entry *entry;
780
781 dbg(udev, "import key '%s=%s'\n", key, val);
782 entry = udev_device_add_property(dev, key, val);
783 /* store in db */
784 udev_list_entry_set_flag(entry, 1);
785 }
786 }
787 return 0;
788 }
789
790 #define WAIT_LOOP_PER_SECOND 50
791 static int wait_for_file(struct udev_device *dev, const char *file, int timeout)
792 {
793 struct udev *udev = udev_device_get_udev(dev);
794 char filepath[UTIL_PATH_SIZE];
795 char devicepath[UTIL_PATH_SIZE];
796 struct stat stats;
797 int loop = timeout * WAIT_LOOP_PER_SECOND;
798
799 /* a relative path is a device attribute */
800 devicepath[0] = '\0';
801 if (file[0] != '/') {
802 util_strlcpy(devicepath, udev_get_sys_path(udev), sizeof(devicepath));
803 util_strlcat(devicepath, udev_device_get_devpath(dev), sizeof(devicepath));
804
805 util_strlcpy(filepath, devicepath, sizeof(filepath));
806 util_strlcat(filepath, "/", sizeof(filepath));
807 util_strlcat(filepath, file, sizeof(filepath));
808 file = filepath;
809 }
810
811 dbg(udev, "will wait %i sec for '%s'\n", timeout, file);
812 while (--loop) {
813 /* lookup file */
814 if (stat(file, &stats) == 0) {
815 info(udev, "file '%s' appeared after %i loops\n", file, (timeout * WAIT_LOOP_PER_SECOND) - loop-1);
816 return 0;
817 }
818 /* make sure, the device did not disappear in the meantime */
819 if (devicepath[0] != '\0' && stat(devicepath, &stats) != 0) {
820 info(udev, "device disappeared while waiting for '%s'\n", file);
821 return -2;
822 }
823 info(udev, "wait for '%s' for %i mseconds\n", file, 1000 / WAIT_LOOP_PER_SECOND);
824 usleep(1000 * 1000 / WAIT_LOOP_PER_SECOND);
825 }
826 info(udev, "waiting for '%s' failed\n", file);
827 return -1;
828 }
829
830 static int attr_subst_subdir(char *attr, size_t len)
831 {
832 char *pos;
833 int found = 0;
834
835 pos = strstr(attr, "/*/");
836 if (pos != NULL) {
837 char str[UTIL_PATH_SIZE];
838 DIR *dir;
839
840 pos[1] = '\0';
841 util_strlcpy(str, &pos[2], sizeof(str));
842 dir = opendir(attr);
843 if (dir != NULL) {
844 struct dirent *dent;
845
846 for (dent = readdir(dir); dent != NULL; dent = readdir(dir)) {
847 struct stat stats;
848
849 if (dent->d_name[0] == '.')
850 continue;
851 util_strlcat(attr, dent->d_name, len);
852 util_strlcat(attr, str, len);
853 if (stat(attr, &stats) == 0) {
854 found = 1;
855 break;
856 }
857 pos[1] = '\0';
858 }
859 closedir(dir);
860 }
861 if (!found)
862 util_strlcat(attr, str, len);
863 }
864
865 return found;
866 }
867
868 static int get_key(struct udev *udev, char **line, char **key, enum operation_type *op, char **value)
869 {
870 char *linepos;
871 char *temp;
872
873 linepos = *line;
874 if (linepos == NULL && linepos[0] == '\0')
875 return -1;
876
877 /* skip whitespace */
878 while (isspace(linepos[0]) || linepos[0] == ',')
879 linepos++;
880
881 /* get the key */
882 if (linepos[0] == '\0')
883 return -1;
884 *key = linepos;
885
886 while (1) {
887 linepos++;
888 if (linepos[0] == '\0')
889 return -1;
890 if (isspace(linepos[0]))
891 break;
892 if (linepos[0] == '=')
893 break;
894 if ((linepos[0] == '+') || (linepos[0] == '!') || (linepos[0] == ':'))
895 if (linepos[1] == '=')
896 break;
897 }
898
899 /* remember end of key */
900 temp = linepos;
901
902 /* skip whitespace after key */
903 while (isspace(linepos[0]))
904 linepos++;
905 if (linepos[0] == '\0')
906 return -1;
907
908 /* get operation type */
909 if (linepos[0] == '=' && linepos[1] == '=') {
910 *op = OP_MATCH;
911 linepos += 2;
912 } else if (linepos[0] == '!' && linepos[1] == '=') {
913 *op = OP_NOMATCH;
914 linepos += 2;
915 } else if (linepos[0] == '+' && linepos[1] == '=') {
916 *op = OP_ADD;
917 linepos += 2;
918 } else if (linepos[0] == '=') {
919 *op = OP_ASSIGN;
920 linepos++;
921 } else if (linepos[0] == ':' && linepos[1] == '=') {
922 *op = OP_ASSIGN_FINAL;
923 linepos += 2;
924 } else
925 return -1;
926
927 /* terminate key */
928 temp[0] = '\0';
929
930 /* skip whitespace after operator */
931 while (isspace(linepos[0]))
932 linepos++;
933 if (linepos[0] == '\0')
934 return -1;
935
936 /* get the value */
937 if (linepos[0] == '"')
938 linepos++;
939 else
940 return -1;
941 *value = linepos;
942
943 /* terminate */
944 temp = strchr(linepos, '"');
945 if (!temp)
946 return -1;
947 temp[0] = '\0';
948 temp++;
949 dbg(udev, "%s '%s'-'%s'\n", operation_str(*op), *key, *value);
950
951 /* move line to next key */
952 *line = temp;
953 return 0;
954 }
955
956 /* extract possible KEY{attr} */
957 static char *get_key_attribute(struct udev *udev, char *str)
958 {
959 char *pos;
960 char *attr;
961
962 attr = strchr(str, '{');
963 if (attr != NULL) {
964 attr++;
965 pos = strchr(attr, '}');
966 if (pos == NULL) {
967 err(udev, "missing closing brace for format\n");
968 return NULL;
969 }
970 pos[0] = '\0';
971 dbg(udev, "attribute='%s'\n", attr);
972 return attr;
973 }
974 return NULL;
975 }
976
977 static int rule_add_key(struct rule_tmp *rule_tmp, enum token_type type,
978 enum operation_type op,
979 const char *value, const void *data)
980 {
981 struct token *token = &rule_tmp->token[rule_tmp->token_cur];
982 const char *attr = data;
983 enum string_glob_type glob;
984
985 memset(token, 0x00, sizeof(struct token));
986
987 switch (type) {
988 case TK_M_ACTION:
989 case TK_M_DEVPATH:
990 case TK_M_KERNEL:
991 case TK_M_SUBSYSTEM:
992 case TK_M_DRIVER:
993 case TK_M_WAITFOR:
994 case TK_M_DEVLINK:
995 case TK_M_NAME:
996 case TK_M_KERNELS:
997 case TK_M_SUBSYSTEMS:
998 case TK_M_DRIVERS:
999 case TK_M_PROGRAM:
1000 case TK_M_IMPORT_FILE:
1001 case TK_M_IMPORT_PROG:
1002 case TK_M_IMPORT_PARENT:
1003 case TK_M_RESULT:
1004 case TK_A_OWNER:
1005 case TK_A_GROUP:
1006 case TK_A_MODE:
1007 case TK_A_NAME:
1008 case TK_A_DEVLINK:
1009 case TK_A_GOTO:
1010 token->key.value_off = add_string(rule_tmp->rules, value);
1011 break;
1012 case TK_M_ENV:
1013 case TK_M_ATTR:
1014 case TK_M_ATTRS:
1015 case TK_A_ATTR:
1016 case TK_A_ENV:
1017 token->key.value_off = add_string(rule_tmp->rules, value);
1018 token->key.attr_off = add_string(rule_tmp->rules, attr);
1019 break;
1020 case TK_M_TEST:
1021 token->key.value_off = add_string(rule_tmp->rules, value);
1022 if (data != NULL)
1023 token->key.mode = *(mode_t *)data;
1024 break;
1025 case TK_A_IGNORE_DEVICE:
1026 case TK_A_STRING_ESCAPE_NONE:
1027 case TK_A_STRING_ESCAPE_REPLACE:
1028 case TK_A_IGNORE_REMOVE:
1029 case TK_A_LAST_RULE:
1030 break;
1031 case TK_A_RUN:
1032 token->key.value_off = add_string(rule_tmp->rules, value);
1033 token->key.ignore_error = *(int *)data;
1034 break;
1035 case TK_A_INOTIFY_WATCH:
1036 case TK_A_NUM_FAKE_PART:
1037 case TK_A_DEVLINK_PRIO:
1038 token->key.devlink_prio = *(int *)data;
1039 break;
1040 case TK_A_OWNER_ID:
1041 token->key.uid = *(uid_t *)data;
1042 break;
1043 case TK_A_GROUP_ID:
1044 token->key.gid = *(gid_t *)data;
1045 break;
1046 case TK_A_MODE_ID:
1047 token->key.mode = *(mode_t *)data;
1048 break;
1049 case TK_A_EVENT_TIMEOUT:
1050 token->key.event_timeout = *(int *)data;
1051 break;
1052 case TK_RULE:
1053 case TK_M_PARENTS_MIN:
1054 case TK_M_PARENTS_MAX:
1055 case TK_M_MAX:
1056 case TK_END:
1057 case TK_UNSET:
1058 err(rule_tmp->rules->udev, "wrong type %u\n", type);
1059 return -1;
1060 }
1061
1062 glob = GL_PLAIN;
1063 if (value != NULL) {
1064 if (type < TK_M_MAX) {
1065 /* check if we need to split or call fnmatch() while matching rules */
1066 int has_split;
1067 int has_glob;
1068
1069 has_split = (strchr(value, '|') != NULL);
1070 has_glob = (strchr(value, '*') != NULL || strchr(value, '?') != NULL ||
1071 strchr(value, '[') != NULL || strchr(value, ']') != NULL);
1072 if (has_split && has_glob) {
1073 glob = GL_SPLIT_GLOB;
1074 } else if (has_split) {
1075 glob = GL_SPLIT;
1076 } else if (has_glob) {
1077 if (strcmp(value, "?*") == 0)
1078 glob = GL_SOMETHING;
1079 else
1080 glob = GL_GLOB;
1081 }
1082 } else {
1083 /* check if we need to substitute format strings for matching rules */
1084 if (strchr(value, '%') != NULL || strchr(value, '$') != NULL)
1085 glob = GL_FORMAT;
1086 }
1087 }
1088
1089 token->key.type = type;
1090 token->key.op = op;
1091 token->key.glob = glob;
1092 rule_tmp->token_cur++;
1093 if (rule_tmp->token_cur >= ARRAY_SIZE(rule_tmp->token)) {
1094 err(rule_tmp->rules->udev, "temporary rule array too small\n");
1095 return -1;
1096 }
1097 return 0;
1098 }
1099
1100 static int sort_token(struct udev_rules *rules, struct rule_tmp *rule_tmp)
1101 {
1102 unsigned int i;
1103 unsigned int start = 0;
1104 unsigned int end = rule_tmp->token_cur;
1105
1106 for (i = 0; i < rule_tmp->token_cur; i++) {
1107 enum token_type next_val = TK_UNSET;
1108 unsigned int next_idx;
1109 unsigned int j;
1110
1111 /* find smallest value */
1112 for (j = start; j < end; j++) {
1113 if (rule_tmp->token[j].type == TK_UNSET)
1114 continue;
1115 if (next_val == TK_UNSET || rule_tmp->token[j].type < next_val) {
1116 next_val = rule_tmp->token[j].type;
1117 next_idx = j;
1118 }
1119 }
1120
1121 /* add token and mark done */
1122 if (add_token(rules, &rule_tmp->token[next_idx]) != 0)
1123 return -1;
1124 rule_tmp->token[next_idx].type = TK_UNSET;
1125
1126 /* shrink range */
1127 if (next_idx == start)
1128 start++;
1129 if (next_idx+1 == end)
1130 end--;
1131 }
1132 return 0;
1133 }
1134
1135 static int add_rule(struct udev_rules *rules, char *line,
1136 const char *filename, unsigned int filename_off, unsigned int lineno)
1137 {
1138 char *linepos;
1139 char *attr;
1140 struct rule_tmp rule_tmp;
1141
1142 memset(&rule_tmp, 0x00, sizeof(struct rule_tmp));
1143 rule_tmp.rules = rules;
1144 rule_tmp.rule.type = TK_RULE;
1145 rule_tmp.rule.rule.filename_off = filename_off;
1146 rule_tmp.rule.rule.filename_line = lineno;
1147
1148 linepos = line;
1149 while (1) {
1150 char *key;
1151 char *value;
1152 enum operation_type op;
1153
1154 if (get_key(rules->udev, &linepos, &key, &op, &value) != 0)
1155 break;
1156
1157 if (strcasecmp(key, "ACTION") == 0) {
1158 if (op > OP_MATCH_MAX) {
1159 err(rules->udev, "invalid ACTION operation\n");
1160 goto invalid;
1161 }
1162 rule_add_key(&rule_tmp, TK_M_ACTION, op, value, NULL);
1163 continue;
1164 }
1165
1166 if (strcasecmp(key, "DEVPATH") == 0) {
1167 if (op > OP_MATCH_MAX) {
1168 err(rules->udev, "invalid DEVPATH operation\n");
1169 goto invalid;
1170 }
1171 rule_add_key(&rule_tmp, TK_M_DEVPATH, op, value, NULL);
1172 continue;
1173 }
1174
1175 if (strcasecmp(key, "KERNEL") == 0) {
1176 if (op > OP_MATCH_MAX) {
1177 err(rules->udev, "invalid KERNEL operation\n");
1178 goto invalid;
1179 }
1180 rule_add_key(&rule_tmp, TK_M_KERNEL, op, value, NULL);
1181 continue;
1182 }
1183
1184 if (strcasecmp(key, "SUBSYSTEM") == 0) {
1185 if (op > OP_MATCH_MAX) {
1186 err(rules->udev, "invalid SUBSYSTEM operation\n");
1187 goto invalid;
1188 }
1189 /* bus, class, subsystem events should all be the same */
1190 if (strcmp(value, "subsystem") == 0 ||
1191 strcmp(value, "bus") == 0 ||
1192 strcmp(value, "class") == 0) {
1193 if (strcmp(value, "bus") == 0 || strcmp(value, "class") == 0)
1194 err(rules->udev, "'%s' must be specified as 'subsystem' \n"
1195 "please fix it in %s:%u", value, filename, lineno);
1196 rule_add_key(&rule_tmp, TK_M_SUBSYSTEM, op, "subsystem|class|bus", NULL);
1197 } else
1198 rule_add_key(&rule_tmp, TK_M_SUBSYSTEM, op, value, NULL);
1199 continue;
1200 }
1201
1202 if (strcasecmp(key, "DRIVER") == 0) {
1203 if (op > OP_MATCH_MAX) {
1204 err(rules->udev, "invalid DRIVER operation\n");
1205 goto invalid;
1206 }
1207 rule_add_key(&rule_tmp, TK_M_DRIVER, op, value, NULL);
1208 continue;
1209 }
1210
1211 if (strncasecmp(key, "ATTR{", sizeof("ATTR{")-1) == 0) {
1212 attr = get_key_attribute(rules->udev, key + sizeof("ATTR")-1);
1213 if (attr == NULL) {
1214 err(rules->udev, "error parsing ATTR attribute\n");
1215 goto invalid;
1216 }
1217 if (op < OP_MATCH_MAX) {
1218 rule_add_key(&rule_tmp, TK_M_ATTR, op, value, attr);
1219 } else {
1220 rule_add_key(&rule_tmp, TK_A_ATTR, op, value, attr);
1221 }
1222 continue;
1223 }
1224
1225 if (strcasecmp(key, "KERNELS") == 0 ||
1226 strcasecmp(key, "ID") == 0) {
1227 if (op > OP_MATCH_MAX) {
1228 err(rules->udev, "invalid KERNELS operation\n");
1229 goto invalid;
1230 }
1231 rule_add_key(&rule_tmp, TK_M_KERNELS, op, value, NULL);
1232 continue;
1233 }
1234
1235 if (strcasecmp(key, "SUBSYSTEMS") == 0 ||
1236 strcasecmp(key, "BUS") == 0) {
1237 if (op > OP_MATCH_MAX) {
1238 err(rules->udev, "invalid SUBSYSTEMS operation\n");
1239 goto invalid;
1240 }
1241 rule_add_key(&rule_tmp, TK_M_SUBSYSTEMS, op, value, NULL);
1242 continue;
1243 }
1244
1245 if (strcasecmp(key, "DRIVERS") == 0) {
1246 if (op > OP_MATCH_MAX) {
1247 err(rules->udev, "invalid DRIVERS operation\n");
1248 goto invalid;
1249 }
1250 rule_add_key(&rule_tmp, TK_M_DRIVERS, op, value, NULL);
1251 continue;
1252 }
1253
1254 if (strncasecmp(key, "ATTRS{", sizeof("ATTRS{")-1) == 0 ||
1255 strncasecmp(key, "SYSFS{", sizeof("SYSFS{")-1) == 0) {
1256 if (op > OP_MATCH_MAX) {
1257 err(rules->udev, "invalid ATTRS operation\n");
1258 goto invalid;
1259 }
1260 attr = get_key_attribute(rules->udev, key + sizeof("ATTRS")-1);
1261 if (attr == NULL) {
1262 err(rules->udev, "error parsing ATTRS attribute\n");
1263 goto invalid;
1264 }
1265 if (strncmp(attr, "device/", 7) == 0)
1266 err(rules->udev, "the 'device' link may not be available in a future kernel, "
1267 "please fix it in %s:%u", filename, lineno);
1268 else if (strstr(attr, "../") != NULL)
1269 err(rules->udev, "do not reference parent sysfs directories directly, "
1270 "it may break with a future kernel, please fix it in %s:%u", filename, lineno);
1271 rule_add_key(&rule_tmp, TK_M_ATTRS, op, value, attr);
1272 continue;
1273 }
1274
1275 if (strncasecmp(key, "ENV{", sizeof("ENV{")-1) == 0) {
1276 attr = get_key_attribute(rules->udev, key + sizeof("ENV")-1);
1277 if (attr == NULL) {
1278 err(rules->udev, "error parsing ENV attribute\n");
1279 goto invalid;
1280 }
1281 if (op < OP_MATCH_MAX) {
1282 if (rule_add_key(&rule_tmp, TK_M_ENV, op, value, attr) != 0)
1283 goto invalid;
1284 } else {
1285 if (rule_add_key(&rule_tmp, TK_A_ENV, op, value, attr) != 0)
1286 goto invalid;
1287 }
1288 continue;
1289 }
1290
1291 if (strcasecmp(key, "PROGRAM") == 0) {
1292 rule_add_key(&rule_tmp, TK_M_PROGRAM, op, value, NULL);
1293 continue;
1294 }
1295
1296 if (strcasecmp(key, "RESULT") == 0) {
1297 if (op > OP_MATCH_MAX) {
1298 err(rules->udev, "invalid RESULT operation\n");
1299 goto invalid;
1300 }
1301 rule_add_key(&rule_tmp, TK_M_RESULT, op, value, NULL);
1302 continue;
1303 }
1304
1305 if (strncasecmp(key, "IMPORT", sizeof("IMPORT")-1) == 0) {
1306 attr = get_key_attribute(rules->udev, key + sizeof("IMPORT")-1);
1307 if (attr != NULL && strstr(attr, "program")) {
1308 dbg(rules->udev, "IMPORT will be executed\n");
1309 rule_add_key(&rule_tmp, TK_M_IMPORT_PROG, op, value, NULL);
1310 } else if (attr != NULL && strstr(attr, "file")) {
1311 dbg(rules->udev, "IMPORT will be included as file\n");
1312 rule_add_key(&rule_tmp, TK_M_IMPORT_FILE, op, value, NULL);
1313 } else if (attr != NULL && strstr(attr, "parent")) {
1314 dbg(rules->udev, "IMPORT will include the parent values\n");
1315 rule_add_key(&rule_tmp, TK_M_IMPORT_PARENT, op, value, NULL);
1316 } else {
1317 /* figure it out if it is executable */
1318 char file[UTIL_PATH_SIZE];
1319 char *pos;
1320 struct stat statbuf;
1321
1322 util_strlcpy(file, value, sizeof(file));
1323 pos = strchr(file, ' ');
1324 if (pos)
1325 pos[0] = '\0';
1326
1327 /* allow programs in /lib/udev called without the path */
1328 if (strchr(file, '/') == NULL) {
1329 util_strlcpy(file, UDEV_PREFIX "/lib/udev/", sizeof(file));
1330 util_strlcat(file, value, sizeof(file));
1331 pos = strchr(file, ' ');
1332 if (pos)
1333 pos[0] = '\0';
1334 }
1335
1336 dbg(rules->udev, "IMPORT auto mode for '%s'\n", file);
1337 if (!lstat(file, &statbuf) && (statbuf.st_mode & S_IXUSR)) {
1338 dbg(rules->udev, "IMPORT will be executed (autotype)\n");
1339 rule_add_key(&rule_tmp, TK_M_IMPORT_PROG, op, value, NULL);
1340 } else {
1341 dbg(rules->udev, "IMPORT will be included as file (autotype)\n");
1342 rule_add_key(&rule_tmp, TK_M_IMPORT_FILE, op, value, NULL);
1343 }
1344 }
1345 continue;
1346 }
1347
1348 if (strncasecmp(key, "TEST", sizeof("TEST")-1) == 0) {
1349 mode_t mode = 0;
1350
1351 if (op > OP_MATCH_MAX) {
1352 err(rules->udev, "invalid TEST operation\n");
1353 goto invalid;
1354 }
1355 attr = get_key_attribute(rules->udev, key + sizeof("TEST")-1);
1356 if (attr != NULL) {
1357 mode = strtol(attr, NULL, 8);
1358 rule_add_key(&rule_tmp, TK_M_TEST, op, value, &mode);
1359 } else {
1360 rule_add_key(&rule_tmp, TK_M_TEST, op, value, NULL);
1361 }
1362 continue;
1363 }
1364
1365 if (strncasecmp(key, "RUN", sizeof("RUN")-1) == 0) {
1366 int flag = 0;
1367
1368 attr = get_key_attribute(rules->udev, key + sizeof("RUN")-1);
1369 if (attr != NULL && strstr(attr, "ignore_error"))
1370 flag = 1;
1371 rule_add_key(&rule_tmp, TK_A_RUN, op, value, &flag);
1372 continue;
1373 }
1374
1375 if (strcasecmp(key, "WAIT_FOR") == 0 || strcasecmp(key, "WAIT_FOR_SYSFS") == 0) {
1376 rule_add_key(&rule_tmp, TK_M_WAITFOR, 0, value, NULL);
1377 continue;
1378 }
1379
1380 if (strcasecmp(key, "LABEL") == 0) {
1381 rule_tmp.rule.rule.label_off = add_string(rules, value);
1382 continue;
1383 }
1384
1385 if (strcasecmp(key, "GOTO") == 0) {
1386 rule_add_key(&rule_tmp, TK_A_GOTO, 0, value, NULL);
1387 continue;
1388 }
1389
1390 if (strncasecmp(key, "NAME", sizeof("NAME")-1) == 0) {
1391 if (op < OP_MATCH_MAX) {
1392 rule_add_key(&rule_tmp, TK_M_NAME, op, value, NULL);
1393 } else {
1394 if (value[0] == '\0')
1395 info(rules->udev, "name empty, node creation suppressed\n");
1396 rule_add_key(&rule_tmp, TK_A_NAME, op, value, NULL);
1397 attr = get_key_attribute(rules->udev, key + sizeof("NAME")-1);
1398 if (attr != NULL) {
1399 if (strstr(attr, "all_partitions") != NULL) {
1400 int num = DEFAULT_FAKE_PARTITIONS_COUNT;
1401
1402 dbg(rules->udev, "creation of partition nodes requested\n");
1403 rule_add_key(&rule_tmp, TK_A_NUM_FAKE_PART, 0, NULL, &num);
1404 }
1405 if (strstr(attr, "ignore_remove") != NULL) {
1406 dbg(rules->udev, "remove event should be ignored\n");
1407 rule_add_key(&rule_tmp, TK_A_IGNORE_REMOVE, 0, NULL, NULL);
1408 }
1409 }
1410 }
1411 rule_tmp.rule.rule.flags = 1;
1412 continue;
1413 }
1414
1415 if (strcasecmp(key, "SYMLINK") == 0) {
1416 if (op < OP_MATCH_MAX)
1417 rule_add_key(&rule_tmp, TK_M_DEVLINK, op, value, NULL);
1418 else
1419 rule_add_key(&rule_tmp, TK_A_DEVLINK, op, value, NULL);
1420 rule_tmp.rule.rule.flags = 1;
1421 continue;
1422 }
1423
1424 if (strcasecmp(key, "OWNER") == 0) {
1425 uid_t uid;
1426 char *endptr;
1427
1428 uid = strtoul(value, &endptr, 10);
1429 if (endptr[0] == '\0') {
1430 rule_add_key(&rule_tmp, TK_A_OWNER_ID, op, NULL, &uid);
1431 } else if ((rules->resolve_names > 0) && strchr("$%", value[0]) == NULL) {
1432 uid = add_uid(rules, value);
1433 rule_add_key(&rule_tmp, TK_A_OWNER_ID, op, NULL, &uid);
1434 } else if (rules->resolve_names >= 0) {
1435 rule_add_key(&rule_tmp, TK_A_OWNER, op, value, NULL);
1436 }
1437 rule_tmp.rule.rule.flags = 1;
1438 continue;
1439 }
1440
1441 if (strcasecmp(key, "GROUP") == 0) {
1442 gid_t gid;
1443 char *endptr;
1444
1445 gid = strtoul(value, &endptr, 10);
1446 if (endptr[0] == '\0') {
1447 rule_add_key(&rule_tmp, TK_A_GROUP_ID, op, NULL, &gid);
1448 } else if ((rules->resolve_names > 0) && strchr("$%", value[0]) == NULL) {
1449 gid = add_gid(rules, value);
1450 rule_add_key(&rule_tmp, TK_A_GROUP_ID, op, NULL, &gid);
1451 } else if (rules->resolve_names >= 0) {
1452 rule_add_key(&rule_tmp, TK_A_GROUP, op, value, NULL);
1453 }
1454 rule_tmp.rule.rule.flags = 1;
1455 continue;
1456 }
1457
1458 if (strcasecmp(key, "MODE") == 0) {
1459 mode_t mode;
1460 char *endptr;
1461
1462 mode = strtol(value, &endptr, 8);
1463 if (endptr[0] == '\0')
1464 rule_add_key(&rule_tmp, TK_A_MODE_ID, op, NULL, &mode);
1465 else
1466 rule_add_key(&rule_tmp, TK_A_MODE, op, value, NULL);
1467 rule_tmp.rule.rule.flags = 1;
1468 continue;
1469 }
1470
1471 if (strcasecmp(key, "OPTIONS") == 0) {
1472 const char *pos;
1473
1474 if (strstr(value, "last_rule") != NULL) {
1475 dbg(rules->udev, "last rule to be applied\n");
1476 rule_add_key(&rule_tmp, TK_A_LAST_RULE, 0, NULL, NULL);
1477 }
1478 if (strstr(value, "ignore_device") != NULL) {
1479 dbg(rules->udev, "device should be ignored\n");
1480 rule_add_key(&rule_tmp, TK_A_IGNORE_DEVICE, 0, NULL, NULL);
1481 }
1482 if (strstr(value, "ignore_remove") != NULL) {
1483 dbg(rules->udev, "remove event should be ignored\n");
1484 rule_add_key(&rule_tmp, TK_A_IGNORE_REMOVE, 0, NULL, NULL);
1485 }
1486 pos = strstr(value, "link_priority=");
1487 if (pos != NULL) {
1488 int prio = atoi(&pos[strlen("link_priority=")]);
1489
1490 rule_add_key(&rule_tmp, TK_A_DEVLINK_PRIO, 0, NULL, &prio);
1491 dbg(rules->udev, "link priority=%i\n", prio);
1492 }
1493 pos = strstr(value, "event_timeout=");
1494 if (pos != NULL) {
1495 int tout = atoi(&pos[strlen("event_timeout=")]);
1496
1497 rule_add_key(&rule_tmp, TK_A_EVENT_TIMEOUT, 0, NULL, &tout);
1498 dbg(rules->udev, "event timout=%i\n", tout);
1499 }
1500 pos = strstr(value, "string_escape=");
1501 if (pos != NULL) {
1502 pos = &pos[strlen("string_escape=")];
1503 if (strncmp(pos, "none", strlen("none")) == 0)
1504 rule_add_key(&rule_tmp, TK_A_STRING_ESCAPE_NONE, 0, NULL, NULL);
1505 else if (strncmp(pos, "replace", strlen("replace")) == 0)
1506 rule_add_key(&rule_tmp, TK_A_STRING_ESCAPE_REPLACE, 0, NULL, NULL);
1507 }
1508 if (strstr(value, "all_partitions") != NULL) {
1509 int num = DEFAULT_FAKE_PARTITIONS_COUNT;
1510
1511 rule_add_key(&rule_tmp, TK_A_NUM_FAKE_PART, 0, NULL, &num);
1512 dbg(rules->udev, "creation of partition nodes requested\n");
1513 }
1514 pos = strstr(value, "nowatch");
1515 if (pos != NULL) {
1516 const int off = 0;
1517
1518 rule_add_key(&rule_tmp, TK_A_INOTIFY_WATCH, 0, NULL, &off);
1519 dbg(rules->udev, "inotify watch of device disabled\n");
1520 } else {
1521 pos = strstr(value, "watch");
1522 if (pos != NULL) {
1523 const int on = 1;
1524
1525 rule_add_key(&rule_tmp, TK_A_INOTIFY_WATCH, 0, NULL, &on);
1526 dbg(rules->udev, "inotify watch of device requested\n");
1527 }
1528 }
1529 continue;
1530 }
1531 err(rules->udev, "unknown key '%s' in %s:%u\n", key, filename, lineno);
1532 }
1533
1534 /* add rule token */
1535 rule_tmp.rule.rule.token_count = 1 + rule_tmp.token_cur;
1536 if (add_token(rules, &rule_tmp.rule) != 0)
1537 goto invalid;
1538
1539 /* add tokens to list, sorted by type */
1540 if (sort_token(rules, &rule_tmp) != 0)
1541 goto invalid;
1542
1543 return 0;
1544 invalid:
1545 err(rules->udev, "invalid rule '%s:%u'\n", filename, lineno);
1546 return -1;
1547 }
1548
1549 static int parse_file(struct udev_rules *rules, const char *filename, unsigned short filename_off)
1550 {
1551 FILE *f;
1552 unsigned int first_token;
1553 char line[UTIL_LINE_SIZE];
1554 int line_nr = 0;
1555 unsigned int i;
1556
1557 info(rules->udev, "reading '%s' as rules file\n", filename);
1558
1559 f = fopen(filename, "r");
1560 if (f == NULL)
1561 return -1;
1562
1563 first_token = rules->token_cur;
1564
1565 while(fgets(line, sizeof(line), f) != NULL) {
1566 char *key;
1567 size_t len;
1568
1569 /* skip whitespace */
1570 line_nr++;
1571 key = line;
1572 while (isspace(key[0]))
1573 key++;
1574
1575 /* comment */
1576 if (key[0] == '#')
1577 continue;
1578
1579 len = strlen(line);
1580 if (len < 3)
1581 continue;
1582
1583 /* continue reading if backslash+newline is found */
1584 while (line[len-2] == '\\') {
1585 if (fgets(&line[len-2], (sizeof(line)-len)+2, f) == NULL)
1586 break;
1587 line_nr++;
1588 len = strlen(line);
1589 }
1590
1591 if (len+1 >= sizeof(line)) {
1592 err(rules->udev, "line too long '%s':%u, ignored\n", filename, line_nr);
1593 continue;
1594 }
1595 add_rule(rules, key, filename, filename_off, line_nr);
1596 }
1597 fclose(f);
1598
1599 /* link GOTOs to LABEL rules in this file to be able to fast-forward */
1600 for (i = first_token+1; i < rules->token_cur; i++) {
1601 if (rules->tokens[i].type == TK_A_GOTO) {
1602 char *label = &rules->buf[rules->tokens[i].key.value_off];
1603 unsigned int j;
1604
1605 for (j = i+1; j < rules->token_cur; j++) {
1606 if (rules->tokens[j].type != TK_RULE)
1607 continue;
1608 if (rules->tokens[j].rule.label_off == 0)
1609 continue;
1610 if (strcmp(label, &rules->buf[rules->tokens[j].rule.label_off]) != 0)
1611 continue;
1612 rules->tokens[i].key.rule_goto = j;
1613 break;
1614 }
1615 if (rules->tokens[i].key.rule_goto == 0)
1616 err(rules->udev, "GOTO '%s' has no matching label in: '%s'\n", label, filename);
1617 }
1618 }
1619 return 0;
1620 }
1621
1622 static int add_matching_files(struct udev *udev, struct udev_list_node *file_list, const char *dirname, const char *suffix)
1623 {
1624 DIR *dir;
1625 char filename[UTIL_PATH_SIZE];
1626
1627 dbg(udev, "open directory '%s'\n", dirname);
1628 dir = opendir(dirname);
1629 if (dir == NULL) {
1630 info(udev, "unable to open '%s': %m\n", dirname);
1631 return -1;
1632 }
1633
1634 while (1) {
1635 struct dirent *dent;
1636
1637 dent = readdir(dir);
1638 if (dent == NULL || dent->d_name[0] == '\0')
1639 break;
1640
1641 if (dent->d_name[0] == '.')
1642 continue;
1643
1644 /* look for file matching with specified suffix */
1645 if (suffix != NULL) {
1646 const char *ext;
1647
1648 ext = strrchr(dent->d_name, '.');
1649 if (ext == NULL)
1650 continue;
1651 if (strcmp(ext, suffix) != 0)
1652 continue;
1653 }
1654 dbg(udev, "put file '%s/%s' into list\n", dirname, dent->d_name);
1655
1656 snprintf(filename, sizeof(filename), "%s/%s", dirname, dent->d_name);
1657 filename[sizeof(filename)-1] = '\0';
1658 udev_list_entry_add(udev, file_list, filename, NULL, 1, 1);
1659 }
1660
1661 closedir(dir);
1662 return 0;
1663 }
1664
1665 struct udev_rules *udev_rules_new(struct udev *udev, int resolve_names)
1666 {
1667 struct udev_rules *rules;
1668 struct stat statbuf;
1669 struct udev_list_node file_list;
1670 struct udev_list_entry *file_loop, *file_tmp;
1671 struct token end_token;
1672
1673 rules = malloc(sizeof(struct udev_rules));
1674 if (rules == NULL)
1675 return NULL;
1676 memset(rules, 0x00, sizeof(struct udev_rules));
1677 rules->udev = udev;
1678 rules->resolve_names = resolve_names;
1679 udev_list_init(&file_list);
1680
1681 /* init token array and string buffer */
1682 rules->tokens = malloc(PREALLOC_TOKEN * sizeof(struct token));
1683 if (rules->tokens == NULL)
1684 return NULL;
1685 rules->token_max = PREALLOC_TOKEN;
1686
1687 rules->buf = malloc(PREALLOC_STRBUF);
1688 if (rules->buf == NULL)
1689 return NULL;
1690 rules->buf_max = PREALLOC_STRBUF;
1691 /* offset 0 is always '\0' */
1692 rules->buf[0] = '\0';
1693 rules->buf_cur = 1;
1694 dbg(udev, "prealloc %zu bytes tokens (%u * %zu bytes), %zu bytes buffer\n",
1695 rules->token_max * sizeof(struct token), rules->token_max, sizeof(struct token), rules->buf_max);
1696
1697 rules->trie_nodes = malloc(PREALLOC_TRIE * sizeof(struct trie_node));
1698 if (rules->trie_nodes == NULL)
1699 return NULL;
1700 rules->trie_nodes_max = PREALLOC_TRIE;
1701 /* offset 0 is the trie root, with an empty string */
1702 memset(rules->trie_nodes, 0x00, sizeof(struct trie_node));
1703 rules->trie_nodes_cur = 1;
1704
1705 if (udev_get_rules_path(udev) != NULL) {
1706 /* custom rules location for testing */
1707 add_matching_files(udev, &file_list, udev_get_rules_path(udev), ".rules");
1708 } else {
1709 char filename[PATH_MAX];
1710 struct udev_list_node sort_list;
1711 struct udev_list_entry *sort_loop, *sort_tmp;
1712
1713 /* read user/custom rules */
1714 add_matching_files(udev, &file_list, SYSCONFDIR "/udev/rules.d", ".rules");
1715
1716 /* read dynamic/temporary rules */
1717 util_strlcpy(filename, udev_get_dev_path(udev), sizeof(filename));
1718 util_strlcat(filename, "/.udev/rules.d", sizeof(filename));
1719 if (stat(filename, &statbuf) != 0) {
1720 util_create_path(udev, filename);
1721 udev_selinux_setfscreatecon(udev, filename, S_IFDIR|0755);
1722 mkdir(filename, 0755);
1723 udev_selinux_resetfscreatecon(udev);
1724 }
1725 udev_list_init(&sort_list);
1726 add_matching_files(udev, &sort_list, filename, ".rules");
1727
1728 /* read default rules */
1729 add_matching_files(udev, &sort_list, UDEV_PREFIX "/lib/udev/rules.d", ".rules");
1730
1731 /* sort all rules files by basename into list of files */
1732 udev_list_entry_foreach_safe(sort_loop, sort_tmp, udev_list_get_entry(&sort_list)) {
1733 const char *sort_name = udev_list_entry_get_name(sort_loop);
1734 const char *sort_base = strrchr(sort_name, '/');
1735
1736 if (sort_base == NULL)
1737 continue;
1738 /* sort entry into existing list */
1739 udev_list_entry_foreach_safe(file_loop, file_tmp, udev_list_get_entry(&file_list)) {
1740 const char *file_name = udev_list_entry_get_name(file_loop);
1741 const char *file_base = strrchr(file_name, '/');
1742
1743 if (file_base == NULL)
1744 continue;
1745 if (strcmp(file_base, sort_base) == 0) {
1746 info(udev, "rule file basename '%s' already added, ignoring '%s'\n",
1747 file_name, sort_name);
1748 udev_list_entry_delete(sort_loop);
1749 sort_loop = NULL;
1750 break;
1751 }
1752 if (strcmp(file_base, sort_base) > 0) {
1753 /* found later file, insert before */
1754 udev_list_entry_remove(sort_loop);
1755 udev_list_entry_insert_before(sort_loop, file_loop);
1756 sort_loop = NULL;
1757 break;
1758 }
1759 }
1760 /* current file already handled */
1761 if (sort_loop == NULL)
1762 continue;
1763 /* no later file, append to end of list */
1764 udev_list_entry_remove(sort_loop);
1765 udev_list_entry_append(sort_loop, &file_list);
1766 }
1767 }
1768
1769 /* add all filenames to the string buffer */
1770 udev_list_entry_foreach(file_loop, udev_list_get_entry(&file_list)) {
1771 const char *filename = udev_list_entry_get_name(file_loop);
1772 unsigned int filename_off;
1773
1774 filename_off = add_string(rules, filename);
1775 /* the offset in the rule is limited to unsigned short */
1776 if (filename_off < USHRT_MAX)
1777 udev_list_entry_set_flag(file_loop, filename_off);
1778 }
1779
1780 /* parse list of files */
1781 udev_list_entry_foreach_safe(file_loop, file_tmp, udev_list_get_entry(&file_list)) {
1782 const char *filename = udev_list_entry_get_name(file_loop);
1783 unsigned int filename_off = udev_list_entry_get_flag(file_loop);
1784
1785 if (stat(filename, &statbuf) == 0 && statbuf.st_size > 0)
1786 parse_file(rules, filename, filename_off);
1787 else
1788 info(udev, "can not read '%s'\n", filename);
1789 udev_list_entry_delete(file_loop);
1790 }
1791
1792 memset(&end_token, 0x00, sizeof(struct token));
1793 end_token.type = TK_END;
1794 add_token(rules, &end_token);
1795
1796 /* shrink allocated token and string buffer */
1797 if (rules->token_cur < rules->token_max) {
1798 struct token *tokens;
1799
1800 tokens = realloc(rules->tokens, rules->token_cur * sizeof(struct token));
1801 if (tokens != NULL || rules->token_cur == 0) {
1802 rules->tokens = tokens;
1803 rules->token_max = rules->token_cur;
1804 }
1805 }
1806 if (rules->buf_cur < rules->buf_max) {
1807 char *buf;
1808
1809 buf = realloc(rules->buf, rules->buf_cur);
1810 if (buf != NULL || rules->buf_cur == 0) {
1811 rules->buf = buf;
1812 rules->buf_max = rules->buf_cur;
1813 }
1814 }
1815 info(udev, "rules use %zu bytes tokens (%u * %zu bytes), %zu bytes buffer\n",
1816 rules->token_max * sizeof(struct token), rules->token_max, sizeof(struct token), rules->buf_max);
1817 info(udev, "temporary index used %zu bytes (%u * %zu bytes)\n",
1818 rules->trie_nodes_cur * sizeof(struct trie_node),
1819 rules->trie_nodes_cur, sizeof(struct trie_node));
1820
1821 /* cleanup trie */
1822 free(rules->trie_nodes);
1823 rules->trie_nodes = NULL;
1824 rules->trie_nodes_cur = 0;
1825 rules->trie_nodes_max = 0;
1826
1827 /* cleanup uid/gid cache */
1828 free(rules->uids);
1829 rules->uids = NULL;
1830 rules->uids_cur = 0;
1831 rules->uids_max = 0;
1832 free(rules->gids);
1833 rules->gids = NULL;
1834 rules->gids_cur = 0;
1835 rules->gids_max = 0;
1836
1837 dump_rules(rules);
1838 return rules;
1839 }
1840
1841 void udev_rules_unref(struct udev_rules *rules)
1842 {
1843 if (rules == NULL)
1844 return;
1845 free(rules->tokens);
1846 free(rules->buf);
1847 free(rules->trie_nodes);
1848 free(rules->uids);
1849 free(rules->gids);
1850 free(rules);
1851 }
1852
1853 static int match_key(struct udev_rules *rules, struct token *token, const char *val)
1854 {
1855 char *key_value = &rules->buf[token->key.value_off];
1856 char *pos;
1857 int match = 0;
1858
1859 if (val == NULL)
1860 val = "";
1861
1862 switch (token->key.glob) {
1863 case GL_PLAIN:
1864 match = (strcmp(key_value, val) == 0);
1865 break;
1866 case GL_GLOB:
1867 match = (fnmatch(key_value, val, 0) == 0);
1868 break;
1869 case GL_SPLIT:
1870 {
1871 const char *split;
1872 size_t len;
1873
1874 split = &rules->buf[token->key.value_off];
1875 len = strlen(val);
1876 while (1) {
1877 const char *next;
1878
1879 next = strchr(split, '|');
1880 if (next != NULL) {
1881 size_t matchlen = (size_t)(next - split);
1882
1883 match = (matchlen == len && strncmp(split, val, matchlen) == 0);
1884 if (match)
1885 break;
1886 } else {
1887 match = (strcmp(split, val) == 0);
1888 break;
1889 }
1890 split = &next[1];
1891 }
1892 break;
1893 }
1894 case GL_SPLIT_GLOB:
1895 {
1896 char value[UTIL_PATH_SIZE];
1897
1898 util_strlcpy(value, &rules->buf[token->key.value_off], sizeof(value));
1899 key_value = value;
1900 while (key_value != NULL) {
1901 pos = strchr(key_value, '|');
1902 if (pos != NULL) {
1903 pos[0] = '\0';
1904 pos = &pos[1];
1905 }
1906 dbg(rules->udev, "match %s '%s' <-> '%s'\n", token_str(token->type), key_value, val);
1907 match = (fnmatch(key_value, val, 0) == 0);
1908 if (match)
1909 break;
1910 key_value = pos;
1911 }
1912 break;
1913 }
1914 case GL_SOMETHING:
1915 match = (val[0] != '\0');
1916 break;
1917 case GL_FORMAT:
1918 case GL_UNSET:
1919 return -1;
1920 }
1921
1922 if (match && (token->key.op == OP_MATCH)) {
1923 dbg(rules->udev, "%s is true (matching value)\n", token_str(token->type));
1924 return 0;
1925 }
1926 if (!match && (token->key.op == OP_NOMATCH)) {
1927 dbg(rules->udev, "%s is true (non-matching value)\n", token_str(token->type));
1928 return 0;
1929 }
1930 dbg(rules->udev, "%s is not true\n", token_str(token->type));
1931 return -1;
1932 }
1933
1934 static int match_attr(struct udev_rules *rules, struct udev_device *dev, struct udev_event *event, struct token *cur)
1935 {
1936 const char *key_name = &rules->buf[cur->key.attr_off];
1937 const char *key_value = &rules->buf[cur->key.value_off];
1938 char value[UTIL_NAME_SIZE];
1939 size_t len;
1940
1941 value[0] = '\0';
1942 if (key_name[0] == '[') {
1943 char attr[UTIL_PATH_SIZE];
1944
1945 util_strlcpy(attr, key_name, sizeof(attr));
1946 util_resolve_subsys_kernel(event->udev, attr, value, sizeof(value), 1);
1947 }
1948 if (value[0] == '\0') {
1949 const char *val;
1950
1951 val = udev_device_get_sysattr_value(dev, key_name);
1952 if (val == NULL)
1953 return -1;
1954 util_strlcpy(value, val, sizeof(value));
1955 }
1956
1957 /* strip trailing whitespace of value, if not asked to match for it */
1958 len = strlen(key_value);
1959 if (len > 0 && !isspace(key_value[len-1])) {
1960 len = strlen(value);
1961 while (len > 0 && isspace(value[--len]))
1962 value[len] = '\0';
1963 dbg(rules->udev, "removed trailing whitespace from '%s'\n", value);
1964 }
1965 return match_key(rules, cur, value);
1966 }
1967
1968 enum escape_type {
1969 ESCAPE_UNSET,
1970 ESCAPE_NONE,
1971 ESCAPE_REPLACE,
1972 };
1973
1974 int udev_rules_apply_to_event(struct udev_rules *rules, struct udev_event *event)
1975 {
1976 struct token *cur;
1977 struct token *rule;
1978 enum escape_type esc = ESCAPE_UNSET;
1979 int can_set_name;
1980
1981 if (rules->tokens == NULL)
1982 return -1;
1983
1984 can_set_name = ((strcmp(udev_device_get_action(event->dev), "add") == 0 ||
1985 strcmp(udev_device_get_action(event->dev), "change") == 0) &&
1986 (major(udev_device_get_devnum(event->dev)) > 0 ||
1987 strcmp(udev_device_get_subsystem(event->dev), "net") == 0));
1988
1989 /* loop through token list, match, run actions or forward to next rule */
1990 cur = &rules->tokens[0];
1991 rule = cur;
1992 while (1) {
1993 dump_token(rules, cur);
1994 switch (cur->type) {
1995 case TK_RULE:
1996 /* current rule */
1997 rule = cur;
1998 /* possibly skip rules which want to set NAME, SYMLINK, OWNER, GROUP, MODE */
1999 if (!can_set_name && rule->rule.flags)
2000 goto nomatch;
2001 esc = ESCAPE_UNSET;
2002 break;
2003 case TK_M_ACTION:
2004 if (match_key(rules, cur, udev_device_get_action(event->dev)) != 0)
2005 goto nomatch;
2006 break;
2007 case TK_M_DEVPATH:
2008 if (match_key(rules, cur, udev_device_get_devpath(event->dev)) != 0)
2009 goto nomatch;
2010 break;
2011 case TK_M_KERNEL:
2012 if (match_key(rules, cur, udev_device_get_sysname(event->dev)) != 0)
2013 goto nomatch;
2014 break;
2015 case TK_M_DEVLINK:
2016 {
2017 size_t devlen = strlen(udev_get_dev_path(event->udev))+1;
2018 struct udev_list_entry *list_entry;
2019 int match = 0;
2020
2021 udev_list_entry_foreach(list_entry, udev_device_get_devlinks_list_entry(event->dev)) {
2022 const char *devlink;
2023
2024 devlink = &udev_list_entry_get_name(list_entry)[devlen];
2025 if (match_key(rules, cur, devlink) == 0) {
2026 match = 1;
2027 break;
2028 }
2029 }
2030 if (!match)
2031 goto nomatch;
2032 break;
2033 }
2034 case TK_M_NAME:
2035 if (match_key(rules, cur, event->name) != 0)
2036 goto nomatch;
2037 break;
2038 case TK_M_ENV:
2039 {
2040 const char *key_name = &rules->buf[cur->key.attr_off];
2041 const char *value;
2042
2043 value = udev_device_get_property_value(event->dev, key_name);
2044 if (value == NULL) {
2045 dbg(event->udev, "ENV{%s} is not set, treat as empty\n", key_name);
2046 value = "";
2047 }
2048 if (match_key(rules, cur, value))
2049 goto nomatch;
2050 break;
2051 }
2052 case TK_M_SUBSYSTEM:
2053 if (match_key(rules, cur, udev_device_get_subsystem(event->dev)) != 0)
2054 goto nomatch;
2055 break;
2056 case TK_M_DRIVER:
2057 if (match_key(rules, cur, udev_device_get_driver(event->dev)) != 0)
2058 goto nomatch;
2059 break;
2060 case TK_M_WAITFOR:
2061 {
2062 char filename[UTIL_PATH_SIZE];
2063 int found;
2064
2065 util_strlcpy(filename, &rules->buf[cur->key.value_off], sizeof(filename));
2066 udev_event_apply_format(event, filename, sizeof(filename));
2067 found = (wait_for_file(event->dev, filename, 10) == 0);
2068 if (!found && (cur->key.op != OP_NOMATCH))
2069 goto nomatch;
2070 break;
2071 }
2072 case TK_M_ATTR:
2073 if (match_attr(rules, event->dev, event, cur) != 0)
2074 goto nomatch;
2075 break;
2076 case TK_M_KERNELS:
2077 case TK_M_SUBSYSTEMS:
2078 case TK_M_DRIVERS:
2079 case TK_M_ATTRS:
2080 {
2081 struct token *next;
2082
2083 /* get whole sequence of parent matches */
2084 next = cur;
2085 while (next->type > TK_M_PARENTS_MIN && next->type < TK_M_PARENTS_MAX)
2086 next++;
2087
2088 /* loop over parents */
2089 event->dev_parent = event->dev;
2090 while (1) {
2091 struct token *key;
2092
2093 dbg(event->udev, "parent: '%s'\n", udev_device_get_syspath(event->dev_parent));
2094 /* loop over sequence of parent match keys */
2095 for (key = cur; key < next; key++ ) {
2096 dump_token(rules, key);
2097 switch(key->type) {
2098 case TK_M_KERNELS:
2099 if (match_key(rules, key, udev_device_get_sysname(event->dev_parent)) != 0)
2100 goto try_parent;
2101 break;
2102 case TK_M_SUBSYSTEMS:
2103 if (match_key(rules, key, udev_device_get_subsystem(event->dev_parent)) != 0)
2104 goto try_parent;
2105 break;
2106 case TK_M_DRIVERS:
2107 if (match_key(rules, key, udev_device_get_driver(event->dev_parent)) != 0)
2108 goto try_parent;
2109 break;
2110 case TK_M_ATTRS:
2111 if (match_attr(rules, event->dev_parent, event, key) != 0)
2112 goto try_parent;
2113 break;
2114 default:
2115 goto nomatch;
2116 }
2117 dbg(event->udev, "parent key matched\n");
2118 }
2119 dbg(event->udev, "all parent keys matched\n");
2120 /* all keys matched */
2121 break;
2122
2123 try_parent:
2124 event->dev_parent = udev_device_get_parent(event->dev_parent);
2125 if (event->dev_parent == NULL)
2126 goto nomatch;
2127 }
2128 /* move behind our sequence of parent match keys */
2129 cur = next;
2130 continue;
2131 }
2132 case TK_M_TEST:
2133 {
2134 char filename[UTIL_PATH_SIZE];
2135 struct stat statbuf;
2136 int match;
2137
2138 util_strlcpy(filename, &rules->buf[cur->key.value_off], sizeof(filename));
2139 udev_event_apply_format(event, filename, sizeof(filename));
2140 if (util_resolve_subsys_kernel(event->udev, NULL, filename, sizeof(filename), 0) != 0)
2141 if (filename[0] != '/') {
2142 char tmp[UTIL_PATH_SIZE];
2143
2144 util_strlcpy(tmp, udev_device_get_syspath(event->dev), sizeof(tmp));
2145 util_strlcat(tmp, "/", sizeof(tmp));
2146 util_strlcat(tmp, filename, sizeof(tmp));
2147 util_strlcpy(filename, tmp, sizeof(filename));
2148 }
2149
2150 attr_subst_subdir(filename, sizeof(filename));
2151
2152 match = (stat(filename, &statbuf) == 0);
2153 dbg(event->udev, "'%s' %s", filename, match ? "exists\n" : "does not exist\n");
2154 if (match && cur->key.mode > 0) {
2155 match = ((statbuf.st_mode & cur->key.mode) > 0);
2156 dbg(event->udev, "'%s' has mode=%#o and %s %#o\n", filename, statbuf.st_mode,
2157 match ? "matches" : "does not match", cur->key.mode);
2158 }
2159 if (match && cur->key.op == OP_NOMATCH)
2160 goto nomatch;
2161 if (!match && cur->key.op == OP_MATCH)
2162 goto nomatch;
2163 break;
2164 }
2165 case TK_M_PROGRAM:
2166 {
2167 char program[UTIL_PATH_SIZE];
2168 char **envp;
2169 char result[UTIL_PATH_SIZE];
2170
2171 free(event->program_result);
2172 event->program_result = NULL;
2173 util_strlcpy(program, &rules->buf[cur->key.value_off], sizeof(program));
2174 udev_event_apply_format(event, program, sizeof(program));
2175 envp = udev_device_get_properties_envp(event->dev);
2176 info(event->udev, "PROGRAM '%s' %s:%u\n",
2177 program,
2178 &rules->buf[rule->rule.filename_off],
2179 rule->rule.filename_line);
2180 if (util_run_program(event->udev, program, envp, result, sizeof(result), NULL) != 0) {
2181 if (cur->key.op != OP_NOMATCH)
2182 goto nomatch;
2183 } else {
2184 int count;
2185
2186 util_remove_trailing_chars(result, '\n');
2187 if (esc == ESCAPE_UNSET || esc == ESCAPE_REPLACE) {
2188 count = udev_util_replace_chars(result, UDEV_ALLOWED_CHARS_INPUT);
2189 if (count > 0)
2190 info(event->udev, "%i character(s) replaced\n" , count);
2191 }
2192 event->program_result = strdup(result);
2193 dbg(event->udev, "storing result '%s'\n", event->program_result);
2194 if (cur->key.op == OP_NOMATCH)
2195 goto nomatch;
2196 }
2197 break;
2198 }
2199 case TK_M_IMPORT_FILE:
2200 {
2201 char import[UTIL_PATH_SIZE];
2202
2203 util_strlcpy(import, &rules->buf[cur->key.value_off], sizeof(import));
2204 udev_event_apply_format(event, import, sizeof(import));
2205 if (import_file_into_properties(event->dev, import) != 0)
2206 if (cur->key.op != OP_NOMATCH)
2207 goto nomatch;
2208 break;
2209 }
2210 case TK_M_IMPORT_PROG:
2211 {
2212 char import[UTIL_PATH_SIZE];
2213
2214 util_strlcpy(import, &rules->buf[cur->key.value_off], sizeof(import));
2215 udev_event_apply_format(event, import, sizeof(import));
2216 info(event->udev, "IMPORT '%s' %s:%u\n",
2217 import,
2218 &rules->buf[rule->rule.filename_off],
2219 rule->rule.filename_line);
2220 if (import_program_into_properties(event->dev, import) != 0)
2221 if (cur->key.op != OP_NOMATCH)
2222 goto nomatch;
2223 break;
2224 }
2225 case TK_M_IMPORT_PARENT:
2226 {
2227 char import[UTIL_PATH_SIZE];
2228
2229 util_strlcpy(import, &rules->buf[cur->key.value_off], sizeof(import));
2230 udev_event_apply_format(event, import, sizeof(import));
2231 if (import_parent_into_properties(event->dev, import) != 0)
2232 if (cur->key.op != OP_NOMATCH)
2233 goto nomatch;
2234 break;
2235 }
2236 case TK_M_RESULT:
2237 if (match_key(rules, cur, event->program_result) != 0)
2238 goto nomatch;
2239 break;
2240
2241 case TK_A_IGNORE_DEVICE:
2242 event->ignore_device = 1;
2243 return 0;
2244 break;
2245 case TK_A_STRING_ESCAPE_NONE:
2246 esc = ESCAPE_NONE;
2247 break;
2248 case TK_A_STRING_ESCAPE_REPLACE:
2249 esc = ESCAPE_REPLACE;
2250 break;
2251 case TK_A_NUM_FAKE_PART:
2252 if (strcmp(udev_device_get_subsystem(event->dev), "block") != 0)
2253 break;
2254 if (udev_device_get_sysnum(event->dev) != NULL)
2255 break;
2256 udev_device_set_num_fake_partitions(event->dev, cur->key.num_fake_part);
2257 break;
2258 case TK_A_INOTIFY_WATCH:
2259 event->inotify_watch = cur->key.watch;
2260 break;
2261 case TK_A_DEVLINK_PRIO:
2262 udev_device_set_devlink_priority(event->dev, cur->key.devlink_prio);
2263 break;
2264 case TK_A_OWNER:
2265 {
2266 char owner[UTIL_NAME_SIZE];
2267
2268 if (event->owner_final)
2269 break;
2270 if (cur->key.op == OP_ASSIGN_FINAL)
2271 event->owner_final = 1;
2272 util_strlcpy(owner, &rules->buf[cur->key.value_off], sizeof(owner));
2273 udev_event_apply_format(event, owner, sizeof(owner));
2274 event->uid = util_lookup_user(event->udev, owner);
2275 info(event->udev, "OWNER %u %s:%u\n",
2276 event->uid,
2277 &rules->buf[rule->rule.filename_off],
2278 rule->rule.filename_line);
2279 break;
2280 }
2281 case TK_A_GROUP:
2282 {
2283 char group[UTIL_NAME_SIZE];
2284
2285 if (event->group_final)
2286 break;
2287 if (cur->key.op == OP_ASSIGN_FINAL)
2288 event->group_final = 1;
2289 util_strlcpy(group, &rules->buf[cur->key.value_off], sizeof(group));
2290 udev_event_apply_format(event, group, sizeof(group));
2291 event->gid = util_lookup_group(event->udev, group);
2292 info(event->udev, "GROUP %u %s:%u\n",
2293 event->gid,
2294 &rules->buf[rule->rule.filename_off],
2295 rule->rule.filename_line);
2296 break;
2297 }
2298 case TK_A_MODE:
2299 {
2300 char mode[UTIL_NAME_SIZE];
2301 char *endptr;
2302
2303 if (event->mode_final)
2304 break;
2305 if (cur->key.op == OP_ASSIGN_FINAL)
2306 event->mode_final = 1;
2307 util_strlcpy(mode, &rules->buf[cur->key.value_off], sizeof(mode));
2308 udev_event_apply_format(event, mode, sizeof(mode));
2309 event->mode = strtol(mode, &endptr, 8);
2310 if (endptr[0] != '\0') {
2311 err(event->udev, "invalide mode '%s' set default mode 0660\n", mode);
2312 event->mode = 0660;
2313 }
2314 info(event->udev, "MODE %#o %s:%u\n",
2315 event->mode,
2316 &rules->buf[rule->rule.filename_off],
2317 rule->rule.filename_line);
2318 break;
2319 }
2320 case TK_A_OWNER_ID:
2321 if (event->owner_final)
2322 break;
2323 if (cur->key.op == OP_ASSIGN_FINAL)
2324 event->owner_final = 1;
2325 event->uid = cur->key.uid;
2326 info(event->udev, "OWNER %u %s:%u\n",
2327 event->uid,
2328 &rules->buf[rule->rule.filename_off],
2329 rule->rule.filename_line);
2330 break;
2331 case TK_A_GROUP_ID:
2332 if (event->group_final)
2333 break;
2334 if (cur->key.op == OP_ASSIGN_FINAL)
2335 event->group_final = 1;
2336 event->gid = cur->key.gid;
2337 info(event->udev, "GROUP %u %s:%u\n",
2338 event->gid,
2339 &rules->buf[rule->rule.filename_off],
2340 rule->rule.filename_line);
2341 break;
2342 case TK_A_MODE_ID:
2343 if (event->mode_final)
2344 break;
2345 if (cur->key.op == OP_ASSIGN_FINAL)
2346 event->mode_final = 1;
2347 event->mode = cur->key.mode;
2348 info(event->udev, "MODE %#o %s:%u\n",
2349 event->mode,
2350 &rules->buf[rule->rule.filename_off],
2351 rule->rule.filename_line);
2352 break;
2353 case TK_A_ENV:
2354 {
2355 const char *name = &rules->buf[cur->key.attr_off];
2356 char *value = &rules->buf[cur->key.value_off];
2357
2358 if (value[0] != '\0') {
2359 char temp_value[UTIL_NAME_SIZE];
2360 struct udev_list_entry *entry;
2361
2362 util_strlcpy(temp_value, value, sizeof(temp_value));
2363 udev_event_apply_format(event, temp_value, sizeof(temp_value));
2364 entry = udev_device_add_property(event->dev, name, temp_value);
2365 /* store in db */
2366 udev_list_entry_set_flag(entry, 1);
2367 } else {
2368 udev_device_add_property(event->dev, name, NULL);
2369 }
2370 break;
2371 }
2372 case TK_A_NAME:
2373 {
2374 const char *name = &rules->buf[cur->key.value_off];
2375 char name_str[UTIL_PATH_SIZE];
2376 int count;
2377
2378 if (event->name_final)
2379 break;
2380 if (cur->key.op == OP_ASSIGN_FINAL)
2381 event->name_final = 1;
2382 util_strlcpy(name_str, name, sizeof(name_str));
2383 udev_event_apply_format(event, name_str, sizeof(name_str));
2384 if (esc == ESCAPE_UNSET || esc == ESCAPE_REPLACE) {
2385 count = udev_util_replace_chars(name_str, "/");
2386 if (count > 0)
2387 info(event->udev, "%i character(s) replaced\n", count);
2388 }
2389 free(event->name);
2390 event->name = strdup(name_str);
2391 info(event->udev, "NAME '%s' %s:%u\n",
2392 event->name,
2393 &rules->buf[rule->rule.filename_off],
2394 rule->rule.filename_line);
2395 break;
2396 }
2397 case TK_A_DEVLINK:
2398 {
2399 char temp[UTIL_PATH_SIZE];
2400 char filename[UTIL_PATH_SIZE];
2401 char *pos, *next;
2402 int count = 0;
2403
2404 if (event->devlink_final)
2405 break;
2406 if (major(udev_device_get_devnum(event->dev)) == 0)
2407 break;
2408 if (cur->key.op == OP_ASSIGN_FINAL)
2409 event->devlink_final = 1;
2410 if (cur->key.op == OP_ASSIGN || cur->key.op == OP_ASSIGN_FINAL)
2411 udev_device_cleanup_devlinks_list(event->dev);
2412
2413 /* allow multiple symlinks separated by spaces */
2414 util_strlcpy(temp, &rules->buf[cur->key.value_off], sizeof(temp));
2415 udev_event_apply_format(event, temp, sizeof(temp));
2416 if (esc == ESCAPE_UNSET)
2417 count = udev_util_replace_chars(temp, "/ ");
2418 else if (esc == ESCAPE_REPLACE)
2419 count = udev_util_replace_chars(temp, "/");
2420 if (count > 0)
2421 info(event->udev, "%i character(s) replaced\n" , count);
2422 dbg(event->udev, "rule applied, added symlink(s) '%s'\n", temp);
2423 pos = temp;
2424 while (isspace(pos[0]))
2425 pos++;
2426 next = strchr(pos, ' ');
2427 while (next) {
2428 next[0] = '\0';
2429 info(event->udev, "LINK '%s' %s:%u\n",
2430 pos,
2431 &rules->buf[rule->rule.filename_off],
2432 rule->rule.filename_line);
2433 util_strlcpy(filename, udev_get_dev_path(event->udev), sizeof(filename));
2434 util_strlcat(filename, "/", sizeof(filename));
2435 util_strlcat(filename, pos, sizeof(filename));
2436 udev_device_add_devlink(event->dev, filename);
2437 while (isspace(next[1]))
2438 next++;
2439 pos = &next[1];
2440 next = strchr(pos, ' ');
2441 }
2442 if (pos[0] != '\0') {
2443 info(event->udev, "LINK '%s' %s:%u\n",
2444 pos,
2445 &rules->buf[rule->rule.filename_off],
2446 rule->rule.filename_line);
2447 util_strlcpy(filename, udev_get_dev_path(event->udev), sizeof(filename));
2448 util_strlcat(filename, "/", sizeof(filename));
2449 util_strlcat(filename, pos, sizeof(filename));
2450 udev_device_add_devlink(event->dev, filename);
2451 }
2452 }
2453 break;
2454 case TK_A_EVENT_TIMEOUT:
2455 udev_device_set_event_timeout(event->dev, cur->key.event_timeout);
2456 break;
2457 case TK_A_IGNORE_REMOVE:
2458 udev_device_set_ignore_remove(event->dev, 1);
2459 break;
2460 case TK_A_ATTR:
2461 {
2462 const char *key_name = &rules->buf[cur->key.attr_off];
2463 char attr[UTIL_PATH_SIZE];
2464 char value[UTIL_NAME_SIZE];
2465 FILE *f;
2466
2467 util_strlcpy(attr, key_name, sizeof(attr));
2468 if (util_resolve_subsys_kernel(event->udev, key_name, attr, sizeof(attr), 0) != 0) {
2469 util_strlcpy(attr, udev_device_get_syspath(event->dev), sizeof(attr));
2470 util_strlcat(attr, "/", sizeof(attr));
2471 util_strlcat(attr, key_name, sizeof(attr));
2472 }
2473
2474 attr_subst_subdir(attr, sizeof(attr));
2475
2476 util_strlcpy(value, &rules->buf[cur->key.value_off], sizeof(value));
2477 udev_event_apply_format(event, value, sizeof(value));
2478 info(event->udev, "ATTR '%s' writing '%s' %s:%u\n", attr, value,
2479 &rules->buf[rule->rule.filename_off],
2480 rule->rule.filename_line);
2481 f = fopen(attr, "w");
2482 if (f != NULL) {
2483 if (fprintf(f, "%s", value) <= 0)
2484 err(event->udev, "error writing ATTR{%s}: %m\n", attr);
2485 fclose(f);
2486 } else {
2487 err(event->udev, "error opening ATTR{%s} for writing: %m\n", attr);
2488 }
2489 break;
2490 }
2491 case TK_A_RUN:
2492 {
2493 struct udev_list_entry *list_entry;
2494
2495 if (cur->key.op == OP_ASSIGN || cur->key.op == OP_ASSIGN_FINAL)
2496 udev_list_cleanup_entries(event->udev, &event->run_list);
2497 info(event->udev, "RUN '%s' %s:%u\n",
2498 &rules->buf[cur->key.value_off],
2499 &rules->buf[rule->rule.filename_off],
2500 rule->rule.filename_line);
2501 list_entry = udev_list_entry_add(event->udev, &event->run_list,
2502 &rules->buf[cur->key.value_off], NULL, 1, 0);
2503 if (cur->key.ignore_error)
2504 udev_list_entry_set_flag(list_entry, 1);
2505 break;
2506 }
2507 case TK_A_GOTO:
2508 if (cur->key.rule_goto == 0)
2509 break;
2510 cur = &rules->tokens[cur->key.rule_goto];
2511 continue;
2512 case TK_A_LAST_RULE:
2513 case TK_END:
2514 return 0;
2515
2516 case TK_M_PARENTS_MIN:
2517 case TK_M_PARENTS_MAX:
2518 case TK_M_MAX:
2519 case TK_UNSET:
2520 err(rules->udev, "wrong type %u\n", cur->type);
2521 goto nomatch;
2522 }
2523
2524 cur++;
2525 continue;
2526 nomatch:
2527 /* fast-forward to next rule */
2528 cur = rule + rule->rule.token_count;
2529 dbg(rules->udev, "forward to rule: %u\n",
2530 (unsigned int) (cur - rules->tokens));
2531 }
2532 }