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