xref: /linux/drivers/md/raid5-ppl.c (revision 14340de506c9aa08baa9540ee6250c9d978c16b7)
1 /*
2  * Partial Parity Log for closing the RAID5 write hole
3  * Copyright (c) 2017, 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 
15 #include <linux/kernel.h>
16 #include <linux/blkdev.h>
17 #include <linux/slab.h>
18 #include <linux/crc32c.h>
19 #include <linux/async_tx.h>
20 #include <linux/raid/md_p.h>
21 #include "md.h"
22 #include "raid5.h"
23 #include "raid5-log.h"
24 
25 /*
26  * PPL consists of a 4KB header (struct ppl_header) and at least 128KB for
27  * partial parity data. The header contains an array of entries
28  * (struct ppl_header_entry) which describe the logged write requests.
29  * Partial parity for the entries comes after the header, written in the same
30  * sequence as the entries:
31  *
32  * Header
33  *   entry0
34  *   ...
35  *   entryN
36  * PP data
37  *   PP for entry0
38  *   ...
39  *   PP for entryN
40  *
41  * An entry describes one or more consecutive stripe_heads, up to a full
42  * stripe. The modifed raid data chunks form an m-by-n matrix, where m is the
43  * number of stripe_heads in the entry and n is the number of modified data
44  * disks. Every stripe_head in the entry must write to the same data disks.
45  * An example of a valid case described by a single entry (writes to the first
46  * stripe of a 4 disk array, 16k chunk size):
47  *
48  * sh->sector   dd0   dd1   dd2    ppl
49  *            +-----+-----+-----+
50  * 0          | --- | --- | --- | +----+
51  * 8          | -W- | -W- | --- | | pp |   data_sector = 8
52  * 16         | -W- | -W- | --- | | pp |   data_size = 3 * 2 * 4k
53  * 24         | -W- | -W- | --- | | pp |   pp_size = 3 * 4k
54  *            +-----+-----+-----+ +----+
55  *
56  * data_sector is the first raid sector of the modified data, data_size is the
57  * total size of modified data and pp_size is the size of partial parity for
58  * this entry. Entries for full stripe writes contain no partial parity
59  * (pp_size = 0), they only mark the stripes for which parity should be
60  * recalculated after an unclean shutdown. Every entry holds a checksum of its
61  * partial parity, the header also has a checksum of the header itself.
62  *
63  * A write request is always logged to the PPL instance stored on the parity
64  * disk of the corresponding stripe. For each member disk there is one ppl_log
65  * used to handle logging for this disk, independently from others. They are
66  * grouped in child_logs array in struct ppl_conf, which is assigned to
67  * r5conf->log_private.
68  *
69  * ppl_io_unit represents a full PPL write, header_page contains the ppl_header.
70  * PPL entries for logged stripes are added in ppl_log_stripe(). A stripe_head
71  * can be appended to the last entry if it meets the conditions for a valid
72  * entry described above, otherwise a new entry is added. Checksums of entries
73  * are calculated incrementally as stripes containing partial parity are being
74  * added. ppl_submit_iounit() calculates the checksum of the header and submits
75  * a bio containing the header page and partial parity pages (sh->ppl_page) for
76  * all stripes of the io_unit. When the PPL write completes, the stripes
77  * associated with the io_unit are released and raid5d starts writing their data
78  * and parity. When all stripes are written, the io_unit is freed and the next
79  * can be submitted.
80  *
81  * An io_unit is used to gather stripes until it is submitted or becomes full
82  * (if the maximum number of entries or size of PPL is reached). Another io_unit
83  * can't be submitted until the previous has completed (PPL and stripe
84  * data+parity is written). The log->io_list tracks all io_units of a log
85  * (for a single member disk). New io_units are added to the end of the list
86  * and the first io_unit is submitted, if it is not submitted already.
87  * The current io_unit accepting new stripes is always at the end of the list.
88  *
89  * If write-back cache is enabled for any of the disks in the array, its data
90  * must be flushed before next io_unit is submitted.
91  */
92 
93 #define PPL_SPACE_SIZE (128 * 1024)
94 
95 struct ppl_conf {
96 	struct mddev *mddev;
97 
98 	/* array of child logs, one for each raid disk */
99 	struct ppl_log *child_logs;
100 	int count;
101 
102 	int block_size;		/* the logical block size used for data_sector
103 				 * in ppl_header_entry */
104 	u32 signature;		/* raid array identifier */
105 	atomic64_t seq;		/* current log write sequence number */
106 
107 	struct kmem_cache *io_kc;
108 	mempool_t io_pool;
109 	struct bio_set bs;
110 	struct bio_set flush_bs;
111 
112 	/* used only for recovery */
113 	int recovered_entries;
114 	int mismatch_count;
115 
116 	/* stripes to retry if failed to allocate io_unit */
117 	struct list_head no_mem_stripes;
118 	spinlock_t no_mem_stripes_lock;
119 
120 	unsigned short write_hint;
121 };
122 
123 struct ppl_log {
124 	struct ppl_conf *ppl_conf;	/* shared between all log instances */
125 
126 	struct md_rdev *rdev;		/* array member disk associated with
127 					 * this log instance */
128 	struct mutex io_mutex;
129 	struct ppl_io_unit *current_io;	/* current io_unit accepting new data
130 					 * always at the end of io_list */
131 	spinlock_t io_list_lock;
132 	struct list_head io_list;	/* all io_units of this log */
133 
134 	sector_t next_io_sector;
135 	unsigned int entry_space;
136 	bool use_multippl;
137 	bool wb_cache_on;
138 	unsigned long disk_flush_bitmap;
139 };
140 
141 #define PPL_IO_INLINE_BVECS 32
142 
143 struct ppl_io_unit {
144 	struct ppl_log *log;
145 
146 	struct page *header_page;	/* for ppl_header */
147 
148 	unsigned int entries_count;	/* number of entries in ppl_header */
149 	unsigned int pp_size;		/* total size current of partial parity */
150 
151 	u64 seq;			/* sequence number of this log write */
152 	struct list_head log_sibling;	/* log->io_list */
153 
154 	struct list_head stripe_list;	/* stripes added to the io_unit */
155 	atomic_t pending_stripes;	/* how many stripes not written to raid */
156 	atomic_t pending_flushes;	/* how many disk flushes are in progress */
157 
158 	bool submitted;			/* true if write to log started */
159 
160 	/* inline bio and its biovec for submitting the iounit */
161 	struct bio bio;
162 	struct bio_vec biovec[PPL_IO_INLINE_BVECS];
163 };
164 
165 struct dma_async_tx_descriptor *
166 ops_run_partial_parity(struct stripe_head *sh, struct raid5_percpu *percpu,
167 		       struct dma_async_tx_descriptor *tx)
168 {
169 	int disks = sh->disks;
170 	struct page **srcs = percpu->scribble;
171 	int count = 0, pd_idx = sh->pd_idx, i;
172 	struct async_submit_ctl submit;
173 
174 	pr_debug("%s: stripe %llu\n", __func__, (unsigned long long)sh->sector);
175 
176 	/*
177 	 * Partial parity is the XOR of stripe data chunks that are not changed
178 	 * during the write request. Depending on available data
179 	 * (read-modify-write vs. reconstruct-write case) we calculate it
180 	 * differently.
181 	 */
182 	if (sh->reconstruct_state == reconstruct_state_prexor_drain_run) {
183 		/*
184 		 * rmw: xor old data and parity from updated disks
185 		 * This is calculated earlier by ops_run_prexor5() so just copy
186 		 * the parity dev page.
187 		 */
188 		srcs[count++] = sh->dev[pd_idx].page;
189 	} else if (sh->reconstruct_state == reconstruct_state_drain_run) {
190 		/* rcw: xor data from all not updated disks */
191 		for (i = disks; i--;) {
192 			struct r5dev *dev = &sh->dev[i];
193 			if (test_bit(R5_UPTODATE, &dev->flags))
194 				srcs[count++] = dev->page;
195 		}
196 	} else {
197 		return tx;
198 	}
199 
200 	init_async_submit(&submit, ASYNC_TX_FENCE|ASYNC_TX_XOR_ZERO_DST, tx,
201 			  NULL, sh, (void *) (srcs + sh->disks + 2));
202 
203 	if (count == 1)
204 		tx = async_memcpy(sh->ppl_page, srcs[0], 0, 0, PAGE_SIZE,
205 				  &submit);
206 	else
207 		tx = async_xor(sh->ppl_page, srcs, 0, count, PAGE_SIZE,
208 			       &submit);
209 
210 	return tx;
211 }
212 
213 static void *ppl_io_pool_alloc(gfp_t gfp_mask, void *pool_data)
214 {
215 	struct kmem_cache *kc = pool_data;
216 	struct ppl_io_unit *io;
217 
218 	io = kmem_cache_alloc(kc, gfp_mask);
219 	if (!io)
220 		return NULL;
221 
222 	io->header_page = alloc_page(gfp_mask);
223 	if (!io->header_page) {
224 		kmem_cache_free(kc, io);
225 		return NULL;
226 	}
227 
228 	return io;
229 }
230 
231 static void ppl_io_pool_free(void *element, void *pool_data)
232 {
233 	struct kmem_cache *kc = pool_data;
234 	struct ppl_io_unit *io = element;
235 
236 	__free_page(io->header_page);
237 	kmem_cache_free(kc, io);
238 }
239 
240 static struct ppl_io_unit *ppl_new_iounit(struct ppl_log *log,
241 					  struct stripe_head *sh)
242 {
243 	struct ppl_conf *ppl_conf = log->ppl_conf;
244 	struct ppl_io_unit *io;
245 	struct ppl_header *pplhdr;
246 	struct page *header_page;
247 
248 	io = mempool_alloc(&ppl_conf->io_pool, GFP_NOWAIT);
249 	if (!io)
250 		return NULL;
251 
252 	header_page = io->header_page;
253 	memset(io, 0, sizeof(*io));
254 	io->header_page = header_page;
255 
256 	io->log = log;
257 	INIT_LIST_HEAD(&io->log_sibling);
258 	INIT_LIST_HEAD(&io->stripe_list);
259 	atomic_set(&io->pending_stripes, 0);
260 	atomic_set(&io->pending_flushes, 0);
261 	bio_init(&io->bio, io->biovec, PPL_IO_INLINE_BVECS);
262 
263 	pplhdr = page_address(io->header_page);
264 	clear_page(pplhdr);
265 	memset(pplhdr->reserved, 0xff, PPL_HDR_RESERVED);
266 	pplhdr->signature = cpu_to_le32(ppl_conf->signature);
267 
268 	io->seq = atomic64_add_return(1, &ppl_conf->seq);
269 	pplhdr->generation = cpu_to_le64(io->seq);
270 
271 	return io;
272 }
273 
274 static int ppl_log_stripe(struct ppl_log *log, struct stripe_head *sh)
275 {
276 	struct ppl_io_unit *io = log->current_io;
277 	struct ppl_header_entry *e = NULL;
278 	struct ppl_header *pplhdr;
279 	int i;
280 	sector_t data_sector = 0;
281 	int data_disks = 0;
282 	struct r5conf *conf = sh->raid_conf;
283 
284 	pr_debug("%s: stripe: %llu\n", __func__, (unsigned long long)sh->sector);
285 
286 	/* check if current io_unit is full */
287 	if (io && (io->pp_size == log->entry_space ||
288 		   io->entries_count == PPL_HDR_MAX_ENTRIES)) {
289 		pr_debug("%s: add io_unit blocked by seq: %llu\n",
290 			 __func__, io->seq);
291 		io = NULL;
292 	}
293 
294 	/* add a new unit if there is none or the current is full */
295 	if (!io) {
296 		io = ppl_new_iounit(log, sh);
297 		if (!io)
298 			return -ENOMEM;
299 		spin_lock_irq(&log->io_list_lock);
300 		list_add_tail(&io->log_sibling, &log->io_list);
301 		spin_unlock_irq(&log->io_list_lock);
302 
303 		log->current_io = io;
304 	}
305 
306 	for (i = 0; i < sh->disks; i++) {
307 		struct r5dev *dev = &sh->dev[i];
308 
309 		if (i != sh->pd_idx && test_bit(R5_Wantwrite, &dev->flags)) {
310 			if (!data_disks || dev->sector < data_sector)
311 				data_sector = dev->sector;
312 			data_disks++;
313 		}
314 	}
315 	BUG_ON(!data_disks);
316 
317 	pr_debug("%s: seq: %llu data_sector: %llu data_disks: %d\n", __func__,
318 		 io->seq, (unsigned long long)data_sector, data_disks);
319 
320 	pplhdr = page_address(io->header_page);
321 
322 	if (io->entries_count > 0) {
323 		struct ppl_header_entry *last =
324 				&pplhdr->entries[io->entries_count - 1];
325 		struct stripe_head *sh_last = list_last_entry(
326 				&io->stripe_list, struct stripe_head, log_list);
327 		u64 data_sector_last = le64_to_cpu(last->data_sector);
328 		u32 data_size_last = le32_to_cpu(last->data_size);
329 
330 		/*
331 		 * Check if we can append the stripe to the last entry. It must
332 		 * be just after the last logged stripe and write to the same
333 		 * disks. Use bit shift and logarithm to avoid 64-bit division.
334 		 */
335 		if ((sh->sector == sh_last->sector + STRIPE_SECTORS) &&
336 		    (data_sector >> ilog2(conf->chunk_sectors) ==
337 		     data_sector_last >> ilog2(conf->chunk_sectors)) &&
338 		    ((data_sector - data_sector_last) * data_disks ==
339 		     data_size_last >> 9))
340 			e = last;
341 	}
342 
343 	if (!e) {
344 		e = &pplhdr->entries[io->entries_count++];
345 		e->data_sector = cpu_to_le64(data_sector);
346 		e->parity_disk = cpu_to_le32(sh->pd_idx);
347 		e->checksum = cpu_to_le32(~0);
348 	}
349 
350 	le32_add_cpu(&e->data_size, data_disks << PAGE_SHIFT);
351 
352 	/* don't write any PP if full stripe write */
353 	if (!test_bit(STRIPE_FULL_WRITE, &sh->state)) {
354 		le32_add_cpu(&e->pp_size, PAGE_SIZE);
355 		io->pp_size += PAGE_SIZE;
356 		e->checksum = cpu_to_le32(crc32c_le(le32_to_cpu(e->checksum),
357 						    page_address(sh->ppl_page),
358 						    PAGE_SIZE));
359 	}
360 
361 	list_add_tail(&sh->log_list, &io->stripe_list);
362 	atomic_inc(&io->pending_stripes);
363 	sh->ppl_io = io;
364 
365 	return 0;
366 }
367 
368 int ppl_write_stripe(struct r5conf *conf, struct stripe_head *sh)
369 {
370 	struct ppl_conf *ppl_conf = conf->log_private;
371 	struct ppl_io_unit *io = sh->ppl_io;
372 	struct ppl_log *log;
373 
374 	if (io || test_bit(STRIPE_SYNCING, &sh->state) || !sh->ppl_page ||
375 	    !test_bit(R5_Wantwrite, &sh->dev[sh->pd_idx].flags) ||
376 	    !test_bit(R5_Insync, &sh->dev[sh->pd_idx].flags)) {
377 		clear_bit(STRIPE_LOG_TRAPPED, &sh->state);
378 		return -EAGAIN;
379 	}
380 
381 	log = &ppl_conf->child_logs[sh->pd_idx];
382 
383 	mutex_lock(&log->io_mutex);
384 
385 	if (!log->rdev || test_bit(Faulty, &log->rdev->flags)) {
386 		mutex_unlock(&log->io_mutex);
387 		return -EAGAIN;
388 	}
389 
390 	set_bit(STRIPE_LOG_TRAPPED, &sh->state);
391 	clear_bit(STRIPE_DELAYED, &sh->state);
392 	atomic_inc(&sh->count);
393 
394 	if (ppl_log_stripe(log, sh)) {
395 		spin_lock_irq(&ppl_conf->no_mem_stripes_lock);
396 		list_add_tail(&sh->log_list, &ppl_conf->no_mem_stripes);
397 		spin_unlock_irq(&ppl_conf->no_mem_stripes_lock);
398 	}
399 
400 	mutex_unlock(&log->io_mutex);
401 
402 	return 0;
403 }
404 
405 static void ppl_log_endio(struct bio *bio)
406 {
407 	struct ppl_io_unit *io = bio->bi_private;
408 	struct ppl_log *log = io->log;
409 	struct ppl_conf *ppl_conf = log->ppl_conf;
410 	struct stripe_head *sh, *next;
411 
412 	pr_debug("%s: seq: %llu\n", __func__, io->seq);
413 
414 	if (bio->bi_status)
415 		md_error(ppl_conf->mddev, log->rdev);
416 
417 	list_for_each_entry_safe(sh, next, &io->stripe_list, log_list) {
418 		list_del_init(&sh->log_list);
419 
420 		set_bit(STRIPE_HANDLE, &sh->state);
421 		raid5_release_stripe(sh);
422 	}
423 }
424 
425 static void ppl_submit_iounit_bio(struct ppl_io_unit *io, struct bio *bio)
426 {
427 	char b[BDEVNAME_SIZE];
428 
429 	pr_debug("%s: seq: %llu size: %u sector: %llu dev: %s\n",
430 		 __func__, io->seq, bio->bi_iter.bi_size,
431 		 (unsigned long long)bio->bi_iter.bi_sector,
432 		 bio_devname(bio, b));
433 
434 	submit_bio(bio);
435 }
436 
437 static void ppl_submit_iounit(struct ppl_io_unit *io)
438 {
439 	struct ppl_log *log = io->log;
440 	struct ppl_conf *ppl_conf = log->ppl_conf;
441 	struct ppl_header *pplhdr = page_address(io->header_page);
442 	struct bio *bio = &io->bio;
443 	struct stripe_head *sh;
444 	int i;
445 
446 	bio->bi_private = io;
447 
448 	if (!log->rdev || test_bit(Faulty, &log->rdev->flags)) {
449 		ppl_log_endio(bio);
450 		return;
451 	}
452 
453 	for (i = 0; i < io->entries_count; i++) {
454 		struct ppl_header_entry *e = &pplhdr->entries[i];
455 
456 		pr_debug("%s: seq: %llu entry: %d data_sector: %llu pp_size: %u data_size: %u\n",
457 			 __func__, io->seq, i, le64_to_cpu(e->data_sector),
458 			 le32_to_cpu(e->pp_size), le32_to_cpu(e->data_size));
459 
460 		e->data_sector = cpu_to_le64(le64_to_cpu(e->data_sector) >>
461 					     ilog2(ppl_conf->block_size >> 9));
462 		e->checksum = cpu_to_le32(~le32_to_cpu(e->checksum));
463 	}
464 
465 	pplhdr->entries_count = cpu_to_le32(io->entries_count);
466 	pplhdr->checksum = cpu_to_le32(~crc32c_le(~0, pplhdr, PPL_HEADER_SIZE));
467 
468 	/* Rewind the buffer if current PPL is larger then remaining space */
469 	if (log->use_multippl &&
470 	    log->rdev->ppl.sector + log->rdev->ppl.size - log->next_io_sector <
471 	    (PPL_HEADER_SIZE + io->pp_size) >> 9)
472 		log->next_io_sector = log->rdev->ppl.sector;
473 
474 
475 	bio->bi_end_io = ppl_log_endio;
476 	bio->bi_opf = REQ_OP_WRITE | REQ_FUA;
477 	bio_set_dev(bio, log->rdev->bdev);
478 	bio->bi_iter.bi_sector = log->next_io_sector;
479 	bio_add_page(bio, io->header_page, PAGE_SIZE, 0);
480 	bio->bi_write_hint = ppl_conf->write_hint;
481 
482 	pr_debug("%s: log->current_io_sector: %llu\n", __func__,
483 	    (unsigned long long)log->next_io_sector);
484 
485 	if (log->use_multippl)
486 		log->next_io_sector += (PPL_HEADER_SIZE + io->pp_size) >> 9;
487 
488 	WARN_ON(log->disk_flush_bitmap != 0);
489 
490 	list_for_each_entry(sh, &io->stripe_list, log_list) {
491 		for (i = 0; i < sh->disks; i++) {
492 			struct r5dev *dev = &sh->dev[i];
493 
494 			if ((ppl_conf->child_logs[i].wb_cache_on) &&
495 			    (test_bit(R5_Wantwrite, &dev->flags))) {
496 				set_bit(i, &log->disk_flush_bitmap);
497 			}
498 		}
499 
500 		/* entries for full stripe writes have no partial parity */
501 		if (test_bit(STRIPE_FULL_WRITE, &sh->state))
502 			continue;
503 
504 		if (!bio_add_page(bio, sh->ppl_page, PAGE_SIZE, 0)) {
505 			struct bio *prev = bio;
506 
507 			bio = bio_alloc_bioset(GFP_NOIO, BIO_MAX_PAGES,
508 					       &ppl_conf->bs);
509 			bio->bi_opf = prev->bi_opf;
510 			bio->bi_write_hint = prev->bi_write_hint;
511 			bio_copy_dev(bio, prev);
512 			bio->bi_iter.bi_sector = bio_end_sector(prev);
513 			bio_add_page(bio, sh->ppl_page, PAGE_SIZE, 0);
514 
515 			bio_chain(bio, prev);
516 			ppl_submit_iounit_bio(io, prev);
517 		}
518 	}
519 
520 	ppl_submit_iounit_bio(io, bio);
521 }
522 
523 static void ppl_submit_current_io(struct ppl_log *log)
524 {
525 	struct ppl_io_unit *io;
526 
527 	spin_lock_irq(&log->io_list_lock);
528 
529 	io = list_first_entry_or_null(&log->io_list, struct ppl_io_unit,
530 				      log_sibling);
531 	if (io && io->submitted)
532 		io = NULL;
533 
534 	spin_unlock_irq(&log->io_list_lock);
535 
536 	if (io) {
537 		io->submitted = true;
538 
539 		if (io == log->current_io)
540 			log->current_io = NULL;
541 
542 		ppl_submit_iounit(io);
543 	}
544 }
545 
546 void ppl_write_stripe_run(struct r5conf *conf)
547 {
548 	struct ppl_conf *ppl_conf = conf->log_private;
549 	struct ppl_log *log;
550 	int i;
551 
552 	for (i = 0; i < ppl_conf->count; i++) {
553 		log = &ppl_conf->child_logs[i];
554 
555 		mutex_lock(&log->io_mutex);
556 		ppl_submit_current_io(log);
557 		mutex_unlock(&log->io_mutex);
558 	}
559 }
560 
561 static void ppl_io_unit_finished(struct ppl_io_unit *io)
562 {
563 	struct ppl_log *log = io->log;
564 	struct ppl_conf *ppl_conf = log->ppl_conf;
565 	struct r5conf *conf = ppl_conf->mddev->private;
566 	unsigned long flags;
567 
568 	pr_debug("%s: seq: %llu\n", __func__, io->seq);
569 
570 	local_irq_save(flags);
571 
572 	spin_lock(&log->io_list_lock);
573 	list_del(&io->log_sibling);
574 	spin_unlock(&log->io_list_lock);
575 
576 	mempool_free(io, &ppl_conf->io_pool);
577 
578 	spin_lock(&ppl_conf->no_mem_stripes_lock);
579 	if (!list_empty(&ppl_conf->no_mem_stripes)) {
580 		struct stripe_head *sh;
581 
582 		sh = list_first_entry(&ppl_conf->no_mem_stripes,
583 				      struct stripe_head, log_list);
584 		list_del_init(&sh->log_list);
585 		set_bit(STRIPE_HANDLE, &sh->state);
586 		raid5_release_stripe(sh);
587 	}
588 	spin_unlock(&ppl_conf->no_mem_stripes_lock);
589 
590 	local_irq_restore(flags);
591 
592 	wake_up(&conf->wait_for_quiescent);
593 }
594 
595 static void ppl_flush_endio(struct bio *bio)
596 {
597 	struct ppl_io_unit *io = bio->bi_private;
598 	struct ppl_log *log = io->log;
599 	struct ppl_conf *ppl_conf = log->ppl_conf;
600 	struct r5conf *conf = ppl_conf->mddev->private;
601 	char b[BDEVNAME_SIZE];
602 
603 	pr_debug("%s: dev: %s\n", __func__, bio_devname(bio, b));
604 
605 	if (bio->bi_status) {
606 		struct md_rdev *rdev;
607 
608 		rcu_read_lock();
609 		rdev = md_find_rdev_rcu(conf->mddev, bio_dev(bio));
610 		if (rdev)
611 			md_error(rdev->mddev, rdev);
612 		rcu_read_unlock();
613 	}
614 
615 	bio_put(bio);
616 
617 	if (atomic_dec_and_test(&io->pending_flushes)) {
618 		ppl_io_unit_finished(io);
619 		md_wakeup_thread(conf->mddev->thread);
620 	}
621 }
622 
623 static void ppl_do_flush(struct ppl_io_unit *io)
624 {
625 	struct ppl_log *log = io->log;
626 	struct ppl_conf *ppl_conf = log->ppl_conf;
627 	struct r5conf *conf = ppl_conf->mddev->private;
628 	int raid_disks = conf->raid_disks;
629 	int flushed_disks = 0;
630 	int i;
631 
632 	atomic_set(&io->pending_flushes, raid_disks);
633 
634 	for_each_set_bit(i, &log->disk_flush_bitmap, raid_disks) {
635 		struct md_rdev *rdev;
636 		struct block_device *bdev = NULL;
637 
638 		rcu_read_lock();
639 		rdev = rcu_dereference(conf->disks[i].rdev);
640 		if (rdev && !test_bit(Faulty, &rdev->flags))
641 			bdev = rdev->bdev;
642 		rcu_read_unlock();
643 
644 		if (bdev) {
645 			struct bio *bio;
646 			char b[BDEVNAME_SIZE];
647 
648 			bio = bio_alloc_bioset(GFP_NOIO, 0, &ppl_conf->flush_bs);
649 			bio_set_dev(bio, bdev);
650 			bio->bi_private = io;
651 			bio->bi_opf = REQ_OP_WRITE | REQ_PREFLUSH;
652 			bio->bi_end_io = ppl_flush_endio;
653 
654 			pr_debug("%s: dev: %s\n", __func__,
655 				 bio_devname(bio, b));
656 
657 			submit_bio(bio);
658 			flushed_disks++;
659 		}
660 	}
661 
662 	log->disk_flush_bitmap = 0;
663 
664 	for (i = flushed_disks ; i < raid_disks; i++) {
665 		if (atomic_dec_and_test(&io->pending_flushes))
666 			ppl_io_unit_finished(io);
667 	}
668 }
669 
670 static inline bool ppl_no_io_unit_submitted(struct r5conf *conf,
671 					    struct ppl_log *log)
672 {
673 	struct ppl_io_unit *io;
674 
675 	io = list_first_entry_or_null(&log->io_list, struct ppl_io_unit,
676 				      log_sibling);
677 
678 	return !io || !io->submitted;
679 }
680 
681 void ppl_quiesce(struct r5conf *conf, int quiesce)
682 {
683 	struct ppl_conf *ppl_conf = conf->log_private;
684 	int i;
685 
686 	if (quiesce) {
687 		for (i = 0; i < ppl_conf->count; i++) {
688 			struct ppl_log *log = &ppl_conf->child_logs[i];
689 
690 			spin_lock_irq(&log->io_list_lock);
691 			wait_event_lock_irq(conf->wait_for_quiescent,
692 					    ppl_no_io_unit_submitted(conf, log),
693 					    log->io_list_lock);
694 			spin_unlock_irq(&log->io_list_lock);
695 		}
696 	}
697 }
698 
699 int ppl_handle_flush_request(struct r5l_log *log, struct bio *bio)
700 {
701 	if (bio->bi_iter.bi_size == 0) {
702 		bio_endio(bio);
703 		return 0;
704 	}
705 	bio->bi_opf &= ~REQ_PREFLUSH;
706 	return -EAGAIN;
707 }
708 
709 void ppl_stripe_write_finished(struct stripe_head *sh)
710 {
711 	struct ppl_io_unit *io;
712 
713 	io = sh->ppl_io;
714 	sh->ppl_io = NULL;
715 
716 	if (io && atomic_dec_and_test(&io->pending_stripes)) {
717 		if (io->log->disk_flush_bitmap)
718 			ppl_do_flush(io);
719 		else
720 			ppl_io_unit_finished(io);
721 	}
722 }
723 
724 static void ppl_xor(int size, struct page *page1, struct page *page2)
725 {
726 	struct async_submit_ctl submit;
727 	struct dma_async_tx_descriptor *tx;
728 	struct page *xor_srcs[] = { page1, page2 };
729 
730 	init_async_submit(&submit, ASYNC_TX_ACK|ASYNC_TX_XOR_DROP_DST,
731 			  NULL, NULL, NULL, NULL);
732 	tx = async_xor(page1, xor_srcs, 0, 2, size, &submit);
733 
734 	async_tx_quiesce(&tx);
735 }
736 
737 /*
738  * PPL recovery strategy: xor partial parity and data from all modified data
739  * disks within a stripe and write the result as the new stripe parity. If all
740  * stripe data disks are modified (full stripe write), no partial parity is
741  * available, so just xor the data disks.
742  *
743  * Recovery of a PPL entry shall occur only if all modified data disks are
744  * available and read from all of them succeeds.
745  *
746  * A PPL entry applies to a stripe, partial parity size for an entry is at most
747  * the size of the chunk. Examples of possible cases for a single entry:
748  *
749  * case 0: single data disk write:
750  *   data0    data1    data2     ppl        parity
751  * +--------+--------+--------+           +--------------------+
752  * | ------ | ------ | ------ | +----+    | (no change)        |
753  * | ------ | -data- | ------ | | pp | -> | data1 ^ pp         |
754  * | ------ | -data- | ------ | | pp | -> | data1 ^ pp         |
755  * | ------ | ------ | ------ | +----+    | (no change)        |
756  * +--------+--------+--------+           +--------------------+
757  * pp_size = data_size
758  *
759  * case 1: more than one data disk write:
760  *   data0    data1    data2     ppl        parity
761  * +--------+--------+--------+           +--------------------+
762  * | ------ | ------ | ------ | +----+    | (no change)        |
763  * | -data- | -data- | ------ | | pp | -> | data0 ^ data1 ^ pp |
764  * | -data- | -data- | ------ | | pp | -> | data0 ^ data1 ^ pp |
765  * | ------ | ------ | ------ | +----+    | (no change)        |
766  * +--------+--------+--------+           +--------------------+
767  * pp_size = data_size / modified_data_disks
768  *
769  * case 2: write to all data disks (also full stripe write):
770  *   data0    data1    data2                parity
771  * +--------+--------+--------+           +--------------------+
772  * | ------ | ------ | ------ |           | (no change)        |
773  * | -data- | -data- | -data- | --------> | xor all data       |
774  * | ------ | ------ | ------ | --------> | (no change)        |
775  * | ------ | ------ | ------ |           | (no change)        |
776  * +--------+--------+--------+           +--------------------+
777  * pp_size = 0
778  *
779  * The following cases are possible only in other implementations. The recovery
780  * code can handle them, but they are not generated at runtime because they can
781  * be reduced to cases 0, 1 and 2:
782  *
783  * case 3:
784  *   data0    data1    data2     ppl        parity
785  * +--------+--------+--------+ +----+    +--------------------+
786  * | ------ | -data- | -data- | | pp |    | data1 ^ data2 ^ pp |
787  * | ------ | -data- | -data- | | pp | -> | data1 ^ data2 ^ pp |
788  * | -data- | -data- | -data- | | -- | -> | xor all data       |
789  * | -data- | -data- | ------ | | pp |    | data0 ^ data1 ^ pp |
790  * +--------+--------+--------+ +----+    +--------------------+
791  * pp_size = chunk_size
792  *
793  * case 4:
794  *   data0    data1    data2     ppl        parity
795  * +--------+--------+--------+ +----+    +--------------------+
796  * | ------ | -data- | ------ | | pp |    | data1 ^ pp         |
797  * | ------ | ------ | ------ | | -- | -> | (no change)        |
798  * | ------ | ------ | ------ | | -- | -> | (no change)        |
799  * | -data- | ------ | ------ | | pp |    | data0 ^ pp         |
800  * +--------+--------+--------+ +----+    +--------------------+
801  * pp_size = chunk_size
802  */
803 static int ppl_recover_entry(struct ppl_log *log, struct ppl_header_entry *e,
804 			     sector_t ppl_sector)
805 {
806 	struct ppl_conf *ppl_conf = log->ppl_conf;
807 	struct mddev *mddev = ppl_conf->mddev;
808 	struct r5conf *conf = mddev->private;
809 	int block_size = ppl_conf->block_size;
810 	struct page *page1;
811 	struct page *page2;
812 	sector_t r_sector_first;
813 	sector_t r_sector_last;
814 	int strip_sectors;
815 	int data_disks;
816 	int i;
817 	int ret = 0;
818 	char b[BDEVNAME_SIZE];
819 	unsigned int pp_size = le32_to_cpu(e->pp_size);
820 	unsigned int data_size = le32_to_cpu(e->data_size);
821 
822 	page1 = alloc_page(GFP_KERNEL);
823 	page2 = alloc_page(GFP_KERNEL);
824 
825 	if (!page1 || !page2) {
826 		ret = -ENOMEM;
827 		goto out;
828 	}
829 
830 	r_sector_first = le64_to_cpu(e->data_sector) * (block_size >> 9);
831 
832 	if ((pp_size >> 9) < conf->chunk_sectors) {
833 		if (pp_size > 0) {
834 			data_disks = data_size / pp_size;
835 			strip_sectors = pp_size >> 9;
836 		} else {
837 			data_disks = conf->raid_disks - conf->max_degraded;
838 			strip_sectors = (data_size >> 9) / data_disks;
839 		}
840 		r_sector_last = r_sector_first +
841 				(data_disks - 1) * conf->chunk_sectors +
842 				strip_sectors;
843 	} else {
844 		data_disks = conf->raid_disks - conf->max_degraded;
845 		strip_sectors = conf->chunk_sectors;
846 		r_sector_last = r_sector_first + (data_size >> 9);
847 	}
848 
849 	pr_debug("%s: array sector first: %llu last: %llu\n", __func__,
850 		 (unsigned long long)r_sector_first,
851 		 (unsigned long long)r_sector_last);
852 
853 	/* if start and end is 4k aligned, use a 4k block */
854 	if (block_size == 512 &&
855 	    (r_sector_first & (STRIPE_SECTORS - 1)) == 0 &&
856 	    (r_sector_last & (STRIPE_SECTORS - 1)) == 0)
857 		block_size = STRIPE_SIZE;
858 
859 	/* iterate through blocks in strip */
860 	for (i = 0; i < strip_sectors; i += (block_size >> 9)) {
861 		bool update_parity = false;
862 		sector_t parity_sector;
863 		struct md_rdev *parity_rdev;
864 		struct stripe_head sh;
865 		int disk;
866 		int indent = 0;
867 
868 		pr_debug("%s:%*s iter %d start\n", __func__, indent, "", i);
869 		indent += 2;
870 
871 		memset(page_address(page1), 0, PAGE_SIZE);
872 
873 		/* iterate through data member disks */
874 		for (disk = 0; disk < data_disks; disk++) {
875 			int dd_idx;
876 			struct md_rdev *rdev;
877 			sector_t sector;
878 			sector_t r_sector = r_sector_first + i +
879 					    (disk * conf->chunk_sectors);
880 
881 			pr_debug("%s:%*s data member disk %d start\n",
882 				 __func__, indent, "", disk);
883 			indent += 2;
884 
885 			if (r_sector >= r_sector_last) {
886 				pr_debug("%s:%*s array sector %llu doesn't need parity update\n",
887 					 __func__, indent, "",
888 					 (unsigned long long)r_sector);
889 				indent -= 2;
890 				continue;
891 			}
892 
893 			update_parity = true;
894 
895 			/* map raid sector to member disk */
896 			sector = raid5_compute_sector(conf, r_sector, 0,
897 						      &dd_idx, NULL);
898 			pr_debug("%s:%*s processing array sector %llu => data member disk %d, sector %llu\n",
899 				 __func__, indent, "",
900 				 (unsigned long long)r_sector, dd_idx,
901 				 (unsigned long long)sector);
902 
903 			rdev = conf->disks[dd_idx].rdev;
904 			if (!rdev || (!test_bit(In_sync, &rdev->flags) &&
905 				      sector >= rdev->recovery_offset)) {
906 				pr_debug("%s:%*s data member disk %d missing\n",
907 					 __func__, indent, "", dd_idx);
908 				update_parity = false;
909 				break;
910 			}
911 
912 			pr_debug("%s:%*s reading data member disk %s sector %llu\n",
913 				 __func__, indent, "", bdevname(rdev->bdev, b),
914 				 (unsigned long long)sector);
915 			if (!sync_page_io(rdev, sector, block_size, page2,
916 					REQ_OP_READ, 0, false)) {
917 				md_error(mddev, rdev);
918 				pr_debug("%s:%*s read failed!\n", __func__,
919 					 indent, "");
920 				ret = -EIO;
921 				goto out;
922 			}
923 
924 			ppl_xor(block_size, page1, page2);
925 
926 			indent -= 2;
927 		}
928 
929 		if (!update_parity)
930 			continue;
931 
932 		if (pp_size > 0) {
933 			pr_debug("%s:%*s reading pp disk sector %llu\n",
934 				 __func__, indent, "",
935 				 (unsigned long long)(ppl_sector + i));
936 			if (!sync_page_io(log->rdev,
937 					ppl_sector - log->rdev->data_offset + i,
938 					block_size, page2, REQ_OP_READ, 0,
939 					false)) {
940 				pr_debug("%s:%*s read failed!\n", __func__,
941 					 indent, "");
942 				md_error(mddev, log->rdev);
943 				ret = -EIO;
944 				goto out;
945 			}
946 
947 			ppl_xor(block_size, page1, page2);
948 		}
949 
950 		/* map raid sector to parity disk */
951 		parity_sector = raid5_compute_sector(conf, r_sector_first + i,
952 				0, &disk, &sh);
953 		BUG_ON(sh.pd_idx != le32_to_cpu(e->parity_disk));
954 		parity_rdev = conf->disks[sh.pd_idx].rdev;
955 
956 		BUG_ON(parity_rdev->bdev->bd_dev != log->rdev->bdev->bd_dev);
957 		pr_debug("%s:%*s write parity at sector %llu, disk %s\n",
958 			 __func__, indent, "",
959 			 (unsigned long long)parity_sector,
960 			 bdevname(parity_rdev->bdev, b));
961 		if (!sync_page_io(parity_rdev, parity_sector, block_size,
962 				page1, REQ_OP_WRITE, 0, false)) {
963 			pr_debug("%s:%*s parity write error!\n", __func__,
964 				 indent, "");
965 			md_error(mddev, parity_rdev);
966 			ret = -EIO;
967 			goto out;
968 		}
969 	}
970 out:
971 	if (page1)
972 		__free_page(page1);
973 	if (page2)
974 		__free_page(page2);
975 	return ret;
976 }
977 
978 static int ppl_recover(struct ppl_log *log, struct ppl_header *pplhdr,
979 		       sector_t offset)
980 {
981 	struct ppl_conf *ppl_conf = log->ppl_conf;
982 	struct md_rdev *rdev = log->rdev;
983 	struct mddev *mddev = rdev->mddev;
984 	sector_t ppl_sector = rdev->ppl.sector + offset +
985 			      (PPL_HEADER_SIZE >> 9);
986 	struct page *page;
987 	int i;
988 	int ret = 0;
989 
990 	page = alloc_page(GFP_KERNEL);
991 	if (!page)
992 		return -ENOMEM;
993 
994 	/* iterate through all PPL entries saved */
995 	for (i = 0; i < le32_to_cpu(pplhdr->entries_count); i++) {
996 		struct ppl_header_entry *e = &pplhdr->entries[i];
997 		u32 pp_size = le32_to_cpu(e->pp_size);
998 		sector_t sector = ppl_sector;
999 		int ppl_entry_sectors = pp_size >> 9;
1000 		u32 crc, crc_stored;
1001 
1002 		pr_debug("%s: disk: %d entry: %d ppl_sector: %llu pp_size: %u\n",
1003 			 __func__, rdev->raid_disk, i,
1004 			 (unsigned long long)ppl_sector, pp_size);
1005 
1006 		crc = ~0;
1007 		crc_stored = le32_to_cpu(e->checksum);
1008 
1009 		/* read parial parity for this entry and calculate its checksum */
1010 		while (pp_size) {
1011 			int s = pp_size > PAGE_SIZE ? PAGE_SIZE : pp_size;
1012 
1013 			if (!sync_page_io(rdev, sector - rdev->data_offset,
1014 					s, page, REQ_OP_READ, 0, false)) {
1015 				md_error(mddev, rdev);
1016 				ret = -EIO;
1017 				goto out;
1018 			}
1019 
1020 			crc = crc32c_le(crc, page_address(page), s);
1021 
1022 			pp_size -= s;
1023 			sector += s >> 9;
1024 		}
1025 
1026 		crc = ~crc;
1027 
1028 		if (crc != crc_stored) {
1029 			/*
1030 			 * Don't recover this entry if the checksum does not
1031 			 * match, but keep going and try to recover other
1032 			 * entries.
1033 			 */
1034 			pr_debug("%s: ppl entry crc does not match: stored: 0x%x calculated: 0x%x\n",
1035 				 __func__, crc_stored, crc);
1036 			ppl_conf->mismatch_count++;
1037 		} else {
1038 			ret = ppl_recover_entry(log, e, ppl_sector);
1039 			if (ret)
1040 				goto out;
1041 			ppl_conf->recovered_entries++;
1042 		}
1043 
1044 		ppl_sector += ppl_entry_sectors;
1045 	}
1046 
1047 	/* flush the disk cache after recovery if necessary */
1048 	ret = blkdev_issue_flush(rdev->bdev, GFP_KERNEL, NULL);
1049 out:
1050 	__free_page(page);
1051 	return ret;
1052 }
1053 
1054 static int ppl_write_empty_header(struct ppl_log *log)
1055 {
1056 	struct page *page;
1057 	struct ppl_header *pplhdr;
1058 	struct md_rdev *rdev = log->rdev;
1059 	int ret = 0;
1060 
1061 	pr_debug("%s: disk: %d ppl_sector: %llu\n", __func__,
1062 		 rdev->raid_disk, (unsigned long long)rdev->ppl.sector);
1063 
1064 	page = alloc_page(GFP_NOIO | __GFP_ZERO);
1065 	if (!page)
1066 		return -ENOMEM;
1067 
1068 	pplhdr = page_address(page);
1069 	/* zero out PPL space to avoid collision with old PPLs */
1070 	blkdev_issue_zeroout(rdev->bdev, rdev->ppl.sector,
1071 			    log->rdev->ppl.size, GFP_NOIO, 0);
1072 	memset(pplhdr->reserved, 0xff, PPL_HDR_RESERVED);
1073 	pplhdr->signature = cpu_to_le32(log->ppl_conf->signature);
1074 	pplhdr->checksum = cpu_to_le32(~crc32c_le(~0, pplhdr, PAGE_SIZE));
1075 
1076 	if (!sync_page_io(rdev, rdev->ppl.sector - rdev->data_offset,
1077 			  PPL_HEADER_SIZE, page, REQ_OP_WRITE | REQ_SYNC |
1078 			  REQ_FUA, 0, false)) {
1079 		md_error(rdev->mddev, rdev);
1080 		ret = -EIO;
1081 	}
1082 
1083 	__free_page(page);
1084 	return ret;
1085 }
1086 
1087 static int ppl_load_distributed(struct ppl_log *log)
1088 {
1089 	struct ppl_conf *ppl_conf = log->ppl_conf;
1090 	struct md_rdev *rdev = log->rdev;
1091 	struct mddev *mddev = rdev->mddev;
1092 	struct page *page, *page2, *tmp;
1093 	struct ppl_header *pplhdr = NULL, *prev_pplhdr = NULL;
1094 	u32 crc, crc_stored;
1095 	u32 signature;
1096 	int ret = 0, i;
1097 	sector_t pplhdr_offset = 0, prev_pplhdr_offset = 0;
1098 
1099 	pr_debug("%s: disk: %d\n", __func__, rdev->raid_disk);
1100 	/* read PPL headers, find the recent one */
1101 	page = alloc_page(GFP_KERNEL);
1102 	if (!page)
1103 		return -ENOMEM;
1104 
1105 	page2 = alloc_page(GFP_KERNEL);
1106 	if (!page2) {
1107 		__free_page(page);
1108 		return -ENOMEM;
1109 	}
1110 
1111 	/* searching ppl area for latest ppl */
1112 	while (pplhdr_offset < rdev->ppl.size - (PPL_HEADER_SIZE >> 9)) {
1113 		if (!sync_page_io(rdev,
1114 				  rdev->ppl.sector - rdev->data_offset +
1115 				  pplhdr_offset, PAGE_SIZE, page, REQ_OP_READ,
1116 				  0, false)) {
1117 			md_error(mddev, rdev);
1118 			ret = -EIO;
1119 			/* if not able to read - don't recover any PPL */
1120 			pplhdr = NULL;
1121 			break;
1122 		}
1123 		pplhdr = page_address(page);
1124 
1125 		/* check header validity */
1126 		crc_stored = le32_to_cpu(pplhdr->checksum);
1127 		pplhdr->checksum = 0;
1128 		crc = ~crc32c_le(~0, pplhdr, PAGE_SIZE);
1129 
1130 		if (crc_stored != crc) {
1131 			pr_debug("%s: ppl header crc does not match: stored: 0x%x calculated: 0x%x (offset: %llu)\n",
1132 				 __func__, crc_stored, crc,
1133 				 (unsigned long long)pplhdr_offset);
1134 			pplhdr = prev_pplhdr;
1135 			pplhdr_offset = prev_pplhdr_offset;
1136 			break;
1137 		}
1138 
1139 		signature = le32_to_cpu(pplhdr->signature);
1140 
1141 		if (mddev->external) {
1142 			/*
1143 			 * For external metadata the header signature is set and
1144 			 * validated in userspace.
1145 			 */
1146 			ppl_conf->signature = signature;
1147 		} else if (ppl_conf->signature != signature) {
1148 			pr_debug("%s: ppl header signature does not match: stored: 0x%x configured: 0x%x (offset: %llu)\n",
1149 				 __func__, signature, ppl_conf->signature,
1150 				 (unsigned long long)pplhdr_offset);
1151 			pplhdr = prev_pplhdr;
1152 			pplhdr_offset = prev_pplhdr_offset;
1153 			break;
1154 		}
1155 
1156 		if (prev_pplhdr && le64_to_cpu(prev_pplhdr->generation) >
1157 		    le64_to_cpu(pplhdr->generation)) {
1158 			/* previous was newest */
1159 			pplhdr = prev_pplhdr;
1160 			pplhdr_offset = prev_pplhdr_offset;
1161 			break;
1162 		}
1163 
1164 		prev_pplhdr_offset = pplhdr_offset;
1165 		prev_pplhdr = pplhdr;
1166 
1167 		tmp = page;
1168 		page = page2;
1169 		page2 = tmp;
1170 
1171 		/* calculate next potential ppl offset */
1172 		for (i = 0; i < le32_to_cpu(pplhdr->entries_count); i++)
1173 			pplhdr_offset +=
1174 			    le32_to_cpu(pplhdr->entries[i].pp_size) >> 9;
1175 		pplhdr_offset += PPL_HEADER_SIZE >> 9;
1176 	}
1177 
1178 	/* no valid ppl found */
1179 	if (!pplhdr)
1180 		ppl_conf->mismatch_count++;
1181 	else
1182 		pr_debug("%s: latest PPL found at offset: %llu, with generation: %llu\n",
1183 		    __func__, (unsigned long long)pplhdr_offset,
1184 		    le64_to_cpu(pplhdr->generation));
1185 
1186 	/* attempt to recover from log if we are starting a dirty array */
1187 	if (pplhdr && !mddev->pers && mddev->recovery_cp != MaxSector)
1188 		ret = ppl_recover(log, pplhdr, pplhdr_offset);
1189 
1190 	/* write empty header if we are starting the array */
1191 	if (!ret && !mddev->pers)
1192 		ret = ppl_write_empty_header(log);
1193 
1194 	__free_page(page);
1195 	__free_page(page2);
1196 
1197 	pr_debug("%s: return: %d mismatch_count: %d recovered_entries: %d\n",
1198 		 __func__, ret, ppl_conf->mismatch_count,
1199 		 ppl_conf->recovered_entries);
1200 	return ret;
1201 }
1202 
1203 static int ppl_load(struct ppl_conf *ppl_conf)
1204 {
1205 	int ret = 0;
1206 	u32 signature = 0;
1207 	bool signature_set = false;
1208 	int i;
1209 
1210 	for (i = 0; i < ppl_conf->count; i++) {
1211 		struct ppl_log *log = &ppl_conf->child_logs[i];
1212 
1213 		/* skip missing drive */
1214 		if (!log->rdev)
1215 			continue;
1216 
1217 		ret = ppl_load_distributed(log);
1218 		if (ret)
1219 			break;
1220 
1221 		/*
1222 		 * For external metadata we can't check if the signature is
1223 		 * correct on a single drive, but we can check if it is the same
1224 		 * on all drives.
1225 		 */
1226 		if (ppl_conf->mddev->external) {
1227 			if (!signature_set) {
1228 				signature = ppl_conf->signature;
1229 				signature_set = true;
1230 			} else if (signature != ppl_conf->signature) {
1231 				pr_warn("md/raid:%s: PPL header signature does not match on all member drives\n",
1232 					mdname(ppl_conf->mddev));
1233 				ret = -EINVAL;
1234 				break;
1235 			}
1236 		}
1237 	}
1238 
1239 	pr_debug("%s: return: %d mismatch_count: %d recovered_entries: %d\n",
1240 		 __func__, ret, ppl_conf->mismatch_count,
1241 		 ppl_conf->recovered_entries);
1242 	return ret;
1243 }
1244 
1245 static void __ppl_exit_log(struct ppl_conf *ppl_conf)
1246 {
1247 	clear_bit(MD_HAS_PPL, &ppl_conf->mddev->flags);
1248 	clear_bit(MD_HAS_MULTIPLE_PPLS, &ppl_conf->mddev->flags);
1249 
1250 	kfree(ppl_conf->child_logs);
1251 
1252 	bioset_exit(&ppl_conf->bs);
1253 	bioset_exit(&ppl_conf->flush_bs);
1254 	mempool_exit(&ppl_conf->io_pool);
1255 	kmem_cache_destroy(ppl_conf->io_kc);
1256 
1257 	kfree(ppl_conf);
1258 }
1259 
1260 void ppl_exit_log(struct r5conf *conf)
1261 {
1262 	struct ppl_conf *ppl_conf = conf->log_private;
1263 
1264 	if (ppl_conf) {
1265 		__ppl_exit_log(ppl_conf);
1266 		conf->log_private = NULL;
1267 	}
1268 }
1269 
1270 static int ppl_validate_rdev(struct md_rdev *rdev)
1271 {
1272 	char b[BDEVNAME_SIZE];
1273 	int ppl_data_sectors;
1274 	int ppl_size_new;
1275 
1276 	/*
1277 	 * The configured PPL size must be enough to store
1278 	 * the header and (at the very least) partial parity
1279 	 * for one stripe. Round it down to ensure the data
1280 	 * space is cleanly divisible by stripe size.
1281 	 */
1282 	ppl_data_sectors = rdev->ppl.size - (PPL_HEADER_SIZE >> 9);
1283 
1284 	if (ppl_data_sectors > 0)
1285 		ppl_data_sectors = rounddown(ppl_data_sectors, STRIPE_SECTORS);
1286 
1287 	if (ppl_data_sectors <= 0) {
1288 		pr_warn("md/raid:%s: PPL space too small on %s\n",
1289 			mdname(rdev->mddev), bdevname(rdev->bdev, b));
1290 		return -ENOSPC;
1291 	}
1292 
1293 	ppl_size_new = ppl_data_sectors + (PPL_HEADER_SIZE >> 9);
1294 
1295 	if ((rdev->ppl.sector < rdev->data_offset &&
1296 	     rdev->ppl.sector + ppl_size_new > rdev->data_offset) ||
1297 	    (rdev->ppl.sector >= rdev->data_offset &&
1298 	     rdev->data_offset + rdev->sectors > rdev->ppl.sector)) {
1299 		pr_warn("md/raid:%s: PPL space overlaps with data on %s\n",
1300 			mdname(rdev->mddev), bdevname(rdev->bdev, b));
1301 		return -EINVAL;
1302 	}
1303 
1304 	if (!rdev->mddev->external &&
1305 	    ((rdev->ppl.offset > 0 && rdev->ppl.offset < (rdev->sb_size >> 9)) ||
1306 	     (rdev->ppl.offset <= 0 && rdev->ppl.offset + ppl_size_new > 0))) {
1307 		pr_warn("md/raid:%s: PPL space overlaps with superblock on %s\n",
1308 			mdname(rdev->mddev), bdevname(rdev->bdev, b));
1309 		return -EINVAL;
1310 	}
1311 
1312 	rdev->ppl.size = ppl_size_new;
1313 
1314 	return 0;
1315 }
1316 
1317 static void ppl_init_child_log(struct ppl_log *log, struct md_rdev *rdev)
1318 {
1319 	struct request_queue *q;
1320 
1321 	if ((rdev->ppl.size << 9) >= (PPL_SPACE_SIZE +
1322 				      PPL_HEADER_SIZE) * 2) {
1323 		log->use_multippl = true;
1324 		set_bit(MD_HAS_MULTIPLE_PPLS,
1325 			&log->ppl_conf->mddev->flags);
1326 		log->entry_space = PPL_SPACE_SIZE;
1327 	} else {
1328 		log->use_multippl = false;
1329 		log->entry_space = (log->rdev->ppl.size << 9) -
1330 				   PPL_HEADER_SIZE;
1331 	}
1332 	log->next_io_sector = rdev->ppl.sector;
1333 
1334 	q = bdev_get_queue(rdev->bdev);
1335 	if (test_bit(QUEUE_FLAG_WC, &q->queue_flags))
1336 		log->wb_cache_on = true;
1337 }
1338 
1339 int ppl_init_log(struct r5conf *conf)
1340 {
1341 	struct ppl_conf *ppl_conf;
1342 	struct mddev *mddev = conf->mddev;
1343 	int ret = 0;
1344 	int max_disks;
1345 	int i;
1346 
1347 	pr_debug("md/raid:%s: enabling distributed Partial Parity Log\n",
1348 		 mdname(conf->mddev));
1349 
1350 	if (PAGE_SIZE != 4096)
1351 		return -EINVAL;
1352 
1353 	if (mddev->level != 5) {
1354 		pr_warn("md/raid:%s PPL is not compatible with raid level %d\n",
1355 			mdname(mddev), mddev->level);
1356 		return -EINVAL;
1357 	}
1358 
1359 	if (mddev->bitmap_info.file || mddev->bitmap_info.offset) {
1360 		pr_warn("md/raid:%s PPL is not compatible with bitmap\n",
1361 			mdname(mddev));
1362 		return -EINVAL;
1363 	}
1364 
1365 	if (test_bit(MD_HAS_JOURNAL, &mddev->flags)) {
1366 		pr_warn("md/raid:%s PPL is not compatible with journal\n",
1367 			mdname(mddev));
1368 		return -EINVAL;
1369 	}
1370 
1371 	max_disks = FIELD_SIZEOF(struct ppl_log, disk_flush_bitmap) *
1372 		BITS_PER_BYTE;
1373 	if (conf->raid_disks > max_disks) {
1374 		pr_warn("md/raid:%s PPL doesn't support over %d disks in the array\n",
1375 			mdname(mddev), max_disks);
1376 		return -EINVAL;
1377 	}
1378 
1379 	ppl_conf = kzalloc(sizeof(struct ppl_conf), GFP_KERNEL);
1380 	if (!ppl_conf)
1381 		return -ENOMEM;
1382 
1383 	ppl_conf->mddev = mddev;
1384 
1385 	ppl_conf->io_kc = KMEM_CACHE(ppl_io_unit, 0);
1386 	if (!ppl_conf->io_kc) {
1387 		ret = -ENOMEM;
1388 		goto err;
1389 	}
1390 
1391 	ret = mempool_init(&ppl_conf->io_pool, conf->raid_disks, ppl_io_pool_alloc,
1392 			   ppl_io_pool_free, ppl_conf->io_kc);
1393 	if (ret)
1394 		goto err;
1395 
1396 	ret = bioset_init(&ppl_conf->bs, conf->raid_disks, 0, BIOSET_NEED_BVECS);
1397 	if (ret)
1398 		goto err;
1399 
1400 	ret = bioset_init(&ppl_conf->flush_bs, conf->raid_disks, 0, 0);
1401 	if (ret)
1402 		goto err;
1403 
1404 	ppl_conf->count = conf->raid_disks;
1405 	ppl_conf->child_logs = kcalloc(ppl_conf->count, sizeof(struct ppl_log),
1406 				       GFP_KERNEL);
1407 	if (!ppl_conf->child_logs) {
1408 		ret = -ENOMEM;
1409 		goto err;
1410 	}
1411 
1412 	atomic64_set(&ppl_conf->seq, 0);
1413 	INIT_LIST_HEAD(&ppl_conf->no_mem_stripes);
1414 	spin_lock_init(&ppl_conf->no_mem_stripes_lock);
1415 	ppl_conf->write_hint = RWF_WRITE_LIFE_NOT_SET;
1416 
1417 	if (!mddev->external) {
1418 		ppl_conf->signature = ~crc32c_le(~0, mddev->uuid, sizeof(mddev->uuid));
1419 		ppl_conf->block_size = 512;
1420 	} else {
1421 		ppl_conf->block_size = queue_logical_block_size(mddev->queue);
1422 	}
1423 
1424 	for (i = 0; i < ppl_conf->count; i++) {
1425 		struct ppl_log *log = &ppl_conf->child_logs[i];
1426 		struct md_rdev *rdev = conf->disks[i].rdev;
1427 
1428 		mutex_init(&log->io_mutex);
1429 		spin_lock_init(&log->io_list_lock);
1430 		INIT_LIST_HEAD(&log->io_list);
1431 
1432 		log->ppl_conf = ppl_conf;
1433 		log->rdev = rdev;
1434 
1435 		if (rdev) {
1436 			ret = ppl_validate_rdev(rdev);
1437 			if (ret)
1438 				goto err;
1439 
1440 			ppl_init_child_log(log, rdev);
1441 		}
1442 	}
1443 
1444 	/* load and possibly recover the logs from the member disks */
1445 	ret = ppl_load(ppl_conf);
1446 
1447 	if (ret) {
1448 		goto err;
1449 	} else if (!mddev->pers && mddev->recovery_cp == 0 &&
1450 		   ppl_conf->recovered_entries > 0 &&
1451 		   ppl_conf->mismatch_count == 0) {
1452 		/*
1453 		 * If we are starting a dirty array and the recovery succeeds
1454 		 * without any issues, set the array as clean.
1455 		 */
1456 		mddev->recovery_cp = MaxSector;
1457 		set_bit(MD_SB_CHANGE_CLEAN, &mddev->sb_flags);
1458 	} else if (mddev->pers && ppl_conf->mismatch_count > 0) {
1459 		/* no mismatch allowed when enabling PPL for a running array */
1460 		ret = -EINVAL;
1461 		goto err;
1462 	}
1463 
1464 	conf->log_private = ppl_conf;
1465 	set_bit(MD_HAS_PPL, &ppl_conf->mddev->flags);
1466 
1467 	return 0;
1468 err:
1469 	__ppl_exit_log(ppl_conf);
1470 	return ret;
1471 }
1472 
1473 int ppl_modify_log(struct r5conf *conf, struct md_rdev *rdev, bool add)
1474 {
1475 	struct ppl_conf *ppl_conf = conf->log_private;
1476 	struct ppl_log *log;
1477 	int ret = 0;
1478 	char b[BDEVNAME_SIZE];
1479 
1480 	if (!rdev)
1481 		return -EINVAL;
1482 
1483 	pr_debug("%s: disk: %d operation: %s dev: %s\n",
1484 		 __func__, rdev->raid_disk, add ? "add" : "remove",
1485 		 bdevname(rdev->bdev, b));
1486 
1487 	if (rdev->raid_disk < 0)
1488 		return 0;
1489 
1490 	if (rdev->raid_disk >= ppl_conf->count)
1491 		return -ENODEV;
1492 
1493 	log = &ppl_conf->child_logs[rdev->raid_disk];
1494 
1495 	mutex_lock(&log->io_mutex);
1496 	if (add) {
1497 		ret = ppl_validate_rdev(rdev);
1498 		if (!ret) {
1499 			log->rdev = rdev;
1500 			ret = ppl_write_empty_header(log);
1501 			ppl_init_child_log(log, rdev);
1502 		}
1503 	} else {
1504 		log->rdev = NULL;
1505 	}
1506 	mutex_unlock(&log->io_mutex);
1507 
1508 	return ret;
1509 }
1510 
1511 static ssize_t
1512 ppl_write_hint_show(struct mddev *mddev, char *buf)
1513 {
1514 	size_t ret = 0;
1515 	struct r5conf *conf;
1516 	struct ppl_conf *ppl_conf = NULL;
1517 
1518 	spin_lock(&mddev->lock);
1519 	conf = mddev->private;
1520 	if (conf && raid5_has_ppl(conf))
1521 		ppl_conf = conf->log_private;
1522 	ret = sprintf(buf, "%d\n", ppl_conf ? ppl_conf->write_hint : 0);
1523 	spin_unlock(&mddev->lock);
1524 
1525 	return ret;
1526 }
1527 
1528 static ssize_t
1529 ppl_write_hint_store(struct mddev *mddev, const char *page, size_t len)
1530 {
1531 	struct r5conf *conf;
1532 	struct ppl_conf *ppl_conf;
1533 	int err = 0;
1534 	unsigned short new;
1535 
1536 	if (len >= PAGE_SIZE)
1537 		return -EINVAL;
1538 	if (kstrtou16(page, 10, &new))
1539 		return -EINVAL;
1540 
1541 	err = mddev_lock(mddev);
1542 	if (err)
1543 		return err;
1544 
1545 	conf = mddev->private;
1546 	if (!conf) {
1547 		err = -ENODEV;
1548 	} else if (raid5_has_ppl(conf)) {
1549 		ppl_conf = conf->log_private;
1550 		if (!ppl_conf)
1551 			err = -EINVAL;
1552 		else
1553 			ppl_conf->write_hint = new;
1554 	} else {
1555 		err = -EINVAL;
1556 	}
1557 
1558 	mddev_unlock(mddev);
1559 
1560 	return err ?: len;
1561 }
1562 
1563 struct md_sysfs_entry
1564 ppl_write_hint = __ATTR(ppl_write_hint, S_IRUGO | S_IWUSR,
1565 			ppl_write_hint_show,
1566 			ppl_write_hint_store);
1567