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
14enum {
15	TAINT_PROPRIETORY_MODULE = (1 << 0),
16	TAINT_FORCED_MODULE      = (1 << 1),
17	TAINT_UNSAFE_SMP         = (1 << 2),
18};
19
20static 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
40static void check_tainted(void) { putchar('\n'); }
41#endif
42
43int lsmod_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
44int 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	init_unicode();
50
51	printf("%-24sSize  Used by", "Module");
52	check_tainted();
53
54	if (ENABLE_FEATURE_2_4_MODULES
55	 && get_linux_version_code() < KERNEL_VERSION(2,6,0)
56	) {
57		while (config_read(parser, token, 4, 3, "# \t", PARSE_NORMAL)) {
58			if (token[3] != NULL && token[3][0] == '[') {
59				token[3]++;
60				token[3][strlen(token[3])-1] = '\0';
61			} else
62				token[3] = (char *) "";
63# if ENABLE_UNICODE_SUPPORT
64			{
65				uni_stat_t uni_stat;
66				char *uni_name = unicode_conv_to_printable(&uni_stat, token[0]);
67				unsigned pad_len = (uni_stat.unicode_width > 19) ? 0 : 19 - uni_stat.unicode_width;
68				printf("%s%*s %8s %2s %s\n", uni_name, pad_len, "", token[1], token[2], token[3]);
69				free(uni_name);
70			}
71# else
72			printf("%-19s %8s %2s %s\n", token[0], token[1], token[2], token[3]);
73# endif
74		}
75	} else {
76		while (config_read(parser, token, 4, 4, "# \t", PARSE_NORMAL & ~PARSE_GREEDY)) {
77			// N.B. token[3] is either '-' (module is not used by others)
78			// or comma-separated list ended by comma
79			// so trimming the trailing char is just what we need!
80			token[3][strlen(token[3])-1] = '\0';
81# if ENABLE_UNICODE_SUPPORT
82			{
83				uni_stat_t uni_stat;
84				char *uni_name = unicode_conv_to_printable(&uni_stat, token[0]);
85				unsigned pad_len = (uni_stat.unicode_width > 19) ? 0 : 19 - uni_stat.unicode_width;
86				printf("%s%*s %8s %2s %s\n", uni_name, pad_len, "", token[1], token[2], token[3]);
87				free(uni_name);
88			}
89# else
90			printf("%-19s %8s %2s %s\n", token[0], token[1], token[2], token[3]);
91# endif
92		}
93	}
94	if (ENABLE_FEATURE_CLEAN_UP)
95		config_close(parser);
96#else
97	check_tainted();
98	xprint_and_close_file(xfopen_for_read("/proc/modules"));
99#endif
100	return EXIT_SUCCESS;
101}
102