chiark / gitweb /
Add initialization helper for file_handle_union
[elogind.git] / src / libudev / libudev-monitor.c
1 /***
2   This file is part of systemd.
3
4   Copyright 2008-2012 Kay Sievers <kay@vrfy.org>
5
6   systemd is free software; you can redistribute it and/or modify it
7   under the terms of the GNU Lesser General Public License as published by
8   the Free Software Foundation; either version 2.1 of the License, or
9   (at your option) any later version.
10
11   systemd is distributed in the hope that it will be useful, but
12   WITHOUT ANY WARRANTY; without even the implied warranty of
13   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14   Lesser General Public License for more details.
15
16   You should have received a copy of the GNU Lesser General Public License
17   along with systemd; If not, see <http://www.gnu.org/licenses/>.
18 ***/
19
20 #include <stdio.h>
21 #include <stdlib.h>
22 #include <stddef.h>
23 #include <unistd.h>
24 #include <errno.h>
25 #include <string.h>
26 #include <dirent.h>
27 #include <sys/poll.h>
28 #include <sys/stat.h>
29 #include <sys/socket.h>
30 #include <sys/un.h>
31 #include <arpa/inet.h>
32 #include <linux/netlink.h>
33 #include <linux/filter.h>
34
35 #include "libudev.h"
36 #include "libudev-private.h"
37 #include "socket-util.h"
38 #include "missing.h"
39
40 /**
41  * SECTION:libudev-monitor
42  * @short_description: device event source
43  *
44  * Connects to a device event source.
45  */
46
47 /**
48  * udev_monitor:
49  *
50  * Opaque object handling an event source.
51  */
52 struct udev_monitor {
53         struct udev *udev;
54         int refcount;
55         int sock;
56         union sockaddr_union snl;
57         union sockaddr_union snl_trusted_sender;
58         union sockaddr_union snl_destination;
59         socklen_t addrlen;
60         struct udev_list filter_subsystem_list;
61         struct udev_list filter_tag_list;
62         bool bound;
63 };
64
65 enum udev_monitor_netlink_group {
66         UDEV_MONITOR_NONE,
67         UDEV_MONITOR_KERNEL,
68         UDEV_MONITOR_UDEV,
69 };
70
71 #define UDEV_MONITOR_MAGIC                0xfeedcafe
72 struct udev_monitor_netlink_header {
73         /* "libudev" prefix to distinguish libudev and kernel messages */
74         char prefix[8];
75         /*
76          * magic to protect against daemon <-> library message format mismatch
77          * used in the kernel from socket filter rules; needs to be stored in network order
78          */
79         unsigned int magic;
80         /* total length of header structure known to the sender */
81         unsigned int header_size;
82         /* properties string buffer */
83         unsigned int properties_off;
84         unsigned int properties_len;
85         /*
86          * hashes of primary device properties strings, to let libudev subscribers
87          * use in-kernel socket filters; values need to be stored in network order
88          */
89         unsigned int filter_subsystem_hash;
90         unsigned int filter_devtype_hash;
91         unsigned int filter_tag_bloom_hi;
92         unsigned int filter_tag_bloom_lo;
93 };
94
95 static struct udev_monitor *udev_monitor_new(struct udev *udev)
96 {
97         struct udev_monitor *udev_monitor;
98
99         udev_monitor = new0(struct udev_monitor, 1);
100         if (udev_monitor == NULL)
101                 return NULL;
102         udev_monitor->refcount = 1;
103         udev_monitor->udev = udev;
104         udev_list_init(udev, &udev_monitor->filter_subsystem_list, false);
105         udev_list_init(udev, &udev_monitor->filter_tag_list, true);
106         return udev_monitor;
107 }
108
109 /* we consider udev running when /dev is on devtmpfs */
110 static bool udev_has_devtmpfs(struct udev *udev) {
111
112         union file_handle_union h = FILE_HANDLE_INIT;
113         _cleanup_fclose_ FILE *f = NULL;
114         char line[LINE_MAX], *e;
115         int mount_id;
116         int r;
117
118         r = name_to_handle_at(AT_FDCWD, "/dev", &h.handle, &mount_id, 0);
119         if (r < 0) {
120                 if (errno != EOPNOTSUPP)
121                         log_debug_errno(errno, "name_to_handle_at on /dev: %m");
122                 return false;
123         }
124
125         f = fopen("/proc/self/mountinfo", "re");
126         if (!f)
127                 return false;
128
129         FOREACH_LINE(line, f, return false) {
130                 int mid;
131
132                 if (sscanf(line, "%i", &mid) != 1)
133                         continue;
134
135                 if (mid != mount_id)
136                         continue;
137
138                 e = strstr(line, " - ");
139                 if (!e)
140                         continue;
141
142                 /* accept any name that starts with the currently expected type */
143                 if (startswith(e + 3, "devtmpfs"))
144                         return true;
145         }
146
147         return false;
148 }
149
150 struct udev_monitor *udev_monitor_new_from_netlink_fd(struct udev *udev, const char *name, int fd)
151 {
152         struct udev_monitor *udev_monitor;
153         unsigned int group;
154
155         if (udev == NULL)
156                 return NULL;
157
158         if (name == NULL)
159                 group = UDEV_MONITOR_NONE;
160         else if (streq(name, "udev")) {
161                 /*
162                  * We do not support subscribing to uevents if no instance of
163                  * udev is running. Uevents would otherwise broadcast the
164                  * processing data of the host into containers, which is not
165                  * desired.
166                  *
167                  * Containers will currently not get any udev uevents, until
168                  * a supporting infrastructure is available.
169                  *
170                  * We do not set a netlink multicast group here, so the socket
171                  * will not receive any messages.
172                  */
173                 if (access("/run/udev/control", F_OK) < 0 && !udev_has_devtmpfs(udev)) {
174                         log_debug("the udev service seems not to be active, disable the monitor");
175                         group = UDEV_MONITOR_NONE;
176                 } else
177                         group = UDEV_MONITOR_UDEV;
178         } else if (streq(name, "kernel"))
179                 group = UDEV_MONITOR_KERNEL;
180         else
181                 return NULL;
182
183         udev_monitor = udev_monitor_new(udev);
184         if (udev_monitor == NULL)
185                 return NULL;
186
187         if (fd < 0) {
188                 udev_monitor->sock = socket(PF_NETLINK, SOCK_RAW|SOCK_CLOEXEC|SOCK_NONBLOCK, NETLINK_KOBJECT_UEVENT);
189                 if (udev_monitor->sock == -1) {
190                         log_debug_errno(errno, "error getting socket: %m");
191                         free(udev_monitor);
192                         return NULL;
193                 }
194         } else {
195                 udev_monitor->bound = true;
196                 udev_monitor->sock = fd;
197         }
198
199         udev_monitor->snl.nl.nl_family = AF_NETLINK;
200         udev_monitor->snl.nl.nl_groups = group;
201
202         /* default destination for sending */
203         udev_monitor->snl_destination.nl.nl_family = AF_NETLINK;
204         udev_monitor->snl_destination.nl.nl_groups = UDEV_MONITOR_UDEV;
205
206         return udev_monitor;
207 }
208
209 /**
210  * udev_monitor_new_from_netlink:
211  * @udev: udev library context
212  * @name: name of event source
213  *
214  * Create new udev monitor and connect to a specified event
215  * source. Valid sources identifiers are "udev" and "kernel".
216  *
217  * Applications should usually not connect directly to the
218  * "kernel" events, because the devices might not be useable
219  * at that time, before udev has configured them, and created
220  * device nodes. Accessing devices at the same time as udev,
221  * might result in unpredictable behavior. The "udev" events
222  * are sent out after udev has finished its event processing,
223  * all rules have been processed, and needed device nodes are
224  * created.
225  *
226  * The initial refcount is 1, and needs to be decremented to
227  * release the resources of the udev monitor.
228  *
229  * Returns: a new udev monitor, or #NULL, in case of an error
230  **/
231 _public_ struct udev_monitor *udev_monitor_new_from_netlink(struct udev *udev, const char *name)
232 {
233         return udev_monitor_new_from_netlink_fd(udev, name, -1);
234 }
235
236 static inline void bpf_stmt(struct sock_filter *inss, unsigned int *i,
237                             unsigned short code, unsigned int data)
238 {
239         struct sock_filter *ins = &inss[*i];
240
241         ins->code = code;
242         ins->k = data;
243         (*i)++;
244 }
245
246 static inline void bpf_jmp(struct sock_filter *inss, unsigned int *i,
247                            unsigned short code, unsigned int data,
248                            unsigned short jt, unsigned short jf)
249 {
250         struct sock_filter *ins = &inss[*i];
251
252         ins->code = code;
253         ins->jt = jt;
254         ins->jf = jf;
255         ins->k = data;
256         (*i)++;
257 }
258
259 /**
260  * udev_monitor_filter_update:
261  * @udev_monitor: monitor
262  *
263  * Update the installed socket filter. This is only needed,
264  * if the filter was removed or changed.
265  *
266  * Returns: 0 on success, otherwise a negative error value.
267  */
268 _public_ int udev_monitor_filter_update(struct udev_monitor *udev_monitor)
269 {
270         struct sock_filter ins[512];
271         struct sock_fprog filter;
272         unsigned int i;
273         struct udev_list_entry *list_entry;
274         int err;
275
276         if (udev_list_get_entry(&udev_monitor->filter_subsystem_list) == NULL &&
277             udev_list_get_entry(&udev_monitor->filter_tag_list) == NULL)
278                 return 0;
279
280         memzero(ins, sizeof(ins));
281         i = 0;
282
283         /* load magic in A */
284         bpf_stmt(ins, &i, BPF_LD|BPF_W|BPF_ABS, offsetof(struct udev_monitor_netlink_header, magic));
285         /* jump if magic matches */
286         bpf_jmp(ins, &i, BPF_JMP|BPF_JEQ|BPF_K, UDEV_MONITOR_MAGIC, 1, 0);
287         /* wrong magic, pass packet */
288         bpf_stmt(ins, &i, BPF_RET|BPF_K, 0xffffffff);
289
290         if (udev_list_get_entry(&udev_monitor->filter_tag_list) != NULL) {
291                 int tag_matches;
292
293                 /* count tag matches, to calculate end of tag match block */
294                 tag_matches = 0;
295                 udev_list_entry_foreach(list_entry, udev_list_get_entry(&udev_monitor->filter_tag_list))
296                         tag_matches++;
297
298                 /* add all tags matches */
299                 udev_list_entry_foreach(list_entry, udev_list_get_entry(&udev_monitor->filter_tag_list)) {
300                         uint64_t tag_bloom_bits = util_string_bloom64(udev_list_entry_get_name(list_entry));
301                         uint32_t tag_bloom_hi = tag_bloom_bits >> 32;
302                         uint32_t tag_bloom_lo = tag_bloom_bits & 0xffffffff;
303
304                         /* load device bloom bits in A */
305                         bpf_stmt(ins, &i, BPF_LD|BPF_W|BPF_ABS, offsetof(struct udev_monitor_netlink_header, filter_tag_bloom_hi));
306                         /* clear bits (tag bits & bloom bits) */
307                         bpf_stmt(ins, &i, BPF_ALU|BPF_AND|BPF_K, tag_bloom_hi);
308                         /* jump to next tag if it does not match */
309                         bpf_jmp(ins, &i, BPF_JMP|BPF_JEQ|BPF_K, tag_bloom_hi, 0, 3);
310
311                         /* load device bloom bits in A */
312                         bpf_stmt(ins, &i, BPF_LD|BPF_W|BPF_ABS, offsetof(struct udev_monitor_netlink_header, filter_tag_bloom_lo));
313                         /* clear bits (tag bits & bloom bits) */
314                         bpf_stmt(ins, &i, BPF_ALU|BPF_AND|BPF_K, tag_bloom_lo);
315                         /* jump behind end of tag match block if tag matches */
316                         tag_matches--;
317                         bpf_jmp(ins, &i, BPF_JMP|BPF_JEQ|BPF_K, tag_bloom_lo, 1 + (tag_matches * 6), 0);
318                 }
319
320                 /* nothing matched, drop packet */
321                 bpf_stmt(ins, &i, BPF_RET|BPF_K, 0);
322         }
323
324         /* add all subsystem matches */
325         if (udev_list_get_entry(&udev_monitor->filter_subsystem_list) != NULL) {
326                 udev_list_entry_foreach(list_entry, udev_list_get_entry(&udev_monitor->filter_subsystem_list)) {
327                         unsigned int hash = util_string_hash32(udev_list_entry_get_name(list_entry));
328
329                         /* load device subsystem value in A */
330                         bpf_stmt(ins, &i, BPF_LD|BPF_W|BPF_ABS, offsetof(struct udev_monitor_netlink_header, filter_subsystem_hash));
331                         if (udev_list_entry_get_value(list_entry) == NULL) {
332                                 /* jump if subsystem does not match */
333                                 bpf_jmp(ins, &i, BPF_JMP|BPF_JEQ|BPF_K, hash, 0, 1);
334                         } else {
335                                 /* jump if subsystem does not match */
336                                 bpf_jmp(ins, &i, BPF_JMP|BPF_JEQ|BPF_K, hash, 0, 3);
337
338                                 /* load device devtype value in A */
339                                 bpf_stmt(ins, &i, BPF_LD|BPF_W|BPF_ABS, offsetof(struct udev_monitor_netlink_header, filter_devtype_hash));
340                                 /* jump if value does not match */
341                                 hash = util_string_hash32(udev_list_entry_get_value(list_entry));
342                                 bpf_jmp(ins, &i, BPF_JMP|BPF_JEQ|BPF_K, hash, 0, 1);
343                         }
344
345                         /* matched, pass packet */
346                         bpf_stmt(ins, &i, BPF_RET|BPF_K, 0xffffffff);
347
348                         if (i+1 >= ELEMENTSOF(ins))
349                                 return -E2BIG;
350                 }
351
352                 /* nothing matched, drop packet */
353                 bpf_stmt(ins, &i, BPF_RET|BPF_K, 0);
354         }
355
356         /* matched, pass packet */
357         bpf_stmt(ins, &i, BPF_RET|BPF_K, 0xffffffff);
358
359         /* install filter */
360         memzero(&filter, sizeof(filter));
361         filter.len = i;
362         filter.filter = ins;
363         err = setsockopt(udev_monitor->sock, SOL_SOCKET, SO_ATTACH_FILTER, &filter, sizeof(filter));
364         return err < 0 ? -errno : 0;
365 }
366
367 int udev_monitor_allow_unicast_sender(struct udev_monitor *udev_monitor, struct udev_monitor *sender)
368 {
369         udev_monitor->snl_trusted_sender.nl.nl_pid = sender->snl.nl.nl_pid;
370         return 0;
371 }
372 /**
373  * udev_monitor_enable_receiving:
374  * @udev_monitor: the monitor which should receive events
375  *
376  * Binds the @udev_monitor socket to the event source.
377  *
378  * Returns: 0 on success, otherwise a negative error value.
379  */
380 _public_ int udev_monitor_enable_receiving(struct udev_monitor *udev_monitor)
381 {
382         int err = 0;
383         const int on = 1;
384
385         udev_monitor_filter_update(udev_monitor);
386
387         if (!udev_monitor->bound) {
388                 err = bind(udev_monitor->sock,
389                            &udev_monitor->snl.sa, sizeof(struct sockaddr_nl));
390                 if (err == 0)
391                         udev_monitor->bound = true;
392         }
393
394         if (err >= 0) {
395                 union sockaddr_union snl;
396                 socklen_t addrlen;
397
398                 /*
399                  * get the address the kernel has assigned us
400                  * it is usually, but not necessarily the pid
401                  */
402                 addrlen = sizeof(struct sockaddr_nl);
403                 err = getsockname(udev_monitor->sock, &snl.sa, &addrlen);
404                 if (err == 0)
405                         udev_monitor->snl.nl.nl_pid = snl.nl.nl_pid;
406         } else {
407                 log_debug_errno(errno, "bind failed: %m");
408                 return -errno;
409         }
410
411         /* enable receiving of sender credentials */
412         err = setsockopt(udev_monitor->sock, SOL_SOCKET, SO_PASSCRED, &on, sizeof(on));
413         if (err < 0)
414                 log_debug_errno(errno, "setting SO_PASSCRED failed: %m");
415
416         return 0;
417 }
418
419 /**
420  * udev_monitor_set_receive_buffer_size:
421  * @udev_monitor: the monitor which should receive events
422  * @size: the size in bytes
423  *
424  * Set the size of the kernel socket buffer. This call needs the
425  * appropriate privileges to succeed.
426  *
427  * Returns: 0 on success, otherwise -1 on error.
428  */
429 _public_ int udev_monitor_set_receive_buffer_size(struct udev_monitor *udev_monitor, int size)
430 {
431         if (udev_monitor == NULL)
432                 return -EINVAL;
433         return setsockopt(udev_monitor->sock, SOL_SOCKET, SO_RCVBUFFORCE, &size, sizeof(size));
434 }
435
436 int udev_monitor_disconnect(struct udev_monitor *udev_monitor)
437 {
438         int err;
439
440         err = close(udev_monitor->sock);
441         udev_monitor->sock = -1;
442         return err < 0 ? -errno : 0;
443 }
444
445 /**
446  * udev_monitor_ref:
447  * @udev_monitor: udev monitor
448  *
449  * Take a reference of a udev monitor.
450  *
451  * Returns: the passed udev monitor
452  **/
453 _public_ struct udev_monitor *udev_monitor_ref(struct udev_monitor *udev_monitor)
454 {
455         if (udev_monitor == NULL)
456                 return NULL;
457         udev_monitor->refcount++;
458         return udev_monitor;
459 }
460
461 /**
462  * udev_monitor_unref:
463  * @udev_monitor: udev monitor
464  *
465  * Drop a reference of a udev monitor. If the refcount reaches zero,
466  * the bound socket will be closed, and the resources of the monitor
467  * will be released.
468  *
469  * Returns: #NULL
470  **/
471 _public_ struct udev_monitor *udev_monitor_unref(struct udev_monitor *udev_monitor)
472 {
473         if (udev_monitor == NULL)
474                 return NULL;
475         udev_monitor->refcount--;
476         if (udev_monitor->refcount > 0)
477                 return NULL;
478         if (udev_monitor->sock >= 0)
479                 close(udev_monitor->sock);
480         udev_list_cleanup(&udev_monitor->filter_subsystem_list);
481         udev_list_cleanup(&udev_monitor->filter_tag_list);
482         free(udev_monitor);
483         return NULL;
484 }
485
486 /**
487  * udev_monitor_get_udev:
488  * @udev_monitor: udev monitor
489  *
490  * Retrieve the udev library context the monitor was created with.
491  *
492  * Returns: the udev library context
493  **/
494 _public_ struct udev *udev_monitor_get_udev(struct udev_monitor *udev_monitor)
495 {
496         if (udev_monitor == NULL)
497                 return NULL;
498         return udev_monitor->udev;
499 }
500
501 /**
502  * udev_monitor_get_fd:
503  * @udev_monitor: udev monitor
504  *
505  * Retrieve the socket file descriptor associated with the monitor.
506  *
507  * Returns: the socket file descriptor
508  **/
509 _public_ int udev_monitor_get_fd(struct udev_monitor *udev_monitor)
510 {
511         if (udev_monitor == NULL)
512                 return -EINVAL;
513         return udev_monitor->sock;
514 }
515
516 static int passes_filter(struct udev_monitor *udev_monitor, struct udev_device *udev_device)
517 {
518         struct udev_list_entry *list_entry;
519
520         if (udev_list_get_entry(&udev_monitor->filter_subsystem_list) == NULL)
521                 goto tag;
522         udev_list_entry_foreach(list_entry, udev_list_get_entry(&udev_monitor->filter_subsystem_list)) {
523                 const char *subsys = udev_list_entry_get_name(list_entry);
524                 const char *dsubsys = udev_device_get_subsystem(udev_device);
525                 const char *devtype;
526                 const char *ddevtype;
527
528                 if (!streq(dsubsys, subsys))
529                         continue;
530
531                 devtype = udev_list_entry_get_value(list_entry);
532                 if (devtype == NULL)
533                         goto tag;
534                 ddevtype = udev_device_get_devtype(udev_device);
535                 if (ddevtype == NULL)
536                         continue;
537                 if (streq(ddevtype, devtype))
538                         goto tag;
539         }
540         return 0;
541
542 tag:
543         if (udev_list_get_entry(&udev_monitor->filter_tag_list) == NULL)
544                 return 1;
545         udev_list_entry_foreach(list_entry, udev_list_get_entry(&udev_monitor->filter_tag_list)) {
546                 const char *tag = udev_list_entry_get_name(list_entry);
547
548                 if (udev_device_has_tag(udev_device, tag))
549                         return 1;
550         }
551         return 0;
552 }
553
554 /**
555  * udev_monitor_receive_device:
556  * @udev_monitor: udev monitor
557  *
558  * Receive data from the udev monitor socket, allocate a new udev
559  * device, fill in the received data, and return the device.
560  *
561  * Only socket connections with uid=0 are accepted.
562  *
563  * The monitor socket is by default set to NONBLOCK. A variant of poll() on
564  * the file descriptor returned by udev_monitor_get_fd() should to be used to
565  * wake up when new devices arrive, or alternatively the file descriptor
566  * switched into blocking mode.
567  *
568  * The initial refcount is 1, and needs to be decremented to
569  * release the resources of the udev device.
570  *
571  * Returns: a new udev device, or #NULL, in case of an error
572  **/
573 _public_ struct udev_device *udev_monitor_receive_device(struct udev_monitor *udev_monitor)
574 {
575         struct udev_device *udev_device;
576         struct msghdr smsg;
577         struct iovec iov;
578         char cred_msg[CMSG_SPACE(sizeof(struct ucred))];
579         struct cmsghdr *cmsg;
580         union sockaddr_union snl;
581         struct ucred *cred;
582         union {
583                 struct udev_monitor_netlink_header nlh;
584                 char raw[8192];
585         } buf;
586         ssize_t buflen;
587         ssize_t bufpos;
588
589 retry:
590         if (udev_monitor == NULL)
591                 return NULL;
592         iov.iov_base = &buf;
593         iov.iov_len = sizeof(buf);
594         memzero(&smsg, sizeof(struct msghdr));
595         smsg.msg_iov = &iov;
596         smsg.msg_iovlen = 1;
597         smsg.msg_control = cred_msg;
598         smsg.msg_controllen = sizeof(cred_msg);
599         smsg.msg_name = &snl;
600         smsg.msg_namelen = sizeof(snl);
601
602         buflen = recvmsg(udev_monitor->sock, &smsg, 0);
603         if (buflen < 0) {
604                 if (errno != EINTR)
605                         log_debug("unable to receive message");
606                 return NULL;
607         }
608
609         if (buflen < 32 || (smsg.msg_flags & MSG_TRUNC)) {
610                 log_debug("invalid message length");
611                 return NULL;
612         }
613
614         if (snl.nl.nl_groups == 0) {
615                 /* unicast message, check if we trust the sender */
616                 if (udev_monitor->snl_trusted_sender.nl.nl_pid == 0 ||
617                     snl.nl.nl_pid != udev_monitor->snl_trusted_sender.nl.nl_pid) {
618                         log_debug("unicast netlink message ignored");
619                         return NULL;
620                 }
621         } else if (snl.nl.nl_groups == UDEV_MONITOR_KERNEL) {
622                 if (snl.nl.nl_pid > 0) {
623                         log_debug("multicast kernel netlink message from pid %d ignored",
624                              snl.nl.nl_pid);
625                         return NULL;
626                 }
627         }
628
629         cmsg = CMSG_FIRSTHDR(&smsg);
630         if (cmsg == NULL || cmsg->cmsg_type != SCM_CREDENTIALS) {
631                 log_debug("no sender credentials received, message ignored");
632                 return NULL;
633         }
634
635         cred = (struct ucred *)CMSG_DATA(cmsg);
636         if (cred->uid != 0) {
637                 log_debug("sender uid=%d, message ignored", cred->uid);
638                 return NULL;
639         }
640
641         udev_device = udev_device_new(udev_monitor->udev);
642         if (udev_device == NULL)
643                 return NULL;
644
645         if (memcmp(buf.raw, "libudev", 8) == 0) {
646                 /* udev message needs proper version magic */
647                 if (buf.nlh.magic != htonl(UDEV_MONITOR_MAGIC)) {
648                         log_debug("unrecognized message signature (%x != %x)",
649                                  buf.nlh.magic, htonl(UDEV_MONITOR_MAGIC));
650                         udev_device_unref(udev_device);
651                         return NULL;
652                 }
653                 if (buf.nlh.properties_off+32 > (size_t)buflen) {
654                         udev_device_unref(udev_device);
655                         return NULL;
656                 }
657
658                 bufpos = buf.nlh.properties_off;
659
660                 /* devices received from udev are always initialized */
661                 udev_device_set_is_initialized(udev_device);
662         } else {
663                 /* kernel message with header */
664                 bufpos = strlen(buf.raw) + 1;
665                 if ((size_t)bufpos < sizeof("a@/d") || bufpos >= buflen) {
666                         log_debug("invalid message length");
667                         udev_device_unref(udev_device);
668                         return NULL;
669                 }
670
671                 /* check message header */
672                 if (strstr(buf.raw, "@/") == NULL) {
673                         log_debug("unrecognized message header");
674                         udev_device_unref(udev_device);
675                         return NULL;
676                 }
677         }
678
679         udev_device_set_info_loaded(udev_device);
680
681         while (bufpos < buflen) {
682                 char *key;
683                 size_t keylen;
684
685                 key = &buf.raw[bufpos];
686                 keylen = strlen(key);
687                 if (keylen == 0)
688                         break;
689                 bufpos += keylen + 1;
690                 udev_device_add_property_from_string_parse(udev_device, key);
691         }
692
693         if (udev_device_add_property_from_string_parse_finish(udev_device) < 0) {
694                 log_debug("missing values, invalid device");
695                 udev_device_unref(udev_device);
696                 return NULL;
697         }
698
699         /* skip device, if it does not pass the current filter */
700         if (!passes_filter(udev_monitor, udev_device)) {
701                 struct pollfd pfd[1];
702                 int rc;
703
704                 udev_device_unref(udev_device);
705
706                 /* if something is queued, get next device */
707                 pfd[0].fd = udev_monitor->sock;
708                 pfd[0].events = POLLIN;
709                 rc = poll(pfd, 1, 0);
710                 if (rc > 0)
711                         goto retry;
712                 return NULL;
713         }
714
715         return udev_device;
716 }
717
718 int udev_monitor_send_device(struct udev_monitor *udev_monitor,
719                              struct udev_monitor *destination, struct udev_device *udev_device)
720 {
721         const char *buf;
722         ssize_t blen;
723         ssize_t count;
724         struct msghdr smsg;
725         struct iovec iov[2];
726         const char *val;
727         struct udev_monitor_netlink_header nlh;
728         struct udev_list_entry *list_entry;
729         uint64_t tag_bloom_bits;
730
731         blen = udev_device_get_properties_monitor_buf(udev_device, &buf);
732         if (blen < 32)
733                 return -EINVAL;
734
735         /* add versioned header */
736         memzero(&nlh, sizeof(struct udev_monitor_netlink_header));
737         memcpy(nlh.prefix, "libudev", 8);
738         nlh.magic = htonl(UDEV_MONITOR_MAGIC);
739         nlh.header_size = sizeof(struct udev_monitor_netlink_header);
740         val = udev_device_get_subsystem(udev_device);
741         nlh.filter_subsystem_hash = htonl(util_string_hash32(val));
742         val = udev_device_get_devtype(udev_device);
743         if (val != NULL)
744                 nlh.filter_devtype_hash = htonl(util_string_hash32(val));
745         iov[0].iov_base = &nlh;
746         iov[0].iov_len = sizeof(struct udev_monitor_netlink_header);
747
748         /* add tag bloom filter */
749         tag_bloom_bits = 0;
750         udev_list_entry_foreach(list_entry, udev_device_get_tags_list_entry(udev_device))
751                 tag_bloom_bits |= util_string_bloom64(udev_list_entry_get_name(list_entry));
752         if (tag_bloom_bits > 0) {
753                 nlh.filter_tag_bloom_hi = htonl(tag_bloom_bits >> 32);
754                 nlh.filter_tag_bloom_lo = htonl(tag_bloom_bits & 0xffffffff);
755         }
756
757         /* add properties list */
758         nlh.properties_off = iov[0].iov_len;
759         nlh.properties_len = blen;
760         iov[1].iov_base = (char *)buf;
761         iov[1].iov_len = blen;
762
763         memzero(&smsg, sizeof(struct msghdr));
764         smsg.msg_iov = iov;
765         smsg.msg_iovlen = 2;
766         /*
767          * Use custom address for target, or the default one.
768          *
769          * If we send to a multicast group, we will get
770          * ECONNREFUSED, which is expected.
771          */
772         if (destination != NULL)
773                 smsg.msg_name = &destination->snl;
774         else
775                 smsg.msg_name = &udev_monitor->snl_destination;
776         smsg.msg_namelen = sizeof(struct sockaddr_nl);
777         count = sendmsg(udev_monitor->sock, &smsg, 0);
778         log_debug("passed %zi bytes to netlink monitor %p", count, udev_monitor);
779         return count;
780 }
781
782 /**
783  * udev_monitor_filter_add_match_subsystem_devtype:
784  * @udev_monitor: the monitor
785  * @subsystem: the subsystem value to match the incoming devices against
786  * @devtype: the devtype value to match the incoming devices against
787  *
788  * This filter is efficiently executed inside the kernel, and libudev subscribers
789  * will usually not be woken up for devices which do not match.
790  *
791  * The filter must be installed before the monitor is switched to listening mode.
792  *
793  * Returns: 0 on success, otherwise a negative error value.
794  */
795 _public_ int udev_monitor_filter_add_match_subsystem_devtype(struct udev_monitor *udev_monitor, const char *subsystem, const char *devtype)
796 {
797         if (udev_monitor == NULL)
798                 return -EINVAL;
799         if (subsystem == NULL)
800                 return -EINVAL;
801         if (udev_list_entry_add(&udev_monitor->filter_subsystem_list, subsystem, devtype) == NULL)
802                 return -ENOMEM;
803         return 0;
804 }
805
806 /**
807  * udev_monitor_filter_add_match_tag:
808  * @udev_monitor: the monitor
809  * @tag: the name of a tag
810  *
811  * This filter is efficiently executed inside the kernel, and libudev subscribers
812  * will usually not be woken up for devices which do not match.
813  *
814  * The filter must be installed before the monitor is switched to listening mode.
815  *
816  * Returns: 0 on success, otherwise a negative error value.
817  */
818 _public_ int udev_monitor_filter_add_match_tag(struct udev_monitor *udev_monitor, const char *tag)
819 {
820         if (udev_monitor == NULL)
821                 return -EINVAL;
822         if (tag == NULL)
823                 return -EINVAL;
824         if (udev_list_entry_add(&udev_monitor->filter_tag_list, tag, NULL) == NULL)
825                 return -ENOMEM;
826         return 0;
827 }
828
829 /**
830  * udev_monitor_filter_remove:
831  * @udev_monitor: monitor
832  *
833  * Remove all filters from monitor.
834  *
835  * Returns: 0 on success, otherwise a negative error value.
836  */
837 _public_ int udev_monitor_filter_remove(struct udev_monitor *udev_monitor)
838 {
839         static struct sock_fprog filter = { 0, NULL };
840
841         udev_list_cleanup(&udev_monitor->filter_subsystem_list);
842         return setsockopt(udev_monitor->sock, SOL_SOCKET, SO_ATTACH_FILTER, &filter, sizeof(filter));
843 }