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