Whamcloud - gitweb
23c7ce413cd429ccd8372ab5dfa8c172509834b2
[fs/lustre-release.git] / lustre / mdt / mdt_identity.c
1 /*
2  * GPL HEADER START
3  *
4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License version 2 only,
8  * as published by the Free Software Foundation.
9  *
10  * This program is distributed in the hope that it will be useful, but
11  * WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  * General Public License version 2 for more details (a copy is included
14  * in the LICENSE file that accompanied this code).
15  *
16  * You should have received a copy of the GNU General Public License
17  * version 2 along with this program; If not, see
18  * http://www.sun.com/software/products/lustre/docs/GPLv2.pdf
19  *
20  * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
21  * CA 95054 USA or visit www.sun.com if you need additional information or
22  * have any questions.
23  *
24  * GPL HEADER END
25  */
26 /*
27  * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
28  * Use is subject to license terms.
29  *
30  * Copyright (c) 2011, Whamcloud, Inc.
31  */
32 /*
33  * This file is part of Lustre, http://www.lustre.org/
34  * Lustre is a trademark of Sun Microsystems, Inc.
35  *
36  * lustre/mdt/mdt_identity.c
37  *
38  * Author: Lai Siyao <lsy@clusterfs.com>
39  * Author: Fan Yong <fanyong@clusterfs.com>
40  */
41
42 #define DEBUG_SUBSYSTEM S_MDS
43
44 #include <linux/module.h>
45 #include <linux/kernel.h>
46 #include <linux/mm.h>
47 #include <linux/kmod.h>
48 #include <linux/string.h>
49 #include <linux/stat.h>
50 #include <linux/errno.h>
51 #include <linux/version.h>
52 #include <linux/unistd.h>
53 #include <asm/system.h>
54 #include <asm/uaccess.h>
55 #include <linux/fs.h>
56 #include <linux/stat.h>
57 #include <asm/uaccess.h>
58 #include <linux/slab.h>
59
60 #include <libcfs/libcfs.h>
61 #include <libcfs/lucache.h>
62 #include <obd.h>
63 #include <obd_class.h>
64 #include <obd_support.h>
65 #include <lustre_net.h>
66 #include <lustre_import.h>
67 #include <lustre_dlm.h>
68 #include <lustre_lib.h>
69
70 #include "mdt_internal.h"
71
72 static void mdt_identity_entry_init(struct upcall_cache_entry *entry,
73                                     void *unused)
74 {
75         entry->u.identity.mi_uc_entry = entry;
76 }
77
78 static void mdt_identity_entry_free(struct upcall_cache *cache,
79                                     struct upcall_cache_entry *entry)
80 {
81         struct md_identity *identity = &entry->u.identity;
82
83         if (identity->mi_ginfo) {
84                 cfs_put_group_info(identity->mi_ginfo);
85                 identity->mi_ginfo = NULL;
86         }
87
88         if (identity->mi_nperms) {
89                 LASSERT(identity->mi_perms);
90                 OBD_FREE(identity->mi_perms,
91                          identity->mi_nperms * sizeof(struct md_perm));
92                 identity->mi_nperms = 0;
93         }
94 }
95
96 static int mdt_identity_do_upcall(struct upcall_cache *cache,
97                                   struct upcall_cache_entry *entry)
98 {
99         char keystr[16];
100         char *argv[] = {
101                   [0] = cache->uc_upcall,
102                   [1] = cache->uc_name,
103                   [2] = keystr,
104                   [3] = NULL
105         };
106         char *envp[] = {
107                   [0] = "HOME=/",
108                   [1] = "PATH=/sbin:/usr/sbin",
109                   [2] = NULL
110         };
111         struct timeval start, end;
112         int rc;
113         ENTRY;
114
115         /* There is race condition:
116          * "uc_upcall" was changed just after "is_identity_get_disabled" check.
117          */
118         cfs_read_lock(&cache->uc_upcall_rwlock);
119         CDEBUG(D_INFO, "The upcall is: '%s'\n", cache->uc_upcall);
120
121         if (unlikely(!strcmp(cache->uc_upcall, "NONE"))) {
122                 CERROR("no upcall set\n");
123                 GOTO(out, rc = -EREMCHG);
124         }
125
126         argv[0] = cache->uc_upcall;
127         snprintf(keystr, sizeof(keystr), LPU64, entry->ue_key);
128
129         cfs_gettimeofday(&start);
130         rc = USERMODEHELPER(argv[0], argv, envp);
131         cfs_gettimeofday(&end);
132         if (rc < 0) {
133                 CERROR("%s: error invoking upcall %s %s %s: rc %d; "
134                        "check /proc/fs/lustre/mdt/%s/identity_upcall, "
135                        "time %ldus\n",
136                        cache->uc_name, argv[0], argv[1], argv[2], rc,
137                        cache->uc_name, cfs_timeval_sub(&end, &start, NULL));
138         } else {
139                 CDEBUG(D_HA, "%s: invoked upcall %s %s %s, time %ldus\n",
140                        cache->uc_name, argv[0], argv[1], argv[2],
141                        cfs_timeval_sub(&end, &start, NULL));
142                 rc = 0;
143         }
144         EXIT;
145 out:
146         cfs_read_unlock(&cache->uc_upcall_rwlock);
147         return rc;
148 }
149
150 static int mdt_identity_parse_downcall(struct upcall_cache *cache,
151                                        struct upcall_cache_entry *entry,
152                                        void *args)
153 {
154         struct md_identity *identity = &entry->u.identity;
155         struct identity_downcall_data *data = args;
156         cfs_group_info_t *ginfo = NULL;
157         struct md_perm *perms = NULL;
158         int size, i;
159         ENTRY;
160
161         LASSERT(data);
162         if (data->idd_ngroups > NGROUPS_MAX)
163                 RETURN(-E2BIG);
164
165         if (data->idd_ngroups > 0) {
166                 ginfo = cfs_groups_alloc(data->idd_ngroups);
167                 if (!ginfo) {
168                         CERROR("failed to alloc %d groups\n", data->idd_ngroups);
169                         RETURN(-ENOMEM);
170                 }
171
172                 lustre_groups_from_list(ginfo, data->idd_groups);
173                 lustre_groups_sort(ginfo);
174         }
175
176         if (data->idd_nperms) {
177                 size = data->idd_nperms * sizeof(*perms);
178                 OBD_ALLOC(perms, size);
179                 if (!perms) {
180                         CERROR("failed to alloc %d permissions\n",
181                                data->idd_nperms);
182                         if (ginfo != NULL)
183                                 cfs_put_group_info(ginfo);
184                         RETURN(-ENOMEM);
185                 }
186
187                 for (i = 0; i < data->idd_nperms; i++) {
188                         perms[i].mp_nid = data->idd_perms[i].pdd_nid;
189                         perms[i].mp_perm = data->idd_perms[i].pdd_perm;
190                 }
191         }
192
193         identity->mi_uid = data->idd_uid;
194         identity->mi_gid = data->idd_gid;
195         identity->mi_ginfo = ginfo;
196         identity->mi_nperms = data->idd_nperms;
197         identity->mi_perms = perms;
198
199         CDEBUG(D_OTHER, "parse mdt identity@%p: %d:%d, ngroups %u, nperms %u\n",
200                identity, identity->mi_uid, identity->mi_gid,
201                data->idd_ngroups, data->idd_nperms);
202
203         RETURN(0);
204 }
205
206 struct md_identity *mdt_identity_get(struct upcall_cache *cache, __u32 uid)
207 {
208         struct upcall_cache_entry *entry;
209
210         if (!cache)
211                 return ERR_PTR(-ENOENT);
212
213         entry = upcall_cache_get_entry(cache, (__u64)uid, NULL);
214         if (IS_ERR(entry))
215                 return ERR_PTR(PTR_ERR(entry));
216         else if (unlikely(!entry))
217                 return ERR_PTR(-ENOENT);
218         else
219                 return &entry->u.identity;
220 }
221
222 void mdt_identity_put(struct upcall_cache *cache, struct md_identity *identity)
223 {
224         if (!cache)
225                 return;
226
227         LASSERT(identity);
228         upcall_cache_put_entry(cache, identity->mi_uc_entry);
229 }
230
231 struct upcall_cache_ops mdt_identity_upcall_cache_ops = {
232         .init_entry     = mdt_identity_entry_init,
233         .free_entry     = mdt_identity_entry_free,
234         .do_upcall      = mdt_identity_do_upcall,
235         .parse_downcall = mdt_identity_parse_downcall,
236 };
237
238 void mdt_flush_identity(struct upcall_cache *cache, int uid)
239 {
240         if (uid < 0)
241                 upcall_cache_flush_idle(cache);
242         else
243                 upcall_cache_flush_one(cache, (__u64)uid, NULL);
244 }
245
246 /*
247  * If there is LNET_NID_ANY in perm[i].mp_nid,
248  * it must be perm[0].mp_nid, and act as default perm.
249  */
250 __u32 mdt_identity_get_perm(struct md_identity *identity,
251                             __u32 is_rmtclient, lnet_nid_t nid)
252 {
253         struct md_perm *perm;
254         int i;
255
256         if (!identity) {
257                 LASSERT(is_rmtclient == 0);
258                 return CFS_SETGRP_PERM;
259         }
260
261         perm = identity->mi_perms;
262         /* check exactly matched nid first */
263         for (i = identity->mi_nperms - 1; i > 0; i--) {
264                 if (perm[i].mp_nid != nid)
265                         continue;
266                 return perm[i].mp_perm;
267         }
268
269         /* check LNET_NID_ANY then */
270         if ((identity->mi_nperms > 0) &&
271             ((perm[0].mp_nid == nid) || (perm[0].mp_nid == LNET_NID_ANY)))
272                 return perm[0].mp_perm;
273
274         /* return default last */
275         return is_rmtclient ? 0 : CFS_SETGRP_PERM;
276 }
277
278 int mdt_pack_remote_perm(struct mdt_thread_info *info, struct mdt_object *o,
279                          void *buf)
280 {
281         struct md_ucred         *uc = mdt_ucred(info);
282         struct md_object        *next = mdt_object_child(o);
283         struct mdt_remote_perm  *perm = buf;
284
285         ENTRY;
286
287         /* remote client request always pack ptlrpc_user_desc! */
288         LASSERT(perm);
289
290         if (!exp_connect_rmtclient(info->mti_exp))
291                 RETURN(-EBADE);
292
293         if ((uc->mu_valid != UCRED_OLD) && (uc->mu_valid != UCRED_NEW))
294                 RETURN(-EINVAL);
295
296         perm->rp_uid = uc->mu_o_uid;
297         perm->rp_gid = uc->mu_o_gid;
298         perm->rp_fsuid = uc->mu_o_fsuid;
299         perm->rp_fsgid = uc->mu_o_fsgid;
300
301         perm->rp_access_perm = 0;
302         if (mo_permission(info->mti_env, NULL, next, NULL, MAY_READ) == 0)
303                 perm->rp_access_perm |= MAY_READ;
304         if (mo_permission(info->mti_env, NULL, next, NULL, MAY_WRITE) == 0)
305                 perm->rp_access_perm |= MAY_WRITE;
306         if (mo_permission(info->mti_env, NULL, next, NULL, MAY_EXEC) == 0)
307                 perm->rp_access_perm |= MAY_EXEC;
308
309         RETURN(0);
310 }