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
);
224 tmp
= strrchr(device
->target
, '/');
225 if (tmp
&& tmp
!= device
->target
&& tmp
!= &device
->target
[strlen(path
)-1]) {
227 mkdir_p(device
->target
, 0755);
231 if (symlink(path
, device
->target
))
232 ULOG_ERR("failed to symlink %s->%s (%d) - %m\n", device
->target
, path
, errno
);
234 hotplug_call_mount(ctx
, "add", device
->name
, NULL
, NULL
);
240 device_move(struct device
*device_o
, struct device
*device_n
)
244 if (device_o
->autofs
!= device_n
->autofs
)
247 if (device_o
->anon
|| device_n
->anon
)
250 if (device_o
->autofs
) {
251 unlink(device_o
->target
);
252 if (asprintf(&path
, "/tmp/run/blockd/%s", device_n
->name
) == -1)
255 if (symlink(path
, device_n
->target
))
256 ULOG_ERR("failed to symlink %s->%s (%d) - %m\n", device_n
->target
, path
, errno
);
260 mkdir(device_n
->target
, 0755);
261 if (mount(device_o
->target
, device_n
->target
, NULL
, MS_MOVE
, NULL
))
262 rmdir(device_n
->target
);
264 rmdir(device_o
->target
);
270 static void vlist_nop_update(struct vlist_tree
*tree
,
271 struct vlist_node
*node_new
,
272 struct vlist_node
*node_old
)
276 VLIST_TREE(devices
, avl_strcmp
, vlist_nop_update
, false, false);
279 block_hotplug(struct ubus_context
*ctx
, struct ubus_object
*obj
,
280 struct ubus_request_data
*req
, const char *method
,
281 struct blob_attr
*msg
)
283 struct blob_attr
*data
[__MOUNT_MAX
];
284 struct device
*device
;
285 struct blob_attr
*_msg
;
286 char *devname
, *_name
;
287 char *target
= NULL
, *__target
;
288 char *_target
= NULL
;
290 blobmsg_parse(mount_policy
, __MOUNT_MAX
, data
, blob_data(msg
), blob_len(msg
));
292 if (!data
[MOUNT_DEVICE
])
293 return UBUS_STATUS_INVALID_ARGUMENT
;
295 devname
= blobmsg_get_string(data
[MOUNT_DEVICE
]);
297 if (data
[MOUNT_TARGET
]) {
298 target
= blobmsg_get_string(data
[MOUNT_TARGET
]);
300 if (asprintf(&_target
, "/mnt/%s",
301 blobmsg_get_string(data
[MOUNT_DEVICE
])) == -1)
307 if (data
[MOUNT_REMOVE
])
308 device
= vlist_find(&devices
, devname
, device
, node
);
310 device
= calloc_a(sizeof(*device
), &_msg
, blob_raw_len(msg
),
311 &_name
, strlen(devname
) + 1, &__target
, strlen(target
) + 1);
317 return UBUS_STATUS_UNKNOWN_ERROR
;
320 if (data
[MOUNT_REMOVE
]) {
321 vlist_delete(&devices
, &device
->node
);
324 device_mount_remove(ctx
, device
);
331 struct device
*old
= vlist_find(&devices
, devname
, device
, node
);
333 device
->autofs
= data
[MOUNT_AUTOFS
] ? blobmsg_get_u32(data
[MOUNT_AUTOFS
]) : 0;
334 device
->anon
= data
[MOUNT_ANON
] ? blobmsg_get_u32(data
[MOUNT_ANON
]) : 0;
336 memcpy(_msg
, msg
, blob_raw_len(msg
));
337 device
->name
= _name
;
338 strcpy(_name
, devname
);
339 device
->target
= __target
;
340 strcpy(__target
, target
);
344 vlist_add(&devices
, &device
->node
, device
->name
);
346 if (old
&& !device_move(old
, device
)) {
347 if (device
->autofs
) {
348 device_mount_remove(ctx
, old
);
349 device_mount_add(ctx
, device
);
351 block("mount", NULL
, NULL
);
353 } else if (device
->autofs
) {
354 device_mount_add(ctx
, device
);
361 static int blockd_mount(struct ubus_context
*ctx
, struct ubus_object
*obj
,
362 struct ubus_request_data
*req
, const char *method
,
363 struct blob_attr
*msg
)
365 struct blob_attr
*data
[__MOUNT_MAX
];
366 struct device
*device
;
369 blobmsg_parse(mount_policy
, __MOUNT_MAX
, data
, blob_data(msg
), blob_len(msg
));
371 if (!data
[MOUNT_DEVICE
])
372 return UBUS_STATUS_INVALID_ARGUMENT
;
374 devname
= blobmsg_get_string(data
[MOUNT_DEVICE
]);
376 device
= vlist_find(&devices
, devname
, device
, node
);
378 return UBUS_STATUS_UNKNOWN_ERROR
;
380 hotplug_call_mount(ctx
, "add", device
->name
, NULL
, NULL
);
385 struct blockd_umount_context
{
386 struct ubus_context
*ctx
;
387 struct ubus_request_data req
;
390 static void blockd_umount_hotplug_cb(struct uloop_process
*p
, int stat
)
392 struct hotplug_context
*hctx
= container_of(p
, struct hotplug_context
, process
);
393 struct blockd_umount_context
*c
= hctx
->priv
;
395 ubus_complete_deferred_request(c
->ctx
, &c
->req
, 0);
401 static int blockd_umount(struct ubus_context
*ctx
, struct ubus_object
*obj
,
402 struct ubus_request_data
*req
, const char *method
,
403 struct blob_attr
*msg
)
405 struct blob_attr
*data
[__MOUNT_MAX
];
406 struct blockd_umount_context
*c
;
410 blobmsg_parse(mount_policy
, __MOUNT_MAX
, data
, blob_data(msg
), blob_len(msg
));
412 if (!data
[MOUNT_DEVICE
])
413 return UBUS_STATUS_INVALID_ARGUMENT
;
415 devname
= blobmsg_get_string(data
[MOUNT_DEVICE
]);
417 c
= calloc(1, sizeof(*c
));
419 return UBUS_STATUS_UNKNOWN_ERROR
;
422 ubus_defer_request(ctx
, req
, &c
->req
);
424 err
= hotplug_call_mount(ctx
, "remove", devname
, blockd_umount_hotplug_cb
, c
);
427 return UBUS_STATUS_UNKNOWN_ERROR
;
433 static void block_info_dump(struct blob_buf
*b
, struct device
*device
)
439 blob_for_each_attr(v
, device
->msg
, rem
)
440 blobmsg_add_blob(b
, v
);
442 mp
= _find_mount_point(device
->name
);
444 blobmsg_add_string(b
, "mount", mp
);
446 } else if (device
->autofs
&& device
->target
) {
447 blobmsg_add_string(b
, "mount", device
->target
);
452 block_info(struct ubus_context
*ctx
, struct ubus_object
*obj
,
453 struct ubus_request_data
*req
, const char *method
,
454 struct blob_attr
*msg
)
456 struct blob_attr
*data
[__INFO_MAX
];
457 struct device
*device
= NULL
;
459 blobmsg_parse(info_policy
, __INFO_MAX
, data
, blob_data(msg
), blob_len(msg
));
461 if (data
[INFO_DEVICE
]) {
462 device
= vlist_find(&devices
, blobmsg_get_string(data
[INFO_DEVICE
]), device
, node
);
464 return UBUS_STATUS_INVALID_ARGUMENT
;
467 blob_buf_init(&bb
, 0);
469 block_info_dump(&bb
, device
);
473 a
= blobmsg_open_array(&bb
, "devices");
474 vlist_for_each_element(&devices
, device
, node
) {
477 t
= blobmsg_open_table(&bb
, "");
478 block_info_dump(&bb
, device
);
479 blobmsg_close_table(&bb
, t
);
481 blobmsg_close_array(&bb
, a
);
483 ubus_send_reply(ctx
, req
, bb
.head
);
488 static const struct ubus_method block_methods
[] = {
489 UBUS_METHOD("hotplug", block_hotplug
, mount_policy
),
490 UBUS_METHOD("mount", blockd_mount
, mount_policy
),
491 UBUS_METHOD("umount", blockd_umount
, mount_policy
),
492 UBUS_METHOD("info", block_info
, info_policy
),
495 static struct ubus_object_type block_object_type
=
496 UBUS_OBJECT_TYPE("block", block_methods
);
498 static struct ubus_object block_object
= {
500 .type
= &block_object_type
,
501 .methods
= block_methods
,
502 .n_methods
= ARRAY_SIZE(block_methods
),
505 /* send ubus event for successful mounts, useful for procd triggers */
506 static int send_block_notification(struct ubus_context
*ctx
, const char *action
,
509 struct blob_buf buf
= { 0 };
510 char evname
[16] = "mount.";
516 strncat(evname
, action
, sizeof(evname
) - 1);
518 blob_buf_init(&buf
, 0);
519 blobmsg_add_string(&buf
, "devname", devname
);
521 err
= ubus_notify(ctx
, &block_object
, evname
, buf
.head
, -1);
527 ubus_connect_handler(struct ubus_context
*ctx
)
531 ret
= ubus_add_object(ctx
, &block_object
);
533 fprintf(stderr
, "Failed to add object: %s\n", ubus_strerror(ret
));
536 static int autofs_umount(void)
538 umount2(AUTOFS_MOUNT_PATH
, MNT_DETACH
);
542 static void autofs_read_handler(struct uloop_fd
*u
, unsigned int events
)
544 union autofs_v5_packet_union pktu
;
545 const struct autofs_v5_packet
*pkt
;
546 int cmd
= AUTOFS_IOC_READY
;
549 while (read(u
->fd
, &pktu
, sizeof(pktu
)) == -1) {
555 if (pktu
.hdr
.type
!= autofs_ptype_missing_indirect
) {
556 ULOG_ERR("unknown packet type %d\n", pktu
.hdr
.type
);
560 pkt
= &pktu
.missing_indirect
;
561 ULOG_ERR("kernel is requesting a mount -> %s\n", pkt
->name
);
562 if (lstat(pkt
->name
, &st
) == -1)
563 if (block("autofs", "add", (char *)pkt
->name
))
564 cmd
= AUTOFS_IOC_FAIL
;
566 if (ioctl(fd_autofs_write
, cmd
, pkt
->wait_queue_token
) < 0)
567 ULOG_ERR("failed to report back to kernel\n");
570 static void autofs_expire(struct uloop_timeout
*t
)
572 struct autofs_packet_expire pkt
;
574 while (ioctl(fd_autofs_write
, AUTOFS_IOC_EXPIRE
, &pkt
) == 0)
575 block("autofs", "remove", pkt
.name
);
577 uloop_timeout_set(t
, AUTOFS_EXPIRE_TIMER
);
580 struct uloop_timeout autofs_expire_timer
= {
584 static int autofs_mount(void)
586 int autofs_timeout
= AUTOFS_TIMEOUT
;
592 if (pipe(pipefd
) < 0) {
593 ULOG_ERR("failed to get kernel pipe\n");
597 snprintf(source
, sizeof(source
), "mountd(pid%u)", getpid());
598 snprintf(opts
, sizeof(opts
), "fd=%d,pgrp=%u,minproto=5,maxproto=5", pipefd
[1], (unsigned) getpgrp());
599 mkdir(AUTOFS_MOUNT_PATH
, 0555);
600 if (mount(source
, AUTOFS_MOUNT_PATH
, "autofs", 0, opts
)) {
601 ULOG_ERR("unable to mount autofs on %s\n", AUTOFS_MOUNT_PATH
);
607 fd_autofs_read
.fd
= pipefd
[0];
608 fd_autofs_read
.cb
= autofs_read_handler
;
609 uloop_fd_add(&fd_autofs_read
, ULOOP_READ
);
611 fd_autofs_write
= open(AUTOFS_MOUNT_PATH
, O_RDONLY
);
612 if(fd_autofs_write
< 0) {
614 ULOG_ERR("failed to open direcory\n");
618 ioctl(fd_autofs_write
, AUTOFS_IOC_PROTOVER
, &kproto_version
);
619 if (kproto_version
!= 5) {
620 ULOG_ERR("only kernel protocol version 5 is tested. You have %d.\n",
624 if (ioctl(fd_autofs_write
, AUTOFS_IOC_SETTIMEOUT
, &autofs_timeout
))
625 ULOG_ERR("failed to set autofs timeout\n");
627 uloop_timeout_set(&autofs_expire_timer
, AUTOFS_EXPIRE_TIMER
);
629 fcntl(fd_autofs_write
, F_SETFD
, fcntl(fd_autofs_write
, F_GETFD
) | FD_CLOEXEC
);
630 fcntl(fd_autofs_read
.fd
, F_SETFD
, fcntl(fd_autofs_read
.fd
, F_GETFD
) | FD_CLOEXEC
);
635 static void blockd_startup(struct uloop_timeout
*t
)
637 block("autofs", "start", NULL
);
640 struct uloop_timeout startup
= {
641 .cb
= blockd_startup
,
644 int main(int argc
, char **argv
)
646 /* make sure blockd is in it's own POSIX process group */
649 ulog_open(ULOG_SYSLOG
| ULOG_STDIO
, LOG_DAEMON
, "blockd");
654 conn
.cb
= ubus_connect_handler
;
655 ubus_auto_connect(&conn
);
657 uloop_timeout_set(&startup
, 1000);
664 vlist_flush_all(&devices
);