13 #include <linux/limits.h>
14 #include <linux/auto_fs4.h>
16 #include <libubox/uloop.h>
17 #include <libubox/vlist.h>
18 #include <libubox/ulog.h>
19 #include <libubox/avl-cmp.h>
22 #include "libfstools/libfstools.h"
24 #define AUTOFS_MOUNT_PATH "/tmp/run/blockd/"
25 #define AUTOFS_TIMEOUT 30
26 #define AUTOFS_EXPIRE_TIMER (5 * 1000)
28 struct hotplug_context
{
29 struct uloop_process process
;
34 struct vlist_node node
;
35 struct blob_attr
*msg
;
42 static struct uloop_fd fd_autofs_read
;
43 static int fd_autofs_write
= 0;
44 static struct ubus_auto_conn conn
;
45 struct blob_buf bb
= { 0 };
60 static const struct blobmsg_policy mount_policy
[__MOUNT_MAX
] = {
61 [MOUNT_UUID
] = { .name
= "uuid", .type
= BLOBMSG_TYPE_STRING
},
62 [MOUNT_LABEL
] = { .name
= "label", .type
= BLOBMSG_TYPE_STRING
},
63 [MOUNT_DEVICE
] = { .name
= "device", .type
= BLOBMSG_TYPE_STRING
},
64 [MOUNT_TARGET
] = { .name
= "target", .type
= BLOBMSG_TYPE_STRING
},
65 [MOUNT_OPTIONS
] = { .name
= "options", .type
= BLOBMSG_TYPE_STRING
},
66 [MOUNT_ENABLE
] = { .name
= "enabled", .type
= BLOBMSG_TYPE_INT32
},
67 [MOUNT_AUTOFS
] = { .name
= "autofs", .type
= BLOBMSG_TYPE_INT32
},
68 [MOUNT_ANON
] = { .name
= "anon", .type
= BLOBMSG_TYPE_INT32
},
69 [MOUNT_REMOVE
] = { .name
= "remove", .type
= BLOBMSG_TYPE_INT32
},
77 static const struct blobmsg_policy info_policy
[__INFO_MAX
] = {
78 [INFO_DEVICE
] = { .name
= "device", .type
= BLOBMSG_TYPE_STRING
},
82 _find_mount_point(char *device
)
86 if (asprintf(&dev
, "/dev/%s", device
) == -1)
89 mp
= find_mount_point(dev
, 0);
95 if (asprintf(&dev
, "/dev/mapper/%s", device
) == -1)
98 mp
= find_mount_point(dev
, 0);
105 block(char *cmd
, char *action
, char *device
)
110 char *argv
[5] = { 0 };
115 ULOG_ERR("failed to fork block process\n");
119 argv
[a
++] = "/sbin/block";
123 execvp(argv
[0], argv
);
124 ULOG_ERR("failed to spawn %s %s %s\n", *argv
, action
, device
);
128 waitpid(pid
, &status
, 0);
129 ret
= WEXITSTATUS(status
);
131 ULOG_ERR("failed to run block. %s/%s\n", action
, device
);
138 static int send_block_notification(struct ubus_context
*ctx
, const char *action
,
139 const char *devname
);
140 static int hotplug_call_mount(struct ubus_context
*ctx
, const char *action
,
141 const char *devname
, uloop_process_handler cb
, void *priv
)
143 char * const argv
[] = { "hotplug-call", "mount", NULL
};
144 struct hotplug_context
*c
= NULL
;
149 c
= calloc(1, sizeof(*c
));
158 ULOG_ERR("fork() failed\n");
163 setenv("ACTION", action
, 1);
164 setenv("DEVICE", devname
, 1);
166 execv("/sbin/hotplug-call", argv
);
171 c
->process
.pid
= pid
;
174 uloop_process_add(&c
->process
);
179 send_block_notification(ctx
, action
, devname
);
184 static void device_mount_remove_hotplug_cb(struct uloop_process
*p
, int stat
)
186 struct hotplug_context
*hctx
= container_of(p
, struct hotplug_context
, process
);
187 struct device
*device
= hctx
->priv
;
191 unlink(device
->target
);
193 mp
= _find_mount_point(device
->name
);
195 block("autofs", "remove", device
->name
);
203 static void device_mount_remove(struct ubus_context
*ctx
, struct device
*device
)
205 hotplug_call_mount(ctx
, "remove", device
->name
,
206 device_mount_remove_hotplug_cb
, device
);
209 static void device_mount_add(struct ubus_context
*ctx
, struct device
*device
)
214 if (asprintf(&path
, "/tmp/run/blockd/%s", device
->name
) == -1)
217 if (!lstat(device
->target
, &st
)) {
218 if (S_ISLNK(st
.st_mode
))
219 unlink(device
->target
);
220 else if (S_ISDIR(st
.st_mode
))
221 rmdir(device
->target
);
223 if (symlink(path
, device
->target
))
224 ULOG_ERR("failed to symlink %s->%s (%d) - %m\n", device
->target
, path
, errno
);
226 hotplug_call_mount(ctx
, "add", device
->name
, NULL
, NULL
);
232 device_move(struct device
*device_o
, struct device
*device_n
)
236 if (device_o
->autofs
!= device_n
->autofs
)
239 if (device_o
->anon
|| device_n
->anon
)
242 if (device_o
->autofs
) {
243 unlink(device_o
->target
);
244 if (asprintf(&path
, "/tmp/run/blockd/%s", device_n
->name
) == -1)
247 if (symlink(path
, device_n
->target
))
248 ULOG_ERR("failed to symlink %s->%s (%d) - %m\n", device_n
->target
, path
, errno
);
252 mkdir(device_n
->target
, 0755);
253 if (mount(device_o
->target
, device_n
->target
, NULL
, MS_MOVE
, NULL
))
254 rmdir(device_n
->target
);
256 rmdir(device_o
->target
);
262 static void vlist_nop_update(struct vlist_tree
*tree
,
263 struct vlist_node
*node_new
,
264 struct vlist_node
*node_old
)
268 VLIST_TREE(devices
, avl_strcmp
, vlist_nop_update
, false, false);
271 block_hotplug(struct ubus_context
*ctx
, struct ubus_object
*obj
,
272 struct ubus_request_data
*req
, const char *method
,
273 struct blob_attr
*msg
)
275 struct blob_attr
*data
[__MOUNT_MAX
];
276 struct device
*device
;
277 struct blob_attr
*_msg
;
278 char *devname
, *_name
;
279 char *target
= NULL
, *__target
;
280 char *_target
= NULL
;
282 blobmsg_parse(mount_policy
, __MOUNT_MAX
, data
, blob_data(msg
), blob_len(msg
));
284 if (!data
[MOUNT_DEVICE
])
285 return UBUS_STATUS_INVALID_ARGUMENT
;
287 devname
= blobmsg_get_string(data
[MOUNT_DEVICE
]);
289 if (data
[MOUNT_TARGET
]) {
290 target
= blobmsg_get_string(data
[MOUNT_TARGET
]);
292 if (asprintf(&_target
, "/mnt/%s",
293 blobmsg_get_string(data
[MOUNT_DEVICE
])) == -1)
299 if (data
[MOUNT_REMOVE
])
300 device
= vlist_find(&devices
, devname
, device
, node
);
302 device
= calloc_a(sizeof(*device
), &_msg
, blob_raw_len(msg
),
303 &_name
, strlen(devname
) + 1, &__target
, strlen(target
) + 1);
309 return UBUS_STATUS_UNKNOWN_ERROR
;
312 if (data
[MOUNT_REMOVE
]) {
313 vlist_delete(&devices
, &device
->node
);
316 device_mount_remove(ctx
, device
);
323 struct device
*old
= vlist_find(&devices
, devname
, device
, node
);
325 device
->autofs
= data
[MOUNT_AUTOFS
] ? blobmsg_get_u32(data
[MOUNT_AUTOFS
]) : 0;
326 device
->anon
= data
[MOUNT_ANON
] ? blobmsg_get_u32(data
[MOUNT_ANON
]) : 0;
328 memcpy(_msg
, msg
, blob_raw_len(msg
));
329 device
->name
= _name
;
330 strcpy(_name
, devname
);
331 device
->target
= __target
;
332 strcpy(__target
, target
);
336 vlist_add(&devices
, &device
->node
, device
->name
);
338 if (old
&& !device_move(old
, device
)) {
339 if (device
->autofs
) {
340 device_mount_remove(ctx
, old
);
341 device_mount_add(ctx
, device
);
343 block("mount", NULL
, NULL
);
345 } else if (device
->autofs
) {
346 device_mount_add(ctx
, device
);
353 static int blockd_mount(struct ubus_context
*ctx
, struct ubus_object
*obj
,
354 struct ubus_request_data
*req
, const char *method
,
355 struct blob_attr
*msg
)
357 struct blob_attr
*data
[__MOUNT_MAX
];
358 struct device
*device
;
361 blobmsg_parse(mount_policy
, __MOUNT_MAX
, data
, blob_data(msg
), blob_len(msg
));
363 if (!data
[MOUNT_DEVICE
])
364 return UBUS_STATUS_INVALID_ARGUMENT
;
366 devname
= blobmsg_get_string(data
[MOUNT_DEVICE
]);
368 device
= vlist_find(&devices
, devname
, device
, node
);
370 return UBUS_STATUS_UNKNOWN_ERROR
;
372 hotplug_call_mount(ctx
, "add", device
->name
, NULL
, NULL
);
377 struct blockd_umount_context
{
378 struct ubus_context
*ctx
;
379 struct ubus_request_data req
;
382 static void blockd_umount_hotplug_cb(struct uloop_process
*p
, int stat
)
384 struct hotplug_context
*hctx
= container_of(p
, struct hotplug_context
, process
);
385 struct blockd_umount_context
*c
= hctx
->priv
;
387 ubus_complete_deferred_request(c
->ctx
, &c
->req
, 0);
393 static int blockd_umount(struct ubus_context
*ctx
, struct ubus_object
*obj
,
394 struct ubus_request_data
*req
, const char *method
,
395 struct blob_attr
*msg
)
397 struct blob_attr
*data
[__MOUNT_MAX
];
398 struct blockd_umount_context
*c
;
402 blobmsg_parse(mount_policy
, __MOUNT_MAX
, data
, blob_data(msg
), blob_len(msg
));
404 if (!data
[MOUNT_DEVICE
])
405 return UBUS_STATUS_INVALID_ARGUMENT
;
407 devname
= blobmsg_get_string(data
[MOUNT_DEVICE
]);
409 c
= calloc(1, sizeof(*c
));
411 return UBUS_STATUS_UNKNOWN_ERROR
;
414 ubus_defer_request(ctx
, req
, &c
->req
);
416 err
= hotplug_call_mount(ctx
, "remove", devname
, blockd_umount_hotplug_cb
, c
);
419 return UBUS_STATUS_UNKNOWN_ERROR
;
425 static void block_info_dump(struct blob_buf
*b
, struct device
*device
)
431 blob_for_each_attr(v
, device
->msg
, rem
)
432 blobmsg_add_blob(b
, v
);
434 mp
= _find_mount_point(device
->name
);
436 blobmsg_add_string(b
, "mount", mp
);
438 } else if (device
->autofs
&& device
->target
) {
439 blobmsg_add_string(b
, "mount", device
->target
);
444 block_info(struct ubus_context
*ctx
, struct ubus_object
*obj
,
445 struct ubus_request_data
*req
, const char *method
,
446 struct blob_attr
*msg
)
448 struct blob_attr
*data
[__INFO_MAX
];
449 struct device
*device
= NULL
;
451 blobmsg_parse(info_policy
, __INFO_MAX
, data
, blob_data(msg
), blob_len(msg
));
453 if (data
[INFO_DEVICE
]) {
454 device
= vlist_find(&devices
, blobmsg_get_string(data
[INFO_DEVICE
]), device
, node
);
456 return UBUS_STATUS_INVALID_ARGUMENT
;
459 blob_buf_init(&bb
, 0);
461 block_info_dump(&bb
, device
);
465 a
= blobmsg_open_array(&bb
, "devices");
466 vlist_for_each_element(&devices
, device
, node
) {
469 t
= blobmsg_open_table(&bb
, "");
470 block_info_dump(&bb
, device
);
471 blobmsg_close_table(&bb
, t
);
473 blobmsg_close_array(&bb
, a
);
475 ubus_send_reply(ctx
, req
, bb
.head
);
480 static const struct ubus_method block_methods
[] = {
481 UBUS_METHOD("hotplug", block_hotplug
, mount_policy
),
482 UBUS_METHOD("mount", blockd_mount
, mount_policy
),
483 UBUS_METHOD("umount", blockd_umount
, mount_policy
),
484 UBUS_METHOD("info", block_info
, info_policy
),
487 static struct ubus_object_type block_object_type
=
488 UBUS_OBJECT_TYPE("block", block_methods
);
490 static struct ubus_object block_object
= {
492 .type
= &block_object_type
,
493 .methods
= block_methods
,
494 .n_methods
= ARRAY_SIZE(block_methods
),
497 /* send ubus event for successful mounts, useful for procd triggers */
498 static int send_block_notification(struct ubus_context
*ctx
, const char *action
,
501 struct blob_buf buf
= { 0 };
502 char evname
[16] = "mount.";
508 strncat(evname
, action
, sizeof(evname
) - 1);
510 blob_buf_init(&buf
, 0);
511 blobmsg_add_string(&buf
, "devname", devname
);
513 err
= ubus_notify(ctx
, &block_object
, evname
, buf
.head
, -1);
519 ubus_connect_handler(struct ubus_context
*ctx
)
523 ret
= ubus_add_object(ctx
, &block_object
);
525 fprintf(stderr
, "Failed to add object: %s\n", ubus_strerror(ret
));
528 static int autofs_umount(void)
530 umount2(AUTOFS_MOUNT_PATH
, MNT_DETACH
);
534 static void autofs_read_handler(struct uloop_fd
*u
, unsigned int events
)
536 union autofs_v5_packet_union pktu
;
537 const struct autofs_v5_packet
*pkt
;
538 int cmd
= AUTOFS_IOC_READY
;
541 while (read(u
->fd
, &pktu
, sizeof(pktu
)) == -1) {
547 if (pktu
.hdr
.type
!= autofs_ptype_missing_indirect
) {
548 ULOG_ERR("unknown packet type %d\n", pktu
.hdr
.type
);
552 pkt
= &pktu
.missing_indirect
;
553 ULOG_ERR("kernel is requesting a mount -> %s\n", pkt
->name
);
554 if (lstat(pkt
->name
, &st
) == -1)
555 if (block("autofs", "add", (char *)pkt
->name
))
556 cmd
= AUTOFS_IOC_FAIL
;
558 if (ioctl(fd_autofs_write
, cmd
, pkt
->wait_queue_token
) < 0)
559 ULOG_ERR("failed to report back to kernel\n");
562 static void autofs_expire(struct uloop_timeout
*t
)
564 struct autofs_packet_expire pkt
;
566 while (ioctl(fd_autofs_write
, AUTOFS_IOC_EXPIRE
, &pkt
) == 0)
567 block("autofs", "remove", pkt
.name
);
569 uloop_timeout_set(t
, AUTOFS_EXPIRE_TIMER
);
572 struct uloop_timeout autofs_expire_timer
= {
576 static int autofs_mount(void)
578 int autofs_timeout
= AUTOFS_TIMEOUT
;
584 if (pipe(pipefd
) < 0) {
585 ULOG_ERR("failed to get kernel pipe\n");
589 snprintf(source
, sizeof(source
), "mountd(pid%u)", getpid());
590 snprintf(opts
, sizeof(opts
), "fd=%d,pgrp=%u,minproto=5,maxproto=5", pipefd
[1], (unsigned) getpgrp());
591 mkdir(AUTOFS_MOUNT_PATH
, 0555);
592 if (mount(source
, AUTOFS_MOUNT_PATH
, "autofs", 0, opts
)) {
593 ULOG_ERR("unable to mount autofs on %s\n", AUTOFS_MOUNT_PATH
);
599 fd_autofs_read
.fd
= pipefd
[0];
600 fd_autofs_read
.cb
= autofs_read_handler
;
601 uloop_fd_add(&fd_autofs_read
, ULOOP_READ
);
603 fd_autofs_write
= open(AUTOFS_MOUNT_PATH
, O_RDONLY
);
604 if(fd_autofs_write
< 0) {
606 ULOG_ERR("failed to open direcory\n");
610 ioctl(fd_autofs_write
, AUTOFS_IOC_PROTOVER
, &kproto_version
);
611 if (kproto_version
!= 5) {
612 ULOG_ERR("only kernel protocol version 5 is tested. You have %d.\n",
616 if (ioctl(fd_autofs_write
, AUTOFS_IOC_SETTIMEOUT
, &autofs_timeout
))
617 ULOG_ERR("failed to set autofs timeout\n");
619 uloop_timeout_set(&autofs_expire_timer
, AUTOFS_EXPIRE_TIMER
);
621 fcntl(fd_autofs_write
, F_SETFD
, fcntl(fd_autofs_write
, F_GETFD
) | FD_CLOEXEC
);
622 fcntl(fd_autofs_read
.fd
, F_SETFD
, fcntl(fd_autofs_read
.fd
, F_GETFD
) | FD_CLOEXEC
);
627 static void blockd_startup(struct uloop_timeout
*t
)
629 block("autofs", "start", NULL
);
632 struct uloop_timeout startup
= {
633 .cb
= blockd_startup
,
636 int main(int argc
, char **argv
)
638 /* make sure blockd is in it's own POSIX process group */
641 ulog_open(ULOG_SYSLOG
| ULOG_STDIO
, LOG_DAEMON
, "blockd");
646 conn
.cb
= ubus_connect_handler
;
647 ubus_auto_connect(&conn
);
649 uloop_timeout_set(&startup
, 1000);
656 vlist_flush_all(&devices
);