git.sesse.net Git - bcachefs-tools-debian/blob - libbcachefs/btree_io.c

   1 // SPDX-License-Identifier: GPL-2.0
   2
   3 #include "bcachefs.h"
   4 #include "bkey_methods.h"
   5 #include "bkey_sort.h"
   6 #include "btree_cache.h"
   7 #include "btree_io.h"
   8 #include "btree_iter.h"
   9 #include "btree_locking.h"
  10 #include "btree_update.h"
  11 #include "btree_update_interior.h"
  12 #include "buckets.h"
  13 #include "checksum.h"
  14 #include "debug.h"
  15 #include "error.h"
  16 #include "extents.h"
  17 #include "io.h"
  18 #include "journal_reclaim.h"
  19 #include "journal_seq_blacklist.h"
  20 #include "super-io.h"
  21
  22 #include <linux/sched/mm.h>
  23 #include <trace/events/bcachefs.h>
  24
  25 static void verify_no_dups(struct btree *b,
  26                            struct bkey_packed *start,
  27                            struct bkey_packed *end,
  28                            bool extents)
  29 {
  30 #ifdef CONFIG_BCACHEFS_DEBUG
  31         struct bkey_packed *k, *p;
  32
  33         if (start == end)
  34                 return;
  35
  36         for (p = start, k = bkey_next_skip_noops(start, end);
  37              k != end;
  38              p = k, k = bkey_next_skip_noops(k, end)) {
  39                 struct bkey l = bkey_unpack_key(b, p);
  40                 struct bkey r = bkey_unpack_key(b, k);
  41
  42                 BUG_ON(extents
  43                        ? bkey_cmp(l.p, bkey_start_pos(&r)) > 0
  44                        : bkey_cmp(l.p, bkey_start_pos(&r)) >= 0);
  45                 //BUG_ON(bch2_bkey_cmp_packed(&b->format, p, k) >= 0);
  46         }
  47 #endif
  48 }
  49
  50 static void set_needs_whiteout(struct bset *i, int v)
  51 {
  52         struct bkey_packed *k;
  53
  54         for (k = i->start;
  55              k != vstruct_last(i);
  56              k = bkey_next_skip_noops(k, vstruct_last(i)))
  57                 k->needs_whiteout = v;
  58 }
  59
  60 static void btree_bounce_free(struct bch_fs *c, size_t size,
  61                               bool used_mempool, void *p)
  62 {
  63         if (used_mempool)
  64                 mempool_free(p, &c->btree_bounce_pool);
  65         else
  66                 vpfree(p, size);
  67 }
  68
  69 static void *btree_bounce_alloc(struct bch_fs *c, size_t size,
  70                                 bool *used_mempool)
  71 {
  72         unsigned flags = memalloc_nofs_save();
  73         void *p;
  74
  75         BUG_ON(size > btree_bytes(c));
  76
  77         *used_mempool = false;
  78         p = vpmalloc(size, __GFP_NOWARN|GFP_NOWAIT);
  79         if (!p) {
  80                 *used_mempool = true;
  81                 p = mempool_alloc(&c->btree_bounce_pool, GFP_NOIO);
  82         }
  83         memalloc_nofs_restore(flags);
  84         return p;
  85 }
  86
  87 static void sort_bkey_ptrs(const struct btree *bt,
  88                            struct bkey_packed **ptrs, unsigned nr)
  89 {
  90         unsigned n = nr, a = nr / 2, b, c, d;
  91
  92         if (!a)
  93                 return;
  94
  95         /* Heap sort: see lib/sort.c: */
  96         while (1) {
  97                 if (a)
  98                         a--;
  99                 else if (--n)
 100                         swap(ptrs[0], ptrs[n]);
 101                 else
 102                         break;
 103
 104                 for (b = a; c = 2 * b + 1, (d = c + 1) < n;)
 105                         b = bch2_bkey_cmp_packed(bt,
 106                                             ptrs[c],
 107                                             ptrs[d]) >= 0 ? c : d;
 108                 if (d == n)
 109                         b = c;
 110
 111                 while (b != a &&
 112                        bch2_bkey_cmp_packed(bt,
 113                                        ptrs[a],
 114                                        ptrs[b]) >= 0)
 115                         b = (b - 1) / 2;
 116                 c = b;
 117                 while (b != a) {
 118                         b = (b - 1) / 2;
 119                         swap(ptrs[b], ptrs[c]);
 120                 }
 121         }
 122 }
 123
 124 static void bch2_sort_whiteouts(struct bch_fs *c, struct btree *b)
 125 {
 126         struct bkey_packed *new_whiteouts, **ptrs, **ptrs_end, *k;
 127         bool used_mempool = false;
 128         size_t bytes = b->whiteout_u64s * sizeof(u64);
 129
 130         if (!b->whiteout_u64s)
 131                 return;
 132
 133         new_whiteouts = btree_bounce_alloc(c, bytes, &used_mempool);
 134
 135         ptrs = ptrs_end = ((void *) new_whiteouts + bytes);
 136
 137         for (k = unwritten_whiteouts_start(c, b);
 138              k != unwritten_whiteouts_end(c, b);
 139              k = bkey_next(k))
 140                 *--ptrs = k;
 141
 142         sort_bkey_ptrs(b, ptrs, ptrs_end - ptrs);
 143
 144         k = new_whiteouts;
 145
 146         while (ptrs != ptrs_end) {
 147                 bkey_copy(k, *ptrs);
 148                 k = bkey_next(k);
 149                 ptrs++;
 150         }
 151
 152         verify_no_dups(b, new_whiteouts,
 153                        (void *) ((u64 *) new_whiteouts + b->whiteout_u64s),
 154                        btree_node_old_extent_overwrite(b));
 155
 156         memcpy_u64s(unwritten_whiteouts_start(c, b),
 157                     new_whiteouts, b->whiteout_u64s);
 158
 159         btree_bounce_free(c, bytes, used_mempool, new_whiteouts);
 160 }
 161
 162 static bool should_compact_bset(struct btree *b, struct bset_tree *t,
 163                                 bool compacting, enum compact_mode mode)
 164 {
 165         if (!bset_dead_u64s(b, t))
 166                 return false;
 167
 168         switch (mode) {
 169         case COMPACT_LAZY:
 170                 return should_compact_bset_lazy(b, t) ||
 171                         (compacting && !bset_written(b, bset(b, t)));
 172         case COMPACT_ALL:
 173                 return true;
 174         default:
 175                 BUG();
 176         }
 177 }
 178
 179 static bool bch2_compact_extent_whiteouts(struct bch_fs *c,
 180                                           struct btree *b,
 181                                           enum compact_mode mode)
 182 {
 183         const struct bkey_format *f = &b->format;
 184         struct bset_tree *t;
 185         struct bkey_packed *whiteouts = NULL;
 186         struct bkey_packed *u_start, *u_pos;
 187         struct sort_iter sort_iter;
 188         unsigned bytes, whiteout_u64s = 0, u64s;
 189         bool used_mempool, compacting = false;
 190
 191         BUG_ON(!btree_node_is_extents(b));
 192
 193         for_each_bset(b, t)
 194                 if (should_compact_bset(b, t, whiteout_u64s != 0, mode))
 195                         whiteout_u64s += bset_dead_u64s(b, t);
 196
 197         if (!whiteout_u64s)
 198                 return false;
 199
 200         bch2_sort_whiteouts(c, b);
 201
 202         sort_iter_init(&sort_iter, b);
 203
 204         whiteout_u64s += b->whiteout_u64s;
 205         bytes = whiteout_u64s * sizeof(u64);
 206
 207         whiteouts = btree_bounce_alloc(c, bytes, &used_mempool);
 208         u_start = u_pos = whiteouts;
 209
 210         memcpy_u64s(u_pos, unwritten_whiteouts_start(c, b),
 211                     b->whiteout_u64s);
 212         u_pos = (void *) u_pos + b->whiteout_u64s * sizeof(u64);
 213
 214         sort_iter_add(&sort_iter, u_start, u_pos);
 215
 216         for_each_bset(b, t) {
 217                 struct bset *i = bset(b, t);
 218                 struct bkey_packed *k, *n, *out, *start, *end;
 219                 struct btree_node_entry *src = NULL, *dst = NULL;
 220
 221                 if (t != b->set && !bset_written(b, i)) {
 222                         src = container_of(i, struct btree_node_entry, keys);
 223                         dst = max(write_block(b),
 224                                   (void *) btree_bkey_last(b, t - 1));
 225                 }
 226
 227                 if (src != dst)
 228                         compacting = true;
 229
 230                 if (!should_compact_bset(b, t, compacting, mode)) {
 231                         if (src != dst) {
 232                                 memmove(dst, src, sizeof(*src) +
 233                                         le16_to_cpu(src->keys.u64s) *
 234                                         sizeof(u64));
 235                                 i = &dst->keys;
 236                                 set_btree_bset(b, t, i);
 237                         }
 238                         continue;
 239                 }
 240
 241                 compacting = true;
 242                 u_start = u_pos;
 243                 start = i->start;
 244                 end = vstruct_last(i);
 245
 246                 if (src != dst) {
 247                         memmove(dst, src, sizeof(*src));
 248                         i = &dst->keys;
 249                         set_btree_bset(b, t, i);
 250                 }
 251
 252                 out = i->start;
 253
 254                 for (k = start; k != end; k = n) {
 255                         n = bkey_next_skip_noops(k, end);
 256
 257                         if (bkey_deleted(k))
 258                                 continue;
 259
 260                         BUG_ON(bkey_whiteout(k) &&
 261                                k->needs_whiteout &&
 262                                bkey_written(b, k));
 263
 264                         if (bkey_whiteout(k) && !k->needs_whiteout)
 265                                 continue;
 266
 267                         if (bkey_whiteout(k)) {
 268                                 memcpy_u64s(u_pos, k, bkeyp_key_u64s(f, k));
 269                                 set_bkeyp_val_u64s(f, u_pos, 0);
 270                                 u_pos = bkey_next(u_pos);
 271                         } else {
 272                                 bkey_copy(out, k);
 273                                 out = bkey_next(out);
 274                         }
 275                 }
 276
 277                 sort_iter_add(&sort_iter, u_start, u_pos);
 278
 279                 i->u64s = cpu_to_le16((u64 *) out - i->_data);
 280                 set_btree_bset_end(b, t);
 281                 bch2_bset_set_no_aux_tree(b, t);
 282         }
 283
 284         b->whiteout_u64s = (u64 *) u_pos - (u64 *) whiteouts;
 285
 286         BUG_ON((void *) unwritten_whiteouts_start(c, b) <
 287                (void *) btree_bkey_last(b, bset_tree_last(b)));
 288
 289         u64s = bch2_sort_extent_whiteouts(unwritten_whiteouts_start(c, b),
 290                                           &sort_iter);
 291
 292         BUG_ON(u64s > b->whiteout_u64s);
 293         BUG_ON(u_pos != whiteouts && !u64s);
 294
 295         if (u64s != b->whiteout_u64s) {
 296                 void *src = unwritten_whiteouts_start(c, b);
 297
 298                 b->whiteout_u64s = u64s;
 299                 memmove_u64s_up(unwritten_whiteouts_start(c, b), src, u64s);
 300         }
 301
 302         verify_no_dups(b,
 303                        unwritten_whiteouts_start(c, b),
 304                        unwritten_whiteouts_end(c, b),
 305                        true);
 306
 307         btree_bounce_free(c, bytes, used_mempool, whiteouts);
 308
 309         bch2_btree_build_aux_trees(b);
 310
 311         bch_btree_keys_u64s_remaining(c, b);
 312         bch2_verify_btree_nr_keys(b);
 313
 314         return true;
 315 }
 316
 317 static bool bch2_drop_whiteouts(struct btree *b, enum compact_mode mode)
 318 {
 319         struct bset_tree *t;
 320         bool ret = false;
 321
 322         for_each_bset(b, t) {
 323                 struct bset *i = bset(b, t);
 324                 struct bkey_packed *k, *n, *out, *start, *end;
 325                 struct btree_node_entry *src = NULL, *dst = NULL;
 326
 327                 if (t != b->set && !bset_written(b, i)) {
 328                         src = container_of(i, struct btree_node_entry, keys);
 329                         dst = max(write_block(b),
 330                                   (void *) btree_bkey_last(b, t - 1));
 331                 }
 332
 333                 if (src != dst)
 334                         ret = true;
 335
 336                 if (!should_compact_bset(b, t, ret, mode)) {
 337                         if (src != dst) {
 338                                 memmove(dst, src, sizeof(*src) +
 339                                         le16_to_cpu(src->keys.u64s) *
 340                                         sizeof(u64));
 341                                 i = &dst->keys;
 342                                 set_btree_bset(b, t, i);
 343                         }
 344                         continue;
 345                 }
 346
 347                 start   = btree_bkey_first(b, t);
 348                 end     = btree_bkey_last(b, t);
 349
 350                 if (src != dst) {
 351                         memmove(dst, src, sizeof(*src));
 352                         i = &dst->keys;
 353                         set_btree_bset(b, t, i);
 354                 }
 355
 356                 out = i->start;
 357
 358                 for (k = start; k != end; k = n) {
 359                         n = bkey_next_skip_noops(k, end);
 360
 361                         if (!bkey_whiteout(k)) {
 362                                 bkey_copy(out, k);
 363                                 out = bkey_next(out);
 364                         } else {
 365                                 BUG_ON(k->needs_whiteout);
 366                         }
 367                 }
 368
 369                 i->u64s = cpu_to_le16((u64 *) out - i->_data);
 370                 set_btree_bset_end(b, t);
 371                 bch2_bset_set_no_aux_tree(b, t);
 372                 ret = true;
 373         }
 374
 375         bch2_verify_btree_nr_keys(b);
 376
 377         bch2_btree_build_aux_trees(b);
 378
 379         return ret;
 380 }
 381
 382 bool bch2_compact_whiteouts(struct bch_fs *c, struct btree *b,
 383                             enum compact_mode mode)
 384 {
 385         return !btree_node_old_extent_overwrite(b)
 386                 ? bch2_drop_whiteouts(b, mode)
 387                 : bch2_compact_extent_whiteouts(c, b, mode);
 388 }
 389
 390 static void btree_node_sort(struct bch_fs *c, struct btree *b,
 391                             struct btree_iter *iter,
 392                             unsigned start_idx,
 393                             unsigned end_idx,
 394                             bool filter_whiteouts)
 395 {
 396         struct btree_node *out;
 397         struct sort_iter sort_iter;
 398         struct bset_tree *t;
 399         struct bset *start_bset = bset(b, &b->set[start_idx]);
 400         bool used_mempool = false;
 401         u64 start_time, seq = 0;
 402         unsigned i, u64s = 0, bytes, shift = end_idx - start_idx - 1;
 403         bool sorting_entire_node = start_idx == 0 &&
 404                 end_idx == b->nsets;
 405
 406         sort_iter_init(&sort_iter, b);
 407
 408         for (t = b->set + start_idx;
 409              t < b->set + end_idx;
 410              t++) {
 411                 u64s += le16_to_cpu(bset(b, t)->u64s);
 412                 sort_iter_add(&sort_iter,
 413                               btree_bkey_first(b, t),
 414                               btree_bkey_last(b, t));
 415         }
 416
 417         bytes = sorting_entire_node
 418                 ? btree_bytes(c)
 419                 : __vstruct_bytes(struct btree_node, u64s);
 420
 421         out = btree_bounce_alloc(c, bytes, &used_mempool);
 422
 423         start_time = local_clock();
 424
 425         if (btree_node_old_extent_overwrite(b))
 426                 filter_whiteouts = bset_written(b, start_bset);
 427
 428         u64s = (btree_node_old_extent_overwrite(b)
 429                 ? bch2_sort_extents
 430                 : bch2_sort_keys)(out->keys.start,
 431                                   &sort_iter,
 432                                   filter_whiteouts);
 433
 434         out->keys.u64s = cpu_to_le16(u64s);
 435
 436         BUG_ON(vstruct_end(&out->keys) > (void *) out + bytes);
 437
 438         if (sorting_entire_node)
 439                 bch2_time_stats_update(&c->times[BCH_TIME_btree_node_sort],
 440                                        start_time);
 441
 442         /* Make sure we preserve bset journal_seq: */
 443         for (t = b->set + start_idx; t < b->set + end_idx; t++)
 444                 seq = max(seq, le64_to_cpu(bset(b, t)->journal_seq));
 445         start_bset->journal_seq = cpu_to_le64(seq);
 446
 447         if (sorting_entire_node) {
 448                 unsigned u64s = le16_to_cpu(out->keys.u64s);
 449
 450                 BUG_ON(bytes != btree_bytes(c));
 451
 452                 /*
 453                  * Our temporary buffer is the same size as the btree node's
 454                  * buffer, we can just swap buffers instead of doing a big
 455                  * memcpy()
 456                  */
 457                 *out = *b->data;
 458                 out->keys.u64s = cpu_to_le16(u64s);
 459                 swap(out, b->data);
 460                 set_btree_bset(b, b->set, &b->data->keys);
 461         } else {
 462                 start_bset->u64s = out->keys.u64s;
 463                 memcpy_u64s(start_bset->start,
 464                             out->keys.start,
 465                             le16_to_cpu(out->keys.u64s));
 466         }
 467
 468         for (i = start_idx + 1; i < end_idx; i++)
 469                 b->nr.bset_u64s[start_idx] +=
 470                         b->nr.bset_u64s[i];
 471
 472         b->nsets -= shift;
 473
 474         for (i = start_idx + 1; i < b->nsets; i++) {
 475                 b->nr.bset_u64s[i]      = b->nr.bset_u64s[i + shift];
 476                 b->set[i]               = b->set[i + shift];
 477         }
 478
 479         for (i = b->nsets; i < MAX_BSETS; i++)
 480                 b->nr.bset_u64s[i] = 0;
 481
 482         set_btree_bset_end(b, &b->set[start_idx]);
 483         bch2_bset_set_no_aux_tree(b, &b->set[start_idx]);
 484
 485         btree_bounce_free(c, bytes, used_mempool, out);
 486
 487         bch2_verify_btree_nr_keys(b);
 488 }
 489
 490 void bch2_btree_sort_into(struct bch_fs *c,
 491                          struct btree *dst,
 492                          struct btree *src)
 493 {
 494         struct btree_nr_keys nr;
 495         struct btree_node_iter src_iter;
 496         u64 start_time = local_clock();
 497
 498         BUG_ON(dst->nsets != 1);
 499
 500         bch2_bset_set_no_aux_tree(dst, dst->set);
 501
 502         bch2_btree_node_iter_init_from_start(&src_iter, src);
 503
 504         if (btree_node_is_extents(src))
 505                 nr = bch2_sort_repack_merge(c, btree_bset_first(dst),
 506                                 src, &src_iter,
 507                                 &dst->format,
 508                                 true);
 509         else
 510                 nr = bch2_sort_repack(btree_bset_first(dst),
 511                                 src, &src_iter,
 512                                 &dst->format,
 513                                 true);
 514
 515         bch2_time_stats_update(&c->times[BCH_TIME_btree_node_sort],
 516                                start_time);
 517
 518         set_btree_bset_end(dst, dst->set);
 519
 520         dst->nr.live_u64s       += nr.live_u64s;
 521         dst->nr.bset_u64s[0]    += nr.bset_u64s[0];
 522         dst->nr.packed_keys     += nr.packed_keys;
 523         dst->nr.unpacked_keys   += nr.unpacked_keys;
 524
 525         bch2_verify_btree_nr_keys(dst);
 526 }
 527
 528 #define SORT_CRIT       (4096 / sizeof(u64))
 529
 530 /*
 531  * We're about to add another bset to the btree node, so if there's currently
 532  * too many bsets - sort some of them together:
 533  */
 534 static bool btree_node_compact(struct bch_fs *c, struct btree *b,
 535                                struct btree_iter *iter)
 536 {
 537         unsigned unwritten_idx;
 538         bool ret = false;
 539
 540         for (unwritten_idx = 0;
 541              unwritten_idx < b->nsets;
 542              unwritten_idx++)
 543                 if (!bset_written(b, bset(b, &b->set[unwritten_idx])))
 544                         break;
 545
 546         if (b->nsets - unwritten_idx > 1) {
 547                 btree_node_sort(c, b, iter, unwritten_idx,
 548                                 b->nsets, false);
 549                 ret = true;
 550         }
 551
 552         if (unwritten_idx > 1) {
 553                 btree_node_sort(c, b, iter, 0, unwritten_idx, false);
 554                 ret = true;
 555         }
 556
 557         return ret;
 558 }
 559
 560 void bch2_btree_build_aux_trees(struct btree *b)
 561 {
 562         struct bset_tree *t;
 563
 564         for_each_bset(b, t)
 565                 bch2_bset_build_aux_tree(b, t,
 566                                 !bset_written(b, bset(b, t)) &&
 567                                 t == bset_tree_last(b));
 568 }
 569
 570 /*
 571  * @bch_btree_init_next - initialize a new (unwritten) bset that can then be
 572  * inserted into
 573  *
 574  * Safe to call if there already is an unwritten bset - will only add a new bset
 575  * if @b doesn't already have one.
 576  *
 577  * Returns true if we sorted (i.e. invalidated iterators
 578  */
 579 void bch2_btree_init_next(struct bch_fs *c, struct btree *b,
 580                           struct btree_iter *iter)
 581 {
 582         struct btree_node_entry *bne;
 583         bool did_sort;
 584
 585         EBUG_ON(!(b->c.lock.state.seq & 1));
 586         EBUG_ON(iter && iter->l[b->c.level].b != b);
 587
 588         did_sort = btree_node_compact(c, b, iter);
 589
 590         bne = want_new_bset(c, b);
 591         if (bne)
 592                 bch2_bset_init_next(c, b, bne);
 593
 594         bch2_btree_build_aux_trees(b);
 595
 596         if (iter && did_sort)
 597                 bch2_btree_iter_reinit_node(iter, b);
 598 }
 599
 600 static void btree_pos_to_text(struct printbuf *out, struct bch_fs *c,
 601                           struct btree *b)
 602 {
 603         pr_buf(out, "%s level %u/%u\n  ",
 604                bch2_btree_ids[b->c.btree_id],
 605                b->c.level,
 606                c->btree_roots[b->c.btree_id].level);
 607         bch2_bkey_val_to_text(out, c, bkey_i_to_s_c(&b->key));
 608 }
 609
 610 static void btree_err_msg(struct printbuf *out, struct bch_fs *c,
 611                           struct bch_dev *ca,
 612                           struct btree *b, struct bset *i,
 613                           unsigned offset, int write)
 614 {
 615         pr_buf(out, "error validating btree node ");
 616         if (write)
 617                 pr_buf(out, "before write ");
 618         if (ca)
 619                 pr_buf(out, "on %s ", ca->name);
 620         pr_buf(out, "at btree ");
 621         btree_pos_to_text(out, c, b);
 622
 623         pr_buf(out, "\n  node offset %u", b->written);
 624         if (i)
 625                 pr_buf(out, " bset u64s %u", le16_to_cpu(i->u64s));
 626 }
 627
 628 enum btree_err_type {
 629         BTREE_ERR_FIXABLE,
 630         BTREE_ERR_WANT_RETRY,
 631         BTREE_ERR_MUST_RETRY,
 632         BTREE_ERR_FATAL,
 633 };
 634
 635 enum btree_validate_ret {
 636         BTREE_RETRY_READ = 64,
 637 };
 638
 639 #define btree_err(type, c, ca, b, i, msg, ...)                          \
 640 ({                                                                      \
 641         __label__ out;                                                  \
 642         char _buf[300];                                                 \
 643         char *buf2 = _buf;                                              \
 644         struct printbuf out = PBUF(_buf);                               \
 645                                                                         \
 646         buf2 = kmalloc(4096, GFP_ATOMIC);                               \
 647         if (buf2)                                                       \
 648                 out = _PBUF(buf2, 4986);                                \
 649                                                                         \
 650         btree_err_msg(&out, c, ca, b, i, b->written, write);            \
 651         pr_buf(&out, ": " msg, ##__VA_ARGS__);                          \
 652                                                                         \
 653         if (type == BTREE_ERR_FIXABLE &&                                \
 654             write == READ &&                                            \
 655             !test_bit(BCH_FS_INITIAL_GC_DONE, &c->flags)) {             \
 656                 mustfix_fsck_err(c, "%s", buf2);                        \
 657                 goto out;                                               \
 658         }                                                               \
 659                                                                         \
 660         switch (write) {                                                \
 661         case READ:                                                      \
 662                 bch_err(c, "%s", buf2);                                 \
 663                                                                         \
 664                 switch (type) {                                         \
 665                 case BTREE_ERR_FIXABLE:                                 \
 666                         ret = BCH_FSCK_ERRORS_NOT_FIXED;                \
 667                         goto fsck_err;                                  \
 668                 case BTREE_ERR_WANT_RETRY:                              \
 669                         if (have_retry) {                               \
 670                                 ret = BTREE_RETRY_READ;                 \
 671                                 goto fsck_err;                          \
 672                         }                                               \
 673                         break;                                          \
 674                 case BTREE_ERR_MUST_RETRY:                              \
 675                         ret = BTREE_RETRY_READ;                         \
 676                         goto fsck_err;                                  \
 677                 case BTREE_ERR_FATAL:                                   \
 678                         ret = BCH_FSCK_ERRORS_NOT_FIXED;                \
 679                         goto fsck_err;                                  \
 680                 }                                                       \
 681                 break;                                                  \
 682         case WRITE:                                                     \
 683                 bch_err(c, "corrupt metadata before write: %s", buf2);  \
 684                                                                         \
 685                 if (bch2_fs_inconsistent(c)) {                          \
 686                         ret = BCH_FSCK_ERRORS_NOT_FIXED;                \
 687                         goto fsck_err;                                  \
 688                 }                                                       \
 689                 break;                                                  \
 690         }                                                               \
 691 out:                                                                    \
 692         if (buf2 != _buf)                                               \
 693                 kfree(buf2);                                            \
 694         true;                                                           \
 695 })
 696
 697 #define btree_err_on(cond, ...) ((cond) ? btree_err(__VA_ARGS__) : false)
 698
 699 static int validate_bset(struct bch_fs *c, struct bch_dev *ca,
 700                          struct btree *b, struct bset *i,
 701                          unsigned sectors, int write, bool have_retry)
 702 {
 703         unsigned version = le16_to_cpu(i->version);
 704         const char *err;
 705         int ret = 0;
 706
 707         btree_err_on((version != BCH_BSET_VERSION_OLD &&
 708                       version < bcachefs_metadata_version_min) ||
 709                      version >= bcachefs_metadata_version_max,
 710                      BTREE_ERR_FATAL, c, ca, b, i,
 711                      "unsupported bset version");
 712
 713         if (btree_err_on(b->written + sectors > c->opts.btree_node_size,
 714                          BTREE_ERR_FIXABLE, c, ca, b, i,
 715                          "bset past end of btree node")) {
 716                 i->u64s = 0;
 717                 return 0;
 718         }
 719
 720         btree_err_on(b->written && !i->u64s,
 721                      BTREE_ERR_FIXABLE, c, ca, b, i,
 722                      "empty bset");
 723
 724         if (!b->written) {
 725                 struct btree_node *bn =
 726                         container_of(i, struct btree_node, keys);
 727                 /* These indicate that we read the wrong btree node: */
 728
 729                 if (b->key.k.type == KEY_TYPE_btree_ptr_v2) {
 730                         struct bch_btree_ptr_v2 *bp =
 731                                 &bkey_i_to_btree_ptr_v2(&b->key)->v;
 732
 733                         /* XXX endianness */
 734                         btree_err_on(bp->seq != bn->keys.seq,
 735                                      BTREE_ERR_MUST_RETRY, c, ca, b, NULL,
 736                                      "incorrect sequence number (wrong btree node)");
 737                 }
 738
 739                 btree_err_on(BTREE_NODE_ID(bn) != b->c.btree_id,
 740                              BTREE_ERR_MUST_RETRY, c, ca, b, i,
 741                              "incorrect btree id");
 742
 743                 btree_err_on(BTREE_NODE_LEVEL(bn) != b->c.level,
 744                              BTREE_ERR_MUST_RETRY, c, ca, b, i,
 745                              "incorrect level");
 746
 747                 if (BSET_BIG_ENDIAN(i) != CPU_BIG_ENDIAN) {
 748                         u64 *p = (u64 *) &bn->ptr;
 749
 750                         *p = swab64(*p);
 751                 }
 752
 753                 if (!write)
 754                         compat_btree_node(b->c.level, b->c.btree_id, version,
 755                                           BSET_BIG_ENDIAN(i), write, bn);
 756
 757                 if (b->key.k.type == KEY_TYPE_btree_ptr_v2) {
 758                         struct bch_btree_ptr_v2 *bp =
 759                                 &bkey_i_to_btree_ptr_v2(&b->key)->v;
 760
 761                         if (BTREE_PTR_RANGE_UPDATED(bp)) {
 762                                 b->data->min_key = bp->min_key;
 763                                 b->data->max_key = b->key.k.p;
 764                         }
 765
 766                         btree_err_on(bkey_cmp(b->data->min_key, bp->min_key),
 767                                      BTREE_ERR_MUST_RETRY, c, ca, b, NULL,
 768                                      "incorrect min_key: got %llu:%llu should be %llu:%llu",
 769                                      b->data->min_key.inode,
 770                                      b->data->min_key.offset,
 771                                      bp->min_key.inode,
 772                                      bp->min_key.offset);
 773                 }
 774
 775                 btree_err_on(bkey_cmp(bn->max_key, b->key.k.p),
 776                              BTREE_ERR_MUST_RETRY, c, ca, b, i,
 777                              "incorrect max key %llu:%llu",
 778                              bn->max_key.inode,
 779                              bn->max_key.offset);
 780
 781                 if (write)
 782                         compat_btree_node(b->c.level, b->c.btree_id, version,
 783                                           BSET_BIG_ENDIAN(i), write, bn);
 784
 785                 /* XXX: ideally we would be validating min_key too */
 786 #if 0
 787                 /*
 788                  * not correct anymore, due to btree node write error
 789                  * handling
 790                  *
 791                  * need to add bn->seq to btree keys and verify
 792                  * against that
 793                  */
 794                 btree_err_on(!extent_contains_ptr(bkey_i_to_s_c_extent(&b->key),
 795                                                   bn->ptr),
 796                              BTREE_ERR_FATAL, c, b, i,
 797                              "incorrect backpointer");
 798 #endif
 799                 err = bch2_bkey_format_validate(&bn->format);
 800                 btree_err_on(err,
 801                              BTREE_ERR_FATAL, c, ca, b, i,
 802                              "invalid bkey format: %s", err);
 803
 804                 compat_bformat(b->c.level, b->c.btree_id, version,
 805                                BSET_BIG_ENDIAN(i), write,
 806                                &bn->format);
 807         }
 808 fsck_err:
 809         return ret;
 810 }
 811
 812 static int validate_bset_keys(struct bch_fs *c, struct btree *b,
 813                          struct bset *i, unsigned *whiteout_u64s,
 814                          int write, bool have_retry)
 815 {
 816         unsigned version = le16_to_cpu(i->version);
 817         struct bkey_packed *k, *prev = NULL;
 818         bool seen_non_whiteout = false;
 819         int ret = 0;
 820
 821         if (!BSET_SEPARATE_WHITEOUTS(i)) {
 822                 seen_non_whiteout = true;
 823                 *whiteout_u64s = 0;
 824         }
 825
 826         for (k = i->start;
 827              k != vstruct_last(i);) {
 828                 struct bkey_s u;
 829                 struct bkey tmp;
 830                 const char *invalid;
 831
 832                 if (btree_err_on(bkey_next(k) > vstruct_last(i),
 833                                  BTREE_ERR_FIXABLE, c, NULL, b, i,
 834                                  "key extends past end of bset")) {
 835                         i->u64s = cpu_to_le16((u64 *) k - i->_data);
 836                         break;
 837                 }
 838
 839                 if (btree_err_on(k->format > KEY_FORMAT_CURRENT,
 840                                  BTREE_ERR_FIXABLE, c, NULL, b, i,
 841                                  "invalid bkey format %u", k->format)) {
 842                         i->u64s = cpu_to_le16(le16_to_cpu(i->u64s) - k->u64s);
 843                         memmove_u64s_down(k, bkey_next(k),
 844                                           (u64 *) vstruct_end(i) - (u64 *) k);
 845                         continue;
 846                 }
 847
 848                 /* XXX: validate k->u64s */
 849                 if (!write)
 850                         bch2_bkey_compat(b->c.level, b->c.btree_id, version,
 851                                     BSET_BIG_ENDIAN(i), write,
 852                                     &b->format, k);
 853
 854                 u = __bkey_disassemble(b, k, &tmp);
 855
 856                 invalid = __bch2_bkey_invalid(c, u.s_c, btree_node_type(b)) ?:
 857                         bch2_bkey_in_btree_node(b, u.s_c) ?:
 858                         (write ? bch2_bkey_val_invalid(c, u.s_c) : NULL);
 859                 if (invalid) {
 860                         char buf[160];
 861
 862                         bch2_bkey_val_to_text(&PBUF(buf), c, u.s_c);
 863                         btree_err(BTREE_ERR_FIXABLE, c, NULL, b, i,
 864                                   "invalid bkey: %s\n%s", invalid, buf);
 865
 866                         i->u64s = cpu_to_le16(le16_to_cpu(i->u64s) - k->u64s);
 867                         memmove_u64s_down(k, bkey_next(k),
 868                                           (u64 *) vstruct_end(i) - (u64 *) k);
 869                         continue;
 870                 }
 871
 872                 if (write)
 873                         bch2_bkey_compat(b->c.level, b->c.btree_id, version,
 874                                     BSET_BIG_ENDIAN(i), write,
 875                                     &b->format, k);
 876
 877                 /*
 878                  * with the separate whiteouts thing (used for extents), the
 879                  * second set of keys actually can have whiteouts too, so we
 880                  * can't solely go off bkey_whiteout()...
 881                  */
 882
 883                 if (!seen_non_whiteout &&
 884                     (!bkey_whiteout(k) ||
 885                      (prev && bkey_iter_cmp(b, prev, k) > 0))) {
 886                         *whiteout_u64s = k->_data - i->_data;
 887                         seen_non_whiteout = true;
 888                 } else if (prev && bkey_iter_cmp(b, prev, k) > 0) {
 889                         char buf1[80];
 890                         char buf2[80];
 891                         struct bkey up = bkey_unpack_key(b, prev);
 892
 893                         bch2_bkey_to_text(&PBUF(buf1), &up);
 894                         bch2_bkey_to_text(&PBUF(buf2), u.k);
 895
 896                         bch2_dump_bset(c, b, i, 0);
 897                         btree_err(BTREE_ERR_FATAL, c, NULL, b, i,
 898                                   "keys out of order: %s > %s",
 899                                   buf1, buf2);
 900                         /* XXX: repair this */
 901                 }
 902
 903                 prev = k;
 904                 k = bkey_next_skip_noops(k, vstruct_last(i));
 905         }
 906 fsck_err:
 907         return ret;
 908 }
 909
 910 int bch2_btree_node_read_done(struct bch_fs *c, struct bch_dev *ca,
 911                               struct btree *b, bool have_retry)
 912 {
 913         struct btree_node_entry *bne;
 914         struct sort_iter *iter;
 915         struct btree_node *sorted;
 916         struct bkey_packed *k;
 917         struct bch_extent_ptr *ptr;
 918         struct bset *i;
 919         bool used_mempool, blacklisted;
 920         unsigned u64s;
 921         int ret, retry_read = 0, write = READ;
 922
 923         iter = mempool_alloc(&c->fill_iter, GFP_NOIO);
 924         sort_iter_init(iter, b);
 925         iter->size = (btree_blocks(c) + 1) * 2;
 926
 927         if (bch2_meta_read_fault("btree"))
 928                 btree_err(BTREE_ERR_MUST_RETRY, c, ca, b, NULL,
 929                           "dynamic fault");
 930
 931         btree_err_on(le64_to_cpu(b->data->magic) != bset_magic(c),
 932                      BTREE_ERR_MUST_RETRY, c, ca, b, NULL,
 933                      "bad magic");
 934
 935         btree_err_on(!b->data->keys.seq,
 936                      BTREE_ERR_MUST_RETRY, c, ca, b, NULL,
 937                      "bad btree header");
 938
 939         if (b->key.k.type == KEY_TYPE_btree_ptr_v2) {
 940                 struct bch_btree_ptr_v2 *bp =
 941                         &bkey_i_to_btree_ptr_v2(&b->key)->v;
 942
 943                 btree_err_on(b->data->keys.seq != bp->seq,
 944                              BTREE_ERR_MUST_RETRY, c, ca, b, NULL,
 945                              "got wrong btree node (seq %llx want %llx)",
 946                              b->data->keys.seq, bp->seq);
 947         }
 948
 949         while (b->written < c->opts.btree_node_size) {
 950                 unsigned sectors, whiteout_u64s = 0;
 951                 struct nonce nonce;
 952                 struct bch_csum csum;
 953                 bool first = !b->written;
 954
 955                 if (!b->written) {
 956                         i = &b->data->keys;
 957
 958                         btree_err_on(!bch2_checksum_type_valid(c, BSET_CSUM_TYPE(i)),
 959                                      BTREE_ERR_WANT_RETRY, c, ca, b, i,
 960                                      "unknown checksum type %llu",
 961                                      BSET_CSUM_TYPE(i));
 962
 963                         nonce = btree_nonce(i, b->written << 9);
 964                         csum = csum_vstruct(c, BSET_CSUM_TYPE(i), nonce, b->data);
 965
 966                         btree_err_on(bch2_crc_cmp(csum, b->data->csum),
 967                                      BTREE_ERR_WANT_RETRY, c, ca, b, i,
 968                                      "invalid checksum");
 969
 970                         bset_encrypt(c, i, b->written << 9);
 971
 972                         if (btree_node_is_extents(b) &&
 973                             !BTREE_NODE_NEW_EXTENT_OVERWRITE(b->data)) {
 974                                 set_btree_node_old_extent_overwrite(b);
 975                                 set_btree_node_need_rewrite(b);
 976                         }
 977
 978                         sectors = vstruct_sectors(b->data, c->block_bits);
 979                 } else {
 980                         bne = write_block(b);
 981                         i = &bne->keys;
 982
 983                         if (i->seq != b->data->keys.seq)
 984                                 break;
 985
 986                         btree_err_on(!bch2_checksum_type_valid(c, BSET_CSUM_TYPE(i)),
 987                                      BTREE_ERR_WANT_RETRY, c, ca, b, i,
 988                                      "unknown checksum type %llu",
 989                                      BSET_CSUM_TYPE(i));
 990
 991                         nonce = btree_nonce(i, b->written << 9);
 992                         csum = csum_vstruct(c, BSET_CSUM_TYPE(i), nonce, bne);
 993
 994                         btree_err_on(bch2_crc_cmp(csum, bne->csum),
 995                                      BTREE_ERR_WANT_RETRY, c, ca, b, i,
 996                                      "invalid checksum");
 997
 998                         bset_encrypt(c, i, b->written << 9);
 999
1000                         sectors = vstruct_sectors(bne, c->block_bits);
1001                 }
1002
1003                 ret = validate_bset(c, ca, b, i, sectors,
1004                                     READ, have_retry);
1005                 if (ret)
1006                         goto fsck_err;
1007
1008                 if (!b->written)
1009                         btree_node_set_format(b, b->data->format);
1010
1011                 ret = validate_bset_keys(c, b, i, &whiteout_u64s,
1012                                     READ, have_retry);
1013                 if (ret)
1014                         goto fsck_err;
1015
1016                 SET_BSET_BIG_ENDIAN(i, CPU_BIG_ENDIAN);
1017
1018                 b->written += sectors;
1019
1020                 blacklisted = bch2_journal_seq_is_blacklisted(c,
1021                                         le64_to_cpu(i->journal_seq),
1022                                         true);
1023
1024                 btree_err_on(blacklisted && first,
1025                              BTREE_ERR_FIXABLE, c, ca, b, i,
1026                              "first btree node bset has blacklisted journal seq");
1027                 if (blacklisted && !first)
1028                         continue;
1029
1030                 sort_iter_add(iter, i->start,
1031                               vstruct_idx(i, whiteout_u64s));
1032
1033                 sort_iter_add(iter,
1034                               vstruct_idx(i, whiteout_u64s),
1035                               vstruct_last(i));
1036         }
1037
1038         for (bne = write_block(b);
1039              bset_byte_offset(b, bne) < btree_bytes(c);
1040              bne = (void *) bne + block_bytes(c))
1041                 btree_err_on(bne->keys.seq == b->data->keys.seq,
1042                              BTREE_ERR_WANT_RETRY, c, ca, b, NULL,
1043                              "found bset signature after last bset");
1044
1045         sorted = btree_bounce_alloc(c, btree_bytes(c), &used_mempool);
1046         sorted->keys.u64s = 0;
1047
1048         set_btree_bset(b, b->set, &b->data->keys);
1049
1050         b->nr = (btree_node_old_extent_overwrite(b)
1051                  ? bch2_extent_sort_fix_overlapping
1052                  : bch2_key_sort_fix_overlapping)(c, &sorted->keys, iter);
1053
1054         u64s = le16_to_cpu(sorted->keys.u64s);
1055         *sorted = *b->data;
1056         sorted->keys.u64s = cpu_to_le16(u64s);
1057         swap(sorted, b->data);
1058         set_btree_bset(b, b->set, &b->data->keys);
1059         b->nsets = 1;
1060
1061         BUG_ON(b->nr.live_u64s != u64s);
1062
1063         btree_bounce_free(c, btree_bytes(c), used_mempool, sorted);
1064
1065         i = &b->data->keys;
1066         for (k = i->start; k != vstruct_last(i);) {
1067                 struct bkey tmp;
1068                 struct bkey_s u = __bkey_disassemble(b, k, &tmp);
1069                 const char *invalid = bch2_bkey_val_invalid(c, u.s_c);
1070
1071                 if (invalid ||
1072                     (bch2_inject_invalid_keys &&
1073                      !bversion_cmp(u.k->version, MAX_VERSION))) {
1074                         char buf[160];
1075
1076                         bch2_bkey_val_to_text(&PBUF(buf), c, u.s_c);
1077                         btree_err(BTREE_ERR_FIXABLE, c, NULL, b, i,
1078                                   "invalid bkey %s: %s", buf, invalid);
1079
1080                         btree_keys_account_key_drop(&b->nr, 0, k);
1081
1082                         i->u64s = cpu_to_le16(le16_to_cpu(i->u64s) - k->u64s);
1083                         memmove_u64s_down(k, bkey_next(k),
1084                                           (u64 *) vstruct_end(i) - (u64 *) k);
1085                         set_btree_bset_end(b, b->set);
1086                         continue;
1087                 }
1088
1089                 if (u.k->type == KEY_TYPE_btree_ptr_v2) {
1090                         struct bkey_s_btree_ptr_v2 bp = bkey_s_to_btree_ptr_v2(u);
1091
1092                         bp.v->mem_ptr = 0;
1093                 }
1094
1095                 k = bkey_next_skip_noops(k, vstruct_last(i));
1096         }
1097
1098         bch2_bset_build_aux_tree(b, b->set, false);
1099
1100         set_needs_whiteout(btree_bset_first(b), true);
1101
1102         btree_node_reset_sib_u64s(b);
1103
1104         bkey_for_each_ptr(bch2_bkey_ptrs(bkey_i_to_s(&b->key)), ptr) {
1105                 struct bch_dev *ca = bch_dev_bkey_exists(c, ptr->dev);
1106
1107                 if (ca->mi.state != BCH_MEMBER_STATE_RW)
1108                         set_btree_node_need_rewrite(b);
1109         }
1110 out:
1111         mempool_free(iter, &c->fill_iter);
1112         return retry_read;
1113 fsck_err:
1114         if (ret == BTREE_RETRY_READ) {
1115                 retry_read = 1;
1116         } else {
1117                 bch2_inconsistent_error(c);
1118                 set_btree_node_read_error(b);
1119         }
1120         goto out;
1121 }
1122
1123 static void btree_node_read_work(struct work_struct *work)
1124 {
1125         struct btree_read_bio *rb =
1126                 container_of(work, struct btree_read_bio, work);
1127         struct bch_fs *c        = rb->c;
1128         struct bch_dev *ca      = bch_dev_bkey_exists(c, rb->pick.ptr.dev);
1129         struct btree *b         = rb->bio.bi_private;
1130         struct bio *bio         = &rb->bio;
1131         struct bch_io_failures failed = { .nr = 0 };
1132         char buf[200];
1133         struct printbuf out;
1134         bool can_retry;
1135
1136         goto start;
1137         while (1) {
1138                 bch_info(c, "retrying read");
1139                 ca = bch_dev_bkey_exists(c, rb->pick.ptr.dev);
1140                 rb->have_ioref          = bch2_dev_get_ioref(ca, READ);
1141                 bio_reset(bio);
1142                 bio->bi_opf             = REQ_OP_READ|REQ_SYNC|REQ_META;
1143                 bio->bi_iter.bi_sector  = rb->pick.ptr.offset;
1144                 bio->bi_iter.bi_size    = btree_bytes(c);
1145
1146                 if (rb->have_ioref) {
1147                         bio_set_dev(bio, ca->disk_sb.bdev);
1148                         submit_bio_wait(bio);
1149                 } else {
1150                         bio->bi_status = BLK_STS_REMOVED;
1151                 }
1152 start:
1153                 out = PBUF(buf);
1154                 btree_pos_to_text(&out, c, b);
1155                 bch2_dev_io_err_on(bio->bi_status, ca, "btree read error %s for %s",
1156                                    bch2_blk_status_to_str(bio->bi_status), buf);
1157                 if (rb->have_ioref)
1158                         percpu_ref_put(&ca->io_ref);
1159                 rb->have_ioref = false;
1160
1161                 bch2_mark_io_failure(&failed, &rb->pick);
1162
1163                 can_retry = bch2_bkey_pick_read_device(c,
1164                                 bkey_i_to_s_c(&b->key),
1165                                 &failed, &rb->pick) > 0;
1166
1167                 if (!bio->bi_status &&
1168                     !bch2_btree_node_read_done(c, ca, b, can_retry))
1169                         break;
1170
1171                 if (!can_retry) {
1172                         set_btree_node_read_error(b);
1173                         break;
1174                 }
1175         }
1176
1177         bch2_time_stats_update(&c->times[BCH_TIME_btree_node_read],
1178                                rb->start_time);
1179         bio_put(&rb->bio);
1180         clear_btree_node_read_in_flight(b);
1181         wake_up_bit(&b->flags, BTREE_NODE_read_in_flight);
1182 }
1183
1184 static void btree_node_read_endio(struct bio *bio)
1185 {
1186         struct btree_read_bio *rb =
1187                 container_of(bio, struct btree_read_bio, bio);
1188         struct bch_fs *c        = rb->c;
1189
1190         if (rb->have_ioref) {
1191                 struct bch_dev *ca = bch_dev_bkey_exists(c, rb->pick.ptr.dev);
1192                 bch2_latency_acct(ca, rb->start_time, READ);
1193         }
1194
1195         queue_work(system_unbound_wq, &rb->work);
1196 }
1197
1198 void bch2_btree_node_read(struct bch_fs *c, struct btree *b,
1199                           bool sync)
1200 {
1201         struct extent_ptr_decoded pick;
1202         struct btree_read_bio *rb;
1203         struct bch_dev *ca;
1204         struct bio *bio;
1205         int ret;
1206
1207         trace_btree_read(c, b);
1208
1209         ret = bch2_bkey_pick_read_device(c, bkey_i_to_s_c(&b->key),
1210                                          NULL, &pick);
1211         if (bch2_fs_fatal_err_on(ret <= 0, c,
1212                         "btree node read error: no device to read from")) {
1213                 set_btree_node_read_error(b);
1214                 return;
1215         }
1216
1217         ca = bch_dev_bkey_exists(c, pick.ptr.dev);
1218
1219         bio = bio_alloc_bioset(GFP_NOIO, buf_pages(b->data,
1220                                                    btree_bytes(c)),
1221                                &c->btree_bio);
1222         rb = container_of(bio, struct btree_read_bio, bio);
1223         rb->c                   = c;
1224         rb->start_time          = local_clock();
1225         rb->have_ioref          = bch2_dev_get_ioref(ca, READ);
1226         rb->pick                = pick;
1227         INIT_WORK(&rb->work, btree_node_read_work);
1228         bio->bi_opf             = REQ_OP_READ|REQ_SYNC|REQ_META;
1229         bio->bi_iter.bi_sector  = pick.ptr.offset;
1230         bio->bi_end_io          = btree_node_read_endio;
1231         bio->bi_private         = b;
1232         bch2_bio_map(bio, b->data, btree_bytes(c));
1233
1234         set_btree_node_read_in_flight(b);
1235
1236         if (rb->have_ioref) {
1237                 this_cpu_add(ca->io_done->sectors[READ][BCH_DATA_btree],
1238                              bio_sectors(bio));
1239                 bio_set_dev(bio, ca->disk_sb.bdev);
1240
1241                 if (sync) {
1242                         submit_bio_wait(bio);
1243
1244                         bio->bi_private = b;
1245                         btree_node_read_work(&rb->work);
1246                 } else {
1247                         submit_bio(bio);
1248                 }
1249         } else {
1250                 bio->bi_status = BLK_STS_REMOVED;
1251
1252                 if (sync)
1253                         btree_node_read_work(&rb->work);
1254                 else
1255                         queue_work(system_unbound_wq, &rb->work);
1256
1257         }
1258 }
1259
1260 int bch2_btree_root_read(struct bch_fs *c, enum btree_id id,
1261                         const struct bkey_i *k, unsigned level)
1262 {
1263         struct closure cl;
1264         struct btree *b;
1265         int ret;
1266
1267         closure_init_stack(&cl);
1268
1269         do {
1270                 ret = bch2_btree_cache_cannibalize_lock(c, &cl);
1271                 closure_sync(&cl);
1272         } while (ret);
1273
1274         b = bch2_btree_node_mem_alloc(c);
1275         bch2_btree_cache_cannibalize_unlock(c);
1276
1277         BUG_ON(IS_ERR(b));
1278
1279         bkey_copy(&b->key, k);
1280         BUG_ON(bch2_btree_node_hash_insert(&c->btree_cache, b, level, id));
1281
1282         bch2_btree_node_read(c, b, true);
1283
1284         if (btree_node_read_error(b)) {
1285                 bch2_btree_node_hash_remove(&c->btree_cache, b);
1286
1287                 mutex_lock(&c->btree_cache.lock);
1288                 list_move(&b->list, &c->btree_cache.freeable);
1289                 mutex_unlock(&c->btree_cache.lock);
1290
1291                 ret = -EIO;
1292                 goto err;
1293         }
1294
1295         bch2_btree_set_root_for_read(c, b);
1296 err:
1297         six_unlock_write(&b->c.lock);
1298         six_unlock_intent(&b->c.lock);
1299
1300         return ret;
1301 }
1302
1303 void bch2_btree_complete_write(struct bch_fs *c, struct btree *b,
1304                               struct btree_write *w)
1305 {
1306         unsigned long old, new, v = READ_ONCE(b->will_make_reachable);
1307
1308         do {
1309                 old = new = v;
1310                 if (!(old & 1))
1311                         break;
1312
1313                 new &= ~1UL;
1314         } while ((v = cmpxchg(&b->will_make_reachable, old, new)) != old);
1315
1316         if (old & 1)
1317                 closure_put(&((struct btree_update *) new)->cl);
1318
1319         bch2_journal_pin_drop(&c->journal, &w->journal);
1320 }
1321
1322 static void btree_node_write_done(struct bch_fs *c, struct btree *b)
1323 {
1324         struct btree_write *w = btree_prev_write(b);
1325
1326         bch2_btree_complete_write(c, b, w);
1327         btree_node_io_unlock(b);
1328 }
1329
1330 static void bch2_btree_node_write_error(struct bch_fs *c,
1331                                         struct btree_write_bio *wbio)
1332 {
1333         struct btree *b         = wbio->wbio.bio.bi_private;
1334         struct bkey_buf k;
1335         struct bch_extent_ptr *ptr;
1336         struct btree_trans trans;
1337         struct btree_iter *iter;
1338         int ret;
1339
1340         bch2_bkey_buf_init(&k);
1341         bch2_trans_init(&trans, c, 0, 0);
1342
1343         iter = bch2_trans_get_node_iter(&trans, b->c.btree_id, b->key.k.p,
1344                                         BTREE_MAX_DEPTH, b->c.level, 0);
1345 retry:
1346         ret = bch2_btree_iter_traverse(iter);
1347         if (ret)
1348                 goto err;
1349
1350         /* has node been freed? */
1351         if (iter->l[b->c.level].b != b) {
1352                 /* node has been freed: */
1353                 BUG_ON(!btree_node_dying(b));
1354                 goto out;
1355         }
1356
1357         BUG_ON(!btree_node_hashed(b));
1358
1359         bch2_bkey_buf_copy(&k, c, &b->key);
1360
1361         bch2_bkey_drop_ptrs(bkey_i_to_s(k.k), ptr,
1362                 bch2_dev_list_has_dev(wbio->wbio.failed, ptr->dev));
1363
1364         if (!bch2_bkey_nr_ptrs(bkey_i_to_s_c(k.k)))
1365                 goto err;
1366
1367         ret = bch2_btree_node_update_key(c, iter, b, k.k);
1368         if (ret == -EINTR)
1369                 goto retry;
1370         if (ret)
1371                 goto err;
1372 out:
1373         bch2_trans_exit(&trans);
1374         bch2_bkey_buf_exit(&k, c);
1375         bio_put(&wbio->wbio.bio);
1376         btree_node_write_done(c, b);
1377         return;
1378 err:
1379         set_btree_node_noevict(b);
1380         bch2_fs_fatal_error(c, "fatal error writing btree node");
1381         goto out;
1382 }
1383
1384 void bch2_btree_write_error_work(struct work_struct *work)
1385 {
1386         struct bch_fs *c = container_of(work, struct bch_fs,
1387                                         btree_write_error_work);
1388         struct bio *bio;
1389
1390         while (1) {
1391                 spin_lock_irq(&c->btree_write_error_lock);
1392                 bio = bio_list_pop(&c->btree_write_error_list);
1393                 spin_unlock_irq(&c->btree_write_error_lock);
1394
1395                 if (!bio)
1396                         break;
1397
1398                 bch2_btree_node_write_error(c,
1399                         container_of(bio, struct btree_write_bio, wbio.bio));
1400         }
1401 }
1402
1403 static void btree_node_write_work(struct work_struct *work)
1404 {
1405         struct btree_write_bio *wbio =
1406                 container_of(work, struct btree_write_bio, work);
1407         struct bch_fs *c        = wbio->wbio.c;
1408         struct btree *b         = wbio->wbio.bio.bi_private;
1409
1410         btree_bounce_free(c,
1411                 wbio->bytes,
1412                 wbio->wbio.used_mempool,
1413                 wbio->data);
1414
1415         if (wbio->wbio.failed.nr) {
1416                 unsigned long flags;
1417
1418                 spin_lock_irqsave(&c->btree_write_error_lock, flags);
1419                 bio_list_add(&c->btree_write_error_list, &wbio->wbio.bio);
1420                 spin_unlock_irqrestore(&c->btree_write_error_lock, flags);
1421
1422                 queue_work(c->wq, &c->btree_write_error_work);
1423                 return;
1424         }
1425
1426         bio_put(&wbio->wbio.bio);
1427         btree_node_write_done(c, b);
1428 }
1429
1430 static void btree_node_write_endio(struct bio *bio)
1431 {
1432         struct bch_write_bio *wbio      = to_wbio(bio);
1433         struct bch_write_bio *parent    = wbio->split ? wbio->parent : NULL;
1434         struct bch_write_bio *orig      = parent ?: wbio;
1435         struct bch_fs *c                = wbio->c;
1436         struct bch_dev *ca              = bch_dev_bkey_exists(c, wbio->dev);
1437         unsigned long flags;
1438
1439         if (wbio->have_ioref)
1440                 bch2_latency_acct(ca, wbio->submit_time, WRITE);
1441
1442         if (bch2_dev_io_err_on(bio->bi_status, ca, "btree write error: %s",
1443                                bch2_blk_status_to_str(bio->bi_status)) ||
1444             bch2_meta_write_fault("btree")) {
1445                 spin_lock_irqsave(&c->btree_write_error_lock, flags);
1446                 bch2_dev_list_add_dev(&orig->failed, wbio->dev);
1447                 spin_unlock_irqrestore(&c->btree_write_error_lock, flags);
1448         }
1449
1450         if (wbio->have_ioref)
1451                 percpu_ref_put(&ca->io_ref);
1452
1453         if (parent) {
1454                 bio_put(bio);
1455                 bio_endio(&parent->bio);
1456         } else {
1457                 struct btree_write_bio *wb =
1458                         container_of(orig, struct btree_write_bio, wbio);
1459
1460                 INIT_WORK(&wb->work, btree_node_write_work);
1461                 queue_work(system_unbound_wq, &wb->work);
1462         }
1463 }
1464
1465 static int validate_bset_for_write(struct bch_fs *c, struct btree *b,
1466                                    struct bset *i, unsigned sectors)
1467 {
1468         unsigned whiteout_u64s = 0;
1469         int ret;
1470
1471         if (bch2_bkey_invalid(c, bkey_i_to_s_c(&b->key), BKEY_TYPE_BTREE))
1472                 return -1;
1473
1474         ret = validate_bset(c, NULL, b, i, sectors, WRITE, false) ?:
1475                 validate_bset_keys(c, b, i, &whiteout_u64s, WRITE, false);
1476         if (ret) {
1477                 bch2_inconsistent_error(c);
1478                 dump_stack();
1479         }
1480
1481         return ret;
1482 }
1483
1484 void __bch2_btree_node_write(struct bch_fs *c, struct btree *b,
1485                             enum six_lock_type lock_type_held)
1486 {
1487         struct btree_write_bio *wbio;
1488         struct bset_tree *t;
1489         struct bset *i;
1490         struct btree_node *bn = NULL;
1491         struct btree_node_entry *bne = NULL;
1492         struct bkey_buf k;
1493         struct bch_extent_ptr *ptr;
1494         struct sort_iter sort_iter;
1495         struct nonce nonce;
1496         unsigned bytes_to_write, sectors_to_write, bytes, u64s;
1497         u64 seq = 0;
1498         bool used_mempool;
1499         unsigned long old, new;
1500         bool validate_before_checksum = false;
1501         void *data;
1502
1503         bch2_bkey_buf_init(&k);
1504
1505         if (test_bit(BCH_FS_HOLD_BTREE_WRITES, &c->flags))
1506                 return;
1507
1508         /*
1509          * We may only have a read lock on the btree node - the dirty bit is our
1510          * "lock" against racing with other threads that may be trying to start
1511          * a write, we do a write iff we clear the dirty bit. Since setting the
1512          * dirty bit requires a write lock, we can't race with other threads
1513          * redirtying it:
1514          */
1515         do {
1516                 old = new = READ_ONCE(b->flags);
1517
1518                 if (!(old & (1 << BTREE_NODE_dirty)))
1519                         return;
1520
1521                 if (!btree_node_may_write(b))
1522                         return;
1523
1524                 if (old & (1 << BTREE_NODE_never_write))
1525                         return;
1526
1527                 if (old & (1 << BTREE_NODE_write_in_flight)) {
1528                         btree_node_wait_on_io(b);
1529                         continue;
1530                 }
1531
1532                 new &= ~(1 << BTREE_NODE_dirty);
1533                 new &= ~(1 << BTREE_NODE_need_write);
1534                 new |=  (1 << BTREE_NODE_write_in_flight);
1535                 new |=  (1 << BTREE_NODE_just_written);
1536                 new ^=  (1 << BTREE_NODE_write_idx);
1537         } while (cmpxchg_acquire(&b->flags, old, new) != old);
1538
1539         atomic_dec(&c->btree_cache.dirty);
1540
1541         BUG_ON(btree_node_fake(b));
1542         BUG_ON((b->will_make_reachable != 0) != !b->written);
1543
1544         BUG_ON(b->written >= c->opts.btree_node_size);
1545         BUG_ON(b->written & (c->opts.block_size - 1));
1546         BUG_ON(bset_written(b, btree_bset_last(b)));
1547         BUG_ON(le64_to_cpu(b->data->magic) != bset_magic(c));
1548         BUG_ON(memcmp(&b->data->format, &b->format, sizeof(b->format)));
1549
1550         bch2_sort_whiteouts(c, b);
1551
1552         sort_iter_init(&sort_iter, b);
1553
1554         bytes = !b->written
1555                 ? sizeof(struct btree_node)
1556                 : sizeof(struct btree_node_entry);
1557
1558         bytes += b->whiteout_u64s * sizeof(u64);
1559
1560         for_each_bset(b, t) {
1561                 i = bset(b, t);
1562
1563                 if (bset_written(b, i))
1564                         continue;
1565
1566                 bytes += le16_to_cpu(i->u64s) * sizeof(u64);
1567                 sort_iter_add(&sort_iter,
1568                               btree_bkey_first(b, t),
1569                               btree_bkey_last(b, t));
1570                 seq = max(seq, le64_to_cpu(i->journal_seq));
1571         }
1572
1573         BUG_ON(b->written && !seq);
1574
1575         /* bch2_varint_decode may read up to 7 bytes past the end of the buffer: */
1576         bytes += 8;
1577
1578         data = btree_bounce_alloc(c, bytes, &used_mempool);
1579
1580         if (!b->written) {
1581                 bn = data;
1582                 *bn = *b->data;
1583                 i = &bn->keys;
1584         } else {
1585                 bne = data;
1586                 bne->keys = b->data->keys;
1587                 i = &bne->keys;
1588         }
1589
1590         i->journal_seq  = cpu_to_le64(seq);
1591         i->u64s         = 0;
1592
1593         if (!btree_node_old_extent_overwrite(b)) {
1594                 sort_iter_add(&sort_iter,
1595                               unwritten_whiteouts_start(c, b),
1596                               unwritten_whiteouts_end(c, b));
1597                 SET_BSET_SEPARATE_WHITEOUTS(i, false);
1598         } else {
1599                 memcpy_u64s(i->start,
1600                             unwritten_whiteouts_start(c, b),
1601                             b->whiteout_u64s);
1602                 i->u64s = cpu_to_le16(b->whiteout_u64s);
1603                 SET_BSET_SEPARATE_WHITEOUTS(i, true);
1604         }
1605
1606         b->whiteout_u64s = 0;
1607
1608         u64s = btree_node_old_extent_overwrite(b)
1609                 ? bch2_sort_extents(vstruct_last(i), &sort_iter, false)
1610                 : bch2_sort_keys(i->start, &sort_iter, false);
1611         le16_add_cpu(&i->u64s, u64s);
1612
1613         set_needs_whiteout(i, false);
1614
1615         /* do we have data to write? */
1616         if (b->written && !i->u64s)
1617                 goto nowrite;
1618
1619         bytes_to_write = vstruct_end(i) - data;
1620         sectors_to_write = round_up(bytes_to_write, block_bytes(c)) >> 9;
1621
1622         memset(data + bytes_to_write, 0,
1623                (sectors_to_write << 9) - bytes_to_write);
1624
1625         BUG_ON(b->written + sectors_to_write > c->opts.btree_node_size);
1626         BUG_ON(BSET_BIG_ENDIAN(i) != CPU_BIG_ENDIAN);
1627         BUG_ON(i->seq != b->data->keys.seq);
1628
1629         i->version = c->sb.version < bcachefs_metadata_version_new_versioning
1630                 ? cpu_to_le16(BCH_BSET_VERSION_OLD)
1631                 : cpu_to_le16(c->sb.version);
1632         SET_BSET_CSUM_TYPE(i, bch2_meta_checksum_type(c));
1633
1634         if (bch2_csum_type_is_encryption(BSET_CSUM_TYPE(i)))
1635                 validate_before_checksum = true;
1636
1637         /* validate_bset will be modifying: */
1638         if (le16_to_cpu(i->version) <= bcachefs_metadata_version_inode_btree_change)
1639                 validate_before_checksum = true;
1640
1641         /* if we're going to be encrypting, check metadata validity first: */
1642         if (validate_before_checksum &&
1643             validate_bset_for_write(c, b, i, sectors_to_write))
1644                 goto err;
1645
1646         bset_encrypt(c, i, b->written << 9);
1647
1648         nonce = btree_nonce(i, b->written << 9);
1649
1650         if (bn)
1651                 bn->csum = csum_vstruct(c, BSET_CSUM_TYPE(i), nonce, bn);
1652         else
1653                 bne->csum = csum_vstruct(c, BSET_CSUM_TYPE(i), nonce, bne);
1654
1655         /* if we're not encrypting, check metadata after checksumming: */
1656         if (!validate_before_checksum &&
1657             validate_bset_for_write(c, b, i, sectors_to_write))
1658                 goto err;
1659
1660         /*
1661          * We handle btree write errors by immediately halting the journal -
1662          * after we've done that, we can't issue any subsequent btree writes
1663          * because they might have pointers to new nodes that failed to write.
1664          *
1665          * Furthermore, there's no point in doing any more btree writes because
1666          * with the journal stopped, we're never going to update the journal to
1667          * reflect that those writes were done and the data flushed from the
1668          * journal:
1669          *
1670          * Also on journal error, the pending write may have updates that were
1671          * never journalled (interior nodes, see btree_update_nodes_written()) -
1672          * it's critical that we don't do the write in that case otherwise we
1673          * will have updates visible that weren't in the journal:
1674          *
1675          * Make sure to update b->written so bch2_btree_init_next() doesn't
1676          * break:
1677          */
1678         if (bch2_journal_error(&c->journal) ||
1679             c->opts.nochanges)
1680                 goto err;
1681
1682         trace_btree_write(b, bytes_to_write, sectors_to_write);
1683
1684         wbio = container_of(bio_alloc_bioset(GFP_NOIO,
1685                                 buf_pages(data, sectors_to_write << 9),
1686                                 &c->btree_bio),
1687                             struct btree_write_bio, wbio.bio);
1688         wbio_init(&wbio->wbio.bio);
1689         wbio->data                      = data;
1690         wbio->bytes                     = bytes;
1691         wbio->wbio.used_mempool         = used_mempool;
1692         wbio->wbio.bio.bi_opf           = REQ_OP_WRITE|REQ_META;
1693         wbio->wbio.bio.bi_end_io        = btree_node_write_endio;
1694         wbio->wbio.bio.bi_private       = b;
1695
1696         bch2_bio_map(&wbio->wbio.bio, data, sectors_to_write << 9);
1697
1698         /*
1699          * If we're appending to a leaf node, we don't technically need FUA -
1700          * this write just needs to be persisted before the next journal write,
1701          * which will be marked FLUSH|FUA.
1702          *
1703          * Similarly if we're writing a new btree root - the pointer is going to
1704          * be in the next journal entry.
1705          *
1706          * But if we're writing a new btree node (that isn't a root) or
1707          * appending to a non leaf btree node, we need either FUA or a flush
1708          * when we write the parent with the new pointer. FUA is cheaper than a
1709          * flush, and writes appending to leaf nodes aren't blocking anything so
1710          * just make all btree node writes FUA to keep things sane.
1711          */
1712
1713         bch2_bkey_buf_copy(&k, c, &b->key);
1714
1715         bkey_for_each_ptr(bch2_bkey_ptrs(bkey_i_to_s(k.k)), ptr)
1716                 ptr->offset += b->written;
1717
1718         b->written += sectors_to_write;
1719
1720         /* XXX: submitting IO with btree locks held: */
1721         bch2_submit_wbio_replicas(&wbio->wbio, c, BCH_DATA_btree, k.k);
1722         bch2_bkey_buf_exit(&k, c);
1723         return;
1724 err:
1725         set_btree_node_noevict(b);
1726         b->written += sectors_to_write;
1727 nowrite:
1728         btree_bounce_free(c, bytes, used_mempool, data);
1729         btree_node_write_done(c, b);
1730 }
1731
1732 /*
1733  * Work that must be done with write lock held:
1734  */
1735 bool bch2_btree_post_write_cleanup(struct bch_fs *c, struct btree *b)
1736 {
1737         bool invalidated_iter = false;
1738         struct btree_node_entry *bne;
1739         struct bset_tree *t;
1740
1741         if (!btree_node_just_written(b))
1742                 return false;
1743
1744         BUG_ON(b->whiteout_u64s);
1745
1746         clear_btree_node_just_written(b);
1747
1748         /*
1749          * Note: immediately after write, bset_written() doesn't work - the
1750          * amount of data we had to write after compaction might have been
1751          * smaller than the offset of the last bset.
1752          *
1753          * However, we know that all bsets have been written here, as long as
1754          * we're still holding the write lock:
1755          */
1756
1757         /*
1758          * XXX: decide if we really want to unconditionally sort down to a
1759          * single bset:
1760          */
1761         if (b->nsets > 1) {
1762                 btree_node_sort(c, b, NULL, 0, b->nsets, true);
1763                 invalidated_iter = true;
1764         } else {
1765                 invalidated_iter = bch2_drop_whiteouts(b, COMPACT_ALL);
1766         }
1767
1768         for_each_bset(b, t)
1769                 set_needs_whiteout(bset(b, t), true);
1770
1771         bch2_btree_verify(c, b);
1772
1773         /*
1774          * If later we don't unconditionally sort down to a single bset, we have
1775          * to ensure this is still true:
1776          */
1777         BUG_ON((void *) btree_bkey_last(b, bset_tree_last(b)) > write_block(b));
1778
1779         bne = want_new_bset(c, b);
1780         if (bne)
1781                 bch2_bset_init_next(c, b, bne);
1782
1783         bch2_btree_build_aux_trees(b);
1784
1785         return invalidated_iter;
1786 }
1787
1788 /*
1789  * Use this one if the node is intent locked:
1790  */
1791 void bch2_btree_node_write(struct bch_fs *c, struct btree *b,
1792                           enum six_lock_type lock_type_held)
1793 {
1794         BUG_ON(lock_type_held == SIX_LOCK_write);
1795
1796         if (lock_type_held == SIX_LOCK_intent ||
1797             six_lock_tryupgrade(&b->c.lock)) {
1798                 __bch2_btree_node_write(c, b, SIX_LOCK_intent);
1799
1800                 /* don't cycle lock unnecessarily: */
1801                 if (btree_node_just_written(b) &&
1802                     six_trylock_write(&b->c.lock)) {
1803                         bch2_btree_post_write_cleanup(c, b);
1804                         six_unlock_write(&b->c.lock);
1805                 }
1806
1807                 if (lock_type_held == SIX_LOCK_read)
1808                         six_lock_downgrade(&b->c.lock);
1809         } else {
1810                 __bch2_btree_node_write(c, b, SIX_LOCK_read);
1811         }
1812 }
1813
1814 static void __bch2_btree_flush_all(struct bch_fs *c, unsigned flag)
1815 {
1816         struct bucket_table *tbl;
1817         struct rhash_head *pos;
1818         struct btree *b;
1819         unsigned i;
1820 restart:
1821         rcu_read_lock();
1822         for_each_cached_btree(b, c, tbl, i, pos)
1823                 if (test_bit(flag, &b->flags)) {
1824                         rcu_read_unlock();
1825                         wait_on_bit_io(&b->flags, flag, TASK_UNINTERRUPTIBLE);
1826                         goto restart;
1827
1828                 }
1829         rcu_read_unlock();
1830 }
1831
1832 void bch2_btree_flush_all_reads(struct bch_fs *c)
1833 {
1834         __bch2_btree_flush_all(c, BTREE_NODE_read_in_flight);
1835 }
1836
1837 void bch2_btree_flush_all_writes(struct bch_fs *c)
1838 {
1839         __bch2_btree_flush_all(c, BTREE_NODE_write_in_flight);
1840 }
1841
1842 void bch2_dirty_btree_nodes_to_text(struct printbuf *out, struct bch_fs *c)
1843 {
1844         struct bucket_table *tbl;
1845         struct rhash_head *pos;
1846         struct btree *b;
1847         unsigned i;
1848
1849         rcu_read_lock();
1850         for_each_cached_btree(b, c, tbl, i, pos) {
1851                 unsigned long flags = READ_ONCE(b->flags);
1852
1853                 if (!(flags & (1 << BTREE_NODE_dirty)))
1854                         continue;
1855
1856                 pr_buf(out, "%p d %u n %u l %u w %u b %u r %u:%lu\n",
1857                        b,
1858                        (flags & (1 << BTREE_NODE_dirty)) != 0,
1859                        (flags & (1 << BTREE_NODE_need_write)) != 0,
1860                        b->c.level,
1861                        b->written,
1862                        !list_empty_careful(&b->write_blocked),
1863                        b->will_make_reachable != 0,
1864                        b->will_make_reachable & 1);
1865         }
1866         rcu_read_unlock();
1867 }