Whamcloud - gitweb
LU-12044 ptlrpc: Translate HABEO_ macros
[fs/lustre-release.git] / lustre / target / tgt_handler.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, write to the
18  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
19  * Boston, MA 021110-1307, USA
20  *
21  * GPL HEADER END
22  */
23 /*
24  * Copyright (c) 2013, 2017, Intel Corporation.
25  */
26 /*
27  * lustre/target/tgt_handler.c
28  *
29  * Lustre Unified Target request handler code
30  *
31  * Author: Brian Behlendorf <behlendorf1@llnl.gov>
32  * Author: Mikhail Pershin <mike.pershin@intel.com>
33  */
34
35 #define DEBUG_SUBSYSTEM S_CLASS
36
37 #include <linux/user_namespace.h>
38 #ifdef HAVE_UIDGID_HEADER
39 # include <linux/uidgid.h>
40 #endif
41
42 #include <obd.h>
43 #include <obd_class.h>
44 #include <obd_cksum.h>
45 #include <lustre_lfsck.h>
46 #include <lustre_nodemap.h>
47 #include <lustre_acl.h>
48
49 #include "tgt_internal.h"
50
51 char *tgt_name(struct lu_target *tgt)
52 {
53         LASSERT(tgt->lut_obd != NULL);
54         return tgt->lut_obd->obd_name;
55 }
56 EXPORT_SYMBOL(tgt_name);
57
58 /*
59  * Generic code handling requests that have struct mdt_body passed in:
60  *
61  *  - extract mdt_body from request and save it in @tsi, if present;
62  *
63  *  - create lu_object, corresponding to the fid in mdt_body, and save it in
64  *  @tsi;
65  *
66  *  - if HAS_BODY flag is set for this request type check whether object
67  *  actually exists on storage (lu_object_exists()).
68  *
69  */
70 static int tgt_mdt_body_unpack(struct tgt_session_info *tsi, __u32 flags)
71 {
72         const struct mdt_body   *body;
73         struct lu_object        *obj;
74         struct req_capsule      *pill = tsi->tsi_pill;
75         int                      rc;
76
77         ENTRY;
78
79         body = req_capsule_client_get(pill, &RMF_MDT_BODY);
80         if (body == NULL)
81                 RETURN(-EFAULT);
82
83         tsi->tsi_mdt_body = body;
84
85         if (!(body->mbo_valid & OBD_MD_FLID))
86                 RETURN(0);
87
88         /* mdc_pack_body() doesn't check if fid is zero and set OBD_ML_FID
89          * in any case in pre-2.5 clients. Fix that here if needed */
90         if (unlikely(fid_is_zero(&body->mbo_fid1)))
91                 RETURN(0);
92
93         if (!fid_is_sane(&body->mbo_fid1)) {
94                 CERROR("%s: invalid FID: "DFID"\n", tgt_name(tsi->tsi_tgt),
95                        PFID(&body->mbo_fid1));
96                 RETURN(-EINVAL);
97         }
98
99         obj = lu_object_find(tsi->tsi_env,
100                              &tsi->tsi_tgt->lut_bottom->dd_lu_dev,
101                              &body->mbo_fid1, NULL);
102         if (!IS_ERR(obj)) {
103                 if ((flags & HAS_BODY) && !lu_object_exists(obj)) {
104                         lu_object_put(tsi->tsi_env, obj);
105                         rc = -ENOENT;
106                 } else {
107                         tsi->tsi_corpus = obj;
108                         rc = 0;
109                 }
110         } else {
111                 rc = PTR_ERR(obj);
112         }
113
114         tsi->tsi_fid = body->mbo_fid1;
115
116         RETURN(rc);
117 }
118
119 /**
120  * Validate oa from client.
121  * If the request comes from 2.0 clients, currently only RSVD seq and IDIF
122  * req are valid.
123  *    a. objects in Single MDT FS  seq = FID_SEQ_OST_MDT0, oi_id != 0
124  *    b. Echo objects(seq = 2), old echo client still use oi_id/oi_seq to
125  *       pack ost_id. Because non-zero oi_seq will make it diffcult to tell
126  *       whether this is oi_fid or real ostid. So it will check
127  *       OBD_CONNECT_FID, then convert the ostid to FID for old client.
128  *    c. Old FID-disable osc will send IDIF.
129  *    d. new FID-enable osc/osp will send normal FID.
130  *
131  * And also oi_id/f_oid should always start from 1. oi_id/f_oid = 0 will
132  * be used for LAST_ID file, and only being accessed inside OST now.
133  */
134 int tgt_validate_obdo(struct tgt_session_info *tsi, struct obdo *oa)
135 {
136         struct ost_id   *oi     = &oa->o_oi;
137         u64              seq    = ostid_seq(oi);
138         u64              id     = ostid_id(oi);
139         int              rc;
140         ENTRY;
141
142         if (unlikely(!(exp_connect_flags(tsi->tsi_exp) & OBD_CONNECT_FID) &&
143                      fid_seq_is_echo(seq))) {
144                 /* Sigh 2.[123] client still sends echo req with oi_id = 0
145                  * during create, and we will reset this to 1, since this
146                  * oi_id is basically useless in the following create process,
147                  * but oi_id == 0 will make it difficult to tell whether it is
148                  * real FID or ost_id. */
149                 oi->oi_fid.f_seq = FID_SEQ_ECHO;
150                 oi->oi_fid.f_oid = id ?: 1;
151                 oi->oi_fid.f_ver = 0;
152         } else {
153                 struct tgt_thread_info *tti = tgt_th_info(tsi->tsi_env);
154
155                 if (unlikely((oa->o_valid & OBD_MD_FLID) && id == 0))
156                         GOTO(out, rc = -EPROTO);
157
158                 /* Note: this check might be forced in 2.5 or 2.6, i.e.
159                  * all of the requests are required to setup FLGROUP */
160                 if (unlikely(!(oa->o_valid & OBD_MD_FLGROUP))) {
161                         ostid_set_seq_mdt0(oi);
162                         oa->o_valid |= OBD_MD_FLGROUP;
163                         seq = ostid_seq(oi);
164                 }
165
166                 if (unlikely(!(fid_seq_is_idif(seq) || fid_seq_is_mdt0(seq) ||
167                                fid_seq_is_norm(seq) || fid_seq_is_echo(seq))))
168                         GOTO(out, rc = -EPROTO);
169
170                 rc = ostid_to_fid(&tti->tti_fid1, oi,
171                                   tsi->tsi_tgt->lut_lsd.lsd_osd_index);
172                 if (unlikely(rc != 0))
173                         GOTO(out, rc);
174
175                 oi->oi_fid = tti->tti_fid1;
176         }
177
178         RETURN(0);
179
180 out:
181         CERROR("%s: client %s sent bad object "DOSTID": rc = %d\n",
182                tgt_name(tsi->tsi_tgt), obd_export_nid2str(tsi->tsi_exp),
183                seq, id, rc);
184         return rc;
185 }
186 EXPORT_SYMBOL(tgt_validate_obdo);
187
188 static int tgt_io_data_unpack(struct tgt_session_info *tsi, struct ost_id *oi)
189 {
190         unsigned                 max_brw;
191         struct niobuf_remote    *rnb;
192         struct obd_ioobj        *ioo;
193         int                      obj_count;
194
195         ENTRY;
196
197         ioo = req_capsule_client_get(tsi->tsi_pill, &RMF_OBD_IOOBJ);
198         if (ioo == NULL)
199                 RETURN(-EPROTO);
200
201         rnb = req_capsule_client_get(tsi->tsi_pill, &RMF_NIOBUF_REMOTE);
202         if (rnb == NULL)
203                 RETURN(-EPROTO);
204
205         max_brw = ioobj_max_brw_get(ioo);
206         if (unlikely((max_brw & (max_brw - 1)) != 0)) {
207                 CERROR("%s: client %s sent bad ioobj max %u for "DOSTID
208                        ": rc = %d\n", tgt_name(tsi->tsi_tgt),
209                        obd_export_nid2str(tsi->tsi_exp), max_brw,
210                        POSTID(oi), -EPROTO);
211                 RETURN(-EPROTO);
212         }
213         ioo->ioo_oid = *oi;
214
215         obj_count = req_capsule_get_size(tsi->tsi_pill, &RMF_OBD_IOOBJ,
216                                         RCL_CLIENT) / sizeof(*ioo);
217         if (obj_count == 0) {
218                 CERROR("%s: short ioobj\n", tgt_name(tsi->tsi_tgt));
219                 RETURN(-EPROTO);
220         } else if (obj_count > 1) {
221                 CERROR("%s: too many ioobjs (%d)\n", tgt_name(tsi->tsi_tgt),
222                        obj_count);
223                 RETURN(-EPROTO);
224         }
225
226         if (ioo->ioo_bufcnt == 0) {
227                 CERROR("%s: ioo has zero bufcnt\n", tgt_name(tsi->tsi_tgt));
228                 RETURN(-EPROTO);
229         }
230
231         if (ioo->ioo_bufcnt > PTLRPC_MAX_BRW_PAGES) {
232                 DEBUG_REQ(D_RPCTRACE, tgt_ses_req(tsi),
233                           "bulk has too many pages (%d)",
234                           ioo->ioo_bufcnt);
235                 RETURN(-EPROTO);
236         }
237
238         RETURN(0);
239 }
240
241 static int tgt_ost_body_unpack(struct tgt_session_info *tsi, __u32 flags)
242 {
243         struct ost_body         *body;
244         struct req_capsule      *pill = tsi->tsi_pill;
245         struct lu_nodemap       *nodemap;
246         int                      rc;
247
248         ENTRY;
249
250         body = req_capsule_client_get(pill, &RMF_OST_BODY);
251         if (body == NULL)
252                 RETURN(-EFAULT);
253
254         rc = tgt_validate_obdo(tsi, &body->oa);
255         if (rc)
256                 RETURN(rc);
257
258         nodemap = nodemap_get_from_exp(tsi->tsi_exp);
259         if (IS_ERR(nodemap))
260                 RETURN(PTR_ERR(nodemap));
261
262         body->oa.o_uid = nodemap_map_id(nodemap, NODEMAP_UID,
263                                         NODEMAP_CLIENT_TO_FS,
264                                         body->oa.o_uid);
265         body->oa.o_gid = nodemap_map_id(nodemap, NODEMAP_GID,
266                                         NODEMAP_CLIENT_TO_FS,
267                                         body->oa.o_gid);
268         nodemap_putref(nodemap);
269
270         tsi->tsi_ost_body = body;
271         tsi->tsi_fid = body->oa.o_oi.oi_fid;
272
273         if (req_capsule_has_field(pill, &RMF_OBD_IOOBJ, RCL_CLIENT)) {
274                 rc = tgt_io_data_unpack(tsi, &body->oa.o_oi);
275                 if (rc < 0)
276                         RETURN(rc);
277         }
278
279         if (!(body->oa.o_valid & OBD_MD_FLID)) {
280                 if (flags & HAS_BODY) {
281                         CERROR("%s: OBD_MD_FLID flag is not set in ost_body but OID/FID is mandatory with HAS_BODY\n",
282                                tgt_name(tsi->tsi_tgt));
283                         RETURN(-EPROTO);
284                 } else {
285                         RETURN(0);
286                 }
287         }
288
289         ost_fid_build_resid(&tsi->tsi_fid, &tsi->tsi_resid);
290
291         /*
292          * OST doesn't get object in advance for further use to prevent
293          * situations with nested object_find which is potential deadlock.
294          */
295         tsi->tsi_corpus = NULL;
296         RETURN(rc);
297 }
298
299 /*
300  * Do necessary preprocessing according to handler ->th_flags.
301  */
302 static int tgt_request_preprocess(struct tgt_session_info *tsi,
303                                   struct tgt_handler *h,
304                                   struct ptlrpc_request *req)
305 {
306         struct req_capsule      *pill = tsi->tsi_pill;
307         __u32                    flags = h->th_flags;
308         int                      rc = 0;
309
310         ENTRY;
311
312         if (tsi->tsi_preprocessed)
313                 RETURN(0);
314
315         LASSERT(h->th_act != NULL);
316         LASSERT(h->th_opc == lustre_msg_get_opc(req->rq_reqmsg));
317         LASSERT(current->journal_info == NULL);
318
319         LASSERT(ergo(flags & (HAS_BODY | HAS_REPLY),
320                      h->th_fmt != NULL));
321         if (h->th_fmt != NULL) {
322                 req_capsule_set(pill, h->th_fmt);
323                 if (req_capsule_has_field(pill, &RMF_MDT_BODY, RCL_CLIENT)) {
324                         rc = tgt_mdt_body_unpack(tsi, flags);
325                         if (rc < 0)
326                                 RETURN(rc);
327                 } else if (req_capsule_has_field(pill, &RMF_OST_BODY,
328                                                  RCL_CLIENT)) {
329                         rc = tgt_ost_body_unpack(tsi, flags);
330                         if (rc < 0)
331                                 RETURN(rc);
332                 }
333         }
334
335         if (flags & IS_MUTABLE && tgt_conn_flags(tsi) & OBD_CONNECT_RDONLY)
336                 RETURN(-EROFS);
337
338         if (flags & HAS_KEY) {
339                 struct ldlm_request *dlm_req;
340
341                 LASSERT(h->th_fmt != NULL);
342
343                 dlm_req = req_capsule_client_get(pill, &RMF_DLM_REQ);
344                 if (dlm_req != NULL) {
345                         union ldlm_wire_policy_data *policy =
346                                         &dlm_req->lock_desc.l_policy_data;
347
348                         if (unlikely(dlm_req->lock_desc.l_resource.lr_type ==
349                                      LDLM_IBITS &&
350                                      (policy->l_inodebits.bits |
351                                       policy->l_inodebits.try_bits) == 0)) {
352                                 /*
353                                  * Lock without inodebits makes no sense and
354                                  * will oops later in ldlm. If client miss to
355                                  * set such bits, do not trigger ASSERTION.
356                                  *
357                                  * For liblustre flock case, it maybe zero.
358                                  */
359                                 rc = -EPROTO;
360                         } else {
361                                 tsi->tsi_dlm_req = dlm_req;
362                         }
363                 } else {
364                         rc = -EFAULT;
365                 }
366         }
367         tsi->tsi_preprocessed = 1;
368         RETURN(rc);
369 }
370
371 /*
372  * Invoke handler for this request opc. Also do necessary preprocessing
373  * (according to handler ->th_flags), and post-processing (setting of
374  * ->last_{xid,committed}).
375  */
376 static int tgt_handle_request0(struct tgt_session_info *tsi,
377                                struct tgt_handler *h,
378                                struct ptlrpc_request *req)
379 {
380         int      serious = 0;
381         int      rc;
382         __u32    opc = lustre_msg_get_opc(req->rq_reqmsg);
383
384         ENTRY;
385
386
387         /* When dealing with sec context requests, no export is associated yet,
388          * because these requests are sent before *_CONNECT requests.
389          * A NULL req->rq_export means the normal *_common_slice handlers will
390          * not be called, because there is no reference to the target.
391          * So deal with them by hand and jump directly to target_send_reply().
392          */
393         switch (opc) {
394         case SEC_CTX_INIT:
395         case SEC_CTX_INIT_CONT:
396         case SEC_CTX_FINI:
397                 CFS_FAIL_TIMEOUT(OBD_FAIL_SEC_CTX_HDL_PAUSE, cfs_fail_val);
398                 GOTO(out, rc = 0);
399         }
400
401         /*
402          * Checking for various OBD_FAIL_$PREF_$OPC_NET codes. _Do_ not try
403          * to put same checks into handlers like mdt_close(), mdt_reint(),
404          * etc., without talking to mdt authors first. Checking same thing
405          * there again is useless and returning 0 error without packing reply
406          * is buggy! Handlers either pack reply or return error.
407          *
408          * We return 0 here and do not send any reply in order to emulate
409          * network failure. Do not send any reply in case any of NET related
410          * fail_id has occured.
411          */
412         if (OBD_FAIL_CHECK_ORSET(h->th_fail_id, OBD_FAIL_ONCE))
413                 RETURN(0);
414         if (unlikely(lustre_msg_get_opc(req->rq_reqmsg) == MDS_REINT &&
415                      OBD_FAIL_CHECK(OBD_FAIL_MDS_REINT_MULTI_NET)))
416                 RETURN(0);
417
418         rc = tgt_request_preprocess(tsi, h, req);
419         /* pack reply if reply format is fixed */
420         if (rc == 0 && h->th_flags & HAS_REPLY) {
421                 /* Pack reply */
422                 if (req_capsule_has_field(tsi->tsi_pill, &RMF_MDT_MD,
423                                           RCL_SERVER))
424                         req_capsule_set_size(tsi->tsi_pill, &RMF_MDT_MD,
425                                              RCL_SERVER,
426                                              tsi->tsi_mdt_body->mbo_eadatasize);
427                 if (req_capsule_has_field(tsi->tsi_pill, &RMF_LOGCOOKIES,
428                                           RCL_SERVER))
429                         req_capsule_set_size(tsi->tsi_pill, &RMF_LOGCOOKIES,
430                                              RCL_SERVER, 0);
431                 if (req_capsule_has_field(tsi->tsi_pill, &RMF_ACL, RCL_SERVER))
432                         req_capsule_set_size(tsi->tsi_pill,
433                                              &RMF_ACL, RCL_SERVER,
434                                              LUSTRE_POSIX_ACL_MAX_SIZE_OLD);
435
436                 if (req_capsule_has_field(tsi->tsi_pill, &RMF_SHORT_IO,
437                                           RCL_SERVER)) {
438                         struct niobuf_remote *remote_nb =
439                                 req_capsule_client_get(tsi->tsi_pill,
440                                                        &RMF_NIOBUF_REMOTE);
441                         struct ost_body *body = tsi->tsi_ost_body;
442
443                         req_capsule_set_size(tsi->tsi_pill, &RMF_SHORT_IO,
444                                          RCL_SERVER,
445                                          (body->oa.o_flags & OBD_FL_SHORT_IO) ?
446                                          remote_nb[0].rnb_len : 0);
447                 }
448
449                 rc = req_capsule_server_pack(tsi->tsi_pill);
450         }
451
452         if (likely(rc == 0)) {
453                 /*
454                  * Process request, there can be two types of rc:
455                  * 1) errors with msg unpack/pack, other failures outside the
456                  * operation itself. This is counted as serious errors;
457                  * 2) errors during fs operation, should be placed in rq_status
458                  * only
459                  */
460                 rc = h->th_act(tsi);
461                 if (!is_serious(rc) &&
462                     !req->rq_no_reply && req->rq_reply_state == NULL) {
463                         DEBUG_REQ(D_ERROR, req, "%s \"handler\" %s did not "
464                                   "pack reply and returned 0 error\n",
465                                   tgt_name(tsi->tsi_tgt), h->th_name);
466                         LBUG();
467                 }
468                 serious = is_serious(rc);
469                 rc = clear_serious(rc);
470         } else {
471                 serious = 1;
472         }
473
474         req->rq_status = rc;
475
476         /*
477          * ELDLM_* codes which > 0 should be in rq_status only as well as
478          * all non-serious errors.
479          */
480         if (rc > 0 || !serious)
481                 rc = 0;
482
483         LASSERT(current->journal_info == NULL);
484
485         if (likely(rc == 0 && req->rq_export))
486                 target_committed_to_req(req);
487
488 out:
489         target_send_reply(req, rc, tsi->tsi_reply_fail_id);
490         RETURN(0);
491 }
492
493 static int tgt_filter_recovery_request(struct ptlrpc_request *req,
494                                        struct obd_device *obd, int *process)
495 {
496         switch (lustre_msg_get_opc(req->rq_reqmsg)) {
497         case MDS_DISCONNECT:
498         case OST_DISCONNECT:
499         case OBD_IDX_READ:
500                 *process = 1;
501                 RETURN(0);
502         case MDS_CLOSE:
503         case MDS_SYNC: /* used in unmounting */
504         case OBD_PING:
505         case MDS_REINT:
506         case OUT_UPDATE:
507         case SEQ_QUERY:
508         case FLD_QUERY:
509         case FLD_READ:
510         case LDLM_ENQUEUE:
511         case OST_CREATE:
512         case OST_DESTROY:
513         case OST_PUNCH:
514         case OST_SETATTR:
515         case OST_SYNC:
516         case OST_WRITE:
517         case MDS_HSM_PROGRESS:
518         case MDS_HSM_STATE_SET:
519         case MDS_HSM_REQUEST:
520                 *process = target_queue_recovery_request(req, obd);
521                 RETURN(0);
522
523         default:
524                 DEBUG_REQ(D_ERROR, req, "not permitted during recovery");
525                 *process = -EAGAIN;
526                 RETURN(0);
527         }
528 }
529
530 /*
531  * Handle recovery. Return:
532  *        +1: continue request processing;
533  *       -ve: abort immediately with the given error code;
534  *         0: send reply with error code in req->rq_status;
535  */
536 static int tgt_handle_recovery(struct ptlrpc_request *req, int reply_fail_id)
537 {
538         ENTRY;
539
540         switch (lustre_msg_get_opc(req->rq_reqmsg)) {
541         case MDS_CONNECT:
542         case OST_CONNECT:
543         case MGS_CONNECT:
544         case SEC_CTX_INIT:
545         case SEC_CTX_INIT_CONT:
546         case SEC_CTX_FINI:
547                 RETURN(+1);
548         }
549
550         if (!req->rq_export->exp_obd->obd_replayable)
551                 RETURN(+1);
552
553         /* sanity check: if the xid matches, the request must be marked as a
554          * resent or replayed */
555         if (req_can_reconstruct(req, NULL)) {
556                 if (!(lustre_msg_get_flags(req->rq_reqmsg) &
557                       (MSG_RESENT | MSG_REPLAY))) {
558                         DEBUG_REQ(D_WARNING, req, "rq_xid %llu matches "
559                                   "saved xid, expected REPLAY or RESENT flag "
560                                   "(%x)", req->rq_xid,
561                                   lustre_msg_get_flags(req->rq_reqmsg));
562                         req->rq_status = -ENOTCONN;
563                         RETURN(-ENOTCONN);
564                 }
565         }
566         /* else: note the opposite is not always true; a RESENT req after a
567          * failover will usually not match the last_xid, since it was likely
568          * never committed. A REPLAYed request will almost never match the
569          * last xid, however it could for a committed, but still retained,
570          * open. */
571
572         /* Check for aborted recovery... */
573         if (unlikely(req->rq_export->exp_obd->obd_recovering)) {
574                 int rc;
575                 int should_process;
576
577                 DEBUG_REQ(D_INFO, req, "Got new replay");
578                 rc = tgt_filter_recovery_request(req, req->rq_export->exp_obd,
579                                                  &should_process);
580                 if (rc != 0 || !should_process)
581                         RETURN(rc);
582                 else if (should_process < 0) {
583                         req->rq_status = should_process;
584                         rc = ptlrpc_error(req);
585                         RETURN(rc);
586                 }
587         }
588         RETURN(+1);
589 }
590
591 /* Initial check for request, it is validation mostly */
592 static struct tgt_handler *tgt_handler_find_check(struct ptlrpc_request *req)
593 {
594         struct tgt_handler      *h;
595         struct tgt_opc_slice    *s;
596         struct lu_target        *tgt;
597         __u32                    opc = lustre_msg_get_opc(req->rq_reqmsg);
598
599         ENTRY;
600
601         tgt = class_exp2tgt(req->rq_export);
602         if (unlikely(tgt == NULL)) {
603                 DEBUG_REQ(D_ERROR, req, "%s: No target for connected export\n",
604                           class_exp2obd(req->rq_export)->obd_name);
605                 RETURN(ERR_PTR(-EINVAL));
606         }
607
608         for (s = tgt->lut_slice; s->tos_hs != NULL; s++)
609                 if (s->tos_opc_start <= opc && opc < s->tos_opc_end)
610                         break;
611
612         /* opcode was not found in slice */
613         if (unlikely(s->tos_hs == NULL)) {
614                 CERROR("%s: no handlers for opcode 0x%x\n", tgt_name(tgt),
615                        opc);
616                 RETURN(ERR_PTR(-ENOTSUPP));
617         }
618
619         LASSERT(opc >= s->tos_opc_start && opc < s->tos_opc_end);
620         h = s->tos_hs + (opc - s->tos_opc_start);
621         if (unlikely(h->th_opc == 0)) {
622                 CERROR("%s: unsupported opcode 0x%x\n", tgt_name(tgt), opc);
623                 RETURN(ERR_PTR(-ENOTSUPP));
624         }
625
626         RETURN(h);
627 }
628
629 static int process_req_last_xid(struct ptlrpc_request *req)
630 {
631         __u64   last_xid;
632         ENTRY;
633
634         /* check request's xid is consistent with export's last_xid */
635         last_xid = lustre_msg_get_last_xid(req->rq_reqmsg);
636         if (last_xid > req->rq_export->exp_last_xid)
637                 req->rq_export->exp_last_xid = last_xid;
638
639         if (req->rq_xid == 0 ||
640             (req->rq_xid <= req->rq_export->exp_last_xid)) {
641                 DEBUG_REQ(D_ERROR, req, "Unexpected xid %llx vs. "
642                           "last_xid %llx\n", req->rq_xid,
643                           req->rq_export->exp_last_xid);
644                 /* Some request is allowed to be sent during replay,
645                  * such as OUT update requests, FLD requests, so it
646                  * is possible that replay requests has smaller XID
647                  * than the exp_last_xid.
648                  *
649                  * Some non-replay requests may have smaller XID as
650                  * well:
651                  *
652                  * - Client send a no_resend RPC, like statfs;
653                  * - The RPC timedout (or some other error) on client,
654                  *   then it's removed from the unreplied list;
655                  * - Client send some other request to bump the
656                  *   exp_last_xid on server;
657                  * - The former RPC got chance to be processed;
658                  */
659                 if (!(lustre_msg_get_flags(req->rq_reqmsg) & MSG_REPLAY))
660                         RETURN(-EPROTO);
661         }
662
663         /* The "last_xid" is the minimum xid among unreplied requests,
664          * if the request is from the previous connection, its xid can
665          * still be larger than "exp_last_xid", then the above check of
666          * xid is not enough to determine whether the request is delayed.
667          *
668          * For example, if some replay request was delayed and caused
669          * timeout at client and the replay is restarted, the delayed
670          * replay request will have the larger xid than "exp_last_xid"
671          */
672         if (req->rq_export->exp_conn_cnt >
673             lustre_msg_get_conn_cnt(req->rq_reqmsg))
674                 RETURN(-ESTALE);
675
676         /* try to release in-memory reply data */
677         if (tgt_is_multimodrpcs_client(req->rq_export)) {
678                 tgt_handle_received_xid(req->rq_export,
679                                 lustre_msg_get_last_xid(req->rq_reqmsg));
680                 if (!(lustre_msg_get_flags(req->rq_reqmsg) &
681                       (MSG_RESENT | MSG_REPLAY)))
682                         tgt_handle_tag(req->rq_export,
683                                        lustre_msg_get_tag(req->rq_reqmsg));
684         }
685         RETURN(0);
686 }
687
688 int tgt_request_handle(struct ptlrpc_request *req)
689 {
690         struct tgt_session_info *tsi = tgt_ses_info(req->rq_svc_thread->t_env);
691
692         struct lustre_msg       *msg = req->rq_reqmsg;
693         struct tgt_handler      *h;
694         struct lu_target        *tgt;
695         int                      request_fail_id = 0;
696         __u32                    opc = lustre_msg_get_opc(msg);
697         struct obd_device       *obd;
698         int                      rc;
699         bool                     is_connect = false;
700         ENTRY;
701
702         if (unlikely(OBD_FAIL_CHECK(OBD_FAIL_TGT_RECOVERY_REQ_RACE))) {
703                 if (cfs_fail_val == 0 &&
704                     lustre_msg_get_opc(msg) != OBD_PING &&
705                     lustre_msg_get_flags(msg) & MSG_REQ_REPLAY_DONE) {
706                         struct l_wait_info lwi =  { 0 };
707
708                         cfs_fail_val = 1;
709                         cfs_race_state = 0;
710                         l_wait_event(cfs_race_waitq, (cfs_race_state == 1),
711                                      &lwi);
712                 }
713         }
714
715         /* Refill the context, to make sure all thread keys are allocated */
716         lu_env_refill(req->rq_svc_thread->t_env);
717
718         req_capsule_init(&req->rq_pill, req, RCL_SERVER);
719         tsi->tsi_pill = &req->rq_pill;
720         tsi->tsi_env = req->rq_svc_thread->t_env;
721
722         /* if request has export then get handlers slice from corresponding
723          * target, otherwise that should be connect operation */
724         if (opc == MDS_CONNECT || opc == OST_CONNECT ||
725             opc == MGS_CONNECT) {
726                 is_connect = true;
727                 req_capsule_set(&req->rq_pill, &RQF_CONNECT);
728                 rc = target_handle_connect(req);
729                 if (rc != 0) {
730                         rc = ptlrpc_error(req);
731                         GOTO(out, rc);
732                 }
733                 /* recovery-small test 18c asks to drop connect reply */
734                 if (unlikely(opc == OST_CONNECT &&
735                              OBD_FAIL_CHECK(OBD_FAIL_OST_CONNECT_NET2)))
736                         GOTO(out, rc = 0);
737         }
738
739         if (unlikely(!class_connected_export(req->rq_export))) {
740                 if (opc == SEC_CTX_INIT || opc == SEC_CTX_INIT_CONT ||
741                     opc == SEC_CTX_FINI) {
742                         /* sec context initialization has to be handled
743                          * by hand in tgt_handle_request0() */
744                         tsi->tsi_reply_fail_id = OBD_FAIL_SEC_CTX_INIT_NET;
745                         h = NULL;
746                         GOTO(handle_recov, rc = 0);
747                 }
748                 CDEBUG(D_HA, "operation %d on unconnected OST from %s\n",
749                        opc, libcfs_id2str(req->rq_peer));
750                 req->rq_status = -ENOTCONN;
751                 rc = ptlrpc_error(req);
752                 GOTO(out, rc);
753         }
754
755         tsi->tsi_tgt = tgt = class_exp2tgt(req->rq_export);
756         tsi->tsi_exp = req->rq_export;
757         if (exp_connect_flags(req->rq_export) & OBD_CONNECT_JOBSTATS)
758                 tsi->tsi_jobid = lustre_msg_get_jobid(req->rq_reqmsg);
759         else
760                 tsi->tsi_jobid = NULL;
761
762         if (tgt == NULL) {
763                 DEBUG_REQ(D_ERROR, req, "%s: No target for connected export\n",
764                           class_exp2obd(req->rq_export)->obd_name);
765                 req->rq_status = -EINVAL;
766                 rc = ptlrpc_error(req);
767                 GOTO(out, rc);
768         }
769
770         /* Skip last_xid processing for the recovery thread, otherwise, the
771          * last_xid on same request could be processed twice: first time when
772          * processing the incoming request, second time when the request is
773          * being processed by recovery thread. */
774         obd = class_exp2obd(req->rq_export);
775         if (is_connect) {
776                 /* reset the exp_last_xid on each connection. */
777                 req->rq_export->exp_last_xid = 0;
778         } else if (obd->obd_recovery_data.trd_processing_task !=
779                    current_pid()) {
780                 rc = process_req_last_xid(req);
781                 if (rc) {
782                         req->rq_status = rc;
783                         rc = ptlrpc_error(req);
784                         GOTO(out, rc);
785                 }
786         }
787
788         request_fail_id = tgt->lut_request_fail_id;
789         tsi->tsi_reply_fail_id = tgt->lut_reply_fail_id;
790
791         h = tgt_handler_find_check(req);
792         if (IS_ERR(h)) {
793                 req->rq_status = PTR_ERR(h);
794                 rc = ptlrpc_error(req);
795                 GOTO(out, rc);
796         }
797
798         LASSERTF(h->th_opc == opc, "opcode mismatch %d != %d\n",
799                  h->th_opc, opc);
800
801         if ((cfs_fail_val == 0 || cfs_fail_val == opc) &&
802              CFS_FAIL_CHECK_ORSET(request_fail_id, CFS_FAIL_ONCE))
803                 GOTO(out, rc = 0);
804
805         rc = lustre_msg_check_version(msg, h->th_version);
806         if (unlikely(rc)) {
807                 DEBUG_REQ(D_ERROR, req, "%s: drop mal-formed request, version"
808                           " %08x, expecting %08x\n", tgt_name(tgt),
809                           lustre_msg_get_version(msg), h->th_version);
810                 req->rq_status = -EINVAL;
811                 rc = ptlrpc_error(req);
812                 GOTO(out, rc);
813         }
814
815 handle_recov:
816         rc = tgt_handle_recovery(req, tsi->tsi_reply_fail_id);
817         if (likely(rc == 1)) {
818                 rc = tgt_handle_request0(tsi, h, req);
819                 if (rc)
820                         GOTO(out, rc);
821         }
822         EXIT;
823 out:
824         req_capsule_fini(tsi->tsi_pill);
825         if (tsi->tsi_corpus != NULL) {
826                 lu_object_put(tsi->tsi_env, tsi->tsi_corpus);
827                 tsi->tsi_corpus = NULL;
828         }
829         return rc;
830 }
831 EXPORT_SYMBOL(tgt_request_handle);
832
833 /** Assign high priority operations to the request if needed. */
834 int tgt_hpreq_handler(struct ptlrpc_request *req)
835 {
836         struct tgt_session_info *tsi = tgt_ses_info(req->rq_svc_thread->t_env);
837         struct tgt_handler      *h;
838         int                      rc;
839
840         ENTRY;
841
842         if (req->rq_export == NULL)
843                 RETURN(0);
844
845         req_capsule_init(&req->rq_pill, req, RCL_SERVER);
846         tsi->tsi_pill = &req->rq_pill;
847         tsi->tsi_env = req->rq_svc_thread->t_env;
848         tsi->tsi_tgt = class_exp2tgt(req->rq_export);
849         tsi->tsi_exp = req->rq_export;
850
851         h = tgt_handler_find_check(req);
852         if (IS_ERR(h)) {
853                 rc = PTR_ERR(h);
854                 RETURN(rc);
855         }
856
857         rc = tgt_request_preprocess(tsi, h, req);
858         if (unlikely(rc != 0))
859                 RETURN(rc);
860
861         if (h->th_hp != NULL)
862                 h->th_hp(tsi);
863         RETURN(0);
864 }
865 EXPORT_SYMBOL(tgt_hpreq_handler);
866
867 void tgt_counter_incr(struct obd_export *exp, int opcode)
868 {
869         lprocfs_counter_incr(exp->exp_obd->obd_stats, opcode);
870         if (exp->exp_nid_stats && exp->exp_nid_stats->nid_stats != NULL)
871                 lprocfs_counter_incr(exp->exp_nid_stats->nid_stats, opcode);
872 }
873 EXPORT_SYMBOL(tgt_counter_incr);
874
875 /*
876  * Unified target generic handlers.
877  */
878
879 int tgt_connect_check_sptlrpc(struct ptlrpc_request *req, struct obd_export *exp)
880 {
881         struct lu_target        *tgt = class_exp2tgt(exp);
882         struct sptlrpc_flavor    flvr;
883         int                      rc = 0;
884
885         LASSERT(tgt);
886         LASSERT(tgt->lut_obd);
887         LASSERT(tgt->lut_slice);
888
889         /* always allow ECHO client */
890         if (unlikely(strcmp(exp->exp_obd->obd_type->typ_name,
891                             LUSTRE_ECHO_NAME) == 0)) {
892                 exp->exp_flvr.sf_rpc = SPTLRPC_FLVR_ANY;
893                 return 0;
894         }
895
896         if (exp->exp_flvr.sf_rpc == SPTLRPC_FLVR_INVALID) {
897                 read_lock(&tgt->lut_sptlrpc_lock);
898                 sptlrpc_target_choose_flavor(&tgt->lut_sptlrpc_rset,
899                                              req->rq_sp_from,
900                                              req->rq_peer.nid,
901                                              &flvr);
902                 read_unlock(&tgt->lut_sptlrpc_lock);
903
904                 spin_lock(&exp->exp_lock);
905                 exp->exp_sp_peer = req->rq_sp_from;
906                 exp->exp_flvr = flvr;
907
908                 /* when on mgs, if no restriction is set, or if client
909                  * is loopback, allow any flavor */
910                 if ((strcmp(exp->exp_obd->obd_type->typ_name,
911                            LUSTRE_MGS_NAME) == 0) &&
912                      (exp->exp_flvr.sf_rpc == SPTLRPC_FLVR_NULL ||
913                       LNET_NETTYP(LNET_NIDNET(exp->exp_connection->c_peer.nid))
914                       == LOLND))
915                         exp->exp_flvr.sf_rpc = SPTLRPC_FLVR_ANY;
916
917                 if (exp->exp_flvr.sf_rpc != SPTLRPC_FLVR_ANY &&
918                     exp->exp_flvr.sf_rpc != req->rq_flvr.sf_rpc) {
919                         CERROR("%s: unauthorized rpc flavor %x from %s, "
920                                "expect %x\n", tgt_name(tgt),
921                                req->rq_flvr.sf_rpc,
922                                libcfs_nid2str(req->rq_peer.nid),
923                                exp->exp_flvr.sf_rpc);
924                         rc = -EACCES;
925                 }
926                 spin_unlock(&exp->exp_lock);
927         } else {
928                 if (exp->exp_sp_peer != req->rq_sp_from) {
929                         CERROR("%s: RPC source %s doesn't match %s\n",
930                                tgt_name(tgt),
931                                sptlrpc_part2name(req->rq_sp_from),
932                                sptlrpc_part2name(exp->exp_sp_peer));
933                         rc = -EACCES;
934                 } else {
935                         rc = sptlrpc_target_export_check(exp, req);
936                 }
937         }
938
939         return rc;
940 }
941
942 int tgt_adapt_sptlrpc_conf(struct lu_target *tgt)
943 {
944         struct sptlrpc_rule_set  tmp_rset;
945         int                      rc;
946
947         if (unlikely(tgt == NULL)) {
948                 CERROR("No target passed");
949                 return -EINVAL;
950         }
951
952         sptlrpc_rule_set_init(&tmp_rset);
953         rc = sptlrpc_conf_target_get_rules(tgt->lut_obd, &tmp_rset);
954         if (rc) {
955                 CERROR("%s: failed get sptlrpc rules: rc = %d\n",
956                        tgt_name(tgt), rc);
957                 return rc;
958         }
959
960         sptlrpc_target_update_exp_flavor(tgt->lut_obd, &tmp_rset);
961
962         write_lock(&tgt->lut_sptlrpc_lock);
963         sptlrpc_rule_set_free(&tgt->lut_sptlrpc_rset);
964         tgt->lut_sptlrpc_rset = tmp_rset;
965         write_unlock(&tgt->lut_sptlrpc_lock);
966
967         return 0;
968 }
969 EXPORT_SYMBOL(tgt_adapt_sptlrpc_conf);
970
971 int tgt_connect(struct tgt_session_info *tsi)
972 {
973         struct ptlrpc_request   *req = tgt_ses_req(tsi);
974         struct obd_connect_data *reply;
975         int                      rc;
976
977         ENTRY;
978
979         /* XXX: better to call this check right after getting new export but
980          * before last_rcvd slot allocation to avoid server load upon insecure
981          * connects. This is to be fixed after unifiyng all targets.
982          */
983         rc = tgt_connect_check_sptlrpc(req, tsi->tsi_exp);
984         if (rc)
985                 GOTO(out, rc);
986
987         /* To avoid exposing partially initialized connection flags, changes up
988          * to this point have been staged in reply->ocd_connect_flags. Now that
989          * connection handling has completed successfully, atomically update
990          * the connect flags in the shared export data structure. LU-1623 */
991         reply = req_capsule_server_get(tsi->tsi_pill, &RMF_CONNECT_DATA);
992         spin_lock(&tsi->tsi_exp->exp_lock);
993         *exp_connect_flags_ptr(tsi->tsi_exp) = reply->ocd_connect_flags;
994         if (reply->ocd_connect_flags & OBD_CONNECT_FLAGS2)
995                 *exp_connect_flags2_ptr(tsi->tsi_exp) =
996                         reply->ocd_connect_flags2;
997         tsi->tsi_exp->exp_connect_data.ocd_brw_size = reply->ocd_brw_size;
998         spin_unlock(&tsi->tsi_exp->exp_lock);
999
1000         RETURN(0);
1001 out:
1002         obd_disconnect(class_export_get(tsi->tsi_exp));
1003         return rc;
1004 }
1005 EXPORT_SYMBOL(tgt_connect);
1006
1007 int tgt_disconnect(struct tgt_session_info *tsi)
1008 {
1009         int rc;
1010
1011         ENTRY;
1012
1013         OBD_FAIL_TIMEOUT(OBD_FAIL_OST_DISCONNECT_DELAY, cfs_fail_val);
1014
1015         rc = target_handle_disconnect(tgt_ses_req(tsi));
1016         if (rc)
1017                 RETURN(err_serious(rc));
1018
1019         RETURN(rc);
1020 }
1021 EXPORT_SYMBOL(tgt_disconnect);
1022
1023 /*
1024  * Unified target OBD handlers
1025  */
1026 int tgt_obd_ping(struct tgt_session_info *tsi)
1027 {
1028         int rc;
1029
1030         ENTRY;
1031
1032         rc = target_handle_ping(tgt_ses_req(tsi));
1033         if (rc)
1034                 RETURN(err_serious(rc));
1035
1036         RETURN(rc);
1037 }
1038 EXPORT_SYMBOL(tgt_obd_ping);
1039
1040 int tgt_obd_log_cancel(struct tgt_session_info *tsi)
1041 {
1042         return err_serious(-EOPNOTSUPP);
1043 }
1044
1045 int tgt_send_buffer(struct tgt_session_info *tsi, struct lu_rdbuf *rdbuf)
1046 {
1047         struct tgt_thread_info  *tti = tgt_th_info(tsi->tsi_env);
1048         struct ptlrpc_request   *req = tgt_ses_req(tsi);
1049         struct obd_export       *exp = req->rq_export;
1050         struct ptlrpc_bulk_desc *desc;
1051         struct l_wait_info      *lwi = &tti->tti_u.update.tti_wait_info;
1052         int                      i;
1053         int                      rc;
1054
1055         ENTRY;
1056
1057         desc = ptlrpc_prep_bulk_exp(req, rdbuf->rb_nbufs, 1,
1058                                   PTLRPC_BULK_PUT_SOURCE | PTLRPC_BULK_BUF_KVEC,
1059                                     MDS_BULK_PORTAL, &ptlrpc_bulk_kvec_ops);
1060         if (desc == NULL)
1061                 RETURN(-ENOMEM);
1062
1063         for (i = 0; i < rdbuf->rb_nbufs; i++)
1064                 desc->bd_frag_ops->add_iov_frag(desc,
1065                                         rdbuf->rb_bufs[i].lb_buf,
1066                                         rdbuf->rb_bufs[i].lb_len);
1067
1068         rc = target_bulk_io(exp, desc, lwi);
1069         ptlrpc_free_bulk(desc);
1070         RETURN(rc);
1071 }
1072 EXPORT_SYMBOL(tgt_send_buffer);
1073
1074 int tgt_sendpage(struct tgt_session_info *tsi, struct lu_rdpg *rdpg, int nob)
1075 {
1076         struct tgt_thread_info  *tti = tgt_th_info(tsi->tsi_env);
1077         struct ptlrpc_request   *req = tgt_ses_req(tsi);
1078         struct obd_export       *exp = req->rq_export;
1079         struct ptlrpc_bulk_desc *desc;
1080         struct l_wait_info      *lwi = &tti->tti_u.rdpg.tti_wait_info;
1081         int                      tmpcount;
1082         int                      tmpsize;
1083         int                      i;
1084         int                      rc;
1085
1086         ENTRY;
1087
1088         desc = ptlrpc_prep_bulk_exp(req, rdpg->rp_npages, 1,
1089                                     PTLRPC_BULK_PUT_SOURCE |
1090                                         PTLRPC_BULK_BUF_KIOV,
1091                                     MDS_BULK_PORTAL,
1092                                     &ptlrpc_bulk_kiov_pin_ops);
1093         if (desc == NULL)
1094                 RETURN(-ENOMEM);
1095
1096         if (!(exp_connect_flags(exp) & OBD_CONNECT_BRW_SIZE))
1097                 /* old client requires reply size in it's PAGE_SIZE,
1098                  * which is rdpg->rp_count */
1099                 nob = rdpg->rp_count;
1100
1101         for (i = 0, tmpcount = nob; i < rdpg->rp_npages && tmpcount > 0;
1102              i++, tmpcount -= tmpsize) {
1103                 tmpsize = min_t(int, tmpcount, PAGE_SIZE);
1104                 desc->bd_frag_ops->add_kiov_frag(desc, rdpg->rp_pages[i], 0,
1105                                                  tmpsize);
1106         }
1107
1108         LASSERT(desc->bd_nob == nob);
1109         rc = target_bulk_io(exp, desc, lwi);
1110         ptlrpc_free_bulk(desc);
1111         RETURN(rc);
1112 }
1113 EXPORT_SYMBOL(tgt_sendpage);
1114
1115 /*
1116  * OBD_IDX_READ handler
1117  */
1118 static int tgt_obd_idx_read(struct tgt_session_info *tsi)
1119 {
1120         struct tgt_thread_info  *tti = tgt_th_info(tsi->tsi_env);
1121         struct lu_rdpg          *rdpg = &tti->tti_u.rdpg.tti_rdpg;
1122         struct idx_info         *req_ii, *rep_ii;
1123         int                      rc, i;
1124
1125         ENTRY;
1126
1127         memset(rdpg, 0, sizeof(*rdpg));
1128         req_capsule_set(tsi->tsi_pill, &RQF_OBD_IDX_READ);
1129
1130         /* extract idx_info buffer from request & reply */
1131         req_ii = req_capsule_client_get(tsi->tsi_pill, &RMF_IDX_INFO);
1132         if (req_ii == NULL || req_ii->ii_magic != IDX_INFO_MAGIC)
1133                 RETURN(err_serious(-EPROTO));
1134
1135         rc = req_capsule_server_pack(tsi->tsi_pill);
1136         if (rc)
1137                 RETURN(err_serious(rc));
1138
1139         rep_ii = req_capsule_server_get(tsi->tsi_pill, &RMF_IDX_INFO);
1140         if (rep_ii == NULL)
1141                 RETURN(err_serious(-EFAULT));
1142         rep_ii->ii_magic = IDX_INFO_MAGIC;
1143
1144         /* extract hash to start with */
1145         rdpg->rp_hash = req_ii->ii_hash_start;
1146
1147         /* extract requested attributes */
1148         rdpg->rp_attrs = req_ii->ii_attrs;
1149
1150         /* check that fid packed in request is valid and supported */
1151         if (!fid_is_sane(&req_ii->ii_fid))
1152                 RETURN(-EINVAL);
1153         rep_ii->ii_fid = req_ii->ii_fid;
1154
1155         /* copy flags */
1156         rep_ii->ii_flags = req_ii->ii_flags;
1157
1158         /* compute number of pages to allocate, ii_count is the number of 4KB
1159          * containers */
1160         if (req_ii->ii_count <= 0)
1161                 GOTO(out, rc = -EFAULT);
1162         rdpg->rp_count = min_t(unsigned int, req_ii->ii_count << LU_PAGE_SHIFT,
1163                                exp_max_brw_size(tsi->tsi_exp));
1164         rdpg->rp_npages = (rdpg->rp_count + PAGE_SIZE - 1) >> PAGE_SHIFT;
1165
1166         /* allocate pages to store the containers */
1167         OBD_ALLOC(rdpg->rp_pages, rdpg->rp_npages * sizeof(rdpg->rp_pages[0]));
1168         if (rdpg->rp_pages == NULL)
1169                 GOTO(out, rc = -ENOMEM);
1170         for (i = 0; i < rdpg->rp_npages; i++) {
1171                 rdpg->rp_pages[i] = alloc_page(GFP_NOFS);
1172                 if (rdpg->rp_pages[i] == NULL)
1173                         GOTO(out, rc = -ENOMEM);
1174         }
1175
1176         /* populate pages with key/record pairs */
1177         rc = dt_index_read(tsi->tsi_env, tsi->tsi_tgt->lut_bottom, rep_ii, rdpg);
1178         if (rc < 0)
1179                 GOTO(out, rc);
1180
1181         LASSERTF(rc <= rdpg->rp_count, "dt_index_read() returned more than "
1182                  "asked %d > %d\n", rc, rdpg->rp_count);
1183
1184         /* send pages to client */
1185         rc = tgt_sendpage(tsi, rdpg, rc);
1186         if (rc)
1187                 GOTO(out, rc);
1188         EXIT;
1189 out:
1190         if (rdpg->rp_pages) {
1191                 for (i = 0; i < rdpg->rp_npages; i++)
1192                         if (rdpg->rp_pages[i])
1193                                 __free_page(rdpg->rp_pages[i]);
1194                 OBD_FREE(rdpg->rp_pages,
1195                          rdpg->rp_npages * sizeof(rdpg->rp_pages[0]));
1196         }
1197         return rc;
1198 }
1199
1200 struct tgt_handler tgt_obd_handlers[] = {
1201 TGT_OBD_HDL    (0,      OBD_PING,               tgt_obd_ping),
1202 TGT_OBD_HDL    (0,      OBD_IDX_READ,           tgt_obd_idx_read)
1203 };
1204 EXPORT_SYMBOL(tgt_obd_handlers);
1205
1206 int tgt_sync(const struct lu_env *env, struct lu_target *tgt,
1207              struct dt_object *obj, __u64 start, __u64 end)
1208 {
1209         int rc = 0;
1210
1211         ENTRY;
1212
1213         /* if no objid is specified, it means "sync whole filesystem" */
1214         if (obj == NULL) {
1215                 rc = dt_sync(env, tgt->lut_bottom);
1216         } else if (dt_version_get(env, obj) >
1217                    tgt->lut_obd->obd_last_committed) {
1218                 rc = dt_object_sync(env, obj, start, end);
1219         }
1220         atomic_inc(&tgt->lut_sync_count);
1221
1222         RETURN(rc);
1223 }
1224 EXPORT_SYMBOL(tgt_sync);
1225 /*
1226  * Unified target DLM handlers.
1227  */
1228
1229 /**
1230  * Unified target BAST
1231  *
1232  * Ensure data and metadata are synced to disk when lock is canceled if Sync on
1233  * Cancel (SOC) is enabled. If it's extent lock, normally sync obj is enough,
1234  * but if it's cross-MDT lock, because remote object version is not set, a
1235  * filesystem sync is needed.
1236  *
1237  * \param lock server side lock
1238  * \param desc lock desc
1239  * \param data ldlm_cb_set_arg
1240  * \param flag  indicates whether this cancelling or blocking callback
1241  * \retval      0 on success
1242  * \retval      negative number on error
1243  */
1244 static int tgt_blocking_ast(struct ldlm_lock *lock, struct ldlm_lock_desc *desc,
1245                             void *data, int flag)
1246 {
1247         struct lu_env            env;
1248         struct lu_target        *tgt;
1249         struct dt_object        *obj = NULL;
1250         struct lu_fid            fid;
1251         int                      rc = 0;
1252
1253         ENTRY;
1254
1255         tgt = class_exp2tgt(lock->l_export);
1256
1257         if (unlikely(tgt == NULL)) {
1258                 CDEBUG(D_ERROR, "%s: No target for connected export\n",
1259                        class_exp2obd(lock->l_export)->obd_name);
1260                 RETURN(-EINVAL);
1261         }
1262
1263         if (flag == LDLM_CB_CANCELING &&
1264             (lock->l_granted_mode & (LCK_EX | LCK_PW | LCK_GROUP)) &&
1265             (tgt->lut_sync_lock_cancel == ALWAYS_SYNC_ON_CANCEL ||
1266              (tgt->lut_sync_lock_cancel == BLOCKING_SYNC_ON_CANCEL &&
1267               ldlm_is_cbpending(lock))) &&
1268             ((exp_connect_flags(lock->l_export) & OBD_CONNECT_MDS_MDS) ||
1269              lock->l_resource->lr_type == LDLM_EXTENT)) {
1270                 __u64 start = 0;
1271                 __u64 end = OBD_OBJECT_EOF;
1272
1273                 rc = lu_env_init(&env, LCT_DT_THREAD);
1274                 if (unlikely(rc != 0))
1275                         GOTO(err, rc);
1276
1277                 ost_fid_from_resid(&fid, &lock->l_resource->lr_name,
1278                                    tgt->lut_lsd.lsd_osd_index);
1279
1280                 if (lock->l_resource->lr_type == LDLM_EXTENT) {
1281                         obj = dt_locate(&env, tgt->lut_bottom, &fid);
1282                         if (IS_ERR(obj))
1283                                 GOTO(err_env, rc = PTR_ERR(obj));
1284
1285                         if (!dt_object_exists(obj))
1286                                 GOTO(err_put, rc = -ENOENT);
1287
1288                         start = lock->l_policy_data.l_extent.start;
1289                         end = lock->l_policy_data.l_extent.end;
1290                 }
1291
1292                 rc = tgt_sync(&env, tgt, obj, start, end);
1293                 if (rc < 0) {
1294                         CERROR("%s: syncing "DFID" (%llu-%llu) on lock "
1295                                "cancel: rc = %d\n",
1296                                tgt_name(tgt), PFID(&fid),
1297                                lock->l_policy_data.l_extent.start,
1298                                lock->l_policy_data.l_extent.end, rc);
1299                 }
1300 err_put:
1301                 if (obj != NULL)
1302                         dt_object_put(&env, obj);
1303 err_env:
1304                 lu_env_fini(&env);
1305         }
1306 err:
1307         rc = ldlm_server_blocking_ast(lock, desc, data, flag);
1308         RETURN(rc);
1309 }
1310
1311 static struct ldlm_callback_suite tgt_dlm_cbs = {
1312         .lcs_completion = ldlm_server_completion_ast,
1313         .lcs_blocking   = tgt_blocking_ast,
1314         .lcs_glimpse    = ldlm_server_glimpse_ast
1315 };
1316
1317 int tgt_enqueue(struct tgt_session_info *tsi)
1318 {
1319         struct ptlrpc_request *req = tgt_ses_req(tsi);
1320         int rc;
1321
1322         ENTRY;
1323         /*
1324          * tsi->tsi_dlm_req was already swapped and (if necessary) converted,
1325          * tsi->tsi_dlm_cbs was set by the *_req_handle() function.
1326          */
1327         LASSERT(tsi->tsi_dlm_req != NULL);
1328         rc = ldlm_handle_enqueue0(tsi->tsi_exp->exp_obd->obd_namespace, req,
1329                                   tsi->tsi_dlm_req, &tgt_dlm_cbs);
1330         if (rc)
1331                 RETURN(err_serious(rc));
1332
1333         switch (LUT_FAIL_CLASS(tsi->tsi_reply_fail_id)) {
1334         case LUT_FAIL_MDT:
1335                 tsi->tsi_reply_fail_id = OBD_FAIL_MDS_LDLM_REPLY_NET;
1336                 break;
1337         case LUT_FAIL_OST:
1338                 tsi->tsi_reply_fail_id = OBD_FAIL_OST_LDLM_REPLY_NET;
1339                 break;
1340         case LUT_FAIL_MGT:
1341                 tsi->tsi_reply_fail_id = OBD_FAIL_MGS_LDLM_REPLY_NET;
1342                 break;
1343         default:
1344                 tsi->tsi_reply_fail_id = OBD_FAIL_LDLM_REPLY;
1345                 break;
1346         }
1347         RETURN(req->rq_status);
1348 }
1349 EXPORT_SYMBOL(tgt_enqueue);
1350
1351 int tgt_convert(struct tgt_session_info *tsi)
1352 {
1353         struct ptlrpc_request *req = tgt_ses_req(tsi);
1354         int rc;
1355
1356         ENTRY;
1357         LASSERT(tsi->tsi_dlm_req);
1358         rc = ldlm_handle_convert0(req, tsi->tsi_dlm_req);
1359         if (rc)
1360                 RETURN(err_serious(rc));
1361
1362         RETURN(req->rq_status);
1363 }
1364
1365 int tgt_bl_callback(struct tgt_session_info *tsi)
1366 {
1367         return err_serious(-EOPNOTSUPP);
1368 }
1369
1370 int tgt_cp_callback(struct tgt_session_info *tsi)
1371 {
1372         return err_serious(-EOPNOTSUPP);
1373 }
1374
1375 /* generic LDLM target handler */
1376 struct tgt_handler tgt_dlm_handlers[] = {
1377 TGT_DLM_HDL(HAS_KEY, LDLM_ENQUEUE, tgt_enqueue),
1378 TGT_DLM_HDL(HAS_KEY, LDLM_CONVERT, tgt_convert),
1379 TGT_DLM_HDL_VAR(0, LDLM_BL_CALLBACK, tgt_bl_callback),
1380 TGT_DLM_HDL_VAR(0, LDLM_CP_CALLBACK, tgt_cp_callback)
1381 };
1382 EXPORT_SYMBOL(tgt_dlm_handlers);
1383
1384 /*
1385  * Unified target LLOG handlers.
1386  */
1387 int tgt_llog_open(struct tgt_session_info *tsi)
1388 {
1389         int rc;
1390
1391         ENTRY;
1392
1393         rc = llog_origin_handle_open(tgt_ses_req(tsi));
1394
1395         RETURN(rc);
1396 }
1397 EXPORT_SYMBOL(tgt_llog_open);
1398
1399 int tgt_llog_read_header(struct tgt_session_info *tsi)
1400 {
1401         int rc;
1402
1403         ENTRY;
1404
1405         rc = llog_origin_handle_read_header(tgt_ses_req(tsi));
1406
1407         RETURN(rc);
1408 }
1409 EXPORT_SYMBOL(tgt_llog_read_header);
1410
1411 int tgt_llog_next_block(struct tgt_session_info *tsi)
1412 {
1413         int rc;
1414
1415         ENTRY;
1416
1417         rc = llog_origin_handle_next_block(tgt_ses_req(tsi));
1418
1419         RETURN(rc);
1420 }
1421 EXPORT_SYMBOL(tgt_llog_next_block);
1422
1423 int tgt_llog_prev_block(struct tgt_session_info *tsi)
1424 {
1425         int rc;
1426
1427         ENTRY;
1428
1429         rc = llog_origin_handle_prev_block(tgt_ses_req(tsi));
1430
1431         RETURN(rc);
1432 }
1433 EXPORT_SYMBOL(tgt_llog_prev_block);
1434
1435 /* generic llog target handler */
1436 struct tgt_handler tgt_llog_handlers[] = {
1437 TGT_LLOG_HDL    (0,     LLOG_ORIGIN_HANDLE_CREATE,      tgt_llog_open),
1438 TGT_LLOG_HDL    (0,     LLOG_ORIGIN_HANDLE_NEXT_BLOCK,  tgt_llog_next_block),
1439 TGT_LLOG_HDL    (0,     LLOG_ORIGIN_HANDLE_READ_HEADER, tgt_llog_read_header),
1440 TGT_LLOG_HDL    (0,     LLOG_ORIGIN_HANDLE_PREV_BLOCK,  tgt_llog_prev_block),
1441 };
1442 EXPORT_SYMBOL(tgt_llog_handlers);
1443
1444 /*
1445  * sec context handlers
1446  */
1447 /* XXX: Implement based on mdt_sec_ctx_handle()? */
1448 static int tgt_sec_ctx_handle(struct tgt_session_info *tsi)
1449 {
1450         return 0;
1451 }
1452
1453 struct tgt_handler tgt_sec_ctx_handlers[] = {
1454 TGT_SEC_HDL_VAR(0,      SEC_CTX_INIT,           tgt_sec_ctx_handle),
1455 TGT_SEC_HDL_VAR(0,      SEC_CTX_INIT_CONT,      tgt_sec_ctx_handle),
1456 TGT_SEC_HDL_VAR(0,      SEC_CTX_FINI,           tgt_sec_ctx_handle),
1457 };
1458 EXPORT_SYMBOL(tgt_sec_ctx_handlers);
1459
1460 int (*tgt_lfsck_in_notify_local)(const struct lu_env *env,
1461                                  struct dt_device *key,
1462                                  struct lfsck_req_local *lrl,
1463                                  struct thandle *th) = NULL;
1464
1465 void tgt_register_lfsck_in_notify_local(int (*notify)(const struct lu_env *,
1466                                                       struct dt_device *,
1467                                                       struct lfsck_req_local *,
1468                                                       struct thandle *))
1469 {
1470         tgt_lfsck_in_notify_local = notify;
1471 }
1472 EXPORT_SYMBOL(tgt_register_lfsck_in_notify_local);
1473
1474 int (*tgt_lfsck_in_notify)(const struct lu_env *env,
1475                            struct dt_device *key,
1476                            struct lfsck_request *lr) = NULL;
1477
1478 void tgt_register_lfsck_in_notify(int (*notify)(const struct lu_env *,
1479                                                 struct dt_device *,
1480                                                 struct lfsck_request *))
1481 {
1482         tgt_lfsck_in_notify = notify;
1483 }
1484 EXPORT_SYMBOL(tgt_register_lfsck_in_notify);
1485
1486 static int (*tgt_lfsck_query)(const struct lu_env *env,
1487                               struct dt_device *key,
1488                               struct lfsck_request *req,
1489                               struct lfsck_reply *rep,
1490                               struct lfsck_query *que) = NULL;
1491
1492 void tgt_register_lfsck_query(int (*query)(const struct lu_env *,
1493                                            struct dt_device *,
1494                                            struct lfsck_request *,
1495                                            struct lfsck_reply *,
1496                                            struct lfsck_query *))
1497 {
1498         tgt_lfsck_query = query;
1499 }
1500 EXPORT_SYMBOL(tgt_register_lfsck_query);
1501
1502 /* LFSCK request handlers */
1503 static int tgt_handle_lfsck_notify(struct tgt_session_info *tsi)
1504 {
1505         const struct lu_env     *env = tsi->tsi_env;
1506         struct dt_device        *key = tsi->tsi_tgt->lut_bottom;
1507         struct lfsck_request    *lr;
1508         int                      rc;
1509         ENTRY;
1510
1511         lr = req_capsule_client_get(tsi->tsi_pill, &RMF_LFSCK_REQUEST);
1512         if (lr == NULL)
1513                 RETURN(-EPROTO);
1514
1515         rc = tgt_lfsck_in_notify(env, key, lr);
1516
1517         RETURN(rc);
1518 }
1519
1520 static int tgt_handle_lfsck_query(struct tgt_session_info *tsi)
1521 {
1522         struct lfsck_request    *request;
1523         struct lfsck_reply      *reply;
1524         int                      rc;
1525         ENTRY;
1526
1527         request = req_capsule_client_get(tsi->tsi_pill, &RMF_LFSCK_REQUEST);
1528         if (request == NULL)
1529                 RETURN(-EPROTO);
1530
1531         reply = req_capsule_server_get(tsi->tsi_pill, &RMF_LFSCK_REPLY);
1532         if (reply == NULL)
1533                 RETURN(-ENOMEM);
1534
1535         rc = tgt_lfsck_query(tsi->tsi_env, tsi->tsi_tgt->lut_bottom,
1536                              request, reply, NULL);
1537
1538         RETURN(rc < 0 ? rc : 0);
1539 }
1540
1541 struct tgt_handler tgt_lfsck_handlers[] = {
1542 TGT_LFSCK_HDL(HAS_REPLY,        LFSCK_NOTIFY,   tgt_handle_lfsck_notify),
1543 TGT_LFSCK_HDL(HAS_REPLY,        LFSCK_QUERY,    tgt_handle_lfsck_query),
1544 };
1545 EXPORT_SYMBOL(tgt_lfsck_handlers);
1546
1547 /*
1548  * initialize per-thread page pool (bug 5137).
1549  */
1550 int tgt_io_thread_init(struct ptlrpc_thread *thread)
1551 {
1552         struct tgt_thread_big_cache *tbc;
1553
1554         ENTRY;
1555
1556         LASSERT(thread != NULL);
1557         LASSERT(thread->t_data == NULL);
1558
1559         OBD_ALLOC_LARGE(tbc, sizeof(*tbc));
1560         if (tbc == NULL)
1561                 RETURN(-ENOMEM);
1562         thread->t_data = tbc;
1563         RETURN(0);
1564 }
1565 EXPORT_SYMBOL(tgt_io_thread_init);
1566
1567 /*
1568  * free per-thread pool created by tgt_thread_init().
1569  */
1570 void tgt_io_thread_done(struct ptlrpc_thread *thread)
1571 {
1572         struct tgt_thread_big_cache *tbc;
1573
1574         ENTRY;
1575
1576         LASSERT(thread != NULL);
1577
1578         /*
1579          * be prepared to handle partially-initialized pools (because this is
1580          * called from ost_io_thread_init() for cleanup.
1581          */
1582         tbc = thread->t_data;
1583         if (tbc != NULL) {
1584                 OBD_FREE_LARGE(tbc, sizeof(*tbc));
1585                 thread->t_data = NULL;
1586         }
1587         EXIT;
1588 }
1589 EXPORT_SYMBOL(tgt_io_thread_done);
1590
1591 /**
1592  * Helper function for getting Data-on-MDT file server DLM lock
1593  * if asked by client.
1594  */
1595 int tgt_mdt_data_lock(struct ldlm_namespace *ns, struct ldlm_res_id *res_id,
1596                       struct lustre_handle *lh, int mode, __u64 *flags)
1597 {
1598         union ldlm_policy_data policy = {
1599                 .l_inodebits.bits = MDS_INODELOCK_DOM,
1600         };
1601         int rc;
1602
1603         ENTRY;
1604
1605         LASSERT(lh != NULL);
1606         LASSERT(ns != NULL);
1607         LASSERT(!lustre_handle_is_used(lh));
1608
1609         rc = ldlm_cli_enqueue_local(NULL, ns, res_id, LDLM_IBITS, &policy, mode,
1610                                     flags, ldlm_blocking_ast,
1611                                     ldlm_completion_ast, ldlm_glimpse_ast,
1612                                     NULL, 0, LVB_T_NONE, NULL, lh);
1613
1614         RETURN(rc == ELDLM_OK ? 0 : -EIO);
1615 }
1616 EXPORT_SYMBOL(tgt_mdt_data_lock);
1617
1618 void tgt_mdt_data_unlock(struct lustre_handle *lh, enum ldlm_mode mode)
1619 {
1620         LASSERT(lustre_handle_is_used(lh));
1621         ldlm_lock_decref(lh, mode);
1622 }
1623 EXPORT_SYMBOL(tgt_mdt_data_unlock);
1624
1625 /**
1626  * Helper function for getting server side [start, start+count] DLM lock
1627  * if asked by client.
1628  */
1629 int tgt_extent_lock(const struct lu_env *env, struct ldlm_namespace *ns,
1630                     struct ldlm_res_id *res_id, __u64 start, __u64 end,
1631                     struct lustre_handle *lh, int mode, __u64 *flags)
1632 {
1633         union ldlm_policy_data policy;
1634         int rc;
1635
1636         ENTRY;
1637
1638         LASSERT(lh != NULL);
1639         LASSERT(ns != NULL);
1640         LASSERT(!lustre_handle_is_used(lh));
1641
1642         policy.l_extent.gid = 0;
1643         policy.l_extent.start = start & PAGE_MASK;
1644
1645         /*
1646          * If ->o_blocks is EOF it means "lock till the end of the file".
1647          * Otherwise, it's size of an extent or hole being punched (in bytes).
1648          */
1649         if (end == OBD_OBJECT_EOF || end < start)
1650                 policy.l_extent.end = OBD_OBJECT_EOF;
1651         else
1652                 policy.l_extent.end = end | ~PAGE_MASK;
1653
1654         rc = ldlm_cli_enqueue_local(env, ns, res_id, LDLM_EXTENT, &policy,
1655                                     mode, flags, ldlm_blocking_ast,
1656                                     ldlm_completion_ast, ldlm_glimpse_ast,
1657                                     NULL, 0, LVB_T_NONE, NULL, lh);
1658         RETURN(rc == ELDLM_OK ? 0 : -EIO);
1659 }
1660 EXPORT_SYMBOL(tgt_extent_lock);
1661
1662 void tgt_extent_unlock(struct lustre_handle *lh, enum ldlm_mode mode)
1663 {
1664         LASSERT(lustre_handle_is_used(lh));
1665         ldlm_lock_decref(lh, mode);
1666 }
1667 EXPORT_SYMBOL(tgt_extent_unlock);
1668
1669 static int tgt_brw_lock(const struct lu_env *env, struct obd_export *exp,
1670                         struct ldlm_res_id *res_id, struct obd_ioobj *obj,
1671                         struct niobuf_remote *nb, struct lustre_handle *lh,
1672                         enum ldlm_mode mode)
1673 {
1674         struct ldlm_namespace   *ns = exp->exp_obd->obd_namespace;
1675         __u64                    flags = 0;
1676         int                      nrbufs = obj->ioo_bufcnt;
1677         int                      i;
1678         int                      rc;
1679
1680         ENTRY;
1681
1682         LASSERT(mode == LCK_PR || mode == LCK_PW);
1683         LASSERT(!lustre_handle_is_used(lh));
1684
1685         if (ns->ns_obd->obd_recovering)
1686                 RETURN(0);
1687
1688         if (nrbufs == 0 || !(nb[0].rnb_flags & OBD_BRW_SRVLOCK))
1689                 RETURN(0);
1690
1691         for (i = 1; i < nrbufs; i++)
1692                 if (!(nb[i].rnb_flags & OBD_BRW_SRVLOCK))
1693                         RETURN(-EFAULT);
1694
1695         /* MDT IO for data-on-mdt */
1696         if (exp->exp_connect_data.ocd_connect_flags & OBD_CONNECT_IBITS)
1697                 rc = tgt_mdt_data_lock(ns, res_id, lh, mode, &flags);
1698         else
1699                 rc = tgt_extent_lock(env, ns, res_id, nb[0].rnb_offset,
1700                                      nb[nrbufs - 1].rnb_offset +
1701                                      nb[nrbufs - 1].rnb_len - 1,
1702                                      lh, mode, &flags);
1703         RETURN(rc);
1704 }
1705
1706 static void tgt_brw_unlock(struct obd_ioobj *obj, struct niobuf_remote *niob,
1707                            struct lustre_handle *lh, enum ldlm_mode mode)
1708 {
1709         ENTRY;
1710
1711         LASSERT(mode == LCK_PR || mode == LCK_PW);
1712         LASSERT((obj->ioo_bufcnt > 0 &&
1713                  (niob[0].rnb_flags & OBD_BRW_SRVLOCK)) ==
1714                 lustre_handle_is_used(lh));
1715
1716         if (lustre_handle_is_used(lh))
1717                 tgt_extent_unlock(lh, mode);
1718         EXIT;
1719 }
1720 static int tgt_checksum_niobuf(struct lu_target *tgt,
1721                                  struct niobuf_local *local_nb, int npages,
1722                                  int opc, enum cksum_types cksum_type,
1723                                  __u32 *cksum)
1724 {
1725         struct ahash_request           *req;
1726         unsigned int                    bufsize;
1727         int                             i, err;
1728         unsigned char                   cfs_alg = cksum_obd2cfs(cksum_type);
1729
1730         req = cfs_crypto_hash_init(cfs_alg, NULL, 0);
1731         if (IS_ERR(req)) {
1732                 CERROR("%s: unable to initialize checksum hash %s\n",
1733                        tgt_name(tgt), cfs_crypto_hash_name(cfs_alg));
1734                 return PTR_ERR(req);
1735         }
1736
1737         CDEBUG(D_INFO, "Checksum for algo %s\n", cfs_crypto_hash_name(cfs_alg));
1738         for (i = 0; i < npages; i++) {
1739                 /* corrupt the data before we compute the checksum, to
1740                  * simulate a client->OST data error */
1741                 if (i == 0 && opc == OST_WRITE &&
1742                     OBD_FAIL_CHECK(OBD_FAIL_OST_CHECKSUM_RECEIVE)) {
1743                         int off = local_nb[i].lnb_page_offset & ~PAGE_MASK;
1744                         int len = local_nb[i].lnb_len;
1745                         struct page *np = tgt_page_to_corrupt;
1746
1747                         if (np) {
1748                                 char *ptr = ll_kmap_atomic(local_nb[i].lnb_page,
1749                                                         KM_USER0);
1750                                 char *ptr2 = page_address(np);
1751
1752                                 memcpy(ptr2 + off, ptr + off, len);
1753                                 memcpy(ptr2 + off, "bad3", min(4, len));
1754                                 ll_kunmap_atomic(ptr, KM_USER0);
1755
1756                                 /* LU-8376 to preserve original index for
1757                                  * display in dump_all_bulk_pages() */
1758                                 np->index = i;
1759
1760                                 cfs_crypto_hash_update_page(req, np, off,
1761                                                             len);
1762                                 continue;
1763                         } else {
1764                                 CERROR("%s: can't alloc page for corruption\n",
1765                                        tgt_name(tgt));
1766                         }
1767                 }
1768                 cfs_crypto_hash_update_page(req, local_nb[i].lnb_page,
1769                                   local_nb[i].lnb_page_offset & ~PAGE_MASK,
1770                                   local_nb[i].lnb_len);
1771
1772                  /* corrupt the data after we compute the checksum, to
1773                  * simulate an OST->client data error */
1774                 if (i == 0 && opc == OST_READ &&
1775                     OBD_FAIL_CHECK(OBD_FAIL_OST_CHECKSUM_SEND)) {
1776                         int off = local_nb[i].lnb_page_offset & ~PAGE_MASK;
1777                         int len = local_nb[i].lnb_len;
1778                         struct page *np = tgt_page_to_corrupt;
1779
1780                         if (np) {
1781                                 char *ptr = ll_kmap_atomic(local_nb[i].lnb_page,
1782                                                         KM_USER0);
1783                                 char *ptr2 = page_address(np);
1784
1785                                 memcpy(ptr2 + off, ptr + off, len);
1786                                 memcpy(ptr2 + off, "bad4", min(4, len));
1787                                 ll_kunmap_atomic(ptr, KM_USER0);
1788
1789                                 /* LU-8376 to preserve original index for
1790                                  * display in dump_all_bulk_pages() */
1791                                 np->index = i;
1792
1793                                 cfs_crypto_hash_update_page(req, np, off,
1794                                                             len);
1795                                 continue;
1796                         } else {
1797                                 CERROR("%s: can't alloc page for corruption\n",
1798                                        tgt_name(tgt));
1799                         }
1800                 }
1801         }
1802
1803         bufsize = sizeof(*cksum);
1804         err = cfs_crypto_hash_final(req, (unsigned char *)cksum, &bufsize);
1805
1806         return 0;
1807 }
1808
1809 char dbgcksum_file_name[PATH_MAX];
1810
1811 static void dump_all_bulk_pages(struct obdo *oa, int count,
1812                                 struct niobuf_local *local_nb,
1813                                 __u32 server_cksum, __u32 client_cksum)
1814 {
1815         struct file *filp;
1816         int rc, i;
1817         unsigned int len;
1818         char *buf;
1819
1820         /* will only keep dump of pages on first error for the same range in
1821          * file/fid, not during the resends/retries. */
1822         snprintf(dbgcksum_file_name, sizeof(dbgcksum_file_name),
1823                  "%s-checksum_dump-ost-"DFID":[%llu-%llu]-%x-%x",
1824                  (strncmp(libcfs_debug_file_path_arr, "NONE", 4) != 0 ?
1825                   libcfs_debug_file_path_arr :
1826                   LIBCFS_DEBUG_FILE_PATH_DEFAULT),
1827                  oa->o_valid & OBD_MD_FLFID ? oa->o_parent_seq : (__u64)0,
1828                  oa->o_valid & OBD_MD_FLFID ? oa->o_parent_oid : 0,
1829                  oa->o_valid & OBD_MD_FLFID ? oa->o_parent_ver : 0,
1830                  local_nb[0].lnb_file_offset,
1831                  local_nb[count-1].lnb_file_offset +
1832                  local_nb[count-1].lnb_len - 1, client_cksum, server_cksum);
1833         filp = filp_open(dbgcksum_file_name,
1834                          O_CREAT | O_EXCL | O_WRONLY | O_LARGEFILE, 0600);
1835         if (IS_ERR(filp)) {
1836                 rc = PTR_ERR(filp);
1837                 if (rc == -EEXIST)
1838                         CDEBUG(D_INFO, "%s: can't open to dump pages with "
1839                                "checksum error: rc = %d\n", dbgcksum_file_name,
1840                                rc);
1841                 else
1842                         CERROR("%s: can't open to dump pages with checksum "
1843                                "error: rc = %d\n", dbgcksum_file_name, rc);
1844                 return;
1845         }
1846
1847         for (i = 0; i < count; i++) {
1848                 len = local_nb[i].lnb_len;
1849                 buf = kmap(local_nb[i].lnb_page);
1850                 while (len != 0) {
1851                         rc = cfs_kernel_write(filp, buf, len, &filp->f_pos);
1852                         if (rc < 0) {
1853                                 CERROR("%s: wanted to write %u but got %d "
1854                                        "error\n", dbgcksum_file_name, len, rc);
1855                                 break;
1856                         }
1857                         len -= rc;
1858                         buf += rc;
1859                         CDEBUG(D_INFO, "%s: wrote %d bytes\n",
1860                                dbgcksum_file_name, rc);
1861                 }
1862                 kunmap(local_nb[i].lnb_page);
1863         }
1864
1865         rc = ll_vfs_fsync_range(filp, 0, LLONG_MAX, 1);
1866         if (rc)
1867                 CERROR("%s: sync returns %d\n", dbgcksum_file_name, rc);
1868         filp_close(filp, NULL);
1869         return;
1870 }
1871
1872 static int check_read_checksum(struct niobuf_local *local_nb, int npages,
1873                                struct obd_export *exp, struct obdo *oa,
1874                                const struct lnet_process_id *peer,
1875                                __u32 client_cksum, __u32 server_cksum,
1876                                enum cksum_types server_cksum_type)
1877 {
1878         char *msg;
1879         enum cksum_types cksum_type;
1880         loff_t start, end;
1881
1882         /* unlikely to happen and only if resend does not occur due to cksum
1883          * control failure on Client */
1884         if (unlikely(server_cksum == client_cksum)) {
1885                 CDEBUG(D_PAGE, "checksum %x confirmed upon retry\n",
1886                        client_cksum);
1887                 return 0;
1888         }
1889
1890         if (exp->exp_obd->obd_checksum_dump)
1891                 dump_all_bulk_pages(oa, npages, local_nb, server_cksum,
1892                                     client_cksum);
1893
1894         cksum_type = obd_cksum_type_unpack(oa->o_valid & OBD_MD_FLFLAGS ?
1895                                            oa->o_flags : 0);
1896
1897         if (cksum_type != server_cksum_type)
1898                 msg = "the server may have not used the checksum type specified"
1899                       " in the original request - likely a protocol problem";
1900         else
1901                 msg = "should have changed on the client or in transit";
1902
1903         start = local_nb[0].lnb_file_offset;
1904         end = local_nb[npages-1].lnb_file_offset +
1905                                         local_nb[npages-1].lnb_len - 1;
1906
1907         LCONSOLE_ERROR_MSG(0x132, "%s: BAD READ CHECKSUM: %s: from %s inode "
1908                 DFID " object "DOSTID" extent [%llu-%llu], client returned csum"
1909                 " %x (type %x), server csum %x (type %x)\n",
1910                 exp->exp_obd->obd_name,
1911                 msg, libcfs_nid2str(peer->nid),
1912                 oa->o_valid & OBD_MD_FLFID ? oa->o_parent_seq : 0ULL,
1913                 oa->o_valid & OBD_MD_FLFID ? oa->o_parent_oid : 0,
1914                 oa->o_valid & OBD_MD_FLFID ? oa->o_parent_ver : 0,
1915                 POSTID(&oa->o_oi),
1916                 start, end, client_cksum, cksum_type, server_cksum,
1917                 server_cksum_type);
1918
1919         return 1;
1920 }
1921
1922 static int tgt_pages2shortio(struct niobuf_local *local, int npages,
1923                              unsigned char *buf, int size)
1924 {
1925         int     i, off, len, copied = size;
1926         char    *ptr;
1927
1928         for (i = 0; i < npages; i++) {
1929                 off = local[i].lnb_page_offset & ~PAGE_MASK;
1930                 len = local[i].lnb_len;
1931
1932                 CDEBUG(D_PAGE, "index %d offset = %d len = %d left = %d\n",
1933                        i, off, len, size);
1934                 if (len > size)
1935                         return -EINVAL;
1936
1937                 ptr = ll_kmap_atomic(local[i].lnb_page, KM_USER0);
1938                 memcpy(buf + off, ptr, len);
1939                 ll_kunmap_atomic(ptr, KM_USER0);
1940                 buf += len;
1941                 size -= len;
1942         }
1943         return copied - size;
1944 }
1945
1946 static int tgt_checksum_niobuf_t10pi(struct lu_target *tgt,
1947                                      struct niobuf_local *local_nb,
1948                                      int npages, int opc,
1949                                      obd_dif_csum_fn *fn,
1950                                      int sector_size,
1951                                      u32 *check_sum)
1952 {
1953         enum cksum_types t10_cksum_type = tgt->lut_dt_conf.ddp_t10_cksum_type;
1954         unsigned char cfs_alg = cksum_obd2cfs(OBD_CKSUM_T10_TOP);
1955         const char *obd_name = tgt->lut_obd->obd_name;
1956         struct ahash_request *req;
1957         unsigned int bufsize;
1958         unsigned char *buffer;
1959         struct page *__page;
1960         __u16 *guard_start;
1961         int guard_number;
1962         int used_number = 0;
1963         __u32 cksum;
1964         int rc = 0;
1965         int used;
1966         int i;
1967
1968         __page = alloc_page(GFP_KERNEL);
1969         if (__page == NULL)
1970                 return -ENOMEM;
1971
1972         req = cfs_crypto_hash_init(cfs_alg, NULL, 0);
1973         if (IS_ERR(req)) {
1974                 CERROR("%s: unable to initialize checksum hash %s\n",
1975                        tgt_name(tgt), cfs_crypto_hash_name(cfs_alg));
1976                 return PTR_ERR(req);
1977         }
1978
1979         buffer = kmap(__page);
1980         guard_start = (__u16 *)buffer;
1981         guard_number = PAGE_SIZE / sizeof(*guard_start);
1982         for (i = 0; i < npages; i++) {
1983                 /* corrupt the data before we compute the checksum, to
1984                  * simulate a client->OST data error */
1985                 if (i == 0 && opc == OST_WRITE &&
1986                     OBD_FAIL_CHECK(OBD_FAIL_OST_CHECKSUM_RECEIVE)) {
1987                         int off = local_nb[i].lnb_page_offset & ~PAGE_MASK;
1988                         int len = local_nb[i].lnb_len;
1989                         struct page *np = tgt_page_to_corrupt;
1990
1991                         if (np) {
1992                                 char *ptr = ll_kmap_atomic(local_nb[i].lnb_page,
1993                                                         KM_USER0);
1994                                 char *ptr2 = page_address(np);
1995
1996                                 memcpy(ptr2 + off, ptr + off, len);
1997                                 memcpy(ptr2 + off, "bad3", min(4, len));
1998                                 ll_kunmap_atomic(ptr, KM_USER0);
1999
2000                                 /* LU-8376 to preserve original index for
2001                                  * display in dump_all_bulk_pages() */
2002                                 np->index = i;
2003
2004                                 cfs_crypto_hash_update_page(req, np, off,
2005                                                             len);
2006                                 continue;
2007                         } else {
2008                                 CERROR("%s: can't alloc page for corruption\n",
2009                                        tgt_name(tgt));
2010                         }
2011                 }
2012
2013                 /*
2014                  * The left guard number should be able to hold checksums of a
2015                  * whole page
2016                  */
2017                 if (t10_cksum_type && opc == OST_READ &&
2018                     local_nb[i].lnb_guard_disk) {
2019                         used = DIV_ROUND_UP(local_nb[i].lnb_len, sector_size);
2020                         if (used > (guard_number - used_number)) {
2021                                 rc = -E2BIG;
2022                                 break;
2023                         }
2024                         memcpy(guard_start + used_number,
2025                                local_nb[i].lnb_guards,
2026                                used * sizeof(*local_nb[i].lnb_guards));
2027                 } else {
2028                         rc = obd_page_dif_generate_buffer(obd_name,
2029                                 local_nb[i].lnb_page,
2030                                 local_nb[i].lnb_page_offset & ~PAGE_MASK,
2031                                 local_nb[i].lnb_len, guard_start + used_number,
2032                                 guard_number - used_number, &used, sector_size,
2033                                 fn);
2034                         if (rc)
2035                                 break;
2036                 }
2037
2038                 LASSERT(used <= MAX_GUARD_NUMBER);
2039                 /*
2040                  * If disk support T10PI checksum, copy guards to local_nb.
2041                  * If the write is partial page, do not use the guards for bio
2042                  * submission since the data might not be full-sector. The bio
2043                  * guards will be generated later based on the full sectors. If
2044                  * the sector size is 512B rather than 4 KB, or the page size
2045                  * is larger than 4KB, this might drop some useful guards for
2046                  * partial page write, but it will only add minimal extra time
2047                  * of checksum calculation.
2048                  */
2049                 if (t10_cksum_type && opc == OST_WRITE &&
2050                     local_nb[i].lnb_len == PAGE_SIZE) {
2051                         local_nb[i].lnb_guard_rpc = 1;
2052                         memcpy(local_nb[i].lnb_guards,
2053                                guard_start + used_number,
2054                                used * sizeof(*local_nb[i].lnb_guards));
2055                 }
2056
2057                 used_number += used;
2058                 if (used_number == guard_number) {
2059                         cfs_crypto_hash_update_page(req, __page, 0,
2060                                 used_number * sizeof(*guard_start));
2061                         used_number = 0;
2062                 }
2063
2064                  /* corrupt the data after we compute the checksum, to
2065                  * simulate an OST->client data error */
2066                 if (unlikely(i == 0 && opc == OST_READ &&
2067                              OBD_FAIL_CHECK(OBD_FAIL_OST_CHECKSUM_SEND))) {
2068                         int off = local_nb[i].lnb_page_offset & ~PAGE_MASK;
2069                         int len = local_nb[i].lnb_len;
2070                         struct page *np = tgt_page_to_corrupt;
2071
2072                         if (np) {
2073                                 char *ptr = ll_kmap_atomic(local_nb[i].lnb_page,
2074                                                         KM_USER0);
2075                                 char *ptr2 = page_address(np);
2076
2077                                 memcpy(ptr2 + off, ptr + off, len);
2078                                 memcpy(ptr2 + off, "bad4", min(4, len));
2079                                 ll_kunmap_atomic(ptr, KM_USER0);
2080
2081                                 /* LU-8376 to preserve original index for
2082                                  * display in dump_all_bulk_pages() */
2083                                 np->index = i;
2084
2085                                 cfs_crypto_hash_update_page(req, np, off,
2086                                                             len);
2087                                 continue;
2088                         } else {
2089                                 CERROR("%s: can't alloc page for corruption\n",
2090                                        tgt_name(tgt));
2091                         }
2092                 }
2093         }
2094         kunmap(__page);
2095         if (rc)
2096                 GOTO(out, rc);
2097
2098         if (used_number != 0)
2099                 cfs_crypto_hash_update_page(req, __page, 0,
2100                         used_number * sizeof(*guard_start));
2101
2102         bufsize = sizeof(cksum);
2103         rc = cfs_crypto_hash_final(req, (unsigned char *)&cksum, &bufsize);
2104
2105         if (rc == 0)
2106                 *check_sum = cksum;
2107 out:
2108         __free_page(__page);
2109         return rc;
2110 }
2111
2112 static int tgt_checksum_niobuf_rw(struct lu_target *tgt,
2113                                   enum cksum_types cksum_type,
2114                                   struct niobuf_local *local_nb,
2115                                   int npages, int opc, u32 *check_sum)
2116 {
2117         obd_dif_csum_fn *fn = NULL;
2118         int sector_size = 0;
2119         int rc;
2120
2121         ENTRY;
2122         obd_t10_cksum2dif(cksum_type, &fn, &sector_size);
2123
2124         if (fn)
2125                 rc = tgt_checksum_niobuf_t10pi(tgt, local_nb, npages,
2126                                                opc, fn, sector_size,
2127                                                check_sum);
2128         else
2129                 rc = tgt_checksum_niobuf(tgt, local_nb, npages, opc,
2130                                          cksum_type, check_sum);
2131         RETURN(rc);
2132 }
2133
2134 int tgt_brw_read(struct tgt_session_info *tsi)
2135 {
2136         struct ptlrpc_request   *req = tgt_ses_req(tsi);
2137         struct ptlrpc_bulk_desc *desc = NULL;
2138         struct obd_export       *exp = tsi->tsi_exp;
2139         struct niobuf_remote    *remote_nb;
2140         struct niobuf_local     *local_nb;
2141         struct obd_ioobj        *ioo;
2142         struct ost_body         *body, *repbody;
2143         struct l_wait_info       lwi;
2144         struct lustre_handle     lockh = { 0 };
2145         int                      npages, nob = 0, rc, i, no_reply = 0,
2146                                  npages_read;
2147         struct tgt_thread_big_cache *tbc = req->rq_svc_thread->t_data;
2148         const char *obd_name = exp->exp_obd->obd_name;
2149
2150         ENTRY;
2151
2152         if (ptlrpc_req2svc(req)->srv_req_portal != OST_IO_PORTAL &&
2153             ptlrpc_req2svc(req)->srv_req_portal != MDS_IO_PORTAL) {
2154                 CERROR("%s: deny read request from %s to portal %u\n",
2155                        tgt_name(tsi->tsi_tgt),
2156                        obd_export_nid2str(req->rq_export),
2157                        ptlrpc_req2svc(req)->srv_req_portal);
2158                 RETURN(-EPROTO);
2159         }
2160
2161         req->rq_bulk_read = 1;
2162
2163         if (OBD_FAIL_CHECK(OBD_FAIL_OST_BRW_READ_BULK))
2164                 RETURN(-EIO);
2165
2166         OBD_FAIL_TIMEOUT(OBD_FAIL_OST_BRW_PAUSE_BULK, cfs_fail_val > 0 ?
2167                          cfs_fail_val : (obd_timeout + 1) / 4);
2168
2169         /* Check if there is eviction in progress, and if so, wait for it to
2170          * finish */
2171         if (unlikely(atomic_read(&exp->exp_obd->obd_evict_inprogress))) {
2172                 /* We do not care how long it takes */
2173                 lwi = LWI_INTR(NULL, NULL);
2174                 rc = l_wait_event(exp->exp_obd->obd_evict_inprogress_waitq,
2175                          !atomic_read(&exp->exp_obd->obd_evict_inprogress),
2176                          &lwi);
2177         }
2178
2179         /* There must be big cache in current thread to process this request
2180          * if it is NULL then something went wrong and it wasn't allocated,
2181          * report -ENOMEM in that case */
2182         if (tbc == NULL)
2183                 RETURN(-ENOMEM);
2184
2185         body = tsi->tsi_ost_body;
2186         LASSERT(body != NULL);
2187
2188         ioo = req_capsule_client_get(tsi->tsi_pill, &RMF_OBD_IOOBJ);
2189         LASSERT(ioo != NULL); /* must exists after tgt_ost_body_unpack */
2190
2191         remote_nb = req_capsule_client_get(&req->rq_pill, &RMF_NIOBUF_REMOTE);
2192         LASSERT(remote_nb != NULL); /* must exists after tgt_ost_body_unpack */
2193
2194         local_nb = tbc->local;
2195
2196         rc = tgt_brw_lock(tsi->tsi_env, exp, &tsi->tsi_resid, ioo, remote_nb,
2197                           &lockh, LCK_PR);
2198         if (rc != 0)
2199                 RETURN(rc);
2200
2201         /*
2202          * If getting the lock took more time than
2203          * client was willing to wait, drop it. b=11330
2204          */
2205         if (ktime_get_real_seconds() > req->rq_deadline ||
2206             OBD_FAIL_CHECK(OBD_FAIL_OST_DROP_REQ)) {
2207                 no_reply = 1;
2208                 CERROR("Dropping timed-out read from %s because locking object " DOSTID " took %lld seconds (limit was %lld).\n",
2209                        libcfs_id2str(req->rq_peer), POSTID(&ioo->ioo_oid),
2210                        ktime_get_real_seconds() - req->rq_arrival_time.tv_sec,
2211                        req->rq_deadline - req->rq_arrival_time.tv_sec);
2212                 GOTO(out_lock, rc = -ETIMEDOUT);
2213         }
2214
2215         repbody = req_capsule_server_get(&req->rq_pill, &RMF_OST_BODY);
2216         repbody->oa = body->oa;
2217
2218         npages = PTLRPC_MAX_BRW_PAGES;
2219         rc = obd_preprw(tsi->tsi_env, OBD_BRW_READ, exp, &repbody->oa, 1,
2220                         ioo, remote_nb, &npages, local_nb);
2221         if (rc != 0)
2222                 GOTO(out_lock, rc);
2223
2224         if (body->oa.o_flags & OBD_FL_SHORT_IO) {
2225                 desc = NULL;
2226         } else {
2227                 desc = ptlrpc_prep_bulk_exp(req, npages, ioobj_max_brw_get(ioo),
2228                                             PTLRPC_BULK_PUT_SOURCE |
2229                                                 PTLRPC_BULK_BUF_KIOV,
2230                                             OST_BULK_PORTAL,
2231                                             &ptlrpc_bulk_kiov_nopin_ops);
2232                 if (desc == NULL)
2233                         GOTO(out_commitrw, rc = -ENOMEM);
2234         }
2235
2236         nob = 0;
2237         npages_read = npages;
2238         for (i = 0; i < npages; i++) {
2239                 int page_rc = local_nb[i].lnb_rc;
2240
2241                 if (page_rc < 0) {
2242                         rc = page_rc;
2243                         npages_read = i;
2244                         break;
2245                 }
2246
2247                 nob += page_rc;
2248                 if (page_rc != 0 && desc != NULL) { /* some data! */
2249                         LASSERT(local_nb[i].lnb_page != NULL);
2250                         desc->bd_frag_ops->add_kiov_frag
2251                           (desc, local_nb[i].lnb_page,
2252                            local_nb[i].lnb_page_offset & ~PAGE_MASK,
2253                            page_rc);
2254                 }
2255
2256                 if (page_rc != local_nb[i].lnb_len) { /* short read */
2257                         local_nb[i].lnb_len = page_rc;
2258                         npages_read = i + (page_rc != 0 ? 1 : 0);
2259                         /* All subsequent pages should be 0 */
2260                         while (++i < npages)
2261                                 LASSERT(local_nb[i].lnb_rc == 0);
2262                         break;
2263                 }
2264         }
2265         if (OBD_FAIL_CHECK(OBD_FAIL_OST_READ_SIZE) &&
2266             nob != cfs_fail_val)
2267                 rc = -E2BIG;
2268
2269         if (body->oa.o_valid & OBD_MD_FLCKSUM) {
2270                 u32 flag = body->oa.o_valid & OBD_MD_FLFLAGS ?
2271                            body->oa.o_flags : 0;
2272                 enum cksum_types cksum_type = obd_cksum_type_unpack(flag);
2273
2274                 repbody->oa.o_flags = obd_cksum_type_pack(obd_name,
2275                                                           cksum_type);
2276                 repbody->oa.o_valid = OBD_MD_FLCKSUM | OBD_MD_FLFLAGS;
2277
2278                 rc = tgt_checksum_niobuf_rw(tsi->tsi_tgt, cksum_type,
2279                                             local_nb, npages_read, OST_READ,
2280                                             &repbody->oa.o_cksum);
2281                 if (rc < 0)
2282                         GOTO(out_commitrw, rc);
2283                 CDEBUG(D_PAGE, "checksum at read origin: %x\n",
2284                        repbody->oa.o_cksum);
2285
2286                 /* if a resend it could be for a cksum error, so check Server
2287                  * cksum with returned Client cksum (this should even cover
2288                  * zero-cksum case) */
2289                 if ((body->oa.o_valid & OBD_MD_FLFLAGS) &&
2290                     (body->oa.o_flags & OBD_FL_RECOV_RESEND))
2291                         check_read_checksum(local_nb, npages_read, exp,
2292                                             &body->oa, &req->rq_peer,
2293                                             body->oa.o_cksum,
2294                                             repbody->oa.o_cksum, cksum_type);
2295         } else {
2296                 repbody->oa.o_valid = 0;
2297         }
2298         /* We're finishing using body->oa as an input variable */
2299
2300         /* Check if client was evicted while we were doing i/o before touching
2301          * network */
2302         if (rc == 0) {
2303                 if (body->oa.o_flags & OBD_FL_SHORT_IO) {
2304                         unsigned char *short_io_buf;
2305                         int short_io_size;
2306
2307                         short_io_buf = req_capsule_server_get(&req->rq_pill,
2308                                                               &RMF_SHORT_IO);
2309                         short_io_size = req_capsule_get_size(&req->rq_pill,
2310                                                              &RMF_SHORT_IO,
2311                                                              RCL_SERVER);
2312                         rc = tgt_pages2shortio(local_nb, npages_read,
2313                                                short_io_buf, short_io_size);
2314                         if (rc >= 0)
2315                                 req_capsule_shrink(&req->rq_pill,
2316                                                    &RMF_SHORT_IO, rc,
2317                                                    RCL_SERVER);
2318                         rc = rc > 0 ? 0 : rc;
2319                 } else if (!CFS_FAIL_PRECHECK(OBD_FAIL_PTLRPC_CLIENT_BULK_CB2)) {
2320                         rc = target_bulk_io(exp, desc, &lwi);
2321                 }
2322                 no_reply = rc != 0;
2323         } else {
2324                 if (body->oa.o_flags & OBD_FL_SHORT_IO)
2325                         req_capsule_shrink(&req->rq_pill, &RMF_SHORT_IO, 0,
2326                                            RCL_SERVER);
2327         }
2328
2329 out_commitrw:
2330         /* Must commit after prep above in all cases */
2331         rc = obd_commitrw(tsi->tsi_env, OBD_BRW_READ, exp, &repbody->oa, 1, ioo,
2332                           remote_nb, npages, local_nb, rc);
2333 out_lock:
2334         tgt_brw_unlock(ioo, remote_nb, &lockh, LCK_PR);
2335
2336         if (desc && !CFS_FAIL_PRECHECK(OBD_FAIL_PTLRPC_CLIENT_BULK_CB2))
2337                 ptlrpc_free_bulk(desc);
2338
2339         LASSERT(rc <= 0);
2340         if (rc == 0) {
2341                 rc = nob;
2342                 ptlrpc_lprocfs_brw(req, nob);
2343         } else if (no_reply) {
2344                 req->rq_no_reply = 1;
2345                 /* reply out callback would free */
2346                 ptlrpc_req_drop_rs(req);
2347                 LCONSOLE_WARN("%s: Bulk IO read error with %s (at %s), "
2348                               "client will retry: rc %d\n",
2349                               obd_name,
2350                               obd_uuid2str(&exp->exp_client_uuid),
2351                               obd_export_nid2str(exp), rc);
2352         }
2353         /* send a bulk after reply to simulate a network delay or reordering
2354          * by a router - Note that !desc implies short io, so there is no bulk
2355          * to reorder. */
2356         if (unlikely(CFS_FAIL_PRECHECK(OBD_FAIL_PTLRPC_CLIENT_BULK_CB2)) &&
2357             desc) {
2358                 wait_queue_head_t        waitq;
2359                 struct l_wait_info       lwi1;
2360
2361                 CDEBUG(D_INFO, "reorder BULK\n");
2362                 init_waitqueue_head(&waitq);
2363
2364                 lwi1 = LWI_TIMEOUT_INTR(cfs_time_seconds(3), NULL, NULL, NULL);
2365                 l_wait_event(waitq, 0, &lwi1);
2366                 target_bulk_io(exp, desc, &lwi);
2367                 ptlrpc_free_bulk(desc);
2368         }
2369
2370         RETURN(rc);
2371 }
2372 EXPORT_SYMBOL(tgt_brw_read);
2373
2374 static int tgt_shortio2pages(struct niobuf_local *local, int npages,
2375                              unsigned char *buf, int size)
2376 {
2377         int     i, off, len;
2378         char    *ptr;
2379
2380         for (i = 0; i < npages; i++) {
2381                 off = local[i].lnb_page_offset & ~PAGE_MASK;
2382                 len = local[i].lnb_len;
2383
2384                 if (len == 0)
2385                         continue;
2386
2387                 CDEBUG(D_PAGE, "index %d offset = %d len = %d left = %d\n",
2388                        i, off, len, size);
2389                 ptr = ll_kmap_atomic(local[i].lnb_page, KM_USER0);
2390                 if (ptr == NULL)
2391                         return -EINVAL;
2392                 memcpy(ptr + off, buf, len < size ? len : size);
2393                 ll_kunmap_atomic(ptr, KM_USER0);
2394                 buf += len;
2395                 size -= len;
2396         }
2397         return 0;
2398 }
2399
2400 static void tgt_warn_on_cksum(struct ptlrpc_request *req,
2401                               struct ptlrpc_bulk_desc *desc,
2402                               struct niobuf_local *local_nb, int npages,
2403                               u32 client_cksum, u32 server_cksum,
2404                               bool mmap)
2405 {
2406         struct obd_export *exp = req->rq_export;
2407         struct ost_body *body;
2408         char *router = "";
2409         char *via = "";
2410
2411         body = req_capsule_client_get(&req->rq_pill, &RMF_OST_BODY);
2412         LASSERT(body != NULL);
2413
2414         if (desc && req->rq_peer.nid != desc->bd_sender) {
2415                 via = " via ";
2416                 router = libcfs_nid2str(desc->bd_sender);
2417         }
2418
2419         if (exp->exp_obd->obd_checksum_dump)
2420                 dump_all_bulk_pages(&body->oa, npages, local_nb, server_cksum,
2421                                     client_cksum);
2422
2423         if (mmap) {
2424                 CDEBUG_LIMIT(D_INFO, "client csum %x, server csum %x\n",
2425                              client_cksum, server_cksum);
2426                 return;
2427         }
2428
2429         LCONSOLE_ERROR_MSG(0x168, "%s: BAD WRITE CHECKSUM: from %s%s%s inode "
2430                            DFID" object "DOSTID" extent [%llu-%llu"
2431                            "]: client csum %x, server csum %x\n",
2432                            exp->exp_obd->obd_name, libcfs_id2str(req->rq_peer),
2433                            via, router,
2434                            body->oa.o_valid & OBD_MD_FLFID ?
2435                            body->oa.o_parent_seq : (__u64)0,
2436                            body->oa.o_valid & OBD_MD_FLFID ?
2437                            body->oa.o_parent_oid : 0,
2438                            body->oa.o_valid & OBD_MD_FLFID ?
2439                            body->oa.o_parent_ver : 0,
2440                            POSTID(&body->oa.o_oi),
2441                            local_nb[0].lnb_file_offset,
2442                            local_nb[npages-1].lnb_file_offset +
2443                            local_nb[npages - 1].lnb_len - 1,
2444                            client_cksum, server_cksum);
2445 }
2446
2447 int tgt_brw_write(struct tgt_session_info *tsi)
2448 {
2449         struct ptlrpc_request   *req = tgt_ses_req(tsi);
2450         struct ptlrpc_bulk_desc *desc = NULL;
2451         struct obd_export       *exp = req->rq_export;
2452         struct niobuf_remote    *remote_nb;
2453         struct niobuf_local     *local_nb;
2454         struct obd_ioobj        *ioo;
2455         struct ost_body         *body, *repbody;
2456         struct l_wait_info       lwi;
2457         struct lustre_handle     lockh = {0};
2458         __u32                   *rcs;
2459         int                      objcount, niocount, npages;
2460         int                      rc, i, j;
2461         enum cksum_types cksum_type = OBD_CKSUM_CRC32;
2462         bool                     no_reply = false, mmap;
2463         struct tgt_thread_big_cache *tbc = req->rq_svc_thread->t_data;
2464         bool wait_sync = false;
2465         const char *obd_name = exp->exp_obd->obd_name;
2466
2467         ENTRY;
2468
2469         if (ptlrpc_req2svc(req)->srv_req_portal != OST_IO_PORTAL &&
2470             ptlrpc_req2svc(req)->srv_req_portal != MDS_IO_PORTAL) {
2471                 CERROR("%s: deny write request from %s to portal %u\n",
2472                        tgt_name(tsi->tsi_tgt),
2473                        obd_export_nid2str(req->rq_export),
2474                        ptlrpc_req2svc(req)->srv_req_portal);
2475                 RETURN(err_serious(-EPROTO));
2476         }
2477
2478         if (OBD_FAIL_CHECK(OBD_FAIL_OST_ENOSPC))
2479                 RETURN(err_serious(-ENOSPC));
2480         if (OBD_FAIL_TIMEOUT(OBD_FAIL_OST_EROFS, 1))
2481                 RETURN(err_serious(-EROFS));
2482
2483         req->rq_bulk_write = 1;
2484
2485         if (OBD_FAIL_CHECK(OBD_FAIL_OST_BRW_WRITE_BULK))
2486                 RETURN(err_serious(-EIO));
2487         if (OBD_FAIL_CHECK(OBD_FAIL_OST_BRW_WRITE_BULK2))
2488                 RETURN(err_serious(-EFAULT));
2489
2490         /* pause before transaction has been started */
2491         CFS_FAIL_TIMEOUT(OBD_FAIL_OST_BRW_PAUSE_BULK, cfs_fail_val > 0 ?
2492                          cfs_fail_val : (obd_timeout + 1) / 4);
2493
2494         /* There must be big cache in current thread to process this request
2495          * if it is NULL then something went wrong and it wasn't allocated,
2496          * report -ENOMEM in that case */
2497         if (tbc == NULL)
2498                 RETURN(-ENOMEM);
2499
2500         body = tsi->tsi_ost_body;
2501         LASSERT(body != NULL);
2502
2503         ioo = req_capsule_client_get(&req->rq_pill, &RMF_OBD_IOOBJ);
2504         LASSERT(ioo != NULL); /* must exists after tgt_ost_body_unpack */
2505
2506         objcount = req_capsule_get_size(&req->rq_pill, &RMF_OBD_IOOBJ,
2507                                         RCL_CLIENT) / sizeof(*ioo);
2508
2509         for (niocount = i = 0; i < objcount; i++)
2510                 niocount += ioo[i].ioo_bufcnt;
2511
2512         remote_nb = req_capsule_client_get(&req->rq_pill, &RMF_NIOBUF_REMOTE);
2513         LASSERT(remote_nb != NULL); /* must exists after tgt_ost_body_unpack */
2514         if (niocount != req_capsule_get_size(&req->rq_pill,
2515                                              &RMF_NIOBUF_REMOTE, RCL_CLIENT) /
2516                         sizeof(*remote_nb))
2517                 RETURN(err_serious(-EPROTO));
2518
2519         if ((remote_nb[0].rnb_flags & OBD_BRW_MEMALLOC) &&
2520             ptlrpc_connection_is_local(exp->exp_connection))
2521                 memory_pressure_set();
2522
2523         req_capsule_set_size(&req->rq_pill, &RMF_RCS, RCL_SERVER,
2524                              niocount * sizeof(*rcs));
2525         rc = req_capsule_server_pack(&req->rq_pill);
2526         if (rc != 0)
2527                 GOTO(out, rc = err_serious(rc));
2528
2529         CFS_FAIL_TIMEOUT(OBD_FAIL_OST_BRW_PAUSE_PACK, cfs_fail_val);
2530         rcs = req_capsule_server_get(&req->rq_pill, &RMF_RCS);
2531
2532         local_nb = tbc->local;
2533
2534         rc = tgt_brw_lock(tsi->tsi_env, exp, &tsi->tsi_resid, ioo, remote_nb,
2535                           &lockh, LCK_PW);
2536         if (rc != 0)
2537                 GOTO(out, rc);
2538
2539         /*
2540          * If getting the lock took more time than
2541          * client was willing to wait, drop it. b=11330
2542          */
2543         if (ktime_get_real_seconds() > req->rq_deadline ||
2544             OBD_FAIL_CHECK(OBD_FAIL_OST_DROP_REQ)) {
2545                 no_reply = true;
2546                 CERROR("%s: Dropping timed-out write from %s because locking object " DOSTID " took %lld seconds (limit was %lld).\n",
2547                        tgt_name(tsi->tsi_tgt), libcfs_id2str(req->rq_peer),
2548                        POSTID(&ioo->ioo_oid),
2549                        ktime_get_real_seconds() - req->rq_arrival_time.tv_sec,
2550                        req->rq_deadline - req->rq_arrival_time.tv_sec);
2551                 GOTO(out_lock, rc = -ETIMEDOUT);
2552         }
2553
2554         /* Because we already sync grant info with client when reconnect,
2555          * grant info will be cleared for resent req, then fed_grant and
2556          * total_grant will not be modified in following preprw_write */
2557         if (lustre_msg_get_flags(req->rq_reqmsg) & (MSG_RESENT | MSG_REPLAY)) {
2558                 DEBUG_REQ(D_CACHE, req, "clear resent/replay req grant info");
2559                 body->oa.o_valid &= ~OBD_MD_FLGRANT;
2560         }
2561
2562         repbody = req_capsule_server_get(&req->rq_pill, &RMF_OST_BODY);
2563         if (repbody == NULL)
2564                 GOTO(out_lock, rc = -ENOMEM);
2565         repbody->oa = body->oa;
2566
2567         npages = PTLRPC_MAX_BRW_PAGES;
2568         rc = obd_preprw(tsi->tsi_env, OBD_BRW_WRITE, exp, &repbody->oa,
2569                         objcount, ioo, remote_nb, &npages, local_nb);
2570         if (rc < 0)
2571                 GOTO(out_lock, rc);
2572         if (body->oa.o_flags & OBD_FL_SHORT_IO) {
2573                 int short_io_size;
2574                 unsigned char *short_io_buf;
2575
2576                 short_io_size = req_capsule_get_size(&req->rq_pill,
2577                                                      &RMF_SHORT_IO,
2578                                                      RCL_CLIENT);
2579                 short_io_buf = req_capsule_client_get(&req->rq_pill,
2580                                                       &RMF_SHORT_IO);
2581                 CDEBUG(D_INFO, "Client use short io for data transfer,"
2582                                " size = %d\n", short_io_size);
2583
2584                 /* Copy short io buf to pages */
2585                 rc = tgt_shortio2pages(local_nb, npages, short_io_buf,
2586                                        short_io_size);
2587                 desc = NULL;
2588         } else {
2589                 desc = ptlrpc_prep_bulk_exp(req, npages, ioobj_max_brw_get(ioo),
2590                                             PTLRPC_BULK_GET_SINK |
2591                                             PTLRPC_BULK_BUF_KIOV,
2592                                             OST_BULK_PORTAL,
2593                                             &ptlrpc_bulk_kiov_nopin_ops);
2594                 if (desc == NULL)
2595                         GOTO(skip_transfer, rc = -ENOMEM);
2596
2597                 /* NB Having prepped, we must commit... */
2598                 for (i = 0; i < npages; i++)
2599                         desc->bd_frag_ops->add_kiov_frag(desc,
2600                                         local_nb[i].lnb_page,
2601                                         local_nb[i].lnb_page_offset & ~PAGE_MASK,
2602                                         local_nb[i].lnb_len);
2603
2604                 rc = sptlrpc_svc_prep_bulk(req, desc);
2605                 if (rc != 0)
2606                         GOTO(skip_transfer, rc);
2607
2608                 rc = target_bulk_io(exp, desc, &lwi);
2609         }
2610
2611         no_reply = rc != 0;
2612
2613 skip_transfer:
2614         if (body->oa.o_valid & OBD_MD_FLCKSUM && rc == 0) {
2615                 static int cksum_counter;
2616
2617                 if (body->oa.o_valid & OBD_MD_FLFLAGS)
2618                         cksum_type = obd_cksum_type_unpack(body->oa.o_flags);
2619
2620                 repbody->oa.o_valid |= OBD_MD_FLCKSUM | OBD_MD_FLFLAGS;
2621                 repbody->oa.o_flags &= ~OBD_FL_CKSUM_ALL;
2622                 repbody->oa.o_flags |= obd_cksum_type_pack(obd_name,
2623                                                            cksum_type);
2624
2625                 rc = tgt_checksum_niobuf_rw(tsi->tsi_tgt, cksum_type,
2626                                             local_nb, npages, OST_WRITE,
2627                                             &repbody->oa.o_cksum);
2628                 if (rc < 0)
2629                         GOTO(out_commitrw, rc);
2630
2631                 cksum_counter++;
2632
2633                 if (unlikely(body->oa.o_cksum != repbody->oa.o_cksum)) {
2634                         mmap = (body->oa.o_valid & OBD_MD_FLFLAGS &&
2635                                 body->oa.o_flags & OBD_FL_MMAP);
2636
2637                         tgt_warn_on_cksum(req, desc, local_nb, npages,
2638                                           body->oa.o_cksum,
2639                                           repbody->oa.o_cksum, mmap);
2640                         cksum_counter = 0;
2641                 } else if ((cksum_counter & (-cksum_counter)) ==
2642                            cksum_counter) {
2643                         CDEBUG(D_INFO, "Checksum %u from %s OK: %x\n",
2644                                cksum_counter, libcfs_id2str(req->rq_peer),
2645                                repbody->oa.o_cksum);
2646                 }
2647         }
2648
2649 out_commitrw:
2650         /* Must commit after prep above in all cases */
2651         rc = obd_commitrw(tsi->tsi_env, OBD_BRW_WRITE, exp, &repbody->oa,
2652                           objcount, ioo, remote_nb, npages, local_nb, rc);
2653         if (rc == -ENOTCONN)
2654                 /* quota acquire process has been given up because
2655                  * either the client has been evicted or the client
2656                  * has timed out the request already */
2657                 no_reply = true;
2658
2659         for (i = 0; i < niocount; i++) {
2660                 if (!(local_nb[i].lnb_flags & OBD_BRW_ASYNC)) {
2661                         wait_sync = true;
2662                         break;
2663                 }
2664         }
2665         /*
2666          * Disable sending mtime back to the client. If the client locked the
2667          * whole object, then it has already updated the mtime on its side,
2668          * otherwise it will have to glimpse anyway (see bug 21489, comment 32)
2669          */
2670         repbody->oa.o_valid &= ~(OBD_MD_FLMTIME | OBD_MD_FLATIME);
2671
2672         if (rc == 0) {
2673                 int nob = 0;
2674
2675                 /* set per-requested niobuf return codes */
2676                 for (i = j = 0; i < niocount; i++) {
2677                         int len = remote_nb[i].rnb_len;
2678
2679                         nob += len;
2680                         rcs[i] = 0;
2681                         do {
2682                                 LASSERT(j < npages);
2683                                 if (local_nb[j].lnb_rc < 0)
2684                                         rcs[i] = local_nb[j].lnb_rc;
2685                                 len -= local_nb[j].lnb_len;
2686                                 j++;
2687                         } while (len > 0);
2688                         LASSERT(len == 0);
2689                 }
2690                 LASSERT(j == npages);
2691                 ptlrpc_lprocfs_brw(req, nob);
2692         }
2693 out_lock:
2694         tgt_brw_unlock(ioo, remote_nb, &lockh, LCK_PW);
2695         if (desc)
2696                 ptlrpc_free_bulk(desc);
2697 out:
2698         if (unlikely(no_reply || (exp->exp_obd->obd_no_transno && wait_sync))) {
2699                 req->rq_no_reply = 1;
2700                 /* reply out callback would free */
2701                 ptlrpc_req_drop_rs(req);
2702                 if (!exp->exp_obd->obd_no_transno)
2703                         LCONSOLE_WARN("%s: Bulk IO write error with %s (at %s),"
2704                                       " client will retry: rc = %d\n",
2705                                       obd_name,
2706                                       obd_uuid2str(&exp->exp_client_uuid),
2707                                       obd_export_nid2str(exp), rc);
2708         }
2709         memory_pressure_clr();
2710         RETURN(rc);
2711 }
2712 EXPORT_SYMBOL(tgt_brw_write);
2713
2714 /* Check if request can be reconstructed from saved reply data
2715  * A copy of the reply data is returned in @trd if the pointer is not NULL
2716  */
2717 bool req_can_reconstruct(struct ptlrpc_request *req,
2718                          struct tg_reply_data *trd)
2719 {
2720         struct tg_export_data *ted = &req->rq_export->exp_target_data;
2721         struct lsd_client_data *lcd = ted->ted_lcd;
2722         bool found;
2723
2724         if (tgt_is_multimodrpcs_client(req->rq_export))
2725                 return tgt_lookup_reply(req, trd);
2726
2727         mutex_lock(&ted->ted_lcd_lock);
2728         found = req->rq_xid == lcd->lcd_last_xid ||
2729                 req->rq_xid == lcd->lcd_last_close_xid;
2730
2731         if (found && trd != NULL) {
2732                 if (lustre_msg_get_opc(req->rq_reqmsg) == MDS_CLOSE) {
2733                         trd->trd_reply.lrd_xid = lcd->lcd_last_close_xid;
2734                         trd->trd_reply.lrd_transno =
2735                                                 lcd->lcd_last_close_transno;
2736                         trd->trd_reply.lrd_result = lcd->lcd_last_close_result;
2737                 } else {
2738                         trd->trd_reply.lrd_xid = lcd->lcd_last_xid;
2739                         trd->trd_reply.lrd_transno = lcd->lcd_last_transno;
2740                         trd->trd_reply.lrd_result = lcd->lcd_last_result;
2741                         trd->trd_reply.lrd_data = lcd->lcd_last_data;
2742                         trd->trd_pre_versions[0] = lcd->lcd_pre_versions[0];
2743                         trd->trd_pre_versions[1] = lcd->lcd_pre_versions[1];
2744                         trd->trd_pre_versions[2] = lcd->lcd_pre_versions[2];
2745                         trd->trd_pre_versions[3] = lcd->lcd_pre_versions[3];
2746                 }
2747         }
2748         mutex_unlock(&ted->ted_lcd_lock);
2749
2750         return found;
2751 }
2752 EXPORT_SYMBOL(req_can_reconstruct);
2753