Whamcloud - gitweb
b=21490 1.8<->2.0 interop: in 2.0 server and 1.8 client env. read 1. 8 file hung
[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                 RETURN(rc);
1482
1483         LASSERTF(req->rq_repmsg != NULL, "rc = %d\n", rc);
1484         body = req_capsule_server_get(&req->rq_pill, &RMF_OST_BODY);
1485         if (body == NULL) {
1486                 CDEBUG(D_INFO, "Can't unpack body\n");
1487                 RETURN(-EPROTO);
1488         }
1489
1490         /* set/clear over quota flag for a uid/gid */
1491         if (lustre_msg_get_opc(req->rq_reqmsg) == OST_WRITE &&
1492             body->oa.o_valid & (OBD_MD_FLUSRQUOTA | OBD_MD_FLGRPQUOTA)) {
1493                 unsigned int qid[MAXQUOTAS] = { body->oa.o_uid, body->oa.o_gid };
1494
1495                 lquota_setdq(quota_interface, cli, qid, body->oa.o_valid,
1496                              body->oa.o_flags);
1497         }
1498
1499         if (rc < 0)
1500                 RETURN(rc);
1501
1502         if (aa->aa_oa->o_valid & OBD_MD_FLCKSUM)
1503                 client_cksum = aa->aa_oa->o_cksum; /* save for later */
1504
1505         osc_update_grant(cli, body);
1506
1507         if (lustre_msg_get_opc(req->rq_reqmsg) == OST_WRITE) {
1508                 if (rc > 0) {
1509                         CERROR("Unexpected +ve rc %d\n", rc);
1510                         RETURN(-EPROTO);
1511                 }
1512                 LASSERT(req->rq_bulk->bd_nob == aa->aa_requested_nob);
1513
1514                 if (sptlrpc_cli_unwrap_bulk_write(req, req->rq_bulk))
1515                         RETURN(-EAGAIN);
1516
1517                 if ((aa->aa_oa->o_valid & OBD_MD_FLCKSUM) && client_cksum &&
1518                     check_write_checksum(&body->oa, peer, client_cksum,
1519                                          body->oa.o_cksum, aa->aa_requested_nob,
1520                                          aa->aa_page_count, aa->aa_ppga,
1521                                          cksum_type_unpack(aa->aa_oa->o_flags)))
1522                         RETURN(-EAGAIN);
1523
1524                 rc = check_write_rcs(req, aa->aa_requested_nob,aa->aa_nio_count,
1525                                      aa->aa_page_count, aa->aa_ppga);
1526                 GOTO(out, rc);
1527         }
1528
1529         /* The rest of this function executes only for OST_READs */
1530
1531         /* if unwrap_bulk failed, return -EAGAIN to retry */
1532         rc = sptlrpc_cli_unwrap_bulk_read(req, req->rq_bulk, rc);
1533         if (rc < 0)
1534                 GOTO(out, rc = -EAGAIN);
1535
1536         if (rc > aa->aa_requested_nob) {
1537                 CERROR("Unexpected rc %d (%d requested)\n", rc,
1538                        aa->aa_requested_nob);
1539                 RETURN(-EPROTO);
1540         }
1541
1542         if (rc != req->rq_bulk->bd_nob_transferred) {
1543                 CERROR ("Unexpected rc %d (%d transferred)\n",
1544                         rc, req->rq_bulk->bd_nob_transferred);
1545                 return (-EPROTO);
1546         }
1547
1548         if (rc < aa->aa_requested_nob)
1549                 handle_short_read(rc, aa->aa_page_count, aa->aa_ppga);
1550
1551         if (body->oa.o_valid & OBD_MD_FLCKSUM) {
1552                 static int cksum_counter;
1553                 __u32      server_cksum = body->oa.o_cksum;
1554                 char      *via;
1555                 char      *router;
1556                 cksum_type_t cksum_type;
1557
1558                 if (body->oa.o_valid & OBD_MD_FLFLAGS)
1559                         cksum_type = cksum_type_unpack(body->oa.o_flags);
1560                 else
1561                         cksum_type = OBD_CKSUM_CRC32;
1562                 client_cksum = osc_checksum_bulk(rc, aa->aa_page_count,
1563                                                  aa->aa_ppga, OST_READ,
1564                                                  cksum_type);
1565
1566                 if (peer->nid == req->rq_bulk->bd_sender) {
1567                         via = router = "";
1568                 } else {
1569                         via = " via ";
1570                         router = libcfs_nid2str(req->rq_bulk->bd_sender);
1571                 }
1572
1573                 if (server_cksum == ~0 && rc > 0) {
1574                         CERROR("Protocol error: server %s set the 'checksum' "
1575                                "bit, but didn't send a checksum.  Not fatal, "
1576                                "but please notify on http://bugzilla.lustre.org/\n",
1577                                libcfs_nid2str(peer->nid));
1578                 } else if (server_cksum != client_cksum) {
1579                         LCONSOLE_ERROR_MSG(0x133, "%s: BAD READ CHECKSUM: from "
1580                                            "%s%s%s inum "LPU64"/"LPU64" object "
1581                                            LPU64"/"LPU64" extent "
1582                                            "["LPU64"-"LPU64"]\n",
1583                                            req->rq_import->imp_obd->obd_name,
1584                                            libcfs_nid2str(peer->nid),
1585                                            via, router,
1586                                            body->oa.o_valid & OBD_MD_FLFID ?
1587                                                 body->oa.o_fid : (__u64)0,
1588                                            body->oa.o_valid & OBD_MD_FLFID ?
1589                                                 body->oa.o_generation :(__u64)0,
1590                                            body->oa.o_id,
1591                                            body->oa.o_valid & OBD_MD_FLGROUP ?
1592                                                 body->oa.o_gr : (__u64)0,
1593                                            aa->aa_ppga[0]->off,
1594                                            aa->aa_ppga[aa->aa_page_count-1]->off +
1595                                            aa->aa_ppga[aa->aa_page_count-1]->count -
1596                                                                         1);
1597                         CERROR("client %x, server %x, cksum_type %x\n",
1598                                client_cksum, server_cksum, cksum_type);
1599                         cksum_counter = 0;
1600                         aa->aa_oa->o_cksum = client_cksum;
1601                         rc = -EAGAIN;
1602                 } else {
1603                         cksum_counter++;
1604                         CDEBUG(D_PAGE, "checksum %x confirmed\n", client_cksum);
1605                         rc = 0;
1606                 }
1607         } else if (unlikely(client_cksum)) {
1608                 static int cksum_missed;
1609
1610                 cksum_missed++;
1611                 if ((cksum_missed & (-cksum_missed)) == cksum_missed)
1612                         CERROR("Checksum %u requested from %s but not sent\n",
1613                                cksum_missed, libcfs_nid2str(peer->nid));
1614         } else {
1615                 rc = 0;
1616         }
1617 out:
1618         if (rc >= 0)
1619                 lustre_get_wire_obdo(aa->aa_oa, &body->oa);
1620
1621         RETURN(rc);
1622 }
1623
1624 static int osc_brw_internal(int cmd, struct obd_export *exp, struct obdo *oa,
1625                             struct lov_stripe_md *lsm,
1626                             obd_count page_count, struct brw_page **pga,
1627                             struct obd_capa *ocapa)
1628 {
1629         struct ptlrpc_request *req;
1630         int                    rc;
1631         cfs_waitq_t            waitq;
1632         int                    resends = 0;
1633         struct l_wait_info     lwi;
1634
1635         ENTRY;
1636
1637         cfs_waitq_init(&waitq);
1638
1639 restart_bulk:
1640         rc = osc_brw_prep_request(cmd, &exp->exp_obd->u.cli, oa, lsm,
1641                                   page_count, pga, &req, ocapa, 0);
1642         if (rc != 0)
1643                 return (rc);
1644
1645         rc = ptlrpc_queue_wait(req);
1646
1647         if (rc == -ETIMEDOUT && req->rq_resend) {
1648                 DEBUG_REQ(D_HA, req,  "BULK TIMEOUT");
1649                 ptlrpc_req_finished(req);
1650                 goto restart_bulk;
1651         }
1652
1653         rc = osc_brw_fini_request(req, rc);
1654
1655         ptlrpc_req_finished(req);
1656         if (osc_recoverable_error(rc)) {
1657                 resends++;
1658                 if (!osc_should_resend(resends, &exp->exp_obd->u.cli)) {
1659                         CERROR("too many resend retries, returning error\n");
1660                         RETURN(-EIO);
1661                 }
1662
1663                 lwi = LWI_TIMEOUT_INTR(cfs_time_seconds(resends), NULL, NULL, NULL);
1664                 l_wait_event(waitq, 0, &lwi);
1665
1666                 goto restart_bulk;
1667         }
1668
1669         RETURN (rc);
1670 }
1671
1672 int osc_brw_redo_request(struct ptlrpc_request *request,
1673                          struct osc_brw_async_args *aa)
1674 {
1675         struct ptlrpc_request *new_req;
1676         struct ptlrpc_request_set *set = request->rq_set;
1677         struct osc_brw_async_args *new_aa;
1678         struct osc_async_page *oap;
1679         int rc = 0;
1680         ENTRY;
1681
1682         if (!osc_should_resend(aa->aa_resends, aa->aa_cli)) {
1683                 CERROR("too many resend retries, returning error\n");
1684                 RETURN(-EIO);
1685         }
1686
1687         DEBUG_REQ(D_ERROR, request, "redo for recoverable error");
1688
1689         rc = osc_brw_prep_request(lustre_msg_get_opc(request->rq_reqmsg) ==
1690                                         OST_WRITE ? OBD_BRW_WRITE :OBD_BRW_READ,
1691                                   aa->aa_cli, aa->aa_oa,
1692                                   NULL /* lsm unused by osc currently */,
1693                                   aa->aa_page_count, aa->aa_ppga,
1694                                   &new_req, aa->aa_ocapa, 0);
1695         if (rc)
1696                 RETURN(rc);
1697
1698         client_obd_list_lock(&aa->aa_cli->cl_loi_list_lock);
1699
1700         cfs_list_for_each_entry(oap, &aa->aa_oaps, oap_rpc_item) {
1701                 if (oap->oap_request != NULL) {
1702                         LASSERTF(request == oap->oap_request,
1703                                  "request %p != oap_request %p\n",
1704                                  request, oap->oap_request);
1705                         if (oap->oap_interrupted) {
1706                                 client_obd_list_unlock(&aa->aa_cli->cl_loi_list_lock);
1707                                 ptlrpc_req_finished(new_req);
1708                                 RETURN(-EINTR);
1709                         }
1710                 }
1711         }
1712         /* New request takes over pga and oaps from old request.
1713          * Note that copying a list_head doesn't work, need to move it... */
1714         aa->aa_resends++;
1715         new_req->rq_interpret_reply = request->rq_interpret_reply;
1716         new_req->rq_async_args = request->rq_async_args;
1717         new_req->rq_sent = cfs_time_current_sec() + aa->aa_resends;
1718
1719         new_aa = ptlrpc_req_async_args(new_req);
1720
1721         CFS_INIT_LIST_HEAD(&new_aa->aa_oaps);
1722         cfs_list_splice(&aa->aa_oaps, &new_aa->aa_oaps);
1723         CFS_INIT_LIST_HEAD(&aa->aa_oaps);
1724
1725         cfs_list_for_each_entry(oap, &new_aa->aa_oaps, oap_rpc_item) {
1726                 if (oap->oap_request) {
1727                         ptlrpc_req_finished(oap->oap_request);
1728                         oap->oap_request = ptlrpc_request_addref(new_req);
1729                 }
1730         }
1731
1732         new_aa->aa_ocapa = aa->aa_ocapa;
1733         aa->aa_ocapa = NULL;
1734
1735         /* use ptlrpc_set_add_req is safe because interpret functions work
1736          * in check_set context. only one way exist with access to request
1737          * from different thread got -EINTR - this way protected with
1738          * cl_loi_list_lock */
1739         ptlrpc_set_add_req(set, new_req);
1740
1741         client_obd_list_unlock(&aa->aa_cli->cl_loi_list_lock);
1742
1743         DEBUG_REQ(D_INFO, new_req, "new request");
1744         RETURN(0);
1745 }
1746
1747 /*
1748  * ugh, we want disk allocation on the target to happen in offset order.  we'll
1749  * follow sedgewicks advice and stick to the dead simple shellsort -- it'll do
1750  * fine for our small page arrays and doesn't require allocation.  its an
1751  * insertion sort that swaps elements that are strides apart, shrinking the
1752  * stride down until its '1' and the array is sorted.
1753  */
1754 static void sort_brw_pages(struct brw_page **array, int num)
1755 {
1756         int stride, i, j;
1757         struct brw_page *tmp;
1758
1759         if (num == 1)
1760                 return;
1761         for (stride = 1; stride < num ; stride = (stride * 3) + 1)
1762                 ;
1763
1764         do {
1765                 stride /= 3;
1766                 for (i = stride ; i < num ; i++) {
1767                         tmp = array[i];
1768                         j = i;
1769                         while (j >= stride && array[j - stride]->off > tmp->off) {
1770                                 array[j] = array[j - stride];
1771                                 j -= stride;
1772                         }
1773                         array[j] = tmp;
1774                 }
1775         } while (stride > 1);
1776 }
1777
1778 static obd_count max_unfragmented_pages(struct brw_page **pg, obd_count pages)
1779 {
1780         int count = 1;
1781         int offset;
1782         int i = 0;
1783
1784         LASSERT (pages > 0);
1785         offset = pg[i]->off & ~CFS_PAGE_MASK;
1786
1787         for (;;) {
1788                 pages--;
1789                 if (pages == 0)         /* that's all */
1790                         return count;
1791
1792                 if (offset + pg[i]->count < CFS_PAGE_SIZE)
1793                         return count;   /* doesn't end on page boundary */
1794
1795                 i++;
1796                 offset = pg[i]->off & ~CFS_PAGE_MASK;
1797                 if (offset != 0)        /* doesn't start on page boundary */
1798                         return count;
1799
1800                 count++;
1801         }
1802 }
1803
1804 static struct brw_page **osc_build_ppga(struct brw_page *pga, obd_count count)
1805 {
1806         struct brw_page **ppga;
1807         int i;
1808
1809         OBD_ALLOC(ppga, sizeof(*ppga) * count);
1810         if (ppga == NULL)
1811                 return NULL;
1812
1813         for (i = 0; i < count; i++)
1814                 ppga[i] = pga + i;
1815         return ppga;
1816 }
1817
1818 static void osc_release_ppga(struct brw_page **ppga, obd_count count)
1819 {
1820         LASSERT(ppga != NULL);
1821         OBD_FREE(ppga, sizeof(*ppga) * count);
1822 }
1823
1824 static int osc_brw(int cmd, struct obd_export *exp, struct obd_info *oinfo,
1825                    obd_count page_count, struct brw_page *pga,
1826                    struct obd_trans_info *oti)
1827 {
1828         struct obdo *saved_oa = NULL;
1829         struct brw_page **ppga, **orig;
1830         struct obd_import *imp = class_exp2cliimp(exp);
1831         struct client_obd *cli;
1832         int rc, page_count_orig;
1833         ENTRY;
1834
1835         LASSERT((imp != NULL) && (imp->imp_obd != NULL));
1836         cli = &imp->imp_obd->u.cli;
1837
1838         if (cmd & OBD_BRW_CHECK) {
1839                 /* The caller just wants to know if there's a chance that this
1840                  * I/O can succeed */
1841
1842                 if (imp->imp_invalid)
1843                         RETURN(-EIO);
1844                 RETURN(0);
1845         }
1846
1847         /* test_brw with a failed create can trip this, maybe others. */
1848         LASSERT(cli->cl_max_pages_per_rpc);
1849
1850         rc = 0;
1851
1852         orig = ppga = osc_build_ppga(pga, page_count);
1853         if (ppga == NULL)
1854                 RETURN(-ENOMEM);
1855         page_count_orig = page_count;
1856
1857         sort_brw_pages(ppga, page_count);
1858         while (page_count) {
1859                 obd_count pages_per_brw;
1860
1861                 if (page_count > cli->cl_max_pages_per_rpc)
1862                         pages_per_brw = cli->cl_max_pages_per_rpc;
1863                 else
1864                         pages_per_brw = page_count;
1865
1866                 pages_per_brw = max_unfragmented_pages(ppga, pages_per_brw);
1867
1868                 if (saved_oa != NULL) {
1869                         /* restore previously saved oa */
1870                         *oinfo->oi_oa = *saved_oa;
1871                 } else if (page_count > pages_per_brw) {
1872                         /* save a copy of oa (brw will clobber it) */
1873                         OBDO_ALLOC(saved_oa);
1874                         if (saved_oa == NULL)
1875                                 GOTO(out, rc = -ENOMEM);
1876                         *saved_oa = *oinfo->oi_oa;
1877                 }
1878
1879                 rc = osc_brw_internal(cmd, exp, oinfo->oi_oa, oinfo->oi_md,
1880                                       pages_per_brw, ppga, oinfo->oi_capa);
1881
1882                 if (rc != 0)
1883                         break;
1884
1885                 page_count -= pages_per_brw;
1886                 ppga += pages_per_brw;
1887         }
1888
1889 out:
1890         osc_release_ppga(orig, page_count_orig);
1891
1892         if (saved_oa != NULL)
1893                 OBDO_FREE(saved_oa);
1894
1895         RETURN(rc);
1896 }
1897
1898 /* The companion to osc_enter_cache(), called when @oap is no longer part of
1899  * the dirty accounting.  Writeback completes or truncate happens before
1900  * writing starts.  Must be called with the loi lock held. */
1901 static void osc_exit_cache(struct client_obd *cli, struct osc_async_page *oap,
1902                            int sent)
1903 {
1904         osc_release_write_grant(cli, &oap->oap_brw_page, sent);
1905 }
1906
1907
1908 /* This maintains the lists of pending pages to read/write for a given object
1909  * (lop).  This is used by osc_check_rpcs->osc_next_loi() and loi_list_maint()
1910  * to quickly find objects that are ready to send an RPC. */
1911 static int lop_makes_rpc(struct client_obd *cli, struct loi_oap_pages *lop,
1912                          int cmd)
1913 {
1914         int optimal;
1915         ENTRY;
1916
1917         if (lop->lop_num_pending == 0)
1918                 RETURN(0);
1919
1920         /* if we have an invalid import we want to drain the queued pages
1921          * by forcing them through rpcs that immediately fail and complete
1922          * the pages.  recovery relies on this to empty the queued pages
1923          * before canceling the locks and evicting down the llite pages */
1924         if (cli->cl_import == NULL || cli->cl_import->imp_invalid)
1925                 RETURN(1);
1926
1927         /* stream rpcs in queue order as long as as there is an urgent page
1928          * queued.  this is our cheap solution for good batching in the case
1929          * where writepage marks some random page in the middle of the file
1930          * as urgent because of, say, memory pressure */
1931         if (!cfs_list_empty(&lop->lop_urgent)) {
1932                 CDEBUG(D_CACHE, "urgent request forcing RPC\n");
1933                 RETURN(1);
1934         }
1935         /* fire off rpcs when we have 'optimal' rpcs as tuned for the wire. */
1936         optimal = cli->cl_max_pages_per_rpc;
1937         if (cmd & OBD_BRW_WRITE) {
1938                 /* trigger a write rpc stream as long as there are dirtiers
1939                  * waiting for space.  as they're waiting, they're not going to
1940                  * create more pages to coallesce with what's waiting.. */
1941                 if (!cfs_list_empty(&cli->cl_cache_waiters)) {
1942                         CDEBUG(D_CACHE, "cache waiters forcing RPC\n");
1943                         RETURN(1);
1944                 }
1945                 /* +16 to avoid triggering rpcs that would want to include pages
1946                  * that are being queued but which can't be made ready until
1947                  * the queuer finishes with the page. this is a wart for
1948                  * llite::commit_write() */
1949                 optimal += 16;
1950         }
1951         if (lop->lop_num_pending >= optimal)
1952                 RETURN(1);
1953
1954         RETURN(0);
1955 }
1956
1957 static int lop_makes_hprpc(struct loi_oap_pages *lop)
1958 {
1959         struct osc_async_page *oap;
1960         ENTRY;
1961
1962         if (cfs_list_empty(&lop->lop_urgent))
1963                 RETURN(0);
1964
1965         oap = cfs_list_entry(lop->lop_urgent.next,
1966                          struct osc_async_page, oap_urgent_item);
1967
1968         if (oap->oap_async_flags & ASYNC_HP) {
1969                 CDEBUG(D_CACHE, "hp request forcing RPC\n");
1970                 RETURN(1);
1971         }
1972
1973         RETURN(0);
1974 }
1975
1976 static void on_list(cfs_list_t *item, cfs_list_t *list,
1977                     int should_be_on)
1978 {
1979         if (cfs_list_empty(item) && should_be_on)
1980                 cfs_list_add_tail(item, list);
1981         else if (!cfs_list_empty(item) && !should_be_on)
1982                 cfs_list_del_init(item);
1983 }
1984
1985 /* maintain the loi's cli list membership invariants so that osc_send_oap_rpc
1986  * can find pages to build into rpcs quickly */
1987 void loi_list_maint(struct client_obd *cli, struct lov_oinfo *loi)
1988 {
1989         if (lop_makes_hprpc(&loi->loi_write_lop) ||
1990             lop_makes_hprpc(&loi->loi_read_lop)) {
1991                 /* HP rpc */
1992                 on_list(&loi->loi_ready_item, &cli->cl_loi_ready_list, 0);
1993                 on_list(&loi->loi_hp_ready_item, &cli->cl_loi_hp_ready_list, 1);
1994         } else {
1995                 on_list(&loi->loi_hp_ready_item, &cli->cl_loi_hp_ready_list, 0);
1996                 on_list(&loi->loi_ready_item, &cli->cl_loi_ready_list,
1997                         lop_makes_rpc(cli, &loi->loi_write_lop, OBD_BRW_WRITE)||
1998                         lop_makes_rpc(cli, &loi->loi_read_lop, OBD_BRW_READ));
1999         }
2000
2001         on_list(&loi->loi_write_item, &cli->cl_loi_write_list,
2002                 loi->loi_write_lop.lop_num_pending);
2003
2004         on_list(&loi->loi_read_item, &cli->cl_loi_read_list,
2005                 loi->loi_read_lop.lop_num_pending);
2006 }
2007
2008 static void lop_update_pending(struct client_obd *cli,
2009                                struct loi_oap_pages *lop, int cmd, int delta)
2010 {
2011         lop->lop_num_pending += delta;
2012         if (cmd & OBD_BRW_WRITE)
2013                 cli->cl_pending_w_pages += delta;
2014         else
2015                 cli->cl_pending_r_pages += delta;
2016 }
2017
2018 /**
2019  * this is called when a sync waiter receives an interruption.  Its job is to
2020  * get the caller woken as soon as possible.  If its page hasn't been put in an
2021  * rpc yet it can dequeue immediately.  Otherwise it has to mark the rpc as
2022  * desiring interruption which will forcefully complete the rpc once the rpc
2023  * has timed out.
2024  */
2025 int osc_oap_interrupted(const struct lu_env *env, struct osc_async_page *oap)
2026 {
2027         struct loi_oap_pages *lop;
2028         struct lov_oinfo *loi;
2029         int rc = -EBUSY;
2030         ENTRY;
2031
2032         LASSERT(!oap->oap_interrupted);
2033         oap->oap_interrupted = 1;
2034
2035         /* ok, it's been put in an rpc. only one oap gets a request reference */
2036         if (oap->oap_request != NULL) {
2037                 ptlrpc_mark_interrupted(oap->oap_request);
2038                 ptlrpcd_wake(oap->oap_request);
2039                 ptlrpc_req_finished(oap->oap_request);
2040                 oap->oap_request = NULL;
2041         }
2042
2043         /*
2044          * page completion may be called only if ->cpo_prep() method was
2045          * executed by osc_io_submit(), that also adds page the to pending list
2046          */
2047         if (!cfs_list_empty(&oap->oap_pending_item)) {
2048                 cfs_list_del_init(&oap->oap_pending_item);
2049                 cfs_list_del_init(&oap->oap_urgent_item);
2050
2051                 loi = oap->oap_loi;
2052                 lop = (oap->oap_cmd & OBD_BRW_WRITE) ?
2053                         &loi->loi_write_lop : &loi->loi_read_lop;
2054                 lop_update_pending(oap->oap_cli, lop, oap->oap_cmd, -1);
2055                 loi_list_maint(oap->oap_cli, oap->oap_loi);
2056                 rc = oap->oap_caller_ops->ap_completion(env,
2057                                           oap->oap_caller_data,
2058                                           oap->oap_cmd, NULL, -EINTR);
2059         }
2060
2061         RETURN(rc);
2062 }
2063
2064 /* this is trying to propogate async writeback errors back up to the
2065  * application.  As an async write fails we record the error code for later if
2066  * the app does an fsync.  As long as errors persist we force future rpcs to be
2067  * sync so that the app can get a sync error and break the cycle of queueing
2068  * pages for which writeback will fail. */
2069 static void osc_process_ar(struct osc_async_rc *ar, __u64 xid,
2070                            int rc)
2071 {
2072         if (rc) {
2073                 if (!ar->ar_rc)
2074                         ar->ar_rc = rc;
2075
2076                 ar->ar_force_sync = 1;
2077                 ar->ar_min_xid = ptlrpc_sample_next_xid();
2078                 return;
2079
2080         }
2081
2082         if (ar->ar_force_sync && (xid >= ar->ar_min_xid))
2083                 ar->ar_force_sync = 0;
2084 }
2085
2086 void osc_oap_to_pending(struct osc_async_page *oap)
2087 {
2088         struct loi_oap_pages *lop;
2089
2090         if (oap->oap_cmd & OBD_BRW_WRITE)
2091                 lop = &oap->oap_loi->loi_write_lop;
2092         else
2093                 lop = &oap->oap_loi->loi_read_lop;
2094
2095         if (oap->oap_async_flags & ASYNC_HP)
2096                 cfs_list_add(&oap->oap_urgent_item, &lop->lop_urgent);
2097         else if (oap->oap_async_flags & ASYNC_URGENT)
2098                 cfs_list_add_tail(&oap->oap_urgent_item, &lop->lop_urgent);
2099         cfs_list_add_tail(&oap->oap_pending_item, &lop->lop_pending);
2100         lop_update_pending(oap->oap_cli, lop, oap->oap_cmd, 1);
2101 }
2102
2103 /* this must be called holding the loi list lock to give coverage to exit_cache,
2104  * async_flag maintenance, and oap_request */
2105 static void osc_ap_completion(const struct lu_env *env,
2106                               struct client_obd *cli, struct obdo *oa,
2107                               struct osc_async_page *oap, int sent, int rc)
2108 {
2109         __u64 xid = 0;
2110
2111         ENTRY;
2112         if (oap->oap_request != NULL) {
2113                 xid = ptlrpc_req_xid(oap->oap_request);
2114                 ptlrpc_req_finished(oap->oap_request);
2115                 oap->oap_request = NULL;
2116         }
2117
2118         cfs_spin_lock(&oap->oap_lock);
2119         oap->oap_async_flags = 0;
2120         cfs_spin_unlock(&oap->oap_lock);
2121         oap->oap_interrupted = 0;
2122
2123         if (oap->oap_cmd & OBD_BRW_WRITE) {
2124                 osc_process_ar(&cli->cl_ar, xid, rc);
2125                 osc_process_ar(&oap->oap_loi->loi_ar, xid, rc);
2126         }
2127
2128         if (rc == 0 && oa != NULL) {
2129                 if (oa->o_valid & OBD_MD_FLBLOCKS)
2130                         oap->oap_loi->loi_lvb.lvb_blocks = oa->o_blocks;
2131                 if (oa->o_valid & OBD_MD_FLMTIME)
2132                         oap->oap_loi->loi_lvb.lvb_mtime = oa->o_mtime;
2133                 if (oa->o_valid & OBD_MD_FLATIME)
2134                         oap->oap_loi->loi_lvb.lvb_atime = oa->o_atime;
2135                 if (oa->o_valid & OBD_MD_FLCTIME)
2136                         oap->oap_loi->loi_lvb.lvb_ctime = oa->o_ctime;
2137         }
2138
2139         rc = oap->oap_caller_ops->ap_completion(env, oap->oap_caller_data,
2140                                                 oap->oap_cmd, oa, rc);
2141
2142         /* ll_ap_completion (from llite) drops PG_locked. so, a new
2143          * I/O on the page could start, but OSC calls it under lock
2144          * and thus we can add oap back to pending safely */
2145         if (rc)
2146                 /* upper layer wants to leave the page on pending queue */
2147                 osc_oap_to_pending(oap);
2148         else
2149                 osc_exit_cache(cli, oap, sent);
2150         EXIT;
2151 }
2152
2153 static int brw_interpret(const struct lu_env *env,
2154                          struct ptlrpc_request *req, void *data, int rc)
2155 {
2156         struct osc_brw_async_args *aa = data;
2157         struct client_obd *cli;
2158         int async;
2159         ENTRY;
2160
2161         rc = osc_brw_fini_request(req, rc);
2162         CDEBUG(D_INODE, "request %p aa %p rc %d\n", req, aa, rc);
2163         if (osc_recoverable_error(rc)) {
2164                 rc = osc_brw_redo_request(req, aa);
2165                 if (rc == 0)
2166                         RETURN(0);
2167         }
2168
2169         if (aa->aa_ocapa) {
2170                 capa_put(aa->aa_ocapa);
2171                 aa->aa_ocapa = NULL;
2172         }
2173
2174         cli = aa->aa_cli;
2175
2176         client_obd_list_lock(&cli->cl_loi_list_lock);
2177
2178         /* We need to decrement before osc_ap_completion->osc_wake_cache_waiters
2179          * is called so we know whether to go to sync BRWs or wait for more
2180          * RPCs to complete */
2181         if (lustre_msg_get_opc(req->rq_reqmsg) == OST_WRITE)
2182                 cli->cl_w_in_flight--;
2183         else
2184                 cli->cl_r_in_flight--;
2185
2186         async = cfs_list_empty(&aa->aa_oaps);
2187         if (!async) { /* from osc_send_oap_rpc() */
2188                 struct osc_async_page *oap, *tmp;
2189                 /* the caller may re-use the oap after the completion call so
2190                  * we need to clean it up a little */
2191                 cfs_list_for_each_entry_safe(oap, tmp, &aa->aa_oaps,
2192                                              oap_rpc_item) {
2193                         cfs_list_del_init(&oap->oap_rpc_item);
2194                         osc_ap_completion(env, cli, aa->aa_oa, oap, 1, rc);
2195                 }
2196                 OBDO_FREE(aa->aa_oa);
2197         } else { /* from async_internal() */
2198                 int i;
2199                 for (i = 0; i < aa->aa_page_count; i++)
2200                         osc_release_write_grant(aa->aa_cli, aa->aa_ppga[i], 1);
2201
2202                 if (aa->aa_oa->o_flags & OBD_FL_TEMPORARY)
2203                         OBDO_FREE(aa->aa_oa);
2204         }
2205         osc_wake_cache_waiters(cli);
2206         osc_check_rpcs(env, cli);
2207         client_obd_list_unlock(&cli->cl_loi_list_lock);
2208         if (!async)
2209                 cl_req_completion(env, aa->aa_clerq, rc);
2210         osc_release_ppga(aa->aa_ppga, aa->aa_page_count);
2211         RETURN(rc);
2212 }
2213
2214 static struct ptlrpc_request *osc_build_req(const struct lu_env *env,
2215                                             struct client_obd *cli,
2216                                             cfs_list_t *rpc_list,
2217                                             int page_count, int cmd)
2218 {
2219         struct ptlrpc_request *req;
2220         struct brw_page **pga = NULL;
2221         struct osc_brw_async_args *aa;
2222         struct obdo *oa = NULL;
2223         const struct obd_async_page_ops *ops = NULL;
2224         void *caller_data = NULL;
2225         struct osc_async_page *oap;
2226         struct osc_async_page *tmp;
2227         struct ost_body *body;
2228         struct cl_req *clerq = NULL;
2229         enum cl_req_type crt = (cmd & OBD_BRW_WRITE) ? CRT_WRITE : CRT_READ;
2230         struct ldlm_lock *lock = NULL;
2231         struct cl_req_attr crattr;
2232         int i, rc;
2233
2234         ENTRY;
2235         LASSERT(!cfs_list_empty(rpc_list));
2236
2237         memset(&crattr, 0, sizeof crattr);
2238         OBD_ALLOC(pga, sizeof(*pga) * page_count);
2239         if (pga == NULL)
2240                 GOTO(out, req = ERR_PTR(-ENOMEM));
2241
2242         OBDO_ALLOC(oa);
2243         if (oa == NULL)
2244                 GOTO(out, req = ERR_PTR(-ENOMEM));
2245
2246         i = 0;
2247         cfs_list_for_each_entry(oap, rpc_list, oap_rpc_item) {
2248                 struct cl_page *page = osc_oap2cl_page(oap);
2249                 if (ops == NULL) {
2250                         ops = oap->oap_caller_ops;
2251                         caller_data = oap->oap_caller_data;
2252
2253                         clerq = cl_req_alloc(env, page, crt,
2254                                              1 /* only 1-object rpcs for
2255                                                 * now */);
2256                         if (IS_ERR(clerq))
2257                                 GOTO(out, req = (void *)clerq);
2258                         lock = oap->oap_ldlm_lock;
2259                 }
2260                 pga[i] = &oap->oap_brw_page;
2261                 pga[i]->off = oap->oap_obj_off + oap->oap_page_off;
2262                 CDEBUG(0, "put page %p index %lu oap %p flg %x to pga\n",
2263                        pga[i]->pg, cfs_page_index(oap->oap_page), oap, pga[i]->flag);
2264                 i++;
2265                 cl_req_page_add(env, clerq, page);
2266         }
2267
2268         /* always get the data for the obdo for the rpc */
2269         LASSERT(ops != NULL);
2270         crattr.cra_oa = oa;
2271         crattr.cra_capa = NULL;
2272         cl_req_attr_set(env, clerq, &crattr, ~0ULL);
2273         if (lock) {
2274                 oa->o_handle = lock->l_remote_handle;
2275                 oa->o_valid |= OBD_MD_FLHANDLE;
2276         }
2277
2278         rc = cl_req_prep(env, clerq);
2279         if (rc != 0) {
2280                 CERROR("cl_req_prep failed: %d\n", rc);
2281                 GOTO(out, req = ERR_PTR(rc));
2282         }
2283
2284         sort_brw_pages(pga, page_count);
2285         rc = osc_brw_prep_request(cmd, cli, oa, NULL, page_count,
2286                                   pga, &req, crattr.cra_capa, 1);
2287         if (rc != 0) {
2288                 CERROR("prep_req failed: %d\n", rc);
2289                 GOTO(out, req = ERR_PTR(rc));
2290         }
2291
2292         /* Need to update the timestamps after the request is built in case
2293          * we race with setattr (locally or in queue at OST).  If OST gets
2294          * later setattr before earlier BRW (as determined by the request xid),
2295          * the OST will not use BRW timestamps.  Sadly, there is no obvious
2296          * way to do this in a single call.  bug 10150 */
2297         body = req_capsule_client_get(&req->rq_pill, &RMF_OST_BODY);
2298         cl_req_attr_set(env, clerq, &crattr,
2299                         OBD_MD_FLMTIME|OBD_MD_FLCTIME|OBD_MD_FLATIME);
2300
2301         CLASSERT(sizeof(*aa) <= sizeof(req->rq_async_args));
2302         aa = ptlrpc_req_async_args(req);
2303         CFS_INIT_LIST_HEAD(&aa->aa_oaps);
2304         cfs_list_splice(rpc_list, &aa->aa_oaps);
2305         CFS_INIT_LIST_HEAD(rpc_list);
2306         aa->aa_clerq = clerq;
2307 out:
2308         capa_put(crattr.cra_capa);
2309         if (IS_ERR(req)) {
2310                 if (oa)
2311                         OBDO_FREE(oa);
2312                 if (pga)
2313                         OBD_FREE(pga, sizeof(*pga) * page_count);
2314                 /* this should happen rarely and is pretty bad, it makes the
2315                  * pending list not follow the dirty order */
2316                 client_obd_list_lock(&cli->cl_loi_list_lock);
2317                 cfs_list_for_each_entry_safe(oap, tmp, rpc_list, oap_rpc_item) {
2318                         cfs_list_del_init(&oap->oap_rpc_item);
2319
2320                         /* queued sync pages can be torn down while the pages
2321                          * were between the pending list and the rpc */
2322                         if (oap->oap_interrupted) {
2323                                 CDEBUG(D_INODE, "oap %p interrupted\n", oap);
2324                                 osc_ap_completion(env, cli, NULL, oap, 0,
2325                                                   oap->oap_count);
2326                                 continue;
2327                         }
2328                         osc_ap_completion(env, cli, NULL, oap, 0, PTR_ERR(req));
2329                 }
2330                 if (clerq && !IS_ERR(clerq))
2331                         cl_req_completion(env, clerq, PTR_ERR(req));
2332         }
2333         RETURN(req);
2334 }
2335
2336 /**
2337  * prepare pages for ASYNC io and put pages in send queue.
2338  *
2339  * \param cmd OBD_BRW_* macroses
2340  * \param lop pending pages
2341  *
2342  * \return zero if pages successfully add to send queue.
2343  * \return not zere if error occurring.
2344  */
2345 static int
2346 osc_send_oap_rpc(const struct lu_env *env, struct client_obd *cli,
2347                  struct lov_oinfo *loi,
2348                  int cmd, struct loi_oap_pages *lop)
2349 {
2350         struct ptlrpc_request *req;
2351         obd_count page_count = 0;
2352         struct osc_async_page *oap = NULL, *tmp;
2353         struct osc_brw_async_args *aa;
2354         const struct obd_async_page_ops *ops;
2355         CFS_LIST_HEAD(rpc_list);
2356         CFS_LIST_HEAD(tmp_list);
2357         unsigned int ending_offset;
2358         unsigned  starting_offset = 0;
2359         int srvlock = 0;
2360         struct cl_object *clob = NULL;
2361         ENTRY;
2362
2363         /* ASYNC_HP pages first. At present, when the lock the pages is
2364          * to be canceled, the pages covered by the lock will be sent out
2365          * with ASYNC_HP. We have to send out them as soon as possible. */
2366         cfs_list_for_each_entry_safe(oap, tmp, &lop->lop_urgent, oap_urgent_item) {
2367                 if (oap->oap_async_flags & ASYNC_HP) 
2368                         cfs_list_move(&oap->oap_pending_item, &tmp_list);
2369                 else
2370                         cfs_list_move_tail(&oap->oap_pending_item, &tmp_list);
2371                 if (++page_count >= cli->cl_max_pages_per_rpc)
2372                         break;
2373         }
2374
2375         cfs_list_splice(&tmp_list, &lop->lop_pending);
2376         page_count = 0;
2377
2378         /* first we find the pages we're allowed to work with */
2379         cfs_list_for_each_entry_safe(oap, tmp, &lop->lop_pending,
2380                                      oap_pending_item) {
2381                 ops = oap->oap_caller_ops;
2382
2383                 LASSERTF(oap->oap_magic == OAP_MAGIC, "Bad oap magic: oap %p, "
2384                          "magic 0x%x\n", oap, oap->oap_magic);
2385
2386                 if (clob == NULL) {
2387                         /* pin object in memory, so that completion call-backs
2388                          * can be safely called under client_obd_list lock. */
2389                         clob = osc_oap2cl_page(oap)->cp_obj;
2390                         cl_object_get(clob);
2391                 }
2392
2393                 if (page_count != 0 &&
2394                     srvlock != !!(oap->oap_brw_flags & OBD_BRW_SRVLOCK)) {
2395                         CDEBUG(D_PAGE, "SRVLOCK flag mismatch,"
2396                                " oap %p, page %p, srvlock %u\n",
2397                                oap, oap->oap_brw_page.pg, (unsigned)!srvlock);
2398                         break;
2399                 }
2400
2401                 /* If there is a gap at the start of this page, it can't merge
2402                  * with any previous page, so we'll hand the network a
2403                  * "fragmented" page array that it can't transfer in 1 RDMA */
2404                 if (page_count != 0 && oap->oap_page_off != 0)
2405                         break;
2406
2407                 /* in llite being 'ready' equates to the page being locked
2408                  * until completion unlocks it.  commit_write submits a page
2409                  * as not ready because its unlock will happen unconditionally
2410                  * as the call returns.  if we race with commit_write giving
2411                  * us that page we dont' want to create a hole in the page
2412                  * stream, so we stop and leave the rpc to be fired by
2413                  * another dirtier or kupdated interval (the not ready page
2414                  * will still be on the dirty list).  we could call in
2415                  * at the end of ll_file_write to process the queue again. */
2416                 if (!(oap->oap_async_flags & ASYNC_READY)) {
2417                         int rc = ops->ap_make_ready(env, oap->oap_caller_data,
2418                                                     cmd);
2419                         if (rc < 0)
2420                                 CDEBUG(D_INODE, "oap %p page %p returned %d "
2421                                                 "instead of ready\n", oap,
2422                                                 oap->oap_page, rc);
2423                         switch (rc) {
2424                         case -EAGAIN:
2425                                 /* llite is telling us that the page is still
2426                                  * in commit_write and that we should try
2427                                  * and put it in an rpc again later.  we
2428                                  * break out of the loop so we don't create
2429                                  * a hole in the sequence of pages in the rpc
2430                                  * stream.*/
2431                                 oap = NULL;
2432                                 break;
2433                         case -EINTR:
2434                                 /* the io isn't needed.. tell the checks
2435                                  * below to complete the rpc with EINTR */
2436                                 cfs_spin_lock(&oap->oap_lock);
2437                                 oap->oap_async_flags |= ASYNC_COUNT_STABLE;
2438                                 cfs_spin_unlock(&oap->oap_lock);
2439                                 oap->oap_count = -EINTR;
2440                                 break;
2441                         case 0:
2442                                 cfs_spin_lock(&oap->oap_lock);
2443                                 oap->oap_async_flags |= ASYNC_READY;
2444                                 cfs_spin_unlock(&oap->oap_lock);
2445                                 break;
2446                         default:
2447                                 LASSERTF(0, "oap %p page %p returned %d "
2448                                             "from make_ready\n", oap,
2449                                             oap->oap_page, rc);
2450                                 break;
2451                         }
2452                 }
2453                 if (oap == NULL)
2454                         break;
2455                 /*
2456                  * Page submitted for IO has to be locked. Either by
2457                  * ->ap_make_ready() or by higher layers.
2458                  */
2459 #if defined(__KERNEL__) && defined(__linux__)
2460                 {
2461                         struct cl_page *page;
2462
2463                         page = osc_oap2cl_page(oap);
2464
2465                         if (page->cp_type == CPT_CACHEABLE &&
2466                             !(PageLocked(oap->oap_page) &&
2467                               (CheckWriteback(oap->oap_page, cmd)))) {
2468                                 CDEBUG(D_PAGE, "page %p lost wb %lx/%x\n",
2469                                        oap->oap_page,
2470                                        (long)oap->oap_page->flags,
2471                                        oap->oap_async_flags);
2472                                 LBUG();
2473                         }
2474                 }
2475 #endif
2476
2477                 /* take the page out of our book-keeping */
2478                 cfs_list_del_init(&oap->oap_pending_item);
2479                 lop_update_pending(cli, lop, cmd, -1);
2480                 cfs_list_del_init(&oap->oap_urgent_item);
2481
2482                 if (page_count == 0)
2483                         starting_offset = (oap->oap_obj_off+oap->oap_page_off) &
2484                                           (PTLRPC_MAX_BRW_SIZE - 1);
2485
2486                 /* ask the caller for the size of the io as the rpc leaves. */
2487                 if (!(oap->oap_async_flags & ASYNC_COUNT_STABLE)) {
2488                         oap->oap_count =
2489                                 ops->ap_refresh_count(env, oap->oap_caller_data,
2490                                                       cmd);
2491                         LASSERT(oap->oap_page_off + oap->oap_count <= CFS_PAGE_SIZE);
2492                 }
2493                 if (oap->oap_count <= 0) {
2494                         CDEBUG(D_CACHE, "oap %p count %d, completing\n", oap,
2495                                oap->oap_count);
2496                         osc_ap_completion(env, cli, NULL,
2497                                           oap, 0, oap->oap_count);
2498                         continue;
2499                 }
2500
2501                 /* now put the page back in our accounting */
2502                 cfs_list_add_tail(&oap->oap_rpc_item, &rpc_list);
2503                 if (page_count == 0)
2504                         srvlock = !!(oap->oap_brw_flags & OBD_BRW_SRVLOCK);
2505                 if (++page_count >= cli->cl_max_pages_per_rpc)
2506                         break;
2507
2508                 /* End on a PTLRPC_MAX_BRW_SIZE boundary.  We want full-sized
2509                  * RPCs aligned on PTLRPC_MAX_BRW_SIZE boundaries to help reads
2510                  * have the same alignment as the initial writes that allocated
2511                  * extents on the server. */
2512                 ending_offset = (oap->oap_obj_off + oap->oap_page_off +
2513                                  oap->oap_count) & (PTLRPC_MAX_BRW_SIZE - 1);
2514                 if (ending_offset == 0)
2515                         break;
2516
2517                 /* If there is a gap at the end of this page, it can't merge
2518                  * with any subsequent pages, so we'll hand the network a
2519                  * "fragmented" page array that it can't transfer in 1 RDMA */
2520                 if (oap->oap_page_off + oap->oap_count < CFS_PAGE_SIZE)
2521                         break;
2522         }
2523
2524         osc_wake_cache_waiters(cli);
2525
2526         loi_list_maint(cli, loi);
2527
2528         client_obd_list_unlock(&cli->cl_loi_list_lock);
2529
2530         if (clob != NULL)
2531                 cl_object_put(env, clob);
2532
2533         if (page_count == 0) {
2534                 client_obd_list_lock(&cli->cl_loi_list_lock);
2535                 RETURN(0);
2536         }
2537
2538         req = osc_build_req(env, cli, &rpc_list, page_count, cmd);
2539         if (IS_ERR(req)) {
2540                 LASSERT(cfs_list_empty(&rpc_list));
2541                 loi_list_maint(cli, loi);
2542                 RETURN(PTR_ERR(req));
2543         }
2544
2545         aa = ptlrpc_req_async_args(req);
2546
2547         if (cmd == OBD_BRW_READ) {
2548                 lprocfs_oh_tally_log2(&cli->cl_read_page_hist, page_count);
2549                 lprocfs_oh_tally(&cli->cl_read_rpc_hist, cli->cl_r_in_flight);
2550                 lprocfs_oh_tally_log2(&cli->cl_read_offset_hist,
2551                                       (starting_offset >> CFS_PAGE_SHIFT) + 1);
2552         } else {
2553                 lprocfs_oh_tally_log2(&cli->cl_write_page_hist, page_count);
2554                 lprocfs_oh_tally(&cli->cl_write_rpc_hist,
2555                                  cli->cl_w_in_flight);
2556                 lprocfs_oh_tally_log2(&cli->cl_write_offset_hist,
2557                                       (starting_offset >> CFS_PAGE_SHIFT) + 1);
2558         }
2559         ptlrpc_lprocfs_brw(req, aa->aa_requested_nob);
2560
2561         client_obd_list_lock(&cli->cl_loi_list_lock);
2562
2563         if (cmd == OBD_BRW_READ)
2564                 cli->cl_r_in_flight++;
2565         else
2566                 cli->cl_w_in_flight++;
2567
2568         /* queued sync pages can be torn down while the pages
2569          * were between the pending list and the rpc */
2570         tmp = NULL;
2571         cfs_list_for_each_entry(oap, &aa->aa_oaps, oap_rpc_item) {
2572                 /* only one oap gets a request reference */
2573                 if (tmp == NULL)
2574                         tmp = oap;
2575                 if (oap->oap_interrupted && !req->rq_intr) {
2576                         CDEBUG(D_INODE, "oap %p in req %p interrupted\n",
2577                                oap, req);
2578                         ptlrpc_mark_interrupted(req);
2579                 }
2580         }
2581         if (tmp != NULL)
2582                 tmp->oap_request = ptlrpc_request_addref(req);
2583
2584         DEBUG_REQ(D_INODE, req, "%d pages, aa %p. now %dr/%dw in flight",
2585                   page_count, aa, cli->cl_r_in_flight, cli->cl_w_in_flight);
2586
2587         req->rq_interpret_reply = brw_interpret;
2588         ptlrpcd_add_req(req, PSCOPE_BRW);
2589         RETURN(1);
2590 }
2591
2592 #define LOI_DEBUG(LOI, STR, args...)                                     \
2593         CDEBUG(D_INODE, "loi ready %d wr %d:%d rd %d:%d " STR,           \
2594                !cfs_list_empty(&(LOI)->loi_ready_item) ||                \
2595                !cfs_list_empty(&(LOI)->loi_hp_ready_item),               \
2596                (LOI)->loi_write_lop.lop_num_pending,                     \
2597                !cfs_list_empty(&(LOI)->loi_write_lop.lop_urgent),        \
2598                (LOI)->loi_read_lop.lop_num_pending,                      \
2599                !cfs_list_empty(&(LOI)->loi_read_lop.lop_urgent),         \
2600                args)                                                     \
2601
2602 /* This is called by osc_check_rpcs() to find which objects have pages that
2603  * we could be sending.  These lists are maintained by lop_makes_rpc(). */
2604 struct lov_oinfo *osc_next_loi(struct client_obd *cli)
2605 {
2606         ENTRY;
2607
2608         /* First return objects that have blocked locks so that they
2609          * will be flushed quickly and other clients can get the lock,
2610          * then objects which have pages ready to be stuffed into RPCs */
2611         if (!cfs_list_empty(&cli->cl_loi_hp_ready_list))
2612                 RETURN(cfs_list_entry(cli->cl_loi_hp_ready_list.next,
2613                                       struct lov_oinfo, loi_hp_ready_item));
2614         if (!cfs_list_empty(&cli->cl_loi_ready_list))
2615                 RETURN(cfs_list_entry(cli->cl_loi_ready_list.next,
2616                                       struct lov_oinfo, loi_ready_item));
2617
2618         /* then if we have cache waiters, return all objects with queued
2619          * writes.  This is especially important when many small files
2620          * have filled up the cache and not been fired into rpcs because
2621          * they don't pass the nr_pending/object threshhold */
2622         if (!cfs_list_empty(&cli->cl_cache_waiters) &&
2623             !cfs_list_empty(&cli->cl_loi_write_list))
2624                 RETURN(cfs_list_entry(cli->cl_loi_write_list.next,
2625                                       struct lov_oinfo, loi_write_item));
2626
2627         /* then return all queued objects when we have an invalid import
2628          * so that they get flushed */
2629         if (cli->cl_import == NULL || cli->cl_import->imp_invalid) {
2630                 if (!cfs_list_empty(&cli->cl_loi_write_list))
2631                         RETURN(cfs_list_entry(cli->cl_loi_write_list.next,
2632                                               struct lov_oinfo,
2633                                               loi_write_item));
2634                 if (!cfs_list_empty(&cli->cl_loi_read_list))
2635                         RETURN(cfs_list_entry(cli->cl_loi_read_list.next,
2636                                               struct lov_oinfo, loi_read_item));
2637         }
2638         RETURN(NULL);
2639 }
2640
2641 static int osc_max_rpc_in_flight(struct client_obd *cli, struct lov_oinfo *loi)
2642 {
2643         struct osc_async_page *oap;
2644         int hprpc = 0;
2645
2646         if (!cfs_list_empty(&loi->loi_write_lop.lop_urgent)) {
2647                 oap = cfs_list_entry(loi->loi_write_lop.lop_urgent.next,
2648                                      struct osc_async_page, oap_urgent_item);
2649                 hprpc = !!(oap->oap_async_flags & ASYNC_HP);
2650         }
2651
2652         if (!hprpc && !cfs_list_empty(&loi->loi_read_lop.lop_urgent)) {
2653                 oap = cfs_list_entry(loi->loi_read_lop.lop_urgent.next,
2654                                      struct osc_async_page, oap_urgent_item);
2655                 hprpc = !!(oap->oap_async_flags & ASYNC_HP);
2656         }
2657
2658         return rpcs_in_flight(cli) >= cli->cl_max_rpcs_in_flight + hprpc;
2659 }
2660
2661 /* called with the loi list lock held */
2662 void osc_check_rpcs(const struct lu_env *env, struct client_obd *cli)
2663 {
2664         struct lov_oinfo *loi;
2665         int rc = 0, race_counter = 0;
2666         ENTRY;
2667
2668         while ((loi = osc_next_loi(cli)) != NULL) {
2669                 LOI_DEBUG(loi, "%lu in flight\n", rpcs_in_flight(cli));
2670
2671                 if (osc_max_rpc_in_flight(cli, loi))
2672                         break;
2673
2674                 /* attempt some read/write balancing by alternating between
2675                  * reads and writes in an object.  The makes_rpc checks here
2676                  * would be redundant if we were getting read/write work items
2677                  * instead of objects.  we don't want send_oap_rpc to drain a
2678                  * partial read pending queue when we're given this object to
2679                  * do io on writes while there are cache waiters */
2680                 if (lop_makes_rpc(cli, &loi->loi_write_lop, OBD_BRW_WRITE)) {
2681                         rc = osc_send_oap_rpc(env, cli, loi, OBD_BRW_WRITE,
2682                                               &loi->loi_write_lop);
2683                         if (rc < 0) {
2684                                 CERROR("Write request failed with %d\n", rc);
2685
2686                                 /* osc_send_oap_rpc failed, mostly because of
2687                                  * memory pressure.
2688                                  *
2689                                  * It can't break here, because if:
2690                                  *  - a page was submitted by osc_io_submit, so
2691                                  *    page locked;
2692                                  *  - no request in flight
2693                                  *  - no subsequent request
2694                                  * The system will be in live-lock state,
2695                                  * because there is no chance to call
2696                                  * osc_io_unplug() and osc_check_rpcs() any
2697                                  * more. pdflush can't help in this case,
2698                                  * because it might be blocked at grabbing
2699                                  * the page lock as we mentioned.
2700                                  *
2701                                  * Anyway, continue to drain pages. */
2702                                 /* break; */
2703                         }
2704
2705                         if (rc > 0)
2706                                 race_counter = 0;
2707                         else
2708                                 race_counter++;
2709                 }
2710                 if (lop_makes_rpc(cli, &loi->loi_read_lop, OBD_BRW_READ)) {
2711                         rc = osc_send_oap_rpc(env, cli, loi, OBD_BRW_READ,
2712                                               &loi->loi_read_lop);
2713                         if (rc < 0)
2714                                 CERROR("Read request failed with %d\n", rc);
2715
2716                         if (rc > 0)
2717                                 race_counter = 0;
2718                         else
2719                                 race_counter++;
2720                 }
2721
2722                 /* attempt some inter-object balancing by issueing rpcs
2723                  * for each object in turn */
2724                 if (!cfs_list_empty(&loi->loi_hp_ready_item))
2725                         cfs_list_del_init(&loi->loi_hp_ready_item);
2726                 if (!cfs_list_empty(&loi->loi_ready_item))
2727                         cfs_list_del_init(&loi->loi_ready_item);
2728                 if (!cfs_list_empty(&loi->loi_write_item))
2729                         cfs_list_del_init(&loi->loi_write_item);
2730                 if (!cfs_list_empty(&loi->loi_read_item))
2731                         cfs_list_del_init(&loi->loi_read_item);
2732
2733                 loi_list_maint(cli, loi);
2734
2735                 /* send_oap_rpc fails with 0 when make_ready tells it to
2736                  * back off.  llite's make_ready does this when it tries
2737                  * to lock a page queued for write that is already locked.
2738                  * we want to try sending rpcs from many objects, but we
2739                  * don't want to spin failing with 0.  */
2740                 if (race_counter == 10)
2741                         break;
2742         }
2743         EXIT;
2744 }
2745
2746 /* we're trying to queue a page in the osc so we're subject to the
2747  * 'cl_dirty_max' limit on the number of pages that can be queued in the osc.
2748  * If the osc's queued pages are already at that limit, then we want to sleep
2749  * until there is space in the osc's queue for us.  We also may be waiting for
2750  * write credits from the OST if there are RPCs in flight that may return some
2751  * before we fall back to sync writes.
2752  *
2753  * We need this know our allocation was granted in the presence of signals */
2754 static int ocw_granted(struct client_obd *cli, struct osc_cache_waiter *ocw)
2755 {
2756         int rc;
2757         ENTRY;
2758         client_obd_list_lock(&cli->cl_loi_list_lock);
2759         rc = cfs_list_empty(&ocw->ocw_entry) || rpcs_in_flight(cli) == 0;
2760         client_obd_list_unlock(&cli->cl_loi_list_lock);
2761         RETURN(rc);
2762 };
2763
2764 /**
2765  * Non-blocking version of osc_enter_cache() that consumes grant only when it
2766  * is available.
2767  */
2768 int osc_enter_cache_try(const struct lu_env *env,
2769                         struct client_obd *cli, struct lov_oinfo *loi,
2770                         struct osc_async_page *oap, int transient)
2771 {
2772         int has_grant;
2773
2774         has_grant = cli->cl_avail_grant >= CFS_PAGE_SIZE;
2775         if (has_grant) {
2776                 osc_consume_write_grant(cli, &oap->oap_brw_page);
2777                 if (transient) {
2778                         cli->cl_dirty_transit += CFS_PAGE_SIZE;
2779                         cfs_atomic_inc(&obd_dirty_transit_pages);
2780                         oap->oap_brw_flags |= OBD_BRW_NOCACHE;
2781                 }
2782         }
2783         return has_grant;
2784 }
2785
2786 /* Caller must hold loi_list_lock - we drop/regain it if we need to wait for
2787  * grant or cache space. */
2788 static int osc_enter_cache(const struct lu_env *env,
2789                            struct client_obd *cli, struct lov_oinfo *loi,
2790                            struct osc_async_page *oap)
2791 {
2792         struct osc_cache_waiter ocw;
2793         struct l_wait_info lwi = { 0 };
2794
2795         ENTRY;
2796
2797         CDEBUG(D_CACHE, "dirty: %ld/%d dirty_max: %ld/%d dropped: %lu "
2798                "grant: %lu\n", cli->cl_dirty, cfs_atomic_read(&obd_dirty_pages),
2799                cli->cl_dirty_max, obd_max_dirty_pages,
2800                cli->cl_lost_grant, cli->cl_avail_grant);
2801
2802         /* force the caller to try sync io.  this can jump the list
2803          * of queued writes and create a discontiguous rpc stream */
2804         if (cli->cl_dirty_max < CFS_PAGE_SIZE || cli->cl_ar.ar_force_sync ||
2805             loi->loi_ar.ar_force_sync)
2806                 RETURN(-EDQUOT);
2807
2808         /* Hopefully normal case - cache space and write credits available */
2809         if (cli->cl_dirty + CFS_PAGE_SIZE <= cli->cl_dirty_max &&
2810             cfs_atomic_read(&obd_dirty_pages) + 1 <= obd_max_dirty_pages &&
2811             osc_enter_cache_try(env, cli, loi, oap, 0))
2812                 RETURN(0);
2813
2814         /* Make sure that there are write rpcs in flight to wait for.  This
2815          * is a little silly as this object may not have any pending but
2816          * other objects sure might. */
2817         if (cli->cl_w_in_flight) {
2818                 cfs_list_add_tail(&ocw.ocw_entry, &cli->cl_cache_waiters);
2819                 cfs_waitq_init(&ocw.ocw_waitq);
2820                 ocw.ocw_oap = oap;
2821                 ocw.ocw_rc = 0;
2822
2823                 loi_list_maint(cli, loi);
2824                 osc_check_rpcs(env, cli);
2825                 client_obd_list_unlock(&cli->cl_loi_list_lock);
2826
2827                 CDEBUG(D_CACHE, "sleeping for cache space\n");
2828                 l_wait_event(ocw.ocw_waitq, ocw_granted(cli, &ocw), &lwi);
2829
2830                 client_obd_list_lock(&cli->cl_loi_list_lock);
2831                 if (!cfs_list_empty(&ocw.ocw_entry)) {
2832                         cfs_list_del(&ocw.ocw_entry);
2833                         RETURN(-EINTR);
2834                 }
2835                 RETURN(ocw.ocw_rc);
2836         }
2837
2838         RETURN(-EDQUOT);
2839 }
2840
2841
2842 int osc_prep_async_page(struct obd_export *exp, struct lov_stripe_md *lsm,
2843                         struct lov_oinfo *loi, cfs_page_t *page,
2844                         obd_off offset, const struct obd_async_page_ops *ops,
2845                         void *data, void **res, int nocache,
2846                         struct lustre_handle *lockh)
2847 {
2848         struct osc_async_page *oap;
2849
2850         ENTRY;
2851
2852         if (!page)
2853                 return cfs_size_round(sizeof(*oap));
2854
2855         oap = *res;
2856         oap->oap_magic = OAP_MAGIC;
2857         oap->oap_cli = &exp->exp_obd->u.cli;
2858         oap->oap_loi = loi;
2859
2860         oap->oap_caller_ops = ops;
2861         oap->oap_caller_data = data;
2862
2863         oap->oap_page = page;
2864         oap->oap_obj_off = offset;
2865         if (!client_is_remote(exp) &&
2866             cfs_capable(CFS_CAP_SYS_RESOURCE))
2867                 oap->oap_brw_flags = OBD_BRW_NOQUOTA;
2868
2869         LASSERT(!(offset & ~CFS_PAGE_MASK));
2870
2871         CFS_INIT_LIST_HEAD(&oap->oap_pending_item);
2872         CFS_INIT_LIST_HEAD(&oap->oap_urgent_item);
2873         CFS_INIT_LIST_HEAD(&oap->oap_rpc_item);
2874         CFS_INIT_LIST_HEAD(&oap->oap_page_list);
2875
2876         cfs_spin_lock_init(&oap->oap_lock);
2877         CDEBUG(D_CACHE, "oap %p page %p obj off "LPU64"\n", oap, page, offset);
2878         RETURN(0);
2879 }
2880
2881 struct osc_async_page *oap_from_cookie(void *cookie)
2882 {
2883         struct osc_async_page *oap = cookie;
2884         if (oap->oap_magic != OAP_MAGIC)
2885                 return ERR_PTR(-EINVAL);
2886         return oap;
2887 };
2888
2889 int osc_queue_async_io(const struct lu_env *env,
2890                        struct obd_export *exp, struct lov_stripe_md *lsm,
2891                        struct lov_oinfo *loi, void *cookie,
2892                        int cmd, obd_off off, int count,
2893                        obd_flag brw_flags, enum async_flags async_flags)
2894 {
2895         struct client_obd *cli = &exp->exp_obd->u.cli;
2896         struct osc_async_page *oap;
2897         int rc = 0;
2898         ENTRY;
2899
2900         oap = oap_from_cookie(cookie);
2901         if (IS_ERR(oap))
2902                 RETURN(PTR_ERR(oap));
2903
2904         if (cli->cl_import == NULL || cli->cl_import->imp_invalid)
2905                 RETURN(-EIO);
2906
2907         if (!cfs_list_empty(&oap->oap_pending_item) ||
2908             !cfs_list_empty(&oap->oap_urgent_item) ||
2909             !cfs_list_empty(&oap->oap_rpc_item))
2910                 RETURN(-EBUSY);
2911
2912         /* check if the file's owner/group is over quota */
2913         if ((cmd & OBD_BRW_WRITE) && !(cmd & OBD_BRW_NOQUOTA)) {
2914                 struct cl_object *obj;
2915                 struct cl_attr    attr; /* XXX put attr into thread info */
2916                 unsigned int qid[MAXQUOTAS];
2917
2918                 obj = cl_object_top(osc_oap2cl_page(oap)->cp_obj);
2919
2920                 cl_object_attr_lock(obj);
2921                 rc = cl_object_attr_get(env, obj, &attr);
2922                 cl_object_attr_unlock(obj);
2923
2924                 qid[USRQUOTA] = attr.cat_uid;
2925                 qid[GRPQUOTA] = attr.cat_gid;
2926                 if (rc == 0 &&
2927                     lquota_chkdq(quota_interface, cli, qid) == NO_QUOTA)
2928                         rc = -EDQUOT;
2929                 if (rc)
2930                         RETURN(rc);
2931         }
2932
2933         if (loi == NULL)
2934                 loi = lsm->lsm_oinfo[0];
2935
2936         client_obd_list_lock(&cli->cl_loi_list_lock);
2937
2938         LASSERT(off + count <= CFS_PAGE_SIZE);
2939         oap->oap_cmd = cmd;
2940         oap->oap_page_off = off;
2941         oap->oap_count = count;
2942         oap->oap_brw_flags = brw_flags;
2943         /* Give a hint to OST that requests are coming from kswapd - bug19529 */
2944         if (libcfs_memory_pressure_get())
2945                 oap->oap_brw_flags |= OBD_BRW_MEMALLOC;
2946         cfs_spin_lock(&oap->oap_lock);
2947         oap->oap_async_flags = async_flags;
2948         cfs_spin_unlock(&oap->oap_lock);
2949
2950         if (cmd & OBD_BRW_WRITE) {
2951                 rc = osc_enter_cache(env, cli, loi, oap);
2952                 if (rc) {
2953                         client_obd_list_unlock(&cli->cl_loi_list_lock);
2954                         RETURN(rc);
2955                 }
2956         }
2957
2958         osc_oap_to_pending(oap);
2959         loi_list_maint(cli, loi);
2960
2961         LOI_DEBUG(loi, "oap %p page %p added for cmd %d\n", oap, oap->oap_page,
2962                   cmd);
2963
2964         osc_check_rpcs(env, cli);
2965         client_obd_list_unlock(&cli->cl_loi_list_lock);
2966
2967         RETURN(0);
2968 }
2969
2970 /* aka (~was & now & flag), but this is more clear :) */
2971 #define SETTING(was, now, flag) (!(was & flag) && (now & flag))
2972
2973 int osc_set_async_flags_base(struct client_obd *cli,
2974                              struct lov_oinfo *loi, struct osc_async_page *oap,
2975                              obd_flag async_flags)
2976 {
2977         struct loi_oap_pages *lop;
2978         int flags = 0;
2979         ENTRY;
2980
2981         LASSERT(!cfs_list_empty(&oap->oap_pending_item));
2982
2983         if (oap->oap_cmd & OBD_BRW_WRITE) {
2984                 lop = &loi->loi_write_lop;
2985         } else {
2986                 lop = &loi->loi_read_lop;
2987         }
2988
2989         if ((oap->oap_async_flags & async_flags) == async_flags)
2990                 RETURN(0);
2991
2992         if (SETTING(oap->oap_async_flags, async_flags, ASYNC_READY))
2993                 flags |= ASYNC_READY;
2994
2995         if (SETTING(oap->oap_async_flags, async_flags, ASYNC_URGENT) &&
2996             cfs_list_empty(&oap->oap_rpc_item)) {
2997                 if (oap->oap_async_flags & ASYNC_HP)
2998                         cfs_list_add(&oap->oap_urgent_item, &lop->lop_urgent);
2999                 else
3000                         cfs_list_add_tail(&oap->oap_urgent_item,
3001                                           &lop->lop_urgent);
3002                 flags |= ASYNC_URGENT;
3003                 loi_list_maint(cli, loi);
3004         }
3005         cfs_spin_lock(&oap->oap_lock);
3006         oap->oap_async_flags |= flags;
3007         cfs_spin_unlock(&oap->oap_lock);
3008
3009         LOI_DEBUG(loi, "oap %p page %p has flags %x\n", oap, oap->oap_page,
3010                         oap->oap_async_flags);
3011         RETURN(0);
3012 }
3013
3014 int osc_teardown_async_page(struct obd_export *exp,
3015                             struct lov_stripe_md *lsm,
3016                             struct lov_oinfo *loi, void *cookie)
3017 {
3018         struct client_obd *cli = &exp->exp_obd->u.cli;
3019         struct loi_oap_pages *lop;
3020         struct osc_async_page *oap;
3021         int rc = 0;
3022         ENTRY;
3023
3024         oap = oap_from_cookie(cookie);
3025         if (IS_ERR(oap))
3026                 RETURN(PTR_ERR(oap));
3027
3028         if (loi == NULL)
3029                 loi = lsm->lsm_oinfo[0];
3030
3031         if (oap->oap_cmd & OBD_BRW_WRITE) {
3032                 lop = &loi->loi_write_lop;
3033         } else {
3034                 lop = &loi->loi_read_lop;
3035         }
3036
3037         client_obd_list_lock(&cli->cl_loi_list_lock);
3038
3039         if (!cfs_list_empty(&oap->oap_rpc_item))
3040                 GOTO(out, rc = -EBUSY);
3041
3042         osc_exit_cache(cli, oap, 0);
3043         osc_wake_cache_waiters(cli);
3044
3045         if (!cfs_list_empty(&oap->oap_urgent_item)) {
3046                 cfs_list_del_init(&oap->oap_urgent_item);
3047                 cfs_spin_lock(&oap->oap_lock);
3048                 oap->oap_async_flags &= ~(ASYNC_URGENT | ASYNC_HP);
3049                 cfs_spin_unlock(&oap->oap_lock);
3050         }
3051         if (!cfs_list_empty(&oap->oap_pending_item)) {
3052                 cfs_list_del_init(&oap->oap_pending_item);
3053                 lop_update_pending(cli, lop, oap->oap_cmd, -1);
3054         }
3055         loi_list_maint(cli, loi);
3056         LOI_DEBUG(loi, "oap %p page %p torn down\n", oap, oap->oap_page);
3057 out:
3058         client_obd_list_unlock(&cli->cl_loi_list_lock);
3059         RETURN(rc);
3060 }
3061
3062 static void osc_set_lock_data_with_check(struct ldlm_lock *lock,
3063                                          struct ldlm_enqueue_info *einfo,
3064                                          int flags)
3065 {
3066         void *data = einfo->ei_cbdata;
3067
3068         LASSERT(lock != NULL);
3069         LASSERT(lock->l_blocking_ast == einfo->ei_cb_bl);
3070         LASSERT(lock->l_resource->lr_type == einfo->ei_type);
3071         LASSERT(lock->l_completion_ast == einfo->ei_cb_cp);
3072         LASSERT(lock->l_glimpse_ast == einfo->ei_cb_gl);
3073
3074         lock_res_and_lock(lock);
3075         cfs_spin_lock(&osc_ast_guard);
3076         LASSERT(lock->l_ast_data == NULL || lock->l_ast_data == data);
3077         lock->l_ast_data = data;
3078         cfs_spin_unlock(&osc_ast_guard);
3079         unlock_res_and_lock(lock);
3080 }
3081
3082 static void osc_set_data_with_check(struct lustre_handle *lockh,
3083                                     struct ldlm_enqueue_info *einfo,
3084                                     int flags)
3085 {
3086         struct ldlm_lock *lock = ldlm_handle2lock(lockh);
3087
3088         if (lock != NULL) {
3089                 osc_set_lock_data_with_check(lock, einfo, flags);
3090                 LDLM_LOCK_PUT(lock);
3091         } else
3092                 CERROR("lockh %p, data %p - client evicted?\n",
3093                        lockh, einfo->ei_cbdata);
3094 }
3095
3096 static int osc_change_cbdata(struct obd_export *exp, struct lov_stripe_md *lsm,
3097                              ldlm_iterator_t replace, void *data)
3098 {
3099         struct ldlm_res_id res_id;
3100         struct obd_device *obd = class_exp2obd(exp);
3101
3102         osc_build_res_name(lsm->lsm_object_id, lsm->lsm_object_gr, &res_id);
3103         ldlm_resource_iterate(obd->obd_namespace, &res_id, replace, data);
3104         return 0;
3105 }
3106
3107 static int osc_enqueue_fini(struct ptlrpc_request *req, struct ost_lvb *lvb,
3108                             obd_enqueue_update_f upcall, void *cookie,
3109                             int *flags, int rc)
3110 {
3111         int intent = *flags & LDLM_FL_HAS_INTENT;
3112         ENTRY;
3113
3114         if (intent) {
3115                 /* The request was created before ldlm_cli_enqueue call. */
3116                 if (rc == ELDLM_LOCK_ABORTED) {
3117                         struct ldlm_reply *rep;
3118                         rep = req_capsule_server_get(&req->rq_pill,
3119                                                      &RMF_DLM_REP);
3120
3121                         LASSERT(rep != NULL);
3122                         if (rep->lock_policy_res1)
3123                                 rc = rep->lock_policy_res1;
3124                 }
3125         }
3126
3127         if ((intent && rc == ELDLM_LOCK_ABORTED) || !rc) {
3128                 *flags |= LDLM_FL_LVB_READY;
3129                 CDEBUG(D_INODE,"got kms "LPU64" blocks "LPU64" mtime "LPU64"\n",
3130                        lvb->lvb_size, lvb->lvb_blocks, lvb->lvb_mtime);
3131         }
3132
3133         /* Call the update callback. */
3134         rc = (*upcall)(cookie, rc);
3135         RETURN(rc);
3136 }
3137
3138 static int osc_enqueue_interpret(const struct lu_env *env,
3139                                  struct ptlrpc_request *req,
3140                                  struct osc_enqueue_args *aa, int rc)
3141 {
3142         struct ldlm_lock *lock;
3143         struct lustre_handle handle;
3144         __u32 mode;
3145
3146         /* Make a local copy of a lock handle and a mode, because aa->oa_*
3147          * might be freed anytime after lock upcall has been called. */
3148         lustre_handle_copy(&handle, aa->oa_lockh);
3149         mode = aa->oa_ei->ei_mode;
3150
3151         /* ldlm_cli_enqueue is holding a reference on the lock, so it must
3152          * be valid. */
3153         lock = ldlm_handle2lock(&handle);
3154
3155         /* Take an additional reference so that a blocking AST that
3156          * ldlm_cli_enqueue_fini() might post for a failed lock, is guaranteed
3157          * to arrive after an upcall has been executed by
3158          * osc_enqueue_fini(). */
3159         ldlm_lock_addref(&handle, mode);
3160
3161         /* Complete obtaining the lock procedure. */
3162         rc = ldlm_cli_enqueue_fini(aa->oa_exp, req, aa->oa_ei->ei_type, 1,
3163                                    mode, aa->oa_flags, aa->oa_lvb,
3164                                    sizeof(*aa->oa_lvb), &handle, rc);
3165         /* Complete osc stuff. */
3166         rc = osc_enqueue_fini(req, aa->oa_lvb,
3167                               aa->oa_upcall, aa->oa_cookie, aa->oa_flags, rc);
3168
3169         OBD_FAIL_TIMEOUT(OBD_FAIL_OSC_CP_CANCEL_RACE, 10);
3170
3171         /* Release the lock for async request. */
3172         if (lustre_handle_is_used(&handle) && rc == ELDLM_OK)
3173                 /*
3174                  * Releases a reference taken by ldlm_cli_enqueue(), if it is
3175                  * not already released by
3176                  * ldlm_cli_enqueue_fini()->failed_lock_cleanup()
3177                  */
3178                 ldlm_lock_decref(&handle, mode);
3179
3180         LASSERTF(lock != NULL, "lockh %p, req %p, aa %p - client evicted?\n",
3181                  aa->oa_lockh, req, aa);
3182         ldlm_lock_decref(&handle, mode);
3183         LDLM_LOCK_PUT(lock);
3184         return rc;
3185 }
3186
3187 void osc_update_enqueue(struct lustre_handle *lov_lockhp,
3188                         struct lov_oinfo *loi, int flags,
3189                         struct ost_lvb *lvb, __u32 mode, int rc)
3190 {
3191         if (rc == ELDLM_OK) {
3192                 struct ldlm_lock *lock = ldlm_handle2lock(lov_lockhp);
3193                 __u64 tmp;
3194
3195                 LASSERT(lock != NULL);
3196                 loi->loi_lvb = *lvb;
3197                 tmp = loi->loi_lvb.lvb_size;
3198                 /* Extend KMS up to the end of this lock and no further
3199                  * A lock on [x,y] means a KMS of up to y + 1 bytes! */
3200                 if (tmp > lock->l_policy_data.l_extent.end)
3201                         tmp = lock->l_policy_data.l_extent.end + 1;
3202                 if (tmp >= loi->loi_kms) {
3203                         LDLM_DEBUG(lock, "lock acquired, setting rss="LPU64
3204                                    ", kms="LPU64, loi->loi_lvb.lvb_size, tmp);
3205                         loi_kms_set(loi, tmp);
3206                 } else {
3207                         LDLM_DEBUG(lock, "lock acquired, setting rss="
3208                                    LPU64"; leaving kms="LPU64", end="LPU64,
3209                                    loi->loi_lvb.lvb_size, loi->loi_kms,
3210                                    lock->l_policy_data.l_extent.end);
3211                 }
3212                 ldlm_lock_allow_match(lock);
3213                 LDLM_LOCK_PUT(lock);
3214         } else if (rc == ELDLM_LOCK_ABORTED && (flags & LDLM_FL_HAS_INTENT)) {
3215                 loi->loi_lvb = *lvb;
3216                 CDEBUG(D_INODE, "glimpsed, setting rss="LPU64"; leaving"
3217                        " kms="LPU64"\n", loi->loi_lvb.lvb_size, loi->loi_kms);
3218                 rc = ELDLM_OK;
3219         }
3220 }
3221 EXPORT_SYMBOL(osc_update_enqueue);
3222
3223 struct ptlrpc_request_set *PTLRPCD_SET = (void *)1;
3224
3225 /* When enqueuing asynchronously, locks are not ordered, we can obtain a lock
3226  * from the 2nd OSC before a lock from the 1st one. This does not deadlock with
3227  * other synchronous requests, however keeping some locks and trying to obtain
3228  * others may take a considerable amount of time in a case of ost failure; and
3229  * when other sync requests do not get released lock from a client, the client
3230  * is excluded from the cluster -- such scenarious make the life difficult, so
3231  * release locks just after they are obtained. */
3232 int osc_enqueue_base(struct obd_export *exp, struct ldlm_res_id *res_id,
3233                      int *flags, ldlm_policy_data_t *policy,
3234                      struct ost_lvb *lvb, int kms_valid,
3235                      obd_enqueue_update_f upcall, void *cookie,
3236                      struct ldlm_enqueue_info *einfo,
3237                      struct lustre_handle *lockh,
3238                      struct ptlrpc_request_set *rqset, int async)
3239 {
3240         struct obd_device *obd = exp->exp_obd;
3241         struct ptlrpc_request *req = NULL;
3242         int intent = *flags & LDLM_FL_HAS_INTENT;
3243         ldlm_mode_t mode;
3244         int rc;
3245         ENTRY;
3246
3247         /* Filesystem lock extents are extended to page boundaries so that
3248          * dealing with the page cache is a little smoother.  */
3249         policy->l_extent.start -= policy->l_extent.start & ~CFS_PAGE_MASK;
3250         policy->l_extent.end |= ~CFS_PAGE_MASK;
3251
3252         /*
3253          * kms is not valid when either object is completely fresh (so that no
3254          * locks are cached), or object was evicted. In the latter case cached
3255          * lock cannot be used, because it would prime inode state with
3256          * potentially stale LVB.
3257          */
3258         if (!kms_valid)
3259                 goto no_match;
3260
3261         /* Next, search for already existing extent locks that will cover us */
3262         /* If we're trying to read, we also search for an existing PW lock.  The
3263          * VFS and page cache already protect us locally, so lots of readers/
3264          * writers can share a single PW lock.
3265          *
3266          * There are problems with conversion deadlocks, so instead of
3267          * converting a read lock to a write lock, we'll just enqueue a new
3268          * one.
3269          *
3270          * At some point we should cancel the read lock instead of making them
3271          * send us a blocking callback, but there are problems with canceling
3272          * locks out from other users right now, too. */
3273         mode = einfo->ei_mode;
3274         if (einfo->ei_mode == LCK_PR)
3275                 mode |= LCK_PW;
3276         mode = ldlm_lock_match(obd->obd_namespace,
3277                                *flags | LDLM_FL_LVB_READY, res_id,
3278                                einfo->ei_type, policy, mode, lockh, 0);
3279         if (mode) {
3280                 struct ldlm_lock *matched = ldlm_handle2lock(lockh);
3281
3282                 if (matched->l_ast_data == NULL ||
3283                     matched->l_ast_data == einfo->ei_cbdata) {
3284                         /* addref the lock only if not async requests and PW
3285                          * lock is matched whereas we asked for PR. */
3286                         if (!rqset && einfo->ei_mode != mode)
3287                                 ldlm_lock_addref(lockh, LCK_PR);
3288                         osc_set_lock_data_with_check(matched, einfo, *flags);
3289                         if (intent) {
3290                                 /* I would like to be able to ASSERT here that
3291                                  * rss <= kms, but I can't, for reasons which
3292                                  * are explained in lov_enqueue() */
3293                         }
3294
3295                         /* We already have a lock, and it's referenced */
3296                         (*upcall)(cookie, ELDLM_OK);
3297
3298                         /* For async requests, decref the lock. */
3299                         if (einfo->ei_mode != mode)
3300                                 ldlm_lock_decref(lockh, LCK_PW);
3301                         else if (rqset)
3302                                 ldlm_lock_decref(lockh, einfo->ei_mode);
3303                         LDLM_LOCK_PUT(matched);
3304                         RETURN(ELDLM_OK);
3305                 } else
3306                         ldlm_lock_decref(lockh, mode);
3307                 LDLM_LOCK_PUT(matched);
3308         }
3309
3310  no_match:
3311         if (intent) {
3312                 CFS_LIST_HEAD(cancels);
3313                 req = ptlrpc_request_alloc(class_exp2cliimp(exp),
3314                                            &RQF_LDLM_ENQUEUE_LVB);
3315                 if (req == NULL)
3316                         RETURN(-ENOMEM);
3317
3318                 rc = ldlm_prep_enqueue_req(exp, req, &cancels, 0);
3319                 if (rc)
3320                         RETURN(rc);
3321
3322                 req_capsule_set_size(&req->rq_pill, &RMF_DLM_LVB, RCL_SERVER,
3323                                      sizeof *lvb);
3324                 ptlrpc_request_set_replen(req);
3325         }
3326
3327         /* users of osc_enqueue() can pass this flag for ldlm_lock_match() */
3328         *flags &= ~LDLM_FL_BLOCK_GRANTED;
3329
3330         rc = ldlm_cli_enqueue(exp, &req, einfo, res_id, policy, flags, lvb,
3331                               sizeof(*lvb), lockh, async);
3332         if (rqset) {
3333                 if (!rc) {
3334                         struct osc_enqueue_args *aa;
3335                         CLASSERT (sizeof(*aa) <= sizeof(req->rq_async_args));
3336                         aa = ptlrpc_req_async_args(req);
3337                         aa->oa_ei = einfo;
3338                         aa->oa_exp = exp;
3339                         aa->oa_flags  = flags;
3340                         aa->oa_upcall = upcall;
3341                         aa->oa_cookie = cookie;
3342                         aa->oa_lvb    = lvb;
3343                         aa->oa_lockh  = lockh;
3344
3345                         req->rq_interpret_reply =
3346                                 (ptlrpc_interpterer_t)osc_enqueue_interpret;
3347                         if (rqset == PTLRPCD_SET)
3348                                 ptlrpcd_add_req(req, PSCOPE_OTHER);
3349                         else
3350                                 ptlrpc_set_add_req(rqset, req);
3351                 } else if (intent) {
3352                         ptlrpc_req_finished(req);
3353                 }
3354                 RETURN(rc);
3355         }
3356
3357         rc = osc_enqueue_fini(req, lvb, upcall, cookie, flags, rc);
3358         if (intent)
3359                 ptlrpc_req_finished(req);
3360
3361         RETURN(rc);
3362 }
3363
3364 static int osc_enqueue(struct obd_export *exp, struct obd_info *oinfo,
3365                        struct ldlm_enqueue_info *einfo,
3366                        struct ptlrpc_request_set *rqset)
3367 {
3368         struct ldlm_res_id res_id;
3369         int rc;
3370         ENTRY;
3371
3372         osc_build_res_name(oinfo->oi_md->lsm_object_id,
3373                            oinfo->oi_md->lsm_object_gr, &res_id);
3374
3375         rc = osc_enqueue_base(exp, &res_id, &oinfo->oi_flags, &oinfo->oi_policy,
3376                               &oinfo->oi_md->lsm_oinfo[0]->loi_lvb,
3377                               oinfo->oi_md->lsm_oinfo[0]->loi_kms_valid,
3378                               oinfo->oi_cb_up, oinfo, einfo, oinfo->oi_lockh,
3379                               rqset, rqset != NULL);
3380         RETURN(rc);
3381 }
3382
3383 int osc_match_base(struct obd_export *exp, struct ldlm_res_id *res_id,
3384                    __u32 type, ldlm_policy_data_t *policy, __u32 mode,
3385                    int *flags, void *data, struct lustre_handle *lockh,
3386                    int unref)
3387 {
3388         struct obd_device *obd = exp->exp_obd;
3389         int lflags = *flags;
3390         ldlm_mode_t rc;
3391         ENTRY;
3392
3393         if (OBD_FAIL_CHECK(OBD_FAIL_OSC_MATCH))
3394                 RETURN(-EIO);
3395
3396         /* Filesystem lock extents are extended to page boundaries so that
3397          * dealing with the page cache is a little smoother */
3398         policy->l_extent.start -= policy->l_extent.start & ~CFS_PAGE_MASK;
3399         policy->l_extent.end |= ~CFS_PAGE_MASK;
3400
3401         /* Next, search for already existing extent locks that will cover us */
3402         /* If we're trying to read, we also search for an existing PW lock.  The
3403          * VFS and page cache already protect us locally, so lots of readers/
3404          * writers can share a single PW lock. */
3405         rc = mode;
3406         if (mode == LCK_PR)
3407                 rc |= LCK_PW;
3408         rc = ldlm_lock_match(obd->obd_namespace, lflags,
3409                              res_id, type, policy, rc, lockh, unref);
3410         if (rc) {
3411                 if (data != NULL)
3412                         osc_set_data_with_check(lockh, data, lflags);
3413                 if (!(lflags & LDLM_FL_TEST_LOCK) && mode != rc) {
3414                         ldlm_lock_addref(lockh, LCK_PR);
3415                         ldlm_lock_decref(lockh, LCK_PW);
3416                 }
3417                 RETURN(rc);
3418         }
3419         RETURN(rc);
3420 }
3421
3422 int osc_cancel_base(struct lustre_handle *lockh, __u32 mode)
3423 {
3424         ENTRY;
3425
3426         if (unlikely(mode == LCK_GROUP))
3427                 ldlm_lock_decref_and_cancel(lockh, mode);
3428         else
3429                 ldlm_lock_decref(lockh, mode);
3430
3431         RETURN(0);
3432 }
3433
3434 static int osc_cancel(struct obd_export *exp, struct lov_stripe_md *md,
3435                       __u32 mode, struct lustre_handle *lockh)
3436 {
3437         ENTRY;
3438         RETURN(osc_cancel_base(lockh, mode));
3439 }
3440
3441 static int osc_cancel_unused(struct obd_export *exp,
3442                              struct lov_stripe_md *lsm, int flags,
3443                              void *opaque)
3444 {
3445         struct obd_device *obd = class_exp2obd(exp);
3446         struct ldlm_res_id res_id, *resp = NULL;
3447
3448         if (lsm != NULL) {
3449                 resp = osc_build_res_name(lsm->lsm_object_id,
3450                                           lsm->lsm_object_gr, &res_id);
3451         }
3452
3453         return ldlm_cli_cancel_unused(obd->obd_namespace, resp, flags, opaque);
3454 }
3455
3456 static int osc_statfs_interpret(const struct lu_env *env,
3457                                 struct ptlrpc_request *req,
3458                                 struct osc_async_args *aa, int rc)
3459 {
3460         struct client_obd *cli = &req->rq_import->imp_obd->u.cli;
3461         struct obd_statfs *msfs;
3462         __u64 used;
3463         ENTRY;
3464
3465         if (rc == -EBADR)
3466                 /* The request has in fact never been sent
3467                  * due to issues at a higher level (LOV).
3468                  * Exit immediately since the caller is
3469                  * aware of the problem and takes care
3470                  * of the clean up */
3471                  RETURN(rc);
3472
3473         if ((rc == -ENOTCONN || rc == -EAGAIN) &&
3474             (aa->aa_oi->oi_flags & OBD_STATFS_NODELAY))
3475                 GOTO(out, rc = 0);
3476
3477         if (rc != 0)
3478                 GOTO(out, rc);
3479
3480         msfs = req_capsule_server_get(&req->rq_pill, &RMF_OBD_STATFS);
3481         if (msfs == NULL) {
3482                 GOTO(out, rc = -EPROTO);
3483         }
3484
3485         /* Reinitialize the RDONLY and DEGRADED flags at the client
3486          * on each statfs, so they don't stay set permanently. */
3487         cfs_spin_lock(&cli->cl_oscc.oscc_lock);
3488
3489         if (unlikely(msfs->os_state & OS_STATE_DEGRADED))
3490                 cli->cl_oscc.oscc_flags |= OSCC_FLAG_DEGRADED;
3491         else if (unlikely(cli->cl_oscc.oscc_flags & OSCC_FLAG_DEGRADED))
3492                 cli->cl_oscc.oscc_flags &= ~OSCC_FLAG_DEGRADED;
3493
3494         if (unlikely(msfs->os_state & OS_STATE_READONLY))
3495                 cli->cl_oscc.oscc_flags |= OSCC_FLAG_RDONLY;
3496         else if (unlikely(cli->cl_oscc.oscc_flags & OSCC_FLAG_RDONLY))
3497                 cli->cl_oscc.oscc_flags &= ~OSCC_FLAG_RDONLY;
3498
3499         /* Add a bit of hysteresis so this flag isn't continually flapping,
3500          * and ensure that new files don't get extremely fragmented due to
3501          * only a small amount of available space in the filesystem.
3502          * We want to set the NOSPC flag when there is less than ~0.1% free
3503          * and clear it when there is at least ~0.2% free space, so:
3504          *                   avail < ~0.1% max          max = avail + used
3505          *            1025 * avail < avail + used       used = blocks - free
3506          *            1024 * avail < used
3507          *            1024 * avail < blocks - free                      
3508          *                   avail < ((blocks - free) >> 10)    
3509          *
3510          * On very large disk, say 16TB 0.1% will be 16 GB. We don't want to
3511          * lose that amount of space so in those cases we report no space left
3512          * if their is less than 1 GB left.                             */
3513         used = min_t(__u64,(msfs->os_blocks - msfs->os_bfree) >> 10, 1 << 30);
3514         if (unlikely(((cli->cl_oscc.oscc_flags & OSCC_FLAG_NOSPC) == 0) &&
3515                      ((msfs->os_ffree < 32) || (msfs->os_bavail < used))))
3516                 cli->cl_oscc.oscc_flags |= OSCC_FLAG_NOSPC;
3517         else if (unlikely(((cli->cl_oscc.oscc_flags & OSCC_FLAG_NOSPC) != 0) &&
3518                 (msfs->os_ffree > 64) && (msfs->os_bavail > (used << 1))))
3519                         cli->cl_oscc.oscc_flags &= ~OSCC_FLAG_NOSPC;
3520
3521         cfs_spin_unlock(&cli->cl_oscc.oscc_lock);
3522
3523         *aa->aa_oi->oi_osfs = *msfs;
3524 out:
3525         rc = aa->aa_oi->oi_cb_up(aa->aa_oi, rc);
3526         RETURN(rc);
3527 }
3528
3529 static int osc_statfs_async(struct obd_device *obd, struct obd_info *oinfo,
3530                             __u64 max_age, struct ptlrpc_request_set *rqset)
3531 {
3532         struct ptlrpc_request *req;
3533         struct osc_async_args *aa;
3534         int                    rc;
3535         ENTRY;
3536
3537         /* We could possibly pass max_age in the request (as an absolute
3538          * timestamp or a "seconds.usec ago") so the target can avoid doing
3539          * extra calls into the filesystem if that isn't necessary (e.g.
3540          * during mount that would help a bit).  Having relative timestamps
3541          * is not so great if request processing is slow, while absolute
3542          * timestamps are not ideal because they need time synchronization. */
3543         req = ptlrpc_request_alloc(obd->u.cli.cl_import, &RQF_OST_STATFS);
3544         if (req == NULL)
3545                 RETURN(-ENOMEM);
3546
3547         rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, OST_STATFS);
3548         if (rc) {
3549                 ptlrpc_request_free(req);
3550                 RETURN(rc);
3551         }
3552         ptlrpc_request_set_replen(req);
3553         req->rq_request_portal = OST_CREATE_PORTAL;
3554         ptlrpc_at_set_req_timeout(req);
3555
3556         if (oinfo->oi_flags & OBD_STATFS_NODELAY) {
3557                 /* procfs requests not want stat in wait for avoid deadlock */
3558                 req->rq_no_resend = 1;
3559                 req->rq_no_delay = 1;
3560         }
3561
3562         req->rq_interpret_reply = (ptlrpc_interpterer_t)osc_statfs_interpret;
3563         CLASSERT (sizeof(*aa) <= sizeof(req->rq_async_args));
3564         aa = ptlrpc_req_async_args(req);
3565         aa->aa_oi = oinfo;
3566
3567         ptlrpc_set_add_req(rqset, req);
3568         RETURN(0);
3569 }
3570
3571 static int osc_statfs(struct obd_device *obd, struct obd_statfs *osfs,
3572                       __u64 max_age, __u32 flags)
3573 {
3574         struct obd_statfs     *msfs;
3575         struct ptlrpc_request *req;
3576         struct obd_import     *imp = NULL;
3577         int rc;
3578         ENTRY;
3579
3580         /*Since the request might also come from lprocfs, so we need
3581          *sync this with client_disconnect_export Bug15684*/
3582         cfs_down_read(&obd->u.cli.cl_sem);
3583         if (obd->u.cli.cl_import)
3584                 imp = class_import_get(obd->u.cli.cl_import);
3585         cfs_up_read(&obd->u.cli.cl_sem);
3586         if (!imp)
3587                 RETURN(-ENODEV);
3588
3589         /* We could possibly pass max_age in the request (as an absolute
3590          * timestamp or a "seconds.usec ago") so the target can avoid doing
3591          * extra calls into the filesystem if that isn't necessary (e.g.
3592          * during mount that would help a bit).  Having relative timestamps
3593          * is not so great if request processing is slow, while absolute
3594          * timestamps are not ideal because they need time synchronization. */
3595         req = ptlrpc_request_alloc(imp, &RQF_OST_STATFS);
3596
3597         class_import_put(imp);
3598
3599         if (req == NULL)
3600                 RETURN(-ENOMEM);
3601
3602         rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, OST_STATFS);
3603         if (rc) {
3604                 ptlrpc_request_free(req);
3605                 RETURN(rc);
3606         }
3607         ptlrpc_request_set_replen(req);
3608         req->rq_request_portal = OST_CREATE_PORTAL;
3609         ptlrpc_at_set_req_timeout(req);
3610
3611         if (flags & OBD_STATFS_NODELAY) {
3612                 /* procfs requests not want stat in wait for avoid deadlock */
3613                 req->rq_no_resend = 1;
3614                 req->rq_no_delay = 1;
3615         }
3616
3617         rc = ptlrpc_queue_wait(req);
3618         if (rc)
3619                 GOTO(out, rc);
3620
3621         msfs = req_capsule_server_get(&req->rq_pill, &RMF_OBD_STATFS);
3622         if (msfs == NULL) {
3623                 GOTO(out, rc = -EPROTO);
3624         }
3625
3626         *osfs = *msfs;
3627
3628         EXIT;
3629  out:
3630         ptlrpc_req_finished(req);
3631         return rc;
3632 }
3633
3634 /* Retrieve object striping information.
3635  *
3636  * @lmmu is a pointer to an in-core struct with lmm_ost_count indicating
3637  * the maximum number of OST indices which will fit in the user buffer.
3638  * lmm_magic must be LOV_MAGIC (we only use 1 slot here).
3639  */
3640 static int osc_getstripe(struct lov_stripe_md *lsm, struct lov_user_md *lump)
3641 {
3642         /* we use lov_user_md_v3 because it is larger than lov_user_md_v1 */
3643         struct lov_user_md_v3 lum, *lumk;
3644         struct lov_user_ost_data_v1 *lmm_objects;
3645         int rc = 0, lum_size;
3646         ENTRY;
3647
3648         if (!lsm)
3649                 RETURN(-ENODATA);
3650
3651         /* we only need the header part from user space to get lmm_magic and
3652          * lmm_stripe_count, (the header part is common to v1 and v3) */
3653         lum_size = sizeof(struct lov_user_md_v1);
3654         if (cfs_copy_from_user(&lum, lump, lum_size))
3655                 RETURN(-EFAULT);
3656
3657         if ((lum.lmm_magic != LOV_USER_MAGIC_V1) &&
3658             (lum.lmm_magic != LOV_USER_MAGIC_V3))
3659                 RETURN(-EINVAL);
3660
3661         /* lov_user_md_vX and lov_mds_md_vX must have the same size */
3662         LASSERT(sizeof(struct lov_user_md_v1) == sizeof(struct lov_mds_md_v1));
3663         LASSERT(sizeof(struct lov_user_md_v3) == sizeof(struct lov_mds_md_v3));
3664         LASSERT(sizeof(lum.lmm_objects[0]) == sizeof(lumk->lmm_objects[0]));
3665
3666         /* we can use lov_mds_md_size() to compute lum_size
3667          * because lov_user_md_vX and lov_mds_md_vX have the same size */
3668         if (lum.lmm_stripe_count > 0) {
3669                 lum_size = lov_mds_md_size(lum.lmm_stripe_count, lum.lmm_magic);
3670                 OBD_ALLOC(lumk, lum_size);
3671                 if (!lumk)
3672                         RETURN(-ENOMEM);
3673
3674                 if (lum.lmm_magic == LOV_USER_MAGIC_V1)
3675                         lmm_objects = &(((struct lov_user_md_v1 *)lumk)->lmm_objects[0]);
3676                 else
3677                         lmm_objects = &(lumk->lmm_objects[0]);
3678                 lmm_objects->l_object_id = lsm->lsm_object_id;
3679         } else {
3680                 lum_size = lov_mds_md_size(0, lum.lmm_magic);
3681                 lumk = &lum;
3682         }
3683
3684         lumk->lmm_object_id = lsm->lsm_object_id;
3685         lumk->lmm_object_gr = lsm->lsm_object_gr;
3686         lumk->lmm_stripe_count = 1;
3687
3688         if (cfs_copy_to_user(lump, lumk, lum_size))
3689                 rc = -EFAULT;
3690
3691         if (lumk != &lum)
3692                 OBD_FREE(lumk, lum_size);
3693
3694         RETURN(rc);
3695 }
3696
3697
3698 static int osc_iocontrol(unsigned int cmd, struct obd_export *exp, int len,
3699                          void *karg, void *uarg)
3700 {
3701         struct obd_device *obd = exp->exp_obd;
3702         struct obd_ioctl_data *data = karg;
3703         int err = 0;
3704         ENTRY;
3705
3706         if (!cfs_try_module_get(THIS_MODULE)) {
3707                 CERROR("Can't get module. Is it alive?");
3708                 return -EINVAL;
3709         }
3710         switch (cmd) {
3711         case OBD_IOC_LOV_GET_CONFIG: {
3712                 char *buf;
3713                 struct lov_desc *desc;
3714                 struct obd_uuid uuid;
3715
3716                 buf = NULL;
3717                 len = 0;
3718                 if (obd_ioctl_getdata(&buf, &len, (void *)uarg))
3719                         GOTO(out, err = -EINVAL);
3720
3721                 data = (struct obd_ioctl_data *)buf;
3722
3723                 if (sizeof(*desc) > data->ioc_inllen1) {
3724                         obd_ioctl_freedata(buf, len);
3725                         GOTO(out, err = -EINVAL);
3726                 }
3727
3728                 if (data->ioc_inllen2 < sizeof(uuid)) {
3729                         obd_ioctl_freedata(buf, len);
3730                         GOTO(out, err = -EINVAL);
3731                 }
3732
3733                 desc = (struct lov_desc *)data->ioc_inlbuf1;
3734                 desc->ld_tgt_count = 1;
3735                 desc->ld_active_tgt_count = 1;
3736                 desc->ld_default_stripe_count = 1;
3737                 desc->ld_default_stripe_size = 0;
3738                 desc->ld_default_stripe_offset = 0;
3739                 desc->ld_pattern = 0;
3740                 memcpy(&desc->ld_uuid, &obd->obd_uuid, sizeof(uuid));
3741
3742                 memcpy(data->ioc_inlbuf2, &obd->obd_uuid, sizeof(uuid));
3743
3744                 err = cfs_copy_to_user((void *)uarg, buf, len);
3745                 if (err)
3746                         err = -EFAULT;
3747                 obd_ioctl_freedata(buf, len);
3748                 GOTO(out, err);
3749         }
3750         case LL_IOC_LOV_SETSTRIPE:
3751                 err = obd_alloc_memmd(exp, karg);
3752                 if (err > 0)
3753                         err = 0;
3754                 GOTO(out, err);
3755         case LL_IOC_LOV_GETSTRIPE:
3756                 err = osc_getstripe(karg, uarg);
3757                 GOTO(out, err);
3758         case OBD_IOC_CLIENT_RECOVER:
3759                 err = ptlrpc_recover_import(obd->u.cli.cl_import,
3760                                             data->ioc_inlbuf1);
3761                 if (err > 0)
3762                         err = 0;
3763                 GOTO(out, err);
3764         case IOC_OSC_SET_ACTIVE:
3765                 err = ptlrpc_set_import_active(obd->u.cli.cl_import,
3766                                                data->ioc_offset);
3767                 GOTO(out, err);
3768         case OBD_IOC_POLL_QUOTACHECK:
3769                 err = lquota_poll_check(quota_interface, exp,
3770                                         (struct if_quotacheck *)karg);
3771                 GOTO(out, err);
3772         case OBD_IOC_PING_TARGET:
3773                 err = ptlrpc_obd_ping(obd);
3774                 GOTO(out, err);
3775         default:
3776                 CDEBUG(D_INODE, "unrecognised ioctl %#x by %s\n",
3777                        cmd, cfs_curproc_comm());
3778                 GOTO(out, err = -ENOTTY);
3779         }
3780 out:
3781         cfs_module_put(THIS_MODULE);
3782         return err;
3783 }
3784
3785 static int osc_get_info(struct obd_export *exp, obd_count keylen,
3786                         void *key, __u32 *vallen, void *val,
3787                         struct lov_stripe_md *lsm)
3788 {
3789         ENTRY;
3790         if (!vallen || !val)
3791                 RETURN(-EFAULT);
3792
3793         if (KEY_IS(KEY_LOCK_TO_STRIPE)) {
3794                 __u32 *stripe = val;
3795                 *vallen = sizeof(*stripe);
3796                 *stripe = 0;
3797                 RETURN(0);
3798         } else if (KEY_IS(KEY_LAST_ID)) {
3799                 struct ptlrpc_request *req;
3800                 obd_id                *reply;
3801                 char                  *tmp;
3802                 int                    rc;
3803
3804                 req = ptlrpc_request_alloc(class_exp2cliimp(exp),
3805                                            &RQF_OST_GET_INFO_LAST_ID);
3806                 if (req == NULL)
3807                         RETURN(-ENOMEM);
3808
3809                 req_capsule_set_size(&req->rq_pill, &RMF_SETINFO_KEY,
3810                                      RCL_CLIENT, keylen);
3811                 rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, OST_GET_INFO);
3812                 if (rc) {
3813                         ptlrpc_request_free(req);
3814                         RETURN(rc);
3815                 }
3816
3817                 tmp = req_capsule_client_get(&req->rq_pill, &RMF_SETINFO_KEY);
3818                 memcpy(tmp, key, keylen);
3819
3820                 req->rq_no_delay = req->rq_no_resend = 1;
3821                 ptlrpc_request_set_replen(req);
3822                 rc = ptlrpc_queue_wait(req);
3823                 if (rc)
3824                         GOTO(out, rc);
3825
3826                 reply = req_capsule_server_get(&req->rq_pill, &RMF_OBD_ID);
3827                 if (reply == NULL)
3828                         GOTO(out, rc = -EPROTO);
3829
3830                 *((obd_id *)val) = *reply;
3831         out:
3832                 ptlrpc_req_finished(req);
3833                 RETURN(rc);
3834         } else if (KEY_IS(KEY_FIEMAP)) {
3835                 struct ptlrpc_request *req;
3836                 struct ll_user_fiemap *reply;
3837                 char *tmp;
3838                 int rc;
3839
3840                 req = ptlrpc_request_alloc(class_exp2cliimp(exp),
3841                                            &RQF_OST_GET_INFO_FIEMAP);
3842                 if (req == NULL)
3843                         RETURN(-ENOMEM);
3844
3845                 req_capsule_set_size(&req->rq_pill, &RMF_FIEMAP_KEY,
3846                                      RCL_CLIENT, keylen);
3847                 req_capsule_set_size(&req->rq_pill, &RMF_FIEMAP_VAL,
3848                                      RCL_CLIENT, *vallen);
3849                 req_capsule_set_size(&req->rq_pill, &RMF_FIEMAP_VAL,
3850                                      RCL_SERVER, *vallen);
3851
3852                 rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, OST_GET_INFO);
3853                 if (rc) {
3854                         ptlrpc_request_free(req);
3855                         RETURN(rc);
3856                 }
3857
3858                 tmp = req_capsule_client_get(&req->rq_pill, &RMF_FIEMAP_KEY);
3859                 memcpy(tmp, key, keylen);
3860                 tmp = req_capsule_client_get(&req->rq_pill, &RMF_FIEMAP_VAL);
3861                 memcpy(tmp, val, *vallen);
3862
3863                 ptlrpc_request_set_replen(req);
3864                 rc = ptlrpc_queue_wait(req);
3865                 if (rc)
3866                         GOTO(out1, rc);
3867
3868                 reply = req_capsule_server_get(&req->rq_pill, &RMF_FIEMAP_VAL);
3869                 if (reply == NULL)
3870                         GOTO(out1, rc = -EPROTO);
3871
3872                 memcpy(val, reply, *vallen);
3873         out1:
3874                 ptlrpc_req_finished(req);
3875
3876                 RETURN(rc);
3877         }
3878
3879         RETURN(-EINVAL);
3880 }
3881
3882 static int osc_setinfo_mds_connect_import(struct obd_import *imp)
3883 {
3884         struct llog_ctxt *ctxt;
3885         int rc = 0;
3886         ENTRY;
3887
3888         ctxt = llog_get_context(imp->imp_obd, LLOG_MDS_OST_ORIG_CTXT);
3889         if (ctxt) {
3890                 rc = llog_initiator_connect(ctxt);
3891                 llog_ctxt_put(ctxt);
3892         } else {
3893                 /* XXX return an error? skip setting below flags? */
3894         }
3895
3896         cfs_spin_lock(&imp->imp_lock);
3897         imp->imp_server_timeout = 1;
3898         imp->imp_pingable = 1;
3899         cfs_spin_unlock(&imp->imp_lock);
3900         CDEBUG(D_RPCTRACE, "pinging OST %s\n", obd2cli_tgt(imp->imp_obd));
3901
3902         RETURN(rc);
3903 }
3904
3905 static int osc_setinfo_mds_conn_interpret(const struct lu_env *env,
3906                                           struct ptlrpc_request *req,
3907                                           void *aa, int rc)
3908 {
3909         ENTRY;
3910         if (rc != 0)
3911                 RETURN(rc);
3912
3913         RETURN(osc_setinfo_mds_connect_import(req->rq_import));
3914 }
3915
3916 static int osc_set_info_async(struct obd_export *exp, obd_count keylen,
3917                               void *key, obd_count vallen, void *val,
3918                               struct ptlrpc_request_set *set)
3919 {
3920         struct ptlrpc_request *req;
3921         struct obd_device     *obd = exp->exp_obd;
3922         struct obd_import     *imp = class_exp2cliimp(exp);
3923         char                  *tmp;
3924         int                    rc;
3925         ENTRY;
3926
3927         OBD_FAIL_TIMEOUT(OBD_FAIL_OSC_SHUTDOWN, 10);
3928
3929         if (KEY_IS(KEY_NEXT_ID)) {
3930                 obd_id new_val;
3931                 struct osc_creator *oscc = &obd->u.cli.cl_oscc;
3932
3933                 if (vallen != sizeof(obd_id))
3934                         RETURN(-ERANGE);
3935                 if (val == NULL)
3936                         RETURN(-EINVAL);
3937
3938                 if (vallen != sizeof(obd_id))
3939                         RETURN(-EINVAL);
3940
3941                 /* avoid race between allocate new object and set next id
3942                  * from ll_sync thread */
3943                 cfs_spin_lock(&oscc->oscc_lock);
3944                 new_val = *((obd_id*)val) + 1;
3945                 if (new_val > oscc->oscc_next_id)
3946                         oscc->oscc_next_id = new_val;
3947                 cfs_spin_unlock(&oscc->oscc_lock);
3948                 CDEBUG(D_HA, "%s: set oscc_next_id = "LPU64"\n",
3949                        exp->exp_obd->obd_name,
3950                        obd->u.cli.cl_oscc.oscc_next_id);
3951
3952                 RETURN(0);
3953         }
3954
3955         if (KEY_IS(KEY_INIT_RECOV)) {
3956                 if (vallen != sizeof(int))
3957                         RETURN(-EINVAL);
3958                 cfs_spin_lock(&imp->imp_lock);
3959                 imp->imp_initial_recov = *(int *)val;
3960                 cfs_spin_unlock(&imp->imp_lock);
3961                 CDEBUG(D_HA, "%s: set imp_initial_recov = %d\n",
3962                        exp->exp_obd->obd_name,
3963                        imp->imp_initial_recov);
3964                 RETURN(0);
3965         }
3966
3967         if (KEY_IS(KEY_CHECKSUM)) {
3968                 if (vallen != sizeof(int))
3969                         RETURN(-EINVAL);
3970                 exp->exp_obd->u.cli.cl_checksum = (*(int *)val) ? 1 : 0;
3971                 RETURN(0);
3972         }
3973
3974         if (KEY_IS(KEY_SPTLRPC_CONF)) {
3975                 sptlrpc_conf_client_adapt(obd);
3976                 RETURN(0);
3977         }
3978
3979         if (KEY_IS(KEY_FLUSH_CTX)) {
3980                 sptlrpc_import_flush_my_ctx(imp);
3981                 RETURN(0);
3982         }
3983
3984         if (!set && !KEY_IS(KEY_GRANT_SHRINK))
3985                 RETURN(-EINVAL);
3986
3987         /* We pass all other commands directly to OST. Since nobody calls osc
3988            methods directly and everybody is supposed to go through LOV, we
3989            assume lov checked invalid values for us.
3990            The only recognised values so far are evict_by_nid and mds_conn.
3991            Even if something bad goes through, we'd get a -EINVAL from OST
3992            anyway. */
3993
3994         if (KEY_IS(KEY_GRANT_SHRINK))
3995                 req = ptlrpc_request_alloc(imp, &RQF_OST_SET_GRANT_INFO);
3996         else
3997                 req = ptlrpc_request_alloc(imp, &RQF_OBD_SET_INFO);
3998
3999         if (req == NULL)
4000                 RETURN(-ENOMEM);
4001
4002         req_capsule_set_size(&req->rq_pill, &RMF_SETINFO_KEY,
4003                              RCL_CLIENT, keylen);
4004         req_capsule_set_size(&req->rq_pill, &RMF_SETINFO_VAL,
4005                              RCL_CLIENT, vallen);
4006         rc = ptlrpc_request_pack(req, LUSTRE_OST_VERSION, OST_SET_INFO);
4007         if (rc) {
4008                 ptlrpc_request_free(req);
4009                 RETURN(rc);
4010         }
4011
4012         tmp = req_capsule_client_get(&req->rq_pill, &RMF_SETINFO_KEY);
4013         memcpy(tmp, key, keylen);
4014         tmp = req_capsule_client_get(&req->rq_pill, &RMF_SETINFO_VAL);
4015         memcpy(tmp, val, vallen);
4016
4017         if (KEY_IS(KEY_MDS_CONN)) {
4018                 struct osc_creator *oscc = &obd->u.cli.cl_oscc;
4019
4020                 oscc->oscc_oa.o_gr = (*(__u32 *)val);
4021                 oscc->oscc_oa.o_valid |= OBD_MD_FLGROUP;
4022                 LASSERT_MDS_GROUP(oscc->oscc_oa.o_gr);
4023                 req->rq_no_delay = req->rq_no_resend = 1;
4024                 req->rq_interpret_reply = osc_setinfo_mds_conn_interpret;
4025         } else if (KEY_IS(KEY_GRANT_SHRINK)) {
4026                 struct osc_grant_args *aa;
4027                 struct obdo *oa;
4028
4029                 CLASSERT(sizeof(*aa) <= sizeof(req->rq_async_args));
4030                 aa = ptlrpc_req_async_args(req);
4031                 OBD_ALLOC_PTR(oa);
4032                 if (!oa) {
4033                         ptlrpc_req_finished(req);
4034                         RETURN(-ENOMEM);
4035                 }
4036                 *oa = ((struct ost_body *)val)->oa;
4037                 aa->aa_oa = oa;
4038                 req->rq_interpret_reply = osc_shrink_grant_interpret;
4039         }
4040
4041         ptlrpc_request_set_replen(req);
4042         if (!KEY_IS(KEY_GRANT_SHRINK)) {
4043                 LASSERT(set != NULL);
4044                 ptlrpc_set_add_req(set, req);
4045                 ptlrpc_check_set(NULL, set);
4046         } else
4047                 ptlrpcd_add_req(req, PSCOPE_OTHER);
4048
4049         RETURN(0);
4050 }
4051
4052
4053 static struct llog_operations osc_size_repl_logops = {
4054         lop_cancel: llog_obd_repl_cancel
4055 };
4056
4057 static struct llog_operations osc_mds_ost_orig_logops;
4058
4059 static int __osc_llog_init(struct obd_device *obd, struct obd_llog_group *olg,
4060                            struct obd_device *tgt, struct llog_catid *catid)
4061 {
4062         int rc;
4063         ENTRY;
4064
4065         rc = llog_setup(obd, &obd->obd_olg, LLOG_MDS_OST_ORIG_CTXT, tgt, 1,
4066                         &catid->lci_logid, &osc_mds_ost_orig_logops);
4067         if (rc) {
4068                 CERROR("failed LLOG_MDS_OST_ORIG_CTXT\n");
4069                 GOTO(out, rc);
4070         }
4071
4072         rc = llog_setup(obd, &obd->obd_olg, LLOG_SIZE_REPL_CTXT, tgt, 1,
4073                         NULL, &osc_size_repl_logops);
4074         if (rc) {
4075                 struct llog_ctxt *ctxt =
4076                         llog_get_context(obd, LLOG_MDS_OST_ORIG_CTXT);
4077                 if (ctxt)
4078                         llog_cleanup(ctxt);
4079                 CERROR("failed LLOG_SIZE_REPL_CTXT\n");
4080         }
4081         GOTO(out, rc);
4082 out:
4083         if (rc) {
4084                 CERROR("osc '%s' tgt '%s' catid %p rc=%d\n",
4085                        obd->obd_name, tgt->obd_name, catid, rc);
4086                 CERROR("logid "LPX64":0x%x\n",
4087                        catid->lci_logid.lgl_oid, catid->lci_logid.lgl_ogen);
4088         }
4089         return rc;
4090 }
4091
4092 static int osc_llog_init(struct obd_device *obd, struct obd_llog_group *olg,
4093                          struct obd_device *disk_obd, int *index)
4094 {
4095         struct llog_catid catid;
4096         static char name[32] = CATLIST;
4097         int rc;
4098         ENTRY;
4099
4100         LASSERT(olg == &obd->obd_olg);
4101
4102         cfs_mutex_down(&olg->olg_cat_processing);
4103         rc = llog_get_cat_list(disk_obd, name, *index, 1, &catid);
4104         if (rc) {
4105                 CERROR("rc: %d\n", rc);
4106                 GOTO(out, rc);
4107         }
4108
4109         CDEBUG(D_INFO, "%s: Init llog for %d - catid "LPX64"/"LPX64":%x\n",
4110                obd->obd_name, *index, catid.lci_logid.lgl_oid,
4111                catid.lci_logid.lgl_ogr, catid.lci_logid.lgl_ogen);
4112
4113         rc = __osc_llog_init(obd, olg, disk_obd, &catid);
4114         if (rc) {
4115                 CERROR("rc: %d\n", rc);
4116                 GOTO(out, rc);
4117         }
4118
4119         rc = llog_put_cat_list(disk_obd, name, *index, 1, &catid);
4120         if (rc) {
4121                 CERROR("rc: %d\n", rc);
4122                 GOTO(out, rc);
4123         }
4124
4125  out:
4126         cfs_mutex_up(&olg->olg_cat_processing);
4127
4128         return rc;
4129 }
4130
4131 static int osc_llog_finish(struct obd_device *obd, int count)
4132 {
4133         struct llog_ctxt *ctxt;
4134         int rc = 0, rc2 = 0;
4135         ENTRY;
4136
4137         ctxt = llog_get_context(obd, LLOG_MDS_OST_ORIG_CTXT);
4138         if (ctxt)
4139                 rc = llog_cleanup(ctxt);
4140
4141         ctxt = llog_get_context(obd, LLOG_SIZE_REPL_CTXT);
4142         if (ctxt)
4143                 rc2 = llog_cleanup(ctxt);
4144         if (!rc)
4145                 rc = rc2;
4146
4147         RETURN(rc);
4148 }
4149
4150 static int osc_reconnect(const struct lu_env *env,
4151                          struct obd_export *exp, struct obd_device *obd,
4152                          struct obd_uuid *cluuid,
4153                          struct obd_connect_data *data,
4154                          void *localdata)
4155 {
4156         struct client_obd *cli = &obd->u.cli;
4157
4158         if (data != NULL && (data->ocd_connect_flags & OBD_CONNECT_GRANT)) {
4159                 long lost_grant;
4160
4161                 client_obd_list_lock(&cli->cl_loi_list_lock);
4162                 data->ocd_grant = (cli->cl_avail_grant + cli->cl_dirty) ?:
4163                                 2 * cli->cl_max_pages_per_rpc << CFS_PAGE_SHIFT;
4164                 lost_grant = cli->cl_lost_grant;
4165                 cli->cl_lost_grant = 0;
4166                 client_obd_list_unlock(&cli->cl_loi_list_lock);
4167
4168                 CDEBUG(D_CACHE, "request ocd_grant: %d cl_avail_grant: %ld "
4169                        "cl_dirty: %ld cl_lost_grant: %ld\n", data->ocd_grant,
4170                        cli->cl_avail_grant, cli->cl_dirty, lost_grant);
4171                 CDEBUG(D_RPCTRACE, "ocd_connect_flags: "LPX64" ocd_version: %d"
4172                        " ocd_grant: %d\n", data->ocd_connect_flags,
4173                        data->ocd_version, data->ocd_grant);
4174         }
4175
4176         RETURN(0);
4177 }
4178
4179 static int osc_disconnect(struct obd_export *exp)
4180 {
4181         struct obd_device *obd = class_exp2obd(exp);
4182         struct llog_ctxt  *ctxt;
4183         int rc;
4184
4185         ctxt = llog_get_context(obd, LLOG_SIZE_REPL_CTXT);
4186         if (ctxt) {
4187                 if (obd->u.cli.cl_conn_count == 1) {
4188                         /* Flush any remaining cancel messages out to the
4189                          * target */
4190                         llog_sync(ctxt, exp);
4191                 }
4192                 llog_ctxt_put(ctxt);
4193         } else {
4194                 CDEBUG(D_HA, "No LLOG_SIZE_REPL_CTXT found in obd %p\n",
4195                        obd);
4196         }
4197
4198         rc = client_disconnect_export(exp);
4199         /**
4200          * Initially we put del_shrink_grant before disconnect_export, but it
4201          * causes the following problem if setup (connect) and cleanup
4202          * (disconnect) are tangled together.
4203          *      connect p1                     disconnect p2
4204          *   ptlrpc_connect_import
4205          *     ...............               class_manual_cleanup
4206          *                                     osc_disconnect
4207          *                                     del_shrink_grant
4208          *   ptlrpc_connect_interrupt
4209          *     init_grant_shrink
4210          *   add this client to shrink list
4211          *                                      cleanup_osc
4212          * Bang! pinger trigger the shrink.
4213          * So the osc should be disconnected from the shrink list, after we
4214          * are sure the import has been destroyed. BUG18662
4215          */
4216         if (obd->u.cli.cl_import == NULL)
4217                 osc_del_shrink_grant(&obd->u.cli);
4218         return rc;
4219 }
4220
4221 static int osc_import_event(struct obd_device *obd,
4222                             struct obd_import *imp,
4223                             enum obd_import_event event)
4224 {
4225         struct client_obd *cli;
4226         int rc = 0;
4227
4228         ENTRY;
4229         LASSERT(imp->imp_obd == obd);
4230
4231         switch (event) {
4232         case IMP_EVENT_DISCON: {
4233                 /* Only do this on the MDS OSC's */
4234                 if (imp->imp_server_timeout) {
4235                         struct osc_creator *oscc = &obd->u.cli.cl_oscc;
4236
4237                         cfs_spin_lock(&oscc->oscc_lock);
4238                         oscc->oscc_flags |= OSCC_FLAG_RECOVERING;
4239                         cfs_spin_unlock(&oscc->oscc_lock);
4240                 }
4241                 cli = &obd->u.cli;
4242                 client_obd_list_lock(&cli->cl_loi_list_lock);
4243                 cli->cl_avail_grant = 0;
4244                 cli->cl_lost_grant = 0;
4245                 client_obd_list_unlock(&cli->cl_loi_list_lock);
4246                 break;
4247         }
4248         case IMP_EVENT_INACTIVE: {
4249                 rc = obd_notify_observer(obd, obd, OBD_NOTIFY_INACTIVE, NULL);
4250                 break;
4251         }
4252         case IMP_EVENT_INVALIDATE: {
4253                 struct ldlm_namespace *ns = obd->obd_namespace;
4254                 struct lu_env         *env;
4255                 int                    refcheck;
4256
4257                 env = cl_env_get(&refcheck);
4258                 if (!IS_ERR(env)) {
4259                         /* Reset grants */
4260                         cli = &obd->u.cli;
4261                         client_obd_list_lock(&cli->cl_loi_list_lock);
4262                         /* all pages go to failing rpcs due to the invalid
4263                          * import */
4264                         osc_check_rpcs(env, cli);
4265                         client_obd_list_unlock(&cli->cl_loi_list_lock);
4266
4267                         ldlm_namespace_cleanup(ns, LDLM_FL_LOCAL_ONLY);
4268                         cl_env_put(env, &refcheck);
4269                 } else
4270                         rc = PTR_ERR(env);
4271                 break;
4272         }
4273         case IMP_EVENT_ACTIVE: {
4274                 /* Only do this on the MDS OSC's */
4275                 if (imp->imp_server_timeout) {
4276                         struct osc_creator *oscc = &obd->u.cli.cl_oscc;
4277
4278                         cfs_spin_lock(&oscc->oscc_lock);
4279                         oscc->oscc_flags &= ~OSCC_FLAG_NOSPC;
4280                         cfs_spin_unlock(&oscc->oscc_lock);
4281                 }
4282                 rc = obd_notify_observer(obd, obd, OBD_NOTIFY_ACTIVE, NULL);
4283                 break;
4284         }
4285         case IMP_EVENT_OCD: {
4286                 struct obd_connect_data *ocd = &imp->imp_connect_data;
4287
4288                 if (ocd->ocd_connect_flags & OBD_CONNECT_GRANT)
4289                         osc_init_grant(&obd->u.cli, ocd);
4290
4291                 /* See bug 7198 */
4292                 if (ocd->ocd_connect_flags & OBD_CONNECT_REQPORTAL)
4293                         imp->imp_client->cli_request_portal =OST_REQUEST_PORTAL;
4294
4295                 rc = obd_notify_observer(obd, obd, OBD_NOTIFY_OCD, NULL);
4296                 break;
4297         }
4298         default:
4299                 CERROR("Unknown import event %d\n", event);
4300                 LBUG();
4301         }
4302         RETURN(rc);
4303 }
4304
4305 int osc_setup(struct obd_device *obd, struct lustre_cfg *lcfg)
4306 {
4307         int rc;
4308         ENTRY;
4309
4310         ENTRY;
4311         rc = ptlrpcd_addref();
4312         if (rc)
4313                 RETURN(rc);
4314
4315         rc = client_obd_setup(obd, lcfg);
4316         if (rc) {
4317                 ptlrpcd_decref();
4318         } else {
4319                 struct lprocfs_static_vars lvars = { 0 };
4320                 struct client_obd *cli = &obd->u.cli;
4321
4322                 cli->cl_grant_shrink_interval = GRANT_SHRINK_INTERVAL;
4323                 lprocfs_osc_init_vars(&lvars);
4324                 if (lprocfs_obd_setup(obd, lvars.obd_vars) == 0) {
4325                         lproc_osc_attach_seqstat(obd);
4326                         sptlrpc_lprocfs_cliobd_attach(obd);
4327                         ptlrpc_lprocfs_register_obd(obd);
4328                 }
4329
4330                 oscc_init(obd);
4331                 /* We need to allocate a few requests more, because
4332                    brw_interpret tries to create new requests before freeing
4333                    previous ones. Ideally we want to have 2x max_rpcs_in_flight
4334                    reserved, but I afraid that might be too much wasted RAM
4335                    in fact, so 2 is just my guess and still should work. */
4336                 cli->cl_import->imp_rq_pool =
4337                         ptlrpc_init_rq_pool(cli->cl_max_rpcs_in_flight + 2,
4338                                             OST_MAXREQSIZE,
4339                                             ptlrpc_add_rqs_to_pool);
4340
4341                 CFS_INIT_LIST_HEAD(&cli->cl_grant_shrink_list);
4342                 cfs_sema_init(&cli->cl_grant_sem, 1);
4343         }
4344
4345         RETURN(rc);
4346 }
4347
4348 static int osc_precleanup(struct obd_device *obd, enum obd_cleanup_stage stage)
4349 {
4350         int rc = 0;
4351         ENTRY;
4352
4353         switch (stage) {
4354         case OBD_CLEANUP_EARLY: {
4355                 struct obd_import *imp;
4356                 imp = obd->u.cli.cl_import;
4357                 CDEBUG(D_HA, "Deactivating import %s\n", obd->obd_name);
4358                 /* ptlrpc_abort_inflight to stop an mds_lov_synchronize */
4359                 ptlrpc_deactivate_import(imp);
4360                 cfs_spin_lock(&imp->imp_lock);
4361                 imp->imp_pingable = 0;
4362                 cfs_spin_unlock(&imp->imp_lock);
4363                 break;
4364         }
4365         case OBD_CLEANUP_EXPORTS: {
4366                 /* If we set up but never connected, the
4367                    client import will not have been cleaned. */
4368                 if (obd->u.cli.cl_import) {
4369                         struct obd_import *imp;
4370                         cfs_down_write(&obd->u.cli.cl_sem);
4371                         imp = obd->u.cli.cl_import;
4372                         CDEBUG(D_CONFIG, "%s: client import never connected\n",
4373                                obd->obd_name);
4374                         ptlrpc_invalidate_import(imp);
4375                         if (imp->imp_rq_pool) {
4376                                 ptlrpc_free_rq_pool(imp->imp_rq_pool);
4377                                 imp->imp_rq_pool = NULL;
4378                         }
4379                         class_destroy_import(imp);
4380                         cfs_up_write(&obd->u.cli.cl_sem);
4381                         obd->u.cli.cl_import = NULL;
4382                 }
4383                 rc = obd_llog_finish(obd, 0);
4384                 if (rc != 0)
4385                         CERROR("failed to cleanup llogging subsystems\n");
4386                 break;
4387                 }
4388         }
4389         RETURN(rc);
4390 }
4391
4392 int osc_cleanup(struct obd_device *obd)
4393 {
4394         int rc;
4395
4396         ENTRY;
4397         ptlrpc_lprocfs_unregister_obd(obd);
4398         lprocfs_obd_cleanup(obd);
4399
4400         /* free memory of osc quota cache */
4401         lquota_cleanup(quota_interface, obd);
4402
4403         rc = client_obd_cleanup(obd);
4404
4405         ptlrpcd_decref();
4406         RETURN(rc);
4407 }
4408
4409 int osc_process_config_base(struct obd_device *obd, struct lustre_cfg *lcfg)
4410 {
4411         struct lprocfs_static_vars lvars = { 0 };
4412         int rc = 0;
4413
4414         lprocfs_osc_init_vars(&lvars);
4415
4416         switch (lcfg->lcfg_command) {
4417         default:
4418                 rc = class_process_proc_param(PARAM_OSC, lvars.obd_vars,
4419                                               lcfg, obd);
4420                 if (rc > 0)
4421                         rc = 0;
4422                 break;
4423         }
4424
4425         return(rc);
4426 }
4427
4428 static int osc_process_config(struct obd_device *obd, obd_count len, void *buf)
4429 {
4430         return osc_process_config_base(obd, buf);
4431 }
4432
4433 struct obd_ops osc_obd_ops = {
4434         .o_owner                = THIS_MODULE,
4435         .o_setup                = osc_setup,
4436         .o_precleanup           = osc_precleanup,
4437         .o_cleanup              = osc_cleanup,
4438         .o_add_conn             = client_import_add_conn,
4439         .o_del_conn             = client_import_del_conn,
4440         .o_connect              = client_connect_import,
4441         .o_reconnect            = osc_reconnect,
4442         .o_disconnect           = osc_disconnect,
4443         .o_statfs               = osc_statfs,
4444         .o_statfs_async         = osc_statfs_async,
4445         .o_packmd               = osc_packmd,
4446         .o_unpackmd             = osc_unpackmd,
4447         .o_precreate            = osc_precreate,
4448         .o_create               = osc_create,
4449         .o_create_async         = osc_create_async,
4450         .o_destroy              = osc_destroy,
4451         .o_getattr              = osc_getattr,
4452         .o_getattr_async        = osc_getattr_async,
4453         .o_setattr              = osc_setattr,
4454         .o_setattr_async        = osc_setattr_async,
4455         .o_brw                  = osc_brw,
4456         .o_punch                = osc_punch,
4457         .o_sync                 = osc_sync,
4458         .o_enqueue              = osc_enqueue,
4459         .o_change_cbdata        = osc_change_cbdata,
4460         .o_cancel               = osc_cancel,
4461         .o_cancel_unused        = osc_cancel_unused,
4462         .o_iocontrol            = osc_iocontrol,
4463         .o_get_info             = osc_get_info,
4464         .o_set_info_async       = osc_set_info_async,
4465         .o_import_event         = osc_import_event,
4466         .o_llog_init            = osc_llog_init,
4467         .o_llog_finish          = osc_llog_finish,
4468         .o_process_config       = osc_process_config,
4469 };
4470
4471 extern struct lu_kmem_descr osc_caches[];
4472 extern cfs_spinlock_t       osc_ast_guard;
4473 extern cfs_lock_class_key_t osc_ast_guard_class;
4474
4475 int __init osc_init(void)
4476 {
4477         struct lprocfs_static_vars lvars = { 0 };
4478         int rc;
4479         ENTRY;
4480
4481         /* print an address of _any_ initialized kernel symbol from this
4482          * module, to allow debugging with gdb that doesn't support data
4483          * symbols from modules.*/
4484         CDEBUG(D_CONSOLE, "Lustre OSC module (%p).\n", &osc_caches);
4485
4486         rc = lu_kmem_init(osc_caches);
4487
4488         lprocfs_osc_init_vars(&lvars);
4489
4490         cfs_request_module("lquota");
4491         quota_interface = PORTAL_SYMBOL_GET(osc_quota_interface);
4492         lquota_init(quota_interface);
4493         init_obd_quota_ops(quota_interface, &osc_obd_ops);
4494
4495         rc = class_register_type(&osc_obd_ops, NULL, lvars.module_vars,
4496                                  LUSTRE_OSC_NAME, &osc_device_type);
4497         if (rc) {
4498                 if (quota_interface)
4499                         PORTAL_SYMBOL_PUT(osc_quota_interface);
4500                 lu_kmem_fini(osc_caches);
4501                 RETURN(rc);
4502         }
4503
4504         cfs_spin_lock_init(&osc_ast_guard);
4505         cfs_lockdep_set_class(&osc_ast_guard, &osc_ast_guard_class);
4506
4507         osc_mds_ost_orig_logops = llog_lvfs_ops;
4508         osc_mds_ost_orig_logops.lop_setup = llog_obd_origin_setup;
4509         osc_mds_ost_orig_logops.lop_cleanup = llog_obd_origin_cleanup;
4510         osc_mds_ost_orig_logops.lop_add = llog_obd_origin_add;
4511         osc_mds_ost_orig_logops.lop_connect = llog_origin_connect;
4512
4513         RETURN(rc);
4514 }
4515
4516 #ifdef __KERNEL__
4517 static void /*__exit*/ osc_exit(void)
4518 {
4519         lu_device_type_fini(&osc_device_type);
4520
4521         lquota_exit(quota_interface);
4522         if (quota_interface)
4523                 PORTAL_SYMBOL_PUT(osc_quota_interface);
4524
4525         class_unregister_type(LUSTRE_OSC_NAME);
4526         lu_kmem_fini(osc_caches);
4527 }
4528
4529 MODULE_AUTHOR("Sun Microsystems, Inc. <http://www.lustre.org/>");
4530 MODULE_DESCRIPTION("Lustre Object Storage Client (OSC)");
4531 MODULE_LICENSE("GPL");
4532
4533 cfs_module(osc, LUSTRE_VERSION_STRING, osc_init, osc_exit);
4534 #endif