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