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