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

   1 // SPDX-License-Identifier: GPL-2.0
   2 #include "bcachefs.h"
   3 #include "alloc_background.h"
   4 #include "alloc_foreground.h"
   5 #include "backpointers.h"
   6 #include "btree_cache.h"
   7 #include "btree_io.h"
   8 #include "btree_key_cache.h"
   9 #include "btree_update.h"
  10 #include "btree_update_interior.h"
  11 #include "btree_gc.h"
  12 #include "btree_write_buffer.h"
  13 #include "buckets.h"
  14 #include "buckets_waiting_for_journal.h"
  15 #include "clock.h"
  16 #include "debug.h"
  17 #include "ec.h"
  18 #include "error.h"
  19 #include "lru.h"
  20 #include "recovery.h"
  21 #include "trace.h"
  22 #include "varint.h"
  23
  24 #include <linux/kthread.h>
  25 #include <linux/math64.h>
  26 #include <linux/random.h>
  27 #include <linux/rculist.h>
  28 #include <linux/rcupdate.h>
  29 #include <linux/sched/task.h>
  30 #include <linux/sort.h>
  31
  32 /* Persistent alloc info: */
  33
  34 static const unsigned BCH_ALLOC_V1_FIELD_BYTES[] = {
  35 #define x(name, bits) [BCH_ALLOC_FIELD_V1_##name] = bits / 8,
  36         BCH_ALLOC_FIELDS_V1()
  37 #undef x
  38 };
  39
  40 struct bkey_alloc_unpacked {
  41         u64             journal_seq;
  42         u8              gen;
  43         u8              oldest_gen;
  44         u8              data_type;
  45         bool            need_discard:1;
  46         bool            need_inc_gen:1;
  47 #define x(_name, _bits) u##_bits _name;
  48         BCH_ALLOC_FIELDS_V2()
  49 #undef  x
  50 };
  51
  52 static inline u64 alloc_field_v1_get(const struct bch_alloc *a,
  53                                      const void **p, unsigned field)
  54 {
  55         unsigned bytes = BCH_ALLOC_V1_FIELD_BYTES[field];
  56         u64 v;
  57
  58         if (!(a->fields & (1 << field)))
  59                 return 0;
  60
  61         switch (bytes) {
  62         case 1:
  63                 v = *((const u8 *) *p);
  64                 break;
  65         case 2:
  66                 v = le16_to_cpup(*p);
  67                 break;
  68         case 4:
  69                 v = le32_to_cpup(*p);
  70                 break;
  71         case 8:
  72                 v = le64_to_cpup(*p);
  73                 break;
  74         default:
  75                 BUG();
  76         }
  77
  78         *p += bytes;
  79         return v;
  80 }
  81
  82 static inline void alloc_field_v1_put(struct bkey_i_alloc *a, void **p,
  83                                       unsigned field, u64 v)
  84 {
  85         unsigned bytes = BCH_ALLOC_V1_FIELD_BYTES[field];
  86
  87         if (!v)
  88                 return;
  89
  90         a->v.fields |= 1 << field;
  91
  92         switch (bytes) {
  93         case 1:
  94                 *((u8 *) *p) = v;
  95                 break;
  96         case 2:
  97                 *((__le16 *) *p) = cpu_to_le16(v);
  98                 break;
  99         case 4:
 100                 *((__le32 *) *p) = cpu_to_le32(v);
 101                 break;
 102         case 8:
 103                 *((__le64 *) *p) = cpu_to_le64(v);
 104                 break;
 105         default:
 106                 BUG();
 107         }
 108
 109         *p += bytes;
 110 }
 111
 112 static void bch2_alloc_unpack_v1(struct bkey_alloc_unpacked *out,
 113                                  struct bkey_s_c k)
 114 {
 115         const struct bch_alloc *in = bkey_s_c_to_alloc(k).v;
 116         const void *d = in->data;
 117         unsigned idx = 0;
 118
 119         out->gen = in->gen;
 120
 121 #define x(_name, _bits) out->_name = alloc_field_v1_get(in, &d, idx++);
 122         BCH_ALLOC_FIELDS_V1()
 123 #undef  x
 124 }
 125
 126 static int bch2_alloc_unpack_v2(struct bkey_alloc_unpacked *out,
 127                                 struct bkey_s_c k)
 128 {
 129         struct bkey_s_c_alloc_v2 a = bkey_s_c_to_alloc_v2(k);
 130         const u8 *in = a.v->data;
 131         const u8 *end = bkey_val_end(a);
 132         unsigned fieldnr = 0;
 133         int ret;
 134         u64 v;
 135
 136         out->gen        = a.v->gen;
 137         out->oldest_gen = a.v->oldest_gen;
 138         out->data_type  = a.v->data_type;
 139
 140 #define x(_name, _bits)                                                 \
 141         if (fieldnr < a.v->nr_fields) {                                 \
 142                 ret = bch2_varint_decode_fast(in, end, &v);             \
 143                 if (ret < 0)                                            \
 144                         return ret;                                     \
 145                 in += ret;                                              \
 146         } else {                                                        \
 147                 v = 0;                                                  \
 148         }                                                               \
 149         out->_name = v;                                                 \
 150         if (v != out->_name)                                            \
 151                 return -1;                                              \
 152         fieldnr++;
 153
 154         BCH_ALLOC_FIELDS_V2()
 155 #undef  x
 156         return 0;
 157 }
 158
 159 static int bch2_alloc_unpack_v3(struct bkey_alloc_unpacked *out,
 160                                 struct bkey_s_c k)
 161 {
 162         struct bkey_s_c_alloc_v3 a = bkey_s_c_to_alloc_v3(k);
 163         const u8 *in = a.v->data;
 164         const u8 *end = bkey_val_end(a);
 165         unsigned fieldnr = 0;
 166         int ret;
 167         u64 v;
 168
 169         out->gen        = a.v->gen;
 170         out->oldest_gen = a.v->oldest_gen;
 171         out->data_type  = a.v->data_type;
 172         out->need_discard = BCH_ALLOC_V3_NEED_DISCARD(a.v);
 173         out->need_inc_gen = BCH_ALLOC_V3_NEED_INC_GEN(a.v);
 174         out->journal_seq = le64_to_cpu(a.v->journal_seq);
 175
 176 #define x(_name, _bits)                                                 \
 177         if (fieldnr < a.v->nr_fields) {                                 \
 178                 ret = bch2_varint_decode_fast(in, end, &v);             \
 179                 if (ret < 0)                                            \
 180                         return ret;                                     \
 181                 in += ret;                                              \
 182         } else {                                                        \
 183                 v = 0;                                                  \
 184         }                                                               \
 185         out->_name = v;                                                 \
 186         if (v != out->_name)                                            \
 187                 return -1;                                              \
 188         fieldnr++;
 189
 190         BCH_ALLOC_FIELDS_V2()
 191 #undef  x
 192         return 0;
 193 }
 194
 195 static struct bkey_alloc_unpacked bch2_alloc_unpack(struct bkey_s_c k)
 196 {
 197         struct bkey_alloc_unpacked ret = { .gen = 0 };
 198
 199         switch (k.k->type) {
 200         case KEY_TYPE_alloc:
 201                 bch2_alloc_unpack_v1(&ret, k);
 202                 break;
 203         case KEY_TYPE_alloc_v2:
 204                 bch2_alloc_unpack_v2(&ret, k);
 205                 break;
 206         case KEY_TYPE_alloc_v3:
 207                 bch2_alloc_unpack_v3(&ret, k);
 208                 break;
 209         }
 210
 211         return ret;
 212 }
 213
 214 static unsigned bch_alloc_v1_val_u64s(const struct bch_alloc *a)
 215 {
 216         unsigned i, bytes = offsetof(struct bch_alloc, data);
 217
 218         for (i = 0; i < ARRAY_SIZE(BCH_ALLOC_V1_FIELD_BYTES); i++)
 219                 if (a->fields & (1 << i))
 220                         bytes += BCH_ALLOC_V1_FIELD_BYTES[i];
 221
 222         return DIV_ROUND_UP(bytes, sizeof(u64));
 223 }
 224
 225 int bch2_alloc_v1_invalid(const struct bch_fs *c, struct bkey_s_c k,
 226                           unsigned flags, struct printbuf *err)
 227 {
 228         struct bkey_s_c_alloc a = bkey_s_c_to_alloc(k);
 229
 230         /* allow for unknown fields */
 231         if (bkey_val_u64s(a.k) < bch_alloc_v1_val_u64s(a.v)) {
 232                 prt_printf(err, "incorrect value size (%zu < %u)",
 233                        bkey_val_u64s(a.k), bch_alloc_v1_val_u64s(a.v));
 234                 return -BCH_ERR_invalid_bkey;
 235         }
 236
 237         return 0;
 238 }
 239
 240 int bch2_alloc_v2_invalid(const struct bch_fs *c, struct bkey_s_c k,
 241                           unsigned flags, struct printbuf *err)
 242 {
 243         struct bkey_alloc_unpacked u;
 244
 245         if (bch2_alloc_unpack_v2(&u, k)) {
 246                 prt_printf(err, "unpack error");
 247                 return -BCH_ERR_invalid_bkey;
 248         }
 249
 250         return 0;
 251 }
 252
 253 int bch2_alloc_v3_invalid(const struct bch_fs *c, struct bkey_s_c k,
 254                           unsigned flags, struct printbuf *err)
 255 {
 256         struct bkey_alloc_unpacked u;
 257
 258         if (bch2_alloc_unpack_v3(&u, k)) {
 259                 prt_printf(err, "unpack error");
 260                 return -BCH_ERR_invalid_bkey;
 261         }
 262
 263         return 0;
 264 }
 265
 266 int bch2_alloc_v4_invalid(const struct bch_fs *c, struct bkey_s_c k,
 267                           unsigned flags, struct printbuf *err)
 268 {
 269         struct bkey_s_c_alloc_v4 a = bkey_s_c_to_alloc_v4(k);
 270         int rw = flags & WRITE;
 271
 272         if (alloc_v4_u64s(a.v) > bkey_val_u64s(k.k)) {
 273                 prt_printf(err, "bad val size (%u > %lu)",
 274                        alloc_v4_u64s(a.v), bkey_val_u64s(k.k));
 275                 return -BCH_ERR_invalid_bkey;
 276         }
 277
 278         if (!BCH_ALLOC_V4_BACKPOINTERS_START(a.v) &&
 279             BCH_ALLOC_V4_NR_BACKPOINTERS(a.v)) {
 280                 prt_printf(err, "invalid backpointers_start");
 281                 return -BCH_ERR_invalid_bkey;
 282         }
 283
 284         if (rw == WRITE &&
 285             !(flags & BKEY_INVALID_FROM_JOURNAL) &&
 286             test_bit(BCH_FS_CHECK_BACKPOINTERS_DONE, &c->flags)) {
 287                 unsigned i, bp_len = 0;
 288
 289                 for (i = 0; i < BCH_ALLOC_V4_NR_BACKPOINTERS(a.v); i++)
 290                         bp_len += alloc_v4_backpointers_c(a.v)[i].bucket_len;
 291
 292                 if (bp_len > a.v->dirty_sectors) {
 293                         prt_printf(err, "too many backpointers");
 294                         return -BCH_ERR_invalid_bkey;
 295                 }
 296         }
 297
 298         if (rw == WRITE) {
 299                 if (alloc_data_type(*a.v, a.v->data_type) != a.v->data_type) {
 300                         prt_printf(err, "invalid data type (got %u should be %u)",
 301                                a.v->data_type, alloc_data_type(*a.v, a.v->data_type));
 302                         return -BCH_ERR_invalid_bkey;
 303                 }
 304
 305                 switch (a.v->data_type) {
 306                 case BCH_DATA_free:
 307                 case BCH_DATA_need_gc_gens:
 308                 case BCH_DATA_need_discard:
 309                         if (a.v->dirty_sectors ||
 310                             a.v->cached_sectors ||
 311                             a.v->stripe) {
 312                                 prt_printf(err, "empty data type free but have data");
 313                                 return -BCH_ERR_invalid_bkey;
 314                         }
 315                         break;
 316                 case BCH_DATA_sb:
 317                 case BCH_DATA_journal:
 318                 case BCH_DATA_btree:
 319                 case BCH_DATA_user:
 320                 case BCH_DATA_parity:
 321                         if (!a.v->dirty_sectors) {
 322                                 prt_printf(err, "data_type %s but dirty_sectors==0",
 323                                        bch2_data_types[a.v->data_type]);
 324                                 return -BCH_ERR_invalid_bkey;
 325                         }
 326                         break;
 327                 case BCH_DATA_cached:
 328                         if (!a.v->cached_sectors ||
 329                             a.v->dirty_sectors ||
 330                             a.v->stripe) {
 331                                 prt_printf(err, "data type inconsistency");
 332                                 return -BCH_ERR_invalid_bkey;
 333                         }
 334
 335                         if (!a.v->io_time[READ] &&
 336                             test_bit(BCH_FS_CHECK_ALLOC_TO_LRU_REFS_DONE, &c->flags)) {
 337                                 prt_printf(err, "cached bucket with read_time == 0");
 338                                 return -BCH_ERR_invalid_bkey;
 339                         }
 340                         break;
 341                 case BCH_DATA_stripe:
 342                         if (!a.v->stripe) {
 343                                 prt_printf(err, "data_type %s but stripe==0",
 344                                        bch2_data_types[a.v->data_type]);
 345                                 return -BCH_ERR_invalid_bkey;
 346                         }
 347                         break;
 348                 }
 349         }
 350
 351         return 0;
 352 }
 353
 354 static inline u64 swab40(u64 x)
 355 {
 356         return (((x & 0x00000000ffULL) << 32)|
 357                 ((x & 0x000000ff00ULL) << 16)|
 358                 ((x & 0x0000ff0000ULL) >>  0)|
 359                 ((x & 0x00ff000000ULL) >> 16)|
 360                 ((x & 0xff00000000ULL) >> 32));
 361 }
 362
 363 void bch2_alloc_v4_swab(struct bkey_s k)
 364 {
 365         struct bch_alloc_v4 *a = bkey_s_to_alloc_v4(k).v;
 366         struct bch_backpointer *bp, *bps;
 367
 368         a->journal_seq          = swab64(a->journal_seq);
 369         a->flags                = swab32(a->flags);
 370         a->dirty_sectors        = swab32(a->dirty_sectors);
 371         a->cached_sectors       = swab32(a->cached_sectors);
 372         a->io_time[0]           = swab64(a->io_time[0]);
 373         a->io_time[1]           = swab64(a->io_time[1]);
 374         a->stripe               = swab32(a->stripe);
 375         a->nr_external_backpointers = swab32(a->nr_external_backpointers);
 376
 377         bps = alloc_v4_backpointers(a);
 378         for (bp = bps; bp < bps + BCH_ALLOC_V4_NR_BACKPOINTERS(a); bp++) {
 379                 bp->bucket_offset       = swab40(bp->bucket_offset);
 380                 bp->bucket_len          = swab32(bp->bucket_len);
 381                 bch2_bpos_swab(&bp->pos);
 382         }
 383 }
 384
 385 void bch2_alloc_to_text(struct printbuf *out, struct bch_fs *c, struct bkey_s_c k)
 386 {
 387         struct bch_alloc_v4 _a;
 388         const struct bch_alloc_v4 *a = bch2_alloc_to_v4(k, &_a);
 389         unsigned i;
 390
 391         prt_newline(out);
 392         printbuf_indent_add(out, 2);
 393
 394         prt_printf(out, "gen %u oldest_gen %u data_type %s",
 395                a->gen, a->oldest_gen,
 396                a->data_type < BCH_DATA_NR
 397                ? bch2_data_types[a->data_type]
 398                : "(invalid data type)");
 399         prt_newline(out);
 400         prt_printf(out, "journal_seq       %llu",       a->journal_seq);
 401         prt_newline(out);
 402         prt_printf(out, "need_discard      %llu",       BCH_ALLOC_V4_NEED_DISCARD(a));
 403         prt_newline(out);
 404         prt_printf(out, "need_inc_gen      %llu",       BCH_ALLOC_V4_NEED_INC_GEN(a));
 405         prt_newline(out);
 406         prt_printf(out, "dirty_sectors     %u", a->dirty_sectors);
 407         prt_newline(out);
 408         prt_printf(out, "cached_sectors    %u", a->cached_sectors);
 409         prt_newline(out);
 410         prt_printf(out, "stripe            %u", a->stripe);
 411         prt_newline(out);
 412         prt_printf(out, "stripe_redundancy %u", a->stripe_redundancy);
 413         prt_newline(out);
 414         prt_printf(out, "io_time[READ]     %llu",       a->io_time[READ]);
 415         prt_newline(out);
 416         prt_printf(out, "io_time[WRITE]    %llu",       a->io_time[WRITE]);
 417         prt_newline(out);
 418         prt_printf(out, "fragmentation     %llu",       a->fragmentation_lru);
 419         prt_newline(out);
 420         prt_printf(out, "bp_start          %llu", BCH_ALLOC_V4_BACKPOINTERS_START(a));
 421         prt_newline(out);
 422
 423         if (BCH_ALLOC_V4_NR_BACKPOINTERS(a)) {
 424                 struct bkey_s_c_alloc_v4 a_raw = bkey_s_c_to_alloc_v4(k);
 425                 const struct bch_backpointer *bps = alloc_v4_backpointers_c(a_raw.v);
 426
 427                 prt_printf(out, "backpointers:     %llu", BCH_ALLOC_V4_NR_BACKPOINTERS(a_raw.v));
 428                 printbuf_indent_add(out, 2);
 429
 430                 for (i = 0; i < BCH_ALLOC_V4_NR_BACKPOINTERS(a_raw.v); i++) {
 431                         prt_newline(out);
 432                         bch2_backpointer_to_text(out, &bps[i]);
 433                 }
 434
 435                 printbuf_indent_sub(out, 2);
 436         }
 437
 438         printbuf_indent_sub(out, 2);
 439 }
 440
 441 void __bch2_alloc_to_v4(struct bkey_s_c k, struct bch_alloc_v4 *out)
 442 {
 443         if (k.k->type == KEY_TYPE_alloc_v4) {
 444                 void *src, *dst;
 445
 446                 *out = *bkey_s_c_to_alloc_v4(k).v;
 447
 448                 src = alloc_v4_backpointers(out);
 449                 SET_BCH_ALLOC_V4_BACKPOINTERS_START(out, BCH_ALLOC_V4_U64s);
 450                 dst = alloc_v4_backpointers(out);
 451
 452                 if (src < dst)
 453                         memset(src, 0, dst - src);
 454
 455                 SET_BCH_ALLOC_V4_NR_BACKPOINTERS(out, 0);
 456         } else {
 457                 struct bkey_alloc_unpacked u = bch2_alloc_unpack(k);
 458
 459                 *out = (struct bch_alloc_v4) {
 460                         .journal_seq            = u.journal_seq,
 461                         .flags                  = u.need_discard,
 462                         .gen                    = u.gen,
 463                         .oldest_gen             = u.oldest_gen,
 464                         .data_type              = u.data_type,
 465                         .stripe_redundancy      = u.stripe_redundancy,
 466                         .dirty_sectors          = u.dirty_sectors,
 467                         .cached_sectors         = u.cached_sectors,
 468                         .io_time[READ]          = u.read_time,
 469                         .io_time[WRITE]         = u.write_time,
 470                         .stripe                 = u.stripe,
 471                 };
 472
 473                 SET_BCH_ALLOC_V4_BACKPOINTERS_START(out, BCH_ALLOC_V4_U64s);
 474         }
 475 }
 476
 477 static noinline struct bkey_i_alloc_v4 *
 478 __bch2_alloc_to_v4_mut(struct btree_trans *trans, struct bkey_s_c k)
 479 {
 480         struct bkey_i_alloc_v4 *ret;
 481
 482         ret = bch2_trans_kmalloc(trans, max(bkey_bytes(k.k), sizeof(struct bkey_i_alloc_v4)));
 483         if (IS_ERR(ret))
 484                 return ret;
 485
 486         if (k.k->type == KEY_TYPE_alloc_v4) {
 487                 void *src, *dst;
 488
 489                 bkey_reassemble(&ret->k_i, k);
 490
 491                 src = alloc_v4_backpointers(&ret->v);
 492                 SET_BCH_ALLOC_V4_BACKPOINTERS_START(&ret->v, BCH_ALLOC_V4_U64s);
 493                 dst = alloc_v4_backpointers(&ret->v);
 494
 495                 if (src < dst)
 496                         memset(src, 0, dst - src);
 497
 498                 SET_BCH_ALLOC_V4_NR_BACKPOINTERS(&ret->v, 0);
 499                 set_alloc_v4_u64s(ret);
 500         } else {
 501                 bkey_alloc_v4_init(&ret->k_i);
 502                 ret->k.p = k.k->p;
 503                 bch2_alloc_to_v4(k, &ret->v);
 504         }
 505         return ret;
 506 }
 507
 508 static inline struct bkey_i_alloc_v4 *bch2_alloc_to_v4_mut_inlined(struct btree_trans *trans, struct bkey_s_c k)
 509 {
 510         struct bkey_s_c_alloc_v4 a;
 511
 512         if (likely(k.k->type == KEY_TYPE_alloc_v4) &&
 513             ((a = bkey_s_c_to_alloc_v4(k), true) &&
 514              BCH_ALLOC_V4_NR_BACKPOINTERS(a.v) == 0))
 515                 return bch2_bkey_make_mut_noupdate_typed(trans, k, alloc_v4);
 516
 517         return __bch2_alloc_to_v4_mut(trans, k);
 518 }
 519
 520 struct bkey_i_alloc_v4 *bch2_alloc_to_v4_mut(struct btree_trans *trans, struct bkey_s_c k)
 521 {
 522         return bch2_alloc_to_v4_mut_inlined(trans, k);
 523 }
 524
 525 struct bkey_i_alloc_v4 *
 526 bch2_trans_start_alloc_update(struct btree_trans *trans, struct btree_iter *iter,
 527                               struct bpos pos)
 528 {
 529         struct bkey_s_c k;
 530         struct bkey_i_alloc_v4 *a;
 531         int ret;
 532
 533         k = bch2_bkey_get_iter(trans, iter, BTREE_ID_alloc, pos,
 534                              BTREE_ITER_WITH_UPDATES|
 535                              BTREE_ITER_CACHED|
 536                              BTREE_ITER_INTENT);
 537         ret = bkey_err(k);
 538         if (unlikely(ret))
 539                 return ERR_PTR(ret);
 540
 541         a = bch2_alloc_to_v4_mut_inlined(trans, k);
 542         ret = PTR_ERR_OR_ZERO(a);
 543         if (unlikely(ret))
 544                 goto err;
 545         return a;
 546 err:
 547         bch2_trans_iter_exit(trans, iter);
 548         return ERR_PTR(ret);
 549 }
 550
 551 int bch2_alloc_read(struct bch_fs *c)
 552 {
 553         struct btree_trans trans;
 554         struct btree_iter iter;
 555         struct bkey_s_c k;
 556         struct bch_alloc_v4 a;
 557         struct bch_dev *ca;
 558         int ret;
 559
 560         bch2_trans_init(&trans, c, 0, 0);
 561
 562         for_each_btree_key(&trans, iter, BTREE_ID_alloc, POS_MIN,
 563                            BTREE_ITER_PREFETCH, k, ret) {
 564                 /*
 565                  * Not a fsck error because this is checked/repaired by
 566                  * bch2_check_alloc_key() which runs later:
 567                  */
 568                 if (!bch2_dev_bucket_exists(c, k.k->p))
 569                         continue;
 570
 571                 ca = bch_dev_bkey_exists(c, k.k->p.inode);
 572
 573                 *bucket_gen(ca, k.k->p.offset) = bch2_alloc_to_v4(k, &a)->gen;
 574         }
 575         bch2_trans_iter_exit(&trans, &iter);
 576
 577         bch2_trans_exit(&trans);
 578
 579         if (ret)
 580                 bch_err(c, "error reading alloc info: %s", bch2_err_str(ret));
 581
 582         return ret;
 583 }
 584
 585 static struct bpos alloc_gens_pos(struct bpos pos, unsigned *offset)
 586 {
 587         *offset = pos.offset & KEY_TYPE_BUCKET_GENS_MASK;
 588
 589         pos.offset >>= KEY_TYPE_BUCKET_GENS_BITS;
 590         return pos;
 591 }
 592
 593 static struct bpos bucket_gens_pos_to_alloc(struct bpos pos, unsigned offset)
 594 {
 595         pos.offset <<= KEY_TYPE_BUCKET_GENS_BITS;
 596         pos.offset += offset;
 597         return pos;
 598 }
 599
 600 static unsigned alloc_gen(struct bkey_s_c k, unsigned offset)
 601 {
 602         return k.k->type == KEY_TYPE_bucket_gens
 603                 ? bkey_s_c_to_bucket_gens(k).v->gens[offset]
 604                 : 0;
 605 }
 606
 607 int bch2_bucket_gens_invalid(const struct bch_fs *c, struct bkey_s_c k,
 608                              unsigned flags, struct printbuf *err)
 609 {
 610         if (bkey_val_bytes(k.k) != sizeof(struct bch_bucket_gens)) {
 611                 prt_printf(err, "bad val size (%lu != %zu)",
 612                        bkey_val_bytes(k.k), sizeof(struct bch_bucket_gens));
 613                 return -BCH_ERR_invalid_bkey;
 614         }
 615
 616         return 0;
 617 }
 618
 619 void bch2_bucket_gens_to_text(struct printbuf *out, struct bch_fs *c, struct bkey_s_c k)
 620 {
 621         struct bkey_s_c_bucket_gens g = bkey_s_c_to_bucket_gens(k);
 622         unsigned i;
 623
 624         for (i = 0; i < ARRAY_SIZE(g.v->gens); i++) {
 625                 if (i)
 626                         prt_char(out, ' ');
 627                 prt_printf(out, "%u", g.v->gens[i]);
 628         }
 629 }
 630
 631 int bch2_bucket_gens_init(struct bch_fs *c)
 632 {
 633         struct btree_trans trans;
 634         struct btree_iter iter;
 635         struct bkey_s_c k;
 636         struct bch_alloc_v4 a;
 637         struct bkey_i_bucket_gens g;
 638         bool have_bucket_gens_key = false;
 639         unsigned offset;
 640         struct bpos pos;
 641         u8 gen;
 642         int ret;
 643
 644         bch2_trans_init(&trans, c, 0, 0);
 645
 646         for_each_btree_key(&trans, iter, BTREE_ID_alloc, POS_MIN,
 647                            BTREE_ITER_PREFETCH, k, ret) {
 648                 /*
 649                  * Not a fsck error because this is checked/repaired by
 650                  * bch2_check_alloc_key() which runs later:
 651                  */
 652                 if (!bch2_dev_bucket_exists(c, k.k->p))
 653                         continue;
 654
 655                 gen = bch2_alloc_to_v4(k, &a)->gen;
 656                 pos = alloc_gens_pos(iter.pos, &offset);
 657
 658                 if (have_bucket_gens_key && bkey_cmp(iter.pos, pos)) {
 659                         ret = commit_do(&trans, NULL, NULL,
 660                                         BTREE_INSERT_NOFAIL|
 661                                         BTREE_INSERT_LAZY_RW,
 662                                 __bch2_btree_insert(&trans, BTREE_ID_bucket_gens, &g.k_i, 0));
 663                         if (ret)
 664                                 break;
 665                         have_bucket_gens_key = false;
 666                 }
 667
 668                 if (!have_bucket_gens_key) {
 669                         bkey_bucket_gens_init(&g.k_i);
 670                         g.k.p = pos;
 671                         have_bucket_gens_key = true;
 672                 }
 673
 674                 g.v.gens[offset] = gen;
 675         }
 676         bch2_trans_iter_exit(&trans, &iter);
 677
 678         if (have_bucket_gens_key && !ret)
 679                 ret = commit_do(&trans, NULL, NULL,
 680                                 BTREE_INSERT_NOFAIL|
 681                                 BTREE_INSERT_LAZY_RW,
 682                         __bch2_btree_insert(&trans, BTREE_ID_bucket_gens, &g.k_i, 0));
 683
 684         bch2_trans_exit(&trans);
 685
 686         if (ret)
 687                 bch_err(c, "%s: error %s", __func__, bch2_err_str(ret));
 688
 689         return ret;
 690 }
 691
 692 int bch2_bucket_gens_read(struct bch_fs *c)
 693 {
 694         struct btree_trans trans;
 695         struct btree_iter iter;
 696         struct bkey_s_c k;
 697         const struct bch_bucket_gens *g;
 698         struct bch_dev *ca;
 699         u64 b;
 700         int ret;
 701
 702         bch2_trans_init(&trans, c, 0, 0);
 703
 704         for_each_btree_key(&trans, iter, BTREE_ID_bucket_gens, POS_MIN,
 705                            BTREE_ITER_PREFETCH, k, ret) {
 706                 u64 start = bucket_gens_pos_to_alloc(k.k->p, 0).offset;
 707                 u64 end = bucket_gens_pos_to_alloc(bpos_nosnap_successor(k.k->p), 0).offset;
 708
 709                 if (k.k->type != KEY_TYPE_bucket_gens)
 710                         continue;
 711
 712                 g = bkey_s_c_to_bucket_gens(k).v;
 713
 714                 /*
 715                  * Not a fsck error because this is checked/repaired by
 716                  * bch2_check_alloc_key() which runs later:
 717                  */
 718                 if (!bch2_dev_exists2(c, k.k->p.inode))
 719                         continue;
 720
 721                 ca = bch_dev_bkey_exists(c, k.k->p.inode);
 722
 723                 for (b = max_t(u64, ca->mi.first_bucket, start);
 724                      b < min_t(u64, ca->mi.nbuckets, end);
 725                      b++)
 726                         *bucket_gen(ca, b) = g->gens[b & KEY_TYPE_BUCKET_GENS_MASK];
 727         }
 728         bch2_trans_iter_exit(&trans, &iter);
 729
 730         bch2_trans_exit(&trans);
 731
 732         if (ret)
 733                 bch_err(c, "error reading alloc info: %s", bch2_err_str(ret));
 734
 735         return ret;
 736 }
 737
 738 /* Free space/discard btree: */
 739
 740 static int bch2_bucket_do_index(struct btree_trans *trans,
 741                                 struct bkey_s_c alloc_k,
 742                                 const struct bch_alloc_v4 *a,
 743                                 bool set)
 744 {
 745         struct bch_fs *c = trans->c;
 746         struct bch_dev *ca = bch_dev_bkey_exists(c, alloc_k.k->p.inode);
 747         struct btree_iter iter;
 748         struct bkey_s_c old;
 749         struct bkey_i *k;
 750         enum btree_id btree;
 751         enum bch_bkey_type old_type = !set ? KEY_TYPE_set : KEY_TYPE_deleted;
 752         enum bch_bkey_type new_type =  set ? KEY_TYPE_set : KEY_TYPE_deleted;
 753         struct printbuf buf = PRINTBUF;
 754         int ret;
 755
 756         if (a->data_type != BCH_DATA_free &&
 757             a->data_type != BCH_DATA_need_discard)
 758                 return 0;
 759
 760         k = bch2_trans_kmalloc_nomemzero(trans, sizeof(*k));
 761         if (IS_ERR(k))
 762                 return PTR_ERR(k);
 763
 764         bkey_init(&k->k);
 765         k->k.type = new_type;
 766
 767         switch (a->data_type) {
 768         case BCH_DATA_free:
 769                 btree = BTREE_ID_freespace;
 770                 k->k.p = alloc_freespace_pos(alloc_k.k->p, *a);
 771                 bch2_key_resize(&k->k, 1);
 772                 break;
 773         case BCH_DATA_need_discard:
 774                 btree = BTREE_ID_need_discard;
 775                 k->k.p = alloc_k.k->p;
 776                 break;
 777         default:
 778                 return 0;
 779         }
 780
 781         old = bch2_bkey_get_iter(trans, &iter, btree,
 782                              bkey_start_pos(&k->k),
 783                              BTREE_ITER_INTENT);
 784         ret = bkey_err(old);
 785         if (ret)
 786                 return ret;
 787
 788         if (ca->mi.freespace_initialized &&
 789             test_bit(BCH_FS_CHECK_ALLOC_DONE, &c->flags) &&
 790             bch2_trans_inconsistent_on(old.k->type != old_type, trans,
 791                         "incorrect key when %s %s:%llu:%llu:0 (got %s should be %s)\n"
 792                         "  for %s",
 793                         set ? "setting" : "clearing",
 794                         bch2_btree_ids[btree],
 795                         iter.pos.inode,
 796                         iter.pos.offset,
 797                         bch2_bkey_types[old.k->type],
 798                         bch2_bkey_types[old_type],
 799                         (bch2_bkey_val_to_text(&buf, c, alloc_k), buf.buf))) {
 800                 ret = -EIO;
 801                 goto err;
 802         }
 803
 804         ret = bch2_trans_update(trans, &iter, k, 0);
 805 err:
 806         bch2_trans_iter_exit(trans, &iter);
 807         printbuf_exit(&buf);
 808         return ret;
 809 }
 810
 811 static noinline int bch2_bucket_gen_update(struct btree_trans *trans,
 812                                            struct bpos bucket, u8 gen)
 813 {
 814         struct btree_iter iter;
 815         unsigned offset;
 816         struct bpos pos = alloc_gens_pos(bucket, &offset);
 817         struct bkey_i_bucket_gens *g;
 818         struct bkey_s_c k;
 819         int ret;
 820
 821         g = bch2_trans_kmalloc(trans, sizeof(*g));
 822         ret = PTR_ERR_OR_ZERO(g);
 823         if (ret)
 824                 return ret;
 825
 826         k = bch2_bkey_get_iter(trans, &iter, BTREE_ID_bucket_gens, pos,
 827                                BTREE_ITER_INTENT|
 828                                BTREE_ITER_WITH_UPDATES);
 829         ret = bkey_err(k);
 830         if (ret)
 831                 return ret;
 832
 833         if (k.k->type != KEY_TYPE_bucket_gens) {
 834                 bkey_bucket_gens_init(&g->k_i);
 835                 g->k.p = iter.pos;
 836         } else {
 837                 bkey_reassemble(&g->k_i, k);
 838         }
 839
 840         g->v.gens[offset] = gen;
 841
 842         ret = bch2_trans_update(trans, &iter, &g->k_i, 0);
 843         bch2_trans_iter_exit(trans, &iter);
 844         return ret;
 845 }
 846
 847 int bch2_trans_mark_alloc(struct btree_trans *trans,
 848                           enum btree_id btree_id, unsigned level,
 849                           struct bkey_s_c old, struct bkey_i *new,
 850                           unsigned flags)
 851 {
 852         struct bch_fs *c = trans->c;
 853         struct bch_alloc_v4 old_a_convert, *new_a;
 854         const struct bch_alloc_v4 *old_a;
 855         u64 old_lru, new_lru;
 856         int ret = 0;
 857
 858         /*
 859          * Deletion only happens in the device removal path, with
 860          * BTREE_TRIGGER_NORUN:
 861          */
 862         BUG_ON(new->k.type != KEY_TYPE_alloc_v4);
 863
 864         old_a = bch2_alloc_to_v4(old, &old_a_convert);
 865         new_a = &bkey_i_to_alloc_v4(new)->v;
 866
 867         new_a->data_type = alloc_data_type(*new_a, new_a->data_type);
 868
 869         if (new_a->dirty_sectors > old_a->dirty_sectors ||
 870             new_a->cached_sectors > old_a->cached_sectors) {
 871                 new_a->io_time[READ] = max_t(u64, 1, atomic64_read(&c->io_clock[READ].now));
 872                 new_a->io_time[WRITE]= max_t(u64, 1, atomic64_read(&c->io_clock[WRITE].now));
 873                 SET_BCH_ALLOC_V4_NEED_INC_GEN(new_a, true);
 874                 SET_BCH_ALLOC_V4_NEED_DISCARD(new_a, true);
 875         }
 876
 877         if (data_type_is_empty(new_a->data_type) &&
 878             BCH_ALLOC_V4_NEED_INC_GEN(new_a) &&
 879             !bch2_bucket_is_open_safe(c, new->k.p.inode, new->k.p.offset)) {
 880                 new_a->gen++;
 881                 SET_BCH_ALLOC_V4_NEED_INC_GEN(new_a, false);
 882         }
 883
 884         if (old_a->data_type != new_a->data_type ||
 885             (new_a->data_type == BCH_DATA_free &&
 886              alloc_freespace_genbits(*old_a) != alloc_freespace_genbits(*new_a))) {
 887                 ret =   bch2_bucket_do_index(trans, old, old_a, false) ?:
 888                         bch2_bucket_do_index(trans, bkey_i_to_s_c(new), new_a, true);
 889                 if (ret)
 890                         return ret;
 891         }
 892
 893         if (new_a->data_type == BCH_DATA_cached &&
 894             !new_a->io_time[READ])
 895                 new_a->io_time[READ] = max_t(u64, 1, atomic64_read(&c->io_clock[READ].now));
 896
 897         old_lru = alloc_lru_idx_read(*old_a);
 898         new_lru = alloc_lru_idx_read(*new_a);
 899
 900         if (old_lru != new_lru) {
 901                 ret = bch2_lru_change(trans, new->k.p.inode,
 902                                       bucket_to_u64(new->k.p),
 903                                       old_lru, new_lru);
 904                 if (ret)
 905                         return ret;
 906         }
 907
 908         new_a->fragmentation_lru = alloc_lru_idx_fragmentation(*new_a,
 909                                         bch_dev_bkey_exists(c, new->k.p.inode));
 910
 911         if (old_a->fragmentation_lru != new_a->fragmentation_lru) {
 912                 ret = bch2_lru_change(trans,
 913                                 BCH_LRU_FRAGMENTATION_START,
 914                                 bucket_to_u64(new->k.p),
 915                                 old_a->fragmentation_lru, new_a->fragmentation_lru);
 916                 if (ret)
 917                         return ret;
 918         }
 919
 920         if (old_a->gen != new_a->gen) {
 921                 ret = bch2_bucket_gen_update(trans, new->k.p, new_a->gen);
 922                 if (ret)
 923                         return ret;
 924         }
 925
 926         return 0;
 927 }
 928
 929 /*
 930  * This synthesizes deleted extents for holes, similar to BTREE_ITER_SLOTS for
 931  * extents style btrees, but works on non-extents btrees:
 932  */
 933 struct bkey_s_c bch2_get_key_or_hole(struct btree_iter *iter, struct bpos end, struct bkey *hole)
 934 {
 935         struct bkey_s_c k = bch2_btree_iter_peek_slot(iter);
 936
 937         if (bkey_err(k))
 938                 return k;
 939
 940         if (k.k->type) {
 941                 return k;
 942         } else {
 943                 struct btree_iter iter2;
 944                 struct bpos next;
 945
 946                 bch2_trans_copy_iter(&iter2, iter);
 947
 948                 if (!bpos_eq(iter->path->l[0].b->key.k.p, SPOS_MAX))
 949                         end = bkey_min(end, bpos_nosnap_successor(iter->path->l[0].b->key.k.p));
 950
 951                 end = bkey_min(end, POS(iter->pos.inode, iter->pos.offset + U32_MAX - 1));
 952
 953                 /*
 954                  * btree node min/max is a closed interval, upto takes a half
 955                  * open interval:
 956                  */
 957                 k = bch2_btree_iter_peek_upto(&iter2, end);
 958                 next = iter2.pos;
 959                 bch2_trans_iter_exit(iter->trans, &iter2);
 960
 961                 BUG_ON(next.offset >= iter->pos.offset + U32_MAX);
 962
 963                 if (bkey_err(k))
 964                         return k;
 965
 966                 bkey_init(hole);
 967                 hole->p = iter->pos;
 968
 969                 bch2_key_resize(hole, next.offset - iter->pos.offset);
 970                 return (struct bkey_s_c) { hole, NULL };
 971         }
 972 }
 973
 974 static bool next_bucket(struct bch_fs *c, struct bpos *bucket)
 975 {
 976         struct bch_dev *ca;
 977         unsigned iter;
 978
 979         if (bch2_dev_bucket_exists(c, *bucket))
 980                 return true;
 981
 982         if (bch2_dev_exists2(c, bucket->inode)) {
 983                 ca = bch_dev_bkey_exists(c, bucket->inode);
 984
 985                 if (bucket->offset < ca->mi.first_bucket) {
 986                         bucket->offset = ca->mi.first_bucket;
 987                         return true;
 988                 }
 989
 990                 bucket->inode++;
 991                 bucket->offset = 0;
 992         }
 993
 994         rcu_read_lock();
 995         iter = bucket->inode;
 996         ca = __bch2_next_dev(c, &iter, NULL);
 997         if (ca)
 998                 *bucket = POS(ca->dev_idx, ca->mi.first_bucket);
 999         rcu_read_unlock();
1000
1001         return ca != NULL;
1002 }
1003
1004 struct bkey_s_c bch2_get_key_or_real_bucket_hole(struct btree_iter *iter, struct bkey *hole)
1005 {
1006         struct bch_fs *c = iter->trans->c;
1007         struct bkey_s_c k;
1008 again:
1009         k = bch2_get_key_or_hole(iter, POS_MAX, hole);
1010         if (bkey_err(k))
1011                 return k;
1012
1013         if (!k.k->type) {
1014                 struct bpos bucket = bkey_start_pos(k.k);
1015
1016                 if (!bch2_dev_bucket_exists(c, bucket)) {
1017                         if (!next_bucket(c, &bucket))
1018                                 return bkey_s_c_null;
1019
1020                         bch2_btree_iter_set_pos(iter, bucket);
1021                         goto again;
1022                 }
1023
1024                 if (!bch2_dev_bucket_exists(c, k.k->p)) {
1025                         struct bch_dev *ca = bch_dev_bkey_exists(c, bucket.inode);
1026
1027                         bch2_key_resize(hole, ca->mi.nbuckets - bucket.offset);
1028                 }
1029         }
1030
1031         return k;
1032 }
1033
1034 static int bch2_check_alloc_key(struct btree_trans *trans,
1035                                 struct bkey_s_c alloc_k,
1036                                 struct btree_iter *alloc_iter,
1037                                 struct btree_iter *discard_iter,
1038                                 struct btree_iter *freespace_iter,
1039                                 struct btree_iter *bucket_gens_iter)
1040 {
1041         struct bch_fs *c = trans->c;
1042         struct bch_dev *ca;
1043         struct bch_alloc_v4 a_convert;
1044         const struct bch_alloc_v4 *a;
1045         unsigned discard_key_type, freespace_key_type;
1046         unsigned gens_offset;
1047         struct bkey_s_c k;
1048         struct printbuf buf = PRINTBUF;
1049         int ret;
1050
1051         if (fsck_err_on(!bch2_dev_bucket_exists(c, alloc_k.k->p), c,
1052                         "alloc key for invalid device:bucket %llu:%llu",
1053                         alloc_k.k->p.inode, alloc_k.k->p.offset))
1054                 return bch2_btree_delete_at(trans, alloc_iter, 0);
1055
1056         ca = bch_dev_bkey_exists(c, alloc_k.k->p.inode);
1057         if (!ca->mi.freespace_initialized)
1058                 return 0;
1059
1060         a = bch2_alloc_to_v4(alloc_k, &a_convert);
1061
1062         discard_key_type = a->data_type == BCH_DATA_need_discard ? KEY_TYPE_set : 0;
1063         bch2_btree_iter_set_pos(discard_iter, alloc_k.k->p);
1064         k = bch2_btree_iter_peek_slot(discard_iter);
1065         ret = bkey_err(k);
1066         if (ret)
1067                 goto err;
1068
1069         if (k.k->type != discard_key_type &&
1070             (c->opts.reconstruct_alloc ||
1071              fsck_err(c, "incorrect key in need_discard btree (got %s should be %s)\n"
1072                       "  %s",
1073                       bch2_bkey_types[k.k->type],
1074                       bch2_bkey_types[discard_key_type],
1075                       (bch2_bkey_val_to_text(&buf, c, alloc_k), buf.buf)))) {
1076                 struct bkey_i *update =
1077                         bch2_trans_kmalloc(trans, sizeof(*update));
1078
1079                 ret = PTR_ERR_OR_ZERO(update);
1080                 if (ret)
1081                         goto err;
1082
1083                 bkey_init(&update->k);
1084                 update->k.type  = discard_key_type;
1085                 update->k.p     = discard_iter->pos;
1086
1087                 ret = bch2_trans_update(trans, discard_iter, update, 0);
1088                 if (ret)
1089                         goto err;
1090         }
1091
1092         freespace_key_type = a->data_type == BCH_DATA_free ? KEY_TYPE_set : 0;
1093         bch2_btree_iter_set_pos(freespace_iter, alloc_freespace_pos(alloc_k.k->p, *a));
1094         k = bch2_btree_iter_peek_slot(freespace_iter);
1095         ret = bkey_err(k);
1096         if (ret)
1097                 goto err;
1098
1099         if (k.k->type != freespace_key_type &&
1100             (c->opts.reconstruct_alloc ||
1101              fsck_err(c, "incorrect key in freespace btree (got %s should be %s)\n"
1102                       "  %s",
1103                       bch2_bkey_types[k.k->type],
1104                       bch2_bkey_types[freespace_key_type],
1105                       (printbuf_reset(&buf),
1106                        bch2_bkey_val_to_text(&buf, c, alloc_k), buf.buf)))) {
1107                 struct bkey_i *update =
1108                         bch2_trans_kmalloc(trans, sizeof(*update));
1109
1110                 ret = PTR_ERR_OR_ZERO(update);
1111                 if (ret)
1112                         goto err;
1113
1114                 bkey_init(&update->k);
1115                 update->k.type  = freespace_key_type;
1116                 update->k.p     = freespace_iter->pos;
1117                 bch2_key_resize(&update->k, 1);
1118
1119                 ret = bch2_trans_update(trans, freespace_iter, update, 0);
1120                 if (ret)
1121                         goto err;
1122         }
1123
1124         bch2_btree_iter_set_pos(bucket_gens_iter, alloc_gens_pos(alloc_k.k->p, &gens_offset));
1125         k = bch2_btree_iter_peek_slot(bucket_gens_iter);
1126         ret = bkey_err(k);
1127         if (ret)
1128                 goto err;
1129
1130         if (a->gen != alloc_gen(k, gens_offset) &&
1131             (c->opts.reconstruct_alloc ||
1132              fsck_err(c, "incorrect gen in bucket_gens btree (got %u should be %u)\n"
1133                       "  %s",
1134                       alloc_gen(k, gens_offset), a->gen,
1135                       (printbuf_reset(&buf),
1136                        bch2_bkey_val_to_text(&buf, c, alloc_k), buf.buf)))) {
1137                 struct bkey_i_bucket_gens *g =
1138                         bch2_trans_kmalloc(trans, sizeof(*g));
1139
1140                 ret = PTR_ERR_OR_ZERO(g);
1141                 if (ret)
1142                         goto err;
1143
1144                 if (k.k->type == KEY_TYPE_bucket_gens) {
1145                         bkey_reassemble(&g->k_i, k);
1146                 } else {
1147                         bkey_bucket_gens_init(&g->k_i);
1148                         g->k.p = alloc_gens_pos(alloc_k.k->p, &gens_offset);
1149                 }
1150
1151                 g->v.gens[gens_offset] = a->gen;
1152
1153                 ret = bch2_trans_update(trans, bucket_gens_iter, &g->k_i, 0);
1154                 if (ret)
1155                         goto err;
1156         }
1157 err:
1158 fsck_err:
1159         printbuf_exit(&buf);
1160         return ret;
1161 }
1162
1163 static int bch2_check_alloc_hole_freespace(struct btree_trans *trans,
1164                                  struct bpos start,
1165                                  struct bpos *end,
1166                                  struct btree_iter *freespace_iter)
1167 {
1168         struct bch_fs *c = trans->c;
1169         struct bch_dev *ca;
1170         struct bkey_s_c k;
1171         struct printbuf buf = PRINTBUF;
1172         int ret;
1173
1174         ca = bch_dev_bkey_exists(c, start.inode);
1175         if (!ca->mi.freespace_initialized)
1176                 return 0;
1177
1178         bch2_btree_iter_set_pos(freespace_iter, start);
1179
1180         k = bch2_btree_iter_peek_slot(freespace_iter);
1181         ret = bkey_err(k);
1182         if (ret)
1183                 goto err;
1184
1185         *end = bkey_min(k.k->p, *end);
1186
1187         if (k.k->type != KEY_TYPE_set &&
1188             (c->opts.reconstruct_alloc ||
1189              fsck_err(c, "hole in alloc btree missing in freespace btree\n"
1190                       "  device %llu buckets %llu-%llu",
1191                       freespace_iter->pos.inode,
1192                       freespace_iter->pos.offset,
1193                       end->offset))) {
1194                 struct bkey_i *update =
1195                         bch2_trans_kmalloc(trans, sizeof(*update));
1196
1197                 ret = PTR_ERR_OR_ZERO(update);
1198                 if (ret)
1199                         goto err;
1200
1201                 bkey_init(&update->k);
1202                 update->k.type  = KEY_TYPE_set;
1203                 update->k.p     = freespace_iter->pos;
1204                 bch2_key_resize(&update->k,
1205                                 min_t(u64, U32_MAX, end->offset -
1206                                       freespace_iter->pos.offset));
1207
1208                 ret = bch2_trans_update(trans, freespace_iter, update, 0);
1209                 if (ret)
1210                         goto err;
1211         }
1212 err:
1213 fsck_err:
1214         printbuf_exit(&buf);
1215         return ret;
1216 }
1217
1218 static int bch2_check_alloc_hole_bucket_gens(struct btree_trans *trans,
1219                                  struct bpos start,
1220                                  struct bpos *end,
1221                                  struct btree_iter *bucket_gens_iter)
1222 {
1223         struct bch_fs *c = trans->c;
1224         struct bkey_s_c k;
1225         struct printbuf buf = PRINTBUF;
1226         unsigned i, gens_offset, gens_end_offset;
1227         int ret;
1228
1229         if (c->sb.version < bcachefs_metadata_version_bucket_gens &&
1230             !c->opts.version_upgrade)
1231                 return 0;
1232
1233         bch2_btree_iter_set_pos(bucket_gens_iter, alloc_gens_pos(start, &gens_offset));
1234
1235         k = bch2_btree_iter_peek_slot(bucket_gens_iter);
1236         ret = bkey_err(k);
1237         if (ret)
1238                 goto err;
1239
1240         if (bkey_cmp(alloc_gens_pos(start, &gens_offset),
1241                      alloc_gens_pos(*end,  &gens_end_offset)))
1242                 gens_end_offset = KEY_TYPE_BUCKET_GENS_NR;
1243
1244         if (k.k->type == KEY_TYPE_bucket_gens) {
1245                 struct bkey_i_bucket_gens g;
1246                 bool need_update = false;
1247
1248                 bkey_reassemble(&g.k_i, k);
1249
1250                 for (i = gens_offset; i < gens_end_offset; i++) {
1251                         if (fsck_err_on(g.v.gens[i], c,
1252                                         "hole in alloc btree at %llu:%llu with nonzero gen in bucket_gens btree (%u)",
1253                                         bucket_gens_pos_to_alloc(k.k->p, i).inode,
1254                                         bucket_gens_pos_to_alloc(k.k->p, i).offset,
1255                                         g.v.gens[i])) {
1256                                 g.v.gens[i] = 0;
1257                                 need_update = true;
1258                         }
1259                 }
1260
1261                 if (need_update) {
1262                         struct bkey_i *k = bch2_trans_kmalloc(trans, sizeof(g));
1263
1264                         ret = PTR_ERR_OR_ZERO(k);
1265                         if (ret)
1266                                 goto err;
1267
1268                         memcpy(k, &g, sizeof(g));
1269
1270                         ret = bch2_trans_update(trans, bucket_gens_iter, k, 0);
1271                         if (ret)
1272                                 goto err;
1273                 }
1274         }
1275
1276         *end = bkey_min(*end, bucket_gens_pos_to_alloc(bpos_nosnap_successor(k.k->p), 0));
1277 err:
1278 fsck_err:
1279         printbuf_exit(&buf);
1280         return ret;
1281 }
1282
1283 static int __bch2_check_discard_freespace_key(struct btree_trans *trans,
1284                                               struct btree_iter *iter)
1285 {
1286         struct bch_fs *c = trans->c;
1287         struct btree_iter alloc_iter;
1288         struct bkey_s_c alloc_k;
1289         struct bch_alloc_v4 a_convert;
1290         const struct bch_alloc_v4 *a;
1291         u64 genbits;
1292         struct bpos pos;
1293         enum bch_data_type state = iter->btree_id == BTREE_ID_need_discard
1294                 ? BCH_DATA_need_discard
1295                 : BCH_DATA_free;
1296         struct printbuf buf = PRINTBUF;
1297         int ret;
1298
1299         pos = iter->pos;
1300         pos.offset &= ~(~0ULL << 56);
1301         genbits = iter->pos.offset & (~0ULL << 56);
1302
1303         alloc_k = bch2_bkey_get_iter(trans, &alloc_iter, BTREE_ID_alloc, pos, 0);
1304         ret = bkey_err(alloc_k);
1305         if (ret)
1306                 return ret;
1307
1308         if (fsck_err_on(!bch2_dev_bucket_exists(c, pos), c,
1309                         "entry in %s btree for nonexistant dev:bucket %llu:%llu",
1310                         bch2_btree_ids[iter->btree_id], pos.inode, pos.offset))
1311                 goto delete;
1312
1313         a = bch2_alloc_to_v4(alloc_k, &a_convert);
1314
1315         if (fsck_err_on(a->data_type != state ||
1316                         (state == BCH_DATA_free &&
1317                          genbits != alloc_freespace_genbits(*a)), c,
1318                         "%s\n  incorrectly set at %s:%llu:%llu:0 (free %u, genbits %llu should be %llu)",
1319                         (bch2_bkey_val_to_text(&buf, c, alloc_k), buf.buf),
1320                         bch2_btree_ids[iter->btree_id],
1321                         iter->pos.inode,
1322                         iter->pos.offset,
1323                         a->data_type == state,
1324                         genbits >> 56, alloc_freespace_genbits(*a) >> 56))
1325                 goto delete;
1326 out:
1327 fsck_err:
1328         set_btree_iter_dontneed(&alloc_iter);
1329         bch2_trans_iter_exit(trans, &alloc_iter);
1330         printbuf_exit(&buf);
1331         return ret;
1332 delete:
1333         ret =   bch2_btree_delete_extent_at(trans, iter,
1334                         iter->btree_id == BTREE_ID_freespace ? 1 : 0, 0) ?:
1335                 bch2_trans_commit(trans, NULL, NULL,
1336                         BTREE_INSERT_NOFAIL|BTREE_INSERT_LAZY_RW);
1337         goto out;
1338 }
1339
1340 static int bch2_check_discard_freespace_key(struct btree_trans *trans,
1341                                             struct btree_iter *iter,
1342                                             struct bpos end)
1343 {
1344         if (!btree_node_type_is_extents(iter->btree_id)) {
1345                 return __bch2_check_discard_freespace_key(trans, iter);
1346         } else {
1347                 int ret;
1348
1349                 while (!bkey_eq(iter->pos, end) &&
1350                        !(ret = btree_trans_too_many_iters(trans) ?:
1351                                __bch2_check_discard_freespace_key(trans, iter)))
1352                         bch2_btree_iter_set_pos(iter, bpos_nosnap_successor(iter->pos));
1353
1354                 return ret;
1355         }
1356 }
1357
1358 /*
1359  * We've already checked that generation numbers in the bucket_gens btree are
1360  * valid for buckets that exist; this just checks for keys for nonexistent
1361  * buckets.
1362  */
1363 static int bch2_check_bucket_gens_key(struct btree_trans *trans,
1364                                       struct btree_iter *iter,
1365                                       struct bkey_s_c k)
1366 {
1367         struct bch_fs *c = trans->c;
1368         struct bkey_i_bucket_gens g;
1369         struct bch_dev *ca;
1370         u64 start = bucket_gens_pos_to_alloc(k.k->p, 0).offset;
1371         u64 end = bucket_gens_pos_to_alloc(bpos_nosnap_successor(k.k->p), 0).offset;
1372         u64 b;
1373         bool need_update = false, dev_exists;
1374         struct printbuf buf = PRINTBUF;
1375         int ret = 0;
1376
1377         BUG_ON(k.k->type != KEY_TYPE_bucket_gens);
1378         bkey_reassemble(&g.k_i, k);
1379
1380         /* if no bch_dev, skip out whether we repair or not */
1381         dev_exists = bch2_dev_exists2(c, k.k->p.inode);
1382         if (!dev_exists) {
1383                 if (fsck_err_on(!dev_exists, c,
1384                                 "bucket_gens key for invalid device:\n  %s",
1385                                 (bch2_bkey_val_to_text(&buf, c, k), buf.buf))) {
1386                         ret = bch2_btree_delete_at(trans, iter, 0);
1387                 }
1388                 goto out;
1389         }
1390
1391         ca = bch_dev_bkey_exists(c, k.k->p.inode);
1392         if (fsck_err_on(end <= ca->mi.first_bucket ||
1393                         start >= ca->mi.nbuckets, c,
1394                         "bucket_gens key for invalid buckets:\n  %s",
1395                         (bch2_bkey_val_to_text(&buf, c, k), buf.buf))) {
1396                 ret = bch2_btree_delete_at(trans, iter, 0);
1397                 goto out;
1398         }
1399
1400         for (b = start; b < ca->mi.first_bucket; b++)
1401                 if (fsck_err_on(g.v.gens[b & KEY_TYPE_BUCKET_GENS_MASK], c,
1402                                 "bucket_gens key has nonzero gen for invalid bucket")) {
1403                         g.v.gens[b & KEY_TYPE_BUCKET_GENS_MASK] = 0;
1404                         need_update = true;
1405                 }
1406
1407         for (b = ca->mi.nbuckets; b < end; b++)
1408                 if (fsck_err_on(g.v.gens[b & KEY_TYPE_BUCKET_GENS_MASK], c,
1409                                 "bucket_gens key has nonzero gen for invalid bucket")) {
1410                         g.v.gens[b & KEY_TYPE_BUCKET_GENS_MASK] = 0;
1411                         need_update = true;
1412                 }
1413
1414         if (need_update) {
1415                 struct bkey_i *k;
1416
1417                 k = bch2_trans_kmalloc(trans, sizeof(g));
1418                 ret = PTR_ERR_OR_ZERO(k);
1419                 if (ret)
1420                         goto out;
1421
1422                 memcpy(k, &g, sizeof(g));
1423                 ret = bch2_trans_update(trans, iter, k, 0);
1424         }
1425 out:
1426 fsck_err:
1427         printbuf_exit(&buf);
1428         return ret;
1429 }
1430
1431 int bch2_check_alloc_info(struct bch_fs *c)
1432 {
1433         struct btree_trans trans;
1434         struct btree_iter iter, discard_iter, freespace_iter, bucket_gens_iter;
1435         struct bkey hole;
1436         struct bkey_s_c k;
1437         int ret = 0;
1438
1439         bch2_trans_init(&trans, c, 0, 0);
1440
1441         bch2_trans_iter_init(&trans, &iter, BTREE_ID_alloc, POS_MIN,
1442                              BTREE_ITER_PREFETCH);
1443         bch2_trans_iter_init(&trans, &discard_iter, BTREE_ID_need_discard, POS_MIN,
1444                              BTREE_ITER_PREFETCH);
1445         bch2_trans_iter_init(&trans, &freespace_iter, BTREE_ID_freespace, POS_MIN,
1446                              BTREE_ITER_PREFETCH);
1447         bch2_trans_iter_init(&trans, &bucket_gens_iter, BTREE_ID_bucket_gens, POS_MIN,
1448                              BTREE_ITER_PREFETCH);
1449
1450         while (1) {
1451                 struct bpos next;
1452
1453                 bch2_trans_begin(&trans);
1454
1455                 k = bch2_get_key_or_real_bucket_hole(&iter, &hole);
1456                 ret = bkey_err(k);
1457                 if (ret)
1458                         goto bkey_err;
1459
1460                 if (!k.k)
1461                         break;
1462
1463                 if (k.k->type) {
1464                         next = bpos_nosnap_successor(k.k->p);
1465
1466                         ret = bch2_check_alloc_key(&trans,
1467                                                    k, &iter,
1468                                                    &discard_iter,
1469                                                    &freespace_iter,
1470                                                    &bucket_gens_iter);
1471                         if (ret)
1472                                 goto bkey_err;
1473                 } else {
1474                         next = k.k->p;
1475
1476                         ret = bch2_check_alloc_hole_freespace(&trans,
1477                                                     bkey_start_pos(k.k),
1478                                                     &next,
1479                                                     &freespace_iter) ?:
1480                                 bch2_check_alloc_hole_bucket_gens(&trans,
1481                                                     bkey_start_pos(k.k),
1482                                                     &next,
1483                                                     &bucket_gens_iter);
1484                         if (ret)
1485                                 goto bkey_err;
1486                 }
1487
1488                 ret = bch2_trans_commit(&trans, NULL, NULL,
1489                                         BTREE_INSERT_NOFAIL|
1490                                         BTREE_INSERT_LAZY_RW);
1491                 if (ret)
1492                         goto bkey_err;
1493
1494                 bch2_btree_iter_set_pos(&iter, next);
1495 bkey_err:
1496                 if (bch2_err_matches(ret, BCH_ERR_transaction_restart))
1497                         continue;
1498                 if (ret)
1499                         break;
1500         }
1501         bch2_trans_iter_exit(&trans, &bucket_gens_iter);
1502         bch2_trans_iter_exit(&trans, &freespace_iter);
1503         bch2_trans_iter_exit(&trans, &discard_iter);
1504         bch2_trans_iter_exit(&trans, &iter);
1505
1506         if (ret < 0)
1507                 goto err;
1508
1509         ret = for_each_btree_key2(&trans, iter,
1510                         BTREE_ID_need_discard, POS_MIN,
1511                         BTREE_ITER_PREFETCH, k,
1512                 bch2_check_discard_freespace_key(&trans, &iter, k.k->p)) ?:
1513               for_each_btree_key2(&trans, iter,
1514                         BTREE_ID_freespace, POS_MIN,
1515                         BTREE_ITER_PREFETCH, k,
1516                 bch2_check_discard_freespace_key(&trans, &iter, k.k->p)) ?:
1517               for_each_btree_key_commit(&trans, iter,
1518                         BTREE_ID_bucket_gens, POS_MIN,
1519                         BTREE_ITER_PREFETCH, k,
1520                         NULL, NULL, BTREE_INSERT_NOFAIL|BTREE_INSERT_LAZY_RW,
1521                 bch2_check_bucket_gens_key(&trans, &iter, k));
1522 err:
1523         bch2_trans_exit(&trans);
1524         return ret < 0 ? ret : 0;
1525 }
1526
1527 static int bch2_check_alloc_to_lru_ref(struct btree_trans *trans,
1528                                        struct btree_iter *alloc_iter)
1529 {
1530         struct bch_fs *c = trans->c;
1531         struct btree_iter lru_iter;
1532         struct bch_alloc_v4 a_convert;
1533         const struct bch_alloc_v4 *a;
1534         struct bkey_s_c alloc_k, lru_k;
1535         struct printbuf buf = PRINTBUF;
1536         int ret;
1537
1538         alloc_k = bch2_btree_iter_peek(alloc_iter);
1539         if (!alloc_k.k)
1540                 return 0;
1541
1542         ret = bkey_err(alloc_k);
1543         if (ret)
1544                 return ret;
1545
1546         a = bch2_alloc_to_v4(alloc_k, &a_convert);
1547
1548         if (a->data_type != BCH_DATA_cached)
1549                 return 0;
1550
1551         lru_k = bch2_bkey_get_iter(trans, &lru_iter, BTREE_ID_lru,
1552                              lru_pos(alloc_k.k->p.inode,
1553                                      bucket_to_u64(alloc_k.k->p),
1554                                      a->io_time[READ]), 0);
1555         ret = bkey_err(lru_k);
1556         if (ret)
1557                 return ret;
1558
1559         if (fsck_err_on(!a->io_time[READ], c,
1560                         "cached bucket with read_time 0\n"
1561                         "  %s",
1562                 (printbuf_reset(&buf),
1563                  bch2_bkey_val_to_text(&buf, c, alloc_k), buf.buf)) ||
1564             fsck_err_on(lru_k.k->type != KEY_TYPE_set, c,
1565                         "missing lru entry\n"
1566                         "  %s",
1567                         (printbuf_reset(&buf),
1568                          bch2_bkey_val_to_text(&buf, c, alloc_k), buf.buf))) {
1569                 u64 read_time = a->io_time[READ] ?:
1570                         atomic64_read(&c->io_clock[READ].now);
1571
1572                 ret = bch2_lru_set(trans,
1573                                    alloc_k.k->p.inode,
1574                                    bucket_to_u64(alloc_k.k->p),
1575                                    read_time);
1576                 if (ret)
1577                         goto err;
1578
1579                 if (a->io_time[READ] != read_time) {
1580                         struct bkey_i_alloc_v4 *a_mut =
1581                                 bch2_alloc_to_v4_mut(trans, alloc_k);
1582                         ret = PTR_ERR_OR_ZERO(a_mut);
1583                         if (ret)
1584                                 goto err;
1585
1586                         a_mut->v.io_time[READ] = read_time;
1587                         ret = bch2_trans_update(trans, alloc_iter,
1588                                                 &a_mut->k_i, BTREE_TRIGGER_NORUN);
1589                         if (ret)
1590                                 goto err;
1591                 }
1592         }
1593 err:
1594 fsck_err:
1595         bch2_trans_iter_exit(trans, &lru_iter);
1596         printbuf_exit(&buf);
1597         return ret;
1598 }
1599
1600 int bch2_check_alloc_to_lru_refs(struct bch_fs *c)
1601 {
1602         struct btree_trans trans;
1603         struct btree_iter iter;
1604         struct bkey_s_c k;
1605         int ret = 0;
1606
1607         bch2_trans_init(&trans, c, 0, 0);
1608
1609         for_each_btree_key_commit(&trans, iter, BTREE_ID_alloc,
1610                         POS_MIN, BTREE_ITER_PREFETCH, k,
1611                         NULL, NULL, BTREE_INSERT_NOFAIL|BTREE_INSERT_LAZY_RW,
1612                 bch2_check_alloc_to_lru_ref(&trans, &iter));
1613
1614         bch2_trans_exit(&trans);
1615         return ret < 0 ? ret : 0;
1616 }
1617
1618 static int bch2_discard_one_bucket(struct btree_trans *trans,
1619                                    struct btree_iter *need_discard_iter,
1620                                    struct bpos *discard_pos_done,
1621                                    u64 *seen,
1622                                    u64 *open,
1623                                    u64 *need_journal_commit,
1624                                    u64 *discarded)
1625 {
1626         struct bch_fs *c = trans->c;
1627         struct bpos pos = need_discard_iter->pos;
1628         struct btree_iter iter = { NULL };
1629         struct bkey_s_c k;
1630         struct bch_dev *ca;
1631         struct bkey_i_alloc_v4 *a;
1632         struct printbuf buf = PRINTBUF;
1633         int ret = 0;
1634
1635         ca = bch_dev_bkey_exists(c, pos.inode);
1636         if (!percpu_ref_tryget(&ca->io_ref)) {
1637                 bch2_btree_iter_set_pos(need_discard_iter, POS(pos.inode + 1, 0));
1638                 return 0;
1639         }
1640
1641         if (bch2_bucket_is_open_safe(c, pos.inode, pos.offset)) {
1642                 (*open)++;
1643                 goto out;
1644         }
1645
1646         if (bch2_bucket_needs_journal_commit(&c->buckets_waiting_for_journal,
1647                         c->journal.flushed_seq_ondisk,
1648                         pos.inode, pos.offset)) {
1649                 (*need_journal_commit)++;
1650                 goto out;
1651         }
1652
1653         k = bch2_bkey_get_iter(trans, &iter, BTREE_ID_alloc,
1654                                need_discard_iter->pos,
1655                                BTREE_ITER_CACHED);
1656         ret = bkey_err(k);
1657         if (ret)
1658                 goto out;
1659
1660         a = bch2_alloc_to_v4_mut(trans, k);
1661         ret = PTR_ERR_OR_ZERO(a);
1662         if (ret)
1663                 goto out;
1664
1665         if (BCH_ALLOC_V4_NEED_INC_GEN(&a->v)) {
1666                 a->v.gen++;
1667                 SET_BCH_ALLOC_V4_NEED_INC_GEN(&a->v, false);
1668                 goto write;
1669         }
1670
1671         if (a->v.journal_seq > c->journal.flushed_seq_ondisk) {
1672                 if (test_bit(BCH_FS_CHECK_ALLOC_DONE, &c->flags)) {
1673                         bch2_trans_inconsistent(trans,
1674                                 "clearing need_discard but journal_seq %llu > flushed_seq %llu\n"
1675                                 "%s",
1676                                 a->v.journal_seq,
1677                                 c->journal.flushed_seq_ondisk,
1678                                 (bch2_bkey_val_to_text(&buf, c, k), buf.buf));
1679                         ret = -EIO;
1680                 }
1681                 goto out;
1682         }
1683
1684         if (a->v.data_type != BCH_DATA_need_discard) {
1685                 if (test_bit(BCH_FS_CHECK_ALLOC_DONE, &c->flags)) {
1686                         bch2_trans_inconsistent(trans,
1687                                 "bucket incorrectly set in need_discard btree\n"
1688                                 "%s",
1689                                 (bch2_bkey_val_to_text(&buf, c, k), buf.buf));
1690                         ret = -EIO;
1691                 }
1692
1693                 goto out;
1694         }
1695
1696         if (!bkey_eq(*discard_pos_done, iter.pos) &&
1697             ca->mi.discard && !c->opts.nochanges) {
1698                 /*
1699                  * This works without any other locks because this is the only
1700                  * thread that removes items from the need_discard tree
1701                  */
1702                 bch2_trans_unlock(trans);
1703                 blkdev_issue_discard(ca->disk_sb.bdev,
1704                                      k.k->p.offset * ca->mi.bucket_size,
1705                                      ca->mi.bucket_size,
1706                                      GFP_KERNEL);
1707                 *discard_pos_done = iter.pos;
1708
1709                 ret = bch2_trans_relock_notrace(trans);
1710                 if (ret)
1711                         goto out;
1712         }
1713
1714         SET_BCH_ALLOC_V4_NEED_DISCARD(&a->v, false);
1715         a->v.data_type = alloc_data_type(a->v, a->v.data_type);
1716 write:
1717         ret =   bch2_trans_update(trans, &iter, &a->k_i, 0) ?:
1718                 bch2_trans_commit(trans, NULL, NULL,
1719                                   BTREE_INSERT_USE_RESERVE|BTREE_INSERT_NOFAIL);
1720         if (ret)
1721                 goto out;
1722
1723         this_cpu_inc(c->counters[BCH_COUNTER_bucket_discard]);
1724         (*discarded)++;
1725 out:
1726         (*seen)++;
1727         bch2_trans_iter_exit(trans, &iter);
1728         percpu_ref_put(&ca->io_ref);
1729         printbuf_exit(&buf);
1730         return ret;
1731 }
1732
1733 static void bch2_do_discards_work(struct work_struct *work)
1734 {
1735         struct bch_fs *c = container_of(work, struct bch_fs, discard_work);
1736         struct btree_trans trans;
1737         struct btree_iter iter;
1738         struct bkey_s_c k;
1739         u64 seen = 0, open = 0, need_journal_commit = 0, discarded = 0;
1740         struct bpos discard_pos_done = POS_MAX;
1741         int ret;
1742
1743         bch2_trans_init(&trans, c, 0, 0);
1744
1745         /*
1746          * We're doing the commit in bch2_discard_one_bucket instead of using
1747          * for_each_btree_key_commit() so that we can increment counters after
1748          * successful commit:
1749          */
1750         ret = for_each_btree_key2(&trans, iter,
1751                         BTREE_ID_need_discard, POS_MIN, 0, k,
1752                 bch2_discard_one_bucket(&trans, &iter, &discard_pos_done,
1753                                         &seen,
1754                                         &open,
1755                                         &need_journal_commit,
1756                                         &discarded));
1757
1758         bch2_trans_exit(&trans);
1759
1760         if (need_journal_commit * 2 > seen)
1761                 bch2_journal_flush_async(&c->journal, NULL);
1762
1763         bch2_write_ref_put(c, BCH_WRITE_REF_discard);
1764
1765         trace_discard_buckets(c, seen, open, need_journal_commit, discarded,
1766                               bch2_err_str(ret));
1767 }
1768
1769 void bch2_do_discards(struct bch_fs *c)
1770 {
1771         if (bch2_write_ref_tryget(c, BCH_WRITE_REF_discard) &&
1772             !queue_work(c->write_ref_wq, &c->discard_work))
1773                 bch2_write_ref_put(c, BCH_WRITE_REF_discard);
1774 }
1775
1776 static int invalidate_one_bucket(struct btree_trans *trans,
1777                                  struct btree_iter *lru_iter,
1778                                  struct bkey_s_c lru_k,
1779                                  s64 *nr_to_invalidate)
1780 {
1781         struct bch_fs *c = trans->c;
1782         struct btree_iter alloc_iter = { NULL };
1783         struct bkey_i_alloc_v4 *a = NULL;
1784         struct printbuf buf = PRINTBUF;
1785         struct bpos bucket = u64_to_bucket(lru_k.k->p.offset);
1786         unsigned cached_sectors;
1787         int ret = 0;
1788
1789         if (*nr_to_invalidate <= 0)
1790                 return 1;
1791
1792         if (!bch2_dev_bucket_exists(c, bucket)) {
1793                 prt_str(&buf, "lru entry points to invalid bucket");
1794                 goto err;
1795         }
1796
1797         if (bch2_bucket_is_open_safe(c, bucket.inode, bucket.offset))
1798                 return 0;
1799
1800         a = bch2_trans_start_alloc_update(trans, &alloc_iter, bucket);
1801         ret = PTR_ERR_OR_ZERO(a);
1802         if (ret)
1803                 goto out;
1804
1805         /* We expect harmless races here due to the btree write buffer: */
1806         if (lru_pos_time(lru_iter->pos) != alloc_lru_idx_read(a->v))
1807                 goto out;
1808
1809         BUG_ON(a->v.data_type != BCH_DATA_cached);
1810
1811         if (!a->v.cached_sectors)
1812                 bch_err(c, "invalidating empty bucket, confused");
1813
1814         cached_sectors = a->v.cached_sectors;
1815
1816         SET_BCH_ALLOC_V4_NEED_INC_GEN(&a->v, false);
1817         a->v.gen++;
1818         a->v.data_type          = 0;
1819         a->v.dirty_sectors      = 0;
1820         a->v.cached_sectors     = 0;
1821         a->v.io_time[READ]      = atomic64_read(&c->io_clock[READ].now);
1822         a->v.io_time[WRITE]     = atomic64_read(&c->io_clock[WRITE].now);
1823
1824         ret =   bch2_trans_update(trans, &alloc_iter, &a->k_i,
1825                                 BTREE_TRIGGER_BUCKET_INVALIDATE) ?:
1826                 bch2_trans_commit(trans, NULL, NULL,
1827                                   BTREE_INSERT_USE_RESERVE|BTREE_INSERT_NOFAIL);
1828         if (ret)
1829                 goto out;
1830
1831         trace_and_count(c, bucket_invalidate, c, bucket.inode, bucket.offset, cached_sectors);
1832         --*nr_to_invalidate;
1833 out:
1834         bch2_trans_iter_exit(trans, &alloc_iter);
1835         printbuf_exit(&buf);
1836         return ret;
1837 err:
1838         prt_str(&buf, "\n  lru key: ");
1839         bch2_bkey_val_to_text(&buf, c, lru_k);
1840
1841         prt_str(&buf, "\n  lru entry: ");
1842         bch2_lru_pos_to_text(&buf, lru_iter->pos);
1843
1844         prt_str(&buf, "\n  alloc key: ");
1845         if (!a)
1846                 bch2_bpos_to_text(&buf, bucket);
1847         else
1848                 bch2_bkey_val_to_text(&buf, c, bkey_i_to_s_c(&a->k_i));
1849
1850         bch_err(c, "%s", buf.buf);
1851         if (test_bit(BCH_FS_CHECK_LRUS_DONE, &c->flags)) {
1852                 bch2_inconsistent_error(c);
1853                 ret = -EINVAL;
1854         }
1855
1856         goto out;
1857 }
1858
1859 static void bch2_do_invalidates_work(struct work_struct *work)
1860 {
1861         struct bch_fs *c = container_of(work, struct bch_fs, invalidate_work);
1862         struct bch_dev *ca;
1863         struct btree_trans trans;
1864         struct btree_iter iter;
1865         struct bkey_s_c k;
1866         unsigned i;
1867         int ret = 0;
1868
1869         bch2_trans_init(&trans, c, 0, 0);
1870
1871         ret = bch2_btree_write_buffer_flush(&trans);
1872         if (ret)
1873                 goto err;
1874
1875         for_each_member_device(ca, c, i) {
1876                 s64 nr_to_invalidate =
1877                         should_invalidate_buckets(ca, bch2_dev_usage_read(ca));
1878
1879                 ret = for_each_btree_key2_upto(&trans, iter, BTREE_ID_lru,
1880                                 lru_pos(ca->dev_idx, 0, 0),
1881                                 lru_pos(ca->dev_idx, U64_MAX, LRU_TIME_MAX),
1882                                 BTREE_ITER_INTENT, k,
1883                         invalidate_one_bucket(&trans, &iter, k, &nr_to_invalidate));
1884
1885                 if (ret < 0) {
1886                         percpu_ref_put(&ca->ref);
1887                         break;
1888                 }
1889         }
1890 err:
1891         bch2_trans_exit(&trans);
1892         bch2_write_ref_put(c, BCH_WRITE_REF_invalidate);
1893 }
1894
1895 void bch2_do_invalidates(struct bch_fs *c)
1896 {
1897         if (bch2_write_ref_tryget(c, BCH_WRITE_REF_invalidate) &&
1898             !queue_work(c->write_ref_wq, &c->invalidate_work))
1899                 bch2_write_ref_put(c, BCH_WRITE_REF_invalidate);
1900 }
1901
1902 static int bch2_dev_freespace_init(struct bch_fs *c, struct bch_dev *ca,
1903                                    unsigned long *last_updated)
1904 {
1905         struct btree_trans trans;
1906         struct btree_iter iter;
1907         struct bkey_s_c k;
1908         struct bkey hole;
1909         struct bpos end = POS(ca->dev_idx, ca->mi.nbuckets);
1910         struct bch_member *m;
1911         int ret;
1912
1913         bch2_trans_init(&trans, c, 0, 0);
1914
1915         bch2_trans_iter_init(&trans, &iter, BTREE_ID_alloc,
1916                              POS(ca->dev_idx, ca->mi.first_bucket),
1917                              BTREE_ITER_PREFETCH);
1918         /*
1919          * Scan the alloc btree for every bucket on @ca, and add buckets to the
1920          * freespace/need_discard/need_gc_gens btrees as needed:
1921          */
1922         while (1) {
1923                 if (*last_updated + HZ * 10 < jiffies) {
1924                         bch_info(ca, "%s: currently at %llu/%llu",
1925                                  __func__, iter.pos.offset, ca->mi.nbuckets);
1926                         *last_updated = jiffies;
1927                 }
1928
1929                 bch2_trans_begin(&trans);
1930
1931                 if (bkey_ge(iter.pos, end)) {
1932                         ret = 0;
1933                         break;
1934                 }
1935
1936                 k = bch2_get_key_or_hole(&iter, end, &hole);
1937                 ret = bkey_err(k);
1938                 if (ret)
1939                         goto bkey_err;
1940
1941                 if (k.k->type) {
1942                         /*
1943                          * We process live keys in the alloc btree one at a
1944                          * time:
1945                          */
1946                         struct bch_alloc_v4 a_convert;
1947                         const struct bch_alloc_v4 *a = bch2_alloc_to_v4(k, &a_convert);
1948
1949                         ret =   bch2_bucket_do_index(&trans, k, a, true) ?:
1950                                 bch2_trans_commit(&trans, NULL, NULL,
1951                                                   BTREE_INSERT_LAZY_RW|
1952                                                   BTREE_INSERT_NOFAIL);
1953                         if (ret)
1954                                 goto bkey_err;
1955
1956                         bch2_btree_iter_advance(&iter);
1957                 } else {
1958                         struct bkey_i *freespace;
1959
1960                         freespace = bch2_trans_kmalloc(&trans, sizeof(*freespace));
1961                         ret = PTR_ERR_OR_ZERO(freespace);
1962                         if (ret)
1963                                 goto bkey_err;
1964
1965                         bkey_init(&freespace->k);
1966                         freespace->k.type       = KEY_TYPE_set;
1967                         freespace->k.p          = k.k->p;
1968                         freespace->k.size       = k.k->size;
1969
1970                         ret = __bch2_btree_insert(&trans, BTREE_ID_freespace, freespace, 0) ?:
1971                                 bch2_trans_commit(&trans, NULL, NULL,
1972                                                   BTREE_INSERT_LAZY_RW|
1973                                                   BTREE_INSERT_NOFAIL);
1974                         if (ret)
1975                                 goto bkey_err;
1976
1977                         bch2_btree_iter_set_pos(&iter, k.k->p);
1978                 }
1979 bkey_err:
1980                 if (bch2_err_matches(ret, BCH_ERR_transaction_restart))
1981                         continue;
1982                 if (ret)
1983                         break;
1984         }
1985
1986         bch2_trans_iter_exit(&trans, &iter);
1987         bch2_trans_exit(&trans);
1988
1989         if (ret < 0) {
1990                 bch_err(ca, "error initializing free space: %s", bch2_err_str(ret));
1991                 return ret;
1992         }
1993
1994         mutex_lock(&c->sb_lock);
1995         m = bch2_sb_get_members(c->disk_sb.sb)->members + ca->dev_idx;
1996         SET_BCH_MEMBER_FREESPACE_INITIALIZED(m, true);
1997         mutex_unlock(&c->sb_lock);
1998
1999         return 0;
2000 }
2001
2002 int bch2_fs_freespace_init(struct bch_fs *c)
2003 {
2004         struct bch_dev *ca;
2005         unsigned i;
2006         int ret = 0;
2007         bool doing_init = false;
2008         unsigned long last_updated = jiffies;
2009
2010         /*
2011          * We can crash during the device add path, so we need to check this on
2012          * every mount:
2013          */
2014
2015         for_each_member_device(ca, c, i) {
2016                 if (ca->mi.freespace_initialized)
2017                         continue;
2018
2019                 if (!doing_init) {
2020                         bch_info(c, "initializing freespace");
2021                         doing_init = true;
2022                 }
2023
2024                 ret = bch2_dev_freespace_init(c, ca, &last_updated);
2025                 if (ret) {
2026                         percpu_ref_put(&ca->ref);
2027                         return ret;
2028                 }
2029         }
2030
2031         if (doing_init) {
2032                 mutex_lock(&c->sb_lock);
2033                 bch2_write_super(c);
2034                 mutex_unlock(&c->sb_lock);
2035
2036                 bch_verbose(c, "done initializing freespace");
2037         }
2038
2039         return ret;
2040 }
2041
2042 /* Bucket IO clocks: */
2043
2044 int bch2_bucket_io_time_reset(struct btree_trans *trans, unsigned dev,
2045                               size_t bucket_nr, int rw)
2046 {
2047         struct bch_fs *c = trans->c;
2048         struct btree_iter iter;
2049         struct bkey_i_alloc_v4 *a;
2050         u64 now;
2051         int ret = 0;
2052
2053         a = bch2_trans_start_alloc_update(trans, &iter,  POS(dev, bucket_nr));
2054         ret = PTR_ERR_OR_ZERO(a);
2055         if (ret)
2056                 return ret;
2057
2058         now = atomic64_read(&c->io_clock[rw].now);
2059         if (a->v.io_time[rw] == now)
2060                 goto out;
2061
2062         a->v.io_time[rw] = now;
2063
2064         ret   = bch2_trans_update(trans, &iter, &a->k_i, 0) ?:
2065                 bch2_trans_commit(trans, NULL, NULL, 0);
2066 out:
2067         bch2_trans_iter_exit(trans, &iter);
2068         return ret;
2069 }
2070
2071 /* Startup/shutdown (ro/rw): */
2072
2073 void bch2_recalc_capacity(struct bch_fs *c)
2074 {
2075         struct bch_dev *ca;
2076         u64 capacity = 0, reserved_sectors = 0, gc_reserve;
2077         unsigned bucket_size_max = 0;
2078         unsigned long ra_pages = 0;
2079         unsigned i;
2080
2081         lockdep_assert_held(&c->state_lock);
2082
2083         for_each_online_member(ca, c, i) {
2084                 struct backing_dev_info *bdi = ca->disk_sb.bdev->bd_disk->bdi;
2085
2086                 ra_pages += bdi->ra_pages;
2087         }
2088
2089         bch2_set_ra_pages(c, ra_pages);
2090
2091         for_each_rw_member(ca, c, i) {
2092                 u64 dev_reserve = 0;
2093
2094                 /*
2095                  * We need to reserve buckets (from the number
2096                  * of currently available buckets) against
2097                  * foreground writes so that mainly copygc can
2098                  * make forward progress.
2099                  *
2100                  * We need enough to refill the various reserves
2101                  * from scratch - copygc will use its entire
2102                  * reserve all at once, then run against when
2103                  * its reserve is refilled (from the formerly
2104                  * available buckets).
2105                  *
2106                  * This reserve is just used when considering if
2107                  * allocations for foreground writes must wait -
2108                  * not -ENOSPC calculations.
2109                  */
2110
2111                 dev_reserve += ca->nr_btree_reserve * 2;
2112                 dev_reserve += ca->mi.nbuckets >> 6; /* copygc reserve */
2113
2114                 dev_reserve += 1;       /* btree write point */
2115                 dev_reserve += 1;       /* copygc write point */
2116                 dev_reserve += 1;       /* rebalance write point */
2117
2118                 dev_reserve *= ca->mi.bucket_size;
2119
2120                 capacity += bucket_to_sector(ca, ca->mi.nbuckets -
2121                                              ca->mi.first_bucket);
2122
2123                 reserved_sectors += dev_reserve * 2;
2124
2125                 bucket_size_max = max_t(unsigned, bucket_size_max,
2126                                         ca->mi.bucket_size);
2127         }
2128
2129         gc_reserve = c->opts.gc_reserve_bytes
2130                 ? c->opts.gc_reserve_bytes >> 9
2131                 : div64_u64(capacity * c->opts.gc_reserve_percent, 100);
2132
2133         reserved_sectors = max(gc_reserve, reserved_sectors);
2134
2135         reserved_sectors = min(reserved_sectors, capacity);
2136
2137         c->capacity = capacity - reserved_sectors;
2138
2139         c->bucket_size_max = bucket_size_max;
2140
2141         /* Wake up case someone was waiting for buckets */
2142         closure_wake_up(&c->freelist_wait);
2143 }
2144
2145 static bool bch2_dev_has_open_write_point(struct bch_fs *c, struct bch_dev *ca)
2146 {
2147         struct open_bucket *ob;
2148         bool ret = false;
2149
2150         for (ob = c->open_buckets;
2151              ob < c->open_buckets + ARRAY_SIZE(c->open_buckets);
2152              ob++) {
2153                 spin_lock(&ob->lock);
2154                 if (ob->valid && !ob->on_partial_list &&
2155                     ob->dev == ca->dev_idx)
2156                         ret = true;
2157                 spin_unlock(&ob->lock);
2158         }
2159
2160         return ret;
2161 }
2162
2163 /* device goes ro: */
2164 void bch2_dev_allocator_remove(struct bch_fs *c, struct bch_dev *ca)
2165 {
2166         unsigned i;
2167
2168         /* First, remove device from allocation groups: */
2169
2170         for (i = 0; i < ARRAY_SIZE(c->rw_devs); i++)
2171                 clear_bit(ca->dev_idx, c->rw_devs[i].d);
2172
2173         /*
2174          * Capacity is calculated based off of devices in allocation groups:
2175          */
2176         bch2_recalc_capacity(c);
2177
2178         bch2_open_buckets_stop(c, ca, false);
2179
2180         /*
2181          * Wake up threads that were blocked on allocation, so they can notice
2182          * the device can no longer be removed and the capacity has changed:
2183          */
2184         closure_wake_up(&c->freelist_wait);
2185
2186         /*
2187          * journal_res_get() can block waiting for free space in the journal -
2188          * it needs to notice there may not be devices to allocate from anymore:
2189          */
2190         wake_up(&c->journal.wait);
2191
2192         /* Now wait for any in flight writes: */
2193
2194         closure_wait_event(&c->open_buckets_wait,
2195                            !bch2_dev_has_open_write_point(c, ca));
2196 }
2197
2198 /* device goes rw: */
2199 void bch2_dev_allocator_add(struct bch_fs *c, struct bch_dev *ca)
2200 {
2201         unsigned i;
2202
2203         for (i = 0; i < ARRAY_SIZE(c->rw_devs); i++)
2204                 if (ca->mi.data_allowed & (1 << i))
2205                         set_bit(ca->dev_idx, c->rw_devs[i].d);
2206 }
2207
2208 void bch2_fs_allocator_background_init(struct bch_fs *c)
2209 {
2210         spin_lock_init(&c->freelist_lock);
2211         INIT_WORK(&c->discard_work, bch2_do_discards_work);
2212         INIT_WORK(&c->invalidate_work, bch2_do_invalidates_work);
2213 }