1 /* vi: set sw=4 ts=4: */
3 * Licensed under GPLv2 or later, see file LICENSE in this tarball for details.
7 devfsd implementation for busybox
9 Copyright (C) 2003 by Tito Ragusa <farmatito@tiscali.it>
11 Busybox version is based on some previous work and ideas
12 Copyright (C) [2003] by [Matteo Croce] <3297627799@wind.it>
16 Main file for devfsd (devfs daemon for Linux).
18 Copyright (C) 1998-2002 Richard Gooch
22 Header file for devfsd (devfs daemon for Linux).
24 Copyright (C) 1998-2000 Richard Gooch
28 Compatibility name file for devfsd (build compatibility names).
30 Copyright (C) 1998-2002 Richard Gooch
34 This code provides Borne Shell-like expression expansion.
36 Copyright (C) 1997-1999 Richard Gooch
38 This program is free software; you can redistribute it and/or modify
39 it under the terms of the GNU General Public License as published by
40 the Free Software Foundation; either version 2 of the License, or
41 (at your option) any later version.
43 This program is distributed in the hope that it will be useful,
44 but WITHOUT ANY WARRANTY; without even the implied warranty of
45 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
46 GNU General Public License for more details.
48 You should have received a copy of the GNU General Public License
49 along with this program; if not, write to the Free Software
50 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
52 Richard Gooch may be reached by email at rgooch@atnf.csiro.au
53 The postal address is:
54 Richard Gooch, c/o ATNF, P. O. Box 76, Epping, N.S.W., 2121, Australia.
61 #include <sys/sysmacros.h>
63 /* Various defines taken from linux/major.h */
76 /* Various defines taken from linux/devfs_fs.h */
77 #define DEVFSD_PROTOCOL_REVISION_KERNEL 5
78 #define DEVFSD_IOCTL_BASE 'd'
79 /* These are the various ioctls */
80 #define DEVFSDIOC_GET_PROTO_REV _IOR(DEVFSD_IOCTL_BASE, 0, int)
81 #define DEVFSDIOC_SET_EVENT_MASK _IOW(DEVFSD_IOCTL_BASE, 2, int)
82 #define DEVFSDIOC_RELEASE_EVENT_QUEUE _IOW(DEVFSD_IOCTL_BASE, 3, int)
83 #define DEVFSDIOC_SET_CONFIG_DEBUG_MASK _IOW(DEVFSD_IOCTL_BASE, 4, int)
84 #define DEVFSD_NOTIFY_REGISTERED 0
85 #define DEVFSD_NOTIFY_UNREGISTERED 1
86 #define DEVFSD_NOTIFY_ASYNC_OPEN 2
87 #define DEVFSD_NOTIFY_CLOSE 3
88 #define DEVFSD_NOTIFY_LOOKUP 4
89 #define DEVFSD_NOTIFY_CHANGE 5
90 #define DEVFSD_NOTIFY_CREATE 6
91 #define DEVFSD_NOTIFY_DELETE 7
92 #define DEVFS_PATHLEN 1024
93 /* Never change this otherwise the binary interface will change */
95 struct devfsd_notify_struct
96 { /* Use native C types to ensure same types in kernel and user space */
97 unsigned int type
; /* DEVFSD_NOTIFY_* value */
98 unsigned int mode
; /* Mode of the inode or device entry */
99 unsigned int major
; /* Major number of device entry */
100 unsigned int minor
; /* Minor number of device entry */
101 unsigned int uid
; /* Uid of process, inode or device entry */
102 unsigned int gid
; /* Gid of process, inode or device entry */
103 unsigned int overrun_count
; /* Number of lost events */
104 unsigned int namelen
; /* Number of characters not including '\0' */
105 /* The device name MUST come last */
106 char devname
[DEVFS_PATHLEN
]; /* This will be '\0' terminated */
109 #define BUFFER_SIZE 16384
110 #define DEVFSD_VERSION "1.3.25"
111 #define CONFIG_FILE "/etc/devfsd.conf"
112 #define MODPROBE "/sbin/modprobe"
113 #define MODPROBE_SWITCH_1 "-k"
114 #define MODPROBE_SWITCH_2 "-C"
115 #define CONFIG_MODULES_DEVFS "/etc/modules.devfs"
116 #define MAX_ARGS (6 + 1)
117 #define MAX_SUBEXPR 10
118 #define STRING_LENGTH 255
120 /* for get_uid_gid() */
124 /* fork_and_execute() */
128 /* for dir_operation() */
131 #define READ_CONFIG 2
133 /* Update only after changing code to reflect new protocol */
134 #define DEVFSD_PROTOCOL_REVISION_DAEMON 5
136 /* Compile-time check */
137 #if DEVFSD_PROTOCOL_REVISION_KERNEL != DEVFSD_PROTOCOL_REVISION_DAEMON
138 #error protocol version mismatch. Update your kernel headers
141 #define AC_PERMISSIONS 0
144 #define AC_MFUNCTION 3 /* not supported by busybox */
145 #define AC_CFUNCTION 4 /* not supported by busybox */
148 #define AC_MKOLDCOMPAT 7
149 #define AC_MKNEWCOMPAT 8
150 #define AC_RMOLDCOMPAT 9
151 #define AC_RMNEWCOMPAT 10
152 #define AC_RESTORE 11
154 struct permissions_type
163 char *argv
[MAX_ARGS
+ 1]; /* argv[0] must always be the programme */
169 const char *destination
;
178 struct config_entry_struct
180 struct action_type action
;
184 struct permissions_type permissions
;
185 struct execute_type execute
;
186 struct copy_type copy
;
189 struct config_entry_struct
*next
;
192 struct get_variable_info
194 const struct devfsd_notify_struct
*info
;
196 char devpath
[STRING_LENGTH
];
199 static void dir_operation(int , const char * , int, unsigned long*);
200 static void service(struct stat statbuf
, char *path
);
201 static int st_expr_expand(char *, unsigned, const char *, const char *(*)(const char *, void *), void *);
202 static const char *get_old_name(const char *, unsigned, char *, unsigned, unsigned);
203 static int mksymlink(const char *oldpath
, const char *newpath
);
204 static void read_config_file(char *path
, int optional
, unsigned long *event_mask
);
205 static void process_config_line(const char *, unsigned long *);
206 static int do_servicing(int, unsigned long);
207 static void service_name(const struct devfsd_notify_struct
*);
208 static void action_permissions(const struct devfsd_notify_struct
*, const struct config_entry_struct
*);
209 static void action_execute(const struct devfsd_notify_struct
*, const struct config_entry_struct
*,
210 const regmatch_t
*, unsigned);
211 static void action_modload(const struct devfsd_notify_struct
*info
, const struct config_entry_struct
*entry
);
212 static void action_copy(const struct devfsd_notify_struct
*, const struct config_entry_struct
*,
213 const regmatch_t
*, unsigned);
214 static void action_compat(const struct devfsd_notify_struct
*, unsigned);
215 static void free_config(void);
216 static void restore(char *spath
, struct stat source_stat
, int rootlen
);
217 static int copy_inode(const char *, const struct stat
*, mode_t
, const char *, const struct stat
*);
218 static mode_t
get_mode(const char *);
219 static void signal_handler(int);
220 static const char *get_variable(const char *, void *);
221 static int make_dir_tree(const char *);
222 static int expand_expression(char *, unsigned, const char *, const char *(*)(const char *, void *), void *,
223 const char *, const regmatch_t
*, unsigned);
224 static void expand_regexp(char *, size_t, const char *, const char *, const regmatch_t
*, unsigned);
225 static const char *expand_variable( char *, unsigned, unsigned *, const char *,
226 const char *(*)(const char *, void *), void *);
227 static const char *get_variable_v2(const char *, const char *(*)(const char *, void *), void *);
228 static char get_old_ide_name(unsigned , unsigned);
229 static char *write_old_sd_name(char *, unsigned, unsigned, const char *);
231 /* busybox functions */
232 static int get_uid_gid(int flag
, const char *string
);
233 static void safe_memcpy(char * dest
, const char * src
, int len
);
234 static unsigned int scan_dev_name_common(const char *d
, unsigned int n
, int addendum
, const char *ptr
);
235 static unsigned int scan_dev_name(const char *d
, unsigned int n
, const char *ptr
);
237 /* Structs and vars */
238 static struct config_entry_struct
*first_config
= NULL
;
239 static struct config_entry_struct
*last_config
= NULL
;
240 static char *mount_point
= NULL
;
241 static volatile int caught_signal
= FALSE
;
242 static volatile int caught_sighup
= FALSE
;
243 static struct initial_symlink_struct
{
246 } initial_symlinks
[] = {
247 {"/proc/self/fd", "fd"},
254 static struct event_type
{
255 unsigned int type
; /* The DEVFSD_NOTIFY_* value */
256 const char *config_name
; /* The name used in the config file */
258 {DEVFSD_NOTIFY_REGISTERED
, "REGISTER"},
259 {DEVFSD_NOTIFY_UNREGISTERED
, "UNREGISTER"},
260 {DEVFSD_NOTIFY_ASYNC_OPEN
, "ASYNC_OPEN"},
261 {DEVFSD_NOTIFY_CLOSE
, "CLOSE"},
262 {DEVFSD_NOTIFY_LOOKUP
, "LOOKUP"},
263 {DEVFSD_NOTIFY_CHANGE
, "CHANGE"},
264 {DEVFSD_NOTIFY_CREATE
, "CREATE"},
265 {DEVFSD_NOTIFY_DELETE
, "DELETE"},
269 /* Busybox messages */
271 static const char bb_msg_proto_rev
[] ALIGN1
= "protocol revision";
272 static const char bb_msg_bad_config
[] ALIGN1
= "bad %s config file: %s";
273 static const char bb_msg_small_buffer
[] ALIGN1
= "buffer too small";
274 static const char bb_msg_variable_not_found
[] ALIGN1
= "variable: %s not found";
277 #if ENABLE_DEVFSD_VERBOSE || ENABLE_DEBUG
278 #define info_logger(p, fmt, args...) bb_info_msg(fmt, ## args)
279 #define msg_logger(p, fmt, args...) bb_error_msg(fmt, ## args)
280 #define msg_logger_and_die(p, fmt, args...) bb_error_msg_and_die(fmt, ## args)
281 #define error_logger(p, fmt, args...) bb_perror_msg(fmt, ## args)
282 #define error_logger_and_die(p, fmt, args...) bb_perror_msg_and_die(fmt, ## args)
284 #define info_logger(p, fmt, args...)
285 #define msg_logger(p, fmt, args...)
286 #define msg_logger_and_die(p, fmt, args...) exit(EXIT_FAILURE)
287 #define error_logger(p, fmt, args...)
288 #define error_logger_and_die(p, fmt, args...) exit(EXIT_FAILURE)
291 static void safe_memcpy(char *dest
, const char *src
, int len
)
293 memcpy(dest
, src
, len
);
297 static unsigned int scan_dev_name_common(const char *d
, unsigned int n
, int addendum
, const char *ptr
)
299 if (d
[n
- 4] == 'd' && d
[n
- 3] == 'i' && d
[n
- 2] == 's' && d
[n
- 1] == 'c')
301 if (d
[n
- 2] == 'c' && d
[n
- 1] == 'd')
303 if (ptr
[0] == 'p' && ptr
[1] == 'a' && ptr
[2] == 'r' && ptr
[3] == 't')
305 if (ptr
[n
- 2] == 'm' && ptr
[n
- 1] == 't')
310 static unsigned int scan_dev_name(const char *d
, unsigned int n
, const char *ptr
)
312 if (d
[0] == 's' && d
[1] == 'c' && d
[2] == 's' && d
[3] == 'i' && d
[4] == '/') {
313 if (d
[n
- 7] == 'g' && d
[n
- 6] == 'e' && d
[n
- 5] == 'n'
314 && d
[n
- 4] == 'e' && d
[n
- 3] == 'r' && d
[n
- 2] == 'i' && d
[n
- 1] == 'c'
317 return scan_dev_name_common(d
, n
, 0, ptr
);
319 if (d
[0] == 'i' && d
[1] == 'd' && d
[2] == 'e' && d
[3] == '/'
320 && d
[4] == 'h' && d
[5] == 'o' && d
[6] == 's' && d
[7] == 't'
322 return scan_dev_name_common(d
, n
, 4, ptr
);
323 if (d
[0] == 's' && d
[1] == 'b' && d
[2] == 'p' && d
[3] == '/')
325 if (d
[0] == 'v' && d
[1] == 'c' && d
[2] == 'c' && d
[3] == '/')
327 if (d
[0] == 'p' && d
[1] == 't' && d
[2] == 'y' && d
[3] == '/')
332 /* Public functions follow */
334 int devfsd_main(int argc
, char **argv
) MAIN_EXTERNALLY_VISIBLE
;
335 int devfsd_main(int argc
, char **argv
)
337 int print_version
= FALSE
;
338 int do_daemon
= TRUE
;
339 int no_polling
= FALSE
;
341 int fd
, proto_rev
, count
;
342 unsigned long event_mask
= 0;
343 struct sigaction new_action
;
344 struct initial_symlink_struct
*curr
;
349 for (count
= 2; count
< argc
; ++count
) {
350 if (argv
[count
][0] == '-') {
351 if (argv
[count
][1] == 'v' && !argv
[count
][2]) /* -v */
352 print_version
= TRUE
;
353 else if (ENABLE_DEVFSD_FG_NP
&& argv
[count
][1] == 'f'
354 && argv
[count
][2] == 'g' && !argv
[count
][3]) /* -fg */
356 else if (ENABLE_DEVFSD_FG_NP
&& argv
[count
][1] == 'n'
357 && argv
[count
][2] == 'p' && !argv
[count
][3]) /* -np */
364 mount_point
= bb_simplify_path(argv
[1]);
368 fd
= xopen(".devfsd", O_RDONLY
);
369 close_on_exec_on(fd
);
370 xioctl(fd
, DEVFSDIOC_GET_PROTO_REV
, &proto_rev
);
372 /*setup initial entries */
373 for (curr
= initial_symlinks
; curr
->dest
!= NULL
; ++curr
)
374 symlink(curr
->dest
, curr
->name
);
376 /* NB: The check for CONFIG_FILE is done in read_config_file() */
378 if (print_version
|| (DEVFSD_PROTOCOL_REVISION_DAEMON
!= proto_rev
)) {
379 printf("%s v%s\nDaemon %s:\t%d\nKernel-side %s:\t%d\n",
380 applet_name
, DEVFSD_VERSION
, bb_msg_proto_rev
,
381 DEVFSD_PROTOCOL_REVISION_DAEMON
, bb_msg_proto_rev
, proto_rev
);
382 if (DEVFSD_PROTOCOL_REVISION_DAEMON
!= proto_rev
)
383 bb_error_msg_and_die("%s mismatch!", bb_msg_proto_rev
);
384 exit(EXIT_SUCCESS
); /* -v */
386 /* Tell kernel we are special(i.e. we get to see hidden entries) */
387 xioctl(fd
, DEVFSDIOC_SET_EVENT_MASK
, 0);
389 /* Set up SIGHUP and SIGUSR1 handlers */
390 sigemptyset(&new_action
.sa_mask
);
391 new_action
.sa_flags
= 0;
392 new_action
.sa_handler
= signal_handler
;
393 sigaction_set(SIGHUP
, &new_action
);
394 sigaction_set(SIGUSR1
, &new_action
);
396 printf("%s v%s started for %s\n", applet_name
, DEVFSD_VERSION
, mount_point
);
398 /* Set umask so that mknod(2), open(2) and mkdir(2) have complete control over permissions */
400 read_config_file((char*)CONFIG_FILE
, FALSE
, &event_mask
);
401 /* Do the scan before forking, so that boot scripts see the finished product */
402 dir_operation(SERVICE
, mount_point
, 0, NULL
);
404 if (ENABLE_DEVFSD_FG_NP
&& no_polling
)
407 if (ENABLE_DEVFSD_VERBOSE
|| ENABLE_DEBUG
)
408 logmode
= LOGMODE_BOTH
;
409 else if (do_daemon
== TRUE
)
410 logmode
= LOGMODE_SYSLOG
;
411 /* This is the default */
413 logmode = LOGMODE_STDIO; */
416 /* Release so that the child can grab it */
417 xioctl(fd
, DEVFSDIOC_RELEASE_EVENT_QUEUE
, 0);
418 bb_daemonize_or_rexec(0, argv
);
419 } else if (ENABLE_DEVFSD_FG_NP
) {
420 setpgid(0, 0); /* Become process group leader */
424 do_scan
= do_servicing(fd
, event_mask
);
427 read_config_file((char*)CONFIG_FILE
, FALSE
, &event_mask
);
429 dir_operation(SERVICE
, mount_point
, 0, NULL
);
431 if (ENABLE_FEATURE_CLEAN_UP
) free(mount_point
);
432 } /* End Function main */
435 /* Private functions follow */
437 static void read_config_file(char *path
, int optional
, unsigned long *event_mask
)
438 /* [SUMMARY] Read a configuration database.
439 <path> The path to read the database from. If this is a directory, all
440 entries in that directory will be read(except hidden entries).
441 <optional> If TRUE, the routine will silently ignore a missing config file.
442 <event_mask> The event mask is written here. This is not initialised.
448 char buf
[STRING_LENGTH
];
452 if (stat(path
, &statbuf
) == 0) {
453 /* Don't read 0 length files: ignored */
454 /*if (statbuf.st_size == 0)
456 if (S_ISDIR(statbuf
.st_mode
)) {
457 p
= bb_simplify_path(path
);
458 dir_operation(READ_CONFIG
, p
, 0, event_mask
);
462 fp
= fopen_for_read(path
);
464 while (fgets(buf
, STRING_LENGTH
, fp
) != NULL
) {
465 /* Skip whitespace */
467 line
= skip_whitespace(line
);
468 if (line
[0] == '\0' || line
[0] == '#')
470 process_config_line(line
, event_mask
);
474 goto read_config_file_err
;
477 read_config_file_err
:
478 if (optional
== 0 && errno
== ENOENT
)
479 error_logger_and_die(LOG_ERR
, "read config file: %s", path
);
481 } /* End Function read_config_file */
483 static void process_config_line(const char *line
, unsigned long *event_mask
)
484 /* [SUMMARY] Process a line from a configuration file.
485 <line> The configuration line.
486 <event_mask> The event mask is written here. This is not initialised.
491 struct config_entry_struct
*new;
492 char p
[MAX_ARGS
][STRING_LENGTH
];
493 char when
[STRING_LENGTH
], what
[STRING_LENGTH
];
494 char name
[STRING_LENGTH
];
495 const char *msg
= "";
499 /* !!!! Only Uppercase Keywords in devsfd.conf */
500 static const char options
[] ALIGN1
=
501 "CLEAR_CONFIG\0""INCLUDE\0""OPTIONAL_INCLUDE\0"
502 "RESTORE\0""PERMISSIONS\0""MODLOAD\0""EXECUTE\0"
503 "COPY\0""IGNORE\0""MKOLDCOMPAT\0""MKNEWCOMPAT\0"
504 "RMOLDCOMPAT\0""RMNEWCOMPAT\0";
506 for (count
= 0; count
< MAX_ARGS
; ++count
)
508 num_args
= sscanf(line
, "%s %s %s %s %s %s %s %s %s %s",
510 p
[0], p
[1], p
[2], p
[3], p
[4], p
[5], p
[6]);
512 i
= index_in_strings(options
, when
);
522 goto process_config_line_err
;
524 /* "INCLUDE" & "OPTIONAL_INCLUDE" */
525 if (i
== 1 || i
== 2) {
526 st_expr_expand(name
, STRING_LENGTH
, name
, get_variable
, NULL
);
527 info_logger(LOG_INFO
, "%sinclude: %s", (toupper(when
[0]) == 'I') ? "": "optional_", name
);
528 read_config_file(name
, (toupper(when
[0]) == 'I') ? FALSE
: TRUE
, event_mask
);
533 dir_operation(RESTORE
, name
, strlen(name
),NULL
);
537 goto process_config_line_err
;
539 new = xzalloc(sizeof *new);
541 for (count
= 0; event_types
[count
].config_name
!= NULL
; ++count
) {
542 if (strcasecmp(when
, event_types
[count
].config_name
) != 0)
544 new->action
.when
= event_types
[count
].type
;
547 if (event_types
[count
].config_name
== NULL
) {
549 goto process_config_line_err
;
552 i
= index_in_strings(options
, what
);
555 case 4: /* "PERMISSIONS" */
556 new->action
.what
= AC_PERMISSIONS
;
557 /* Get user and group */
558 ptr
= strchr(p
[0], '.');
561 goto process_config_line_err
; /*"missing '.' in UID.GID"*/
565 new->u
.permissions
.uid
= get_uid_gid(UID
, p
[0]);
566 new->u
.permissions
.gid
= get_uid_gid(GID
, ptr
);
568 new->u
.permissions
.mode
= get_mode(p
[1]);
570 case 5: /* MODLOAD */
571 /*This action will pass "/dev/$devname"(i.e. "/dev/" prefixed to
572 the device name) to the module loading facility. In addition,
573 the /etc/modules.devfs configuration file is used.*/
574 if (ENABLE_DEVFSD_MODLOAD
)
575 new->action
.what
= AC_MODLOAD
;
577 case 6: /* EXECUTE */
578 new->action
.what
= AC_EXECUTE
;
581 for (count
= 0; count
< num_args
; ++count
)
582 new->u
.execute
.argv
[count
] = xstrdup(p
[count
]);
584 new->u
.execute
.argv
[num_args
] = NULL
;
587 new->action
.what
= AC_COPY
;
590 goto process_config_line_err
; /* missing path and function in line */
592 new->u
.copy
.source
= xstrdup(p
[0]);
593 new->u
.copy
.destination
= xstrdup(p
[1]);
597 case 9: /* MKOLDCOMPAT */
599 case 10: /* MKNEWCOMPAT */
601 case 11:/* RMOLDCOMPAT */
603 case 12: /* RMNEWCOMPAT */
609 new->action
.what
= i
- 2;
613 goto process_config_line_err
;
617 xregcomp(&new->preg
, name
, REG_EXTENDED
);
619 *event_mask
|= 1 << new->action
.when
;
621 if (first_config
== NULL
)
624 last_config
->next
= new;
628 process_config_line_err
:
629 msg_logger_and_die(LOG_ERR
, bb_msg_bad_config
, msg
, line
);
630 } /* End Function process_config_line */
632 static int do_servicing(int fd
, unsigned long event_mask
)
633 /* [SUMMARY] Service devfs changes until a signal is received.
634 <fd> The open control file.
635 <event_mask> The event mask.
636 [RETURNS] TRUE if SIGHUP was caught, else FALSE.
640 struct devfsd_notify_struct info
;
642 /* (void*) cast is only in order to match prototype */
643 xioctl(fd
, DEVFSDIOC_SET_EVENT_MASK
, (void*)event_mask
);
644 while (!caught_signal
) {
646 bytes
= read(fd
,(char *) &info
, sizeof info
);
648 break; /* Must test for this first */
650 continue; /* Yes, the order is important */
656 int c_sighup
= caught_sighup
;
658 caught_signal
= FALSE
;
659 caught_sighup
= FALSE
;
662 msg_logger_and_die(LOG_ERR
, "read error on control file");
663 } /* End Function do_servicing */
665 static void service_name(const struct devfsd_notify_struct
*info
)
666 /* [SUMMARY] Service a single devfs change.
667 <info> The devfs change.
672 regmatch_t mbuf
[MAX_SUBEXPR
];
673 struct config_entry_struct
*entry
;
675 if (ENABLE_DEBUG
&& info
->overrun_count
> 0)
676 msg_logger(LOG_ERR
, "lost %u events", info
->overrun_count
);
678 /* Discard lookups on "/dev/log" and "/dev/initctl" */
679 if (info
->type
== DEVFSD_NOTIFY_LOOKUP
680 && ((info
->devname
[0] == 'l' && info
->devname
[1] == 'o'
681 && info
->devname
[2] == 'g' && !info
->devname
[3])
682 || (info
->devname
[0] == 'i' && info
->devname
[1] == 'n'
683 && info
->devname
[2] == 'i' && info
->devname
[3] == 't'
684 && info
->devname
[4] == 'c' && info
->devname
[5] == 't'
685 && info
->devname
[6] == 'l' && !info
->devname
[7]))
689 for (entry
= first_config
; entry
!= NULL
; entry
= entry
->next
) {
690 /* First check if action matches the type, then check if name matches */
691 if (info
->type
!= entry
->action
.when
692 || regexec(&entry
->preg
, info
->devname
, MAX_SUBEXPR
, mbuf
, 0) != 0)
694 for (n
= 0;(n
< MAX_SUBEXPR
) && (mbuf
[n
].rm_so
!= -1); ++n
)
697 switch (entry
->action
.what
) {
699 action_permissions(info
, entry
);
702 if (ENABLE_DEVFSD_MODLOAD
)
703 action_modload(info
, entry
);
706 action_execute(info
, entry
, mbuf
, n
);
709 action_copy(info
, entry
, mbuf
, n
);
718 action_compat(info
, entry
->action
.what
);
721 msg_logger_and_die(LOG_ERR
, "Unknown action");
724 } /* End Function service_name */
726 static void action_permissions(const struct devfsd_notify_struct
*info
,
727 const struct config_entry_struct
*entry
)
728 /* [SUMMARY] Update permissions for a device entry.
729 <info> The devfs change.
730 <entry> The config file entry.
736 if (stat(info
->devname
, &statbuf
) != 0
737 || chmod(info
->devname
, (statbuf
.st_mode
& S_IFMT
) | (entry
->u
.permissions
.mode
& ~S_IFMT
)) != 0
738 || chown(info
->devname
, entry
->u
.permissions
.uid
, entry
->u
.permissions
.gid
) != 0
740 error_logger(LOG_ERR
, "Can't chmod or chown: %s", info
->devname
);
741 } /* End Function action_permissions */
743 static void action_modload(const struct devfsd_notify_struct
*info
,
744 const struct config_entry_struct
*entry UNUSED_PARAM
)
745 /* [SUMMARY] Load a module.
746 <info> The devfs change.
747 <entry> The config file entry.
753 argv
[0] = (char*)MODPROBE
;
754 argv
[1] = (char*)MODPROBE_SWITCH_1
; /* "-k" */
755 argv
[2] = (char*)MODPROBE_SWITCH_2
; /* "-C" */
756 argv
[3] = (char*)CONFIG_MODULES_DEVFS
;
757 argv
[4] = concat_path_file("/dev", info
->devname
); /* device */
760 wait4pid(xspawn(argv
));
762 } /* End Function action_modload */
764 static void action_execute(const struct devfsd_notify_struct
*info
,
765 const struct config_entry_struct
*entry
,
766 const regmatch_t
*regexpr
, unsigned int numexpr
)
767 /* [SUMMARY] Execute a programme.
768 <info> The devfs change.
769 <entry> The config file entry.
770 <regexpr> The number of subexpression(start, end) offsets within the
772 <numexpr> The number of elements within <<regexpr>>.
777 struct get_variable_info gv_info
;
778 char *argv
[MAX_ARGS
+ 1];
779 char largv
[MAX_ARGS
+ 1][STRING_LENGTH
];
782 gv_info
.devname
= info
->devname
;
783 snprintf(gv_info
.devpath
, sizeof(gv_info
.devpath
), "%s/%s", mount_point
, info
->devname
);
784 for (count
= 0; entry
->u
.execute
.argv
[count
] != NULL
; ++count
) {
785 expand_expression(largv
[count
], STRING_LENGTH
,
786 entry
->u
.execute
.argv
[count
],
787 get_variable
, &gv_info
,
788 gv_info
.devname
, regexpr
, numexpr
);
789 argv
[count
] = largv
[count
];
792 wait4pid(spawn(argv
));
793 } /* End Function action_execute */
796 static void action_copy(const struct devfsd_notify_struct
*info
,
797 const struct config_entry_struct
*entry
,
798 const regmatch_t
*regexpr
, unsigned int numexpr
)
799 /* [SUMMARY] Copy permissions.
800 <info> The devfs change.
801 <entry> The config file entry.
802 <regexpr> This list of subexpression(start, end) offsets within the
804 <numexpr> The number of elements in <<regexpr>>.
809 struct get_variable_info gv_info
;
810 struct stat source_stat
, dest_stat
;
811 char source
[STRING_LENGTH
], destination
[STRING_LENGTH
];
814 dest_stat
.st_mode
= 0;
816 if ((info
->type
== DEVFSD_NOTIFY_CHANGE
) && S_ISLNK(info
->mode
))
819 gv_info
.devname
= info
->devname
;
821 snprintf(gv_info
.devpath
, sizeof(gv_info
.devpath
), "%s/%s", mount_point
, info
->devname
);
822 expand_expression(source
, STRING_LENGTH
, entry
->u
.copy
.source
,
823 get_variable
, &gv_info
, gv_info
.devname
,
826 expand_expression(destination
, STRING_LENGTH
, entry
->u
.copy
.destination
,
827 get_variable
, &gv_info
, gv_info
.devname
,
830 if (!make_dir_tree(destination
) || lstat(source
, &source_stat
) != 0)
832 lstat(destination
, &dest_stat
);
833 new_mode
= source_stat
.st_mode
& ~S_ISVTX
;
834 if (info
->type
== DEVFSD_NOTIFY_CREATE
)
836 else if ((info
->type
== DEVFSD_NOTIFY_CHANGE
) &&(dest_stat
.st_mode
& S_ISVTX
))
838 ret
= copy_inode(destination
, &dest_stat
, new_mode
, source
, &source_stat
);
839 if (ENABLE_DEBUG
&& ret
&& (errno
!= EEXIST
))
840 error_logger(LOG_ERR
, "copy_inode: %s to %s", source
, destination
);
841 } /* End Function action_copy */
843 static void action_compat(const struct devfsd_notify_struct
*info
, unsigned int action
)
844 /* [SUMMARY] Process a compatibility request.
845 <info> The devfs change.
846 <action> The action to take.
851 const char *compat_name
= NULL
;
852 const char *dest_name
= info
->devname
;
854 char compat_buf
[STRING_LENGTH
], dest_buf
[STRING_LENGTH
];
855 int mode
, host
, bus
, target
, lun
;
858 /* 1 to 5 "scsi/" , 6 to 9 "ide/host" */
859 static const char *const fmt
[] = {
861 "sg/c%db%dt%du%d", /* scsi/generic */
862 "sd/c%db%dt%du%d", /* scsi/disc */
863 "sr/c%db%dt%du%d", /* scsi/cd */
864 "sd/c%db%dt%du%dp%d", /* scsi/part */
865 "st/c%db%dt%du%dm%d%c", /* scsi/mt */
866 "ide/hd/c%db%dt%du%d", /* ide/host/disc */
867 "ide/cd/c%db%dt%du%d", /* ide/host/cd */
868 "ide/hd/c%db%dt%du%dp%d", /* ide/host/part */
869 "ide/mt/c%db%dt%du%d%s", /* ide/host/mt */
873 /* First construct compatibility name */
877 compat_name
= get_old_name(info
->devname
, info
->namelen
, compat_buf
, info
->major
, info
->minor
);
881 ptr
= bb_basename(info
->devname
);
882 i
= scan_dev_name(info
->devname
, info
->namelen
, ptr
);
888 sscanf(info
->devname
+ ((i
< 6) ? 5 : 4), "host%d/bus%d/target%d/lun%d/", &host
, &bus
, &target
, &lun
);
889 snprintf(dest_buf
, sizeof(dest_buf
), "../%s", info
->devname
+ (( i
> 5) ? 4 : 0));
890 dest_name
= dest_buf
;
891 compat_name
= compat_buf
;
894 /* 1 == scsi/generic 2 == scsi/disc 3 == scsi/cd 6 == ide/host/disc 7 == ide/host/cd */
895 if (i
== 1 || i
== 2 || i
== 3 || i
== 6 || i
==7)
896 sprintf(compat_buf
, fmt
[i
], host
, bus
, target
, lun
);
898 /* 4 == scsi/part 8 == ide/host/part */
899 if (i
== 4 || i
== 8)
900 sprintf(compat_buf
, fmt
[i
], host
, bus
, target
, lun
, atoi(ptr
+ 4));
904 rewind_
= info
->devname
[info
->namelen
- 1];
908 if (ptr
[2] == 'l' /*108*/ || ptr
[2] == 'm'/*109*/)
909 mode
= ptr
[2] - 107; /* 1 or 2 */
912 sprintf(compat_buf
, fmt
[i
], host
, bus
, target
, lun
, mode
, rewind_
);
915 /* 9 == ide/host/mt */
917 snprintf(compat_buf
, sizeof(compat_buf
), fmt
[i
], host
, bus
, target
, lun
, ptr
+ 2);
919 } /* switch (action) */
921 if (compat_name
== NULL
)
924 /* Now decide what to do with it */
928 mksymlink(dest_name
, compat_name
);
932 ret
= unlink(compat_name
);
933 if (ENABLE_DEBUG
&& ret
)
934 error_logger(LOG_ERR
, "unlink: %s", compat_name
);
937 } /* switch (action) */
938 } /* End Function action_compat */
940 static void restore(char *spath
, struct stat source_stat
, int rootlen
)
943 struct stat dest_stat
;
945 dest_stat
.st_mode
= 0;
946 dpath
= concat_path_file(mount_point
, spath
+ rootlen
);
947 lstat(dpath
, &dest_stat
);
949 if (S_ISLNK(source_stat
.st_mode
) || (source_stat
.st_mode
& S_ISVTX
))
950 copy_inode(dpath
, &dest_stat
,(source_stat
.st_mode
& ~S_ISVTX
) , spath
, &source_stat
);
952 if (S_ISDIR(source_stat
.st_mode
))
953 dir_operation(RESTORE
, spath
, rootlen
,NULL
);
957 static int copy_inode(const char *destpath
, const struct stat
*dest_stat
,
959 const char *sourcepath
, const struct stat
*source_stat
)
960 /* [SUMMARY] Copy an inode.
961 <destpath> The destination path. An existing inode may be deleted.
962 <dest_stat> The destination stat(2) information.
963 <new_mode> The desired new mode for the destination.
964 <sourcepath> The source path.
965 <source_stat> The source stat(2) information.
966 [RETURNS] TRUE on success, else FALSE.
969 int source_len
, dest_len
;
970 char source_link
[STRING_LENGTH
], dest_link
[STRING_LENGTH
];
972 struct sockaddr_un un_addr
;
973 char symlink_val
[STRING_LENGTH
];
975 if ((source_stat
->st_mode
& S_IFMT
) ==(dest_stat
->st_mode
& S_IFMT
)) {
977 if (S_ISLNK(source_stat
->st_mode
)) {
978 source_len
= readlink(sourcepath
, source_link
, STRING_LENGTH
- 1);
980 || (dest_len
= readlink(destpath
, dest_link
, STRING_LENGTH
- 1)) < 0
983 source_link
[source_len
] = '\0';
984 dest_link
[dest_len
] = '\0';
985 if ((source_len
!= dest_len
) || (strcmp(source_link
, dest_link
) != 0)) {
987 symlink(source_link
, destpath
);
990 } /* Else not a symlink */
991 chmod(destpath
, new_mode
& ~S_IFMT
);
992 chown(destpath
, source_stat
->st_uid
, source_stat
->st_gid
);
995 /* Different types: unlink and create */
997 switch (source_stat
->st_mode
& S_IFMT
) {
999 fd
= socket(AF_UNIX
, SOCK_STREAM
, 0);
1002 un_addr
.sun_family
= AF_UNIX
;
1003 snprintf(un_addr
.sun_path
, sizeof(un_addr
.sun_path
), "%s", destpath
);
1004 val
= bind(fd
,(struct sockaddr
*) &un_addr
,(int) sizeof un_addr
);
1006 if (val
!= 0 || chmod(destpath
, new_mode
& ~S_IFMT
) != 0)
1010 val
= readlink(sourcepath
, symlink_val
, STRING_LENGTH
- 1);
1013 symlink_val
[val
] = '\0';
1014 if (symlink(symlink_val
, destpath
) == 0)
1018 fd
= open(destpath
, O_RDONLY
| O_CREAT
, new_mode
& ~S_IFMT
);
1022 if (chmod(destpath
, new_mode
& ~S_IFMT
) != 0)
1028 if (mknod(destpath
, new_mode
, source_stat
->st_rdev
) != 0)
1032 if (mkdir(destpath
, new_mode
& ~S_IFMT
) != 0)
1035 if (chown(destpath
, source_stat
->st_uid
, source_stat
->st_gid
) == 0)
1040 } /* End Function copy_inode */
1042 static void free_config(void)
1043 /* [SUMMARY] Free the configuration information.
1047 struct config_entry_struct
*c_entry
;
1050 for (c_entry
= first_config
; c_entry
!= NULL
; c_entry
= next
) {
1053 next
= c_entry
->next
;
1054 regfree(&c_entry
->preg
);
1055 if (c_entry
->action
.what
== AC_EXECUTE
) {
1056 for (count
= 0; count
< MAX_ARGS
; ++count
) {
1057 if (c_entry
->u
.execute
.argv
[count
] == NULL
)
1059 free(c_entry
->u
.execute
.argv
[count
]);
1064 first_config
= NULL
;
1066 } /* End Function free_config */
1068 static int get_uid_gid(int flag
, const char *string
)
1069 /* [SUMMARY] Convert a string to a UID or GID value.
1070 <flag> "UID" or "GID".
1071 <string> The string.
1072 [RETURNS] The UID or GID value.
1075 struct passwd
*pw_ent
;
1076 struct group
*grp_ent
;
1077 static const char *msg
;
1079 if (ENABLE_DEVFSD_VERBOSE
)
1082 if (isdigit(string
[0]) ||((string
[0] == '-') && isdigit(string
[1])))
1083 return atoi(string
);
1085 if (flag
== UID
&& (pw_ent
= getpwnam(string
)) != NULL
)
1086 return pw_ent
->pw_uid
;
1088 if (flag
== GID
&& (grp_ent
= getgrnam(string
)) != NULL
)
1089 return grp_ent
->gr_gid
;
1090 else if (ENABLE_DEVFSD_VERBOSE
)
1093 if (ENABLE_DEVFSD_VERBOSE
)
1094 msg_logger(LOG_ERR
, "unknown %s: %s, defaulting to %cid=0", msg
, string
, msg
[0]);
1096 }/* End Function get_uid_gid */
1098 static mode_t
get_mode(const char *string
)
1099 /* [SUMMARY] Convert a string to a mode value.
1100 <string> The string.
1101 [RETURNS] The mode value.
1107 if (isdigit(string
[0]))
1108 return strtoul(string
, NULL
, 8);
1109 if (strlen(string
) != 9)
1110 msg_logger_and_die(LOG_ERR
, "bad mode: %s", string
);
1115 if (string
[0] == 'r' || string
[0] == 'w' || string
[0] == 'x')
1121 } /* End Function get_mode */
1123 static void signal_handler(int sig
)
1125 caught_signal
= TRUE
;
1127 caught_sighup
= TRUE
;
1129 info_logger(LOG_INFO
, "Caught signal %d", sig
);
1130 } /* End Function signal_handler */
1132 static const char *get_variable(const char *variable
, void *info
)
1134 static char sbuf
[sizeof(int)*3 + 2]; /* sign and NUL */
1135 static char *hostname
;
1137 struct get_variable_info
*gv_info
= info
;
1138 const char *field_names
[] = {
1139 "hostname", "mntpt", "devpath", "devname",
1140 "uid", "gid", "mode", hostname
, mount_point
,
1141 gv_info
->devpath
, gv_info
->devname
, NULL
1146 hostname
= safe_gethostname();
1147 /* index_in_str_array returns i>=0 */
1148 i
= index_in_str_array(field_names
, variable
);
1150 if (i
> 6 || i
< 0 || (i
> 1 && gv_info
== NULL
))
1152 if (i
>= 0 && i
<= 3)
1153 return field_names
[i
+ 7];
1156 sprintf(sbuf
, "%u", gv_info
->info
->uid
);
1158 sprintf(sbuf
, "%u", gv_info
->info
->gid
);
1160 sprintf(sbuf
, "%o", gv_info
->info
->mode
);
1162 } /* End Function get_variable */
1164 static void service(struct stat statbuf
, char *path
)
1166 struct devfsd_notify_struct info
;
1168 memset(&info
, 0, sizeof info
);
1169 info
.type
= DEVFSD_NOTIFY_REGISTERED
;
1170 info
.mode
= statbuf
.st_mode
;
1171 info
.major
= major(statbuf
.st_rdev
);
1172 info
.minor
= minor(statbuf
.st_rdev
);
1173 info
.uid
= statbuf
.st_uid
;
1174 info
.gid
= statbuf
.st_gid
;
1175 snprintf(info
.devname
, sizeof(info
.devname
), "%s", path
+ strlen(mount_point
) + 1);
1176 info
.namelen
= strlen(info
.devname
);
1177 service_name(&info
);
1178 if (S_ISDIR(statbuf
.st_mode
))
1179 dir_operation(SERVICE
, path
, 0, NULL
);
1182 static void dir_operation(int type
, const char * dir_name
, int var
, unsigned long *event_mask
)
1183 /* [SUMMARY] Scan a directory tree and generate register events on leaf nodes.
1184 <flag> To choose which function to perform
1185 <dp> The directory pointer. This is closed upon completion.
1186 <dir_name> The name of the directory.
1187 <rootlen> string length parameter.
1191 struct stat statbuf
;
1196 dp
= warn_opendir(dir_name
);
1200 while ((de
= readdir(dp
)) != NULL
) {
1202 if (de
->d_name
&& DOT_OR_DOTDOT(de
->d_name
))
1204 path
= concat_path_file(dir_name
, de
->d_name
);
1205 if (lstat(path
, &statbuf
) == 0) {
1208 service(statbuf
, path
);
1211 restore(path
, statbuf
, var
);
1214 read_config_file(path
, var
, event_mask
);
1221 } /* End Function do_scan_and_service */
1223 static int mksymlink(const char *oldpath
, const char *newpath
)
1224 /* [SUMMARY] Create a symlink, creating intervening directories as required.
1225 <oldpath> The string contained in the symlink.
1226 <newpath> The name of the new symlink.
1227 [RETURNS] 0 on success, else -1.
1230 if (!make_dir_tree(newpath
))
1233 if (symlink(oldpath
, newpath
) != 0) {
1234 if (errno
!= EEXIST
)
1238 } /* End Function mksymlink */
1241 static int make_dir_tree(const char *path
)
1242 /* [SUMMARY] Creating intervening directories for a path as required.
1243 <path> The full pathname(including the leaf node).
1244 [RETURNS] TRUE on success, else FALSE.
1247 if (bb_make_directory(dirname((char *)path
), -1, FILEUTILS_RECUR
) == -1)
1250 } /* End Function make_dir_tree */
1252 static int expand_expression(char *output
, unsigned int outsize
,
1254 const char *(*get_variable_func
)(const char *variable
, void *info
),
1256 const char *devname
,
1257 const regmatch_t
*ex
, unsigned int numexp
)
1258 /* [SUMMARY] Expand environment variables and regular subexpressions in string.
1259 <output> The output expanded expression is written here.
1260 <length> The size of the output buffer.
1261 <input> The input expression. This may equal <<output>>.
1262 <get_variable> A function which will be used to get variable values. If
1263 this returns NULL, the environment is searched instead. If this is NULL,
1264 only the environment is searched.
1265 <info> An arbitrary pointer passed to <<get_variable>>.
1266 <devname> Device name; specifically, this is the string that contains all
1267 of the regular subexpressions.
1268 <ex> Array of start / end offsets into info->devname for each subexpression
1269 <numexp> Number of regular subexpressions found in <<devname>>.
1270 [RETURNS] TRUE on success, else FALSE.
1273 char temp
[STRING_LENGTH
];
1275 if (!st_expr_expand(temp
, STRING_LENGTH
, input
, get_variable_func
, info
))
1277 expand_regexp(output
, outsize
, temp
, devname
, ex
, numexp
);
1279 } /* End Function expand_expression */
1281 static void expand_regexp(char *output
, size_t outsize
, const char *input
,
1282 const char *devname
,
1283 const regmatch_t
*ex
, unsigned int numex
)
1284 /* [SUMMARY] Expand all occurrences of the regular subexpressions \0 to \9.
1285 <output> The output expanded expression is written here.
1286 <outsize> The size of the output buffer.
1287 <input> The input expression. This may NOT equal <<output>>, because
1288 supporting that would require yet another string-copy. However, it's not
1289 hard to write a simple wrapper function to add this functionality for those
1290 few cases that need it.
1291 <devname> Device name; specifically, this is the string that contains all
1292 of the regular subexpressions.
1293 <ex> An array of start and end offsets into <<devname>>, one for each
1295 <numex> Number of subexpressions in the offset-array <<ex>>.
1299 const char last_exp
= '0' - 1 + numex
;
1302 /* Guarantee NULL termination by writing an explicit '\0' character into
1303 the very last byte */
1305 output
[--outsize
] = '\0';
1306 /* Copy the input string into the output buffer, replacing '\\' with '\'
1307 and '\0' .. '\9' with subexpressions 0 .. 9, if they exist. Other \x
1308 codes are deleted */
1309 while ((c
!= '\0') && (outsize
!= 0)) {
1316 if ((c
>= '0') && (c
<= last_exp
)) {
1317 const regmatch_t
*subexp
= ex
+ (c
- '0');
1318 unsigned int sublen
= subexp
->rm_eo
- subexp
->rm_so
;
1320 /* Range checking */
1321 if (sublen
> outsize
)
1323 strncpy(output
, devname
+ subexp
->rm_so
, sublen
);
1334 } /* End Function expand_regexp */
1337 /* from compat_name.c */
1339 struct translate_struct
1341 const char *match
; /* The string to match to(up to length) */
1342 const char *format
; /* Format of output, "%s" takes data past match string,
1343 NULL is effectively "%s"(just more efficient) */
1346 static struct translate_struct translate_table
[] =
1349 {"printers/", "lp%s"},
1351 {"parports/", "parport%s"},
1354 {"loop/", "loop%s"},
1355 {"floppy/", "fd%s"},
1357 {"md/", "md%s"}, /* Meta-devices */
1361 {"pg/", "pg%s"}, /* Parallel port generic ATAPI interface*/
1363 {"staliomem/", "staliomem%s"}, /* Stallion serial driver control */
1364 {"tts/E", "ttyE%s"}, /* Stallion serial driver */
1365 {"cua/E", "cue%s"}, /* Stallion serial driver callout */
1366 {"tts/R", "ttyR%s"}, /* Rocketport serial driver */
1367 {"cua/R", "cur%s"}, /* Rocketport serial driver callout */
1368 {"ip2/", "ip2%s"}, /* Computone serial driver control */
1369 {"tts/F", "ttyF%s"}, /* Computone serial driver */
1370 {"cua/F", "cuf%s"}, /* Computone serial driver callout */
1371 {"tts/C", "ttyC%s"}, /* Cyclades serial driver */
1372 {"cua/C", "cub%s"}, /* Cyclades serial driver callout */
1373 {"tts/", "ttyS%s"}, /* Generic serial: must be after others */
1374 {"cua/", "cua%s"}, /* Generic serial: must be after others */
1375 {"input/js", "js%s"}, /* Joystick driver */
1379 const char *get_old_name(const char *devname
, unsigned int namelen
,
1380 char *buffer
, unsigned int major
, unsigned int minor
)
1381 /* [SUMMARY] Translate a kernel-supplied name into an old name.
1382 <devname> The device name provided by the kernel.
1383 <namelen> The length of the name.
1384 <buffer> A buffer that may be used. This should be at least 128 bytes long.
1385 <major> The major number for the device.
1386 <minor> The minor number for the device.
1387 [RETURNS] A pointer to the old name if known, else NULL.
1390 const char *compat_name
= NULL
;
1392 struct translate_struct
*trans
;
1399 /* 1 to 5 "scsi/" , 6 to 9 "ide/host", 10 sbp/, 11 vcc/, 12 pty/ */
1400 static const char *const fmt
[] = {
1402 "sg%u", /* scsi/generic */
1403 NULL
, /* scsi/disc */
1404 "sr%u", /* scsi/cd */
1405 NULL
, /* scsi/part */
1406 "nst%u%c", /* scsi/mt */
1407 "hd%c" , /* ide/host/disc */
1408 "hd%c" , /* ide/host/cd */
1409 "hd%c%s", /* ide/host/part */
1410 "%sht%d", /* ide/host/mt */
1411 "sbpcd%u", /* sbp/ */
1413 "%cty%c%c", /* pty/ */
1417 for (trans
= translate_table
; trans
->match
!= NULL
; ++trans
) {
1418 len
= strlen(trans
->match
);
1420 if (strncmp(devname
, trans
->match
, len
) == 0) {
1421 if (trans
->format
== NULL
)
1422 return devname
+ len
;
1423 sprintf(buffer
, trans
->format
, devname
+ len
);
1428 ptr
= bb_basename(devname
);
1429 i
= scan_dev_name(devname
, namelen
, ptr
);
1431 if (i
> 0 && i
< 13)
1432 compat_name
= buffer
;
1436 /* 1 == scsi/generic, 3 == scsi/cd, 10 == sbp/ */
1437 if (i
== 1 || i
== 3 || i
== 10)
1438 sprintf(buffer
, fmt
[i
], minor
);
1440 /* 2 ==scsi/disc, 4 == scsi/part */
1441 if (i
== 2 || i
== 4)
1442 compat_name
= write_old_sd_name(buffer
, major
, minor
,((i
== 2) ? "" : (ptr
+ 4)));
1449 sprintf(buffer
, fmt
[i
], minor
& 0x1f, mode
);
1450 if (devname
[namelen
- 1] != 'n')
1453 /* 6 == ide/host/disc, 7 == ide/host/cd, 8 == ide/host/part */
1454 if (i
== 6 || i
== 7 || i
== 8)
1455 /* last arg should be ignored for i == 6 or i== 7 */
1456 sprintf(buffer
, fmt
[i
] , get_old_ide_name(major
, minor
), ptr
+ 4);
1458 /* 9 == ide/host/mt */
1460 sprintf(buffer
, fmt
[i
], ptr
+ 2, minor
& 0x7f);
1464 sprintf(buffer
, fmt
[i
], devname
+ 4);
1465 if (buffer
[3] == '0')
1470 pty1
= "pqrstuvwxyzabcde";
1471 pty2
= "0123456789abcdef";
1472 indexx
= atoi(devname
+ 5);
1473 sprintf(buffer
, fmt
[i
], (devname
[4] == 'm') ? 'p' : 't', pty1
[indexx
>> 4], pty2
[indexx
& 0x0f]);
1476 } /* End Function get_old_name */
1478 static char get_old_ide_name(unsigned int major
, unsigned int minor
)
1479 /* [SUMMARY] Get the old IDE name for a device.
1480 <major> The major number for the device.
1481 <minor> The minor number for the device.
1482 [RETURNS] The drive letter.
1485 char letter
= 'y'; /* 121 */
1486 char c
= 'a'; /* 97 */
1489 /* I hope it works like the previous code as it saves a few bytes. Tito ;P */
1491 if (i
== IDE0_MAJOR
|| i
== IDE1_MAJOR
|| i
== IDE2_MAJOR
1492 || i
== IDE3_MAJOR
|| i
== IDE4_MAJOR
|| i
== IDE5_MAJOR
1493 || i
== IDE6_MAJOR
|| i
== IDE7_MAJOR
|| i
== IDE8_MAJOR
1496 if ((unsigned int)i
== major
) {
1503 } while (i
<= IDE9_MAJOR
);
1508 } /* End Function get_old_ide_name */
1510 static char *write_old_sd_name(char *buffer
,
1511 unsigned int major
, unsigned int minor
,
1513 /* [SUMMARY] Write the old SCSI disc name to a buffer.
1514 <buffer> The buffer to write to.
1515 <major> The major number for the device.
1516 <minor> The minor number for the device.
1517 <part> The partition string. Must be "" for a whole-disc entry.
1518 [RETURNS] A pointer to the buffer on success, else NULL.
1521 unsigned int disc_index
;
1524 sprintf(buffer
, "sd%c%s", 'a' + (minor
>> 4), part
);
1527 if ((major
> 64) && (major
< 72)) {
1528 disc_index
= ((major
- 64) << 4) +(minor
>> 4);
1529 if (disc_index
< 26)
1530 sprintf(buffer
, "sd%c%s", 'a' + disc_index
, part
);
1532 sprintf(buffer
, "sd%c%c%s", 'a' +(disc_index
/ 26) - 1, 'a' + disc_index
% 26, part
);
1536 } /* End Function write_old_sd_name */
1541 /*EXPERIMENTAL_FUNCTION*/
1543 int st_expr_expand(char *output
, unsigned int length
, const char *input
,
1544 const char *(*get_variable_func
)(const char *variable
,
1547 /* [SUMMARY] Expand an expression using Borne Shell-like unquoted rules.
1548 <output> The output expanded expression is written here.
1549 <length> The size of the output buffer.
1550 <input> The input expression. This may equal <<output>>.
1551 <get_variable> A function which will be used to get variable values. If
1552 this returns NULL, the environment is searched instead. If this is NULL,
1553 only the environment is searched.
1554 <info> An arbitrary pointer passed to <<get_variable>>.
1555 [RETURNS] TRUE on success, else FALSE.
1560 unsigned int out_pos
= 0;
1563 struct passwd
*pwent
;
1564 char buffer
[BUFFER_SIZE
], tmp
[STRING_LENGTH
];
1566 if (length
> BUFFER_SIZE
)
1567 length
= BUFFER_SIZE
;
1568 for (; TRUE
; ++input
) {
1569 switch (ch
= *input
) {
1571 /* Variable expansion */
1572 input
= expand_variable(buffer
, length
, &out_pos
, ++input
, get_variable_func
, info
);
1577 /* Home directory expansion */
1579 if (isspace(ch
) ||(ch
== '/') ||(ch
== '\0')) {
1580 /* User's own home directory: leave separator for next time */
1581 env
= getenv("HOME");
1583 info_logger(LOG_INFO
, bb_msg_variable_not_found
, "HOME");
1587 if (len
+ out_pos
>= length
)
1588 goto st_expr_expand_out
;
1589 memcpy(buffer
+ out_pos
, env
, len
+ 1);
1593 /* Someone else's home directory */
1594 for (ptr
= ++input
; !isspace(ch
) && (ch
!= '/') && (ch
!= '\0'); ch
= *++ptr
)
1597 if (len
>= sizeof tmp
)
1598 goto st_expr_expand_out
;
1599 safe_memcpy(tmp
, input
, len
);
1601 pwent
= getpwnam(tmp
);
1602 if (pwent
== NULL
) {
1603 info_logger(LOG_INFO
, "no pwent for: %s", tmp
);
1606 len
= strlen(pwent
->pw_dir
);
1607 if (len
+ out_pos
>= length
)
1608 goto st_expr_expand_out
;
1609 memcpy(buffer
+ out_pos
, pwent
->pw_dir
, len
+ 1);
1615 if (out_pos
>= length
)
1616 goto st_expr_expand_out
;
1617 buffer
[out_pos
++] = ch
;
1619 memcpy(output
, buffer
, out_pos
);
1628 info_logger(LOG_INFO
, bb_msg_small_buffer
);
1630 } /* End Function st_expr_expand */
1633 /* Private functions follow */
1635 static const char *expand_variable(char *buffer
, unsigned int length
,
1636 unsigned int *out_pos
, const char *input
,
1637 const char *(*func
)(const char *variable
,
1640 /* [SUMMARY] Expand a variable.
1641 <buffer> The buffer to write to.
1642 <length> The length of the output buffer.
1643 <out_pos> The current output position. This is updated.
1644 <input> A pointer to the input character pointer.
1645 <func> A function which will be used to get variable values. If this
1646 returns NULL, the environment is searched instead. If this is NULL, only
1647 the environment is searched.
1648 <info> An arbitrary pointer passed to <<func>>.
1649 <errfp> Diagnostic messages are written here.
1650 [RETURNS] A pointer to the end of this subexpression on success, else NULL.
1655 unsigned int open_braces
;
1656 const char *env
, *ptr
;
1657 char tmp
[STRING_LENGTH
];
1661 /* Special case for "$$": PID */
1662 sprintf(tmp
, "%d",(int) getpid());
1664 if (len
+ *out_pos
>= length
)
1665 goto expand_variable_out
;
1667 memcpy(buffer
+ *out_pos
, tmp
, len
+ 1);
1671 /* Ordinary variable expansion, possibly in braces */
1673 /* Simple variable expansion */
1674 for (ptr
= input
; isalnum(ch
) || (ch
== '_') || (ch
== ':'); ch
= *++ptr
)
1677 if ((size_t)len
>= sizeof tmp
)
1678 goto expand_variable_out
;
1680 safe_memcpy(tmp
, input
, len
);
1682 env
= get_variable_v2(tmp
, func
, info
);
1684 info_logger(LOG_INFO
, bb_msg_variable_not_found
, tmp
);
1688 if (len
+ *out_pos
>= length
)
1689 goto expand_variable_out
;
1691 memcpy(buffer
+ *out_pos
, env
, len
+ 1);
1695 /* Variable in braces: check for ':' tricks */
1697 for (ptr
= input
; isalnum(ch
) || (ch
== '_'); ch
= *++ptr
)
1700 /* Must be simple variable expansion with "${var}" */
1702 if ((size_t)len
>= sizeof tmp
)
1703 goto expand_variable_out
;
1705 safe_memcpy(tmp
, input
, len
);
1706 ptr
= expand_variable(buffer
, length
, out_pos
, tmp
, func
, info
);
1711 if (ch
!= ':' || ptr
[1] != '-') {
1712 info_logger(LOG_INFO
, "illegal char in var name");
1715 /* It's that handy "${var:-word}" expression. Check if var is defined */
1717 if ((size_t)len
>= sizeof tmp
)
1718 goto expand_variable_out
;
1720 safe_memcpy(tmp
, input
, len
);
1721 /* Move input pointer to ':' */
1723 /* First skip to closing brace, taking note of nested expressions */
1726 for (open_braces
= 1; open_braces
> 0; ch
= *++ptr
) {
1735 info_logger(LOG_INFO
, "\"}\" not found in: %s", input
);
1742 /* At this point ptr should point to closing brace of "${var:-word}" */
1743 env
= get_variable_v2(tmp
, func
, info
);
1745 /* Found environment variable, so skip the input to the closing brace
1746 and return the variable */
1749 if (len
+ *out_pos
>= length
)
1750 goto expand_variable_out
;
1752 memcpy(buffer
+ *out_pos
, env
, len
+ 1);
1756 /* Environment variable was not found, so process word. Advance input
1757 pointer to start of word in "${var:-word}" */
1760 if ((size_t)len
>= sizeof tmp
)
1761 goto expand_variable_out
;
1763 safe_memcpy(tmp
, input
, len
);
1765 if (!st_expr_expand(tmp
, STRING_LENGTH
, tmp
, func
, info
))
1768 if (len
+ *out_pos
>= length
)
1769 goto expand_variable_out
;
1771 memcpy(buffer
+ *out_pos
, tmp
, len
+ 1);
1774 expand_variable_out
:
1775 info_logger(LOG_INFO
, bb_msg_small_buffer
);
1777 } /* End Function expand_variable */
1780 static const char *get_variable_v2(const char *variable
,
1781 const char *(*func
)(const char *variable
, void *info
),
1783 /* [SUMMARY] Get a variable from the environment or .
1784 <variable> The variable name.
1785 <func> A function which will be used to get the variable. If this returns
1786 NULL, the environment is searched instead. If this is NULL, only the
1787 environment is searched.
1788 [RETURNS] The value of the variable on success, else NULL.
1794 value
= (*func
)(variable
, info
);
1798 return getenv(variable
);
1799 } /* End Function get_variable */