Whamcloud - gitweb
Land b_head_quota onto HEAD (20081116_0105)
[fs/lustre-release.git] / lustre / obdfilter / filter.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  2008 Sun Microsystems, Inc. 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/obdfilter/filter.c
37  *
38  * Author: Peter Braam <braam@clusterfs.com>
39  * Author: Andreas Dilger <adilger@clusterfs.com>
40  */
41
42 /*
43  * Invariant: Get O/R i_mutex for lookup, if needed, before any journal ops
44  *            (which need to get journal_lock, may block if journal full).
45  *
46  * Invariant: Call filter_start_transno() before any journal ops to avoid the
47  *            same deadlock problem.  We can (and want) to get rid of the
48  *            transno sem in favour of the dir/inode i_mutex to avoid single
49  *            threaded operation on the OST.
50  */
51
52 #define DEBUG_SUBSYSTEM S_FILTER
53
54 #ifndef AUTOCONF_INCLUDED
55 #include <linux/config.h>
56 #endif
57 #include <linux/module.h>
58 #include <linux/fs.h>
59 #include <linux/dcache.h>
60 #include <linux/init.h>
61 #include <linux/version.h>
62 #include <linux/sched.h>
63 #include <linux/mount.h>
64 #include <linux/buffer_head.h>
65
66 #include <obd_cksum.h>
67 #include <obd_class.h>
68 #include <obd_lov.h>
69 #include <lustre_dlm.h>
70 #include <lustre_fsfilt.h>
71 #include <lprocfs_status.h>
72 #include <lustre_log.h>
73 #include <libcfs/list.h>
74 #include <lustre_disk.h>
75 #include <lustre_quota.h>
76 #include <linux/slab.h>
77 #include <lustre_param.h>
78 #include <lustre/ll_fiemap.h>
79
80 #include "filter_internal.h"
81
82 /* Group 0 is no longer a legal group, to catch uninitialized IDs */
83 #define FILTER_MIN_GROUPS FILTER_GROUP_MDS0
84 static struct lvfs_callback_ops filter_lvfs_ops;
85 cfs_mem_cache_t *ll_fmd_cachep;
86
87 static void filter_commit_cb(struct obd_device *obd, __u64 transno,
88                              void *cb_data, int error)
89 {
90         obd_transno_commit_cb(obd, transno, error);
91 }
92
93 /* Assumes caller has already pushed us into the kernel context. */
94 int filter_finish_transno(struct obd_export *exp, struct obd_trans_info *oti,
95                           int rc, int force_sync)
96 {
97         struct filter_obd *filter = &exp->exp_obd->u.filter;
98         struct filter_export_data *fed = &exp->exp_filter_data;
99         struct lsd_client_data *lcd = fed->fed_lcd;
100         __u64 last_rcvd;
101         loff_t off;
102         int err, log_pri = D_RPCTRACE;
103
104         /* Propagate error code. */
105         if (rc)
106                 RETURN(rc);
107
108         if (!exp->exp_obd->obd_replayable || oti == NULL)
109                 RETURN(rc);
110
111         /* we don't allocate new transnos for replayed requests */
112         if (oti->oti_transno == 0) {
113                 spin_lock(&filter->fo_translock);
114                 last_rcvd = le64_to_cpu(filter->fo_fsd->lsd_last_transno) + 1;
115                 filter->fo_fsd->lsd_last_transno = cpu_to_le64(last_rcvd);
116                 spin_unlock(&filter->fo_translock);
117                 oti->oti_transno = last_rcvd;
118         } else {
119                 spin_lock(&filter->fo_translock);
120                 last_rcvd = oti->oti_transno;
121                 if (last_rcvd > le64_to_cpu(filter->fo_fsd->lsd_last_transno))
122                         filter->fo_fsd->lsd_last_transno =
123                                 cpu_to_le64(last_rcvd);
124                 spin_unlock(&filter->fo_translock);
125         }
126         lcd->lcd_last_transno = cpu_to_le64(last_rcvd);
127
128         /* could get xid from oti, if it's ever needed */
129         lcd->lcd_last_xid = 0;
130
131         off = fed->fed_lr_off;
132         if (off <= 0) {
133                 CERROR("%s: client idx %d is %lld\n", exp->exp_obd->obd_name,
134                        fed->fed_lr_idx, fed->fed_lr_off);
135                 err = -EINVAL;
136         } else {
137                 if (!force_sync)
138                         force_sync = fsfilt_add_journal_cb(exp->exp_obd,
139                                                            last_rcvd,
140                                                            oti->oti_handle,
141                                                            filter_commit_cb,
142                                                            NULL);
143
144                 err = fsfilt_write_record(exp->exp_obd, filter->fo_rcvd_filp,
145                                           lcd, sizeof(*lcd), &off,
146                                           force_sync | exp->exp_need_sync);
147                 if (force_sync)
148                         filter_commit_cb(exp->exp_obd, last_rcvd, NULL, err);
149         }
150         if (err) {
151                 log_pri = D_ERROR;
152                 if (rc == 0)
153                         rc = err;
154         }
155
156         CDEBUG(log_pri, "wrote trans "LPU64" for client %s at #%d: err = %d\n",
157                last_rcvd, lcd->lcd_uuid, fed->fed_lr_idx, err);
158
159         RETURN(rc);
160 }
161
162 void f_dput(struct dentry *dentry)
163 {
164         /* Can't go inside filter_ddelete because it can block */
165         CDEBUG(D_INODE, "putting %s: %p, count = %d\n",
166                dentry->d_name.name, dentry, atomic_read(&dentry->d_count) - 1);
167         LASSERT(atomic_read(&dentry->d_count) > 0);
168
169         dput(dentry);
170 }
171
172 static void init_brw_stats(struct brw_stats *brw_stats)
173 {
174         int i;
175         for (i = 0; i < BRW_LAST; i++)
176                 spin_lock_init(&brw_stats->hist[i].oh_lock);
177 }
178
179 static int lprocfs_init_rw_stats(struct obd_device *obd,
180                                  struct lprocfs_stats **stats)
181 {
182         int num_stats;
183
184         num_stats = (sizeof(*obd->obd_type->typ_dt_ops) / sizeof(void *)) +
185                                                         LPROC_FILTER_LAST - 1;
186         *stats = lprocfs_alloc_stats(num_stats, 0);
187         if (*stats == NULL)
188                 return -ENOMEM;
189
190         lprocfs_init_ops_stats(LPROC_FILTER_LAST, *stats);
191         lprocfs_counter_init(*stats, LPROC_FILTER_READ_BYTES,
192                              LPROCFS_CNTR_AVGMINMAX, "read_bytes", "bytes");
193         lprocfs_counter_init(*stats, LPROC_FILTER_WRITE_BYTES,
194                              LPROCFS_CNTR_AVGMINMAX, "write_bytes", "bytes");
195
196         return(0);
197 }
198
199 /* brw_stats are 2128, ops are 3916, ldlm are 204, so 6248 bytes per client,
200    plus the procfs overhead :( */
201 static int filter_export_stats_init(struct obd_device *obd,
202                                     struct obd_export *exp,
203                                     void *client_nid)
204 {
205         struct filter_export_data *fed = &exp->exp_filter_data;
206         int rc, newnid = 0;
207         ENTRY;
208
209         init_brw_stats(&fed->fed_brw_stats);
210
211         if (obd_uuid_equals(&exp->exp_client_uuid, &obd->obd_uuid))
212                 /* Self-export gets no proc entry */
213                 RETURN(0);
214
215         rc = lprocfs_exp_setup(exp, client_nid, &newnid);
216         if (rc) {
217                 /* Mask error for already created
218                  * /proc entries */
219                 if (rc == -EALREADY)
220                         rc = 0;
221                 RETURN(rc);
222         }
223
224         if (newnid) {
225                 struct nid_stat *tmp = exp->exp_nid_stats;
226                 LASSERT(tmp != NULL);
227
228                 OBD_ALLOC(tmp->nid_brw_stats, sizeof(struct brw_stats));
229                 if (tmp->nid_brw_stats == NULL)
230                         RETURN(-ENOMEM);
231
232                 init_brw_stats(tmp->nid_brw_stats);
233                 rc = lprocfs_seq_create(exp->exp_nid_stats->nid_proc, "brw_stats",
234                                         0644, &filter_per_nid_stats_fops,
235                                         exp->exp_nid_stats);
236                 if (rc)
237                         CWARN("Error adding the brw_stats file\n");
238
239                 rc = lprocfs_init_rw_stats(obd, &exp->exp_nid_stats->nid_stats);
240                 if (rc)
241                         RETURN(rc);
242
243                 rc = lprocfs_register_stats(tmp->nid_proc, "stats",
244                                             tmp->nid_stats);
245                 if (rc)
246                         RETURN(rc);
247                 /* Always add in ldlm_stats */
248                 tmp->nid_ldlm_stats = lprocfs_alloc_stats(LDLM_LAST_OPC -
249                                                           LDLM_FIRST_OPC, 0);
250                 if (tmp->nid_ldlm_stats == NULL)
251                         return -ENOMEM;
252
253                 lprocfs_init_ldlm_stats(tmp->nid_ldlm_stats);
254                 rc = lprocfs_register_stats(tmp->nid_proc, "ldlm_stats",
255                                             tmp->nid_ldlm_stats);
256                 if (rc)
257                         RETURN(rc);
258         }
259
260         RETURN(0);
261 }
262
263 /* Add client data to the FILTER.  We use a bitmap to locate a free space
264  * in the last_rcvd file if cl_idx is -1 (i.e. a new client).
265  * Otherwise, we have just read the data from the last_rcvd file and
266  * we know its offset. */
267 static int filter_client_add(struct obd_device *obd, struct obd_export *exp,
268                              int cl_idx)
269 {
270         struct filter_obd *filter = &obd->u.filter;
271         struct filter_export_data *fed = &exp->exp_filter_data;
272         unsigned long *bitmap = filter->fo_last_rcvd_slots;
273         int new_client = (cl_idx == -1);
274
275         ENTRY;
276
277         LASSERT(bitmap != NULL);
278         LASSERTF(cl_idx > -2, "%d\n", cl_idx);
279
280         /* Self-export */
281         if (strcmp(fed->fed_lcd->lcd_uuid, obd->obd_uuid.uuid) == 0)
282                 RETURN(0);
283
284         /* the bitmap operations can handle cl_idx > sizeof(long) * 8, so
285          * there's no need for extra complication here
286          */
287         if (new_client) {
288                 cl_idx = find_first_zero_bit(bitmap, LR_MAX_CLIENTS);
289         repeat:
290                 if (cl_idx >= LR_MAX_CLIENTS) {
291                         CERROR("no room for %u client - fix LR_MAX_CLIENTS\n",
292                                cl_idx);
293                         RETURN(-EOVERFLOW);
294                 }
295                 if (test_and_set_bit(cl_idx, bitmap)) {
296                         cl_idx = find_next_zero_bit(bitmap, LR_MAX_CLIENTS,
297                                                     cl_idx);
298                         goto repeat;
299                 }
300         } else {
301                 if (test_and_set_bit(cl_idx, bitmap)) {
302                         CERROR("FILTER client %d: bit already set in bitmap!\n",
303                                cl_idx);
304                         LBUG();
305                 }
306         }
307
308         fed->fed_lr_idx = cl_idx;
309         fed->fed_lr_off = le32_to_cpu(filter->fo_fsd->lsd_client_start) +
310                 cl_idx * le16_to_cpu(filter->fo_fsd->lsd_client_size);
311         LASSERTF(fed->fed_lr_off > 0, "fed_lr_off = %llu\n", fed->fed_lr_off);
312
313         CDEBUG(D_INFO, "client at index %d (%llu) with UUID '%s' added\n",
314                fed->fed_lr_idx, fed->fed_lr_off, fed->fed_lcd->lcd_uuid);
315
316         if (new_client) {
317                 struct lvfs_run_ctxt saved;
318                 loff_t off = fed->fed_lr_off;
319                 int rc;
320                 void *handle;
321
322                 CDEBUG(D_INFO, "writing client lcd at idx %u (%llu) (len %u)\n",
323                        fed->fed_lr_idx,off,(unsigned int)sizeof(*fed->fed_lcd));
324
325                 push_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
326                 /* Transaction needed to fix bug 1403 */
327                 handle = fsfilt_start(obd,
328                                       filter->fo_rcvd_filp->f_dentry->d_inode,
329                                       FSFILT_OP_SETATTR, NULL);
330                 if (IS_ERR(handle)) {
331                         rc = PTR_ERR(handle);
332                         CERROR("unable to start transaction: rc %d\n", rc);
333                 } else {
334                         rc = fsfilt_add_journal_cb(obd, 0, handle,
335                                                    target_client_add_cb, exp);
336                         if (rc == 0) {
337                                 spin_lock(&exp->exp_lock);
338                                 exp->exp_need_sync = 1;
339                                 spin_unlock(&exp->exp_lock);
340                         }
341                         rc = fsfilt_write_record(obd, filter->fo_rcvd_filp,
342                                                  fed->fed_lcd,
343                                                  sizeof(*fed->fed_lcd),
344                                                  &off, rc /* sync if no cb */);
345                         fsfilt_commit(obd,
346                                       filter->fo_rcvd_filp->f_dentry->d_inode,
347                                       handle, 0);
348                 }
349                 pop_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
350
351                 if (rc) {
352                         CERROR("error writing %s client idx %u: rc %d\n",
353                                LAST_RCVD, fed->fed_lr_idx, rc);
354                         RETURN(rc);
355                 }
356         }
357         RETURN(0);
358 }
359
360 static int filter_client_free(struct obd_export *exp)
361 {
362         struct filter_export_data *fed = &exp->exp_filter_data;
363         struct filter_obd *filter = &exp->exp_obd->u.filter;
364         struct obd_device *obd = exp->exp_obd;
365         struct lsd_client_data zero_lcd;
366         struct lvfs_run_ctxt saved;
367         int rc;
368         loff_t off;
369         ENTRY;
370
371         if (fed->fed_lcd == NULL)
372                 RETURN(0);
373
374         /* XXX if lcd_uuid were a real obd_uuid, I could use obd_uuid_equals */
375         if (strcmp(fed->fed_lcd->lcd_uuid, obd->obd_uuid.uuid ) == 0)
376                 GOTO(free, 0);
377
378         CDEBUG(D_INFO, "freeing client at idx %u, offset %lld with UUID '%s'\n",
379                fed->fed_lr_idx, fed->fed_lr_off, fed->fed_lcd->lcd_uuid);
380
381         LASSERT(filter->fo_last_rcvd_slots != NULL);
382
383         off = fed->fed_lr_off;
384
385         /* Don't clear fed_lr_idx here as it is likely also unset.  At worst
386          * we leak a client slot that will be cleaned on the next recovery. */
387         if (off <= 0) {
388                 CERROR("%s: client idx %d has med_off %lld\n",
389                        obd->obd_name, fed->fed_lr_idx, off);
390                 GOTO(free, rc = -EINVAL);
391         }
392
393         /* Clear the bit _after_ zeroing out the client so we don't
394            race with filter_client_add and zero out new clients.*/
395         if (!test_bit(fed->fed_lr_idx, filter->fo_last_rcvd_slots)) {
396                 CERROR("FILTER client %u: bit already clear in bitmap!!\n",
397                        fed->fed_lr_idx);
398                 LBUG();
399         }
400
401         if (!(exp->exp_flags & OBD_OPT_FAILOVER)) {
402                 memset(&zero_lcd, 0, sizeof zero_lcd);
403                 push_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
404                 rc = fsfilt_write_record(obd, filter->fo_rcvd_filp, &zero_lcd,
405                                          sizeof(zero_lcd), &off,
406                                          (!exp->exp_libclient ||
407                                           exp->exp_need_sync));
408                 if (rc == 0)
409                         /* update server's transno */
410                         filter_update_server_data(obd, filter->fo_rcvd_filp,
411                                                   filter->fo_fsd,
412                                                   !exp->exp_libclient);
413                 pop_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
414
415                 CDEBUG(rc == 0 ? D_INFO : D_ERROR,
416                        "zeroing out client %s at idx %u (%llu) in %s rc %d\n",
417                        fed->fed_lcd->lcd_uuid, fed->fed_lr_idx, fed->fed_lr_off,
418                        LAST_RCVD, rc);
419         }
420
421         if (!test_and_clear_bit(fed->fed_lr_idx, filter->fo_last_rcvd_slots)) {
422                 CERROR("FILTER client %u: bit already clear in bitmap!!\n",
423                        fed->fed_lr_idx);
424                 LBUG();
425         }
426
427         EXIT;
428 free:
429         OBD_FREE_PTR(fed->fed_lcd);
430         fed->fed_lcd = NULL;
431
432         return 0;
433 }
434
435 /* drop fmd reference, free it if last ref. must be called with fed_lock held.*/
436 static inline void filter_fmd_put_nolock(struct filter_export_data *fed,
437                                          struct filter_mod_data *fmd)
438 {
439         LASSERT_SPIN_LOCKED(&fed->fed_lock);
440         if (--fmd->fmd_refcount == 0) {
441                 /* XXX when we have persistent reservations and the handle
442                  * is stored herein we need to drop it here. */
443                 fed->fed_mod_count--;
444                 list_del(&fmd->fmd_list);
445                 OBD_SLAB_FREE(fmd, ll_fmd_cachep, sizeof(*fmd));
446         }
447 }
448
449 /* drop fmd reference, free it if last ref */
450 void filter_fmd_put(struct obd_export *exp, struct filter_mod_data *fmd)
451 {
452         struct filter_export_data *fed;
453
454         if (fmd == NULL)
455                 return;
456
457         fed = &exp->exp_filter_data;
458         spin_lock(&fed->fed_lock);
459         filter_fmd_put_nolock(fed, fmd); /* caller reference */
460         spin_unlock(&fed->fed_lock);
461 }
462
463 /* expire entries from the end of the list if there are too many
464  * or they are too old */
465 static void filter_fmd_expire_nolock(struct filter_obd *filter,
466                                      struct filter_export_data *fed,
467                                      struct filter_mod_data *keep)
468 {
469         struct filter_mod_data *fmd, *tmp;
470
471         list_for_each_entry_safe(fmd, tmp, &fed->fed_mod_list, fmd_list) {
472                 if (fmd == keep)
473                         break;
474
475                 if (time_before(jiffies, fmd->fmd_expire) &&
476                     fed->fed_mod_count < filter->fo_fmd_max_num)
477                         break;
478
479                 list_del_init(&fmd->fmd_list);
480                 filter_fmd_put_nolock(fed, fmd); /* list reference */
481         }
482 }
483
484 void filter_fmd_expire(struct obd_export *exp)
485 {
486         spin_lock(&exp->exp_filter_data.fed_lock);
487         filter_fmd_expire_nolock(&exp->exp_obd->u.filter,
488                                  &exp->exp_filter_data, NULL);
489         spin_unlock(&exp->exp_filter_data.fed_lock);
490 }
491
492 /* find specified objid, group in export fmd list.
493  * caller must hold fed_lock and take fmd reference itself */
494 static struct filter_mod_data *filter_fmd_find_nolock(struct filter_obd *filter,
495                                                 struct filter_export_data *fed,
496                                                 obd_id objid, obd_gr group)
497 {
498         struct filter_mod_data *found = NULL, *fmd;
499
500         LASSERT_SPIN_LOCKED(&fed->fed_lock);
501
502         list_for_each_entry_reverse(fmd, &fed->fed_mod_list, fmd_list) {
503                 if (fmd->fmd_id == objid && fmd->fmd_gr == group) {
504                         found = fmd;
505                         list_del(&fmd->fmd_list);
506                         list_add_tail(&fmd->fmd_list, &fed->fed_mod_list);
507                         fmd->fmd_expire = jiffies + filter->fo_fmd_max_age;
508                         break;
509                 }
510         }
511
512         filter_fmd_expire_nolock(filter, fed, found);
513
514         return found;
515 }
516
517 /* Find fmd based on objid and group, or return NULL if not found. */
518 struct filter_mod_data *filter_fmd_find(struct obd_export *exp,
519                                         obd_id objid, obd_gr group)
520 {
521         struct filter_mod_data *fmd;
522
523         spin_lock(&exp->exp_filter_data.fed_lock);
524         fmd = filter_fmd_find_nolock(&exp->exp_obd->u.filter,
525                                      &exp->exp_filter_data, objid, group);
526         if (fmd)
527                 fmd->fmd_refcount++;    /* caller reference */
528         spin_unlock(&exp->exp_filter_data.fed_lock);
529
530         return fmd;
531 }
532
533 /* Find fmd based on objid and group, or create a new one if none is found.
534  * It is possible for this function to return NULL under memory pressure,
535  * or if objid = 0 is passed (which will only cause old entries to expire).
536  * Currently this is not fatal because any fmd state is transient and
537  * may also be freed when it gets sufficiently old. */
538 struct filter_mod_data *filter_fmd_get(struct obd_export *exp,
539                                        obd_id objid, obd_gr group)
540 {
541         struct filter_export_data *fed = &exp->exp_filter_data;
542         struct filter_mod_data *found = NULL, *fmd_new = NULL;
543
544         OBD_SLAB_ALLOC(fmd_new, ll_fmd_cachep, CFS_ALLOC_IO, sizeof(*fmd_new));
545
546         spin_lock(&fed->fed_lock);
547         found = filter_fmd_find_nolock(&exp->exp_obd->u.filter,fed,objid,group);
548         if (fmd_new) {
549                 if (found == NULL) {
550                         list_add_tail(&fmd_new->fmd_list, &fed->fed_mod_list);
551                         fmd_new->fmd_id = objid;
552                         fmd_new->fmd_gr = group;
553                         fmd_new->fmd_refcount++;   /* list reference */
554                         found = fmd_new;
555                         fed->fed_mod_count++;
556                 } else {
557                         OBD_SLAB_FREE(fmd_new, ll_fmd_cachep, sizeof(*fmd_new));
558                 }
559         }
560         if (found) {
561                 found->fmd_refcount++;          /* caller reference */
562                 found->fmd_expire = jiffies +
563                         exp->exp_obd->u.filter.fo_fmd_max_age;
564         }
565
566         spin_unlock(&fed->fed_lock);
567
568         return found;
569 }
570
571 #ifdef DO_FMD_DROP
572 /* drop fmd list reference so it will disappear when last reference is put.
573  * This isn't so critical because it would in fact only affect the one client
574  * that is doing the unlink and at worst we have an stale entry referencing
575  * an object that should never be used again. */
576 static void filter_fmd_drop(struct obd_export *exp, obd_id objid, obd_gr group)
577 {
578         struct filter_mod_data *found = NULL;
579
580         spin_lock(&exp->exp_filter_data.fed_lock);
581         found = filter_fmd_find_nolock(&exp->exp_filter_data, objid, group);
582         if (found) {
583                 list_del_init(&found->fmd_list);
584                 filter_fmd_put_nolock(&exp->exp_filter_data, found);
585         }
586         spin_unlock(&exp->exp_filter_data.fed_lock);
587 }
588 #else
589 #define filter_fmd_drop(exp, objid, group)
590 #endif
591
592 /* remove all entries from fmd list */
593 static void filter_fmd_cleanup(struct obd_export *exp)
594 {
595         struct filter_export_data *fed = &exp->exp_filter_data;
596         struct filter_mod_data *fmd = NULL, *tmp;
597
598         spin_lock(&fed->fed_lock);
599         list_for_each_entry_safe(fmd, tmp, &fed->fed_mod_list, fmd_list) {
600                 list_del_init(&fmd->fmd_list);
601                 filter_fmd_put_nolock(fed, fmd);
602         }
603         spin_unlock(&fed->fed_lock);
604 }
605
606 static int filter_init_export(struct obd_export *exp)
607 {
608         spin_lock_init(&exp->exp_filter_data.fed_lock);
609         CFS_INIT_LIST_HEAD(&exp->exp_filter_data.fed_mod_list);
610
611         spin_lock(&exp->exp_lock);
612         exp->exp_connecting = 1;
613         spin_unlock(&exp->exp_lock);
614
615         return ldlm_init_export(exp);
616 }
617
618 static int filter_free_server_data(struct filter_obd *filter)
619 {
620         OBD_FREE(filter->fo_fsd, sizeof(*filter->fo_fsd));
621         filter->fo_fsd = NULL;
622         OBD_FREE(filter->fo_last_rcvd_slots, LR_MAX_CLIENTS / 8);
623         filter->fo_last_rcvd_slots = NULL;
624         return 0;
625 }
626
627 /* assumes caller is already in kernel ctxt */
628 int filter_update_server_data(struct obd_device *obd, struct file *filp,
629                               struct lr_server_data *fsd, int force_sync)
630 {
631         loff_t off = 0;
632         int rc;
633         ENTRY;
634
635         CDEBUG(D_INODE, "server uuid      : %s\n", fsd->lsd_uuid);
636         CDEBUG(D_INODE, "server last_rcvd : "LPU64"\n",
637                le64_to_cpu(fsd->lsd_last_transno));
638         CDEBUG(D_INODE, "server last_mount: "LPU64"\n",
639                le64_to_cpu(fsd->lsd_mount_count));
640
641         fsd->lsd_compat14 = fsd->lsd_last_transno;
642         rc = fsfilt_write_record(obd, filp, fsd, sizeof(*fsd), &off, force_sync);
643         if (rc)
644                 CERROR("error writing lr_server_data: rc = %d\n", rc);
645
646         RETURN(rc);
647 }
648
649 int filter_update_last_objid(struct obd_device *obd, obd_gr group,
650                              int force_sync)
651 {
652         struct filter_obd *filter = &obd->u.filter;
653         __u64 tmp;
654         loff_t off = 0;
655         int rc;
656         ENTRY;
657
658         if (filter->fo_last_objid_files[group] == NULL) {
659                 CERROR("Object group "LPU64" not fully setup; not updating "
660                        "last_objid\n", group);
661                 RETURN(-EINVAL);
662         }
663
664         CDEBUG(D_INODE, "%s: server last_objid for group "LPU64": "LPU64"\n",
665                obd->obd_name, group, filter->fo_last_objids[group]);
666
667         tmp = cpu_to_le64(filter->fo_last_objids[group]);
668         rc = fsfilt_write_record(obd, filter->fo_last_objid_files[group],
669                                  &tmp, sizeof(tmp), &off, force_sync);
670         if (rc)
671                 CERROR("error writing group "LPU64" last objid: rc = %d\n",
672                        group, rc);
673         RETURN(rc);
674 }
675 extern int ost_handle(struct ptlrpc_request *req);
676 /* assumes caller has already in kernel ctxt */
677 static int filter_init_server_data(struct obd_device *obd, struct file * filp)
678 {
679         struct filter_obd *filter = &obd->u.filter;
680         struct lr_server_data *fsd;
681         struct lsd_client_data *lcd = NULL;
682         struct inode *inode = filp->f_dentry->d_inode;
683         unsigned long last_rcvd_size = i_size_read(inode);
684         __u64 mount_count;
685         int cl_idx;
686         loff_t off = 0;
687         int rc;
688
689         /* ensure padding in the struct is the correct size */
690         CLASSERT (offsetof(struct lr_server_data, lsd_padding) +
691                  sizeof(fsd->lsd_padding) == LR_SERVER_SIZE);
692         CLASSERT (offsetof(struct lsd_client_data, lcd_padding) +
693                  sizeof(lcd->lcd_padding) == LR_CLIENT_SIZE);
694
695         OBD_ALLOC(fsd, sizeof(*fsd));
696         if (!fsd)
697                 RETURN(-ENOMEM);
698         filter->fo_fsd = fsd;
699
700         OBD_ALLOC(filter->fo_last_rcvd_slots, LR_MAX_CLIENTS / 8);
701         if (filter->fo_last_rcvd_slots == NULL) {
702                 OBD_FREE(fsd, sizeof(*fsd));
703                 RETURN(-ENOMEM);
704         }
705
706         if (last_rcvd_size == 0) {
707                 LCONSOLE_WARN("%s: new disk, initializing\n", obd->obd_name);
708
709                 memcpy(fsd->lsd_uuid, obd->obd_uuid.uuid,sizeof(fsd->lsd_uuid));
710                 fsd->lsd_last_transno = 0;
711                 mount_count = fsd->lsd_mount_count = 0;
712                 fsd->lsd_server_size = cpu_to_le32(LR_SERVER_SIZE);
713                 fsd->lsd_client_start = cpu_to_le32(LR_CLIENT_START);
714                 fsd->lsd_client_size = cpu_to_le16(LR_CLIENT_SIZE);
715                 fsd->lsd_subdir_count = cpu_to_le16(FILTER_SUBDIR_COUNT);
716                 filter->fo_subdir_count = FILTER_SUBDIR_COUNT;
717                 fsd->lsd_feature_incompat = cpu_to_le32(OBD_INCOMPAT_OST);
718         } else {
719                 rc = fsfilt_read_record(obd, filp, fsd, sizeof(*fsd), &off);
720                 if (rc) {
721                         CDEBUG(D_INODE,"OBD filter: error reading %s: rc %d\n",
722                                LAST_RCVD, rc);
723                         GOTO(err_fsd, rc);
724                 }
725                 if (strcmp(fsd->lsd_uuid, obd->obd_uuid.uuid) != 0) {
726                         LCONSOLE_ERROR_MSG(0x134, "Trying to start OBD %s "
727                                            "using the wrong disk %s. Were the "
728                                            "/dev/ assignments rearranged?\n",
729                                            obd->obd_uuid.uuid, fsd->lsd_uuid);
730                         GOTO(err_fsd, rc = -EINVAL);
731                 }
732                 mount_count = le64_to_cpu(fsd->lsd_mount_count);
733                 filter->fo_subdir_count = le16_to_cpu(fsd->lsd_subdir_count);
734                 /* COMPAT_146 */
735                 /* Assume old last_rcvd format unless I_C_LR is set */
736                 if (!(fsd->lsd_feature_incompat &
737                       cpu_to_le32(OBD_INCOMPAT_COMMON_LR)))
738                         fsd->lsd_last_transno = fsd->lsd_compat14;
739                 /* end COMPAT_146 */
740         }
741
742         if (fsd->lsd_feature_incompat & ~cpu_to_le32(FILTER_INCOMPAT_SUPP)) {
743                 CERROR("%s: unsupported incompat filesystem feature(s) %x\n",
744                        obd->obd_name, le32_to_cpu(fsd->lsd_feature_incompat) &
745                        ~FILTER_INCOMPAT_SUPP);
746                 GOTO(err_fsd, rc = -EINVAL);
747         }
748         if (fsd->lsd_feature_rocompat & ~cpu_to_le32(FILTER_ROCOMPAT_SUPP)) {
749                 CERROR("%s: unsupported read-only filesystem feature(s) %x\n",
750                        obd->obd_name, le32_to_cpu(fsd->lsd_feature_rocompat) &
751                        ~FILTER_ROCOMPAT_SUPP);
752                 /* Do something like remount filesystem read-only */
753                 GOTO(err_fsd, rc = -EINVAL);
754         }
755
756         CDEBUG(D_INODE, "%s: server last_transno : "LPU64"\n",
757                obd->obd_name, le64_to_cpu(fsd->lsd_last_transno));
758         CDEBUG(D_INODE, "%s: server mount_count: "LPU64"\n",
759                obd->obd_name, mount_count + 1);
760         CDEBUG(D_INODE, "%s: server data size: %u\n",
761                obd->obd_name, le32_to_cpu(fsd->lsd_server_size));
762         CDEBUG(D_INODE, "%s: per-client data start: %u\n",
763                obd->obd_name, le32_to_cpu(fsd->lsd_client_start));
764         CDEBUG(D_INODE, "%s: per-client data size: %u\n",
765                obd->obd_name, le32_to_cpu(fsd->lsd_client_size));
766         CDEBUG(D_INODE, "%s: server subdir_count: %u\n",
767                obd->obd_name, le16_to_cpu(fsd->lsd_subdir_count));
768         CDEBUG(D_INODE, "%s: last_rcvd clients: %lu\n", obd->obd_name,
769                last_rcvd_size <= le32_to_cpu(fsd->lsd_client_start) ? 0 :
770                (last_rcvd_size - le32_to_cpu(fsd->lsd_client_start)) /
771                 le16_to_cpu(fsd->lsd_client_size));
772
773         if (!obd->obd_replayable) {
774                 CWARN("%s: recovery support OFF\n", obd->obd_name);
775                 GOTO(out, rc = 0);
776         }
777
778         for (cl_idx = 0, off = le32_to_cpu(fsd->lsd_client_start);
779              off < last_rcvd_size; cl_idx++) {
780                 __u64 last_rcvd;
781                 struct obd_export *exp;
782                 struct filter_export_data *fed;
783
784                 if (!lcd) {
785                         OBD_ALLOC_PTR(lcd);
786                         if (!lcd)
787                                 GOTO(err_client, rc = -ENOMEM);
788                 }
789
790                 /* Don't assume off is incremented properly by
791                  * fsfilt_read_record(), in case sizeof(*lcd)
792                  * isn't the same as fsd->lsd_client_size.  */
793                 off = le32_to_cpu(fsd->lsd_client_start) +
794                         cl_idx * le16_to_cpu(fsd->lsd_client_size);
795                 rc = fsfilt_read_record(obd, filp, lcd, sizeof(*lcd), &off);
796                 if (rc) {
797                         CERROR("error reading FILT %s idx %d off %llu: rc %d\n",
798                                LAST_RCVD, cl_idx, off, rc);
799                         break; /* read error shouldn't cause startup to fail */
800                 }
801
802                 if (lcd->lcd_uuid[0] == '\0') {
803                         CDEBUG(D_INFO, "skipping zeroed client at offset %d\n",
804                                cl_idx);
805                         continue;
806                 }
807
808                 last_rcvd = le64_to_cpu(lcd->lcd_last_transno);
809
810                 /* These exports are cleaned up by filter_disconnect(), so they
811                  * need to be set up like real exports as filter_connect() does.
812                  */
813                 exp = class_new_export(obd, (struct obd_uuid *)lcd->lcd_uuid);
814
815                 CDEBUG(D_HA, "RCVRNG CLIENT uuid: %s idx: %d lr: "LPU64
816                        " srv lr: "LPU64"\n", lcd->lcd_uuid, cl_idx,
817                        last_rcvd, le64_to_cpu(fsd->lsd_last_transno));
818                 if (IS_ERR(exp)) {
819                         if (PTR_ERR(exp) == -EALREADY) {
820                                 /* export already exists, zero out this one */
821                                 CERROR("Zeroing out duplicate export due to "
822                                        "bug 10479.\n");
823                                 lcd->lcd_uuid[0] = '\0';
824                         } else {
825                                 GOTO(err_client, rc = PTR_ERR(exp));
826                         }
827                 } else {
828                         fed = &exp->exp_filter_data;
829                         fed->fed_lcd = lcd;
830                         fed->fed_group = 0; /* will be assigned at connect */
831                         filter_export_stats_init(obd, exp, NULL);
832                         rc = filter_client_add(obd, exp, cl_idx);
833                         /* can't fail for existing client */
834                         LASSERTF(rc == 0, "rc = %d\n", rc);
835
836                         lcd = NULL;
837                         spin_lock(&exp->exp_lock);
838                         exp->exp_connecting = 0;
839                         exp->exp_in_recovery = 0;
840                         spin_unlock(&exp->exp_lock);
841                         obd->obd_max_recoverable_clients++;
842                         class_export_put(exp);
843                 }
844
845                 /* Need to check last_rcvd even for duplicated exports. */
846                 CDEBUG(D_OTHER, "client at idx %d has last_rcvd = "LPU64"\n",
847                        cl_idx, last_rcvd);
848
849                 if (last_rcvd > le64_to_cpu(fsd->lsd_last_transno))
850                         fsd->lsd_last_transno = cpu_to_le64(last_rcvd);
851         }
852
853         if (lcd)
854                 OBD_FREE_PTR(lcd);
855
856         obd->obd_last_committed = le64_to_cpu(fsd->lsd_last_transno);
857
858         target_recovery_init(obd, ost_handle);
859
860 out:
861         filter->fo_mount_count = mount_count + 1;
862         fsd->lsd_mount_count = cpu_to_le64(filter->fo_mount_count);
863
864         /* save it, so mount count and last_transno is current */
865         rc = filter_update_server_data(obd, filp, filter->fo_fsd, 1);
866         if (rc)
867                 GOTO(err_client, rc);
868
869         RETURN(0);
870
871 err_client:
872         target_recovery_fini(obd);
873 err_fsd:
874         filter_free_server_data(filter);
875         RETURN(rc);
876 }
877
878 static int filter_cleanup_groups(struct obd_device *obd)
879 {
880         struct filter_obd *filter = &obd->u.filter;
881         struct file *filp;
882         struct dentry *dentry;
883         int i, j;
884         ENTRY;
885
886         if (filter->fo_dentry_O_groups != NULL) {
887                 for (i = 0; i < filter->fo_group_count; i++) {
888                         dentry = filter->fo_dentry_O_groups[i];
889                         if (dentry != NULL)
890                                 f_dput(dentry);
891                 }
892                 OBD_FREE(filter->fo_dentry_O_groups,
893                          filter->fo_group_count *
894                          sizeof(*filter->fo_dentry_O_groups));
895                 filter->fo_dentry_O_groups = NULL;
896         }
897         if (filter->fo_last_objid_files != NULL) {
898                 for (i = 0; i < filter->fo_group_count; i++) {
899                         filp = filter->fo_last_objid_files[i];
900                         if (filp != NULL)
901                                 filp_close(filp, 0);
902                 }
903                 OBD_FREE(filter->fo_last_objid_files,
904                          filter->fo_group_count *
905                          sizeof(*filter->fo_last_objid_files));
906                 filter->fo_last_objid_files = NULL;
907         }
908         if (filter->fo_dentry_O_sub != NULL) {
909                 for (i = 0; i < filter->fo_group_count; i++) {
910                         for (j = 0; j < filter->fo_subdir_count; j++) {
911                                 dentry = filter->fo_dentry_O_sub[i].dentry[j];
912                                 if (dentry != NULL)
913                                         f_dput(dentry);
914                         }
915                 }
916                 OBD_FREE(filter->fo_dentry_O_sub,
917                          filter->fo_group_count *
918                          sizeof(*filter->fo_dentry_O_sub));
919                 filter->fo_dentry_O_sub = NULL;
920         }
921         if (filter->fo_last_objids != NULL) {
922                 OBD_FREE(filter->fo_last_objids,
923                          filter->fo_group_count *
924                          sizeof(*filter->fo_last_objids));
925                 filter->fo_last_objids = NULL;
926         }
927         if (filter->fo_dentry_O != NULL) {
928                 f_dput(filter->fo_dentry_O);
929                 filter->fo_dentry_O = NULL;
930         }
931         RETURN(0);
932 }
933
934 static int filter_update_last_group(struct obd_device *obd, int group)
935 {
936         struct filter_obd *filter = &obd->u.filter;
937         struct file *filp = NULL;
938         int last_group = 0, rc;
939         loff_t off = 0;
940         ENTRY;
941
942         if (group <= filter->fo_committed_group)
943                 RETURN(0);
944
945         filp = filp_open("LAST_GROUP", O_RDWR, 0700);
946         if (IS_ERR(filp)) {
947                 rc = PTR_ERR(filp);
948                 filp = NULL;
949                 CERROR("cannot open LAST_GROUP: rc = %d\n", rc);
950                 GOTO(cleanup, rc);
951         }
952
953         rc = fsfilt_read_record(obd, filp, &last_group, sizeof(__u32), &off);
954         if (rc) {
955                 CDEBUG(D_INODE, "error reading LAST_GROUP: rc %d\n",rc);
956                 GOTO(cleanup, rc);
957         }
958         LASSERT(off == 0 || last_group >= FILTER_MIN_GROUPS);
959         CDEBUG(D_INODE, "%s: previous %d, new %d\n",
960                obd->obd_name, last_group, group);
961
962         off = 0;
963         last_group = group;
964         /* must be sync: bXXXX */
965         rc = fsfilt_write_record(obd, filp, &last_group, sizeof(__u32), &off, 1);
966         if (rc) {
967                 CDEBUG(D_INODE, "error updating LAST_GROUP: rc %d\n", rc);
968                 GOTO(cleanup, rc);
969         }
970
971         filter->fo_committed_group = group;
972 cleanup:
973         if (filp)
974                 filp_close(filp, 0);
975         RETURN(rc);
976 }
977
978 static int filter_read_group_internal(struct obd_device *obd, int group,
979                                       int create)
980 {
981         struct filter_obd *filter = &obd->u.filter;
982         __u64 *new_objids = NULL;
983         struct filter_subdirs *new_subdirs = NULL, *tmp_subdirs = NULL;
984         struct dentry **new_groups = NULL;
985         struct file **new_files = NULL;
986         struct dentry *dentry;
987         struct file *filp;
988         int old_count = filter->fo_group_count, rc, stage = 0, i;
989         char name[25];
990         __u64 last_objid;
991         loff_t off = 0;
992         int len = group + 1;
993
994         snprintf(name, 24, "%d", group);
995         name[24] = '\0';
996
997         if (!create) {
998                 dentry = ll_lookup_one_len(name, filter->fo_dentry_O,
999                                            strlen(name));
1000                 if (IS_ERR(dentry)) {
1001                         CERROR("Cannot lookup expected object group %d: %ld\n",
1002                                group, PTR_ERR(dentry));
1003                         RETURN(PTR_ERR(dentry));
1004                 }
1005         } else {
1006                 dentry = simple_mkdir(filter->fo_dentry_O, filter->fo_vfsmnt,
1007                                       name, 0700, 1);
1008                 if (IS_ERR(dentry)) {
1009                         CERROR("cannot lookup/create O/%s: rc = %ld\n", name,
1010                                PTR_ERR(dentry));
1011                         RETURN(PTR_ERR(dentry));
1012                 }
1013         }
1014         stage = 1;
1015
1016         snprintf(name, 24, "O/%d/LAST_ID", group);
1017         name[24] = '\0';
1018         filp = filp_open(name, O_CREAT | O_RDWR, 0700);
1019         if (IS_ERR(filp)) {
1020                 CERROR("cannot create %s: rc = %ld\n", name, PTR_ERR(filp));
1021                 GOTO(cleanup, rc = PTR_ERR(filp));
1022         }
1023         stage = 2;
1024
1025         rc = fsfilt_read_record(obd, filp, &last_objid, sizeof(__u64), &off);
1026         if (rc) {
1027                 CDEBUG(D_INODE, "error reading %s: rc %d\n", name, rc);
1028                 GOTO(cleanup, rc);
1029         }
1030
1031         if (filter->fo_subdir_count) {
1032                 OBD_ALLOC(tmp_subdirs, sizeof(*tmp_subdirs));
1033                 if (tmp_subdirs == NULL)
1034                         GOTO(cleanup, rc = -ENOMEM);
1035                 stage = 3;
1036
1037                 for (i = 0; i < filter->fo_subdir_count; i++) {
1038                         char dir[20];
1039                         snprintf(dir, sizeof(dir), "d%u", i);
1040
1041                         tmp_subdirs->dentry[i] = simple_mkdir(dentry,
1042                                                               filter->fo_vfsmnt,
1043                                                               dir, 0700, 1);
1044                         if (IS_ERR(tmp_subdirs->dentry[i])) {
1045                                 rc = PTR_ERR(tmp_subdirs->dentry[i]);
1046                                 CERROR("can't lookup/create O/%d/%s: rc = %d\n",
1047                                        group, dir, rc);
1048                                 GOTO(cleanup, rc);
1049                         }
1050
1051                         CDEBUG(D_INODE, "got/created O/%d/%s: %p\n", group, dir,
1052                                tmp_subdirs->dentry[i]);
1053                 }
1054         }
1055
1056         /* 'group' is an index; we need an array of length 'group + 1' */
1057         if (group + 1 > old_count) {
1058                 OBD_ALLOC(new_objids, len * sizeof(*new_objids));
1059                 OBD_ALLOC(new_subdirs, len * sizeof(*new_subdirs));
1060                 OBD_ALLOC(new_groups, len * sizeof(*new_groups));
1061                 OBD_ALLOC(new_files, len * sizeof(*new_files));
1062                 stage = 4;
1063                 if (new_objids == NULL || new_subdirs == NULL ||
1064                     new_groups == NULL || new_files == NULL)
1065                         GOTO(cleanup, rc = -ENOMEM);
1066
1067                 if (old_count) {
1068                         memcpy(new_objids, filter->fo_last_objids,
1069                                old_count * sizeof(*new_objids));
1070                         memcpy(new_subdirs, filter->fo_dentry_O_sub,
1071                                old_count * sizeof(*new_subdirs));
1072                         memcpy(new_groups, filter->fo_dentry_O_groups,
1073                                old_count * sizeof(*new_groups));
1074                         memcpy(new_files, filter->fo_last_objid_files,
1075                                old_count * sizeof(*new_files));
1076
1077                         OBD_FREE(filter->fo_last_objids,
1078                                  old_count * sizeof(*new_objids));
1079                         OBD_FREE(filter->fo_dentry_O_sub,
1080                                  old_count * sizeof(*new_subdirs));
1081                         OBD_FREE(filter->fo_dentry_O_groups,
1082                                  old_count * sizeof(*new_groups));
1083                         OBD_FREE(filter->fo_last_objid_files,
1084                                  old_count * sizeof(*new_files));
1085                 }
1086                 filter->fo_last_objids = new_objids;
1087                 filter->fo_dentry_O_sub = new_subdirs;
1088                 filter->fo_dentry_O_groups = new_groups;
1089                 filter->fo_last_objid_files = new_files;
1090                 filter->fo_group_count = len;
1091         }
1092
1093         filter->fo_dentry_O_groups[group] = dentry;
1094         filter->fo_last_objid_files[group] = filp;
1095         if (filter->fo_subdir_count) {
1096                 filter->fo_dentry_O_sub[group] = *tmp_subdirs;
1097                 OBD_FREE(tmp_subdirs, sizeof(*tmp_subdirs));
1098         }
1099
1100         filter_update_last_group(obd, group);
1101
1102         if (i_size_read(filp->f_dentry->d_inode) == 0) {
1103                 filter->fo_last_objids[group] = FILTER_INIT_OBJID;
1104                 rc = filter_update_last_objid(obd, group, 1);
1105                 RETURN(rc);
1106         }
1107
1108         filter->fo_last_objids[group] = le64_to_cpu(last_objid);
1109         CDEBUG(D_INODE, "%s: server last_objid group %d: "LPU64"\n",
1110                obd->obd_name, group, last_objid);
1111         RETURN(0);
1112  cleanup:
1113         switch (stage) {
1114         case 4:
1115                 if (new_objids != NULL)
1116                         OBD_FREE(new_objids, len * sizeof(*new_objids));
1117                 if (new_subdirs != NULL)
1118                         OBD_FREE(new_subdirs, len * sizeof(*new_subdirs));
1119                 if (new_groups != NULL)
1120                         OBD_FREE(new_groups, len * sizeof(*new_groups));
1121                 if (new_files != NULL)
1122                         OBD_FREE(new_files, len * sizeof(*new_files));
1123         case 3:
1124                 if (filter->fo_subdir_count) {
1125                         for (i = 0; i < filter->fo_subdir_count; i++) {
1126                                 if (tmp_subdirs->dentry[i] != NULL)
1127                                         dput(tmp_subdirs->dentry[i]);
1128                         }
1129                         OBD_FREE(tmp_subdirs, sizeof(*tmp_subdirs));
1130                 }
1131         case 2:
1132                 filp_close(filp, 0);
1133         case 1:
1134                 dput(dentry);
1135         }
1136         RETURN(rc);
1137 }
1138
1139 static int filter_read_groups(struct obd_device *obd, int last_group,
1140                               int create)
1141 {
1142         struct filter_obd *filter = &obd->u.filter;
1143         int old_count, group, rc = 0;
1144
1145         down(&filter->fo_init_lock);
1146         old_count = filter->fo_group_count;
1147         for (group = old_count; group <= last_group; group++) {
1148                 if (group == 0)
1149                         continue; /* no group zero */
1150
1151                 rc = filter_read_group_internal(obd, group, create);
1152                 if (rc != 0)
1153                         break;
1154         }
1155         up(&filter->fo_init_lock);
1156         return rc;
1157 }
1158
1159 /* FIXME: object groups */
1160 static int filter_prep_groups(struct obd_device *obd)
1161 {
1162         struct filter_obd *filter = &obd->u.filter;
1163         struct dentry *dentry, *O_dentry;
1164         struct file *filp;
1165         int    last_group, rc = 0, cleanup_phase = 0;
1166         loff_t off = 0;
1167         ENTRY;
1168
1169         O_dentry = simple_mkdir(current->fs->pwd, filter->fo_vfsmnt,
1170                                 "O", 0700, 1);
1171         CDEBUG(D_INODE, "got/created O: %p\n", O_dentry);
1172         if (IS_ERR(O_dentry)) {
1173                 rc = PTR_ERR(O_dentry);
1174                 CERROR("cannot open/create O: rc = %d\n", rc);
1175                 GOTO(cleanup, rc);
1176         }
1177         filter->fo_dentry_O = O_dentry;
1178         cleanup_phase = 1; /* O_dentry */
1179
1180         /* Lookup "R" to tell if we're on an old OST FS and need to convert
1181          * from O/R/<dir>/<objid> to O/0/<dir>/<objid>.  This can be removed
1182          * some time post 1.0 when all old-style OSTs have converted along
1183          * with the init_objid hack. */
1184         dentry = ll_lookup_one_len("R", O_dentry, 1);
1185         if (IS_ERR(dentry))
1186                 GOTO(cleanup, rc = PTR_ERR(dentry));
1187         if (dentry->d_inode && S_ISDIR(dentry->d_inode->i_mode)) {
1188                 struct dentry *O0_dentry = lookup_one_len("0", O_dentry, 1);
1189                 ENTRY;
1190
1191                 CWARN("converting OST to new object layout\n");
1192                 if (IS_ERR(O0_dentry)) {
1193                         rc = PTR_ERR(O0_dentry);
1194                         CERROR("error looking up O/0: rc %d\n", rc);
1195                         GOTO(cleanup_R, rc);
1196                 }
1197
1198                 if (O0_dentry->d_inode) {
1199                         CERROR("Both O/R and O/0 exist. Fix manually.\n");
1200                         GOTO(cleanup_O0, rc = -EEXIST);
1201                 }
1202
1203                 LOCK_INODE_MUTEX(O_dentry->d_inode);
1204                 rc = ll_vfs_rename(O_dentry->d_inode, dentry, filter->fo_vfsmnt,
1205                                    O_dentry->d_inode, O0_dentry,
1206                                    filter->fo_vfsmnt);
1207                 UNLOCK_INODE_MUTEX(O_dentry->d_inode);
1208
1209                 if (rc) {
1210                         CERROR("error renaming O/R to O/0: rc %d\n", rc);
1211                         GOTO(cleanup_O0, rc);
1212                 }
1213                 filter->fo_fsd->lsd_feature_incompat |=
1214                         cpu_to_le32(OBD_INCOMPAT_GROUPS);
1215                 rc = filter_update_server_data(obd, filter->fo_rcvd_filp,
1216                                                filter->fo_fsd, 1);
1217                 GOTO(cleanup_O0, rc);
1218
1219         cleanup_O0:
1220                 f_dput(O0_dentry);
1221         cleanup_R:
1222                 f_dput(dentry);
1223                 if (rc)
1224                         GOTO(cleanup, rc);
1225         } else {
1226                 f_dput(dentry);
1227         }
1228
1229         cleanup_phase = 2; /* groups */
1230
1231         /* we have to initialize all groups before first connections from
1232          * clients because they may send create/destroy for any group -bzzz */
1233         filp = filp_open("LAST_GROUP", O_CREAT | O_RDWR, 0700);
1234         if (IS_ERR(filp)) {
1235                 CERROR("cannot create LAST_GROUP: rc = %ld\n", PTR_ERR(filp));
1236                 GOTO(cleanup, rc = PTR_ERR(filp));
1237         }
1238         cleanup_phase = 3; /* filp */
1239
1240         rc = fsfilt_read_record(obd, filp, &last_group, sizeof(__u32), &off);
1241         if (rc) {
1242                 CDEBUG(D_INODE, "error reading LAST_GROUP: rc %d\n", rc);
1243                 GOTO(cleanup, rc);
1244         }
1245         if (off == 0) {
1246                 last_group = FILTER_MIN_GROUPS;
1247         } else {
1248                 LASSERT(last_group >= FILTER_MIN_GROUPS);
1249         }
1250
1251         CWARN("%s: initialize groups [%d,%d]\n", obd->obd_name,
1252               FILTER_MIN_GROUPS, last_group);
1253         filter->fo_committed_group = last_group;
1254         rc = filter_read_groups(obd, last_group, 1);
1255         if (rc)
1256                 GOTO(cleanup, rc);
1257
1258         filp_close(filp, 0);
1259         RETURN(0);
1260
1261  cleanup:
1262         switch (cleanup_phase) {
1263         case 3:
1264                 filp_close(filp, 0);
1265         case 2:
1266                 filter_cleanup_groups(obd);
1267         case 1:
1268                 f_dput(filter->fo_dentry_O);
1269                 filter->fo_dentry_O = NULL;
1270         default:
1271                 break;
1272         }
1273         return rc;
1274
1275 }
1276
1277 /* setup the object store with correct subdirectories */
1278 static int filter_prep(struct obd_device *obd)
1279 {
1280         struct lvfs_run_ctxt saved;
1281         struct filter_obd *filter = &obd->u.filter;
1282         struct file *file;
1283         struct inode *inode;
1284         int rc = 0;
1285         ENTRY;
1286
1287         push_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
1288         file = filp_open(LAST_RCVD, O_RDWR | O_CREAT | O_LARGEFILE, 0700);
1289         if (!file || IS_ERR(file)) {
1290                 rc = PTR_ERR(file);
1291                 CERROR("OBD filter: cannot open/create %s: rc = %d\n",
1292                        LAST_RCVD, rc);
1293                 GOTO(out, rc);
1294         }
1295         filter->fo_rcvd_filp = file;
1296         if (!S_ISREG(file->f_dentry->d_inode->i_mode)) {
1297                 CERROR("%s is not a regular file!: mode = %o\n", LAST_RCVD,
1298                        file->f_dentry->d_inode->i_mode);
1299                 GOTO(err_filp, rc = -ENOENT);
1300         }
1301
1302         inode = file->f_dentry->d_parent->d_inode;
1303         /* We use i_op->unlink directly in filter_vfs_unlink() */
1304         if (!inode->i_op || !inode->i_op->create || !inode->i_op->unlink) {
1305                 CERROR("%s: filesystem does not support create/unlink ops\n",
1306                        obd->obd_name);
1307                 GOTO(err_filp, rc = -EOPNOTSUPP);
1308         }
1309
1310         rc = filter_init_server_data(obd, file);
1311         if (rc) {
1312                 CERROR("cannot read %s: rc = %d\n", LAST_RCVD, rc);
1313                 GOTO(err_filp, rc);
1314         }
1315         /* open and create health check io file*/
1316         file = filp_open(HEALTH_CHECK, O_RDWR | O_CREAT, 0644);
1317         if (IS_ERR(file)) {
1318                 rc = PTR_ERR(file);
1319                 CERROR("OBD filter: cannot open/create %s rc = %d\n",
1320                        HEALTH_CHECK, rc);
1321                 GOTO(err_server_data, rc);
1322         }
1323         filter->fo_health_check_filp = file;
1324         if (!S_ISREG(file->f_dentry->d_inode->i_mode)) {
1325                 CERROR("%s is not a regular file!: mode = %o\n", HEALTH_CHECK,
1326                        file->f_dentry->d_inode->i_mode);
1327                 GOTO(err_health_check, rc = -ENOENT);
1328         }
1329         rc = lvfs_check_io_health(obd, file);
1330         if (rc)
1331                 GOTO(err_health_check, rc);
1332
1333         rc = filter_prep_groups(obd);
1334         if (rc)
1335                 GOTO(err_health_check, rc);
1336 out:
1337         pop_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
1338
1339         return(rc);
1340
1341 err_health_check:
1342         if (filp_close(filter->fo_health_check_filp, 0))
1343                 CERROR("can't close %s after error\n", HEALTH_CHECK);
1344         filter->fo_health_check_filp = NULL;
1345 err_server_data:
1346         target_recovery_fini(obd);
1347         filter_free_server_data(filter);
1348 err_filp:
1349         if (filp_close(filter->fo_rcvd_filp, 0))
1350                 CERROR("can't close %s after error\n", LAST_RCVD);
1351         filter->fo_rcvd_filp = NULL;
1352         goto out;
1353 }
1354
1355 /* cleanup the filter: write last used object id to status file */
1356 static void filter_post(struct obd_device *obd)
1357 {
1358         struct lvfs_run_ctxt saved;
1359         struct filter_obd *filter = &obd->u.filter;
1360         int rc, i;
1361
1362         /* XXX: filter_update_lastobjid used to call fsync_dev.  It might be
1363          * best to start a transaction with h_sync, because we removed this
1364          * from lastobjid */
1365
1366         push_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
1367         rc = filter_update_server_data(obd, filter->fo_rcvd_filp,
1368                                        filter->fo_fsd, 0);
1369         if (rc)
1370                 CERROR("error writing server data: rc = %d\n", rc);
1371
1372         for (i = 1; i < filter->fo_group_count; i++) {
1373                 rc = filter_update_last_objid(obd, i,
1374                                 (i == filter->fo_group_count - 1));
1375                 if (rc)
1376                         CERROR("error writing group %d lastobjid: rc = %d\n",
1377                                i, rc);
1378         }
1379
1380         rc = filp_close(filter->fo_rcvd_filp, 0);
1381         filter->fo_rcvd_filp = NULL;
1382         if (rc)
1383                 CERROR("error closing %s: rc = %d\n", LAST_RCVD, rc);
1384
1385         rc = filp_close(filter->fo_health_check_filp, 0);
1386         filter->fo_health_check_filp = NULL;
1387         if (rc)
1388                 CERROR("error closing %s: rc = %d\n", HEALTH_CHECK, rc);
1389
1390         filter_cleanup_groups(obd);
1391         filter_free_server_data(filter);
1392         pop_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
1393
1394         filter_free_capa_keys(filter);
1395         cleanup_capa_hash(filter->fo_capa_hash);
1396 }
1397
1398 static void filter_set_last_id(struct filter_obd *filter,
1399                                obd_id id, obd_gr group)
1400 {
1401         LASSERT(filter->fo_fsd != NULL);
1402         LASSERT(group <= filter->fo_group_count);
1403
1404         spin_lock(&filter->fo_objidlock);
1405         filter->fo_last_objids[group] = id;
1406         spin_unlock(&filter->fo_objidlock);
1407 }
1408
1409 obd_id filter_last_id(struct filter_obd *filter, obd_gr group)
1410 {
1411         obd_id id;
1412         LASSERT(filter->fo_fsd != NULL);
1413         LASSERT(group <= filter->fo_group_count);
1414
1415         /* FIXME: object groups */
1416         spin_lock(&filter->fo_objidlock);
1417         id = filter->fo_last_objids[group];
1418         spin_unlock(&filter->fo_objidlock);
1419
1420         return id;
1421 }
1422
1423 static int filter_lock_dentry(struct obd_device *obd, struct dentry *dparent)
1424 {
1425         LOCK_INODE_MUTEX_PARENT(dparent->d_inode);
1426         return 0;
1427 }
1428
1429 /* We never dget the object parent, so DON'T dput it either */
1430 struct dentry *filter_parent(struct obd_device *obd, obd_gr group, obd_id objid)
1431 {
1432         struct filter_obd *filter = &obd->u.filter;
1433         struct filter_subdirs *subdirs;
1434         LASSERT(group < filter->fo_group_count); /* FIXME: object groups */
1435
1436         if ((group > 0 && group < FILTER_GROUP_MDS0) ||
1437              filter->fo_subdir_count == 0)
1438                 return filter->fo_dentry_O_groups[group];
1439
1440         subdirs = &filter->fo_dentry_O_sub[group];
1441         return subdirs->dentry[objid & (filter->fo_subdir_count - 1)];
1442 }
1443
1444 /* We never dget the object parent, so DON'T dput it either */
1445 struct dentry *filter_parent_lock(struct obd_device *obd, obd_gr group,
1446                                   obd_id objid)
1447 {
1448         unsigned long now = jiffies;
1449         struct dentry *dparent = filter_parent(obd, group, objid);
1450         int rc;
1451
1452         if (IS_ERR(dparent))
1453                 return dparent;
1454         if (dparent == NULL)
1455                 return ERR_PTR(-ENOENT);
1456
1457         rc = filter_lock_dentry(obd, dparent);
1458         fsfilt_check_slow(obd, now, "parent lock");
1459         return rc ? ERR_PTR(rc) : dparent;
1460 }
1461
1462 /* We never dget the object parent, so DON'T dput it either */
1463 static void filter_parent_unlock(struct dentry *dparent)
1464 {
1465         UNLOCK_INODE_MUTEX(dparent->d_inode);
1466 }
1467
1468 /* How to get files, dentries, inodes from object id's.
1469  *
1470  * If dir_dentry is passed, the caller has already locked the parent
1471  * appropriately for this operation (normally a write lock).  If
1472  * dir_dentry is NULL, we do a read lock while we do the lookup to
1473  * avoid races with create/destroy and such changing the directory
1474  * internal to the filesystem code. */
1475 struct dentry *filter_fid2dentry(struct obd_device *obd,
1476                                  struct dentry *dir_dentry,
1477                                  obd_gr group, obd_id id)
1478 {
1479         struct dentry *dparent = dir_dentry;
1480         struct dentry *dchild;
1481         char name[32];
1482         int len;
1483         ENTRY;
1484
1485         if (OBD_FAIL_CHECK(OBD_FAIL_OST_ENOENT) &&
1486             obd->u.filter.fo_destroys_in_progress == 0) {
1487                 /* don't fail lookups for orphan recovery, it causes
1488                  * later LBUGs when objects still exist during precreate */
1489                 CDEBUG(D_INFO, "*** obd_fail_loc=%x ***\n",OBD_FAIL_OST_ENOENT);
1490                 RETURN(ERR_PTR(-ENOENT));
1491         }
1492         if (id == 0) {
1493                 CERROR("fatal: invalid object id 0\n");
1494                 RETURN(ERR_PTR(-ESTALE));
1495         }
1496
1497         len = sprintf(name, LPU64, id);
1498         if (dir_dentry == NULL) {
1499                 dparent = filter_parent_lock(obd, group, id);
1500                 if (IS_ERR(dparent)) {
1501                         CERROR("%s: error getting object "LPU64":"LPU64
1502                                " parent: rc %ld\n", obd->obd_name,
1503                                id, group, PTR_ERR(dparent));
1504                         RETURN(dparent);
1505                 }
1506         }
1507         CDEBUG(D_INODE, "looking up object O/%.*s/%s\n",
1508                dparent->d_name.len, dparent->d_name.name, name);
1509         dchild = /*ll_*/lookup_one_len(name, dparent, len);
1510         if (dir_dentry == NULL)
1511                 filter_parent_unlock(dparent);
1512         if (IS_ERR(dchild)) {
1513                 CERROR("%s: child lookup error %ld\n", obd->obd_name,
1514                        PTR_ERR(dchild));
1515                 RETURN(dchild);
1516         }
1517
1518         if (dchild->d_inode != NULL && is_bad_inode(dchild->d_inode)) {
1519                 CERROR("%s: got bad object "LPU64" inode %lu\n",
1520                        obd->obd_name, id, dchild->d_inode->i_ino);
1521                 f_dput(dchild);
1522                 RETURN(ERR_PTR(-ENOENT));
1523         }
1524
1525         CDEBUG(D_INODE, "got child objid %s: %p, count = %d\n",
1526                name, dchild, atomic_read(&dchild->d_count));
1527
1528         LASSERT(atomic_read(&dchild->d_count) > 0);
1529
1530         RETURN(dchild);
1531 }
1532
1533 static int filter_prepare_destroy(struct obd_device *obd, obd_id objid,
1534                                   obd_id group)
1535 {
1536         struct lustre_handle lockh;
1537         int flags = LDLM_AST_DISCARD_DATA, rc;
1538         struct ldlm_res_id res_id;
1539         ldlm_policy_data_t policy = { .l_extent = { 0, OBD_OBJECT_EOF } };
1540         ENTRY;
1541
1542         osc_build_res_name(objid, group, &res_id);
1543         /* Tell the clients that the object is gone now and that they should
1544          * throw away any cached pages. */
1545         rc = ldlm_cli_enqueue_local(obd->obd_namespace, &res_id, LDLM_EXTENT,
1546                                     &policy, LCK_PW, &flags, ldlm_blocking_ast,
1547                                     ldlm_completion_ast, NULL, NULL, 0, NULL,
1548                                     NULL, &lockh);
1549
1550         /* We only care about the side-effects, just drop the lock. */
1551         if (rc == ELDLM_OK)
1552                 ldlm_lock_decref(&lockh, LCK_PW);
1553
1554         RETURN(rc);
1555 }
1556
1557 /* This is vfs_unlink() without down(i_sem).  If we call regular vfs_unlink()
1558  * we have 2.6 lock ordering issues with filter_commitrw_write() as it takes
1559  * i_sem before starting a handle, while filter_destroy() + vfs_unlink do the
1560  * reverse.  Caller must take i_sem before starting the transaction and we
1561  * drop it here before the inode is removed from the dentry.  bug 4180/6984 */
1562 int filter_vfs_unlink(struct inode *dir, struct dentry *dentry,
1563                       struct vfsmount *mnt)
1564 {
1565         int rc;
1566         ENTRY;
1567
1568         /* don't need dir->i_zombie for 2.4, it is for rename/unlink of dir
1569          * itself we already hold dir->i_mutex for child create/unlink ops */
1570         LASSERT(dentry->d_inode != NULL);
1571         LASSERT(TRYLOCK_INODE_MUTEX(dir) == 0);
1572         LASSERT(TRYLOCK_INODE_MUTEX(dentry->d_inode) == 0);
1573
1574
1575         /* may_delete() */
1576         if (/*!dentry->d_inode ||*/dentry->d_parent->d_inode != dir)
1577                 GOTO(out, rc = -ENOENT);
1578
1579         rc = ll_permission(dir, MAY_WRITE | MAY_EXEC, NULL);
1580         if (rc)
1581                 GOTO(out, rc);
1582
1583         if (IS_APPEND(dir))
1584                 GOTO(out, rc = -EPERM);
1585
1586         /* check_sticky() */
1587         if ((dentry->d_inode->i_uid != current->fsuid &&
1588              !cfs_capable(CFS_CAP_FOWNER)) || IS_APPEND(dentry->d_inode) ||
1589             IS_IMMUTABLE(dentry->d_inode))
1590                 GOTO(out, rc = -EPERM);
1591
1592         /* NOTE: This might need to go outside i_mutex, though it isn't clear if
1593          *       that was done because of journal_start (which is already done
1594          *       here) or some other ordering issue. */
1595         DQUOT_INIT(dir);
1596
1597         rc = ll_security_inode_unlink(dir, dentry, mnt);
1598         if (rc)
1599                 GOTO(out, rc);
1600
1601         rc = dir->i_op->unlink(dir, dentry);
1602 out:
1603         /* need to drop i_mutex before we lose inode reference */
1604         UNLOCK_INODE_MUTEX(dentry->d_inode);
1605         if (rc == 0)
1606                 d_delete(dentry);
1607
1608         RETURN(rc);
1609 }
1610
1611 /* Caller must hold LCK_PW on parent and push us into kernel context.
1612  * Caller must hold child i_mutex, we drop it always.
1613  * Caller is also required to ensure that dchild->d_inode exists. */
1614 static int filter_destroy_internal(struct obd_device *obd, obd_id objid,
1615                                    obd_gr group, struct dentry *dparent,
1616                                    struct dentry *dchild)
1617 {
1618         struct inode *inode = dchild->d_inode;
1619         struct filter_obd *filter = &obd->u.filter;
1620         int rc;
1621
1622         if (inode->i_nlink != 1 || atomic_read(&inode->i_count) != 1) {
1623                 CERROR("destroying objid %.*s ino %lu nlink %lu count %d\n",
1624                        dchild->d_name.len, dchild->d_name.name, inode->i_ino,
1625                        (unsigned long)inode->i_nlink,
1626                        atomic_read(&inode->i_count));
1627         }
1628
1629         rc = filter_vfs_unlink(dparent->d_inode, dchild, filter->fo_vfsmnt);
1630         if (rc)
1631                 CERROR("error unlinking objid %.*s: rc %d\n",
1632                        dchild->d_name.len, dchild->d_name.name, rc);
1633         return(rc);
1634 }
1635
1636 struct filter_intent_args {
1637         struct ldlm_lock **victim;
1638         __u64 size;
1639         int *liblustre;
1640 };
1641
1642 static enum interval_iter filter_intent_cb(struct interval_node *n,
1643                                            void *args)
1644 {
1645         struct ldlm_interval *node = (struct ldlm_interval *)n;
1646         struct filter_intent_args *arg = (struct filter_intent_args*)args;
1647         __u64 size = arg->size;
1648         struct ldlm_lock **v = arg->victim;
1649         struct ldlm_lock *lck;
1650
1651         /* If the interval is lower than the current file size,
1652          * just break. */
1653         if (interval_high(n) <= size)
1654                 return INTERVAL_ITER_STOP;
1655
1656         list_for_each_entry(lck, &node->li_group, l_sl_policy) {
1657                 /* Don't send glimpse ASTs to liblustre clients.
1658                  * They aren't listening for them, and they do
1659                  * entirely synchronous I/O anyways. */
1660                 if (lck->l_export == NULL ||
1661                     lck->l_export->exp_libclient == 1)
1662                         continue;
1663
1664                 if (*arg->liblustre)
1665                         *arg->liblustre = 0;
1666
1667                 if (*v == NULL) {
1668                         *v = LDLM_LOCK_GET(lck);
1669                 } else if ((*v)->l_policy_data.l_extent.start <
1670                            lck->l_policy_data.l_extent.start) {
1671                         LDLM_LOCK_RELEASE(*v);
1672                         *v = LDLM_LOCK_GET(lck);
1673                 }
1674
1675                 /* the same policy group - every lock has the
1676                  * same extent, so needn't do it any more */
1677                 break;
1678         }
1679
1680         return INTERVAL_ITER_CONT;
1681 }
1682
1683 static int filter_intent_policy(struct ldlm_namespace *ns,
1684                                 struct ldlm_lock **lockp, void *req_cookie,
1685                                 ldlm_mode_t mode, int flags, void *data)
1686 {
1687         CFS_LIST_HEAD(rpc_list);
1688         struct ptlrpc_request *req = req_cookie;
1689         struct ldlm_lock *lock = *lockp, *l = NULL;
1690         struct ldlm_resource *res = lock->l_resource;
1691         ldlm_processing_policy policy;
1692         struct ost_lvb *res_lvb, *reply_lvb;
1693         struct ldlm_reply *rep;
1694         ldlm_error_t err;
1695         int idx, rc, tmpflags = 0, only_liblustre = 1;
1696         struct ldlm_interval_tree *tree;
1697         struct filter_intent_args arg;
1698         __u32 repsize[3] = { [MSG_PTLRPC_BODY_OFF] = sizeof(struct ptlrpc_body),
1699                            [DLM_LOCKREPLY_OFF]   = sizeof(*rep),
1700                            [DLM_REPLY_REC_OFF]   = sizeof(*reply_lvb) };
1701         ENTRY;
1702
1703         policy = ldlm_get_processing_policy(res);
1704         LASSERT(policy != NULL);
1705         LASSERT(req != NULL);
1706
1707         rc = lustre_pack_reply(req, 3, repsize, NULL);
1708         if (rc)
1709                 RETURN(req->rq_status = rc);
1710
1711         rep = lustre_msg_buf(req->rq_repmsg, DLM_LOCKREPLY_OFF, sizeof(*rep));
1712         LASSERT(rep != NULL);
1713
1714         reply_lvb = lustre_msg_buf(req->rq_repmsg, DLM_REPLY_REC_OFF,
1715                                    sizeof(*reply_lvb));
1716         LASSERT(reply_lvb != NULL);
1717
1718         //fixup_handle_for_resent_req(req, lock, &lockh);
1719
1720         /* Call the extent policy function to see if our request can be
1721          * granted, or is blocked.
1722          * If the OST lock has LDLM_FL_HAS_INTENT set, it means a glimpse
1723          * lock, and should not be granted if the lock will be blocked.
1724          */
1725
1726         LASSERT(ns == res->lr_namespace);
1727         lock_res(res);
1728         rc = policy(lock, &tmpflags, 0, &err, &rpc_list);
1729         check_res_locked(res);
1730
1731         /* FIXME: we should change the policy function slightly, to not make
1732          * this list at all, since we just turn around and free it */
1733         while (!list_empty(&rpc_list)) {
1734                 struct ldlm_lock *wlock =
1735                         list_entry(rpc_list.next, struct ldlm_lock, l_cp_ast);
1736                 LASSERT((lock->l_flags & LDLM_FL_AST_SENT) == 0);
1737                 LASSERT(lock->l_flags & LDLM_FL_CP_REQD);
1738                 lock->l_flags &= ~LDLM_FL_CP_REQD;
1739                 list_del_init(&wlock->l_cp_ast);
1740                 LDLM_LOCK_RELEASE(wlock);
1741         }
1742
1743         /* The lock met with no resistance; we're finished. */
1744         if (rc == LDLM_ITER_CONTINUE) {
1745                 /* do not grant locks to the liblustre clients: they cannot
1746                  * handle ASTs robustly.  We need to do this while still
1747                  * holding ns_lock to avoid the lock remaining on the res_link
1748                  * list (and potentially being added to l_pending_list by an
1749                  * AST) when we are going to drop this lock ASAP. */
1750                 if (lock->l_export->exp_libclient ||
1751                     OBD_FAIL_TIMEOUT(OBD_FAIL_LDLM_GLIMPSE, 2)) {
1752                         ldlm_resource_unlink_lock(lock);
1753                         err = ELDLM_LOCK_ABORTED;
1754                 } else {
1755                         err = ELDLM_LOCK_REPLACED;
1756                 }
1757                 unlock_res(res);
1758                 RETURN(err);
1759         }
1760
1761         /* Do not grant any lock, but instead send GL callbacks.  The extent
1762          * policy nicely created a list of all PW locks for us.  We will choose
1763          * the highest of those which are larger than the size in the LVB, if
1764          * any, and perform a glimpse callback. */
1765         res_lvb = res->lr_lvb_data;
1766         LASSERT(res_lvb != NULL);
1767         *reply_lvb = *res_lvb;
1768
1769         /*
1770          * ->ns_lock guarantees that no new locks are granted, and,
1771          * therefore, that res->lr_lvb_data cannot increase beyond the
1772          * end of already granted lock. As a result, it is safe to
1773          * check against "stale" reply_lvb->lvb_size value without
1774          * res->lr_lvb_sem.
1775          */
1776         arg.size = reply_lvb->lvb_size;
1777         arg.victim = &l;
1778         arg.liblustre = &only_liblustre;
1779         for (idx = 0; idx < LCK_MODE_NUM; idx++) {
1780                 tree = &res->lr_itree[idx];
1781                 if (tree->lit_mode == LCK_PR)
1782                         continue;
1783
1784                 interval_iterate_reverse(tree->lit_root,
1785                                          filter_intent_cb, &arg);
1786         }
1787         unlock_res(res);
1788
1789         /* There were no PW locks beyond the size in the LVB; finished. */
1790         if (l == NULL) {
1791                 if (only_liblustre) {
1792                         /* If we discovered a liblustre client with a PW lock,
1793                          * however, the LVB may be out of date!  The LVB is
1794                          * updated only on glimpse (which we don't do for
1795                          * liblustre clients) and cancel (which the client
1796                          * obviously has not yet done).  So if it has written
1797                          * data but kept the lock, the LVB is stale and needs
1798                          * to be updated from disk.
1799                          *
1800                          * Of course, this will all disappear when we switch to
1801                          * taking liblustre locks on the OST. */
1802                         ldlm_res_lvbo_update(res, NULL, 0, 1);
1803                 }
1804                 RETURN(ELDLM_LOCK_ABORTED);
1805         }
1806
1807         /*
1808          * This check is for lock taken in filter_prepare_destroy() that does
1809          * not have l_glimpse_ast set. So the logic is: if there is a lock
1810          * with no l_glimpse_ast set, this object is being destroyed already.
1811          *
1812          * Hence, if you are grabbing DLM locks on the server, always set
1813          * non-NULL glimpse_ast (e.g., ldlm_request.c:ldlm_glimpse_ast()).
1814          */
1815         if (l->l_glimpse_ast == NULL) {
1816                 /* We are racing with unlink(); just return -ENOENT */
1817                 rep->lock_policy_res1 = -ENOENT;
1818                 goto out;
1819         }
1820
1821         LASSERTF(l->l_glimpse_ast != NULL, "l == %p", l);
1822         rc = l->l_glimpse_ast(l, NULL); /* this will update the LVB */
1823         /* Update the LVB from disk if the AST failed (this is a legal race) */
1824         /*
1825          * XXX nikita: situation when ldlm_server_glimpse_ast() failed before
1826          * sending ast is not handled. This can result in lost client writes.
1827          */
1828         if (rc != 0)
1829                 ldlm_res_lvbo_update(res, NULL, 0, 1);
1830
1831         lock_res(res);
1832         *reply_lvb = *res_lvb;
1833         unlock_res(res);
1834
1835  out:
1836         LDLM_LOCK_RELEASE(l);
1837
1838         RETURN(ELDLM_LOCK_ABORTED);
1839 }
1840
1841 /*
1842  * per-obd_device iobuf pool.
1843  *
1844  * To avoid memory deadlocks in low-memory setups, amount of dynamic
1845  * allocations in write-path has to be minimized (see bug 5137).
1846  *
1847  * Pages, niobuf_local's and niobuf_remote's are pre-allocated and attached to
1848  * OST threads (see ost_thread_{init,done}()).
1849  *
1850  * "iobuf's" used by filter cannot be attached to OST thread, however, because
1851  * at the OST layer there are only (potentially) multiple obd_device of type
1852  * unknown at the time of OST thread creation.
1853  *
1854  * Instead array of iobuf's is attached to struct filter_obd (->fo_iobuf_pool
1855  * field). This array has size OST_MAX_THREADS, so that each OST thread uses
1856  * it's very own iobuf.
1857  *
1858  * Functions below
1859  *
1860  *     filter_kiobuf_pool_init()
1861  *
1862  *     filter_kiobuf_pool_done()
1863  *
1864  *     filter_iobuf_get()
1865  *
1866  * operate on this array. They are "generic" in a sense that they don't depend
1867  * on actual type of iobuf's (the latter depending on Linux kernel version).
1868  */
1869
1870 /*
1871  * destroy pool created by filter_iobuf_pool_init
1872  */
1873 static void filter_iobuf_pool_done(struct filter_obd *filter)
1874 {
1875         struct filter_iobuf **pool;
1876         int i;
1877
1878         ENTRY;
1879
1880         pool = filter->fo_iobuf_pool;
1881         if (pool != NULL) {
1882                 for (i = 0; i < filter->fo_iobuf_count; ++ i) {
1883                         if (pool[i] != NULL)
1884                                 filter_free_iobuf(pool[i]);
1885                 }
1886                 OBD_FREE(pool, filter->fo_iobuf_count * sizeof pool[0]);
1887                 filter->fo_iobuf_pool = NULL;
1888         }
1889         EXIT;
1890 }
1891
1892 /*
1893  * pre-allocate pool of iobuf's to be used by filter_{prep,commit}rw_write().
1894  */
1895 static int filter_iobuf_pool_init(struct filter_obd *filter)
1896 {
1897         void **pool;
1898
1899         ENTRY;
1900
1901
1902         OBD_ALLOC_GFP(filter->fo_iobuf_pool, OSS_THREADS_MAX * sizeof(*pool),
1903                       GFP_KERNEL);
1904         if (filter->fo_iobuf_pool == NULL)
1905                 RETURN(-ENOMEM);
1906
1907         filter->fo_iobuf_count = OSS_THREADS_MAX;
1908
1909         RETURN(0);
1910 }
1911
1912 /* Return iobuf allocated for @thread_id.  We don't know in advance how
1913  * many threads there will be so we allocate a large empty array and only
1914  * fill in those slots that are actually in use.
1915  * If we haven't allocated a pool entry for this thread before, do so now. */
1916 void *filter_iobuf_get(struct filter_obd *filter, struct obd_trans_info *oti)
1917 {
1918         int thread_id                    = (oti && oti->oti_thread) ?
1919                                            oti->oti_thread->t_id : -1;
1920         struct filter_iobuf  *pool       = NULL;
1921         struct filter_iobuf **pool_place = NULL;
1922
1923         if (thread_id >= 0) {
1924                 LASSERT(thread_id < filter->fo_iobuf_count);
1925                 pool = *(pool_place = &filter->fo_iobuf_pool[thread_id]);
1926         }
1927
1928         if (unlikely(pool == NULL)) {
1929                 pool = filter_alloc_iobuf(filter, OBD_BRW_WRITE,
1930                                           PTLRPC_MAX_BRW_PAGES);
1931                 if (pool_place != NULL)
1932                         *pool_place = pool;
1933         }
1934
1935         return pool;
1936 }
1937
1938 /* mount the file system (secretly).  lustre_cfg parameters are:
1939  * 1 = device
1940  * 2 = fstype
1941  * 3 = flags: failover=f, failout=n
1942  * 4 = mount options
1943  */
1944 int filter_common_setup(struct obd_device *obd, struct lustre_cfg* lcfg,
1945                         void *option)
1946 {
1947         struct filter_obd *filter = &obd->u.filter;
1948         struct vfsmount *mnt;
1949         struct lustre_mount_info *lmi;
1950         struct obd_uuid uuid;
1951         __u8 *uuid_ptr;
1952         char *str, *label;
1953         char ns_name[48];
1954         request_queue_t *q;
1955         int rc, i;
1956         ENTRY;
1957
1958         if (lcfg->lcfg_bufcount < 3 ||
1959             LUSTRE_CFG_BUFLEN(lcfg, 1) < 1 ||
1960             LUSTRE_CFG_BUFLEN(lcfg, 2) < 1)
1961                 RETURN(-EINVAL);
1962
1963         lmi = server_get_mount(obd->obd_name);
1964         if (lmi) {
1965                 /* We already mounted in lustre_fill_super.
1966                    lcfg bufs 1, 2, 4 (device, fstype, mount opts) are ignored.*/
1967                 struct lustre_sb_info *lsi = s2lsi(lmi->lmi_sb);
1968                 mnt = lmi->lmi_mnt;
1969                 obd->obd_fsops = fsfilt_get_ops(MT_STR(lsi->lsi_ldd));
1970         } else {
1971                 /* old path - used by lctl */
1972                 CERROR("Using old MDS mount method\n");
1973                 mnt = ll_kern_mount(lustre_cfg_string(lcfg, 2),
1974                                     MS_NOATIME|MS_NODIRATIME,
1975                                     lustre_cfg_string(lcfg, 1), option);
1976                 if (IS_ERR(mnt)) {
1977                         rc = PTR_ERR(mnt);
1978                         LCONSOLE_ERROR_MSG(0x135, "Can't mount disk %s (%d)\n",
1979                                            lustre_cfg_string(lcfg, 1), rc);
1980                         RETURN(rc);
1981                 }
1982
1983                 obd->obd_fsops = fsfilt_get_ops(lustre_cfg_string(lcfg, 2));
1984         }
1985         if (IS_ERR(obd->obd_fsops))
1986                 GOTO(err_mntput, rc = PTR_ERR(obd->obd_fsops));
1987
1988         rc = filter_iobuf_pool_init(filter);
1989         if (rc != 0)
1990                 GOTO(err_ops, rc);
1991
1992         LASSERT(!lvfs_check_rdonly(lvfs_sbdev(mnt->mnt_sb)));
1993
1994         /* failover is the default */
1995         obd->obd_replayable = 1;
1996
1997         if (lcfg->lcfg_bufcount > 3 && LUSTRE_CFG_BUFLEN(lcfg, 3) > 0) {
1998                 str = lustre_cfg_string(lcfg, 3);
1999                 if (strchr(str, 'n')) {
2000                         CWARN("%s: recovery disabled\n", obd->obd_name);
2001                         obd->obd_replayable = 0;
2002                 }
2003         }
2004
2005         filter->fo_vfsmnt = mnt;
2006         obd->u.obt.obt_sb = mnt->mnt_sb;
2007         filter->fo_fstype = mnt->mnt_sb->s_type->name;
2008         CDEBUG(D_SUPER, "%s: mnt = %p\n", filter->fo_fstype, mnt);
2009
2010         fsfilt_setup(obd, obd->u.obt.obt_sb);
2011
2012         OBD_SET_CTXT_MAGIC(&obd->obd_lvfs_ctxt);
2013         obd->obd_lvfs_ctxt.pwdmnt = mnt;
2014         obd->obd_lvfs_ctxt.pwd = mnt->mnt_root;
2015         obd->obd_lvfs_ctxt.fs = get_ds();
2016         obd->obd_lvfs_ctxt.cb_ops = filter_lvfs_ops;
2017
2018         init_mutex(&filter->fo_init_lock);
2019         filter->fo_committed_group = 0;
2020
2021         rc = filter_prep(obd);
2022         if (rc)
2023                 GOTO(err_ops, rc);
2024
2025         filter->fo_destroys_in_progress = 0;
2026         for (i = 0; i < 32; i++)
2027                 sema_init(&filter->fo_create_locks[i], 1);
2028
2029         spin_lock_init(&filter->fo_translock);
2030         spin_lock_init(&filter->fo_objidlock);
2031         CFS_INIT_LIST_HEAD(&filter->fo_export_list);
2032         sema_init(&filter->fo_alloc_lock, 1);
2033         init_brw_stats(&filter->fo_filter_stats);
2034         filter->fo_read_cache = 1; /* enable read-only cache by default */
2035         filter->fo_writethrough_cache = 1; /* disable writethrough cache */
2036         filter->fo_readcache_max_filesize = FILTER_MAX_CACHE_SIZE;
2037         filter->fo_fmd_max_num = FILTER_FMD_MAX_NUM_DEFAULT;
2038         filter->fo_fmd_max_age = FILTER_FMD_MAX_AGE_DEFAULT;
2039
2040         CFS_INIT_LIST_HEAD(&filter->fo_llog_list);
2041         spin_lock_init(&filter->fo_llog_list_lock);
2042
2043         rwlock_init(&filter->fo_sptlrpc_lock);
2044         sptlrpc_rule_set_init(&filter->fo_sptlrpc_rset);
2045
2046         filter->fo_fl_oss_capa = 1;
2047         CFS_INIT_LIST_HEAD(&filter->fo_capa_keys);
2048         filter->fo_capa_hash = init_capa_hash();
2049         if (filter->fo_capa_hash == NULL)
2050                 GOTO(err_ops, rc = -ENOMEM);
2051
2052         sprintf(ns_name, "filter-%s", obd->obd_uuid.uuid);
2053         obd->obd_namespace = ldlm_namespace_new(obd, ns_name, LDLM_NAMESPACE_SERVER,
2054                                                 LDLM_NAMESPACE_GREEDY);
2055         if (obd->obd_namespace == NULL)
2056                 GOTO(err_post, rc = -ENOMEM);
2057         obd->obd_namespace->ns_lvbp = obd;
2058         obd->obd_namespace->ns_lvbo = &filter_lvbo;
2059         ldlm_register_intent(obd->obd_namespace, filter_intent_policy);
2060
2061         ptlrpc_init_client(LDLM_CB_REQUEST_PORTAL, LDLM_CB_REPLY_PORTAL,
2062                            "filter_ldlm_cb_client", &obd->obd_ldlm_client);
2063
2064         rc = obd_llog_init(obd, &obd->obd_olg, obd, 1, NULL, NULL);
2065         if (rc) {
2066                 CERROR("failed to setup llogging subsystems\n");
2067                 GOTO(err_post, rc);
2068         }
2069
2070         rc = lquota_setup(filter_quota_interface_ref, obd);
2071         if (rc)
2072                 GOTO(err_post, rc);
2073
2074         q = bdev_get_queue(mnt->mnt_sb->s_bdev);
2075         if (q->max_sectors < q->max_hw_sectors &&
2076             q->max_sectors < PTLRPC_MAX_BRW_SIZE >> 9)
2077                 LCONSOLE_INFO("%s: underlying device %s should be tuned "
2078                               "for larger I/O requests: max_sectors = %u "
2079                               "could be up to max_hw_sectors=%u\n",
2080                               obd->obd_name, mnt->mnt_sb->s_id,
2081                               q->max_sectors, q->max_hw_sectors);
2082
2083         uuid_ptr = fsfilt_uuid(obd, obd->u.obt.obt_sb);
2084         if (uuid_ptr != NULL) {
2085                 class_uuid_unparse(uuid_ptr, &uuid);
2086                 str = uuid.uuid;
2087         } else {
2088                 str = "no UUID";
2089         }
2090
2091         label = fsfilt_get_label(obd, obd->u.obt.obt_sb);
2092
2093         if (obd->obd_recovering) {
2094                 LCONSOLE_WARN("OST %s now serving %s (%s%s%s), but will be in "
2095                               "recovery for at least %d:%.02d, or until %d "
2096                               "client%s reconnect. During this time new clients"
2097                               " will not be allowed to connect. "
2098                               "Recovery progress can be monitored by watching "
2099                               "/proc/fs/lustre/obdfilter/%s/recovery_status.\n",
2100                               obd->obd_name, lustre_cfg_string(lcfg, 1),
2101                               label ?: "", label ? "/" : "", str,
2102                               obd->obd_recovery_timeout / 60,
2103                               obd->obd_recovery_timeout % 60,
2104                               obd->obd_max_recoverable_clients,
2105                               (obd->obd_max_recoverable_clients == 1) ? "":"s",
2106                               obd->obd_name);
2107         } else {
2108                 LCONSOLE_INFO("OST %s now serving %s (%s%s%s) with recovery "
2109                               "%s\n", obd->obd_name, lustre_cfg_string(lcfg, 1),
2110                               label ?: "", label ? "/" : "", str,
2111                               obd->obd_replayable ? "enabled" : "disabled");
2112         }
2113
2114         RETURN(0);
2115
2116 err_post:
2117         filter_post(obd);
2118 err_ops:
2119         fsfilt_put_ops(obd->obd_fsops);
2120         filter_iobuf_pool_done(filter);
2121 err_mntput:
2122         server_put_mount(obd->obd_name, mnt);
2123         obd->u.obt.obt_sb = 0;
2124         return rc;
2125 }
2126
2127 static int filter_setup(struct obd_device *obd, struct lustre_cfg* lcfg)
2128 {
2129         struct lprocfs_static_vars lvars;
2130         unsigned long addr;
2131         struct page *page;
2132         int rc;
2133
2134         CLASSERT(offsetof(struct obd_device, u.obt) ==
2135                  offsetof(struct obd_device, u.filter.fo_obt));
2136
2137         if (!LUSTRE_CFG_BUFLEN(lcfg, 1) || !LUSTRE_CFG_BUFLEN(lcfg, 2))
2138                 RETURN(-EINVAL);
2139
2140         /* 2.6.9 selinux wants a full option page for do_kern_mount (bug6471) */
2141         OBD_PAGE_ALLOC(page, CFS_ALLOC_STD);
2142         if (!page)
2143                 RETURN(-ENOMEM);
2144         addr = (unsigned long)cfs_page_address(page);
2145         clear_page((void *)addr);
2146
2147         /* lprocfs must be setup before the filter so state can be safely added
2148          * to /proc incrementally as the filter is setup */
2149         lprocfs_filter_init_vars(&lvars);
2150         if (lprocfs_obd_setup(obd, lvars.obd_vars) == 0 &&
2151             lprocfs_alloc_obd_stats(obd, LPROC_FILTER_LAST) == 0) {
2152                 /* Init obdfilter private stats here */
2153                 lprocfs_counter_init(obd->obd_stats, LPROC_FILTER_READ_BYTES,
2154                                      LPROCFS_CNTR_AVGMINMAX,
2155                                      "read_bytes", "bytes");
2156                 lprocfs_counter_init(obd->obd_stats, LPROC_FILTER_WRITE_BYTES,
2157                                      LPROCFS_CNTR_AVGMINMAX,
2158                                      "write_bytes", "bytes");
2159                 lprocfs_counter_init(obd->obd_stats, LPROC_FILTER_GET_PAGE,
2160                                      LPROCFS_CNTR_AVGMINMAX|LPROCFS_CNTR_STDDEV,
2161                                      "get_page", "usec");
2162                 lprocfs_counter_init(obd->obd_stats, LPROC_FILTER_NO_PAGE,
2163                                      LPROCFS_CNTR_AVGMINMAX,
2164                                      "get_page_failures", "num");
2165                 lprocfs_counter_init(obd->obd_stats, LPROC_FILTER_CACHE_ACCESS,
2166                                      LPROCFS_CNTR_AVGMINMAX,
2167                                      "cache_access", "pages");
2168                 lprocfs_counter_init(obd->obd_stats, LPROC_FILTER_CACHE_HIT,
2169                                      LPROCFS_CNTR_AVGMINMAX,
2170                                      "cache_hit", "pages");
2171                 lprocfs_counter_init(obd->obd_stats, LPROC_FILTER_CACHE_MISS,
2172                                      LPROCFS_CNTR_AVGMINMAX,
2173                                      "cache_miss", "pages");
2174
2175                 lproc_filter_attach_seqstat(obd);
2176                 obd->obd_proc_exports_entry = lprocfs_register("exports",
2177                                                         obd->obd_proc_entry,
2178                                                         NULL, NULL);
2179                 if (IS_ERR(obd->obd_proc_exports_entry)) {
2180                         rc = PTR_ERR(obd->obd_proc_exports_entry);
2181                         CERROR("error %d setting up lprocfs for %s\n",
2182                                rc, "exports");
2183                         obd->obd_proc_exports_entry = NULL;
2184                 }
2185         }
2186         if (obd->obd_proc_exports_entry)
2187                 lprocfs_add_simple(obd->obd_proc_exports_entry, "clear",
2188                                    lprocfs_nid_stats_clear_read,
2189                                    lprocfs_nid_stats_clear_write, obd, NULL);
2190
2191         memcpy((void *)addr, lustre_cfg_buf(lcfg, 4),
2192                LUSTRE_CFG_BUFLEN(lcfg, 4));
2193         rc = filter_common_setup(obd, lcfg, (void *)addr);
2194         OBD_PAGE_FREE(page);
2195
2196         if (rc) {
2197                 lprocfs_remove_proc_entry("clear", obd->obd_proc_exports_entry);
2198                 lprocfs_free_per_client_stats(obd);
2199                 lprocfs_free_obd_stats(obd);
2200                 lprocfs_obd_cleanup(obd);
2201         }
2202
2203         return rc;
2204 }
2205
2206 static struct llog_operations filter_mds_ost_repl_logops;
2207
2208 static struct llog_operations filter_size_orig_logops = {
2209         .lop_setup   = llog_obd_origin_setup,
2210         .lop_cleanup = llog_obd_origin_cleanup,
2211         .lop_add     = llog_obd_origin_add
2212 };
2213
2214 static int filter_olg_fini(struct obd_llog_group *olg)
2215 {
2216         struct llog_ctxt *ctxt;
2217         int rc = 0, rc2 = 0;
2218         ENTRY;
2219
2220         ctxt = llog_group_get_ctxt(olg, LLOG_MDS_OST_REPL_CTXT);
2221         if (ctxt)
2222                 rc = llog_cleanup(ctxt);
2223
2224         ctxt = llog_group_get_ctxt(olg, LLOG_SIZE_ORIG_CTXT);
2225         if (ctxt)
2226                 rc2 = llog_cleanup(ctxt);
2227         if (!rc)
2228                 rc = rc2;
2229
2230         RETURN(rc);
2231 }
2232
2233 static int
2234 filter_olg_init(struct obd_device *obd, struct obd_llog_group *olg,
2235                 struct obd_device *tgt)
2236 {
2237         int rc;
2238         ENTRY;
2239
2240         rc = llog_setup(obd, olg, LLOG_MDS_OST_REPL_CTXT, tgt, 0, NULL,
2241                         &filter_mds_ost_repl_logops);
2242         if (rc)
2243                 GOTO(cleanup, rc);
2244
2245         rc = llog_setup(obd, olg, LLOG_SIZE_ORIG_CTXT, tgt, 0, NULL,
2246                         &filter_size_orig_logops);
2247         if (rc)
2248                 GOTO(cleanup, rc);
2249         EXIT;
2250 cleanup:
2251         if (rc)
2252                 filter_olg_fini(olg);
2253         return rc;
2254 }
2255
2256 /**
2257  * Init the default olg, which is embeded in the obd_device, for filter.
2258  */
2259 static int
2260 filter_default_olg_init(struct obd_device *obd, struct obd_llog_group *olg,
2261                         struct obd_device *tgt)
2262 {
2263         struct filter_obd *filter = &obd->u.filter;
2264         struct llog_ctxt *ctxt;
2265         int rc;
2266         ENTRY;
2267
2268         filter->fo_lcm = llog_recov_thread_init(obd->obd_name);
2269         if (!filter->fo_lcm)
2270                 RETURN(-ENOMEM);
2271
2272         filter_mds_ost_repl_logops = llog_client_ops;
2273         filter_mds_ost_repl_logops.lop_cancel = llog_obd_repl_cancel;
2274         filter_mds_ost_repl_logops.lop_connect = llog_obd_repl_connect;
2275         filter_mds_ost_repl_logops.lop_sync = llog_obd_repl_sync;
2276
2277         rc = filter_olg_init(obd, olg, tgt);
2278         if (rc)
2279                 GOTO(cleanup_lcm, rc);
2280
2281         ctxt = llog_group_get_ctxt(olg, LLOG_MDS_OST_REPL_CTXT);
2282         if (!ctxt) {
2283                 CERROR("Can't get ctxt for %p:%x\n", olg,
2284                        LLOG_MDS_OST_REPL_CTXT);
2285                 GOTO(cleanup_olg, rc = -ENODEV);
2286         }
2287         ctxt->loc_lcm = filter->fo_lcm;
2288         ctxt->llog_proc_cb = filter_recov_log_mds_ost_cb;
2289         llog_ctxt_put(ctxt);
2290
2291         RETURN(0);
2292 cleanup_olg:
2293         filter_olg_fini(olg);
2294 cleanup_lcm:
2295         llog_recov_thread_fini(filter->fo_lcm, 1);
2296         filter->fo_lcm = NULL;
2297         return rc;
2298 }
2299
2300 static int
2301 filter_llog_init(struct obd_device *obd, struct obd_llog_group *olg,
2302                  struct obd_device *tgt, int count, struct llog_catid *catid,
2303                  struct obd_uuid *uuid)
2304 {
2305         struct filter_obd *filter = &obd->u.filter;
2306         struct llog_ctxt *ctxt;
2307         int rc;
2308         ENTRY;
2309
2310         LASSERT(olg != NULL);
2311         if (olg == &obd->obd_olg)
2312                 return filter_default_olg_init(obd, olg, tgt);
2313
2314         LASSERT(filter->fo_lcm != NULL);
2315         rc = filter_olg_init(obd, olg, tgt);
2316         if (rc)
2317                 RETURN(rc);
2318         ctxt = llog_group_get_ctxt(olg, LLOG_MDS_OST_REPL_CTXT);
2319         if (!ctxt) {
2320                 CERROR("Can't get ctxt for %p:%x\n", olg,
2321                        LLOG_MDS_OST_REPL_CTXT);
2322                 filter_olg_fini(olg);
2323                 RETURN(-ENODEV);
2324         }
2325         ctxt->llog_proc_cb = filter_recov_log_mds_ost_cb;
2326         ctxt->loc_lcm = filter->fo_lcm;
2327         llog_ctxt_put(ctxt);
2328         RETURN(rc);
2329 }
2330
2331 static int filter_llog_finish(struct obd_device *obd, int count)
2332 {
2333         struct filter_obd *filter = &obd->u.filter;
2334         struct llog_ctxt *ctxt;
2335         ENTRY;
2336
2337         ctxt = llog_group_get_ctxt(&obd->obd_olg, LLOG_MDS_OST_REPL_CTXT);
2338         if (ctxt) {
2339                 mutex_down(&ctxt->loc_sem);
2340                 if (ctxt->loc_imp) {
2341                         /*
2342                          * Make sure that no cached llcds left in recov_thread.
2343                          * We actually do sync in disconnect time, but disconnect
2344                          * may not come being marked rq_no_resend = 1.
2345                          */
2346                         llog_sync(ctxt, NULL);
2347
2348                         /*
2349                          * Balance class_import_get() in llog_receptor_accept().
2350                          * This is safe to do, as llog is already synchronized
2351                          * and its import may go.
2352                          */
2353                         class_import_put(ctxt->loc_imp);
2354                         ctxt->loc_imp = NULL;
2355                 }
2356                 mutex_up(&ctxt->loc_sem);
2357                 llog_ctxt_put(ctxt);
2358         }
2359
2360         if (filter->fo_lcm) {
2361                 llog_recov_thread_fini(filter->fo_lcm, obd->obd_force);
2362                 filter->fo_lcm = NULL;
2363         }
2364         RETURN(filter_olg_fini(&obd->obd_olg));
2365 }
2366
2367 /**
2368  * Find the group llog according to group index in the llog group list.
2369  */
2370 static struct obd_llog_group *
2371 filter_find_olg_internal(struct filter_obd *filter, int group)
2372 {
2373         struct obd_llog_group *olg;
2374
2375         LASSERT_SPIN_LOCKED(&filter->fo_llog_list_lock);
2376         list_for_each_entry(olg, &filter->fo_llog_list, olg_list) {
2377                 if (olg->olg_group == group)
2378                         RETURN(olg);
2379         }
2380         RETURN(NULL);
2381 }
2382
2383 /**
2384  * Find the group llog according to group index on the filter
2385  */
2386 struct obd_llog_group *filter_find_olg(struct obd_device *obd, int group)
2387 {
2388         struct obd_llog_group *olg = NULL;
2389         struct filter_obd *filter;
2390
2391         filter = &obd->u.filter;
2392
2393         if (group == FILTER_GROUP_LLOG)
2394                 RETURN(&obd->obd_olg);
2395
2396         spin_lock(&filter->fo_llog_list_lock);
2397         olg = filter_find_olg_internal(filter, group);
2398         spin_unlock(&filter->fo_llog_list_lock);
2399
2400         RETURN(olg);
2401 }
2402 /**
2403  * Find the llog_group of the filter according to the group. If it can not
2404  * find, create the llog_group, which only happens when mds is being synced
2405  * with OST.
2406  */
2407 struct obd_llog_group *filter_find_create_olg(struct obd_device *obd, int group)
2408 {
2409         struct obd_llog_group *olg = NULL;
2410         struct filter_obd *filter;
2411         int rc;
2412
2413         filter = &obd->u.filter;
2414
2415         if (group == FILTER_GROUP_LLOG)
2416                 RETURN(&obd->obd_olg);
2417
2418         spin_lock(&filter->fo_llog_list_lock);
2419         olg = filter_find_olg_internal(filter, group);
2420         if (olg) {
2421                 if (olg->olg_initializing) {
2422                         GOTO(out_unlock, olg = ERR_PTR(-EBUSY));
2423                 } else {
2424                         GOTO(out_unlock, olg);
2425                 }
2426         }
2427         OBD_ALLOC_PTR(olg);
2428         if (olg == NULL)
2429                GOTO(out_unlock, olg = ERR_PTR(-ENOMEM));
2430
2431         llog_group_init(olg, group);
2432         list_add(&olg->olg_list, &filter->fo_llog_list);
2433         olg->olg_initializing = 1;
2434         spin_unlock(&filter->fo_llog_list_lock);
2435
2436         rc = llog_cat_initialize(obd, olg, 1, NULL);
2437         if (rc) {
2438                spin_lock(&filter->fo_llog_list_lock);
2439                list_del(&olg->olg_list);
2440                spin_unlock(&filter->fo_llog_list_lock);
2441                OBD_FREE_PTR(olg);
2442                GOTO(out, olg = ERR_PTR(-ENOMEM));
2443         }
2444         spin_lock(&filter->fo_llog_list_lock);
2445         olg->olg_initializing = 0;
2446         spin_unlock(&filter->fo_llog_list_lock);
2447         CDEBUG(D_OTHER, "%s: new llog group %u (0x%p)\n",
2448               obd->obd_name, group, olg);
2449 out:
2450         RETURN(olg);
2451
2452 out_unlock:
2453         spin_unlock(&filter->fo_llog_list_lock);
2454         GOTO(out, olg);
2455 }
2456
2457 static int filter_llog_connect(struct obd_export *exp,
2458                                struct llogd_conn_body *body)
2459 {
2460         struct obd_device *obd = exp->exp_obd;
2461         struct llog_ctxt *ctxt;
2462         struct obd_llog_group *olg;
2463         int rc;
2464         ENTRY;
2465
2466         CDEBUG(D_OTHER, "%s: LLog connect for: "LPX64"/"LPX64":%x\n",
2467                obd->obd_name, body->lgdc_logid.lgl_oid,
2468                body->lgdc_logid.lgl_ogr, body->lgdc_logid.lgl_ogen);
2469
2470         olg = filter_find_olg(obd, body->lgdc_logid.lgl_ogr);
2471         if (!olg) {
2472                 CERROR(" %s: can not find olg of group %d\n",
2473                        obd->obd_name, (int)body->lgdc_logid.lgl_ogr);
2474                 RETURN(-ENOENT);
2475         }
2476         llog_group_set_export(olg, exp);
2477
2478         ctxt = llog_group_get_ctxt(olg, body->lgdc_ctxt_idx);
2479         LASSERTF(ctxt != NULL, "ctxt is not null, ctxt idx %d \n",
2480                  body->lgdc_ctxt_idx);
2481
2482         CWARN("%s: Recovery from log "LPX64"/"LPX64":%x\n",
2483               obd->obd_name, body->lgdc_logid.lgl_oid,
2484               body->lgdc_logid.lgl_ogr, body->lgdc_logid.lgl_ogen);
2485
2486         rc = llog_connect(ctxt, &body->lgdc_logid,
2487                           &body->lgdc_gen, NULL);
2488         llog_ctxt_put(ctxt);
2489         if (rc != 0)
2490                 CERROR("failed to connect rc %d idx %d\n", rc,
2491                                 body->lgdc_ctxt_idx);
2492
2493         RETURN(rc);
2494 }
2495
2496 static int filter_llog_preclean(struct obd_device *obd)
2497 {
2498         struct obd_llog_group *olg, *tmp;
2499         struct filter_obd *filter;
2500         struct list_head  remove_list;
2501         int rc = 0;
2502         ENTRY;
2503
2504         rc = obd_llog_finish(obd, 0);
2505         if (rc)
2506                 CERROR("failed to cleanup llogging subsystem\n");
2507
2508         filter = &obd->u.filter;
2509         CFS_INIT_LIST_HEAD(&remove_list);
2510
2511         spin_lock(&filter->fo_llog_list_lock);
2512         while (!list_empty(&filter->fo_llog_list)) {
2513                 olg = list_entry(filter->fo_llog_list.next,
2514                                  struct obd_llog_group, olg_list);
2515                 list_del(&olg->olg_list);
2516                 list_add(&olg->olg_list, &remove_list);
2517         }
2518         spin_unlock(&filter->fo_llog_list_lock);
2519
2520         list_for_each_entry_safe(olg, tmp, &remove_list, olg_list) {
2521                 list_del_init(&olg->olg_list);
2522                 rc = filter_olg_fini(olg);
2523                 if (rc)
2524                         CERROR("failed to cleanup llogging subsystem for %u\n",
2525                                olg->olg_group);
2526                 OBD_FREE_PTR(olg);
2527         }
2528
2529         RETURN(rc);
2530 }
2531
2532 static int filter_precleanup(struct obd_device *obd,
2533                              enum obd_cleanup_stage stage)
2534 {
2535         int rc = 0;
2536         ENTRY;
2537
2538         switch(stage) {
2539         case OBD_CLEANUP_EARLY:
2540                 break;
2541         case OBD_CLEANUP_EXPORTS:
2542                 target_cleanup_recovery(obd);
2543                 rc = filter_llog_preclean(obd);
2544                 break;
2545         }
2546         RETURN(rc);
2547 }
2548
2549 static int filter_cleanup(struct obd_device *obd)
2550 {
2551         struct filter_obd *filter = &obd->u.filter;
2552         ENTRY;
2553
2554         if (obd->obd_fail)
2555                 LCONSOLE_WARN("%s: shutting down for failover; client state "
2556                               "will be preserved.\n", obd->obd_name);
2557
2558         if (!list_empty(&obd->obd_exports)) {
2559                 CERROR("%s: still has clients!\n", obd->obd_name);
2560                 class_disconnect_exports(obd);
2561                 if (!list_empty(&obd->obd_exports)) {
2562                         CERROR("still has exports after forced cleanup?\n");
2563                         RETURN(-EBUSY);
2564                 }
2565         }
2566
2567         lprocfs_remove_proc_entry("clear", obd->obd_proc_exports_entry);
2568         lprocfs_free_per_client_stats(obd);
2569         lprocfs_free_obd_stats(obd);
2570         lprocfs_obd_cleanup(obd);
2571         lquota_cleanup(filter_quota_interface_ref, obd);
2572
2573         /* Stop recovery before namespace cleanup. */
2574         target_stop_recovery_thread(obd);
2575         target_cleanup_recovery(obd);
2576
2577         ldlm_namespace_free(obd->obd_namespace, NULL, obd->obd_force);
2578         obd->obd_namespace = NULL;
2579
2580         sptlrpc_rule_set_free(&filter->fo_sptlrpc_rset);
2581
2582         if (obd->u.obt.obt_sb == NULL)
2583                 RETURN(0);
2584
2585         filter_post(obd);
2586
2587         LL_DQUOT_OFF(obd->u.obt.obt_sb);
2588         shrink_dcache_sb(obd->u.obt.obt_sb);
2589
2590         server_put_mount(obd->obd_name, filter->fo_vfsmnt);
2591         obd->u.obt.obt_sb = NULL;
2592
2593         fsfilt_put_ops(obd->obd_fsops);
2594
2595         filter_iobuf_pool_done(filter);
2596
2597         LCONSOLE_INFO("OST %s has stopped.\n", obd->obd_name);
2598
2599         RETURN(0);
2600 }
2601
2602 static int filter_connect_internal(struct obd_export *exp,
2603                                    struct obd_connect_data *data)
2604 {
2605         struct filter_export_data *fed = &exp->exp_filter_data;
2606
2607         if (!data)
2608                 RETURN(0);
2609
2610         CDEBUG(D_RPCTRACE, "%s: cli %s/%p ocd_connect_flags: "LPX64
2611                " ocd_version: %x ocd_grant: %d ocd_index: %u\n",
2612                exp->exp_obd->obd_name, exp->exp_client_uuid.uuid, exp,
2613                data->ocd_connect_flags, data->ocd_version,
2614                data->ocd_grant, data->ocd_index);
2615
2616         if (fed->fed_group != 0 && fed->fed_group != data->ocd_group) {
2617                 CWARN("!!! This export (nid %s) used object group %d "
2618                        "earlier; now it's trying to use group %d!  This could "
2619                        "be a bug in the MDS. Please report to "
2620                        "http://bugzilla.lustre.org/\n",
2621                        obd_export_nid2str(exp), fed->fed_group,data->ocd_group);
2622                 RETURN(-EPROTO);
2623         }
2624         fed->fed_group = data->ocd_group;
2625
2626         data->ocd_connect_flags &= OST_CONNECT_SUPPORTED;
2627         exp->exp_connect_flags = data->ocd_connect_flags;
2628         data->ocd_version = LUSTRE_VERSION_CODE;
2629
2630         if (exp->exp_connect_flags & OBD_CONNECT_GRANT) {
2631                 obd_size left, want;
2632
2633                 spin_lock(&exp->exp_obd->obd_osfs_lock);
2634                 left = filter_grant_space_left(exp);
2635                 want = data->ocd_grant;
2636                 filter_grant(exp, fed->fed_grant, want, left);
2637                 data->ocd_grant = fed->fed_grant;
2638                 spin_unlock(&exp->exp_obd->obd_osfs_lock);
2639
2640                 CDEBUG(D_CACHE, "%s: cli %s/%p ocd_grant: %d want: "
2641                        LPU64" left: "LPU64"\n", exp->exp_obd->obd_name,
2642                        exp->exp_client_uuid.uuid, exp,
2643                        data->ocd_grant, want, left);
2644         }
2645
2646         if (data->ocd_connect_flags & OBD_CONNECT_INDEX) {
2647                 struct filter_obd *filter = &exp->exp_obd->u.filter;
2648                 struct lr_server_data *lsd = filter->fo_fsd;
2649                 int index = le32_to_cpu(lsd->lsd_ost_index);
2650
2651                 if (!(lsd->lsd_feature_compat &
2652                       cpu_to_le32(OBD_COMPAT_OST))) {
2653                         /* this will only happen on the first connect */
2654                         lsd->lsd_ost_index = cpu_to_le32(data->ocd_index);
2655                         lsd->lsd_feature_compat |= cpu_to_le32(OBD_COMPAT_OST);
2656                         filter_update_server_data(exp->exp_obd,
2657                                                   filter->fo_rcvd_filp, lsd, 1);
2658                 } else if (index != data->ocd_index) {
2659                         LCONSOLE_ERROR_MSG(0x136, "Connection from %s to index"
2660                                            " %u doesn't match actual OST index"
2661                                            " %u in last_rcvd file, bad "
2662                                            "configuration?\n",
2663                                            obd_export_nid2str(exp), index,
2664                                            data->ocd_index);
2665                         RETURN(-EBADF);
2666                 }
2667         }
2668
2669         if (OBD_FAIL_CHECK(OBD_FAIL_OST_BRW_SIZE)) {
2670                 data->ocd_brw_size = 65536;
2671         } else if (data->ocd_connect_flags & OBD_CONNECT_BRW_SIZE) {
2672                 data->ocd_brw_size = min(data->ocd_brw_size,
2673                                (__u32)(PTLRPC_MAX_BRW_PAGES << CFS_PAGE_SHIFT));
2674                 LASSERT(data->ocd_brw_size);
2675         }
2676
2677         if (data->ocd_connect_flags & OBD_CONNECT_CKSUM) {
2678                 __u32 cksum_types = data->ocd_cksum_types;
2679
2680                 /* The client set in ocd_cksum_types the checksum types it
2681                  * supports. We have to mask off the algorithms that we don't
2682                  * support */
2683                 if (cksum_types & OBD_CKSUM_ALL)
2684                         data->ocd_cksum_types &= OBD_CKSUM_ALL;
2685                 else
2686                         data->ocd_cksum_types = OBD_CKSUM_CRC32;
2687
2688                 CDEBUG(D_RPCTRACE, "%s: cli %s supports cksum type %x, return "
2689                                    "%x\n", exp->exp_obd->obd_name,
2690                                    obd_export_nid2str(exp), cksum_types,
2691                                    data->ocd_cksum_types);
2692         } else {
2693                 /* This client does not support OBD_CONNECT_CKSUM
2694                  * fall back to CRC32 */
2695                 CDEBUG(D_RPCTRACE, "%s: cli %s does not support "
2696                                    "OBD_CONNECT_CKSUM, CRC32 will be used\n",
2697                                    exp->exp_obd->obd_name,
2698                                    obd_export_nid2str(exp));
2699         }
2700
2701         /* FIXME: Do the same with the MDS UUID and fsd_peeruuid.
2702          * FIXME: We don't strictly need the COMPAT flag for that,
2703          * FIXME: as fsd_peeruuid[0] will tell us if that is set.
2704          * FIXME: We needed it for the index, as index 0 is valid. */
2705
2706         RETURN(0);
2707 }
2708
2709 static int filter_reconnect(const struct lu_env *env,
2710                             struct obd_export *exp, struct obd_device *obd,
2711                             struct obd_uuid *cluuid,
2712                             struct obd_connect_data *data,
2713                             void *localdata)
2714 {
2715         int rc;
2716         ENTRY;
2717
2718         if (exp == NULL || obd == NULL || cluuid == NULL)
2719                 RETURN(-EINVAL);
2720
2721         rc = filter_connect_internal(exp, data);
2722         if (rc == 0)
2723                 filter_export_stats_init(obd, exp, localdata);
2724
2725         RETURN(rc);
2726 }
2727
2728 /* nearly identical to mds_connect */
2729 static int filter_connect(const struct lu_env *env,
2730                           struct lustre_handle *conn, struct obd_device *obd,
2731                           struct obd_uuid *cluuid,
2732                           struct obd_connect_data *data, void *localdata)
2733 {
2734         struct lvfs_run_ctxt saved;
2735         struct obd_export *exp;
2736         struct filter_export_data *fed;
2737         struct lsd_client_data *lcd = NULL;
2738         __u32 group;
2739         int rc;
2740         ENTRY;
2741
2742         if (conn == NULL || obd == NULL || cluuid == NULL)
2743                 RETURN(-EINVAL);
2744
2745         rc = class_connect(conn, obd, cluuid);
2746         if (rc)
2747                 RETURN(rc);
2748         exp = class_conn2export(conn);
2749         LASSERT(exp != NULL);
2750
2751         fed = &exp->exp_filter_data;
2752
2753         rc = filter_connect_internal(exp, data);
2754         if (rc)
2755                 GOTO(cleanup, rc);
2756
2757         filter_export_stats_init(obd, exp, localdata);
2758         if (obd->obd_replayable) {
2759                 OBD_ALLOC(lcd, sizeof(*lcd));
2760                 if (!lcd) {
2761                         CERROR("filter: out of memory for client data\n");
2762                         GOTO(cleanup, rc = -ENOMEM);
2763                 }
2764
2765                 memcpy(lcd->lcd_uuid, cluuid, sizeof(lcd->lcd_uuid));
2766                 fed->fed_lcd = lcd;
2767                 rc = filter_client_add(obd, exp, -1);
2768                 if (rc)
2769                         GOTO(cleanup, rc);
2770         }
2771
2772         group = data->ocd_group;
2773         if (group == 0)
2774                 GOTO(cleanup, rc);
2775
2776         CWARN("%s: Received MDS connection ("LPX64"); group %d\n",
2777               obd->obd_name, exp->exp_handle.h_cookie, group);
2778
2779         push_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
2780         rc = filter_read_groups(obd, group, 1);
2781         pop_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
2782         if (rc != 0) {
2783                 CERROR("can't read group %u\n", group);
2784                 GOTO(cleanup, rc);
2785         }
2786
2787         GOTO(cleanup, rc);
2788
2789 cleanup:
2790         if (rc) {
2791                 if (lcd) {
2792                         OBD_FREE_PTR(lcd);
2793                         fed->fed_lcd = NULL;
2794                 }
2795                 class_disconnect(exp);
2796         } else {
2797                 class_export_put(exp);
2798         }
2799
2800         RETURN(rc);
2801 }
2802
2803 /* Do extra sanity checks for grant accounting.  We do this at connect,
2804  * disconnect, and statfs RPC time, so it shouldn't be too bad.  We can
2805  * always get rid of it or turn it off when we know accounting is good. */
2806 static void filter_grant_sanity_check(struct obd_device *obd, const char *func)
2807 {
2808         struct filter_export_data *fed;
2809         struct obd_export *exp;
2810         obd_size maxsize = obd->obd_osfs.os_blocks * obd->obd_osfs.os_bsize;
2811         obd_size tot_dirty = 0, tot_pending = 0, tot_granted = 0;
2812         obd_size fo_tot_dirty, fo_tot_pending, fo_tot_granted;
2813
2814         if (list_empty(&obd->obd_exports))
2815                 return;
2816
2817         /* We don't want to do this for large machines that do lots of
2818            mounts or unmounts.  It burns... */
2819         if (obd->obd_num_exports > 100)
2820                 return;
2821
2822         spin_lock(&obd->obd_osfs_lock);
2823         spin_lock(&obd->obd_dev_lock);
2824         list_for_each_entry(exp, &obd->obd_exports, exp_obd_chain) {
2825                 int error = 0;
2826                 fed = &exp->exp_filter_data;
2827                 if (fed->fed_grant < 0 || fed->fed_pending < 0 ||
2828                     fed->fed_dirty < 0)
2829                         error = 1;
2830                 if (maxsize > 0) { /* we may not have done a statfs yet */
2831                         LASSERTF(fed->fed_grant + fed->fed_pending <= maxsize,
2832                                  "%s: cli %s/%p %ld+%ld > "LPU64"\n", func,
2833                                  exp->exp_client_uuid.uuid, exp,
2834                                  fed->fed_grant, fed->fed_pending, maxsize);
2835                         LASSERTF(fed->fed_dirty <= maxsize,
2836                                  "%s: cli %s/%p %ld > "LPU64"\n", func,
2837                                  exp->exp_client_uuid.uuid, exp,
2838                                  fed->fed_dirty, maxsize);
2839                 }
2840                 if (error)
2841                         CERROR("%s: cli %s/%p dirty %ld pend %ld grant %ld\n",
2842                                obd->obd_name, exp->exp_client_uuid.uuid, exp,
2843                                fed->fed_dirty, fed->fed_pending,fed->fed_grant);
2844                 else
2845                         CDEBUG(D_CACHE, "%s: cli %s/%p dirty %ld pend %ld grant %ld\n",
2846                                obd->obd_name, exp->exp_client_uuid.uuid, exp,
2847                                fed->fed_dirty, fed->fed_pending,fed->fed_grant);
2848                 tot_granted += fed->fed_grant + fed->fed_pending;
2849                 tot_pending += fed->fed_pending;
2850                 tot_dirty += fed->fed_dirty;
2851         }
2852         fo_tot_granted = obd->u.filter.fo_tot_granted;
2853         fo_tot_pending = obd->u.filter.fo_tot_pending;
2854         fo_tot_dirty = obd->u.filter.fo_tot_dirty;
2855         spin_unlock(&obd->obd_dev_lock);
2856         spin_unlock(&obd->obd_osfs_lock);
2857
2858         /* Do these assertions outside the spinlocks so we don't kill system */
2859         if (tot_granted != fo_tot_granted)
2860                 CERROR("%s: tot_granted "LPU64" != fo_tot_granted "LPU64"\n",
2861                        func, tot_granted, fo_tot_granted);
2862         if (tot_pending != fo_tot_pending)
2863                 CERROR("%s: tot_pending "LPU64" != fo_tot_pending "LPU64"\n",
2864                        func, tot_pending, fo_tot_pending);
2865         if (tot_dirty != fo_tot_dirty)
2866                 CERROR("%s: tot_dirty "LPU64" != fo_tot_dirty "LPU64"\n",
2867                        func, tot_dirty, fo_tot_dirty);
2868         if (tot_pending > tot_granted)
2869                 CERROR("%s: tot_pending "LPU64" > tot_granted "LPU64"\n",
2870                        func, tot_pending, tot_granted);
2871         if (tot_granted > maxsize)
2872                 CERROR("%s: tot_granted "LPU64" > maxsize "LPU64"\n",
2873                        func, tot_granted, maxsize);
2874         if (tot_dirty > maxsize)
2875                 CERROR("%s: tot_dirty "LPU64" > maxsize "LPU64"\n",
2876                        func, tot_dirty, maxsize);
2877 }
2878
2879 /* Remove this client from the grant accounting totals.  We also remove
2880  * the export from the obd device under the osfs and dev locks to ensure
2881  * that the filter_grant_sanity_check() calculations are always valid.
2882  * The client should do something similar when it invalidates its import. */
2883 static void filter_grant_discard(struct obd_export *exp)
2884 {
2885         struct obd_device *obd = exp->exp_obd;
2886         struct filter_obd *filter = &obd->u.filter;
2887         struct filter_export_data *fed = &exp->exp_filter_data;
2888
2889         spin_lock(&obd->obd_osfs_lock);
2890         spin_lock(&obd->obd_dev_lock);
2891         list_del_init(&exp->exp_obd_chain);
2892         spin_unlock(&obd->obd_dev_lock);
2893
2894         LASSERTF(filter->fo_tot_granted >= fed->fed_grant,
2895                  "%s: tot_granted "LPU64" cli %s/%p fed_grant %ld\n",
2896                  obd->obd_name, filter->fo_tot_granted,
2897                  exp->exp_client_uuid.uuid, exp, fed->fed_grant);
2898         filter->fo_tot_granted -= fed->fed_grant;
2899         LASSERTF(filter->fo_tot_pending >= fed->fed_pending,
2900                  "%s: tot_pending "LPU64" cli %s/%p fed_pending %ld\n",
2901                  obd->obd_name, filter->fo_tot_pending,
2902                  exp->exp_client_uuid.uuid, exp, fed->fed_pending);
2903         /* fo_tot_pending is handled in filter_grant_commit as bulk finishes */
2904         LASSERTF(filter->fo_tot_dirty >= fed->fed_dirty,
2905                  "%s: tot_dirty "LPU64" cli %s/%p fed_dirty %ld\n",
2906                  obd->obd_name, filter->fo_tot_dirty,
2907                  exp->exp_client_uuid.uuid, exp, fed->fed_dirty);
2908         filter->fo_tot_dirty -= fed->fed_dirty;
2909         fed->fed_dirty = 0;
2910         fed->fed_grant = 0;
2911
2912         spin_unlock(&obd->obd_osfs_lock);
2913 }
2914
2915 static int filter_destroy_export(struct obd_export *exp)
2916 {
2917         ENTRY;
2918
2919         if (exp->exp_filter_data.fed_pending)
2920                 CERROR("%s: cli %s/%p has %lu pending on destroyed export\n",
2921                        exp->exp_obd->obd_name, exp->exp_client_uuid.uuid,
2922                        exp, exp->exp_filter_data.fed_pending);
2923
2924         lquota_clearinfo(filter_quota_interface_ref, exp, exp->exp_obd);
2925
2926         target_destroy_export(exp);
2927         ldlm_destroy_export(exp);
2928
2929         if (obd_uuid_equals(&exp->exp_client_uuid, &exp->exp_obd->obd_uuid))
2930                 RETURN(0);
2931
2932
2933         if (exp->exp_obd->obd_replayable)
2934                 filter_client_free(exp);
2935         else
2936                 fsfilt_sync(exp->exp_obd, exp->exp_obd->u.obt.obt_sb);
2937
2938         filter_grant_discard(exp);
2939         filter_fmd_cleanup(exp);
2940
2941         if (!(exp->exp_flags & OBD_OPT_FORCE))
2942                 filter_grant_sanity_check(exp->exp_obd, __FUNCTION__);
2943
2944         RETURN(0);
2945 }
2946
2947 static void filter_sync_llogs(struct obd_device *obd, struct obd_export *dexp)
2948 {
2949         struct obd_llog_group *olg_min, *olg;
2950         struct filter_obd *filter;
2951         int worked = 0, group;
2952         struct llog_ctxt *ctxt;
2953         ENTRY;
2954
2955         filter = &obd->u.filter;
2956
2957         /* we can't sync log holding spinlock. also, we do not want to get
2958          * into livelock. so we do following: loop over MDS's exports in
2959          * group order and skip already synced llogs -bzzz */
2960         do {
2961                 /* look for group with min. number, but > worked */
2962                 olg_min = NULL;
2963                 group = 1 << 30;
2964                 spin_lock(&filter->fo_llog_list_lock);
2965                 list_for_each_entry(olg, &filter->fo_llog_list, olg_list) {
2966                         if (olg->olg_group <= worked) {
2967                                 /* this group is already synced */
2968                                 continue;
2969                         }
2970                         if (group < olg->olg_group) {
2971                                 /* we have group with smaller number to sync */
2972                                 continue;
2973                         }
2974                         /* store current minimal group */
2975                         olg_min = olg;
2976                         group = olg->olg_group;
2977                 }
2978                 spin_unlock(&filter->fo_llog_list_lock);
2979
2980                 if (olg_min == NULL)
2981                         break;
2982
2983                 worked = olg_min->olg_group;
2984                 if (olg_min->olg_exp &&
2985                     (dexp == olg_min->olg_exp || dexp == NULL)) {
2986                         int err;
2987                         ctxt = llog_group_get_ctxt(olg_min,
2988                                                    LLOG_MDS_OST_REPL_CTXT);
2989                         if (ctxt) {
2990                                 err = llog_sync(ctxt, olg_min->olg_exp);
2991                                 llog_ctxt_put(ctxt);
2992                                 if (err) {
2993                                         CERROR("error flushing logs to MDS: "
2994                                                "rc %d\n", err);
2995                                 }
2996                         }
2997                 }
2998         } while (olg_min != NULL);
2999 }
3000
3001 /* Also incredibly similar to mds_disconnect */
3002 static int filter_disconnect(struct obd_export *exp)
3003 {
3004         struct obd_device *obd = exp->exp_obd;
3005         int rc;
3006         ENTRY;
3007
3008         LASSERT(exp);
3009         class_export_get(exp);
3010
3011         if (!(exp->exp_flags & OBD_OPT_FORCE))
3012                 filter_grant_sanity_check(obd, __FUNCTION__);
3013         filter_grant_discard(exp);
3014
3015         /* Flush any remaining cancel messages out to the target */
3016         filter_sync_llogs(obd, exp);
3017
3018         /* Disconnect early so that clients can't keep using export */
3019         rc = class_disconnect(exp);
3020         if (exp->exp_obd->obd_namespace != NULL)
3021                 ldlm_cancel_locks_for_export(exp);
3022
3023         fsfilt_sync(obd, obd->u.obt.obt_sb);
3024
3025         lprocfs_exp_cleanup(exp);
3026
3027         class_export_put(exp);
3028         RETURN(rc);
3029 }
3030
3031 /* reverse import is changed, sync all cancels */
3032 static void filter_revimp_update(struct obd_export *exp)
3033 {
3034         ENTRY;
3035
3036         LASSERT(exp);
3037         class_export_get(exp);
3038
3039         /* flush any remaining cancel messages out to the target */
3040         filter_sync_llogs(exp->exp_obd, exp);
3041         class_export_put(exp);
3042         EXIT;
3043 }
3044
3045 static int filter_ping(struct obd_export *exp)
3046 {
3047         filter_fmd_expire(exp);
3048
3049         return 0;
3050 }
3051
3052 struct dentry *__filter_oa2dentry(struct obd_device *obd, struct obdo *oa,
3053                                   const char *what, int quiet)
3054 {
3055         struct dentry *dchild = NULL;
3056         obd_gr group = 0;
3057
3058         if (oa->o_valid & OBD_MD_FLGROUP)
3059                 group = oa->o_gr;
3060
3061         dchild = filter_fid2dentry(obd, NULL, group, oa->o_id);
3062
3063         if (IS_ERR(dchild)) {
3064                 CERROR("%s error looking up object: "LPU64":"LPU64"\n",
3065                        what, group, oa->o_id);
3066                 RETURN(dchild);
3067         }
3068
3069         if (dchild->d_inode == NULL) {
3070                 if (!quiet)
3071                         CERROR("%s: %s on non-existent object: "LPU64"\n",
3072                                obd->obd_name, what, oa->o_id);
3073                 f_dput(dchild);
3074                 RETURN(ERR_PTR(-ENOENT));
3075         }
3076
3077         return dchild;
3078 }
3079
3080 static int filter_getattr(struct obd_export *exp, struct obd_info *oinfo)
3081 {
3082         struct dentry *dentry = NULL;
3083         struct obd_device *obd;
3084         int rc = 0;
3085         ENTRY;
3086
3087         rc = filter_auth_capa(exp, NULL, oinfo_mdsno(oinfo),
3088                               oinfo_capa(oinfo), CAPA_OPC_META_READ);
3089         if (rc)
3090                 RETURN(rc);
3091
3092         obd = class_exp2obd(exp);
3093         if (obd == NULL) {
3094                 CDEBUG(D_IOCTL, "invalid client export %p\n", exp);
3095                 RETURN(-EINVAL);
3096         }
3097
3098         dentry = filter_oa2dentry(obd, oinfo->oi_oa);
3099         if (IS_ERR(dentry))
3100                 RETURN(PTR_ERR(dentry));
3101
3102         /* Limit the valid bits in the return data to what we actually use */
3103         oinfo->oi_oa->o_valid = OBD_MD_FLID;
3104         obdo_from_inode(oinfo->oi_oa, dentry->d_inode, FILTER_VALID_FLAGS);
3105
3106         f_dput(dentry);
3107         RETURN(rc);
3108 }
3109
3110 /* this should be enabled/disabled in condition to enabled/disabled large
3111  * inodes (fast EAs) in backing store FS. */
3112 int filter_update_fidea(struct obd_export *exp, struct inode *inode,
3113                         void *handle, struct obdo *oa)
3114 {
3115         struct obd_device *obd = exp->exp_obd;
3116         int rc = 0;
3117         ENTRY;
3118
3119         if (oa->o_valid & OBD_MD_FLFID) {
3120                 struct filter_fid ff;
3121
3122                 if (!(oa->o_valid & OBD_MD_FLGROUP))
3123                         oa->o_gr = 0;
3124                 /* packing fid and converting it to LE for storing into EA.
3125                  * Here ->o_stripe_idx should be filled by LOV and rest of
3126                  * fields - by client. */
3127                 ff.ff_fid.id = cpu_to_le64(oa->o_fid);
3128                 ff.ff_fid.f_type = cpu_to_le32(oa->o_stripe_idx);
3129                 ff.ff_fid.generation = cpu_to_le32(oa->o_generation);
3130                 ff.ff_objid = cpu_to_le64(oa->o_id);
3131                 ff.ff_group = cpu_to_le64(oa->o_gr);
3132
3133                 CDEBUG(D_INODE, "storing filter fid EA ("LPU64"/%u/%u"
3134                        LPU64"/"LPU64")\n", oa->o_fid, oa->o_stripe_idx,
3135                        oa->o_generation, oa->o_id, oa->o_gr);
3136
3137                 rc = fsfilt_set_md(obd, inode, handle, &ff, sizeof(ff), "fid");
3138                 if (rc)
3139                         CERROR("store fid in object failed! rc: %d\n", rc);
3140         } else {
3141                 CDEBUG(D_HA, "OSS object without fid info!\n");
3142         }
3143
3144         RETURN(rc);
3145 }
3146
3147 /* this is called from filter_truncate() until we have filter_punch() */
3148 int filter_setattr_internal(struct obd_export *exp, struct dentry *dentry,
3149                             struct obdo *oa, struct obd_trans_info *oti)
3150 {
3151         unsigned int orig_ids[MAXQUOTAS] = {0, 0};
3152         struct llog_cookie *fcc = NULL;
3153         struct filter_obd *filter;
3154         int rc, err, locked = 0, sync = 0;
3155         loff_t old_size = 0;
3156         unsigned int ia_valid;
3157         struct inode *inode;
3158         struct iattr iattr;
3159         void *handle;
3160         ENTRY;
3161
3162         LASSERT(dentry != NULL);
3163         LASSERT(!IS_ERR(dentry));
3164
3165         inode = dentry->d_inode;
3166         LASSERT(inode != NULL);
3167
3168         filter = &exp->exp_obd->u.filter;
3169         iattr_from_obdo(&iattr, oa, oa->o_valid);
3170         ia_valid = iattr.ia_valid;
3171
3172         if (oa->o_valid & OBD_MD_FLCOOKIE) {
3173                 OBD_ALLOC(fcc, sizeof(*fcc));
3174                 if (fcc != NULL)
3175                         *fcc = oa->o_lcookie;
3176         }
3177
3178         if (ia_valid & ATTR_SIZE || ia_valid & (ATTR_UID | ATTR_GID)) {
3179                 old_size = i_size_read(inode);
3180                 DQUOT_INIT(inode);
3181                 LOCK_INODE_MUTEX(inode);
3182                 locked = 1;
3183         }
3184
3185         /* If the inode still has SUID+SGID bits set (see filter_precreate())
3186          * then we will accept the UID+GID sent by the client during write for
3187          * initializing the ownership of this inode.  We only allow this to
3188          * happen once so clear these bits in setattr. In 2.6 kernels it is
3189          * possible to get ATTR_UID and ATTR_GID separately, so we only clear
3190          * the flags that are actually being set. */
3191         if (ia_valid & (ATTR_UID | ATTR_GID)) {
3192                 CDEBUG(D_INODE, "update UID/GID to %lu/%lu\n",
3193                        (unsigned long)oa->o_uid, (unsigned long)oa->o_gid);
3194
3195                 if ((inode->i_mode & S_ISUID) && (ia_valid & ATTR_UID)) {
3196                         if (!(ia_valid & ATTR_MODE)) {
3197                                 iattr.ia_mode = inode->i_mode;
3198                                 iattr.ia_valid |= ATTR_MODE;
3199                         }
3200                         iattr.ia_mode &= ~S_ISUID;
3201                 }
3202                 if ((inode->i_mode & S_ISGID) && (ia_valid & ATTR_GID)) {
3203                         if (!(iattr.ia_valid & ATTR_MODE)) {
3204                                 iattr.ia_mode = inode->i_mode;
3205                                 iattr.ia_valid |= ATTR_MODE;
3206                         }
3207                         iattr.ia_mode &= ~S_ISGID;
3208                 }
3209
3210                 orig_ids[USRQUOTA] = inode->i_uid;
3211                 orig_ids[GRPQUOTA] = inode->i_gid;
3212                 handle = fsfilt_start_log(exp->exp_obd, inode,
3213                                           FSFILT_OP_SETATTR, oti, 1);
3214                 if (IS_ERR(handle))
3215                         GOTO(out_unlock, rc = PTR_ERR(handle));
3216
3217                 /* update inode EA only once when inode is suid bit marked. As
3218                  * on 2.6.x UID and GID may be set separately, we check here
3219                  * only one of them to avoid double setting. */
3220                 if (inode->i_mode & S_ISUID)
3221                         filter_update_fidea(exp, inode, handle, oa);
3222         } else {
3223                 handle = fsfilt_start(exp->exp_obd, inode,
3224                                       FSFILT_OP_SETATTR, oti);
3225                 if (IS_ERR(handle))
3226                         GOTO(out_unlock, rc = PTR_ERR(handle));
3227         }
3228         if (oa->o_valid & OBD_MD_FLFLAGS) {
3229                 rc = fsfilt_iocontrol(exp->exp_obd, inode, NULL,
3230                                       EXT3_IOC_SETFLAGS, (long)&oa->o_flags);
3231         } else {
3232                 rc = fsfilt_setattr(exp->exp_obd, dentry, handle, &iattr, 1);
3233                 if (fcc != NULL)
3234                         /* set cancel cookie callback function */
3235                         sync = fsfilt_add_journal_cb(exp->exp_obd, 0, handle,
3236                                                      filter_cancel_cookies_cb,
3237                                                      fcc);
3238         }
3239
3240         if (OBD_FAIL_CHECK(OBD_FAIL_OST_SETATTR_CREDITS))
3241                 fsfilt_extend(exp->exp_obd, inode, 0, handle);
3242
3243         /* The truncate might have used up our transaction credits.  Make
3244          * sure we have one left for the last_rcvd update. */
3245         err = fsfilt_extend(exp->exp_obd, inode, 1, handle);
3246
3247         rc = filter_finish_transno(exp, oti, rc, sync);
3248         if (sync) {
3249                 filter_cancel_cookies_cb(exp->exp_obd, 0, fcc, rc);
3250                 fcc = NULL;
3251         }
3252
3253         err = fsfilt_commit(exp->exp_obd, inode, handle, 0);
3254         if (err) {
3255                 CERROR("error on commit, err = %d\n", err);
3256                 if (!rc)
3257                         rc = err;
3258         } else {
3259                 fcc = NULL;
3260         }
3261
3262         /* For a partial-page truncate flush the page to disk immediately
3263          * to avoid data corruption during direct disk write. b=17397 */
3264         if (!sync && (iattr.ia_valid & ATTR_SIZE) &&
3265             old_size != iattr.ia_size && (iattr.ia_size & ~CFS_PAGE_MASK)) {
3266                 err = filemap_fdatawrite_range(inode->i_mapping, iattr.ia_size,
3267                                                iattr.ia_size + 1);
3268                 if (!rc)
3269                         rc = err;
3270         }
3271
3272         if (locked) {
3273                 UNLOCK_INODE_MUTEX(inode);
3274                 locked = 0;
3275         }
3276
3277         EXIT;
3278 out_unlock:
3279         if (locked)
3280                 UNLOCK_INODE_MUTEX(inode);
3281
3282         if (fcc)
3283                 OBD_FREE(fcc, sizeof(*fcc));
3284
3285         /* trigger quota release */
3286         if (ia_valid & (ATTR_SIZE | ATTR_UID | ATTR_GID)) {
3287                 unsigned int cur_ids[MAXQUOTAS] = {oa->o_uid, oa->o_gid};
3288                 int rc2 = lquota_adjust(filter_quota_interface_ref,
3289                                         exp->exp_obd, cur_ids,
3290                                         orig_ids, rc, FSFILT_OP_SETATTR);
3291                 CDEBUG(rc2 ? D_ERROR : D_QUOTA,
3292                        "filter adjust qunit. (rc:%d)\n", rc2);
3293         }
3294         return rc;
3295 }
3296
3297 /* this is called from filter_truncate() until we have filter_punch() */
3298 int filter_setattr(struct obd_export *exp, struct obd_info *oinfo,
3299                    struct obd_trans_info *oti)
3300 {
3301         struct obdo *oa = oinfo->oi_oa;
3302         struct lustre_capa *capa = oinfo_capa(oinfo);
3303         struct ldlm_res_id res_id;
3304         struct filter_mod_data *fmd;
3305         struct lvfs_run_ctxt saved;
3306         struct filter_obd *filter;
3307         struct ldlm_resource *res;
3308         struct dentry *dentry;
3309         __u64 opc = CAPA_OPC_META_WRITE;
3310         int rc;
3311         ENTRY;
3312
3313         if (oa->o_valid & OBD_FL_TRUNC)
3314                 opc |= CAPA_OPC_OSS_TRUNC;
3315         rc = filter_auth_capa(exp, NULL, obdo_mdsno(oa), capa, opc);
3316         if (rc)
3317                 RETURN(rc);
3318
3319         if (oa->o_valid & (OBD_MD_FLUID | OBD_MD_FLGID)) {
3320                 rc = filter_capa_fixoa(exp, oa, obdo_mdsno(oa), capa);
3321                 if (rc)
3322                         RETURN(rc);
3323         }
3324
3325         osc_build_res_name(oa->o_id, oa->o_gr, &res_id);
3326         /* This would be very bad - accidentally truncating a file when
3327          * changing the time or similar - bug 12203. */
3328         if (oa->o_valid & OBD_MD_FLSIZE &&
3329             oinfo->oi_policy.l_extent.end != OBD_OBJECT_EOF) {
3330                 static char mdsinum[48];
3331
3332                 if (oa->o_valid & OBD_MD_FLFID)
3333                         snprintf(mdsinum, sizeof(mdsinum) - 1,
3334                                  " of inode "LPU64"/%u", oa->o_fid,
3335                                  oa->o_generation);
3336                 else
3337                         mdsinum[0] = '\0';
3338
3339                 CERROR("%s: setattr from %s trying to truncate objid "LPU64
3340                        " %s\n",
3341                        exp->exp_obd->obd_name, obd_export_nid2str(exp),
3342                        oa->o_id, mdsinum);
3343                 RETURN(-EPERM);
3344         }
3345
3346         dentry = __filter_oa2dentry(exp->exp_obd, oa, __FUNCTION__, 1);
3347         if (IS_ERR(dentry))
3348                 RETURN(PTR_ERR(dentry));
3349
3350         filter = &exp->exp_obd->u.filter;
3351         push_ctxt(&saved, &exp->exp_obd->obd_lvfs_ctxt, NULL);
3352         lock_kernel();
3353
3354         if (oa->o_valid &
3355             (OBD_MD_FLMTIME | OBD_MD_FLATIME | OBD_MD_FLCTIME)) {
3356                 fmd = filter_fmd_get(exp, oa->o_id, oa->o_gr);
3357                 if (fmd && fmd->fmd_mactime_xid < oti->oti_xid)
3358                         fmd->fmd_mactime_xid = oti->oti_xid;
3359                 filter_fmd_put(exp, fmd);
3360         }
3361
3362         /* setting objects attributes (including owner/group) */
3363         rc = filter_setattr_internal(exp, dentry, oa, oti);
3364         if (rc)
3365                 GOTO(out_unlock, rc);
3366
3367         res = ldlm_resource_get(exp->exp_obd->obd_namespace, NULL,
3368                                 &res_id, LDLM_EXTENT, 0);
3369
3370         if (res != NULL) {
3371                 LDLM_RESOURCE_ADDREF(res);
3372                 rc = ldlm_res_lvbo_update(res, NULL, 0, 0);
3373                 LDLM_RESOURCE_DELREF(res);
3374                 ldlm_resource_putref(res);
3375         }
3376
3377         oa->o_valid = OBD_MD_FLID;
3378
3379         /* Quota release need uid/gid info */
3380         obdo_from_inode(oa, dentry->d_inode,
3381                         FILTER_VALID_FLAGS | OBD_MD_FLUID | OBD_MD_FLGID);
3382
3383         EXIT;
3384 out_unlock:
3385         unlock_kernel();
3386         f_dput(dentry);
3387         pop_ctxt(&saved, &exp->exp_obd->obd_lvfs_ctxt, NULL);
3388         return rc;
3389 }
3390
3391 /* XXX identical to osc_unpackmd */
3392 static int filter_unpackmd(struct obd_export *exp, struct lov_stripe_md **lsmp,
3393                            struct lov_mds_md *lmm, int lmm_bytes)
3394 {
3395         int lsm_size;
3396         ENTRY;
3397
3398         if (lmm != NULL) {
3399                 if (lmm_bytes < sizeof (*lmm)) {
3400                         CERROR("lov_mds_md too small: %d, need %d\n",
3401                                lmm_bytes, (int)sizeof(*lmm));
3402                         RETURN(-EINVAL);
3403                 }
3404                 /* XXX LOV_MAGIC etc check? */
3405
3406                 if (lmm->lmm_object_id == cpu_to_le64(0)) {
3407                         CERROR("lov_mds_md: zero lmm_object_id\n");
3408                         RETURN(-EINVAL);
3409                 }
3410         }
3411
3412         lsm_size = lov_stripe_md_size(1);
3413         if (lsmp == NULL)
3414                 RETURN(lsm_size);
3415
3416         if (*lsmp != NULL && lmm == NULL) {
3417                 OBD_FREE((*lsmp)->lsm_oinfo[0], sizeof(struct lov_oinfo));
3418                 OBD_FREE(*lsmp, lsm_size);
3419                 *lsmp = NULL;
3420                 RETURN(0);
3421         }
3422
3423         if (*lsmp == NULL) {
3424                 OBD_ALLOC(*lsmp, lsm_size);
3425                 if (*lsmp == NULL)
3426                         RETURN(-ENOMEM);
3427
3428                 OBD_ALLOC((*lsmp)->lsm_oinfo[0], sizeof(struct lov_oinfo));
3429                 if ((*lsmp)->lsm_oinfo[0] == NULL) {
3430                         OBD_FREE(*lsmp, lsm_size);
3431                         RETURN(-ENOMEM);
3432                 }
3433                 loi_init((*lsmp)->lsm_oinfo[0]);
3434         }
3435
3436         if (lmm != NULL) {
3437                 /* XXX zero *lsmp? */
3438                 (*lsmp)->lsm_object_id = le64_to_cpu (lmm->lmm_object_id);
3439                 LASSERT((*lsmp)->lsm_object_id);
3440         }
3441
3442         (*lsmp)->lsm_maxbytes = LUSTRE_STRIPE_MAXBYTES;
3443
3444         RETURN(lsm_size);
3445 }
3446
3447 /* caller must hold fo_create_locks[oa->o_gr] */
3448 static int filter_destroy_precreated(struct obd_export *exp, struct obdo *oa,
3449                                       struct filter_obd *filter)
3450 {
3451         struct obdo doa; /* XXX obdo on stack */
3452         obd_id last, id;
3453         int rc;
3454         ENTRY;
3455
3456         LASSERT(oa);
3457         LASSERT(oa->o_gr != 0);
3458         LASSERT(oa->o_valid & OBD_MD_FLGROUP);
3459         LASSERT(down_trylock(&filter->fo_create_locks[oa->o_gr]) != 0);
3460
3461         memset(&doa, 0, sizeof(doa));
3462
3463         doa.o_valid |= OBD_MD_FLGROUP;
3464         doa.o_gr = oa->o_gr;
3465         doa.o_mode = S_IFREG;
3466
3467         if (!test_bit(doa.o_gr, &filter->fo_destroys_in_progress)) {
3468                 CERROR("%s:["LPU64"] destroys_in_progress already cleared\n",
3469                        exp->exp_obd->obd_name, doa.o_gr);
3470                 RETURN(0);
3471         }
3472
3473         last = filter_last_id(filter, doa.o_gr);
3474
3475         CWARN("%s: deleting orphan objects from "LPU64" to "LPU64"\n",
3476                exp->exp_obd->obd_name, oa->o_id + 1, last);
3477
3478         for (id = last; id > oa->o_id; id--) {
3479                 doa.o_id = id;
3480                 rc = filter_destroy(exp, &doa, NULL, NULL, NULL, NULL);
3481                 if (rc && rc != -ENOENT) /* this is pretty fatal... */
3482                         CEMERG("error destroying precreate objid "LPU64": %d\n",
3483                                id, rc);
3484                 filter_set_last_id(filter, id - 1, doa.o_gr);
3485                 /* update last_id on disk periodically so that if we restart
3486                  * we don't need to re-scan all of the just-deleted objects. */
3487                 if ((id & 511) == 0)
3488                         filter_update_last_objid(exp->exp_obd, doa.o_gr, 0);
3489         }
3490
3491         CDEBUG(D_HA, "%s: after destroy: set last_objids["LPU64"] = "LPU64"\n",
3492                exp->exp_obd->obd_name, doa.o_gr, oa->o_id);
3493
3494         rc = filter_update_last_objid(exp->exp_obd, doa.o_gr, 1);
3495         clear_bit(doa.o_gr, &filter->fo_destroys_in_progress);
3496
3497         RETURN(rc);
3498 }
3499
3500 static int filter_precreate(struct obd_device *obd, struct obdo *oa,
3501                             obd_gr group, int *num);
3502 /* returns a negative error or a nonnegative number of files to create */
3503 static int filter_handle_precreate(struct obd_export *exp, struct obdo *oa,
3504                                    obd_gr group, struct obd_trans_info *oti)
3505 {
3506         struct obd_device *obd = exp->exp_obd;
3507         struct filter_obd *filter = &obd->u.filter;
3508         int diff, rc;
3509         ENTRY;
3510
3511         /* delete orphans request */
3512         if ((oa->o_valid & OBD_MD_FLFLAGS) && (oa->o_flags & OBD_FL_DELORPHAN)){
3513                 if (oti->oti_conn_cnt < exp->exp_conn_cnt) {
3514                         CERROR("%s: dropping old orphan cleanup request\n",
3515                                obd->obd_name);
3516                         RETURN(0);
3517                 }
3518                 /* This causes inflight precreates to abort and drop lock */
3519                 set_bit(group, &filter->fo_destroys_in_progress);
3520                 down(&filter->fo_create_locks[group]);
3521                 if (!test_bit(group, &filter->fo_destroys_in_progress)) {
3522                         CERROR("%s:["LPU64"] destroys_in_progress already cleared\n",
3523                                exp->exp_obd->obd_name, group);
3524                         up(&filter->fo_create_locks[group]);
3525                         RETURN(0);
3526                 }
3527                 diff = oa->o_id - filter_last_id(filter, group);
3528                 CDEBUG(D_HA, "filter_last_id() = "LPU64" -> diff = %d\n",
3529                        filter_last_id(filter, group), diff);
3530
3531                 if (-diff > OST_MAX_PRECREATE) {
3532                         CERROR("%s: ignoring bogus orphan destroy request: "
3533                                "obdid "LPU64" last_id "LPU64"\n", obd->obd_name,
3534                                oa->o_id, filter_last_id(filter, group));
3535                         /* FIXME: should reset precreate_next_id on MDS */
3536                         GOTO(out, rc = -EINVAL);
3537                 }
3538                 if (diff < 0) {
3539                         rc = filter_destroy_precreated(exp, oa, filter);
3540                         if (rc)
3541                                 CERROR("%s: unable to write lastobjid, but "
3542                                        "orphans were deleted\n", obd->obd_name);
3543                         GOTO(out, rc);
3544                 } else {
3545                         /* XXX: Used by MDS for the first time! */
3546                         clear_bit(group, &filter->fo_destroys_in_progress);
3547                 }
3548         } else {
3549                 down(&filter->fo_create_locks[group]);
3550                 if (oti->oti_conn_cnt < exp->exp_conn_cnt) {
3551                         CERROR("%s: dropping old precreate request\n",
3552                                obd->obd_name);
3553                         GOTO(out, rc = 0);
3554                 }
3555                 /* only precreate if group == 0 and o_id is specified */
3556                 if (group < FILTER_GROUP_MDS0 || oa->o_id == 0)
3557                         diff = 1;
3558                 else
3559                         diff = oa->o_id - filter_last_id(filter, group);
3560                 CDEBUG(D_RPCTRACE, "filter_last_id() = "LPU64" -> diff = %d\n",
3561                        filter_last_id(filter, group), diff);
3562
3563                 LASSERTF(diff >= 0,"%s: "LPU64" - "LPU64" = %d\n",obd->obd_name,
3564                          oa->o_id, filter_last_id(filter, group), diff);
3565         }
3566
3567         if (diff > 0) {
3568                 oa->o_id = filter_last_id(&obd->u.filter, group);
3569                 rc = filter_precreate(obd, oa, group, &diff);
3570                 oa->o_id = filter_last_id(&obd->u.filter, group);
3571                 oa->o_gr = group;
3572                 oa->o_valid = OBD_MD_FLID | OBD_MD_FLGROUP;
3573                 GOTO(out, rc);
3574         }
3575         /* else diff == 0 */
3576         GOTO(out, rc = 0);
3577 out:
3578         up(&filter->fo_create_locks[group]);
3579         return rc;
3580 }
3581
3582 static int filter_statfs(struct obd_device *obd, struct obd_statfs *osfs,
3583                          __u64 max_age, __u32 flags)
3584 {
3585         struct filter_obd *filter = &obd->u.filter;
3586         int blockbits = obd->u.obt.obt_sb->s_blocksize_bits;
3587         int rc;
3588         ENTRY;
3589
3590         /* at least try to account for cached pages.  its still racey and
3591          * might be under-reporting if clients haven't announced their
3592          * caches with brw recently */
3593         spin_lock(&obd->obd_osfs_lock);
3594         rc = fsfilt_statfs(obd, obd->u.obt.obt_sb, max_age);
3595         memcpy(osfs, &obd->obd_osfs, sizeof(*osfs));
3596         spin_unlock(&obd->obd_osfs_lock);
3597
3598         CDEBUG(D_SUPER | D_CACHE, "blocks cached "LPU64" granted "LPU64
3599                " pending "LPU64" free "LPU64" avail "LPU64"\n",
3600                filter->fo_tot_dirty, filter->fo_tot_granted,
3601                filter->fo_tot_pending,
3602                osfs->os_bfree << blockbits, osfs->os_bavail << blockbits);
3603
3604         filter_grant_sanity_check(obd, __FUNCTION__);
3605
3606         osfs->os_bavail -= min(osfs->os_bavail, GRANT_FOR_LLOG(obd) +
3607                                ((filter->fo_tot_dirty + filter->fo_tot_pending +
3608                                  osfs->os_bsize - 1) >> blockbits));
3609
3610         /* set EROFS to state field if FS is mounted as RDONLY. The goal is to
3611          * stop creating files on MDS if OST is not good shape to create
3612          * objects.*/
3613         osfs->os_state = (filter->fo_obt.obt_sb->s_flags & MS_RDONLY) ?
3614                 EROFS : 0;
3615         RETURN(rc);
3616 }
3617
3618 static int filter_use_existing_obj(struct obd_device *obd,
3619                                    struct dentry *dchild, void **handle,
3620                                    int *cleanup_phase)
3621 {
3622         struct inode *inode = dchild->d_inode;
3623         struct iattr iattr;
3624         int rc;
3625
3626         if ((inode->i_mode & (S_ISUID | S_ISGID)) == (S_ISUID|S_ISGID))
3627                 return 0;
3628
3629         *handle = fsfilt_start_log(obd, inode, FSFILT_OP_SETATTR, NULL, 1);
3630         if (IS_ERR(*handle))
3631                 return PTR_ERR(*handle);
3632
3633         iattr.ia_valid = ATTR_MODE;
3634         iattr.ia_mode = S_ISUID | S_ISGID |0666;
3635         rc = fsfilt_setattr(obd, dchild, *handle, &iattr, 1);
3636         if (rc == 0)
3637                 *cleanup_phase = 3;
3638
3639         return rc;
3640 }
3641
3642
3643 /* We rely on the fact that only one thread will be creating files in a given
3644  * group at a time, which is why we don't need an atomic filter_get_new_id.
3645  * Even if we had that atomic function, the following race would exist:
3646  *
3647  * thread 1: gets id x from filter_next_id
3648  * thread 2: gets id (x + 1) from filter_next_id
3649  * thread 2: creates object (x + 1)
3650  * thread 1: tries to create object x, gets -ENOSPC
3651  *
3652  * Caller must hold fo_create_locks[group]
3653  */
3654 static int filter_precreate(struct obd_device *obd, struct obdo *oa,
3655                             obd_gr group, int *num)
3656 {
3657         struct dentry *dchild = NULL, *dparent = NULL;
3658         struct filter_obd *filter;
3659         struct obd_statfs *osfs;
3660         int err = 0, rc = 0, recreate_obj = 0, i;
3661         cfs_time_t enough_time = cfs_time_shift(DISK_TIMEOUT/2);
3662         obd_id next_id;
3663         void *handle = NULL;
3664         ENTRY;
3665
3666         filter = &obd->u.filter;
3667
3668         LASSERT(down_trylock(&filter->fo_create_locks[group]) != 0);
3669
3670         OBD_FAIL_TIMEOUT(OBD_FAIL_TGT_DELAY_PRECREATE, obd_timeout / 2);
3671
3672         if ((oa->o_valid & OBD_MD_FLFLAGS) &&
3673             (oa->o_flags & OBD_FL_RECREATE_OBJS)) {
3674                 recreate_obj = 1;
3675         } else {
3676                 OBD_ALLOC(osfs, sizeof(*osfs));
3677                 if (osfs == NULL)
3678                         RETURN(-ENOMEM);
3679                 rc = filter_statfs(obd, osfs, cfs_time_current_64() - HZ, 0);
3680                 if (rc == 0 && osfs->os_bavail < (osfs->os_blocks >> 10)) {
3681                         CDEBUG(D_RPCTRACE,"%s: not enough space for create "
3682                                LPU64"\n", obd->obd_name, osfs->os_bavail <<
3683                                filter->fo_vfsmnt->mnt_sb->s_blocksize_bits);
3684                         *num = 0;
3685                         rc = -ENOSPC;
3686                 }
3687                 OBD_FREE(osfs, sizeof(*osfs));
3688                 if (rc)
3689                         RETURN(rc);
3690         }
3691
3692         CDEBUG(D_RPCTRACE, "%s: precreating %d objects in group "LPU64
3693                " at "LPU64"\n", obd->obd_name, *num, group, oa->o_id);
3694
3695         for (i = 0; i < *num && err == 0; i++) {
3696                 int cleanup_phase = 0;
3697
3698                 if (test_bit(group, &filter->fo_destroys_in_progress)) {
3699                         CWARN("%s: create aborted by destroy\n",
3700                               obd->obd_name);
3701                         rc = -EAGAIN;
3702                         break;
3703                 }
3704
3705                 if (recreate_obj) {
3706                         __u64 last_id;
3707                         next_id = oa->o_id;
3708                         last_id = filter_last_id(filter, group);
3709                         if (next_id > last_id) {
3710                                 CERROR("Error: Trying to recreate obj greater"
3711                                        "than last id "LPD64" > "LPD64"\n",
3712                                        next_id, last_id);
3713                                 GOTO(cleanup, rc = -EINVAL);
3714                         }
3715                 } else
3716                         next_id = filter_last_id(filter, group) + 1;
3717
3718                 dparent = filter_parent_lock(obd, group, next_id);
3719                 if (IS_ERR(dparent))
3720                         GOTO(cleanup, rc = PTR_ERR(dparent));
3721                 cleanup_phase = 1; /* filter_parent_unlock(dparent) */
3722
3723                 dchild = filter_fid2dentry(obd, dparent, group, next_id);
3724                 if (IS_ERR(dchild))
3725                         GOTO(cleanup, rc = PTR_ERR(dchild));
3726                 cleanup_phase = 2;  /* f_dput(dchild) */
3727
3728                 if (dchild->d_inode != NULL) {
3729                         /* This would only happen if lastobjid was bad on disk*/
3730                         /* Could also happen if recreating missing obj but it
3731                          * already exists. */
3732                         if (recreate_obj) {
3733                                 CERROR("%s: recreating existing object %.*s?\n",
3734                                        obd->obd_name, dchild->d_name.len,
3735                                        dchild->d_name.name);
3736                         } else {
3737                                 /* Use these existing objects if they are
3738                                  * zero length. */
3739                                 if (dchild->d_inode->i_size == 0) {
3740                                         rc = filter_use_existing_obj(obd,dchild,
3741                                                       &handle, &cleanup_phase);
3742                                         if (rc == 0)
3743                                                 goto set_last_id;
3744                                         else
3745                                                 GOTO(cleanup, rc);
3746                                 }
3747
3748                                 CERROR("%s: Serious error: objid %.*s already "
3749                                        "exists; is this filesystem corrupt?\n",
3750                                        obd->obd_name, dchild->d_name.len,
3751                                        dchild->d_name.name);
3752                                 LBUG();
3753                         }
3754                         GOTO(cleanup, rc = -EEXIST);
3755                 }
3756
3757                 handle = fsfilt_start_log(obd, dparent->d_inode,
3758                                           FSFILT_OP_CREATE, NULL, 1);
3759                 if (IS_ERR(handle))
3760                         GOTO(cleanup, rc = PTR_ERR(handle));
3761                 cleanup_phase = 3;
3762
3763                 CDEBUG(D_INODE, "%s: filter_precreate(od->o_gr="LPU64
3764                        ",od->o_id="LPU64")\n", obd->obd_name, group,
3765                        next_id);
3766
3767                 /* We mark object SUID+SGID to flag it for accepting UID+GID
3768                  * from client on first write.  Currently the permission bits
3769                  * on the OST are never used, so this is OK. */
3770                 rc = ll_vfs_create(dparent->d_inode, dchild,
3771                                    S_IFREG |  S_ISUID | S_ISGID | 0666, NULL);
3772                 if (rc) {
3773                         CERROR("create failed rc = %d\n", rc);
3774                         GOTO(cleanup, rc);
3775                 }
3776
3777 set_last_id:
3778                 if (!recreate_obj) {
3779                         filter_set_last_id(filter, next_id, group);
3780                         err = filter_update_last_objid(obd, group, 0);
3781                         if (err)
3782                                 CERROR("unable to write lastobjid "
3783                                        "but file created\n");
3784                 }
3785
3786         cleanup:
3787                 switch(cleanup_phase) {
3788                 case 3:
3789                         err = fsfilt_commit(obd, dparent->d_inode, handle, 0);
3790                         if (err) {
3791                                 CERROR("error on commit, err = %d\n", err);
3792                                 if (!rc)
3793                                         rc = err;
3794                         }
3795                 case 2:
3796                         f_dput(dchild);
3797                 case 1:
3798                         filter_parent_unlock(dparent);
3799                 case 0:
3800                         break;
3801                 }
3802
3803                 if (rc)
3804                         break;
3805                 if (time_after(jiffies, enough_time)) {
3806                         CDEBUG(D_RPCTRACE,
3807                                "%s: precreate slow - want %d got %d \n",
3808                                obd->obd_name, *num, i);
3809                         break;
3810                 }
3811         }
3812         *num = i;
3813
3814         CDEBUG(D_RPCTRACE,
3815                "%s: created %d objects for group "LPU64": "LPU64" rc %d\n",
3816                obd->obd_name, i, group, filter->fo_last_objids[group], rc);
3817
3818         RETURN(rc);
3819 }
3820
3821 static int filter_create(struct obd_export *exp, struct obdo *oa,
3822                          struct lov_stripe_md **ea, struct obd_trans_info *oti)
3823 {
3824         struct obd_device *obd = exp->exp_obd;
3825         struct filter_export_data *fed;
3826         struct filter_obd *filter;
3827         struct lvfs_run_ctxt saved;
3828         struct lov_stripe_md *lsm = NULL;
3829         int rc = 0, diff, group = oa->o_gr;
3830         ENTRY;
3831
3832         CDEBUG(D_INODE, "%s: filter_create(od->o_gr="LPU64",od->o_id="
3833                LPU64")\n", obd->obd_name, oa->o_gr, oa->o_id);
3834
3835         if (!(oa->o_valid & OBD_MD_FLGROUP) || group == 0) {
3836                 CERROR("!!! nid %s sent invalid object group %d\n",
3837                         obd_export_nid2str(exp), group);
3838                 RETURN(-EINVAL);
3839         }
3840
3841         fed = &exp->exp_filter_data;
3842         filter = &obd->u.filter;
3843
3844         if (fed->fed_group != group) {
3845                 CERROR("!!! this export (nid %s) used object group %d "
3846                         "earlier; now it's trying to use group %d!  This could "
3847                         "be a bug in the MDS. Please report to "
3848                         "http://bugzilla.lustre.org/\n",
3849                         obd_export_nid2str(exp), fed->fed_group, group);
3850                 RETURN(-ENOTUNIQ);
3851         }
3852
3853         if (ea != NULL) {
3854                 lsm = *ea;
3855                 if (lsm == NULL) {
3856                         rc = obd_alloc_memmd(exp, &lsm);
3857                         if (rc < 0)
3858                                 RETURN(rc);
3859                 }
3860         }
3861
3862         obd = exp->exp_obd;
3863         push_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
3864
3865         if ((oa->o_valid & OBD_MD_FLFLAGS) &&
3866             (oa->o_flags & OBD_FL_RECREATE_OBJS)) {
3867                 if (oa->o_id > filter_last_id(filter, oa->o_gr)) {
3868                         CERROR("recreate objid "LPU64" > last id "LPU64"\n",
3869                                oa->o_id, filter_last_id(filter,
3870                                                         oa->o_gr));
3871                         rc = -EINVAL;
3872                 } else {
3873                         diff = 1;
3874                         down(&filter->fo_create_locks[oa->o_gr]);
3875                         rc = filter_precreate(obd, oa, oa->o_gr, &diff);
3876                         up(&filter->fo_create_locks[oa->o_gr]);
3877                 }
3878         } else {
3879                 rc = filter_handle_precreate(exp, oa, oa->o_gr, oti);
3880         }
3881
3882         pop_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
3883         if (rc && ea != NULL && *ea != lsm) {
3884                 obd_free_memmd(exp, &lsm);
3885         } else if (rc == 0 && ea != NULL) {
3886                 /* XXX LOV STACKING: the lsm that is passed to us from
3887                  * LOV does not have valid lsm_oinfo data structs, so
3888                  * don't go touching that.  This needs to be fixed in a
3889                  * big way. */
3890                 lsm->lsm_object_id = oa->o_id;
3891                 *ea = lsm;
3892         }
3893
3894         RETURN(rc);
3895 }
3896
3897 int filter_destroy(struct obd_export *exp, struct obdo *oa,
3898                    struct lov_stripe_md *md, struct obd_trans_info *oti,
3899                    struct obd_export *md_exp, void *capa)
3900 {
3901         unsigned int qcids[MAXQUOTAS] = {0, 0};
3902         struct obd_device *obd;
3903         struct filter_obd *filter;
3904         struct dentry *dchild = NULL, *dparent = NULL;
3905         struct lvfs_run_ctxt saved;
3906         void *handle = NULL;
3907         struct llog_cookie *fcc = NULL;
3908         int rc, rc2, cleanup_phase = 0, sync = 0;
3909         struct iattr iattr;
3910         ENTRY;
3911
3912         LASSERT(oa->o_valid & OBD_MD_FLGROUP);
3913
3914         rc = filter_auth_capa(exp, NULL, obdo_mdsno(oa),
3915                               (struct lustre_capa *)capa, CAPA_OPC_OSS_DESTROY);
3916         if (rc)
3917                 RETURN(rc);
3918
3919         obd = exp->exp_obd;
3920         filter = &obd->u.filter;
3921
3922         push_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
3923         cleanup_phase = 1;
3924
3925         CDEBUG(D_INODE, "%s: filter_destroy(od->o_gr="LPU64",od->o_id="
3926                LPU64")\n", obd->obd_name, oa->o_gr, oa->o_id);
3927
3928         dchild = filter_fid2dentry(obd, NULL, oa->o_gr, oa->o_id);
3929         if (IS_ERR(dchild))
3930                 GOTO(cleanup, rc = PTR_ERR(dchild));
3931         cleanup_phase = 2;
3932
3933         if (dchild->d_inode == NULL) {
3934                 CDEBUG(D_INODE, "destroying non-existent object "LPU64"\n",
3935                        oa->o_id);
3936                 /* If object already gone, cancel cookie right now */
3937                 if (oa->o_valid & OBD_MD_FLCOOKIE) {
3938                         struct llog_ctxt *ctxt;
3939                         struct obd_llog_group *olg;
3940                         fcc = &oa->o_lcookie;
3941                         olg = filter_find_olg(obd, oa->o_gr);
3942                         if (!olg) {
3943                                CERROR(" %s: can not find olg of group %d\n",
3944                                       obd->obd_name, (int)oa->o_gr);
3945                                GOTO(cleanup, rc = PTR_ERR(olg));
3946                         }
3947                         llog_group_set_export(olg, exp);
3948
3949                         ctxt = llog_group_get_ctxt(olg, fcc->lgc_subsys + 1);
3950                         llog_cancel(ctxt, NULL, 1, fcc, 0);
3951                         llog_ctxt_put(ctxt);
3952                         fcc = NULL; /* we didn't allocate fcc, don't free it */
3953                 }
3954                 GOTO(cleanup, rc = -ENOENT);
3955         }
3956
3957         filter_prepare_destroy(obd, oa->o_id, oa->o_gr);
3958
3959         /* Our MDC connection is established by the MDS to us */
3960         if (oa->o_valid & OBD_MD_FLCOOKIE) {
3961                 OBD_ALLOC(fcc, sizeof(*fcc));
3962                 if (fcc != NULL)
3963                         *fcc = oa->o_lcookie;
3964         }
3965         DQUOT_INIT(dchild->d_inode);
3966
3967         /* we're gonna truncate it first in order to avoid possible deadlock:
3968          *      P1                      P2
3969          * open trasaction      open transaction
3970          * down(i_zombie)       down(i_zombie)
3971          *                      restart transaction
3972          * (see BUG 4180) -bzzz
3973          */
3974         LOCK_INODE_MUTEX(dchild->d_inode);
3975         handle = fsfilt_start_log(obd, dchild->d_inode, FSFILT_OP_SETATTR,
3976                                   NULL, 1);
3977         if (IS_ERR(handle)) {
3978                 UNLOCK_INODE_MUTEX(dchild->d_inode);
3979                 GOTO(cleanup, rc = PTR_ERR(handle));
3980         }
3981
3982         iattr.ia_valid = ATTR_SIZE;
3983         iattr.ia_size = 0;
3984         rc = fsfilt_setattr(obd, dchild, handle, &iattr, 1);
3985         rc2 = fsfilt_commit(obd, dchild->d_inode, handle, 0);
3986         UNLOCK_INODE_MUTEX(dchild->d_inode);
3987         if (rc)
3988                 GOTO(cleanup, rc);
3989         if (rc2)
3990                 GOTO(cleanup, rc = rc2);
3991
3992         /* We don't actually need to lock the parent until we are unlinking
3993          * here, and not while truncating above.  That avoids holding the
3994          * parent lock for a long time during truncate, which can block other
3995          * threads from doing anything to objects in that directory. bug 7171 */
3996         dparent = filter_parent_lock(obd, oa->o_gr, oa->o_id);
3997         if (IS_ERR(dparent))
3998                 GOTO(cleanup, rc = PTR_ERR(dparent));
3999         cleanup_phase = 3; /* filter_parent_unlock */
4000
4001         LOCK_INODE_MUTEX(dchild->d_inode);
4002         handle = fsfilt_start_log(obd, dparent->d_inode,FSFILT_OP_UNLINK,oti,1);
4003         if (IS_ERR(handle)) {
4004                 UNLOCK_INODE_MUTEX(dchild->d_inode);
4005                 GOTO(cleanup, rc = PTR_ERR(handle));
4006         }
4007         cleanup_phase = 4; /* fsfilt_commit */
4008
4009         /* Quota release need uid/gid of inode */
4010         obdo_from_inode(oa, dchild->d_inode, OBD_MD_FLUID|OBD_MD_FLGID);
4011
4012         filter_fmd_drop(exp, oa->o_id, oa->o_gr);
4013
4014         /* this drops dchild->d_inode->i_mutex unconditionally */
4015         rc = filter_destroy_internal(obd, oa->o_id, oa->o_gr, dparent, dchild);
4016
4017         EXIT;
4018 cleanup:
4019         switch(cleanup_phase) {
4020         case 4:
4021                 if (fcc != NULL)
4022                         sync = fsfilt_add_journal_cb(obd, 0, oti ?
4023                                                      oti->oti_handle : handle,
4024                                                      filter_cancel_cookies_cb,
4025                                                      fcc);
4026                 /* If add_journal_cb failed, then filter_finish_transno
4027                  * will commit the handle and we will do a sync
4028                  * on commit. then we call callback directly to free
4029                  * the fcc.
4030                  */
4031                 rc = filter_finish_transno(exp, oti, rc, sync);
4032                 if (sync) {
4033                         filter_cancel_cookies_cb(obd, 0, fcc, rc);
4034                         fcc = NULL;
4035                 }
4036                 rc2 = fsfilt_commit(obd, dparent->d_inode, handle, 0);
4037                 if (rc2) {
4038                         CERROR("error on commit, err = %d\n", rc2);
4039                         if (!rc)
4040                                 rc = rc2;
4041                 } else {
4042                         fcc = NULL;
4043                 }
4044         case 3:
4045                 filter_parent_unlock(dparent);
4046         case 2:
4047                 f_dput(dchild);
4048                 if (fcc != NULL)
4049                         OBD_FREE(fcc, sizeof(*fcc));
4050         case 1:
4051                 pop_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
4052                 break;
4053         default:
4054                 CERROR("invalid cleanup_phase %d\n", cleanup_phase);
4055                 LBUG();
4056         }
4057
4058         /* trigger quota release */
4059         qcids[USRQUOTA] = oa->o_uid;
4060         qcids[GRPQUOTA] = oa->o_gid;
4061         rc2 = lquota_adjust(filter_quota_interface_ref, obd, qcids, NULL, rc,
4062                             FSFILT_OP_UNLINK);
4063         if (rc2)
4064                 CERROR("filter adjust qunit! (rc:%d)\n", rc2);
4065         return rc;
4066 }
4067
4068 /* NB start and end are used for punch, but not truncate */
4069 static int filter_truncate(struct obd_export *exp, struct obd_info *oinfo,
4070                            struct obd_trans_info *oti,
4071                            struct ptlrpc_request_set *rqset)
4072 {
4073         int rc;
4074         ENTRY;
4075
4076         if (oinfo->oi_policy.l_extent.end != OBD_OBJECT_EOF) {
4077                 CERROR("PUNCH not supported, only truncate: end = "LPX64"\n",
4078                        oinfo->oi_policy.l_extent.end);
4079                 RETURN(-EFAULT);
4080         }
4081
4082         CDEBUG(D_INODE, "calling truncate for object "LPU64", valid = "LPX64
4083                ", o_size = "LPD64"\n", oinfo->oi_oa->o_id,
4084                oinfo->oi_oa->o_valid, oinfo->oi_policy.l_extent.start);
4085
4086         oinfo->oi_oa->o_size = oinfo->oi_policy.l_extent.start;
4087         oinfo->oi_oa->o_valid |= OBD_FL_TRUNC;
4088         rc = filter_setattr(exp, oinfo, oti);
4089         oinfo->oi_oa->o_valid &= ~OBD_FL_TRUNC;
4090         RETURN(rc);
4091 }
4092
4093 static int filter_sync(struct obd_export *exp, struct obdo *oa,
4094                        struct lov_stripe_md *lsm, obd_off start, obd_off end,
4095                        void *capa)
4096 {
4097         struct lvfs_run_ctxt saved;
4098         struct filter_obd *filter;
4099         struct dentry *dentry;
4100         int rc, rc2;
4101         ENTRY;
4102
4103         rc = filter_auth_capa(exp, NULL, obdo_mdsno(oa),
4104                               (struct lustre_capa *)capa, CAPA_OPC_OSS_WRITE);
4105         if (rc)
4106                 RETURN(rc);
4107
4108         filter = &exp->exp_obd->u.filter;
4109
4110         /* An objid of zero is taken to mean "sync whole filesystem" */
4111         if (!oa || !(oa->o_valid & OBD_MD_FLID)) {
4112                 rc = fsfilt_sync(exp->exp_obd, filter->fo_obt.obt_sb);
4113                 /* Flush any remaining cancel messages out to the target */
4114                 filter_sync_llogs(exp->exp_obd, exp);
4115                 RETURN(rc);
4116         }
4117
4118         dentry = filter_oa2dentry(exp->exp_obd, oa);
4119         if (IS_ERR(dentry))
4120                 RETURN(PTR_ERR(dentry));
4121
4122         push_ctxt(&saved, &exp->exp_obd->obd_lvfs_ctxt, NULL);
4123
4124         LOCK_INODE_MUTEX(dentry->d_inode);
4125
4126         rc = filemap_fdatawrite(dentry->d_inode->i_mapping);
4127         if (rc == 0) {
4128                 /* just any file to grab fsync method - "file" arg unused */
4129                 struct file *file = filter->fo_rcvd_filp;
4130
4131                 if (file->f_op && file->f_op->fsync)
4132                         rc = file->f_op->fsync(NULL, dentry, 1);
4133
4134                 rc2 = filemap_fdatawait(dentry->d_inode->i_mapping);
4135                 if (!rc)
4136                         rc = rc2;
4137         }
4138         UNLOCK_INODE_MUTEX(dentry->d_inode);
4139
4140         oa->o_valid = OBD_MD_FLID;
4141         obdo_from_inode(oa, dentry->d_inode, FILTER_VALID_FLAGS);
4142
4143         pop_ctxt(&saved, &exp->exp_obd->obd_lvfs_ctxt, NULL);
4144
4145         f_dput(dentry);
4146         RETURN(rc);
4147 }
4148
4149 static int filter_get_info(struct obd_export *exp, __u32 keylen,
4150                            void *key, __u32 *vallen, void *val,
4151                            struct lov_stripe_md *lsm)
4152 {
4153         struct obd_device *obd;
4154         ENTRY;
4155
4156         obd = class_exp2obd(exp);
4157         if (obd == NULL) {
4158                 CDEBUG(D_IOCTL, "invalid client export %p\n", exp);
4159                 RETURN(-EINVAL);
4160         }
4161
4162         if (KEY_IS(KEY_BLOCKSIZE)) {
4163                 __u32 *blocksize = val;
4164                 if (blocksize) {
4165                         if (*vallen < sizeof(*blocksize))
4166                                 RETURN(-EOVERFLOW);
4167                         *blocksize = obd->u.obt.obt_sb->s_blocksize;
4168                 }
4169                 *vallen = sizeof(*blocksize);
4170                 RETURN(0);
4171         }
4172
4173         if (KEY_IS(KEY_BLOCKSIZE_BITS)) {
4174                 __u32 *blocksize_bits = val;
4175                 if (blocksize_bits) {
4176                         if (*vallen < sizeof(*blocksize_bits))
4177                                 RETURN(-EOVERFLOW);
4178                         *blocksize_bits = obd->u.obt.obt_sb->s_blocksize_bits;
4179                 }
4180                 *vallen = sizeof(*blocksize_bits);
4181                 RETURN(0);
4182         }
4183
4184         if (KEY_IS(KEY_LAST_ID)) {
4185                 obd_id *last_id = val;
4186                 /* FIXME: object groups */
4187                 if (last_id) {
4188                         if (*vallen < sizeof(*last_id))
4189                                 RETURN(-EOVERFLOW);
4190                         *last_id = filter_last_id(&obd->u.filter,
4191                                                   exp->exp_filter_data.fed_group);
4192                 }
4193                 *vallen = sizeof(*last_id);
4194                 RETURN(0);
4195         }
4196
4197         if (KEY_IS(KEY_FIEMAP)) {
4198                 struct ll_fiemap_info_key *fm_key = key;
4199                 struct dentry *dentry;
4200                 struct ll_user_fiemap *fiemap = val;
4201                 struct lvfs_run_ctxt saved;
4202                 int rc;
4203
4204                 if (fiemap == NULL) {
4205                         *vallen = fiemap_count_to_size(
4206                                                 fm_key->fiemap.fm_extent_count);
4207                         RETURN(0);
4208                 }
4209
4210                 dentry = __filter_oa2dentry(exp->exp_obd, &fm_key->oa,
4211                                             __FUNCTION__, 1);
4212                 if (IS_ERR(dentry))
4213                         RETURN(PTR_ERR(dentry));
4214
4215                 memcpy(fiemap, &fm_key->fiemap, sizeof(*fiemap));
4216                 push_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
4217                 rc = fsfilt_iocontrol(obd, dentry->d_inode, NULL,
4218                                       EXT3_IOC_FIEMAP, (long)fiemap);
4219                 if (rc) {
4220                         f_dput(dentry);
4221                         RETURN(rc);
4222                 }
4223                 pop_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
4224
4225                 f_dput(dentry);
4226                 RETURN(0);
4227         }
4228
4229         CDEBUG(D_IOCTL, "invalid key\n");
4230         RETURN(-EINVAL);
4231 }
4232
4233 static int filter_set_info_async(struct obd_export *exp, __u32 keylen,
4234                                  void *key, __u32 vallen, void *val,
4235                                  struct ptlrpc_request_set *set)
4236 {
4237         struct obd_device *obd;
4238         struct obd_llog_group *olg;
4239         struct llog_ctxt *ctxt;
4240         int rc = 0, group;
4241         ENTRY;
4242
4243         obd = exp->exp_obd;
4244         if (obd == NULL) {
4245                 CDEBUG(D_IOCTL, "invalid export %p\n", exp);
4246                 RETURN(-EINVAL);
4247         }
4248
4249         if (KEY_IS(KEY_CAPA_KEY)) {
4250                 rc = filter_update_capa_key(obd, (struct lustre_capa_key *)val);
4251                 if (rc)
4252                         CERROR("filter update capability key failed: %d\n", rc);
4253                 RETURN(rc);
4254         }
4255
4256         if (KEY_IS(KEY_REVIMP_UPD)) {
4257                 filter_revimp_update(exp);
4258                 lquota_clearinfo(filter_quota_interface_ref, exp, exp->exp_obd);
4259                 RETURN(0);
4260         }
4261
4262         if (!KEY_IS(KEY_MDS_CONN))
4263                 RETURN(-EINVAL);
4264
4265         LCONSOLE_WARN("%s: received MDS connection from %s\n", obd->obd_name,
4266                       obd_export_nid2str(exp));
4267         obd->u.filter.fo_mdc_conn.cookie = exp->exp_handle.h_cookie;
4268
4269         /* setup llog imports */
4270         LASSERT(val != NULL);
4271         group = (int)(*(__u32 *)val);
4272         LASSERT(group >= FILTER_GROUP_MDS0);
4273
4274         olg = filter_find_create_olg(obd, group);
4275         if (IS_ERR(olg))
4276                 RETURN(PTR_ERR(olg));
4277
4278         llog_group_set_export(olg, exp);
4279
4280         ctxt = llog_group_get_ctxt(olg, LLOG_MDS_OST_REPL_CTXT);
4281         LASSERTF(ctxt != NULL, "ctxt is null\n");
4282
4283         rc = llog_receptor_accept(ctxt, exp->exp_imp_reverse);
4284         llog_ctxt_put(ctxt);
4285
4286         lquota_setinfo(filter_quota_interface_ref, obd, exp);
4287
4288         RETURN(rc);
4289 }
4290
4291 int filter_iocontrol(unsigned int cmd, struct obd_export *exp,
4292                      int len, void *karg, void *uarg)
4293 {
4294         struct obd_device *obd = exp->exp_obd;
4295         struct obd_ioctl_data *data = karg;
4296         int rc = 0;
4297
4298         switch (cmd) {
4299         case OBD_IOC_ABORT_RECOVERY: {
4300                 CERROR("aborting recovery for device %s\n", obd->obd_name);
4301                 target_stop_recovery_thread(obd);
4302                 RETURN(0);
4303         }
4304
4305         case OBD_IOC_SYNC: {
4306                 CDEBUG(D_RPCTRACE, "syncing ost %s\n", obd->obd_name);
4307                 rc = fsfilt_sync(obd, obd->u.obt.obt_sb);
4308                 RETURN(rc);
4309         }
4310
4311         case OBD_IOC_SET_READONLY: {
4312                 void *handle;
4313                 struct super_block *sb = obd->u.obt.obt_sb;
4314                 struct inode *inode = sb->s_root->d_inode;
4315                 BDEVNAME_DECLARE_STORAGE(tmp);
4316                 CERROR("*** setting device %s read-only ***\n",
4317                        ll_bdevname(sb, tmp));
4318
4319                 handle = fsfilt_start(obd, inode, FSFILT_OP_MKNOD, NULL);
4320                 if (!IS_ERR(handle))
4321                         rc = fsfilt_commit(obd, inode, handle, 1);
4322
4323                 CDEBUG(D_HA, "syncing ost %s\n", obd->obd_name);
4324                 rc = fsfilt_sync(obd, obd->u.obt.obt_sb);
4325
4326                 lvfs_set_rdonly(obd, obd->u.obt.obt_sb);
4327                 RETURN(0);
4328         }
4329
4330         case OBD_IOC_CATLOGLIST: {
4331                 rc = llog_catalog_list(obd, 1, data);
4332                 RETURN(rc);
4333         }
4334
4335         case OBD_IOC_LLOG_CANCEL:
4336         case OBD_IOC_LLOG_REMOVE:
4337         case OBD_IOC_LLOG_INFO:
4338         case OBD_IOC_LLOG_PRINT: {
4339                 /* FIXME to be finished */
4340                 RETURN(-EOPNOTSUPP);
4341 /*
4342                 struct llog_ctxt *ctxt = NULL;
4343
4344                 push_ctxt(&saved, &ctxt->loc_exp->exp_obd->obd_lvfs_ctxt, NULL);
4345                 rc = llog_ioctl(ctxt, cmd, data);
4346                 pop_ctxt(&saved, &ctxt->loc_exp->exp_obd->obd_lvfs_ctxt, NULL);
4347
4348                 RETURN(rc);
4349 */
4350         }
4351
4352
4353         default:
4354                 RETURN(-EINVAL);
4355         }
4356         RETURN(0);
4357 }
4358
4359 static int filter_health_check(struct obd_device *obd)
4360 {
4361 #ifdef USE_HEALTH_CHECK_WRITE
4362         struct filter_obd *filter = &obd->u.filter;
4363 #endif
4364         int rc = 0;
4365
4366         /*
4367          * health_check to return 0 on healthy
4368          * and 1 on unhealthy.
4369          */
4370         if (obd->u.obt.obt_sb->s_flags & MS_RDONLY)
4371                 rc = 1;
4372
4373 #ifdef USE_HEALTH_CHECK_WRITE
4374         LASSERT(filter->fo_health_check_filp != NULL);
4375         rc |= !!lvfs_check_io_health(obd, filter->fo_health_check_filp);
4376 #endif
4377         return rc;
4378 }
4379
4380 static struct dentry *filter_lvfs_fid2dentry(__u64 id, __u32 gen, __u64 gr,
4381                                              void *data)
4382 {
4383         return filter_fid2dentry(data, NULL, gr, id);
4384 }
4385
4386 static int filter_process_config(struct obd_device *obd, obd_count len,
4387                                  void *buf)
4388 {
4389         struct lustre_cfg *lcfg = buf;
4390         struct lprocfs_static_vars lvars;
4391         int rc = 0;
4392
4393         switch (lcfg->lcfg_command) {
4394         case LCFG_SPTLRPC_CONF: {
4395                 struct filter_obd       *filter = &obd->u.filter;
4396                 struct sptlrpc_conf_log *log;
4397                 struct sptlrpc_rule_set  tmp_rset;
4398
4399                 log = sptlrpc_conf_log_extract(lcfg);
4400                 if (IS_ERR(log)) {
4401                         rc = PTR_ERR(log);
4402                         break;
4403                 }
4404
4405                 sptlrpc_rule_set_init(&tmp_rset);
4406
4407                 rc = sptlrpc_rule_set_from_log(&tmp_rset, log);
4408                 if (rc) {
4409                         CERROR("obd %s: failed get sptlrpc rules: %d\n",
4410                                obd->obd_name, rc);
4411                         break;
4412                 }
4413
4414                 write_lock(&filter->fo_sptlrpc_lock);
4415                 sptlrpc_rule_set_free(&filter->fo_sptlrpc_rset);
4416                 filter->fo_sptlrpc_rset = tmp_rset;
4417                 write_unlock(&filter->fo_sptlrpc_lock);
4418
4419                 sptlrpc_target_update_exp_flavor(obd, &tmp_rset);
4420                 break;
4421         }
4422         default:
4423                 lprocfs_filter_init_vars(&lvars);
4424
4425                 rc = class_process_proc_param(PARAM_OST, lvars.obd_vars,
4426                                               lcfg, obd);
4427                 if (rc > 0)
4428                         rc = 0;
4429                 break;
4430         }
4431
4432         return rc;
4433 }
4434
4435 static struct lvfs_callback_ops filter_lvfs_ops = {
4436         l_fid2dentry:     filter_lvfs_fid2dentry,
4437 };
4438
4439 static struct obd_ops filter_obd_ops = {
4440         .o_owner          = THIS_MODULE,
4441         .o_get_info       = filter_get_info,
4442         .o_set_info_async = filter_set_info_async,
4443         .o_setup          = filter_setup,
4444         .o_precleanup     = filter_precleanup,
4445         .o_cleanup        = filter_cleanup,
4446         .o_connect        = filter_connect,
4447         .o_reconnect      = filter_reconnect,
4448         .o_disconnect     = filter_disconnect,
4449         .o_ping           = filter_ping,
4450         .o_init_export    = filter_init_export,
4451         .o_destroy_export = filter_destroy_export,
4452         .o_statfs         = filter_statfs,
4453         .o_getattr        = filter_getattr,
4454         .o_unpackmd       = filter_unpackmd,
4455         .o_create         = filter_create,
4456         .o_setattr        = filter_setattr,
4457         .o_destroy        = filter_destroy,
4458         .o_brw            = filter_brw,
4459         .o_punch          = filter_truncate,
4460         .o_sync           = filter_sync,
4461         .o_preprw         = filter_preprw,
4462         .o_commitrw       = filter_commitrw,
4463         .o_llog_init      = filter_llog_init,
4464         .o_llog_connect   = filter_llog_connect,
4465         .o_llog_finish    = filter_llog_finish,
4466         .o_iocontrol      = filter_iocontrol,
4467         .o_health_check   = filter_health_check,
4468         .o_process_config = filter_process_config,
4469 };
4470
4471 quota_interface_t *filter_quota_interface_ref;
4472 extern quota_interface_t filter_quota_interface;
4473
4474 static int __init obdfilter_init(void)
4475 {
4476         struct lprocfs_static_vars lvars;
4477         int rc;
4478
4479         lprocfs_filter_init_vars(&lvars);
4480
4481         request_module("lquota");
4482         OBD_ALLOC(obdfilter_created_scratchpad,
4483                   OBDFILTER_CREATED_SCRATCHPAD_ENTRIES *
4484                   sizeof(*obdfilter_created_scratchpad));
4485         if (obdfilter_created_scratchpad == NULL)
4486                 return -ENOMEM;
4487
4488         ll_fmd_cachep = cfs_mem_cache_create("ll_fmd_cache",
4489                                              sizeof(struct filter_mod_data),
4490                                              0, 0);
4491         if (!ll_fmd_cachep)
4492                 GOTO(out, rc = -ENOMEM);
4493
4494         filter_quota_interface_ref = PORTAL_SYMBOL_GET(filter_quota_interface);
4495         init_obd_quota_ops(filter_quota_interface_ref, &filter_obd_ops);
4496
4497         rc = class_register_type(&filter_obd_ops, NULL, lvars.module_vars,
4498                                  LUSTRE_OST_NAME, NULL);
4499         if (rc) {
4500                 int err;
4501
4502                 err = cfs_mem_cache_destroy(ll_fmd_cachep);
4503                 LASSERTF(err == 0, "Cannot destroy ll_fmd_cachep: rc %d\n",err);
4504                 ll_fmd_cachep = NULL;
4505 out:
4506                 if (filter_quota_interface_ref)
4507                         PORTAL_SYMBOL_PUT(filter_quota_interface);
4508
4509                 OBD_FREE(obdfilter_created_scratchpad,
4510                          OBDFILTER_CREATED_SCRATCHPAD_ENTRIES *
4511                          sizeof(*obdfilter_created_scratchpad));
4512         }
4513
4514         return rc;
4515 }
4516
4517 static void __exit obdfilter_exit(void)
4518 {
4519         if (filter_quota_interface_ref)
4520                 PORTAL_SYMBOL_PUT(filter_quota_interface);
4521
4522         if (ll_fmd_cachep) {
4523                 int rc = cfs_mem_cache_destroy(ll_fmd_cachep);
4524                 LASSERTF(rc == 0, "Cannot destroy ll_fmd_cachep: rc %d\n", rc);
4525                 ll_fmd_cachep = NULL;
4526         }
4527
4528         class_unregister_type(LUSTRE_OST_NAME);
4529         OBD_FREE(obdfilter_created_scratchpad,
4530                  OBDFILTER_CREATED_SCRATCHPAD_ENTRIES *
4531                  sizeof(*obdfilter_created_scratchpad));
4532 }
4533
4534 MODULE_AUTHOR("Sun Microsystems, Inc. <http://www.lustre.org/>");
4535 MODULE_DESCRIPTION("Lustre Filtering OBD driver");
4536 MODULE_LICENSE("GPL");
4537
4538 module_init(obdfilter_init);
4539 module_exit(obdfilter_exit);