Whamcloud - gitweb
da016a3a27dbc028b010dca72f9790754d7879de
[fs/lustre-release.git] / lustre / osd-ldiskfs / osd_compat.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) 2010, Oracle and/or its affiliates. All rights reserved.
28  * Use is subject to license terms.
29  *
30  * Copyright (c) 2012, 2014, Intel Corporation.
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/osd/osd_compat.c
37  *
38  * on-disk structure for managing /O
39  *
40  * Author: Alex Zhuravlev <bzzz@whamcloud.com>
41  */
42
43 /* LUSTRE_VERSION_CODE */
44 #include <lustre_ver.h>
45 /* prerequisite for linux/xattr.h */
46 #include <linux/types.h>
47 /* prerequisite for linux/xattr.h */
48 #include <linux/fs.h>
49 /* XATTR_{REPLACE,CREATE} */
50 #include <linux/xattr.h>
51
52 /*
53  * struct OBD_{ALLOC,FREE}*()
54  * OBD_FAIL_CHECK
55  */
56 #include <obd_support.h>
57
58 #include "osd_internal.h"
59 #include "osd_oi.h"
60
61 static void osd_push_ctxt(const struct osd_device *dev,
62                           struct lvfs_run_ctxt *newctxt,
63                           struct lvfs_run_ctxt *save)
64 {
65         OBD_SET_CTXT_MAGIC(newctxt);
66         newctxt->pwdmnt = dev->od_mnt;
67         newctxt->pwd = dev->od_mnt->mnt_root;
68         newctxt->fs = get_ds();
69         newctxt->umask = current_umask();
70         newctxt->dt = NULL;
71
72         push_ctxt(save, newctxt);
73 }
74
75 /* utility to make a directory */
76 static struct dentry *simple_mkdir(struct dentry *dir, struct vfsmount *mnt,
77                                    const char *name, int mode, int fix)
78 {
79         struct dentry *dchild;
80         int err = 0;
81         ENTRY;
82
83         // ASSERT_KERNEL_CTXT("kernel doing mkdir outside kernel context\n");
84         CDEBUG(D_INODE, "creating directory %.*s\n", (int)strlen(name), name);
85         dchild = ll_lookup_one_len(name, dir, strlen(name));
86         if (IS_ERR(dchild))
87                 GOTO(out_up, dchild);
88
89         if (dchild->d_inode) {
90                 int old_mode = dchild->d_inode->i_mode;
91                 if (!S_ISDIR(old_mode)) {
92                         CERROR("found %s (%lu/%u) is mode %o\n", name,
93                                dchild->d_inode->i_ino,
94                                dchild->d_inode->i_generation, old_mode);
95                         GOTO(out_err, err = -ENOTDIR);
96                 }
97
98                 /* Fixup directory permissions if necessary */
99                 if (fix && (old_mode & S_IALLUGO) != (mode & S_IALLUGO)) {
100                         CDEBUG(D_CONFIG,
101                                "fixing permissions on %s from %o to %o\n",
102                                name, old_mode, mode);
103                         dchild->d_inode->i_mode = (mode & S_IALLUGO) |
104                                                   (old_mode & ~S_IALLUGO);
105                         mark_inode_dirty(dchild->d_inode);
106                 }
107                 GOTO(out_up, dchild);
108         }
109
110         err = vfs_mkdir(dir->d_inode, dchild, mode);
111         if (err)
112                 GOTO(out_err, err);
113
114         RETURN(dchild);
115
116 out_err:
117         dput(dchild);
118         dchild = ERR_PTR(err);
119 out_up:
120         return dchild;
121 }
122
123 static int osd_last_rcvd_subdir_count(struct osd_device *osd)
124 {
125         struct lr_server_data lsd;
126         struct dentry        *dlast;
127         loff_t                off;
128         int                   rc = 0;
129         int                   count = OBJ_SUBDIR_COUNT;
130
131         ENTRY;
132
133         dlast = ll_lookup_one_len(LAST_RCVD, osd_sb(osd)->s_root,
134                                   strlen(LAST_RCVD));
135         if (IS_ERR(dlast))
136                 return PTR_ERR(dlast);
137         else if (dlast->d_inode == NULL)
138                 goto out;
139
140         off = 0;
141         rc = osd_ldiskfs_read(dlast->d_inode, &lsd, sizeof(lsd), &off);
142         if (rc == sizeof(lsd)) {
143                 CDEBUG(D_INFO, "read last_rcvd header, uuid = %s, "
144                        "subdir count = %d\n", lsd.lsd_uuid,
145                        lsd.lsd_subdir_count);
146                 if (le16_to_cpu(lsd.lsd_subdir_count) > 0)
147                         count = le16_to_cpu(lsd.lsd_subdir_count);
148         } else if (rc != 0) {
149                 CERROR("Can't read last_rcvd file, rc = %d\n", rc);
150                 if (rc > 0)
151                         rc = -EFAULT;
152                 dput(dlast);
153                 return rc;
154         }
155 out:
156         dput(dlast);
157         LASSERT(count > 0);
158         return count;
159 }
160
161 static const char remote_parent_dir[] = "REMOTE_PARENT_DIR";
162 static int osd_mdt_init(const struct lu_env *env, struct osd_device *dev)
163 {
164         struct lvfs_run_ctxt    new;
165         struct lvfs_run_ctxt    save;
166         struct dentry           *parent;
167         struct osd_mdobj_map    *omm;
168         struct dentry           *d;
169         struct osd_thread_info  *info = osd_oti_get(env);
170         struct lu_fid           *fid = &info->oti_fid3;
171         int                     rc = 0;
172         ENTRY;
173
174         OBD_ALLOC_PTR(dev->od_mdt_map);
175         if (dev->od_mdt_map == NULL)
176                 RETURN(-ENOMEM);
177
178         omm = dev->od_mdt_map;
179
180         parent = osd_sb(dev)->s_root;
181         osd_push_ctxt(dev, &new, &save);
182
183         d = simple_mkdir(parent, dev->od_mnt, remote_parent_dir,
184                          0755, 1);
185         if (IS_ERR(d))
186                 GOTO(cleanup, rc = PTR_ERR(d));
187
188         omm->omm_remote_parent = d;
189
190         /* Set LMA for remote parent inode */
191         lu_local_obj_fid(fid, REMOTE_PARENT_DIR_OID);
192         rc = osd_ea_fid_set(info, d->d_inode, fid, LMAC_NOT_IN_OI, 0);
193
194         GOTO(cleanup, rc);
195
196 cleanup:
197         pop_ctxt(&save, &new);
198         if (rc) {
199                 if (omm->omm_remote_parent != NULL)
200                         dput(omm->omm_remote_parent);
201                 OBD_FREE_PTR(omm);
202                 dev->od_mdt_map = NULL;
203         }
204         return rc;
205 }
206
207 static void osd_mdt_fini(struct osd_device *osd)
208 {
209         struct osd_mdobj_map *omm = osd->od_mdt_map;
210
211         if (omm == NULL)
212                 return;
213
214         if (omm->omm_remote_parent)
215                 dput(omm->omm_remote_parent);
216
217         OBD_FREE_PTR(omm);
218         osd->od_ost_map = NULL;
219 }
220
221 int osd_add_to_remote_parent(const struct lu_env *env, struct osd_device *osd,
222                              struct osd_object *obj, struct osd_thandle *oh)
223 {
224         struct osd_mdobj_map    *omm = osd->od_mdt_map;
225         struct osd_thread_info  *oti = osd_oti_get(env);
226         struct lustre_mdt_attrs *lma = &oti->oti_mdt_attrs;
227         char                    *name = oti->oti_name;
228         struct dentry           *dentry;
229         struct dentry           *parent;
230         int                     rc;
231
232         /* Set REMOTE_PARENT in lma, so other process like unlink or lfsck
233          * can identify this object quickly */
234         rc = osd_get_lma(oti, obj->oo_inode, &oti->oti_obj_dentry, lma);
235         if (rc != 0)
236                 RETURN(rc);
237
238         lma->lma_incompat |= LMAI_REMOTE_PARENT;
239         lustre_lma_swab(lma);
240         rc = __osd_xattr_set(oti, obj->oo_inode, XATTR_NAME_LMA, lma,
241                              sizeof(*lma), XATTR_REPLACE);
242         if (rc != 0)
243                 RETURN(rc);
244
245         parent = omm->omm_remote_parent;
246         sprintf(name, DFID_NOBRACE, PFID(lu_object_fid(&obj->oo_dt.do_lu)));
247         dentry = osd_child_dentry_by_inode(env, parent->d_inode,
248                                            name, strlen(name));
249         mutex_lock(&parent->d_inode->i_mutex);
250         rc = osd_ldiskfs_add_entry(oh->ot_handle, dentry, obj->oo_inode,
251                                    NULL);
252         CDEBUG(D_INODE, "%s: add %s:%lu to remote parent %lu.\n", osd_name(osd),
253                name, obj->oo_inode->i_ino, parent->d_inode->i_ino);
254         ldiskfs_inc_count(oh->ot_handle, parent->d_inode);
255         mark_inode_dirty(parent->d_inode);
256         mutex_unlock(&parent->d_inode->i_mutex);
257         RETURN(rc);
258 }
259
260 int osd_delete_from_remote_parent(const struct lu_env *env,
261                                   struct osd_device *osd,
262                                   struct osd_object *obj,
263                                   struct osd_thandle *oh)
264 {
265         struct osd_mdobj_map       *omm = osd->od_mdt_map;
266         struct osd_thread_info     *oti = osd_oti_get(env);
267         struct lustre_mdt_attrs    *lma = &oti->oti_mdt_attrs;
268         char                       *name = oti->oti_name;
269         struct dentry              *dentry;
270         struct dentry              *parent;
271         struct ldiskfs_dir_entry_2 *de;
272         struct buffer_head         *bh;
273         int                        rc;
274
275         /* Check lma to see whether it is remote object */
276         rc = osd_get_lma(oti, obj->oo_inode, &oti->oti_obj_dentry, lma);
277         if (rc != 0)
278                 RETURN(rc);
279
280         if (likely(!(lma->lma_incompat & LMAI_REMOTE_PARENT)))
281                 RETURN(0);
282
283         parent = omm->omm_remote_parent;
284         sprintf(name, DFID_NOBRACE, PFID(lu_object_fid(&obj->oo_dt.do_lu)));
285         dentry = osd_child_dentry_by_inode(env, parent->d_inode,
286                                            name, strlen(name));
287         mutex_lock(&parent->d_inode->i_mutex);
288         bh = osd_ldiskfs_find_entry(parent->d_inode, &dentry->d_name, &de,
289                                     NULL, NULL);
290         if (bh == NULL) {
291                 mutex_unlock(&parent->d_inode->i_mutex);
292                 RETURN(-ENOENT);
293         }
294         CDEBUG(D_INODE, "%s: el %s:%lu to remote parent %lu.\n", osd_name(osd),
295                name, obj->oo_inode->i_ino, parent->d_inode->i_ino);
296         rc = ldiskfs_delete_entry(oh->ot_handle, parent->d_inode, de, bh);
297         ldiskfs_dec_count(oh->ot_handle, parent->d_inode);
298         mark_inode_dirty(parent->d_inode);
299         mutex_unlock(&parent->d_inode->i_mutex);
300         brelse(bh);
301
302         /* Get rid of REMOTE_PARENT flag from incompat */
303         lma->lma_incompat &= ~LMAI_REMOTE_PARENT;
304         lustre_lma_swab(lma);
305         rc = __osd_xattr_set(oti, obj->oo_inode, XATTR_NAME_LMA, lma,
306                              sizeof(*lma), XATTR_REPLACE);
307         RETURN(rc);
308 }
309
310 int osd_lookup_in_remote_parent(struct osd_thread_info *oti,
311                                 struct osd_device *osd,
312                                 const struct lu_fid *fid,
313                                 struct osd_inode_id *id)
314 {
315         struct osd_mdobj_map        *omm = osd->od_mdt_map;
316         char                        *name = oti->oti_name;
317         struct dentry               *parent;
318         struct dentry               *dentry;
319         struct ldiskfs_dir_entry_2 *de;
320         struct buffer_head         *bh;
321         int                         rc;
322         ENTRY;
323
324         parent = omm->omm_remote_parent;
325         sprintf(name, DFID_NOBRACE, PFID(fid));
326         dentry = osd_child_dentry_by_inode(oti->oti_env, parent->d_inode,
327                                            name, strlen(name));
328         mutex_lock(&parent->d_inode->i_mutex);
329         bh = osd_ldiskfs_find_entry(parent->d_inode, &dentry->d_name, &de,
330                                     NULL, NULL);
331         if (bh == NULL) {
332                 rc = -ENOENT;
333         } else {
334                 rc = 0;
335                 osd_id_gen(id, le32_to_cpu(de->inode), OSD_OII_NOGEN);
336                 brelse(bh);
337         }
338         mutex_unlock(&parent->d_inode->i_mutex);
339         if (rc == 0)
340                 osd_add_oi_cache(oti, osd, id, fid);
341         RETURN(rc);
342 }
343
344 /*
345  * directory structure on legacy OST:
346  *
347  * O/<seq>/d0-31/<objid>
348  * O/<seq>/LAST_ID
349  * last_rcvd
350  * LAST_GROUP
351  * CONFIGS
352  *
353  */
354 static int osd_ost_init(const struct lu_env *env, struct osd_device *dev)
355 {
356         struct lvfs_run_ctxt     new;
357         struct lvfs_run_ctxt     save;
358         struct dentry           *rootd = osd_sb(dev)->s_root;
359         struct dentry           *d;
360         struct osd_thread_info  *info = osd_oti_get(env);
361         struct inode            *inode;
362         struct lu_fid           *fid = &info->oti_fid3;
363         int                      rc;
364         ENTRY;
365
366         OBD_ALLOC_PTR(dev->od_ost_map);
367         if (dev->od_ost_map == NULL)
368                 RETURN(-ENOMEM);
369
370         /* to get subdir count from last_rcvd */
371         rc = osd_last_rcvd_subdir_count(dev);
372         if (rc < 0)
373                 GOTO(cleanup_alloc, rc);
374
375         dev->od_ost_map->om_subdir_count = rc;
376         rc = 0;
377
378         INIT_LIST_HEAD(&dev->od_ost_map->om_seq_list);
379         rwlock_init(&dev->od_ost_map->om_seq_list_lock);
380         mutex_init(&dev->od_ost_map->om_dir_init_mutex);
381
382         osd_push_ctxt(dev, &new, &save);
383
384         d = ll_lookup_one_len("O", rootd, strlen("O"));
385         if (IS_ERR(d))
386                 GOTO(cleanup_ctxt, rc = PTR_ERR(d));
387         if (d->d_inode == NULL) {
388                 dput(d);
389                 /* The lookup() may be called again inside simple_mkdir().
390                  * Since the repeated lookup() only be called for "/O" at
391                  * mount time, it will not affect the whole performance. */
392                 d = simple_mkdir(rootd, dev->od_mnt, "O", 0755, 1);
393                 if (IS_ERR(d))
394                         GOTO(cleanup_ctxt, rc = PTR_ERR(d));
395
396                 /* It is quite probably that the device is new formatted. */
397                 dev->od_maybe_new = 1;
398         }
399
400         inode = d->d_inode;
401         dev->od_ost_map->om_root = d;
402
403         /* 'What the @fid is' is not imporatant, because the object
404          * has no OI mapping, and only is visible inside the OSD.*/
405         lu_igif_build(fid, inode->i_ino, inode->i_generation);
406         rc = osd_ea_fid_set(info, inode, fid,
407                     LMAC_NOT_IN_OI | LMAC_FID_ON_OST, 0);
408         if (rc)
409                 GOTO(cleanup_dentry, rc);
410
411         pop_ctxt(&save, &new);
412         RETURN(0);
413
414 cleanup_dentry:
415         dput(d);
416 cleanup_ctxt:
417         pop_ctxt(&save, &new);
418 cleanup_alloc:
419         OBD_FREE_PTR(dev->od_ost_map);
420         return rc;
421 }
422
423 static void osd_seq_free(struct osd_obj_map *map,
424                          struct osd_obj_seq *osd_seq)
425 {
426         int j;
427
428         list_del_init(&osd_seq->oos_seq_list);
429
430         if (osd_seq->oos_dirs) {
431                 for (j = 0; j < osd_seq->oos_subdir_count; j++) {
432                         if (osd_seq->oos_dirs[j])
433                                 dput(osd_seq->oos_dirs[j]);
434                 }
435                 OBD_FREE(osd_seq->oos_dirs,
436                          sizeof(struct dentry *) * osd_seq->oos_subdir_count);
437         }
438
439         if (osd_seq->oos_root)
440                 dput(osd_seq->oos_root);
441
442         OBD_FREE_PTR(osd_seq);
443 }
444
445 static void osd_ost_fini(struct osd_device *osd)
446 {
447         struct osd_obj_seq    *osd_seq;
448         struct osd_obj_seq    *tmp;
449         struct osd_obj_map    *map = osd->od_ost_map;
450         ENTRY;
451
452         if (map == NULL)
453                 return;
454
455         write_lock(&map->om_seq_list_lock);
456         list_for_each_entry_safe(osd_seq, tmp, &map->om_seq_list,
457                                  oos_seq_list) {
458                 osd_seq_free(map, osd_seq);
459         }
460         write_unlock(&map->om_seq_list_lock);
461         if (map->om_root)
462                 dput(map->om_root);
463         OBD_FREE_PTR(map);
464         osd->od_ost_map = NULL;
465         EXIT;
466 }
467
468 int osd_obj_map_init(const struct lu_env *env, struct osd_device *dev)
469 {
470         int rc;
471         ENTRY;
472
473         /* prepare structures for OST */
474         rc = osd_ost_init(env, dev);
475         if (rc)
476                 RETURN(rc);
477
478         /* prepare structures for MDS */
479         rc = osd_mdt_init(env, dev);
480
481         RETURN(rc);
482 }
483
484 static struct osd_obj_seq *osd_seq_find_locked(struct osd_obj_map *map, u64 seq)
485 {
486         struct osd_obj_seq *osd_seq;
487
488         list_for_each_entry(osd_seq, &map->om_seq_list, oos_seq_list) {
489                 if (osd_seq->oos_seq == seq)
490                         return osd_seq;
491         }
492         return NULL;
493 }
494
495 static struct osd_obj_seq *osd_seq_find(struct osd_obj_map *map, u64 seq)
496 {
497         struct osd_obj_seq *osd_seq;
498
499         read_lock(&map->om_seq_list_lock);
500         osd_seq = osd_seq_find_locked(map, seq);
501         read_unlock(&map->om_seq_list_lock);
502         return osd_seq;
503 }
504
505 void osd_obj_map_fini(struct osd_device *dev)
506 {
507         osd_ost_fini(dev);
508         osd_mdt_fini(dev);
509 }
510
511 /**
512  * Update the specified OI mapping.
513  *
514  * \retval   1, changed nothing
515  * \retval   0, changed successfully
516  * \retval -ve, on error
517  */
518 static int osd_obj_update_entry(struct osd_thread_info *info,
519                                 struct osd_device *osd,
520                                 struct dentry *dir, const char *name,
521                                 const struct lu_fid *fid,
522                                 const struct osd_inode_id *id,
523                                 handle_t *th)
524 {
525         struct inode               *parent = dir->d_inode;
526         struct dentry              *child;
527         struct ldiskfs_dir_entry_2 *de;
528         struct buffer_head         *bh;
529         struct inode               *inode;
530         struct dentry              *dentry = &info->oti_obj_dentry;
531         struct osd_inode_id        *oi_id  = &info->oti_id3;
532         struct lustre_mdt_attrs    *lma    = &info->oti_mdt_attrs;
533         struct lu_fid              *oi_fid = &lma->lma_self_fid;
534         int                         rc;
535         ENTRY;
536
537         LASSERT(th != NULL);
538         LASSERT(th->h_transaction != NULL);
539
540         child = &info->oti_child_dentry;
541         child->d_parent = dir;
542         child->d_name.hash = 0;
543         child->d_name.name = name;
544         child->d_name.len = strlen(name);
545
546         ll_vfs_dq_init(parent);
547         mutex_lock(&parent->i_mutex);
548         bh = osd_ldiskfs_find_entry(parent, &child->d_name, &de, NULL, NULL);
549         if (bh == NULL)
550                 GOTO(out, rc = -ENOENT);
551
552         if (le32_to_cpu(de->inode) == id->oii_ino)
553                 GOTO(out, rc = 1);
554
555         osd_id_gen(oi_id, le32_to_cpu(de->inode), OSD_OII_NOGEN);
556         inode = osd_iget(info, osd, oi_id);
557         if (IS_ERR(inode)) {
558                 rc = PTR_ERR(inode);
559                 if (rc == -ENOENT || rc == -ESTALE)
560                         goto update;
561                 GOTO(out, rc);
562         }
563
564         rc = osd_get_lma(info, inode, dentry, lma);
565         if (rc == -ENODATA) {
566                 rc = osd_get_idif(info, inode, dentry, oi_fid);
567                 if (rc > 0) {
568                         oi_fid = NULL;
569                         rc = 0;
570                 }
571         }
572         iput(inode);
573
574         /* If the OST-object has neither FID-in-LMA nor FID-in-ff, it is
575          * either a crashed object or a uninitialized one. Replace it. */
576         if (rc == -ENODATA || oi_fid == NULL)
577                 goto update;
578
579         if (rc != 0)
580                 GOTO(out, rc);
581
582         if (lu_fid_eq(fid, oi_fid)) {
583                 CERROR("%s: the FID "DFID" is used by two objects: "
584                        "%u/%u %u/%u\n", osd_name(osd), PFID(fid),
585                        oi_id->oii_ino, oi_id->oii_gen,
586                        id->oii_ino, id->oii_gen);
587                 GOTO(out, rc = -EEXIST);
588         }
589
590 update:
591         /* There may be temporary inconsistency: On one hand, the new
592          * object may be referenced by multiple entries, which is out
593          * of our control unless we traverse the whole /O completely,
594          * which is non-flat order and inefficient, should be avoided;
595          * On the other hand, the old object may become orphan if it
596          * is still valid. Since it was referenced by an invalid entry,
597          * making it as invisible temporary may be not worse. OI scrub
598          * will process it later. */
599         rc = ldiskfs_journal_get_write_access(th, bh);
600         if (rc != 0)
601                 GOTO(out, rc);
602
603         de->inode = cpu_to_le32(id->oii_ino);
604         rc = ldiskfs_handle_dirty_metadata(th, NULL, bh);
605
606         GOTO(out, rc);
607
608 out:
609         brelse(bh);
610         mutex_unlock(&parent->i_mutex);
611         return rc;
612 }
613
614 static int osd_obj_del_entry(struct osd_thread_info *info,
615                              struct osd_device *osd,
616                              struct dentry *dird, char *name,
617                              handle_t *th)
618 {
619         struct ldiskfs_dir_entry_2 *de;
620         struct buffer_head         *bh;
621         struct dentry              *child;
622         struct inode               *dir = dird->d_inode;
623         int                         rc;
624         ENTRY;
625
626         LASSERT(th != NULL);
627         LASSERT(th->h_transaction != NULL);
628
629
630         child = &info->oti_child_dentry;
631         child->d_name.hash = 0;
632         child->d_name.name = name;
633         child->d_name.len = strlen(name);
634         child->d_parent = dird;
635         child->d_inode = NULL;
636
637         ll_vfs_dq_init(dir);
638         mutex_lock(&dir->i_mutex);
639         rc = -ENOENT;
640         bh = osd_ldiskfs_find_entry(dir, &child->d_name, &de, NULL, NULL);
641         if (bh) {
642                 rc = ldiskfs_delete_entry(th, dir, de, bh);
643                 brelse(bh);
644         }
645         mutex_unlock(&dir->i_mutex);
646
647         RETURN(rc);
648 }
649
650 static int osd_obj_add_entry(struct osd_thread_info *info,
651                              struct osd_device *osd,
652                              struct dentry *dir, char *name,
653                              const struct osd_inode_id *id,
654                              handle_t *th)
655 {
656         struct dentry *child;
657         struct inode *inode;
658         int rc;
659
660         ENTRY;
661
662         if (OBD_FAIL_CHECK(OBD_FAIL_OSD_COMPAT_NO_ENTRY))
663                 RETURN(0);
664
665         LASSERT(th != NULL);
666         LASSERT(th->h_transaction != NULL);
667
668         inode = info->oti_inode;
669         if (unlikely(inode == NULL)) {
670                 OBD_ALLOC_PTR(inode);
671                 if (inode == NULL)
672                         RETURN(-ENOMEM);
673                 info->oti_inode = inode;
674         }
675
676         inode->i_sb = osd_sb(osd);
677         osd_id_to_inode(inode, id);
678         inode->i_mode = S_IFREG; /* for type in ldiskfs dir entry */
679
680         child = &info->oti_child_dentry;
681         child->d_name.hash = 0;
682         child->d_name.name = name;
683         child->d_name.len = strlen(name);
684         child->d_parent = dir;
685         child->d_inode = inode;
686
687         if (OBD_FAIL_CHECK(OBD_FAIL_OSD_COMPAT_INVALID_ENTRY))
688                 inode->i_ino++;
689
690         ll_vfs_dq_init(dir->d_inode);
691         mutex_lock(&dir->d_inode->i_mutex);
692         rc = osd_ldiskfs_add_entry(th, child, inode, NULL);
693         mutex_unlock(&dir->d_inode->i_mutex);
694
695         RETURN(rc);
696 }
697
698 /**
699  * Use LPU64 for legacy OST sequences, but use LPX64i for new
700  * sequences names, so that the O/{seq}/dN/{oid} more closely
701  * follows the DFID/PFID format. This makes it easier to map from
702  * debug messages to objects in the future, and the legacy space
703  * of FID_SEQ_OST_MDT0 will be unused in the future.
704  **/
705 static inline void osd_seq_name(char *seq_name, size_t name_size, u64 seq)
706 {
707         snprintf(seq_name, name_size,
708                  (fid_seq_is_rsvd(seq) ||
709                   fid_seq_is_mdt0(seq)) ? LPU64 : LPX64i,
710                  fid_seq_is_idif(seq) ? 0 : seq);
711 }
712
713 static inline void osd_oid_name(char *name, size_t name_size,
714                                 const struct lu_fid *fid, u64 id)
715 {
716         snprintf(name, name_size,
717                  (fid_seq_is_rsvd(fid_seq(fid)) ||
718                   fid_seq_is_mdt0(fid_seq(fid)) ||
719                   fid_seq_is_idif(fid_seq(fid))) ? LPU64 : LPX64i, id);
720 }
721
722 /* external locking is required */
723 static int osd_seq_load_locked(struct osd_thread_info *info,
724                                struct osd_device *osd,
725                                struct osd_obj_seq *osd_seq)
726 {
727         struct osd_obj_map  *map = osd->od_ost_map;
728         struct dentry       *seq_dir;
729         struct inode        *inode;
730         struct lu_fid       *fid = &info->oti_fid3;
731         int                 rc = 0;
732         int                 i;
733         char                dir_name[32];
734         ENTRY;
735
736         if (osd_seq->oos_root != NULL)
737                 RETURN(0);
738
739         LASSERT(map);
740         LASSERT(map->om_root);
741
742         osd_seq_name(dir_name, sizeof(dir_name), osd_seq->oos_seq);
743
744         seq_dir = simple_mkdir(map->om_root, osd->od_mnt, dir_name, 0755, 1);
745         if (IS_ERR(seq_dir))
746                 GOTO(out_err, rc = PTR_ERR(seq_dir));
747         else if (seq_dir->d_inode == NULL)
748                 GOTO(out_put, rc = -EFAULT);
749
750         inode = seq_dir->d_inode;
751         osd_seq->oos_root = seq_dir;
752
753         /* 'What the @fid is' is not imporatant, because the object
754          * has no OI mapping, and only is visible inside the OSD.*/
755         lu_igif_build(fid, inode->i_ino, inode->i_generation);
756         rc = osd_ea_fid_set(info, inode, fid,
757                             LMAC_NOT_IN_OI | LMAC_FID_ON_OST, 0);
758         if (rc != 0)
759                 GOTO(out_put, rc);
760
761         LASSERT(osd_seq->oos_dirs == NULL);
762         OBD_ALLOC(osd_seq->oos_dirs,
763                   sizeof(seq_dir) * osd_seq->oos_subdir_count);
764         if (osd_seq->oos_dirs == NULL)
765                 GOTO(out_put, rc = -ENOMEM);
766
767         for (i = 0; i < osd_seq->oos_subdir_count; i++) {
768                 struct dentry   *dir;
769
770                 snprintf(dir_name, sizeof(dir_name), "d%u", i);
771                 dir = simple_mkdir(osd_seq->oos_root, osd->od_mnt, dir_name,
772                                    0700, 1);
773                 if (IS_ERR(dir)) {
774                         GOTO(out_free, rc = PTR_ERR(dir));
775                 } else if (dir->d_inode == NULL) {
776                         dput(dir);
777                         GOTO(out_free, rc = -EFAULT);
778                 }
779
780                 inode = dir->d_inode;
781                 osd_seq->oos_dirs[i] = dir;
782
783                 /* 'What the @fid is' is not imporatant, because the object
784                  * has no OI mapping, and only is visible inside the OSD.*/
785                 lu_igif_build(fid, inode->i_ino, inode->i_generation);
786                 rc = osd_ea_fid_set(info, inode, fid,
787                                     LMAC_NOT_IN_OI | LMAC_FID_ON_OST, 0);
788                 if (rc != 0)
789                         GOTO(out_free, rc);
790         }
791
792         if (rc != 0) {
793 out_free:
794                 for (i = 0; i < osd_seq->oos_subdir_count; i++) {
795                         if (osd_seq->oos_dirs[i] != NULL)
796                                 dput(osd_seq->oos_dirs[i]);
797                 }
798                 OBD_FREE(osd_seq->oos_dirs,
799                          sizeof(seq_dir) * osd_seq->oos_subdir_count);
800 out_put:
801                 dput(seq_dir);
802                 osd_seq->oos_root = NULL;
803         }
804 out_err:
805         RETURN(rc);
806 }
807
808 static struct osd_obj_seq *osd_seq_load(struct osd_thread_info *info,
809                                         struct osd_device *osd, u64 seq)
810 {
811         struct osd_obj_map      *map;
812         struct osd_obj_seq      *osd_seq;
813         int                     rc = 0;
814         ENTRY;
815
816         map = osd->od_ost_map;
817         LASSERT(map);
818         LASSERT(map->om_root);
819
820         osd_seq = osd_seq_find(map, seq);
821         if (likely(osd_seq != NULL))
822                 RETURN(osd_seq);
823
824         /* Serializing init process */
825         mutex_lock(&map->om_dir_init_mutex);
826
827         /* Check whether the seq has been added */
828         read_lock(&map->om_seq_list_lock);
829         osd_seq = osd_seq_find_locked(map, seq);
830         if (osd_seq != NULL) {
831                 read_unlock(&map->om_seq_list_lock);
832                 GOTO(cleanup, rc = 0);
833         }
834         read_unlock(&map->om_seq_list_lock);
835
836         OBD_ALLOC_PTR(osd_seq);
837         if (osd_seq == NULL)
838                 GOTO(cleanup, rc = -ENOMEM);
839
840         INIT_LIST_HEAD(&osd_seq->oos_seq_list);
841         osd_seq->oos_seq = seq;
842         /* Init subdir count to be 32, but each seq can have
843          * different subdir count */
844         osd_seq->oos_subdir_count = map->om_subdir_count;
845         rc = osd_seq_load_locked(info, osd, osd_seq);
846         if (rc != 0)
847                 GOTO(cleanup, rc);
848
849         write_lock(&map->om_seq_list_lock);
850         list_add(&osd_seq->oos_seq_list, &map->om_seq_list);
851         write_unlock(&map->om_seq_list_lock);
852
853 cleanup:
854         mutex_unlock(&map->om_dir_init_mutex);
855         if (rc != 0) {
856                 if (osd_seq != NULL)
857                         OBD_FREE_PTR(osd_seq);
858                 RETURN(ERR_PTR(rc));
859         }
860
861         RETURN(osd_seq);
862 }
863
864 int osd_obj_map_lookup(struct osd_thread_info *info, struct osd_device *dev,
865                        const struct lu_fid *fid, struct osd_inode_id *id)
866 {
867         struct osd_obj_map              *map;
868         struct osd_obj_seq              *osd_seq;
869         struct dentry                   *d_seq;
870         struct dentry                   *child;
871         struct ost_id                   *ostid = &info->oti_ostid;
872         int                             dirn;
873         char                            name[32];
874         struct ldiskfs_dir_entry_2      *de;
875         struct buffer_head              *bh;
876         struct inode                    *dir;
877         struct inode                    *inode;
878         ENTRY;
879
880         /* on the very first lookup we find and open directories */
881
882         map = dev->od_ost_map;
883         LASSERT(map);
884         LASSERT(map->om_root);
885
886         fid_to_ostid(fid, ostid);
887         osd_seq = osd_seq_load(info, dev, ostid_seq(ostid));
888         if (IS_ERR(osd_seq))
889                 RETURN(PTR_ERR(osd_seq));
890
891         dirn = ostid_id(ostid) & (osd_seq->oos_subdir_count - 1);
892         d_seq = osd_seq->oos_dirs[dirn];
893         LASSERT(d_seq);
894
895         osd_oid_name(name, sizeof(name), fid, ostid_id(ostid));
896
897         child = &info->oti_child_dentry;
898         child->d_parent = d_seq;
899         child->d_name.hash = 0;
900         child->d_name.name = name;
901         /* XXX: we can use rc from sprintf() instead of strlen() */
902         child->d_name.len = strlen(name);
903
904         dir = d_seq->d_inode;
905         mutex_lock(&dir->i_mutex);
906         bh = osd_ldiskfs_find_entry(dir, &child->d_name, &de, NULL, NULL);
907         mutex_unlock(&dir->i_mutex);
908
909         if (bh == NULL)
910                 RETURN(-ENOENT);
911
912         osd_id_gen(id, le32_to_cpu(de->inode), OSD_OII_NOGEN);
913         brelse(bh);
914
915         inode = osd_iget(info, dev, id);
916         if (IS_ERR(inode)) {
917                 int rc = PTR_ERR(inode);
918
919                 RETURN(rc == -ENOENT ? -ESTALE : rc);
920         }
921
922         iput(inode);
923         RETURN(0);
924 }
925
926 int osd_obj_map_insert(struct osd_thread_info *info,
927                        struct osd_device *osd,
928                        const struct lu_fid *fid,
929                        const struct osd_inode_id *id,
930                        handle_t *th)
931 {
932         struct osd_obj_map      *map;
933         struct osd_obj_seq      *osd_seq;
934         struct dentry           *d;
935         struct ost_id           *ostid = &info->oti_ostid;
936         u64                      oid;
937         int                     dirn, rc = 0;
938         char                    name[32];
939         ENTRY;
940
941         map = osd->od_ost_map;
942         LASSERT(map);
943
944         /* map fid to seq:objid */
945         fid_to_ostid(fid, ostid);
946
947         oid = ostid_id(ostid);
948         osd_seq = osd_seq_load(info, osd, ostid_seq(ostid));
949         if (IS_ERR(osd_seq))
950                 RETURN(PTR_ERR(osd_seq));
951
952         dirn = oid & (osd_seq->oos_subdir_count - 1);
953         d = osd_seq->oos_dirs[dirn];
954         LASSERT(d);
955
956         osd_oid_name(name, sizeof(name), fid, oid);
957
958 again:
959         rc = osd_obj_add_entry(info, osd, d, name, id, th);
960         if (rc == -EEXIST) {
961                 rc = osd_obj_update_entry(info, osd, d, name, fid, id, th);
962                 if (unlikely(rc == -ENOENT))
963                         goto again;
964
965                 if (unlikely(rc == 1))
966                         RETURN(0);
967         }
968
969         RETURN(rc);
970 }
971
972 int osd_obj_map_delete(struct osd_thread_info *info, struct osd_device *osd,
973                        const struct lu_fid *fid, handle_t *th)
974 {
975         struct osd_obj_map      *map;
976         struct osd_obj_seq      *osd_seq;
977         struct dentry           *d;
978         struct ost_id           *ostid = &info->oti_ostid;
979         int                     dirn, rc = 0;
980         char                    name[32];
981         ENTRY;
982
983         map = osd->od_ost_map;
984         LASSERT(map);
985
986         /* map fid to seq:objid */
987         fid_to_ostid(fid, ostid);
988
989         osd_seq = osd_seq_load(info, osd, ostid_seq(ostid));
990         if (IS_ERR(osd_seq))
991                 GOTO(cleanup, rc = PTR_ERR(osd_seq));
992
993         dirn = ostid_id(ostid) & (osd_seq->oos_subdir_count - 1);
994         d = osd_seq->oos_dirs[dirn];
995         LASSERT(d);
996
997         osd_oid_name(name, sizeof(name), fid, ostid_id(ostid));
998         rc = osd_obj_del_entry(info, osd, d, name, th);
999 cleanup:
1000         RETURN(rc);
1001 }
1002
1003 int osd_obj_map_update(struct osd_thread_info *info,
1004                        struct osd_device *osd,
1005                        const struct lu_fid *fid,
1006                        const struct osd_inode_id *id,
1007                        handle_t *th)
1008 {
1009         struct osd_obj_seq      *osd_seq;
1010         struct dentry           *d;
1011         struct ost_id           *ostid = &info->oti_ostid;
1012         int                     dirn, rc = 0;
1013         char                    name[32];
1014         ENTRY;
1015
1016         fid_to_ostid(fid, ostid);
1017         osd_seq = osd_seq_load(info, osd, ostid_seq(ostid));
1018         if (IS_ERR(osd_seq))
1019                 RETURN(PTR_ERR(osd_seq));
1020
1021         dirn = ostid_id(ostid) & (osd_seq->oos_subdir_count - 1);
1022         d = osd_seq->oos_dirs[dirn];
1023         LASSERT(d);
1024
1025         osd_oid_name(name, sizeof(name), fid, ostid_id(ostid));
1026         rc = osd_obj_update_entry(info, osd, d, name, fid, id, th);
1027
1028         RETURN(rc);
1029 }
1030
1031 int osd_obj_map_recover(struct osd_thread_info *info,
1032                         struct osd_device *osd,
1033                         struct inode *src_parent,
1034                         struct dentry *src_child,
1035                         const struct lu_fid *fid)
1036 {
1037         struct osd_obj_seq         *osd_seq;
1038         struct dentry              *tgt_parent;
1039         struct dentry              *tgt_child = &info->oti_child_dentry;
1040         struct inode               *dir;
1041         struct inode               *inode     = src_child->d_inode;
1042         struct ost_id              *ostid     = &info->oti_ostid;
1043         handle_t                   *jh;
1044         struct ldiskfs_dir_entry_2 *de;
1045         struct buffer_head         *bh;
1046         char                        name[32];
1047         int                         dirn;
1048         int                         rc        = 0;
1049         ENTRY;
1050
1051         if (fid_is_last_id(fid)) {
1052                 osd_seq = osd_seq_load(info, osd, fid_seq(fid));
1053                 if (IS_ERR(osd_seq))
1054                         RETURN(PTR_ERR(osd_seq));
1055
1056                 tgt_parent = osd_seq->oos_root;
1057                 tgt_child->d_name.name = "LAST_ID";
1058                 tgt_child->d_name.len = strlen("LAST_ID");
1059         } else {
1060                 fid_to_ostid(fid, ostid);
1061                 osd_seq = osd_seq_load(info, osd, ostid_seq(ostid));
1062                 if (IS_ERR(osd_seq))
1063                         RETURN(PTR_ERR(osd_seq));
1064
1065                 dirn = ostid_id(ostid) & (osd_seq->oos_subdir_count - 1);
1066                 tgt_parent = osd_seq->oos_dirs[dirn];
1067                 osd_oid_name(name, sizeof(name), fid, ostid_id(ostid));
1068                 tgt_child->d_name.name = name;
1069                 tgt_child->d_name.len = strlen(name);
1070         }
1071         LASSERT(tgt_parent != NULL);
1072
1073         dir = tgt_parent->d_inode;
1074         tgt_child->d_name.hash = 0;
1075         tgt_child->d_parent = tgt_parent;
1076         tgt_child->d_inode = inode;
1077
1078         /* The non-initialized src_child may be destroyed. */
1079         jh = osd_journal_start_sb(osd_sb(osd), LDISKFS_HT_MISC,
1080                                 osd_dto_credits_noquota[DTO_INDEX_DELETE] +
1081                                 osd_dto_credits_noquota[DTO_INDEX_INSERT] +
1082                                 osd_dto_credits_noquota[DTO_OBJECT_DELETE]);
1083         if (IS_ERR(jh))
1084                 RETURN(PTR_ERR(jh));
1085
1086         ll_vfs_dq_init(src_parent);
1087         ll_vfs_dq_init(dir);
1088
1089         mutex_lock(&src_parent->i_mutex);
1090         mutex_lock(&dir->i_mutex);
1091         bh = osd_ldiskfs_find_entry(dir, &tgt_child->d_name, &de, NULL, NULL);
1092         if (bh != NULL) {
1093                 /* XXX: If some other object occupied the same slot. And If such
1094                  *      inode is zero-sized and with SUID+SGID, then means it is
1095                  *      a new created one. Maybe we can remove it and insert the
1096                  *      original one back to the /O/<seq>/d<x>. But there are
1097                  *      something to be considered:
1098                  *
1099                  *      1) The OST-object under /lost+found has crashed LMA.
1100                  *         So it should not conflict with the current one.
1101                  *
1102                  *      2) There are race conditions that: someone may just want
1103                  *         to modify the current one. Even if the OI scrub takes
1104                  *         the object lock when remove the current one, it still
1105                  *         cause the modification to be lost becasue the target
1106                  *         has been removed when the RPC service thread waiting
1107                  *         for the lock.
1108                  *
1109                  *      So keep it there before we have suitable solution. */
1110                 brelse(bh);
1111                 mutex_unlock(&dir->i_mutex);
1112                 mutex_unlock(&src_parent->i_mutex);
1113                 ldiskfs_journal_stop(jh);
1114
1115                 rc = -EEXIST;
1116                 /* If the src object has never been modified, then remove it. */
1117                 if (inode->i_size == 0 && inode->i_mode & S_ISUID &&
1118                     inode->i_mode & S_ISGID) {
1119                         rc = ll_vfs_unlink(src_parent, src_child);
1120                         if (unlikely(rc == -ENOENT))
1121                                 rc = 0;
1122                 }
1123                 RETURN(rc);
1124         }
1125
1126         bh = osd_ldiskfs_find_entry(src_parent, &src_child->d_name, &de,
1127                                     NULL, NULL);
1128         if (unlikely(bh == NULL))
1129                 GOTO(unlock, rc = -ENOENT);
1130
1131         rc = ldiskfs_delete_entry(jh, src_parent, de, bh);
1132         brelse(bh);
1133         if (rc != 0)
1134                 GOTO(unlock, rc);
1135
1136         rc = osd_ldiskfs_add_entry(jh, tgt_child, inode, NULL);
1137
1138         GOTO(unlock, rc);
1139
1140 unlock:
1141         mutex_unlock(&dir->i_mutex);
1142         mutex_unlock(&src_parent->i_mutex);
1143         ldiskfs_journal_stop(jh);
1144         return rc;
1145 }
1146
1147 static struct dentry *
1148 osd_object_spec_find(struct osd_thread_info *info, struct osd_device *osd,
1149                      const struct lu_fid *fid, char **name)
1150 {
1151         struct dentry *root = ERR_PTR(-ENOENT);
1152
1153         if (fid_is_last_id(fid)) {
1154                 struct osd_obj_seq *osd_seq;
1155
1156                 /* on creation of LAST_ID we create O/<seq> hierarchy */
1157                 osd_seq = osd_seq_load(info, osd, fid_seq(fid));
1158                 if (IS_ERR(osd_seq))
1159                         RETURN((struct dentry *)osd_seq);
1160
1161                 *name = "LAST_ID";
1162                 root = osd_seq->oos_root;
1163         } else {
1164                 *name = osd_lf_fid2name(fid);
1165                 if (*name == NULL)
1166                         CWARN("UNKNOWN COMPAT FID "DFID"\n", PFID(fid));
1167                 else if ((*name)[0])
1168                         root = osd_sb(osd)->s_root;
1169         }
1170
1171         return root;
1172 }
1173
1174 int osd_obj_spec_update(struct osd_thread_info *info, struct osd_device *osd,
1175                         const struct lu_fid *fid, const struct osd_inode_id *id,
1176                         handle_t *th)
1177 {
1178         struct dentry   *root;
1179         char            *name = NULL;
1180         int              rc;
1181         ENTRY;
1182
1183         root = osd_object_spec_find(info, osd, fid, &name);
1184         if (!IS_ERR(root)) {
1185                 rc = osd_obj_update_entry(info, osd, root, name, fid, id, th);
1186         } else {
1187                 rc = PTR_ERR(root);
1188                 if (rc == -ENOENT)
1189                         rc = 1;
1190         }
1191
1192         RETURN(rc);
1193 }
1194
1195 int osd_obj_spec_insert(struct osd_thread_info *info, struct osd_device *osd,
1196                         const struct lu_fid *fid, const struct osd_inode_id *id,
1197                         handle_t *th)
1198 {
1199         struct dentry   *root;
1200         char            *name = NULL;
1201         int              rc;
1202         ENTRY;
1203
1204         root = osd_object_spec_find(info, osd, fid, &name);
1205         if (!IS_ERR(root)) {
1206                 rc = osd_obj_add_entry(info, osd, root, name, id, th);
1207         } else {
1208                 rc = PTR_ERR(root);
1209                 if (rc == -ENOENT)
1210                         rc = 0;
1211         }
1212
1213         RETURN(rc);
1214 }
1215
1216 int osd_obj_spec_lookup(struct osd_thread_info *info, struct osd_device *osd,
1217                         const struct lu_fid *fid, struct osd_inode_id *id)
1218 {
1219         struct dentry   *root;
1220         struct dentry   *dentry;
1221         struct inode    *inode;
1222         char            *name = NULL;
1223         int             rc = -ENOENT;
1224         ENTRY;
1225
1226         if (fid_is_last_id(fid)) {
1227                 struct osd_obj_seq *osd_seq;
1228
1229                 osd_seq = osd_seq_load(info, osd, fid_seq(fid));
1230                 if (IS_ERR(osd_seq))
1231                         RETURN(PTR_ERR(osd_seq));
1232                 root = osd_seq->oos_root;
1233                 name = "LAST_ID";
1234         } else {
1235                 root = osd_sb(osd)->s_root;
1236                 name = osd_lf_fid2name(fid);
1237                 if (name == NULL || strlen(name) == 0)
1238                         RETURN(-ENOENT);
1239         }
1240
1241         dentry = ll_lookup_one_len(name, root, strlen(name));
1242         if (!IS_ERR(dentry)) {
1243                 inode = dentry->d_inode;
1244                 if (inode) {
1245                         if (is_bad_inode(inode)) {
1246                                 rc = -EIO;
1247                         } else {
1248                                 osd_id_gen(id, inode->i_ino,
1249                                            inode->i_generation);
1250                                 rc = 0;
1251                         }
1252                 }
1253                 /* if dentry is accessible after osd_compat_spec_insert it
1254                  * will still contain NULL inode, so don't keep it in cache */
1255                 d_invalidate(dentry);
1256                 dput(dentry);
1257         }
1258
1259         RETURN(rc);
1260 }