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