Whamcloud - gitweb
LU-4019 ofd: setattr don't udpate lvbo with object referenced
[fs/lustre-release.git] / lustre / ofd / ofd_obd.c
1 /*
2  * GPL HEADER START
3  *
4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License version 2 only,
8  * as published by the Free Software Foundation.
9  *
10  * This program is distributed in the hope that it will be useful, but
11  * WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  * General Public License version 2 for more details (a copy is included
14  * in the LICENSE file that accompanied this code).
15  *
16  * You should have received a copy of the GNU General Public License
17  * version 2 along with this program; If not, see
18  * http://www.sun.com/software/products/lustre/docs/GPLv2.pdf
19  *
20  * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
21  * CA 95054 USA or visit www.sun.com if you need additional information or
22  * have any questions.
23  *
24  * GPL HEADER END
25  */
26 /*
27  * Copyright (c) 2009, 2010, Oracle and/or its affiliates. All rights reserved.
28  * Use is subject to license terms.
29  *
30  * Copyright (c) 2012, 2013, Intel Corporation.
31  */
32 /*
33  * This file is part of Lustre, http://www.lustre.org/
34  * Lustre is a trademark of Sun Microsystems, Inc.
35  *
36  * lustre/ofd/ofd_obd.c
37  *
38  * Author: Andreas Dilger <adilger@whamcloud.com>
39  * Author: Alex Zhuravlev <bzzz@whamcloud.com>
40  * Author: Mike Pershin <tappro@whamcloud.com>
41  */
42
43 #define DEBUG_SUBSYSTEM S_FILTER
44
45 #include <lustre/lustre_idl.h>
46 #include "ofd_internal.h"
47 #include <obd_cksum.h>
48 #include <lustre_quota.h>
49 #include <lustre_lfsck.h>
50
51 static int ofd_export_stats_init(struct ofd_device *ofd,
52                                  struct obd_export *exp, void *client_nid)
53 {
54         struct obd_device       *obd = ofd_obd(ofd);
55         struct nid_stat         *stats;
56         int                      num_stats;
57         int                      rc, newnid = 0;
58
59         ENTRY;
60
61         LASSERT(obd->obd_uses_nid_stats);
62
63         if (obd_uuid_equals(&exp->exp_client_uuid, &obd->obd_uuid))
64                 /* Self-export gets no proc entry */
65                 RETURN(0);
66
67         rc = lprocfs_exp_setup(exp, client_nid, &newnid);
68         if (rc) {
69                 /* Mask error for already created
70                  * /proc entries */
71                 if (rc == -EALREADY)
72                         rc = 0;
73                 RETURN(rc);
74         }
75
76         if (newnid == 0)
77                 RETURN(0);
78
79         stats = exp->exp_nid_stats;
80         LASSERT(stats != NULL);
81
82         num_stats = NUM_OBD_STATS + LPROC_OFD_LAST;
83         stats->nid_stats = lprocfs_alloc_stats(num_stats,
84                                                LPROCFS_STATS_FLAG_NOPERCPU);
85         if (stats->nid_stats == NULL)
86                 return -ENOMEM;
87
88         lprocfs_init_ops_stats(LPROC_OFD_LAST, stats->nid_stats);
89         lprocfs_counter_init(stats->nid_stats, LPROC_OFD_READ_BYTES,
90                              LPROCFS_CNTR_AVGMINMAX, "read_bytes", "bytes");
91         lprocfs_counter_init(stats->nid_stats, LPROC_OFD_WRITE_BYTES,
92                              LPROCFS_CNTR_AVGMINMAX, "write_bytes", "bytes");
93
94         rc = lprocfs_register_stats(stats->nid_proc, "stats",
95                                     stats->nid_stats);
96         if (rc)
97                 GOTO(clean, rc);
98
99         rc = lprocfs_nid_ldlm_stats_init(stats);
100         if (rc) {
101                 lprocfs_free_stats(&stats->nid_stats);
102                 GOTO(clean, rc);
103         }
104
105         RETURN(0);
106 clean:
107         return rc;
108 }
109
110 static int ofd_parse_connect_data(const struct lu_env *env,
111                                   struct obd_export *exp,
112                                   struct obd_connect_data *data,
113                                   bool new_connection)
114 {
115         struct ofd_device                *ofd = ofd_exp(exp);
116         struct filter_export_data        *fed = &exp->exp_filter_data;
117
118         if (!data)
119                 RETURN(0);
120
121         CDEBUG(D_RPCTRACE, "%s: cli %s/%p ocd_connect_flags: "LPX64
122                " ocd_version: %x ocd_grant: %d ocd_index: %u"
123                " ocd_group %u\n",
124                exp->exp_obd->obd_name, exp->exp_client_uuid.uuid, exp,
125                data->ocd_connect_flags, data->ocd_version,
126                data->ocd_grant, data->ocd_index, data->ocd_group);
127
128         if (fed->fed_group != 0 && fed->fed_group != data->ocd_group) {
129                 CWARN("!!! This export (nid %s) used object group %d "
130                       "earlier; now it's trying to use group %d!  This could "
131                       "be a bug in the MDS. Please report to "
132                       "http://bugs.whamcloud.com/\n",
133                       obd_export_nid2str(exp), fed->fed_group,
134                       data->ocd_group);
135                 RETURN(-EPROTO);
136         }
137         fed->fed_group = data->ocd_group;
138
139         data->ocd_connect_flags &= OST_CONNECT_SUPPORTED;
140         data->ocd_version = LUSTRE_VERSION_CODE;
141
142         /* Kindly make sure the SKIP_ORPHAN flag is from MDS. */
143         if (data->ocd_connect_flags & OBD_CONNECT_MDS)
144                 CDEBUG(D_HA, "%s: Received MDS connection for group %u\n",
145                        exp->exp_obd->obd_name, data->ocd_group);
146         else if (data->ocd_connect_flags & OBD_CONNECT_SKIP_ORPHAN)
147                 RETURN(-EPROTO);
148
149         if (ofd_grant_param_supp(exp)) {
150                 exp->exp_filter_data.fed_pagesize = data->ocd_blocksize;
151                 /* ocd_{blocksize,inodespace} are log2 values */
152                 data->ocd_blocksize  = ofd->ofd_blockbits;
153                 data->ocd_inodespace = ofd->ofd_dt_conf.ddp_inodespace;
154                 /* ocd_grant_extent is in 1K blocks */
155                 data->ocd_grant_extent = ofd->ofd_dt_conf.ddp_grant_frag >> 10;
156         }
157
158         if (data->ocd_connect_flags & OBD_CONNECT_GRANT)
159                 data->ocd_grant = ofd_grant_connect(env, exp, data->ocd_grant,
160                                                     new_connection);
161
162         if (data->ocd_connect_flags & OBD_CONNECT_INDEX) {
163                 struct lr_server_data *lsd = &ofd->ofd_lut.lut_lsd;
164                 int                    index = lsd->lsd_osd_index;
165
166                 if (index != data->ocd_index) {
167                         LCONSOLE_ERROR_MSG(0x136, "Connection from %s to index"
168                                            " %u doesn't match actual OST index"
169                                            " %u in last_rcvd file, bad "
170                                            "configuration?\n",
171                                            obd_export_nid2str(exp), index,
172                                            data->ocd_index);
173                         RETURN(-EBADF);
174                 }
175                 if (!(lsd->lsd_feature_compat & OBD_COMPAT_OST)) {
176                         /* this will only happen on the first connect */
177                         lsd->lsd_feature_compat |= OBD_COMPAT_OST;
178                         /* sync is not needed here as lut_client_add will
179                          * set exp_need_sync flag */
180                         tgt_server_data_update(env, &ofd->ofd_lut, 0);
181                 }
182         }
183         if (OBD_FAIL_CHECK(OBD_FAIL_OST_BRW_SIZE)) {
184                 data->ocd_brw_size = 65536;
185         } else if (data->ocd_connect_flags & OBD_CONNECT_BRW_SIZE) {
186                 data->ocd_brw_size = min(data->ocd_brw_size,
187                                          (__u32)DT_MAX_BRW_SIZE);
188                 if (data->ocd_brw_size == 0) {
189                         CERROR("%s: cli %s/%p ocd_connect_flags: "LPX64
190                                " ocd_version: %x ocd_grant: %d ocd_index: %u "
191                                "ocd_brw_size is unexpectedly zero, "
192                                "network data corruption?"
193                                "Refusing connection of this client\n",
194                                exp->exp_obd->obd_name,
195                                exp->exp_client_uuid.uuid,
196                                exp, data->ocd_connect_flags, data->ocd_version,
197                                data->ocd_grant, data->ocd_index);
198                         RETURN(-EPROTO);
199                 }
200         }
201
202         if (data->ocd_connect_flags & OBD_CONNECT_CKSUM) {
203                 __u32 cksum_types = data->ocd_cksum_types;
204
205                 /* The client set in ocd_cksum_types the checksum types it
206                  * supports. We have to mask off the algorithms that we don't
207                  * support */
208                 data->ocd_cksum_types &= cksum_types_supported_server();
209
210                 if (unlikely(data->ocd_cksum_types == 0)) {
211                         CERROR("%s: Connect with checksum support but no "
212                                "ocd_cksum_types is set\n",
213                                exp->exp_obd->obd_name);
214                         RETURN(-EPROTO);
215                 }
216
217                 CDEBUG(D_RPCTRACE, "%s: cli %s supports cksum type %x, return "
218                        "%x\n", exp->exp_obd->obd_name, obd_export_nid2str(exp),
219                        cksum_types, data->ocd_cksum_types);
220         } else {
221                 /* This client does not support OBD_CONNECT_CKSUM
222                  * fall back to CRC32 */
223                 CDEBUG(D_RPCTRACE, "%s: cli %s does not support "
224                        "OBD_CONNECT_CKSUM, CRC32 will be used\n",
225                        exp->exp_obd->obd_name, obd_export_nid2str(exp));
226         }
227
228         if (data->ocd_connect_flags & OBD_CONNECT_MAXBYTES)
229                 data->ocd_maxbytes = ofd->ofd_dt_conf.ddp_maxbytes;
230
231         if (OCD_HAS_FLAG(data, PINGLESS)) {
232                 if (ptlrpc_pinger_suppress_pings()) {
233                         spin_lock(&exp->exp_obd->obd_dev_lock);
234                         list_del_init(&exp->exp_obd_chain_timed);
235                         spin_unlock(&exp->exp_obd->obd_dev_lock);
236                 } else {
237                         data->ocd_connect_flags &= ~OBD_CONNECT_PINGLESS;
238                 }
239         }
240
241         RETURN(0);
242 }
243
244 static int ofd_obd_reconnect(const struct lu_env *env, struct obd_export *exp,
245                              struct obd_device *obd, struct obd_uuid *cluuid,
246                              struct obd_connect_data *data, void *localdata)
247 {
248         struct ofd_device       *ofd;
249         int                      rc;
250
251         ENTRY;
252
253         if (exp == NULL || obd == NULL || cluuid == NULL)
254                 RETURN(-EINVAL);
255
256         ofd = ofd_dev(obd->obd_lu_dev);
257
258         rc = lu_env_refill((struct lu_env *)env);
259         if (rc != 0) {
260                 CERROR("Failure to refill session: '%d'\n", rc);
261                 RETURN(rc);
262         }
263
264         ofd_info_init(env, exp);
265         rc = ofd_parse_connect_data(env, exp, data, false);
266         if (rc == 0)
267                 ofd_export_stats_init(ofd, exp, localdata);
268
269         RETURN(rc);
270 }
271
272 static int ofd_obd_connect(const struct lu_env *env, struct obd_export **_exp,
273                            struct obd_device *obd, struct obd_uuid *cluuid,
274                            struct obd_connect_data *data, void *localdata)
275 {
276         struct obd_export       *exp;
277         struct ofd_device       *ofd;
278         struct lustre_handle     conn = { 0 };
279         int                      rc;
280         ENTRY;
281
282         if (_exp == NULL || obd == NULL || cluuid == NULL)
283                 RETURN(-EINVAL);
284
285         ofd = ofd_dev(obd->obd_lu_dev);
286
287         rc = class_connect(&conn, obd, cluuid);
288         if (rc)
289                 RETURN(rc);
290
291         exp = class_conn2export(&conn);
292         LASSERT(exp != NULL);
293
294         rc = lu_env_refill((struct lu_env *)env);
295         if (rc != 0) {
296                 CERROR("Failure to refill session: '%d'\n", rc);
297                 GOTO(out, rc);
298         }
299
300         ofd_info_init(env, exp);
301
302         rc = ofd_parse_connect_data(env, exp, data, true);
303         if (rc)
304                 GOTO(out, rc);
305
306         if (obd->obd_replayable) {
307                 struct tg_export_data *ted = &exp->exp_target_data;
308
309                 memcpy(ted->ted_lcd->lcd_uuid, cluuid,
310                        sizeof(ted->ted_lcd->lcd_uuid));
311                 rc = tgt_client_new(env, exp);
312                 if (rc != 0)
313                         GOTO(out, rc);
314                 ofd_export_stats_init(ofd, exp, localdata);
315         }
316
317         CDEBUG(D_HA, "%s: get connection from MDS %d\n", obd->obd_name,
318                data ? data->ocd_group : -1);
319
320 out:
321         if (rc != 0) {
322                 class_disconnect(exp);
323                 *_exp = NULL;
324         } else {
325                 *_exp = exp;
326         }
327         RETURN(rc);
328 }
329
330 static int ofd_obd_disconnect(struct obd_export *exp)
331 {
332         struct ofd_device       *ofd = ofd_dev(exp->exp_obd->obd_lu_dev);
333         struct lu_env            env;
334         int                      rc;
335
336         ENTRY;
337
338         LASSERT(exp);
339         class_export_get(exp);
340
341         if (!(exp->exp_flags & OBD_OPT_FORCE))
342                 ofd_grant_sanity_check(ofd_obd(ofd), __FUNCTION__);
343
344         rc = server_disconnect_export(exp);
345
346         ofd_grant_discard(exp);
347
348         rc = lu_env_init(&env, LCT_DT_THREAD);
349         if (rc)
350                 RETURN(rc);
351
352         /* Do not erase record for recoverable client. */
353         if (exp->exp_obd->obd_replayable &&
354             (!exp->exp_obd->obd_fail || exp->exp_failed))
355                 tgt_client_del(&env, exp);
356         lu_env_fini(&env);
357
358         class_export_put(exp);
359         RETURN(rc);
360 }
361
362 static int ofd_init_export(struct obd_export *exp)
363 {
364         int rc;
365
366         spin_lock_init(&exp->exp_filter_data.fed_lock);
367         CFS_INIT_LIST_HEAD(&exp->exp_filter_data.fed_mod_list);
368         spin_lock(&exp->exp_lock);
369         exp->exp_connecting = 1;
370         spin_unlock(&exp->exp_lock);
371
372         /* self-export doesn't need client data and ldlm initialization */
373         if (unlikely(obd_uuid_equals(&exp->exp_obd->obd_uuid,
374                                      &exp->exp_client_uuid)))
375                 return 0;
376
377         rc = tgt_client_alloc(exp);
378         if (rc == 0)
379                 ldlm_init_export(exp);
380         if (rc)
381                 CERROR("%s: Can't initialize export: rc %d\n",
382                        exp->exp_obd->obd_name, rc);
383         return rc;
384 }
385
386 static int ofd_destroy_export(struct obd_export *exp)
387 {
388         struct ofd_device *ofd = ofd_dev(exp->exp_obd->obd_lu_dev);
389
390         if (exp->exp_filter_data.fed_pending)
391                 CERROR("%s: cli %s/%p has %lu pending on destroyed export"
392                        "\n", exp->exp_obd->obd_name, exp->exp_client_uuid.uuid,
393                        exp, exp->exp_filter_data.fed_pending);
394
395         target_destroy_export(exp);
396
397         if (unlikely(obd_uuid_equals(&exp->exp_obd->obd_uuid,
398                                      &exp->exp_client_uuid)))
399                 return 0;
400
401         ldlm_destroy_export(exp);
402         tgt_client_free(exp);
403
404         ofd_fmd_cleanup(exp);
405
406         /*
407          * discard grants once we're sure no more
408          * interaction with the client is possible
409          */
410         ofd_grant_discard(exp);
411         ofd_fmd_cleanup(exp);
412
413         if (exp_connect_flags(exp) & OBD_CONNECT_GRANT_SHRINK) {
414                 if (ofd->ofd_tot_granted_clients > 0)
415                         ofd->ofd_tot_granted_clients --;
416         }
417
418         if (!(exp->exp_flags & OBD_OPT_FORCE))
419                 ofd_grant_sanity_check(exp->exp_obd, __FUNCTION__);
420
421         LASSERT(cfs_list_empty(&exp->exp_filter_data.fed_mod_list));
422         return 0;
423 }
424
425 int ofd_postrecov(const struct lu_env *env, struct ofd_device *ofd)
426 {
427         struct lu_device *ldev = &ofd->ofd_dt_dev.dd_lu_dev;
428
429         CDEBUG(D_HA, "%s: recovery is over\n", ofd_obd(ofd)->obd_name);
430         return ldev->ld_ops->ldo_recovery_complete(env, ldev);
431 }
432
433 int ofd_obd_postrecov(struct obd_device *obd)
434 {
435         struct lu_env            env;
436         struct lu_device        *ldev = obd->obd_lu_dev;
437         int                      rc;
438
439         ENTRY;
440
441         rc = lu_env_init(&env, LCT_DT_THREAD);
442         if (rc)
443                 RETURN(rc);
444         ofd_info_init(&env, obd->obd_self_export);
445
446         rc = ofd_postrecov(&env, ofd_dev(ldev));
447
448         lu_env_fini(&env);
449         RETURN(rc);
450 }
451
452 static int ofd_adapt_sptlrpc_conf(const struct lu_env *env,
453                                   struct obd_device *obd, int initial)
454 {
455         struct filter_obd       *fo = &obd->u.filter;
456         struct sptlrpc_rule_set  tmp_rset;
457         int                      rc;
458
459         sptlrpc_rule_set_init(&tmp_rset);
460         rc = sptlrpc_conf_target_get_rules(obd, &tmp_rset, initial);
461         if (rc) {
462                 CERROR("%s: failed get sptlrpc rules: rc = %d\n",
463                        obd->obd_name, rc);
464                 return rc;
465         }
466
467         sptlrpc_target_update_exp_flavor(obd, &tmp_rset);
468
469         write_lock(&fo->fo_sptlrpc_lock);
470         sptlrpc_rule_set_free(&fo->fo_sptlrpc_rset);
471         fo->fo_sptlrpc_rset = tmp_rset;
472         write_unlock(&fo->fo_sptlrpc_lock);
473
474         return 0;
475 }
476
477 static int ofd_set_mds_conn(struct obd_export *exp, void *val)
478 {
479         int rc = 0;
480
481         ENTRY;
482
483         LCONSOLE_WARN("%s: received MDS connection from %s\n",
484                       exp->exp_obd->obd_name, obd_export_nid2str(exp));
485         RETURN(rc);
486 }
487
488 static int ofd_set_info_async(const struct lu_env *env, struct obd_export *exp,
489                               __u32 keylen, void *key, __u32 vallen, void *val,
490                               struct ptlrpc_request_set *set)
491 {
492         struct ofd_device       *ofd;
493         int                      rc = 0;
494
495         ENTRY;
496
497         if (exp->exp_obd == NULL) {
498                 CDEBUG(D_IOCTL, "invalid export %p\n", exp);
499                 RETURN(-EINVAL);
500         }
501
502         ofd = ofd_exp(exp);
503
504         if (KEY_IS(KEY_CAPA_KEY)) {
505                 rc = ofd_update_capa_key(ofd, val);
506                 if (rc)
507                         CERROR("%s: update capability key failed: rc = %d\n",
508                                exp->exp_obd->obd_name, rc);
509         } else if (KEY_IS(KEY_SPTLRPC_CONF)) {
510                 ofd_adapt_sptlrpc_conf(env, exp->exp_obd, 0);
511         } else if (KEY_IS(KEY_MDS_CONN)) {
512                 rc = ofd_set_mds_conn(exp, val);
513         } else if (KEY_IS(KEY_GRANT_SHRINK)) {
514                 struct ost_body *body = val;
515
516                 ofd_info_init(env, exp);
517                 /** handle grant shrink, similar to a read request */
518                 ofd_grant_prepare_read(env, exp, &body->oa);
519         } else {
520                 CERROR("%s: Unsupported key %s\n",
521                        exp->exp_obd->obd_name, (char*)key);
522                 rc = -EOPNOTSUPP;
523         }
524
525         RETURN(rc);
526 }
527
528 static int ofd_get_info(const struct lu_env *env, struct obd_export *exp,
529                         __u32 keylen, void *key, __u32 *vallen, void *val,
530                         struct lov_stripe_md *lsm)
531 {
532         struct ofd_device       *ofd;
533         int                     rc = 0;
534
535         ENTRY;
536
537         if (exp->exp_obd == NULL) {
538                 CDEBUG(D_IOCTL, "invalid client export %p\n", exp);
539                 RETURN(-EINVAL);
540         }
541
542         /* Because ofd_get_info might be called from
543          * handle_request_in as well(see LU-3239), where env might
544          * not be initilaized correctly, and le_ses might be in
545          * an un-initialized state, so only refill le_ctx here */
546         rc = lu_env_refill((struct lu_env *)env);
547         if (rc != 0)
548                 RETURN(rc);
549
550         ofd = ofd_exp(exp);
551
552         if (KEY_IS(KEY_BLOCKSIZE)) {
553                 __u32 *blocksize = val;
554                 if (blocksize) {
555                         if (*vallen < sizeof(*blocksize))
556                                 GOTO(out, rc = -EOVERFLOW);
557                         *blocksize = 1 << ofd->ofd_dt_conf.ddp_block_shift;
558                 }
559                 *vallen = sizeof(*blocksize);
560         } else if (KEY_IS(KEY_BLOCKSIZE_BITS)) {
561                 __u32 *blocksize_bits = val;
562                 if (blocksize_bits) {
563                         if (*vallen < sizeof(*blocksize_bits))
564                                 GOTO(out, rc = -EOVERFLOW);
565                         *blocksize_bits = ofd->ofd_dt_conf.ddp_block_shift;
566                 }
567                 *vallen = sizeof(*blocksize_bits);
568         } else if (KEY_IS(KEY_LAST_ID)) {
569                 obd_id *last_id = val;
570                 struct ofd_seq *oseq;
571
572                 if (val == NULL) {
573                         *vallen = sizeof(obd_id);
574                         GOTO(out, rc = 0);
575                 }
576                 ofd_info_init(env, exp);
577                 oseq = ofd_seq_load(env, ofd,
578                                     (obd_seq)exp->exp_filter_data.fed_group);
579                 LASSERT(!IS_ERR(oseq));
580                 if (last_id) {
581                         if (*vallen < sizeof(*last_id)) {
582                                 ofd_seq_put(env, oseq);
583                                 GOTO(out, rc = -EOVERFLOW);
584                         }
585                         *last_id = ofd_seq_last_oid(oseq);
586                 }
587                 ofd_seq_put(env, oseq);
588                 *vallen = sizeof(*last_id);
589         } else if (KEY_IS(KEY_FIEMAP)) {
590                 struct ofd_device               *ofd = ofd_exp(exp);
591                 struct ofd_object               *fo;
592                 struct ll_fiemap_info_key       *fm_key = key;
593                 struct lu_fid                    fid;
594
595                 if (val == NULL) {
596                         *vallen = fiemap_count_to_size(
597                                                fm_key->fiemap.fm_extent_count);
598                         GOTO(out, rc = 0);
599                 }
600
601                 rc = ostid_to_fid(&fid, &fm_key->oa.o_oi, 0);
602                 if (rc != 0)
603                         GOTO(out, rc);
604                 CDEBUG(D_INODE, "get FIEMAP of object "DFID"\n",
605                        PFID(&fid));
606
607                 fo = ofd_object_find(env, ofd, &fid);
608                 if (IS_ERR(fo)) {
609                         CERROR("%s: error finding object "DFID"\n",
610                                exp->exp_obd->obd_name, PFID(&fid));
611                         rc = PTR_ERR(fo);
612                 } else {
613                         struct ll_user_fiemap *fiemap = val;
614
615                         ofd_read_lock(env, fo);
616                         if (ofd_object_exists(fo)) {
617                                 *fiemap = fm_key->fiemap;
618                                 rc = dt_fiemap_get(env,
619                                                    ofd_object_child(fo),
620                                                    fiemap);
621                         } else {
622                                 rc = -ENOENT;
623                         }
624                         ofd_read_unlock(env, fo);
625                         ofd_object_put(env, fo);
626                 }
627         } else if (KEY_IS(KEY_SYNC_LOCK_CANCEL)) {
628                 *((__u32 *) val) = ofd->ofd_sync_lock_cancel;
629                 *vallen = sizeof(__u32);
630         } else if (KEY_IS(KEY_LAST_FID)) {
631                 struct ofd_device       *ofd = ofd_exp(exp);
632                 struct ofd_seq          *oseq;
633                 struct lu_fid           *fid = val;
634                 int                     rc;
635
636                 if (fid == NULL) {
637                         *vallen = sizeof(struct lu_fid);
638                         GOTO(out, rc = 0);
639                 }
640
641                 if (*vallen < sizeof(*fid))
642                         GOTO(out, rc = -EOVERFLOW);
643
644                 ofd_info_init(env, exp);
645
646                 fid_le_to_cpu(fid, fid);
647
648                 oseq = ofd_seq_load(env, ofd,
649                                     ostid_seq((struct ost_id *)fid));
650                 if (IS_ERR(oseq))
651                         GOTO(out, rc = PTR_ERR(oseq));
652
653                 rc = ostid_to_fid(fid, &oseq->os_oi,
654                              ofd->ofd_lut.lut_lsd.lsd_osd_index);
655                 if (rc != 0)
656                         GOTO(out_put, rc);
657
658                 CDEBUG(D_HA, "%s: LAST FID is "DFID"\n", ofd_name(ofd),
659                        PFID(fid));
660                 *vallen = sizeof(*fid);
661 out_put:
662                 ofd_seq_put(env, oseq);
663         } else {
664                 CERROR("Not supported key %s\n", (char*)key);
665                 rc = -EOPNOTSUPP;
666         }
667 out:
668         RETURN(rc);
669 }
670
671 /** helper function for statfs, also used by grant code */
672 int ofd_statfs_internal(const struct lu_env *env, struct ofd_device *ofd,
673                         struct obd_statfs *osfs, __u64 max_age, int *from_cache)
674 {
675         int rc;
676
677         spin_lock(&ofd->ofd_osfs_lock);
678         if (cfs_time_before_64(ofd->ofd_osfs_age, max_age) || max_age == 0) {
679                 obd_size unstable;
680
681                 /* statfs data are too old, get up-to-date one.
682                  * we must be cautious here since multiple threads might be
683                  * willing to update statfs data concurrently and we must
684                  * grant that cached statfs data are always consistent */
685
686                 if (ofd->ofd_statfs_inflight == 0)
687                         /* clear inflight counter if no users, although it would
688                          * take a while to overflow this 64-bit counter ... */
689                         ofd->ofd_osfs_inflight = 0;
690                 /* notify ofd_grant_commit() that we want to track writes
691                  * completed as of now */
692                 ofd->ofd_statfs_inflight++;
693                 /* record value of inflight counter before running statfs to
694                  * compute the diff once statfs is completed */
695                 unstable = ofd->ofd_osfs_inflight;
696                 spin_unlock(&ofd->ofd_osfs_lock);
697
698                 /* statfs can sleep ... hopefully not for too long since we can
699                  * call it fairly often as space fills up */
700                 rc = dt_statfs(env, ofd->ofd_osd, osfs);
701                 if (unlikely(rc))
702                         return rc;
703
704                 spin_lock(&ofd->ofd_grant_lock);
705                 spin_lock(&ofd->ofd_osfs_lock);
706                 /* calculate how much space was written while we released the
707                  * ofd_osfs_lock */
708                 unstable = ofd->ofd_osfs_inflight - unstable;
709                 ofd->ofd_osfs_unstable = 0;
710                 if (unstable) {
711                         /* some writes completed while we were running statfs
712                          * w/o the ofd_osfs_lock. Those ones got added to
713                          * the cached statfs data that we are about to crunch.
714                          * Take them into account in the new statfs data */
715                         osfs->os_bavail -= min_t(obd_size, osfs->os_bavail,
716                                                unstable >> ofd->ofd_blockbits);
717                         /* However, we don't really know if those writes got
718                          * accounted in the statfs call, so tell
719                          * ofd_grant_space_left() there is some uncertainty
720                          * on the accounting of those writes.
721                          * The purpose is to prevent spurious error messages in
722                          * ofd_grant_space_left() since those writes might be
723                          * accounted twice. */
724                         ofd->ofd_osfs_unstable += unstable;
725                 }
726                 /* similarly, there is some uncertainty on write requests
727                  * between prepare & commit */
728                 ofd->ofd_osfs_unstable += ofd->ofd_tot_pending;
729                 spin_unlock(&ofd->ofd_grant_lock);
730
731                 /* finally udpate cached statfs data */
732                 ofd->ofd_osfs = *osfs;
733                 ofd->ofd_osfs_age = cfs_time_current_64();
734
735                 ofd->ofd_statfs_inflight--; /* stop tracking */
736                 if (ofd->ofd_statfs_inflight == 0)
737                         ofd->ofd_osfs_inflight = 0;
738                 spin_unlock(&ofd->ofd_osfs_lock);
739
740                 if (from_cache)
741                         *from_cache = 0;
742         } else {
743                 /* use cached statfs data */
744                 *osfs = ofd->ofd_osfs;
745                 spin_unlock(&ofd->ofd_osfs_lock);
746                 if (from_cache)
747                         *from_cache = 1;
748         }
749         return 0;
750 }
751
752 static int ofd_statfs(const struct lu_env *env,  struct obd_export *exp,
753                       struct obd_statfs *osfs, __u64 max_age, __u32 flags)
754 {
755         struct obd_device       *obd = class_exp2obd(exp);
756         struct ofd_device       *ofd = ofd_dev(exp->exp_obd->obd_lu_dev);
757         int                      rc;
758
759         ENTRY;
760
761         rc = ofd_statfs_internal(env, ofd, osfs, max_age, NULL);
762         if (unlikely(rc))
763                 GOTO(out, rc);
764
765         /* at least try to account for cached pages.  its still racy and
766          * might be under-reporting if clients haven't announced their
767          * caches with brw recently */
768
769         CDEBUG(D_SUPER | D_CACHE, "blocks cached "LPU64" granted "LPU64
770                " pending "LPU64" free "LPU64" avail "LPU64"\n",
771                ofd->ofd_tot_dirty, ofd->ofd_tot_granted, ofd->ofd_tot_pending,
772                osfs->os_bfree << ofd->ofd_blockbits,
773                osfs->os_bavail << ofd->ofd_blockbits);
774
775         osfs->os_bavail -= min_t(obd_size, osfs->os_bavail,
776                                  ((ofd->ofd_tot_dirty + ofd->ofd_tot_pending +
777                                    osfs->os_bsize - 1) >> ofd->ofd_blockbits));
778
779         /* The QoS code on the MDS does not care about space reserved for
780          * precreate, so take it out. */
781         if (exp_connect_flags(exp) & OBD_CONNECT_MDS) {
782                 struct filter_export_data *fed;
783
784                 fed = &obd->obd_self_export->exp_filter_data;
785                 osfs->os_bavail -= min_t(obd_size, osfs->os_bavail,
786                                          fed->fed_grant >> ofd->ofd_blockbits);
787         }
788
789         ofd_grant_sanity_check(obd, __FUNCTION__);
790         CDEBUG(D_CACHE, LPU64" blocks: "LPU64" free, "LPU64" avail; "
791                LPU64" objects: "LPU64" free; state %x\n",
792                osfs->os_blocks, osfs->os_bfree, osfs->os_bavail,
793                osfs->os_files, osfs->os_ffree, osfs->os_state);
794
795         if (OBD_FAIL_CHECK_VALUE(OBD_FAIL_OST_ENOINO,
796                                  ofd->ofd_lut.lut_lsd.lsd_osd_index))
797                 osfs->os_ffree = 0;
798
799         /* OS_STATE_READONLY can be set by OSD already */
800         if (ofd->ofd_raid_degraded)
801                 osfs->os_state |= OS_STATE_DEGRADED;
802
803         if (obd->obd_self_export != exp && ofd_grant_compat(exp, ofd)) {
804                 /* clients which don't support OBD_CONNECT_GRANT_PARAM
805                  * should not see a block size > page size, otherwise
806                  * cl_lost_grant goes mad. Therefore, we emulate a 4KB (=2^12)
807                  * block size which is the biggest block size known to work
808                  * with all client's page size. */
809                 osfs->os_blocks <<= ofd->ofd_blockbits - COMPAT_BSIZE_SHIFT;
810                 osfs->os_bfree  <<= ofd->ofd_blockbits - COMPAT_BSIZE_SHIFT;
811                 osfs->os_bavail <<= ofd->ofd_blockbits - COMPAT_BSIZE_SHIFT;
812                 osfs->os_bsize    = 1 << COMPAT_BSIZE_SHIFT;
813         }
814
815         if (OBD_FAIL_CHECK_VALUE(OBD_FAIL_OST_ENOSPC,
816                                  ofd->ofd_lut.lut_lsd.lsd_osd_index))
817                 osfs->os_bfree = osfs->os_bavail = 2;
818
819         EXIT;
820 out:
821         return rc;
822 }
823
824 int ofd_setattr(const struct lu_env *env, struct obd_export *exp,
825                 struct obd_info *oinfo, struct obd_trans_info *oti)
826 {
827         struct ofd_thread_info  *info;
828         struct ofd_device       *ofd = ofd_exp(exp);
829         struct ldlm_namespace   *ns = ofd->ofd_namespace;
830         struct ldlm_resource    *res;
831         struct ofd_object       *fo;
832         struct obdo             *oa = oinfo->oi_oa;
833         struct filter_fid       *ff = NULL;
834         int                      rc = 0;
835
836         ENTRY;
837
838         info = ofd_info_init(env, exp);
839         ofd_oti2info(info, oti);
840
841         rc = ostid_to_fid(&info->fti_fid, &oinfo->oi_oa->o_oi, 0);
842         if (rc != 0)
843                 RETURN(rc);
844
845         ost_fid_build_resid(&info->fti_fid, &info->fti_resid);
846         rc = ofd_auth_capa(exp, &info->fti_fid, ostid_seq(&oa->o_oi),
847                            oinfo_capa(oinfo), CAPA_OPC_META_WRITE);
848         if (rc)
849                 GOTO(out, rc);
850
851         /* This would be very bad - accidentally truncating a file when
852          * changing the time or similar - bug 12203. */
853         if (oinfo->oi_oa->o_valid & OBD_MD_FLSIZE &&
854             oinfo->oi_policy.l_extent.end != OBD_OBJECT_EOF) {
855                 static char mdsinum[48];
856
857                 if (oinfo->oi_oa->o_valid & OBD_MD_FLFID)
858                         snprintf(mdsinum, sizeof(mdsinum) - 1,
859                                  "of parent "DFID, oinfo->oi_oa->o_parent_seq,
860                                  oinfo->oi_oa->o_parent_oid, 0);
861                 else
862                         mdsinum[0] = '\0';
863
864                 CERROR("%s: setattr from %s trying to truncate object "DFID
865                        " %s\n", exp->exp_obd->obd_name,
866                        obd_export_nid2str(exp), PFID(&info->fti_fid), mdsinum);
867                 GOTO(out, rc = -EPERM);
868         }
869
870         fo = ofd_object_find(env, ofd, &info->fti_fid);
871         if (IS_ERR(fo)) {
872                 CERROR("%s: can't find object "DFID"\n",
873                        exp->exp_obd->obd_name, PFID(&info->fti_fid));
874                 GOTO(out, rc = PTR_ERR(fo));
875         }
876
877         la_from_obdo(&info->fti_attr, oinfo->oi_oa, oinfo->oi_oa->o_valid);
878         info->fti_attr.la_valid &= ~LA_TYPE;
879
880         if (oa->o_valid & OBD_MD_FLFID) {
881                 ff = &info->fti_mds_fid;
882                 ofd_prepare_fidea(ff, oa);
883         }
884
885         /* setting objects attributes (including owner/group) */
886         rc = ofd_attr_set(env, fo, &info->fti_attr, ff);
887         if (rc)
888                 GOTO(out_unlock, rc);
889
890         ofd_info2oti(info, oti);
891
892         ofd_counter_incr(exp, LPROC_OFD_STATS_SETATTR, oti->oti_jobid, 1);
893         EXIT;
894 out_unlock:
895         ofd_object_put(env, fo);
896 out:
897         if (rc == 0) {
898                 /* we do not call this before to avoid lu_object_find() in
899                  *  ->lvbo_update() holding another reference on the object.
900                  * otherwise concurrent destroy can make the object unavailable
901                  * for 2nd lu_object_find() waiting for the first reference
902                  * to go... deadlock! */
903                 res = ldlm_resource_get(ns, NULL, &info->fti_resid, LDLM_EXTENT, 0);
904                 if (res != NULL) {
905                         ldlm_res_lvbo_update(res, NULL, 0);
906                         ldlm_resource_putref(res);
907                 }
908         }
909
910         return rc;
911 }
912
913 static int ofd_punch(const struct lu_env *env, struct obd_export *exp,
914                      struct obd_info *oinfo, struct obd_trans_info *oti,
915                      struct ptlrpc_request_set *rqset)
916 {
917         struct ofd_thread_info  *info;
918         struct ofd_device       *ofd = ofd_exp(exp);
919         struct ldlm_namespace   *ns = ofd->ofd_namespace;
920         struct ldlm_resource    *res;
921         struct ofd_object       *fo;
922         struct filter_fid       *ff = NULL;
923         int                      rc = 0;
924
925         ENTRY;
926
927         info = ofd_info_init(env, exp);
928         ofd_oti2info(info, oti);
929
930         rc = ostid_to_fid(&info->fti_fid, &oinfo->oi_oa->o_oi, 0);
931         if (rc != 0)
932                 RETURN(rc);
933         ost_fid_build_resid(&info->fti_fid, &info->fti_resid);
934
935         CDEBUG(D_INODE, "calling punch for object "DFID", valid = "LPX64
936                ", start = "LPD64", end = "LPD64"\n", PFID(&info->fti_fid),
937                oinfo->oi_oa->o_valid, oinfo->oi_policy.l_extent.start,
938                oinfo->oi_policy.l_extent.end);
939
940         rc = ofd_auth_capa(exp, &info->fti_fid, ostid_seq(&oinfo->oi_oa->o_oi),
941                            oinfo_capa(oinfo), CAPA_OPC_OSS_TRUNC);
942         if (rc)
943                 GOTO(out_env, rc);
944
945         fo = ofd_object_find(env, ofd, &info->fti_fid);
946         if (IS_ERR(fo)) {
947                 CERROR("%s: error finding object "DFID": rc = %ld\n",
948                        exp->exp_obd->obd_name, PFID(&info->fti_fid),
949                        PTR_ERR(fo));
950                 GOTO(out_env, rc = PTR_ERR(fo));
951         }
952
953         LASSERT(oinfo->oi_policy.l_extent.end == OBD_OBJECT_EOF);
954         if (oinfo->oi_policy.l_extent.end == OBD_OBJECT_EOF) {
955                 /* Truncate case */
956                 oinfo->oi_oa->o_size = oinfo->oi_policy.l_extent.start;
957         } else if (oinfo->oi_policy.l_extent.end >= oinfo->oi_oa->o_size) {
958                 oinfo->oi_oa->o_size = oinfo->oi_policy.l_extent.end;
959         }
960
961         la_from_obdo(&info->fti_attr, oinfo->oi_oa,
962                      OBD_MD_FLMTIME | OBD_MD_FLATIME | OBD_MD_FLCTIME);
963         info->fti_attr.la_valid &= ~LA_TYPE;
964         info->fti_attr.la_size = oinfo->oi_policy.l_extent.start;
965         info->fti_attr.la_valid |= LA_SIZE;
966
967         if (oinfo->oi_oa->o_valid & OBD_MD_FLFID) {
968                 ff = &info->fti_mds_fid;
969                 ofd_prepare_fidea(ff, oinfo->oi_oa);
970         }
971
972         rc = ofd_object_punch(env, fo, oinfo->oi_policy.l_extent.start,
973                               oinfo->oi_policy.l_extent.end, &info->fti_attr,
974                               ff);
975         if (rc)
976                 GOTO(out, rc);
977
978         res = ldlm_resource_get(ns, NULL, &info->fti_resid, LDLM_EXTENT, 0);
979         if (res != NULL) {
980                 ldlm_res_lvbo_update(res, NULL, 0);
981                 ldlm_resource_putref(res);
982         }
983
984         oinfo->oi_oa->o_valid = OBD_MD_FLID;
985         /* Quota release needs uid/gid info */
986         rc = ofd_attr_get(env, fo, &info->fti_attr);
987         obdo_from_la(oinfo->oi_oa, &info->fti_attr,
988                      OFD_VALID_FLAGS | LA_UID | LA_GID);
989         ofd_info2oti(info, oti);
990
991         ofd_counter_incr(exp, LPROC_OFD_STATS_PUNCH, oti->oti_jobid, 1);
992         EXIT;
993 out:
994         ofd_object_put(env, fo);
995 out_env:
996         return rc;
997 }
998
999 static int ofd_destroy_by_fid(const struct lu_env *env,
1000                               struct ofd_device *ofd,
1001                               const struct lu_fid *fid, int orphan)
1002 {
1003         struct ofd_thread_info  *info = ofd_info(env);
1004         struct lustre_handle     lockh;
1005         __u64                    flags = LDLM_FL_AST_DISCARD_DATA;
1006         __u64                    rc = 0;
1007         ldlm_policy_data_t       policy = {
1008                                         .l_extent = { 0, OBD_OBJECT_EOF }
1009                                  };
1010         struct ofd_object       *fo;
1011
1012         ENTRY;
1013
1014         fo = ofd_object_find(env, ofd, fid);
1015         if (IS_ERR(fo))
1016                 RETURN(PTR_ERR(fo));
1017         if (!ofd_object_exists(fo))
1018                 GOTO(out, rc = -ENOENT);
1019
1020         /* Tell the clients that the object is gone now and that they should
1021          * throw away any cached pages. */
1022         ost_fid_build_resid(fid, &info->fti_resid);
1023         rc = ldlm_cli_enqueue_local(ofd->ofd_namespace, &info->fti_resid,
1024                                     LDLM_EXTENT, &policy, LCK_PW, &flags,
1025                                     ldlm_blocking_ast, ldlm_completion_ast,
1026                                     NULL, NULL, 0, LVB_T_NONE, NULL, &lockh);
1027
1028         /* We only care about the side-effects, just drop the lock. */
1029         if (rc == ELDLM_OK)
1030                 ldlm_lock_decref(&lockh, LCK_PW);
1031
1032         LASSERT(fo != NULL);
1033
1034         rc = ofd_object_destroy(env, fo, orphan);
1035         EXIT;
1036 out:
1037         ofd_object_put(env, fo);
1038         RETURN(rc);
1039 }
1040
1041 int ofd_destroy(const struct lu_env *env, struct obd_export *exp,
1042                 struct obdo *oa, struct lov_stripe_md *md,
1043                 struct obd_trans_info *oti, struct obd_export *md_exp,
1044                 void *capa)
1045 {
1046         struct ofd_device       *ofd = ofd_exp(exp);
1047         struct ofd_thread_info  *info;
1048         obd_count                count;
1049         int                      rc = 0;
1050
1051         ENTRY;
1052
1053         info = ofd_info_init(env, exp);
1054         ofd_oti2info(info, oti);
1055
1056         if (!(oa->o_valid & OBD_MD_FLGROUP))
1057                 ostid_set_seq_mdt0(&oa->o_oi);
1058
1059         /* check that o_misc makes sense */
1060         if (oa->o_valid & OBD_MD_FLOBJCOUNT)
1061                 count = oa->o_misc;
1062         else
1063                 count = 1; /* default case - single destroy */
1064
1065         /**
1066          * There can be sequence of objects to destroy. Therefore this request
1067          * may have multiple transaction involved in. It is OK, we need only
1068          * the highest used transno to be reported back in reply but not for
1069          * replays, they must report their transno
1070          */
1071         if (info->fti_transno == 0) /* not replay */
1072                 info->fti_mult_trans = 1;
1073
1074         CDEBUG(D_HA, "%s: Destroy object "DOSTID" count %d\n", ofd_name(ofd),
1075                POSTID(&oa->o_oi), count);
1076         while (count > 0) {
1077                 int lrc;
1078
1079                 lrc = ostid_to_fid(&info->fti_fid, &oa->o_oi, 0);
1080                 if (lrc != 0) {
1081                         if (rc == 0)
1082                                 rc = lrc;
1083                         GOTO(out, rc);
1084                 }
1085                 lrc = ofd_destroy_by_fid(env, ofd, &info->fti_fid, 0);
1086                 if (lrc == -ENOENT) {
1087                         CDEBUG(D_INODE,
1088                                "%s: destroying non-existent object "DFID"\n",
1089                                ofd_obd(ofd)->obd_name, PFID(&info->fti_fid));
1090                         /* rewrite rc with -ENOENT only if it is 0 */
1091                         if (rc == 0)
1092                                 rc = lrc;
1093                 } else if (lrc != 0) {
1094                         CERROR("%s: error destroying object "DFID": %d\n",
1095                                ofd_obd(ofd)->obd_name, PFID(&info->fti_fid),
1096                                rc);
1097                         rc = lrc;
1098                 }
1099                 count--;
1100                 ostid_inc_id(&oa->o_oi);
1101         }
1102
1103         /* if we have transaction then there were some deletions, we don't
1104          * need to return ENOENT in that case because it will not wait
1105          * for commit of these deletions. The ENOENT must be returned only
1106          * if there were no transations.
1107          */
1108         if (rc == -ENOENT) {
1109                 if (info->fti_transno != 0)
1110                         rc = 0;
1111         } else if (rc != 0) {
1112                 /*
1113                  * If we have at least one transaction then llog record
1114                  * on server will be removed upon commit, so for rc != 0
1115                  * we return no transno and llog record will be reprocessed.
1116                  */
1117                 info->fti_transno = 0;
1118         }
1119         ofd_info2oti(info, oti);
1120 out:
1121         RETURN(rc);
1122 }
1123
1124 static int ofd_orphans_destroy(const struct lu_env *env,
1125                                struct obd_export *exp, struct ofd_device *ofd,
1126                                struct obdo *oa)
1127 {
1128         struct ofd_thread_info  *info = ofd_info(env);
1129         obd_id                   last;
1130         int                      skip_orphan;
1131         int                      rc = 0;
1132         struct ost_id            oi = oa->o_oi;
1133         __u64                    end_id = ostid_id(&oa->o_oi);
1134         struct ofd_seq          *oseq;
1135
1136         ENTRY;
1137
1138         oseq = ofd_seq_get(ofd, ostid_seq(&oa->o_oi));
1139         if (oseq == NULL) {
1140                 CERROR("%s: Can not find seq for "DOSTID"\n",
1141                        ofd_name(ofd), POSTID(&oa->o_oi));
1142                 RETURN(-EINVAL);
1143         }
1144
1145         LASSERT(exp != NULL);
1146         skip_orphan = !!(exp_connect_flags(exp) & OBD_CONNECT_SKIP_ORPHAN);
1147
1148         last = ofd_seq_last_oid(oseq);
1149         LCONSOLE(D_INFO, "%s: deleting orphan objects from "DOSTID
1150                  " to "DOSTID"\n", ofd_name(ofd), ostid_seq(&oa->o_oi),
1151                  end_id + 1, ostid_seq(&oa->o_oi), last);
1152
1153         for (ostid_set_id(&oi, last); ostid_id(&oi) > end_id;
1154                           ostid_dec_id(&oi)) {
1155                 rc = ostid_to_fid(&info->fti_fid, &oi, 0);
1156                 if (rc != 0)
1157                         GOTO(out_put, rc);
1158                 rc = ofd_destroy_by_fid(env, ofd, &info->fti_fid, 1);
1159                 if (rc && rc != -ENOENT) /* this is pretty fatal... */
1160                         CEMERG("%s: error destroying precreated id "DOSTID
1161                                ": rc = %d\n", ofd_name(ofd), POSTID(&oi), rc);
1162                 if (!skip_orphan) {
1163                         ofd_seq_last_oid_set(oseq, ostid_id(&oi) - 1);
1164                         /* update last_id on disk periodically so that if we
1165                          * restart * we don't need to re-scan all of the just
1166                          * deleted objects. */
1167                         if ((ostid_id(&oi) & 511) == 0)
1168                                 ofd_seq_last_oid_write(env, ofd, oseq);
1169                 }
1170         }
1171         CDEBUG(D_HA, "%s: after destroy: set last_id to "DOSTID"\n",
1172                ofd_obd(ofd)->obd_name, POSTID(&oa->o_oi));
1173         if (!skip_orphan) {
1174                 rc = ofd_seq_last_oid_write(env, ofd, oseq);
1175         } else {
1176                 /* don't reuse orphan object, return last used objid */
1177                 ostid_set_id(&oa->o_oi, last);
1178                 rc = 0;
1179         }
1180 out_put:
1181         ofd_seq_put(env, oseq);
1182         RETURN(rc);
1183 }
1184
1185 int ofd_create(const struct lu_env *env, struct obd_export *exp,
1186                struct obdo *oa, struct lov_stripe_md **ea,
1187                struct obd_trans_info *oti)
1188 {
1189         struct ofd_device       *ofd = ofd_exp(exp);
1190         struct ofd_thread_info  *info;
1191         obd_seq                 seq = ostid_seq(&oa->o_oi);
1192         struct ofd_seq          *oseq;
1193         int                     rc = 0, diff;
1194         int                     sync_trans = 0;
1195
1196         ENTRY;
1197
1198         info = ofd_info_init(env, exp);
1199         ofd_oti2info(info, oti);
1200
1201         LASSERT(ostid_seq(&oa->o_oi) >= FID_SEQ_OST_MDT0);
1202         LASSERT(oa->o_valid & OBD_MD_FLGROUP);
1203
1204         CDEBUG(D_INFO, "ofd_create("DOSTID")\n", POSTID(&oa->o_oi));
1205
1206         oseq = ofd_seq_load(env, ofd, seq);
1207         if (IS_ERR(oseq)) {
1208                 CERROR("%s: Can't find FID Sequence "LPX64": rc = %ld\n",
1209                        ofd_name(ofd), seq, PTR_ERR(oseq));
1210                 RETURN(-EINVAL);
1211         }
1212
1213         if ((oa->o_valid & OBD_MD_FLFLAGS) &&
1214             (oa->o_flags & OBD_FL_RECREATE_OBJS)) {
1215                 if (!ofd_obd(ofd)->obd_recovering ||
1216                     ostid_id(&oa->o_oi) > ofd_seq_last_oid(oseq)) {
1217                         CERROR("recreate objid "DOSTID" > last id "LPU64"\n",
1218                                POSTID(&oa->o_oi), ofd_seq_last_oid(oseq));
1219                         GOTO(out_nolock, rc = -EINVAL);
1220                 }
1221                 /* do nothing because we create objects during first write */
1222                 GOTO(out_nolock, rc = 0);
1223         }
1224         /* former ofd_handle_precreate */
1225         if ((oa->o_valid & OBD_MD_FLFLAGS) &&
1226             (oa->o_flags & OBD_FL_DELORPHAN)) {
1227                 /* destroy orphans */
1228                 if (oti->oti_conn_cnt < exp->exp_conn_cnt) {
1229                         CERROR("%s: dropping old orphan cleanup request\n",
1230                                ofd_name(ofd));
1231                         GOTO(out_nolock, rc = 0);
1232                 }
1233                 /* This causes inflight precreates to abort and drop lock */
1234                 oseq->os_destroys_in_progress = 1;
1235                 mutex_lock(&oseq->os_create_lock);
1236                 if (!oseq->os_destroys_in_progress) {
1237                         CERROR("%s:["LPU64"] destroys_in_progress already"
1238                                " cleared\n", exp->exp_obd->obd_name,
1239                                ostid_seq(&oa->o_oi));
1240                         ostid_set_id(&oa->o_oi, ofd_seq_last_oid(oseq));
1241                         GOTO(out, rc = 0);
1242                 }
1243                 diff = ostid_id(&oa->o_oi) - ofd_seq_last_oid(oseq);
1244                 CDEBUG(D_HA, "ofd_last_id() = "LPU64" -> diff = %d\n",
1245                         ofd_seq_last_oid(oseq), diff);
1246                 if (-diff > OST_MAX_PRECREATE) {
1247                         /* FIXME: should reset precreate_next_id on MDS */
1248                         rc = 0;
1249                 } else if (diff < 0) {
1250                         rc = ofd_orphans_destroy(env, exp, ofd, oa);
1251                         oseq->os_destroys_in_progress = 0;
1252                 } else {
1253                         /* XXX: Used by MDS for the first time! */
1254                         oseq->os_destroys_in_progress = 0;
1255                 }
1256         } else {
1257                 mutex_lock(&oseq->os_create_lock);
1258                 if (oti->oti_conn_cnt < exp->exp_conn_cnt) {
1259                         CERROR("%s: dropping old precreate request\n",
1260                                 ofd_obd(ofd)->obd_name);
1261                         GOTO(out, rc = 0);
1262                 }
1263                 /* only precreate if seq is 0, IDIF or normal and also o_id
1264                  * must be specfied */
1265                 if ((!fid_seq_is_mdt(ostid_seq(&oa->o_oi)) &&
1266                      !fid_seq_is_norm(ostid_seq(&oa->o_oi)) &&
1267                      !fid_seq_is_idif(ostid_seq(&oa->o_oi))) ||
1268                                 ostid_id(&oa->o_oi) == 0) {
1269                         diff = 1; /* shouldn't we create this right now? */
1270                 } else {
1271                         diff = ostid_id(&oa->o_oi) - ofd_seq_last_oid(oseq);
1272                         /* Do sync create if the seq is about to used up */
1273                         if (fid_seq_is_idif(ostid_seq(&oa->o_oi)) ||
1274                             fid_seq_is_mdt0(ostid_seq(&oa->o_oi))) {
1275                                 if (unlikely(ostid_id(&oa->o_oi) >= IDIF_MAX_OID - 1))
1276                                         sync_trans = 1;
1277                         } else if (fid_seq_is_norm(ostid_seq(&oa->o_oi))) {
1278                                 if (unlikely(ostid_id(&oa->o_oi) >=
1279                                              LUSTRE_DATA_SEQ_MAX_WIDTH - 1))
1280                                         sync_trans = 1;
1281                         } else {
1282                                 CERROR("%s : invalid o_seq "DOSTID": rc = %d\n",
1283                                        ofd_name(ofd), POSTID(&oa->o_oi), -EINVAL);
1284                                 GOTO(out, rc = -EINVAL);
1285                         }
1286                 }
1287         }
1288         if (diff > 0) {
1289                 cfs_time_t       enough_time = cfs_time_shift(DISK_TIMEOUT);
1290                 obd_id           next_id;
1291                 int              created = 0;
1292                 int              count;
1293
1294                 if (!(oa->o_valid & OBD_MD_FLFLAGS) ||
1295                     !(oa->o_flags & OBD_FL_DELORPHAN)) {
1296                         /* don't enforce grant during orphan recovery */
1297                         rc = ofd_grant_create(env,
1298                                               ofd_obd(ofd)->obd_self_export,
1299                                               &diff);
1300                         if (rc) {
1301                                 CDEBUG(D_HA, "%s: failed to acquire grant "
1302                                        "space for precreate (%d): rc = %d\n",
1303                                        ofd_name(ofd), diff, rc);
1304                                 diff = 0;
1305                         }
1306                 }
1307
1308                 /* This can happen if a new OST is formatted and installed
1309                  * in place of an old one at the same index.  Instead of
1310                  * precreating potentially millions of deleted old objects
1311                  * (possibly filling the OST), only precreate the last batch.
1312                  * LFSCK will eventually clean up any orphans. LU-14 */
1313                 if (diff > 5 * OST_MAX_PRECREATE) {
1314                         diff = OST_MAX_PRECREATE / 2;
1315                         LCONSOLE_WARN("%s: precreate FID "DOSTID" is over %u "
1316                                       "larger than the LAST_ID "DOSTID", only "
1317                                       "precreating the last %u objects.\n",
1318                                       ofd_name(ofd), POSTID(&oa->o_oi),
1319                                       5 * OST_MAX_PRECREATE,
1320                                       POSTID(&oseq->os_oi), diff);
1321                         ofd_seq_last_oid_set(oseq, ostid_id(&oa->o_oi) - diff);
1322                 }
1323
1324                 while (diff > 0) {
1325                         next_id = ofd_seq_last_oid(oseq) + 1;
1326                         count = ofd_precreate_batch(ofd, diff);
1327
1328                         CDEBUG(D_HA, "%s: reserve %d objects in group "LPX64
1329                                " at "LPU64"\n", ofd_obd(ofd)->obd_name,
1330                                count, ostid_seq(&oa->o_oi), next_id);
1331
1332                         if (cfs_time_after(jiffies, enough_time)) {
1333                                 LCONSOLE_WARN("%s: Slow creates, %d/%d objects"
1334                                               " created at a rate of %d/s\n",
1335                                               ofd_obd(ofd)->obd_name,
1336                                               created, diff + created,
1337                                               created / DISK_TIMEOUT);
1338                                 break;
1339                         }
1340
1341                         rc = ofd_precreate_objects(env, ofd, next_id,
1342                                                    oseq, count, sync_trans);
1343                         if (rc > 0) {
1344                                 created += rc;
1345                                 diff -= rc;
1346                         } else if (rc < 0) {
1347                                 break;
1348                         }
1349                 }
1350                 if (created > 0)
1351                         /* some objects got created, we can return
1352                          * them, even if last creation failed */
1353                         rc = 0;
1354                 else
1355                         CERROR("%s: unable to precreate: rc = %d\n",
1356                                ofd_name(ofd), rc);
1357
1358                 ostid_set_id(&oa->o_oi, ofd_seq_last_oid(oseq));
1359                 oa->o_valid |= OBD_MD_FLID | OBD_MD_FLGROUP;
1360
1361                 if (!(oa->o_valid & OBD_MD_FLFLAGS) ||
1362                     !(oa->o_flags & OBD_FL_DELORPHAN))
1363                         ofd_grant_commit(env, ofd_obd(ofd)->obd_self_export,
1364                                          rc);
1365         }
1366
1367         ofd_info2oti(info, oti);
1368 out:
1369         mutex_unlock(&oseq->os_create_lock);
1370 out_nolock:
1371         if (rc == 0 && ea != NULL) {
1372                 struct lov_stripe_md *lsm = *ea;
1373
1374                 lsm->lsm_oi = oa->o_oi;
1375         }
1376         ofd_seq_put(env, oseq);
1377         RETURN(rc);
1378 }
1379
1380 int ofd_getattr(const struct lu_env *env, struct obd_export *exp,
1381                 struct obd_info *oinfo)
1382 {
1383         struct ofd_device       *ofd = ofd_exp(exp);
1384         struct ofd_thread_info  *info;
1385         struct ofd_object       *fo;
1386         int                      rc = 0;
1387
1388         ENTRY;
1389
1390         info = ofd_info_init(env, exp);
1391
1392         rc = ostid_to_fid(&info->fti_fid, &oinfo->oi_oa->o_oi, 0);
1393         if (rc != 0)
1394                 GOTO(out, rc);
1395         rc = ofd_auth_capa(exp, &info->fti_fid, ostid_seq(&oinfo->oi_oa->o_oi),
1396                            oinfo_capa(oinfo), CAPA_OPC_META_READ);
1397         if (rc)
1398                 GOTO(out, rc);
1399
1400         fo = ofd_object_find(env, ofd, &info->fti_fid);
1401         if (IS_ERR(fo))
1402                 GOTO(out, rc = PTR_ERR(fo));
1403         if (!ofd_object_exists(fo))
1404                 GOTO(out_put, rc = -ENOENT);
1405
1406         LASSERT(fo != NULL);
1407         rc = ofd_attr_get(env, fo, &info->fti_attr);
1408         oinfo->oi_oa->o_valid = OBD_MD_FLID;
1409         if (rc == 0) {
1410                 __u64 curr_version;
1411
1412                 obdo_from_la(oinfo->oi_oa, &info->fti_attr,
1413                              OFD_VALID_FLAGS | LA_UID | LA_GID);
1414
1415                 /* Store object version in reply */
1416                 curr_version = dt_version_get(env, ofd_object_child(fo));
1417                 if ((__s64)curr_version != -EOPNOTSUPP) {
1418                         oinfo->oi_oa->o_valid |= OBD_MD_FLDATAVERSION;
1419                         oinfo->oi_oa->o_data_version = curr_version;
1420                 }
1421         }
1422
1423 out_put:
1424         ofd_object_put(env, fo);
1425 out:
1426         RETURN(rc);
1427 }
1428
1429 static int ofd_sync(const struct lu_env *env, struct obd_export *exp,
1430                     struct obd_info *oinfo, obd_size start, obd_size end,
1431                     struct ptlrpc_request_set *set)
1432 {
1433         struct ofd_device       *ofd = ofd_exp(exp);
1434         struct ofd_thread_info  *info;
1435         struct ofd_object       *fo;
1436         int                      rc = 0;
1437
1438         ENTRY;
1439
1440         /* if no objid is specified, it means "sync whole filesystem" */
1441         if (oinfo->oi_oa == NULL || !(oinfo->oi_oa->o_valid & OBD_MD_FLID)) {
1442                 rc = dt_sync(env, ofd->ofd_osd);
1443                 GOTO(out, rc);
1444         }
1445
1446         info = ofd_info_init(env, exp);
1447         rc = ostid_to_fid(&info->fti_fid, &oinfo->oi_oa->o_oi, 0);
1448         if (rc != 0)
1449                 GOTO(out, rc);
1450
1451         rc = ofd_auth_capa(exp, &info->fti_fid, ostid_seq(&oinfo->oi_oa->o_oi),
1452                            oinfo_capa(oinfo), CAPA_OPC_OSS_TRUNC);
1453         if (rc)
1454                 GOTO(out, rc);
1455
1456         fo = ofd_object_find(env, ofd, &info->fti_fid);
1457         if (IS_ERR(fo)) {
1458                 CERROR("%s: error finding object "DFID": rc = %ld\n",
1459                        exp->exp_obd->obd_name, PFID(&info->fti_fid),
1460                        PTR_ERR(fo));
1461                 GOTO(out, rc = PTR_ERR(fo));
1462         }
1463
1464         if (!ofd_object_exists(fo))
1465                 GOTO(put, rc = -ENOENT);
1466
1467         if (dt_version_get(env, ofd_object_child(fo)) >
1468             ofd_obd(ofd)->obd_last_committed) {
1469                 rc = dt_object_sync(env, ofd_object_child(fo));
1470                 if (rc)
1471                         GOTO(put, rc);
1472         }
1473
1474         oinfo->oi_oa->o_valid = OBD_MD_FLID;
1475         rc = ofd_attr_get(env, fo, &info->fti_attr);
1476         obdo_from_la(oinfo->oi_oa, &info->fti_attr, OFD_VALID_FLAGS);
1477
1478         ofd_counter_incr(exp, LPROC_OFD_STATS_SYNC, oinfo->oi_jobid, 1);
1479         EXIT;
1480 put:
1481         ofd_object_put(env, fo);
1482 out:
1483         return rc;
1484 }
1485
1486 static int ofd_ioc_get_obj_version(const struct lu_env *env,
1487                                    struct ofd_device *ofd, void *karg)
1488 {
1489         struct obd_ioctl_data *data = karg;
1490         struct lu_fid          fid;
1491         struct ofd_object     *fo;
1492         dt_obj_version_t       version;
1493         int                    rc = 0;
1494
1495         ENTRY;
1496
1497         if (data->ioc_inlbuf2 == NULL || data->ioc_inllen2 != sizeof(version))
1498                 GOTO(out, rc = -EINVAL);
1499
1500         if (data->ioc_inlbuf1 != NULL && data->ioc_inllen1 == sizeof(fid)) {
1501                 fid = *(struct lu_fid *)data->ioc_inlbuf1;
1502         } else if (data->ioc_inlbuf3 != NULL &&
1503                    data->ioc_inllen3 == sizeof(__u64) &&
1504                    data->ioc_inlbuf4 != NULL &&
1505                    data->ioc_inllen4 == sizeof(__u64)) {
1506                 struct ost_id ostid;
1507
1508                 ostid_set_seq(&ostid, *(__u64 *)data->ioc_inlbuf4);
1509                 ostid_set_id(&ostid, *(__u64 *)data->ioc_inlbuf3);
1510                 rc = ostid_to_fid(&fid, &ostid, 0);
1511                 if (rc != 0)
1512                         GOTO(out, rc);
1513         } else {
1514                 GOTO(out, rc = -EINVAL);
1515         }
1516
1517         if (!fid_is_sane(&fid))
1518                 GOTO(out, rc = -EINVAL);
1519
1520         fo = ofd_object_find(env, ofd, &fid);
1521         if (IS_ERR(fo))
1522                 GOTO(out, rc = PTR_ERR(fo));
1523
1524         if (!ofd_object_exists(fo))
1525                 GOTO(out_fo, rc = -ENOENT);
1526
1527         if (lu_object_remote(&fo->ofo_obj.do_lu))
1528                 GOTO(out_fo, rc = -EREMOTE);
1529
1530         version = dt_version_get(env, ofd_object_child(fo));
1531         if (version == 0)
1532                 GOTO(out_fo, rc = -EIO);
1533
1534         *(dt_obj_version_t *)data->ioc_inlbuf2 = version;
1535
1536         EXIT;
1537 out_fo:
1538         ofd_object_put(env, fo);
1539 out:
1540         return rc;
1541 }
1542
1543 int ofd_iocontrol(unsigned int cmd, struct obd_export *exp, int len,
1544                   void *karg, void *uarg)
1545 {
1546         struct lu_env            env;
1547         struct ofd_device       *ofd = ofd_exp(exp);
1548         struct obd_device       *obd = ofd_obd(ofd);
1549         int                      rc;
1550
1551         ENTRY;
1552
1553         CDEBUG(D_IOCTL, "handling ioctl cmd %#x\n", cmd);
1554         rc = lu_env_init(&env, LCT_DT_THREAD);
1555         if (rc)
1556                 RETURN(rc);
1557
1558         switch (cmd) {
1559         case OBD_IOC_ABORT_RECOVERY:
1560                 CERROR("%s: aborting recovery\n", obd->obd_name);
1561                 target_stop_recovery_thread(obd);
1562                 break;
1563         case OBD_IOC_SYNC:
1564                 CDEBUG(D_RPCTRACE, "syncing ost %s\n", obd->obd_name);
1565                 rc = dt_sync(&env, ofd->ofd_osd);
1566                 break;
1567         case OBD_IOC_SET_READONLY:
1568                 rc = dt_sync(&env, ofd->ofd_osd);
1569                 if (rc == 0)
1570                         rc = dt_ro(&env, ofd->ofd_osd);
1571                 break;
1572         case OBD_IOC_START_LFSCK: {
1573                 struct obd_ioctl_data *data = karg;
1574                 struct lfsck_start_param lsp;
1575
1576                 if (unlikely(data == NULL)) {
1577                         rc = -EINVAL;
1578                         break;
1579                 }
1580
1581                 lsp.lsp_start = (struct lfsck_start *)(data->ioc_inlbuf1);
1582                 lsp.lsp_namespace = ofd->ofd_namespace;
1583                 rc = lfsck_start(&env, ofd->ofd_osd, &lsp);
1584                 break;
1585         }
1586         case OBD_IOC_STOP_LFSCK: {
1587                 rc = lfsck_stop(&env, ofd->ofd_osd, false);
1588                 break;
1589         }
1590         case OBD_IOC_GET_OBJ_VERSION:
1591                 rc = ofd_ioc_get_obj_version(&env, ofd, karg);
1592                 break;
1593         default:
1594                 CERROR("%s: not supported cmd = %d\n", obd->obd_name, cmd);
1595                 rc = -ENOTTY;
1596         }
1597
1598         lu_env_fini(&env);
1599         RETURN(rc);
1600 }
1601
1602 static int ofd_precleanup(struct obd_device *obd, enum obd_cleanup_stage stage)
1603 {
1604         int rc = 0;
1605
1606         ENTRY;
1607
1608         switch(stage) {
1609         case OBD_CLEANUP_EARLY:
1610                 break;
1611         case OBD_CLEANUP_EXPORTS:
1612                 target_cleanup_recovery(obd);
1613                 break;
1614         }
1615         RETURN(rc);
1616 }
1617
1618 static int ofd_ping(const struct lu_env *env, struct obd_export *exp)
1619 {
1620         ofd_fmd_expire(exp);
1621         return 0;
1622 }
1623
1624 static int ofd_health_check(const struct lu_env *nul, struct obd_device *obd)
1625 {
1626         struct ofd_device       *ofd = ofd_dev(obd->obd_lu_dev);
1627         struct ofd_thread_info  *info;
1628         struct lu_env            env;
1629 #ifdef USE_HEALTH_CHECK_WRITE
1630         struct thandle          *th;
1631 #endif
1632         int                      rc = 0;
1633
1634         /* obd_proc_read_health pass NULL env, we need real one */
1635         rc = lu_env_init(&env, LCT_DT_THREAD);
1636         if (rc)
1637                 RETURN(rc);
1638
1639         info = ofd_info_init(&env, NULL);
1640         rc = dt_statfs(&env, ofd->ofd_osd, &info->fti_u.osfs);
1641         if (unlikely(rc))
1642                 GOTO(out, rc);
1643
1644         if (info->fti_u.osfs.os_state == OS_STATE_READONLY)
1645                 GOTO(out, rc = -EROFS);
1646
1647 #ifdef USE_HEALTH_CHECK_WRITE
1648         OBD_ALLOC(info->fti_buf.lb_buf, PAGE_CACHE_SIZE);
1649         if (info->fti_buf.lb_buf == NULL)
1650                 GOTO(out, rc = -ENOMEM);
1651
1652         info->fti_buf.lb_len = PAGE_CACHE_SIZE;
1653         info->fti_off = 0;
1654
1655         th = dt_trans_create(&env, ofd->ofd_osd);
1656         if (IS_ERR(th))
1657                 GOTO(out, rc = PTR_ERR(th));
1658
1659         rc = dt_declare_record_write(&env, ofd->ofd_health_check_file,
1660                                      info->fti_buf.lb_len, info->fti_off, th);
1661         if (rc == 0) {
1662                 th->th_sync = 1; /* sync IO is needed */
1663                 rc = dt_trans_start_local(&env, ofd->ofd_osd, th);
1664                 if (rc == 0)
1665                         rc = dt_record_write(&env, ofd->ofd_health_check_file,
1666                                              &info->fti_buf, &info->fti_off,
1667                                              th);
1668         }
1669         dt_trans_stop(&env, ofd->ofd_osd, th);
1670
1671         OBD_FREE(info->fti_buf.lb_buf, PAGE_CACHE_SIZE);
1672
1673         CDEBUG(D_INFO, "write 1 page synchronously for checking io rc %d\n",rc);
1674 #endif
1675 out:
1676         lu_env_fini(&env);
1677         return !!rc;
1678 }
1679
1680 /*
1681  * Handle quota control requests to consult current usage/limit.
1682  *
1683  * \param obd - is the obd device associated with the ofd
1684  * \param exp - is the client's export
1685  * \param oqctl - is the obd_quotactl request to be processed
1686  */
1687 static int ofd_quotactl(struct obd_device *obd, struct obd_export *exp,
1688                         struct obd_quotactl *oqctl)
1689 {
1690         struct ofd_device  *ofd = ofd_dev(obd->obd_lu_dev);
1691         struct lu_env       env;
1692         int                 rc;
1693         ENTRY;
1694
1695         /* report success for quota on/off for interoperability with current MDT
1696          * stack */
1697         if (oqctl->qc_cmd == Q_QUOTAON || oqctl->qc_cmd == Q_QUOTAOFF)
1698                 RETURN(0);
1699
1700         rc = lu_env_init(&env, LCT_DT_THREAD);
1701         if (rc)
1702                 RETURN(rc);
1703
1704         rc = lquotactl_slv(&env, ofd->ofd_osd, oqctl);
1705         lu_env_fini(&env);
1706
1707         RETURN(rc);
1708 }
1709
1710 struct obd_ops ofd_obd_ops = {
1711         .o_owner                = THIS_MODULE,
1712         .o_connect              = ofd_obd_connect,
1713         .o_reconnect            = ofd_obd_reconnect,
1714         .o_disconnect           = ofd_obd_disconnect,
1715         .o_set_info_async       = ofd_set_info_async,
1716         .o_get_info             = ofd_get_info,
1717         .o_create               = ofd_create,
1718         .o_statfs               = ofd_statfs,
1719         .o_setattr              = ofd_setattr,
1720         .o_preprw               = ofd_preprw,
1721         .o_commitrw             = ofd_commitrw,
1722         .o_destroy              = ofd_destroy,
1723         .o_init_export          = ofd_init_export,
1724         .o_destroy_export       = ofd_destroy_export,
1725         .o_postrecov            = ofd_obd_postrecov,
1726         .o_punch                = ofd_punch,
1727         .o_getattr              = ofd_getattr,
1728         .o_sync                 = ofd_sync,
1729         .o_iocontrol            = ofd_iocontrol,
1730         .o_precleanup           = ofd_precleanup,
1731         .o_ping                 = ofd_ping,
1732         .o_health_check         = ofd_health_check,
1733         .o_quotactl             = ofd_quotactl,
1734 };