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