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