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