xref: /linux/drivers/nvdimm/btt.c (revision bba2c3615bd6cfee7456d1130f2e6b01b3f4e9ba)
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 
29 static struct device *to_dev(struct arena_info *arena)
30 {
31 	return &arena->nd_btt->dev;
32 }
33 
34 static u64 adjust_initial_offset(struct nd_btt *nd_btt, u64 offset)
35 {
36 	return offset + nd_btt->initial_offset;
37 }
38 
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 
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 
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 
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  */
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 
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 
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 
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 
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 
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 
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  */
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  */
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  */
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 
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  */
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  */
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 
502 static u64 to_namespace_offset(struct arena_info *arena, u64 lba)
503 {
504 	return arena->dataoff + ((u64)lba * arena->internal_lbasize);
505 }
506 
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 
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 
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  */
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 
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 
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 
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 
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  */
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 
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->freelist);
923 	kfree(arena->rtt);
924 	kfree(arena->map_locks);
925 	kfree(arena);
926 	free_arenas(btt);
927 	return ret;
928 }
929 
930 static int create_arenas(struct btt *btt)
931 {
932 	size_t remaining = btt->rawsize;
933 	size_t cur_off = 0;
934 
935 	while (remaining) {
936 		struct arena_info *arena;
937 		size_t arena_size = min_t(u64, ARENA_MAX_SIZE, remaining);
938 
939 		remaining -= arena_size;
940 		if (arena_size < ARENA_MIN_SIZE)
941 			break;
942 
943 		arena = alloc_arena(btt, arena_size, btt->nlba, cur_off);
944 		if (!arena) {
945 			free_arenas(btt);
946 			return -ENOMEM;
947 		}
948 		btt->nlba += arena->external_nlba;
949 		if (remaining >= ARENA_MIN_SIZE)
950 			arena->nextoff = arena->size;
951 		else
952 			arena->nextoff = 0;
953 		cur_off += arena_size;
954 		list_add_tail(&arena->list, &btt->arena_list);
955 	}
956 
957 	return 0;
958 }
959 
960 /*
961  * This function completes arena initialization by writing
962  * all the metadata.
963  * It is only called for an uninitialized arena when a write
964  * to that arena occurs for the first time.
965  */
966 static int btt_arena_write_layout(struct arena_info *arena)
967 {
968 	int ret;
969 	u64 sum;
970 	struct btt_sb *super;
971 	struct nd_btt *nd_btt = arena->nd_btt;
972 	const uuid_t *parent_uuid = nd_dev_to_uuid(&nd_btt->ndns->dev);
973 
974 	ret = btt_map_init(arena);
975 	if (ret)
976 		return ret;
977 
978 	ret = btt_log_init(arena);
979 	if (ret)
980 		return ret;
981 
982 	super = kzalloc_obj(*super, GFP_NOIO);
983 	if (!super)
984 		return -ENOMEM;
985 
986 	strscpy(super->signature, BTT_SIG, sizeof(super->signature));
987 	export_uuid(super->uuid, nd_btt->uuid);
988 	export_uuid(super->parent_uuid, parent_uuid);
989 	super->flags = cpu_to_le32(arena->flags);
990 	super->version_major = cpu_to_le16(arena->version_major);
991 	super->version_minor = cpu_to_le16(arena->version_minor);
992 	super->external_lbasize = cpu_to_le32(arena->external_lbasize);
993 	super->external_nlba = cpu_to_le32(arena->external_nlba);
994 	super->internal_lbasize = cpu_to_le32(arena->internal_lbasize);
995 	super->internal_nlba = cpu_to_le32(arena->internal_nlba);
996 	super->nfree = cpu_to_le32(arena->nfree);
997 	super->infosize = cpu_to_le32(sizeof(struct btt_sb));
998 	super->nextoff = cpu_to_le64(arena->nextoff);
999 	/*
1000 	 * Subtract arena->infooff (arena start) so numbers are relative
1001 	 * to 'this' arena
1002 	 */
1003 	super->dataoff = cpu_to_le64(arena->dataoff - arena->infooff);
1004 	super->mapoff = cpu_to_le64(arena->mapoff - arena->infooff);
1005 	super->logoff = cpu_to_le64(arena->logoff - arena->infooff);
1006 	super->info2off = cpu_to_le64(arena->info2off - arena->infooff);
1007 
1008 	super->flags = 0;
1009 	sum = nd_sb_checksum((struct nd_gen_sb *) super);
1010 	super->checksum = cpu_to_le64(sum);
1011 
1012 	ret = btt_info_write(arena, super);
1013 
1014 	kfree(super);
1015 	return ret;
1016 }
1017 
1018 /*
1019  * This function completes the initialization for the BTT namespace
1020  * such that it is ready to accept IOs
1021  */
1022 static int btt_meta_init(struct btt *btt)
1023 {
1024 	int ret = 0;
1025 	struct arena_info *arena;
1026 
1027 	mutex_lock(&btt->init_lock);
1028 	list_for_each_entry(arena, &btt->arena_list, list) {
1029 		ret = btt_arena_write_layout(arena);
1030 		if (ret)
1031 			goto unlock;
1032 
1033 		ret = btt_freelist_init(arena);
1034 		if (ret)
1035 			goto unlock;
1036 
1037 		ret = btt_rtt_init(arena);
1038 		if (ret)
1039 			goto unlock;
1040 
1041 		ret = btt_maplocks_init(arena);
1042 		if (ret)
1043 			goto unlock;
1044 	}
1045 
1046 	btt->init_state = INIT_READY;
1047 
1048  unlock:
1049 	mutex_unlock(&btt->init_lock);
1050 	return ret;
1051 }
1052 
1053 static u32 btt_meta_size(struct btt *btt)
1054 {
1055 	return btt->lbasize - btt->sector_size;
1056 }
1057 
1058 /*
1059  * This function calculates the arena in which the given LBA lies
1060  * by doing a linear walk. This is acceptable since we expect only
1061  * a few arenas. If we have backing devices that get much larger,
1062  * we can construct a balanced binary tree of arenas at init time
1063  * so that this range search becomes faster.
1064  */
1065 static int lba_to_arena(struct btt *btt, sector_t sector, __u32 *premap,
1066 				struct arena_info **arena)
1067 {
1068 	struct arena_info *arena_list;
1069 	__u64 lba = div_u64(sector << SECTOR_SHIFT, btt->sector_size);
1070 
1071 	list_for_each_entry(arena_list, &btt->arena_list, list) {
1072 		if (lba < arena_list->external_nlba) {
1073 			*arena = arena_list;
1074 			*premap = lba;
1075 			return 0;
1076 		}
1077 		lba -= arena_list->external_nlba;
1078 	}
1079 
1080 	return -EIO;
1081 }
1082 
1083 /*
1084  * The following (lock_map, unlock_map) are mostly just to improve
1085  * readability, since they index into an array of locks
1086  */
1087 static void lock_map(struct arena_info *arena, u32 premap)
1088 		__acquires(&arena->map_locks[idx].lock)
1089 {
1090 	u32 idx = (premap * MAP_ENT_SIZE / L1_CACHE_BYTES) % arena->nfree;
1091 
1092 	spin_lock(&arena->map_locks[idx].lock);
1093 }
1094 
1095 static void unlock_map(struct arena_info *arena, u32 premap)
1096 		__releases(&arena->map_locks[idx].lock)
1097 {
1098 	u32 idx = (premap * MAP_ENT_SIZE / L1_CACHE_BYTES) % arena->nfree;
1099 
1100 	spin_unlock(&arena->map_locks[idx].lock);
1101 }
1102 
1103 static int btt_data_read(struct arena_info *arena, struct page *page,
1104 			unsigned int off, u32 lba, u32 len)
1105 {
1106 	int ret;
1107 	u64 nsoff = to_namespace_offset(arena, lba);
1108 	void *mem = kmap_local_page(page);
1109 
1110 	ret = arena_read_bytes(arena, nsoff, mem + off, len, NVDIMM_IO_ATOMIC);
1111 	kunmap_local(mem);
1112 
1113 	return ret;
1114 }
1115 
1116 static int btt_data_write(struct arena_info *arena, u32 lba,
1117 			struct page *page, unsigned int off, u32 len)
1118 {
1119 	int ret;
1120 	u64 nsoff = to_namespace_offset(arena, lba);
1121 	void *mem = kmap_local_page(page);
1122 
1123 	ret = arena_write_bytes(arena, nsoff, mem + off, len, NVDIMM_IO_ATOMIC);
1124 	kunmap_local(mem);
1125 
1126 	return ret;
1127 }
1128 
1129 static void zero_fill_data(struct page *page, unsigned int off, u32 len)
1130 {
1131 	void *mem = kmap_local_page(page);
1132 
1133 	memset(mem + off, 0, len);
1134 	kunmap_local(mem);
1135 }
1136 
1137 #ifdef CONFIG_BLK_DEV_INTEGRITY
1138 static int btt_rw_integrity(struct btt *btt, struct bio_integrity_payload *bip,
1139 			struct arena_info *arena, u32 postmap, int rw)
1140 {
1141 	unsigned int len = btt_meta_size(btt);
1142 	u64 meta_nsoff;
1143 	int ret = 0;
1144 
1145 	if (bip == NULL)
1146 		return 0;
1147 
1148 	meta_nsoff = to_namespace_offset(arena, postmap) + btt->sector_size;
1149 
1150 	while (len) {
1151 		unsigned int cur_len;
1152 		struct bio_vec bv;
1153 		void *mem;
1154 
1155 		bv = bvec_iter_bvec(bip->bip_vec, bip->bip_iter);
1156 		/*
1157 		 * The 'bv' obtained from bvec_iter_bvec has its .bv_len and
1158 		 * .bv_offset already adjusted for iter->bi_bvec_done, and we
1159 		 * can use those directly
1160 		 */
1161 
1162 		cur_len = min(len, bv.bv_len);
1163 		mem = bvec_kmap_local(&bv);
1164 		if (rw)
1165 			ret = arena_write_bytes(arena, meta_nsoff, mem, cur_len,
1166 					NVDIMM_IO_ATOMIC);
1167 		else
1168 			ret = arena_read_bytes(arena, meta_nsoff, mem, cur_len,
1169 					NVDIMM_IO_ATOMIC);
1170 
1171 		kunmap_local(mem);
1172 		if (ret)
1173 			return ret;
1174 
1175 		len -= cur_len;
1176 		meta_nsoff += cur_len;
1177 		if (!bvec_iter_advance(bip->bip_vec, &bip->bip_iter, cur_len))
1178 			return -EIO;
1179 	}
1180 
1181 	return ret;
1182 }
1183 
1184 #else /* CONFIG_BLK_DEV_INTEGRITY */
1185 static int btt_rw_integrity(struct btt *btt, struct bio_integrity_payload *bip,
1186 			struct arena_info *arena, u32 postmap, int rw)
1187 {
1188 	return 0;
1189 }
1190 #endif
1191 
1192 static int btt_read_pg(struct btt *btt, struct bio_integrity_payload *bip,
1193 			struct page *page, unsigned int off, sector_t sector,
1194 			unsigned int len)
1195 {
1196 	int ret = 0;
1197 	int t_flag, e_flag;
1198 	struct arena_info *arena = NULL;
1199 	u32 lane = 0, premap, postmap;
1200 
1201 	while (len) {
1202 		u32 cur_len;
1203 
1204 		lane = nd_region_acquire_lane(btt->nd_region);
1205 
1206 		ret = lba_to_arena(btt, sector, &premap, &arena);
1207 		if (ret)
1208 			goto out_lane;
1209 
1210 		cur_len = min(btt->sector_size, len);
1211 
1212 		ret = btt_map_read(arena, premap, &postmap, &t_flag, &e_flag,
1213 				NVDIMM_IO_ATOMIC);
1214 		if (ret)
1215 			goto out_lane;
1216 
1217 		/*
1218 		 * We loop to make sure that the post map LBA didn't change
1219 		 * from under us between writing the RTT and doing the actual
1220 		 * read.
1221 		 */
1222 		while (1) {
1223 			u32 new_map;
1224 			int new_t, new_e;
1225 
1226 			if (t_flag) {
1227 				zero_fill_data(page, off, cur_len);
1228 				goto out_lane;
1229 			}
1230 
1231 			if (e_flag) {
1232 				ret = -EIO;
1233 				goto out_lane;
1234 			}
1235 
1236 			arena->rtt[lane] = RTT_VALID | postmap;
1237 			/*
1238 			 * Barrier to make sure this write is not reordered
1239 			 * to do the verification map_read before the RTT store
1240 			 */
1241 			barrier();
1242 
1243 			ret = btt_map_read(arena, premap, &new_map, &new_t,
1244 						&new_e, NVDIMM_IO_ATOMIC);
1245 			if (ret)
1246 				goto out_rtt;
1247 
1248 			if ((postmap == new_map) && (t_flag == new_t) &&
1249 					(e_flag == new_e))
1250 				break;
1251 
1252 			postmap = new_map;
1253 			t_flag = new_t;
1254 			e_flag = new_e;
1255 		}
1256 
1257 		ret = btt_data_read(arena, page, off, postmap, cur_len);
1258 		if (ret) {
1259 			/* Media error - set the e_flag */
1260 			if (btt_map_write(arena, premap, postmap, 0, 1, NVDIMM_IO_ATOMIC))
1261 				dev_warn_ratelimited(to_dev(arena),
1262 					"Error persistently tracking bad blocks at %#x\n",
1263 					premap);
1264 			goto out_rtt;
1265 		}
1266 
1267 		if (bip) {
1268 			ret = btt_rw_integrity(btt, bip, arena, postmap, READ);
1269 			if (ret)
1270 				goto out_rtt;
1271 		}
1272 
1273 		arena->rtt[lane] = RTT_INVALID;
1274 		nd_region_release_lane(btt->nd_region, lane);
1275 
1276 		len -= cur_len;
1277 		off += cur_len;
1278 		sector += btt->sector_size >> SECTOR_SHIFT;
1279 	}
1280 
1281 	return 0;
1282 
1283  out_rtt:
1284 	arena->rtt[lane] = RTT_INVALID;
1285  out_lane:
1286 	nd_region_release_lane(btt->nd_region, lane);
1287 	return ret;
1288 }
1289 
1290 /*
1291  * Normally, arena_{read,write}_bytes will take care of the initial offset
1292  * adjustment, but in the case of btt_is_badblock, where we query is_bad_pmem,
1293  * we need the final, raw namespace offset here
1294  */
1295 static bool btt_is_badblock(struct btt *btt, struct arena_info *arena,
1296 		u32 postmap)
1297 {
1298 	u64 nsoff = adjust_initial_offset(arena->nd_btt,
1299 			to_namespace_offset(arena, postmap));
1300 	sector_t phys_sector = nsoff >> 9;
1301 
1302 	return is_bad_pmem(btt->phys_bb, phys_sector, arena->internal_lbasize);
1303 }
1304 
1305 static int btt_write_pg(struct btt *btt, struct bio_integrity_payload *bip,
1306 			sector_t sector, struct page *page, unsigned int off,
1307 			unsigned int len)
1308 {
1309 	int ret = 0;
1310 	struct arena_info *arena = NULL;
1311 	u32 premap = 0, old_postmap, new_postmap, lane = 0, i;
1312 	struct log_entry log;
1313 	int sub;
1314 
1315 	while (len) {
1316 		u32 cur_len;
1317 		int e_flag;
1318 
1319  retry:
1320 		lane = nd_region_acquire_lane(btt->nd_region);
1321 
1322 		ret = lba_to_arena(btt, sector, &premap, &arena);
1323 		if (ret)
1324 			goto out_lane;
1325 		cur_len = min(btt->sector_size, len);
1326 
1327 		if ((arena->flags & IB_FLAG_ERROR_MASK) != 0) {
1328 			ret = -EIO;
1329 			goto out_lane;
1330 		}
1331 
1332 		if (btt_is_badblock(btt, arena, arena->freelist[lane].block))
1333 			arena->freelist[lane].has_err = 1;
1334 
1335 		if (mutex_is_locked(&arena->err_lock)
1336 				|| arena->freelist[lane].has_err) {
1337 			nd_region_release_lane(btt->nd_region, lane);
1338 
1339 			ret = arena_clear_freelist_error(arena, lane);
1340 			if (ret)
1341 				return ret;
1342 
1343 			/* OK to acquire a different lane/free block */
1344 			goto retry;
1345 		}
1346 
1347 		new_postmap = arena->freelist[lane].block;
1348 
1349 		/* Wait if the new block is being read from */
1350 		for (i = 0; i < arena->nfree; i++)
1351 			while (arena->rtt[i] == (RTT_VALID | new_postmap))
1352 				cpu_relax();
1353 
1354 
1355 		if (new_postmap >= arena->internal_nlba) {
1356 			ret = -EIO;
1357 			goto out_lane;
1358 		}
1359 
1360 		ret = btt_data_write(arena, new_postmap, page, off, cur_len);
1361 		if (ret)
1362 			goto out_lane;
1363 
1364 		if (bip) {
1365 			ret = btt_rw_integrity(btt, bip, arena, new_postmap,
1366 						WRITE);
1367 			if (ret)
1368 				goto out_lane;
1369 		}
1370 
1371 		lock_map(arena, premap);
1372 		ret = btt_map_read(arena, premap, &old_postmap, NULL, &e_flag,
1373 				NVDIMM_IO_ATOMIC);
1374 		if (ret)
1375 			goto out_map;
1376 		if (old_postmap >= arena->internal_nlba) {
1377 			ret = -EIO;
1378 			goto out_map;
1379 		}
1380 		if (e_flag)
1381 			set_e_flag(old_postmap);
1382 
1383 		log.lba = cpu_to_le32(premap);
1384 		log.old_map = cpu_to_le32(old_postmap);
1385 		log.new_map = cpu_to_le32(new_postmap);
1386 		log.seq = cpu_to_le32(arena->freelist[lane].seq);
1387 		sub = arena->freelist[lane].sub;
1388 		ret = btt_flog_write(arena, lane, sub, &log);
1389 		if (ret)
1390 			goto out_map;
1391 
1392 		ret = btt_map_write(arena, premap, new_postmap, 0, 0,
1393 			NVDIMM_IO_ATOMIC);
1394 		if (ret)
1395 			goto out_map;
1396 
1397 		unlock_map(arena, premap);
1398 		nd_region_release_lane(btt->nd_region, lane);
1399 
1400 		if (e_flag) {
1401 			ret = arena_clear_freelist_error(arena, lane);
1402 			if (ret)
1403 				return ret;
1404 		}
1405 
1406 		len -= cur_len;
1407 		off += cur_len;
1408 		sector += btt->sector_size >> SECTOR_SHIFT;
1409 	}
1410 
1411 	return 0;
1412 
1413  out_map:
1414 	unlock_map(arena, premap);
1415  out_lane:
1416 	nd_region_release_lane(btt->nd_region, lane);
1417 	return ret;
1418 }
1419 
1420 static int btt_do_bvec(struct btt *btt, struct bio_integrity_payload *bip,
1421 			struct page *page, unsigned int len, unsigned int off,
1422 			enum req_op op, sector_t sector)
1423 {
1424 	int ret;
1425 
1426 	if (!op_is_write(op)) {
1427 		ret = btt_read_pg(btt, bip, page, off, sector, len);
1428 		flush_dcache_page(page);
1429 	} else {
1430 		flush_dcache_page(page);
1431 		ret = btt_write_pg(btt, bip, sector, page, off, len);
1432 	}
1433 
1434 	return ret;
1435 }
1436 
1437 static void btt_submit_bio(struct bio *bio)
1438 {
1439 	struct bio_integrity_payload *bip = bio_integrity(bio);
1440 	struct btt *btt = bio->bi_bdev->bd_disk->private_data;
1441 	unsigned int integrity_action;
1442 	struct bvec_iter iter;
1443 	unsigned long start;
1444 	struct bio_vec bvec;
1445 	int err = 0;
1446 	bool do_acct;
1447 
1448 	integrity_action = bio_integrity_action(bio);
1449 	if (integrity_action)
1450 		bio_integrity_prep(bio, integrity_action);
1451 
1452 	do_acct = blk_queue_io_stat(bio->bi_bdev->bd_disk->queue);
1453 	if (do_acct)
1454 		start = bio_start_io_acct(bio);
1455 	bio_for_each_segment(bvec, bio, iter) {
1456 		unsigned int len = bvec.bv_len;
1457 
1458 		if (len > PAGE_SIZE || len < btt->sector_size ||
1459 				len % btt->sector_size) {
1460 			dev_err_ratelimited(&btt->nd_btt->dev,
1461 				"unaligned bio segment (len: %d)\n", len);
1462 			bio->bi_status = BLK_STS_IOERR;
1463 			break;
1464 		}
1465 
1466 		err = btt_do_bvec(btt, bip, bvec.bv_page, len, bvec.bv_offset,
1467 				  bio_op(bio), iter.bi_sector);
1468 		if (err) {
1469 			dev_err(&btt->nd_btt->dev,
1470 					"io error in %s sector %lld, len %d,\n",
1471 					(op_is_write(bio_op(bio))) ? "WRITE" :
1472 					"READ",
1473 					(unsigned long long) iter.bi_sector, len);
1474 			bio->bi_status = errno_to_blk_status(err);
1475 			break;
1476 		}
1477 	}
1478 	if (do_acct)
1479 		bio_end_io_acct(bio, start);
1480 
1481 	bio_endio(bio);
1482 }
1483 
1484 static int btt_getgeo(struct gendisk *disk, struct hd_geometry *geo)
1485 {
1486 	/* some standard values */
1487 	geo->heads = 1 << 6;
1488 	geo->sectors = 1 << 5;
1489 	geo->cylinders = get_capacity(disk) >> 11;
1490 	return 0;
1491 }
1492 
1493 static const struct block_device_operations btt_fops = {
1494 	.owner =		THIS_MODULE,
1495 	.submit_bio =		btt_submit_bio,
1496 	.getgeo =		btt_getgeo,
1497 };
1498 
1499 static int btt_blk_init(struct btt *btt)
1500 {
1501 	struct nd_btt *nd_btt = btt->nd_btt;
1502 	struct nd_namespace_common *ndns = nd_btt->ndns;
1503 	struct queue_limits lim = {
1504 		.logical_block_size	= btt->sector_size,
1505 		.max_hw_sectors		= UINT_MAX,
1506 		.max_integrity_segments	= 1,
1507 		.features		= BLK_FEAT_SYNCHRONOUS,
1508 	};
1509 	int rc;
1510 
1511 	if (btt_meta_size(btt) && IS_ENABLED(CONFIG_BLK_DEV_INTEGRITY)) {
1512 		lim.integrity.metadata_size = btt_meta_size(btt);
1513 		lim.integrity.tag_size = btt_meta_size(btt);
1514 	}
1515 
1516 	btt->btt_disk = blk_alloc_disk(&lim, NUMA_NO_NODE);
1517 	if (IS_ERR(btt->btt_disk))
1518 		return PTR_ERR(btt->btt_disk);
1519 
1520 	nvdimm_namespace_disk_name(ndns, btt->btt_disk->disk_name);
1521 	btt->btt_disk->first_minor = 0;
1522 	btt->btt_disk->fops = &btt_fops;
1523 	btt->btt_disk->private_data = btt;
1524 
1525 	set_capacity(btt->btt_disk, btt->nlba * btt->sector_size >> 9);
1526 	rc = device_add_disk(&btt->nd_btt->dev, btt->btt_disk, NULL);
1527 	if (rc)
1528 		goto out_cleanup_disk;
1529 
1530 	btt->nd_btt->size = btt->nlba * (u64)btt->sector_size;
1531 	nvdimm_check_and_set_ro(btt->btt_disk);
1532 
1533 	return 0;
1534 
1535 out_cleanup_disk:
1536 	put_disk(btt->btt_disk);
1537 	return rc;
1538 }
1539 
1540 static void btt_blk_cleanup(struct btt *btt)
1541 {
1542 	del_gendisk(btt->btt_disk);
1543 	put_disk(btt->btt_disk);
1544 }
1545 
1546 /**
1547  * btt_init - initialize a block translation table for the given device
1548  * @nd_btt:	device with BTT geometry and backing device info
1549  * @rawsize:	raw size in bytes of the backing device
1550  * @lbasize:	lba size of the backing device
1551  * @uuid:	A uuid for the backing device - this is stored on media
1552  * @nd_region:	&struct nd_region for the REGION device
1553  *
1554  * Initialize a Block Translation Table on a backing device to provide
1555  * single sector power fail atomicity.
1556  *
1557  * Context:
1558  * Might sleep.
1559  *
1560  * Returns:
1561  * Pointer to a new struct btt on success, NULL on failure.
1562  */
1563 static struct btt *btt_init(struct nd_btt *nd_btt, unsigned long long rawsize,
1564 			    u32 lbasize, uuid_t *uuid,
1565 			    struct nd_region *nd_region)
1566 {
1567 	int ret;
1568 	struct btt *btt;
1569 	struct nd_namespace_io *nsio;
1570 	struct device *dev = &nd_btt->dev;
1571 
1572 	btt = devm_kzalloc(dev, sizeof(struct btt), GFP_KERNEL);
1573 	if (!btt)
1574 		return NULL;
1575 
1576 	btt->nd_btt = nd_btt;
1577 	btt->rawsize = rawsize;
1578 	btt->lbasize = lbasize;
1579 	btt->sector_size = ((lbasize >= 4096) ? 4096 : 512);
1580 	INIT_LIST_HEAD(&btt->arena_list);
1581 	mutex_init(&btt->init_lock);
1582 	btt->nd_region = nd_region;
1583 	nsio = to_nd_namespace_io(&nd_btt->ndns->dev);
1584 	btt->phys_bb = &nsio->bb;
1585 
1586 	ret = discover_arenas(btt);
1587 	if (ret) {
1588 		dev_err(dev, "init: error in arena_discover: %d\n", ret);
1589 		return NULL;
1590 	}
1591 
1592 	if (btt->init_state != INIT_READY && nd_region->ro) {
1593 		dev_warn(dev, "%s is read-only, unable to init btt metadata\n",
1594 				dev_name(&nd_region->dev));
1595 		goto err;
1596 	} else if (btt->init_state != INIT_READY) {
1597 		btt->num_arenas = (rawsize / ARENA_MAX_SIZE) +
1598 			((rawsize % ARENA_MAX_SIZE) ? 1 : 0);
1599 		dev_dbg(dev, "init: %d arenas for %llu rawsize\n",
1600 				btt->num_arenas, rawsize);
1601 
1602 		ret = create_arenas(btt);
1603 		if (ret) {
1604 			dev_info(dev, "init: create_arenas: %d\n", ret);
1605 			goto err;
1606 		}
1607 
1608 		ret = btt_meta_init(btt);
1609 		if (ret) {
1610 			dev_err(dev, "init: error in meta_init: %d\n", ret);
1611 			goto err;
1612 		}
1613 	}
1614 
1615 	ret = btt_blk_init(btt);
1616 	if (ret) {
1617 		dev_err(dev, "init: error in blk_init: %d\n", ret);
1618 		goto err;
1619 	}
1620 
1621 	btt_debugfs_init(btt);
1622 
1623 	return btt;
1624 err:
1625 	free_arenas(btt);
1626 	return NULL;
1627 }
1628 
1629 /**
1630  * btt_fini - de-initialize a BTT
1631  * @btt:	the BTT handle that was generated by btt_init
1632  *
1633  * De-initialize a Block Translation Table on device removal
1634  *
1635  * Context:
1636  * Might sleep.
1637  */
1638 static void btt_fini(struct btt *btt)
1639 {
1640 	if (btt) {
1641 		btt_blk_cleanup(btt);
1642 		free_arenas(btt);
1643 		debugfs_remove_recursive(btt->debugfs_dir);
1644 	}
1645 }
1646 
1647 int nvdimm_namespace_attach_btt(struct nd_namespace_common *ndns)
1648 {
1649 	struct nd_btt *nd_btt = to_nd_btt(ndns->claim);
1650 	struct nd_region *nd_region;
1651 	struct btt_sb *btt_sb;
1652 	struct btt *btt;
1653 	size_t size, rawsize;
1654 	int rc;
1655 
1656 	if (!nd_btt->uuid || !nd_btt->ndns || !nd_btt->lbasize) {
1657 		dev_dbg(&nd_btt->dev, "incomplete btt configuration\n");
1658 		return -ENODEV;
1659 	}
1660 
1661 	btt_sb = devm_kzalloc(&nd_btt->dev, sizeof(*btt_sb), GFP_KERNEL);
1662 	if (!btt_sb)
1663 		return -ENOMEM;
1664 
1665 	size = nvdimm_namespace_capacity(ndns);
1666 	rc = devm_namespace_enable(&nd_btt->dev, ndns, size);
1667 	if (rc)
1668 		return rc;
1669 
1670 	/*
1671 	 * If this returns < 0, that is ok as it just means there wasn't
1672 	 * an existing BTT, and we're creating a new one. We still need to
1673 	 * call this as we need the version dependent fields in nd_btt to be
1674 	 * set correctly based on the holder class
1675 	 */
1676 	nd_btt_version(nd_btt, ndns, btt_sb);
1677 
1678 	rawsize = size - nd_btt->initial_offset;
1679 	if (rawsize < ARENA_MIN_SIZE) {
1680 		dev_dbg(&nd_btt->dev, "%s must be at least %ld bytes\n",
1681 				dev_name(&ndns->dev),
1682 				ARENA_MIN_SIZE + nd_btt->initial_offset);
1683 		return -ENXIO;
1684 	}
1685 	nd_region = to_nd_region(nd_btt->dev.parent);
1686 	btt = btt_init(nd_btt, rawsize, nd_btt->lbasize, nd_btt->uuid,
1687 		       nd_region);
1688 	if (!btt)
1689 		return -ENOMEM;
1690 	nd_btt->btt = btt;
1691 
1692 	return 0;
1693 }
1694 EXPORT_SYMBOL(nvdimm_namespace_attach_btt);
1695 
1696 int nvdimm_namespace_detach_btt(struct nd_btt *nd_btt)
1697 {
1698 	struct btt *btt = nd_btt->btt;
1699 
1700 	btt_fini(btt);
1701 	nd_btt->btt = NULL;
1702 
1703 	return 0;
1704 }
1705 EXPORT_SYMBOL(nvdimm_namespace_detach_btt);
1706 
1707 static int __init nd_btt_init(void)
1708 {
1709 	int rc = 0;
1710 
1711 	debugfs_root = debugfs_create_dir("btt", NULL);
1712 	if (IS_ERR_OR_NULL(debugfs_root))
1713 		rc = -ENXIO;
1714 
1715 	return rc;
1716 }
1717 
1718 static void __exit nd_btt_exit(void)
1719 {
1720 	debugfs_remove_recursive(debugfs_root);
1721 }
1722 
1723 MODULE_ALIAS_ND_DEVICE(ND_DEVICE_BTT);
1724 MODULE_AUTHOR("Vishal Verma <vishal.l.verma@linux.intel.com>");
1725 MODULE_DESCRIPTION("NVDIMM Block Translation Table");
1726 MODULE_LICENSE("GPL v2");
1727 module_init(nd_btt_init);
1728 module_exit(nd_btt_exit);
1729