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