lustre/obdfilter/filter.c

   1 /* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*-
   2  * vim:expandtab:shiftwidth=8:tabstop=8:
   3  *
   4  *  linux/fs/obdfilter/filter.c
   5  *
   6  *  Copyright (c) 2001-2003 Cluster File Systems, Inc.
   7  *   Author: Peter Braam <braam@clusterfs.com>
   8  *   Author: Andreas Dilger <adilger@clusterfs.com>
   9  *
  10  *   This file is part of Lustre, http://www.lustre.org.
  11  *
  12  *   Lustre is free software; you can redistribute it and/or
  13  *   modify it under the terms of version 2 of the GNU General Public
  14  *   License as published by the Free Software Foundation.
  15  *
  16  *   Lustre is distributed in the hope that it will be useful,
  17  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
  18  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19  *   GNU General Public License for more details.
  20  *
  21  *   You should have received a copy of the GNU General Public License
  22  *   along with Lustre; if not, write to the Free Software
  23  *   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  24  */
  25
  26 /*
  27  * Invariant: Get O/R i_sem for lookup, if needed, before any journal ops
  28  *            (which need to get journal_lock, may block if journal full).
  29  *
  30  * Invariant: Call filter_start_transno() before any journal ops to avoid the
  31  *            same deadlock problem.  We can (and want) to get rid of the
  32  *            transno sem in favour of the dir/inode i_sem to avoid single
  33  *            threaded operation on the OST.
  34  */
  35
  36 #define DEBUG_SUBSYSTEM S_FILTER
  37
  38 #include <linux/config.h>
  39 #include <linux/module.h>
  40 #include <linux/fs.h>
  41 #include <linux/dcache.h>
  42 #include <linux/init.h>
  43 #include <linux/version.h>
  44 #include <linux/jbd.h>
  45 #include <linux/ext3_fs.h>
  46 #if (LINUX_VERSION_CODE > KERNEL_VERSION(2,5,0))
  47 # include <linux/mount.h>
  48 # include <linux/buffer_head.h>
  49 # include <linux/bio.h>
  50 #endif
  51
  52 #include <linux/obd_class.h>
  53 #include <linux/obd_lov.h>
  54 #include <linux/obd_ost.h>
  55 #include <linux/lustre_dlm.h>
  56 #include <linux/lustre_fsfilt.h>
  57 #include <linux/lprocfs_status.h>
  58 #include <linux/lustre_log.h>
  59 #include <linux/lustre_commit_confd.h>
  60 #include <libcfs/list.h>
  61
  62 #include <linux/lustre_smfs.h>
  63 #include "filter_internal.h"
  64
  65 /* Group 0 is no longer a legal group, to catch uninitialized IDs */
  66 #define FILTER_MIN_GROUPS 3
  67
  68 static struct lvfs_callback_ops filter_lvfs_ops;
  69
  70 static int filter_destroy(struct obd_export *exp, struct obdo *oa,
  71                           struct lov_stripe_md *ea, struct obd_trans_info *);
  72 struct obd_llogs *filter_grab_llog_for_group(struct obd_device *,
  73                                              int, struct obd_export *);
  74
  75 static void filter_commit_cb(struct obd_device *obd, __u64 transno,
  76                              void *cb_data, int error)
  77 {
  78         obd_transno_commit_cb(obd, transno, error);
  79 }
  80
  81 /* Assumes caller has already pushed us into the kernel context. */
  82 int filter_finish_transno(struct obd_export *exp, struct obd_trans_info *oti,
  83                           int rc)
  84 {
  85         struct filter_obd *filter = &exp->exp_obd->u.filter;
  86         struct filter_export_data *fed = &exp->exp_filter_data;
  87         struct filter_client_data *fcd = fed->fed_fcd;
  88         __u64 last_rcvd;
  89         loff_t off;
  90         int err, log_pri = D_HA;
  91
  92         /* Propagate error code. */
  93         if (rc)
  94                 RETURN(rc);
  95
  96         if (!exp->exp_obd->obd_replayable || oti == NULL)
  97                 RETURN(rc);
  98
  99         /* we don't allocate new transnos for replayed requests */
 100         if (oti->oti_transno == 0) {
 101                 spin_lock(&filter->fo_translock);
 102                 last_rcvd = le64_to_cpu(filter->fo_fsd->fsd_last_transno) + 1;
 103                 filter->fo_fsd->fsd_last_transno = cpu_to_le64(last_rcvd);
 104                 spin_unlock(&filter->fo_translock);
 105                 oti->oti_transno = last_rcvd;
 106         } else {
 107                 spin_lock(&filter->fo_translock);
 108                 last_rcvd = oti->oti_transno;
 109                 if (last_rcvd > le64_to_cpu(filter->fo_fsd->fsd_last_transno))
 110                         filter->fo_fsd->fsd_last_transno =
 111                                 cpu_to_le64(last_rcvd);
 112                 spin_unlock(&filter->fo_translock);
 113         }
 114
 115         fcd->fcd_last_rcvd = cpu_to_le64(last_rcvd);
 116
 117         /* could get xid from oti, if it's ever needed */
 118         fcd->fcd_last_xid = 0;
 119
 120         off = fed->fed_lr_off;
 121
 122         fsfilt_add_journal_cb(exp->exp_obd, filter->fo_sb, last_rcvd,
 123                               oti->oti_handle, filter_commit_cb, NULL);
 124
 125         err = fsfilt_write_record(exp->exp_obd, filter->fo_rcvd_filp, fcd,
 126                                   sizeof(*fcd), &off, 0);
 127         if (err) {
 128                 log_pri = D_ERROR;
 129                 if (rc == 0)
 130                         rc = err;
 131         }
 132
 133         CDEBUG(log_pri, "wrote trans "LPU64" for client %s at #%d: err = %d\n",
 134                last_rcvd, fcd->fcd_uuid, fed->fed_lr_idx, err);
 135
 136         RETURN(rc);
 137 }
 138
 139 void f_dput(struct dentry *dentry)
 140 {
 141         /* Can't go inside filter_ddelete because it can block */
 142         CDEBUG(D_INODE, "putting %s: %p, count = %d\n",
 143                dentry->d_name.name, dentry, atomic_read(&dentry->d_count) - 1);
 144         LASSERT(atomic_read(&dentry->d_count) > 0);
 145
 146         dput(dentry);
 147 }
 148
 149 /* Add client data to the FILTER.  We use a bitmap to locate a free space
 150  * in the last_rcvd file if cl_idx is -1 (i.e. a new client).
 151  * Otherwise, we have just read the data from the last_rcvd file and
 152  * we know its offset. */
 153 static int filter_client_add(struct obd_device *obd, struct filter_obd *filter,
 154                              struct filter_export_data *fed, int cl_idx)
 155 {
 156         unsigned long *bitmap = filter->fo_last_rcvd_slots;
 157         int new_client = (cl_idx == -1);
 158         ENTRY;
 159
 160         LASSERT(bitmap != NULL);
 161
 162         /* XXX if fcd_uuid were a real obd_uuid, I could use obd_uuid_equals */
 163         if (!strcmp((char *)fed->fed_fcd->fcd_uuid, (char *)obd->obd_uuid.uuid))
 164                 RETURN(0);
 165
 166         /* the bitmap operations can handle cl_idx > sizeof(long) * 8, so
 167          * there's no need for extra complication here
 168          */
 169         if (new_client) {
 170                 cl_idx = find_first_zero_bit(bitmap, FILTER_LR_MAX_CLIENTS);
 171         repeat:
 172                 if (cl_idx >= FILTER_LR_MAX_CLIENTS) {
 173                         CERROR("no client slots - fix FILTER_LR_MAX_CLIENTS\n");
 174                         RETURN(-ENOMEM);
 175                 }
 176                 if (test_and_set_bit(cl_idx, bitmap)) {
 177                         CERROR("FILTER client %d: found bit is set in bitmap\n",
 178                                cl_idx);
 179                         cl_idx = find_next_zero_bit(bitmap,
 180                                                     FILTER_LR_MAX_CLIENTS,
 181                                                     cl_idx);
 182                         goto repeat;
 183                 }
 184         } else {
 185                 if (test_and_set_bit(cl_idx, bitmap)) {
 186                         CERROR("FILTER client %d: bit already set in bitmap!\n",
 187                                cl_idx);
 188                         LBUG();
 189                 }
 190         }
 191
 192         fed->fed_lr_idx = cl_idx;
 193         fed->fed_lr_off = le32_to_cpu(filter->fo_fsd->fsd_client_start) +
 194                 cl_idx * le16_to_cpu(filter->fo_fsd->fsd_client_size);
 195
 196         CDEBUG(D_INFO, "client at index %d (%llu) with UUID '%s' added\n",
 197                fed->fed_lr_idx, fed->fed_lr_off, fed->fed_fcd->fcd_uuid);
 198
 199         if (new_client) {
 200                 struct lvfs_run_ctxt saved;
 201                 loff_t off = fed->fed_lr_off;
 202                 int err;
 203                 void *handle;
 204
 205                 CDEBUG(D_INFO, "writing client fcd at idx %u (%llu) (len %u)\n",
 206                        fed->fed_lr_idx,off,(unsigned int)sizeof(*fed->fed_fcd));
 207
 208                 push_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
 209                 /* Transaction needed to fix bug 1403 */
 210                 handle = fsfilt_start(obd,
 211                                       filter->fo_rcvd_filp->f_dentry->d_inode,
 212                                       FSFILT_OP_SETATTR, NULL);
 213                 if (IS_ERR(handle)) {
 214                         err = PTR_ERR(handle);
 215                         CERROR("unable to start transaction: rc %d\n", err);
 216                 } else {
 217                         err = fsfilt_write_record(obd, filter->fo_rcvd_filp,
 218                                                   fed->fed_fcd,
 219                                                   sizeof(*fed->fed_fcd),
 220                                                   &off, 1);
 221                         fsfilt_commit(obd, filter->fo_sb,
 222                                       filter->fo_rcvd_filp->f_dentry->d_inode,
 223                                       handle, 1);
 224                 }
 225                 pop_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
 226
 227                 if (err) {
 228                         CERROR("error writing %s client idx %u: rc %d\n",
 229                                LAST_RCVD, fed->fed_lr_idx, err);
 230                         RETURN(err);
 231                 }
 232         }
 233         RETURN(0);
 234 }
 235
 236 static int filter_client_free(struct obd_export *exp, int flags)
 237 {
 238         struct filter_export_data *fed = &exp->exp_filter_data;
 239         struct filter_obd *filter = &exp->exp_obd->u.filter;
 240         struct obd_device *obd = exp->exp_obd;
 241         struct filter_client_data zero_fcd;
 242         struct lvfs_run_ctxt saved;
 243         int rc;
 244         loff_t off;
 245         ENTRY;
 246
 247         if (fed->fed_fcd == NULL)
 248                 RETURN(0);
 249
 250         if (flags & OBD_OPT_FAILOVER)
 251                 GOTO(free, 0);
 252
 253         /* XXX if fcd_uuid were a real obd_uuid, I could use obd_uuid_equals */
 254         if (!strcmp((char *)fed->fed_fcd->fcd_uuid, (char *)obd->obd_uuid.uuid))
 255                 GOTO(free, 0);
 256
 257         LASSERT(filter->fo_last_rcvd_slots != NULL);
 258
 259         off = fed->fed_lr_off;
 260
 261         CDEBUG(D_INFO, "freeing client at idx %u (%lld) with UUID '%s'\n",
 262                fed->fed_lr_idx, fed->fed_lr_off, fed->fed_fcd->fcd_uuid);
 263
 264         /* Clear the bit _after_ zeroing out the client so we don't
 265            race with filter_client_add and zero out new clients.*/
 266         if (!test_bit(fed->fed_lr_idx, filter->fo_last_rcvd_slots)) {
 267                 CERROR("FILTER client %u: bit already clear in bitmap!!\n",
 268                        fed->fed_lr_idx);
 269                 LBUG();
 270         }
 271
 272         memset(&zero_fcd, 0, sizeof zero_fcd);
 273         push_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
 274         rc = fsfilt_write_record(obd, filter->fo_rcvd_filp, &zero_fcd,
 275                                  sizeof(zero_fcd), &off, 1);
 276         if (rc == 0)
 277                 /* update server's transno */
 278                 filter_update_server_data(obd, filter->fo_rcvd_filp,
 279                                           filter->fo_fsd, 1);
 280         pop_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
 281
 282         CDEBUG(rc == 0 ? D_INFO : D_ERROR,
 283                "zeroing disconnecting client %s at idx %u (%llu) in %s rc %d\n",
 284                fed->fed_fcd->fcd_uuid, fed->fed_lr_idx, fed->fed_lr_off,
 285                LAST_RCVD, rc);
 286
 287         if (!test_and_clear_bit(fed->fed_lr_idx, filter->fo_last_rcvd_slots)) {
 288                 CERROR("FILTER client %u: bit already clear in bitmap!!\n",
 289                        fed->fed_lr_idx);
 290                 LBUG();
 291         }
 292
 293 free:
 294         OBD_FREE(fed->fed_fcd, sizeof(*fed->fed_fcd));
 295
 296         RETURN(0);
 297 }
 298
 299 static int filter_free_server_data(struct filter_obd *filter)
 300 {
 301         OBD_FREE(filter->fo_fsd, sizeof(*filter->fo_fsd));
 302         filter->fo_fsd = NULL;
 303         OBD_FREE(filter->fo_last_rcvd_slots, FILTER_LR_MAX_CLIENTS/8);
 304         filter->fo_last_rcvd_slots = NULL;
 305         return 0;
 306 }
 307
 308 /* assumes caller is already in kernel ctxt */
 309 int filter_update_server_data(struct obd_device *obd, struct file *filp,
 310                               struct filter_server_data *fsd, int force_sync)
 311 {
 312         loff_t off = 0;
 313         int rc;
 314         ENTRY;
 315
 316         CDEBUG(D_INODE, "server uuid      : %s\n", fsd->fsd_uuid);
 317         CDEBUG(D_INODE, "server last_rcvd : "LPU64"\n",
 318                le64_to_cpu(fsd->fsd_last_transno));
 319         CDEBUG(D_INODE, "server last_mount: "LPU64"\n",
 320                le64_to_cpu(fsd->fsd_mount_count));
 321
 322         rc = fsfilt_write_record(obd, filp, fsd, sizeof(*fsd), &off,force_sync);
 323         if (rc)
 324                 CERROR("error writing filter_server_data: rc = %d\n", rc);
 325
 326         RETURN(rc);
 327 }
 328
 329 int filter_update_last_objid(struct obd_device *obd, obd_gr group,
 330                              int force_sync)
 331 {
 332         struct filter_obd *filter = &obd->u.filter;
 333         __u64 tmp;
 334         loff_t off = 0;
 335         int rc;
 336         ENTRY;
 337
 338         if (filter->fo_last_objid_files[group] == NULL) {
 339                 CERROR("Object group "LPU64" not fully setup; not updating "
 340                        "last_objid\n", group);
 341                 RETURN(0);
 342         }
 343
 344         CDEBUG(D_INODE, "server last_objid for group "LPU64": "LPU64"\n",
 345                group, filter->fo_last_objids[group]);
 346
 347         tmp = cpu_to_le64(filter->fo_last_objids[group]);
 348         rc = fsfilt_write_record(obd, filter->fo_last_objid_files[group],
 349                                  &tmp, sizeof(tmp), &off, force_sync);
 350         if (rc)
 351                 CERROR("error writing group "LPU64" last objid: rc = %d\n",
 352                        group, rc);
 353         RETURN(rc);
 354 }
 355
 356 /* assumes caller has already in kernel ctxt */
 357 static int filter_init_server_data(struct obd_device *obd, struct file * filp)
 358 {
 359         struct filter_obd *filter = &obd->u.filter;
 360         struct filter_server_data *fsd;
 361         struct filter_client_data *fcd = NULL;
 362         struct inode *inode = filp->f_dentry->d_inode;
 363         unsigned long last_rcvd_size = inode->i_size;
 364         __u64 mount_count;
 365         int cl_idx;
 366         loff_t off = 0;
 367         int rc;
 368
 369         /* ensure padding in the struct is the correct size */
 370         LASSERT (offsetof(struct filter_server_data, fsd_padding) +
 371                  sizeof(fsd->fsd_padding) == FILTER_LR_SERVER_SIZE);
 372         LASSERT (offsetof(struct filter_client_data, fcd_padding) +
 373                  sizeof(fcd->fcd_padding) == FILTER_LR_CLIENT_SIZE);
 374
 375         OBD_ALLOC(fsd, sizeof(*fsd));
 376         if (!fsd)
 377                 RETURN(-ENOMEM);
 378         filter->fo_fsd = fsd;
 379
 380         OBD_ALLOC(filter->fo_last_rcvd_slots, FILTER_LR_MAX_CLIENTS/8);
 381         if (filter->fo_last_rcvd_slots == NULL) {
 382                 OBD_FREE(fsd, sizeof(*fsd));
 383                 RETURN(-ENOMEM);
 384         }
 385
 386         if (last_rcvd_size == 0) {
 387                 CWARN("%s: initializing new %s\n", obd->obd_name, LAST_RCVD);
 388
 389                 memcpy(fsd->fsd_uuid, obd->obd_uuid.uuid,sizeof(fsd->fsd_uuid));
 390                 fsd->fsd_last_transno = 0;
 391                 mount_count = fsd->fsd_mount_count = 0;
 392                 fsd->fsd_server_size = cpu_to_le32(FILTER_LR_SERVER_SIZE);
 393                 fsd->fsd_client_start = cpu_to_le32(FILTER_LR_CLIENT_START);
 394                 fsd->fsd_client_size = cpu_to_le16(FILTER_LR_CLIENT_SIZE);
 395                 fsd->fsd_subdir_count = cpu_to_le16(FILTER_SUBDIR_COUNT);
 396                 filter->fo_subdir_count = FILTER_SUBDIR_COUNT;
 397         } else {
 398                 rc = fsfilt_read_record(obd, filp, fsd, sizeof(*fsd), &off);
 399                 if (rc) {
 400                         CDEBUG(D_INODE,"OBD filter: error reading %s: rc %d\n",
 401                                LAST_RCVD, rc);
 402                         GOTO(err_fsd, rc);
 403                 }
 404                 if (strcmp((char *)fsd->fsd_uuid, (char *)obd->obd_uuid.uuid)) {
 405                         CERROR("OBD UUID %s does not match last_rcvd UUID %s\n",
 406                                obd->obd_uuid.uuid, fsd->fsd_uuid);
 407                         GOTO(err_fsd, rc = -EINVAL);
 408                 }
 409                 mount_count = le64_to_cpu(fsd->fsd_mount_count);
 410                 filter->fo_subdir_count = le16_to_cpu(fsd->fsd_subdir_count);
 411         }
 412
 413         if (fsd->fsd_feature_incompat & ~cpu_to_le32(FILTER_INCOMPAT_SUPP)) {
 414                 CERROR("unsupported feature %x\n",
 415                        le32_to_cpu(fsd->fsd_feature_incompat) &
 416                        ~FILTER_INCOMPAT_SUPP);
 417                 GOTO(err_fsd, rc = -EINVAL);
 418         }
 419         if (fsd->fsd_feature_rocompat & ~cpu_to_le32(FILTER_ROCOMPAT_SUPP)) {
 420                 CERROR("read-only feature %x\n",
 421                        le32_to_cpu(fsd->fsd_feature_rocompat) &
 422                        ~FILTER_ROCOMPAT_SUPP);
 423                 /* Do something like remount filesystem read-only */
 424                 GOTO(err_fsd, rc = -EINVAL);
 425         }
 426
 427         CDEBUG(D_INODE, "%s: server last_rcvd : "LPU64"\n",
 428                obd->obd_name, le64_to_cpu(fsd->fsd_last_transno));
 429         CDEBUG(D_INODE, "%s: server mount_count: "LPU64"\n",
 430                obd->obd_name, mount_count + 1);
 431         CDEBUG(D_INODE, "%s: server data size: %u\n",
 432                obd->obd_name, le32_to_cpu(fsd->fsd_server_size));
 433         CDEBUG(D_INODE, "%s: per-client data start: %u\n",
 434                obd->obd_name, le32_to_cpu(fsd->fsd_client_start));
 435         CDEBUG(D_INODE, "%s: per-client data size: %u\n",
 436                obd->obd_name, le32_to_cpu(fsd->fsd_client_size));
 437         CDEBUG(D_INODE, "%s: server subdir_count: %u\n",
 438                obd->obd_name, le16_to_cpu(fsd->fsd_subdir_count));
 439         CDEBUG(D_INODE, "%s: last_rcvd clients: %lu\n", obd->obd_name,
 440                last_rcvd_size <= le32_to_cpu(fsd->fsd_client_start) ? 0 :
 441                (last_rcvd_size - le32_to_cpu(fsd->fsd_client_start)) /
 442                 le16_to_cpu(fsd->fsd_client_size));
 443
 444         if (!obd->obd_replayable) {
 445                 CWARN("%s: recovery support OFF\n", obd->obd_name);
 446                 GOTO(out, rc = 0);
 447         }
 448
 449         for (cl_idx = 0, off = le32_to_cpu(fsd->fsd_client_start);
 450              off < last_rcvd_size; cl_idx++) {
 451                 __u64 last_rcvd;
 452                 struct obd_export *exp;
 453                 struct filter_export_data *fed;
 454
 455                 if (!fcd) {
 456                         OBD_ALLOC(fcd, sizeof(*fcd));
 457                         if (!fcd)
 458                                 GOTO(err_client, rc = -ENOMEM);
 459                 }
 460
 461                 /* Don't assume off is incremented properly by
 462                  * fsfilt_read_record(), in case sizeof(*fcd)
 463                  * isn't the same as fsd->fsd_client_size.  */
 464                 off = le32_to_cpu(fsd->fsd_client_start) +
 465                         cl_idx * le16_to_cpu(fsd->fsd_client_size);
 466                 rc = fsfilt_read_record(obd, filp, fcd, sizeof(*fcd), &off);
 467                 if (rc) {
 468                         CERROR("error reading FILT %s idx %d off %llu: rc %d\n",
 469                                LAST_RCVD, cl_idx, off, rc);
 470                         break; /* read error shouldn't cause startup to fail */
 471                 }
 472
 473                 if (fcd->fcd_uuid[0] == '\0') {
 474                         CDEBUG(D_INFO, "skipping zeroed client at offset %d\n",
 475                                cl_idx);
 476                         continue;
 477                 }
 478
 479                 last_rcvd = le64_to_cpu(fcd->fcd_last_rcvd);
 480
 481                 /* These exports are cleaned up by filter_disconnect(), so they
 482                  * need to be set up like real exports as filter_connect() does.
 483                  */
 484                 exp = class_new_export(obd);
 485                 CDEBUG(D_HA, "RCVRNG CLIENT uuid: %s idx: %d lr: "LPU64" "
 486                        "srv lr: "LPU64" fcd_group %d \n", fcd->fcd_uuid, cl_idx,
 487                        last_rcvd, le64_to_cpu(fsd->fsd_last_transno),
 488                        le32_to_cpu(fcd->fcd_group));
 489                 if (exp == NULL)
 490                         GOTO(err_client, rc = -ENOMEM);
 491
 492                 memcpy(&exp->exp_client_uuid.uuid, fcd->fcd_uuid,
 493                        sizeof exp->exp_client_uuid.uuid);
 494                 fed = &exp->exp_filter_data;
 495                 fed->fed_fcd = fcd;
 496                 fed->fed_group = le32_to_cpu(fcd->fcd_group);
 497                 filter_client_add(obd, filter, fed, cl_idx);
 498                 /* create helper if export init gets more complex */
 499                 spin_lock_init(&fed->fed_lock);
 500
 501                 fcd = NULL;
 502                 exp->exp_req_replay_needed = 1;
 503                 exp->exp_lock_replay_needed = 1;
 504                 atomic_inc(&obd->obd_req_replay_clients);
 505                 atomic_inc(&obd->obd_lock_replay_clients);
 506                 obd->obd_recoverable_clients++;
 507                 obd->obd_max_recoverable_clients++;
 508                 class_export_put(exp);
 509
 510                 CDEBUG(D_OTHER, "client at idx %d has last_rcvd = "LPU64"\n",
 511                        cl_idx, last_rcvd);
 512
 513                 if (last_rcvd > le64_to_cpu(fsd->fsd_last_transno))
 514                         fsd->fsd_last_transno = cpu_to_le64(last_rcvd);
 515
 516         }
 517
 518         obd->obd_last_committed = le64_to_cpu(fsd->fsd_last_transno);
 519
 520         if (obd->obd_recoverable_clients) {
 521                 CWARN("RECOVERY: service %s, %d recoverable clients, "
 522                       "last_transno "LPU64"\n", obd->obd_name,
 523                       obd->obd_recoverable_clients,
 524                       le64_to_cpu(fsd->fsd_last_transno));
 525                 obd->obd_next_recovery_transno = obd->obd_last_committed + 1;
 526                 target_start_recovery_thread(obd, ost_handle);
 527         }
 528
 529         if (fcd)
 530                 OBD_FREE(fcd, sizeof(*fcd));
 531
 532 out:
 533         filter->fo_mount_count = mount_count + 1;
 534         fsd->fsd_mount_count = cpu_to_le64(filter->fo_mount_count);
 535
 536         /* save it, so mount count and last_transno is current */
 537         rc = filter_update_server_data(obd, filp, filter->fo_fsd, 1);
 538         if (rc)
 539                 GOTO(err_client, rc);
 540         RETURN(0);
 541
 542 err_client:
 543         class_disconnect_exports(obd, 0);
 544 err_fsd:
 545         filter_free_server_data(filter);
 546         RETURN(rc);
 547 }
 548
 549 static int filter_cleanup_groups(struct obd_device *obd)
 550 {
 551         struct filter_obd *filter = &obd->u.filter;
 552         struct dentry *dentry;
 553         int i, k;
 554         ENTRY;
 555
 556         for (i = 0; i < filter->fo_group_count; i++) {
 557                 if (filter->fo_subdirs != NULL) {
 558                         for (k = 0; k < filter->fo_subdir_count; k++) {
 559                                 dentry = filter->fo_subdirs[i].dentry[k];
 560                                 if (dentry == NULL)
 561                                         continue;
 562                                 f_dput(dentry);
 563                                 filter->fo_subdirs[i].dentry[k] = NULL;
 564                         }
 565                 }
 566                 if (filter->fo_last_objid_files[i] != NULL) {
 567                         filp_close(filter->fo_last_objid_files[i], 0);
 568                         filter->fo_last_objid_files[i] = NULL;
 569                 }
 570                 if (filter->fo_groups[i] != NULL) {
 571                         dput(filter->fo_groups[i]);
 572                         filter->fo_groups[i] = NULL;
 573                 }
 574         }
 575         if (filter->fo_subdirs != NULL)
 576                 OBD_FREE(filter->fo_subdirs,
 577                          filter->fo_group_count * sizeof(*filter->fo_subdirs));
 578         if (filter->fo_groups != NULL)
 579                 OBD_FREE(filter->fo_groups,
 580                          filter->fo_group_count * sizeof(*filter->fo_groups));
 581         if (filter->fo_last_objids != NULL)
 582                 OBD_FREE(filter->fo_last_objids,
 583                          filter->fo_group_count * sizeof(__u64));
 584         if (filter->fo_last_objid_files != NULL)
 585                 OBD_FREE(filter->fo_last_objid_files,
 586                          filter->fo_group_count * sizeof(struct file *));
 587         f_dput(filter->fo_dentry_O);
 588         RETURN(0);
 589 }
 590
 591 static int filter_update_last_group(struct obd_device *obd, int group)
 592 {
 593         struct filter_obd *filter = &obd->u.filter;
 594         struct file *filp = NULL;
 595         int last_group = 0, rc;
 596         loff_t off = 0;
 597         ENTRY;
 598
 599         if (group <= filter->fo_committed_group)
 600                 RETURN(0);
 601
 602         filp = filp_open("LAST_GROUP", O_RDWR, 0700);
 603         if (IS_ERR(filp)) {
 604                 rc = PTR_ERR(filp);
 605                 filp = NULL;
 606                 CERROR("cannot open LAST_GROUP: rc = %d\n", rc);
 607                 GOTO(cleanup, rc);
 608         }
 609
 610         rc = fsfilt_read_record(obd, filp, &last_group, sizeof(__u32), &off);
 611         if (rc) {
 612                 CDEBUG(D_INODE, "error reading LAST_GROUP: rc %d\n",rc);
 613                 GOTO(cleanup, rc);
 614         }
 615         LASSERT(off == 0 || last_group >= FILTER_MIN_GROUPS);
 616         CDEBUG(D_INODE, "%s: previous %d, new %d\n",
 617                obd->obd_name, last_group, group);
 618
 619         off = 0;
 620         last_group = group;
 621         /* must be sync: bXXXX */
 622         rc = fsfilt_write_record(obd, filp, &last_group, sizeof(__u32), &off, 1);
 623         if (rc) {
 624                 CDEBUG(D_INODE, "error updating LAST_GROUP: rc %d\n", rc);
 625                 GOTO(cleanup, rc);
 626         }
 627
 628         filter->fo_committed_group = group;
 629 cleanup:
 630         if (filp)
 631                 filp_close(filp, 0);
 632         RETURN(rc);
 633 }
 634
 635 static int filter_read_group_internal(struct obd_device *obd, int group,
 636                                       int create)
 637 {
 638         struct filter_obd *filter = &obd->u.filter;
 639         __u64 *new_objids = NULL;
 640         struct filter_subdirs *new_subdirs = NULL, *tmp_subdirs = NULL;
 641         struct dentry **new_groups = NULL;
 642         struct file **new_files = NULL;
 643         struct dentry *dentry;
 644         struct file *filp;
 645         int old_count = filter->fo_group_count, rc, stage = 0, i;
 646         char name[25];
 647         __u64 last_objid;
 648         loff_t off = 0;
 649
 650         snprintf(name, 24, "%d", group);
 651         name[24] = '\0';
 652
 653         if (!create) {
 654                 dentry = ll_lookup_one_len(name, filter->fo_dentry_O,
 655                                            strlen(name));
 656                 if (IS_ERR(dentry)) {
 657                         CERROR("Cannot lookup expected object group %d: %ld\n",
 658                                group, PTR_ERR(dentry));
 659                         RETURN(PTR_ERR(dentry));
 660                 }
 661         } else {
 662                 dentry = simple_mkdir(filter->fo_dentry_O, name, 0700, 1);
 663                 if (IS_ERR(dentry)) {
 664                         CERROR("cannot lookup/create O/%s: rc = %ld\n", name,
 665                                PTR_ERR(dentry));
 666                         RETURN(PTR_ERR(dentry));
 667                 }
 668         }
 669         stage = 1;
 670
 671         snprintf(name, 24, "O/%d/LAST_ID", group);
 672         name[24] = '\0';
 673         filp = filp_open(name, O_CREAT | O_RDWR, 0700);
 674         if (IS_ERR(filp)) {
 675                 CERROR("cannot create %s: rc = %ld\n", name, PTR_ERR(filp));
 676                 GOTO(cleanup, rc = PTR_ERR(filp));
 677         }
 678         stage = 2;
 679
 680         rc = fsfilt_read_record(obd, filp, &last_objid, sizeof(__u64), &off);
 681         if (rc) {
 682                 CDEBUG(D_INODE, "error reading %s: rc %d\n", name, rc);
 683                 GOTO(cleanup, rc);
 684         }
 685
 686         if (filter->fo_subdir_count) {
 687                 OBD_ALLOC(tmp_subdirs, sizeof(*tmp_subdirs));
 688                 if (tmp_subdirs == NULL)
 689                         GOTO(cleanup, rc = -ENOMEM);
 690                 stage = 3;
 691
 692                 for (i = 0; i < filter->fo_subdir_count; i++) {
 693                         char dir[20];
 694                         snprintf(dir, sizeof(dir), "d%u", i);
 695
 696                         tmp_subdirs->dentry[i] =
 697                                 simple_mkdir(dentry, dir, 0700, 1);
 698                         if (IS_ERR(tmp_subdirs->dentry[i])) {
 699                                 rc = PTR_ERR(tmp_subdirs->dentry[i]);
 700                                 CERROR("can't lookup/create O/%d/%s: rc = %d\n",
 701                                        group, dir, rc);
 702                                 GOTO(cleanup, rc);
 703                         }
 704                         CDEBUG(D_INODE, "got/created O/%d/%s: %p\n", group, dir,
 705                                tmp_subdirs->dentry[i]);
 706                 }
 707         }
 708
 709         /* 'group' is an index; we need an array of length 'group + 1' */
 710         if (group + 1 > old_count) {
 711                 int len = group + 1;
 712                 OBD_ALLOC(new_objids, len * sizeof(*new_objids));
 713                 OBD_ALLOC(new_subdirs, len * sizeof(*new_subdirs));
 714                 OBD_ALLOC(new_groups, len * sizeof(*new_groups));
 715                 OBD_ALLOC(new_files, len * sizeof(*new_files));
 716                 stage = 4;
 717                 if (new_objids == NULL || new_subdirs == NULL ||
 718                     new_groups == NULL || new_files == NULL)
 719                         GOTO(cleanup, rc = -ENOMEM);
 720
 721                 memcpy(new_objids, filter->fo_last_objids,
 722                        old_count * sizeof(*new_objids));
 723                 memcpy(new_subdirs, filter->fo_subdirs,
 724                        old_count * sizeof(*new_subdirs));
 725                 memcpy(new_groups, filter->fo_groups,
 726                        old_count * sizeof(*new_groups));
 727                 memcpy(new_files, filter->fo_last_objid_files,
 728                        old_count * sizeof(*new_files));
 729
 730                 if (old_count) {
 731                         OBD_FREE(filter->fo_last_objids,
 732                                  old_count * sizeof(*new_objids));
 733                         OBD_FREE(filter->fo_subdirs,
 734                                  old_count * sizeof(*new_subdirs));
 735                         OBD_FREE(filter->fo_groups,
 736                                  old_count * sizeof(*new_groups));
 737                         OBD_FREE(filter->fo_last_objid_files,
 738                                  old_count * sizeof(*new_files));
 739                 }
 740                 filter->fo_last_objids = new_objids;
 741                 filter->fo_subdirs = new_subdirs;
 742                 filter->fo_groups = new_groups;
 743                 filter->fo_last_objid_files = new_files;
 744                 filter->fo_group_count = len;
 745         }
 746
 747         filter->fo_groups[group] = dentry;
 748         filter->fo_last_objid_files[group] = filp;
 749         if (filter->fo_subdir_count) {
 750                 filter->fo_subdirs[group] = *tmp_subdirs;
 751                 OBD_FREE(tmp_subdirs, sizeof(*tmp_subdirs));
 752         }
 753
 754         filter_update_last_group(obd, group);
 755
 756         if (filp->f_dentry->d_inode->i_size == 0) {
 757                 filter->fo_last_objids[group] = FILTER_INIT_OBJID;
 758                 RETURN(0);
 759         }
 760
 761         filter->fo_last_objids[group] = le64_to_cpu(last_objid);
 762         CDEBUG(D_INODE, "%s: server last_objid group %d: "LPU64"\n",
 763                obd->obd_name, group, last_objid);
 764         RETURN(0);
 765  cleanup:
 766         switch (stage) {
 767         case 4:
 768                 if (new_objids != NULL)
 769                         OBD_FREE(new_objids, group * sizeof(*new_objids));
 770                 if (new_subdirs != NULL)
 771                         OBD_FREE(new_subdirs, group * sizeof(*new_subdirs));
 772                 if (new_groups != NULL)
 773                         OBD_FREE(new_groups, group * sizeof(*new_groups));
 774                 if (new_files != NULL)
 775                         OBD_FREE(new_files, group * sizeof(*new_files));
 776         case 3:
 777                 if (filter->fo_subdir_count) {
 778                         for (i = 0; i < filter->fo_subdir_count; i++) {
 779                                 if (tmp_subdirs->dentry[i] != NULL)
 780                                         dput(tmp_subdirs->dentry[i]);
 781                         }
 782                         OBD_FREE(tmp_subdirs, sizeof(*tmp_subdirs));
 783                 }
 784         case 2:
 785                 filp_close(filp, 0);
 786         case 1:
 787                 dput(dentry);
 788         }
 789         RETURN(rc);
 790 }
 791
 792 static int filter_read_groups(struct obd_device *obd, int last_group,
 793                               int create)
 794 {
 795         struct filter_obd *filter = &obd->u.filter;
 796         int old_count, group, rc = 0;
 797
 798         down(&filter->fo_init_lock);
 799         old_count = filter->fo_group_count;
 800         for (group = old_count; group <= last_group; group++) {
 801                 if (group == 0)
 802                         continue; /* no group zero */
 803
 804                 rc = filter_read_group_internal(obd, group, create);
 805                 if (rc != 0)
 806                         break;
 807         }
 808         up(&filter->fo_init_lock);
 809         return rc;
 810 }
 811
 812 static int filter_prep_groups(struct obd_device *obd)
 813 {
 814         struct filter_obd *filter = &obd->u.filter;
 815         struct dentry *dentry, *O_dentry;
 816         int rc = 0, cleanup_phase = 0;
 817         struct file *filp = NULL;
 818         int last_group;
 819         loff_t off = 0;
 820         ENTRY;
 821
 822         O_dentry = simple_mkdir(current->fs->pwd, "O", 0700, 1);
 823         CDEBUG(D_INODE, "got/created O: %p\n", O_dentry);
 824         if (IS_ERR(O_dentry)) {
 825                 rc = PTR_ERR(O_dentry);
 826                 CERROR("cannot open/create O: rc = %d\n", rc);
 827                 GOTO(cleanup, rc);
 828         }
 829         filter->fo_dentry_O = O_dentry;
 830         cleanup_phase = 1; /* O_dentry */
 831
 832         /* Lookup "R" to tell if we're on an old OST FS and need to convert
 833          * from O/R/<dir>/<objid> to O/0/<dir>/<objid>.  This can be removed
 834          * some time post 1.0 when all old-style OSTs have converted along
 835          * with the init_objid hack. */
 836         dentry = ll_lookup_one_len("R", O_dentry, 1);
 837         if (IS_ERR(dentry))
 838                 GOTO(cleanup, rc = PTR_ERR(dentry));
 839         if (dentry->d_inode && S_ISDIR(dentry->d_inode->i_mode)) {
 840                 struct dentry *O0_dentry = lookup_one_len("0", O_dentry, 1);
 841                 ENTRY;
 842
 843                 CWARN("converting OST to new object layout\n");
 844                 if (IS_ERR(O0_dentry)) {
 845                         rc = PTR_ERR(O0_dentry);
 846                         CERROR("error looking up O/0: rc %d\n", rc);
 847                         GOTO(cleanup_R, rc);
 848                 }
 849
 850                 if (O0_dentry->d_inode) {
 851                         CERROR("Both O/R and O/0 exist. Fix manually.\n");
 852                         GOTO(cleanup_O0, rc = -EEXIST);
 853                 }
 854
 855                 down(&O_dentry->d_inode->i_sem);
 856                 rc = vfs_rename(O_dentry->d_inode, dentry,
 857                                 O_dentry->d_inode, O0_dentry);
 858                 up(&O_dentry->d_inode->i_sem);
 859
 860                 if (rc) {
 861                         CERROR("error renaming O/R to O/0: rc %d\n", rc);
 862                         GOTO(cleanup_O0, rc);
 863                 }
 864                 filter->fo_fsd->fsd_feature_incompat |=
 865                         cpu_to_le32(FILTER_INCOMPAT_GROUPS);
 866                 rc = filter_update_server_data(obd, filter->fo_rcvd_filp,
 867                                                filter->fo_fsd, 1);
 868                 GOTO(cleanup_O0, rc);
 869
 870         cleanup_O0:
 871                 f_dput(O0_dentry);
 872         cleanup_R:
 873                 f_dput(dentry);
 874                 if (rc)
 875                         GOTO(cleanup, rc);
 876         } else {
 877                 f_dput(dentry);
 878         }
 879
 880         cleanup_phase = 2; /* groups */
 881
 882         /* we have to initialize all groups before first connections from
 883          * clients because they may send create/destroy for any group -bzzz */
 884         filp = filp_open("LAST_GROUP", O_CREAT | O_RDWR, 0700);
 885         if (IS_ERR(filp)) {
 886                 CERROR("cannot create LAST_GROUP: rc = %ld\n", PTR_ERR(filp));
 887                 GOTO(cleanup, rc = PTR_ERR(filp));
 888         }
 889         cleanup_phase = 3; /* filp */
 890
 891         rc = fsfilt_read_record(obd, filp, &last_group, sizeof(__u32), &off);
 892         if (rc) {
 893                 CDEBUG(D_INODE, "error reading LAST_GROUP: rc %d\n", rc);
 894                 GOTO(cleanup, rc);
 895         }
 896         if (off == 0) {
 897                 last_group = FILTER_MIN_GROUPS;
 898         } else {
 899                 LASSERT(last_group >= FILTER_MIN_GROUPS);
 900         }
 901
 902         CWARN("%s: initialize groups [%d,%d]\n", obd->obd_name,
 903               FILTER_MIN_GROUPS, last_group);
 904         filter->fo_committed_group = last_group;
 905         rc = filter_read_groups(obd, last_group, 1);
 906         if (rc)
 907                 GOTO(cleanup, rc);
 908
 909         filp_close(filp, 0);
 910         RETURN(0);
 911
 912  cleanup:
 913         switch (cleanup_phase) {
 914         case 3:
 915                 filp_close(filp, 0);
 916         case 2:
 917                 filter_cleanup_groups(obd);
 918         case 1:
 919                 f_dput(filter->fo_dentry_O);
 920                 filter->fo_dentry_O = NULL;
 921         default:
 922                 break;
 923         }
 924         return rc;
 925 }
 926
 927 /* setup the object store with correct subdirectories */
 928 static int filter_prep(struct obd_device *obd)
 929 {
 930         struct lvfs_run_ctxt saved;
 931         struct filter_obd *filter = &obd->u.filter;
 932         struct file *file;
 933         struct inode *inode;
 934         int rc = 0;
 935         ENTRY;
 936
 937         push_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
 938         file = filp_open(LAST_RCVD, O_RDWR | O_CREAT | O_LARGEFILE, 0700);
 939         if (!file || IS_ERR(file)) {
 940                 rc = PTR_ERR(file);
 941                 CERROR("OBD filter: cannot open/create %s: rc = %d\n",
 942                        LAST_RCVD, rc);
 943                 GOTO(out, rc);
 944         }
 945
 946         if (!S_ISREG(file->f_dentry->d_inode->i_mode)) {
 947                 CERROR("%s is not a regular file!: mode = %o\n", LAST_RCVD,
 948                        file->f_dentry->d_inode->i_mode);
 949                 GOTO(err_filp, rc = -ENOENT);
 950         }
 951
 952         /* steal operations */
 953         inode = file->f_dentry->d_inode;
 954         filter->fo_fop = file->f_op;
 955         filter->fo_iop = inode->i_op;
 956         filter->fo_aops = inode->i_mapping->a_ops;
 957
 958         rc = filter_init_server_data(obd, file);
 959         if (rc) {
 960                 CERROR("cannot read %s: rc = %d\n", LAST_RCVD, rc);
 961                 GOTO(err_filp, rc);
 962         }
 963         filter->fo_rcvd_filp = file;
 964
 965         rc = filter_prep_groups(obd);
 966         if (rc)
 967                 GOTO(err_server_data, rc);
 968
 969  out:
 970         pop_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
 971
 972         return(rc);
 973
 974  err_server_data:
 975         //class_disconnect_exports(obd, 0);
 976         filter_free_server_data(filter);
 977  err_filp:
 978         if (filp_close(file, 0))
 979                 CERROR("can't close %s after error\n", LAST_RCVD);
 980         filter->fo_rcvd_filp = NULL;
 981         goto out;
 982 }
 983
 984 /* cleanup the filter: write last used object id to status file */
 985 static void filter_post(struct obd_device *obd)
 986 {
 987         struct lvfs_run_ctxt saved;
 988         struct filter_obd *filter = &obd->u.filter;
 989         int rc, i;
 990
 991         /* XXX: filter_update_lastobjid used to call fsync_dev.  It might be
 992          * best to start a transaction with h_sync, because we removed this
 993          * from lastobjid */
 994
 995         push_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
 996         rc = filter_update_server_data(obd, filter->fo_rcvd_filp,
 997                                        filter->fo_fsd, 0);
 998         if (rc)
 999                 CERROR("error writing server data: rc = %d\n", rc);
1000
1001         for (i = 1; i < filter->fo_group_count; i++) {
1002                 rc = filter_update_last_objid(obd, i,
1003                                              (i == filter->fo_group_count - 1));
1004                 if (rc)
1005                         CERROR("error writing group %d lastobjid: rc = %d\n",
1006                                i, rc);
1007         }
1008
1009         rc = filp_close(filter->fo_rcvd_filp, 0);
1010         filter->fo_rcvd_filp = NULL;
1011         if (rc)
1012                 CERROR("error closing %s: rc = %d\n", LAST_RCVD, rc);
1013
1014         filter_cleanup_groups(obd);
1015         filter_free_server_data(filter);
1016         pop_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
1017 }
1018
1019 static void filter_set_last_id(struct filter_obd *filter, int group, obd_id id)
1020 {
1021         LASSERT(filter->fo_fsd != NULL);
1022         LASSERT(group > 0);
1023         LASSERT(group < filter->fo_group_count);
1024
1025         spin_lock(&filter->fo_objidlock);
1026         filter->fo_last_objids[group] = id;
1027         spin_unlock(&filter->fo_objidlock);
1028 }
1029
1030 __u64 filter_last_id(struct filter_obd *filter, int group)
1031 {
1032         obd_id id;
1033         LASSERT(filter->fo_fsd != NULL);
1034         LASSERT(group > 0);
1035         LASSERT(group < filter->fo_group_count);
1036
1037         spin_lock(&filter->fo_objidlock);
1038         id = filter->fo_last_objids[group];
1039         spin_unlock(&filter->fo_objidlock);
1040
1041         return id;
1042 }
1043
1044 /* direct cut-n-paste of mds_blocking_ast() */
1045 static int filter_blocking_ast(struct ldlm_lock *lock,
1046                                struct ldlm_lock_desc *desc,
1047                                void *data, int flag)
1048 {
1049         int do_ast;
1050         ENTRY;
1051
1052         if (flag == LDLM_CB_CANCELING) {
1053                 /* Don't need to do anything here. */
1054                 RETURN(0);
1055         }
1056
1057         /* XXX layering violation!  -phil */
1058         l_lock(&lock->l_resource->lr_namespace->ns_lock);
1059         /* Get this: if filter_blocking_ast is racing with ldlm_intent_policy,
1060          * such that filter_blocking_ast is called just before l_i_p takes the
1061          * ns_lock, then by the time we get the lock, we might not be the
1062          * correct blocking function anymore.  So check, and return early, if
1063          * so. */
1064         if (lock->l_blocking_ast != filter_blocking_ast) {
1065                 l_unlock(&lock->l_resource->lr_namespace->ns_lock);
1066                 RETURN(0);
1067         }
1068
1069         lock->l_flags |= LDLM_FL_CBPENDING;
1070         do_ast = (!lock->l_readers && !lock->l_writers);
1071         l_unlock(&lock->l_resource->lr_namespace->ns_lock);
1072
1073         if (do_ast) {
1074                 struct lustre_handle lockh;
1075                 int rc;
1076
1077                 LDLM_DEBUG(lock, "already unused, calling ldlm_cli_cancel");
1078                 ldlm_lock2handle(lock, &lockh);
1079                 rc = ldlm_cli_cancel(&lockh);
1080                 if (rc < 0)
1081                         CERROR("ldlm_cli_cancel: %d\n", rc);
1082         } else {
1083                 LDLM_DEBUG(lock, "Lock still has references, will be "
1084                            "cancelled later");
1085         }
1086         RETURN(0);
1087 }
1088
1089 extern void *lock_dir(struct inode *dir, struct qstr *name);
1090 extern void unlock_dir(struct inode *dir, void *lock);
1091
1092 static void *filter_lock_dentry(struct obd_device *obd,
1093                                 struct dentry *dparent,
1094                                 obd_id id)
1095 {
1096 #ifdef S_PDIROPS
1097         struct qstr qstr;
1098         char name[32];
1099         int len;
1100
1101         len = sprintf(name, LPU64, id);
1102         qstr_assign(&qstr, (char *)name, len);
1103         return lock_dir(dparent->d_inode, &qstr);
1104 #else
1105         down(&dparent->d_inode->i_sem);
1106 #endif
1107         return 0;
1108 }
1109
1110 /* We never dget the object parent, so DON'T dput it either */
1111 static void filter_parent_unlock(struct dentry *dparent, void *lock)
1112 {
1113 #ifdef S_PDIROPS
1114         LASSERT(lock != NULL);
1115         unlock_dir(dparent->d_inode, lock);
1116 #else
1117         up(&dparent->d_inode->i_sem);
1118 #endif
1119 }
1120
1121 /* We never dget the object parent, so DON'T dput it either */
1122 struct dentry *filter_parent(struct obd_device *obd, obd_gr group, obd_id objid)
1123 {
1124         struct filter_obd *filter = &obd->u.filter;
1125         LASSERT(group < filter->fo_group_count);
1126         LASSERT(group > 0);
1127
1128         if (filter->fo_subdir_count == 0)
1129                 return filter->fo_groups[group];
1130
1131         return filter->fo_subdirs[group].dentry[objid & (filter->fo_subdir_count - 1)];
1132 }
1133
1134 /* We never dget the object parent, so DON'T dput it either */
1135 struct dentry *filter_parent_lock(struct obd_device *obd, obd_gr group,
1136                                   obd_id objid, void **lock)
1137 {
1138         unsigned long now = jiffies;
1139         struct dentry *dparent = filter_parent(obd, group, objid);
1140
1141         if (IS_ERR(dparent))
1142                 return dparent;
1143
1144         LASSERT(dparent);
1145         LASSERT(dparent->d_inode);
1146
1147         *lock = filter_lock_dentry(obd, dparent, objid);
1148         fsfilt_check_slow(now, obd_timeout, "parent lock");
1149         return dparent;
1150 }
1151
1152 /* How to get files, dentries, inodes from object id's.
1153  *
1154  * If dir_dentry is passed, the caller has already locked the parent
1155  * appropriately for this operation (normally a write lock).  If
1156  * dir_dentry is NULL, we do a read lock while we do the lookup to
1157  * avoid races with create/destroy and such changing the directory
1158  * internal to the filesystem code. */
1159 struct dentry *filter_id2dentry(struct obd_device *obd,
1160                                 struct dentry *dir_dentry,
1161                                 obd_gr group, obd_id id)
1162 {
1163         struct dentry *dparent = dir_dentry;
1164         struct dentry *dchild;
1165         void *lock = NULL;
1166         char name[32];
1167         int len;
1168         ENTRY;
1169
1170         if (id == 0) {
1171                 CERROR("fatal: invalid object id 0\n");
1172                 RETURN(ERR_PTR(-ESTALE));
1173         }
1174
1175         len = sprintf(name, LPU64, id);
1176         if (dir_dentry == NULL) {
1177                 dparent = filter_parent_lock(obd, group, id, &lock);
1178                 if (IS_ERR(dparent)) {
1179                         CERROR("%s: error getting object "LPU64":"LPU64
1180                                " parent: rc %ld\n", obd->obd_name,
1181                                id, group, PTR_ERR(dparent));
1182                         RETURN(dparent);
1183                 }
1184         }
1185         CDEBUG(D_INODE, "looking up object O/%.*s/%s\n",
1186                dparent->d_name.len, dparent->d_name.name, name);
1187         dchild = /*ll_*/lookup_one_len(name, dparent, len);
1188         if (dir_dentry == NULL)
1189                 filter_parent_unlock(dparent, lock);
1190         if (IS_ERR(dchild)) {
1191                 CERROR("%s: child lookup error %ld\n", obd->obd_name,
1192                        PTR_ERR(dchild));
1193                 RETURN(dchild);
1194         }
1195
1196         if (dchild->d_inode != NULL && is_bad_inode(dchild->d_inode)) {
1197                 CERROR("%s: got bad inode "LPU64"\n", obd->obd_name, id);
1198                 f_dput(dchild);
1199                 RETURN(ERR_PTR(-ENOENT));
1200         }
1201
1202         CDEBUG(D_INODE, "got child objid %s: %p, count = %d\n",
1203                name, dchild, atomic_read(&dchild->d_count));
1204
1205         LASSERT(atomic_read(&dchild->d_count) > 0);
1206
1207         RETURN(dchild);
1208 }
1209
1210 static int filter_prepare_destroy(struct obd_device *obd, obd_id objid,
1211                                   obd_id group)
1212 {
1213         struct lustre_handle lockh;
1214         int flags = LDLM_AST_DISCARD_DATA, rc;
1215         struct ldlm_res_id res_id = { .name = { objid, 0, group, 0 } };
1216         ldlm_policy_data_t policy = { .l_extent = { 0, OBD_OBJECT_EOF } };
1217
1218         ENTRY;
1219         /* Tell the clients that the object is gone now and that they should
1220          * throw away any cached pages. */
1221         rc = ldlm_cli_enqueue(NULL, NULL, obd->obd_namespace, res_id,
1222                               LDLM_EXTENT, &policy, LCK_PW,
1223                               &flags, filter_blocking_ast, ldlm_completion_ast,
1224                               NULL, NULL, NULL, 0, NULL, &lockh);
1225
1226         /* We only care about the side-effects, just drop the lock. */
1227         if (rc == ELDLM_OK)
1228                 ldlm_lock_decref(&lockh, LCK_PW);
1229
1230         RETURN(rc);
1231 }
1232
1233 /* Caller must hold LCK_PW on parent and push us into kernel context.
1234  * Caller is also required to ensure that dchild->d_inode exists. */
1235 static int filter_destroy_internal(struct obd_device *obd, obd_id objid,
1236                                    struct dentry *dparent,
1237                                    struct dentry *dchild)
1238 {
1239         struct inode *inode = dchild->d_inode;
1240         int rc;
1241         ENTRY;
1242
1243         if (inode->i_nlink != 1 || atomic_read(&inode->i_count) != 1) {
1244                 CERROR("destroying objid %.*s nlink = %lu, count = %d\n",
1245                        dchild->d_name.len, dchild->d_name.name,
1246                        (unsigned long)inode->i_nlink,
1247                        atomic_read(&inode->i_count));
1248         }
1249
1250         rc = vfs_unlink(dparent->d_inode, dchild);
1251
1252         if (rc)
1253                 CERROR("error unlinking objid %.*s: rc %d\n",
1254                        dchild->d_name.len, dchild->d_name.name, rc);
1255
1256         RETURN(rc);
1257 }
1258
1259 static int filter_intent_policy(struct ldlm_namespace *ns,
1260                                 struct ldlm_lock **lockp, void *req_cookie,
1261                                 ldlm_mode_t mode, int flags, void *data)
1262 {
1263         struct list_head rpc_list = LIST_HEAD_INIT(rpc_list);
1264         struct ptlrpc_request *req = req_cookie;
1265         struct ldlm_lock *lock = *lockp, *l = NULL;
1266         struct ldlm_resource *res = lock->l_resource;
1267         ldlm_processing_policy policy;
1268         struct ost_lvb *res_lvb, *reply_lvb;
1269         struct ldlm_reply *rep;
1270         struct list_head *tmp;
1271         ldlm_error_t err;
1272         int tmpflags = 0, rc, repsize[2] = {sizeof(*rep), sizeof(*reply_lvb)};
1273         ENTRY;
1274
1275         policy = ldlm_get_processing_policy(res);
1276         LASSERT(policy != NULL);
1277         LASSERT(req != NULL);
1278
1279         rc = lustre_pack_reply(req, 2, repsize, NULL);
1280         if (rc)
1281                 RETURN(req->rq_status = rc);
1282
1283         rep = lustre_msg_buf(req->rq_repmsg, 0, sizeof(*rep));
1284         LASSERT(rep != NULL);
1285
1286         reply_lvb = lustre_msg_buf(req->rq_repmsg, 1, sizeof(*reply_lvb));
1287         LASSERT(reply_lvb != NULL);
1288
1289         //fixup_handle_for_resent_req(req, lock, &lockh);
1290
1291         /* If we grant any lock at all, it will be a whole-file read lock.
1292          * Call the extent policy function to see if our request can be
1293          * granted, or is blocked. */
1294         lock->l_policy_data.l_extent.start = 0;
1295         lock->l_policy_data.l_extent.end = OBD_OBJECT_EOF;
1296         lock->l_req_mode = LCK_PR;
1297
1298         l_lock(&res->lr_namespace->ns_lock);
1299
1300         res->lr_tmp = &rpc_list;
1301         rc = policy(lock, &tmpflags, 0, &err);
1302         res->lr_tmp = NULL;
1303
1304         /* FIXME: we should change the policy function slightly, to not make
1305          * this list at all, since we just turn around and free it */
1306         while (!list_empty(&rpc_list)) {
1307                 struct ldlm_ast_work *w =
1308                         list_entry(rpc_list.next, struct ldlm_ast_work, w_list);
1309                 list_del(&w->w_list);
1310                 LDLM_LOCK_PUT(w->w_lock);
1311                 OBD_FREE(w, sizeof(*w));
1312         }
1313
1314         if (rc == LDLM_ITER_CONTINUE) {
1315                 /* The lock met with no resistance; we're finished. */
1316                 l_unlock(&res->lr_namespace->ns_lock);
1317                 RETURN(ELDLM_LOCK_REPLACED);
1318         }
1319
1320         /* Do not grant any lock, but instead send GL callbacks.  The extent
1321          * policy nicely created a list of all PW locks for us.  We will choose
1322          * the highest of those which are larger than the size in the LVB, if
1323          * any, and perform a glimpse callback. */
1324         down(&res->lr_lvb_sem);
1325         res_lvb = res->lr_lvb_data;
1326         LASSERT(res_lvb != NULL);
1327         *reply_lvb = *res_lvb;
1328         up(&res->lr_lvb_sem);
1329
1330         list_for_each(tmp, &res->lr_granted) {
1331                 struct ldlm_lock *tmplock =
1332                         list_entry(tmp, struct ldlm_lock, l_res_link);
1333
1334                 if (tmplock->l_granted_mode == LCK_PR)
1335                         continue;
1336
1337                 if (tmplock->l_policy_data.l_extent.end <= reply_lvb->lvb_size)
1338                         continue;
1339
1340                 if (l == NULL) {
1341                         l = LDLM_LOCK_GET(tmplock);
1342                         continue;
1343                 }
1344
1345                 if (l->l_policy_data.l_extent.start >
1346                     tmplock->l_policy_data.l_extent.start)
1347                         continue;
1348
1349                 LDLM_LOCK_PUT(l);
1350                 l = LDLM_LOCK_GET(tmplock);
1351         }
1352         l_unlock(&res->lr_namespace->ns_lock);
1353
1354         /* There were no PW locks beyond the size in the LVB; finished. */
1355         if (l == NULL)
1356                 RETURN(ELDLM_LOCK_ABORTED);
1357
1358         if (l->l_glimpse_ast == NULL) {
1359                 /* We are racing with unlink(); just return -ENOENT */
1360                 rep->lock_policy_res1 = -ENOENT;
1361                 goto out;
1362         }
1363
1364         LASSERTF(l->l_glimpse_ast != NULL, "l == %p", l);
1365
1366         rc = l->l_glimpse_ast(l, NULL); /* this will update the LVB */
1367         if (rc != 0 && res->lr_namespace->ns_lvbo &&
1368             res->lr_namespace->ns_lvbo->lvbo_update) {
1369                 res->lr_namespace->ns_lvbo->lvbo_update(res, NULL, 0, 1);
1370         }
1371
1372         down(&res->lr_lvb_sem);
1373         *reply_lvb = *res_lvb;
1374         up(&res->lr_lvb_sem);
1375 out:
1376         LDLM_LOCK_PUT(l);
1377
1378         RETURN(ELDLM_LOCK_ABORTED);
1379 }
1380
1381 static int filter_post_fs_cleanup(struct obd_device *obd)
1382 {
1383         int rc = 0;
1384
1385         rc = fsfilt_post_cleanup(obd);
1386
1387         RETURN(rc);
1388 }
1389 #if 0
1390 static int filter_group_set_fs_flags(struct obd_device *obd, int group)
1391 {
1392         struct filter_obd *filter = &obd->u.filter;
1393         int rc = 0, i = 0;
1394         ENTRY;
1395
1396         /* zero group is not longer valid. */
1397         if (group== 0)
1398                 RETURN(rc);
1399         for (i = 0; i < filter->fo_subdir_count; i++) {
1400                 struct dentry *dentry;
1401                 dentry = (filter->fo_subdirs + group)->dentry[i];
1402                 rc = fsfilt_set_fs_flags(obd, dentry->d_inode,
1403                                          SM_DO_REC | SM_DO_COW);
1404                 if (rc)
1405                         RETURN(rc);
1406         }
1407         RETURN(rc);
1408 }
1409 #endif
1410 static int filter_post_fs_setup(struct obd_device *obd)
1411 {
1412         struct filter_obd *filter = &obd->u.filter;
1413         int rc = 0;
1414
1415         rc = fsfilt_post_setup(obd, filter->fo_dentry_O);
1416
1417         return rc;
1418 }
1419
1420 /* mount the file system (secretly) */
1421 int filter_common_setup(struct obd_device *obd, obd_count len, void *buf,
1422                         char *option)
1423 {
1424         struct lustre_cfg *lcfg = buf;
1425         struct filter_obd *filter = &obd->u.filter;
1426         struct lvfs_obd_ctxt *lvfs_ctxt = NULL;
1427         struct vfsmount *mnt;
1428         char *str;
1429         char ns_name[48];
1430         int rc = 0, i;
1431         ENTRY;
1432
1433         if ((LUSTRE_CFG_BUFLEN(lcfg, 1)) < 1 ||
1434             (LUSTRE_CFG_BUFLEN(lcfg, 2) < 1))
1435                 RETURN(-EINVAL);
1436
1437         obd->obd_fsops = fsfilt_get_ops(lustre_cfg_string(lcfg, 2));
1438         if (IS_ERR(obd->obd_fsops))
1439                 RETURN(PTR_ERR(obd->obd_fsops));
1440
1441         rc = lvfs_mount_fs(lustre_cfg_string(lcfg, 1),
1442                            lustre_cfg_string(lcfg, 2),
1443                            option, MS_NOATIME | MS_NODIRATIME, &lvfs_ctxt);
1444         if (rc) {
1445                 CERROR("lvfs_mount_fs failed: rc = %d\n", rc);
1446                 GOTO(err_ops, rc);
1447         }
1448         LASSERT(lvfs_ctxt);
1449
1450         mnt = lvfs_ctxt->loc_mnt;
1451         filter->fo_lvfs_ctxt = lvfs_ctxt;
1452
1453         if (LUSTRE_CFG_BUFLEN(lcfg, 3) > 0 && lustre_cfg_buf(lcfg, 3)) {
1454                 str = lustre_cfg_string(lcfg, 3);
1455                 if (*str == 'f') {
1456                         obd->obd_replayable = 1;
1457                         obd_sync_filter = 1;
1458                         CWARN("%s: recovery enabled\n", obd->obd_name);
1459                 } else {
1460                         if (*str != 'n') {
1461                                 CERROR("unrecognised flag '%c'\n",
1462                                        *str);
1463                         }
1464                         // XXX Robert? Why do we get errors here
1465                         // GOTO(err_mntput, rc = -EINVAL);
1466                 }
1467         }
1468
1469         filter->fo_vfsmnt = mnt;
1470         filter->fo_sb = mnt->mnt_sb;
1471         filter->fo_fstype = mnt->mnt_sb->s_type->name;
1472         CDEBUG(D_SUPER, "%s: mnt = %p\n", filter->fo_fstype, mnt);
1473
1474         OBD_SET_CTXT_MAGIC(&obd->obd_lvfs_ctxt);
1475         obd->obd_lvfs_ctxt.pwdmnt = mnt;
1476         obd->obd_lvfs_ctxt.pwd = mnt->mnt_root;
1477         obd->obd_lvfs_ctxt.fs = get_ds();
1478         obd->obd_lvfs_ctxt.cb_ops = filter_lvfs_ops;
1479
1480         ll_clear_rdonly(ll_sbdev(filter->fo_sb));
1481
1482         rc = fsfilt_setup(obd, mnt->mnt_sb);
1483         if (rc)
1484                 GOTO(err_mntput, rc);
1485
1486         sema_init(&filter->fo_init_lock, 1);
1487         filter->fo_committed_group = 0;
1488         rc = filter_prep(obd);
1489         if (rc)
1490                 GOTO(err_mntput, rc);
1491
1492         filter->fo_destroys_in_progress = 0;
1493         for (i = 0; i < 32; i++)
1494                 sema_init(&filter->fo_create_locks[i], 1);
1495
1496         spin_lock_init(&filter->fo_translock);
1497         spin_lock_init(&filter->fo_objidlock);
1498         INIT_LIST_HEAD(&filter->fo_export_list);
1499         sema_init(&filter->fo_alloc_lock, 1);
1500         spin_lock_init(&filter->fo_r_pages.oh_lock);
1501         spin_lock_init(&filter->fo_w_pages.oh_lock);
1502         spin_lock_init(&filter->fo_r_discont_pages.oh_lock);
1503         spin_lock_init(&filter->fo_w_discont_pages.oh_lock);
1504         spin_lock_init(&filter->fo_r_discont_blocks.oh_lock);
1505         spin_lock_init(&filter->fo_w_discont_blocks.oh_lock);
1506         filter->fo_readcache_max_filesize = FILTER_MAX_CACHE_SIZE;
1507
1508         INIT_LIST_HEAD(&filter->fo_llog_list);
1509         spin_lock_init(&filter->fo_llog_list_lock);
1510
1511         sprintf(ns_name, "filter-%s", obd->obd_uuid.uuid);
1512         obd->obd_namespace = ldlm_namespace_new(ns_name, LDLM_NAMESPACE_SERVER);
1513
1514         if (obd->obd_namespace == NULL)
1515                 GOTO(err_post, rc = -ENOMEM);
1516         obd->obd_namespace->ns_lvbp = obd;
1517         obd->obd_namespace->ns_lvbo = &filter_lvbo;
1518         ldlm_register_intent(obd->obd_namespace, filter_intent_policy);
1519
1520         ptlrpc_init_client(LDLM_CB_REQUEST_PORTAL, LDLM_CB_REPLY_PORTAL,
1521                            "filter_ldlm_cb_client", &obd->obd_ldlm_client);
1522
1523         rc = obd_llog_cat_initialize(obd, &obd->obd_llogs, 1, CATLIST);
1524         if (rc) {
1525                 CERROR("failed to setup llogging subsystems\n");
1526                 GOTO(err_post, rc);
1527         }
1528         RETURN(0);
1529
1530 err_post:
1531         filter_post(obd);
1532 err_mntput:
1533         unlock_kernel();
1534         lvfs_umount_fs(filter->fo_lvfs_ctxt);
1535         filter->fo_sb = 0;
1536         lock_kernel();
1537 err_ops:
1538         fsfilt_put_ops(obd->obd_fsops);
1539         return rc;
1540 }
1541
1542 static int filter_attach(struct obd_device *obd, obd_count len, void *data)
1543 {
1544         struct lprocfs_static_vars lvars;
1545         int rc;
1546
1547         lprocfs_init_vars(filter, &lvars);
1548         rc = lprocfs_obd_attach(obd, lvars.obd_vars);
1549         if (rc != 0)
1550                 return rc;
1551
1552         rc = lprocfs_alloc_obd_stats(obd, LPROC_FILTER_LAST);
1553         if (rc != 0)
1554                 return rc;
1555
1556         /* Init obdfilter private stats here */
1557         lprocfs_counter_init(obd->obd_stats, LPROC_FILTER_READ_BYTES,
1558                              LPROCFS_CNTR_AVGMINMAX, "read_bytes", "bytes");
1559         lprocfs_counter_init(obd->obd_stats, LPROC_FILTER_WRITE_BYTES,
1560                              LPROCFS_CNTR_AVGMINMAX, "write_bytes", "bytes");
1561
1562         return lproc_filter_attach_seqstat(obd);
1563 }
1564
1565 static int filter_detach(struct obd_device *dev)
1566 {
1567         lprocfs_free_obd_stats(dev);
1568         return lprocfs_obd_detach(dev);
1569 }
1570
1571 static int filter_setup(struct obd_device *obd, obd_count len, void *buf)
1572 {
1573         struct lustre_cfg* lcfg = buf;
1574         int rc;
1575         ENTRY;
1576         /* all mount options including errors=remount-ro and asyncdel are passed
1577          * using 4th lcfg param. And it is good, finally we have got rid of
1578          * hardcoded fs types in the code. */
1579         rc = filter_common_setup(obd, len, buf, lustre_cfg_buf(lcfg, 4));
1580         if (rc)
1581                 RETURN(rc);
1582         rc = filter_post_fs_setup(obd);
1583         RETURN(rc);
1584 }
1585
1586 static int filter_cleanup(struct obd_device *obd, int flags)
1587 {
1588         struct filter_obd *filter = &obd->u.filter;
1589         ll_sbdev_type save_dev;
1590         ENTRY;
1591
1592         if (flags & OBD_OPT_FAILOVER)
1593                 CERROR("%s: shutting down for failover; client state will"
1594                        " be preserved.\n", obd->obd_name);
1595
1596         if (!list_empty(&obd->obd_exports)) {
1597                 CERROR("%s: still has clients!\n", obd->obd_name);
1598                 class_disconnect_exports(obd, flags);
1599                 if (!list_empty(&obd->obd_exports)) {
1600                         CERROR("still has exports after forced cleanup?\n");
1601                         RETURN(-EBUSY);
1602                 }
1603         }
1604
1605         target_cleanup_recovery(obd);
1606
1607         ldlm_namespace_free(obd->obd_namespace, flags & OBD_OPT_FORCE);
1608
1609         if (filter->fo_sb == NULL)
1610                 RETURN(0);
1611
1612         save_dev = ll_sbdev(filter->fo_sb);
1613         filter_post_fs_cleanup(obd);
1614         filter_post(obd);
1615
1616         shrink_dcache_parent(filter->fo_sb->s_root);
1617         filter->fo_sb = 0;
1618
1619         unlock_kernel();
1620         lvfs_umount_fs(filter->fo_lvfs_ctxt);
1621         //destroy_buffers(filter->fo_sb->s_dev);
1622         filter->fo_sb = NULL;
1623         fsfilt_put_ops(obd->obd_fsops);
1624         lock_kernel();
1625
1626         ll_clear_rdonly(save_dev);
1627
1628         RETURN(0);
1629 }
1630
1631 static int filter_connect_post(struct obd_export *exp, unsigned initial,
1632                                unsigned long connect_flags)
1633 {
1634         struct obd_device *obd = exp->exp_obd;
1635         struct filter_export_data *fed;
1636         char str[PTL_NALFMT_SIZE];
1637         struct obd_llogs *llog;
1638         struct llog_ctxt *ctxt;
1639         int rc;
1640         ENTRY;
1641
1642         fed = &exp->exp_filter_data;
1643         if (fed->fed_group < FILTER_MIN_GROUPS)
1644                 RETURN(0);
1645
1646         /* initialize llogs for connections from MDS */
1647         llog = filter_grab_llog_for_group(obd, fed->fed_group, exp);
1648         LASSERT(llog != NULL);
1649
1650         ctxt = llog_get_context(llog, LLOG_UNLINK_REPL_CTXT);
1651         LASSERT(ctxt != NULL);
1652
1653         rc = llog_receptor_accept(ctxt, exp->exp_imp_reverse);
1654         portals_nid2str(exp->exp_connection->c_peer.peer_ni->pni_number,
1655                         exp->exp_connection->c_peer.peer_id.nid, str);
1656         CDEBUG(D_OTHER, "%s: init llog ctxt for export "LPX64"/%s, group %d\n",
1657                obd->obd_name, exp->exp_connection->c_peer.peer_id.nid,
1658                str, fed->fed_group);
1659
1660         RETURN(rc);
1661 }
1662
1663 /* nearly identical to mds_connect */
1664 static int filter_connect(struct lustre_handle *conn, struct obd_device *obd,
1665                           struct obd_uuid *cluuid,
1666                           struct obd_connect_data *data,
1667                           unsigned long connect_flags)
1668 {
1669         struct obd_export *exp;
1670         struct filter_export_data *fed;
1671         struct filter_client_data *fcd = NULL;
1672         struct filter_obd *filter = &obd->u.filter;
1673         struct lvfs_run_ctxt saved;
1674         int rc, group;
1675         ENTRY;
1676
1677         if (conn == NULL || obd == NULL || cluuid == NULL)
1678                 RETURN(-EINVAL);
1679
1680         rc = class_connect(conn, obd, cluuid);
1681         if (rc)
1682                 RETURN(rc);
1683         exp = class_conn2export(conn);
1684         LASSERT(exp != NULL);
1685
1686         fed = &exp->exp_filter_data;
1687
1688         spin_lock_init(&fed->fed_lock);
1689
1690        /* connection from MDS */
1691         group = connect_flags;
1692         if (obd->obd_replayable) {
1693                 OBD_ALLOC(fcd, sizeof(*fcd));
1694                 if (!fcd) {
1695                         CERROR("filter: out of memory for client data\n");
1696                         GOTO(cleanup, rc = -ENOMEM);
1697                 }
1698
1699                 memcpy(fcd->fcd_uuid, cluuid, sizeof(fcd->fcd_uuid));
1700                 fed->fed_fcd = fcd;
1701                 fed->fed_fcd->fcd_group = group;
1702                 rc = filter_client_add(obd, filter, fed, -1);
1703                 if (rc)
1704                         GOTO(cleanup, rc);
1705         }
1706         CWARN("%s: Received MDS connection ("LPX64"); group %d\n",
1707               obd->obd_name, exp->exp_handle.h_cookie, group);
1708
1709         if (group == 0)
1710                 GOTO(cleanup, rc);
1711
1712         if (fed->fed_group != 0 && fed->fed_group != group) {
1713                 char str[PTL_NALFMT_SIZE];
1714                 portals_nid2str(exp->exp_connection->c_peer.peer_ni->pni_number,
1715                                 exp->exp_connection->c_peer.peer_id.nid, str);
1716                 CERROR("!!! This export (nid "LPX64"/%s) used object group %d "
1717                        "earlier; now it's trying to use group %d!  This could "
1718                        "be a bug in the MDS.  Tell CFS.\n",
1719                        exp->exp_connection->c_peer.peer_id.nid, str,
1720                        fed->fed_group, group);
1721                 GOTO(cleanup, rc = -EPROTO);
1722         }
1723         fed->fed_group = group;
1724
1725         push_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
1726         rc = filter_read_groups(obd, group, 1);
1727         pop_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
1728         if (rc != 0) {
1729                 CERROR("can't read group %u\n", group);
1730                 GOTO(cleanup, rc);
1731         }
1732 #if 0
1733         rc = filter_group_set_fs_flags(obd, group);
1734         if (rc != 0) {
1735                 CERROR("can't set kml flags %u\n", group);
1736                 GOTO(cleanup, rc);
1737         }
1738 #endif
1739 cleanup:
1740         if (rc) {
1741                 if (fcd)
1742                         OBD_FREE(fcd, sizeof(*fcd));
1743                 class_disconnect(exp, 0);
1744         } else {
1745                 class_export_put(exp);
1746         }
1747         return rc;
1748 }
1749
1750 static int filter_precleanup(struct obd_device *obd, int flags)
1751 {
1752         struct filter_group_llog *log;
1753         struct filter_obd *filter;
1754         int rc = 0;
1755         ENTRY;
1756
1757         filter = &obd->u.filter;
1758
1759         spin_lock(&filter->fo_llog_list_lock);
1760         while (!list_empty(&filter->fo_llog_list)) {
1761                 log = list_entry(filter->fo_llog_list.next,
1762                                  struct filter_group_llog, list);
1763                 list_del(&log->list);
1764                 spin_unlock(&filter->fo_llog_list_lock);
1765
1766                 rc = obd_llog_finish(obd, log->llogs, 0);
1767                 if (rc)
1768                         CERROR("failed to cleanup llogging subsystem for %u\n",
1769                                 log->group);
1770                 OBD_FREE(log->llogs, sizeof(*(log->llogs)));
1771                 OBD_FREE(log, sizeof(*log));
1772                 spin_lock(&filter->fo_llog_list_lock);
1773         }
1774         spin_unlock(&filter->fo_llog_list_lock);
1775
1776         rc = obd_llog_finish(obd, &obd->obd_llogs, 0);
1777         if (rc)
1778                 CERROR("failed to cleanup llogging subsystem\n");
1779
1780         RETURN(rc);
1781 }
1782
1783 /* Do extra sanity checks for grant accounting.  We do this at connect,
1784  * disconnect, and statfs RPC time, so it shouldn't be too bad.  We can
1785  * always get rid of it or turn it off when we know accounting is good. */
1786 static void filter_grant_sanity_check(struct obd_device *obd, const char *func)
1787 {
1788         struct filter_export_data *fed;
1789         struct obd_export *exp;
1790         obd_size maxsize = obd->obd_osfs.os_blocks * obd->obd_osfs.os_bsize;
1791         obd_size tot_dirty = 0, tot_pending = 0, tot_granted = 0;
1792         obd_size fo_tot_dirty, fo_tot_pending, fo_tot_granted;
1793         int level = D_CACHE;
1794
1795         if (list_empty(&obd->obd_exports))
1796                 return;
1797
1798         spin_lock(&obd->obd_osfs_lock);
1799         spin_lock(&obd->obd_dev_lock);
1800         list_for_each_entry(exp, &obd->obd_exports, exp_obd_chain) {
1801                 fed = &exp->exp_filter_data;
1802                 if (fed->fed_grant < 0 || fed->fed_pending < 0 ||
1803                     fed->fed_dirty < 0)
1804                         level = D_ERROR;
1805                 if (maxsize > 0) { /* we may not have done a statfs yet */
1806                         LASSERTF(fed->fed_grant + fed->fed_pending <= maxsize,
1807                                  "cli %s/%p %ld+%ld > "LPU64"\n",
1808                                  exp->exp_client_uuid.uuid, exp,
1809                                  fed->fed_grant, fed->fed_pending, maxsize);
1810                         LASSERTF(fed->fed_dirty <= maxsize,
1811                                  "cli %s/%p %ld > "LPU64"\n",
1812                                  exp->exp_client_uuid.uuid, exp,
1813                                  fed->fed_dirty, maxsize);
1814                 }
1815                 CDEBUG(level, "%s: cli %s/%p dirty %ld pend %ld grant %ld\n",
1816                        obd->obd_name, exp->exp_client_uuid.uuid, exp,
1817                        fed->fed_dirty, fed->fed_pending, fed->fed_grant);
1818                 tot_granted += fed->fed_grant + fed->fed_pending;
1819                 tot_pending += fed->fed_pending;
1820                 tot_dirty += fed->fed_dirty;
1821         }
1822         fo_tot_granted = obd->u.filter.fo_tot_granted;
1823         fo_tot_pending = obd->u.filter.fo_tot_pending;
1824         fo_tot_dirty = obd->u.filter.fo_tot_dirty;
1825         spin_unlock(&obd->obd_dev_lock);
1826         spin_unlock(&obd->obd_osfs_lock);
1827
1828         /* Do these assertions outside the spinlocks so we don't kill system */
1829         if (tot_granted != fo_tot_granted)
1830                 CERROR("%s: tot_granted "LPU64" != fo_tot_granted "LPU64"\n",
1831                        func, tot_granted, fo_tot_granted);
1832         if (tot_pending != fo_tot_pending)
1833                 CERROR("%s: tot_pending "LPU64" != fo_tot_pending "LPU64"\n",
1834                        func, tot_pending, fo_tot_pending);
1835         if (tot_dirty != fo_tot_dirty)
1836                 CERROR("%s: tot_dirty "LPU64" != fo_tot_dirty "LPU64"\n",
1837                        func, tot_dirty, fo_tot_dirty);
1838         if (tot_pending > tot_granted)
1839                 CERROR("%s: tot_pending "LPU64" > tot_granted "LPU64"\n",
1840                        func, tot_pending, tot_granted);
1841         if (tot_granted > maxsize)
1842                 CERROR("%s: tot_granted "LPU64" > maxsize "LPU64"\n",
1843                        func, tot_granted, maxsize);
1844         if (tot_dirty > maxsize)
1845                 CERROR("%s: tot_dirty "LPU64" > maxsize "LPU64"\n",
1846                        func, tot_dirty, maxsize);
1847 }
1848
1849 /* Remove this client from the grant accounting totals.  We also remove
1850  * the export from the obd device under the osfs and dev locks to ensure
1851  * that the filter_grant_sanity_check() calculations are always valid.
1852  * The client should do something similar when it invalidates its import. */
1853 static void filter_grant_discard(struct obd_export *exp)
1854 {
1855         struct obd_device *obd = exp->exp_obd;
1856         struct filter_obd *filter = &obd->u.filter;
1857         struct filter_export_data *fed = &exp->exp_filter_data;
1858         int level = D_CACHE;
1859
1860         spin_lock(&obd->obd_osfs_lock);
1861         spin_lock(&exp->exp_obd->obd_dev_lock);
1862         list_del_init(&exp->exp_obd_chain);
1863         spin_unlock(&exp->exp_obd->obd_dev_lock);
1864
1865         if (fed->fed_dirty < 0 || fed->fed_grant < 0 || fed->fed_pending < 0)
1866                 level = D_ERROR;
1867         CDEBUG(level, "%s: cli %s/%p dirty %ld pend %ld grant %ld\n",
1868                obd->obd_name, exp->exp_client_uuid.uuid, exp,
1869                fed->fed_dirty, fed->fed_pending, fed->fed_grant);
1870
1871         LASSERTF(filter->fo_tot_granted >= fed->fed_grant,
1872                  "%s: tot_granted "LPU64" cli %s/%p fed_grant %ld\n",
1873                  obd->obd_name, filter->fo_tot_granted,
1874                  exp->exp_client_uuid.uuid, exp, fed->fed_grant);
1875         filter->fo_tot_granted -= fed->fed_grant;
1876         LASSERTF(filter->fo_tot_pending >= fed->fed_pending,
1877                  "%s: tot_pending "LPU64" cli %s/%p fed_pending %ld\n",
1878                  obd->obd_name, filter->fo_tot_pending,
1879                  exp->exp_client_uuid.uuid, exp, fed->fed_pending);
1880         LASSERTF(filter->fo_tot_dirty >= fed->fed_dirty,
1881                  "%s: tot_dirty "LPU64" cli %s/%p fed_dirty %ld\n",
1882                  obd->obd_name, filter->fo_tot_dirty,
1883                  exp->exp_client_uuid.uuid, exp, fed->fed_dirty);
1884         filter->fo_tot_dirty -= fed->fed_dirty;
1885         fed->fed_dirty = 0;
1886         fed->fed_grant = 0;
1887
1888         spin_unlock(&obd->obd_osfs_lock);
1889 }
1890
1891 static int filter_destroy_export(struct obd_export *exp)
1892 {
1893         ENTRY;
1894
1895         if (exp->exp_filter_data.fed_pending)
1896                 CERROR("%s: cli %s/%p has %lu pending on destroyed export\n",
1897                        exp->exp_obd->obd_name, exp->exp_client_uuid.uuid,
1898                        exp, exp->exp_filter_data.fed_pending);
1899
1900         target_destroy_export(exp);
1901
1902         if (exp->exp_obd->obd_replayable)
1903                 filter_client_free(exp, exp->exp_flags);
1904
1905         filter_grant_discard(exp);
1906         if (!(exp->exp_flags & OBD_OPT_FORCE))
1907                 filter_grant_sanity_check(exp->exp_obd, __FUNCTION__);
1908
1909         RETURN(0);
1910 }
1911
1912 static void filter_sync_llogs(struct obd_device *obd, struct obd_export *dexp)
1913 {
1914         struct filter_group_llog *fglog, *nlog;
1915         struct filter_obd *filter;
1916         int worked = 0, group;
1917         struct llog_ctxt *ctxt;
1918         ENTRY;
1919
1920         filter = &obd->u.filter;
1921
1922         /* we can't sync log holding spinlock. also, we do not want to get
1923          * into livelock. so we do following: loop over MDS's exports in
1924          * group order and skip already synced llogs -bzzz */
1925         do {
1926                 /* look for group with min. number, but > worked */
1927                 fglog = NULL;
1928                 group = 1 << 30;
1929                 spin_lock(&filter->fo_llog_list_lock);
1930                 list_for_each_entry(nlog, &filter->fo_llog_list, list) {
1931
1932                         if (nlog->group <= worked) {
1933                                 /* this group is already synced */
1934                                 continue;
1935                         }
1936
1937                         if (group < nlog->group) {
1938                                 /* we have group with smaller number to sync */
1939                                 continue;
1940                         }
1941
1942                         /* store current minimal group */
1943                         fglog = nlog;
1944                         group = nlog->group;
1945                 }
1946                 spin_unlock(&filter->fo_llog_list_lock);
1947
1948                 if (fglog == NULL)
1949                         break;
1950
1951                 worked = fglog->group;
1952                 if (fglog->exp && (dexp == fglog->exp || dexp == NULL)) {
1953                         ctxt = llog_get_context(fglog->llogs,
1954                                         LLOG_UNLINK_REPL_CTXT);
1955                         LASSERT(ctxt != NULL);
1956                         llog_sync(ctxt, fglog->exp);
1957                 }
1958         } while (fglog != NULL);
1959 }
1960
1961 /* also incredibly similar to mds_disconnect */
1962 static int filter_disconnect(struct obd_export *exp, unsigned long flags)
1963 {
1964         struct obd_device *obd = exp->exp_obd;
1965         unsigned long irqflags;
1966         int rc;
1967         ENTRY;
1968
1969         LASSERT(exp);
1970         class_export_get(exp);
1971
1972         spin_lock_irqsave(&exp->exp_lock, irqflags);
1973         exp->exp_flags = flags;
1974         spin_unlock_irqrestore(&exp->exp_lock, irqflags);
1975
1976         if (!(flags & OBD_OPT_FORCE))
1977                 filter_grant_sanity_check(obd, __FUNCTION__);
1978         filter_grant_discard(exp);
1979
1980         /* Disconnect early so that clients can't keep using export */
1981         rc = class_disconnect(exp, flags);
1982
1983         ldlm_cancel_locks_for_export(exp);
1984
1985         fsfilt_sync(obd, obd->u.filter.fo_sb);
1986
1987         /* flush any remaining cancel messages out to the target */
1988         filter_sync_llogs(obd, exp);
1989         class_export_put(exp);
1990         RETURN(rc);
1991 }
1992
1993 struct dentry *__filter_oa2dentry(struct obd_device *obd,
1994                                   struct obdo *oa, const char *what)
1995 {
1996         struct dentry *dchild = NULL;
1997         obd_gr group = 0;
1998
1999         if (oa->o_valid & OBD_MD_FLGROUP)
2000                 group = oa->o_gr;
2001
2002         dchild = filter_id2dentry(obd, NULL, group, oa->o_id);
2003
2004         if (IS_ERR(dchild)) {
2005                 CERROR("%s error looking up object: "LPU64"\n",
2006                        what, oa->o_id);
2007                 RETURN(dchild);
2008         }
2009
2010         if (dchild->d_inode == NULL) {
2011                 CERROR("%s: %s on non-existent object: "LPU64"\n",
2012                        obd->obd_name, what, oa->o_id);
2013                 f_dput(dchild);
2014                 RETURN(ERR_PTR(-ENOENT));
2015         }
2016
2017         return dchild;
2018 }
2019
2020 static int filter_getattr(struct obd_export *exp, struct obdo *oa,
2021                           struct lov_stripe_md *md)
2022 {
2023         struct dentry *dentry = NULL;
2024         struct obd_device *obd;
2025         int rc = 0;
2026         ENTRY;
2027
2028         obd = class_exp2obd(exp);
2029         if (obd == NULL) {
2030                 CDEBUG(D_IOCTL, "invalid client cookie "LPX64"\n",
2031                        exp->exp_handle.h_cookie);
2032                 RETURN(-EINVAL);
2033         }
2034
2035         dentry = filter_oa2dentry(obd, oa);
2036         if (IS_ERR(dentry))
2037                 RETURN(PTR_ERR(dentry));
2038
2039         /* Limit the valid bits in the return data to what we actually use */
2040         oa->o_valid = OBD_MD_FLID;
2041         obdo_from_inode(oa, dentry->d_inode, FILTER_VALID_FLAGS);
2042
2043         f_dput(dentry);
2044         RETURN(rc);
2045 }
2046
2047 /* this is called from filter_truncate() until we have filter_punch() */
2048 static int filter_setattr(struct obd_export *exp, struct obdo *oa,
2049                           struct lov_stripe_md *md, struct obd_trans_info *oti)
2050 {
2051         struct lvfs_run_ctxt saved;
2052         struct filter_obd *filter;
2053         struct dentry *dentry;
2054         struct iattr iattr;
2055         struct ldlm_res_id res_id = { .name = { oa->o_id, 0, oa->o_gr, 0 } };
2056         struct ldlm_resource *res;
2057         void *handle;
2058         int rc, rc2;
2059         ENTRY;
2060
2061         LASSERT(oti != NULL);
2062
2063         dentry = filter_oa2dentry(exp->exp_obd, oa);
2064         if (IS_ERR(dentry))
2065                 RETURN(PTR_ERR(dentry));
2066
2067         filter = &exp->exp_obd->u.filter;
2068
2069         iattr_from_obdo(&iattr, oa, oa->o_valid);
2070
2071         push_ctxt(&saved, &exp->exp_obd->obd_lvfs_ctxt, NULL);
2072         lock_kernel();
2073
2074         if (iattr.ia_valid & ATTR_SIZE)
2075                 down(&dentry->d_inode->i_sem);
2076         handle = fsfilt_start(exp->exp_obd, dentry->d_inode, FSFILT_OP_SETATTR,
2077                               oti);
2078         if (IS_ERR(handle))
2079                 GOTO(out_unlock, rc = PTR_ERR(handle));
2080
2081         /* XXX this could be a rwsem instead, if filter_preprw played along */
2082         if (iattr.ia_valid & ATTR_ATTR_FLAG)
2083                 rc = fsfilt_iocontrol(exp->exp_obd, dentry->d_inode, NULL,
2084                                       EXT3_IOC_SETFLAGS,
2085                                       (long)&iattr.ia_attr_flags);
2086         else
2087                 rc = fsfilt_setattr(exp->exp_obd, dentry, handle, &iattr, 1);
2088         rc = filter_finish_transno(exp, oti, rc);
2089         rc2 = fsfilt_commit(exp->exp_obd, filter->fo_sb, dentry->d_inode,
2090                             handle, exp->exp_sync);
2091         if (rc2) {
2092                 CERROR("error on commit, err = %d\n", rc2);
2093                 if (!rc)
2094                         rc = rc2;
2095         }
2096
2097         res = ldlm_resource_get(exp->exp_obd->obd_namespace, NULL,
2098                                 res_id, LDLM_EXTENT, 0);
2099         if (res != NULL) {
2100                 if (res->lr_namespace->ns_lvbo &&
2101                     res->lr_namespace->ns_lvbo->lvbo_update)
2102                         rc = res->lr_namespace->ns_lvbo->lvbo_update(res, NULL,
2103                                                                      0, 0);
2104                 ldlm_resource_putref(res);
2105         } else if (iattr.ia_valid & ATTR_SIZE) {
2106                 /* called from MDS. */
2107         }
2108
2109         oa->o_valid = OBD_MD_FLID;
2110         obdo_from_inode(oa, dentry->d_inode, FILTER_VALID_FLAGS);
2111
2112 out_unlock:
2113         if (iattr.ia_valid & ATTR_SIZE)
2114                 up(&dentry->d_inode->i_sem);
2115         unlock_kernel();
2116         pop_ctxt(&saved, &exp->exp_obd->obd_lvfs_ctxt, NULL);
2117
2118         f_dput(dentry);
2119         RETURN(rc);
2120 }
2121
2122 /* XXX identical to osc_unpackmd */
2123 static int filter_unpackmd(struct obd_export *exp, struct lov_stripe_md **lsmp,
2124                            struct lov_mds_md *lmm, int lmm_bytes)
2125 {
2126         int lsm_size;
2127         ENTRY;
2128
2129         if (lmm != NULL) {
2130                 if (lmm_bytes < sizeof (*lmm)) {
2131                         CERROR("lov_mds_md too small: %d, need %d\n",
2132                                lmm_bytes, (int)sizeof(*lmm));
2133                         RETURN(-EINVAL);
2134                 }
2135                 /* XXX LOV_MAGIC etc check? */
2136
2137                 if (lmm->lmm_object_id == cpu_to_le64(0)) {
2138                         CERROR("lov_mds_md: zero lmm_object_id\n");
2139                         RETURN(-EINVAL);
2140                 }
2141         }
2142
2143         lsm_size = lov_stripe_md_size(1);
2144         if (lsmp == NULL)
2145                 RETURN(lsm_size);
2146
2147         if (*lsmp != NULL && lmm == NULL) {
2148                 OBD_FREE(*lsmp, lsm_size);
2149                 *lsmp = NULL;
2150                 RETURN(0);
2151         }
2152
2153         if (*lsmp == NULL) {
2154                 OBD_ALLOC(*lsmp, lsm_size);
2155                 if (*lsmp == NULL)
2156                         RETURN(-ENOMEM);
2157
2158                 loi_init((*lsmp)->lsm_oinfo);
2159         }
2160
2161         if (lmm != NULL) {
2162                 /* XXX zero *lsmp? */
2163                 (*lsmp)->lsm_object_id = le64_to_cpu (lmm->lmm_object_id);
2164                 LASSERT((*lsmp)->lsm_object_id);
2165         }
2166
2167         (*lsmp)->lsm_maxbytes = LUSTRE_STRIPE_MAXBYTES;
2168
2169         RETURN(lsm_size);
2170 }
2171
2172 static void filter_destroy_precreated(struct obd_export *exp, struct obdo *oa,
2173                                       struct filter_obd *filter)
2174 {
2175         struct obdo *doa = NULL;
2176         __u64 last, id;
2177         ENTRY;
2178
2179         LASSERT(oa);
2180         LASSERT(oa->o_gr != 0);
2181         LASSERT(oa->o_valid & OBD_MD_FLGROUP);
2182
2183         doa = obdo_alloc();
2184         if (doa == NULL) {
2185                 CERROR("cannot allocate doa, error %d\n",
2186                        -ENOMEM);
2187                 EXIT;
2188                 return;
2189         }
2190
2191         doa->o_mode = S_IFREG;
2192         doa->o_gr = oa->o_gr;
2193         doa->o_valid = oa->o_valid & (OBD_MD_FLGROUP | OBD_MD_FLID);
2194
2195         set_bit(doa->o_gr, &filter->fo_destroys_in_progress);
2196         down(&filter->fo_create_locks[doa->o_gr]);
2197         if (!test_bit(doa->o_gr, &filter->fo_destroys_in_progress)) {
2198                 CERROR("%s:["LPU64"] destroy_in_progress already cleared\n",
2199                        exp->exp_obd->obd_name, doa->o_gr);
2200                 up(&filter->fo_create_locks[doa->o_gr]);
2201                 GOTO(out_free_doa, 0);
2202         }
2203
2204         last = filter_last_id(filter, doa->o_gr);
2205         CWARN("%s:["LPU64"] deleting orphan objects from "LPU64" to "LPU64"\n",
2206               exp->exp_obd->obd_name, doa->o_gr, oa->o_id + 1, last);
2207         for (id = oa->o_id + 1; id <= last; id++) {
2208                 doa->o_id = id;
2209                 filter_destroy(exp, doa, NULL, NULL);
2210         }
2211
2212         CDEBUG(D_HA, "%s:["LPU64"] after destroy: set last_objids = "LPU64"\n",
2213                exp->exp_obd->obd_name, doa->o_gr, oa->o_id);
2214
2215         filter_set_last_id(filter, doa->o_gr, oa->o_id);
2216
2217         clear_bit(doa->o_gr, &filter->fo_destroys_in_progress);
2218         up(&filter->fo_create_locks[doa->o_gr]);
2219
2220         EXIT;
2221 out_free_doa:
2222         obdo_free(doa);
2223 }
2224
2225 /* returns a negative error or a nonnegative number of files to create */
2226 static int filter_should_precreate(struct obd_export *exp, struct obdo *oa,
2227                                    obd_gr group)
2228 {
2229         struct obd_device *obd = exp->exp_obd;
2230         struct filter_obd *filter = &obd->u.filter;
2231         int diff, rc;
2232         ENTRY;
2233
2234         diff = oa->o_id - filter_last_id(filter, oa->o_gr);
2235         CDEBUG(D_INFO, "filter_last_id() = "LPU64" -> diff = %d\n",
2236                filter_last_id(filter, oa->o_gr), diff);
2237
2238         /* delete orphans request */
2239         if ((oa->o_valid & OBD_MD_FLFLAGS) &&
2240             (oa->o_flags & OBD_FL_DELORPHAN)) {
2241                 if (diff >= 0)
2242                         RETURN(diff);
2243                 if (-diff > OST_MAX_PRECREATE) {
2244                         CERROR("ignoring bogus orphan destroy request: obdid "
2245                                LPU64" last_id "LPU64"\n",
2246                                oa->o_id, filter_last_id(filter, oa->o_gr));
2247                         RETURN(-EINVAL);
2248                 }
2249                 filter_destroy_precreated(exp, oa, filter);
2250                 rc = filter_update_last_objid(obd, group, 0);
2251                 if (rc)
2252                         CERROR("unable to write lastobjid, but orphans"
2253                                "were deleted\n");
2254                 RETURN(0);
2255         } else {
2256                 /* only precreate if group == 0 and o_id is specfied */
2257                 if (!(oa->o_valid & OBD_FL_DELORPHAN) &&
2258                     (/*group != 0 ||*/ oa->o_id == 0))
2259                         RETURN(1);
2260
2261                 LASSERTF(diff >= 0, LPU64" - "LPU64" = %d\n", oa->o_id,
2262                          filter_last_id(filter, oa->o_gr), diff);
2263                 RETURN(diff);
2264         }
2265 }
2266 static int filter_precreate_rec(struct obd_device *obd, struct dentry *dentry,
2267                                 int *number, struct obdo *oa)
2268 {
2269         int rc;
2270         ENTRY;
2271
2272         rc = fsfilt_precreate_rec(obd, dentry, number, oa);
2273
2274         RETURN(rc);
2275 }
2276
2277 static int filter_statfs(struct obd_device *obd, struct obd_statfs *osfs,
2278                          unsigned long max_age)
2279 {
2280         struct filter_obd *filter = &obd->u.filter;
2281         int blockbits = filter->fo_sb->s_blocksize_bits;
2282         int rc;
2283         ENTRY;
2284
2285         /* at least try to account for cached pages.  its still racey and
2286          * might be under-reporting if clients haven't announced their
2287          * caches with brw recently */
2288         spin_lock(&obd->obd_osfs_lock);
2289         rc = fsfilt_statfs(obd, filter->fo_sb, max_age);
2290         memcpy(osfs, &obd->obd_osfs, sizeof(*osfs));
2291         spin_unlock(&obd->obd_osfs_lock);
2292
2293         CDEBUG(D_SUPER | D_CACHE, "blocks cached "LPU64" granted "LPU64
2294                " pending "LPU64" free "LPU64" avail "LPU64"\n",
2295                filter->fo_tot_dirty, filter->fo_tot_granted,
2296                filter->fo_tot_pending,
2297                osfs->os_bfree << blockbits, osfs->os_bavail << blockbits);
2298
2299         filter_grant_sanity_check(obd, __FUNCTION__);
2300
2301         osfs->os_bavail -= min(osfs->os_bavail,
2302                                (filter->fo_tot_dirty + filter->fo_tot_pending +
2303                                 osfs->os_bsize -1) >> blockbits);
2304
2305         RETURN(rc);
2306 }
2307
2308 /* We rely on the fact that only one thread will be creating files in a given
2309  * group at a time, which is why we don't need an atomic filter_get_new_id.
2310  * Even if we had that atomic function, the following race would exist:
2311  *
2312  * thread 1: gets id x from filter_next_id
2313  * thread 2: gets id (x + 1) from filter_next_id
2314  * thread 2: creates object (x + 1)
2315  * thread 1: tries to create object x, gets -ENOSPC
2316  */
2317 static int filter_precreate(struct obd_device *obd, struct obdo *oa,
2318                             obd_gr group, int *num)
2319 {
2320         struct dentry *dchild = NULL, *dparent = NULL;
2321         int err = 0, rc = 0, recreate_obj = 0, i;
2322         struct filter_obd *filter;
2323         void *handle = NULL;
2324         void *lock = NULL;
2325         struct obd_statfs *osfs;
2326         unsigned long enough_time = jiffies + (obd_timeout * HZ) / 3;
2327         __u64 next_id;
2328         ENTRY;
2329
2330         filter = &obd->u.filter;
2331
2332         if ((oa->o_valid & OBD_MD_FLFLAGS) &&
2333             (oa->o_flags & OBD_FL_RECREATE_OBJS)) {
2334                 recreate_obj = 1;
2335         } else {
2336                 OBD_ALLOC(osfs, sizeof(*osfs));
2337                 if (osfs == NULL)
2338                         RETURN(-ENOMEM);
2339                 rc = filter_statfs(obd, osfs, jiffies-HZ);
2340                 if (rc == 0 && osfs->os_bavail < (osfs->os_blocks >> 10)) {
2341                         CDEBUG(D_HA, "OST out of space! avail "LPU64"\n",
2342                               osfs->os_bavail<<filter->fo_sb->s_blocksize_bits);
2343                         *num = 0;
2344                         rc = -ENOSPC;
2345                 }
2346                 OBD_FREE(osfs, sizeof(*osfs));
2347                 if (rc) {
2348                         RETURN(rc);
2349                 }
2350         }
2351
2352         CDEBUG(D_HA, "%s: precreating %d objects\n", obd->obd_name, *num);
2353
2354         down(&filter->fo_create_locks[group]);
2355
2356         for (i = 0; i < *num && err == 0; i++) {
2357                 int cleanup_phase = 0;
2358
2359                 if (test_bit(group, &filter->fo_destroys_in_progress)) {
2360                         CWARN("%s: precreate aborted by destroy\n",
2361                               obd->obd_name);
2362                         break;
2363                 }
2364
2365                 if (recreate_obj) {
2366                         __u64 last_id;
2367                         next_id = oa->o_id;
2368                         last_id = filter_last_id(filter, group);
2369                         if (next_id > last_id) {
2370                                 CERROR("Error: Trying to recreate obj greater"
2371                                        "than last id "LPD64" > "LPD64"\n",
2372                                        next_id, last_id);
2373                                 GOTO(cleanup, rc = -EINVAL);
2374                         }
2375                 } else {
2376                         next_id = filter_last_id(filter, group) + 1;
2377                 }
2378
2379                 CDEBUG(D_INFO, "precreate objid "LPU64"\n", next_id);
2380
2381                 dparent = filter_parent_lock(obd, group, next_id, &lock);
2382                 if (IS_ERR(dparent))
2383                         GOTO(cleanup, rc = PTR_ERR(dparent));
2384                 cleanup_phase = 1;
2385
2386                 /* precreate objects are not logged */
2387                 fsfilt_set_fs_flags(obd, dparent->d_inode, SM_PRECREATE);
2388
2389                 dchild = filter_id2dentry(obd, dparent, group, next_id);
2390                 if (IS_ERR(dchild))
2391                         GOTO(cleanup, rc = PTR_ERR(dchild));
2392                 cleanup_phase = 2;
2393
2394                 if (dchild->d_inode != NULL) {
2395                         /* This would only happen if lastobjid was bad on disk*/
2396                         /* Could also happen if recreating missing obj but
2397                          * already exists
2398                          */
2399                         if (recreate_obj) {
2400                                 CERROR("%s: recreating existing object %.*s?\n",
2401                                        obd->obd_name, dchild->d_name.len,
2402                                        dchild->d_name.name);
2403                         } else {
2404                                 CERROR("%s: Serious error: objid %.*s already "
2405                                        "exists; is this filesystem corrupt?\n",
2406                                        obd->obd_name, dchild->d_name.len,
2407                                        dchild->d_name.name);
2408                                 LBUG();
2409                         }
2410                         GOTO(cleanup, rc = -EEXIST);
2411                 }
2412
2413                 handle = fsfilt_start_log(obd, dparent->d_inode,
2414                                           FSFILT_OP_CREATE, NULL, 1);
2415                 if (IS_ERR(handle))
2416                         GOTO(cleanup, rc = PTR_ERR(handle));
2417                 cleanup_phase = 3;
2418
2419                 rc = ll_vfs_create(dparent->d_inode, dchild, S_IFREG, NULL);
2420                 if (rc) {
2421                         CERROR("create failed rc = %d\n", rc);
2422                         GOTO(cleanup, rc);
2423                 }
2424
2425                 if (!recreate_obj) {
2426                         filter_set_last_id(filter, group, next_id);
2427                         err = filter_update_last_objid(obd, group, 0);
2428                         if (err)
2429                                 CERROR("unable to write lastobjid "
2430                                        "but file created\n");
2431                 }
2432                 fsfilt_set_fs_flags(obd, dparent->d_inode, SM_DO_REC);
2433
2434         cleanup:
2435                 switch(cleanup_phase) {
2436                 case 3:
2437                         err = fsfilt_commit(obd, filter->fo_sb,
2438                                             dparent->d_inode, handle, 0);
2439                         if (err) {
2440                                 CERROR("error on commit, err = %d\n", err);
2441                                 if (!rc)
2442                                         rc = err;
2443                         }
2444                 case 2:
2445                         f_dput(dchild);
2446                 case 1:
2447                         filter_parent_unlock(dparent, lock);
2448                 case 0:
2449                         break;
2450                 }
2451
2452                 if (rc)
2453                         break;
2454                 if (time_after(jiffies, enough_time)) {
2455                         CDEBUG(D_INODE,"%s: precreate slow - want %d got %d \n",
2456                                obd->obd_name, *num, i);
2457                         break;
2458                 }
2459         }
2460
2461         *num = i;
2462
2463         /* check if we have an error after ll_vfs_create(). It is possible that
2464          * there will be say -ENOSPC and we will leak it. */
2465         if (rc == 0)
2466                 rc = filter_precreate_rec(obd, dparent, num, oa);
2467
2468         up(&filter->fo_create_locks[group]);
2469
2470         CDEBUG(D_HA, "%s: server last_objid for group "LPU64": "LPU64"\n",
2471                obd->obd_name, group, filter->fo_last_objids[group]);
2472
2473         CDEBUG(D_HA, "%s: filter_precreate() created %d objects\n",
2474                obd->obd_name, i);
2475
2476         RETURN(rc);
2477 }
2478
2479 static int filter_create(struct obd_export *exp, struct obdo *oa,
2480                          void *acl, int acl_size,
2481                          struct lov_stripe_md **ea, struct obd_trans_info *oti)
2482 {
2483         struct obd_device *obd = NULL;
2484         struct filter_obd *filter;
2485         struct lvfs_run_ctxt saved;
2486         struct lov_stripe_md *lsm = NULL;
2487         struct filter_export_data *fed;
2488         char str[PTL_NALFMT_SIZE];
2489         int group = oa->o_gr, rc = 0, diff, recreate_objs = 0;
2490         ENTRY;
2491
2492         LASSERT(acl == NULL && acl_size == 0);
2493
2494         if (!(oa->o_valid & OBD_MD_FLGROUP) || group == 0) {
2495                 portals_nid2str(exp->exp_connection->c_peer.peer_ni->pni_number,
2496                                 exp->exp_connection->c_peer.peer_id.nid, str);
2497                 CERROR("!!! nid "LPX64"/%s sent invalid object group %d\n",
2498                        exp->exp_connection->c_peer.peer_id.nid, str, group);
2499                 RETURN(-EINVAL);
2500         }
2501
2502         if ((oa->o_valid & OBD_MD_FLFLAGS) &&
2503             (oa->o_flags & OBD_FL_RECREATE_OBJS))
2504                 recreate_objs = 1;
2505
2506         obd = exp->exp_obd;
2507         fed = &exp->exp_filter_data;
2508         filter = &obd->u.filter;
2509
2510         if (fed->fed_group != group && !recreate_objs &&
2511             !(oa->o_valid & OBD_MD_REINT)) {
2512                 portals_nid2str(exp->exp_connection->c_peer.peer_ni->pni_number,
2513                                 exp->exp_connection->c_peer.peer_id.nid, str);
2514                 CERROR("!!! This export (nid "LPX64"/%s) used object group %d "
2515                        "earlier; now it's trying to use group %d!  This could "
2516                        "be a bug in the MDS.  Tell CFS.\n",
2517                        exp->exp_connection->c_peer.peer_id.nid, str,
2518                        fed->fed_group, group);
2519                 RETURN(-ENOTUNIQ);
2520         }
2521
2522         CDEBUG(D_INFO, "filter_create(od->o_gr=%d,od->o_id="LPU64")\n",
2523                group, oa->o_id);
2524         if (ea != NULL) {
2525                 lsm = *ea;
2526                 if (lsm == NULL) {
2527                         rc = obd_alloc_memmd(exp, &lsm);
2528                         if (rc < 0)
2529                                 RETURN(rc);
2530                 }
2531         }
2532
2533         obd = exp->exp_obd;
2534         push_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
2535
2536         if (oa->o_valid & OBD_MD_REINT) {
2537                 int num = *((int*)oa->o_inline);
2538                 rc = filter_precreate(obd, oa, oa->o_gr, &num);
2539         } else if (recreate_objs) {
2540                 if (oa->o_id > filter_last_id(&obd->u.filter, group)) {
2541                         CERROR("recreate objid "LPU64" > last id "LPU64"\n",
2542                                oa->o_id, filter_last_id(&obd->u.filter, group));
2543                         rc = -EINVAL;
2544                 } else {
2545                         diff = 1;
2546                         rc = filter_precreate(obd, oa, group, &diff);
2547                 }
2548         } else {
2549                 diff = filter_should_precreate(exp, oa, group);
2550                 if (diff > 0) {
2551                         oa->o_id = filter_last_id(&obd->u.filter, group);
2552                         rc = filter_precreate(obd, oa, group, &diff);
2553                         oa->o_id = filter_last_id(&obd->u.filter, oa->o_gr);
2554                         oa->o_valid = OBD_MD_FLID;
2555                 }
2556         }
2557
2558         pop_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
2559         if (rc && ea != NULL && *ea != lsm) {
2560                 obd_free_memmd(exp, &lsm);
2561         } else if (rc == 0 && ea != NULL) {
2562                 /* XXX LOV STACKING: the lsm that is passed to us from
2563                  * LOV does not have valid lsm_oinfo data structs, so
2564                  * don't go touching that.  This needs to be fixed in a
2565                  * big way. */
2566                 lsm->lsm_object_id = oa->o_id;
2567                 lsm->lsm_object_gr = oa->o_gr;
2568                 *ea = lsm;
2569         }
2570
2571         RETURN(rc);
2572 }
2573
2574 static int filter_destroy(struct obd_export *exp, struct obdo *oa,
2575                           struct lov_stripe_md *ea, struct obd_trans_info *oti)
2576 {
2577         int rc, rc2, cleanup_phase = 0, have_prepared = 0;
2578         struct dentry *dchild = NULL, *dparent = NULL;
2579         struct llog_cookie *fcc = NULL;
2580         struct lvfs_run_ctxt saved;
2581         struct filter_obd *filter;
2582         struct obd_device *obd;
2583         void *handle = NULL;
2584         void *lock = NULL;
2585         struct iattr iattr;
2586         ENTRY;
2587
2588         LASSERT(oa->o_valid & OBD_MD_FLGROUP);
2589
2590         obd = exp->exp_obd;
2591         filter = &obd->u.filter;
2592
2593         push_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
2594
2595  acquire_locks:
2596         dparent = filter_parent_lock(obd, oa->o_gr, oa->o_id, &lock);
2597         if (IS_ERR(dparent))
2598                 GOTO(cleanup, rc = PTR_ERR(dparent));
2599         cleanup_phase = 1;
2600
2601         dchild = filter_id2dentry(obd, dparent, oa->o_gr, oa->o_id);
2602         if (IS_ERR(dchild))
2603                 GOTO(cleanup, rc = PTR_ERR(dchild));
2604         cleanup_phase = 2;
2605
2606         if (dchild->d_inode == NULL) {
2607                 CDEBUG(D_INODE, "destroying non-existent object "LPU64"\n",
2608                        oa->o_id);
2609                 GOTO(cleanup, rc = -ENOENT);
2610         }
2611
2612         if (!have_prepared) {
2613                 /* If we're really going to destroy the object, get ready
2614                  * by getting the clients to discard their cached data.
2615                  *
2616                  * We have to drop the parent lock, because
2617                  * filter_prepare_destroy will acquire a PW on the object, and
2618                  * we don't want to deadlock with an incoming write to the
2619                  * object, which has the extent PW and then wants to get the
2620                  * parent dentry to do the lookup.
2621                  *
2622                  * We dput the child because it's not worth the extra
2623                  * complication of condition the above code to skip it on the
2624                  * second time through. */
2625                 f_dput(dchild);
2626                 filter_parent_unlock(dparent, lock);
2627
2628                 filter_prepare_destroy(obd, oa->o_id, oa->o_gr);
2629                 have_prepared = 1;
2630                 goto acquire_locks;
2631         }
2632
2633         /* Our MDC connection is established by the MDS to us */
2634         if (oa->o_valid & OBD_MD_FLCOOKIE) {
2635                 OBD_ALLOC(fcc, sizeof(*fcc));
2636                 if (fcc != NULL)
2637                         memcpy(fcc, obdo_logcookie(oa), sizeof(*fcc));
2638         }
2639
2640         /* we're gonna truncate it first in order to avoid possible
2641          * deadlock:
2642          *      P1                      P2
2643          * open trasaction      open transaction
2644          * down(i_zombie)       down(i_zombie)
2645          *                      restart transaction
2646          * (see BUG 4180) -bzzz
2647          */
2648         down(&dchild->d_inode->i_sem);
2649         handle = fsfilt_start_log(obd, dparent->d_inode,FSFILT_OP_SETATTR,NULL,1);
2650         if (IS_ERR(handle)) {
2651                 up(&dchild->d_inode->i_sem);
2652                 GOTO(cleanup, rc = PTR_ERR(handle));
2653         }
2654
2655         iattr.ia_valid = ATTR_SIZE;
2656         iattr.ia_size = 0;
2657         rc = fsfilt_setattr(obd, dchild, handle, &iattr, 1);
2658
2659         rc2 = fsfilt_commit(obd, filter->fo_sb, dparent->d_inode, handle, 0);
2660         up(&dchild->d_inode->i_sem);
2661         if (rc)
2662                 GOTO(cleanup, rc);
2663         if (rc2)
2664                 GOTO(cleanup, rc = rc2);
2665
2666         handle = fsfilt_start_log(obd, dparent->d_inode,FSFILT_OP_UNLINK,oti,1);
2667         if (IS_ERR(handle))
2668                 GOTO(cleanup, rc = PTR_ERR(handle));
2669
2670         cleanup_phase = 3;
2671
2672         rc = filter_destroy_internal(obd, oa->o_id, dparent, dchild);
2673
2674 cleanup:
2675         switch(cleanup_phase) {
2676         case 3:
2677                 if (fcc != NULL) {
2678                         fsfilt_add_journal_cb(obd, filter->fo_sb, 0,
2679                                               oti ? oti->oti_handle : handle,
2680                                               filter_cancel_cookies_cb, fcc);
2681                 }
2682                 rc = filter_finish_transno(exp, oti, rc);
2683                 rc2 = fsfilt_commit(obd, filter->fo_sb, dparent->d_inode,
2684                                     handle, exp->exp_sync);
2685                 if (rc2) {
2686                         CERROR("error on commit, err = %d\n", rc2);
2687                         if (!rc)
2688                                 rc = rc2;
2689                 }
2690         case 2:
2691                 f_dput(dchild);
2692         case 1:
2693                 filter_parent_unlock(dparent, lock);
2694         case 0:
2695                 pop_ctxt(&saved, &obd->obd_lvfs_ctxt, NULL);
2696                 break;
2697         default:
2698                 CERROR("invalid cleanup_phase %d\n", cleanup_phase);
2699                 LBUG();
2700         }
2701
2702         RETURN(rc);
2703 }
2704
2705 /* NB start and end are used for punch, but not truncate */
2706 static int filter_truncate(struct obd_export *exp, struct obdo *oa,
2707                            struct lov_stripe_md *lsm,
2708                            obd_off start, obd_off end,
2709                            struct obd_trans_info *oti)
2710 {
2711         int error;
2712         ENTRY;
2713
2714         if (end != OBD_OBJECT_EOF)
2715                 CERROR("PUNCH not supported, only truncate: end = "LPX64"\n",
2716                        end);
2717
2718         CDEBUG(D_INODE, "calling truncate for object "LPU64", valid = "LPU64", "
2719                "o_size = "LPD64"\n", oa->o_id, oa->o_valid, start);
2720         oa->o_size = start;
2721         error = filter_setattr(exp, oa, NULL, oti);
2722         RETURN(error);
2723 }
2724
2725 static int filter_sync(struct obd_export *exp, struct obdo *oa,
2726                        struct lov_stripe_md *lsm, obd_off start, obd_off end)
2727 {
2728         struct obd_device *obd = exp->exp_obd;
2729         struct lvfs_run_ctxt saved;
2730         struct filter_obd *filter;
2731         struct dentry *dentry;
2732         int rc, rc2;
2733         ENTRY;
2734
2735         filter = &obd->u.filter;
2736
2737         /* an objid of zero is taken to mean "sync whole filesystem" */
2738         if (!oa || !(oa->o_valid & OBD_MD_FLID)) {
2739                 rc = fsfilt_sync(obd, filter->fo_sb);
2740                 /* flush any remaining cancel messages out to the target */
2741                 filter_sync_llogs(obd, NULL);
2742                 RETURN(rc);
2743         }
2744
2745         dentry = filter_oa2dentry(obd, oa);
2746         if (IS_ERR(dentry))
2747                 RETURN(PTR_ERR(dentry));
2748
2749         push_ctxt(&saved, &exp->exp_obd->obd_lvfs_ctxt, NULL);
2750
2751         down(&dentry->d_inode->i_sem);
2752         rc = filemap_fdatawrite(dentry->d_inode->i_mapping);
2753         if (rc == 0) {
2754                 /* just any file to grab fsync method - "file" arg unused */
2755                 struct file *file = filter->fo_rcvd_filp;
2756
2757                 if (file->f_op && file->f_op->fsync)
2758                         rc = file->f_op->fsync(NULL, dentry, 1);
2759
2760                 rc2 = filemap_fdatawait(dentry->d_inode->i_mapping);
2761                 if (!rc)
2762                         rc = rc2;
2763         }
2764         up(&dentry->d_inode->i_sem);
2765
2766         oa->o_valid = OBD_MD_FLID;
2767         obdo_from_inode(oa, dentry->d_inode, FILTER_VALID_FLAGS);
2768
2769         pop_ctxt(&saved, &exp->exp_obd->obd_lvfs_ctxt, NULL);
2770
2771         f_dput(dentry);
2772         RETURN(rc);
2773 }
2774
2775 static int filter_get_info(struct obd_export *exp, __u32 keylen,
2776                            void *key, __u32 *vallen, void *val)
2777 {
2778         struct filter_export_data *fed = &exp->exp_filter_data;
2779         struct obd_device *obd;
2780         ENTRY;
2781
2782         obd = class_exp2obd(exp);
2783         if (obd == NULL) {
2784                 CDEBUG(D_IOCTL, "invalid client cookie "LPX64"\n",
2785                        exp->exp_handle.h_cookie);
2786                 RETURN(-EINVAL);
2787         }
2788
2789         if (keylen == strlen("blocksize") &&
2790             memcmp(key, "blocksize", keylen) == 0) {
2791                 __u32 *blocksize = val;
2792                 *vallen = sizeof(*blocksize);
2793                 *blocksize = obd->u.filter.fo_sb->s_blocksize;
2794                 RETURN(0);
2795         }
2796
2797         if (keylen == strlen("blocksize_bits") &&
2798             memcmp(key, "blocksize_bits", keylen) == 0) {
2799                 __u32 *blocksize_bits = val;
2800                 *vallen = sizeof(*blocksize_bits);
2801                 *blocksize_bits = obd->u.filter.fo_sb->s_blocksize_bits;
2802                 RETURN(0);
2803         }
2804
2805         if (keylen >= strlen("last_id") && memcmp(key, "last_id", 7) == 0) {
2806                 obd_id *last_id = val;
2807                 *last_id = filter_last_id(&obd->u.filter, fed->fed_group);
2808                 RETURN(0);
2809         }
2810         if (keylen >= strlen("reint_log") && memcmp(key, "reint_log", 9) == 0) {
2811                 /*Get log_context handle*/
2812                 unsigned long *llh_handle = val;
2813                 *vallen = sizeof(unsigned long);
2814                 *llh_handle = (unsigned long)obd->obd_llog_ctxt[LLOG_REINT_ORIG_CTXT];
2815                 RETURN(0);
2816         }
2817         if (keylen >= strlen("cache_sb") && memcmp(key, "cache_sb", 8) == 0) {
2818                 /*Get log_context handle*/
2819                 unsigned long *sb = val;
2820                 *vallen = sizeof(unsigned long);
2821                 *sb = (unsigned long)obd->u.filter.fo_sb;
2822                 RETURN(0);
2823         }
2824
2825         CDEBUG(D_IOCTL, "invalid key\n");
2826         RETURN(-EINVAL);
2827 }
2828
2829 struct obd_llogs *filter_grab_llog_for_group(struct obd_device *obd, int group,
2830                                              struct obd_export *export)
2831 {
2832         struct filter_group_llog *fglog, *nlog;
2833         char name[32] = "CATLIST";
2834         struct filter_obd *filter;
2835         struct llog_ctxt *ctxt;
2836         struct list_head *cur;
2837         int rc;
2838
2839         filter = &obd->u.filter;
2840
2841         spin_lock(&filter->fo_llog_list_lock);
2842         list_for_each(cur, &filter->fo_llog_list) {
2843                 fglog = list_entry(cur, struct filter_group_llog, list);
2844                 if (fglog->group == group) {
2845                         if (!(fglog->exp == NULL || fglog->exp == export || export == NULL))
2846                                 CWARN("%s: export for group %d changes: 0x%p -> 0x%p\n",
2847                                       obd->obd_name, group, fglog->exp, export);
2848                         spin_unlock(&filter->fo_llog_list_lock);
2849                         goto init;
2850                 }
2851         }
2852         spin_unlock(&filter->fo_llog_list_lock);
2853
2854         if (export == NULL)
2855                 RETURN(NULL);
2856
2857         OBD_ALLOC(fglog, sizeof(*fglog));
2858         if (fglog == NULL)
2859                 RETURN(NULL);
2860         fglog->group = group;
2861
2862         OBD_ALLOC(fglog->llogs, sizeof(struct obd_llogs));
2863         if (fglog->llogs == NULL) {
2864                 OBD_FREE(fglog, sizeof(*fglog));
2865                 RETURN(NULL);
2866         }
2867
2868         spin_lock(&filter->fo_llog_list_lock);
2869         list_for_each(cur, &filter->fo_llog_list) {
2870                 nlog = list_entry(cur, struct filter_group_llog, list);
2871                 LASSERT(nlog->group != group);
2872         }
2873         list_add(&fglog->list, &filter->fo_llog_list);
2874         spin_unlock(&filter->fo_llog_list_lock);
2875
2876         rc = obd_llog_cat_initialize(obd, fglog->llogs, 1, name);
2877         if (rc) {
2878                 OBD_FREE(fglog->llogs, sizeof(*(fglog->llogs)));
2879                 OBD_FREE(fglog, sizeof(*fglog));
2880                 RETURN(NULL);
2881         }
2882
2883 init:
2884         if (export) {
2885                 fglog->exp = export;
2886                 ctxt = llog_get_context(fglog->llogs, LLOG_UNLINK_REPL_CTXT);
2887                 LASSERT(ctxt != NULL);
2888
2889                 llog_receptor_accept(ctxt, export->exp_imp_reverse);
2890         }
2891         CDEBUG(D_OTHER, "%s: new llog 0x%p for group %u\n",
2892                obd->obd_name, fglog->llogs, group);
2893
2894         RETURN(fglog->llogs);
2895 }
2896
2897 int filter_iocontrol(unsigned int cmd, struct obd_export *exp,
2898                      int len, void *karg, void *uarg)
2899 {
2900         struct obd_device *obd = exp->exp_obd;
2901         struct obd_ioctl_data *data = karg;
2902         int rc = 0;
2903
2904         switch (cmd) {
2905         case OBD_IOC_ABORT_RECOVERY:
2906                 target_stop_recovery_thread(obd);
2907                 RETURN(0);
2908
2909         case OBD_IOC_SET_READONLY: {
2910                 void *handle;
2911                 struct super_block *sb = obd->u.filter.fo_sb;
2912                 struct inode *inode = sb->s_root->d_inode;
2913                 BDEVNAME_DECLARE_STORAGE(tmp);
2914                 CERROR("setting device %s read-only\n",
2915                        ll_bdevname(sb, tmp));
2916
2917                 handle = fsfilt_start(obd, inode, FSFILT_OP_MKNOD, NULL);
2918                 LASSERT(handle);
2919                 (void)fsfilt_commit(obd, sb, inode, handle, 1);
2920
2921                 ll_set_rdonly(ll_sbdev(obd->u.filter.fo_sb));
2922                 RETURN(0);
2923         }
2924
2925         case OBD_IOC_CATLOGLIST: {
2926                 rc = llog_catalog_list(obd, 1, data);
2927                 RETURN(rc);
2928         }
2929         case OBD_IOC_LLOG_CANCEL:
2930         case OBD_IOC_LLOG_REMOVE:
2931         case OBD_IOC_LLOG_INFO:
2932         case OBD_IOC_LLOG_PRINT: {
2933                 /* FIXME to be finished */
2934                 RETURN(-EOPNOTSUPP);
2935 /*
2936                 struct llog_ctxt *ctxt = NULL;
2937
2938                 push_ctxt(&saved, &ctxt->loc_ctxt, NULL);
2939                 rc = llog_ioctl(ctxt, cmd, data);
2940                 pop_ctxt(&saved, &ctxt->loc_ctxt, NULL);
2941
2942                 RETURN(rc);
2943 */
2944         }
2945
2946
2947         default:
2948                 RETURN(-EINVAL);
2949         }
2950         RETURN(0);
2951 }
2952
2953 static struct llog_operations filter_unlink_repl_logops;
2954 static struct llog_operations filter_size_orig_logops = {
2955         lop_setup: llog_obd_origin_setup,
2956         lop_cleanup: llog_catalog_cleanup,
2957         lop_add: llog_catalog_add,
2958 };
2959
2960 static int filter_llog_init(struct obd_device *obd, struct obd_llogs *llogs,
2961                             struct obd_device *tgt, int count,
2962                             struct llog_catid *catid)
2963 {
2964         struct llog_ctxt *ctxt;
2965         int rc;
2966         ENTRY;
2967
2968         filter_unlink_repl_logops = llog_client_ops;
2969         filter_unlink_repl_logops.lop_cancel = llog_obd_repl_cancel;
2970         filter_unlink_repl_logops.lop_connect = llog_repl_connect;
2971         filter_unlink_repl_logops.lop_sync = llog_obd_repl_sync;
2972
2973         rc = obd_llog_setup(obd, llogs, LLOG_UNLINK_REPL_CTXT, tgt, 0, NULL,
2974                         &filter_unlink_repl_logops);
2975         if (rc)
2976                 RETURN(rc);
2977         /* FIXME - assign unlink_cb for filter's recovery */
2978         ctxt = llog_get_context(llogs, LLOG_UNLINK_REPL_CTXT);
2979         ctxt->llog_proc_cb = filter_recov_log_unlink_cb;
2980
2981         /* FIXME - count should be 1 to setup size log */
2982         rc = obd_llog_setup(obd, llogs, LLOG_SIZE_ORIG_CTXT, tgt, 0,
2983                             &catid->lci_logid, &filter_size_orig_logops);
2984         RETURN(rc);
2985 }
2986
2987 static int filter_llog_finish(struct obd_device *obd,
2988                               struct obd_llogs *llogs, int count)
2989 {
2990         int rc;
2991         ENTRY;
2992
2993         rc = obd_llog_cleanup(llog_get_context(llogs, LLOG_UNLINK_REPL_CTXT));
2994         if (rc)
2995                 RETURN(rc);
2996
2997         rc = obd_llog_cleanup(llog_get_context(llogs, LLOG_SIZE_ORIG_CTXT));
2998         RETURN(rc);
2999 }
3000
3001 static int filter_llog_connect(struct obd_export *exp,
3002                                struct llogd_conn_body *body)
3003 {
3004         struct obd_device *obd = exp->exp_obd;
3005         struct llog_ctxt *ctxt;
3006         struct obd_llogs *llog;
3007         int rc;
3008         ENTRY;
3009
3010         CDEBUG(D_OTHER, "handle connect for %s: %u/%u/%u\n", obd->obd_name,
3011                (unsigned) body->lgdc_logid.lgl_ogr,
3012                (unsigned) body->lgdc_logid.lgl_oid,
3013                (unsigned) body->lgdc_logid.lgl_ogen);
3014         llog = filter_grab_llog_for_group(obd, body->lgdc_logid.lgl_ogr, exp);
3015         LASSERT(llog != NULL);
3016         ctxt = llog_get_context(llog, body->lgdc_ctxt_idx);
3017         rc = llog_connect(ctxt, 1, &body->lgdc_logid,
3018                           &body->lgdc_gen, NULL);
3019         if (rc != 0)
3020                 CERROR("failed to connect\n");
3021
3022         RETURN(rc);
3023 }
3024
3025 static struct dentry *filter_lvfs_id2dentry(__u64 id, __u32 gen,
3026                                             __u64 gr, void *data)
3027 {
3028         return filter_id2dentry(data, NULL, gr, id);
3029 }
3030
3031 static struct lvfs_callback_ops filter_lvfs_ops = {
3032         l_id2dentry:     filter_lvfs_id2dentry,
3033 };
3034
3035 static struct obd_ops filter_obd_ops = {
3036         .o_owner          = THIS_MODULE,
3037         .o_attach         = filter_attach,
3038         .o_detach         = filter_detach,
3039         .o_get_info       = filter_get_info,
3040         .o_setup          = filter_setup,
3041         .o_precleanup     = filter_precleanup,
3042         .o_cleanup        = filter_cleanup,
3043         .o_connect        = filter_connect,
3044         .o_connect_post   = filter_connect_post,
3045         .o_disconnect     = filter_disconnect,
3046         .o_statfs         = filter_statfs,
3047         .o_getattr        = filter_getattr,
3048         .o_unpackmd       = filter_unpackmd,
3049         .o_create         = filter_create,
3050         .o_setattr        = filter_setattr,
3051         .o_destroy        = filter_destroy,
3052         .o_brw            = filter_brw,
3053         .o_punch          = filter_truncate,
3054         .o_sync           = filter_sync,
3055         .o_preprw         = filter_preprw,
3056         .o_commitrw       = filter_commitrw,
3057         .o_do_cow         = filter_do_cow,
3058         .o_write_extents  = filter_write_extents,
3059         .o_destroy_export = filter_destroy_export,
3060         .o_llog_init      = filter_llog_init,
3061         .o_llog_finish    = filter_llog_finish,
3062         .o_llog_connect   = filter_llog_connect,
3063         .o_iocontrol      = filter_iocontrol,
3064 };
3065
3066 static struct obd_ops filter_sanobd_ops = {
3067         .o_owner          = THIS_MODULE,
3068         .o_attach         = filter_attach,
3069         .o_detach         = filter_detach,
3070         .o_get_info       = filter_get_info,
3071         .o_setup          = filter_san_setup,
3072         .o_precleanup     = filter_precleanup,
3073         .o_cleanup        = filter_cleanup,
3074         .o_connect        = filter_connect,
3075         .o_connect_post   = filter_connect_post,
3076         .o_disconnect     = filter_disconnect,
3077         .o_statfs         = filter_statfs,
3078         .o_getattr        = filter_getattr,
3079         .o_unpackmd       = filter_unpackmd,
3080         .o_create         = filter_create,
3081         .o_setattr        = filter_setattr,
3082         .o_destroy        = filter_destroy,
3083         .o_brw            = filter_brw,
3084         .o_punch          = filter_truncate,
3085         .o_sync           = filter_sync,
3086         .o_preprw         = filter_preprw,
3087         .o_commitrw       = filter_commitrw,
3088         .o_do_cow         = filter_do_cow,
3089         .o_write_extents  = filter_write_extents,
3090         .o_san_preprw     = filter_san_preprw,
3091         .o_destroy_export = filter_destroy_export,
3092         .o_llog_init      = filter_llog_init,
3093         .o_llog_finish    = filter_llog_finish,
3094         .o_llog_connect   = filter_llog_connect,
3095         .o_iocontrol      = filter_iocontrol,
3096 };
3097
3098 static int __init obdfilter_init(void)
3099 {
3100         struct lprocfs_static_vars lvars;
3101         int size, rc;
3102
3103         printk(KERN_INFO "Lustre: Filtering OBD driver; info@clusterfs.com\n");
3104
3105         lprocfs_init_vars(filter, &lvars);
3106
3107         size = OBDFILTER_CREATED_SCRATCHPAD_ENTRIES *
3108                 sizeof(*obdfilter_created_scratchpad);
3109
3110         OBD_ALLOC(obdfilter_created_scratchpad, size);
3111         if (obdfilter_created_scratchpad == NULL) {
3112                 CERROR ("Can't allocate scratchpad\n");
3113                 return -ENOMEM;
3114         }
3115
3116         rc = class_register_type(&filter_obd_ops, NULL, lvars.module_vars,
3117                                  OBD_FILTER_DEVICENAME);
3118         if (rc) {
3119                 OBD_FREE(obdfilter_created_scratchpad, size);
3120                 return rc;
3121         }
3122
3123         rc = class_register_type(&filter_sanobd_ops, NULL, lvars.module_vars,
3124                                  OBD_FILTER_SAN_DEVICENAME);
3125         if (rc) {
3126                 class_unregister_type(OBD_FILTER_DEVICENAME);
3127                 OBD_FREE(obdfilter_created_scratchpad, size);
3128         }
3129         return rc;
3130 }
3131
3132 static void __exit obdfilter_exit(void)
3133 {
3134         class_unregister_type(OBD_FILTER_SAN_DEVICENAME);
3135         class_unregister_type(OBD_FILTER_DEVICENAME);
3136         OBD_FREE(obdfilter_created_scratchpad,
3137                  OBDFILTER_CREATED_SCRATCHPAD_ENTRIES *
3138                  sizeof(*obdfilter_created_scratchpad));
3139 }
3140
3141 MODULE_AUTHOR("Cluster File Systems, Inc. <info@clusterfs.com>");
3142 MODULE_DESCRIPTION("Lustre Filtering OBD driver");
3143 MODULE_LICENSE("GPL");
3144
3145 module_init(obdfilter_init);
3146 module_exit(obdfilter_exit);