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