libbb: added xfdopen_for_read/write
[platform/upstream/busybox.git] / modutils / lsmod.c
1 /* vi: set sw=4 ts=4: */
2 /*
3  * Mini lsmod implementation for busybox
4  *
5  * Copyright (C) 1999-2004 by Erik Andersen <andersen@codepoet.org>
6  * Copyright (C) 2008 by Vladimir Dronnikov <dronnikov@gmail.com>
7  *
8  * Licensed under GPLv2 or later, see file LICENSE in this tarball for details.
9  */
10 #include "libbb.h"
11 #include "unicode.h"
12
13 #if ENABLE_FEATURE_CHECK_TAINTED_MODULE
14 enum {
15         TAINT_PROPRIETORY_MODULE = (1 << 0),
16         TAINT_FORCED_MODULE      = (1 << 1),
17         TAINT_UNSAFE_SMP         = (1 << 2),
18 };
19
20 static void check_tainted(void)
21 {
22         int tainted = 0;
23         char *buf = xmalloc_open_read_close("/proc/sys/kernel/tainted", NULL);
24         if (buf) {
25                 tainted = atoi(buf);
26                 if (ENABLE_FEATURE_CLEAN_UP)
27                         free(buf);
28         }
29
30         if (tainted) {
31                 printf("    Tainted: %c%c%c\n",
32                                 tainted & TAINT_PROPRIETORY_MODULE      ? 'P' : 'G',
33                                 tainted & TAINT_FORCED_MODULE           ? 'F' : ' ',
34                                 tainted & TAINT_UNSAFE_SMP              ? 'S' : ' ');
35         } else {
36                 puts("    Not tainted");
37         }
38 }
39 #else
40 static void check_tainted(void) { putchar('\n'); }
41 #endif
42
43 int lsmod_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
44 int lsmod_main(int argc UNUSED_PARAM, char **argv UNUSED_PARAM)
45 {
46 #if ENABLE_FEATURE_LSMOD_PRETTY_2_6_OUTPUT
47         char *token[4];
48         parser_t *parser = config_open("/proc/modules");
49 # if ENABLE_FEATURE_ASSUME_UNICODE
50         size_t name_len;
51 # endif
52         check_unicode_in_env();
53
54         printf("%-24sSize  Used by", "Module");
55         check_tainted();
56
57         if (ENABLE_FEATURE_2_4_MODULES
58          && get_linux_version_code() < KERNEL_VERSION(2,6,0)
59         ) {
60                 while (config_read(parser, token, 4, 3, "# \t", PARSE_NORMAL)) {
61                         if (token[3] != NULL && token[3][0] == '[') {
62                                 token[3]++;
63                                 token[3][strlen(token[3])-1] = '\0';
64                         } else
65                                 token[3] = (char *) "";
66 # if ENABLE_FEATURE_ASSUME_UNICODE
67                         name_len = bb_mbstrlen(token[0]);
68                         name_len = (name_len > 19) ? 0 : 19 - name_len;
69                         printf("%s%*s %8s %2s %s\n", token[0], name_len, "", token[1], token[2], token[3]);
70 # else
71                         printf("%-19s %8s %2s %s\n", token[0], token[1], token[2], token[3]);
72 # endif
73                 }
74         } else {
75                 while (config_read(parser, token, 4, 4, "# \t", PARSE_NORMAL & ~PARSE_GREEDY)) {
76                         // N.B. token[3] is either '-' (module is not used by others)
77                         // or comma-separated list ended by comma
78                         // so trimming the trailing char is just what we need!
79                         token[3][strlen(token[3])-1] = '\0';
80 # if ENABLE_FEATURE_ASSUME_UNICODE
81                         name_len = bb_mbstrlen(token[0]);
82                         name_len = (name_len > 19) ? 0 : 19 - name_len;
83                         printf("%s%*s %8s %2s %s\n", token[0], name_len, "", token[1], token[2], token[3]);
84 # else
85                         printf("%-19s %8s %2s %s\n", token[0], token[1], token[2], token[3]);
86 # endif
87                 }
88         }
89         if (ENABLE_FEATURE_CLEAN_UP)
90                 config_close(parser);
91 #else
92         check_tainted();
93         xprint_and_close_file(xfopen_for_read("/proc/modules"));
94 #endif
95         return EXIT_SUCCESS;
96 }