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