Whamcloud - gitweb
Branch HEAD
[fs/lustre-release.git] / lustre / osc / osc_request.c
1 /* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*-
2  * vim:expandtab:shiftwidth=8:tabstop=8:
3  *
4  * GPL HEADER START
5  *
6  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
7  *
8  * This program is free software; you can redistribute it and/or modify
9  * it under the terms of the GNU General Public License version 2 only,
10  * as published by the Free Software Foundation.
11  *
12  * This program is distributed in the hope that it will be useful, but
13  * WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * General Public License version 2 for more details (a copy is included
16  * in the LICENSE file that accompanied this code).
17  *
18  * You should have received a copy of the GNU General Public License
19  * version 2 along with this program; If not, see
20  * http://www.sun.com/software/products/lustre/docs/GPLv2.pdf
21  *
22  * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
23  * CA 95054 USA or visit www.sun.com if you need additional information or
24  * have any questions.
25  *
26  * GPL HEADER END
27  */
28 /*
29  * Copyright  2008 Sun Microsystems, Inc. All rights reserved
30  * Use is subject to license terms.
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 #ifndef EXPORT_SYMTAB
38 # define EXPORT_SYMTAB
39 #endif
40 #define DEBUG_SUBSYSTEM S_OSC
41
42 #include <libcfs/libcfs.h>
43
44 #ifndef __KERNEL__
45 # include <liblustre.h>
46 #endif
47
48 #include <lustre_dlm.h>
49 #include <lustre_net.h>
50 #include <lustre/lustre_user.h>
51 #include <obd_cksum.h>
52 #include <obd_ost.h>
53 #include <obd_lov.h>
54
55 #ifdef  __CYGWIN__
56 # include <ctype.h>
57 #endif
58
59 #include <lustre_ha.h>
60 #include <lprocfs_status.h>
61 #include <lustre_log.h>
62 #include <lustre_debug.h>
63 #include <lustre_param.h>
64 #include "osc_internal.h"
65
66 static quota_interface_t *quota_interface = NULL;
67 extern quota_interface_t osc_quota_interface;
68
69 static void osc_release_ppga(struct brw_page **ppga, obd_count count);
70 static int brw_interpret(const struct lu_env *env,
71                          struct ptlrpc_request *req, void *data, int rc);
72 int osc_cleanup(struct obd_device *obd);
73
74 /* Pack OSC object metadata for disk storage (LE byte order). */
75 static int osc_packmd(struct obd_export *exp, struct lov_mds_md **lmmp,
76                       struct lov_stripe_md *lsm)
77 {
78         int lmm_size;
79         ENTRY;
80
81         lmm_size = sizeof(**lmmp);
82         if (!lmmp)
83                 RETURN(lmm_size);
84
85         if (*lmmp && !lsm) {
86                 OBD_FREE(*lmmp, lmm_size);
87                 *lmmp = NULL;
88                 RETURN(0);
89         }
90
91         if (!*lmmp) {
92                 OBD_ALLOC(*lmmp, lmm_size);
93                 if (!*lmmp)
94                         RETURN(-ENOMEM);
95         }
96
97         if (lsm) {
98                 LASSERT(lsm->lsm_object_id);
99                 LASSERT_MDS_GROUP(lsm->lsm_object_gr);
100                 (*lmmp)->lmm_object_id = cpu_to_le64(lsm->lsm_object_id);
101                 (*lmmp)->lmm_object_gr = cpu_to_le64(lsm->lsm_object_gr);
102         }
103
104         RETURN(lmm_size);
105 }
106
107 /* Unpack OSC object metadata from disk storage (LE byte order). */
108 static int osc_unpackmd(struct obd_export *exp, struct lov_stripe_md **lsmp,
109                         struct lov_mds_md *lmm, int lmm_bytes)
110 {
111         int lsm_size;
112         ENTRY;
113
114         if (lmm != NULL) {
115                 if (lmm_bytes < sizeof (*lmm)) {
116                         CERROR("lov_mds_md too small: %d, need %d\n",
117                                lmm_bytes, (int)sizeof(*lmm));
118                         RETURN(-EINVAL);
119                 }
120                 /* XXX LOV_MAGIC etc check? */
121
122                 if (lmm->lmm_object_id == 0) {
123                         CERROR("lov_mds_md: zero lmm_object_id\n");
124                         RETURN(-EINVAL);
125                 }
126         }
127
128         lsm_size = lov_stripe_md_size(1);
129         if (lsmp == NULL)
130                 RETURN(lsm_size);
131
132         if (*lsmp != NULL && lmm == NULL) {
133                 OBD_FREE((*lsmp)->lsm_oinfo[0], sizeof(struct lov_oinfo));
134                 OBD_FREE(*lsmp, lsm_size);
135                 *lsmp = NULL;
136                 RETURN(0);
137         }
138
139         if (*lsmp == NULL) {
140                 OBD_ALLOC(*lsmp, lsm_size);
141                 if (*lsmp == NULL)
142                         RETURN(-ENOMEM);
143                 OBD_ALLOC((*lsmp)->lsm_oinfo[0], sizeof(struct lov_oinfo));
144                 if ((*lsmp)->lsm_oinfo[0] == NULL) {
145                         OBD_FREE(*lsmp, lsm_size);
146                         RETURN(-ENOMEM);
147                 }
148                 loi_init((*lsmp)->lsm_oinfo[0]);
149         }
150
151         if (lmm != NULL) {
152                 /* XXX zero *lsmp? */
153                 (*lsmp)->lsm_object_id = le64_to_cpu (lmm->lmm_object_id);
154                 (*lsmp)->lsm_object_gr = le64_to_cpu (lmm->lmm_object_gr);
155                 LASSERT((*lsmp)->lsm_object_id);
156                 LASSERT_MDS_GROUP((*lsmp)->lsm_object_gr);
157         }
158
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 = lustre_swab_repbuf(req, REPLY_REC_OFF, sizeof(*body),
214                                   lustre_swab_ost_body);
215         if (body) {
216                 CDEBUG(D_INODE, "mode: %o\n", body->oa.o_mode);
217                 lustre_get_wire_obdo(aa->aa_oi->oi_oa, &body->oa);
218
219                 /* This should really be sent by the OST */
220                 aa->aa_oi->oi_oa->o_blksize = PTLRPC_MAX_BRW_SIZE;
221                 aa->aa_oi->oi_oa->o_valid |= OBD_MD_FLBLKSZ;
222         } else {
223                 CDEBUG(D_INFO, "can't unpack ost_body\n");
224                 rc = -EPROTO;
225                 aa->aa_oi->oi_oa->o_valid = 0;
226         }
227 out:
228         rc = aa->aa_oi->oi_cb_up(aa->aa_oi, rc);
229         RETURN(rc);
230 }
231
232 static int osc_getattr_async(struct obd_export *exp, struct obd_info *oinfo,
233                              struct ptlrpc_request_set *set)
234 {
235         struct ptlrpc_request *req;
236         struct osc_async_args *aa;
237         int                    rc;
238         ENTRY;
239
240         req = ptlrpc_request_alloc(class_exp2cliimp(exp), &RQF_OST_GETATTR);
241         if (req == NULL)
242                 RETURN(-ENOMEM);
243
244         osc_set_capa_size(req, &RMF_CAPA1, oinfo->oi_capa);
245         rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, OST_GETATTR);
246         if (rc) {
247                 ptlrpc_request_free(req);
248                 RETURN(rc);
249         }
250
251         osc_pack_req_body(req, oinfo);
252
253         ptlrpc_request_set_replen(req);
254         req->rq_interpret_reply = (ptlrpc_interpterer_t)osc_getattr_interpret;
255
256         CLASSERT(sizeof(*aa) <= sizeof(req->rq_async_args));
257         aa = ptlrpc_req_async_args(req);
258         aa->aa_oi = oinfo;
259
260         ptlrpc_set_add_req(set, req);
261         RETURN(0);
262 }
263
264 static int osc_getattr(struct obd_export *exp, 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(struct obd_export *exp, struct obd_info *oinfo,
308                        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_async_args *aa, 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(aa->aa_oi->oi_oa, &body->oa);
363 out:
364         rc = aa->aa_oi->oi_cb_up(aa->aa_oi, rc);
365         RETURN(rc);
366 }
367
368 static int osc_setattr_async(struct obd_export *exp, struct obd_info *oinfo,
369                              struct obd_trans_info *oti,
370                              struct ptlrpc_request_set *rqset)
371 {
372         struct ptlrpc_request *req;
373         struct osc_async_args *aa;
374         int                    rc;
375         ENTRY;
376
377         req = ptlrpc_request_alloc(class_exp2cliimp(exp), &RQF_OST_SETATTR);
378         if (req == NULL)
379                 RETURN(-ENOMEM);
380
381         osc_set_capa_size(req, &RMF_CAPA1, oinfo->oi_capa);
382         rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, OST_SETATTR);
383         if (rc) {
384                 ptlrpc_request_free(req);
385                 RETURN(rc);
386         }
387
388         osc_pack_req_body(req, oinfo);
389
390         ptlrpc_request_set_replen(req);
391
392         if (oinfo->oi_oa->o_valid & OBD_MD_FLCOOKIE) {
393                 LASSERT(oti);
394                 oinfo->oi_oa->o_lcookie = *oti->oti_logcookies;
395         }
396
397         /* do mds to ost setattr asynchronously */
398         if (!rqset) {
399                 /* Do not wait for response. */
400                 ptlrpcd_add_req(req, PSCOPE_OTHER);
401         } else {
402                 req->rq_interpret_reply =
403                         (ptlrpc_interpterer_t)osc_setattr_interpret;
404
405                 CLASSERT (sizeof(*aa) <= sizeof(req->rq_async_args));
406                 aa = ptlrpc_req_async_args(req);
407                 aa->aa_oi = oinfo;
408
409                 ptlrpc_set_add_req(rqset, req);
410         }
411
412         RETURN(0);
413 }
414
415 int osc_real_create(struct obd_export *exp, struct obdo *oa,
416                     struct lov_stripe_md **ea, struct obd_trans_info *oti)
417 {
418         struct ptlrpc_request *req;
419         struct ost_body       *body;
420         struct lov_stripe_md  *lsm;
421         int                    rc;
422         ENTRY;
423
424         LASSERT(oa);
425         LASSERT(ea);
426
427         lsm = *ea;
428         if (!lsm) {
429                 rc = obd_alloc_memmd(exp, &lsm);
430                 if (rc < 0)
431                         RETURN(rc);
432         }
433
434         req = ptlrpc_request_alloc(class_exp2cliimp(exp), &RQF_OST_CREATE);
435         if (req == NULL)
436                 GOTO(out, rc = -ENOMEM);
437
438         rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, OST_CREATE);
439         if (rc) {
440                 ptlrpc_request_free(req);
441                 GOTO(out, rc);
442         }
443
444         body = req_capsule_client_get(&req->rq_pill, &RMF_OST_BODY);
445         LASSERT(body);
446         lustre_set_wire_obdo(&body->oa, oa);
447
448         ptlrpc_request_set_replen(req);
449
450         if ((oa->o_valid & OBD_MD_FLFLAGS) &&
451             oa->o_flags == OBD_FL_DELORPHAN) {
452                 DEBUG_REQ(D_HA, req,
453                           "delorphan from OST integration");
454                 /* Don't resend the delorphan req */
455                 req->rq_no_resend = req->rq_no_delay = 1;
456         }
457
458         rc = ptlrpc_queue_wait(req);
459         if (rc)
460                 GOTO(out_req, rc);
461
462         body = req_capsule_server_get(&req->rq_pill, &RMF_OST_BODY);
463         if (body == NULL)
464                 GOTO(out_req, rc = -EPROTO);
465
466         lustre_get_wire_obdo(oa, &body->oa);
467
468         /* This should really be sent by the OST */
469         oa->o_blksize = PTLRPC_MAX_BRW_SIZE;
470         oa->o_valid |= OBD_MD_FLBLKSZ;
471
472         /* XXX LOV STACKING: the lsm that is passed to us from LOV does not
473          * have valid lsm_oinfo data structs, so don't go touching that.
474          * This needs to be fixed in a big way.
475          */
476         lsm->lsm_object_id = oa->o_id;
477         lsm->lsm_object_gr = oa->o_gr;
478         *ea = lsm;
479
480         if (oti != NULL) {
481                 oti->oti_transno = lustre_msg_get_transno(req->rq_repmsg);
482
483                 if (oa->o_valid & OBD_MD_FLCOOKIE) {
484                         if (!oti->oti_logcookies)
485                                 oti_alloc_cookies(oti, 1);
486                         *oti->oti_logcookies = oa->o_lcookie;
487                 }
488         }
489
490         CDEBUG(D_HA, "transno: "LPD64"\n",
491                lustre_msg_get_transno(req->rq_repmsg));
492 out_req:
493         ptlrpc_req_finished(req);
494 out:
495         if (rc && !*ea)
496                 obd_free_memmd(exp, &lsm);
497         RETURN(rc);
498 }
499
500 static int osc_punch_interpret(const struct lu_env *env,
501                                struct ptlrpc_request *req,
502                                struct osc_punch_args *aa, int rc)
503 {
504         struct ost_body *body;
505         ENTRY;
506
507         if (rc != 0)
508                 GOTO(out, rc);
509
510         body = req_capsule_server_get(&req->rq_pill, &RMF_OST_BODY);
511         if (body == NULL)
512                 GOTO(out, rc = -EPROTO);
513
514         lustre_get_wire_obdo(aa->pa_oa, &body->oa);
515 out:
516         rc = aa->pa_upcall(aa->pa_cookie, rc);
517         RETURN(rc);
518 }
519
520 int osc_punch_base(struct obd_export *exp, struct obdo *oa,
521                    struct obd_capa *capa,
522                    obd_enqueue_update_f upcall, void *cookie,
523                    struct ptlrpc_request_set *rqset)
524 {
525         struct ptlrpc_request *req;
526         struct osc_punch_args *aa;
527         struct ost_body       *body;
528         int                    rc;
529         ENTRY;
530
531         req = ptlrpc_request_alloc(class_exp2cliimp(exp), &RQF_OST_PUNCH);
532         if (req == NULL)
533                 RETURN(-ENOMEM);
534
535         osc_set_capa_size(req, &RMF_CAPA1, capa);
536         rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, OST_PUNCH);
537         if (rc) {
538                 ptlrpc_request_free(req);
539                 RETURN(rc);
540         }
541         req->rq_request_portal = OST_IO_PORTAL; /* bug 7198 */
542         ptlrpc_at_set_req_timeout(req);
543
544         body = req_capsule_client_get(&req->rq_pill, &RMF_OST_BODY);
545         LASSERT(body);
546         lustre_set_wire_obdo(&body->oa, oa);
547         osc_pack_capa(req, body, capa);
548
549         ptlrpc_request_set_replen(req);
550
551
552         req->rq_interpret_reply = (ptlrpc_interpterer_t)osc_punch_interpret;
553         CLASSERT (sizeof(*aa) <= sizeof(req->rq_async_args));
554         aa = ptlrpc_req_async_args(req);
555         aa->pa_oa     = oa;
556         aa->pa_upcall = upcall;
557         aa->pa_cookie = cookie;
558         if (rqset == PTLRPCD_SET)
559                 ptlrpcd_add_req(req, PSCOPE_OTHER);
560         else
561                 ptlrpc_set_add_req(rqset, req);
562
563         RETURN(0);
564 }
565
566 static int osc_punch(struct obd_export *exp, struct obd_info *oinfo,
567                      struct obd_trans_info *oti,
568                      struct ptlrpc_request_set *rqset)
569 {
570         oinfo->oi_oa->o_size   = oinfo->oi_policy.l_extent.start;
571         oinfo->oi_oa->o_blocks = oinfo->oi_policy.l_extent.end;
572         oinfo->oi_oa->o_valid |= OBD_MD_FLSIZE | OBD_MD_FLBLOCKS;
573         return osc_punch_base(exp, oinfo->oi_oa, oinfo->oi_capa,
574                               oinfo->oi_cb_up, oinfo, rqset);
575 }
576
577 static int osc_sync(struct obd_export *exp, struct obdo *oa,
578                     struct lov_stripe_md *md, obd_size start, obd_size end,
579                     void *capa)
580 {
581         struct ptlrpc_request *req;
582         struct ost_body       *body;
583         int                    rc;
584         ENTRY;
585
586         if (!oa) {
587                 CDEBUG(D_INFO, "oa NULL\n");
588                 RETURN(-EINVAL);
589         }
590
591         req = ptlrpc_request_alloc(class_exp2cliimp(exp), &RQF_OST_SYNC);
592         if (req == NULL)
593                 RETURN(-ENOMEM);
594
595         osc_set_capa_size(req, &RMF_CAPA1, capa);
596         rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, OST_SYNC);
597         if (rc) {
598                 ptlrpc_request_free(req);
599                 RETURN(rc);
600         }
601
602         /* overload the size and blocks fields in the oa with start/end */
603         body = req_capsule_client_get(&req->rq_pill, &RMF_OST_BODY);
604         LASSERT(body);
605         lustre_set_wire_obdo(&body->oa, oa);
606         body->oa.o_size = start;
607         body->oa.o_blocks = end;
608         body->oa.o_valid |= (OBD_MD_FLSIZE | OBD_MD_FLBLOCKS);
609         osc_pack_capa(req, body, capa);
610
611         ptlrpc_request_set_replen(req);
612
613         rc = ptlrpc_queue_wait(req);
614         if (rc)
615                 GOTO(out, rc);
616
617         body = req_capsule_server_get(&req->rq_pill, &RMF_OST_BODY);
618         if (body == NULL)
619                 GOTO(out, rc = -EPROTO);
620
621         lustre_get_wire_obdo(oa, &body->oa);
622
623         EXIT;
624  out:
625         ptlrpc_req_finished(req);
626         return rc;
627 }
628
629 /* Find and cancel locally locks matched by @mode in the resource found by
630  * @objid. Found locks are added into @cancel list. Returns the amount of
631  * locks added to @cancels list. */
632 static int osc_resource_get_unused(struct obd_export *exp, struct obdo *oa,
633                                    struct list_head *cancels, ldlm_mode_t mode,
634                                    int lock_flags)
635 {
636         struct ldlm_namespace *ns = exp->exp_obd->obd_namespace;
637         struct ldlm_res_id res_id;
638         struct ldlm_resource *res;
639         int count;
640         ENTRY;
641
642         osc_build_res_name(oa->o_id, oa->o_gr, &res_id);
643         res = ldlm_resource_get(ns, NULL, &res_id, 0, 0);
644         if (res == NULL)
645                 RETURN(0);
646
647         LDLM_RESOURCE_ADDREF(res);
648         count = ldlm_cancel_resource_local(res, cancels, NULL, mode,
649                                            lock_flags, 0, NULL);
650         LDLM_RESOURCE_DELREF(res);
651         ldlm_resource_putref(res);
652         RETURN(count);
653 }
654
655 static int osc_destroy_interpret(const struct lu_env *env,
656                                  struct ptlrpc_request *req, void *data,
657                                  int rc)
658 {
659         struct client_obd *cli = &req->rq_import->imp_obd->u.cli;
660
661         atomic_dec(&cli->cl_destroy_in_flight);
662         cfs_waitq_signal(&cli->cl_destroy_waitq);
663         return 0;
664 }
665
666 static int osc_can_send_destroy(struct client_obd *cli)
667 {
668         if (atomic_inc_return(&cli->cl_destroy_in_flight) <=
669             cli->cl_max_rpcs_in_flight) {
670                 /* The destroy request can be sent */
671                 return 1;
672         }
673         if (atomic_dec_return(&cli->cl_destroy_in_flight) <
674             cli->cl_max_rpcs_in_flight) {
675                 /*
676                  * The counter has been modified between the two atomic
677                  * operations.
678                  */
679                 cfs_waitq_signal(&cli->cl_destroy_waitq);
680         }
681         return 0;
682 }
683
684 /* Destroy requests can be async always on the client, and we don't even really
685  * care about the return code since the client cannot do anything at all about
686  * a destroy failure.
687  * When the MDS is unlinking a filename, it saves the file objects into a
688  * recovery llog, and these object records are cancelled when the OST reports
689  * they were destroyed and sync'd to disk (i.e. transaction committed).
690  * If the client dies, or the OST is down when the object should be destroyed,
691  * the records are not cancelled, and when the OST reconnects to the MDS next,
692  * it will retrieve the llog unlink logs and then sends the log cancellation
693  * cookies to the MDS after committing destroy transactions. */
694 static int osc_destroy(struct obd_export *exp, struct obdo *oa,
695                        struct lov_stripe_md *ea, struct obd_trans_info *oti,
696                        struct obd_export *md_export, void *capa)
697 {
698         struct client_obd     *cli = &exp->exp_obd->u.cli;
699         struct ptlrpc_request *req;
700         struct ost_body       *body;
701         CFS_LIST_HEAD(cancels);
702         int rc, count;
703         ENTRY;
704
705         if (!oa) {
706                 CDEBUG(D_INFO, "oa NULL\n");
707                 RETURN(-EINVAL);
708         }
709
710         count = osc_resource_get_unused(exp, oa, &cancels, LCK_PW,
711                                         LDLM_FL_DISCARD_DATA);
712
713         req = ptlrpc_request_alloc(class_exp2cliimp(exp), &RQF_OST_DESTROY);
714         if (req == NULL) {
715                 ldlm_lock_list_put(&cancels, l_bl_ast, count);
716                 RETURN(-ENOMEM);
717         }
718
719         osc_set_capa_size(req, &RMF_CAPA1, (struct obd_capa *)capa);
720         rc = ldlm_prep_elc_req(exp, req, LUSTRE_OST_VERSION, OST_DESTROY,
721                                0, &cancels, count);
722         if (rc) {
723                 ptlrpc_request_free(req);
724                 RETURN(rc);
725         }
726
727         req->rq_request_portal = OST_IO_PORTAL; /* bug 7198 */
728         ptlrpc_at_set_req_timeout(req);
729
730         if (oti != NULL && oa->o_valid & OBD_MD_FLCOOKIE)
731                 oa->o_lcookie = *oti->oti_logcookies;
732         body = req_capsule_client_get(&req->rq_pill, &RMF_OST_BODY);
733         LASSERT(body);
734         lustre_set_wire_obdo(&body->oa, oa);
735
736         osc_pack_capa(req, body, (struct obd_capa *)capa);
737         ptlrpc_request_set_replen(req);
738
739         /* don't throttle destroy RPCs for the MDT */
740         if (!(cli->cl_import->imp_connect_flags_orig & OBD_CONNECT_MDS)) {
741                 req->rq_interpret_reply = osc_destroy_interpret;
742                 if (!osc_can_send_destroy(cli)) {
743                         struct l_wait_info lwi = LWI_INTR(LWI_ON_SIGNAL_NOOP,
744                                                           NULL);
745
746                         /*
747                          * Wait until the number of on-going destroy RPCs drops
748                          * under max_rpc_in_flight
749                          */
750                         l_wait_event_exclusive(cli->cl_destroy_waitq,
751                                                osc_can_send_destroy(cli), &lwi);
752                 }
753         }
754
755         /* Do not wait for response */
756         ptlrpcd_add_req(req, PSCOPE_OTHER);
757         RETURN(0);
758 }
759
760 static void osc_announce_cached(struct client_obd *cli, struct obdo *oa,
761                                 long writing_bytes)
762 {
763         obd_flag bits = OBD_MD_FLBLOCKS|OBD_MD_FLGRANT;
764
765         LASSERT(!(oa->o_valid & bits));
766
767         oa->o_valid |= bits;
768         client_obd_list_lock(&cli->cl_loi_list_lock);
769         oa->o_dirty = cli->cl_dirty;
770         if (cli->cl_dirty - cli->cl_dirty_transit > cli->cl_dirty_max) {
771                 CERROR("dirty %lu - %lu > dirty_max %lu\n",
772                        cli->cl_dirty, cli->cl_dirty_transit, cli->cl_dirty_max);
773                 oa->o_undirty = 0;
774         } else if (atomic_read(&obd_dirty_pages) -
775                    atomic_read(&obd_dirty_transit_pages) > obd_max_dirty_pages){
776                 CERROR("dirty %d - %d > system dirty_max %d\n",
777                        atomic_read(&obd_dirty_pages),
778                        atomic_read(&obd_dirty_transit_pages),
779                        obd_max_dirty_pages);
780                 oa->o_undirty = 0;
781         } else if (cli->cl_dirty_max - cli->cl_dirty > 0x7fffffff) {
782                 CERROR("dirty %lu - dirty_max %lu too big???\n",
783                        cli->cl_dirty, cli->cl_dirty_max);
784                 oa->o_undirty = 0;
785         } else {
786                 long max_in_flight = (cli->cl_max_pages_per_rpc << CFS_PAGE_SHIFT)*
787                                 (cli->cl_max_rpcs_in_flight + 1);
788                 oa->o_undirty = max(cli->cl_dirty_max, max_in_flight);
789         }
790         oa->o_grant = cli->cl_avail_grant;
791         oa->o_dropped = cli->cl_lost_grant;
792         cli->cl_lost_grant = 0;
793         client_obd_list_unlock(&cli->cl_loi_list_lock);
794         CDEBUG(D_CACHE,"dirty: "LPU64" undirty: %u dropped %u grant: "LPU64"\n",
795                oa->o_dirty, oa->o_undirty, oa->o_dropped, oa->o_grant);
796
797 }
798
799 static void osc_update_next_shrink(struct client_obd *cli)
800 {
801         cli->cl_next_shrink_grant =
802                 cfs_time_shift(cli->cl_grant_shrink_interval);
803         CDEBUG(D_CACHE, "next time %ld to shrink grant \n",
804                cli->cl_next_shrink_grant);
805 }
806
807 /* caller must hold loi_list_lock */
808 static void osc_consume_write_grant(struct client_obd *cli,
809                                     struct brw_page *pga)
810 {
811         LASSERT(client_obd_list_is_locked(&cli->cl_loi_list_lock));
812         LASSERT(!(pga->flag & OBD_BRW_FROM_GRANT));
813         atomic_inc(&obd_dirty_pages);
814         cli->cl_dirty += CFS_PAGE_SIZE;
815         cli->cl_avail_grant -= CFS_PAGE_SIZE;
816         pga->flag |= OBD_BRW_FROM_GRANT;
817         CDEBUG(D_CACHE, "using %lu grant credits for brw %p page %p\n",
818                CFS_PAGE_SIZE, pga, pga->pg);
819         LASSERT(cli->cl_avail_grant >= 0);
820         osc_update_next_shrink(cli);
821 }
822
823 /* the companion to osc_consume_write_grant, called when a brw has completed.
824  * must be called with the loi lock held. */
825 static void osc_release_write_grant(struct client_obd *cli,
826                                     struct brw_page *pga, int sent)
827 {
828         int blocksize = cli->cl_import->imp_obd->obd_osfs.os_bsize ? : 4096;
829         ENTRY;
830
831         LASSERT(client_obd_list_is_locked(&cli->cl_loi_list_lock));
832         if (!(pga->flag & OBD_BRW_FROM_GRANT)) {
833                 EXIT;
834                 return;
835         }
836
837         pga->flag &= ~OBD_BRW_FROM_GRANT;
838         atomic_dec(&obd_dirty_pages);
839         cli->cl_dirty -= CFS_PAGE_SIZE;
840         if (pga->flag & OBD_BRW_NOCACHE) {
841                 pga->flag &= ~OBD_BRW_NOCACHE;
842                 atomic_dec(&obd_dirty_transit_pages);
843                 cli->cl_dirty_transit -= CFS_PAGE_SIZE;
844         }
845         if (!sent) {
846                 cli->cl_lost_grant += CFS_PAGE_SIZE;
847                 CDEBUG(D_CACHE, "lost grant: %lu avail grant: %lu dirty: %lu\n",
848                        cli->cl_lost_grant, cli->cl_avail_grant, cli->cl_dirty);
849         } else if (CFS_PAGE_SIZE != blocksize && pga->count != CFS_PAGE_SIZE) {
850                 /* For short writes we shouldn't count parts of pages that
851                  * span a whole block on the OST side, or our accounting goes
852                  * wrong.  Should match the code in filter_grant_check. */
853                 int offset = pga->off & ~CFS_PAGE_MASK;
854                 int count = pga->count + (offset & (blocksize - 1));
855                 int end = (offset + pga->count) & (blocksize - 1);
856                 if (end)
857                         count += blocksize - end;
858
859                 cli->cl_lost_grant += CFS_PAGE_SIZE - count;
860                 CDEBUG(D_CACHE, "lost %lu grant: %lu avail: %lu dirty: %lu\n",
861                        CFS_PAGE_SIZE - count, cli->cl_lost_grant,
862                        cli->cl_avail_grant, cli->cl_dirty);
863         }
864
865         EXIT;
866 }
867
868 static unsigned long rpcs_in_flight(struct client_obd *cli)
869 {
870         return cli->cl_r_in_flight + cli->cl_w_in_flight;
871 }
872
873 /* caller must hold loi_list_lock */
874 void osc_wake_cache_waiters(struct client_obd *cli)
875 {
876         struct list_head *l, *tmp;
877         struct osc_cache_waiter *ocw;
878
879         ENTRY;
880         list_for_each_safe(l, tmp, &cli->cl_cache_waiters) {
881                 /* if we can't dirty more, we must wait until some is written */
882                 if ((cli->cl_dirty + CFS_PAGE_SIZE > cli->cl_dirty_max) ||
883                    (atomic_read(&obd_dirty_pages) + 1 > obd_max_dirty_pages)) {
884                         CDEBUG(D_CACHE, "no dirty room: dirty: %ld "
885                                "osc max %ld, sys max %d\n", cli->cl_dirty,
886                                cli->cl_dirty_max, obd_max_dirty_pages);
887                         return;
888                 }
889
890                 /* if still dirty cache but no grant wait for pending RPCs that
891                  * may yet return us some grant before doing sync writes */
892                 if (cli->cl_w_in_flight && cli->cl_avail_grant < CFS_PAGE_SIZE) {
893                         CDEBUG(D_CACHE, "%u BRW writes in flight, no grant\n",
894                                cli->cl_w_in_flight);
895                         return;
896                 }
897
898                 ocw = list_entry(l, struct osc_cache_waiter, ocw_entry);
899                 list_del_init(&ocw->ocw_entry);
900                 if (cli->cl_avail_grant < CFS_PAGE_SIZE) {
901                         /* no more RPCs in flight to return grant, do sync IO */
902                         ocw->ocw_rc = -EDQUOT;
903                         CDEBUG(D_INODE, "wake oap %p for sync\n", ocw->ocw_oap);
904                 } else {
905                         osc_consume_write_grant(cli,
906                                                 &ocw->ocw_oap->oap_brw_page);
907                 }
908
909                 cfs_waitq_signal(&ocw->ocw_waitq);
910         }
911
912         EXIT;
913 }
914
915 static void __osc_update_grant(struct client_obd *cli, obd_size grant)
916 {
917         client_obd_list_lock(&cli->cl_loi_list_lock);
918         cli->cl_avail_grant += grant;
919         client_obd_list_unlock(&cli->cl_loi_list_lock);
920 }
921
922 static void osc_update_grant(struct client_obd *cli, struct ost_body *body)
923 {
924         if (body->oa.o_valid & OBD_MD_FLGRANT) {
925                 CDEBUG(D_CACHE, "got "LPU64" extra grant\n", body->oa.o_grant);
926                 __osc_update_grant(cli, body->oa.o_grant);
927         }
928 }
929
930 static int osc_set_info_async(struct obd_export *exp, obd_count keylen,
931                               void *key, obd_count vallen, void *val,
932                               struct ptlrpc_request_set *set);
933
934 static int osc_shrink_grant_interpret(const struct lu_env *env,
935                                       struct ptlrpc_request *req,
936                                       void *aa, int rc)
937 {
938         struct client_obd *cli = &req->rq_import->imp_obd->u.cli;
939         struct obdo *oa = ((struct osc_grant_args *)aa)->aa_oa;
940         struct ost_body *body;
941
942         if (rc != 0) {
943                 __osc_update_grant(cli, oa->o_grant);
944                 GOTO(out, rc);
945         }
946
947         body = req_capsule_server_get(&req->rq_pill, &RMF_OST_BODY);
948         LASSERT(body);
949         osc_update_grant(cli, body);
950 out:
951         OBD_FREE_PTR(oa);
952         return rc;
953 }
954
955 static void osc_shrink_grant_local(struct client_obd *cli, struct obdo *oa)
956 {
957         client_obd_list_lock(&cli->cl_loi_list_lock);
958         oa->o_grant = cli->cl_avail_grant / 4;
959         cli->cl_avail_grant -= oa->o_grant;
960         client_obd_list_unlock(&cli->cl_loi_list_lock);
961         oa->o_flags |= OBD_FL_SHRINK_GRANT;
962         osc_update_next_shrink(cli);
963 }
964
965 /* Shrink the current grant, either from some large amount to enough for a
966  * full set of in-flight RPCs, or if we have already shrunk to that limit
967  * then to enough for a single RPC.  This avoids keeping more grant than
968  * needed, and avoids shrinking the grant piecemeal. */
969 static int osc_shrink_grant(struct client_obd *cli)
970 {
971         long target = (cli->cl_max_rpcs_in_flight + 1) *
972                       cli->cl_max_pages_per_rpc;
973
974         client_obd_list_lock(&cli->cl_loi_list_lock);
975         if (cli->cl_avail_grant <= target)
976                 target = cli->cl_max_pages_per_rpc;
977         client_obd_list_unlock(&cli->cl_loi_list_lock);
978
979         return osc_shrink_grant_to_target(cli, target);
980 }
981
982 int osc_shrink_grant_to_target(struct client_obd *cli, long target)
983 {
984         int    rc = 0;
985         struct ost_body     *body;
986         ENTRY;
987
988         client_obd_list_lock(&cli->cl_loi_list_lock);
989         /* Don't shrink if we are already above or below the desired limit
990          * We don't want to shrink below a single RPC, as that will negatively
991          * impact block allocation and long-term performance. */
992         if (target < cli->cl_max_pages_per_rpc)
993                 target = cli->cl_max_pages_per_rpc;
994
995         if (target >= cli->cl_avail_grant) {
996                 client_obd_list_unlock(&cli->cl_loi_list_lock);
997                 RETURN(0);
998         }
999         client_obd_list_unlock(&cli->cl_loi_list_lock);
1000
1001         OBD_ALLOC_PTR(body);
1002         if (!body)
1003                 RETURN(-ENOMEM);
1004
1005         osc_announce_cached(cli, &body->oa, 0);
1006
1007         client_obd_list_lock(&cli->cl_loi_list_lock);
1008         body->oa.o_grant = cli->cl_avail_grant - target;
1009         cli->cl_avail_grant = target;
1010         client_obd_list_unlock(&cli->cl_loi_list_lock);
1011         body->oa.o_flags |= OBD_FL_SHRINK_GRANT;
1012         osc_update_next_shrink(cli);
1013
1014         rc = osc_set_info_async(cli->cl_import->imp_obd->obd_self_export,
1015                                 sizeof(KEY_GRANT_SHRINK), KEY_GRANT_SHRINK,
1016                                 sizeof(*body), body, NULL);
1017         if (rc != 0)
1018                 __osc_update_grant(cli, body->oa.o_grant);
1019         OBD_FREE_PTR(body);
1020         RETURN(rc);
1021 }
1022
1023 #define GRANT_SHRINK_LIMIT PTLRPC_MAX_BRW_SIZE
1024 static int osc_should_shrink_grant(struct client_obd *client)
1025 {
1026         cfs_time_t time = cfs_time_current();
1027         cfs_time_t next_shrink = client->cl_next_shrink_grant;
1028         if (cfs_time_aftereq(time, next_shrink - 5 * CFS_TICK)) {
1029                 if (client->cl_import->imp_state == LUSTRE_IMP_FULL &&
1030                     client->cl_avail_grant > GRANT_SHRINK_LIMIT)
1031                         return 1;
1032                 else
1033                         osc_update_next_shrink(client);
1034         }
1035         return 0;
1036 }
1037
1038 static int osc_grant_shrink_grant_cb(struct timeout_item *item, void *data)
1039 {
1040         struct client_obd *client;
1041
1042         list_for_each_entry(client, &item->ti_obd_list, cl_grant_shrink_list) {
1043                 if (osc_should_shrink_grant(client))
1044                         osc_shrink_grant(client);
1045         }
1046         return 0;
1047 }
1048
1049 static int osc_add_shrink_grant(struct client_obd *client)
1050 {
1051         int rc;
1052
1053         rc = ptlrpc_add_timeout_client(client->cl_grant_shrink_interval,
1054                                        TIMEOUT_GRANT,
1055                                        osc_grant_shrink_grant_cb, NULL,
1056                                        &client->cl_grant_shrink_list);
1057         if (rc) {
1058                 CERROR("add grant client %s error %d\n",
1059                         client->cl_import->imp_obd->obd_name, rc);
1060                 return rc;
1061         }
1062         CDEBUG(D_CACHE, "add grant client %s \n",
1063                client->cl_import->imp_obd->obd_name);
1064         osc_update_next_shrink(client);
1065         return 0;
1066 }
1067
1068 static int osc_del_shrink_grant(struct client_obd *client)
1069 {
1070         return ptlrpc_del_timeout_client(&client->cl_grant_shrink_list,
1071                                          TIMEOUT_GRANT);
1072 }
1073
1074 static void osc_init_grant(struct client_obd *cli, struct obd_connect_data *ocd)
1075 {
1076         client_obd_list_lock(&cli->cl_loi_list_lock);
1077         cli->cl_avail_grant = ocd->ocd_grant;
1078         client_obd_list_unlock(&cli->cl_loi_list_lock);
1079
1080         if (ocd->ocd_connect_flags & OBD_CONNECT_GRANT_SHRINK &&
1081             list_empty(&cli->cl_grant_shrink_list))
1082                 osc_add_shrink_grant(cli);
1083
1084         CDEBUG(D_CACHE, "setting cl_avail_grant: %ld cl_lost_grant: %ld \n",
1085                cli->cl_avail_grant, cli->cl_lost_grant);
1086         LASSERT(cli->cl_avail_grant >= 0);
1087 }
1088
1089 /* We assume that the reason this OSC got a short read is because it read
1090  * beyond the end of a stripe file; i.e. lustre is reading a sparse file
1091  * via the LOV, and it _knows_ it's reading inside the file, it's just that
1092  * this stripe never got written at or beyond this stripe offset yet. */
1093 static void handle_short_read(int nob_read, obd_count page_count,
1094                               struct brw_page **pga)
1095 {
1096         char *ptr;
1097         int i = 0;
1098
1099         /* skip bytes read OK */
1100         while (nob_read > 0) {
1101                 LASSERT (page_count > 0);
1102
1103                 if (pga[i]->count > nob_read) {
1104                         /* EOF inside this page */
1105                         ptr = cfs_kmap(pga[i]->pg) +
1106                                 (pga[i]->off & ~CFS_PAGE_MASK);
1107                         memset(ptr + nob_read, 0, pga[i]->count - nob_read);
1108                         cfs_kunmap(pga[i]->pg);
1109                         page_count--;
1110                         i++;
1111                         break;
1112                 }
1113
1114                 nob_read -= pga[i]->count;
1115                 page_count--;
1116                 i++;
1117         }
1118
1119         /* zero remaining pages */
1120         while (page_count-- > 0) {
1121                 ptr = cfs_kmap(pga[i]->pg) + (pga[i]->off & ~CFS_PAGE_MASK);
1122                 memset(ptr, 0, pga[i]->count);
1123                 cfs_kunmap(pga[i]->pg);
1124                 i++;
1125         }
1126 }
1127
1128 static int check_write_rcs(struct ptlrpc_request *req,
1129                            int requested_nob, int niocount,
1130                            obd_count page_count, struct brw_page **pga)
1131 {
1132         int    *remote_rcs, i;
1133
1134         /* return error if any niobuf was in error */
1135         remote_rcs = lustre_swab_repbuf(req, REQ_REC_OFF + 1,
1136                                         sizeof(*remote_rcs) * niocount, NULL);
1137         if (remote_rcs == NULL) {
1138                 CDEBUG(D_INFO, "Missing/short RC vector on BRW_WRITE reply\n");
1139                 return(-EPROTO);
1140         }
1141         if (lustre_msg_swabbed(req->rq_repmsg))
1142                 for (i = 0; i < niocount; i++)
1143                         __swab32s(&remote_rcs[i]);
1144
1145         for (i = 0; i < niocount; i++) {
1146                 if (remote_rcs[i] < 0)
1147                         return(remote_rcs[i]);
1148
1149                 if (remote_rcs[i] != 0) {
1150                         CDEBUG(D_INFO, "rc[%d] invalid (%d) req %p\n",
1151                                 i, remote_rcs[i], req);
1152                         return(-EPROTO);
1153                 }
1154         }
1155
1156         if (req->rq_bulk->bd_nob_transferred != requested_nob) {
1157                 CERROR("Unexpected # bytes transferred: %d (requested %d)\n",
1158                        req->rq_bulk->bd_nob_transferred, requested_nob);
1159                 return(-EPROTO);
1160         }
1161
1162         return (0);
1163 }
1164
1165 static inline int can_merge_pages(struct brw_page *p1, struct brw_page *p2)
1166 {
1167         if (p1->flag != p2->flag) {
1168                 unsigned mask = ~(OBD_BRW_FROM_GRANT|
1169                                   OBD_BRW_NOCACHE|OBD_BRW_SYNC);
1170
1171                 /* warn if we try to combine flags that we don't know to be
1172                  * safe to combine */
1173                 if ((p1->flag & mask) != (p2->flag & mask))
1174                         CERROR("is it ok to have flags 0x%x and 0x%x in the "
1175                                "same brw?\n", p1->flag, p2->flag);
1176                 return 0;
1177         }
1178
1179         return (p1->off + p1->count == p2->off);
1180 }
1181
1182 static obd_count osc_checksum_bulk(int nob, obd_count pg_count,
1183                                    struct brw_page **pga, int opc,
1184                                    cksum_type_t cksum_type)
1185 {
1186         __u32 cksum;
1187         int i = 0;
1188
1189         LASSERT (pg_count > 0);
1190         cksum = init_checksum(cksum_type);
1191         while (nob > 0 && pg_count > 0) {
1192                 unsigned char *ptr = cfs_kmap(pga[i]->pg);
1193                 int off = pga[i]->off & ~CFS_PAGE_MASK;
1194                 int count = pga[i]->count > nob ? nob : pga[i]->count;
1195
1196                 /* corrupt the data before we compute the checksum, to
1197                  * simulate an OST->client data error */
1198                 if (i == 0 && opc == OST_READ &&
1199                     OBD_FAIL_CHECK(OBD_FAIL_OSC_CHECKSUM_RECEIVE))
1200                         memcpy(ptr + off, "bad1", min(4, nob));
1201                 cksum = compute_checksum(cksum, ptr + off, count, cksum_type);
1202                 cfs_kunmap(pga[i]->pg);
1203                 LL_CDEBUG_PAGE(D_PAGE, pga[i]->pg, "off %d checksum %x\n",
1204                                off, cksum);
1205
1206                 nob -= pga[i]->count;
1207                 pg_count--;
1208                 i++;
1209         }
1210         /* For sending we only compute the wrong checksum instead
1211          * of corrupting the data so it is still correct on a redo */
1212         if (opc == OST_WRITE && OBD_FAIL_CHECK(OBD_FAIL_OSC_CHECKSUM_SEND))
1213                 cksum++;
1214
1215         return cksum;
1216 }
1217
1218 static int osc_brw_prep_request(int cmd, struct client_obd *cli,struct obdo *oa,
1219                                 struct lov_stripe_md *lsm, obd_count page_count,
1220                                 struct brw_page **pga,
1221                                 struct ptlrpc_request **reqp,
1222                                 struct obd_capa *ocapa, int reserve)
1223 {
1224         struct ptlrpc_request   *req;
1225         struct ptlrpc_bulk_desc *desc;
1226         struct ost_body         *body;
1227         struct obd_ioobj        *ioobj;
1228         struct niobuf_remote    *niobuf;
1229         int niocount, i, requested_nob, opc, rc;
1230         struct osc_brw_async_args *aa;
1231         struct req_capsule      *pill;
1232         struct brw_page *pg_prev;
1233
1234         ENTRY;
1235         if (OBD_FAIL_CHECK(OBD_FAIL_OSC_BRW_PREP_REQ))
1236                 RETURN(-ENOMEM); /* Recoverable */
1237         if (OBD_FAIL_CHECK(OBD_FAIL_OSC_BRW_PREP_REQ2))
1238                 RETURN(-EINVAL); /* Fatal */
1239
1240         if ((cmd & OBD_BRW_WRITE) != 0) {
1241                 opc = OST_WRITE;
1242                 req = ptlrpc_request_alloc_pool(cli->cl_import,
1243                                                 cli->cl_import->imp_rq_pool,
1244                                                 &RQF_OST_BRW);
1245         } else {
1246                 opc = OST_READ;
1247                 req = ptlrpc_request_alloc(cli->cl_import, &RQF_OST_BRW);
1248         }
1249         if (req == NULL)
1250                 RETURN(-ENOMEM);
1251
1252         for (niocount = i = 1; i < page_count; i++) {
1253                 if (!can_merge_pages(pga[i - 1], pga[i]))
1254                         niocount++;
1255         }
1256
1257         pill = &req->rq_pill;
1258         req_capsule_set_size(pill, &RMF_NIOBUF_REMOTE, RCL_CLIENT,
1259                              niocount * sizeof(*niobuf));
1260         osc_set_capa_size(req, &RMF_CAPA1, ocapa);
1261
1262         rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, opc);
1263         if (rc) {
1264                 ptlrpc_request_free(req);
1265                 RETURN(rc);
1266         }
1267         req->rq_request_portal = OST_IO_PORTAL; /* bug 7198 */
1268         ptlrpc_at_set_req_timeout(req);
1269
1270         if (opc == OST_WRITE)
1271                 desc = ptlrpc_prep_bulk_imp(req, page_count,
1272                                             BULK_GET_SOURCE, OST_BULK_PORTAL);
1273         else
1274                 desc = ptlrpc_prep_bulk_imp(req, page_count,
1275                                             BULK_PUT_SINK, OST_BULK_PORTAL);
1276
1277         if (desc == NULL)
1278                 GOTO(out, rc = -ENOMEM);
1279         /* NB request now owns desc and will free it when it gets freed */
1280
1281         body = req_capsule_client_get(pill, &RMF_OST_BODY);
1282         ioobj = req_capsule_client_get(pill, &RMF_OBD_IOOBJ);
1283         niobuf = req_capsule_client_get(pill, &RMF_NIOBUF_REMOTE);
1284         LASSERT(body && ioobj && niobuf);
1285
1286         lustre_set_wire_obdo(&body->oa, oa);
1287
1288         obdo_to_ioobj(oa, ioobj);
1289         ioobj->ioo_bufcnt = niocount;
1290         osc_pack_capa(req, body, ocapa);
1291         LASSERT (page_count > 0);
1292         pg_prev = pga[0];
1293         for (requested_nob = i = 0; i < page_count; i++, niobuf++) {
1294                 struct brw_page *pg = pga[i];
1295
1296                 LASSERT(pg->count > 0);
1297                 LASSERTF((pg->off & ~CFS_PAGE_MASK) + pg->count <= CFS_PAGE_SIZE,
1298                          "i: %d pg: %p off: "LPU64", count: %u\n", i, pg,
1299                          pg->off, pg->count);
1300 #ifdef __linux__
1301                 LASSERTF(i == 0 || pg->off > pg_prev->off,
1302                          "i %d p_c %u pg %p [pri %lu ind %lu] off "LPU64
1303                          " prev_pg %p [pri %lu ind %lu] off "LPU64"\n",
1304                          i, page_count,
1305                          pg->pg, page_private(pg->pg), pg->pg->index, pg->off,
1306                          pg_prev->pg, page_private(pg_prev->pg),
1307                          pg_prev->pg->index, pg_prev->off);
1308 #else
1309                 LASSERTF(i == 0 || pg->off > pg_prev->off,
1310                          "i %d p_c %u\n", i, page_count);
1311 #endif
1312                 LASSERT((pga[0]->flag & OBD_BRW_SRVLOCK) ==
1313                         (pg->flag & OBD_BRW_SRVLOCK));
1314
1315                 ptlrpc_prep_bulk_page(desc, pg->pg, pg->off & ~CFS_PAGE_MASK,
1316                                       pg->count);
1317                 requested_nob += pg->count;
1318
1319                 if (i > 0 && can_merge_pages(pg_prev, pg)) {
1320                         niobuf--;
1321                         niobuf->len += pg->count;
1322                 } else {
1323                         niobuf->offset = pg->off;
1324                         niobuf->len    = pg->count;
1325                         niobuf->flags  = pg->flag;
1326                 }
1327                 pg_prev = pg;
1328         }
1329
1330         LASSERTF((void *)(niobuf - niocount) ==
1331                 lustre_msg_buf(req->rq_reqmsg, REQ_REC_OFF + 2,
1332                                niocount * sizeof(*niobuf)),
1333                 "want %p - real %p\n", lustre_msg_buf(req->rq_reqmsg,
1334                 REQ_REC_OFF + 2, niocount * sizeof(*niobuf)),
1335                 (void *)(niobuf - niocount));
1336
1337         osc_announce_cached(cli, &body->oa, opc == OST_WRITE ? requested_nob:0);
1338         if (osc_should_shrink_grant(cli))
1339                 osc_shrink_grant_local(cli, &body->oa);
1340
1341         /* size[REQ_REC_OFF] still sizeof (*body) */
1342         if (opc == OST_WRITE) {
1343                 if (unlikely(cli->cl_checksum) &&
1344                     !sptlrpc_flavor_has_bulk(&req->rq_flvr)) {
1345                         /* store cl_cksum_type in a local variable since
1346                          * it can be changed via lprocfs */
1347                         cksum_type_t cksum_type = cli->cl_cksum_type;
1348
1349                         if ((body->oa.o_valid & OBD_MD_FLFLAGS) == 0) {
1350                                 oa->o_flags &= OBD_FL_LOCAL_MASK;
1351                                 body->oa.o_flags = 0;
1352                         }
1353                         body->oa.o_flags |= cksum_type_pack(cksum_type);
1354                         body->oa.o_valid |= OBD_MD_FLCKSUM | OBD_MD_FLFLAGS;
1355                         body->oa.o_cksum = osc_checksum_bulk(requested_nob,
1356                                                              page_count, pga,
1357                                                              OST_WRITE,
1358                                                              cksum_type);
1359                         CDEBUG(D_PAGE, "checksum at write origin: %x\n",
1360                                body->oa.o_cksum);
1361                         /* save this in 'oa', too, for later checking */
1362                         oa->o_valid |= OBD_MD_FLCKSUM | OBD_MD_FLFLAGS;
1363                         oa->o_flags |= cksum_type_pack(cksum_type);
1364                 } else {
1365                         /* clear out the checksum flag, in case this is a
1366                          * resend but cl_checksum is no longer set. b=11238 */
1367                         oa->o_valid &= ~OBD_MD_FLCKSUM;
1368                 }
1369                 oa->o_cksum = body->oa.o_cksum;
1370                 /* 1 RC per niobuf */
1371                 req_capsule_set_size(pill, &RMF_NIOBUF_REMOTE, RCL_SERVER,
1372                                      sizeof(__u32) * niocount);
1373         } else {
1374                 if (unlikely(cli->cl_checksum) &&
1375                     !sptlrpc_flavor_has_bulk(&req->rq_flvr)) {
1376                         if ((body->oa.o_valid & OBD_MD_FLFLAGS) == 0)
1377                                 body->oa.o_flags = 0;
1378                         body->oa.o_flags |= cksum_type_pack(cli->cl_cksum_type);
1379                         body->oa.o_valid |= OBD_MD_FLCKSUM | OBD_MD_FLFLAGS;
1380                 }
1381                 req_capsule_set_size(pill, &RMF_NIOBUF_REMOTE, RCL_SERVER, 0);
1382                 /* 1 RC for the whole I/O */
1383         }
1384         ptlrpc_request_set_replen(req);
1385
1386         CLASSERT(sizeof(*aa) <= sizeof(req->rq_async_args));
1387         aa = ptlrpc_req_async_args(req);
1388         aa->aa_oa = oa;
1389         aa->aa_requested_nob = requested_nob;
1390         aa->aa_nio_count = niocount;
1391         aa->aa_page_count = page_count;
1392         aa->aa_resends = 0;
1393         aa->aa_ppga = pga;
1394         aa->aa_cli = cli;
1395         CFS_INIT_LIST_HEAD(&aa->aa_oaps);
1396         if (ocapa && reserve)
1397                 aa->aa_ocapa = capa_get(ocapa);
1398
1399         *reqp = req;
1400         RETURN(0);
1401
1402  out:
1403         ptlrpc_req_finished(req);
1404         RETURN(rc);
1405 }
1406
1407 static int check_write_checksum(struct obdo *oa, const lnet_process_id_t *peer,
1408                                 __u32 client_cksum, __u32 server_cksum, int nob,
1409                                 obd_count page_count, struct brw_page **pga,
1410                                 cksum_type_t client_cksum_type)
1411 {
1412         __u32 new_cksum;
1413         char *msg;
1414         cksum_type_t cksum_type;
1415
1416         if (server_cksum == client_cksum) {
1417                 CDEBUG(D_PAGE, "checksum %x confirmed\n", client_cksum);
1418                 return 0;
1419         }
1420
1421         if (oa->o_valid & OBD_MD_FLFLAGS)
1422                 cksum_type = cksum_type_unpack(oa->o_flags);
1423         else
1424                 cksum_type = OBD_CKSUM_CRC32;
1425
1426         new_cksum = osc_checksum_bulk(nob, page_count, pga, OST_WRITE,
1427                                       cksum_type);
1428
1429         if (cksum_type != client_cksum_type)
1430                 msg = "the server did not use the checksum type specified in "
1431                       "the original request - likely a protocol problem";
1432         else if (new_cksum == server_cksum)
1433                 msg = "changed on the client after we checksummed it - "
1434                       "likely false positive due to mmap IO (bug 11742)";
1435         else if (new_cksum == client_cksum)
1436                 msg = "changed in transit before arrival at OST";
1437         else
1438                 msg = "changed in transit AND doesn't match the original - "
1439                       "likely false positive due to mmap IO (bug 11742)";
1440
1441         LCONSOLE_ERROR_MSG(0x132, "BAD WRITE CHECKSUM: %s: from %s inum "
1442                            LPU64"/"LPU64" object "LPU64"/"LPU64" extent "
1443                            "["LPU64"-"LPU64"]\n",
1444                            msg, libcfs_nid2str(peer->nid),
1445                            oa->o_valid & OBD_MD_FLFID ? oa->o_fid : (__u64)0,
1446                            oa->o_valid & OBD_MD_FLFID ? oa->o_generation :
1447                                                         (__u64)0,
1448                            oa->o_id,
1449                            oa->o_valid & OBD_MD_FLGROUP ? oa->o_gr : (__u64)0,
1450                            pga[0]->off,
1451                            pga[page_count-1]->off + pga[page_count-1]->count - 1);
1452         CERROR("original client csum %x (type %x), server csum %x (type %x), "
1453                "client csum now %x\n", client_cksum, client_cksum_type,
1454                server_cksum, cksum_type, new_cksum);
1455         return 1;
1456 }
1457
1458 /* Note rc enters this function as number of bytes transferred */
1459 static int osc_brw_fini_request(struct ptlrpc_request *req, int rc)
1460 {
1461         struct osc_brw_async_args *aa = (void *)&req->rq_async_args;
1462         const lnet_process_id_t *peer =
1463                         &req->rq_import->imp_connection->c_peer;
1464         struct client_obd *cli = aa->aa_cli;
1465         struct ost_body *body;
1466         __u32 client_cksum = 0;
1467         ENTRY;
1468
1469         if (rc < 0 && rc != -EDQUOT)
1470                 RETURN(rc);
1471
1472         LASSERTF(req->rq_repmsg != NULL, "rc = %d\n", rc);
1473         body = lustre_swab_repbuf(req, REPLY_REC_OFF, sizeof(*body),
1474                                   lustre_swab_ost_body);
1475         if (body == NULL) {
1476                 CDEBUG(D_INFO, "Can't unpack body\n");
1477                 RETURN(-EPROTO);
1478         }
1479
1480         /* set/clear over quota flag for a uid/gid */
1481         if (lustre_msg_get_opc(req->rq_reqmsg) == OST_WRITE &&
1482             body->oa.o_valid & (OBD_MD_FLUSRQUOTA | OBD_MD_FLGRPQUOTA)) {
1483                 unsigned int qid[MAXQUOTAS] = { body->oa.o_uid, body->oa.o_gid };
1484
1485                 lquota_setdq(quota_interface, cli, qid, body->oa.o_valid,
1486                              body->oa.o_flags);
1487         }
1488
1489         if (rc < 0)
1490                 RETURN(rc);
1491
1492         if (aa->aa_oa->o_valid & OBD_MD_FLCKSUM)
1493                 client_cksum = aa->aa_oa->o_cksum; /* save for later */
1494
1495         osc_update_grant(cli, body);
1496
1497         if (lustre_msg_get_opc(req->rq_reqmsg) == OST_WRITE) {
1498                 if (rc > 0) {
1499                         CERROR("Unexpected +ve rc %d\n", rc);
1500                         RETURN(-EPROTO);
1501                 }
1502                 LASSERT(req->rq_bulk->bd_nob == aa->aa_requested_nob);
1503
1504                 if (sptlrpc_cli_unwrap_bulk_write(req, req->rq_bulk))
1505                         RETURN(-EAGAIN);
1506
1507                 if ((aa->aa_oa->o_valid & OBD_MD_FLCKSUM) && client_cksum &&
1508                     check_write_checksum(&body->oa, peer, client_cksum,
1509                                          body->oa.o_cksum, aa->aa_requested_nob,
1510                                          aa->aa_page_count, aa->aa_ppga,
1511                                          cksum_type_unpack(aa->aa_oa->o_flags)))
1512                         RETURN(-EAGAIN);
1513
1514                 rc = check_write_rcs(req, aa->aa_requested_nob,aa->aa_nio_count,
1515                                      aa->aa_page_count, aa->aa_ppga);
1516                 GOTO(out, rc);
1517         }
1518
1519         /* The rest of this function executes only for OST_READs */
1520
1521         /* if unwrap_bulk failed, return -EAGAIN to retry */
1522         rc = sptlrpc_cli_unwrap_bulk_read(req, req->rq_bulk, rc);
1523         if (rc < 0)
1524                 GOTO(out, rc = -EAGAIN);
1525
1526         if (rc > aa->aa_requested_nob) {
1527                 CERROR("Unexpected rc %d (%d requested)\n", rc,
1528                        aa->aa_requested_nob);
1529                 RETURN(-EPROTO);
1530         }
1531
1532         if (rc != req->rq_bulk->bd_nob_transferred) {
1533                 CERROR ("Unexpected rc %d (%d transferred)\n",
1534                         rc, req->rq_bulk->bd_nob_transferred);
1535                 return (-EPROTO);
1536         }
1537
1538         if (rc < aa->aa_requested_nob)
1539                 handle_short_read(rc, aa->aa_page_count, aa->aa_ppga);
1540
1541         if (body->oa.o_valid & OBD_MD_FLCKSUM) {
1542                 static int cksum_counter;
1543                 __u32      server_cksum = body->oa.o_cksum;
1544                 char      *via;
1545                 char      *router;
1546                 cksum_type_t cksum_type;
1547
1548                 if (body->oa.o_valid & OBD_MD_FLFLAGS)
1549                         cksum_type = cksum_type_unpack(body->oa.o_flags);
1550                 else
1551                         cksum_type = OBD_CKSUM_CRC32;
1552                 client_cksum = osc_checksum_bulk(rc, aa->aa_page_count,
1553                                                  aa->aa_ppga, OST_READ,
1554                                                  cksum_type);
1555
1556                 if (peer->nid == req->rq_bulk->bd_sender) {
1557                         via = router = "";
1558                 } else {
1559                         via = " via ";
1560                         router = libcfs_nid2str(req->rq_bulk->bd_sender);
1561                 }
1562
1563                 if (server_cksum == ~0 && rc > 0) {
1564                         CERROR("Protocol error: server %s set the 'checksum' "
1565                                "bit, but didn't send a checksum.  Not fatal, "
1566                                "but please notify on http://bugzilla.lustre.org/\n",
1567                                libcfs_nid2str(peer->nid));
1568                 } else if (server_cksum != client_cksum) {
1569                         LCONSOLE_ERROR_MSG(0x133, "%s: BAD READ CHECKSUM: from "
1570                                            "%s%s%s inum "LPU64"/"LPU64" object "
1571                                            LPU64"/"LPU64" extent "
1572                                            "["LPU64"-"LPU64"]\n",
1573                                            req->rq_import->imp_obd->obd_name,
1574                                            libcfs_nid2str(peer->nid),
1575                                            via, router,
1576                                            body->oa.o_valid & OBD_MD_FLFID ?
1577                                                 body->oa.o_fid : (__u64)0,
1578                                            body->oa.o_valid & OBD_MD_FLFID ?
1579                                                 body->oa.o_generation :(__u64)0,
1580                                            body->oa.o_id,
1581                                            body->oa.o_valid & OBD_MD_FLGROUP ?
1582                                                 body->oa.o_gr : (__u64)0,
1583                                            aa->aa_ppga[0]->off,
1584                                            aa->aa_ppga[aa->aa_page_count-1]->off +
1585                                            aa->aa_ppga[aa->aa_page_count-1]->count -
1586                                                                         1);
1587                         CERROR("client %x, server %x, cksum_type %x\n",
1588                                client_cksum, server_cksum, cksum_type);
1589                         cksum_counter = 0;
1590                         aa->aa_oa->o_cksum = client_cksum;
1591                         rc = -EAGAIN;
1592                 } else {
1593                         cksum_counter++;
1594                         CDEBUG(D_PAGE, "checksum %x confirmed\n", client_cksum);
1595                         rc = 0;
1596                 }
1597         } else if (unlikely(client_cksum)) {
1598                 static int cksum_missed;
1599
1600                 cksum_missed++;
1601                 if ((cksum_missed & (-cksum_missed)) == cksum_missed)
1602                         CERROR("Checksum %u requested from %s but not sent\n",
1603                                cksum_missed, libcfs_nid2str(peer->nid));
1604         } else {
1605                 rc = 0;
1606         }
1607 out:
1608         if (rc >= 0)
1609                 lustre_get_wire_obdo(aa->aa_oa, &body->oa);
1610
1611         RETURN(rc);
1612 }
1613
1614 static int osc_brw_internal(int cmd, struct obd_export *exp, struct obdo *oa,
1615                             struct lov_stripe_md *lsm,
1616                             obd_count page_count, struct brw_page **pga,
1617                             struct obd_capa *ocapa)
1618 {
1619         struct ptlrpc_request *req;
1620         int                    rc;
1621         cfs_waitq_t            waitq;
1622         int                    resends = 0;
1623         struct l_wait_info     lwi;
1624
1625         ENTRY;
1626
1627         cfs_waitq_init(&waitq);
1628
1629 restart_bulk:
1630         rc = osc_brw_prep_request(cmd, &exp->exp_obd->u.cli, oa, lsm,
1631                                   page_count, pga, &req, ocapa, 0);
1632         if (rc != 0)
1633                 return (rc);
1634
1635         rc = ptlrpc_queue_wait(req);
1636
1637         if (rc == -ETIMEDOUT && req->rq_resend) {
1638                 DEBUG_REQ(D_HA, req,  "BULK TIMEOUT");
1639                 ptlrpc_req_finished(req);
1640                 goto restart_bulk;
1641         }
1642
1643         rc = osc_brw_fini_request(req, rc);
1644
1645         ptlrpc_req_finished(req);
1646         if (osc_recoverable_error(rc)) {
1647                 resends++;
1648                 if (!osc_should_resend(resends, &exp->exp_obd->u.cli)) {
1649                         CERROR("too many resend retries, returning error\n");
1650                         RETURN(-EIO);
1651                 }
1652
1653                 lwi = LWI_TIMEOUT_INTR(cfs_time_seconds(resends), NULL, NULL, NULL);
1654                 l_wait_event(waitq, 0, &lwi);
1655
1656                 goto restart_bulk;
1657         }
1658
1659         RETURN (rc);
1660 }
1661
1662 int osc_brw_redo_request(struct ptlrpc_request *request,
1663                          struct osc_brw_async_args *aa)
1664 {
1665         struct ptlrpc_request *new_req;
1666         struct ptlrpc_request_set *set = request->rq_set;
1667         struct osc_brw_async_args *new_aa;
1668         struct osc_async_page *oap;
1669         int rc = 0;
1670         ENTRY;
1671
1672         if (!osc_should_resend(aa->aa_resends, aa->aa_cli)) {
1673                 CERROR("too many resend retries, returning error\n");
1674                 RETURN(-EIO);
1675         }
1676
1677         DEBUG_REQ(D_ERROR, request, "redo for recoverable error");
1678
1679         rc = osc_brw_prep_request(lustre_msg_get_opc(request->rq_reqmsg) ==
1680                                         OST_WRITE ? OBD_BRW_WRITE :OBD_BRW_READ,
1681                                   aa->aa_cli, aa->aa_oa,
1682                                   NULL /* lsm unused by osc currently */,
1683                                   aa->aa_page_count, aa->aa_ppga,
1684                                   &new_req, aa->aa_ocapa, 0);
1685         if (rc)
1686                 RETURN(rc);
1687
1688         client_obd_list_lock(&aa->aa_cli->cl_loi_list_lock);
1689
1690         list_for_each_entry(oap, &aa->aa_oaps, oap_rpc_item) {
1691                 if (oap->oap_request != NULL) {
1692                         LASSERTF(request == oap->oap_request,
1693                                  "request %p != oap_request %p\n",
1694                                  request, oap->oap_request);
1695                         if (oap->oap_interrupted) {
1696                                 client_obd_list_unlock(&aa->aa_cli->cl_loi_list_lock);
1697                                 ptlrpc_req_finished(new_req);
1698                                 RETURN(-EINTR);
1699                         }
1700                 }
1701         }
1702         /* New request takes over pga and oaps from old request.
1703          * Note that copying a list_head doesn't work, need to move it... */
1704         aa->aa_resends++;
1705         new_req->rq_interpret_reply = request->rq_interpret_reply;
1706         new_req->rq_async_args = request->rq_async_args;
1707         new_req->rq_sent = cfs_time_current_sec() + aa->aa_resends;
1708
1709         new_aa = ptlrpc_req_async_args(new_req);
1710
1711         CFS_INIT_LIST_HEAD(&new_aa->aa_oaps);
1712         list_splice(&aa->aa_oaps, &new_aa->aa_oaps);
1713         CFS_INIT_LIST_HEAD(&aa->aa_oaps);
1714
1715         list_for_each_entry(oap, &new_aa->aa_oaps, oap_rpc_item) {
1716                 if (oap->oap_request) {
1717                         ptlrpc_req_finished(oap->oap_request);
1718                         oap->oap_request = ptlrpc_request_addref(new_req);
1719                 }
1720         }
1721
1722         new_aa->aa_ocapa = aa->aa_ocapa;
1723         aa->aa_ocapa = NULL;
1724
1725         /* use ptlrpc_set_add_req is safe because interpret functions work
1726          * in check_set context. only one way exist with access to request
1727          * from different thread got -EINTR - this way protected with
1728          * cl_loi_list_lock */
1729         ptlrpc_set_add_req(set, new_req);
1730
1731         client_obd_list_unlock(&aa->aa_cli->cl_loi_list_lock);
1732
1733         DEBUG_REQ(D_INFO, new_req, "new request");
1734         RETURN(0);
1735 }
1736
1737 /*
1738  * ugh, we want disk allocation on the target to happen in offset order.  we'll
1739  * follow sedgewicks advice and stick to the dead simple shellsort -- it'll do
1740  * fine for our small page arrays and doesn't require allocation.  its an
1741  * insertion sort that swaps elements that are strides apart, shrinking the
1742  * stride down until its '1' and the array is sorted.
1743  */
1744 static void sort_brw_pages(struct brw_page **array, int num)
1745 {
1746         int stride, i, j;
1747         struct brw_page *tmp;
1748
1749         if (num == 1)
1750                 return;
1751         for (stride = 1; stride < num ; stride = (stride * 3) + 1)
1752                 ;
1753
1754         do {
1755                 stride /= 3;
1756                 for (i = stride ; i < num ; i++) {
1757                         tmp = array[i];
1758                         j = i;
1759                         while (j >= stride && array[j - stride]->off > tmp->off) {
1760                                 array[j] = array[j - stride];
1761                                 j -= stride;
1762                         }
1763                         array[j] = tmp;
1764                 }
1765         } while (stride > 1);
1766 }
1767
1768 static obd_count max_unfragmented_pages(struct brw_page **pg, obd_count pages)
1769 {
1770         int count = 1;
1771         int offset;
1772         int i = 0;
1773
1774         LASSERT (pages > 0);
1775         offset = pg[i]->off & ~CFS_PAGE_MASK;
1776
1777         for (;;) {
1778                 pages--;
1779                 if (pages == 0)         /* that's all */
1780                         return count;
1781
1782                 if (offset + pg[i]->count < CFS_PAGE_SIZE)
1783                         return count;   /* doesn't end on page boundary */
1784
1785                 i++;
1786                 offset = pg[i]->off & ~CFS_PAGE_MASK;
1787                 if (offset != 0)        /* doesn't start on page boundary */
1788                         return count;
1789
1790                 count++;
1791         }
1792 }
1793
1794 static struct brw_page **osc_build_ppga(struct brw_page *pga, obd_count count)
1795 {
1796         struct brw_page **ppga;
1797         int i;
1798
1799         OBD_ALLOC(ppga, sizeof(*ppga) * count);
1800         if (ppga == NULL)
1801                 return NULL;
1802
1803         for (i = 0; i < count; i++)
1804                 ppga[i] = pga + i;
1805         return ppga;
1806 }
1807
1808 static void osc_release_ppga(struct brw_page **ppga, obd_count count)
1809 {
1810         LASSERT(ppga != NULL);
1811         OBD_FREE(ppga, sizeof(*ppga) * count);
1812 }
1813
1814 static int osc_brw(int cmd, struct obd_export *exp, struct obd_info *oinfo,
1815                    obd_count page_count, struct brw_page *pga,
1816                    struct obd_trans_info *oti)
1817 {
1818         struct obdo *saved_oa = NULL;
1819         struct brw_page **ppga, **orig;
1820         struct obd_import *imp = class_exp2cliimp(exp);
1821         struct client_obd *cli;
1822         int rc, page_count_orig;
1823         ENTRY;
1824
1825         LASSERT((imp != NULL) && (imp->imp_obd != NULL));
1826         cli = &imp->imp_obd->u.cli;
1827
1828         if (cmd & OBD_BRW_CHECK) {
1829                 /* The caller just wants to know if there's a chance that this
1830                  * I/O can succeed */
1831
1832                 if (imp->imp_invalid)
1833                         RETURN(-EIO);
1834                 RETURN(0);
1835         }
1836
1837         /* test_brw with a failed create can trip this, maybe others. */
1838         LASSERT(cli->cl_max_pages_per_rpc);
1839
1840         rc = 0;
1841
1842         orig = ppga = osc_build_ppga(pga, page_count);
1843         if (ppga == NULL)
1844                 RETURN(-ENOMEM);
1845         page_count_orig = page_count;
1846
1847         sort_brw_pages(ppga, page_count);
1848         while (page_count) {
1849                 obd_count pages_per_brw;
1850
1851                 if (page_count > cli->cl_max_pages_per_rpc)
1852                         pages_per_brw = cli->cl_max_pages_per_rpc;
1853                 else
1854                         pages_per_brw = page_count;
1855
1856                 pages_per_brw = max_unfragmented_pages(ppga, pages_per_brw);
1857
1858                 if (saved_oa != NULL) {
1859                         /* restore previously saved oa */
1860                         *oinfo->oi_oa = *saved_oa;
1861                 } else if (page_count > pages_per_brw) {
1862                         /* save a copy of oa (brw will clobber it) */
1863                         OBDO_ALLOC(saved_oa);
1864                         if (saved_oa == NULL)
1865                                 GOTO(out, rc = -ENOMEM);
1866                         *saved_oa = *oinfo->oi_oa;
1867                 }
1868
1869                 rc = osc_brw_internal(cmd, exp, oinfo->oi_oa, oinfo->oi_md,
1870                                       pages_per_brw, ppga, oinfo->oi_capa);
1871
1872                 if (rc != 0)
1873                         break;
1874
1875                 page_count -= pages_per_brw;
1876                 ppga += pages_per_brw;
1877         }
1878
1879 out:
1880         osc_release_ppga(orig, page_count_orig);
1881
1882         if (saved_oa != NULL)
1883                 OBDO_FREE(saved_oa);
1884
1885         RETURN(rc);
1886 }
1887
1888 /* The companion to osc_enter_cache(), called when @oap is no longer part of
1889  * the dirty accounting.  Writeback completes or truncate happens before
1890  * writing starts.  Must be called with the loi lock held. */
1891 static void osc_exit_cache(struct client_obd *cli, struct osc_async_page *oap,
1892                            int sent)
1893 {
1894         osc_release_write_grant(cli, &oap->oap_brw_page, sent);
1895 }
1896
1897
1898 /* This maintains the lists of pending pages to read/write for a given object
1899  * (lop).  This is used by osc_check_rpcs->osc_next_loi() and loi_list_maint()
1900  * to quickly find objects that are ready to send an RPC. */
1901 static int lop_makes_rpc(struct client_obd *cli, struct loi_oap_pages *lop,
1902                          int cmd)
1903 {
1904         int optimal;
1905         ENTRY;
1906
1907         if (lop->lop_num_pending == 0)
1908                 RETURN(0);
1909
1910         /* if we have an invalid import we want to drain the queued pages
1911          * by forcing them through rpcs that immediately fail and complete
1912          * the pages.  recovery relies on this to empty the queued pages
1913          * before canceling the locks and evicting down the llite pages */
1914         if (cli->cl_import == NULL || cli->cl_import->imp_invalid)
1915                 RETURN(1);
1916
1917         /* stream rpcs in queue order as long as as there is an urgent page
1918          * queued.  this is our cheap solution for good batching in the case
1919          * where writepage marks some random page in the middle of the file
1920          * as urgent because of, say, memory pressure */
1921         if (!list_empty(&lop->lop_urgent)) {
1922                 CDEBUG(D_CACHE, "urgent request forcing RPC\n");
1923                 RETURN(1);
1924         }
1925         /* fire off rpcs when we have 'optimal' rpcs as tuned for the wire. */
1926         optimal = cli->cl_max_pages_per_rpc;
1927         if (cmd & OBD_BRW_WRITE) {
1928                 /* trigger a write rpc stream as long as there are dirtiers
1929                  * waiting for space.  as they're waiting, they're not going to
1930                  * create more pages to coallesce with what's waiting.. */
1931                 if (!list_empty(&cli->cl_cache_waiters)) {
1932                         CDEBUG(D_CACHE, "cache waiters forcing RPC\n");
1933                         RETURN(1);
1934                 }
1935                 /* +16 to avoid triggering rpcs that would want to include pages
1936                  * that are being queued but which can't be made ready until
1937                  * the queuer finishes with the page. this is a wart for
1938                  * llite::commit_write() */
1939                 optimal += 16;
1940         }
1941         if (lop->lop_num_pending >= optimal)
1942                 RETURN(1);
1943
1944         RETURN(0);
1945 }
1946
1947 static int lop_makes_hprpc(struct loi_oap_pages *lop)
1948 {
1949         struct osc_async_page *oap;
1950         ENTRY;
1951
1952         if (list_empty(&lop->lop_urgent))
1953                 RETURN(0);
1954
1955         oap = list_entry(lop->lop_urgent.next,
1956                          struct osc_async_page, oap_urgent_item);
1957
1958         if (oap->oap_async_flags & ASYNC_HP) {
1959                 CDEBUG(D_CACHE, "hp request forcing RPC\n");
1960                 RETURN(1);
1961         }
1962
1963         RETURN(0);
1964 }
1965
1966 static void on_list(struct list_head *item, struct list_head *list,
1967                     int should_be_on)
1968 {
1969         if (list_empty(item) && should_be_on)
1970                 list_add_tail(item, list);
1971         else if (!list_empty(item) && !should_be_on)
1972                 list_del_init(item);
1973 }
1974
1975 /* maintain the loi's cli list membership invariants so that osc_send_oap_rpc
1976  * can find pages to build into rpcs quickly */
1977 void loi_list_maint(struct client_obd *cli, struct lov_oinfo *loi)
1978 {
1979         if (lop_makes_hprpc(&loi->loi_write_lop) ||
1980             lop_makes_hprpc(&loi->loi_read_lop)) {
1981                 /* HP rpc */
1982                 on_list(&loi->loi_ready_item, &cli->cl_loi_ready_list, 0);
1983                 on_list(&loi->loi_hp_ready_item, &cli->cl_loi_hp_ready_list, 1);
1984         } else {
1985                 on_list(&loi->loi_hp_ready_item, &cli->cl_loi_hp_ready_list, 0);
1986                 on_list(&loi->loi_ready_item, &cli->cl_loi_ready_list,
1987                         lop_makes_rpc(cli, &loi->loi_write_lop, OBD_BRW_WRITE)||
1988                         lop_makes_rpc(cli, &loi->loi_read_lop, OBD_BRW_READ));
1989         }
1990
1991         on_list(&loi->loi_write_item, &cli->cl_loi_write_list,
1992                 loi->loi_write_lop.lop_num_pending);
1993
1994         on_list(&loi->loi_read_item, &cli->cl_loi_read_list,
1995                 loi->loi_read_lop.lop_num_pending);
1996 }
1997
1998 static void lop_update_pending(struct client_obd *cli,
1999                                struct loi_oap_pages *lop, int cmd, int delta)
2000 {
2001         lop->lop_num_pending += delta;
2002         if (cmd & OBD_BRW_WRITE)
2003                 cli->cl_pending_w_pages += delta;
2004         else
2005                 cli->cl_pending_r_pages += delta;
2006 }
2007
2008 /**
2009  * this is called when a sync waiter receives an interruption.  Its job is to
2010  * get the caller woken as soon as possible.  If its page hasn't been put in an
2011  * rpc yet it can dequeue immediately.  Otherwise it has to mark the rpc as
2012  * desiring interruption which will forcefully complete the rpc once the rpc
2013  * has timed out.
2014  */
2015 int osc_oap_interrupted(const struct lu_env *env, struct osc_async_page *oap)
2016 {
2017         struct loi_oap_pages *lop;
2018         struct lov_oinfo *loi;
2019         int rc = -EBUSY;
2020         ENTRY;
2021
2022         LASSERT(!oap->oap_interrupted);
2023         oap->oap_interrupted = 1;
2024
2025         /* ok, it's been put in an rpc. only one oap gets a request reference */
2026         if (oap->oap_request != NULL) {
2027                 ptlrpc_mark_interrupted(oap->oap_request);
2028                 ptlrpcd_wake(oap->oap_request);
2029                 ptlrpc_req_finished(oap->oap_request);
2030                 oap->oap_request = NULL;
2031         }
2032
2033         /*
2034          * page completion may be called only if ->cpo_prep() method was
2035          * executed by osc_io_submit(), that also adds page the to pending list
2036          */
2037         if (!list_empty(&oap->oap_pending_item)) {
2038                 list_del_init(&oap->oap_pending_item);
2039                 list_del_init(&oap->oap_urgent_item);
2040
2041                 loi = oap->oap_loi;
2042                 lop = (oap->oap_cmd & OBD_BRW_WRITE) ?
2043                         &loi->loi_write_lop : &loi->loi_read_lop;
2044                 lop_update_pending(oap->oap_cli, lop, oap->oap_cmd, -1);
2045                 loi_list_maint(oap->oap_cli, oap->oap_loi);
2046                 rc = oap->oap_caller_ops->ap_completion(env,
2047                                           oap->oap_caller_data,
2048                                           oap->oap_cmd, NULL, -EINTR);
2049         }
2050
2051         RETURN(rc);
2052 }
2053
2054 /* this is trying to propogate async writeback errors back up to the
2055  * application.  As an async write fails we record the error code for later if
2056  * the app does an fsync.  As long as errors persist we force future rpcs to be
2057  * sync so that the app can get a sync error and break the cycle of queueing
2058  * pages for which writeback will fail. */
2059 static void osc_process_ar(struct osc_async_rc *ar, __u64 xid,
2060                            int rc)
2061 {
2062         if (rc) {
2063                 if (!ar->ar_rc)
2064                         ar->ar_rc = rc;
2065
2066                 ar->ar_force_sync = 1;
2067                 ar->ar_min_xid = ptlrpc_sample_next_xid();
2068                 return;
2069
2070         }
2071
2072         if (ar->ar_force_sync && (xid >= ar->ar_min_xid))
2073                 ar->ar_force_sync = 0;
2074 }
2075
2076 void osc_oap_to_pending(struct osc_async_page *oap)
2077 {
2078         struct loi_oap_pages *lop;
2079
2080         if (oap->oap_cmd & OBD_BRW_WRITE)
2081                 lop = &oap->oap_loi->loi_write_lop;
2082         else
2083                 lop = &oap->oap_loi->loi_read_lop;
2084
2085         if (oap->oap_async_flags & ASYNC_HP)
2086                 list_add(&oap->oap_urgent_item, &lop->lop_urgent);
2087         else if (oap->oap_async_flags & ASYNC_URGENT)
2088                 list_add_tail(&oap->oap_urgent_item, &lop->lop_urgent);
2089         list_add_tail(&oap->oap_pending_item, &lop->lop_pending);
2090         lop_update_pending(oap->oap_cli, lop, oap->oap_cmd, 1);
2091 }
2092
2093 /* this must be called holding the loi list lock to give coverage to exit_cache,
2094  * async_flag maintenance, and oap_request */
2095 static void osc_ap_completion(const struct lu_env *env,
2096                               struct client_obd *cli, struct obdo *oa,
2097                               struct osc_async_page *oap, int sent, int rc)
2098 {
2099         __u64 xid = 0;
2100
2101         ENTRY;
2102         if (oap->oap_request != NULL) {
2103                 xid = ptlrpc_req_xid(oap->oap_request);
2104                 ptlrpc_req_finished(oap->oap_request);
2105                 oap->oap_request = NULL;
2106         }
2107
2108         spin_lock(&oap->oap_lock);
2109         oap->oap_async_flags = 0;
2110         spin_unlock(&oap->oap_lock);
2111         oap->oap_interrupted = 0;
2112
2113         if (oap->oap_cmd & OBD_BRW_WRITE) {
2114                 osc_process_ar(&cli->cl_ar, xid, rc);
2115                 osc_process_ar(&oap->oap_loi->loi_ar, xid, rc);
2116         }
2117
2118         if (rc == 0 && oa != NULL) {
2119                 if (oa->o_valid & OBD_MD_FLBLOCKS)
2120                         oap->oap_loi->loi_lvb.lvb_blocks = oa->o_blocks;
2121                 if (oa->o_valid & OBD_MD_FLMTIME)
2122                         oap->oap_loi->loi_lvb.lvb_mtime = oa->o_mtime;
2123                 if (oa->o_valid & OBD_MD_FLATIME)
2124                         oap->oap_loi->loi_lvb.lvb_atime = oa->o_atime;
2125                 if (oa->o_valid & OBD_MD_FLCTIME)
2126                         oap->oap_loi->loi_lvb.lvb_ctime = oa->o_ctime;
2127         }
2128
2129         rc = oap->oap_caller_ops->ap_completion(env, oap->oap_caller_data,
2130                                                 oap->oap_cmd, oa, rc);
2131
2132         /* ll_ap_completion (from llite) drops PG_locked. so, a new
2133          * I/O on the page could start, but OSC calls it under lock
2134          * and thus we can add oap back to pending safely */
2135         if (rc)
2136                 /* upper layer wants to leave the page on pending queue */
2137                 osc_oap_to_pending(oap);
2138         else
2139                 osc_exit_cache(cli, oap, sent);
2140         EXIT;
2141 }
2142
2143 static int brw_interpret(const struct lu_env *env,
2144                          struct ptlrpc_request *req, void *data, int rc)
2145 {
2146         struct osc_brw_async_args *aa = data;
2147         struct client_obd *cli;
2148         int async;
2149         ENTRY;
2150
2151         rc = osc_brw_fini_request(req, rc);
2152         CDEBUG(D_INODE, "request %p aa %p rc %d\n", req, aa, rc);
2153         if (osc_recoverable_error(rc)) {
2154                 rc = osc_brw_redo_request(req, aa);
2155                 if (rc == 0)
2156                         RETURN(0);
2157         }
2158
2159         if (aa->aa_ocapa) {
2160                 capa_put(aa->aa_ocapa);
2161                 aa->aa_ocapa = NULL;
2162         }
2163
2164         cli = aa->aa_cli;
2165
2166         client_obd_list_lock(&cli->cl_loi_list_lock);
2167
2168         /* We need to decrement before osc_ap_completion->osc_wake_cache_waiters
2169          * is called so we know whether to go to sync BRWs or wait for more
2170          * RPCs to complete */
2171         if (lustre_msg_get_opc(req->rq_reqmsg) == OST_WRITE)
2172                 cli->cl_w_in_flight--;
2173         else
2174                 cli->cl_r_in_flight--;
2175
2176         async = list_empty(&aa->aa_oaps);
2177         if (!async) { /* from osc_send_oap_rpc() */
2178                 struct osc_async_page *oap, *tmp;
2179                 /* the caller may re-use the oap after the completion call so
2180                  * we need to clean it up a little */
2181                 list_for_each_entry_safe(oap, tmp, &aa->aa_oaps, oap_rpc_item) {
2182                         list_del_init(&oap->oap_rpc_item);
2183                         osc_ap_completion(env, cli, aa->aa_oa, oap, 1, rc);
2184                 }
2185                 OBDO_FREE(aa->aa_oa);
2186         } else { /* from async_internal() */
2187                 int i;
2188                 for (i = 0; i < aa->aa_page_count; i++)
2189                         osc_release_write_grant(aa->aa_cli, aa->aa_ppga[i], 1);
2190
2191                 if (aa->aa_oa->o_flags & OBD_FL_TEMPORARY)
2192                         OBDO_FREE(aa->aa_oa);
2193         }
2194         osc_wake_cache_waiters(cli);
2195         osc_check_rpcs(env, cli);
2196         client_obd_list_unlock(&cli->cl_loi_list_lock);
2197         if (!async)
2198                 cl_req_completion(env, aa->aa_clerq, rc);
2199         osc_release_ppga(aa->aa_ppga, aa->aa_page_count);
2200         RETURN(rc);
2201 }
2202
2203 static struct ptlrpc_request *osc_build_req(const struct lu_env *env,
2204                                             struct client_obd *cli,
2205                                             struct list_head *rpc_list,
2206                                             int page_count, int cmd)
2207 {
2208         struct ptlrpc_request *req;
2209         struct brw_page **pga = NULL;
2210         struct osc_brw_async_args *aa;
2211         struct obdo *oa = NULL;
2212         const struct obd_async_page_ops *ops = NULL;
2213         void *caller_data = NULL;
2214         struct osc_async_page *oap;
2215         struct osc_async_page *tmp;
2216         struct ost_body *body;
2217         struct cl_req *clerq = NULL;
2218         enum cl_req_type crt = (cmd & OBD_BRW_WRITE) ? CRT_WRITE : CRT_READ;
2219         struct ldlm_lock *lock = NULL;
2220         struct cl_req_attr crattr;
2221         int i, rc;
2222
2223         ENTRY;
2224         LASSERT(!list_empty(rpc_list));
2225
2226         memset(&crattr, 0, sizeof crattr);
2227         OBD_ALLOC(pga, sizeof(*pga) * page_count);
2228         if (pga == NULL)
2229                 GOTO(out, req = ERR_PTR(-ENOMEM));
2230
2231         OBDO_ALLOC(oa);
2232         if (oa == NULL)
2233                 GOTO(out, req = ERR_PTR(-ENOMEM));
2234
2235         i = 0;
2236         list_for_each_entry(oap, rpc_list, oap_rpc_item) {
2237                 struct cl_page *page = osc_oap2cl_page(oap);
2238                 if (ops == NULL) {
2239                         ops = oap->oap_caller_ops;
2240                         caller_data = oap->oap_caller_data;
2241
2242                         clerq = cl_req_alloc(env, page, crt,
2243                                              1 /* only 1-object rpcs for
2244                                                 * now */);
2245                         if (IS_ERR(clerq))
2246                                 GOTO(out, req = (void *)clerq);
2247                         lock = oap->oap_ldlm_lock;
2248                 }
2249                 pga[i] = &oap->oap_brw_page;
2250                 pga[i]->off = oap->oap_obj_off + oap->oap_page_off;
2251                 CDEBUG(0, "put page %p index %lu oap %p flg %x to pga\n",
2252                        pga[i]->pg, cfs_page_index(oap->oap_page), oap, pga[i]->flag);
2253                 i++;
2254                 cl_req_page_add(env, clerq, page);
2255         }
2256
2257         /* always get the data for the obdo for the rpc */
2258         LASSERT(ops != NULL);
2259         crattr.cra_oa = oa;
2260         crattr.cra_capa = NULL;
2261         cl_req_attr_set(env, clerq, &crattr, ~0ULL);
2262         if (lock) {
2263                 oa->o_handle = lock->l_remote_handle;
2264                 oa->o_valid |= OBD_MD_FLHANDLE;
2265         }
2266
2267         rc = cl_req_prep(env, clerq);
2268         if (rc != 0) {
2269                 CERROR("cl_req_prep failed: %d\n", rc);
2270                 GOTO(out, req = ERR_PTR(rc));
2271         }
2272
2273         sort_brw_pages(pga, page_count);
2274         rc = osc_brw_prep_request(cmd, cli, oa, NULL, page_count,
2275                                   pga, &req, crattr.cra_capa, 1);
2276         if (rc != 0) {
2277                 CERROR("prep_req failed: %d\n", rc);
2278                 GOTO(out, req = ERR_PTR(rc));
2279         }
2280
2281         /* Need to update the timestamps after the request is built in case
2282          * we race with setattr (locally or in queue at OST).  If OST gets
2283          * later setattr before earlier BRW (as determined by the request xid),
2284          * the OST will not use BRW timestamps.  Sadly, there is no obvious
2285          * way to do this in a single call.  bug 10150 */
2286         body = req_capsule_client_get(&req->rq_pill, &RMF_OST_BODY);
2287         cl_req_attr_set(env, clerq, &crattr,
2288                         OBD_MD_FLMTIME|OBD_MD_FLCTIME|OBD_MD_FLATIME);
2289
2290         CLASSERT(sizeof(*aa) <= sizeof(req->rq_async_args));
2291         aa = ptlrpc_req_async_args(req);
2292         CFS_INIT_LIST_HEAD(&aa->aa_oaps);
2293         list_splice(rpc_list, &aa->aa_oaps);
2294         CFS_INIT_LIST_HEAD(rpc_list);
2295         aa->aa_clerq = clerq;
2296 out:
2297         capa_put(crattr.cra_capa);
2298         if (IS_ERR(req)) {
2299                 if (oa)
2300                         OBDO_FREE(oa);
2301                 if (pga)
2302                         OBD_FREE(pga, sizeof(*pga) * page_count);
2303                 /* this should happen rarely and is pretty bad, it makes the
2304                  * pending list not follow the dirty order */
2305                 client_obd_list_lock(&cli->cl_loi_list_lock);
2306                 list_for_each_entry_safe(oap, tmp, rpc_list, oap_rpc_item) {
2307                         list_del_init(&oap->oap_rpc_item);
2308
2309                         /* queued sync pages can be torn down while the pages
2310                          * were between the pending list and the rpc */
2311                         if (oap->oap_interrupted) {
2312                                 CDEBUG(D_INODE, "oap %p interrupted\n", oap);
2313                                 osc_ap_completion(env, cli, NULL, oap, 0,
2314                                                   oap->oap_count);
2315                                 continue;
2316                         }
2317                         osc_ap_completion(env, cli, NULL, oap, 0, PTR_ERR(req));
2318                 }
2319                 if (clerq && !IS_ERR(clerq))
2320                         cl_req_completion(env, clerq, PTR_ERR(req));
2321         }
2322         RETURN(req);
2323 }
2324
2325 /**
2326  * prepare pages for ASYNC io and put pages in send queue.
2327  *
2328  * \param cmd OBD_BRW_* macroses
2329  * \param lop pending pages
2330  *
2331  * \return zero if pages successfully add to send queue.
2332  * \return not zere if error occurring.
2333  */
2334 static int
2335 osc_send_oap_rpc(const struct lu_env *env, struct client_obd *cli,
2336                  struct lov_oinfo *loi,
2337                  int cmd, struct loi_oap_pages *lop)
2338 {
2339         struct ptlrpc_request *req;
2340         obd_count page_count = 0;
2341         struct osc_async_page *oap = NULL, *tmp;
2342         struct osc_brw_async_args *aa;
2343         const struct obd_async_page_ops *ops;
2344         CFS_LIST_HEAD(rpc_list);
2345         CFS_LIST_HEAD(tmp_list);
2346         unsigned int ending_offset;
2347         unsigned  starting_offset = 0;
2348         int srvlock = 0;
2349         struct cl_object *clob = NULL;
2350         ENTRY;
2351
2352         /* ASYNC_HP pages first. At present, when the lock the pages is
2353          * to be canceled, the pages covered by the lock will be sent out
2354          * with ASYNC_HP. We have to send out them as soon as possible. */
2355         list_for_each_entry_safe(oap, tmp, &lop->lop_urgent, oap_urgent_item) {
2356                 if (oap->oap_async_flags & ASYNC_HP) 
2357                         list_move(&oap->oap_pending_item, &tmp_list);
2358                 else
2359                         list_move_tail(&oap->oap_pending_item, &tmp_list);
2360                 if (++page_count >= cli->cl_max_pages_per_rpc)
2361                         break;
2362         }
2363
2364         list_splice(&tmp_list, &lop->lop_pending);
2365         page_count = 0;
2366
2367         /* first we find the pages we're allowed to work with */
2368         list_for_each_entry_safe(oap, tmp, &lop->lop_pending,
2369                                  oap_pending_item) {
2370                 ops = oap->oap_caller_ops;
2371
2372                 LASSERTF(oap->oap_magic == OAP_MAGIC, "Bad oap magic: oap %p, "
2373                          "magic 0x%x\n", oap, oap->oap_magic);
2374
2375                 if (clob == NULL) {
2376                         /* pin object in memory, so that completion call-backs
2377                          * can be safely called under client_obd_list lock. */
2378                         clob = osc_oap2cl_page(oap)->cp_obj;
2379                         cl_object_get(clob);
2380                 }
2381
2382                 if (page_count != 0 &&
2383                     srvlock != !!(oap->oap_brw_flags & OBD_BRW_SRVLOCK)) {
2384                         CDEBUG(D_PAGE, "SRVLOCK flag mismatch,"
2385                                " oap %p, page %p, srvlock %u\n",
2386                                oap, oap->oap_brw_page.pg, (unsigned)!srvlock);
2387                         break;
2388                 }
2389
2390                 /* If there is a gap at the start of this page, it can't merge
2391                  * with any previous page, so we'll hand the network a
2392                  * "fragmented" page array that it can't transfer in 1 RDMA */
2393                 if (page_count != 0 && oap->oap_page_off != 0)
2394                         break;
2395
2396                 /* in llite being 'ready' equates to the page being locked
2397                  * until completion unlocks it.  commit_write submits a page
2398                  * as not ready because its unlock will happen unconditionally
2399                  * as the call returns.  if we race with commit_write giving
2400                  * us that page we dont' want to create a hole in the page
2401                  * stream, so we stop and leave the rpc to be fired by
2402                  * another dirtier or kupdated interval (the not ready page
2403                  * will still be on the dirty list).  we could call in
2404                  * at the end of ll_file_write to process the queue again. */
2405                 if (!(oap->oap_async_flags & ASYNC_READY)) {
2406                         int rc = ops->ap_make_ready(env, oap->oap_caller_data,
2407                                                     cmd);
2408                         if (rc < 0)
2409                                 CDEBUG(D_INODE, "oap %p page %p returned %d "
2410                                                 "instead of ready\n", oap,
2411                                                 oap->oap_page, rc);
2412                         switch (rc) {
2413                         case -EAGAIN:
2414                                 /* llite is telling us that the page is still
2415                                  * in commit_write and that we should try
2416                                  * and put it in an rpc again later.  we
2417                                  * break out of the loop so we don't create
2418                                  * a hole in the sequence of pages in the rpc
2419                                  * stream.*/
2420                                 oap = NULL;
2421                                 break;
2422                         case -EINTR:
2423                                 /* the io isn't needed.. tell the checks
2424                                  * below to complete the rpc with EINTR */
2425                                 spin_lock(&oap->oap_lock);
2426                                 oap->oap_async_flags |= ASYNC_COUNT_STABLE;
2427                                 spin_unlock(&oap->oap_lock);
2428                                 oap->oap_count = -EINTR;
2429                                 break;
2430                         case 0:
2431                                 spin_lock(&oap->oap_lock);
2432                                 oap->oap_async_flags |= ASYNC_READY;
2433                                 spin_unlock(&oap->oap_lock);
2434                                 break;
2435                         default:
2436                                 LASSERTF(0, "oap %p page %p returned %d "
2437                                             "from make_ready\n", oap,
2438                                             oap->oap_page, rc);
2439                                 break;
2440                         }
2441                 }
2442                 if (oap == NULL)
2443                         break;
2444                 /*
2445                  * Page submitted for IO has to be locked. Either by
2446                  * ->ap_make_ready() or by higher layers.
2447                  */
2448 #if defined(__KERNEL__) && defined(__linux__)
2449                 {
2450                         struct cl_page *page;
2451
2452                         page = osc_oap2cl_page(oap);
2453
2454                         if (page->cp_type == CPT_CACHEABLE &&
2455                             !(PageLocked(oap->oap_page) &&
2456                               (CheckWriteback(oap->oap_page, cmd)))) {
2457                                 CDEBUG(D_PAGE, "page %p lost wb %lx/%x\n",
2458                                        oap->oap_page,
2459                                        (long)oap->oap_page->flags,
2460                                        oap->oap_async_flags);
2461                                 LBUG();
2462                         }
2463                 }
2464 #endif
2465
2466                 /* take the page out of our book-keeping */
2467                 list_del_init(&oap->oap_pending_item);
2468                 lop_update_pending(cli, lop, cmd, -1);
2469                 list_del_init(&oap->oap_urgent_item);
2470
2471                 if (page_count == 0)
2472                         starting_offset = (oap->oap_obj_off+oap->oap_page_off) &
2473                                           (PTLRPC_MAX_BRW_SIZE - 1);
2474
2475                 /* ask the caller for the size of the io as the rpc leaves. */
2476                 if (!(oap->oap_async_flags & ASYNC_COUNT_STABLE)) {
2477                         oap->oap_count =
2478                                 ops->ap_refresh_count(env, oap->oap_caller_data,
2479                                                       cmd);
2480                         LASSERT(oap->oap_page_off + oap->oap_count <= CFS_PAGE_SIZE);
2481                 }
2482                 if (oap->oap_count <= 0) {
2483                         CDEBUG(D_CACHE, "oap %p count %d, completing\n", oap,
2484                                oap->oap_count);
2485                         osc_ap_completion(env, cli, NULL,
2486                                           oap, 0, oap->oap_count);
2487                         continue;
2488                 }
2489
2490                 /* now put the page back in our accounting */
2491                 list_add_tail(&oap->oap_rpc_item, &rpc_list);
2492                 if (page_count == 0)
2493                         srvlock = !!(oap->oap_brw_flags & OBD_BRW_SRVLOCK);
2494                 if (++page_count >= cli->cl_max_pages_per_rpc)
2495                         break;
2496
2497                 /* End on a PTLRPC_MAX_BRW_SIZE boundary.  We want full-sized
2498                  * RPCs aligned on PTLRPC_MAX_BRW_SIZE boundaries to help reads
2499                  * have the same alignment as the initial writes that allocated
2500                  * extents on the server. */
2501                 ending_offset = (oap->oap_obj_off + oap->oap_page_off +
2502                                  oap->oap_count) & (PTLRPC_MAX_BRW_SIZE - 1);
2503                 if (ending_offset == 0)
2504                         break;
2505
2506                 /* If there is a gap at the end of this page, it can't merge
2507                  * with any subsequent pages, so we'll hand the network a
2508                  * "fragmented" page array that it can't transfer in 1 RDMA */
2509                 if (oap->oap_page_off + oap->oap_count < CFS_PAGE_SIZE)
2510                         break;
2511         }
2512
2513         osc_wake_cache_waiters(cli);
2514
2515         loi_list_maint(cli, loi);
2516
2517         client_obd_list_unlock(&cli->cl_loi_list_lock);
2518
2519         if (clob != NULL)
2520                 cl_object_put(env, clob);
2521
2522         if (page_count == 0) {
2523                 client_obd_list_lock(&cli->cl_loi_list_lock);
2524                 RETURN(0);
2525         }
2526
2527         req = osc_build_req(env, cli, &rpc_list, page_count, cmd);
2528         if (IS_ERR(req)) {
2529                 LASSERT(list_empty(&rpc_list));
2530                 loi_list_maint(cli, loi);
2531                 RETURN(PTR_ERR(req));
2532         }
2533
2534         aa = ptlrpc_req_async_args(req);
2535
2536         if (cmd == OBD_BRW_READ) {
2537                 lprocfs_oh_tally_log2(&cli->cl_read_page_hist, page_count);
2538                 lprocfs_oh_tally(&cli->cl_read_rpc_hist, cli->cl_r_in_flight);
2539                 lprocfs_oh_tally_log2(&cli->cl_read_offset_hist,
2540                                       (starting_offset >> CFS_PAGE_SHIFT) + 1);
2541         } else {
2542                 lprocfs_oh_tally_log2(&cli->cl_write_page_hist, page_count);
2543                 lprocfs_oh_tally(&cli->cl_write_rpc_hist,
2544                                  cli->cl_w_in_flight);
2545                 lprocfs_oh_tally_log2(&cli->cl_write_offset_hist,
2546                                       (starting_offset >> CFS_PAGE_SHIFT) + 1);
2547         }
2548         ptlrpc_lprocfs_brw(req, aa->aa_requested_nob);
2549
2550         client_obd_list_lock(&cli->cl_loi_list_lock);
2551
2552         if (cmd == OBD_BRW_READ)
2553                 cli->cl_r_in_flight++;
2554         else
2555                 cli->cl_w_in_flight++;
2556
2557         /* queued sync pages can be torn down while the pages
2558          * were between the pending list and the rpc */
2559         tmp = NULL;
2560         list_for_each_entry(oap, &aa->aa_oaps, oap_rpc_item) {
2561                 /* only one oap gets a request reference */
2562                 if (tmp == NULL)
2563                         tmp = oap;
2564                 if (oap->oap_interrupted && !req->rq_intr) {
2565                         CDEBUG(D_INODE, "oap %p in req %p interrupted\n",
2566                                oap, req);
2567                         ptlrpc_mark_interrupted(req);
2568                 }
2569         }
2570         if (tmp != NULL)
2571                 tmp->oap_request = ptlrpc_request_addref(req);
2572
2573         DEBUG_REQ(D_INODE, req, "%d pages, aa %p. now %dr/%dw in flight",
2574                   page_count, aa, cli->cl_r_in_flight, cli->cl_w_in_flight);
2575
2576         req->rq_interpret_reply = brw_interpret;
2577         ptlrpcd_add_req(req, PSCOPE_BRW);
2578         RETURN(1);
2579 }
2580
2581 #define LOI_DEBUG(LOI, STR, args...)                                     \
2582         CDEBUG(D_INODE, "loi ready %d wr %d:%d rd %d:%d " STR,           \
2583                !list_empty(&(LOI)->loi_ready_item) ||                    \
2584                !list_empty(&(LOI)->loi_hp_ready_item),                   \
2585                (LOI)->loi_write_lop.lop_num_pending,                     \
2586                !list_empty(&(LOI)->loi_write_lop.lop_urgent),            \
2587                (LOI)->loi_read_lop.lop_num_pending,                      \
2588                !list_empty(&(LOI)->loi_read_lop.lop_urgent),             \
2589                args)                                                     \
2590
2591 /* This is called by osc_check_rpcs() to find which objects have pages that
2592  * we could be sending.  These lists are maintained by lop_makes_rpc(). */
2593 struct lov_oinfo *osc_next_loi(struct client_obd *cli)
2594 {
2595         ENTRY;
2596
2597         /* First return objects that have blocked locks so that they
2598          * will be flushed quickly and other clients can get the lock,
2599          * then objects which have pages ready to be stuffed into RPCs */
2600         if (!list_empty(&cli->cl_loi_hp_ready_list))
2601                 RETURN(list_entry(cli->cl_loi_hp_ready_list.next,
2602                                   struct lov_oinfo, loi_hp_ready_item));
2603         if (!list_empty(&cli->cl_loi_ready_list))
2604                 RETURN(list_entry(cli->cl_loi_ready_list.next,
2605                                   struct lov_oinfo, loi_ready_item));
2606
2607         /* then if we have cache waiters, return all objects with queued
2608          * writes.  This is especially important when many small files
2609          * have filled up the cache and not been fired into rpcs because
2610          * they don't pass the nr_pending/object threshhold */
2611         if (!list_empty(&cli->cl_cache_waiters) &&
2612             !list_empty(&cli->cl_loi_write_list))
2613                 RETURN(list_entry(cli->cl_loi_write_list.next,
2614                                   struct lov_oinfo, loi_write_item));
2615
2616         /* then return all queued objects when we have an invalid import
2617          * so that they get flushed */
2618         if (cli->cl_import == NULL || cli->cl_import->imp_invalid) {
2619                 if (!list_empty(&cli->cl_loi_write_list))
2620                         RETURN(list_entry(cli->cl_loi_write_list.next,
2621                                           struct lov_oinfo, loi_write_item));
2622                 if (!list_empty(&cli->cl_loi_read_list))
2623                         RETURN(list_entry(cli->cl_loi_read_list.next,
2624                                           struct lov_oinfo, loi_read_item));
2625         }
2626         RETURN(NULL);
2627 }
2628
2629 static int osc_max_rpc_in_flight(struct client_obd *cli, struct lov_oinfo *loi)
2630 {
2631         struct osc_async_page *oap;
2632         int hprpc = 0;
2633
2634         if (!list_empty(&loi->loi_write_lop.lop_urgent)) {
2635                 oap = list_entry(loi->loi_write_lop.lop_urgent.next,
2636                                  struct osc_async_page, oap_urgent_item);
2637                 hprpc = !!(oap->oap_async_flags & ASYNC_HP);
2638         }
2639
2640         if (!hprpc && !list_empty(&loi->loi_read_lop.lop_urgent)) {
2641                 oap = list_entry(loi->loi_read_lop.lop_urgent.next,
2642                                  struct osc_async_page, oap_urgent_item);
2643                 hprpc = !!(oap->oap_async_flags & ASYNC_HP);
2644         }
2645
2646         return rpcs_in_flight(cli) >= cli->cl_max_rpcs_in_flight + hprpc;
2647 }
2648
2649 /* called with the loi list lock held */
2650 void osc_check_rpcs(const struct lu_env *env, struct client_obd *cli)
2651 {
2652         struct lov_oinfo *loi;
2653         int rc = 0, race_counter = 0;
2654         ENTRY;
2655
2656         while ((loi = osc_next_loi(cli)) != NULL) {
2657                 LOI_DEBUG(loi, "%lu in flight\n", rpcs_in_flight(cli));
2658
2659                 if (osc_max_rpc_in_flight(cli, loi))
2660                         break;
2661
2662                 /* attempt some read/write balancing by alternating between
2663                  * reads and writes in an object.  The makes_rpc checks here
2664                  * would be redundant if we were getting read/write work items
2665                  * instead of objects.  we don't want send_oap_rpc to drain a
2666                  * partial read pending queue when we're given this object to
2667                  * do io on writes while there are cache waiters */
2668                 if (lop_makes_rpc(cli, &loi->loi_write_lop, OBD_BRW_WRITE)) {
2669                         rc = osc_send_oap_rpc(env, cli, loi, OBD_BRW_WRITE,
2670                                               &loi->loi_write_lop);
2671                         if (rc < 0) {
2672                                 CERROR("Write request failed with %d\n", rc);
2673
2674                                 /* osc_send_oap_rpc failed, mostly because of
2675                                  * memory pressure.
2676                                  *
2677                                  * It can't break here, because if:
2678                                  *  - a page was submitted by osc_io_submit, so
2679                                  *    page locked;
2680                                  *  - no request in flight
2681                                  *  - no subsequent request
2682                                  * The system will be in live-lock state,
2683                                  * because there is no chance to call
2684                                  * osc_io_unplug() and osc_check_rpcs() any
2685                                  * more. pdflush can't help in this case,
2686                                  * because it might be blocked at grabbing
2687                                  * the page lock as we mentioned.
2688                                  *
2689                                  * Anyway, continue to drain pages. */
2690                                 /* break; */
2691                         }
2692
2693                         if (rc > 0)
2694                                 race_counter = 0;
2695                         else
2696                                 race_counter++;
2697                 }
2698                 if (lop_makes_rpc(cli, &loi->loi_read_lop, OBD_BRW_READ)) {
2699                         rc = osc_send_oap_rpc(env, cli, loi, OBD_BRW_READ,
2700                                               &loi->loi_read_lop);
2701                         if (rc < 0)
2702                                 CERROR("Read request failed with %d\n", rc);
2703
2704                         if (rc > 0)
2705                                 race_counter = 0;
2706                         else
2707                                 race_counter++;
2708                 }
2709
2710                 /* attempt some inter-object balancing by issueing rpcs
2711                  * for each object in turn */
2712                 if (!list_empty(&loi->loi_hp_ready_item))
2713                         list_del_init(&loi->loi_hp_ready_item);
2714                 if (!list_empty(&loi->loi_ready_item))
2715                         list_del_init(&loi->loi_ready_item);
2716                 if (!list_empty(&loi->loi_write_item))
2717                         list_del_init(&loi->loi_write_item);
2718                 if (!list_empty(&loi->loi_read_item))
2719                         list_del_init(&loi->loi_read_item);
2720
2721                 loi_list_maint(cli, loi);
2722
2723                 /* send_oap_rpc fails with 0 when make_ready tells it to
2724                  * back off.  llite's make_ready does this when it tries
2725                  * to lock a page queued for write that is already locked.
2726                  * we want to try sending rpcs from many objects, but we
2727                  * don't want to spin failing with 0.  */
2728                 if (race_counter == 10)
2729                         break;
2730         }
2731         EXIT;
2732 }
2733
2734 /* we're trying to queue a page in the osc so we're subject to the
2735  * 'cl_dirty_max' limit on the number of pages that can be queued in the osc.
2736  * If the osc's queued pages are already at that limit, then we want to sleep
2737  * until there is space in the osc's queue for us.  We also may be waiting for
2738  * write credits from the OST if there are RPCs in flight that may return some
2739  * before we fall back to sync writes.
2740  *
2741  * We need this know our allocation was granted in the presence of signals */
2742 static int ocw_granted(struct client_obd *cli, struct osc_cache_waiter *ocw)
2743 {
2744         int rc;
2745         ENTRY;
2746         client_obd_list_lock(&cli->cl_loi_list_lock);
2747         rc = list_empty(&ocw->ocw_entry) || rpcs_in_flight(cli) == 0;
2748         client_obd_list_unlock(&cli->cl_loi_list_lock);
2749         RETURN(rc);
2750 };
2751
2752 /**
2753  * Non-blocking version of osc_enter_cache() that consumes grant only when it
2754  * is available.
2755  */
2756 int osc_enter_cache_try(const struct lu_env *env,
2757                         struct client_obd *cli, struct lov_oinfo *loi,
2758                         struct osc_async_page *oap, int transient)
2759 {
2760         int has_grant;
2761
2762         has_grant = cli->cl_avail_grant >= CFS_PAGE_SIZE;
2763         if (has_grant) {
2764                 osc_consume_write_grant(cli, &oap->oap_brw_page);
2765                 if (transient) {
2766                         cli->cl_dirty_transit += CFS_PAGE_SIZE;
2767                         atomic_inc(&obd_dirty_transit_pages);
2768                         oap->oap_brw_flags |= OBD_BRW_NOCACHE;
2769                 }
2770         }
2771         return has_grant;
2772 }
2773
2774 /* Caller must hold loi_list_lock - we drop/regain it if we need to wait for
2775  * grant or cache space. */
2776 static int osc_enter_cache(const struct lu_env *env,
2777                            struct client_obd *cli, struct lov_oinfo *loi,
2778                            struct osc_async_page *oap)
2779 {
2780         struct osc_cache_waiter ocw;
2781         struct l_wait_info lwi = { 0 };
2782
2783         ENTRY;
2784
2785         CDEBUG(D_CACHE, "dirty: %ld/%d dirty_max: %ld/%d dropped: %lu "
2786                "grant: %lu\n", cli->cl_dirty, atomic_read(&obd_dirty_pages),
2787                cli->cl_dirty_max, obd_max_dirty_pages,
2788                cli->cl_lost_grant, cli->cl_avail_grant);
2789
2790         /* force the caller to try sync io.  this can jump the list
2791          * of queued writes and create a discontiguous rpc stream */
2792         if (cli->cl_dirty_max < CFS_PAGE_SIZE || cli->cl_ar.ar_force_sync ||
2793             loi->loi_ar.ar_force_sync)
2794                 RETURN(-EDQUOT);
2795
2796         /* Hopefully normal case - cache space and write credits available */
2797         if (cli->cl_dirty + CFS_PAGE_SIZE <= cli->cl_dirty_max &&
2798             atomic_read(&obd_dirty_pages) + 1 <= obd_max_dirty_pages &&
2799             osc_enter_cache_try(env, cli, loi, oap, 0))
2800                 RETURN(0);
2801
2802         /* Make sure that there are write rpcs in flight to wait for.  This
2803          * is a little silly as this object may not have any pending but
2804          * other objects sure might. */
2805         if (cli->cl_w_in_flight) {
2806                 list_add_tail(&ocw.ocw_entry, &cli->cl_cache_waiters);
2807                 cfs_waitq_init(&ocw.ocw_waitq);
2808                 ocw.ocw_oap = oap;
2809                 ocw.ocw_rc = 0;
2810
2811                 loi_list_maint(cli, loi);
2812                 osc_check_rpcs(env, cli);
2813                 client_obd_list_unlock(&cli->cl_loi_list_lock);
2814
2815                 CDEBUG(D_CACHE, "sleeping for cache space\n");
2816                 l_wait_event(ocw.ocw_waitq, ocw_granted(cli, &ocw), &lwi);
2817
2818                 client_obd_list_lock(&cli->cl_loi_list_lock);
2819                 if (!list_empty(&ocw.ocw_entry)) {
2820                         list_del(&ocw.ocw_entry);
2821                         RETURN(-EINTR);
2822                 }
2823                 RETURN(ocw.ocw_rc);
2824         }
2825
2826         RETURN(-EDQUOT);
2827 }
2828
2829
2830 int osc_prep_async_page(struct obd_export *exp, struct lov_stripe_md *lsm,
2831                         struct lov_oinfo *loi, cfs_page_t *page,
2832                         obd_off offset, const struct obd_async_page_ops *ops,
2833                         void *data, void **res, int nocache,
2834                         struct lustre_handle *lockh)
2835 {
2836         struct osc_async_page *oap;
2837
2838         ENTRY;
2839
2840         if (!page)
2841                 return size_round(sizeof(*oap));
2842
2843         oap = *res;
2844         oap->oap_magic = OAP_MAGIC;
2845         oap->oap_cli = &exp->exp_obd->u.cli;
2846         oap->oap_loi = loi;
2847
2848         oap->oap_caller_ops = ops;
2849         oap->oap_caller_data = data;
2850
2851         oap->oap_page = page;
2852         oap->oap_obj_off = offset;
2853         if (!client_is_remote(exp) &&
2854             cfs_capable(CFS_CAP_SYS_RESOURCE))
2855                 oap->oap_brw_flags = OBD_BRW_NOQUOTA;
2856
2857         LASSERT(!(offset & ~CFS_PAGE_MASK));
2858
2859         CFS_INIT_LIST_HEAD(&oap->oap_pending_item);
2860         CFS_INIT_LIST_HEAD(&oap->oap_urgent_item);
2861         CFS_INIT_LIST_HEAD(&oap->oap_rpc_item);
2862         CFS_INIT_LIST_HEAD(&oap->oap_page_list);
2863
2864         spin_lock_init(&oap->oap_lock);
2865         CDEBUG(D_CACHE, "oap %p page %p obj off "LPU64"\n", oap, page, offset);
2866         RETURN(0);
2867 }
2868
2869 struct osc_async_page *oap_from_cookie(void *cookie)
2870 {
2871         struct osc_async_page *oap = cookie;
2872         if (oap->oap_magic != OAP_MAGIC)
2873                 return ERR_PTR(-EINVAL);
2874         return oap;
2875 };
2876
2877 int osc_queue_async_io(const struct lu_env *env,
2878                        struct obd_export *exp, struct lov_stripe_md *lsm,
2879                        struct lov_oinfo *loi, void *cookie,
2880                        int cmd, obd_off off, int count,
2881                        obd_flag brw_flags, enum async_flags async_flags)
2882 {
2883         struct client_obd *cli = &exp->exp_obd->u.cli;
2884         struct osc_async_page *oap;
2885         int rc = 0;
2886         ENTRY;
2887
2888         oap = oap_from_cookie(cookie);
2889         if (IS_ERR(oap))
2890                 RETURN(PTR_ERR(oap));
2891
2892         if (cli->cl_import == NULL || cli->cl_import->imp_invalid)
2893                 RETURN(-EIO);
2894
2895         if (!list_empty(&oap->oap_pending_item) ||
2896             !list_empty(&oap->oap_urgent_item) ||
2897             !list_empty(&oap->oap_rpc_item))
2898                 RETURN(-EBUSY);
2899
2900         /* check if the file's owner/group is over quota */
2901         if ((cmd & OBD_BRW_WRITE) && !(cmd & OBD_BRW_NOQUOTA)) {
2902                 struct cl_object *obj;
2903                 struct cl_attr    attr; /* XXX put attr into thread info */
2904                 unsigned int qid[MAXQUOTAS];
2905
2906                 obj = cl_object_top(osc_oap2cl_page(oap)->cp_obj);
2907
2908                 cl_object_attr_lock(obj);
2909                 rc = cl_object_attr_get(env, obj, &attr);
2910                 cl_object_attr_unlock(obj);
2911
2912                 qid[USRQUOTA] = attr.cat_uid;
2913                 qid[GRPQUOTA] = attr.cat_gid;
2914                 if (rc == 0 &&
2915                     lquota_chkdq(quota_interface, cli, qid) == NO_QUOTA)
2916                         rc = -EDQUOT;
2917                 if (rc)
2918                         RETURN(rc);
2919         }
2920
2921         if (loi == NULL)
2922                 loi = lsm->lsm_oinfo[0];
2923
2924         client_obd_list_lock(&cli->cl_loi_list_lock);
2925
2926         LASSERT(off + count <= CFS_PAGE_SIZE);
2927         oap->oap_cmd = cmd;
2928         oap->oap_page_off = off;
2929         oap->oap_count = count;
2930         oap->oap_brw_flags = brw_flags;
2931         /* Give a hint to OST that requests are coming from kswapd - bug19529 */
2932         if (libcfs_memory_pressure_get())
2933                 oap->oap_brw_flags |= OBD_BRW_MEMALLOC;
2934         spin_lock(&oap->oap_lock);
2935         oap->oap_async_flags = async_flags;
2936         spin_unlock(&oap->oap_lock);
2937
2938         if (cmd & OBD_BRW_WRITE) {
2939                 rc = osc_enter_cache(env, cli, loi, oap);
2940                 if (rc) {
2941                         client_obd_list_unlock(&cli->cl_loi_list_lock);
2942                         RETURN(rc);
2943                 }
2944         }
2945
2946         osc_oap_to_pending(oap);
2947         loi_list_maint(cli, loi);
2948
2949         LOI_DEBUG(loi, "oap %p page %p added for cmd %d\n", oap, oap->oap_page,
2950                   cmd);
2951
2952         osc_check_rpcs(env, cli);
2953         client_obd_list_unlock(&cli->cl_loi_list_lock);
2954
2955         RETURN(0);
2956 }
2957
2958 /* aka (~was & now & flag), but this is more clear :) */
2959 #define SETTING(was, now, flag) (!(was & flag) && (now & flag))
2960
2961 int osc_set_async_flags_base(struct client_obd *cli,
2962                              struct lov_oinfo *loi, struct osc_async_page *oap,
2963                              obd_flag async_flags)
2964 {
2965         struct loi_oap_pages *lop;
2966         int flags = 0;
2967         ENTRY;
2968
2969         LASSERT(!list_empty(&oap->oap_pending_item));
2970
2971         if (oap->oap_cmd & OBD_BRW_WRITE) {
2972                 lop = &loi->loi_write_lop;
2973         } else {
2974                 lop = &loi->loi_read_lop;
2975         }
2976
2977         if ((oap->oap_async_flags & async_flags) == async_flags)
2978                 RETURN(0);
2979
2980         if (SETTING(oap->oap_async_flags, async_flags, ASYNC_READY))
2981                 flags |= ASYNC_READY;
2982
2983         if (SETTING(oap->oap_async_flags, async_flags, ASYNC_URGENT) &&
2984             list_empty(&oap->oap_rpc_item)) {
2985                 if (oap->oap_async_flags & ASYNC_HP)
2986                         list_add(&oap->oap_urgent_item, &lop->lop_urgent);
2987                 else
2988                         list_add_tail(&oap->oap_urgent_item, &lop->lop_urgent);
2989                 flags |= ASYNC_URGENT;
2990                 loi_list_maint(cli, loi);
2991         }
2992         spin_lock(&oap->oap_lock);
2993         oap->oap_async_flags |= flags;
2994         spin_unlock(&oap->oap_lock);
2995
2996         LOI_DEBUG(loi, "oap %p page %p has flags %x\n", oap, oap->oap_page,
2997                         oap->oap_async_flags);
2998         RETURN(0);
2999 }
3000
3001 int osc_teardown_async_page(struct obd_export *exp,
3002                             struct lov_stripe_md *lsm,
3003                             struct lov_oinfo *loi, void *cookie)
3004 {
3005         struct client_obd *cli = &exp->exp_obd->u.cli;
3006         struct loi_oap_pages *lop;
3007         struct osc_async_page *oap;
3008         int rc = 0;
3009         ENTRY;
3010
3011         oap = oap_from_cookie(cookie);
3012         if (IS_ERR(oap))
3013                 RETURN(PTR_ERR(oap));
3014
3015         if (loi == NULL)
3016                 loi = lsm->lsm_oinfo[0];
3017
3018         if (oap->oap_cmd & OBD_BRW_WRITE) {
3019                 lop = &loi->loi_write_lop;
3020         } else {
3021                 lop = &loi->loi_read_lop;
3022         }
3023
3024         client_obd_list_lock(&cli->cl_loi_list_lock);
3025
3026         if (!list_empty(&oap->oap_rpc_item))
3027                 GOTO(out, rc = -EBUSY);
3028
3029         osc_exit_cache(cli, oap, 0);
3030         osc_wake_cache_waiters(cli);
3031
3032         if (!list_empty(&oap->oap_urgent_item)) {
3033                 list_del_init(&oap->oap_urgent_item);
3034                 spin_lock(&oap->oap_lock);
3035                 oap->oap_async_flags &= ~(ASYNC_URGENT | ASYNC_HP);
3036                 spin_unlock(&oap->oap_lock);
3037         }
3038         if (!list_empty(&oap->oap_pending_item)) {
3039                 list_del_init(&oap->oap_pending_item);
3040                 lop_update_pending(cli, lop, oap->oap_cmd, -1);
3041         }
3042         loi_list_maint(cli, loi);
3043         LOI_DEBUG(loi, "oap %p page %p torn down\n", oap, oap->oap_page);
3044 out:
3045         client_obd_list_unlock(&cli->cl_loi_list_lock);
3046         RETURN(rc);
3047 }
3048
3049 static void osc_set_lock_data_with_check(struct ldlm_lock *lock,
3050                                          struct ldlm_enqueue_info *einfo,
3051                                          int flags)
3052 {
3053         void *data = einfo->ei_cbdata;
3054
3055         LASSERT(lock != NULL);
3056         LASSERT(lock->l_blocking_ast == einfo->ei_cb_bl);
3057         LASSERT(lock->l_resource->lr_type == einfo->ei_type);
3058         LASSERT(lock->l_completion_ast == einfo->ei_cb_cp);
3059         LASSERT(lock->l_glimpse_ast == einfo->ei_cb_gl);
3060
3061         lock_res_and_lock(lock);
3062         spin_lock(&osc_ast_guard);
3063         LASSERT(lock->l_ast_data == NULL || lock->l_ast_data == data);
3064         lock->l_ast_data = data;
3065         spin_unlock(&osc_ast_guard);
3066         unlock_res_and_lock(lock);
3067 }
3068
3069 static void osc_set_data_with_check(struct lustre_handle *lockh,
3070                                     struct ldlm_enqueue_info *einfo,
3071                                     int flags)
3072 {
3073         struct ldlm_lock *lock = ldlm_handle2lock(lockh);
3074
3075         if (lock != NULL) {
3076                 osc_set_lock_data_with_check(lock, einfo, flags);
3077                 LDLM_LOCK_PUT(lock);
3078         } else
3079                 CERROR("lockh %p, data %p - client evicted?\n",
3080                        lockh, einfo->ei_cbdata);
3081 }
3082
3083 static int osc_change_cbdata(struct obd_export *exp, struct lov_stripe_md *lsm,
3084                              ldlm_iterator_t replace, void *data)
3085 {
3086         struct ldlm_res_id res_id;
3087         struct obd_device *obd = class_exp2obd(exp);
3088
3089         osc_build_res_name(lsm->lsm_object_id, lsm->lsm_object_gr, &res_id);
3090         ldlm_resource_iterate(obd->obd_namespace, &res_id, replace, data);
3091         return 0;
3092 }
3093
3094 static int osc_enqueue_fini(struct ptlrpc_request *req, struct ost_lvb *lvb,
3095                             obd_enqueue_update_f upcall, void *cookie,
3096                             int *flags, int rc)
3097 {
3098         int intent = *flags & LDLM_FL_HAS_INTENT;
3099         ENTRY;
3100
3101         if (intent) {
3102                 /* The request was created before ldlm_cli_enqueue call. */
3103                 if (rc == ELDLM_LOCK_ABORTED) {
3104                         struct ldlm_reply *rep;
3105                         rep = req_capsule_server_get(&req->rq_pill,
3106                                                      &RMF_DLM_REP);
3107
3108                         LASSERT(rep != NULL);
3109                         if (rep->lock_policy_res1)
3110                                 rc = rep->lock_policy_res1;
3111                 }
3112         }
3113
3114         if ((intent && rc == ELDLM_LOCK_ABORTED) || !rc) {
3115                 *flags |= LDLM_FL_LVB_READY;
3116                 CDEBUG(D_INODE,"got kms "LPU64" blocks "LPU64" mtime "LPU64"\n",
3117                        lvb->lvb_size, lvb->lvb_blocks, lvb->lvb_mtime);
3118         }
3119
3120         /* Call the update callback. */
3121         rc = (*upcall)(cookie, rc);
3122         RETURN(rc);
3123 }
3124
3125 static int osc_enqueue_interpret(const struct lu_env *env,
3126                                  struct ptlrpc_request *req,
3127                                  struct osc_enqueue_args *aa, int rc)
3128 {
3129         struct ldlm_lock *lock;
3130         struct lustre_handle handle;
3131         __u32 mode;
3132
3133         /* Make a local copy of a lock handle and a mode, because aa->oa_*
3134          * might be freed anytime after lock upcall has been called. */
3135         lustre_handle_copy(&handle, aa->oa_lockh);
3136         mode = aa->oa_ei->ei_mode;
3137
3138         /* ldlm_cli_enqueue is holding a reference on the lock, so it must
3139          * be valid. */
3140         lock = ldlm_handle2lock(&handle);
3141
3142         /* Take an additional reference so that a blocking AST that
3143          * ldlm_cli_enqueue_fini() might post for a failed lock, is guaranteed
3144          * to arrive after an upcall has been executed by
3145          * osc_enqueue_fini(). */
3146         ldlm_lock_addref(&handle, mode);
3147
3148         /* Complete obtaining the lock procedure. */
3149         rc = ldlm_cli_enqueue_fini(aa->oa_exp, req, aa->oa_ei->ei_type, 1,
3150                                    mode, aa->oa_flags, aa->oa_lvb,
3151                                    sizeof(*aa->oa_lvb), lustre_swab_ost_lvb,
3152                                    &handle, rc);
3153         /* Complete osc stuff. */
3154         rc = osc_enqueue_fini(req, aa->oa_lvb,
3155                               aa->oa_upcall, aa->oa_cookie, aa->oa_flags, rc);
3156
3157         OBD_FAIL_TIMEOUT(OBD_FAIL_OSC_CP_CANCEL_RACE, 10);
3158
3159         /* Release the lock for async request. */
3160         if (lustre_handle_is_used(&handle) && rc == ELDLM_OK)
3161                 /*
3162                  * Releases a reference taken by ldlm_cli_enqueue(), if it is
3163                  * not already released by
3164                  * ldlm_cli_enqueue_fini()->failed_lock_cleanup()
3165                  */
3166                 ldlm_lock_decref(&handle, mode);
3167
3168         LASSERTF(lock != NULL, "lockh %p, req %p, aa %p - client evicted?\n",
3169                  aa->oa_lockh, req, aa);
3170         ldlm_lock_decref(&handle, mode);
3171         LDLM_LOCK_PUT(lock);
3172         return rc;
3173 }
3174
3175 void osc_update_enqueue(struct lustre_handle *lov_lockhp,
3176                         struct lov_oinfo *loi, int flags,
3177                         struct ost_lvb *lvb, __u32 mode, int rc)
3178 {
3179         if (rc == ELDLM_OK) {
3180                 struct ldlm_lock *lock = ldlm_handle2lock(lov_lockhp);
3181                 __u64 tmp;
3182
3183                 LASSERT(lock != NULL);
3184                 loi->loi_lvb = *lvb;
3185                 tmp = loi->loi_lvb.lvb_size;
3186                 /* Extend KMS up to the end of this lock and no further
3187                  * A lock on [x,y] means a KMS of up to y + 1 bytes! */
3188                 if (tmp > lock->l_policy_data.l_extent.end)
3189                         tmp = lock->l_policy_data.l_extent.end + 1;
3190                 if (tmp >= loi->loi_kms) {
3191                         LDLM_DEBUG(lock, "lock acquired, setting rss="LPU64
3192                                    ", kms="LPU64, loi->loi_lvb.lvb_size, tmp);
3193                         loi_kms_set(loi, tmp);
3194                 } else {
3195                         LDLM_DEBUG(lock, "lock acquired, setting rss="
3196                                    LPU64"; leaving kms="LPU64", end="LPU64,
3197                                    loi->loi_lvb.lvb_size, loi->loi_kms,
3198                                    lock->l_policy_data.l_extent.end);
3199                 }
3200                 ldlm_lock_allow_match(lock);
3201                 LDLM_LOCK_PUT(lock);
3202         } else if (rc == ELDLM_LOCK_ABORTED && (flags & LDLM_FL_HAS_INTENT)) {
3203                 loi->loi_lvb = *lvb;
3204                 CDEBUG(D_INODE, "glimpsed, setting rss="LPU64"; leaving"
3205                        " kms="LPU64"\n", loi->loi_lvb.lvb_size, loi->loi_kms);
3206                 rc = ELDLM_OK;
3207         }
3208 }
3209 EXPORT_SYMBOL(osc_update_enqueue);
3210
3211 struct ptlrpc_request_set *PTLRPCD_SET = (void *)1;
3212
3213 /* When enqueuing asynchronously, locks are not ordered, we can obtain a lock
3214  * from the 2nd OSC before a lock from the 1st one. This does not deadlock with
3215  * other synchronous requests, however keeping some locks and trying to obtain
3216  * others may take a considerable amount of time in a case of ost failure; and
3217  * when other sync requests do not get released lock from a client, the client
3218  * is excluded from the cluster -- such scenarious make the life difficult, so
3219  * release locks just after they are obtained. */
3220 int osc_enqueue_base(struct obd_export *exp, struct ldlm_res_id *res_id,
3221                      int *flags, ldlm_policy_data_t *policy,
3222                      struct ost_lvb *lvb, int kms_valid,
3223                      obd_enqueue_update_f upcall, void *cookie,
3224                      struct ldlm_enqueue_info *einfo,
3225                      struct lustre_handle *lockh,
3226                      struct ptlrpc_request_set *rqset, int async)
3227 {
3228         struct obd_device *obd = exp->exp_obd;
3229         struct ptlrpc_request *req = NULL;
3230         int intent = *flags & LDLM_FL_HAS_INTENT;
3231         ldlm_mode_t mode;
3232         int rc;
3233         ENTRY;
3234
3235         /* Filesystem lock extents are extended to page boundaries so that
3236          * dealing with the page cache is a little smoother.  */
3237         policy->l_extent.start -= policy->l_extent.start & ~CFS_PAGE_MASK;
3238         policy->l_extent.end |= ~CFS_PAGE_MASK;
3239
3240         /*
3241          * kms is not valid when either object is completely fresh (so that no
3242          * locks are cached), or object was evicted. In the latter case cached
3243          * lock cannot be used, because it would prime inode state with
3244          * potentially stale LVB.
3245          */
3246         if (!kms_valid)
3247                 goto no_match;
3248
3249         /* Next, search for already existing extent locks that will cover us */
3250         /* If we're trying to read, we also search for an existing PW lock.  The
3251          * VFS and page cache already protect us locally, so lots of readers/
3252          * writers can share a single PW lock.
3253          *
3254          * There are problems with conversion deadlocks, so instead of
3255          * converting a read lock to a write lock, we'll just enqueue a new
3256          * one.
3257          *
3258          * At some point we should cancel the read lock instead of making them
3259          * send us a blocking callback, but there are problems with canceling
3260          * locks out from other users right now, too. */
3261         mode = einfo->ei_mode;
3262         if (einfo->ei_mode == LCK_PR)
3263                 mode |= LCK_PW;
3264         mode = ldlm_lock_match(obd->obd_namespace,
3265                                *flags | LDLM_FL_LVB_READY, res_id,
3266                                einfo->ei_type, policy, mode, lockh, 0);
3267         if (mode) {
3268                 struct ldlm_lock *matched = ldlm_handle2lock(lockh);
3269
3270                 if (matched->l_ast_data == NULL ||
3271                     matched->l_ast_data == einfo->ei_cbdata) {
3272                         /* addref the lock only if not async requests and PW
3273                          * lock is matched whereas we asked for PR. */
3274                         if (!rqset && einfo->ei_mode != mode)
3275                                 ldlm_lock_addref(lockh, LCK_PR);
3276                         osc_set_lock_data_with_check(matched, einfo, *flags);
3277                         if (intent) {
3278                                 /* I would like to be able to ASSERT here that
3279                                  * rss <= kms, but I can't, for reasons which
3280                                  * are explained in lov_enqueue() */
3281                         }
3282
3283                         /* We already have a lock, and it's referenced */
3284                         (*upcall)(cookie, ELDLM_OK);
3285
3286                         /* For async requests, decref the lock. */
3287                         if (einfo->ei_mode != mode)
3288                                 ldlm_lock_decref(lockh, LCK_PW);
3289                         else if (rqset)
3290                                 ldlm_lock_decref(lockh, einfo->ei_mode);
3291                         LDLM_LOCK_PUT(matched);
3292                         RETURN(ELDLM_OK);
3293                 } else
3294                         ldlm_lock_decref(lockh, mode);
3295                 LDLM_LOCK_PUT(matched);
3296         }
3297
3298  no_match:
3299         if (intent) {
3300                 CFS_LIST_HEAD(cancels);
3301                 req = ptlrpc_request_alloc(class_exp2cliimp(exp),
3302                                            &RQF_LDLM_ENQUEUE_LVB);
3303                 if (req == NULL)
3304                         RETURN(-ENOMEM);
3305
3306                 rc = ldlm_prep_enqueue_req(exp, req, &cancels, 0);
3307                 if (rc)
3308                         RETURN(rc);
3309
3310                 req_capsule_set_size(&req->rq_pill, &RMF_DLM_LVB, RCL_SERVER,
3311                                      sizeof *lvb);
3312                 ptlrpc_request_set_replen(req);
3313         }
3314
3315         /* users of osc_enqueue() can pass this flag for ldlm_lock_match() */
3316         *flags &= ~LDLM_FL_BLOCK_GRANTED;
3317
3318         rc = ldlm_cli_enqueue(exp, &req, einfo, res_id, policy, flags, lvb,
3319                               sizeof(*lvb), lustre_swab_ost_lvb, lockh, async);
3320         if (rqset) {
3321                 if (!rc) {
3322                         struct osc_enqueue_args *aa;
3323                         CLASSERT (sizeof(*aa) <= sizeof(req->rq_async_args));
3324                         aa = ptlrpc_req_async_args(req);
3325                         aa->oa_ei = einfo;
3326                         aa->oa_exp = exp;
3327                         aa->oa_flags  = flags;
3328                         aa->oa_upcall = upcall;
3329                         aa->oa_cookie = cookie;
3330                         aa->oa_lvb    = lvb;
3331                         aa->oa_lockh  = lockh;
3332
3333                         req->rq_interpret_reply =
3334                                 (ptlrpc_interpterer_t)osc_enqueue_interpret;
3335                         if (rqset == PTLRPCD_SET)
3336                                 ptlrpcd_add_req(req, PSCOPE_OTHER);
3337                         else
3338                                 ptlrpc_set_add_req(rqset, req);
3339                 } else if (intent) {
3340                         ptlrpc_req_finished(req);
3341                 }
3342                 RETURN(rc);
3343         }
3344
3345         rc = osc_enqueue_fini(req, lvb, upcall, cookie, flags, rc);
3346         if (intent)
3347                 ptlrpc_req_finished(req);
3348
3349         RETURN(rc);
3350 }
3351
3352 static int osc_enqueue(struct obd_export *exp, struct obd_info *oinfo,
3353                        struct ldlm_enqueue_info *einfo,
3354                        struct ptlrpc_request_set *rqset)
3355 {
3356         struct ldlm_res_id res_id;
3357         int rc;
3358         ENTRY;
3359
3360         osc_build_res_name(oinfo->oi_md->lsm_object_id,
3361                            oinfo->oi_md->lsm_object_gr, &res_id);
3362
3363         rc = osc_enqueue_base(exp, &res_id, &oinfo->oi_flags, &oinfo->oi_policy,
3364                               &oinfo->oi_md->lsm_oinfo[0]->loi_lvb,
3365                               oinfo->oi_md->lsm_oinfo[0]->loi_kms_valid,
3366                               oinfo->oi_cb_up, oinfo, einfo, oinfo->oi_lockh,
3367                               rqset, rqset != NULL);
3368         RETURN(rc);
3369 }
3370
3371 int osc_match_base(struct obd_export *exp, struct ldlm_res_id *res_id,
3372                    __u32 type, ldlm_policy_data_t *policy, __u32 mode,
3373                    int *flags, void *data, struct lustre_handle *lockh,
3374                    int unref)
3375 {
3376         struct obd_device *obd = exp->exp_obd;
3377         int lflags = *flags;
3378         ldlm_mode_t rc;
3379         ENTRY;
3380
3381         if (OBD_FAIL_CHECK(OBD_FAIL_OSC_MATCH))
3382                 RETURN(-EIO);
3383
3384         /* Filesystem lock extents are extended to page boundaries so that
3385          * dealing with the page cache is a little smoother */
3386         policy->l_extent.start -= policy->l_extent.start & ~CFS_PAGE_MASK;
3387         policy->l_extent.end |= ~CFS_PAGE_MASK;
3388
3389         /* Next, search for already existing extent locks that will cover us */
3390         /* If we're trying to read, we also search for an existing PW lock.  The
3391          * VFS and page cache already protect us locally, so lots of readers/
3392          * writers can share a single PW lock. */
3393         rc = mode;
3394         if (mode == LCK_PR)
3395                 rc |= LCK_PW;
3396         rc = ldlm_lock_match(obd->obd_namespace, lflags,
3397                              res_id, type, policy, rc, lockh, unref);
3398         if (rc) {
3399                 if (data != NULL)
3400                         osc_set_data_with_check(lockh, data, lflags);
3401                 if (!(lflags & LDLM_FL_TEST_LOCK) && mode != rc) {
3402                         ldlm_lock_addref(lockh, LCK_PR);
3403                         ldlm_lock_decref(lockh, LCK_PW);
3404                 }
3405                 RETURN(rc);
3406         }
3407         RETURN(rc);
3408 }
3409
3410 int osc_cancel_base(struct lustre_handle *lockh, __u32 mode)
3411 {
3412         ENTRY;
3413
3414         if (unlikely(mode == LCK_GROUP))
3415                 ldlm_lock_decref_and_cancel(lockh, mode);
3416         else
3417                 ldlm_lock_decref(lockh, mode);
3418
3419         RETURN(0);
3420 }
3421
3422 static int osc_cancel(struct obd_export *exp, struct lov_stripe_md *md,
3423                       __u32 mode, struct lustre_handle *lockh)
3424 {
3425         ENTRY;
3426         RETURN(osc_cancel_base(lockh, mode));
3427 }
3428
3429 static int osc_cancel_unused(struct obd_export *exp,
3430                              struct lov_stripe_md *lsm, int flags,
3431                              void *opaque)
3432 {
3433         struct obd_device *obd = class_exp2obd(exp);
3434         struct ldlm_res_id res_id, *resp = NULL;
3435
3436         if (lsm != NULL) {
3437                 resp = osc_build_res_name(lsm->lsm_object_id,
3438                                           lsm->lsm_object_gr, &res_id);
3439         }
3440
3441         return ldlm_cli_cancel_unused(obd->obd_namespace, resp, flags, opaque);
3442 }
3443
3444 static int osc_statfs_interpret(const struct lu_env *env,
3445                                 struct ptlrpc_request *req,
3446                                 struct osc_async_args *aa, int rc)
3447 {
3448         struct client_obd *cli = &req->rq_import->imp_obd->u.cli;
3449         struct obd_statfs *msfs;
3450         ENTRY;
3451
3452         if (rc == -EBADR)
3453                 /* The request has in fact never been sent
3454                  * due to issues at a higher level (LOV).
3455                  * Exit immediately since the caller is
3456                  * aware of the problem and takes care
3457                  * of the clean up */
3458                  RETURN(rc);
3459
3460         if ((rc == -ENOTCONN || rc == -EAGAIN) &&
3461             (aa->aa_oi->oi_flags & OBD_STATFS_NODELAY))
3462                 GOTO(out, rc = 0);
3463
3464         if (rc != 0)
3465                 GOTO(out, rc);
3466
3467         msfs = req_capsule_server_get(&req->rq_pill, &RMF_OBD_STATFS);
3468         if (msfs == NULL) {
3469                 GOTO(out, rc = -EPROTO);
3470         }
3471
3472         /* Reinitialize the RDONLY and DEGRADED flags at the client
3473          * on each statfs, so they don't stay set permanently. */
3474         spin_lock(&cli->cl_oscc.oscc_lock);
3475         cli->cl_oscc.oscc_flags &= ~(OSCC_FLAG_RDONLY | OSCC_FLAG_DEGRADED);
3476         if (msfs->os_state & OS_STATE_DEGRADED)
3477                 cli->cl_oscc.oscc_flags |= OSCC_FLAG_DEGRADED;
3478
3479         if (msfs->os_state & OS_STATE_READONLY)
3480                 cli->cl_oscc.oscc_flags |= OSCC_FLAG_RDONLY;
3481         spin_unlock(&cli->cl_oscc.oscc_lock);
3482
3483         *aa->aa_oi->oi_osfs = *msfs;
3484 out:
3485         rc = aa->aa_oi->oi_cb_up(aa->aa_oi, rc);
3486         RETURN(rc);
3487 }
3488
3489 static int osc_statfs_async(struct obd_device *obd, struct obd_info *oinfo,
3490                             __u64 max_age, struct ptlrpc_request_set *rqset)
3491 {
3492         struct ptlrpc_request *req;
3493         struct osc_async_args *aa;
3494         int                    rc;
3495         ENTRY;
3496
3497         /* We could possibly pass max_age in the request (as an absolute
3498          * timestamp or a "seconds.usec ago") so the target can avoid doing
3499          * extra calls into the filesystem if that isn't necessary (e.g.
3500          * during mount that would help a bit).  Having relative timestamps
3501          * is not so great if request processing is slow, while absolute
3502          * timestamps are not ideal because they need time synchronization. */
3503         req = ptlrpc_request_alloc(obd->u.cli.cl_import, &RQF_OST_STATFS);
3504         if (req == NULL)
3505                 RETURN(-ENOMEM);
3506
3507         rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, OST_STATFS);
3508         if (rc) {
3509                 ptlrpc_request_free(req);
3510                 RETURN(rc);
3511         }
3512         ptlrpc_request_set_replen(req);
3513         req->rq_request_portal = OST_CREATE_PORTAL;
3514         ptlrpc_at_set_req_timeout(req);
3515
3516         if (oinfo->oi_flags & OBD_STATFS_NODELAY) {
3517                 /* procfs requests not want stat in wait for avoid deadlock */
3518                 req->rq_no_resend = 1;
3519                 req->rq_no_delay = 1;
3520         }
3521
3522         req->rq_interpret_reply = (ptlrpc_interpterer_t)osc_statfs_interpret;
3523         CLASSERT (sizeof(*aa) <= sizeof(req->rq_async_args));
3524         aa = ptlrpc_req_async_args(req);
3525         aa->aa_oi = oinfo;
3526
3527         ptlrpc_set_add_req(rqset, req);
3528         RETURN(0);
3529 }
3530
3531 static int osc_statfs(struct obd_device *obd, struct obd_statfs *osfs,
3532                       __u64 max_age, __u32 flags)
3533 {
3534         struct obd_statfs     *msfs;
3535         struct ptlrpc_request *req;
3536         struct obd_import     *imp = NULL;
3537         int rc;
3538         ENTRY;
3539
3540         /*Since the request might also come from lprocfs, so we need
3541          *sync this with client_disconnect_export Bug15684*/
3542         down_read(&obd->u.cli.cl_sem);
3543         if (obd->u.cli.cl_import)
3544                 imp = class_import_get(obd->u.cli.cl_import);
3545         up_read(&obd->u.cli.cl_sem);
3546         if (!imp)
3547                 RETURN(-ENODEV);
3548
3549         /* We could possibly pass max_age in the request (as an absolute
3550          * timestamp or a "seconds.usec ago") so the target can avoid doing
3551          * extra calls into the filesystem if that isn't necessary (e.g.
3552          * during mount that would help a bit).  Having relative timestamps
3553          * is not so great if request processing is slow, while absolute
3554          * timestamps are not ideal because they need time synchronization. */
3555         req = ptlrpc_request_alloc(imp, &RQF_OST_STATFS);
3556
3557         class_import_put(imp);
3558
3559         if (req == NULL)
3560                 RETURN(-ENOMEM);
3561
3562         rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, OST_STATFS);
3563         if (rc) {
3564                 ptlrpc_request_free(req);
3565                 RETURN(rc);
3566         }
3567         ptlrpc_request_set_replen(req);
3568         req->rq_request_portal = OST_CREATE_PORTAL;
3569         ptlrpc_at_set_req_timeout(req);
3570
3571         if (flags & OBD_STATFS_NODELAY) {
3572                 /* procfs requests not want stat in wait for avoid deadlock */
3573                 req->rq_no_resend = 1;
3574                 req->rq_no_delay = 1;
3575         }
3576
3577         rc = ptlrpc_queue_wait(req);
3578         if (rc)
3579                 GOTO(out, rc);
3580
3581         msfs = req_capsule_server_get(&req->rq_pill, &RMF_OBD_STATFS);
3582         if (msfs == NULL) {
3583                 GOTO(out, rc = -EPROTO);
3584         }
3585
3586         *osfs = *msfs;
3587
3588         EXIT;
3589  out:
3590         ptlrpc_req_finished(req);
3591         return rc;
3592 }
3593
3594 /* Retrieve object striping information.
3595  *
3596  * @lmmu is a pointer to an in-core struct with lmm_ost_count indicating
3597  * the maximum number of OST indices which will fit in the user buffer.
3598  * lmm_magic must be LOV_MAGIC (we only use 1 slot here).
3599  */
3600 static int osc_getstripe(struct lov_stripe_md *lsm, struct lov_user_md *lump)
3601 {
3602         /* we use lov_user_md_v3 because it is larger than lov_user_md_v1 */
3603         struct lov_user_md_v3 lum, *lumk;
3604         struct lov_user_ost_data_v1 *lmm_objects;
3605         int rc = 0, lum_size;
3606         ENTRY;
3607
3608         if (!lsm)
3609                 RETURN(-ENODATA);
3610
3611         /* we only need the header part from user space to get lmm_magic and
3612          * lmm_stripe_count, (the header part is common to v1 and v3) */
3613         lum_size = sizeof(struct lov_user_md_v1);
3614         if (copy_from_user(&lum, lump, lum_size))
3615                 RETURN(-EFAULT);
3616
3617         if ((lum.lmm_magic != LOV_USER_MAGIC_V1) &&
3618             (lum.lmm_magic != LOV_USER_MAGIC_V3))
3619                 RETURN(-EINVAL);
3620
3621         /* lov_user_md_vX and lov_mds_md_vX must have the same size */
3622         LASSERT(sizeof(struct lov_user_md_v1) == sizeof(struct lov_mds_md_v1));
3623         LASSERT(sizeof(struct lov_user_md_v3) == sizeof(struct lov_mds_md_v3));
3624         LASSERT(sizeof(lum.lmm_objects[0]) == sizeof(lumk->lmm_objects[0]));
3625
3626         /* we can use lov_mds_md_size() to compute lum_size
3627          * because lov_user_md_vX and lov_mds_md_vX have the same size */
3628         if (lum.lmm_stripe_count > 0) {
3629                 lum_size = lov_mds_md_size(lum.lmm_stripe_count, lum.lmm_magic);
3630                 OBD_ALLOC(lumk, lum_size);
3631                 if (!lumk)
3632                         RETURN(-ENOMEM);
3633
3634                 if (lum.lmm_magic == LOV_USER_MAGIC_V1)
3635                         lmm_objects = &(((struct lov_user_md_v1 *)lumk)->lmm_objects[0]);
3636                 else
3637                         lmm_objects = &(lumk->lmm_objects[0]);
3638                 lmm_objects->l_object_id = lsm->lsm_object_id;
3639         } else {
3640                 lum_size = lov_mds_md_size(0, lum.lmm_magic);
3641                 lumk = &lum;
3642         }
3643
3644         lumk->lmm_object_id = lsm->lsm_object_id;
3645         lumk->lmm_object_gr = lsm->lsm_object_gr;
3646         lumk->lmm_stripe_count = 1;
3647
3648         if (copy_to_user(lump, lumk, lum_size))
3649                 rc = -EFAULT;
3650
3651         if (lumk != &lum)
3652                 OBD_FREE(lumk, lum_size);
3653
3654         RETURN(rc);
3655 }
3656
3657
3658 static int osc_iocontrol(unsigned int cmd, struct obd_export *exp, int len,
3659                          void *karg, void *uarg)
3660 {
3661         struct obd_device *obd = exp->exp_obd;
3662         struct obd_ioctl_data *data = karg;
3663         int err = 0;
3664         ENTRY;
3665
3666         if (!try_module_get(THIS_MODULE)) {
3667                 CERROR("Can't get module. Is it alive?");
3668                 return -EINVAL;
3669         }
3670         switch (cmd) {
3671         case OBD_IOC_LOV_GET_CONFIG: {
3672                 char *buf;
3673                 struct lov_desc *desc;
3674                 struct obd_uuid uuid;
3675
3676                 buf = NULL;
3677                 len = 0;
3678                 if (obd_ioctl_getdata(&buf, &len, (void *)uarg))
3679                         GOTO(out, err = -EINVAL);
3680
3681                 data = (struct obd_ioctl_data *)buf;
3682
3683                 if (sizeof(*desc) > data->ioc_inllen1) {
3684                         obd_ioctl_freedata(buf, len);
3685                         GOTO(out, err = -EINVAL);
3686                 }
3687
3688                 if (data->ioc_inllen2 < sizeof(uuid)) {
3689                         obd_ioctl_freedata(buf, len);
3690                         GOTO(out, err = -EINVAL);
3691                 }
3692
3693                 desc = (struct lov_desc *)data->ioc_inlbuf1;
3694                 desc->ld_tgt_count = 1;
3695                 desc->ld_active_tgt_count = 1;
3696                 desc->ld_default_stripe_count = 1;
3697                 desc->ld_default_stripe_size = 0;
3698                 desc->ld_default_stripe_offset = 0;
3699                 desc->ld_pattern = 0;
3700                 memcpy(&desc->ld_uuid, &obd->obd_uuid, sizeof(uuid));
3701
3702                 memcpy(data->ioc_inlbuf2, &obd->obd_uuid, sizeof(uuid));
3703
3704                 err = copy_to_user((void *)uarg, buf, len);
3705                 if (err)
3706                         err = -EFAULT;
3707                 obd_ioctl_freedata(buf, len);
3708                 GOTO(out, err);
3709         }
3710         case LL_IOC_LOV_SETSTRIPE:
3711                 err = obd_alloc_memmd(exp, karg);
3712                 if (err > 0)
3713                         err = 0;
3714                 GOTO(out, err);
3715         case LL_IOC_LOV_GETSTRIPE:
3716                 err = osc_getstripe(karg, uarg);
3717                 GOTO(out, err);
3718         case OBD_IOC_CLIENT_RECOVER:
3719                 err = ptlrpc_recover_import(obd->u.cli.cl_import,
3720                                             data->ioc_inlbuf1);
3721                 if (err > 0)
3722                         err = 0;
3723                 GOTO(out, err);
3724         case IOC_OSC_SET_ACTIVE:
3725                 err = ptlrpc_set_import_active(obd->u.cli.cl_import,
3726                                                data->ioc_offset);
3727                 GOTO(out, err);
3728         case OBD_IOC_POLL_QUOTACHECK:
3729                 err = lquota_poll_check(quota_interface, exp,
3730                                         (struct if_quotacheck *)karg);
3731                 GOTO(out, err);
3732         case OBD_IOC_PING_TARGET:
3733                 err = ptlrpc_obd_ping(obd);
3734                 GOTO(out, err);
3735         default:
3736                 CDEBUG(D_INODE, "unrecognised ioctl %#x by %s\n",
3737                        cmd, cfs_curproc_comm());
3738                 GOTO(out, err = -ENOTTY);
3739         }
3740 out:
3741         module_put(THIS_MODULE);
3742         return err;
3743 }
3744
3745 static int osc_get_info(struct obd_export *exp, obd_count keylen,
3746                         void *key, __u32 *vallen, void *val,
3747                         struct lov_stripe_md *lsm)
3748 {
3749         ENTRY;
3750         if (!vallen || !val)
3751                 RETURN(-EFAULT);
3752
3753         if (KEY_IS(KEY_LOCK_TO_STRIPE)) {
3754                 __u32 *stripe = val;
3755                 *vallen = sizeof(*stripe);
3756                 *stripe = 0;
3757                 RETURN(0);
3758         } else if (KEY_IS(KEY_LAST_ID)) {
3759                 struct ptlrpc_request *req;
3760                 obd_id                *reply;
3761                 char                  *tmp;
3762                 int                    rc;
3763
3764                 req = ptlrpc_request_alloc(class_exp2cliimp(exp),
3765                                            &RQF_OST_GET_INFO_LAST_ID);
3766                 if (req == NULL)
3767                         RETURN(-ENOMEM);
3768
3769                 req_capsule_set_size(&req->rq_pill, &RMF_SETINFO_KEY,
3770                                      RCL_CLIENT, keylen);
3771                 rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, OST_GET_INFO);
3772                 if (rc) {
3773                         ptlrpc_request_free(req);
3774                         RETURN(rc);
3775                 }
3776
3777                 tmp = req_capsule_client_get(&req->rq_pill, &RMF_SETINFO_KEY);
3778                 memcpy(tmp, key, keylen);
3779
3780                 req->rq_no_delay = req->rq_no_resend = 1;
3781                 ptlrpc_request_set_replen(req);
3782                 rc = ptlrpc_queue_wait(req);
3783                 if (rc)
3784                         GOTO(out, rc);
3785
3786                 reply = req_capsule_server_get(&req->rq_pill, &RMF_OBD_ID);
3787                 if (reply == NULL)
3788                         GOTO(out, rc = -EPROTO);
3789
3790                 *((obd_id *)val) = *reply;
3791         out:
3792                 ptlrpc_req_finished(req);
3793                 RETURN(rc);
3794         } else if (KEY_IS(KEY_FIEMAP)) {
3795                 struct ptlrpc_request *req;
3796                 struct ll_user_fiemap *reply;
3797                 char *tmp;
3798                 int rc;
3799
3800                 req = ptlrpc_request_alloc(class_exp2cliimp(exp),
3801                                            &RQF_OST_GET_INFO_FIEMAP);
3802                 if (req == NULL)
3803                         RETURN(-ENOMEM);
3804
3805                 req_capsule_set_size(&req->rq_pill, &RMF_FIEMAP_KEY,
3806                                      RCL_CLIENT, keylen);
3807                 req_capsule_set_size(&req->rq_pill, &RMF_FIEMAP_VAL,
3808                                      RCL_CLIENT, *vallen);
3809                 req_capsule_set_size(&req->rq_pill, &RMF_FIEMAP_VAL,
3810                                      RCL_SERVER, *vallen);
3811
3812                 rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, OST_GET_INFO);
3813                 if (rc) {
3814                         ptlrpc_request_free(req);
3815                         RETURN(rc);
3816                 }
3817
3818                 tmp = req_capsule_client_get(&req->rq_pill, &RMF_FIEMAP_KEY);
3819                 memcpy(tmp, key, keylen);
3820                 tmp = req_capsule_client_get(&req->rq_pill, &RMF_FIEMAP_VAL);
3821                 memcpy(tmp, val, *vallen);
3822
3823                 ptlrpc_request_set_replen(req);
3824                 rc = ptlrpc_queue_wait(req);
3825                 if (rc)
3826                         GOTO(out1, rc);
3827
3828                 reply = req_capsule_server_get(&req->rq_pill, &RMF_FIEMAP_VAL);
3829                 if (reply == NULL)
3830                         GOTO(out1, rc = -EPROTO);
3831
3832                 memcpy(val, reply, *vallen);
3833         out1:
3834                 ptlrpc_req_finished(req);
3835
3836                 RETURN(rc);
3837         }
3838
3839         RETURN(-EINVAL);
3840 }
3841
3842 static int osc_setinfo_mds_connect_import(struct obd_import *imp)
3843 {
3844         struct llog_ctxt *ctxt;
3845         int rc = 0;
3846         ENTRY;
3847
3848         ctxt = llog_get_context(imp->imp_obd, LLOG_MDS_OST_ORIG_CTXT);
3849         if (ctxt) {
3850                 rc = llog_initiator_connect(ctxt);
3851                 llog_ctxt_put(ctxt);
3852         } else {
3853                 /* XXX return an error? skip setting below flags? */
3854         }
3855
3856         spin_lock(&imp->imp_lock);
3857         imp->imp_server_timeout = 1;
3858         imp->imp_pingable = 1;
3859         spin_unlock(&imp->imp_lock);
3860         CDEBUG(D_RPCTRACE, "pinging OST %s\n", obd2cli_tgt(imp->imp_obd));
3861
3862         RETURN(rc);
3863 }
3864
3865 static int osc_setinfo_mds_conn_interpret(const struct lu_env *env,
3866                                           struct ptlrpc_request *req,
3867                                           void *aa, int rc)
3868 {
3869         ENTRY;
3870         if (rc != 0)
3871                 RETURN(rc);
3872
3873         RETURN(osc_setinfo_mds_connect_import(req->rq_import));
3874 }
3875
3876 static int osc_set_info_async(struct obd_export *exp, obd_count keylen,
3877                               void *key, obd_count vallen, void *val,
3878                               struct ptlrpc_request_set *set)
3879 {
3880         struct ptlrpc_request *req;
3881         struct obd_device     *obd = exp->exp_obd;
3882         struct obd_import     *imp = class_exp2cliimp(exp);
3883         char                  *tmp;
3884         int                    rc;
3885         ENTRY;
3886
3887         OBD_FAIL_TIMEOUT(OBD_FAIL_OSC_SHUTDOWN, 10);
3888
3889         if (KEY_IS(KEY_NEXT_ID)) {
3890                 if (vallen != sizeof(obd_id))
3891                         RETURN(-ERANGE);
3892                 if (val == NULL)
3893                         RETURN(-EINVAL);
3894                 obd->u.cli.cl_oscc.oscc_next_id = *((obd_id*)val) + 1;
3895                 CDEBUG(D_HA, "%s: set oscc_next_id = "LPU64"\n",
3896                        exp->exp_obd->obd_name,
3897                        obd->u.cli.cl_oscc.oscc_next_id);
3898
3899                 RETURN(0);
3900         }
3901
3902         if (KEY_IS(KEY_UNLINKED)) {
3903                 struct osc_creator *oscc = &obd->u.cli.cl_oscc;
3904                 spin_lock(&oscc->oscc_lock);
3905                 oscc->oscc_flags &= ~OSCC_FLAG_NOSPC;
3906                 spin_unlock(&oscc->oscc_lock);
3907                 RETURN(0);
3908         }
3909
3910         if (KEY_IS(KEY_INIT_RECOV)) {
3911                 if (vallen != sizeof(int))
3912                         RETURN(-EINVAL);
3913                 spin_lock(&imp->imp_lock);
3914                 imp->imp_initial_recov = *(int *)val;
3915                 spin_unlock(&imp->imp_lock);
3916                 CDEBUG(D_HA, "%s: set imp_initial_recov = %d\n",
3917                        exp->exp_obd->obd_name,
3918                        imp->imp_initial_recov);
3919                 RETURN(0);
3920         }
3921
3922         if (KEY_IS(KEY_CHECKSUM)) {
3923                 if (vallen != sizeof(int))
3924                         RETURN(-EINVAL);
3925                 exp->exp_obd->u.cli.cl_checksum = (*(int *)val) ? 1 : 0;
3926                 RETURN(0);
3927         }
3928
3929         if (KEY_IS(KEY_SPTLRPC_CONF)) {
3930                 sptlrpc_conf_client_adapt(obd);
3931                 RETURN(0);
3932         }
3933
3934         if (KEY_IS(KEY_FLUSH_CTX)) {
3935                 sptlrpc_import_flush_my_ctx(imp);
3936                 RETURN(0);
3937         }
3938
3939         if (!set && !KEY_IS(KEY_GRANT_SHRINK))
3940                 RETURN(-EINVAL);
3941
3942         /* We pass all other commands directly to OST. Since nobody calls osc
3943            methods directly and everybody is supposed to go through LOV, we
3944            assume lov checked invalid values for us.
3945            The only recognised values so far are evict_by_nid and mds_conn.
3946            Even if something bad goes through, we'd get a -EINVAL from OST
3947            anyway. */
3948
3949         if (KEY_IS(KEY_GRANT_SHRINK))
3950                 req = ptlrpc_request_alloc(imp, &RQF_OST_SET_GRANT_INFO);
3951         else
3952                 req = ptlrpc_request_alloc(imp, &RQF_OBD_SET_INFO);
3953
3954         if (req == NULL)
3955                 RETURN(-ENOMEM);
3956
3957         req_capsule_set_size(&req->rq_pill, &RMF_SETINFO_KEY,
3958                              RCL_CLIENT, keylen);
3959         req_capsule_set_size(&req->rq_pill, &RMF_SETINFO_VAL,
3960                              RCL_CLIENT, vallen);
3961         rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, OST_SET_INFO);
3962         if (rc) {
3963                 ptlrpc_request_free(req);
3964                 RETURN(rc);
3965         }
3966
3967         tmp = req_capsule_client_get(&req->rq_pill, &RMF_SETINFO_KEY);
3968         memcpy(tmp, key, keylen);
3969         tmp = req_capsule_client_get(&req->rq_pill, &RMF_SETINFO_VAL);
3970         memcpy(tmp, val, vallen);
3971
3972         if (KEY_IS(KEY_MDS_CONN)) {
3973                 struct osc_creator *oscc = &obd->u.cli.cl_oscc;
3974
3975                 oscc->oscc_oa.o_gr = (*(__u32 *)val);
3976                 oscc->oscc_oa.o_valid |= OBD_MD_FLGROUP;
3977                 LASSERT_MDS_GROUP(oscc->oscc_oa.o_gr);
3978                 req->rq_no_delay = req->rq_no_resend = 1;
3979                 req->rq_interpret_reply = osc_setinfo_mds_conn_interpret;
3980         } else if (KEY_IS(KEY_GRANT_SHRINK)) {
3981                 struct osc_grant_args *aa;
3982                 struct obdo *oa;
3983
3984                 CLASSERT(sizeof(*aa) <= sizeof(req->rq_async_args));
3985                 aa = ptlrpc_req_async_args(req);
3986                 OBD_ALLOC_PTR(oa);
3987                 if (!oa) {
3988                         ptlrpc_req_finished(req);
3989                         RETURN(-ENOMEM);
3990                 }
3991                 *oa = ((struct ost_body *)val)->oa;
3992                 aa->aa_oa = oa;
3993                 req->rq_interpret_reply = osc_shrink_grant_interpret;
3994         }
3995
3996         ptlrpc_request_set_replen(req);
3997         if (!KEY_IS(KEY_GRANT_SHRINK)) {
3998                 LASSERT(set != NULL);
3999                 ptlrpc_set_add_req(set, req);
4000                 ptlrpc_check_set(NULL, set);
4001         } else
4002                 ptlrpcd_add_req(req, PSCOPE_OTHER);
4003
4004         RETURN(0);
4005 }
4006
4007
4008 static struct llog_operations osc_size_repl_logops = {
4009         lop_cancel: llog_obd_repl_cancel
4010 };
4011
4012 static struct llog_operations osc_mds_ost_orig_logops;
4013
4014 static int __osc_llog_init(struct obd_device *obd, struct obd_llog_group *olg,
4015                            struct obd_device *tgt, struct llog_catid *catid)
4016 {
4017         int rc;
4018         ENTRY;
4019
4020         rc = llog_setup(obd, &obd->obd_olg, LLOG_MDS_OST_ORIG_CTXT, tgt, 1,
4021                         &catid->lci_logid, &osc_mds_ost_orig_logops);
4022         if (rc) {
4023                 CERROR("failed LLOG_MDS_OST_ORIG_CTXT\n");
4024                 GOTO(out, rc);
4025         }
4026
4027         rc = llog_setup(obd, &obd->obd_olg, LLOG_SIZE_REPL_CTXT, tgt, 1,
4028                         NULL, &osc_size_repl_logops);
4029         if (rc) {
4030                 struct llog_ctxt *ctxt =
4031                         llog_get_context(obd, LLOG_MDS_OST_ORIG_CTXT);
4032                 if (ctxt)
4033                         llog_cleanup(ctxt);
4034                 CERROR("failed LLOG_SIZE_REPL_CTXT\n");
4035         }
4036         GOTO(out, rc);
4037 out:
4038         if (rc) {
4039                 CERROR("osc '%s' tgt '%s' catid %p rc=%d\n",
4040                        obd->obd_name, tgt->obd_name, catid, rc);
4041                 CERROR("logid "LPX64":0x%x\n",
4042                        catid->lci_logid.lgl_oid, catid->lci_logid.lgl_ogen);
4043         }
4044         return rc;
4045 }
4046
4047 static int osc_llog_init(struct obd_device *obd, struct obd_llog_group *olg,
4048                          struct obd_device *disk_obd, int *index)
4049 {
4050         struct llog_catid catid;
4051         static char name[32] = CATLIST;
4052         int rc;
4053         ENTRY;
4054
4055         LASSERT(olg == &obd->obd_olg);
4056
4057         mutex_down(&olg->olg_cat_processing);
4058         rc = llog_get_cat_list(disk_obd, name, *index, 1, &catid);
4059         if (rc) {
4060                 CERROR("rc: %d\n", rc);
4061                 GOTO(out, rc);
4062         }
4063
4064         CDEBUG(D_INFO, "%s: Init llog for %d - catid "LPX64"/"LPX64":%x\n",
4065                obd->obd_name, *index, catid.lci_logid.lgl_oid,
4066                catid.lci_logid.lgl_ogr, catid.lci_logid.lgl_ogen);
4067
4068         rc = __osc_llog_init(obd, olg, disk_obd, &catid);
4069         if (rc) {
4070                 CERROR("rc: %d\n", rc);
4071                 GOTO(out, rc);
4072         }
4073
4074         rc = llog_put_cat_list(disk_obd, name, *index, 1, &catid);
4075         if (rc) {
4076                 CERROR("rc: %d\n", rc);
4077                 GOTO(out, rc);
4078         }
4079
4080  out:
4081         mutex_up(&olg->olg_cat_processing);
4082
4083         return rc;
4084 }
4085
4086 static int osc_llog_finish(struct obd_device *obd, int count)
4087 {
4088         struct llog_ctxt *ctxt;
4089         int rc = 0, rc2 = 0;
4090         ENTRY;
4091
4092         ctxt = llog_get_context(obd, LLOG_MDS_OST_ORIG_CTXT);
4093         if (ctxt)
4094                 rc = llog_cleanup(ctxt);
4095
4096         ctxt = llog_get_context(obd, LLOG_SIZE_REPL_CTXT);
4097         if (ctxt)
4098                 rc2 = llog_cleanup(ctxt);
4099         if (!rc)
4100                 rc = rc2;
4101
4102         RETURN(rc);
4103 }
4104
4105 static int osc_reconnect(const struct lu_env *env,
4106                          struct obd_export *exp, struct obd_device *obd,
4107                          struct obd_uuid *cluuid,
4108                          struct obd_connect_data *data,
4109                          void *localdata)
4110 {
4111         struct client_obd *cli = &obd->u.cli;
4112
4113         if (data != NULL && (data->ocd_connect_flags & OBD_CONNECT_GRANT)) {
4114                 long lost_grant;
4115
4116                 client_obd_list_lock(&cli->cl_loi_list_lock);
4117                 data->ocd_grant = cli->cl_avail_grant ?:
4118                                 2 * cli->cl_max_pages_per_rpc << CFS_PAGE_SHIFT;
4119                 lost_grant = cli->cl_lost_grant;
4120                 cli->cl_lost_grant = 0;
4121                 client_obd_list_unlock(&cli->cl_loi_list_lock);
4122
4123                 CDEBUG(D_CACHE, "request ocd_grant: %d cl_avail_grant: %ld "
4124                        "cl_lost_grant: %ld\n", data->ocd_grant,
4125                        cli->cl_avail_grant, lost_grant);
4126                 CDEBUG(D_RPCTRACE, "ocd_connect_flags: "LPX64" ocd_version: %d"
4127                        " ocd_grant: %d\n", data->ocd_connect_flags,
4128                        data->ocd_version, data->ocd_grant);
4129         }
4130
4131         RETURN(0);
4132 }
4133
4134 static int osc_disconnect(struct obd_export *exp)
4135 {
4136         struct obd_device *obd = class_exp2obd(exp);
4137         struct llog_ctxt  *ctxt;
4138         int rc;
4139
4140         ctxt = llog_get_context(obd, LLOG_SIZE_REPL_CTXT);
4141         if (ctxt) {
4142                 if (obd->u.cli.cl_conn_count == 1) {
4143                         /* Flush any remaining cancel messages out to the
4144                          * target */
4145                         llog_sync(ctxt, exp);
4146                 }
4147                 llog_ctxt_put(ctxt);
4148         } else {
4149                 CDEBUG(D_HA, "No LLOG_SIZE_REPL_CTXT found in obd %p\n",
4150                        obd);
4151         }
4152
4153         rc = client_disconnect_export(exp);
4154         /**
4155          * Initially we put del_shrink_grant before disconnect_export, but it
4156          * causes the following problem if setup (connect) and cleanup
4157          * (disconnect) are tangled together.
4158          *      connect p1                     disconnect p2
4159          *   ptlrpc_connect_import
4160          *     ...............               class_manual_cleanup
4161          *                                     osc_disconnect
4162          *                                     del_shrink_grant
4163          *   ptlrpc_connect_interrupt
4164          *     init_grant_shrink
4165          *   add this client to shrink list
4166          *                                      cleanup_osc
4167          * Bang! pinger trigger the shrink.
4168          * So the osc should be disconnected from the shrink list, after we
4169          * are sure the import has been destroyed. BUG18662
4170          */
4171         if (obd->u.cli.cl_import == NULL)
4172                 osc_del_shrink_grant(&obd->u.cli);
4173         return rc;
4174 }
4175
4176 static int osc_import_event(struct obd_device *obd,
4177                             struct obd_import *imp,
4178                             enum obd_import_event event)
4179 {
4180         struct client_obd *cli;
4181         int rc = 0;
4182
4183         ENTRY;
4184         LASSERT(imp->imp_obd == obd);
4185
4186         switch (event) {
4187         case IMP_EVENT_DISCON: {
4188                 /* Only do this on the MDS OSC's */
4189                 if (imp->imp_server_timeout) {
4190                         struct osc_creator *oscc = &obd->u.cli.cl_oscc;
4191
4192                         spin_lock(&oscc->oscc_lock);
4193                         oscc->oscc_flags |= OSCC_FLAG_RECOVERING;
4194                         spin_unlock(&oscc->oscc_lock);
4195                 }
4196                 cli = &obd->u.cli;
4197                 client_obd_list_lock(&cli->cl_loi_list_lock);
4198                 cli->cl_avail_grant = 0;
4199                 cli->cl_lost_grant = 0;
4200                 client_obd_list_unlock(&cli->cl_loi_list_lock);
4201                 break;
4202         }
4203         case IMP_EVENT_INACTIVE: {
4204                 rc = obd_notify_observer(obd, obd, OBD_NOTIFY_INACTIVE, NULL);
4205                 break;
4206         }
4207         case IMP_EVENT_INVALIDATE: {
4208                 struct ldlm_namespace *ns = obd->obd_namespace;
4209                 struct lu_env         *env;
4210                 int                    refcheck;
4211
4212                 env = cl_env_get(&refcheck);
4213                 if (!IS_ERR(env)) {
4214                         /* Reset grants */
4215                         cli = &obd->u.cli;
4216                         client_obd_list_lock(&cli->cl_loi_list_lock);
4217                         /* all pages go to failing rpcs due to the invalid
4218                          * import */
4219                         osc_check_rpcs(env, cli);
4220                         client_obd_list_unlock(&cli->cl_loi_list_lock);
4221
4222                         ldlm_namespace_cleanup(ns, LDLM_FL_LOCAL_ONLY);
4223                         cl_env_put(env, &refcheck);
4224                 } else
4225                         rc = PTR_ERR(env);
4226                 break;
4227         }
4228         case IMP_EVENT_ACTIVE: {
4229                 /* Only do this on the MDS OSC's */
4230                 if (imp->imp_server_timeout) {
4231                         struct osc_creator *oscc = &obd->u.cli.cl_oscc;
4232
4233                         spin_lock(&oscc->oscc_lock);
4234                         oscc->oscc_flags &= ~OSCC_FLAG_NOSPC;
4235                         spin_unlock(&oscc->oscc_lock);
4236                 }
4237                 rc = obd_notify_observer(obd, obd, OBD_NOTIFY_ACTIVE, NULL);
4238                 break;
4239         }
4240         case IMP_EVENT_OCD: {
4241                 struct obd_connect_data *ocd = &imp->imp_connect_data;
4242
4243                 if (ocd->ocd_connect_flags & OBD_CONNECT_GRANT)
4244                         osc_init_grant(&obd->u.cli, ocd);
4245
4246                 /* See bug 7198 */
4247                 if (ocd->ocd_connect_flags & OBD_CONNECT_REQPORTAL)
4248                         imp->imp_client->cli_request_portal =OST_REQUEST_PORTAL;
4249
4250                 rc = obd_notify_observer(obd, obd, OBD_NOTIFY_OCD, NULL);
4251                 break;
4252         }
4253         default:
4254                 CERROR("Unknown import event %d\n", event);
4255                 LBUG();
4256         }
4257         RETURN(rc);
4258 }
4259
4260 int osc_setup(struct obd_device *obd, struct lustre_cfg *lcfg)
4261 {
4262         int rc;
4263         ENTRY;
4264
4265         ENTRY;
4266         rc = ptlrpcd_addref();
4267         if (rc)
4268                 RETURN(rc);
4269
4270         rc = client_obd_setup(obd, lcfg);
4271         if (rc) {
4272                 ptlrpcd_decref();
4273         } else {
4274                 struct lprocfs_static_vars lvars = { 0 };
4275                 struct client_obd *cli = &obd->u.cli;
4276
4277                 cli->cl_grant_shrink_interval = GRANT_SHRINK_INTERVAL;
4278                 lprocfs_osc_init_vars(&lvars);
4279                 if (lprocfs_obd_setup(obd, lvars.obd_vars) == 0) {
4280                         lproc_osc_attach_seqstat(obd);
4281                         sptlrpc_lprocfs_cliobd_attach(obd);
4282                         ptlrpc_lprocfs_register_obd(obd);
4283                 }
4284
4285                 oscc_init(obd);
4286                 /* We need to allocate a few requests more, because
4287                    brw_interpret tries to create new requests before freeing
4288                    previous ones. Ideally we want to have 2x max_rpcs_in_flight
4289                    reserved, but I afraid that might be too much wasted RAM
4290                    in fact, so 2 is just my guess and still should work. */
4291                 cli->cl_import->imp_rq_pool =
4292                         ptlrpc_init_rq_pool(cli->cl_max_rpcs_in_flight + 2,
4293                                             OST_MAXREQSIZE,
4294                                             ptlrpc_add_rqs_to_pool);
4295
4296                 CFS_INIT_LIST_HEAD(&cli->cl_grant_shrink_list);
4297                 sema_init(&cli->cl_grant_sem, 1);
4298         }
4299
4300         RETURN(rc);
4301 }
4302
4303 static int osc_precleanup(struct obd_device *obd, enum obd_cleanup_stage stage)
4304 {
4305         int rc = 0;
4306         ENTRY;
4307
4308         switch (stage) {
4309         case OBD_CLEANUP_EARLY: {
4310                 struct obd_import *imp;
4311                 imp = obd->u.cli.cl_import;
4312                 CDEBUG(D_HA, "Deactivating import %s\n", obd->obd_name);
4313                 /* ptlrpc_abort_inflight to stop an mds_lov_synchronize */
4314                 ptlrpc_deactivate_import(imp);
4315                 spin_lock(&imp->imp_lock);
4316                 imp->imp_pingable = 0;
4317                 spin_unlock(&imp->imp_lock);
4318                 break;
4319         }
4320         case OBD_CLEANUP_EXPORTS: {
4321                 /* If we set up but never connected, the
4322                    client import will not have been cleaned. */
4323                 if (obd->u.cli.cl_import) {
4324                         struct obd_import *imp;
4325                         down_write(&obd->u.cli.cl_sem);
4326                         imp = obd->u.cli.cl_import;
4327                         CDEBUG(D_CONFIG, "%s: client import never connected\n",
4328                                obd->obd_name);
4329                         ptlrpc_invalidate_import(imp);
4330                         if (imp->imp_rq_pool) {
4331                                 ptlrpc_free_rq_pool(imp->imp_rq_pool);
4332                                 imp->imp_rq_pool = NULL;
4333                         }
4334                         class_destroy_import(imp);
4335                         up_write(&obd->u.cli.cl_sem);
4336                         obd->u.cli.cl_import = NULL;
4337                 }
4338                 rc = obd_llog_finish(obd, 0);
4339                 if (rc != 0)
4340                         CERROR("failed to cleanup llogging subsystems\n");
4341                 break;
4342                 }
4343         }
4344         RETURN(rc);
4345 }
4346
4347 int osc_cleanup(struct obd_device *obd)
4348 {
4349         int rc;
4350
4351         ENTRY;
4352         ptlrpc_lprocfs_unregister_obd(obd);
4353         lprocfs_obd_cleanup(obd);
4354
4355         /* free memory of osc quota cache */
4356         lquota_cleanup(quota_interface, obd);
4357
4358         rc = client_obd_cleanup(obd);
4359
4360         ptlrpcd_decref();
4361         RETURN(rc);
4362 }
4363
4364 int osc_process_config_base(struct obd_device *obd, struct lustre_cfg *lcfg)
4365 {
4366         struct lprocfs_static_vars lvars = { 0 };
4367         int rc = 0;
4368
4369         lprocfs_osc_init_vars(&lvars);
4370
4371         switch (lcfg->lcfg_command) {
4372         default:
4373                 rc = class_process_proc_param(PARAM_OSC, lvars.obd_vars,
4374                                               lcfg, obd);
4375                 if (rc > 0)
4376                         rc = 0;
4377                 break;
4378         }
4379
4380         return(rc);
4381 }
4382
4383 static int osc_process_config(struct obd_device *obd, obd_count len, void *buf)
4384 {
4385         return osc_process_config_base(obd, buf);
4386 }
4387
4388 struct obd_ops osc_obd_ops = {
4389         .o_owner                = THIS_MODULE,
4390         .o_setup                = osc_setup,
4391         .o_precleanup           = osc_precleanup,
4392         .o_cleanup              = osc_cleanup,
4393         .o_add_conn             = client_import_add_conn,
4394         .o_del_conn             = client_import_del_conn,
4395         .o_connect              = client_connect_import,
4396         .o_reconnect            = osc_reconnect,
4397         .o_disconnect           = osc_disconnect,
4398         .o_statfs               = osc_statfs,
4399         .o_statfs_async         = osc_statfs_async,
4400         .o_packmd               = osc_packmd,
4401         .o_unpackmd             = osc_unpackmd,
4402         .o_precreate            = osc_precreate,
4403         .o_create               = osc_create,
4404         .o_create_async         = osc_create_async,
4405         .o_destroy              = osc_destroy,
4406         .o_getattr              = osc_getattr,
4407         .o_getattr_async        = osc_getattr_async,
4408         .o_setattr              = osc_setattr,
4409         .o_setattr_async        = osc_setattr_async,
4410         .o_brw                  = osc_brw,
4411         .o_punch                = osc_punch,
4412         .o_sync                 = osc_sync,
4413         .o_enqueue              = osc_enqueue,
4414         .o_change_cbdata        = osc_change_cbdata,
4415         .o_cancel               = osc_cancel,
4416         .o_cancel_unused        = osc_cancel_unused,
4417         .o_iocontrol            = osc_iocontrol,
4418         .o_get_info             = osc_get_info,
4419         .o_set_info_async       = osc_set_info_async,
4420         .o_import_event         = osc_import_event,
4421         .o_llog_init            = osc_llog_init,
4422         .o_llog_finish          = osc_llog_finish,
4423         .o_process_config       = osc_process_config,
4424 };
4425
4426 extern struct lu_kmem_descr  osc_caches[];
4427 extern spinlock_t            osc_ast_guard;
4428 extern struct lock_class_key osc_ast_guard_class;
4429
4430 int __init osc_init(void)
4431 {
4432         struct lprocfs_static_vars lvars = { 0 };
4433         int rc;
4434         ENTRY;
4435
4436         /* print an address of _any_ initialized kernel symbol from this
4437          * module, to allow debugging with gdb that doesn't support data
4438          * symbols from modules.*/
4439         CDEBUG(D_CONSOLE, "Lustre OSC module (%p).\n", &osc_caches);
4440
4441         rc = lu_kmem_init(osc_caches);
4442
4443         lprocfs_osc_init_vars(&lvars);
4444
4445         request_module("lquota");
4446         quota_interface = PORTAL_SYMBOL_GET(osc_quota_interface);
4447         lquota_init(quota_interface);
4448         init_obd_quota_ops(quota_interface, &osc_obd_ops);
4449
4450         rc = class_register_type(&osc_obd_ops, NULL, lvars.module_vars,
4451                                  LUSTRE_OSC_NAME, &osc_device_type);
4452         if (rc) {
4453                 if (quota_interface)
4454                         PORTAL_SYMBOL_PUT(osc_quota_interface);
4455                 lu_kmem_fini(osc_caches);
4456                 RETURN(rc);
4457         }
4458
4459         spin_lock_init(&osc_ast_guard);
4460         lockdep_set_class(&osc_ast_guard, &osc_ast_guard_class);
4461
4462         osc_mds_ost_orig_logops = llog_lvfs_ops;
4463         osc_mds_ost_orig_logops.lop_setup = llog_obd_origin_setup;
4464         osc_mds_ost_orig_logops.lop_cleanup = llog_obd_origin_cleanup;
4465         osc_mds_ost_orig_logops.lop_add = llog_obd_origin_add;
4466         osc_mds_ost_orig_logops.lop_connect = llog_origin_connect;
4467
4468         RETURN(rc);
4469 }
4470
4471 #ifdef __KERNEL__
4472 static void /*__exit*/ osc_exit(void)
4473 {
4474         lu_device_type_fini(&osc_device_type);
4475
4476         lquota_exit(quota_interface);
4477         if (quota_interface)
4478                 PORTAL_SYMBOL_PUT(osc_quota_interface);
4479
4480         class_unregister_type(LUSTRE_OSC_NAME);
4481         lu_kmem_fini(osc_caches);
4482 }
4483
4484 MODULE_AUTHOR("Sun Microsystems, Inc. <http://www.lustre.org/>");
4485 MODULE_DESCRIPTION("Lustre Object Storage Client (OSC)");
4486 MODULE_LICENSE("GPL");
4487
4488 cfs_module(osc, LUSTRE_VERSION_STRING, osc_init, osc_exit);
4489 #endif