groups: new applet
[oweals/busybox.git] / coreutils / id.c
1 /* vi: set sw=4 ts=4: */
2 /*
3  * Mini id implementation for busybox
4  *
5  * Copyright (C) 2000 by Randolph Chung <tausq@debian.org>
6  * Copyright (C) 2008 by Tito Ragusa <farmatito@tiscali.it>
7  *
8  * Licensed under GPLv2 or later, see file LICENSE in this source tree.
9  */
10
11 /* BB_AUDIT SUSv3 compliant. */
12 /* Hacked by Tito Ragusa (C) 2004 to handle usernames of whatever
13  * length and to be more similar to GNU id.
14  * -Z option support: by Yuichi Nakamura <ynakam@hitachisoft.jp>
15  * Added -G option Tito Ragusa (C) 2008 for SUSv3.
16  */
17
18 //config:config ID
19 //config:       bool "id"
20 //config:       default y
21 //config:       help
22 //config:         id displays the current user and group ID names.
23
24 //config:config GROUPS
25 //config:       bool "groups"
26 //config:       default y
27 //config:       help
28 //config:         Print the group names associated with current user id.
29
30 //kbuild:lib-$(CONFIG_GROUPS) += id.o
31 //kbuild:lib-$(CONFIG_ID)     += id.o
32
33 //applet:IF_GROUPS(APPLET_ODDNAME(groups, id, BB_DIR_USR_BIN, BB_SUID_DROP, groups))
34 //applet:IF_ID(APPLET_NOEXEC(id, id, BB_DIR_USR_BIN, BB_SUID_DROP, id))
35
36 //usage:#define id_trivial_usage
37 //usage:       "[OPTIONS] [USER]"
38 //usage:#define id_full_usage "\n\n"
39 //usage:       "Print information about USER or the current user\n"
40 //usage:        IF_SELINUX(
41 //usage:     "\n        -Z      Security context"
42 //usage:        )
43 //usage:     "\n        -u      User ID"
44 //usage:     "\n        -g      Group ID"
45 //usage:     "\n        -G      Supplementary group IDs"
46 //usage:     "\n        -n      Print names instead of numbers"
47 //usage:     "\n        -r      Print real ID instead of effective ID"
48 //usage:
49 //usage:#define id_example_usage
50 //usage:       "$ id\n"
51 //usage:       "uid=1000(andersen) gid=1000(andersen)\n"
52
53 //usage:#define groups_trivial_usage
54 //usage:       "[USER]"
55 //usage:#define groups_full_usage "\n\n"
56 //usage:       "Print the group memberships of USER or for the current process"
57 //usage:
58 //usage:#define groups_example_usage
59 //usage:       "$ groups\n"
60 //usage:       "andersen lp dialout cdrom floppy\n"
61
62 #include "libbb.h"
63
64 /* This is a NOEXEC applet. Be very careful! */
65
66 #if !ENABLE_USE_BB_PWD_GRP
67 #if defined(__UCLIBC_MAJOR__) && (__UCLIBC_MAJOR__ == 0)
68 #if (__UCLIBC_MINOR__ < 9) || (__UCLIBC_MINOR__ == 9 &&  __UCLIBC_SUBLEVEL__ < 30)
69 #error "Sorry, you need at least uClibc version 0.9.30 for id applet to build"
70 #endif
71 #endif
72 #endif
73
74 enum {
75         PRINT_REAL      = (1 << 0),
76         NAME_NOT_NUMBER = (1 << 1),
77         JUST_USER       = (1 << 2),
78         JUST_GROUP      = (1 << 3),
79         JUST_ALL_GROUPS = (1 << 4),
80 #if ENABLE_SELINUX
81         JUST_CONTEXT    = (1 << 5),
82 #endif
83 };
84
85 static int print_common(unsigned id, const char *name, const char *prefix)
86 {
87         if (prefix) {
88                 printf("%s", prefix);
89         }
90         if (!(option_mask32 & NAME_NOT_NUMBER) || !name) {
91                 printf("%u", id);
92         }
93         if (!option_mask32 || (option_mask32 & NAME_NOT_NUMBER)) {
94                 if (name) {
95                         printf(option_mask32 ? "%s" : "(%s)", name);
96                 } else {
97                         /* Don't set error status flag in default mode */
98                         if (option_mask32) {
99                                 if (ENABLE_DESKTOP)
100                                         bb_error_msg("unknown ID %u", id);
101                                 return EXIT_FAILURE;
102                         }
103                 }
104         }
105         return EXIT_SUCCESS;
106 }
107
108 static int print_group(gid_t id, const char *prefix)
109 {
110         return print_common(id, gid2group(id), prefix);
111 }
112
113 static int print_user(uid_t id, const char *prefix)
114 {
115         return print_common(id, uid2uname(id), prefix);
116 }
117
118 /* On error set *n < 0 and return >= 0
119  * If *n is too small, update it and return < 0
120  *  (ok to trash groups[] in both cases)
121  * Otherwise fill in groups[] and return >= 0
122  */
123 static int get_groups(const char *username, gid_t rgid, gid_t *groups, int *n)
124 {
125         int m;
126
127         if (username) {
128                 /* If the user is a member of more than
129                  * *n groups, then -1 is returned. Otherwise >= 0.
130                  * (and no defined way of detecting errors?!) */
131                 m = getgrouplist(username, rgid, groups, n);
132                 /* I guess *n < 0 might indicate error. Anyway,
133                  * malloc'ing -1 bytes won't be good, so: */
134                 //if (*n < 0)
135                 //      return 0;
136                 //return m;
137                 //commented out here, happens below anyway
138         } else {
139                 /* On error -1 is returned, which ends up in *n */
140                 int nn = getgroups(*n, groups);
141                 /* 0: nn <= *n, groups[] was big enough; -1 otherwise */
142                 m = - (nn > *n);
143                 *n = nn;
144         }
145         if (*n < 0)
146                 return 0; /* error, don't return < 0! */
147         return m;
148 }
149
150 int id_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
151 int id_main(int argc UNUSED_PARAM, char **argv)
152 {
153         uid_t ruid;
154         gid_t rgid;
155         uid_t euid;
156         gid_t egid;
157         unsigned opt;
158         int i;
159         int status = EXIT_SUCCESS;
160         const char *prefix;
161         const char *username;
162 #if ENABLE_SELINUX
163         security_context_t scontext = NULL;
164 #endif
165
166         if (ENABLE_GROUPS && (!ENABLE_ID || applet_name[0] == 'g')) {
167                 option_mask32 = opt = getopt32(argv, "") | JUST_ALL_GROUPS | NAME_NOT_NUMBER;
168         } else {
169                 /* Don't allow -n -r -nr -ug -rug -nug -rnug -uZ -gZ -GZ*/
170                 /* Don't allow more than one username */
171                 opt_complementary = "?1:u--g:g--u:G--u:u--G:g--G:G--g:r?ugG:n?ugG"
172                          IF_SELINUX(":u--Z:Z--u:g--Z:Z--g:G--Z:Z--G");
173                 opt = getopt32(argv, "rnugG" IF_SELINUX("Z"));
174         }
175
176         username = argv[optind];
177         if (username) {
178                 struct passwd *p = xgetpwnam(username);
179                 euid = ruid = p->pw_uid;
180                 egid = rgid = p->pw_gid;
181         } else {
182                 egid = getegid();
183                 rgid = getgid();
184                 euid = geteuid();
185                 ruid = getuid();
186         }
187         /* JUST_ALL_GROUPS ignores -r PRINT_REAL flag even if man page for */
188         /* id says: print the real ID instead of the effective ID, with -ugG */
189         /* in fact in this case egid is always printed if egid != rgid */
190         if (!opt || (opt & JUST_ALL_GROUPS)) {
191                 gid_t *groups;
192                 int n;
193
194                 if (!opt) {
195                         /* Default Mode */
196                         status |= print_user(ruid, "uid=");
197                         status |= print_group(rgid, " gid=");
198                         if (euid != ruid)
199                                 status |= print_user(euid, " euid=");
200                         if (egid != rgid)
201                                 status |= print_group(egid, " egid=");
202                 } else {
203                         /* JUST_ALL_GROUPS */
204                         status |= print_group(rgid, NULL);
205                         if (egid != rgid)
206                                 status |= print_group(egid, " ");
207                 }
208                 /* We are supplying largish buffer, trying
209                  * to not run get_groups() twice. That might be slow
210                  * ("user database in remote SQL server" case) */
211                 groups = xmalloc(64 * sizeof(gid_t));
212                 n = 64;
213                 if (get_groups(username, rgid, groups, &n) < 0) {
214                         /* Need bigger buffer after all */
215                         groups = xrealloc(groups, n * sizeof(gid_t));
216                         get_groups(username, rgid, groups, &n);
217                 }
218                 if (n > 0) {
219                         /* Print the list */
220                         prefix = " groups=";
221                         for (i = 0; i < n; i++) {
222                                 if (opt && (groups[i] == rgid || groups[i] == egid))
223                                         continue;
224                                 status |= print_group(groups[i], opt ? " " : prefix);
225                                 prefix = ",";
226                         }
227                 } else if (n < 0) { /* error in get_groups() */
228                         if (ENABLE_DESKTOP)
229                                 bb_error_msg_and_die("can't get groups");
230                         return EXIT_FAILURE;
231                 }
232                 if (ENABLE_FEATURE_CLEAN_UP)
233                         free(groups);
234 #if ENABLE_SELINUX
235                 if (is_selinux_enabled()) {
236                         if (getcon(&scontext) == 0)
237                                 printf(" context=%s", scontext);
238                 }
239 #endif
240         } else if (opt & PRINT_REAL) {
241                 euid = ruid;
242                 egid = rgid;
243         }
244
245         if (opt & JUST_USER)
246                 status |= print_user(euid, NULL);
247         else if (opt & JUST_GROUP)
248                 status |= print_group(egid, NULL);
249 #if ENABLE_SELINUX
250         else if (opt & JUST_CONTEXT) {
251                 selinux_or_die();
252                 if (username || getcon(&scontext)) {
253                         bb_error_msg_and_die("can't get process context%s",
254                                 username ? " for a different user" : "");
255                 }
256                 fputs(scontext, stdout);
257         }
258         /* freecon(NULL) seems to be harmless */
259         if (ENABLE_FEATURE_CLEAN_UP)
260                 freecon(scontext);
261 #endif
262         bb_putchar('\n');
263         fflush_stdout_and_exit(status);
264 }