lustre/lov/lov_io.c

   1 /*
   2  * GPL HEADER START
   3  *
   4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   5  *
   6  * This program is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License version 2 only,
   8  * as published by the Free Software Foundation.
   9  *
  10  * This program is distributed in the hope that it will be useful, but
  11  * WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * General Public License version 2 for more details (a copy is included
  14  * in the LICENSE file that accompanied this code).
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * version 2 along with this program; If not, see
  18  * http://www.gnu.org/licenses/gpl-2.0.html
  19  *
  20  * GPL HEADER END
  21  */
  22 /*
  23  * Copyright (c) 2008, 2010, Oracle and/or its affiliates. All rights reserved.
  24  * Use is subject to license terms.
  25  *
  26  * Copyright (c) 2011, 2017, Intel Corporation.
  27  */
  28 /*
  29  * This file is part of Lustre, http://www.lustre.org/
  30  * Lustre is a trademark of Sun Microsystems, Inc.
  31  *
  32  * Implementation of cl_io for LOV layer.
  33  *
  34  *   Author: Nikita Danilov <nikita.danilov@sun.com>
  35  *   Author: Jinshan Xiong <jinshan.xiong@whamcloud.com>
  36  */
  37
  38 #define DEBUG_SUBSYSTEM S_LOV
  39
  40 #include "lov_cl_internal.h"
  41
  42 /** \addtogroup lov
  43  *  @{
  44  */
  45
  46 static inline struct lov_io_sub *lov_sub_alloc(struct lov_io *lio, int index)
  47 {
  48         struct lov_io_sub *sub;
  49
  50         if (lio->lis_nr_subios == 0) {
  51                 LASSERT(lio->lis_single_subio_index == -1);
  52                 sub = &lio->lis_single_subio;
  53                 lio->lis_single_subio_index = index;
  54                 memset(sub, 0, sizeof(*sub));
  55         } else {
  56                 OBD_ALLOC_PTR(sub);
  57         }
  58
  59         if (sub) {
  60                 INIT_LIST_HEAD(&sub->sub_list);
  61                 INIT_LIST_HEAD(&sub->sub_linkage);
  62                 sub->sub_subio_index = index;
  63         }
  64
  65         return sub;
  66 }
  67
  68 static inline void lov_sub_free(struct lov_io *lio, struct lov_io_sub *sub)
  69 {
  70         if (sub->sub_subio_index == lio->lis_single_subio_index) {
  71                 LASSERT(sub == &lio->lis_single_subio);
  72                 lio->lis_single_subio_index = -1;
  73         } else {
  74                 OBD_FREE_PTR(sub);
  75         }
  76 }
  77
  78 static void lov_io_sub_fini(const struct lu_env *env, struct lov_io *lio,
  79                             struct lov_io_sub *sub)
  80 {
  81         ENTRY;
  82
  83         cl_io_fini(sub->sub_env, &sub->sub_io);
  84
  85         if (sub->sub_env && !IS_ERR(sub->sub_env)) {
  86                 cl_env_put(sub->sub_env, &sub->sub_refcheck);
  87                 sub->sub_env = NULL;
  88         }
  89         EXIT;
  90 }
  91
  92 static inline bool
  93 is_index_within_mirror(struct lov_object *lov, int index, int mirror_index)
  94 {
  95         struct lov_layout_composite *comp = &lov->u.composite;
  96         struct lov_mirror_entry *lre = &comp->lo_mirrors[mirror_index];
  97
  98         return (index >= lre->lre_start && index <= lre->lre_end);
  99 }
 100
 101 static int lov_io_sub_init(const struct lu_env *env, struct lov_io *lio,
 102                            struct lov_io_sub *sub)
 103 {
 104         struct lov_object *lov = lio->lis_object;
 105         struct cl_io *sub_io;
 106         struct cl_object *sub_obj;
 107         struct cl_io *io = lio->lis_cl.cis_io;
 108         int index = lov_comp_entry(sub->sub_subio_index);
 109         int stripe = lov_comp_stripe(sub->sub_subio_index);
 110         int result = 0;
 111         LASSERT(sub->sub_env == NULL);
 112         ENTRY;
 113
 114         if (unlikely(!lov_r0(lov, index)->lo_sub ||
 115                      !lov_r0(lov, index)->lo_sub[stripe]))
 116                 RETURN(-EIO);
 117
 118         LASSERTF(ergo(lov_is_flr(lov),
 119                       is_index_within_mirror(lov, index,
 120                                              lio->lis_mirror_index)),
 121                  DFID "iot = %d, index = %d, mirror = %d\n",
 122                  PFID(lu_object_fid(lov2lu(lov))), io->ci_type, index,
 123                  lio->lis_mirror_index);
 124
 125         /* obtain new environment */
 126         sub->sub_env = cl_env_get(&sub->sub_refcheck);
 127         if (IS_ERR(sub->sub_env)) {
 128                 result = PTR_ERR(sub->sub_env);
 129                 RETURN(result);
 130         }
 131
 132         sub_obj = lovsub2cl(lov_r0(lov, index)->lo_sub[stripe]);
 133         sub_io  = &sub->sub_io;
 134
 135         sub_io->ci_obj    = sub_obj;
 136         sub_io->ci_result = 0;
 137
 138         sub_io->ci_parent  = io;
 139         sub_io->ci_lockreq = io->ci_lockreq;
 140         sub_io->ci_type    = io->ci_type;
 141         sub_io->ci_no_srvlock = io->ci_no_srvlock;
 142         sub_io->ci_noatime = io->ci_noatime;
 143         sub_io->ci_async_readahead = io->ci_async_readahead;
 144         sub_io->ci_lock_no_expand = io->ci_lock_no_expand;
 145         sub_io->ci_ndelay = io->ci_ndelay;
 146         sub_io->ci_layout_version = io->ci_layout_version;
 147         sub_io->ci_tried_all_mirrors = io->ci_tried_all_mirrors;
 148
 149         result = cl_io_sub_init(sub->sub_env, sub_io, io->ci_type, sub_obj);
 150
 151         if (result < 0)
 152                 lov_io_sub_fini(env, lio, sub);
 153
 154         RETURN(result);
 155 }
 156
 157 struct lov_io_sub *lov_sub_get(const struct lu_env *env,
 158                                struct lov_io *lio, int index)
 159 {
 160         struct lov_io_sub *sub;
 161         int rc = 0;
 162
 163         ENTRY;
 164
 165         list_for_each_entry(sub, &lio->lis_subios, sub_list) {
 166                 if (sub->sub_subio_index == index) {
 167                         rc = 1;
 168                         break;
 169                 }
 170         }
 171
 172         if (rc == 0) {
 173                 sub = lov_sub_alloc(lio, index);
 174                 if (!sub)
 175                         GOTO(out, rc = -ENOMEM);
 176
 177                 rc = lov_io_sub_init(env, lio, sub);
 178                 if (rc < 0) {
 179                         lov_sub_free(lio, sub);
 180                         GOTO(out, rc);
 181                 }
 182
 183                 list_add_tail(&sub->sub_list, &lio->lis_subios);
 184                 lio->lis_nr_subios++;
 185         }
 186 out:
 187         if (rc < 0)
 188                 sub = ERR_PTR(rc);
 189         else
 190                 sub->sub_io.ci_noquota = lio->lis_cl.cis_io->ci_noquota;
 191         RETURN(sub);
 192 }
 193
 194 /*****************************************************************************
 195  *
 196  * Lov io operations.
 197  *
 198  */
 199 static int lov_io_subio_init(const struct lu_env *env, struct lov_io *lio,
 200                              struct cl_io *io)
 201 {
 202         ENTRY;
 203
 204         LASSERT(lio->lis_object != NULL);
 205
 206         INIT_LIST_HEAD(&lio->lis_subios);
 207         lio->lis_single_subio_index = -1;
 208         lio->lis_nr_subios = 0;
 209
 210         RETURN(0);
 211 }
 212
 213 /**
 214  * Decide if it will need write intent RPC
 215  */
 216 static int lov_io_mirror_write_intent(struct lov_io *lio,
 217         struct lov_object *obj, struct cl_io *io)
 218 {
 219         struct lov_layout_composite *comp = &obj->u.composite;
 220         struct lu_extent *ext = &io->ci_write_intent;
 221         struct lov_mirror_entry *lre;
 222         struct lov_mirror_entry *primary;
 223         struct lov_layout_entry *lle;
 224         size_t count = 0;
 225         ENTRY;
 226
 227         *ext = (typeof(*ext)) { lio->lis_pos, lio->lis_endpos };
 228         io->ci_need_write_intent = 0;
 229
 230         if (!(io->ci_type == CIT_WRITE || cl_io_is_trunc(io) ||
 231               cl_io_is_mkwrite(io)))
 232                 RETURN(0);
 233
 234         /*
 235          * FLR: check if it needs to send a write intent RPC to server.
 236          * Writing to sync_pending file needs write intent RPC to change
 237          * the file state back to write_pending, so that the layout version
 238          * can be increased when the state changes to sync_pending at a later
 239          * time. Otherwise there exists a chance that an evicted client may
 240          * dirty the file data while resync client is working on it.
 241          * Designated I/O is allowed for resync workload.
 242          */
 243         if (lov_flr_state(obj) == LCM_FL_RDONLY ||
 244             (lov_flr_state(obj) == LCM_FL_SYNC_PENDING &&
 245              io->ci_designated_mirror == 0)) {
 246                 io->ci_need_write_intent = 1;
 247                 RETURN(0);
 248         }
 249
 250         LASSERT((lov_flr_state(obj) == LCM_FL_WRITE_PENDING));
 251         LASSERT(comp->lo_preferred_mirror >= 0);
 252
 253         /*
 254          * need to iterate all components to see if there are
 255          * multiple components covering the writing component
 256          */
 257         primary = &comp->lo_mirrors[comp->lo_preferred_mirror];
 258         LASSERT(!primary->lre_stale);
 259         lov_foreach_mirror_layout_entry(obj, lle, primary) {
 260                 LASSERT(lle->lle_valid);
 261                 if (!lu_extent_is_overlapped(ext, lle->lle_extent))
 262                         continue;
 263
 264                 ext->e_start = min(ext->e_start, lle->lle_extent->e_start);
 265                 ext->e_end = max(ext->e_end, lle->lle_extent->e_end);
 266                 ++count;
 267         }
 268         if (count == 0) {
 269                 CERROR(DFID ": cannot find any valid components covering "
 270                        "file extent "DEXT", mirror: %d\n",
 271                        PFID(lu_object_fid(lov2lu(obj))), PEXT(ext),
 272                        primary->lre_mirror_id);
 273                 RETURN(-EIO);
 274         }
 275
 276         count = 0;
 277         lov_foreach_mirror_entry(obj, lre) {
 278                 if (lre == primary)
 279                         continue;
 280
 281                 lov_foreach_mirror_layout_entry(obj, lle, lre) {
 282                         if (!lle->lle_valid)
 283                                 continue;
 284
 285                         if (lu_extent_is_overlapped(ext, lle->lle_extent)) {
 286                                 ++count;
 287                                 break;
 288                         }
 289                 }
 290         }
 291
 292         CDEBUG(D_VFSTRACE, DFID "there are %zd components to be staled to "
 293                "modify file extent "DEXT", iot: %d\n",
 294                PFID(lu_object_fid(lov2lu(obj))), count, PEXT(ext), io->ci_type);
 295
 296         io->ci_need_write_intent = count > 0;
 297
 298         RETURN(0);
 299 }
 300
 301 static int lov_io_mirror_init(struct lov_io *lio, struct lov_object *obj,
 302                                struct cl_io *io)
 303 {
 304         struct lov_layout_composite *comp = &obj->u.composite;
 305         int index;
 306         int i;
 307         int result;
 308         ENTRY;
 309
 310         if (!lov_is_flr(obj)) {
 311                 /* only locks/pages are manipulated for CIT_MISC op, no
 312                  * cl_io_loop() will be called, don't check/set mirror info.
 313                  */
 314                 if (io->ci_type != CIT_MISC) {
 315                         LASSERT(comp->lo_preferred_mirror == 0);
 316                         lio->lis_mirror_index = comp->lo_preferred_mirror;
 317                 }
 318                 io->ci_ndelay = 0;
 319                 RETURN(0);
 320         }
 321
 322         /* transfer the layout version for verification */
 323         if (io->ci_layout_version == 0)
 324                 io->ci_layout_version = obj->lo_lsm->lsm_layout_gen;
 325
 326         /* find the corresponding mirror for designated mirror IO */
 327         if (io->ci_designated_mirror > 0) {
 328                 struct lov_mirror_entry *entry;
 329
 330                 LASSERT(!io->ci_ndelay);
 331
 332                 CDEBUG(D_LAYOUT, "designated I/O mirror state: %d\n",
 333                       lov_flr_state(obj));
 334
 335                 if ((cl_io_is_trunc(io) || io->ci_type == CIT_WRITE) &&
 336                     (io->ci_layout_version != obj->lo_lsm->lsm_layout_gen)) {
 337                         /*
 338                          * For resync I/O, the ci_layout_version was the layout
 339                          * version when resync starts. If it doesn't match the
 340                          * current object layout version, it means the layout
 341                          * has been changed
 342                          */
 343                         RETURN(-ESTALE);
 344                 }
 345
 346                 io->ci_layout_version |= LU_LAYOUT_RESYNC;
 347
 348                 index = 0;
 349                 lio->lis_mirror_index = -1;
 350                 lov_foreach_mirror_entry(obj, entry) {
 351                         if (entry->lre_mirror_id ==
 352                             io->ci_designated_mirror) {
 353                                 lio->lis_mirror_index = index;
 354                                 break;
 355                         }
 356
 357                         index++;
 358                 }
 359
 360                 RETURN(lio->lis_mirror_index < 0 ? -EINVAL : 0);
 361         }
 362
 363         result = lov_io_mirror_write_intent(lio, obj, io);
 364         if (result)
 365                 RETURN(result);
 366
 367         if (io->ci_need_write_intent) {
 368                 CDEBUG(D_VFSTRACE, DFID " need write intent for [%llu, %llu)\n",
 369                        PFID(lu_object_fid(lov2lu(obj))),
 370                        lio->lis_pos, lio->lis_endpos);
 371
 372                 if (cl_io_is_trunc(io)) {
 373                         /**
 374                          * for truncate, we uses [size, EOF) to judge whether
 375                          * a write intent needs to be send, but we need to
 376                          * restore the write extent to [0, size], in truncate,
 377                          * the byte in the size position is accessed.
 378                          */
 379                         io->ci_write_intent.e_start = 0;
 380                         io->ci_write_intent.e_end =
 381                                         io->u.ci_setattr.sa_attr.lvb_size + 1;
 382                 }
 383                 /* stop cl_io_init() loop */
 384                 RETURN(1);
 385         }
 386
 387         if (io->ci_ndelay_tried == 0 || /* first time to try */
 388             /* reset the mirror index if layout has changed */
 389             lio->lis_mirror_layout_gen != obj->lo_lsm->lsm_layout_gen) {
 390                 lio->lis_mirror_layout_gen = obj->lo_lsm->lsm_layout_gen;
 391                 index = lio->lis_mirror_index = comp->lo_preferred_mirror;
 392         } else {
 393                 index = lio->lis_mirror_index;
 394                 LASSERT(index >= 0);
 395
 396                 /* move mirror index to the next one */
 397                 index = (index + 1) % comp->lo_mirror_count;
 398         }
 399
 400         for (i = 0; i < comp->lo_mirror_count; i++) {
 401                 struct lu_extent ext = { .e_start = lio->lis_pos,
 402                                          .e_end   = lio->lis_pos + 1 };
 403                 struct lov_mirror_entry *lre;
 404                 struct lov_layout_entry *lle;
 405                 bool found = false;
 406
 407                 lre = &comp->lo_mirrors[(index + i) % comp->lo_mirror_count];
 408                 if (!lre->lre_valid)
 409                         continue;
 410
 411                 lov_foreach_mirror_layout_entry(obj, lle, lre) {
 412                         if (!lle->lle_valid)
 413                                 continue;
 414
 415                         if (lu_extent_is_overlapped(&ext, lle->lle_extent)) {
 416                                 found = true;
 417                                 break;
 418                         }
 419                 } /* each component of the mirror */
 420                 if (found) {
 421                         index = (index + i) % comp->lo_mirror_count;
 422                         break;
 423                 }
 424         } /* each mirror */
 425
 426         if (i == comp->lo_mirror_count) {
 427                 CERROR(DFID": failed to find a component covering "
 428                        "I/O region at %llu\n",
 429                        PFID(lu_object_fid(lov2lu(obj))), lio->lis_pos);
 430
 431                 dump_lsm(D_ERROR, obj->lo_lsm);
 432
 433                 RETURN(-EIO);
 434         }
 435
 436         CDEBUG(D_VFSTRACE, DFID ": flr state: %d, move mirror from %d to %d, "
 437                "have retried: %d, mirror count: %d\n",
 438                PFID(lu_object_fid(lov2lu(obj))), lov_flr_state(obj),
 439                lio->lis_mirror_index, index, io->ci_ndelay_tried,
 440                comp->lo_mirror_count);
 441
 442         lio->lis_mirror_index = index;
 443
 444         /*
 445          * FLR: if all mirrors have been tried once, most likely the network
 446          * of this client has been partitioned. We should relinquish CPU for
 447          * a while before trying again.
 448          */
 449         if (io->ci_ndelay && io->ci_ndelay_tried > 0 &&
 450             (io->ci_ndelay_tried % comp->lo_mirror_count == 0)) {
 451                 schedule_timeout_interruptible(cfs_time_seconds(1) / 100);
 452                 if (signal_pending(current))
 453                         RETURN(-EINTR);
 454
 455                 /**
 456                  * we'd set ci_tried_all_mirrors to turn off fast mirror
 457                  * switching for read after we've tried all mirrors several
 458                  * rounds.
 459                  */
 460                 io->ci_tried_all_mirrors = io->ci_ndelay_tried %
 461                                            (comp->lo_mirror_count * 4) == 0;
 462         }
 463         ++io->ci_ndelay_tried;
 464
 465         CDEBUG(D_VFSTRACE, "use %sdelayed RPC state for this IO\n",
 466                io->ci_ndelay ? "non-" : "");
 467
 468         RETURN(0);
 469 }
 470
 471 static int lov_io_slice_init(struct lov_io *lio,
 472                              struct lov_object *obj, struct cl_io *io)
 473 {
 474         int index;
 475         int result = 0;
 476         ENTRY;
 477
 478         io->ci_result = 0;
 479         lio->lis_object = obj;
 480
 481         switch (io->ci_type) {
 482         case CIT_READ:
 483         case CIT_WRITE:
 484                 lio->lis_pos = io->u.ci_rw.crw_pos;
 485                 lio->lis_endpos = io->u.ci_rw.crw_pos + io->u.ci_rw.crw_count;
 486                 lio->lis_io_endpos = lio->lis_endpos;
 487                 if (cl_io_is_append(io)) {
 488                         LASSERT(io->ci_type == CIT_WRITE);
 489
 490                         /*
 491                          * If there is LOV EA hole, then we may cannot locate
 492                          * the current file-tail exactly.
 493                          */
 494                         if (unlikely(obj->lo_lsm->lsm_entries[0]->lsme_pattern &
 495                                      LOV_PATTERN_F_HOLE))
 496                                 GOTO(out, result = -EIO);
 497
 498                         lio->lis_pos = 0;
 499                         lio->lis_endpos = OBD_OBJECT_EOF;
 500                 }
 501                 break;
 502
 503         case CIT_SETATTR:
 504                 if (cl_io_is_fallocate(io)) {
 505                         lio->lis_pos = io->u.ci_setattr.sa_falloc_offset;
 506                         lio->lis_endpos = io->u.ci_setattr.sa_falloc_end;
 507                 } else if (cl_io_is_trunc(io)) {
 508                         lio->lis_pos = io->u.ci_setattr.sa_attr.lvb_size;
 509                         lio->lis_endpos = OBD_OBJECT_EOF;
 510                 } else {
 511                         lio->lis_pos = 0;
 512                         lio->lis_endpos = OBD_OBJECT_EOF;
 513                 }
 514                 break;
 515
 516         case CIT_DATA_VERSION:
 517                 lio->lis_pos = 0;
 518                 lio->lis_endpos = OBD_OBJECT_EOF;
 519                 break;
 520
 521         case CIT_FAULT: {
 522                 pgoff_t index = io->u.ci_fault.ft_index;
 523
 524                 lio->lis_pos = cl_offset(io->ci_obj, index);
 525                 lio->lis_endpos = cl_offset(io->ci_obj, index + 1);
 526                 break;
 527         }
 528
 529         case CIT_FSYNC: {
 530                 lio->lis_pos = io->u.ci_fsync.fi_start;
 531                 lio->lis_endpos = io->u.ci_fsync.fi_end;
 532                 break;
 533         }
 534
 535         case CIT_LADVISE: {
 536                 lio->lis_pos = io->u.ci_ladvise.li_start;
 537                 lio->lis_endpos = io->u.ci_ladvise.li_end;
 538                 break;
 539         }
 540
 541         case CIT_LSEEK: {
 542                 lio->lis_pos = io->u.ci_lseek.ls_start;
 543                 lio->lis_endpos = OBD_OBJECT_EOF;
 544                 break;
 545         }
 546
 547         case CIT_GLIMPSE:
 548                 lio->lis_pos = 0;
 549                 lio->lis_endpos = OBD_OBJECT_EOF;
 550
 551                 if (lov_flr_state(obj) == LCM_FL_RDONLY &&
 552                     !OBD_FAIL_CHECK(OBD_FAIL_FLR_GLIMPSE_IMMUTABLE))
 553                         /* SoM is accurate, no need glimpse */
 554                         GOTO(out, result = 1);
 555                 break;
 556
 557         case CIT_MISC:
 558                 lio->lis_pos = 0;
 559                 lio->lis_endpos = OBD_OBJECT_EOF;
 560                 break;
 561
 562         default:
 563                 LBUG();
 564         }
 565
 566         /*
 567          * CIT_MISC + ci_ignore_layout can identify the I/O from the OSC layer,
 568          * it won't care/access lov layout related info.
 569          */
 570         if (io->ci_ignore_layout && io->ci_type == CIT_MISC)
 571                 GOTO(out, result = 0);
 572
 573         LASSERT(obj->lo_lsm != NULL);
 574
 575         result = lov_io_mirror_init(lio, obj, io);
 576         if (result)
 577                 GOTO(out, result);
 578
 579         /* check if it needs to instantiate layout */
 580         if (!(io->ci_type == CIT_WRITE || cl_io_is_mkwrite(io) ||
 581               (cl_io_is_trunc(io) && io->u.ci_setattr.sa_attr.lvb_size > 0)))
 582                 GOTO(out, result = 0);
 583
 584         /*
 585          * for truncate, it only needs to instantiate the components
 586          * before the truncated size.
 587          */
 588         if (cl_io_is_trunc(io)) {
 589                 io->ci_write_intent.e_start = 0;
 590                 /* for writes, e_end is endpos, the location of the file
 591                  * pointer after the write is completed, so it is not accessed.
 592                  * For truncate, 'end' is the size, and *is* acccessed.
 593                  * In other words, writes are [start, end), but truncate is
 594                  * [start, size], where both are included.  So add 1 to the
 595                  * size when creating the write intent to account for this.
 596                  */
 597                 io->ci_write_intent.e_end =
 598                         io->u.ci_setattr.sa_attr.lvb_size + 1;
 599         } else {
 600                 io->ci_write_intent.e_start = lio->lis_pos;
 601                 io->ci_write_intent.e_end = lio->lis_endpos;
 602         }
 603
 604         index = 0;
 605         lov_foreach_io_layout(index, lio, &io->ci_write_intent) {
 606                 if (!lsm_entry_inited(obj->lo_lsm, index)) {
 607                         io->ci_need_write_intent = 1;
 608                         break;
 609                 }
 610         }
 611
 612         if (io->ci_need_write_intent && io->ci_designated_mirror > 0) {
 613                 /*
 614                  * REINT_SYNC RPC has already tried to instantiate all of the
 615                  * components involved, obviously it didn't succeed. Skip this
 616                  * mirror for now. The server won't be able to figure out
 617                  * which mirror it should instantiate components
 618                  */
 619                 CERROR(DFID": trying to instantiate components for designated "
 620                        "I/O, file state: %d\n",
 621                        PFID(lu_object_fid(lov2lu(obj))), lov_flr_state(obj));
 622
 623                 io->ci_need_write_intent = 0;
 624                 GOTO(out, result = -EIO);
 625         }
 626
 627         if (io->ci_need_write_intent)
 628                 GOTO(out, result = 1);
 629
 630         EXIT;
 631
 632 out:
 633         return result;
 634 }
 635
 636 static void lov_io_fini(const struct lu_env *env, const struct cl_io_slice *ios)
 637 {
 638         struct lov_io *lio = cl2lov_io(env, ios);
 639         struct lov_object *lov = cl2lov(ios->cis_obj);
 640
 641         ENTRY;
 642
 643         LASSERT(list_empty(&lio->lis_active));
 644
 645         while (!list_empty(&lio->lis_subios)) {
 646                 struct lov_io_sub *sub = list_entry(lio->lis_subios.next,
 647                                                     struct lov_io_sub,
 648                                                     sub_list);
 649
 650                 list_del_init(&sub->sub_list);
 651                 lio->lis_nr_subios--;
 652
 653                 lov_io_sub_fini(env, lio, sub);
 654                 lov_sub_free(lio, sub);
 655         }
 656         LASSERT(lio->lis_nr_subios == 0);
 657
 658         LASSERT(atomic_read(&lov->lo_active_ios) > 0);
 659         if (atomic_dec_and_test(&lov->lo_active_ios))
 660                 wake_up_all(&lov->lo_waitq);
 661         EXIT;
 662 }
 663
 664 static void lov_io_sub_inherit(struct lov_io_sub *sub, struct lov_io *lio,
 665                                loff_t start, loff_t end)
 666 {
 667         struct cl_io *io = &sub->sub_io;
 668         struct lov_stripe_md *lsm = lio->lis_object->lo_lsm;
 669         struct cl_io *parent = lio->lis_cl.cis_io;
 670         int index = lov_comp_entry(sub->sub_subio_index);
 671         int stripe = lov_comp_stripe(sub->sub_subio_index);
 672
 673         switch (io->ci_type) {
 674         case CIT_SETATTR: {
 675                 io->u.ci_setattr.sa_attr = parent->u.ci_setattr.sa_attr;
 676                 io->u.ci_setattr.sa_attr_flags =
 677                         parent->u.ci_setattr.sa_attr_flags;
 678                 io->u.ci_setattr.sa_avalid = parent->u.ci_setattr.sa_avalid;
 679                 io->u.ci_setattr.sa_xvalid = parent->u.ci_setattr.sa_xvalid;
 680                 io->u.ci_setattr.sa_falloc_mode =
 681                         parent->u.ci_setattr.sa_falloc_mode;
 682                 io->u.ci_setattr.sa_stripe_index = stripe;
 683                 io->u.ci_setattr.sa_parent_fid =
 684                                         parent->u.ci_setattr.sa_parent_fid;
 685                 /* For SETATTR(fallocate) pass the subtype to lower IO */
 686                 io->u.ci_setattr.sa_subtype = parent->u.ci_setattr.sa_subtype;
 687                 if (cl_io_is_trunc(io)) {
 688                         loff_t new_size = parent->u.ci_setattr.sa_attr.lvb_size;
 689
 690                         new_size = lov_size_to_stripe(lsm, index, new_size,
 691                                                       stripe);
 692                         io->u.ci_setattr.sa_attr.lvb_size = new_size;
 693                 } else if (cl_io_is_fallocate(io)) {
 694                         io->u.ci_setattr.sa_falloc_offset = start;
 695                         io->u.ci_setattr.sa_falloc_end = end;
 696                         io->u.ci_setattr.sa_attr.lvb_size =
 697                                 parent->u.ci_setattr.sa_attr.lvb_size;
 698                 }
 699                 lov_lsm2layout(lsm, lsm->lsm_entries[index],
 700                                &io->u.ci_setattr.sa_layout);
 701                 break;
 702         }
 703         case CIT_DATA_VERSION: {
 704                 io->u.ci_data_version.dv_data_version = 0;
 705                 io->u.ci_data_version.dv_flags =
 706                         parent->u.ci_data_version.dv_flags;
 707                 break;
 708         }
 709         case CIT_FAULT: {
 710                 struct cl_object *obj = parent->ci_obj;
 711                 loff_t off = cl_offset(obj, parent->u.ci_fault.ft_index);
 712
 713                 io->u.ci_fault = parent->u.ci_fault;
 714                 off = lov_size_to_stripe(lsm, index, off, stripe);
 715                 io->u.ci_fault.ft_index = cl_index(obj, off);
 716                 break;
 717         }
 718         case CIT_FSYNC: {
 719                 io->u.ci_fsync.fi_start = start;
 720                 io->u.ci_fsync.fi_end = end;
 721                 io->u.ci_fsync.fi_fid = parent->u.ci_fsync.fi_fid;
 722                 io->u.ci_fsync.fi_mode = parent->u.ci_fsync.fi_mode;
 723                 break;
 724         }
 725         case CIT_READ:
 726         case CIT_WRITE: {
 727                 io->u.ci_wr.wr_sync = cl_io_is_sync_write(parent);
 728                 io->ci_tried_all_mirrors = parent->ci_tried_all_mirrors;
 729                 if (cl_io_is_append(parent)) {
 730                         io->u.ci_wr.wr_append = 1;
 731                 } else {
 732                         io->u.ci_rw.crw_pos = start;
 733                         io->u.ci_rw.crw_count = end - start;
 734                 }
 735                 break;
 736         }
 737         case CIT_LADVISE: {
 738                 io->u.ci_ladvise.li_start = start;
 739                 io->u.ci_ladvise.li_end = end;
 740                 io->u.ci_ladvise.li_fid = parent->u.ci_ladvise.li_fid;
 741                 io->u.ci_ladvise.li_advice = parent->u.ci_ladvise.li_advice;
 742                 io->u.ci_ladvise.li_flags = parent->u.ci_ladvise.li_flags;
 743                 break;
 744         }
 745         case CIT_LSEEK: {
 746                 io->u.ci_lseek.ls_start = start;
 747                 io->u.ci_lseek.ls_whence = parent->u.ci_lseek.ls_whence;
 748                 io->u.ci_lseek.ls_result = parent->u.ci_lseek.ls_result;
 749                 break;
 750         }
 751         case CIT_GLIMPSE:
 752         case CIT_MISC:
 753         default:
 754                 break;
 755         }
 756 }
 757
 758 static loff_t lov_offset_mod(loff_t val, int delta)
 759 {
 760         if (val != OBD_OBJECT_EOF)
 761                 val += delta;
 762         return val;
 763 }
 764
 765 static int lov_io_iter_init(const struct lu_env *env,
 766                             const struct cl_io_slice *ios)
 767 {
 768         struct lov_io *lio = cl2lov_io(env, ios);
 769         struct lov_stripe_md *lsm = lio->lis_object->lo_lsm;
 770         struct lov_io_sub *sub;
 771         struct lu_extent ext;
 772         int index;
 773         int rc = 0;
 774
 775         ENTRY;
 776
 777         ext.e_start = lio->lis_pos;
 778         ext.e_end = lio->lis_endpos;
 779
 780         lov_foreach_io_layout(index, lio, &ext) {
 781                 struct lov_layout_entry *le = lov_entry(lio->lis_object, index);
 782                 struct lov_layout_raid0 *r0 = &le->lle_raid0;
 783                 u64 start;
 784                 u64 end;
 785                 int stripe;
 786
 787                 CDEBUG(D_VFSTRACE, "component[%d] flags %#x\n",
 788                        index, lsm->lsm_entries[index]->lsme_flags);
 789                 if (!lsm_entry_inited(lsm, index)) {
 790                         /*
 791                          * Read from uninitialized components should return
 792                          * zero filled pages.
 793                          */
 794                         continue;
 795                 }
 796
 797                 if (!le->lle_valid && !ios->cis_io->ci_designated_mirror) {
 798                         CERROR("I/O to invalid component: %d, mirror: %d\n",
 799                                index, lio->lis_mirror_index);
 800                         RETURN(-EIO);
 801                 }
 802
 803                 for (stripe = 0; stripe < r0->lo_nr; stripe++) {
 804                         if (!lov_stripe_intersects(lsm, index, stripe,
 805                                                    &ext, &start, &end))
 806                                 continue;
 807
 808                         if (unlikely(!r0->lo_sub[stripe])) {
 809                                 if (ios->cis_io->ci_type == CIT_READ ||
 810                                     ios->cis_io->ci_type == CIT_WRITE ||
 811                                     ios->cis_io->ci_type == CIT_FAULT)
 812                                         RETURN(-EIO);
 813
 814                                 continue;
 815                         }
 816
 817                         end = lov_offset_mod(end, 1);
 818                         sub = lov_sub_get(env, lio,
 819                                           lov_comp_index(index, stripe));
 820                         if (IS_ERR(sub)) {
 821                                 rc = PTR_ERR(sub);
 822                                 break;
 823                         }
 824
 825                         lov_io_sub_inherit(sub, lio, start, end);
 826                         rc = cl_io_iter_init(sub->sub_env, &sub->sub_io);
 827                         if (rc != 0)
 828                                 cl_io_iter_fini(sub->sub_env, &sub->sub_io);
 829                         if (rc != 0)
 830                                 break;
 831
 832                         CDEBUG(D_VFSTRACE, "shrink: %d [%llu, %llu)\n",
 833                                stripe, start, end);
 834
 835                         list_add_tail(&sub->sub_linkage, &lio->lis_active);
 836                 }
 837                 if (rc != 0)
 838                         break;
 839         }
 840         RETURN(rc);
 841 }
 842
 843 static int lov_io_rw_iter_init(const struct lu_env *env,
 844                                const struct cl_io_slice *ios)
 845 {
 846         struct lov_io *lio = cl2lov_io(env, ios);
 847         struct cl_io *io = ios->cis_io;
 848         struct lov_stripe_md_entry *lse;
 849         loff_t start = io->u.ci_rw.crw_pos;
 850         loff_t next;
 851         int index;
 852
 853         LASSERT(io->ci_type == CIT_READ || io->ci_type == CIT_WRITE);
 854         ENTRY;
 855
 856         if (cl_io_is_append(io))
 857                 RETURN(lov_io_iter_init(env, ios));
 858
 859         index = lov_io_layout_at(lio, io->u.ci_rw.crw_pos);
 860         if (index < 0) { /* non-existing layout component */
 861                 if (io->ci_type == CIT_READ) {
 862                         /*
 863                          * TODO: it needs to detect the next component and
 864                          * then set the next pos
 865                          */
 866                         io->ci_continue = 0;
 867
 868                         RETURN(lov_io_iter_init(env, ios));
 869                 }
 870
 871                 RETURN(-ENODATA);
 872         }
 873
 874         if (!lov_entry(lio->lis_object, index)->lle_valid &&
 875             !io->ci_designated_mirror)
 876                 RETURN(io->ci_type == CIT_READ ? -EAGAIN : -EIO);
 877
 878         lse = lov_lse(lio->lis_object, index);
 879
 880         next = MAX_LFS_FILESIZE;
 881         if (lse->lsme_stripe_count > 1) {
 882                 unsigned long ssize = lse->lsme_stripe_size;
 883
 884                 lov_do_div64(start, ssize);
 885                 next = (start + 1) * ssize;
 886                 if (next <= start * ssize)
 887                         next = MAX_LFS_FILESIZE;
 888         }
 889
 890         LASSERTF(io->u.ci_rw.crw_pos >= lse->lsme_extent.e_start,
 891                  "pos %lld, [%lld, %lld)\n", io->u.ci_rw.crw_pos,
 892                  lse->lsme_extent.e_start, lse->lsme_extent.e_end);
 893         next = min_t(__u64, next, lse->lsme_extent.e_end);
 894         next = min_t(loff_t, next, lio->lis_io_endpos);
 895
 896         io->ci_continue = next < lio->lis_io_endpos;
 897         io->u.ci_rw.crw_count = next - io->u.ci_rw.crw_pos;
 898         lio->lis_pos    = io->u.ci_rw.crw_pos;
 899         lio->lis_endpos = io->u.ci_rw.crw_pos + io->u.ci_rw.crw_count;
 900         CDEBUG(D_VFSTRACE,
 901                "stripe: %llu chunk: [%llu, %llu) %llu, %zd\n",
 902                (__u64)start, lio->lis_pos, lio->lis_endpos,
 903                (__u64)lio->lis_io_endpos, io->u.ci_rw.crw_count);
 904
 905         /*
 906          * XXX The following call should be optimized: we know, that
 907          * [lio->lis_pos, lio->lis_endpos) intersects with exactly one stripe.
 908          */
 909         RETURN(lov_io_iter_init(env, ios));
 910 }
 911
 912 static int lov_io_setattr_iter_init(const struct lu_env *env,
 913                                     const struct cl_io_slice *ios)
 914 {
 915         struct lov_io *lio = cl2lov_io(env, ios);
 916         struct cl_io *io = ios->cis_io;
 917         int index;
 918         ENTRY;
 919
 920         if (cl_io_is_trunc(io) && lio->lis_pos > 0) {
 921                 index = lov_io_layout_at(lio, lio->lis_pos - 1);
 922                 /* no entry found for such offset */
 923                 if (index < 0)
 924                         RETURN(io->ci_result = -ENODATA);
 925         }
 926
 927         RETURN(lov_io_iter_init(env, ios));
 928 }
 929
 930 static int lov_io_call(const struct lu_env *env, struct lov_io *lio,
 931                        int (*iofunc)(const struct lu_env *, struct cl_io *))
 932 {
 933         struct cl_io *parent = lio->lis_cl.cis_io;
 934         struct lov_io_sub *sub;
 935         int rc = 0;
 936
 937         ENTRY;
 938         list_for_each_entry(sub, &lio->lis_active, sub_linkage) {
 939                 rc = iofunc(sub->sub_env, &sub->sub_io);
 940                 if (rc)
 941                         break;
 942
 943                 if (parent->ci_result == 0)
 944                         parent->ci_result = sub->sub_io.ci_result;
 945         }
 946         RETURN(rc);
 947 }
 948
 949 static int lov_io_lock(const struct lu_env *env, const struct cl_io_slice *ios)
 950 {
 951         ENTRY;
 952         RETURN(lov_io_call(env, cl2lov_io(env, ios), cl_io_lock));
 953 }
 954
 955 static int lov_io_start(const struct lu_env *env, const struct cl_io_slice *ios)
 956 {
 957         ENTRY;
 958         RETURN(lov_io_call(env, cl2lov_io(env, ios), cl_io_start));
 959 }
 960
 961 static int lov_io_end_wrapper(const struct lu_env *env, struct cl_io *io)
 962 {
 963         ENTRY;
 964         /*
 965          * It's possible that lov_io_start() wasn't called against this
 966          * sub-io, either because previous sub-io failed, or upper layer
 967          * completed IO.
 968          */
 969         if (io->ci_state == CIS_IO_GOING)
 970                 cl_io_end(env, io);
 971         else
 972                 io->ci_state = CIS_IO_FINISHED;
 973         RETURN(0);
 974 }
 975
 976 static int lov_io_iter_fini_wrapper(const struct lu_env *env, struct cl_io *io)
 977 {
 978         cl_io_iter_fini(env, io);
 979         RETURN(0);
 980 }
 981
 982 static int lov_io_unlock_wrapper(const struct lu_env *env, struct cl_io *io)
 983 {
 984         cl_io_unlock(env, io);
 985         RETURN(0);
 986 }
 987
 988 static void lov_io_end(const struct lu_env *env, const struct cl_io_slice *ios)
 989 {
 990         int rc;
 991
 992         rc = lov_io_call(env, cl2lov_io(env, ios), lov_io_end_wrapper);
 993         LASSERT(rc == 0);
 994 }
 995
 996 static void
 997 lov_io_data_version_end(const struct lu_env *env, const struct cl_io_slice *ios)
 998 {
 999         struct lov_io *lio = cl2lov_io(env, ios);
1000         struct cl_io *parent = lio->lis_cl.cis_io;
1001         struct cl_data_version_io *pdv = &parent->u.ci_data_version;
1002         struct lov_io_sub *sub;
1003
1004         ENTRY;
1005         list_for_each_entry(sub, &lio->lis_active, sub_linkage) {
1006                 struct cl_data_version_io *sdv = &sub->sub_io.u.ci_data_version;
1007
1008                 lov_io_end_wrapper(sub->sub_env, &sub->sub_io);
1009
1010                 pdv->dv_data_version += sdv->dv_data_version;
1011                 if (pdv->dv_layout_version > sdv->dv_layout_version)
1012                         pdv->dv_layout_version = sdv->dv_layout_version;
1013
1014                 if (parent->ci_result == 0)
1015                         parent->ci_result = sub->sub_io.ci_result;
1016         }
1017
1018         EXIT;
1019 }
1020
1021 static void lov_io_iter_fini(const struct lu_env *env,
1022                              const struct cl_io_slice *ios)
1023 {
1024         struct lov_io *lio = cl2lov_io(env, ios);
1025         int rc;
1026
1027         ENTRY;
1028         rc = lov_io_call(env, lio, lov_io_iter_fini_wrapper);
1029         LASSERT(rc == 0);
1030         while (!list_empty(&lio->lis_active))
1031                 list_del_init(lio->lis_active.next);
1032         EXIT;
1033 }
1034
1035 static void lov_io_unlock(const struct lu_env *env,
1036                           const struct cl_io_slice *ios)
1037 {
1038         int rc;
1039
1040         ENTRY;
1041         rc = lov_io_call(env, cl2lov_io(env, ios), lov_io_unlock_wrapper);
1042         LASSERT(rc == 0);
1043         EXIT;
1044 }
1045
1046 static int lov_io_read_ahead(const struct lu_env *env,
1047                              const struct cl_io_slice *ios,
1048                              pgoff_t start, struct cl_read_ahead *ra)
1049 {
1050         struct lov_io           *lio = cl2lov_io(env, ios);
1051         struct lov_object       *loo = lio->lis_object;
1052         struct cl_object        *obj = lov2cl(loo);
1053         struct lov_layout_raid0 *r0;
1054         struct lov_io_sub       *sub;
1055         loff_t                   offset;
1056         loff_t                   suboff;
1057         pgoff_t                  ra_end;
1058         unsigned int             pps; /* pages per stripe */
1059         int                      stripe;
1060         int                      index;
1061         int                      rc;
1062         ENTRY;
1063
1064         offset = cl_offset(obj, start);
1065         index = lov_io_layout_at(lio, offset);
1066         if (index < 0 || !lsm_entry_inited(loo->lo_lsm, index))
1067                 RETURN(-ENODATA);
1068
1069         /* avoid readahead to expand to stale components */
1070         if (!lov_entry(loo, index)->lle_valid)
1071                 RETURN(-EIO);
1072
1073         stripe = lov_stripe_number(loo->lo_lsm, index, offset);
1074
1075         r0 = lov_r0(loo, index);
1076         if (unlikely(!r0->lo_sub[stripe]))
1077                 RETURN(-EIO);
1078
1079         sub = lov_sub_get(env, lio, lov_comp_index(index, stripe));
1080         if (IS_ERR(sub))
1081                 RETURN(PTR_ERR(sub));
1082
1083         lov_stripe_offset(loo->lo_lsm, index, offset, stripe, &suboff);
1084         rc = cl_io_read_ahead(sub->sub_env, &sub->sub_io,
1085                               cl_index(lovsub2cl(r0->lo_sub[stripe]), suboff),
1086                               ra);
1087
1088         CDEBUG(D_READA, DFID " cra_end = %lu, stripes = %d, rc = %d\n",
1089                PFID(lu_object_fid(lov2lu(loo))), ra->cra_end_idx,
1090                     r0->lo_nr, rc);
1091         if (rc != 0)
1092                 RETURN(rc);
1093
1094         /**
1095          * Adjust the stripe index by layout of comp. ra->cra_end is the
1096          * maximum page index covered by an underlying DLM lock.
1097          * This function converts cra_end from stripe level to file level, and
1098          * make sure it's not beyond stripe and component boundary.
1099          */
1100
1101         /* cra_end is stripe level, convert it into file level */
1102         ra_end = ra->cra_end_idx;
1103         if (ra_end != CL_PAGE_EOF)
1104                 ra->cra_end_idx = lov_stripe_pgoff(loo->lo_lsm, index,
1105                                                    ra_end, stripe);
1106
1107         /* boundary of current component */
1108         ra_end = cl_index(obj, (loff_t)lov_io_extent(lio, index)->e_end);
1109         if (ra_end != CL_PAGE_EOF && ra->cra_end_idx >= ra_end)
1110                 ra->cra_end_idx = ra_end - 1;
1111
1112         if (r0->lo_nr == 1) /* single stripe file */
1113                 RETURN(0);
1114
1115         pps = lov_lse(loo, index)->lsme_stripe_size >> PAGE_SHIFT;
1116
1117         CDEBUG(D_READA, DFID " max_index = %lu, pps = %u, index = %d, "
1118                "stripe_size = %u, stripe no = %u, start index = %lu\n",
1119                PFID(lu_object_fid(lov2lu(loo))), ra->cra_end_idx, pps, index,
1120                lov_lse(loo, index)->lsme_stripe_size, stripe, start);
1121
1122         /* never exceed the end of the stripe */
1123         ra->cra_end_idx = min_t(pgoff_t, ra->cra_end_idx,
1124                                 start + pps - start % pps - 1);
1125         RETURN(0);
1126 }
1127
1128 /**
1129  * lov implementation of cl_operations::cio_submit() method. It takes a list
1130  * of pages in \a queue, splits it into per-stripe sub-lists, invokes
1131  * cl_io_submit() on underlying devices to submit sub-lists, and then splices
1132  * everything back.
1133  *
1134  * Major complication of this function is a need to handle memory cleansing:
1135  * cl_io_submit() is called to write out pages as a part of VM memory
1136  * reclamation, and hence it may not fail due to memory shortages (system
1137  * dead-locks otherwise). To deal with this, some resources (sub-lists,
1138  * sub-environment, etc.) are allocated per-device on "startup" (i.e., in a
1139  * not-memory cleansing context), and in case of memory shortage, these
1140  * pre-allocated resources are used by lov_io_submit() under
1141  * lov_device::ld_mutex mutex.
1142  */
1143 static int lov_io_submit(const struct lu_env *env,
1144                          const struct cl_io_slice *ios,
1145                          enum cl_req_type crt, struct cl_2queue *queue)
1146 {
1147         struct cl_page_list     *qin = &queue->c2_qin;
1148         struct lov_io           *lio = cl2lov_io(env, ios);
1149         struct lov_io_sub       *sub;
1150         struct cl_page_list     *plist = &lov_env_info(env)->lti_plist;
1151         struct cl_page          *page;
1152         struct cl_page          *tmp;
1153         int index;
1154         int rc = 0;
1155         ENTRY;
1156
1157         cl_page_list_init(plist);
1158         while (qin->pl_nr > 0) {
1159                 struct cl_2queue  *cl2q = &lov_env_info(env)->lti_cl2q;
1160
1161                 page = cl_page_list_first(qin);
1162                 if (lov_page_is_empty(page)) {
1163                         cl_page_list_move(&queue->c2_qout, qin, page);
1164
1165                         /*
1166                          * it could only be mirror read to get here therefore
1167                          * the pages will be transient. We don't care about
1168                          * the return code of cl_page_prep() at all.
1169                          */
1170                         (void) cl_page_prep(env, ios->cis_io, page, crt);
1171                         cl_page_completion(env, page, crt, 0);
1172                         continue;
1173                 }
1174
1175                 cl_2queue_init(cl2q);
1176                 cl_page_list_move(&cl2q->c2_qin, qin, page);
1177
1178                 index = page->cp_lov_index;
1179                 cl_page_list_for_each_safe(page, tmp, qin) {
1180                         /* this page is not on this stripe */
1181                         if (index != page->cp_lov_index)
1182                                 continue;
1183
1184                         cl_page_list_move(&cl2q->c2_qin, qin, page);
1185                 }
1186
1187                 sub = lov_sub_get(env, lio, index);
1188                 if (!IS_ERR(sub)) {
1189                         rc = cl_io_submit_rw(sub->sub_env, &sub->sub_io,
1190                                              crt, cl2q);
1191                 } else {
1192                         rc = PTR_ERR(sub);
1193                 }
1194
1195                 cl_page_list_splice(&cl2q->c2_qin, plist);
1196                 cl_page_list_splice(&cl2q->c2_qout, &queue->c2_qout);
1197                 cl_2queue_fini(env, cl2q);
1198
1199                 if (rc != 0)
1200                         break;
1201         }
1202
1203         cl_page_list_splice(plist, qin);
1204         cl_page_list_fini(env, plist);
1205
1206         RETURN(rc);
1207 }
1208
1209 static int lov_io_commit_async(const struct lu_env *env,
1210                                const struct cl_io_slice *ios,
1211                                struct cl_page_list *queue, int from, int to,
1212                                cl_commit_cbt cb)
1213 {
1214         struct cl_page_list *plist = &lov_env_info(env)->lti_plist;
1215         struct lov_io *lio = cl2lov_io(env, ios);
1216         struct lov_io_sub *sub;
1217         struct cl_page *page;
1218         int rc = 0;
1219         ENTRY;
1220
1221         if (lio->lis_nr_subios == 1) {
1222                 int idx = lio->lis_single_subio_index;
1223
1224                 LASSERT(!lov_page_is_empty(cl_page_list_first(queue)));
1225
1226                 sub = lov_sub_get(env, lio, idx);
1227                 LASSERT(!IS_ERR(sub));
1228                 LASSERT(sub == &lio->lis_single_subio);
1229                 rc = cl_io_commit_async(sub->sub_env, &sub->sub_io, queue,
1230                                         from, to, cb);
1231                 RETURN(rc);
1232         }
1233
1234         cl_page_list_init(plist);
1235         while (queue->pl_nr > 0) {
1236                 int stripe_to = to;
1237                 int index;
1238
1239                 LASSERT(plist->pl_nr == 0);
1240                 page = cl_page_list_first(queue);
1241                 LASSERT(!lov_page_is_empty(page));
1242
1243                 cl_page_list_move(plist, queue, page);
1244
1245                 index = page->cp_lov_index;
1246                 while (queue->pl_nr > 0) {
1247                         page = cl_page_list_first(queue);
1248                         if (index != page->cp_lov_index)
1249                                 break;
1250
1251                         cl_page_list_move(plist, queue, page);
1252                 }
1253
1254                 if (queue->pl_nr > 0) /* still has more pages */
1255                         stripe_to = PAGE_SIZE;
1256
1257                 sub = lov_sub_get(env, lio, index);
1258                 if (!IS_ERR(sub)) {
1259                         rc = cl_io_commit_async(sub->sub_env, &sub->sub_io,
1260                                                 plist, from, stripe_to, cb);
1261                 } else {
1262                         rc = PTR_ERR(sub);
1263                         break;
1264                 }
1265
1266                 if (plist->pl_nr > 0) /* short write */
1267                         break;
1268
1269                 from = 0;
1270         }
1271
1272         /* for error case, add the page back into the qin list */
1273         LASSERT(ergo(rc == 0, plist->pl_nr == 0));
1274         while (plist->pl_nr > 0) {
1275                 /* error occurred, add the uncommitted pages back into queue */
1276                 page = cl_page_list_last(plist);
1277                 cl_page_list_move_head(queue, plist, page);
1278         }
1279
1280         RETURN(rc);
1281 }
1282
1283 static int lov_io_fault_start(const struct lu_env *env,
1284                               const struct cl_io_slice *ios)
1285 {
1286         struct cl_fault_io *fio;
1287         struct lov_io      *lio;
1288         struct lov_io_sub  *sub;
1289
1290         ENTRY;
1291
1292         fio = &ios->cis_io->u.ci_fault;
1293         lio = cl2lov_io(env, ios);
1294         sub = lov_sub_get(env, lio, fio->ft_page->cp_lov_index);
1295         sub->sub_io.u.ci_fault.ft_nob = fio->ft_nob;
1296
1297         RETURN(lov_io_start(env, ios));
1298 }
1299
1300 static void lov_io_fsync_end(const struct lu_env *env,
1301                              const struct cl_io_slice *ios)
1302 {
1303         struct lov_io *lio = cl2lov_io(env, ios);
1304         struct lov_io_sub *sub;
1305         unsigned int *written = &ios->cis_io->u.ci_fsync.fi_nr_written;
1306         ENTRY;
1307
1308         *written = 0;
1309         list_for_each_entry(sub, &lio->lis_active, sub_linkage) {
1310                 struct cl_io *subio = &sub->sub_io;
1311
1312                 lov_io_end_wrapper(sub->sub_env, subio);
1313
1314                 if (subio->ci_result == 0)
1315                         *written += subio->u.ci_fsync.fi_nr_written;
1316         }
1317         RETURN_EXIT;
1318 }
1319
1320 static void lov_io_lseek_end(const struct lu_env *env,
1321                              const struct cl_io_slice *ios)
1322 {
1323         struct lov_io *lio = cl2lov_io(env, ios);
1324         struct cl_io *io = lio->lis_cl.cis_io;
1325         struct lov_stripe_md *lsm = lio->lis_object->lo_lsm;
1326         struct lov_io_sub *sub;
1327         loff_t offset = -ENXIO;
1328         __u64 hole_off = 0;
1329         bool seek_hole = io->u.ci_lseek.ls_whence == SEEK_HOLE;
1330
1331         ENTRY;
1332
1333         list_for_each_entry(sub, &lio->lis_active, sub_linkage) {
1334                 struct cl_io *subio = &sub->sub_io;
1335                 int index = lov_comp_entry(sub->sub_subio_index);
1336                 int stripe = lov_comp_stripe(sub->sub_subio_index);
1337                 loff_t sub_off, lov_off;
1338                 __u64 comp_end = lsm->lsm_entries[index]->lsme_extent.e_end;
1339
1340                 lov_io_end_wrapper(sub->sub_env, subio);
1341
1342                 if (io->ci_result == 0)
1343                         io->ci_result = sub->sub_io.ci_result;
1344
1345                 if (io->ci_result)
1346                         continue;
1347
1348                 CDEBUG(D_INFO, DFID": entry %x stripe %u: SEEK_%s from %lld\n",
1349                        PFID(lu_object_fid(lov2lu(lio->lis_object))),
1350                        index, stripe, seek_hole ? "HOLE" : "DATA",
1351                        subio->u.ci_lseek.ls_start);
1352
1353                 /* first subio with positive result is what we need */
1354                 sub_off = subio->u.ci_lseek.ls_result;
1355                 /* Expected error, offset is out of stripe file size */
1356                 if (sub_off == -ENXIO)
1357                         continue;
1358                 /* Any other errors are not expected with ci_result == 0 */
1359                 if (sub_off < 0) {
1360                         CDEBUG(D_INFO, "unexpected error: rc = %lld\n",
1361                                sub_off);
1362                         io->ci_result = sub_off;
1363                         continue;
1364                 }
1365                 lov_off = lov_stripe_size(lsm, index, sub_off + 1, stripe) - 1;
1366                 if (lov_off < 0) {
1367                         /* the only way to get negatove lov_off here is too big
1368                          * result. Return -EOVERFLOW then.
1369                          */
1370                         io->ci_result = -EOVERFLOW;
1371                         CDEBUG(D_INFO, "offset %llu is too big: rc = %d\n",
1372                                (u64)lov_off, io->ci_result);
1373                         continue;
1374                 }
1375                 if (lov_off < io->u.ci_lseek.ls_start) {
1376                         io->ci_result = -EINVAL;
1377                         CDEBUG(D_INFO, "offset %lld < start %lld: rc = %d\n",
1378                                sub_off, io->u.ci_lseek.ls_start, io->ci_result);
1379                         continue;
1380                 }
1381                 /* resulting offset can be out of component range if stripe
1382                  * object is full and its file size was returned as virtual
1383                  * hole start. Skip this result, the next component will give
1384                  * us correct lseek result but keep possible hole offset in
1385                  * case there is no more components ahead
1386                  */
1387                 if (lov_off >= comp_end) {
1388                         /* must be SEEK_HOLE case */
1389                         if (likely(seek_hole)) {
1390                                 /* save comp end as potential hole offset */
1391                                 hole_off = max_t(__u64, comp_end, hole_off);
1392                         } else {
1393                                 io->ci_result = -EINVAL;
1394                                 CDEBUG(D_INFO,
1395                                        "off %lld >= comp_end %llu: rc = %d\n",
1396                                        lov_off, comp_end, io->ci_result);
1397                         }
1398                         continue;
1399                 }
1400
1401                 CDEBUG(D_INFO, "SEEK_%s: %lld->%lld/%lld: rc = %d\n",
1402                        seek_hole ? "HOLE" : "DATA",
1403                        subio->u.ci_lseek.ls_start, sub_off, lov_off,
1404                        sub->sub_io.ci_result);
1405                 offset = min_t(__u64, offset, lov_off);
1406         }
1407         /* no result but some component returns hole as component end */
1408         if (seek_hole && offset == -ENXIO && hole_off > 0)
1409                 offset = hole_off;
1410
1411         io->u.ci_lseek.ls_result = offset;
1412         RETURN_EXIT;
1413 }
1414
1415 static const struct cl_io_operations lov_io_ops = {
1416         .op = {
1417                 [CIT_READ] = {
1418                         .cio_fini      = lov_io_fini,
1419                         .cio_iter_init = lov_io_rw_iter_init,
1420                         .cio_iter_fini = lov_io_iter_fini,
1421                         .cio_lock      = lov_io_lock,
1422                         .cio_unlock    = lov_io_unlock,
1423                         .cio_start     = lov_io_start,
1424                         .cio_end       = lov_io_end
1425                 },
1426                 [CIT_WRITE] = {
1427                         .cio_fini      = lov_io_fini,
1428                         .cio_iter_init = lov_io_rw_iter_init,
1429                         .cio_iter_fini = lov_io_iter_fini,
1430                         .cio_lock      = lov_io_lock,
1431                         .cio_unlock    = lov_io_unlock,
1432                         .cio_start     = lov_io_start,
1433                         .cio_end       = lov_io_end
1434                 },
1435                 [CIT_SETATTR] = {
1436                         .cio_fini      = lov_io_fini,
1437                         .cio_iter_init = lov_io_setattr_iter_init,
1438                         .cio_iter_fini = lov_io_iter_fini,
1439                         .cio_lock      = lov_io_lock,
1440                         .cio_unlock    = lov_io_unlock,
1441                         .cio_start     = lov_io_start,
1442                         .cio_end       = lov_io_end
1443                 },
1444                 [CIT_DATA_VERSION] = {
1445                         .cio_fini       = lov_io_fini,
1446                         .cio_iter_init  = lov_io_iter_init,
1447                         .cio_iter_fini  = lov_io_iter_fini,
1448                         .cio_lock       = lov_io_lock,
1449                         .cio_unlock     = lov_io_unlock,
1450                         .cio_start      = lov_io_start,
1451                         .cio_end        = lov_io_data_version_end,
1452                 },
1453                 [CIT_FAULT] = {
1454                         .cio_fini      = lov_io_fini,
1455                         .cio_iter_init = lov_io_iter_init,
1456                         .cio_iter_fini = lov_io_iter_fini,
1457                         .cio_lock      = lov_io_lock,
1458                         .cio_unlock    = lov_io_unlock,
1459                         .cio_start     = lov_io_fault_start,
1460                         .cio_end       = lov_io_end
1461                 },
1462                 [CIT_FSYNC] = {
1463                         .cio_fini      = lov_io_fini,
1464                         .cio_iter_init = lov_io_iter_init,
1465                         .cio_iter_fini = lov_io_iter_fini,
1466                         .cio_lock      = lov_io_lock,
1467                         .cio_unlock    = lov_io_unlock,
1468                         .cio_start     = lov_io_start,
1469                         .cio_end       = lov_io_fsync_end
1470                 },
1471                 [CIT_LADVISE] = {
1472                         .cio_fini      = lov_io_fini,
1473                         .cio_iter_init = lov_io_iter_init,
1474                         .cio_iter_fini = lov_io_iter_fini,
1475                         .cio_lock      = lov_io_lock,
1476                         .cio_unlock    = lov_io_unlock,
1477                         .cio_start     = lov_io_start,
1478                         .cio_end       = lov_io_end
1479                 },
1480                 [CIT_LSEEK] = {
1481                         .cio_fini      = lov_io_fini,
1482                         .cio_iter_init = lov_io_iter_init,
1483                         .cio_iter_fini = lov_io_iter_fini,
1484                         .cio_lock      = lov_io_lock,
1485                         .cio_unlock    = lov_io_unlock,
1486                         .cio_start     = lov_io_start,
1487                         .cio_end       = lov_io_lseek_end
1488                 },
1489                 [CIT_GLIMPSE] = {
1490                         .cio_fini      = lov_io_fini,
1491                 },
1492                 [CIT_MISC] = {
1493                         .cio_fini      = lov_io_fini
1494                 }
1495         },
1496         .cio_read_ahead                = lov_io_read_ahead,
1497         .cio_submit                    = lov_io_submit,
1498         .cio_commit_async              = lov_io_commit_async,
1499 };
1500
1501 /*****************************************************************************
1502  *
1503  * Empty lov io operations.
1504  *
1505  */
1506
1507 static void lov_empty_io_fini(const struct lu_env *env,
1508                               const struct cl_io_slice *ios)
1509 {
1510         struct lov_object *lov = cl2lov(ios->cis_obj);
1511         ENTRY;
1512
1513         if (atomic_dec_and_test(&lov->lo_active_ios))
1514                 wake_up_all(&lov->lo_waitq);
1515         EXIT;
1516 }
1517
1518 static int lov_empty_io_submit(const struct lu_env *env,
1519                                const struct cl_io_slice *ios,
1520                                enum cl_req_type crt, struct cl_2queue *queue)
1521 {
1522         return -EBADF;
1523 }
1524
1525 static void lov_empty_impossible(const struct lu_env *env,
1526                                  struct cl_io_slice *ios)
1527 {
1528         LBUG();
1529 }
1530
1531 #define LOV_EMPTY_IMPOSSIBLE ((void *)lov_empty_impossible)
1532
1533 /**
1534  * An io operation vector for files without stripes.
1535  */
1536 static const struct cl_io_operations lov_empty_io_ops = {
1537         .op = {
1538                 [CIT_READ] = {
1539                         .cio_fini       = lov_empty_io_fini,
1540 #if 0
1541                         .cio_iter_init  = LOV_EMPTY_IMPOSSIBLE,
1542                         .cio_lock       = LOV_EMPTY_IMPOSSIBLE,
1543                         .cio_start      = LOV_EMPTY_IMPOSSIBLE,
1544                         .cio_end        = LOV_EMPTY_IMPOSSIBLE
1545 #endif
1546                 },
1547                 [CIT_WRITE] = {
1548                         .cio_fini      = lov_empty_io_fini,
1549                         .cio_iter_init = LOV_EMPTY_IMPOSSIBLE,
1550                         .cio_lock      = LOV_EMPTY_IMPOSSIBLE,
1551                         .cio_start     = LOV_EMPTY_IMPOSSIBLE,
1552                         .cio_end       = LOV_EMPTY_IMPOSSIBLE
1553                 },
1554                 [CIT_SETATTR] = {
1555                         .cio_fini      = lov_empty_io_fini,
1556                         .cio_iter_init = LOV_EMPTY_IMPOSSIBLE,
1557                         .cio_lock      = LOV_EMPTY_IMPOSSIBLE,
1558                         .cio_start     = LOV_EMPTY_IMPOSSIBLE,
1559                         .cio_end       = LOV_EMPTY_IMPOSSIBLE
1560                 },
1561                 [CIT_FAULT] = {
1562                         .cio_fini      = lov_empty_io_fini,
1563                         .cio_iter_init = LOV_EMPTY_IMPOSSIBLE,
1564                         .cio_lock      = LOV_EMPTY_IMPOSSIBLE,
1565                         .cio_start     = LOV_EMPTY_IMPOSSIBLE,
1566                         .cio_end       = LOV_EMPTY_IMPOSSIBLE
1567                 },
1568                 [CIT_FSYNC] = {
1569                         .cio_fini      = lov_empty_io_fini
1570                 },
1571                 [CIT_LADVISE] = {
1572                         .cio_fini   = lov_empty_io_fini
1573                 },
1574                 [CIT_GLIMPSE] = {
1575                         .cio_fini      = lov_empty_io_fini
1576                 },
1577                 [CIT_MISC] = {
1578                         .cio_fini      = lov_empty_io_fini
1579                 }
1580         },
1581         .cio_submit                    = lov_empty_io_submit,
1582         .cio_commit_async              = LOV_EMPTY_IMPOSSIBLE
1583 };
1584
1585 int lov_io_init_composite(const struct lu_env *env, struct cl_object *obj,
1586                           struct cl_io *io)
1587 {
1588         struct lov_io *lio = lov_env_io(env);
1589         struct lov_object *lov = cl2lov(obj);
1590         int result;
1591
1592         ENTRY;
1593
1594         INIT_LIST_HEAD(&lio->lis_active);
1595         result = lov_io_slice_init(lio, lov, io);
1596         if (result)
1597                 GOTO(out, result);
1598
1599         result = lov_io_subio_init(env, lio, io);
1600         if (!result) {
1601                 cl_io_slice_add(io, &lio->lis_cl, obj, &lov_io_ops);
1602                 atomic_inc(&lov->lo_active_ios);
1603         }
1604         EXIT;
1605 out:
1606         io->ci_result = result < 0 ? result : 0;
1607         return result;
1608 }
1609
1610 int lov_io_init_empty(const struct lu_env *env, struct cl_object *obj,
1611                       struct cl_io *io)
1612 {
1613         struct lov_object *lov = cl2lov(obj);
1614         struct lov_io *lio = lov_env_io(env);
1615         int result;
1616         ENTRY;
1617
1618         lio->lis_object = lov;
1619         switch (io->ci_type) {
1620         default:
1621                 LBUG();
1622         case CIT_MISC:
1623         case CIT_GLIMPSE:
1624         case CIT_READ:
1625                 result = 0;
1626                 break;
1627         case CIT_FSYNC:
1628         case CIT_LADVISE:
1629         case CIT_LSEEK:
1630         case CIT_SETATTR:
1631         case CIT_DATA_VERSION:
1632                 result = +1;
1633                 break;
1634         case CIT_WRITE:
1635                 result = -EBADF;
1636                 break;
1637         case CIT_FAULT:
1638                 result = -EFAULT;
1639                 CERROR("Page fault on a file without stripes: "DFID"\n",
1640                        PFID(lu_object_fid(&obj->co_lu)));
1641                 break;
1642         }
1643         if (result == 0) {
1644                 cl_io_slice_add(io, &lio->lis_cl, obj, &lov_empty_io_ops);
1645                 atomic_inc(&lov->lo_active_ios);
1646         }
1647
1648         io->ci_result = result < 0 ? result : 0;
1649         RETURN(result);
1650 }
1651
1652 int lov_io_init_released(const struct lu_env *env, struct cl_object *obj,
1653                         struct cl_io *io)
1654 {
1655         struct lov_object *lov = cl2lov(obj);
1656         struct lov_io *lio = lov_env_io(env);
1657         int result;
1658         ENTRY;
1659
1660         LASSERT(lov->lo_lsm != NULL);
1661         lio->lis_object = lov;
1662
1663         switch (io->ci_type) {
1664         default:
1665                 LASSERTF(0, "invalid type %d\n", io->ci_type);
1666                 result = -EOPNOTSUPP;
1667                 break;
1668         case CIT_GLIMPSE:
1669         case CIT_MISC:
1670         case CIT_FSYNC:
1671         case CIT_LADVISE:
1672         case CIT_DATA_VERSION:
1673                 result = 1;
1674                 break;
1675         case CIT_SETATTR:
1676                 /*
1677                  * the truncate to 0 is managed by MDT:
1678                  * - in open, for open O_TRUNC
1679                  * - in setattr, for truncate
1680                  */
1681                 /*
1682                  * the truncate is for size > 0 so triggers a restore,
1683                  * also trigger a restore for prealloc/punch
1684                  */
1685                 if (cl_io_is_trunc(io) || cl_io_is_fallocate(io)) {
1686                         io->ci_restore_needed = 1;
1687                         result = -ENODATA;
1688                 } else
1689                         result = 1;
1690                 break;
1691         case CIT_READ:
1692         case CIT_WRITE:
1693         case CIT_FAULT:
1694         case CIT_LSEEK:
1695                 io->ci_restore_needed = 1;
1696                 result = -ENODATA;
1697                 break;
1698         }
1699
1700         if (result == 0) {
1701                 cl_io_slice_add(io, &lio->lis_cl, obj, &lov_empty_io_ops);
1702                 atomic_inc(&lov->lo_active_ios);
1703         }
1704
1705         io->ci_result = result < 0 ? result : 0;
1706         RETURN(result);
1707 }
1708
1709 /**
1710  * Return the index in composite:lo_entries by the file offset
1711  */
1712 int lov_io_layout_at(struct lov_io *lio, __u64 offset)
1713 {
1714         struct lov_object *lov = lio->lis_object;
1715         struct lov_layout_composite *comp = &lov->u.composite;
1716         int start_index = 0;
1717         int end_index = comp->lo_entry_count - 1;
1718         int i;
1719
1720         LASSERT(lov->lo_type == LLT_COMP);
1721
1722         /* This is actual file offset so nothing can cover eof. */
1723         if (offset == LUSTRE_EOF)
1724                 return -1;
1725
1726         if (lov_is_flr(lov)) {
1727                 struct lov_mirror_entry *lre;
1728
1729                 LASSERT(lio->lis_mirror_index >= 0);
1730
1731                 lre = &comp->lo_mirrors[lio->lis_mirror_index];
1732                 start_index = lre->lre_start;
1733                 end_index = lre->lre_end;
1734         }
1735
1736         for (i = start_index; i <= end_index; i++) {
1737                 struct lov_layout_entry *lle = lov_entry(lov, i);
1738
1739                 if ((offset >= lle->lle_extent->e_start &&
1740                      offset < lle->lle_extent->e_end) ||
1741                     (offset == OBD_OBJECT_EOF &&
1742                      lle->lle_extent->e_end == OBD_OBJECT_EOF))
1743                         return i;
1744         }
1745
1746         return -1;
1747 }
1748
1749 /** @} lov */