Whamcloud - gitweb
cd84b54f9e008339a2f69c27f67a2c1ab1c453b3
[fs/lustre-release.git] / lustre / osc / osc_request.c
1 /*
2  * GPL HEADER START
3  *
4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License version 2 only,
8  * as published by the Free Software Foundation.
9  *
10  * This program is distributed in the hope that it will be useful, but
11  * WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  * General Public License version 2 for more details (a copy is included
14  * in the LICENSE file that accompanied this code).
15  *
16  * You should have received a copy of the GNU General Public License
17  * version 2 along with this program; If not, see
18  * http://www.sun.com/software/products/lustre/docs/GPLv2.pdf
19  *
20  * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
21  * CA 95054 USA or visit www.sun.com if you need additional information or
22  * have any questions.
23  *
24  * GPL HEADER END
25  */
26 /*
27  * Copyright (c) 2002, 2010, Oracle and/or its affiliates. All rights reserved.
28  * Use is subject to license terms.
29  *
30  * Copyright (c) 2011, 2013, Intel Corporation.
31  */
32 /*
33  * This file is part of Lustre, http://www.lustre.org/
34  * Lustre is a trademark of Sun Microsystems, Inc.
35  */
36
37 #define DEBUG_SUBSYSTEM S_OSC
38
39 #include <libcfs/libcfs.h>
40
41 #ifndef __KERNEL__
42 # include <liblustre.h>
43 #endif
44
45 #include <lustre_dlm.h>
46 #include <lustre_net.h>
47 #include <lustre/lustre_user.h>
48 #include <obd_cksum.h>
49 #include <lustre_ha.h>
50 #include <lprocfs_status.h>
51 #include <lustre_ioctl.h>
52 #include <lustre_log.h>
53 #include <lustre_debug.h>
54 #include <lustre_param.h>
55 #include <lustre_fid.h>
56 #include "osc_internal.h"
57 #include "osc_cl_internal.h"
58
59 struct osc_brw_async_args {
60         struct obdo              *aa_oa;
61         int                       aa_requested_nob;
62         int                       aa_nio_count;
63         obd_count                 aa_page_count;
64         int                       aa_resends;
65         struct brw_page **aa_ppga;
66         struct client_obd        *aa_cli;
67         struct list_head          aa_oaps;
68         struct list_head          aa_exts;
69         struct obd_capa  *aa_ocapa;
70         struct cl_req            *aa_clerq;
71 };
72
73 #define osc_grant_args osc_brw_async_args
74
75 struct osc_async_args {
76         struct obd_info *aa_oi;
77 };
78
79 struct osc_setattr_args {
80         struct obdo             *sa_oa;
81         obd_enqueue_update_f     sa_upcall;
82         void                    *sa_cookie;
83 };
84
85 struct osc_fsync_args {
86         struct obd_info *fa_oi;
87         obd_enqueue_update_f     fa_upcall;
88         void                    *fa_cookie;
89 };
90
91 struct osc_enqueue_args {
92         struct obd_export               *oa_exp;
93         __u64                           *oa_flags;
94         obd_enqueue_update_f             oa_upcall;
95         void                            *oa_cookie;
96         struct ost_lvb                  *oa_lvb;
97         struct lustre_handle            *oa_lockh;
98         struct ldlm_enqueue_info        *oa_ei;
99         unsigned int                     oa_agl:1;
100 };
101
102 static void osc_release_ppga(struct brw_page **ppga, obd_count count);
103 static int brw_interpret(const struct lu_env *env, struct ptlrpc_request *req,
104                          void *data, int rc);
105
106 /* Unpack OSC object metadata from disk storage (LE byte order). */
107 static int osc_unpackmd(struct obd_export *exp, struct lov_stripe_md **lsmp,
108                         struct lov_mds_md *lmm, int lmm_bytes)
109 {
110         int lsm_size;
111         struct obd_import *imp = class_exp2cliimp(exp);
112         ENTRY;
113
114         if (lmm != NULL) {
115                 if (lmm_bytes < sizeof(*lmm)) {
116                         CERROR("%s: lov_mds_md too small: %d, need %d\n",
117                                exp->exp_obd->obd_name, lmm_bytes,
118                                (int)sizeof(*lmm));
119                         RETURN(-EINVAL);
120                 }
121                 /* XXX LOV_MAGIC etc check? */
122
123                 if (unlikely(ostid_id(&lmm->lmm_oi) == 0)) {
124                         CERROR("%s: zero lmm_object_id: rc = %d\n",
125                                exp->exp_obd->obd_name, -EINVAL);
126                         RETURN(-EINVAL);
127                 }
128         }
129
130         lsm_size = lov_stripe_md_size(1);
131         if (lsmp == NULL)
132                 RETURN(lsm_size);
133
134         if (*lsmp != NULL && lmm == NULL) {
135                 OBD_FREE((*lsmp)->lsm_oinfo[0], sizeof(struct lov_oinfo));
136                 OBD_FREE(*lsmp, lsm_size);
137                 *lsmp = NULL;
138                 RETURN(0);
139         }
140
141         if (*lsmp == NULL) {
142                 OBD_ALLOC(*lsmp, lsm_size);
143                 if (unlikely(*lsmp == NULL))
144                         RETURN(-ENOMEM);
145                 OBD_ALLOC((*lsmp)->lsm_oinfo[0], sizeof(struct lov_oinfo));
146                 if (unlikely((*lsmp)->lsm_oinfo[0] == NULL)) {
147                         OBD_FREE(*lsmp, lsm_size);
148                         RETURN(-ENOMEM);
149                 }
150                 loi_init((*lsmp)->lsm_oinfo[0]);
151         } else if (unlikely(ostid_id(&(*lsmp)->lsm_oi) == 0)) {
152                 RETURN(-EBADF);
153         }
154
155         if (lmm != NULL)
156                 /* XXX zero *lsmp? */
157                 ostid_le_to_cpu(&lmm->lmm_oi, &(*lsmp)->lsm_oi);
158
159         if (imp != NULL &&
160             (imp->imp_connect_data.ocd_connect_flags & OBD_CONNECT_MAXBYTES))
161                 (*lsmp)->lsm_maxbytes = imp->imp_connect_data.ocd_maxbytes;
162         else
163                 (*lsmp)->lsm_maxbytes = LUSTRE_STRIPE_MAXBYTES;
164
165         RETURN(lsm_size);
166 }
167
168 static inline void osc_pack_capa(struct ptlrpc_request *req,
169                                  struct ost_body *body, void *capa)
170 {
171         struct obd_capa *oc = (struct obd_capa *)capa;
172         struct lustre_capa *c;
173
174         if (!capa)
175                 return;
176
177         c = req_capsule_client_get(&req->rq_pill, &RMF_CAPA1);
178         LASSERT(c);
179         capa_cpy(c, oc);
180         body->oa.o_valid |= OBD_MD_FLOSSCAPA;
181         DEBUG_CAPA(D_SEC, c, "pack");
182 }
183
184 static inline void osc_pack_req_body(struct ptlrpc_request *req,
185                                      struct obd_info *oinfo)
186 {
187         struct ost_body *body;
188
189         body = req_capsule_client_get(&req->rq_pill, &RMF_OST_BODY);
190         LASSERT(body);
191
192         lustre_set_wire_obdo(&req->rq_import->imp_connect_data, &body->oa,
193                              oinfo->oi_oa);
194         osc_pack_capa(req, body, oinfo->oi_capa);
195 }
196
197 static inline void osc_set_capa_size(struct ptlrpc_request *req,
198                                      const struct req_msg_field *field,
199                                      struct obd_capa *oc)
200 {
201         if (oc == NULL)
202                 req_capsule_set_size(&req->rq_pill, field, RCL_CLIENT, 0);
203         else
204                 /* it is already calculated as sizeof struct obd_capa */
205                 ;
206 }
207
208 static int osc_getattr_interpret(const struct lu_env *env,
209                                  struct ptlrpc_request *req,
210                                  struct osc_async_args *aa, int rc)
211 {
212         struct ost_body *body;
213         ENTRY;
214
215         if (rc != 0)
216                 GOTO(out, rc);
217
218         body = req_capsule_server_get(&req->rq_pill, &RMF_OST_BODY);
219         if (body) {
220                 CDEBUG(D_INODE, "mode: %o\n", body->oa.o_mode);
221                 lustre_get_wire_obdo(&req->rq_import->imp_connect_data,
222                                      aa->aa_oi->oi_oa, &body->oa);
223
224                 /* This should really be sent by the OST */
225                 aa->aa_oi->oi_oa->o_blksize = DT_MAX_BRW_SIZE;
226                 aa->aa_oi->oi_oa->o_valid |= OBD_MD_FLBLKSZ;
227         } else {
228                 CDEBUG(D_INFO, "can't unpack ost_body\n");
229                 rc = -EPROTO;
230                 aa->aa_oi->oi_oa->o_valid = 0;
231         }
232 out:
233         rc = aa->aa_oi->oi_cb_up(aa->aa_oi, rc);
234         RETURN(rc);
235 }
236
237 static int osc_getattr_async(struct obd_export *exp, struct obd_info *oinfo,
238                              struct ptlrpc_request_set *set)
239 {
240         struct ptlrpc_request *req;
241         struct osc_async_args *aa;
242         int                    rc;
243         ENTRY;
244
245         req = ptlrpc_request_alloc(class_exp2cliimp(exp), &RQF_OST_GETATTR);
246         if (req == NULL)
247                 RETURN(-ENOMEM);
248
249         osc_set_capa_size(req, &RMF_CAPA1, oinfo->oi_capa);
250         rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, OST_GETATTR);
251         if (rc) {
252                 ptlrpc_request_free(req);
253                 RETURN(rc);
254         }
255
256         osc_pack_req_body(req, oinfo);
257
258         ptlrpc_request_set_replen(req);
259         req->rq_interpret_reply = (ptlrpc_interpterer_t)osc_getattr_interpret;
260
261         CLASSERT(sizeof(*aa) <= sizeof(req->rq_async_args));
262         aa = ptlrpc_req_async_args(req);
263         aa->aa_oi = oinfo;
264
265         ptlrpc_set_add_req(set, req);
266         RETURN(0);
267 }
268
269 static int osc_getattr(const struct lu_env *env, struct obd_export *exp,
270                        struct obd_info *oinfo)
271 {
272         struct ptlrpc_request *req;
273         struct ost_body       *body;
274         int                    rc;
275         ENTRY;
276
277         req = ptlrpc_request_alloc(class_exp2cliimp(exp), &RQF_OST_GETATTR);
278         if (req == NULL)
279                 RETURN(-ENOMEM);
280
281         osc_set_capa_size(req, &RMF_CAPA1, oinfo->oi_capa);
282         rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, OST_GETATTR);
283         if (rc) {
284                 ptlrpc_request_free(req);
285                 RETURN(rc);
286         }
287
288         osc_pack_req_body(req, oinfo);
289
290         ptlrpc_request_set_replen(req);
291
292         rc = ptlrpc_queue_wait(req);
293         if (rc)
294                 GOTO(out, rc);
295
296         body = req_capsule_server_get(&req->rq_pill, &RMF_OST_BODY);
297         if (body == NULL)
298                 GOTO(out, rc = -EPROTO);
299
300         CDEBUG(D_INODE, "mode: %o\n", body->oa.o_mode);
301         lustre_get_wire_obdo(&req->rq_import->imp_connect_data, oinfo->oi_oa,
302                              &body->oa);
303
304         oinfo->oi_oa->o_blksize = cli_brw_size(exp->exp_obd);
305         oinfo->oi_oa->o_valid |= OBD_MD_FLBLKSZ;
306
307         EXIT;
308  out:
309         ptlrpc_req_finished(req);
310         return rc;
311 }
312
313 static int osc_setattr(const struct lu_env *env, struct obd_export *exp,
314                        struct obd_info *oinfo, struct obd_trans_info *oti)
315 {
316         struct ptlrpc_request *req;
317         struct ost_body       *body;
318         int                    rc;
319         ENTRY;
320
321         LASSERT(oinfo->oi_oa->o_valid & OBD_MD_FLGROUP);
322
323         req = ptlrpc_request_alloc(class_exp2cliimp(exp), &RQF_OST_SETATTR);
324         if (req == NULL)
325                 RETURN(-ENOMEM);
326
327         osc_set_capa_size(req, &RMF_CAPA1, oinfo->oi_capa);
328         rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, OST_SETATTR);
329         if (rc) {
330                 ptlrpc_request_free(req);
331                 RETURN(rc);
332         }
333
334         osc_pack_req_body(req, oinfo);
335
336         ptlrpc_request_set_replen(req);
337
338         rc = ptlrpc_queue_wait(req);
339         if (rc)
340                 GOTO(out, rc);
341
342         body = req_capsule_server_get(&req->rq_pill, &RMF_OST_BODY);
343         if (body == NULL)
344                 GOTO(out, rc = -EPROTO);
345
346         lustre_get_wire_obdo(&req->rq_import->imp_connect_data, oinfo->oi_oa,
347                              &body->oa);
348
349         EXIT;
350 out:
351         ptlrpc_req_finished(req);
352         RETURN(rc);
353 }
354
355 static int osc_setattr_interpret(const struct lu_env *env,
356                                  struct ptlrpc_request *req,
357                                  struct osc_setattr_args *sa, int rc)
358 {
359         struct ost_body *body;
360         ENTRY;
361
362         if (rc != 0)
363                 GOTO(out, rc);
364
365         body = req_capsule_server_get(&req->rq_pill, &RMF_OST_BODY);
366         if (body == NULL)
367                 GOTO(out, rc = -EPROTO);
368
369         lustre_get_wire_obdo(&req->rq_import->imp_connect_data, sa->sa_oa,
370                              &body->oa);
371 out:
372         rc = sa->sa_upcall(sa->sa_cookie, rc);
373         RETURN(rc);
374 }
375
376 int osc_setattr_async_base(struct obd_export *exp, struct obd_info *oinfo,
377                            struct obd_trans_info *oti,
378                            obd_enqueue_update_f upcall, void *cookie,
379                            struct ptlrpc_request_set *rqset)
380 {
381         struct ptlrpc_request   *req;
382         struct osc_setattr_args *sa;
383         int                      rc;
384         ENTRY;
385
386         req = ptlrpc_request_alloc(class_exp2cliimp(exp), &RQF_OST_SETATTR);
387         if (req == NULL)
388                 RETURN(-ENOMEM);
389
390         osc_set_capa_size(req, &RMF_CAPA1, oinfo->oi_capa);
391         rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, OST_SETATTR);
392         if (rc) {
393                 ptlrpc_request_free(req);
394                 RETURN(rc);
395         }
396
397         if (oti && oinfo->oi_oa->o_valid & OBD_MD_FLCOOKIE)
398                 oinfo->oi_oa->o_lcookie = *oti->oti_logcookies;
399
400         osc_pack_req_body(req, oinfo);
401
402         ptlrpc_request_set_replen(req);
403
404         /* do mds to ost setattr asynchronously */
405         if (!rqset) {
406                 /* Do not wait for response. */
407                 ptlrpcd_add_req(req, PDL_POLICY_ROUND, -1);
408         } else {
409                 req->rq_interpret_reply =
410                         (ptlrpc_interpterer_t)osc_setattr_interpret;
411
412                 CLASSERT (sizeof(*sa) <= sizeof(req->rq_async_args));
413                 sa = ptlrpc_req_async_args(req);
414                 sa->sa_oa = oinfo->oi_oa;
415                 sa->sa_upcall = upcall;
416                 sa->sa_cookie = cookie;
417
418                 if (rqset == PTLRPCD_SET)
419                         ptlrpcd_add_req(req, PDL_POLICY_ROUND, -1);
420                 else
421                         ptlrpc_set_add_req(rqset, req);
422         }
423
424         RETURN(0);
425 }
426
427 static int osc_setattr_async(struct obd_export *exp, struct obd_info *oinfo,
428                              struct obd_trans_info *oti,
429                              struct ptlrpc_request_set *rqset)
430 {
431         return osc_setattr_async_base(exp, oinfo, oti,
432                                       oinfo->oi_cb_up, oinfo, rqset);
433 }
434
435 int osc_real_create(struct obd_export *exp, struct obdo *oa,
436                     struct lov_stripe_md **ea, struct obd_trans_info *oti)
437 {
438         struct ptlrpc_request *req;
439         struct ost_body       *body;
440         struct lov_stripe_md  *lsm;
441         int                    rc;
442         ENTRY;
443
444         LASSERT(oa);
445         LASSERT(ea);
446
447         lsm = *ea;
448         if (!lsm) {
449                 rc = obd_alloc_memmd(exp, &lsm);
450                 if (rc < 0)
451                         RETURN(rc);
452         }
453
454         req = ptlrpc_request_alloc(class_exp2cliimp(exp), &RQF_OST_CREATE);
455         if (req == NULL)
456                 GOTO(out, rc = -ENOMEM);
457
458         rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, OST_CREATE);
459         if (rc) {
460                 ptlrpc_request_free(req);
461                 GOTO(out, rc);
462         }
463
464         body = req_capsule_client_get(&req->rq_pill, &RMF_OST_BODY);
465         LASSERT(body);
466
467         lustre_set_wire_obdo(&req->rq_import->imp_connect_data, &body->oa, oa);
468
469         ptlrpc_request_set_replen(req);
470
471         if ((oa->o_valid & OBD_MD_FLFLAGS) &&
472             oa->o_flags == OBD_FL_DELORPHAN) {
473                 DEBUG_REQ(D_HA, req,
474                           "delorphan from OST integration");
475                 /* Don't resend the delorphan req */
476                 req->rq_no_resend = req->rq_no_delay = 1;
477         }
478
479         rc = ptlrpc_queue_wait(req);
480         if (rc)
481                 GOTO(out_req, rc);
482
483         body = req_capsule_server_get(&req->rq_pill, &RMF_OST_BODY);
484         if (body == NULL)
485                 GOTO(out_req, rc = -EPROTO);
486
487         CDEBUG(D_INFO, "oa flags %x\n", oa->o_flags);
488         lustre_get_wire_obdo(&req->rq_import->imp_connect_data, oa, &body->oa);
489
490         oa->o_blksize = cli_brw_size(exp->exp_obd);
491         oa->o_valid |= OBD_MD_FLBLKSZ;
492
493         /* XXX LOV STACKING: the lsm that is passed to us from LOV does not
494          * have valid lsm_oinfo data structs, so don't go touching that.
495          * This needs to be fixed in a big way.
496          */
497         lsm->lsm_oi = oa->o_oi;
498         *ea = lsm;
499
500         if (oti != NULL) {
501                 if (oa->o_valid & OBD_MD_FLCOOKIE) {
502                         if (oti->oti_logcookies == NULL)
503                                 oti->oti_logcookies = &oti->oti_onecookie;
504
505                         *oti->oti_logcookies = oa->o_lcookie;
506                 }
507         }
508
509         CDEBUG(D_HA, "transno: "LPD64"\n",
510                lustre_msg_get_transno(req->rq_repmsg));
511 out_req:
512         ptlrpc_req_finished(req);
513 out:
514         if (rc && !*ea)
515                 obd_free_memmd(exp, &lsm);
516         RETURN(rc);
517 }
518
519 int osc_punch_base(struct obd_export *exp, struct obd_info *oinfo,
520                    obd_enqueue_update_f upcall, void *cookie,
521                    struct ptlrpc_request_set *rqset)
522 {
523         struct ptlrpc_request   *req;
524         struct osc_setattr_args *sa;
525         struct ost_body         *body;
526         int                      rc;
527         ENTRY;
528
529         req = ptlrpc_request_alloc(class_exp2cliimp(exp), &RQF_OST_PUNCH);
530         if (req == NULL)
531                 RETURN(-ENOMEM);
532
533         osc_set_capa_size(req, &RMF_CAPA1, oinfo->oi_capa);
534         rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, OST_PUNCH);
535         if (rc) {
536                 ptlrpc_request_free(req);
537                 RETURN(rc);
538         }
539         req->rq_request_portal = OST_IO_PORTAL; /* bug 7198 */
540         ptlrpc_at_set_req_timeout(req);
541
542         body = req_capsule_client_get(&req->rq_pill, &RMF_OST_BODY);
543         LASSERT(body);
544         lustre_set_wire_obdo(&req->rq_import->imp_connect_data, &body->oa,
545                              oinfo->oi_oa);
546         osc_pack_capa(req, body, oinfo->oi_capa);
547
548         ptlrpc_request_set_replen(req);
549
550         req->rq_interpret_reply = (ptlrpc_interpterer_t)osc_setattr_interpret;
551         CLASSERT (sizeof(*sa) <= sizeof(req->rq_async_args));
552         sa = ptlrpc_req_async_args(req);
553         sa->sa_oa     = oinfo->oi_oa;
554         sa->sa_upcall = upcall;
555         sa->sa_cookie = cookie;
556         if (rqset == PTLRPCD_SET)
557                 ptlrpcd_add_req(req, PDL_POLICY_ROUND, -1);
558         else
559                 ptlrpc_set_add_req(rqset, req);
560
561         RETURN(0);
562 }
563
564 static int osc_sync_interpret(const struct lu_env *env,
565                               struct ptlrpc_request *req,
566                               void *arg, int rc)
567 {
568         struct osc_fsync_args *fa = arg;
569         struct ost_body *body;
570         ENTRY;
571
572         if (rc)
573                 GOTO(out, rc);
574
575         body = req_capsule_server_get(&req->rq_pill, &RMF_OST_BODY);
576         if (body == NULL) {
577                 CERROR ("can't unpack ost_body\n");
578                 GOTO(out, rc = -EPROTO);
579         }
580
581         *fa->fa_oi->oi_oa = body->oa;
582 out:
583         rc = fa->fa_upcall(fa->fa_cookie, rc);
584         RETURN(rc);
585 }
586
587 int osc_sync_base(struct obd_export *exp, struct obd_info *oinfo,
588                   obd_enqueue_update_f upcall, void *cookie,
589                   struct ptlrpc_request_set *rqset)
590 {
591         struct ptlrpc_request *req;
592         struct ost_body       *body;
593         struct osc_fsync_args *fa;
594         int                    rc;
595         ENTRY;
596
597         req = ptlrpc_request_alloc(class_exp2cliimp(exp), &RQF_OST_SYNC);
598         if (req == NULL)
599                 RETURN(-ENOMEM);
600
601         osc_set_capa_size(req, &RMF_CAPA1, oinfo->oi_capa);
602         rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, OST_SYNC);
603         if (rc) {
604                 ptlrpc_request_free(req);
605                 RETURN(rc);
606         }
607
608         /* overload the size and blocks fields in the oa with start/end */
609         body = req_capsule_client_get(&req->rq_pill, &RMF_OST_BODY);
610         LASSERT(body);
611         lustre_set_wire_obdo(&req->rq_import->imp_connect_data, &body->oa,
612                              oinfo->oi_oa);
613         osc_pack_capa(req, body, oinfo->oi_capa);
614
615         ptlrpc_request_set_replen(req);
616         req->rq_interpret_reply = osc_sync_interpret;
617
618         CLASSERT(sizeof(*fa) <= sizeof(req->rq_async_args));
619         fa = ptlrpc_req_async_args(req);
620         fa->fa_oi = oinfo;
621         fa->fa_upcall = upcall;
622         fa->fa_cookie = cookie;
623
624         if (rqset == PTLRPCD_SET)
625                 ptlrpcd_add_req(req, PDL_POLICY_ROUND, -1);
626         else
627                 ptlrpc_set_add_req(rqset, req);
628
629         RETURN (0);
630 }
631
632 /* Find and cancel locally locks matched by @mode in the resource found by
633  * @objid. Found locks are added into @cancel list. Returns the amount of
634  * locks added to @cancels list. */
635 static int osc_resource_get_unused(struct obd_export *exp, struct obdo *oa,
636                                    struct list_head *cancels,
637                                    ldlm_mode_t mode, __u64 lock_flags)
638 {
639         struct ldlm_namespace *ns = exp->exp_obd->obd_namespace;
640         struct ldlm_res_id res_id;
641         struct ldlm_resource *res;
642         int count;
643         ENTRY;
644
645         /* Return, i.e. cancel nothing, only if ELC is supported (flag in
646          * export) but disabled through procfs (flag in NS).
647          *
648          * This distinguishes from a case when ELC is not supported originally,
649          * when we still want to cancel locks in advance and just cancel them
650          * locally, without sending any RPC. */
651         if (exp_connect_cancelset(exp) && !ns_connect_cancelset(ns))
652                 RETURN(0);
653
654         ostid_build_res_name(&oa->o_oi, &res_id);
655         res = ldlm_resource_get(ns, NULL, &res_id, 0, 0);
656         if (IS_ERR(res))
657                 RETURN(0);
658
659         LDLM_RESOURCE_ADDREF(res);
660         count = ldlm_cancel_resource_local(res, cancels, NULL, mode,
661                                            lock_flags, 0, NULL);
662         LDLM_RESOURCE_DELREF(res);
663         ldlm_resource_putref(res);
664         RETURN(count);
665 }
666
667 static int osc_destroy_interpret(const struct lu_env *env,
668                                  struct ptlrpc_request *req, void *data,
669                                  int rc)
670 {
671         struct client_obd *cli = &req->rq_import->imp_obd->u.cli;
672
673         atomic_dec(&cli->cl_destroy_in_flight);
674         wake_up(&cli->cl_destroy_waitq);
675         return 0;
676 }
677
678 static int osc_can_send_destroy(struct client_obd *cli)
679 {
680         if (atomic_inc_return(&cli->cl_destroy_in_flight) <=
681             cli->cl_max_rpcs_in_flight) {
682                 /* The destroy request can be sent */
683                 return 1;
684         }
685         if (atomic_dec_return(&cli->cl_destroy_in_flight) <
686             cli->cl_max_rpcs_in_flight) {
687                 /*
688                  * The counter has been modified between the two atomic
689                  * operations.
690                  */
691                 wake_up(&cli->cl_destroy_waitq);
692         }
693         return 0;
694 }
695
696 int osc_create(const struct lu_env *env, struct obd_export *exp,
697                struct obdo *oa, struct lov_stripe_md **ea,
698                struct obd_trans_info *oti)
699 {
700         int rc = 0;
701         ENTRY;
702
703         LASSERT(oa);
704         LASSERT(ea);
705         LASSERT(oa->o_valid & OBD_MD_FLGROUP);
706
707         if ((oa->o_valid & OBD_MD_FLFLAGS) &&
708             oa->o_flags == OBD_FL_RECREATE_OBJS) {
709                 RETURN(osc_real_create(exp, oa, ea, oti));
710         }
711
712         if (!fid_seq_is_mdt(ostid_seq(&oa->o_oi)))
713                 RETURN(osc_real_create(exp, oa, ea, oti));
714
715         /* we should not get here anymore */
716         LBUG();
717
718         RETURN(rc);
719 }
720
721 /* Destroy requests can be async always on the client, and we don't even really
722  * care about the return code since the client cannot do anything at all about
723  * a destroy failure.
724  * When the MDS is unlinking a filename, it saves the file objects into a
725  * recovery llog, and these object records are cancelled when the OST reports
726  * they were destroyed and sync'd to disk (i.e. transaction committed).
727  * If the client dies, or the OST is down when the object should be destroyed,
728  * the records are not cancelled, and when the OST reconnects to the MDS next,
729  * it will retrieve the llog unlink logs and then sends the log cancellation
730  * cookies to the MDS after committing destroy transactions. */
731 static int osc_destroy(const struct lu_env *env, struct obd_export *exp,
732                        struct obdo *oa, struct lov_stripe_md *ea,
733                        struct obd_trans_info *oti, struct obd_export *md_export,
734                        void *capa)
735 {
736         struct client_obd     *cli = &exp->exp_obd->u.cli;
737         struct ptlrpc_request *req;
738         struct ost_body       *body;
739         struct list_head       cancels = LIST_HEAD_INIT(cancels);
740         int rc, count;
741         ENTRY;
742
743         if (!oa) {
744                 CDEBUG(D_INFO, "oa NULL\n");
745                 RETURN(-EINVAL);
746         }
747
748         count = osc_resource_get_unused(exp, oa, &cancels, LCK_PW,
749                                         LDLM_FL_DISCARD_DATA);
750
751         req = ptlrpc_request_alloc(class_exp2cliimp(exp), &RQF_OST_DESTROY);
752         if (req == NULL) {
753                 ldlm_lock_list_put(&cancels, l_bl_ast, count);
754                 RETURN(-ENOMEM);
755         }
756
757         osc_set_capa_size(req, &RMF_CAPA1, (struct obd_capa *)capa);
758         rc = ldlm_prep_elc_req(exp, req, LUSTRE_OST_VERSION, OST_DESTROY,
759                                0, &cancels, count);
760         if (rc) {
761                 ptlrpc_request_free(req);
762                 RETURN(rc);
763         }
764
765         req->rq_request_portal = OST_IO_PORTAL; /* bug 7198 */
766         ptlrpc_at_set_req_timeout(req);
767
768         if (oti != NULL && oa->o_valid & OBD_MD_FLCOOKIE)
769                 oa->o_lcookie = *oti->oti_logcookies;
770         body = req_capsule_client_get(&req->rq_pill, &RMF_OST_BODY);
771         LASSERT(body);
772         lustre_set_wire_obdo(&req->rq_import->imp_connect_data, &body->oa, oa);
773
774         osc_pack_capa(req, body, (struct obd_capa *)capa);
775         ptlrpc_request_set_replen(req);
776
777         /* If osc_destory is for destroying the unlink orphan,
778          * sent from MDT to OST, which should not be blocked here,
779          * because the process might be triggered by ptlrpcd, and
780          * it is not good to block ptlrpcd thread (b=16006)*/
781         if (!(oa->o_flags & OBD_FL_DELORPHAN)) {
782                 req->rq_interpret_reply = osc_destroy_interpret;
783                 if (!osc_can_send_destroy(cli)) {
784                         struct l_wait_info lwi = LWI_INTR(LWI_ON_SIGNAL_NOOP,
785                                                           NULL);
786
787                         /*
788                          * Wait until the number of on-going destroy RPCs drops
789                          * under max_rpc_in_flight
790                          */
791                         l_wait_event_exclusive(cli->cl_destroy_waitq,
792                                                osc_can_send_destroy(cli), &lwi);
793                 }
794         }
795
796         /* Do not wait for response */
797         ptlrpcd_add_req(req, PDL_POLICY_ROUND, -1);
798         RETURN(0);
799 }
800
801 static void osc_announce_cached(struct client_obd *cli, struct obdo *oa,
802                                 long writing_bytes)
803 {
804         obd_flag bits = OBD_MD_FLBLOCKS|OBD_MD_FLGRANT;
805
806         LASSERT(!(oa->o_valid & bits));
807
808         oa->o_valid |= bits;
809         client_obd_list_lock(&cli->cl_loi_list_lock);
810         oa->o_dirty = cli->cl_dirty_pages << PAGE_CACHE_SHIFT;
811         if (unlikely(cli->cl_dirty_pages - cli->cl_dirty_transit >
812                      cli->cl_dirty_max_pages)) {
813                 CERROR("dirty %lu - %lu > dirty_max %lu\n",
814                        cli->cl_dirty_pages, cli->cl_dirty_transit,
815                        cli->cl_dirty_max_pages);
816                 oa->o_undirty = 0;
817         } else if (unlikely(atomic_read(&obd_dirty_pages) -
818                             atomic_read(&obd_dirty_transit_pages) >
819                             (long)(obd_max_dirty_pages + 1))) {
820                 /* The atomic_read() allowing the atomic_inc() are
821                  * not covered by a lock thus they may safely race and trip
822                  * this CERROR() unless we add in a small fudge factor (+1). */
823                 CERROR("%s: dirty %d - %d > system dirty_max %d\n",
824                        cli->cl_import->imp_obd->obd_name,
825                        atomic_read(&obd_dirty_pages),
826                        atomic_read(&obd_dirty_transit_pages),
827                        obd_max_dirty_pages);
828                 oa->o_undirty = 0;
829         } else if (unlikely(cli->cl_dirty_max_pages - cli->cl_dirty_pages >
830                             0x7fffffff)) {
831                 CERROR("dirty %lu - dirty_max %lu too big???\n",
832                        cli->cl_dirty_pages, cli->cl_dirty_max_pages);
833                 oa->o_undirty = 0;
834         } else {
835                 unsigned long max_in_flight = (cli->cl_max_pages_per_rpc <<
836                                       PAGE_CACHE_SHIFT) *
837                                      (cli->cl_max_rpcs_in_flight + 1);
838                 oa->o_undirty = max(cli->cl_dirty_max_pages << PAGE_CACHE_SHIFT,
839                                     max_in_flight);
840         }
841         oa->o_grant = cli->cl_avail_grant + cli->cl_reserved_grant;
842         oa->o_dropped = cli->cl_lost_grant;
843         cli->cl_lost_grant = 0;
844         client_obd_list_unlock(&cli->cl_loi_list_lock);
845         CDEBUG(D_CACHE,"dirty: "LPU64" undirty: %u dropped %u grant: "LPU64"\n",
846                oa->o_dirty, oa->o_undirty, oa->o_dropped, oa->o_grant);
847
848 }
849
850 void osc_update_next_shrink(struct client_obd *cli)
851 {
852         cli->cl_next_shrink_grant =
853                 cfs_time_shift(cli->cl_grant_shrink_interval);
854         CDEBUG(D_CACHE, "next time %ld to shrink grant \n",
855                cli->cl_next_shrink_grant);
856 }
857
858 static void __osc_update_grant(struct client_obd *cli, obd_size grant)
859 {
860         client_obd_list_lock(&cli->cl_loi_list_lock);
861         cli->cl_avail_grant += grant;
862         client_obd_list_unlock(&cli->cl_loi_list_lock);
863 }
864
865 static void osc_update_grant(struct client_obd *cli, struct ost_body *body)
866 {
867         if (body->oa.o_valid & OBD_MD_FLGRANT) {
868                 CDEBUG(D_CACHE, "got "LPU64" extra grant\n", body->oa.o_grant);
869                 __osc_update_grant(cli, body->oa.o_grant);
870         }
871 }
872
873 static int osc_set_info_async(const struct lu_env *env, struct obd_export *exp,
874                               obd_count keylen, void *key, obd_count vallen,
875                               void *val, struct ptlrpc_request_set *set);
876
877 static int osc_shrink_grant_interpret(const struct lu_env *env,
878                                       struct ptlrpc_request *req,
879                                       void *aa, int rc)
880 {
881         struct client_obd *cli = &req->rq_import->imp_obd->u.cli;
882         struct obdo *oa = ((struct osc_grant_args *)aa)->aa_oa;
883         struct ost_body *body;
884
885         if (rc != 0) {
886                 __osc_update_grant(cli, oa->o_grant);
887                 GOTO(out, rc);
888         }
889
890         body = req_capsule_server_get(&req->rq_pill, &RMF_OST_BODY);
891         LASSERT(body);
892         osc_update_grant(cli, body);
893 out:
894         OBDO_FREE(oa);
895         return rc;
896 }
897
898 static void osc_shrink_grant_local(struct client_obd *cli, struct obdo *oa)
899 {
900         client_obd_list_lock(&cli->cl_loi_list_lock);
901         oa->o_grant = cli->cl_avail_grant / 4;
902         cli->cl_avail_grant -= oa->o_grant;
903         client_obd_list_unlock(&cli->cl_loi_list_lock);
904         if (!(oa->o_valid & OBD_MD_FLFLAGS)) {
905                 oa->o_valid |= OBD_MD_FLFLAGS;
906                 oa->o_flags = 0;
907         }
908         oa->o_flags |= OBD_FL_SHRINK_GRANT;
909         osc_update_next_shrink(cli);
910 }
911
912 /* Shrink the current grant, either from some large amount to enough for a
913  * full set of in-flight RPCs, or if we have already shrunk to that limit
914  * then to enough for a single RPC.  This avoids keeping more grant than
915  * needed, and avoids shrinking the grant piecemeal. */
916 static int osc_shrink_grant(struct client_obd *cli)
917 {
918         __u64 target_bytes = (cli->cl_max_rpcs_in_flight + 1) *
919                              (cli->cl_max_pages_per_rpc << PAGE_CACHE_SHIFT);
920
921         client_obd_list_lock(&cli->cl_loi_list_lock);
922         if (cli->cl_avail_grant <= target_bytes)
923                 target_bytes = cli->cl_max_pages_per_rpc << PAGE_CACHE_SHIFT;
924         client_obd_list_unlock(&cli->cl_loi_list_lock);
925
926         return osc_shrink_grant_to_target(cli, target_bytes);
927 }
928
929 int osc_shrink_grant_to_target(struct client_obd *cli, __u64 target_bytes)
930 {
931         int                     rc = 0;
932         struct ost_body        *body;
933         ENTRY;
934
935         client_obd_list_lock(&cli->cl_loi_list_lock);
936         /* Don't shrink if we are already above or below the desired limit
937          * We don't want to shrink below a single RPC, as that will negatively
938          * impact block allocation and long-term performance. */
939         if (target_bytes < cli->cl_max_pages_per_rpc << PAGE_CACHE_SHIFT)
940                 target_bytes = cli->cl_max_pages_per_rpc << PAGE_CACHE_SHIFT;
941
942         if (target_bytes >= cli->cl_avail_grant) {
943                 client_obd_list_unlock(&cli->cl_loi_list_lock);
944                 RETURN(0);
945         }
946         client_obd_list_unlock(&cli->cl_loi_list_lock);
947
948         OBD_ALLOC_PTR(body);
949         if (!body)
950                 RETURN(-ENOMEM);
951
952         osc_announce_cached(cli, &body->oa, 0);
953
954         client_obd_list_lock(&cli->cl_loi_list_lock);
955         body->oa.o_grant = cli->cl_avail_grant - target_bytes;
956         cli->cl_avail_grant = target_bytes;
957         client_obd_list_unlock(&cli->cl_loi_list_lock);
958         if (!(body->oa.o_valid & OBD_MD_FLFLAGS)) {
959                 body->oa.o_valid |= OBD_MD_FLFLAGS;
960                 body->oa.o_flags = 0;
961         }
962         body->oa.o_flags |= OBD_FL_SHRINK_GRANT;
963         osc_update_next_shrink(cli);
964
965         rc = osc_set_info_async(NULL, cli->cl_import->imp_obd->obd_self_export,
966                                 sizeof(KEY_GRANT_SHRINK), KEY_GRANT_SHRINK,
967                                 sizeof(*body), body, NULL);
968         if (rc != 0)
969                 __osc_update_grant(cli, body->oa.o_grant);
970         OBD_FREE_PTR(body);
971         RETURN(rc);
972 }
973
974 static int osc_should_shrink_grant(struct client_obd *client)
975 {
976         cfs_time_t time = cfs_time_current();
977         cfs_time_t next_shrink = client->cl_next_shrink_grant;
978
979         if ((client->cl_import->imp_connect_data.ocd_connect_flags &
980              OBD_CONNECT_GRANT_SHRINK) == 0)
981                 return 0;
982
983         if (cfs_time_aftereq(time, next_shrink - 5 * CFS_TICK)) {
984                 /* Get the current RPC size directly, instead of going via:
985                  * cli_brw_size(obd->u.cli.cl_import->imp_obd->obd_self_export)
986                  * Keep comment here so that it can be found by searching. */
987                 int brw_size = client->cl_max_pages_per_rpc << PAGE_CACHE_SHIFT;
988
989                 if (client->cl_import->imp_state == LUSTRE_IMP_FULL &&
990                     client->cl_avail_grant > brw_size)
991                         return 1;
992                 else
993                         osc_update_next_shrink(client);
994         }
995         return 0;
996 }
997
998 static int osc_grant_shrink_grant_cb(struct timeout_item *item, void *data)
999 {
1000         struct client_obd *client;
1001
1002         list_for_each_entry(client, &item->ti_obd_list, cl_grant_shrink_list) {
1003                 if (osc_should_shrink_grant(client))
1004                         osc_shrink_grant(client);
1005         }
1006         return 0;
1007 }
1008
1009 static int osc_add_shrink_grant(struct client_obd *client)
1010 {
1011         int rc;
1012
1013         rc = ptlrpc_add_timeout_client(client->cl_grant_shrink_interval,
1014                                        TIMEOUT_GRANT,
1015                                        osc_grant_shrink_grant_cb, NULL,
1016                                        &client->cl_grant_shrink_list);
1017         if (rc) {
1018                 CERROR("add grant client %s error %d\n",
1019                         client->cl_import->imp_obd->obd_name, rc);
1020                 return rc;
1021         }
1022         CDEBUG(D_CACHE, "add grant client %s \n",
1023                client->cl_import->imp_obd->obd_name);
1024         osc_update_next_shrink(client);
1025         return 0;
1026 }
1027
1028 static int osc_del_shrink_grant(struct client_obd *client)
1029 {
1030         return ptlrpc_del_timeout_client(&client->cl_grant_shrink_list,
1031                                          TIMEOUT_GRANT);
1032 }
1033
1034 static void osc_init_grant(struct client_obd *cli, struct obd_connect_data *ocd)
1035 {
1036         /*
1037          * ocd_grant is the total grant amount we're expect to hold: if we've
1038          * been evicted, it's the new avail_grant amount, cl_dirty_pages will
1039          * drop to 0 as inflight RPCs fail out; otherwise, it's avail_grant +
1040          * dirty.
1041          *
1042          * race is tolerable here: if we're evicted, but imp_state already
1043          * left EVICTED state, then cl_dirty_pages must be 0 already.
1044          */
1045         client_obd_list_lock(&cli->cl_loi_list_lock);
1046         if (cli->cl_import->imp_state == LUSTRE_IMP_EVICTED)
1047                 cli->cl_avail_grant = ocd->ocd_grant;
1048         else
1049                 cli->cl_avail_grant = ocd->ocd_grant -
1050                                       (cli->cl_dirty_pages << PAGE_CACHE_SHIFT);
1051
1052         if (cli->cl_avail_grant < 0) {
1053                 CWARN("%s: available grant < 0: avail/ocd/dirty %ld/%u/%ld\n",
1054                       cli->cl_import->imp_obd->obd_name, cli->cl_avail_grant,
1055                       ocd->ocd_grant, cli->cl_dirty_pages << PAGE_CACHE_SHIFT);
1056                 /* workaround for servers which do not have the patch from
1057                  * LU-2679 */
1058                 cli->cl_avail_grant = ocd->ocd_grant;
1059         }
1060
1061         /* determine the appropriate chunk size used by osc_extent. */
1062         cli->cl_chunkbits = max_t(int, PAGE_CACHE_SHIFT, ocd->ocd_blocksize);
1063         client_obd_list_unlock(&cli->cl_loi_list_lock);
1064
1065         CDEBUG(D_CACHE, "%s, setting cl_avail_grant: %ld cl_lost_grant: %ld."
1066                 "chunk bits: %d.\n", cli->cl_import->imp_obd->obd_name,
1067                 cli->cl_avail_grant, cli->cl_lost_grant, cli->cl_chunkbits);
1068
1069         if (ocd->ocd_connect_flags & OBD_CONNECT_GRANT_SHRINK &&
1070             list_empty(&cli->cl_grant_shrink_list))
1071                 osc_add_shrink_grant(cli);
1072 }
1073
1074 /* We assume that the reason this OSC got a short read is because it read
1075  * beyond the end of a stripe file; i.e. lustre is reading a sparse file
1076  * via the LOV, and it _knows_ it's reading inside the file, it's just that
1077  * this stripe never got written at or beyond this stripe offset yet. */
1078 static void handle_short_read(int nob_read, obd_count page_count,
1079                               struct brw_page **pga)
1080 {
1081         char *ptr;
1082         int i = 0;
1083
1084         /* skip bytes read OK */
1085         while (nob_read > 0) {
1086                 LASSERT (page_count > 0);
1087
1088                 if (pga[i]->count > nob_read) {
1089                         /* EOF inside this page */
1090                         ptr = kmap(pga[i]->pg) +
1091                                 (pga[i]->off & ~CFS_PAGE_MASK);
1092                         memset(ptr + nob_read, 0, pga[i]->count - nob_read);
1093                         kunmap(pga[i]->pg);
1094                         page_count--;
1095                         i++;
1096                         break;
1097                 }
1098
1099                 nob_read -= pga[i]->count;
1100                 page_count--;
1101                 i++;
1102         }
1103
1104         /* zero remaining pages */
1105         while (page_count-- > 0) {
1106                 ptr = kmap(pga[i]->pg) + (pga[i]->off & ~CFS_PAGE_MASK);
1107                 memset(ptr, 0, pga[i]->count);
1108                 kunmap(pga[i]->pg);
1109                 i++;
1110         }
1111 }
1112
1113 static int check_write_rcs(struct ptlrpc_request *req,
1114                            int requested_nob, int niocount,
1115                            obd_count page_count, struct brw_page **pga)
1116 {
1117         int     i;
1118         __u32   *remote_rcs;
1119
1120         remote_rcs = req_capsule_server_sized_get(&req->rq_pill, &RMF_RCS,
1121                                                   sizeof(*remote_rcs) *
1122                                                   niocount);
1123         if (remote_rcs == NULL) {
1124                 CDEBUG(D_INFO, "Missing/short RC vector on BRW_WRITE reply\n");
1125                 return(-EPROTO);
1126         }
1127
1128         /* return error if any niobuf was in error */
1129         for (i = 0; i < niocount; i++) {
1130                 if ((int)remote_rcs[i] < 0)
1131                         return(remote_rcs[i]);
1132
1133                 if (remote_rcs[i] != 0) {
1134                         CDEBUG(D_INFO, "rc[%d] invalid (%d) req %p\n",
1135                                 i, remote_rcs[i], req);
1136                         return(-EPROTO);
1137                 }
1138         }
1139
1140         if (req->rq_bulk->bd_nob_transferred != requested_nob) {
1141                 CERROR("Unexpected # bytes transferred: %d (requested %d)\n",
1142                        req->rq_bulk->bd_nob_transferred, requested_nob);
1143                 return(-EPROTO);
1144         }
1145
1146         return (0);
1147 }
1148
1149 static inline int can_merge_pages(struct brw_page *p1, struct brw_page *p2)
1150 {
1151         if (p1->flag != p2->flag) {
1152                 unsigned mask = ~(OBD_BRW_FROM_GRANT | OBD_BRW_NOCACHE |
1153                                   OBD_BRW_SYNC       | OBD_BRW_ASYNC   |
1154                                   OBD_BRW_NOQUOTA    | OBD_BRW_SOFT_SYNC);
1155
1156                 /* warn if we try to combine flags that we don't know to be
1157                  * safe to combine */
1158                 if (unlikely((p1->flag & mask) != (p2->flag & mask))) {
1159                         CWARN("Saw flags 0x%x and 0x%x in the same brw, please "
1160                               "report this at https://jira.hpdd.intel.com/\n",
1161                               p1->flag, p2->flag);
1162                 }
1163                 return 0;
1164         }
1165
1166         return (p1->off + p1->count == p2->off);
1167 }
1168
1169 static obd_count osc_checksum_bulk(int nob, obd_count pg_count,
1170                                    struct brw_page **pga, int opc,
1171                                    cksum_type_t cksum_type)
1172 {
1173         __u32                           cksum;
1174         int                             i = 0;
1175         struct cfs_crypto_hash_desc     *hdesc;
1176         unsigned int                    bufsize;
1177         int                             err;
1178         unsigned char                   cfs_alg = cksum_obd2cfs(cksum_type);
1179
1180         LASSERT(pg_count > 0);
1181
1182         hdesc = cfs_crypto_hash_init(cfs_alg, NULL, 0);
1183         if (IS_ERR(hdesc)) {
1184                 CERROR("Unable to initialize checksum hash %s\n",
1185                        cfs_crypto_hash_name(cfs_alg));
1186                 return PTR_ERR(hdesc);
1187         }
1188
1189         while (nob > 0 && pg_count > 0) {
1190                 int count = pga[i]->count > nob ? nob : pga[i]->count;
1191
1192                 /* corrupt the data before we compute the checksum, to
1193                  * simulate an OST->client data error */
1194                 if (i == 0 && opc == OST_READ &&
1195                     OBD_FAIL_CHECK(OBD_FAIL_OSC_CHECKSUM_RECEIVE)) {
1196                         unsigned char *ptr = kmap(pga[i]->pg);
1197                         int off = pga[i]->off & ~CFS_PAGE_MASK;
1198
1199                         memcpy(ptr + off, "bad1", min(4, nob));
1200                         kunmap(pga[i]->pg);
1201                 }
1202                 cfs_crypto_hash_update_page(hdesc, pga[i]->pg,
1203                                             pga[i]->off & ~CFS_PAGE_MASK,
1204                                             count);
1205                 LL_CDEBUG_PAGE(D_PAGE, pga[i]->pg, "off %d\n",
1206                                (int)(pga[i]->off & ~CFS_PAGE_MASK));
1207
1208                 nob -= pga[i]->count;
1209                 pg_count--;
1210                 i++;
1211         }
1212
1213         bufsize = sizeof(cksum);
1214         err = cfs_crypto_hash_final(hdesc, (unsigned char *)&cksum, &bufsize);
1215
1216         /* For sending we only compute the wrong checksum instead
1217          * of corrupting the data so it is still correct on a redo */
1218         if (opc == OST_WRITE && OBD_FAIL_CHECK(OBD_FAIL_OSC_CHECKSUM_SEND))
1219                 cksum++;
1220
1221         return cksum;
1222 }
1223
1224 static int osc_brw_prep_request(int cmd, struct client_obd *cli,struct obdo *oa,
1225                                 struct lov_stripe_md *lsm, obd_count page_count,
1226                                 struct brw_page **pga,
1227                                 struct ptlrpc_request **reqp,
1228                                 struct obd_capa *ocapa, int reserve,
1229                                 int resend)
1230 {
1231         struct ptlrpc_request   *req;
1232         struct ptlrpc_bulk_desc *desc;
1233         struct ost_body         *body;
1234         struct obd_ioobj        *ioobj;
1235         struct niobuf_remote    *niobuf;
1236         int niocount, i, requested_nob, opc, rc;
1237         struct osc_brw_async_args *aa;
1238         struct req_capsule      *pill;
1239         struct brw_page *pg_prev;
1240
1241         ENTRY;
1242         if (OBD_FAIL_CHECK(OBD_FAIL_OSC_BRW_PREP_REQ))
1243                 RETURN(-ENOMEM); /* Recoverable */
1244         if (OBD_FAIL_CHECK(OBD_FAIL_OSC_BRW_PREP_REQ2))
1245                 RETURN(-EINVAL); /* Fatal */
1246
1247         if ((cmd & OBD_BRW_WRITE) != 0) {
1248                 opc = OST_WRITE;
1249                 req = ptlrpc_request_alloc_pool(cli->cl_import,
1250                                                 cli->cl_import->imp_rq_pool,
1251                                                 &RQF_OST_BRW_WRITE);
1252         } else {
1253                 opc = OST_READ;
1254                 req = ptlrpc_request_alloc(cli->cl_import, &RQF_OST_BRW_READ);
1255         }
1256         if (req == NULL)
1257                 RETURN(-ENOMEM);
1258
1259         for (niocount = i = 1; i < page_count; i++) {
1260                 if (!can_merge_pages(pga[i - 1], pga[i]))
1261                         niocount++;
1262         }
1263
1264         pill = &req->rq_pill;
1265         req_capsule_set_size(pill, &RMF_OBD_IOOBJ, RCL_CLIENT,
1266                              sizeof(*ioobj));
1267         req_capsule_set_size(pill, &RMF_NIOBUF_REMOTE, RCL_CLIENT,
1268                              niocount * sizeof(*niobuf));
1269         osc_set_capa_size(req, &RMF_CAPA1, ocapa);
1270
1271         rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, opc);
1272         if (rc) {
1273                 ptlrpc_request_free(req);
1274                 RETURN(rc);
1275         }
1276         req->rq_request_portal = OST_IO_PORTAL; /* bug 7198 */
1277         ptlrpc_at_set_req_timeout(req);
1278         /* ask ptlrpc not to resend on EINPROGRESS since BRWs have their own
1279          * retry logic */
1280         req->rq_no_retry_einprogress = 1;
1281
1282         desc = ptlrpc_prep_bulk_imp(req, page_count,
1283                 cli->cl_import->imp_connect_data.ocd_brw_size >> LNET_MTU_BITS,
1284                 opc == OST_WRITE ? BULK_GET_SOURCE : BULK_PUT_SINK,
1285                 OST_BULK_PORTAL);
1286
1287         if (desc == NULL)
1288                 GOTO(out, rc = -ENOMEM);
1289         /* NB request now owns desc and will free it when it gets freed */
1290
1291         body = req_capsule_client_get(pill, &RMF_OST_BODY);
1292         ioobj = req_capsule_client_get(pill, &RMF_OBD_IOOBJ);
1293         niobuf = req_capsule_client_get(pill, &RMF_NIOBUF_REMOTE);
1294         LASSERT(body != NULL && ioobj != NULL && niobuf != NULL);
1295
1296         lustre_set_wire_obdo(&req->rq_import->imp_connect_data, &body->oa, oa);
1297
1298         obdo_to_ioobj(oa, ioobj);
1299         ioobj->ioo_bufcnt = niocount;
1300         /* The high bits of ioo_max_brw tells server _maximum_ number of bulks
1301          * that might be send for this request.  The actual number is decided
1302          * when the RPC is finally sent in ptlrpc_register_bulk(). It sends
1303          * "max - 1" for old client compatibility sending "0", and also so the
1304          * the actual maximum is a power-of-two number, not one less. LU-1431 */
1305         ioobj_max_brw_set(ioobj, desc->bd_md_max_brw);
1306         osc_pack_capa(req, body, ocapa);
1307         LASSERT(page_count > 0);
1308         pg_prev = pga[0];
1309         for (requested_nob = i = 0; i < page_count; i++, niobuf++) {
1310                 struct brw_page *pg = pga[i];
1311                 int poff = pg->off & ~CFS_PAGE_MASK;
1312
1313                 LASSERT(pg->count > 0);
1314                 /* make sure there is no gap in the middle of page array */
1315                 LASSERTF(page_count == 1 ||
1316                          (ergo(i == 0, poff + pg->count == PAGE_CACHE_SIZE) &&
1317                           ergo(i > 0 && i < page_count - 1,
1318                                poff == 0 && pg->count == PAGE_CACHE_SIZE)   &&
1319                           ergo(i == page_count - 1, poff == 0)),
1320                          "i: %d/%d pg: %p off: "LPU64", count: %u\n",
1321                          i, page_count, pg, pg->off, pg->count);
1322 #ifdef __linux__
1323                 LASSERTF(i == 0 || pg->off > pg_prev->off,
1324                          "i %d p_c %u pg %p [pri %lu ind %lu] off "LPU64
1325                          " prev_pg %p [pri %lu ind %lu] off "LPU64"\n",
1326                          i, page_count,
1327                          pg->pg, page_private(pg->pg), pg->pg->index, pg->off,
1328                          pg_prev->pg, page_private(pg_prev->pg),
1329                          pg_prev->pg->index, pg_prev->off);
1330 #else
1331                 LASSERTF(i == 0 || pg->off > pg_prev->off,
1332                          "i %d p_c %u\n", i, page_count);
1333 #endif
1334                 LASSERT((pga[0]->flag & OBD_BRW_SRVLOCK) ==
1335                         (pg->flag & OBD_BRW_SRVLOCK));
1336
1337                 ptlrpc_prep_bulk_page_pin(desc, pg->pg, poff, pg->count);
1338                 requested_nob += pg->count;
1339
1340                 if (i > 0 && can_merge_pages(pg_prev, pg)) {
1341                         niobuf--;
1342                         niobuf->rnb_len += pg->count;
1343                 } else {
1344                         niobuf->rnb_offset = pg->off;
1345                         niobuf->rnb_len    = pg->count;
1346                         niobuf->rnb_flags  = pg->flag;
1347                 }
1348                 pg_prev = pg;
1349         }
1350
1351         LASSERTF((void *)(niobuf - niocount) ==
1352                 req_capsule_client_get(&req->rq_pill, &RMF_NIOBUF_REMOTE),
1353                 "want %p - real %p\n", req_capsule_client_get(&req->rq_pill,
1354                 &RMF_NIOBUF_REMOTE), (void *)(niobuf - niocount));
1355
1356         osc_announce_cached(cli, &body->oa, opc == OST_WRITE ? requested_nob:0);
1357         if (resend) {
1358                 if ((body->oa.o_valid & OBD_MD_FLFLAGS) == 0) {
1359                         body->oa.o_valid |= OBD_MD_FLFLAGS;
1360                         body->oa.o_flags = 0;
1361                 }
1362                 body->oa.o_flags |= OBD_FL_RECOV_RESEND;
1363         }
1364
1365         if (osc_should_shrink_grant(cli))
1366                 osc_shrink_grant_local(cli, &body->oa);
1367
1368         /* size[REQ_REC_OFF] still sizeof (*body) */
1369         if (opc == OST_WRITE) {
1370                 if (cli->cl_checksum &&
1371                     !sptlrpc_flavor_has_bulk(&req->rq_flvr)) {
1372                         /* store cl_cksum_type in a local variable since
1373                          * it can be changed via lprocfs */
1374                         cksum_type_t cksum_type = cli->cl_cksum_type;
1375
1376                         if ((body->oa.o_valid & OBD_MD_FLFLAGS) == 0) {
1377                                 oa->o_flags &= OBD_FL_LOCAL_MASK;
1378                                 body->oa.o_flags = 0;
1379                         }
1380                         body->oa.o_flags |= cksum_type_pack(cksum_type);
1381                         body->oa.o_valid |= OBD_MD_FLCKSUM | OBD_MD_FLFLAGS;
1382                         body->oa.o_cksum = osc_checksum_bulk(requested_nob,
1383                                                              page_count, pga,
1384                                                              OST_WRITE,
1385                                                              cksum_type);
1386                         CDEBUG(D_PAGE, "checksum at write origin: %x\n",
1387                                body->oa.o_cksum);
1388                         /* save this in 'oa', too, for later checking */
1389                         oa->o_valid |= OBD_MD_FLCKSUM | OBD_MD_FLFLAGS;
1390                         oa->o_flags |= cksum_type_pack(cksum_type);
1391                 } else {
1392                         /* clear out the checksum flag, in case this is a
1393                          * resend but cl_checksum is no longer set. b=11238 */
1394                         oa->o_valid &= ~OBD_MD_FLCKSUM;
1395                 }
1396                 oa->o_cksum = body->oa.o_cksum;
1397                 /* 1 RC per niobuf */
1398                 req_capsule_set_size(pill, &RMF_RCS, RCL_SERVER,
1399                                      sizeof(__u32) * niocount);
1400         } else {
1401                 if (cli->cl_checksum &&
1402                     !sptlrpc_flavor_has_bulk(&req->rq_flvr)) {
1403                         if ((body->oa.o_valid & OBD_MD_FLFLAGS) == 0)
1404                                 body->oa.o_flags = 0;
1405                         body->oa.o_flags |= cksum_type_pack(cli->cl_cksum_type);
1406                         body->oa.o_valid |= OBD_MD_FLCKSUM | OBD_MD_FLFLAGS;
1407                 }
1408         }
1409         ptlrpc_request_set_replen(req);
1410
1411         CLASSERT(sizeof(*aa) <= sizeof(req->rq_async_args));
1412         aa = ptlrpc_req_async_args(req);
1413         aa->aa_oa = oa;
1414         aa->aa_requested_nob = requested_nob;
1415         aa->aa_nio_count = niocount;
1416         aa->aa_page_count = page_count;
1417         aa->aa_resends = 0;
1418         aa->aa_ppga = pga;
1419         aa->aa_cli = cli;
1420         INIT_LIST_HEAD(&aa->aa_oaps);
1421         if (ocapa && reserve)
1422                 aa->aa_ocapa = capa_get(ocapa);
1423
1424         *reqp = req;
1425         RETURN(0);
1426
1427  out:
1428         ptlrpc_req_finished(req);
1429         RETURN(rc);
1430 }
1431
1432 static int check_write_checksum(struct obdo *oa, const lnet_process_id_t *peer,
1433                                 __u32 client_cksum, __u32 server_cksum, int nob,
1434                                 obd_count page_count, struct brw_page **pga,
1435                                 cksum_type_t client_cksum_type)
1436 {
1437         __u32 new_cksum;
1438         char *msg;
1439         cksum_type_t cksum_type;
1440
1441         if (server_cksum == client_cksum) {
1442                 CDEBUG(D_PAGE, "checksum %x confirmed\n", client_cksum);
1443                 return 0;
1444         }
1445
1446         cksum_type = cksum_type_unpack(oa->o_valid & OBD_MD_FLFLAGS ?
1447                                        oa->o_flags : 0);
1448         new_cksum = osc_checksum_bulk(nob, page_count, pga, OST_WRITE,
1449                                       cksum_type);
1450
1451         if (cksum_type != client_cksum_type)
1452                 msg = "the server did not use the checksum type specified in "
1453                       "the original request - likely a protocol problem";
1454         else if (new_cksum == server_cksum)
1455                 msg = "changed on the client after we checksummed it - "
1456                       "likely false positive due to mmap IO (bug 11742)";
1457         else if (new_cksum == client_cksum)
1458                 msg = "changed in transit before arrival at OST";
1459         else
1460                 msg = "changed in transit AND doesn't match the original - "
1461                       "likely false positive due to mmap IO (bug 11742)";
1462
1463         LCONSOLE_ERROR_MSG(0x132, "BAD WRITE CHECKSUM: %s: from %s inode "DFID
1464                            " object "DOSTID" extent ["LPU64"-"LPU64"]\n",
1465                            msg, libcfs_nid2str(peer->nid),
1466                            oa->o_valid & OBD_MD_FLFID ? oa->o_parent_seq : (__u64)0,
1467                            oa->o_valid & OBD_MD_FLFID ? oa->o_parent_oid : 0,
1468                            oa->o_valid & OBD_MD_FLFID ? oa->o_parent_ver : 0,
1469                            POSTID(&oa->o_oi), pga[0]->off,
1470                            pga[page_count-1]->off + pga[page_count-1]->count - 1);
1471         CERROR("original client csum %x (type %x), server csum %x (type %x), "
1472                "client csum now %x\n", client_cksum, client_cksum_type,
1473                server_cksum, cksum_type, new_cksum);
1474         return 1;
1475 }
1476
1477 /* Note rc enters this function as number of bytes transferred */
1478 static int osc_brw_fini_request(struct ptlrpc_request *req, int rc)
1479 {
1480         struct osc_brw_async_args *aa = (void *)&req->rq_async_args;
1481         const lnet_process_id_t *peer =
1482                         &req->rq_import->imp_connection->c_peer;
1483         struct client_obd *cli = aa->aa_cli;
1484         struct ost_body *body;
1485         __u32 client_cksum = 0;
1486         ENTRY;
1487
1488         if (rc < 0 && rc != -EDQUOT) {
1489                 DEBUG_REQ(D_INFO, req, "Failed request with rc = %d\n", rc);
1490                 RETURN(rc);
1491         }
1492
1493         LASSERTF(req->rq_repmsg != NULL, "rc = %d\n", rc);
1494         body = req_capsule_server_get(&req->rq_pill, &RMF_OST_BODY);
1495         if (body == NULL) {
1496                 DEBUG_REQ(D_INFO, req, "Can't unpack body\n");
1497                 RETURN(-EPROTO);
1498         }
1499
1500         /* set/clear over quota flag for a uid/gid */
1501         if (lustre_msg_get_opc(req->rq_reqmsg) == OST_WRITE &&
1502             body->oa.o_valid & (OBD_MD_FLUSRQUOTA | OBD_MD_FLGRPQUOTA)) {
1503                 unsigned int qid[MAXQUOTAS] = { body->oa.o_uid, body->oa.o_gid };
1504
1505                 CDEBUG(D_QUOTA, "setdq for [%u %u] with valid "LPX64", flags %x\n",
1506                        body->oa.o_uid, body->oa.o_gid, body->oa.o_valid,
1507                        body->oa.o_flags);
1508                 osc_quota_setdq(cli, qid, body->oa.o_valid, body->oa.o_flags);
1509         }
1510
1511         osc_update_grant(cli, body);
1512
1513         if (rc < 0)
1514                 RETURN(rc);
1515
1516         if (aa->aa_oa->o_valid & OBD_MD_FLCKSUM)
1517                 client_cksum = aa->aa_oa->o_cksum; /* save for later */
1518
1519         if (lustre_msg_get_opc(req->rq_reqmsg) == OST_WRITE) {
1520                 if (rc > 0) {
1521                         CERROR("Unexpected +ve rc %d\n", rc);
1522                         RETURN(-EPROTO);
1523                 }
1524                 LASSERT(req->rq_bulk->bd_nob == aa->aa_requested_nob);
1525
1526                 if (sptlrpc_cli_unwrap_bulk_write(req, req->rq_bulk))
1527                         RETURN(-EAGAIN);
1528
1529                 if ((aa->aa_oa->o_valid & OBD_MD_FLCKSUM) && client_cksum &&
1530                     check_write_checksum(&body->oa, peer, client_cksum,
1531                                          body->oa.o_cksum, aa->aa_requested_nob,
1532                                          aa->aa_page_count, aa->aa_ppga,
1533                                          cksum_type_unpack(aa->aa_oa->o_flags)))
1534                         RETURN(-EAGAIN);
1535
1536                 rc = check_write_rcs(req, aa->aa_requested_nob,aa->aa_nio_count,
1537                                      aa->aa_page_count, aa->aa_ppga);
1538                 GOTO(out, rc);
1539         }
1540
1541         /* The rest of this function executes only for OST_READs */
1542
1543         /* if unwrap_bulk failed, return -EAGAIN to retry */
1544         rc = sptlrpc_cli_unwrap_bulk_read(req, req->rq_bulk, rc);
1545         if (rc < 0)
1546                 GOTO(out, rc = -EAGAIN);
1547
1548         if (rc > aa->aa_requested_nob) {
1549                 CERROR("Unexpected rc %d (%d requested)\n", rc,
1550                        aa->aa_requested_nob);
1551                 RETURN(-EPROTO);
1552         }
1553
1554         if (rc != req->rq_bulk->bd_nob_transferred) {
1555                 CERROR ("Unexpected rc %d (%d transferred)\n",
1556                         rc, req->rq_bulk->bd_nob_transferred);
1557                 return (-EPROTO);
1558         }
1559
1560         if (rc < aa->aa_requested_nob)
1561                 handle_short_read(rc, aa->aa_page_count, aa->aa_ppga);
1562
1563         if (body->oa.o_valid & OBD_MD_FLCKSUM) {
1564                 static int cksum_counter;
1565                 __u32      server_cksum = body->oa.o_cksum;
1566                 char      *via;
1567                 char      *router;
1568                 cksum_type_t cksum_type;
1569
1570                 cksum_type = cksum_type_unpack(body->oa.o_valid &OBD_MD_FLFLAGS?
1571                                                body->oa.o_flags : 0);
1572                 client_cksum = osc_checksum_bulk(rc, aa->aa_page_count,
1573                                                  aa->aa_ppga, OST_READ,
1574                                                  cksum_type);
1575
1576                 if (peer->nid == req->rq_bulk->bd_sender) {
1577                         via = router = "";
1578                 } else {
1579                         via = " via ";
1580                         router = libcfs_nid2str(req->rq_bulk->bd_sender);
1581                 }
1582
1583                 if (server_cksum != client_cksum) {
1584                         LCONSOLE_ERROR_MSG(0x133, "%s: BAD READ CHECKSUM: from "
1585                                            "%s%s%s inode "DFID" object "DOSTID
1586                                            " extent ["LPU64"-"LPU64"]\n",
1587                                            req->rq_import->imp_obd->obd_name,
1588                                            libcfs_nid2str(peer->nid),
1589                                            via, router,
1590                                            body->oa.o_valid & OBD_MD_FLFID ?
1591                                                 body->oa.o_parent_seq : (__u64)0,
1592                                            body->oa.o_valid & OBD_MD_FLFID ?
1593                                                 body->oa.o_parent_oid : 0,
1594                                            body->oa.o_valid & OBD_MD_FLFID ?
1595                                                 body->oa.o_parent_ver : 0,
1596                                            POSTID(&body->oa.o_oi),
1597                                            aa->aa_ppga[0]->off,
1598                                            aa->aa_ppga[aa->aa_page_count-1]->off +
1599                                            aa->aa_ppga[aa->aa_page_count-1]->count -
1600                                                                         1);
1601                         CERROR("client %x, server %x, cksum_type %x\n",
1602                                client_cksum, server_cksum, cksum_type);
1603                         cksum_counter = 0;
1604                         aa->aa_oa->o_cksum = client_cksum;
1605                         rc = -EAGAIN;
1606                 } else {
1607                         cksum_counter++;
1608                         CDEBUG(D_PAGE, "checksum %x confirmed\n", client_cksum);
1609                         rc = 0;
1610                 }
1611         } else if (unlikely(client_cksum)) {
1612                 static int cksum_missed;
1613
1614                 cksum_missed++;
1615                 if ((cksum_missed & (-cksum_missed)) == cksum_missed)
1616                         CERROR("Checksum %u requested from %s but not sent\n",
1617                                cksum_missed, libcfs_nid2str(peer->nid));
1618         } else {
1619                 rc = 0;
1620         }
1621 out:
1622         if (rc >= 0)
1623                 lustre_get_wire_obdo(&req->rq_import->imp_connect_data,
1624                                      aa->aa_oa, &body->oa);
1625
1626         RETURN(rc);
1627 }
1628
1629 static int osc_brw_redo_request(struct ptlrpc_request *request,
1630                                 struct osc_brw_async_args *aa, int rc)
1631 {
1632         struct ptlrpc_request *new_req;
1633         struct osc_brw_async_args *new_aa;
1634         struct osc_async_page *oap;
1635         ENTRY;
1636
1637         DEBUG_REQ(rc == -EINPROGRESS ? D_RPCTRACE : D_ERROR, request,
1638                   "redo for recoverable error %d", rc);
1639
1640         rc = osc_brw_prep_request(lustre_msg_get_opc(request->rq_reqmsg) ==
1641                                         OST_WRITE ? OBD_BRW_WRITE :OBD_BRW_READ,
1642                                   aa->aa_cli, aa->aa_oa,
1643                                   NULL /* lsm unused by osc currently */,
1644                                   aa->aa_page_count, aa->aa_ppga,
1645                                   &new_req, aa->aa_ocapa, 0, 1);
1646         if (rc)
1647                 RETURN(rc);
1648
1649         list_for_each_entry(oap, &aa->aa_oaps, oap_rpc_item) {
1650                 if (oap->oap_request != NULL) {
1651                         LASSERTF(request == oap->oap_request,
1652                                  "request %p != oap_request %p\n",
1653                                  request, oap->oap_request);
1654                         if (oap->oap_interrupted) {
1655                                 ptlrpc_req_finished(new_req);
1656                                 RETURN(-EINTR);
1657                         }
1658                 }
1659         }
1660         /* New request takes over pga and oaps from old request.
1661          * Note that copying a list_head doesn't work, need to move it... */
1662         aa->aa_resends++;
1663         new_req->rq_interpret_reply = request->rq_interpret_reply;
1664         new_req->rq_async_args = request->rq_async_args;
1665         new_req->rq_commit_cb = request->rq_commit_cb;
1666         /* cap resend delay to the current request timeout, this is similar to
1667          * what ptlrpc does (see after_reply()) */
1668         if (aa->aa_resends > new_req->rq_timeout)
1669                 new_req->rq_sent = cfs_time_current_sec() + new_req->rq_timeout;
1670         else
1671                 new_req->rq_sent = cfs_time_current_sec() + aa->aa_resends;
1672         new_req->rq_generation_set = 1;
1673         new_req->rq_import_generation = request->rq_import_generation;
1674
1675         new_aa = ptlrpc_req_async_args(new_req);
1676
1677         INIT_LIST_HEAD(&new_aa->aa_oaps);
1678         list_splice_init(&aa->aa_oaps, &new_aa->aa_oaps);
1679         INIT_LIST_HEAD(&new_aa->aa_exts);
1680         list_splice_init(&aa->aa_exts, &new_aa->aa_exts);
1681         new_aa->aa_resends = aa->aa_resends;
1682
1683         list_for_each_entry(oap, &new_aa->aa_oaps, oap_rpc_item) {
1684                 if (oap->oap_request) {
1685                         ptlrpc_req_finished(oap->oap_request);
1686                         oap->oap_request = ptlrpc_request_addref(new_req);
1687                 }
1688         }
1689
1690         new_aa->aa_ocapa = aa->aa_ocapa;
1691         aa->aa_ocapa = NULL;
1692
1693         /* XXX: This code will run into problem if we're going to support
1694          * to add a series of BRW RPCs into a self-defined ptlrpc_request_set
1695          * and wait for all of them to be finished. We should inherit request
1696          * set from old request. */
1697         ptlrpcd_add_req(new_req, PDL_POLICY_SAME, -1);
1698
1699         DEBUG_REQ(D_INFO, new_req, "new request");
1700         RETURN(0);
1701 }
1702
1703 /*
1704  * ugh, we want disk allocation on the target to happen in offset order.  we'll
1705  * follow sedgewicks advice and stick to the dead simple shellsort -- it'll do
1706  * fine for our small page arrays and doesn't require allocation.  its an
1707  * insertion sort that swaps elements that are strides apart, shrinking the
1708  * stride down until its '1' and the array is sorted.
1709  */
1710 static void sort_brw_pages(struct brw_page **array, int num)
1711 {
1712         int stride, i, j;
1713         struct brw_page *tmp;
1714
1715         if (num == 1)
1716                 return;
1717         for (stride = 1; stride < num ; stride = (stride * 3) + 1)
1718                 ;
1719
1720         do {
1721                 stride /= 3;
1722                 for (i = stride ; i < num ; i++) {
1723                         tmp = array[i];
1724                         j = i;
1725                         while (j >= stride && array[j - stride]->off > tmp->off) {
1726                                 array[j] = array[j - stride];
1727                                 j -= stride;
1728                         }
1729                         array[j] = tmp;
1730                 }
1731         } while (stride > 1);
1732 }
1733
1734 static void osc_release_ppga(struct brw_page **ppga, obd_count count)
1735 {
1736         LASSERT(ppga != NULL);
1737         OBD_FREE(ppga, sizeof(*ppga) * count);
1738 }
1739
1740 static int brw_interpret(const struct lu_env *env,
1741                          struct ptlrpc_request *req, void *data, int rc)
1742 {
1743         struct osc_brw_async_args *aa = data;
1744         struct osc_extent *ext;
1745         struct osc_extent *tmp;
1746         struct client_obd *cli = aa->aa_cli;
1747         ENTRY;
1748
1749         rc = osc_brw_fini_request(req, rc);
1750         CDEBUG(D_INODE, "request %p aa %p rc %d\n", req, aa, rc);
1751         /* When server return -EINPROGRESS, client should always retry
1752          * regardless of the number of times the bulk was resent already. */
1753         if (osc_recoverable_error(rc)) {
1754                 if (req->rq_import_generation !=
1755                     req->rq_import->imp_generation) {
1756                         CDEBUG(D_HA, "%s: resend cross eviction for object: "
1757                                ""DOSTID", rc = %d.\n",
1758                                req->rq_import->imp_obd->obd_name,
1759                                POSTID(&aa->aa_oa->o_oi), rc);
1760                 } else if (rc == -EINPROGRESS ||
1761                     client_should_resend(aa->aa_resends, aa->aa_cli)) {
1762                         rc = osc_brw_redo_request(req, aa, rc);
1763                 } else {
1764                         CERROR("%s: too many resent retries for object: "
1765                                ""LPU64":"LPU64", rc = %d.\n",
1766                                req->rq_import->imp_obd->obd_name,
1767                                POSTID(&aa->aa_oa->o_oi), rc);
1768                 }
1769
1770                 if (rc == 0)
1771                         RETURN(0);
1772                 else if (rc == -EAGAIN || rc == -EINPROGRESS)
1773                         rc = -EIO;
1774         }
1775
1776         if (aa->aa_ocapa) {
1777                 capa_put(aa->aa_ocapa);
1778                 aa->aa_ocapa = NULL;
1779         }
1780
1781         if (rc == 0) {
1782                 struct obdo *oa = aa->aa_oa;
1783                 struct cl_attr *attr = &osc_env_info(env)->oti_attr;
1784                 unsigned long valid = 0;
1785                 struct cl_object *obj;
1786                 struct osc_async_page *last;
1787
1788                 last = brw_page2oap(aa->aa_ppga[aa->aa_page_count - 1]);
1789                 obj = osc2cl(last->oap_obj);
1790
1791                 cl_object_attr_lock(obj);
1792                 if (oa->o_valid & OBD_MD_FLBLOCKS) {
1793                         attr->cat_blocks = oa->o_blocks;
1794                         valid |= CAT_BLOCKS;
1795                 }
1796                 if (oa->o_valid & OBD_MD_FLMTIME) {
1797                         attr->cat_mtime = oa->o_mtime;
1798                         valid |= CAT_MTIME;
1799                 }
1800                 if (oa->o_valid & OBD_MD_FLATIME) {
1801                         attr->cat_atime = oa->o_atime;
1802                         valid |= CAT_ATIME;
1803                 }
1804                 if (oa->o_valid & OBD_MD_FLCTIME) {
1805                         attr->cat_ctime = oa->o_ctime;
1806                         valid |= CAT_CTIME;
1807                 }
1808
1809                 if (lustre_msg_get_opc(req->rq_reqmsg) == OST_WRITE) {
1810                         struct lov_oinfo *loi = cl2osc(obj)->oo_oinfo;
1811                         loff_t last_off = last->oap_count + last->oap_obj_off +
1812                                 last->oap_page_off;
1813
1814                         /* Change file size if this is an out of quota or
1815                          * direct IO write and it extends the file size */
1816                         if (loi->loi_lvb.lvb_size < last_off) {
1817                                 attr->cat_size = last_off;
1818                                 valid |= CAT_SIZE;
1819                         }
1820                         /* Extend KMS if it's not a lockless write */
1821                         if (loi->loi_kms < last_off &&
1822                             oap2osc_page(last)->ops_srvlock == 0) {
1823                                 attr->cat_kms = last_off;
1824                                 valid |= CAT_KMS;
1825                         }
1826                 }
1827
1828                 if (valid != 0)
1829                         cl_object_attr_set(env, obj, attr, valid);
1830                 cl_object_attr_unlock(obj);
1831         }
1832         OBDO_FREE(aa->aa_oa);
1833
1834         if (lustre_msg_get_opc(req->rq_reqmsg) == OST_WRITE && rc == 0)
1835                 osc_inc_unstable_pages(req);
1836
1837         list_for_each_entry_safe(ext, tmp, &aa->aa_exts, oe_link) {
1838                 list_del_init(&ext->oe_link);
1839                 osc_extent_finish(env, ext, 1, rc);
1840         }
1841         LASSERT(list_empty(&aa->aa_exts));
1842         LASSERT(list_empty(&aa->aa_oaps));
1843
1844         cl_req_completion(env, aa->aa_clerq, rc < 0 ? rc :
1845                           req->rq_bulk->bd_nob_transferred);
1846         osc_release_ppga(aa->aa_ppga, aa->aa_page_count);
1847         ptlrpc_lprocfs_brw(req, req->rq_bulk->bd_nob_transferred);
1848
1849         client_obd_list_lock(&cli->cl_loi_list_lock);
1850         /* We need to decrement before osc_ap_completion->osc_wake_cache_waiters
1851          * is called so we know whether to go to sync BRWs or wait for more
1852          * RPCs to complete */
1853         if (lustre_msg_get_opc(req->rq_reqmsg) == OST_WRITE)
1854                 cli->cl_w_in_flight--;
1855         else
1856                 cli->cl_r_in_flight--;
1857         osc_wake_cache_waiters(cli);
1858         client_obd_list_unlock(&cli->cl_loi_list_lock);
1859
1860         osc_io_unplug(env, cli, NULL, PDL_POLICY_SAME);
1861         RETURN(rc);
1862 }
1863
1864 static void brw_commit(struct ptlrpc_request *req)
1865 {
1866         /* If osc_inc_unstable_pages (via osc_extent_finish) races with
1867          * this called via the rq_commit_cb, I need to ensure
1868          * osc_dec_unstable_pages is still called. Otherwise unstable
1869          * pages may be leaked. */
1870         spin_lock(&req->rq_lock);
1871         if (likely(req->rq_unstable)) {
1872                 req->rq_unstable = 0;
1873                 spin_unlock(&req->rq_lock);
1874
1875                 osc_dec_unstable_pages(req);
1876         } else {
1877                 req->rq_committed = 1;
1878                 spin_unlock(&req->rq_lock);
1879         }
1880 }
1881
1882 /**
1883  * Build an RPC by the list of extent @ext_list. The caller must ensure
1884  * that the total pages in this list are NOT over max pages per RPC.
1885  * Extents in the list must be in OES_RPC state.
1886  */
1887 int osc_build_rpc(const struct lu_env *env, struct client_obd *cli,
1888                   struct list_head *ext_list, int cmd, pdl_policy_t pol)
1889 {
1890         struct ptlrpc_request           *req = NULL;
1891         struct osc_extent               *ext;
1892         struct brw_page                 **pga = NULL;
1893         struct osc_brw_async_args       *aa = NULL;
1894         struct obdo                     *oa = NULL;
1895         struct osc_async_page           *oap;
1896         struct osc_async_page           *tmp;
1897         struct cl_req                   *clerq = NULL;
1898         enum cl_req_type                crt = (cmd & OBD_BRW_WRITE) ? CRT_WRITE :
1899                                                                       CRT_READ;
1900         struct cl_req_attr              *crattr = NULL;
1901         obd_off                         starting_offset = OBD_OBJECT_EOF;
1902         obd_off                         ending_offset = 0;
1903         int                             mpflag = 0;
1904         int                             mem_tight = 0;
1905         int                             page_count = 0;
1906         bool                            soft_sync = false;
1907         int                             i;
1908         int                             rc;
1909         struct list_head                rpc_list = LIST_HEAD_INIT(rpc_list);
1910
1911         ENTRY;
1912         LASSERT(!list_empty(ext_list));
1913
1914         /* add pages into rpc_list to build BRW rpc */
1915         list_for_each_entry(ext, ext_list, oe_link) {
1916                 LASSERT(ext->oe_state == OES_RPC);
1917                 mem_tight |= ext->oe_memalloc;
1918                 list_for_each_entry(oap, &ext->oe_pages, oap_pending_item) {
1919                         ++page_count;
1920                         list_add_tail(&oap->oap_rpc_item, &rpc_list);
1921                         if (starting_offset > oap->oap_obj_off)
1922                                 starting_offset = oap->oap_obj_off;
1923                         else
1924                                 LASSERT(oap->oap_page_off == 0);
1925                         if (ending_offset < oap->oap_obj_off + oap->oap_count)
1926                                 ending_offset = oap->oap_obj_off +
1927                                                 oap->oap_count;
1928                         else
1929                                 LASSERT(oap->oap_page_off + oap->oap_count ==
1930                                         PAGE_CACHE_SIZE);
1931                 }
1932         }
1933
1934         soft_sync = osc_over_unstable_soft_limit(cli);
1935         if (mem_tight)
1936                 mpflag = cfs_memory_pressure_get_and_set();
1937
1938         OBD_ALLOC(crattr, sizeof(*crattr));
1939         if (crattr == NULL)
1940                 GOTO(out, rc = -ENOMEM);
1941
1942         OBD_ALLOC(pga, sizeof(*pga) * page_count);
1943         if (pga == NULL)
1944                 GOTO(out, rc = -ENOMEM);
1945
1946         OBDO_ALLOC(oa);
1947         if (oa == NULL)
1948                 GOTO(out, rc = -ENOMEM);
1949
1950         i = 0;
1951         list_for_each_entry(oap, &rpc_list, oap_rpc_item) {
1952                 struct cl_page *page = oap2cl_page(oap);
1953                 if (clerq == NULL) {
1954                         clerq = cl_req_alloc(env, page, crt,
1955                                              1 /* only 1-object rpcs for now */);
1956                         if (IS_ERR(clerq))
1957                                 GOTO(out, rc = PTR_ERR(clerq));
1958                 }
1959                 if (mem_tight)
1960                         oap->oap_brw_flags |= OBD_BRW_MEMALLOC;
1961                 if (soft_sync)
1962                         oap->oap_brw_flags |= OBD_BRW_SOFT_SYNC;
1963                 pga[i] = &oap->oap_brw_page;
1964                 pga[i]->off = oap->oap_obj_off + oap->oap_page_off;
1965                 CDEBUG(0, "put page %p index %lu oap %p flg %x to pga\n",
1966                        pga[i]->pg, page_index(oap->oap_page), oap,
1967                        pga[i]->flag);
1968                 i++;
1969                 cl_req_page_add(env, clerq, page);
1970         }
1971
1972         /* always get the data for the obdo for the rpc */
1973         LASSERT(clerq != NULL);
1974         crattr->cra_oa = oa;
1975         cl_req_attr_set(env, clerq, crattr, ~0ULL);
1976
1977         rc = cl_req_prep(env, clerq);
1978         if (rc != 0) {
1979                 CERROR("cl_req_prep failed: %d\n", rc);
1980                 GOTO(out, rc);
1981         }
1982
1983         sort_brw_pages(pga, page_count);
1984         rc = osc_brw_prep_request(cmd, cli, oa, NULL, page_count,
1985                         pga, &req, crattr->cra_capa, 1, 0);
1986         if (rc != 0) {
1987                 CERROR("prep_req failed: %d\n", rc);
1988                 GOTO(out, rc);
1989         }
1990
1991         req->rq_commit_cb = brw_commit;
1992         req->rq_interpret_reply = brw_interpret;
1993
1994         if (mem_tight != 0)
1995                 req->rq_memalloc = 1;
1996
1997         /* Need to update the timestamps after the request is built in case
1998          * we race with setattr (locally or in queue at OST).  If OST gets
1999          * later setattr before earlier BRW (as determined by the request xid),
2000          * the OST will not use BRW timestamps.  Sadly, there is no obvious
2001          * way to do this in a single call.  bug 10150 */
2002         cl_req_attr_set(env, clerq, crattr,
2003                         OBD_MD_FLMTIME|OBD_MD_FLCTIME|OBD_MD_FLATIME);
2004
2005         lustre_msg_set_jobid(req->rq_reqmsg, crattr->cra_jobid);
2006
2007         CLASSERT(sizeof(*aa) <= sizeof(req->rq_async_args));
2008         aa = ptlrpc_req_async_args(req);
2009         INIT_LIST_HEAD(&aa->aa_oaps);
2010         list_splice_init(&rpc_list, &aa->aa_oaps);
2011         INIT_LIST_HEAD(&aa->aa_exts);
2012         list_splice_init(ext_list, &aa->aa_exts);
2013         aa->aa_clerq = clerq;
2014
2015         /* queued sync pages can be torn down while the pages
2016          * were between the pending list and the rpc */
2017         tmp = NULL;
2018         list_for_each_entry(oap, &aa->aa_oaps, oap_rpc_item) {
2019                 /* only one oap gets a request reference */
2020                 if (tmp == NULL)
2021                         tmp = oap;
2022                 if (oap->oap_interrupted && !req->rq_intr) {
2023                         CDEBUG(D_INODE, "oap %p in req %p interrupted\n",
2024                                         oap, req);
2025                         ptlrpc_mark_interrupted(req);
2026                 }
2027         }
2028         if (tmp != NULL)
2029                 tmp->oap_request = ptlrpc_request_addref(req);
2030
2031         client_obd_list_lock(&cli->cl_loi_list_lock);
2032         starting_offset >>= PAGE_CACHE_SHIFT;
2033         if (cmd == OBD_BRW_READ) {
2034                 cli->cl_r_in_flight++;
2035                 lprocfs_oh_tally_log2(&cli->cl_read_page_hist, page_count);
2036                 lprocfs_oh_tally(&cli->cl_read_rpc_hist, cli->cl_r_in_flight);
2037                 lprocfs_oh_tally_log2(&cli->cl_read_offset_hist,
2038                                       starting_offset + 1);
2039         } else {
2040                 cli->cl_w_in_flight++;
2041                 lprocfs_oh_tally_log2(&cli->cl_write_page_hist, page_count);
2042                 lprocfs_oh_tally(&cli->cl_write_rpc_hist, cli->cl_w_in_flight);
2043                 lprocfs_oh_tally_log2(&cli->cl_write_offset_hist,
2044                                       starting_offset + 1);
2045         }
2046         client_obd_list_unlock(&cli->cl_loi_list_lock);
2047
2048         DEBUG_REQ(D_INODE, req, "%d pages, aa %p. now %ur/%uw in flight",
2049                   page_count, aa, cli->cl_r_in_flight,
2050                   cli->cl_w_in_flight);
2051
2052         /* XXX: Maybe the caller can check the RPC bulk descriptor to
2053          * see which CPU/NUMA node the majority of pages were allocated
2054          * on, and try to assign the async RPC to the CPU core
2055          * (PDL_POLICY_PREFERRED) to reduce cross-CPU memory traffic.
2056          *
2057          * But on the other hand, we expect that multiple ptlrpcd
2058          * threads and the initial write sponsor can run in parallel,
2059          * especially when data checksum is enabled, which is CPU-bound
2060          * operation and single ptlrpcd thread cannot process in time.
2061          * So more ptlrpcd threads sharing BRW load
2062          * (with PDL_POLICY_ROUND) seems better.
2063          */
2064         ptlrpcd_add_req(req, pol, -1);
2065         rc = 0;
2066         EXIT;
2067
2068 out:
2069         if (mem_tight != 0)
2070                 cfs_memory_pressure_restore(mpflag);
2071
2072         if (crattr != NULL) {
2073                 capa_put(crattr->cra_capa);
2074                 OBD_FREE(crattr, sizeof(*crattr));
2075         }
2076
2077         if (rc != 0) {
2078                 LASSERT(req == NULL);
2079
2080                 if (oa)
2081                         OBDO_FREE(oa);
2082                 if (pga)
2083                         OBD_FREE(pga, sizeof(*pga) * page_count);
2084                 /* this should happen rarely and is pretty bad, it makes the
2085                  * pending list not follow the dirty order */
2086                 while (!list_empty(ext_list)) {
2087                         ext = list_entry(ext_list->next, struct osc_extent,
2088                                          oe_link);
2089                         list_del_init(&ext->oe_link);
2090                         osc_extent_finish(env, ext, 0, rc);
2091                 }
2092                 if (clerq && !IS_ERR(clerq))
2093                         cl_req_completion(env, clerq, rc);
2094         }
2095         RETURN(rc);
2096 }
2097
2098 static int osc_set_lock_data_with_check(struct ldlm_lock *lock,
2099                                         struct ldlm_enqueue_info *einfo)
2100 {
2101         void *data = einfo->ei_cbdata;
2102         int set = 0;
2103
2104         LASSERT(lock != NULL);
2105         LASSERT(lock->l_blocking_ast == einfo->ei_cb_bl);
2106         LASSERT(lock->l_resource->lr_type == einfo->ei_type);
2107         LASSERT(lock->l_completion_ast == einfo->ei_cb_cp);
2108         LASSERT(lock->l_glimpse_ast == einfo->ei_cb_gl);
2109
2110         lock_res_and_lock(lock);
2111         spin_lock(&osc_ast_guard);
2112
2113         if (lock->l_ast_data == NULL)
2114                 lock->l_ast_data = data;
2115         if (lock->l_ast_data == data)
2116                 set = 1;
2117
2118         spin_unlock(&osc_ast_guard);
2119         unlock_res_and_lock(lock);
2120
2121         return set;
2122 }
2123
2124 static int osc_set_data_with_check(struct lustre_handle *lockh,
2125                                    struct ldlm_enqueue_info *einfo)
2126 {
2127         struct ldlm_lock *lock = ldlm_handle2lock(lockh);
2128         int set = 0;
2129
2130         if (lock != NULL) {
2131                 set = osc_set_lock_data_with_check(lock, einfo);
2132                 LDLM_LOCK_PUT(lock);
2133         } else
2134                 CERROR("lockh %p, data %p - client evicted?\n",
2135                        lockh, einfo->ei_cbdata);
2136         return set;
2137 }
2138
2139 static int osc_change_cbdata(struct obd_export *exp, struct lov_stripe_md *lsm,
2140                              ldlm_iterator_t replace, void *data)
2141 {
2142         struct ldlm_res_id res_id;
2143         struct obd_device *obd = class_exp2obd(exp);
2144
2145         ostid_build_res_name(&lsm->lsm_oi, &res_id);
2146         ldlm_resource_iterate(obd->obd_namespace, &res_id, replace, data);
2147         return 0;
2148 }
2149
2150 /* find any ldlm lock of the inode in osc
2151  * return 0    not find
2152  *        1    find one
2153  *      < 0    error */
2154 static int osc_find_cbdata(struct obd_export *exp, struct lov_stripe_md *lsm,
2155                            ldlm_iterator_t replace, void *data)
2156 {
2157         struct ldlm_res_id res_id;
2158         struct obd_device *obd = class_exp2obd(exp);
2159         int rc = 0;
2160
2161         ostid_build_res_name(&lsm->lsm_oi, &res_id);
2162         rc = ldlm_resource_iterate(obd->obd_namespace, &res_id, replace, data);
2163         if (rc == LDLM_ITER_STOP)
2164                 return(1);
2165         if (rc == LDLM_ITER_CONTINUE)
2166                 return(0);
2167         return(rc);
2168 }
2169
2170 static int osc_enqueue_fini(struct ptlrpc_request *req, struct ost_lvb *lvb,
2171                             obd_enqueue_update_f upcall, void *cookie,
2172                             __u64 *flags, int agl, int rc)
2173 {
2174         int intent = *flags & LDLM_FL_HAS_INTENT;
2175         ENTRY;
2176
2177         if (intent) {
2178                 /* The request was created before ldlm_cli_enqueue call. */
2179                 if (rc == ELDLM_LOCK_ABORTED) {
2180                         struct ldlm_reply *rep;
2181                         rep = req_capsule_server_get(&req->rq_pill,
2182                                                      &RMF_DLM_REP);
2183
2184                         LASSERT(rep != NULL);
2185                         rep->lock_policy_res1 =
2186                                 ptlrpc_status_ntoh(rep->lock_policy_res1);
2187                         if (rep->lock_policy_res1)
2188                                 rc = rep->lock_policy_res1;
2189                 }
2190         }
2191
2192         if ((intent != 0 && rc == ELDLM_LOCK_ABORTED && agl == 0) ||
2193             (rc == 0)) {
2194                 *flags |= LDLM_FL_LVB_READY;
2195                 CDEBUG(D_INODE,"got kms "LPU64" blocks "LPU64" mtime "LPU64"\n",
2196                        lvb->lvb_size, lvb->lvb_blocks, lvb->lvb_mtime);
2197         }
2198
2199         /* Call the update callback. */
2200         rc = (*upcall)(cookie, rc);
2201         RETURN(rc);
2202 }
2203
2204 static int osc_enqueue_interpret(const struct lu_env *env,
2205                                  struct ptlrpc_request *req,
2206                                  struct osc_enqueue_args *aa, int rc)
2207 {
2208         struct ldlm_lock *lock;
2209         struct lustre_handle handle;
2210         __u32 mode;
2211         struct ost_lvb *lvb;
2212         __u32 lvb_len;
2213         __u64 *flags = aa->oa_flags;
2214
2215         /* Make a local copy of a lock handle and a mode, because aa->oa_*
2216          * might be freed anytime after lock upcall has been called. */
2217         lustre_handle_copy(&handle, aa->oa_lockh);
2218         mode = aa->oa_ei->ei_mode;
2219
2220         /* ldlm_cli_enqueue is holding a reference on the lock, so it must
2221          * be valid. */
2222         lock = ldlm_handle2lock(&handle);
2223
2224         /* Take an additional reference so that a blocking AST that
2225          * ldlm_cli_enqueue_fini() might post for a failed lock, is guaranteed
2226          * to arrive after an upcall has been executed by
2227          * osc_enqueue_fini(). */
2228         ldlm_lock_addref(&handle, mode);
2229
2230         /* Let cl_lock_state_wait fail with -ERESTARTSYS to unuse sublocks. */
2231         OBD_FAIL_TIMEOUT(OBD_FAIL_LDLM_ENQUEUE_HANG, 2);
2232
2233         /* Let CP AST to grant the lock first. */
2234         OBD_FAIL_TIMEOUT(OBD_FAIL_OSC_CP_ENQ_RACE, 1);
2235
2236         if (aa->oa_agl && rc == ELDLM_LOCK_ABORTED) {
2237                 lvb = NULL;
2238                 lvb_len = 0;
2239         } else {
2240                 lvb = aa->oa_lvb;
2241                 lvb_len = sizeof(*aa->oa_lvb);
2242         }
2243
2244         /* Complete obtaining the lock procedure. */
2245         rc = ldlm_cli_enqueue_fini(aa->oa_exp, req, aa->oa_ei->ei_type, 1,
2246                                    mode, flags, lvb, lvb_len, &handle, rc);
2247         /* Complete osc stuff. */
2248         rc = osc_enqueue_fini(req, aa->oa_lvb, aa->oa_upcall, aa->oa_cookie,
2249                               flags, aa->oa_agl, rc);
2250
2251         OBD_FAIL_TIMEOUT(OBD_FAIL_OSC_CP_CANCEL_RACE, 10);
2252
2253         /* Release the lock for async request. */
2254         if (lustre_handle_is_used(&handle) && rc == ELDLM_OK)
2255                 /*
2256                  * Releases a reference taken by ldlm_cli_enqueue(), if it is
2257                  * not already released by
2258                  * ldlm_cli_enqueue_fini()->failed_lock_cleanup()
2259                  */
2260                 ldlm_lock_decref(&handle, mode);
2261
2262         LASSERTF(lock != NULL, "lockh %p, req %p, aa %p - client evicted?\n",
2263                  aa->oa_lockh, req, aa);
2264         ldlm_lock_decref(&handle, mode);
2265         LDLM_LOCK_PUT(lock);
2266         return rc;
2267 }
2268
2269 struct ptlrpc_request_set *PTLRPCD_SET = (void *)1;
2270
2271 /* When enqueuing asynchronously, locks are not ordered, we can obtain a lock
2272  * from the 2nd OSC before a lock from the 1st one. This does not deadlock with
2273  * other synchronous requests, however keeping some locks and trying to obtain
2274  * others may take a considerable amount of time in a case of ost failure; and
2275  * when other sync requests do not get released lock from a client, the client
2276  * is excluded from the cluster -- such scenarious make the life difficult, so
2277  * release locks just after they are obtained. */
2278 int osc_enqueue_base(struct obd_export *exp, struct ldlm_res_id *res_id,
2279                      __u64 *flags, ldlm_policy_data_t *policy,
2280                      struct ost_lvb *lvb, int kms_valid,
2281                      obd_enqueue_update_f upcall, void *cookie,
2282                      struct ldlm_enqueue_info *einfo,
2283                      struct lustre_handle *lockh,
2284                      struct ptlrpc_request_set *rqset, int async, int agl)
2285 {
2286         struct obd_device *obd = exp->exp_obd;
2287         struct ptlrpc_request *req = NULL;
2288         int intent = *flags & LDLM_FL_HAS_INTENT;
2289         __u64 match_lvb = (agl != 0 ? 0 : LDLM_FL_LVB_READY);
2290         ldlm_mode_t mode;
2291         int rc;
2292         ENTRY;
2293
2294         /* Filesystem lock extents are extended to page boundaries so that
2295          * dealing with the page cache is a little smoother.  */
2296         policy->l_extent.start -= policy->l_extent.start & ~CFS_PAGE_MASK;
2297         policy->l_extent.end |= ~CFS_PAGE_MASK;
2298
2299         /*
2300          * kms is not valid when either object is completely fresh (so that no
2301          * locks are cached), or object was evicted. In the latter case cached
2302          * lock cannot be used, because it would prime inode state with
2303          * potentially stale LVB.
2304          */
2305         if (!kms_valid)
2306                 goto no_match;
2307
2308         /* Next, search for already existing extent locks that will cover us */
2309         /* If we're trying to read, we also search for an existing PW lock.  The
2310          * VFS and page cache already protect us locally, so lots of readers/
2311          * writers can share a single PW lock.
2312          *
2313          * There are problems with conversion deadlocks, so instead of
2314          * converting a read lock to a write lock, we'll just enqueue a new
2315          * one.
2316          *
2317          * At some point we should cancel the read lock instead of making them
2318          * send us a blocking callback, but there are problems with canceling
2319          * locks out from other users right now, too. */
2320         mode = einfo->ei_mode;
2321         if (einfo->ei_mode == LCK_PR)
2322                 mode |= LCK_PW;
2323         mode = ldlm_lock_match(obd->obd_namespace, *flags | match_lvb, res_id,
2324                                einfo->ei_type, policy, mode, lockh, 0);
2325         if (mode) {
2326                 struct ldlm_lock *matched = ldlm_handle2lock(lockh);
2327
2328                 if ((agl != 0) && !ldlm_is_lvb_ready(matched)) {
2329                         /* For AGL, if enqueue RPC is sent but the lock is not
2330                          * granted, then skip to process this strpe.
2331                          * Return -ECANCELED to tell the caller. */
2332                         ldlm_lock_decref(lockh, mode);
2333                         LDLM_LOCK_PUT(matched);
2334                         RETURN(-ECANCELED);
2335                 } else if (osc_set_lock_data_with_check(matched, einfo)) {
2336                         *flags |= LDLM_FL_LVB_READY;
2337                         /* addref the lock only if not async requests and PW
2338                          * lock is matched whereas we asked for PR. */
2339                         if (!rqset && einfo->ei_mode != mode)
2340                                 ldlm_lock_addref(lockh, LCK_PR);
2341                         if (intent) {
2342                                 /* I would like to be able to ASSERT here that
2343                                  * rss <= kms, but I can't, for reasons which
2344                                  * are explained in lov_enqueue() */
2345                         }
2346
2347                         /* We already have a lock, and it's referenced.
2348                          *
2349                          * At this point, the cl_lock::cll_state is CLS_QUEUING,
2350                          * AGL upcall may change it to CLS_HELD directly. */
2351                         (*upcall)(cookie, ELDLM_OK);
2352
2353                         if (einfo->ei_mode != mode)
2354                                 ldlm_lock_decref(lockh, LCK_PW);
2355                         else if (rqset)
2356                                 /* For async requests, decref the lock. */
2357                                 ldlm_lock_decref(lockh, einfo->ei_mode);
2358                         LDLM_LOCK_PUT(matched);
2359                         RETURN(ELDLM_OK);
2360                 } else {
2361                         ldlm_lock_decref(lockh, mode);
2362                         LDLM_LOCK_PUT(matched);
2363                 }
2364         }
2365
2366  no_match:
2367         if (intent) {
2368                 req = ptlrpc_request_alloc(class_exp2cliimp(exp),
2369                                            &RQF_LDLM_ENQUEUE_LVB);
2370                 if (req == NULL)
2371                         RETURN(-ENOMEM);
2372
2373                 rc = ptlrpc_request_pack(req, LUSTRE_DLM_VERSION, LDLM_ENQUEUE);
2374                 if (rc < 0) {
2375                         ptlrpc_request_free(req);
2376                         RETURN(rc);
2377                 }
2378
2379                 req_capsule_set_size(&req->rq_pill, &RMF_DLM_LVB, RCL_SERVER,
2380                                      sizeof *lvb);
2381                 ptlrpc_request_set_replen(req);
2382         }
2383
2384         /* users of osc_enqueue() can pass this flag for ldlm_lock_match() */
2385         *flags &= ~LDLM_FL_BLOCK_GRANTED;
2386
2387         rc = ldlm_cli_enqueue(exp, &req, einfo, res_id, policy, flags, lvb,
2388                               sizeof(*lvb), LVB_T_OST, lockh, async);
2389         if (rqset) {
2390                 if (!rc) {
2391                         struct osc_enqueue_args *aa;
2392                         CLASSERT (sizeof(*aa) <= sizeof(req->rq_async_args));
2393                         aa = ptlrpc_req_async_args(req);
2394                         aa->oa_ei = einfo;
2395                         aa->oa_exp = exp;
2396                         aa->oa_flags  = flags;
2397                         aa->oa_upcall = upcall;
2398                         aa->oa_cookie = cookie;
2399                         aa->oa_lvb    = lvb;
2400                         aa->oa_lockh  = lockh;
2401                         aa->oa_agl    = !!agl;
2402
2403                         req->rq_interpret_reply =
2404                                 (ptlrpc_interpterer_t)osc_enqueue_interpret;
2405                         if (rqset == PTLRPCD_SET)
2406                                 ptlrpcd_add_req(req, PDL_POLICY_ROUND, -1);
2407                         else
2408                                 ptlrpc_set_add_req(rqset, req);
2409                 } else if (intent) {
2410                         ptlrpc_req_finished(req);
2411                 }
2412                 RETURN(rc);
2413         }
2414
2415         rc = osc_enqueue_fini(req, lvb, upcall, cookie, flags, agl, rc);
2416         if (intent)
2417                 ptlrpc_req_finished(req);
2418
2419         RETURN(rc);
2420 }
2421
2422 int osc_match_base(struct obd_export *exp, struct ldlm_res_id *res_id,
2423                    __u32 type, ldlm_policy_data_t *policy, __u32 mode,
2424                    __u64 *flags, void *data, struct lustre_handle *lockh,
2425                    int unref)
2426 {
2427         struct obd_device *obd = exp->exp_obd;
2428         __u64 lflags = *flags;
2429         ldlm_mode_t rc;
2430         ENTRY;
2431
2432         if (OBD_FAIL_CHECK(OBD_FAIL_OSC_MATCH))
2433                 RETURN(-EIO);
2434
2435         /* Filesystem lock extents are extended to page boundaries so that
2436          * dealing with the page cache is a little smoother */
2437         policy->l_extent.start -= policy->l_extent.start & ~CFS_PAGE_MASK;
2438         policy->l_extent.end |= ~CFS_PAGE_MASK;
2439
2440         /* Next, search for already existing extent locks that will cover us */
2441         /* If we're trying to read, we also search for an existing PW lock.  The
2442          * VFS and page cache already protect us locally, so lots of readers/
2443          * writers can share a single PW lock. */
2444         rc = mode;
2445         if (mode == LCK_PR)
2446                 rc |= LCK_PW;
2447         rc = ldlm_lock_match(obd->obd_namespace, lflags,
2448                              res_id, type, policy, rc, lockh, unref);
2449         if (rc) {
2450                 if (data != NULL) {
2451                         if (!osc_set_data_with_check(lockh, data)) {
2452                                 if (!(lflags & LDLM_FL_TEST_LOCK))
2453                                         ldlm_lock_decref(lockh, rc);
2454                                 RETURN(0);
2455                         }
2456                 }
2457                 if (!(lflags & LDLM_FL_TEST_LOCK) && mode != rc) {
2458                         ldlm_lock_addref(lockh, LCK_PR);
2459                         ldlm_lock_decref(lockh, LCK_PW);
2460                 }
2461                 RETURN(rc);
2462         }
2463         RETURN(rc);
2464 }
2465
2466 int osc_cancel_base(struct lustre_handle *lockh, __u32 mode)
2467 {
2468         ENTRY;
2469
2470         if (unlikely(mode == LCK_GROUP))
2471                 ldlm_lock_decref_and_cancel(lockh, mode);
2472         else
2473                 ldlm_lock_decref(lockh, mode);
2474
2475         RETURN(0);
2476 }
2477
2478 static int osc_statfs_interpret(const struct lu_env *env,
2479                                 struct ptlrpc_request *req,
2480                                 struct osc_async_args *aa, int rc)
2481 {
2482         struct obd_statfs *msfs;
2483         ENTRY;
2484
2485         if (rc == -EBADR)
2486                 /* The request has in fact never been sent
2487                  * due to issues at a higher level (LOV).
2488                  * Exit immediately since the caller is
2489                  * aware of the problem and takes care
2490                  * of the clean up */
2491                  RETURN(rc);
2492
2493         if ((rc == -ENOTCONN || rc == -EAGAIN) &&
2494             (aa->aa_oi->oi_flags & OBD_STATFS_NODELAY))
2495                 GOTO(out, rc = 0);
2496
2497         if (rc != 0)
2498                 GOTO(out, rc);
2499
2500         msfs = req_capsule_server_get(&req->rq_pill, &RMF_OBD_STATFS);
2501         if (msfs == NULL) {
2502                 GOTO(out, rc = -EPROTO);
2503         }
2504
2505         *aa->aa_oi->oi_osfs = *msfs;
2506 out:
2507         rc = aa->aa_oi->oi_cb_up(aa->aa_oi, rc);
2508         RETURN(rc);
2509 }
2510
2511 static int osc_statfs_async(struct obd_export *exp,
2512                             struct obd_info *oinfo, __u64 max_age,
2513                             struct ptlrpc_request_set *rqset)
2514 {
2515         struct obd_device     *obd = class_exp2obd(exp);
2516         struct ptlrpc_request *req;
2517         struct osc_async_args *aa;
2518         int                    rc;
2519         ENTRY;
2520
2521         /* We could possibly pass max_age in the request (as an absolute
2522          * timestamp or a "seconds.usec ago") so the target can avoid doing
2523          * extra calls into the filesystem if that isn't necessary (e.g.
2524          * during mount that would help a bit).  Having relative timestamps
2525          * is not so great if request processing is slow, while absolute
2526          * timestamps are not ideal because they need time synchronization. */
2527         req = ptlrpc_request_alloc(obd->u.cli.cl_import, &RQF_OST_STATFS);
2528         if (req == NULL)
2529                 RETURN(-ENOMEM);
2530
2531         rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, OST_STATFS);
2532         if (rc) {
2533                 ptlrpc_request_free(req);
2534                 RETURN(rc);
2535         }
2536         ptlrpc_request_set_replen(req);
2537         req->rq_request_portal = OST_CREATE_PORTAL;
2538         ptlrpc_at_set_req_timeout(req);
2539
2540         if (oinfo->oi_flags & OBD_STATFS_NODELAY) {
2541                 /* procfs requests not want stat in wait for avoid deadlock */
2542                 req->rq_no_resend = 1;
2543                 req->rq_no_delay = 1;
2544         }
2545
2546         req->rq_interpret_reply = (ptlrpc_interpterer_t)osc_statfs_interpret;
2547         CLASSERT (sizeof(*aa) <= sizeof(req->rq_async_args));
2548         aa = ptlrpc_req_async_args(req);
2549         aa->aa_oi = oinfo;
2550
2551         ptlrpc_set_add_req(rqset, req);
2552         RETURN(0);
2553 }
2554
2555 static int osc_statfs(const struct lu_env *env, struct obd_export *exp,
2556                       struct obd_statfs *osfs, __u64 max_age, __u32 flags)
2557 {
2558         struct obd_device     *obd = class_exp2obd(exp);
2559         struct obd_statfs     *msfs;
2560         struct ptlrpc_request *req;
2561         struct obd_import     *imp = NULL;
2562         int rc;
2563         ENTRY;
2564
2565         /*Since the request might also come from lprocfs, so we need
2566          *sync this with client_disconnect_export Bug15684*/
2567         down_read(&obd->u.cli.cl_sem);
2568         if (obd->u.cli.cl_import)
2569                 imp = class_import_get(obd->u.cli.cl_import);
2570         up_read(&obd->u.cli.cl_sem);
2571         if (!imp)
2572                 RETURN(-ENODEV);
2573
2574         /* We could possibly pass max_age in the request (as an absolute
2575          * timestamp or a "seconds.usec ago") so the target can avoid doing
2576          * extra calls into the filesystem if that isn't necessary (e.g.
2577          * during mount that would help a bit).  Having relative timestamps
2578          * is not so great if request processing is slow, while absolute
2579          * timestamps are not ideal because they need time synchronization. */
2580         req = ptlrpc_request_alloc(imp, &RQF_OST_STATFS);
2581
2582         class_import_put(imp);
2583
2584         if (req == NULL)
2585                 RETURN(-ENOMEM);
2586
2587         rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, OST_STATFS);
2588         if (rc) {
2589                 ptlrpc_request_free(req);
2590                 RETURN(rc);
2591         }
2592         ptlrpc_request_set_replen(req);
2593         req->rq_request_portal = OST_CREATE_PORTAL;
2594         ptlrpc_at_set_req_timeout(req);
2595
2596         if (flags & OBD_STATFS_NODELAY) {
2597                 /* procfs requests not want stat in wait for avoid deadlock */
2598                 req->rq_no_resend = 1;
2599                 req->rq_no_delay = 1;
2600         }
2601
2602         rc = ptlrpc_queue_wait(req);
2603         if (rc)
2604                 GOTO(out, rc);
2605
2606         msfs = req_capsule_server_get(&req->rq_pill, &RMF_OBD_STATFS);
2607         if (msfs == NULL) {
2608                 GOTO(out, rc = -EPROTO);
2609         }
2610
2611         *osfs = *msfs;
2612
2613         EXIT;
2614  out:
2615         ptlrpc_req_finished(req);
2616         return rc;
2617 }
2618
2619 static int osc_iocontrol(unsigned int cmd, struct obd_export *exp, int len,
2620                          void *karg, void *uarg)
2621 {
2622         struct obd_device *obd = exp->exp_obd;
2623         struct obd_ioctl_data *data = karg;
2624         int err = 0;
2625         ENTRY;
2626
2627         if (!try_module_get(THIS_MODULE)) {
2628                 CERROR("%s: cannot get module '%s'\n", obd->obd_name,
2629                        module_name(THIS_MODULE));
2630                 return -EINVAL;
2631         }
2632         switch (cmd) {
2633         case OBD_IOC_CLIENT_RECOVER:
2634                 err = ptlrpc_recover_import(obd->u.cli.cl_import,
2635                                             data->ioc_inlbuf1, 0);
2636                 if (err > 0)
2637                         err = 0;
2638                 GOTO(out, err);
2639         case IOC_OSC_SET_ACTIVE:
2640                 err = ptlrpc_set_import_active(obd->u.cli.cl_import,
2641                                                data->ioc_offset);
2642                 GOTO(out, err);
2643         case OBD_IOC_POLL_QUOTACHECK:
2644                 err = osc_quota_poll_check(exp, (struct if_quotacheck *)karg);
2645                 GOTO(out, err);
2646         case OBD_IOC_PING_TARGET:
2647                 err = ptlrpc_obd_ping(obd);
2648                 GOTO(out, err);
2649         default:
2650                 CDEBUG(D_INODE, "unrecognised ioctl %#x by %s\n",
2651                        cmd, current_comm());
2652                 GOTO(out, err = -ENOTTY);
2653         }
2654 out:
2655         module_put(THIS_MODULE);
2656         return err;
2657 }
2658
2659 static int osc_get_info(const struct lu_env *env, struct obd_export *exp,
2660                         obd_count keylen, void *key, __u32 *vallen, void *val,
2661                         struct lov_stripe_md *lsm)
2662 {
2663         ENTRY;
2664         if (!vallen || !val)
2665                 RETURN(-EFAULT);
2666
2667         if (KEY_IS(KEY_LOCK_TO_STRIPE)) {
2668                 __u32 *stripe = val;
2669                 *vallen = sizeof(*stripe);
2670                 *stripe = 0;
2671                 RETURN(0);
2672         } else if (KEY_IS(KEY_LAST_ID)) {
2673                 struct ptlrpc_request *req;
2674                 obd_id                *reply;
2675                 char                  *tmp;
2676                 int                    rc;
2677
2678                 req = ptlrpc_request_alloc(class_exp2cliimp(exp),
2679                                            &RQF_OST_GET_INFO_LAST_ID);
2680                 if (req == NULL)
2681                         RETURN(-ENOMEM);
2682
2683                 req_capsule_set_size(&req->rq_pill, &RMF_SETINFO_KEY,
2684                                      RCL_CLIENT, keylen);
2685                 rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, OST_GET_INFO);
2686                 if (rc) {
2687                         ptlrpc_request_free(req);
2688                         RETURN(rc);
2689                 }
2690
2691                 tmp = req_capsule_client_get(&req->rq_pill, &RMF_SETINFO_KEY);
2692                 memcpy(tmp, key, keylen);
2693
2694                 req->rq_no_delay = req->rq_no_resend = 1;
2695                 ptlrpc_request_set_replen(req);
2696                 rc = ptlrpc_queue_wait(req);
2697                 if (rc)
2698                         GOTO(out, rc);
2699
2700                 reply = req_capsule_server_get(&req->rq_pill, &RMF_OBD_ID);
2701                 if (reply == NULL)
2702                         GOTO(out, rc = -EPROTO);
2703
2704                 *((obd_id *)val) = *reply;
2705         out:
2706                 ptlrpc_req_finished(req);
2707                 RETURN(rc);
2708         } else if (KEY_IS(KEY_FIEMAP)) {
2709                 struct ll_fiemap_info_key *fm_key =
2710                                 (struct ll_fiemap_info_key *)key;
2711                 struct ldlm_res_id       res_id;
2712                 ldlm_policy_data_t       policy;
2713                 struct lustre_handle     lockh;
2714                 ldlm_mode_t              mode = 0;
2715                 struct ptlrpc_request   *req;
2716                 struct ll_user_fiemap   *reply;
2717                 char                    *tmp;
2718                 int                      rc;
2719
2720                 if (!(fm_key->fiemap.fm_flags & FIEMAP_FLAG_SYNC))
2721                         goto skip_locking;
2722
2723                 policy.l_extent.start = fm_key->fiemap.fm_start &
2724                                                 CFS_PAGE_MASK;
2725
2726                 if (OBD_OBJECT_EOF - fm_key->fiemap.fm_length <=
2727                     fm_key->fiemap.fm_start + PAGE_CACHE_SIZE - 1)
2728                         policy.l_extent.end = OBD_OBJECT_EOF;
2729                 else
2730                         policy.l_extent.end = (fm_key->fiemap.fm_start +
2731                                 fm_key->fiemap.fm_length +
2732                                 PAGE_CACHE_SIZE - 1) & CFS_PAGE_MASK;
2733
2734                 ostid_build_res_name(&fm_key->oa.o_oi, &res_id);
2735                 mode = ldlm_lock_match(exp->exp_obd->obd_namespace,
2736                                        LDLM_FL_BLOCK_GRANTED |
2737                                        LDLM_FL_LVB_READY,
2738                                        &res_id, LDLM_EXTENT, &policy,
2739                                        LCK_PR | LCK_PW, &lockh, 0);
2740                 if (mode) { /* lock is cached on client */
2741                         if (mode != LCK_PR) {
2742                                 ldlm_lock_addref(&lockh, LCK_PR);
2743                                 ldlm_lock_decref(&lockh, LCK_PW);
2744                         }
2745                 } else { /* no cached lock, needs acquire lock on server side */
2746                         fm_key->oa.o_valid |= OBD_MD_FLFLAGS;
2747                         fm_key->oa.o_flags |= OBD_FL_SRVLOCK;
2748                 }
2749
2750 skip_locking:
2751                 req = ptlrpc_request_alloc(class_exp2cliimp(exp),
2752                                            &RQF_OST_GET_INFO_FIEMAP);
2753                 if (req == NULL)
2754                         GOTO(drop_lock, rc = -ENOMEM);
2755
2756                 req_capsule_set_size(&req->rq_pill, &RMF_FIEMAP_KEY,
2757                                      RCL_CLIENT, keylen);
2758                 req_capsule_set_size(&req->rq_pill, &RMF_FIEMAP_VAL,
2759                                      RCL_CLIENT, *vallen);
2760                 req_capsule_set_size(&req->rq_pill, &RMF_FIEMAP_VAL,
2761                                      RCL_SERVER, *vallen);
2762
2763                 rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, OST_GET_INFO);
2764                 if (rc) {
2765                         ptlrpc_request_free(req);
2766                         GOTO(drop_lock, rc);
2767                 }
2768
2769                 tmp = req_capsule_client_get(&req->rq_pill, &RMF_FIEMAP_KEY);
2770                 memcpy(tmp, key, keylen);
2771                 tmp = req_capsule_client_get(&req->rq_pill, &RMF_FIEMAP_VAL);
2772                 memcpy(tmp, val, *vallen);
2773
2774                 ptlrpc_request_set_replen(req);
2775                 rc = ptlrpc_queue_wait(req);
2776                 if (rc)
2777                         GOTO(fini_req, rc);
2778
2779                 reply = req_capsule_server_get(&req->rq_pill, &RMF_FIEMAP_VAL);
2780                 if (reply == NULL)
2781                         GOTO(fini_req, rc = -EPROTO);
2782
2783                 memcpy(val, reply, *vallen);
2784 fini_req:
2785                 ptlrpc_req_finished(req);
2786 drop_lock:
2787                 if (mode)
2788                         ldlm_lock_decref(&lockh, LCK_PR);
2789                 RETURN(rc);
2790         }
2791
2792         RETURN(-EINVAL);
2793 }
2794
2795 static int osc_set_info_async(const struct lu_env *env, struct obd_export *exp,
2796                               obd_count keylen, void *key, obd_count vallen,
2797                               void *val, struct ptlrpc_request_set *set)
2798 {
2799         struct ptlrpc_request *req;
2800         struct obd_device     *obd = exp->exp_obd;
2801         struct obd_import     *imp = class_exp2cliimp(exp);
2802         char                  *tmp;
2803         int                    rc;
2804         ENTRY;
2805
2806         OBD_FAIL_TIMEOUT(OBD_FAIL_OSC_SHUTDOWN, 10);
2807
2808         if (KEY_IS(KEY_CHECKSUM)) {
2809                 if (vallen != sizeof(int))
2810                         RETURN(-EINVAL);
2811                 exp->exp_obd->u.cli.cl_checksum = (*(int *)val) ? 1 : 0;
2812                 RETURN(0);
2813         }
2814
2815         if (KEY_IS(KEY_SPTLRPC_CONF)) {
2816                 sptlrpc_conf_client_adapt(obd);
2817                 RETURN(0);
2818         }
2819
2820         if (KEY_IS(KEY_FLUSH_CTX)) {
2821                 sptlrpc_import_flush_my_ctx(imp);
2822                 RETURN(0);
2823         }
2824
2825         if (KEY_IS(KEY_CACHE_SET)) {
2826                 struct client_obd *cli = &obd->u.cli;
2827
2828                 LASSERT(cli->cl_cache == NULL); /* only once */
2829                 cli->cl_cache = (struct cl_client_cache *)val;
2830                 atomic_inc(&cli->cl_cache->ccc_users);
2831                 cli->cl_lru_left = &cli->cl_cache->ccc_lru_left;
2832
2833                 /* add this osc into entity list */
2834                 LASSERT(list_empty(&cli->cl_lru_osc));
2835                 spin_lock(&cli->cl_cache->ccc_lru_lock);
2836                 list_add(&cli->cl_lru_osc, &cli->cl_cache->ccc_lru);
2837                 spin_unlock(&cli->cl_cache->ccc_lru_lock);
2838
2839                 RETURN(0);
2840         }
2841
2842         if (KEY_IS(KEY_CACHE_LRU_SHRINK)) {
2843                 struct client_obd *cli = &obd->u.cli;
2844                 int nr = atomic_read(&cli->cl_lru_in_list) >> 1;
2845                 int target = *(int *)val;
2846
2847                 nr = osc_lru_shrink(env, cli, min(nr, target), true);
2848                 *(int *)val -= nr;
2849                 RETURN(0);
2850         }
2851
2852         if (!set && !KEY_IS(KEY_GRANT_SHRINK))
2853                 RETURN(-EINVAL);
2854
2855         /* We pass all other commands directly to OST. Since nobody calls osc
2856            methods directly and everybody is supposed to go through LOV, we
2857            assume lov checked invalid values for us.
2858            The only recognised values so far are evict_by_nid and mds_conn.
2859            Even if something bad goes through, we'd get a -EINVAL from OST
2860            anyway. */
2861
2862         req = ptlrpc_request_alloc(imp, KEY_IS(KEY_GRANT_SHRINK) ?
2863                                                 &RQF_OST_SET_GRANT_INFO :
2864                                                 &RQF_OBD_SET_INFO);
2865         if (req == NULL)
2866                 RETURN(-ENOMEM);
2867
2868         req_capsule_set_size(&req->rq_pill, &RMF_SETINFO_KEY,
2869                              RCL_CLIENT, keylen);
2870         if (!KEY_IS(KEY_GRANT_SHRINK))
2871                 req_capsule_set_size(&req->rq_pill, &RMF_SETINFO_VAL,
2872                                      RCL_CLIENT, vallen);
2873         rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, OST_SET_INFO);
2874         if (rc) {
2875                 ptlrpc_request_free(req);
2876                 RETURN(rc);
2877         }
2878
2879         tmp = req_capsule_client_get(&req->rq_pill, &RMF_SETINFO_KEY);
2880         memcpy(tmp, key, keylen);
2881         tmp = req_capsule_client_get(&req->rq_pill, KEY_IS(KEY_GRANT_SHRINK) ?
2882                                                         &RMF_OST_BODY :
2883                                                         &RMF_SETINFO_VAL);
2884         memcpy(tmp, val, vallen);
2885
2886         if (KEY_IS(KEY_GRANT_SHRINK)) {
2887                 struct osc_grant_args *aa;
2888                 struct obdo *oa;
2889
2890                 CLASSERT(sizeof(*aa) <= sizeof(req->rq_async_args));
2891                 aa = ptlrpc_req_async_args(req);
2892                 OBDO_ALLOC(oa);
2893                 if (!oa) {
2894                         ptlrpc_req_finished(req);
2895                         RETURN(-ENOMEM);
2896                 }
2897                 *oa = ((struct ost_body *)val)->oa;
2898                 aa->aa_oa = oa;
2899                 req->rq_interpret_reply = osc_shrink_grant_interpret;
2900         }
2901
2902         ptlrpc_request_set_replen(req);
2903         if (!KEY_IS(KEY_GRANT_SHRINK)) {
2904                 LASSERT(set != NULL);
2905                 ptlrpc_set_add_req(set, req);
2906                 ptlrpc_check_set(NULL, set);
2907         } else
2908                 ptlrpcd_add_req(req, PDL_POLICY_ROUND, -1);
2909
2910         RETURN(0);
2911 }
2912
2913 static int osc_reconnect(const struct lu_env *env,
2914                          struct obd_export *exp, struct obd_device *obd,
2915                          struct obd_uuid *cluuid,
2916                          struct obd_connect_data *data,
2917                          void *localdata)
2918 {
2919         struct client_obd *cli = &obd->u.cli;
2920
2921         if (data != NULL && (data->ocd_connect_flags & OBD_CONNECT_GRANT)) {
2922                 long lost_grant;
2923
2924                 client_obd_list_lock(&cli->cl_loi_list_lock);
2925                 data->ocd_grant = (cli->cl_avail_grant +
2926                                   (cli->cl_dirty_pages << PAGE_CACHE_SHIFT)) ?:
2927                                   2 * cli_brw_size(obd);
2928                 lost_grant = cli->cl_lost_grant;
2929                 cli->cl_lost_grant = 0;
2930                 client_obd_list_unlock(&cli->cl_loi_list_lock);
2931
2932                 CDEBUG(D_RPCTRACE, "ocd_connect_flags: "LPX64" ocd_version: %d"
2933                        " ocd_grant: %d, lost: %ld.\n", data->ocd_connect_flags,
2934                        data->ocd_version, data->ocd_grant, lost_grant);
2935         }
2936
2937         RETURN(0);
2938 }
2939
2940 static int osc_disconnect(struct obd_export *exp)
2941 {
2942         struct obd_device *obd = class_exp2obd(exp);
2943         struct llog_ctxt  *ctxt;
2944         int rc;
2945
2946         ctxt = llog_get_context(obd, LLOG_SIZE_REPL_CTXT);
2947         if (ctxt) {
2948                 if (obd->u.cli.cl_conn_count == 1) {
2949                         /* Flush any remaining cancel messages out to the
2950                          * target */
2951                         llog_sync(ctxt, exp, 0);
2952                 }
2953                 llog_ctxt_put(ctxt);
2954         } else {
2955                 CDEBUG(D_HA, "No LLOG_SIZE_REPL_CTXT found in obd %p\n",
2956                        obd);
2957         }
2958
2959         rc = client_disconnect_export(exp);
2960         /**
2961          * Initially we put del_shrink_grant before disconnect_export, but it
2962          * causes the following problem if setup (connect) and cleanup
2963          * (disconnect) are tangled together.
2964          *      connect p1                     disconnect p2
2965          *   ptlrpc_connect_import
2966          *     ...............               class_manual_cleanup
2967          *                                     osc_disconnect
2968          *                                     del_shrink_grant
2969          *   ptlrpc_connect_interrupt
2970          *     init_grant_shrink
2971          *   add this client to shrink list
2972          *                                      cleanup_osc
2973          * Bang! pinger trigger the shrink.
2974          * So the osc should be disconnected from the shrink list, after we
2975          * are sure the import has been destroyed. BUG18662
2976          */
2977         if (obd->u.cli.cl_import == NULL)
2978                 osc_del_shrink_grant(&obd->u.cli);
2979         return rc;
2980 }
2981
2982 static int osc_import_event(struct obd_device *obd,
2983                             struct obd_import *imp,
2984                             enum obd_import_event event)
2985 {
2986         struct client_obd *cli;
2987         int rc = 0;
2988
2989         ENTRY;
2990         LASSERT(imp->imp_obd == obd);
2991
2992         switch (event) {
2993         case IMP_EVENT_DISCON: {
2994                 cli = &obd->u.cli;
2995                 client_obd_list_lock(&cli->cl_loi_list_lock);
2996                 cli->cl_avail_grant = 0;
2997                 cli->cl_lost_grant = 0;
2998                 client_obd_list_unlock(&cli->cl_loi_list_lock);
2999                 break;
3000         }
3001         case IMP_EVENT_INACTIVE: {
3002                 rc = obd_notify_observer(obd, obd, OBD_NOTIFY_INACTIVE, NULL);
3003                 break;
3004         }
3005         case IMP_EVENT_INVALIDATE: {
3006                 struct ldlm_namespace *ns = obd->obd_namespace;
3007                 struct lu_env         *env;
3008                 int                    refcheck;
3009
3010                 env = cl_env_get(&refcheck);
3011                 if (!IS_ERR(env)) {
3012                         /* Reset grants */
3013                         cli = &obd->u.cli;
3014                         /* all pages go to failing rpcs due to the invalid
3015                          * import */
3016                         osc_io_unplug(env, cli, NULL, PDL_POLICY_ROUND);
3017
3018                         ldlm_namespace_cleanup(ns, LDLM_FL_LOCAL_ONLY);
3019                         cl_env_put(env, &refcheck);
3020                 } else
3021                         rc = PTR_ERR(env);
3022                 break;
3023         }
3024         case IMP_EVENT_ACTIVE: {
3025                 rc = obd_notify_observer(obd, obd, OBD_NOTIFY_ACTIVE, NULL);
3026                 break;
3027         }
3028         case IMP_EVENT_OCD: {
3029                 struct obd_connect_data *ocd = &imp->imp_connect_data;
3030
3031                 if (ocd->ocd_connect_flags & OBD_CONNECT_GRANT)
3032                         osc_init_grant(&obd->u.cli, ocd);
3033
3034                 /* See bug 7198 */
3035                 if (ocd->ocd_connect_flags & OBD_CONNECT_REQPORTAL)
3036                         imp->imp_client->cli_request_portal =OST_REQUEST_PORTAL;
3037
3038                 rc = obd_notify_observer(obd, obd, OBD_NOTIFY_OCD, NULL);
3039                 break;
3040         }
3041         case IMP_EVENT_DEACTIVATE: {
3042                 rc = obd_notify_observer(obd, obd, OBD_NOTIFY_DEACTIVATE, NULL);
3043                 break;
3044         }
3045         case IMP_EVENT_ACTIVATE: {
3046                 rc = obd_notify_observer(obd, obd, OBD_NOTIFY_ACTIVATE, NULL);
3047                 break;
3048         }
3049         default:
3050                 CERROR("Unknown import event %d\n", event);
3051                 LBUG();
3052         }
3053         RETURN(rc);
3054 }
3055
3056 /**
3057  * Determine whether the lock can be canceled before replaying the lock
3058  * during recovery, see bug16774 for detailed information.
3059  *
3060  * \retval zero the lock can't be canceled
3061  * \retval other ok to cancel
3062  */
3063 static int osc_cancel_weight(struct ldlm_lock *lock)
3064 {
3065         /*
3066          * Cancel all unused and granted extent lock.
3067          */
3068         if (lock->l_resource->lr_type == LDLM_EXTENT &&
3069             lock->l_granted_mode == lock->l_req_mode &&
3070             osc_ldlm_weigh_ast(lock) == 0)
3071                 RETURN(1);
3072
3073         RETURN(0);
3074 }
3075
3076 static int brw_queue_work(const struct lu_env *env, void *data)
3077 {
3078         struct client_obd *cli = data;
3079
3080         CDEBUG(D_CACHE, "Run writeback work for client obd %p.\n", cli);
3081
3082         osc_io_unplug(env, cli, NULL, PDL_POLICY_SAME);
3083         RETURN(0);
3084 }
3085
3086 int osc_setup(struct obd_device *obd, struct lustre_cfg *lcfg)
3087 {
3088         struct client_obd *cli = &obd->u.cli;
3089         struct obd_type   *type;
3090         void              *handler;
3091         int                rc;
3092         ENTRY;
3093
3094         rc = ptlrpcd_addref();
3095         if (rc)
3096                 RETURN(rc);
3097
3098         rc = client_obd_setup(obd, lcfg);
3099         if (rc)
3100                 GOTO(out_ptlrpcd, rc);
3101
3102         handler = ptlrpcd_alloc_work(cli->cl_import, brw_queue_work, cli);
3103         if (IS_ERR(handler))
3104                 GOTO(out_client_setup, rc = PTR_ERR(handler));
3105         cli->cl_writeback_work = handler;
3106
3107         handler = ptlrpcd_alloc_work(cli->cl_import, lru_queue_work, cli);
3108         if (IS_ERR(handler))
3109                 GOTO(out_ptlrpcd_work, rc = PTR_ERR(handler));
3110         cli->cl_lru_work = handler;
3111
3112         rc = osc_quota_setup(obd);
3113         if (rc)
3114                 GOTO(out_ptlrpcd_work, rc);
3115
3116         cli->cl_grant_shrink_interval = GRANT_SHRINK_INTERVAL;
3117
3118 #ifdef LPROCFS
3119         obd->obd_vars = lprocfs_osc_obd_vars;
3120 #endif
3121         /* If this is true then both client (osc) and server (osp) are on the
3122          * same node. The osp layer if loaded first will register the osc proc
3123          * directory. In that case this obd_device will be attached its proc
3124          * tree to type->typ_procsym instead of obd->obd_type->typ_procroot. */
3125         type = class_search_type(LUSTRE_OSP_NAME);
3126         if (type && type->typ_procsym) {
3127                 obd->obd_proc_entry = lprocfs_seq_register(obd->obd_name,
3128                                                            type->typ_procsym,
3129                                                            obd->obd_vars, obd);
3130                 if (IS_ERR(obd->obd_proc_entry)) {
3131                         rc = PTR_ERR(obd->obd_proc_entry);
3132                         CERROR("error %d setting up lprocfs for %s\n", rc,
3133                                obd->obd_name);
3134                         obd->obd_proc_entry = NULL;
3135                 }
3136         } else {
3137                 rc = lprocfs_seq_obd_setup(obd);
3138         }
3139
3140         /* If the basic OSC proc tree construction succeeded then
3141          * lets do the rest. */
3142         if (rc == 0) {
3143                 lproc_osc_attach_seqstat(obd);
3144                 sptlrpc_lprocfs_cliobd_attach(obd);
3145                 ptlrpc_lprocfs_register_obd(obd);
3146         }
3147
3148         /* We need to allocate a few requests more, because
3149          * brw_interpret tries to create new requests before freeing
3150          * previous ones, Ideally we want to have 2x max_rpcs_in_flight
3151          * reserved, but I'm afraid that might be too much wasted RAM
3152          * in fact, so 2 is just my guess and still should work. */
3153         cli->cl_import->imp_rq_pool =
3154                 ptlrpc_init_rq_pool(cli->cl_max_rpcs_in_flight + 2,
3155                                     OST_MAXREQSIZE,
3156                                     ptlrpc_add_rqs_to_pool);
3157
3158         INIT_LIST_HEAD(&cli->cl_grant_shrink_list);
3159         ns_register_cancel(obd->obd_namespace, osc_cancel_weight);
3160         RETURN(0);
3161
3162 out_ptlrpcd_work:
3163         if (cli->cl_writeback_work != NULL) {
3164                 ptlrpcd_destroy_work(cli->cl_writeback_work);
3165                 cli->cl_writeback_work = NULL;
3166         }
3167         if (cli->cl_lru_work != NULL) {
3168                 ptlrpcd_destroy_work(cli->cl_lru_work);
3169                 cli->cl_lru_work = NULL;
3170         }
3171 out_client_setup:
3172         client_obd_cleanup(obd);
3173 out_ptlrpcd:
3174         ptlrpcd_decref();
3175         RETURN(rc);
3176 }
3177
3178 static int osc_precleanup(struct obd_device *obd, enum obd_cleanup_stage stage)
3179 {
3180         int rc = 0;
3181         ENTRY;
3182
3183         switch (stage) {
3184         case OBD_CLEANUP_EARLY: {
3185                 struct obd_import *imp;
3186                 imp = obd->u.cli.cl_import;
3187                 CDEBUG(D_HA, "Deactivating import %s\n", obd->obd_name);
3188                 /* ptlrpc_abort_inflight to stop an mds_lov_synchronize */
3189                 ptlrpc_deactivate_import(imp);
3190                 spin_lock(&imp->imp_lock);
3191                 imp->imp_pingable = 0;
3192                 spin_unlock(&imp->imp_lock);
3193                 break;
3194         }
3195         case OBD_CLEANUP_EXPORTS: {
3196                 struct client_obd *cli = &obd->u.cli;
3197                 /* LU-464
3198                  * for echo client, export may be on zombie list, wait for
3199                  * zombie thread to cull it, because cli.cl_import will be
3200                  * cleared in client_disconnect_export():
3201                  *   class_export_destroy() -> obd_cleanup() ->
3202                  *   echo_device_free() -> echo_client_cleanup() ->
3203                  *   obd_disconnect() -> osc_disconnect() ->
3204                  *   client_disconnect_export()
3205                  */
3206                 obd_zombie_barrier();
3207                 if (cli->cl_writeback_work) {
3208                         ptlrpcd_destroy_work(cli->cl_writeback_work);
3209                         cli->cl_writeback_work = NULL;
3210                 }
3211                 if (cli->cl_lru_work) {
3212                         ptlrpcd_destroy_work(cli->cl_lru_work);
3213                         cli->cl_lru_work = NULL;
3214                 }
3215                 obd_cleanup_client_import(obd);
3216                 ptlrpc_lprocfs_unregister_obd(obd);
3217                 lprocfs_obd_cleanup(obd);
3218                 rc = obd_llog_finish(obd, 0);
3219                 if (rc != 0)
3220                         CERROR("failed to cleanup llogging subsystems\n");
3221                 break;
3222                 }
3223         }
3224         RETURN(rc);
3225 }
3226
3227 int osc_cleanup(struct obd_device *obd)
3228 {
3229         struct client_obd *cli = &obd->u.cli;
3230         int rc;
3231
3232         ENTRY;
3233
3234         /* lru cleanup */
3235         if (cli->cl_cache != NULL) {
3236                 LASSERT(atomic_read(&cli->cl_cache->ccc_users) > 0);
3237                 spin_lock(&cli->cl_cache->ccc_lru_lock);
3238                 list_del_init(&cli->cl_lru_osc);
3239                 spin_unlock(&cli->cl_cache->ccc_lru_lock);
3240                 cli->cl_lru_left = NULL;
3241                 atomic_dec(&cli->cl_cache->ccc_users);
3242                 cli->cl_cache = NULL;
3243         }
3244
3245         /* free memory of osc quota cache */
3246         osc_quota_cleanup(obd);
3247
3248         rc = client_obd_cleanup(obd);
3249
3250         ptlrpcd_decref();
3251         RETURN(rc);
3252 }
3253
3254 int osc_process_config_base(struct obd_device *obd, struct lustre_cfg *lcfg)
3255 {
3256         int rc = class_process_proc_seq_param(PARAM_OSC, obd->obd_vars,
3257                                               lcfg, obd);
3258         return rc > 0 ? 0: rc;
3259 }
3260
3261 static int osc_process_config(struct obd_device *obd, obd_count len, void *buf)
3262 {
3263         return osc_process_config_base(obd, buf);
3264 }
3265
3266 struct obd_ops osc_obd_ops = {
3267         .o_owner                = THIS_MODULE,
3268         .o_setup                = osc_setup,
3269         .o_precleanup           = osc_precleanup,
3270         .o_cleanup              = osc_cleanup,
3271         .o_add_conn             = client_import_add_conn,
3272         .o_del_conn             = client_import_del_conn,
3273         .o_connect              = client_connect_import,
3274         .o_reconnect            = osc_reconnect,
3275         .o_disconnect           = osc_disconnect,
3276         .o_statfs               = osc_statfs,
3277         .o_statfs_async         = osc_statfs_async,
3278         .o_unpackmd             = osc_unpackmd,
3279         .o_create               = osc_create,
3280         .o_destroy              = osc_destroy,
3281         .o_getattr              = osc_getattr,
3282         .o_getattr_async        = osc_getattr_async,
3283         .o_setattr              = osc_setattr,
3284         .o_setattr_async        = osc_setattr_async,
3285         .o_change_cbdata        = osc_change_cbdata,
3286         .o_find_cbdata          = osc_find_cbdata,
3287         .o_iocontrol            = osc_iocontrol,
3288         .o_get_info             = osc_get_info,
3289         .o_set_info_async       = osc_set_info_async,
3290         .o_import_event         = osc_import_event,
3291         .o_process_config       = osc_process_config,
3292         .o_quotactl             = osc_quotactl,
3293         .o_quotacheck           = osc_quotacheck,
3294 };
3295
3296 extern struct lu_kmem_descr osc_caches[];
3297 extern spinlock_t osc_ast_guard;
3298 extern struct lock_class_key osc_ast_guard_class;
3299
3300 int __init osc_init(void)
3301 {
3302         bool enable_proc = true;
3303         struct obd_type *type;
3304         int rc;
3305         ENTRY;
3306
3307         /* print an address of _any_ initialized kernel symbol from this
3308          * module, to allow debugging with gdb that doesn't support data
3309          * symbols from modules.*/
3310         CDEBUG(D_INFO, "Lustre OSC module (%p).\n", &osc_caches);
3311
3312         rc = lu_kmem_init(osc_caches);
3313         if (rc)
3314                 RETURN(rc);
3315
3316         type = class_search_type(LUSTRE_OSP_NAME);
3317         if (type != NULL && type->typ_procsym != NULL)
3318                 enable_proc = false;
3319
3320         rc = class_register_type(&osc_obd_ops, NULL, enable_proc, NULL,
3321 #ifndef HAVE_ONLY_PROCFS_SEQ
3322                                  NULL,
3323 #endif
3324                                  LUSTRE_OSC_NAME, &osc_device_type);
3325         if (rc) {
3326                 lu_kmem_fini(osc_caches);
3327                 RETURN(rc);
3328         }
3329
3330         spin_lock_init(&osc_ast_guard);
3331         lockdep_set_class(&osc_ast_guard, &osc_ast_guard_class);
3332
3333         RETURN(rc);
3334 }
3335
3336 #ifdef __KERNEL__
3337 static void /*__exit*/ osc_exit(void)
3338 {
3339         class_unregister_type(LUSTRE_OSC_NAME);
3340         lu_kmem_fini(osc_caches);
3341 }
3342
3343 MODULE_AUTHOR("Sun Microsystems, Inc. <http://www.lustre.org/>");
3344 MODULE_DESCRIPTION("Lustre Object Storage Client (OSC)");
3345 MODULE_LICENSE("GPL");
3346
3347 cfs_module(osc, LUSTRE_VERSION_STRING, osc_init, osc_exit);
3348 #endif