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