1 // SPDX-License-Identifier: GPL-2.0-only
2 /*
3 * Block Translation Table
4 * Copyright (c) 2014-2015, Intel Corporation.
5 */
6 #include <linux/highmem.h>
7 #include <linux/debugfs.h>
8 #include <linux/blkdev.h>
9 #include <linux/blk-integrity.h>
10 #include <linux/pagemap.h>
11 #include <linux/module.h>
12 #include <linux/device.h>
13 #include <linux/mutex.h>
14 #include <linux/hdreg.h>
15 #include <linux/sizes.h>
16 #include <linux/ndctl.h>
17 #include <linux/fs.h>
18 #include <linux/nd.h>
19 #include <linux/backing-dev.h>
20 #include <linux/cleanup.h>
21 #include "btt.h"
22 #include "nd.h"
23
24 enum log_ent_request {
25 LOG_NEW_ENT = 0,
26 LOG_OLD_ENT
27 };
28
to_dev(struct arena_info * arena)29 static struct device *to_dev(struct arena_info *arena)
30 {
31 return &arena->nd_btt->dev;
32 }
33
adjust_initial_offset(struct nd_btt * nd_btt,u64 offset)34 static u64 adjust_initial_offset(struct nd_btt *nd_btt, u64 offset)
35 {
36 return offset + nd_btt->initial_offset;
37 }
38
arena_read_bytes(struct arena_info * arena,resource_size_t offset,void * buf,size_t n,unsigned long flags)39 static int arena_read_bytes(struct arena_info *arena, resource_size_t offset,
40 void *buf, size_t n, unsigned long flags)
41 {
42 struct nd_btt *nd_btt = arena->nd_btt;
43 struct nd_namespace_common *ndns = nd_btt->ndns;
44
45 /* arena offsets may be shifted from the base of the device */
46 offset = adjust_initial_offset(nd_btt, offset);
47 return nvdimm_read_bytes(ndns, offset, buf, n, flags);
48 }
49
arena_write_bytes(struct arena_info * arena,resource_size_t offset,void * buf,size_t n,unsigned long flags)50 static int arena_write_bytes(struct arena_info *arena, resource_size_t offset,
51 void *buf, size_t n, unsigned long flags)
52 {
53 struct nd_btt *nd_btt = arena->nd_btt;
54 struct nd_namespace_common *ndns = nd_btt->ndns;
55
56 /* arena offsets may be shifted from the base of the device */
57 offset = adjust_initial_offset(nd_btt, offset);
58 return nvdimm_write_bytes(ndns, offset, buf, n, flags);
59 }
60
btt_info_write(struct arena_info * arena,struct btt_sb * super)61 static int btt_info_write(struct arena_info *arena, struct btt_sb *super)
62 {
63 int ret;
64
65 /*
66 * infooff and info2off should always be at least 512B aligned.
67 * We rely on that to make sure rw_bytes does error clearing
68 * correctly, so make sure that is the case.
69 */
70 dev_WARN_ONCE(to_dev(arena), !IS_ALIGNED(arena->infooff, 512),
71 "arena->infooff: %#llx is unaligned\n", arena->infooff);
72 dev_WARN_ONCE(to_dev(arena), !IS_ALIGNED(arena->info2off, 512),
73 "arena->info2off: %#llx is unaligned\n", arena->info2off);
74
75 ret = arena_write_bytes(arena, arena->info2off, super,
76 sizeof(struct btt_sb), 0);
77 if (ret)
78 return ret;
79
80 return arena_write_bytes(arena, arena->infooff, super,
81 sizeof(struct btt_sb), 0);
82 }
83
btt_info_read(struct arena_info * arena,struct btt_sb * super)84 static int btt_info_read(struct arena_info *arena, struct btt_sb *super)
85 {
86 return arena_read_bytes(arena, arena->infooff, super,
87 sizeof(struct btt_sb), 0);
88 }
89
90 /*
91 * 'raw' version of btt_map write
92 * Assumptions:
93 * mapping is in little-endian
94 * mapping contains 'E' and 'Z' flags as desired
95 */
__btt_map_write(struct arena_info * arena,u32 lba,__le32 mapping,unsigned long flags)96 static int __btt_map_write(struct arena_info *arena, u32 lba, __le32 mapping,
97 unsigned long flags)
98 {
99 u64 ns_off = arena->mapoff + (lba * MAP_ENT_SIZE);
100
101 if (unlikely(lba >= arena->external_nlba))
102 dev_err_ratelimited(to_dev(arena),
103 "%s: lba %#x out of range (max: %#x)\n",
104 __func__, lba, arena->external_nlba);
105 return arena_write_bytes(arena, ns_off, &mapping, MAP_ENT_SIZE, flags);
106 }
107
btt_map_write(struct arena_info * arena,u32 lba,u32 mapping,u32 z_flag,u32 e_flag,unsigned long rwb_flags)108 static int btt_map_write(struct arena_info *arena, u32 lba, u32 mapping,
109 u32 z_flag, u32 e_flag, unsigned long rwb_flags)
110 {
111 u32 ze;
112 __le32 mapping_le;
113
114 /*
115 * This 'mapping' is supposed to be just the LBA mapping, without
116 * any flags set, so strip the flag bits.
117 */
118 mapping = ent_lba(mapping);
119
120 ze = (z_flag << 1) + e_flag;
121 switch (ze) {
122 case 0:
123 /*
124 * We want to set neither of the Z or E flags, and
125 * in the actual layout, this means setting the bit
126 * positions of both to '1' to indicate a 'normal'
127 * map entry
128 */
129 mapping |= MAP_ENT_NORMAL;
130 break;
131 case 1:
132 mapping |= (1 << MAP_ERR_SHIFT);
133 break;
134 case 2:
135 mapping |= (1 << MAP_TRIM_SHIFT);
136 break;
137 default:
138 /*
139 * The case where Z and E are both sent in as '1' could be
140 * construed as a valid 'normal' case, but we decide not to,
141 * to avoid confusion
142 */
143 dev_err_ratelimited(to_dev(arena),
144 "Invalid use of Z and E flags\n");
145 return -EIO;
146 }
147
148 mapping_le = cpu_to_le32(mapping);
149 return __btt_map_write(arena, lba, mapping_le, rwb_flags);
150 }
151
btt_map_read(struct arena_info * arena,u32 lba,u32 * mapping,int * trim,int * error,unsigned long rwb_flags)152 static int btt_map_read(struct arena_info *arena, u32 lba, u32 *mapping,
153 int *trim, int *error, unsigned long rwb_flags)
154 {
155 int ret;
156 __le32 in;
157 u32 raw_mapping, postmap, ze, z_flag, e_flag;
158 u64 ns_off = arena->mapoff + (lba * MAP_ENT_SIZE);
159
160 if (unlikely(lba >= arena->external_nlba))
161 dev_err_ratelimited(to_dev(arena),
162 "%s: lba %#x out of range (max: %#x)\n",
163 __func__, lba, arena->external_nlba);
164
165 ret = arena_read_bytes(arena, ns_off, &in, MAP_ENT_SIZE, rwb_flags);
166 if (ret)
167 return ret;
168
169 raw_mapping = le32_to_cpu(in);
170
171 z_flag = ent_z_flag(raw_mapping);
172 e_flag = ent_e_flag(raw_mapping);
173 ze = (z_flag << 1) + e_flag;
174 postmap = ent_lba(raw_mapping);
175
176 /* Reuse the {z,e}_flag variables for *trim and *error */
177 z_flag = 0;
178 e_flag = 0;
179
180 switch (ze) {
181 case 0:
182 /* Initial state. Return postmap = premap */
183 *mapping = lba;
184 break;
185 case 1:
186 *mapping = postmap;
187 e_flag = 1;
188 break;
189 case 2:
190 *mapping = postmap;
191 z_flag = 1;
192 break;
193 case 3:
194 *mapping = postmap;
195 break;
196 default:
197 return -EIO;
198 }
199
200 if (trim)
201 *trim = z_flag;
202 if (error)
203 *error = e_flag;
204
205 return ret;
206 }
207
btt_log_group_read(struct arena_info * arena,u32 lane,struct log_group * log)208 static int btt_log_group_read(struct arena_info *arena, u32 lane,
209 struct log_group *log)
210 {
211 return arena_read_bytes(arena,
212 arena->logoff + (lane * LOG_GRP_SIZE), log,
213 LOG_GRP_SIZE, 0);
214 }
215
216 static struct dentry *debugfs_root;
217
arena_debugfs_init(struct arena_info * a,struct dentry * parent,int idx)218 static void arena_debugfs_init(struct arena_info *a, struct dentry *parent,
219 int idx)
220 {
221 char dirname[32];
222 struct dentry *d;
223
224 /* If for some reason, parent bttN was not created, exit */
225 if (!parent)
226 return;
227
228 snprintf(dirname, 32, "arena%d", idx);
229 d = debugfs_create_dir(dirname, parent);
230 if (IS_ERR_OR_NULL(d))
231 return;
232 a->debugfs_dir = d;
233
234 debugfs_create_x64("size", S_IRUGO, d, &a->size);
235 debugfs_create_x64("external_lba_start", S_IRUGO, d,
236 &a->external_lba_start);
237 debugfs_create_x32("internal_nlba", S_IRUGO, d, &a->internal_nlba);
238 debugfs_create_u32("internal_lbasize", S_IRUGO, d,
239 &a->internal_lbasize);
240 debugfs_create_x32("external_nlba", S_IRUGO, d, &a->external_nlba);
241 debugfs_create_u32("external_lbasize", S_IRUGO, d,
242 &a->external_lbasize);
243 debugfs_create_u32("nfree", S_IRUGO, d, &a->nfree);
244 debugfs_create_u16("version_major", S_IRUGO, d, &a->version_major);
245 debugfs_create_u16("version_minor", S_IRUGO, d, &a->version_minor);
246 debugfs_create_x64("nextoff", S_IRUGO, d, &a->nextoff);
247 debugfs_create_x64("infooff", S_IRUGO, d, &a->infooff);
248 debugfs_create_x64("dataoff", S_IRUGO, d, &a->dataoff);
249 debugfs_create_x64("mapoff", S_IRUGO, d, &a->mapoff);
250 debugfs_create_x64("logoff", S_IRUGO, d, &a->logoff);
251 debugfs_create_x64("info2off", S_IRUGO, d, &a->info2off);
252 debugfs_create_x32("flags", S_IRUGO, d, &a->flags);
253 debugfs_create_u32("log_index_0", S_IRUGO, d, &a->log_index[0]);
254 debugfs_create_u32("log_index_1", S_IRUGO, d, &a->log_index[1]);
255 }
256
btt_debugfs_init(struct btt * btt)257 static void btt_debugfs_init(struct btt *btt)
258 {
259 int i = 0;
260 struct arena_info *arena;
261
262 btt->debugfs_dir = debugfs_create_dir(dev_name(&btt->nd_btt->dev),
263 debugfs_root);
264 if (IS_ERR_OR_NULL(btt->debugfs_dir))
265 return;
266
267 list_for_each_entry(arena, &btt->arena_list, list) {
268 arena_debugfs_init(arena, btt->debugfs_dir, i);
269 i++;
270 }
271 }
272
log_seq(struct log_group * log,int log_idx)273 static u32 log_seq(struct log_group *log, int log_idx)
274 {
275 return le32_to_cpu(log->ent[log_idx].seq);
276 }
277
278 /*
279 * This function accepts two log entries, and uses the
280 * sequence number to find the 'older' entry.
281 * It also updates the sequence number in this old entry to
282 * make it the 'new' one if the mark_flag is set.
283 * Finally, it returns which of the entries was the older one.
284 *
285 * TODO The logic feels a bit kludge-y. make it better..
286 */
btt_log_get_old(struct arena_info * a,struct log_group * log)287 static int btt_log_get_old(struct arena_info *a, struct log_group *log)
288 {
289 int idx0 = a->log_index[0];
290 int idx1 = a->log_index[1];
291 int old;
292
293 /*
294 * the first ever time this is seen, the entry goes into [0]
295 * the next time, the following logic works out to put this
296 * (next) entry into [1]
297 */
298 if (log_seq(log, idx0) == 0) {
299 log->ent[idx0].seq = cpu_to_le32(1);
300 return 0;
301 }
302
303 if (log_seq(log, idx0) == log_seq(log, idx1))
304 return -EINVAL;
305 if (log_seq(log, idx0) + log_seq(log, idx1) > 5)
306 return -EINVAL;
307
308 if (log_seq(log, idx0) < log_seq(log, idx1)) {
309 if ((log_seq(log, idx1) - log_seq(log, idx0)) == 1)
310 old = 0;
311 else
312 old = 1;
313 } else {
314 if ((log_seq(log, idx0) - log_seq(log, idx1)) == 1)
315 old = 1;
316 else
317 old = 0;
318 }
319
320 return old;
321 }
322
323 /*
324 * This function copies the desired (old/new) log entry into ent if
325 * it is not NULL. It returns the sub-slot number (0 or 1)
326 * where the desired log entry was found. Negative return values
327 * indicate errors.
328 */
btt_log_read(struct arena_info * arena,u32 lane,struct log_entry * ent,int old_flag)329 static int btt_log_read(struct arena_info *arena, u32 lane,
330 struct log_entry *ent, int old_flag)
331 {
332 int ret;
333 int old_ent, ret_ent;
334 struct log_group log;
335
336 ret = btt_log_group_read(arena, lane, &log);
337 if (ret)
338 return -EIO;
339
340 old_ent = btt_log_get_old(arena, &log);
341 if (old_ent < 0 || old_ent > 1) {
342 dev_err(to_dev(arena),
343 "log corruption (%d): lane %d seq [%d, %d]\n",
344 old_ent, lane, log.ent[arena->log_index[0]].seq,
345 log.ent[arena->log_index[1]].seq);
346 /* TODO set error state? */
347 return -EIO;
348 }
349
350 ret_ent = (old_flag ? old_ent : (1 - old_ent));
351
352 if (ent != NULL)
353 memcpy(ent, &log.ent[arena->log_index[ret_ent]], LOG_ENT_SIZE);
354
355 return ret_ent;
356 }
357
358 /*
359 * This function commits a log entry to media
360 * It does _not_ prepare the freelist entry for the next write
361 * btt_flog_write is the wrapper for updating the freelist elements
362 */
__btt_log_write(struct arena_info * arena,u32 lane,u32 sub,struct log_entry * ent,unsigned long flags)363 static int __btt_log_write(struct arena_info *arena, u32 lane,
364 u32 sub, struct log_entry *ent, unsigned long flags)
365 {
366 int ret;
367 u32 group_slot = arena->log_index[sub];
368 unsigned int log_half = LOG_ENT_SIZE / 2;
369 void *src = ent;
370 u64 ns_off;
371
372 ns_off = arena->logoff + (lane * LOG_GRP_SIZE) +
373 (group_slot * LOG_ENT_SIZE);
374 /* split the 16B write into atomic, durable halves */
375 ret = arena_write_bytes(arena, ns_off, src, log_half, flags);
376 if (ret)
377 return ret;
378
379 ns_off += log_half;
380 src += log_half;
381 return arena_write_bytes(arena, ns_off, src, log_half, flags);
382 }
383
btt_flog_write(struct arena_info * arena,u32 lane,u32 sub,struct log_entry * ent)384 static int btt_flog_write(struct arena_info *arena, u32 lane, u32 sub,
385 struct log_entry *ent)
386 {
387 int ret;
388
389 ret = __btt_log_write(arena, lane, sub, ent, NVDIMM_IO_ATOMIC);
390 if (ret)
391 return ret;
392
393 /* prepare the next free entry */
394 arena->freelist[lane].sub = 1 - arena->freelist[lane].sub;
395 if (++(arena->freelist[lane].seq) == 4)
396 arena->freelist[lane].seq = 1;
397 if (ent_e_flag(le32_to_cpu(ent->old_map)))
398 arena->freelist[lane].has_err = 1;
399 arena->freelist[lane].block = ent_lba(le32_to_cpu(ent->old_map));
400
401 return ret;
402 }
403
404 /*
405 * This function initializes the BTT map to the initial state, which is
406 * all-zeroes, and indicates an identity mapping
407 */
btt_map_init(struct arena_info * arena)408 static int btt_map_init(struct arena_info *arena)
409 {
410 int ret = -EINVAL;
411 void *zerobuf;
412 size_t offset = 0;
413 size_t chunk_size = SZ_2M;
414 size_t mapsize = arena->logoff - arena->mapoff;
415
416 zerobuf = kzalloc(chunk_size, GFP_KERNEL);
417 if (!zerobuf)
418 return -ENOMEM;
419
420 /*
421 * mapoff should always be at least 512B aligned. We rely on that to
422 * make sure rw_bytes does error clearing correctly, so make sure that
423 * is the case.
424 */
425 dev_WARN_ONCE(to_dev(arena), !IS_ALIGNED(arena->mapoff, 512),
426 "arena->mapoff: %#llx is unaligned\n", arena->mapoff);
427
428 while (mapsize) {
429 size_t size = min(mapsize, chunk_size);
430
431 dev_WARN_ONCE(to_dev(arena), size < 512,
432 "chunk size: %#zx is unaligned\n", size);
433 ret = arena_write_bytes(arena, arena->mapoff + offset, zerobuf,
434 size, 0);
435 if (ret)
436 goto free;
437
438 offset += size;
439 mapsize -= size;
440 cond_resched();
441 }
442
443 free:
444 kfree(zerobuf);
445 return ret;
446 }
447
448 /*
449 * This function initializes the BTT log with 'fake' entries pointing
450 * to the initial reserved set of blocks as being free
451 */
btt_log_init(struct arena_info * arena)452 static int btt_log_init(struct arena_info *arena)
453 {
454 size_t logsize = arena->info2off - arena->logoff;
455 size_t chunk_size = SZ_4K, offset = 0;
456 struct log_entry ent;
457 void *zerobuf;
458 int ret;
459 u32 i;
460
461 zerobuf = kzalloc(chunk_size, GFP_KERNEL);
462 if (!zerobuf)
463 return -ENOMEM;
464 /*
465 * logoff should always be at least 512B aligned. We rely on that to
466 * make sure rw_bytes does error clearing correctly, so make sure that
467 * is the case.
468 */
469 dev_WARN_ONCE(to_dev(arena), !IS_ALIGNED(arena->logoff, 512),
470 "arena->logoff: %#llx is unaligned\n", arena->logoff);
471
472 while (logsize) {
473 size_t size = min(logsize, chunk_size);
474
475 dev_WARN_ONCE(to_dev(arena), size < 512,
476 "chunk size: %#zx is unaligned\n", size);
477 ret = arena_write_bytes(arena, arena->logoff + offset, zerobuf,
478 size, 0);
479 if (ret)
480 goto free;
481
482 offset += size;
483 logsize -= size;
484 cond_resched();
485 }
486
487 for (i = 0; i < arena->nfree; i++) {
488 ent.lba = cpu_to_le32(i);
489 ent.old_map = cpu_to_le32(arena->external_nlba + i);
490 ent.new_map = cpu_to_le32(arena->external_nlba + i);
491 ent.seq = cpu_to_le32(LOG_SEQ_INIT);
492 ret = __btt_log_write(arena, i, 0, &ent, 0);
493 if (ret)
494 goto free;
495 }
496
497 free:
498 kfree(zerobuf);
499 return ret;
500 }
501
to_namespace_offset(struct arena_info * arena,u64 lba)502 static u64 to_namespace_offset(struct arena_info *arena, u64 lba)
503 {
504 return arena->dataoff + ((u64)lba * arena->internal_lbasize);
505 }
506
arena_clear_freelist_error(struct arena_info * arena,u32 lane)507 static int arena_clear_freelist_error(struct arena_info *arena, u32 lane)
508 {
509 int ret = 0;
510
511 if (arena->freelist[lane].has_err) {
512 void *zero_page = page_address(ZERO_PAGE(0));
513 u32 lba = arena->freelist[lane].block;
514 u64 nsoff = to_namespace_offset(arena, lba);
515 unsigned long len = arena->sector_size;
516
517 mutex_lock(&arena->err_lock);
518
519 while (len) {
520 unsigned long chunk = min(len, PAGE_SIZE);
521
522 ret = arena_write_bytes(arena, nsoff, zero_page,
523 chunk, 0);
524 if (ret)
525 break;
526 len -= chunk;
527 nsoff += chunk;
528 if (len == 0)
529 arena->freelist[lane].has_err = 0;
530 }
531 mutex_unlock(&arena->err_lock);
532 }
533 return ret;
534 }
535
btt_freelist_init(struct arena_info * arena)536 static int btt_freelist_init(struct arena_info *arena)
537 {
538 int new, ret;
539 struct log_entry log_new;
540 u32 i, map_entry, log_oldmap, log_newmap;
541
542 arena->freelist = kzalloc_objs(struct free_entry, arena->nfree);
543 if (!arena->freelist)
544 return -ENOMEM;
545
546 for (i = 0; i < arena->nfree; i++) {
547 new = btt_log_read(arena, i, &log_new, LOG_NEW_ENT);
548 if (new < 0)
549 return new;
550
551 /* old and new map entries with any flags stripped out */
552 log_oldmap = ent_lba(le32_to_cpu(log_new.old_map));
553 log_newmap = ent_lba(le32_to_cpu(log_new.new_map));
554
555 /* sub points to the next one to be overwritten */
556 arena->freelist[i].sub = 1 - new;
557 arena->freelist[i].seq = nd_inc_seq(le32_to_cpu(log_new.seq));
558 arena->freelist[i].block = log_oldmap;
559
560 /*
561 * FIXME: if error clearing fails during init, we want to make
562 * the BTT read-only
563 */
564 if (ent_e_flag(le32_to_cpu(log_new.old_map)) &&
565 !ent_normal(le32_to_cpu(log_new.old_map))) {
566 arena->freelist[i].has_err = 1;
567 ret = arena_clear_freelist_error(arena, i);
568 if (ret)
569 dev_err_ratelimited(to_dev(arena),
570 "Unable to clear known errors\n");
571 }
572
573 /* This implies a newly created or untouched flog entry */
574 if (log_oldmap == log_newmap)
575 continue;
576
577 /* Check if map recovery is needed */
578 ret = btt_map_read(arena, le32_to_cpu(log_new.lba), &map_entry,
579 NULL, NULL, 0);
580 if (ret)
581 return ret;
582
583 /*
584 * The map_entry from btt_read_map is stripped of any flag bits,
585 * so use the stripped out versions from the log as well for
586 * testing whether recovery is needed. For restoration, use the
587 * 'raw' version of the log entries as that captured what we
588 * were going to write originally.
589 */
590 if ((log_newmap != map_entry) && (log_oldmap == map_entry)) {
591 /*
592 * Last transaction wrote the flog, but wasn't able
593 * to complete the map write. So fix up the map.
594 */
595 ret = btt_map_write(arena, le32_to_cpu(log_new.lba),
596 le32_to_cpu(log_new.new_map), 0, 0, 0);
597 if (ret)
598 return ret;
599 }
600 }
601
602 return 0;
603 }
604
ent_is_padding(struct log_entry * ent)605 static bool ent_is_padding(struct log_entry *ent)
606 {
607 return (ent->lba == 0) && (ent->old_map == 0) && (ent->new_map == 0)
608 && (ent->seq == 0);
609 }
610
611 /*
612 * Detecting valid log indices: We read a log group (see the comments in btt.h
613 * for a description of a 'log_group' and its 'slots'), and iterate over its
614 * four slots. We expect that a padding slot will be all-zeroes, and use this
615 * to detect a padding slot vs. an actual entry.
616 *
617 * If a log_group is in the initial state, i.e. hasn't been used since the
618 * creation of this BTT layout, it will have three of the four slots with
619 * zeroes. We skip over these log_groups for the detection of log_index. If
620 * all log_groups are in the initial state (i.e. the BTT has never been
621 * written to), it is safe to assume the 'new format' of log entries in slots
622 * (0, 1).
623 */
log_set_indices(struct arena_info * arena)624 static int log_set_indices(struct arena_info *arena)
625 {
626 bool idx_set = false, initial_state = true;
627 int ret, log_index[2] = {-1, -1};
628 u32 i, j, next_idx = 0;
629 struct log_group log;
630 u32 pad_count = 0;
631
632 for (i = 0; i < arena->nfree; i++) {
633 ret = btt_log_group_read(arena, i, &log);
634 if (ret < 0)
635 return ret;
636
637 for (j = 0; j < 4; j++) {
638 if (!idx_set) {
639 if (ent_is_padding(&log.ent[j])) {
640 pad_count++;
641 continue;
642 } else {
643 /* Skip if index has been recorded */
644 if ((next_idx == 1) &&
645 (j == log_index[0]))
646 continue;
647 /* valid entry, record index */
648 log_index[next_idx] = j;
649 next_idx++;
650 }
651 if (next_idx == 2) {
652 /* two valid entries found */
653 idx_set = true;
654 } else if (next_idx > 2) {
655 /* too many valid indices */
656 return -ENXIO;
657 }
658 } else {
659 /*
660 * once the indices have been set, just verify
661 * that all subsequent log groups are either in
662 * their initial state or follow the same
663 * indices.
664 */
665 if (j == log_index[0]) {
666 /* entry must be 'valid' */
667 if (ent_is_padding(&log.ent[j]))
668 return -ENXIO;
669 } else if (j == log_index[1]) {
670 ;
671 /*
672 * log_index[1] can be padding if the
673 * lane never got used and it is still
674 * in the initial state (three 'padding'
675 * entries)
676 */
677 } else {
678 /* entry must be invalid (padding) */
679 if (!ent_is_padding(&log.ent[j]))
680 return -ENXIO;
681 }
682 }
683 }
684 /*
685 * If any of the log_groups have more than one valid,
686 * non-padding entry, then the we are no longer in the
687 * initial_state
688 */
689 if (pad_count < 3)
690 initial_state = false;
691 pad_count = 0;
692 }
693
694 if (!initial_state && !idx_set)
695 return -ENXIO;
696
697 /*
698 * If all the entries in the log were in the initial state,
699 * assume new padding scheme
700 */
701 if (initial_state)
702 log_index[1] = 1;
703
704 /*
705 * Only allow the known permutations of log/padding indices,
706 * i.e. (0, 1), and (0, 2)
707 */
708 if ((log_index[0] == 0) && ((log_index[1] == 1) || (log_index[1] == 2)))
709 ; /* known index possibilities */
710 else {
711 dev_err(to_dev(arena), "Found an unknown padding scheme\n");
712 return -ENXIO;
713 }
714
715 arena->log_index[0] = log_index[0];
716 arena->log_index[1] = log_index[1];
717 dev_dbg(to_dev(arena), "log_index_0 = %d\n", log_index[0]);
718 dev_dbg(to_dev(arena), "log_index_1 = %d\n", log_index[1]);
719 return 0;
720 }
721
btt_rtt_init(struct arena_info * arena)722 static int btt_rtt_init(struct arena_info *arena)
723 {
724 arena->rtt = kcalloc(arena->nfree, sizeof(u32), GFP_KERNEL);
725 if (arena->rtt == NULL)
726 return -ENOMEM;
727
728 return 0;
729 }
730
btt_maplocks_init(struct arena_info * arena)731 static int btt_maplocks_init(struct arena_info *arena)
732 {
733 u32 i;
734
735 arena->map_locks = kzalloc_objs(struct aligned_lock, arena->nfree);
736 if (!arena->map_locks)
737 return -ENOMEM;
738
739 for (i = 0; i < arena->nfree; i++)
740 spin_lock_init(&arena->map_locks[i].lock);
741
742 return 0;
743 }
744
alloc_arena(struct btt * btt,size_t size,size_t start,size_t arena_off)745 static struct arena_info *alloc_arena(struct btt *btt, size_t size,
746 size_t start, size_t arena_off)
747 {
748 struct arena_info *arena;
749 u64 logsize, mapsize, datasize;
750 u64 available = size;
751
752 arena = kzalloc_obj(*arena);
753 if (!arena)
754 return NULL;
755 arena->nd_btt = btt->nd_btt;
756 arena->sector_size = btt->sector_size;
757 mutex_init(&arena->err_lock);
758
759 if (!size)
760 return arena;
761
762 arena->size = size;
763 arena->external_lba_start = start;
764 arena->external_lbasize = btt->lbasize;
765 arena->internal_lbasize = roundup(arena->external_lbasize,
766 INT_LBASIZE_ALIGNMENT);
767 arena->nfree = BTT_DEFAULT_NFREE;
768 arena->version_major = btt->nd_btt->version_major;
769 arena->version_minor = btt->nd_btt->version_minor;
770
771 if (available % BTT_PG_SIZE)
772 available -= (available % BTT_PG_SIZE);
773
774 /* Two pages are reserved for the super block and its copy */
775 available -= 2 * BTT_PG_SIZE;
776
777 /* The log takes a fixed amount of space based on nfree */
778 logsize = roundup(arena->nfree * LOG_GRP_SIZE, BTT_PG_SIZE);
779 available -= logsize;
780
781 /* Calculate optimal split between map and data area */
782 arena->internal_nlba = div_u64(available - BTT_PG_SIZE,
783 arena->internal_lbasize + MAP_ENT_SIZE);
784 arena->external_nlba = arena->internal_nlba - arena->nfree;
785
786 mapsize = roundup((arena->external_nlba * MAP_ENT_SIZE), BTT_PG_SIZE);
787 datasize = available - mapsize;
788
789 /* 'Absolute' values, relative to start of storage space */
790 arena->infooff = arena_off;
791 arena->dataoff = arena->infooff + BTT_PG_SIZE;
792 arena->mapoff = arena->dataoff + datasize;
793 arena->logoff = arena->mapoff + mapsize;
794 arena->info2off = arena->logoff + logsize;
795
796 /* Default log indices are (0,1) */
797 arena->log_index[0] = 0;
798 arena->log_index[1] = 1;
799 return arena;
800 }
801
free_arenas(struct btt * btt)802 static void free_arenas(struct btt *btt)
803 {
804 struct arena_info *arena, *next;
805
806 list_for_each_entry_safe(arena, next, &btt->arena_list, list) {
807 list_del(&arena->list);
808 kfree(arena->rtt);
809 kfree(arena->map_locks);
810 kfree(arena->freelist);
811 debugfs_remove_recursive(arena->debugfs_dir);
812 kfree(arena);
813 }
814 }
815
816 /*
817 * This function reads an existing valid btt superblock and
818 * populates the corresponding arena_info struct
819 */
parse_arena_meta(struct arena_info * arena,struct btt_sb * super,u64 arena_off)820 static void parse_arena_meta(struct arena_info *arena, struct btt_sb *super,
821 u64 arena_off)
822 {
823 arena->internal_nlba = le32_to_cpu(super->internal_nlba);
824 arena->internal_lbasize = le32_to_cpu(super->internal_lbasize);
825 arena->external_nlba = le32_to_cpu(super->external_nlba);
826 arena->external_lbasize = le32_to_cpu(super->external_lbasize);
827 arena->nfree = le32_to_cpu(super->nfree);
828 arena->version_major = le16_to_cpu(super->version_major);
829 arena->version_minor = le16_to_cpu(super->version_minor);
830
831 arena->nextoff = (super->nextoff == 0) ? 0 : (arena_off +
832 le64_to_cpu(super->nextoff));
833 arena->infooff = arena_off;
834 arena->dataoff = arena_off + le64_to_cpu(super->dataoff);
835 arena->mapoff = arena_off + le64_to_cpu(super->mapoff);
836 arena->logoff = arena_off + le64_to_cpu(super->logoff);
837 arena->info2off = arena_off + le64_to_cpu(super->info2off);
838
839 arena->size = (le64_to_cpu(super->nextoff) > 0)
840 ? (le64_to_cpu(super->nextoff))
841 : (arena->info2off - arena->infooff + BTT_PG_SIZE);
842
843 arena->flags = le32_to_cpu(super->flags);
844 }
845
discover_arenas(struct btt * btt)846 static int discover_arenas(struct btt *btt)
847 {
848 int ret = 0;
849 struct arena_info *arena;
850 size_t remaining = btt->rawsize;
851 u64 cur_nlba = 0;
852 size_t cur_off = 0;
853 int num_arenas = 0;
854
855 struct btt_sb *super __free(kfree) = kzalloc_obj(*super);
856 if (!super)
857 return -ENOMEM;
858
859 while (remaining) {
860 /* Alloc memory for arena */
861 arena = alloc_arena(btt, 0, 0, 0);
862 if (!arena)
863 return -ENOMEM;
864
865 arena->infooff = cur_off;
866 ret = btt_info_read(arena, super);
867 if (ret)
868 goto out;
869
870 if (!nd_btt_arena_is_valid(btt->nd_btt, super)) {
871 if (remaining == btt->rawsize) {
872 btt->init_state = INIT_NOTFOUND;
873 dev_info(to_dev(arena), "No existing arenas\n");
874 goto out;
875 } else {
876 dev_err(to_dev(arena),
877 "Found corrupted metadata!\n");
878 ret = -ENODEV;
879 goto out;
880 }
881 }
882
883 arena->external_lba_start = cur_nlba;
884 parse_arena_meta(arena, super, cur_off);
885
886 ret = log_set_indices(arena);
887 if (ret) {
888 dev_err(to_dev(arena),
889 "Unable to deduce log/padding indices\n");
890 goto out;
891 }
892
893 ret = btt_freelist_init(arena);
894 if (ret)
895 goto out;
896
897 ret = btt_rtt_init(arena);
898 if (ret)
899 goto out;
900
901 ret = btt_maplocks_init(arena);
902 if (ret)
903 goto out;
904
905 list_add_tail(&arena->list, &btt->arena_list);
906
907 remaining -= arena->size;
908 cur_off += arena->size;
909 cur_nlba += arena->external_nlba;
910 num_arenas++;
911
912 if (arena->nextoff == 0)
913 break;
914 }
915 btt->num_arenas = num_arenas;
916 btt->nlba = cur_nlba;
917 btt->init_state = INIT_READY;
918
919 return ret;
920
921 out:
922 kfree(arena);
923 free_arenas(btt);
924 return ret;
925 }
926
create_arenas(struct btt * btt)927 static int create_arenas(struct btt *btt)
928 {
929 size_t remaining = btt->rawsize;
930 size_t cur_off = 0;
931
932 while (remaining) {
933 struct arena_info *arena;
934 size_t arena_size = min_t(u64, ARENA_MAX_SIZE, remaining);
935
936 remaining -= arena_size;
937 if (arena_size < ARENA_MIN_SIZE)
938 break;
939
940 arena = alloc_arena(btt, arena_size, btt->nlba, cur_off);
941 if (!arena) {
942 free_arenas(btt);
943 return -ENOMEM;
944 }
945 btt->nlba += arena->external_nlba;
946 if (remaining >= ARENA_MIN_SIZE)
947 arena->nextoff = arena->size;
948 else
949 arena->nextoff = 0;
950 cur_off += arena_size;
951 list_add_tail(&arena->list, &btt->arena_list);
952 }
953
954 return 0;
955 }
956
957 /*
958 * This function completes arena initialization by writing
959 * all the metadata.
960 * It is only called for an uninitialized arena when a write
961 * to that arena occurs for the first time.
962 */
btt_arena_write_layout(struct arena_info * arena)963 static int btt_arena_write_layout(struct arena_info *arena)
964 {
965 int ret;
966 u64 sum;
967 struct btt_sb *super;
968 struct nd_btt *nd_btt = arena->nd_btt;
969 const uuid_t *parent_uuid = nd_dev_to_uuid(&nd_btt->ndns->dev);
970
971 ret = btt_map_init(arena);
972 if (ret)
973 return ret;
974
975 ret = btt_log_init(arena);
976 if (ret)
977 return ret;
978
979 super = kzalloc_obj(*super, GFP_NOIO);
980 if (!super)
981 return -ENOMEM;
982
983 strscpy(super->signature, BTT_SIG, sizeof(super->signature));
984 export_uuid(super->uuid, nd_btt->uuid);
985 export_uuid(super->parent_uuid, parent_uuid);
986 super->flags = cpu_to_le32(arena->flags);
987 super->version_major = cpu_to_le16(arena->version_major);
988 super->version_minor = cpu_to_le16(arena->version_minor);
989 super->external_lbasize = cpu_to_le32(arena->external_lbasize);
990 super->external_nlba = cpu_to_le32(arena->external_nlba);
991 super->internal_lbasize = cpu_to_le32(arena->internal_lbasize);
992 super->internal_nlba = cpu_to_le32(arena->internal_nlba);
993 super->nfree = cpu_to_le32(arena->nfree);
994 super->infosize = cpu_to_le32(sizeof(struct btt_sb));
995 super->nextoff = cpu_to_le64(arena->nextoff);
996 /*
997 * Subtract arena->infooff (arena start) so numbers are relative
998 * to 'this' arena
999 */
1000 super->dataoff = cpu_to_le64(arena->dataoff - arena->infooff);
1001 super->mapoff = cpu_to_le64(arena->mapoff - arena->infooff);
1002 super->logoff = cpu_to_le64(arena->logoff - arena->infooff);
1003 super->info2off = cpu_to_le64(arena->info2off - arena->infooff);
1004
1005 super->flags = 0;
1006 sum = nd_sb_checksum((struct nd_gen_sb *) super);
1007 super->checksum = cpu_to_le64(sum);
1008
1009 ret = btt_info_write(arena, super);
1010
1011 kfree(super);
1012 return ret;
1013 }
1014
1015 /*
1016 * This function completes the initialization for the BTT namespace
1017 * such that it is ready to accept IOs
1018 */
btt_meta_init(struct btt * btt)1019 static int btt_meta_init(struct btt *btt)
1020 {
1021 int ret = 0;
1022 struct arena_info *arena;
1023
1024 mutex_lock(&btt->init_lock);
1025 list_for_each_entry(arena, &btt->arena_list, list) {
1026 ret = btt_arena_write_layout(arena);
1027 if (ret)
1028 goto unlock;
1029
1030 ret = btt_freelist_init(arena);
1031 if (ret)
1032 goto unlock;
1033
1034 ret = btt_rtt_init(arena);
1035 if (ret)
1036 goto unlock;
1037
1038 ret = btt_maplocks_init(arena);
1039 if (ret)
1040 goto unlock;
1041 }
1042
1043 btt->init_state = INIT_READY;
1044
1045 unlock:
1046 mutex_unlock(&btt->init_lock);
1047 return ret;
1048 }
1049
btt_meta_size(struct btt * btt)1050 static u32 btt_meta_size(struct btt *btt)
1051 {
1052 return btt->lbasize - btt->sector_size;
1053 }
1054
1055 /*
1056 * This function calculates the arena in which the given LBA lies
1057 * by doing a linear walk. This is acceptable since we expect only
1058 * a few arenas. If we have backing devices that get much larger,
1059 * we can construct a balanced binary tree of arenas at init time
1060 * so that this range search becomes faster.
1061 */
lba_to_arena(struct btt * btt,sector_t sector,__u32 * premap,struct arena_info ** arena)1062 static int lba_to_arena(struct btt *btt, sector_t sector, __u32 *premap,
1063 struct arena_info **arena)
1064 {
1065 struct arena_info *arena_list;
1066 __u64 lba = div_u64(sector << SECTOR_SHIFT, btt->sector_size);
1067
1068 list_for_each_entry(arena_list, &btt->arena_list, list) {
1069 if (lba < arena_list->external_nlba) {
1070 *arena = arena_list;
1071 *premap = lba;
1072 return 0;
1073 }
1074 lba -= arena_list->external_nlba;
1075 }
1076
1077 return -EIO;
1078 }
1079
1080 /*
1081 * The following (lock_map, unlock_map) are mostly just to improve
1082 * readability, since they index into an array of locks
1083 */
lock_map(struct arena_info * arena,u32 premap)1084 static void lock_map(struct arena_info *arena, u32 premap)
1085 __acquires(&arena->map_locks[idx].lock)
1086 {
1087 u32 idx = (premap * MAP_ENT_SIZE / L1_CACHE_BYTES) % arena->nfree;
1088
1089 spin_lock(&arena->map_locks[idx].lock);
1090 }
1091
unlock_map(struct arena_info * arena,u32 premap)1092 static void unlock_map(struct arena_info *arena, u32 premap)
1093 __releases(&arena->map_locks[idx].lock)
1094 {
1095 u32 idx = (premap * MAP_ENT_SIZE / L1_CACHE_BYTES) % arena->nfree;
1096
1097 spin_unlock(&arena->map_locks[idx].lock);
1098 }
1099
btt_data_read(struct arena_info * arena,struct page * page,unsigned int off,u32 lba,u32 len)1100 static int btt_data_read(struct arena_info *arena, struct page *page,
1101 unsigned int off, u32 lba, u32 len)
1102 {
1103 int ret;
1104 u64 nsoff = to_namespace_offset(arena, lba);
1105 void *mem = kmap_local_page(page);
1106
1107 ret = arena_read_bytes(arena, nsoff, mem + off, len, NVDIMM_IO_ATOMIC);
1108 kunmap_local(mem);
1109
1110 return ret;
1111 }
1112
btt_data_write(struct arena_info * arena,u32 lba,struct page * page,unsigned int off,u32 len)1113 static int btt_data_write(struct arena_info *arena, u32 lba,
1114 struct page *page, unsigned int off, u32 len)
1115 {
1116 int ret;
1117 u64 nsoff = to_namespace_offset(arena, lba);
1118 void *mem = kmap_local_page(page);
1119
1120 ret = arena_write_bytes(arena, nsoff, mem + off, len, NVDIMM_IO_ATOMIC);
1121 kunmap_local(mem);
1122
1123 return ret;
1124 }
1125
zero_fill_data(struct page * page,unsigned int off,u32 len)1126 static void zero_fill_data(struct page *page, unsigned int off, u32 len)
1127 {
1128 void *mem = kmap_local_page(page);
1129
1130 memset(mem + off, 0, len);
1131 kunmap_local(mem);
1132 }
1133
1134 #ifdef CONFIG_BLK_DEV_INTEGRITY
btt_rw_integrity(struct btt * btt,struct bio_integrity_payload * bip,struct arena_info * arena,u32 postmap,int rw)1135 static int btt_rw_integrity(struct btt *btt, struct bio_integrity_payload *bip,
1136 struct arena_info *arena, u32 postmap, int rw)
1137 {
1138 unsigned int len = btt_meta_size(btt);
1139 u64 meta_nsoff;
1140 int ret = 0;
1141
1142 if (bip == NULL)
1143 return 0;
1144
1145 meta_nsoff = to_namespace_offset(arena, postmap) + btt->sector_size;
1146
1147 while (len) {
1148 unsigned int cur_len;
1149 struct bio_vec bv;
1150 void *mem;
1151
1152 bv = bvec_iter_bvec(bip->bip_vec, bip->bip_iter);
1153 /*
1154 * The 'bv' obtained from bvec_iter_bvec has its .bv_len and
1155 * .bv_offset already adjusted for iter->bi_bvec_done, and we
1156 * can use those directly
1157 */
1158
1159 cur_len = min(len, bv.bv_len);
1160 mem = bvec_kmap_local(&bv);
1161 if (rw)
1162 ret = arena_write_bytes(arena, meta_nsoff, mem, cur_len,
1163 NVDIMM_IO_ATOMIC);
1164 else
1165 ret = arena_read_bytes(arena, meta_nsoff, mem, cur_len,
1166 NVDIMM_IO_ATOMIC);
1167
1168 kunmap_local(mem);
1169 if (ret)
1170 return ret;
1171
1172 len -= cur_len;
1173 meta_nsoff += cur_len;
1174 if (!bvec_iter_advance(bip->bip_vec, &bip->bip_iter, cur_len))
1175 return -EIO;
1176 }
1177
1178 return ret;
1179 }
1180
1181 #else /* CONFIG_BLK_DEV_INTEGRITY */
btt_rw_integrity(struct btt * btt,struct bio_integrity_payload * bip,struct arena_info * arena,u32 postmap,int rw)1182 static int btt_rw_integrity(struct btt *btt, struct bio_integrity_payload *bip,
1183 struct arena_info *arena, u32 postmap, int rw)
1184 {
1185 return 0;
1186 }
1187 #endif
1188
btt_read_pg(struct btt * btt,struct bio_integrity_payload * bip,struct page * page,unsigned int off,sector_t sector,unsigned int len)1189 static int btt_read_pg(struct btt *btt, struct bio_integrity_payload *bip,
1190 struct page *page, unsigned int off, sector_t sector,
1191 unsigned int len)
1192 {
1193 int ret = 0;
1194 int t_flag, e_flag;
1195 struct arena_info *arena = NULL;
1196 u32 lane = 0, premap, postmap;
1197
1198 while (len) {
1199 u32 cur_len;
1200
1201 lane = nd_region_acquire_lane(btt->nd_region);
1202
1203 ret = lba_to_arena(btt, sector, &premap, &arena);
1204 if (ret)
1205 goto out_lane;
1206
1207 cur_len = min(btt->sector_size, len);
1208
1209 ret = btt_map_read(arena, premap, &postmap, &t_flag, &e_flag,
1210 NVDIMM_IO_ATOMIC);
1211 if (ret)
1212 goto out_lane;
1213
1214 /*
1215 * We loop to make sure that the post map LBA didn't change
1216 * from under us between writing the RTT and doing the actual
1217 * read.
1218 */
1219 while (1) {
1220 u32 new_map;
1221 int new_t, new_e;
1222
1223 if (t_flag) {
1224 zero_fill_data(page, off, cur_len);
1225 goto out_lane;
1226 }
1227
1228 if (e_flag) {
1229 ret = -EIO;
1230 goto out_lane;
1231 }
1232
1233 arena->rtt[lane] = RTT_VALID | postmap;
1234 /*
1235 * Barrier to make sure this write is not reordered
1236 * to do the verification map_read before the RTT store
1237 */
1238 barrier();
1239
1240 ret = btt_map_read(arena, premap, &new_map, &new_t,
1241 &new_e, NVDIMM_IO_ATOMIC);
1242 if (ret)
1243 goto out_rtt;
1244
1245 if ((postmap == new_map) && (t_flag == new_t) &&
1246 (e_flag == new_e))
1247 break;
1248
1249 postmap = new_map;
1250 t_flag = new_t;
1251 e_flag = new_e;
1252 }
1253
1254 ret = btt_data_read(arena, page, off, postmap, cur_len);
1255 if (ret) {
1256 /* Media error - set the e_flag */
1257 if (btt_map_write(arena, premap, postmap, 0, 1, NVDIMM_IO_ATOMIC))
1258 dev_warn_ratelimited(to_dev(arena),
1259 "Error persistently tracking bad blocks at %#x\n",
1260 premap);
1261 goto out_rtt;
1262 }
1263
1264 if (bip) {
1265 ret = btt_rw_integrity(btt, bip, arena, postmap, READ);
1266 if (ret)
1267 goto out_rtt;
1268 }
1269
1270 arena->rtt[lane] = RTT_INVALID;
1271 nd_region_release_lane(btt->nd_region, lane);
1272
1273 len -= cur_len;
1274 off += cur_len;
1275 sector += btt->sector_size >> SECTOR_SHIFT;
1276 }
1277
1278 return 0;
1279
1280 out_rtt:
1281 arena->rtt[lane] = RTT_INVALID;
1282 out_lane:
1283 nd_region_release_lane(btt->nd_region, lane);
1284 return ret;
1285 }
1286
1287 /*
1288 * Normally, arena_{read,write}_bytes will take care of the initial offset
1289 * adjustment, but in the case of btt_is_badblock, where we query is_bad_pmem,
1290 * we need the final, raw namespace offset here
1291 */
btt_is_badblock(struct btt * btt,struct arena_info * arena,u32 postmap)1292 static bool btt_is_badblock(struct btt *btt, struct arena_info *arena,
1293 u32 postmap)
1294 {
1295 u64 nsoff = adjust_initial_offset(arena->nd_btt,
1296 to_namespace_offset(arena, postmap));
1297 sector_t phys_sector = nsoff >> 9;
1298
1299 return is_bad_pmem(btt->phys_bb, phys_sector, arena->internal_lbasize);
1300 }
1301
btt_write_pg(struct btt * btt,struct bio_integrity_payload * bip,sector_t sector,struct page * page,unsigned int off,unsigned int len)1302 static int btt_write_pg(struct btt *btt, struct bio_integrity_payload *bip,
1303 sector_t sector, struct page *page, unsigned int off,
1304 unsigned int len)
1305 {
1306 int ret = 0;
1307 struct arena_info *arena = NULL;
1308 u32 premap = 0, old_postmap, new_postmap, lane = 0, i;
1309 struct log_entry log;
1310 int sub;
1311
1312 while (len) {
1313 u32 cur_len;
1314 int e_flag;
1315
1316 retry:
1317 lane = nd_region_acquire_lane(btt->nd_region);
1318
1319 ret = lba_to_arena(btt, sector, &premap, &arena);
1320 if (ret)
1321 goto out_lane;
1322 cur_len = min(btt->sector_size, len);
1323
1324 if ((arena->flags & IB_FLAG_ERROR_MASK) != 0) {
1325 ret = -EIO;
1326 goto out_lane;
1327 }
1328
1329 if (btt_is_badblock(btt, arena, arena->freelist[lane].block))
1330 arena->freelist[lane].has_err = 1;
1331
1332 if (mutex_is_locked(&arena->err_lock)
1333 || arena->freelist[lane].has_err) {
1334 nd_region_release_lane(btt->nd_region, lane);
1335
1336 ret = arena_clear_freelist_error(arena, lane);
1337 if (ret)
1338 return ret;
1339
1340 /* OK to acquire a different lane/free block */
1341 goto retry;
1342 }
1343
1344 new_postmap = arena->freelist[lane].block;
1345
1346 /* Wait if the new block is being read from */
1347 for (i = 0; i < arena->nfree; i++)
1348 while (arena->rtt[i] == (RTT_VALID | new_postmap))
1349 cpu_relax();
1350
1351
1352 if (new_postmap >= arena->internal_nlba) {
1353 ret = -EIO;
1354 goto out_lane;
1355 }
1356
1357 ret = btt_data_write(arena, new_postmap, page, off, cur_len);
1358 if (ret)
1359 goto out_lane;
1360
1361 if (bip) {
1362 ret = btt_rw_integrity(btt, bip, arena, new_postmap,
1363 WRITE);
1364 if (ret)
1365 goto out_lane;
1366 }
1367
1368 lock_map(arena, premap);
1369 ret = btt_map_read(arena, premap, &old_postmap, NULL, &e_flag,
1370 NVDIMM_IO_ATOMIC);
1371 if (ret)
1372 goto out_map;
1373 if (old_postmap >= arena->internal_nlba) {
1374 ret = -EIO;
1375 goto out_map;
1376 }
1377 if (e_flag)
1378 set_e_flag(old_postmap);
1379
1380 log.lba = cpu_to_le32(premap);
1381 log.old_map = cpu_to_le32(old_postmap);
1382 log.new_map = cpu_to_le32(new_postmap);
1383 log.seq = cpu_to_le32(arena->freelist[lane].seq);
1384 sub = arena->freelist[lane].sub;
1385 ret = btt_flog_write(arena, lane, sub, &log);
1386 if (ret)
1387 goto out_map;
1388
1389 ret = btt_map_write(arena, premap, new_postmap, 0, 0,
1390 NVDIMM_IO_ATOMIC);
1391 if (ret)
1392 goto out_map;
1393
1394 unlock_map(arena, premap);
1395 nd_region_release_lane(btt->nd_region, lane);
1396
1397 if (e_flag) {
1398 ret = arena_clear_freelist_error(arena, lane);
1399 if (ret)
1400 return ret;
1401 }
1402
1403 len -= cur_len;
1404 off += cur_len;
1405 sector += btt->sector_size >> SECTOR_SHIFT;
1406 }
1407
1408 return 0;
1409
1410 out_map:
1411 unlock_map(arena, premap);
1412 out_lane:
1413 nd_region_release_lane(btt->nd_region, lane);
1414 return ret;
1415 }
1416
btt_do_bvec(struct btt * btt,struct bio_integrity_payload * bip,struct page * page,unsigned int len,unsigned int off,enum req_op op,sector_t sector)1417 static int btt_do_bvec(struct btt *btt, struct bio_integrity_payload *bip,
1418 struct page *page, unsigned int len, unsigned int off,
1419 enum req_op op, sector_t sector)
1420 {
1421 int ret;
1422
1423 if (!op_is_write(op)) {
1424 ret = btt_read_pg(btt, bip, page, off, sector, len);
1425 flush_dcache_page(page);
1426 } else {
1427 flush_dcache_page(page);
1428 ret = btt_write_pg(btt, bip, sector, page, off, len);
1429 }
1430
1431 return ret;
1432 }
1433
btt_submit_bio(struct bio * bio)1434 static void btt_submit_bio(struct bio *bio)
1435 {
1436 struct bio_integrity_payload *bip = bio_integrity(bio);
1437 struct btt *btt = bio->bi_bdev->bd_disk->private_data;
1438 struct bvec_iter iter;
1439 unsigned long start;
1440 struct bio_vec bvec;
1441 int err = 0;
1442 bool do_acct;
1443
1444 if (!bio_integrity_prep(bio))
1445 return;
1446
1447 do_acct = blk_queue_io_stat(bio->bi_bdev->bd_disk->queue);
1448 if (do_acct)
1449 start = bio_start_io_acct(bio);
1450 bio_for_each_segment(bvec, bio, iter) {
1451 unsigned int len = bvec.bv_len;
1452
1453 if (len > PAGE_SIZE || len < btt->sector_size ||
1454 len % btt->sector_size) {
1455 dev_err_ratelimited(&btt->nd_btt->dev,
1456 "unaligned bio segment (len: %d)\n", len);
1457 bio->bi_status = BLK_STS_IOERR;
1458 break;
1459 }
1460
1461 err = btt_do_bvec(btt, bip, bvec.bv_page, len, bvec.bv_offset,
1462 bio_op(bio), iter.bi_sector);
1463 if (err) {
1464 dev_err(&btt->nd_btt->dev,
1465 "io error in %s sector %lld, len %d,\n",
1466 (op_is_write(bio_op(bio))) ? "WRITE" :
1467 "READ",
1468 (unsigned long long) iter.bi_sector, len);
1469 bio->bi_status = errno_to_blk_status(err);
1470 break;
1471 }
1472 }
1473 if (do_acct)
1474 bio_end_io_acct(bio, start);
1475
1476 bio_endio(bio);
1477 }
1478
btt_getgeo(struct gendisk * disk,struct hd_geometry * geo)1479 static int btt_getgeo(struct gendisk *disk, struct hd_geometry *geo)
1480 {
1481 /* some standard values */
1482 geo->heads = 1 << 6;
1483 geo->sectors = 1 << 5;
1484 geo->cylinders = get_capacity(disk) >> 11;
1485 return 0;
1486 }
1487
1488 static const struct block_device_operations btt_fops = {
1489 .owner = THIS_MODULE,
1490 .submit_bio = btt_submit_bio,
1491 .getgeo = btt_getgeo,
1492 };
1493
btt_blk_init(struct btt * btt)1494 static int btt_blk_init(struct btt *btt)
1495 {
1496 struct nd_btt *nd_btt = btt->nd_btt;
1497 struct nd_namespace_common *ndns = nd_btt->ndns;
1498 struct queue_limits lim = {
1499 .logical_block_size = btt->sector_size,
1500 .max_hw_sectors = UINT_MAX,
1501 .max_integrity_segments = 1,
1502 .features = BLK_FEAT_SYNCHRONOUS,
1503 };
1504 int rc;
1505
1506 if (btt_meta_size(btt) && IS_ENABLED(CONFIG_BLK_DEV_INTEGRITY)) {
1507 lim.integrity.metadata_size = btt_meta_size(btt);
1508 lim.integrity.tag_size = btt_meta_size(btt);
1509 }
1510
1511 btt->btt_disk = blk_alloc_disk(&lim, NUMA_NO_NODE);
1512 if (IS_ERR(btt->btt_disk))
1513 return PTR_ERR(btt->btt_disk);
1514
1515 nvdimm_namespace_disk_name(ndns, btt->btt_disk->disk_name);
1516 btt->btt_disk->first_minor = 0;
1517 btt->btt_disk->fops = &btt_fops;
1518 btt->btt_disk->private_data = btt;
1519
1520 set_capacity(btt->btt_disk, btt->nlba * btt->sector_size >> 9);
1521 rc = device_add_disk(&btt->nd_btt->dev, btt->btt_disk, NULL);
1522 if (rc)
1523 goto out_cleanup_disk;
1524
1525 btt->nd_btt->size = btt->nlba * (u64)btt->sector_size;
1526 nvdimm_check_and_set_ro(btt->btt_disk);
1527
1528 return 0;
1529
1530 out_cleanup_disk:
1531 put_disk(btt->btt_disk);
1532 return rc;
1533 }
1534
btt_blk_cleanup(struct btt * btt)1535 static void btt_blk_cleanup(struct btt *btt)
1536 {
1537 del_gendisk(btt->btt_disk);
1538 put_disk(btt->btt_disk);
1539 }
1540
1541 /**
1542 * btt_init - initialize a block translation table for the given device
1543 * @nd_btt: device with BTT geometry and backing device info
1544 * @rawsize: raw size in bytes of the backing device
1545 * @lbasize: lba size of the backing device
1546 * @uuid: A uuid for the backing device - this is stored on media
1547 * @nd_region: &struct nd_region for the REGION device
1548 *
1549 * Initialize a Block Translation Table on a backing device to provide
1550 * single sector power fail atomicity.
1551 *
1552 * Context:
1553 * Might sleep.
1554 *
1555 * Returns:
1556 * Pointer to a new struct btt on success, NULL on failure.
1557 */
btt_init(struct nd_btt * nd_btt,unsigned long long rawsize,u32 lbasize,uuid_t * uuid,struct nd_region * nd_region)1558 static struct btt *btt_init(struct nd_btt *nd_btt, unsigned long long rawsize,
1559 u32 lbasize, uuid_t *uuid,
1560 struct nd_region *nd_region)
1561 {
1562 int ret;
1563 struct btt *btt;
1564 struct nd_namespace_io *nsio;
1565 struct device *dev = &nd_btt->dev;
1566
1567 btt = devm_kzalloc(dev, sizeof(struct btt), GFP_KERNEL);
1568 if (!btt)
1569 return NULL;
1570
1571 btt->nd_btt = nd_btt;
1572 btt->rawsize = rawsize;
1573 btt->lbasize = lbasize;
1574 btt->sector_size = ((lbasize >= 4096) ? 4096 : 512);
1575 INIT_LIST_HEAD(&btt->arena_list);
1576 mutex_init(&btt->init_lock);
1577 btt->nd_region = nd_region;
1578 nsio = to_nd_namespace_io(&nd_btt->ndns->dev);
1579 btt->phys_bb = &nsio->bb;
1580
1581 ret = discover_arenas(btt);
1582 if (ret) {
1583 dev_err(dev, "init: error in arena_discover: %d\n", ret);
1584 return NULL;
1585 }
1586
1587 if (btt->init_state != INIT_READY && nd_region->ro) {
1588 dev_warn(dev, "%s is read-only, unable to init btt metadata\n",
1589 dev_name(&nd_region->dev));
1590 return NULL;
1591 } else if (btt->init_state != INIT_READY) {
1592 btt->num_arenas = (rawsize / ARENA_MAX_SIZE) +
1593 ((rawsize % ARENA_MAX_SIZE) ? 1 : 0);
1594 dev_dbg(dev, "init: %d arenas for %llu rawsize\n",
1595 btt->num_arenas, rawsize);
1596
1597 ret = create_arenas(btt);
1598 if (ret) {
1599 dev_info(dev, "init: create_arenas: %d\n", ret);
1600 return NULL;
1601 }
1602
1603 ret = btt_meta_init(btt);
1604 if (ret) {
1605 dev_err(dev, "init: error in meta_init: %d\n", ret);
1606 return NULL;
1607 }
1608 }
1609
1610 ret = btt_blk_init(btt);
1611 if (ret) {
1612 dev_err(dev, "init: error in blk_init: %d\n", ret);
1613 return NULL;
1614 }
1615
1616 btt_debugfs_init(btt);
1617
1618 return btt;
1619 }
1620
1621 /**
1622 * btt_fini - de-initialize a BTT
1623 * @btt: the BTT handle that was generated by btt_init
1624 *
1625 * De-initialize a Block Translation Table on device removal
1626 *
1627 * Context:
1628 * Might sleep.
1629 */
btt_fini(struct btt * btt)1630 static void btt_fini(struct btt *btt)
1631 {
1632 if (btt) {
1633 btt_blk_cleanup(btt);
1634 free_arenas(btt);
1635 debugfs_remove_recursive(btt->debugfs_dir);
1636 }
1637 }
1638
nvdimm_namespace_attach_btt(struct nd_namespace_common * ndns)1639 int nvdimm_namespace_attach_btt(struct nd_namespace_common *ndns)
1640 {
1641 struct nd_btt *nd_btt = to_nd_btt(ndns->claim);
1642 struct nd_region *nd_region;
1643 struct btt_sb *btt_sb;
1644 struct btt *btt;
1645 size_t size, rawsize;
1646 int rc;
1647
1648 if (!nd_btt->uuid || !nd_btt->ndns || !nd_btt->lbasize) {
1649 dev_dbg(&nd_btt->dev, "incomplete btt configuration\n");
1650 return -ENODEV;
1651 }
1652
1653 btt_sb = devm_kzalloc(&nd_btt->dev, sizeof(*btt_sb), GFP_KERNEL);
1654 if (!btt_sb)
1655 return -ENOMEM;
1656
1657 size = nvdimm_namespace_capacity(ndns);
1658 rc = devm_namespace_enable(&nd_btt->dev, ndns, size);
1659 if (rc)
1660 return rc;
1661
1662 /*
1663 * If this returns < 0, that is ok as it just means there wasn't
1664 * an existing BTT, and we're creating a new one. We still need to
1665 * call this as we need the version dependent fields in nd_btt to be
1666 * set correctly based on the holder class
1667 */
1668 nd_btt_version(nd_btt, ndns, btt_sb);
1669
1670 rawsize = size - nd_btt->initial_offset;
1671 if (rawsize < ARENA_MIN_SIZE) {
1672 dev_dbg(&nd_btt->dev, "%s must be at least %ld bytes\n",
1673 dev_name(&ndns->dev),
1674 ARENA_MIN_SIZE + nd_btt->initial_offset);
1675 return -ENXIO;
1676 }
1677 nd_region = to_nd_region(nd_btt->dev.parent);
1678 btt = btt_init(nd_btt, rawsize, nd_btt->lbasize, nd_btt->uuid,
1679 nd_region);
1680 if (!btt)
1681 return -ENOMEM;
1682 nd_btt->btt = btt;
1683
1684 return 0;
1685 }
1686 EXPORT_SYMBOL(nvdimm_namespace_attach_btt);
1687
nvdimm_namespace_detach_btt(struct nd_btt * nd_btt)1688 int nvdimm_namespace_detach_btt(struct nd_btt *nd_btt)
1689 {
1690 struct btt *btt = nd_btt->btt;
1691
1692 btt_fini(btt);
1693 nd_btt->btt = NULL;
1694
1695 return 0;
1696 }
1697 EXPORT_SYMBOL(nvdimm_namespace_detach_btt);
1698
nd_btt_init(void)1699 static int __init nd_btt_init(void)
1700 {
1701 int rc = 0;
1702
1703 debugfs_root = debugfs_create_dir("btt", NULL);
1704 if (IS_ERR_OR_NULL(debugfs_root))
1705 rc = -ENXIO;
1706
1707 return rc;
1708 }
1709
nd_btt_exit(void)1710 static void __exit nd_btt_exit(void)
1711 {
1712 debugfs_remove_recursive(debugfs_root);
1713 }
1714
1715 MODULE_ALIAS_ND_DEVICE(ND_DEVICE_BTT);
1716 MODULE_AUTHOR("Vishal Verma <vishal.l.verma@linux.intel.com>");
1717 MODULE_DESCRIPTION("NVDIMM Block Translation Table");
1718 MODULE_LICENSE("GPL v2");
1719 module_init(nd_btt_init);
1720 module_exit(nd_btt_exit);
1721