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