]> Pileus Git - ~andy/linux/blob - drivers/mmc/card/block.c
Merge branch 'for-linus' of git://git.kernel.org/pub/scm/linux/kernel/git/sage/ceph...
[~andy/linux] / drivers / mmc / card / block.c
1 /*
2  * Block driver for media (i.e., flash cards)
3  *
4  * Copyright 2002 Hewlett-Packard Company
5  * Copyright 2005-2008 Pierre Ossman
6  *
7  * Use consistent with the GNU GPL is permitted,
8  * provided that this copyright notice is
9  * preserved in its entirety in all copies and derived works.
10  *
11  * HEWLETT-PACKARD COMPANY MAKES NO WARRANTIES, EXPRESSED OR IMPLIED,
12  * AS TO THE USEFULNESS OR CORRECTNESS OF THIS CODE OR ITS
13  * FITNESS FOR ANY PARTICULAR PURPOSE.
14  *
15  * Many thanks to Alessandro Rubini and Jonathan Corbet!
16  *
17  * Author:  Andrew Christian
18  *          28 May 2002
19  */
20 #include <linux/moduleparam.h>
21 #include <linux/module.h>
22 #include <linux/init.h>
23
24 #include <linux/kernel.h>
25 #include <linux/fs.h>
26 #include <linux/slab.h>
27 #include <linux/errno.h>
28 #include <linux/hdreg.h>
29 #include <linux/kdev_t.h>
30 #include <linux/blkdev.h>
31 #include <linux/mutex.h>
32 #include <linux/scatterlist.h>
33 #include <linux/string_helpers.h>
34 #include <linux/delay.h>
35 #include <linux/capability.h>
36 #include <linux/compat.h>
37
38 #include <linux/mmc/ioctl.h>
39 #include <linux/mmc/card.h>
40 #include <linux/mmc/host.h>
41 #include <linux/mmc/mmc.h>
42 #include <linux/mmc/sd.h>
43
44 #include <asm/uaccess.h>
45
46 #include "queue.h"
47
48 MODULE_ALIAS("mmc:block");
49 #ifdef MODULE_PARAM_PREFIX
50 #undef MODULE_PARAM_PREFIX
51 #endif
52 #define MODULE_PARAM_PREFIX "mmcblk."
53
54 #define INAND_CMD38_ARG_EXT_CSD  113
55 #define INAND_CMD38_ARG_ERASE    0x00
56 #define INAND_CMD38_ARG_TRIM     0x01
57 #define INAND_CMD38_ARG_SECERASE 0x80
58 #define INAND_CMD38_ARG_SECTRIM1 0x81
59 #define INAND_CMD38_ARG_SECTRIM2 0x88
60 #define MMC_BLK_TIMEOUT_MS  (10 * 60 * 1000)        /* 10 minute timeout */
61
62 #define mmc_req_rel_wr(req)     (((req->cmd_flags & REQ_FUA) || \
63                                   (req->cmd_flags & REQ_META)) && \
64                                   (rq_data_dir(req) == WRITE))
65 #define PACKED_CMD_VER  0x01
66 #define PACKED_CMD_WR   0x02
67
68 static DEFINE_MUTEX(block_mutex);
69
70 /*
71  * The defaults come from config options but can be overriden by module
72  * or bootarg options.
73  */
74 static int perdev_minors = CONFIG_MMC_BLOCK_MINORS;
75
76 /*
77  * We've only got one major, so number of mmcblk devices is
78  * limited to 256 / number of minors per device.
79  */
80 static int max_devices;
81
82 /* 256 minors, so at most 256 separate devices */
83 static DECLARE_BITMAP(dev_use, 256);
84 static DECLARE_BITMAP(name_use, 256);
85
86 /*
87  * There is one mmc_blk_data per slot.
88  */
89 struct mmc_blk_data {
90         spinlock_t      lock;
91         struct gendisk  *disk;
92         struct mmc_queue queue;
93         struct list_head part;
94
95         unsigned int    flags;
96 #define MMC_BLK_CMD23   (1 << 0)        /* Can do SET_BLOCK_COUNT for multiblock */
97 #define MMC_BLK_REL_WR  (1 << 1)        /* MMC Reliable write support */
98 #define MMC_BLK_PACKED_CMD      (1 << 2)        /* MMC packed command support */
99
100         unsigned int    usage;
101         unsigned int    read_only;
102         unsigned int    part_type;
103         unsigned int    name_idx;
104         unsigned int    reset_done;
105 #define MMC_BLK_READ            BIT(0)
106 #define MMC_BLK_WRITE           BIT(1)
107 #define MMC_BLK_DISCARD         BIT(2)
108 #define MMC_BLK_SECDISCARD      BIT(3)
109
110         /*
111          * Only set in main mmc_blk_data associated
112          * with mmc_card with mmc_set_drvdata, and keeps
113          * track of the current selected device partition.
114          */
115         unsigned int    part_curr;
116         struct device_attribute force_ro;
117         struct device_attribute power_ro_lock;
118         int     area_type;
119 };
120
121 static DEFINE_MUTEX(open_lock);
122
123 enum {
124         MMC_PACKED_NR_IDX = -1,
125         MMC_PACKED_NR_ZERO,
126         MMC_PACKED_NR_SINGLE,
127 };
128
129 module_param(perdev_minors, int, 0444);
130 MODULE_PARM_DESC(perdev_minors, "Minors numbers to allocate per device");
131
132 static inline int mmc_blk_part_switch(struct mmc_card *card,
133                                       struct mmc_blk_data *md);
134 static int get_card_status(struct mmc_card *card, u32 *status, int retries);
135
136 static inline void mmc_blk_clear_packed(struct mmc_queue_req *mqrq)
137 {
138         struct mmc_packed *packed = mqrq->packed;
139
140         BUG_ON(!packed);
141
142         mqrq->cmd_type = MMC_PACKED_NONE;
143         packed->nr_entries = MMC_PACKED_NR_ZERO;
144         packed->idx_failure = MMC_PACKED_NR_IDX;
145         packed->retries = 0;
146         packed->blocks = 0;
147 }
148
149 static struct mmc_blk_data *mmc_blk_get(struct gendisk *disk)
150 {
151         struct mmc_blk_data *md;
152
153         mutex_lock(&open_lock);
154         md = disk->private_data;
155         if (md && md->usage == 0)
156                 md = NULL;
157         if (md)
158                 md->usage++;
159         mutex_unlock(&open_lock);
160
161         return md;
162 }
163
164 static inline int mmc_get_devidx(struct gendisk *disk)
165 {
166         int devmaj = MAJOR(disk_devt(disk));
167         int devidx = MINOR(disk_devt(disk)) / perdev_minors;
168
169         if (!devmaj)
170                 devidx = disk->first_minor / perdev_minors;
171         return devidx;
172 }
173
174 static void mmc_blk_put(struct mmc_blk_data *md)
175 {
176         mutex_lock(&open_lock);
177         md->usage--;
178         if (md->usage == 0) {
179                 int devidx = mmc_get_devidx(md->disk);
180                 blk_cleanup_queue(md->queue.queue);
181
182                 __clear_bit(devidx, dev_use);
183
184                 put_disk(md->disk);
185                 kfree(md);
186         }
187         mutex_unlock(&open_lock);
188 }
189
190 static ssize_t power_ro_lock_show(struct device *dev,
191                 struct device_attribute *attr, char *buf)
192 {
193         int ret;
194         struct mmc_blk_data *md = mmc_blk_get(dev_to_disk(dev));
195         struct mmc_card *card = md->queue.card;
196         int locked = 0;
197
198         if (card->ext_csd.boot_ro_lock & EXT_CSD_BOOT_WP_B_PERM_WP_EN)
199                 locked = 2;
200         else if (card->ext_csd.boot_ro_lock & EXT_CSD_BOOT_WP_B_PWR_WP_EN)
201                 locked = 1;
202
203         ret = snprintf(buf, PAGE_SIZE, "%d\n", locked);
204
205         return ret;
206 }
207
208 static ssize_t power_ro_lock_store(struct device *dev,
209                 struct device_attribute *attr, const char *buf, size_t count)
210 {
211         int ret;
212         struct mmc_blk_data *md, *part_md;
213         struct mmc_card *card;
214         unsigned long set;
215
216         if (kstrtoul(buf, 0, &set))
217                 return -EINVAL;
218
219         if (set != 1)
220                 return count;
221
222         md = mmc_blk_get(dev_to_disk(dev));
223         card = md->queue.card;
224
225         mmc_claim_host(card->host);
226
227         ret = mmc_switch(card, EXT_CSD_CMD_SET_NORMAL, EXT_CSD_BOOT_WP,
228                                 card->ext_csd.boot_ro_lock |
229                                 EXT_CSD_BOOT_WP_B_PWR_WP_EN,
230                                 card->ext_csd.part_time);
231         if (ret)
232                 pr_err("%s: Locking boot partition ro until next power on failed: %d\n", md->disk->disk_name, ret);
233         else
234                 card->ext_csd.boot_ro_lock |= EXT_CSD_BOOT_WP_B_PWR_WP_EN;
235
236         mmc_release_host(card->host);
237
238         if (!ret) {
239                 pr_info("%s: Locking boot partition ro until next power on\n",
240                         md->disk->disk_name);
241                 set_disk_ro(md->disk, 1);
242
243                 list_for_each_entry(part_md, &md->part, part)
244                         if (part_md->area_type == MMC_BLK_DATA_AREA_BOOT) {
245                                 pr_info("%s: Locking boot partition ro until next power on\n", part_md->disk->disk_name);
246                                 set_disk_ro(part_md->disk, 1);
247                         }
248         }
249
250         mmc_blk_put(md);
251         return count;
252 }
253
254 static ssize_t force_ro_show(struct device *dev, struct device_attribute *attr,
255                              char *buf)
256 {
257         int ret;
258         struct mmc_blk_data *md = mmc_blk_get(dev_to_disk(dev));
259
260         ret = snprintf(buf, PAGE_SIZE, "%d",
261                        get_disk_ro(dev_to_disk(dev)) ^
262                        md->read_only);
263         mmc_blk_put(md);
264         return ret;
265 }
266
267 static ssize_t force_ro_store(struct device *dev, struct device_attribute *attr,
268                               const char *buf, size_t count)
269 {
270         int ret;
271         char *end;
272         struct mmc_blk_data *md = mmc_blk_get(dev_to_disk(dev));
273         unsigned long set = simple_strtoul(buf, &end, 0);
274         if (end == buf) {
275                 ret = -EINVAL;
276                 goto out;
277         }
278
279         set_disk_ro(dev_to_disk(dev), set || md->read_only);
280         ret = count;
281 out:
282         mmc_blk_put(md);
283         return ret;
284 }
285
286 static int mmc_blk_open(struct block_device *bdev, fmode_t mode)
287 {
288         struct mmc_blk_data *md = mmc_blk_get(bdev->bd_disk);
289         int ret = -ENXIO;
290
291         mutex_lock(&block_mutex);
292         if (md) {
293                 if (md->usage == 2)
294                         check_disk_change(bdev);
295                 ret = 0;
296
297                 if ((mode & FMODE_WRITE) && md->read_only) {
298                         mmc_blk_put(md);
299                         ret = -EROFS;
300                 }
301         }
302         mutex_unlock(&block_mutex);
303
304         return ret;
305 }
306
307 static void mmc_blk_release(struct gendisk *disk, fmode_t mode)
308 {
309         struct mmc_blk_data *md = disk->private_data;
310
311         mutex_lock(&block_mutex);
312         mmc_blk_put(md);
313         mutex_unlock(&block_mutex);
314 }
315
316 static int
317 mmc_blk_getgeo(struct block_device *bdev, struct hd_geometry *geo)
318 {
319         geo->cylinders = get_capacity(bdev->bd_disk) / (4 * 16);
320         geo->heads = 4;
321         geo->sectors = 16;
322         return 0;
323 }
324
325 struct mmc_blk_ioc_data {
326         struct mmc_ioc_cmd ic;
327         unsigned char *buf;
328         u64 buf_bytes;
329 };
330
331 static struct mmc_blk_ioc_data *mmc_blk_ioctl_copy_from_user(
332         struct mmc_ioc_cmd __user *user)
333 {
334         struct mmc_blk_ioc_data *idata;
335         int err;
336
337         idata = kzalloc(sizeof(*idata), GFP_KERNEL);
338         if (!idata) {
339                 err = -ENOMEM;
340                 goto out;
341         }
342
343         if (copy_from_user(&idata->ic, user, sizeof(idata->ic))) {
344                 err = -EFAULT;
345                 goto idata_err;
346         }
347
348         idata->buf_bytes = (u64) idata->ic.blksz * idata->ic.blocks;
349         if (idata->buf_bytes > MMC_IOC_MAX_BYTES) {
350                 err = -EOVERFLOW;
351                 goto idata_err;
352         }
353
354         if (!idata->buf_bytes)
355                 return idata;
356
357         idata->buf = kzalloc(idata->buf_bytes, GFP_KERNEL);
358         if (!idata->buf) {
359                 err = -ENOMEM;
360                 goto idata_err;
361         }
362
363         if (copy_from_user(idata->buf, (void __user *)(unsigned long)
364                                         idata->ic.data_ptr, idata->buf_bytes)) {
365                 err = -EFAULT;
366                 goto copy_err;
367         }
368
369         return idata;
370
371 copy_err:
372         kfree(idata->buf);
373 idata_err:
374         kfree(idata);
375 out:
376         return ERR_PTR(err);
377 }
378
379 static int ioctl_rpmb_card_status_poll(struct mmc_card *card, u32 *status,
380                                        u32 retries_max)
381 {
382         int err;
383         u32 retry_count = 0;
384
385         if (!status || !retries_max)
386                 return -EINVAL;
387
388         do {
389                 err = get_card_status(card, status, 5);
390                 if (err)
391                         break;
392
393                 if (!R1_STATUS(*status) &&
394                                 (R1_CURRENT_STATE(*status) != R1_STATE_PRG))
395                         break; /* RPMB programming operation complete */
396
397                 /*
398                  * Rechedule to give the MMC device a chance to continue
399                  * processing the previous command without being polled too
400                  * frequently.
401                  */
402                 usleep_range(1000, 5000);
403         } while (++retry_count < retries_max);
404
405         if (retry_count == retries_max)
406                 err = -EPERM;
407
408         return err;
409 }
410
411 static int mmc_blk_ioctl_cmd(struct block_device *bdev,
412         struct mmc_ioc_cmd __user *ic_ptr)
413 {
414         struct mmc_blk_ioc_data *idata;
415         struct mmc_blk_data *md;
416         struct mmc_card *card;
417         struct mmc_command cmd = {0};
418         struct mmc_data data = {0};
419         struct mmc_request mrq = {NULL};
420         struct scatterlist sg;
421         int err;
422         int is_rpmb = false;
423         u32 status = 0;
424
425         /*
426          * The caller must have CAP_SYS_RAWIO, and must be calling this on the
427          * whole block device, not on a partition.  This prevents overspray
428          * between sibling partitions.
429          */
430         if ((!capable(CAP_SYS_RAWIO)) || (bdev != bdev->bd_contains))
431                 return -EPERM;
432
433         idata = mmc_blk_ioctl_copy_from_user(ic_ptr);
434         if (IS_ERR(idata))
435                 return PTR_ERR(idata);
436
437         md = mmc_blk_get(bdev->bd_disk);
438         if (!md) {
439                 err = -EINVAL;
440                 goto cmd_err;
441         }
442
443         if (md->area_type & MMC_BLK_DATA_AREA_RPMB)
444                 is_rpmb = true;
445
446         card = md->queue.card;
447         if (IS_ERR(card)) {
448                 err = PTR_ERR(card);
449                 goto cmd_done;
450         }
451
452         cmd.opcode = idata->ic.opcode;
453         cmd.arg = idata->ic.arg;
454         cmd.flags = idata->ic.flags;
455
456         if (idata->buf_bytes) {
457                 data.sg = &sg;
458                 data.sg_len = 1;
459                 data.blksz = idata->ic.blksz;
460                 data.blocks = idata->ic.blocks;
461
462                 sg_init_one(data.sg, idata->buf, idata->buf_bytes);
463
464                 if (idata->ic.write_flag)
465                         data.flags = MMC_DATA_WRITE;
466                 else
467                         data.flags = MMC_DATA_READ;
468
469                 /* data.flags must already be set before doing this. */
470                 mmc_set_data_timeout(&data, card);
471
472                 /* Allow overriding the timeout_ns for empirical tuning. */
473                 if (idata->ic.data_timeout_ns)
474                         data.timeout_ns = idata->ic.data_timeout_ns;
475
476                 if ((cmd.flags & MMC_RSP_R1B) == MMC_RSP_R1B) {
477                         /*
478                          * Pretend this is a data transfer and rely on the
479                          * host driver to compute timeout.  When all host
480                          * drivers support cmd.cmd_timeout for R1B, this
481                          * can be changed to:
482                          *
483                          *     mrq.data = NULL;
484                          *     cmd.cmd_timeout = idata->ic.cmd_timeout_ms;
485                          */
486                         data.timeout_ns = idata->ic.cmd_timeout_ms * 1000000;
487                 }
488
489                 mrq.data = &data;
490         }
491
492         mrq.cmd = &cmd;
493
494         mmc_claim_host(card->host);
495
496         err = mmc_blk_part_switch(card, md);
497         if (err)
498                 goto cmd_rel_host;
499
500         if (idata->ic.is_acmd) {
501                 err = mmc_app_cmd(card->host, card);
502                 if (err)
503                         goto cmd_rel_host;
504         }
505
506         if (is_rpmb) {
507                 err = mmc_set_blockcount(card, data.blocks,
508                         idata->ic.write_flag & (1 << 31));
509                 if (err)
510                         goto cmd_rel_host;
511         }
512
513         mmc_wait_for_req(card->host, &mrq);
514
515         if (cmd.error) {
516                 dev_err(mmc_dev(card->host), "%s: cmd error %d\n",
517                                                 __func__, cmd.error);
518                 err = cmd.error;
519                 goto cmd_rel_host;
520         }
521         if (data.error) {
522                 dev_err(mmc_dev(card->host), "%s: data error %d\n",
523                                                 __func__, data.error);
524                 err = data.error;
525                 goto cmd_rel_host;
526         }
527
528         /*
529          * According to the SD specs, some commands require a delay after
530          * issuing the command.
531          */
532         if (idata->ic.postsleep_min_us)
533                 usleep_range(idata->ic.postsleep_min_us, idata->ic.postsleep_max_us);
534
535         if (copy_to_user(&(ic_ptr->response), cmd.resp, sizeof(cmd.resp))) {
536                 err = -EFAULT;
537                 goto cmd_rel_host;
538         }
539
540         if (!idata->ic.write_flag) {
541                 if (copy_to_user((void __user *)(unsigned long) idata->ic.data_ptr,
542                                                 idata->buf, idata->buf_bytes)) {
543                         err = -EFAULT;
544                         goto cmd_rel_host;
545                 }
546         }
547
548         if (is_rpmb) {
549                 /*
550                  * Ensure RPMB command has completed by polling CMD13
551                  * "Send Status".
552                  */
553                 err = ioctl_rpmb_card_status_poll(card, &status, 5);
554                 if (err)
555                         dev_err(mmc_dev(card->host),
556                                         "%s: Card Status=0x%08X, error %d\n",
557                                         __func__, status, err);
558         }
559
560 cmd_rel_host:
561         mmc_release_host(card->host);
562
563 cmd_done:
564         mmc_blk_put(md);
565 cmd_err:
566         kfree(idata->buf);
567         kfree(idata);
568         return err;
569 }
570
571 static int mmc_blk_ioctl(struct block_device *bdev, fmode_t mode,
572         unsigned int cmd, unsigned long arg)
573 {
574         int ret = -EINVAL;
575         if (cmd == MMC_IOC_CMD)
576                 ret = mmc_blk_ioctl_cmd(bdev, (struct mmc_ioc_cmd __user *)arg);
577         return ret;
578 }
579
580 #ifdef CONFIG_COMPAT
581 static int mmc_blk_compat_ioctl(struct block_device *bdev, fmode_t mode,
582         unsigned int cmd, unsigned long arg)
583 {
584         return mmc_blk_ioctl(bdev, mode, cmd, (unsigned long) compat_ptr(arg));
585 }
586 #endif
587
588 static const struct block_device_operations mmc_bdops = {
589         .open                   = mmc_blk_open,
590         .release                = mmc_blk_release,
591         .getgeo                 = mmc_blk_getgeo,
592         .owner                  = THIS_MODULE,
593         .ioctl                  = mmc_blk_ioctl,
594 #ifdef CONFIG_COMPAT
595         .compat_ioctl           = mmc_blk_compat_ioctl,
596 #endif
597 };
598
599 static inline int mmc_blk_part_switch(struct mmc_card *card,
600                                       struct mmc_blk_data *md)
601 {
602         int ret;
603         struct mmc_blk_data *main_md = mmc_get_drvdata(card);
604
605         if (main_md->part_curr == md->part_type)
606                 return 0;
607
608         if (mmc_card_mmc(card)) {
609                 u8 part_config = card->ext_csd.part_config;
610
611                 part_config &= ~EXT_CSD_PART_CONFIG_ACC_MASK;
612                 part_config |= md->part_type;
613
614                 ret = mmc_switch(card, EXT_CSD_CMD_SET_NORMAL,
615                                  EXT_CSD_PART_CONFIG, part_config,
616                                  card->ext_csd.part_time);
617                 if (ret)
618                         return ret;
619
620                 card->ext_csd.part_config = part_config;
621         }
622
623         main_md->part_curr = md->part_type;
624         return 0;
625 }
626
627 static u32 mmc_sd_num_wr_blocks(struct mmc_card *card)
628 {
629         int err;
630         u32 result;
631         __be32 *blocks;
632
633         struct mmc_request mrq = {NULL};
634         struct mmc_command cmd = {0};
635         struct mmc_data data = {0};
636
637         struct scatterlist sg;
638
639         cmd.opcode = MMC_APP_CMD;
640         cmd.arg = card->rca << 16;
641         cmd.flags = MMC_RSP_SPI_R1 | MMC_RSP_R1 | MMC_CMD_AC;
642
643         err = mmc_wait_for_cmd(card->host, &cmd, 0);
644         if (err)
645                 return (u32)-1;
646         if (!mmc_host_is_spi(card->host) && !(cmd.resp[0] & R1_APP_CMD))
647                 return (u32)-1;
648
649         memset(&cmd, 0, sizeof(struct mmc_command));
650
651         cmd.opcode = SD_APP_SEND_NUM_WR_BLKS;
652         cmd.arg = 0;
653         cmd.flags = MMC_RSP_SPI_R1 | MMC_RSP_R1 | MMC_CMD_ADTC;
654
655         data.blksz = 4;
656         data.blocks = 1;
657         data.flags = MMC_DATA_READ;
658         data.sg = &sg;
659         data.sg_len = 1;
660         mmc_set_data_timeout(&data, card);
661
662         mrq.cmd = &cmd;
663         mrq.data = &data;
664
665         blocks = kmalloc(4, GFP_KERNEL);
666         if (!blocks)
667                 return (u32)-1;
668
669         sg_init_one(&sg, blocks, 4);
670
671         mmc_wait_for_req(card->host, &mrq);
672
673         result = ntohl(*blocks);
674         kfree(blocks);
675
676         if (cmd.error || data.error)
677                 result = (u32)-1;
678
679         return result;
680 }
681
682 static int send_stop(struct mmc_card *card, u32 *status)
683 {
684         struct mmc_command cmd = {0};
685         int err;
686
687         cmd.opcode = MMC_STOP_TRANSMISSION;
688         cmd.flags = MMC_RSP_SPI_R1B | MMC_RSP_R1B | MMC_CMD_AC;
689         err = mmc_wait_for_cmd(card->host, &cmd, 5);
690         if (err == 0)
691                 *status = cmd.resp[0];
692         return err;
693 }
694
695 static int get_card_status(struct mmc_card *card, u32 *status, int retries)
696 {
697         struct mmc_command cmd = {0};
698         int err;
699
700         cmd.opcode = MMC_SEND_STATUS;
701         if (!mmc_host_is_spi(card->host))
702                 cmd.arg = card->rca << 16;
703         cmd.flags = MMC_RSP_SPI_R2 | MMC_RSP_R1 | MMC_CMD_AC;
704         err = mmc_wait_for_cmd(card->host, &cmd, retries);
705         if (err == 0)
706                 *status = cmd.resp[0];
707         return err;
708 }
709
710 #define ERR_NOMEDIUM    3
711 #define ERR_RETRY       2
712 #define ERR_ABORT       1
713 #define ERR_CONTINUE    0
714
715 static int mmc_blk_cmd_error(struct request *req, const char *name, int error,
716         bool status_valid, u32 status)
717 {
718         switch (error) {
719         case -EILSEQ:
720                 /* response crc error, retry the r/w cmd */
721                 pr_err("%s: %s sending %s command, card status %#x\n",
722                         req->rq_disk->disk_name, "response CRC error",
723                         name, status);
724                 return ERR_RETRY;
725
726         case -ETIMEDOUT:
727                 pr_err("%s: %s sending %s command, card status %#x\n",
728                         req->rq_disk->disk_name, "timed out", name, status);
729
730                 /* If the status cmd initially failed, retry the r/w cmd */
731                 if (!status_valid)
732                         return ERR_RETRY;
733
734                 /*
735                  * If it was a r/w cmd crc error, or illegal command
736                  * (eg, issued in wrong state) then retry - we should
737                  * have corrected the state problem above.
738                  */
739                 if (status & (R1_COM_CRC_ERROR | R1_ILLEGAL_COMMAND))
740                         return ERR_RETRY;
741
742                 /* Otherwise abort the command */
743                 return ERR_ABORT;
744
745         default:
746                 /* We don't understand the error code the driver gave us */
747                 pr_err("%s: unknown error %d sending read/write command, card status %#x\n",
748                        req->rq_disk->disk_name, error, status);
749                 return ERR_ABORT;
750         }
751 }
752
753 /*
754  * Initial r/w and stop cmd error recovery.
755  * We don't know whether the card received the r/w cmd or not, so try to
756  * restore things back to a sane state.  Essentially, we do this as follows:
757  * - Obtain card status.  If the first attempt to obtain card status fails,
758  *   the status word will reflect the failed status cmd, not the failed
759  *   r/w cmd.  If we fail to obtain card status, it suggests we can no
760  *   longer communicate with the card.
761  * - Check the card state.  If the card received the cmd but there was a
762  *   transient problem with the response, it might still be in a data transfer
763  *   mode.  Try to send it a stop command.  If this fails, we can't recover.
764  * - If the r/w cmd failed due to a response CRC error, it was probably
765  *   transient, so retry the cmd.
766  * - If the r/w cmd timed out, but we didn't get the r/w cmd status, retry.
767  * - If the r/w cmd timed out, and the r/w cmd failed due to CRC error or
768  *   illegal cmd, retry.
769  * Otherwise we don't understand what happened, so abort.
770  */
771 static int mmc_blk_cmd_recovery(struct mmc_card *card, struct request *req,
772         struct mmc_blk_request *brq, int *ecc_err)
773 {
774         bool prev_cmd_status_valid = true;
775         u32 status, stop_status = 0;
776         int err, retry;
777
778         if (mmc_card_removed(card))
779                 return ERR_NOMEDIUM;
780
781         /*
782          * Try to get card status which indicates both the card state
783          * and why there was no response.  If the first attempt fails,
784          * we can't be sure the returned status is for the r/w command.
785          */
786         for (retry = 2; retry >= 0; retry--) {
787                 err = get_card_status(card, &status, 0);
788                 if (!err)
789                         break;
790
791                 prev_cmd_status_valid = false;
792                 pr_err("%s: error %d sending status command, %sing\n",
793                        req->rq_disk->disk_name, err, retry ? "retry" : "abort");
794         }
795
796         /* We couldn't get a response from the card.  Give up. */
797         if (err) {
798                 /* Check if the card is removed */
799                 if (mmc_detect_card_removed(card->host))
800                         return ERR_NOMEDIUM;
801                 return ERR_ABORT;
802         }
803
804         /* Flag ECC errors */
805         if ((status & R1_CARD_ECC_FAILED) ||
806             (brq->stop.resp[0] & R1_CARD_ECC_FAILED) ||
807             (brq->cmd.resp[0] & R1_CARD_ECC_FAILED))
808                 *ecc_err = 1;
809
810         /*
811          * Check the current card state.  If it is in some data transfer
812          * mode, tell it to stop (and hopefully transition back to TRAN.)
813          */
814         if (R1_CURRENT_STATE(status) == R1_STATE_DATA ||
815             R1_CURRENT_STATE(status) == R1_STATE_RCV) {
816                 err = send_stop(card, &stop_status);
817                 if (err)
818                         pr_err("%s: error %d sending stop command\n",
819                                req->rq_disk->disk_name, err);
820
821                 /*
822                  * If the stop cmd also timed out, the card is probably
823                  * not present, so abort.  Other errors are bad news too.
824                  */
825                 if (err)
826                         return ERR_ABORT;
827                 if (stop_status & R1_CARD_ECC_FAILED)
828                         *ecc_err = 1;
829         }
830
831         /* Check for set block count errors */
832         if (brq->sbc.error)
833                 return mmc_blk_cmd_error(req, "SET_BLOCK_COUNT", brq->sbc.error,
834                                 prev_cmd_status_valid, status);
835
836         /* Check for r/w command errors */
837         if (brq->cmd.error)
838                 return mmc_blk_cmd_error(req, "r/w cmd", brq->cmd.error,
839                                 prev_cmd_status_valid, status);
840
841         /* Data errors */
842         if (!brq->stop.error)
843                 return ERR_CONTINUE;
844
845         /* Now for stop errors.  These aren't fatal to the transfer. */
846         pr_err("%s: error %d sending stop command, original cmd response %#x, card status %#x\n",
847                req->rq_disk->disk_name, brq->stop.error,
848                brq->cmd.resp[0], status);
849
850         /*
851          * Subsitute in our own stop status as this will give the error
852          * state which happened during the execution of the r/w command.
853          */
854         if (stop_status) {
855                 brq->stop.resp[0] = stop_status;
856                 brq->stop.error = 0;
857         }
858         return ERR_CONTINUE;
859 }
860
861 static int mmc_blk_reset(struct mmc_blk_data *md, struct mmc_host *host,
862                          int type)
863 {
864         int err;
865
866         if (md->reset_done & type)
867                 return -EEXIST;
868
869         md->reset_done |= type;
870         err = mmc_hw_reset(host);
871         /* Ensure we switch back to the correct partition */
872         if (err != -EOPNOTSUPP) {
873                 struct mmc_blk_data *main_md = mmc_get_drvdata(host->card);
874                 int part_err;
875
876                 main_md->part_curr = main_md->part_type;
877                 part_err = mmc_blk_part_switch(host->card, md);
878                 if (part_err) {
879                         /*
880                          * We have failed to get back into the correct
881                          * partition, so we need to abort the whole request.
882                          */
883                         return -ENODEV;
884                 }
885         }
886         return err;
887 }
888
889 static inline void mmc_blk_reset_success(struct mmc_blk_data *md, int type)
890 {
891         md->reset_done &= ~type;
892 }
893
894 static int mmc_blk_issue_discard_rq(struct mmc_queue *mq, struct request *req)
895 {
896         struct mmc_blk_data *md = mq->data;
897         struct mmc_card *card = md->queue.card;
898         unsigned int from, nr, arg;
899         int err = 0, type = MMC_BLK_DISCARD;
900
901         if (!mmc_can_erase(card)) {
902                 err = -EOPNOTSUPP;
903                 goto out;
904         }
905
906         from = blk_rq_pos(req);
907         nr = blk_rq_sectors(req);
908
909         if (mmc_can_discard(card))
910                 arg = MMC_DISCARD_ARG;
911         else if (mmc_can_trim(card))
912                 arg = MMC_TRIM_ARG;
913         else
914                 arg = MMC_ERASE_ARG;
915 retry:
916         if (card->quirks & MMC_QUIRK_INAND_CMD38) {
917                 err = mmc_switch(card, EXT_CSD_CMD_SET_NORMAL,
918                                  INAND_CMD38_ARG_EXT_CSD,
919                                  arg == MMC_TRIM_ARG ?
920                                  INAND_CMD38_ARG_TRIM :
921                                  INAND_CMD38_ARG_ERASE,
922                                  0);
923                 if (err)
924                         goto out;
925         }
926         err = mmc_erase(card, from, nr, arg);
927 out:
928         if (err == -EIO && !mmc_blk_reset(md, card->host, type))
929                 goto retry;
930         if (!err)
931                 mmc_blk_reset_success(md, type);
932         blk_end_request(req, err, blk_rq_bytes(req));
933
934         return err ? 0 : 1;
935 }
936
937 static int mmc_blk_issue_secdiscard_rq(struct mmc_queue *mq,
938                                        struct request *req)
939 {
940         struct mmc_blk_data *md = mq->data;
941         struct mmc_card *card = md->queue.card;
942         unsigned int from, nr, arg, trim_arg, erase_arg;
943         int err = 0, type = MMC_BLK_SECDISCARD;
944
945         if (!(mmc_can_secure_erase_trim(card) || mmc_can_sanitize(card))) {
946                 err = -EOPNOTSUPP;
947                 goto out;
948         }
949
950         from = blk_rq_pos(req);
951         nr = blk_rq_sectors(req);
952
953         /* The sanitize operation is supported at v4.5 only */
954         if (mmc_can_sanitize(card)) {
955                 erase_arg = MMC_ERASE_ARG;
956                 trim_arg = MMC_TRIM_ARG;
957         } else {
958                 erase_arg = MMC_SECURE_ERASE_ARG;
959                 trim_arg = MMC_SECURE_TRIM1_ARG;
960         }
961
962         if (mmc_erase_group_aligned(card, from, nr))
963                 arg = erase_arg;
964         else if (mmc_can_trim(card))
965                 arg = trim_arg;
966         else {
967                 err = -EINVAL;
968                 goto out;
969         }
970 retry:
971         if (card->quirks & MMC_QUIRK_INAND_CMD38) {
972                 err = mmc_switch(card, EXT_CSD_CMD_SET_NORMAL,
973                                  INAND_CMD38_ARG_EXT_CSD,
974                                  arg == MMC_SECURE_TRIM1_ARG ?
975                                  INAND_CMD38_ARG_SECTRIM1 :
976                                  INAND_CMD38_ARG_SECERASE,
977                                  0);
978                 if (err)
979                         goto out_retry;
980         }
981
982         err = mmc_erase(card, from, nr, arg);
983         if (err == -EIO)
984                 goto out_retry;
985         if (err)
986                 goto out;
987
988         if (arg == MMC_SECURE_TRIM1_ARG) {
989                 if (card->quirks & MMC_QUIRK_INAND_CMD38) {
990                         err = mmc_switch(card, EXT_CSD_CMD_SET_NORMAL,
991                                          INAND_CMD38_ARG_EXT_CSD,
992                                          INAND_CMD38_ARG_SECTRIM2,
993                                          0);
994                         if (err)
995                                 goto out_retry;
996                 }
997
998                 err = mmc_erase(card, from, nr, MMC_SECURE_TRIM2_ARG);
999                 if (err == -EIO)
1000                         goto out_retry;
1001                 if (err)
1002                         goto out;
1003         }
1004
1005         if (mmc_can_sanitize(card))
1006                 err = mmc_switch(card, EXT_CSD_CMD_SET_NORMAL,
1007                                  EXT_CSD_SANITIZE_START, 1, 0);
1008 out_retry:
1009         if (err && !mmc_blk_reset(md, card->host, type))
1010                 goto retry;
1011         if (!err)
1012                 mmc_blk_reset_success(md, type);
1013 out:
1014         blk_end_request(req, err, blk_rq_bytes(req));
1015
1016         return err ? 0 : 1;
1017 }
1018
1019 static int mmc_blk_issue_flush(struct mmc_queue *mq, struct request *req)
1020 {
1021         struct mmc_blk_data *md = mq->data;
1022         struct mmc_card *card = md->queue.card;
1023         int ret = 0;
1024
1025         ret = mmc_flush_cache(card);
1026         if (ret)
1027                 ret = -EIO;
1028
1029         blk_end_request_all(req, ret);
1030
1031         return ret ? 0 : 1;
1032 }
1033
1034 /*
1035  * Reformat current write as a reliable write, supporting
1036  * both legacy and the enhanced reliable write MMC cards.
1037  * In each transfer we'll handle only as much as a single
1038  * reliable write can handle, thus finish the request in
1039  * partial completions.
1040  */
1041 static inline void mmc_apply_rel_rw(struct mmc_blk_request *brq,
1042                                     struct mmc_card *card,
1043                                     struct request *req)
1044 {
1045         if (!(card->ext_csd.rel_param & EXT_CSD_WR_REL_PARAM_EN)) {
1046                 /* Legacy mode imposes restrictions on transfers. */
1047                 if (!IS_ALIGNED(brq->cmd.arg, card->ext_csd.rel_sectors))
1048                         brq->data.blocks = 1;
1049
1050                 if (brq->data.blocks > card->ext_csd.rel_sectors)
1051                         brq->data.blocks = card->ext_csd.rel_sectors;
1052                 else if (brq->data.blocks < card->ext_csd.rel_sectors)
1053                         brq->data.blocks = 1;
1054         }
1055 }
1056
1057 #define CMD_ERRORS                                                      \
1058         (R1_OUT_OF_RANGE |      /* Command argument out of range */     \
1059          R1_ADDRESS_ERROR |     /* Misaligned address */                \
1060          R1_BLOCK_LEN_ERROR |   /* Transferred block length incorrect */\
1061          R1_WP_VIOLATION |      /* Tried to write to protected block */ \
1062          R1_CC_ERROR |          /* Card controller error */             \
1063          R1_ERROR)              /* General/unknown error */
1064
1065 static int mmc_blk_err_check(struct mmc_card *card,
1066                              struct mmc_async_req *areq)
1067 {
1068         struct mmc_queue_req *mq_mrq = container_of(areq, struct mmc_queue_req,
1069                                                     mmc_active);
1070         struct mmc_blk_request *brq = &mq_mrq->brq;
1071         struct request *req = mq_mrq->req;
1072         int ecc_err = 0;
1073
1074         /*
1075          * sbc.error indicates a problem with the set block count
1076          * command.  No data will have been transferred.
1077          *
1078          * cmd.error indicates a problem with the r/w command.  No
1079          * data will have been transferred.
1080          *
1081          * stop.error indicates a problem with the stop command.  Data
1082          * may have been transferred, or may still be transferring.
1083          */
1084         if (brq->sbc.error || brq->cmd.error || brq->stop.error ||
1085             brq->data.error) {
1086                 switch (mmc_blk_cmd_recovery(card, req, brq, &ecc_err)) {
1087                 case ERR_RETRY:
1088                         return MMC_BLK_RETRY;
1089                 case ERR_ABORT:
1090                         return MMC_BLK_ABORT;
1091                 case ERR_NOMEDIUM:
1092                         return MMC_BLK_NOMEDIUM;
1093                 case ERR_CONTINUE:
1094                         break;
1095                 }
1096         }
1097
1098         /*
1099          * Check for errors relating to the execution of the
1100          * initial command - such as address errors.  No data
1101          * has been transferred.
1102          */
1103         if (brq->cmd.resp[0] & CMD_ERRORS) {
1104                 pr_err("%s: r/w command failed, status = %#x\n",
1105                        req->rq_disk->disk_name, brq->cmd.resp[0]);
1106                 return MMC_BLK_ABORT;
1107         }
1108
1109         /*
1110          * Everything else is either success, or a data error of some
1111          * kind.  If it was a write, we may have transitioned to
1112          * program mode, which we have to wait for it to complete.
1113          */
1114         if (!mmc_host_is_spi(card->host) && rq_data_dir(req) != READ) {
1115                 u32 status;
1116                 unsigned long timeout;
1117
1118                 timeout = jiffies + msecs_to_jiffies(MMC_BLK_TIMEOUT_MS);
1119                 do {
1120                         int err = get_card_status(card, &status, 5);
1121                         if (err) {
1122                                 pr_err("%s: error %d requesting status\n",
1123                                        req->rq_disk->disk_name, err);
1124                                 return MMC_BLK_CMD_ERR;
1125                         }
1126
1127                         /* Timeout if the device never becomes ready for data
1128                          * and never leaves the program state.
1129                          */
1130                         if (time_after(jiffies, timeout)) {
1131                                 pr_err("%s: Card stuck in programming state!"\
1132                                         " %s %s\n", mmc_hostname(card->host),
1133                                         req->rq_disk->disk_name, __func__);
1134
1135                                 return MMC_BLK_CMD_ERR;
1136                         }
1137                         /*
1138                          * Some cards mishandle the status bits,
1139                          * so make sure to check both the busy
1140                          * indication and the card state.
1141                          */
1142                 } while (!(status & R1_READY_FOR_DATA) ||
1143                          (R1_CURRENT_STATE(status) == R1_STATE_PRG));
1144         }
1145
1146         if (brq->data.error) {
1147                 pr_err("%s: error %d transferring data, sector %u, nr %u, cmd response %#x, card status %#x\n",
1148                        req->rq_disk->disk_name, brq->data.error,
1149                        (unsigned)blk_rq_pos(req),
1150                        (unsigned)blk_rq_sectors(req),
1151                        brq->cmd.resp[0], brq->stop.resp[0]);
1152
1153                 if (rq_data_dir(req) == READ) {
1154                         if (ecc_err)
1155                                 return MMC_BLK_ECC_ERR;
1156                         return MMC_BLK_DATA_ERR;
1157                 } else {
1158                         return MMC_BLK_CMD_ERR;
1159                 }
1160         }
1161
1162         if (!brq->data.bytes_xfered)
1163                 return MMC_BLK_RETRY;
1164
1165         if (mmc_packed_cmd(mq_mrq->cmd_type)) {
1166                 if (unlikely(brq->data.blocks << 9 != brq->data.bytes_xfered))
1167                         return MMC_BLK_PARTIAL;
1168                 else
1169                         return MMC_BLK_SUCCESS;
1170         }
1171
1172         if (blk_rq_bytes(req) != brq->data.bytes_xfered)
1173                 return MMC_BLK_PARTIAL;
1174
1175         return MMC_BLK_SUCCESS;
1176 }
1177
1178 static int mmc_blk_packed_err_check(struct mmc_card *card,
1179                                     struct mmc_async_req *areq)
1180 {
1181         struct mmc_queue_req *mq_rq = container_of(areq, struct mmc_queue_req,
1182                         mmc_active);
1183         struct request *req = mq_rq->req;
1184         struct mmc_packed *packed = mq_rq->packed;
1185         int err, check, status;
1186         u8 *ext_csd;
1187
1188         BUG_ON(!packed);
1189
1190         packed->retries--;
1191         check = mmc_blk_err_check(card, areq);
1192         err = get_card_status(card, &status, 0);
1193         if (err) {
1194                 pr_err("%s: error %d sending status command\n",
1195                        req->rq_disk->disk_name, err);
1196                 return MMC_BLK_ABORT;
1197         }
1198
1199         if (status & R1_EXCEPTION_EVENT) {
1200                 ext_csd = kzalloc(512, GFP_KERNEL);
1201                 if (!ext_csd) {
1202                         pr_err("%s: unable to allocate buffer for ext_csd\n",
1203                                req->rq_disk->disk_name);
1204                         return -ENOMEM;
1205                 }
1206
1207                 err = mmc_send_ext_csd(card, ext_csd);
1208                 if (err) {
1209                         pr_err("%s: error %d sending ext_csd\n",
1210                                req->rq_disk->disk_name, err);
1211                         check = MMC_BLK_ABORT;
1212                         goto free;
1213                 }
1214
1215                 if ((ext_csd[EXT_CSD_EXP_EVENTS_STATUS] &
1216                      EXT_CSD_PACKED_FAILURE) &&
1217                     (ext_csd[EXT_CSD_PACKED_CMD_STATUS] &
1218                      EXT_CSD_PACKED_GENERIC_ERROR)) {
1219                         if (ext_csd[EXT_CSD_PACKED_CMD_STATUS] &
1220                             EXT_CSD_PACKED_INDEXED_ERROR) {
1221                                 packed->idx_failure =
1222                                   ext_csd[EXT_CSD_PACKED_FAILURE_INDEX] - 1;
1223                                 check = MMC_BLK_PARTIAL;
1224                         }
1225                         pr_err("%s: packed cmd failed, nr %u, sectors %u, "
1226                                "failure index: %d\n",
1227                                req->rq_disk->disk_name, packed->nr_entries,
1228                                packed->blocks, packed->idx_failure);
1229                 }
1230 free:
1231                 kfree(ext_csd);
1232         }
1233
1234         return check;
1235 }
1236
1237 static void mmc_blk_rw_rq_prep(struct mmc_queue_req *mqrq,
1238                                struct mmc_card *card,
1239                                int disable_multi,
1240                                struct mmc_queue *mq)
1241 {
1242         u32 readcmd, writecmd;
1243         struct mmc_blk_request *brq = &mqrq->brq;
1244         struct request *req = mqrq->req;
1245         struct mmc_blk_data *md = mq->data;
1246         bool do_data_tag;
1247
1248         /*
1249          * Reliable writes are used to implement Forced Unit Access and
1250          * REQ_META accesses, and are supported only on MMCs.
1251          *
1252          * XXX: this really needs a good explanation of why REQ_META
1253          * is treated special.
1254          */
1255         bool do_rel_wr = ((req->cmd_flags & REQ_FUA) ||
1256                           (req->cmd_flags & REQ_META)) &&
1257                 (rq_data_dir(req) == WRITE) &&
1258                 (md->flags & MMC_BLK_REL_WR);
1259
1260         memset(brq, 0, sizeof(struct mmc_blk_request));
1261         brq->mrq.cmd = &brq->cmd;
1262         brq->mrq.data = &brq->data;
1263
1264         brq->cmd.arg = blk_rq_pos(req);
1265         if (!mmc_card_blockaddr(card))
1266                 brq->cmd.arg <<= 9;
1267         brq->cmd.flags = MMC_RSP_SPI_R1 | MMC_RSP_R1 | MMC_CMD_ADTC;
1268         brq->data.blksz = 512;
1269         brq->stop.opcode = MMC_STOP_TRANSMISSION;
1270         brq->stop.arg = 0;
1271         brq->stop.flags = MMC_RSP_SPI_R1B | MMC_RSP_R1B | MMC_CMD_AC;
1272         brq->data.blocks = blk_rq_sectors(req);
1273
1274         /*
1275          * The block layer doesn't support all sector count
1276          * restrictions, so we need to be prepared for too big
1277          * requests.
1278          */
1279         if (brq->data.blocks > card->host->max_blk_count)
1280                 brq->data.blocks = card->host->max_blk_count;
1281
1282         if (brq->data.blocks > 1) {
1283                 /*
1284                  * After a read error, we redo the request one sector
1285                  * at a time in order to accurately determine which
1286                  * sectors can be read successfully.
1287                  */
1288                 if (disable_multi)
1289                         brq->data.blocks = 1;
1290
1291                 /* Some controllers can't do multiblock reads due to hw bugs */
1292                 if (card->host->caps2 & MMC_CAP2_NO_MULTI_READ &&
1293                     rq_data_dir(req) == READ)
1294                         brq->data.blocks = 1;
1295         }
1296
1297         if (brq->data.blocks > 1 || do_rel_wr) {
1298                 /* SPI multiblock writes terminate using a special
1299                  * token, not a STOP_TRANSMISSION request.
1300                  */
1301                 if (!mmc_host_is_spi(card->host) ||
1302                     rq_data_dir(req) == READ)
1303                         brq->mrq.stop = &brq->stop;
1304                 readcmd = MMC_READ_MULTIPLE_BLOCK;
1305                 writecmd = MMC_WRITE_MULTIPLE_BLOCK;
1306         } else {
1307                 brq->mrq.stop = NULL;
1308                 readcmd = MMC_READ_SINGLE_BLOCK;
1309                 writecmd = MMC_WRITE_BLOCK;
1310         }
1311         if (rq_data_dir(req) == READ) {
1312                 brq->cmd.opcode = readcmd;
1313                 brq->data.flags |= MMC_DATA_READ;
1314         } else {
1315                 brq->cmd.opcode = writecmd;
1316                 brq->data.flags |= MMC_DATA_WRITE;
1317         }
1318
1319         if (do_rel_wr)
1320                 mmc_apply_rel_rw(brq, card, req);
1321
1322         /*
1323          * Data tag is used only during writing meta data to speed
1324          * up write and any subsequent read of this meta data
1325          */
1326         do_data_tag = (card->ext_csd.data_tag_unit_size) &&
1327                 (req->cmd_flags & REQ_META) &&
1328                 (rq_data_dir(req) == WRITE) &&
1329                 ((brq->data.blocks * brq->data.blksz) >=
1330                  card->ext_csd.data_tag_unit_size);
1331
1332         /*
1333          * Pre-defined multi-block transfers are preferable to
1334          * open ended-ones (and necessary for reliable writes).
1335          * However, it is not sufficient to just send CMD23,
1336          * and avoid the final CMD12, as on an error condition
1337          * CMD12 (stop) needs to be sent anyway. This, coupled
1338          * with Auto-CMD23 enhancements provided by some
1339          * hosts, means that the complexity of dealing
1340          * with this is best left to the host. If CMD23 is
1341          * supported by card and host, we'll fill sbc in and let
1342          * the host deal with handling it correctly. This means
1343          * that for hosts that don't expose MMC_CAP_CMD23, no
1344          * change of behavior will be observed.
1345          *
1346          * N.B: Some MMC cards experience perf degradation.
1347          * We'll avoid using CMD23-bounded multiblock writes for
1348          * these, while retaining features like reliable writes.
1349          */
1350         if ((md->flags & MMC_BLK_CMD23) && mmc_op_multi(brq->cmd.opcode) &&
1351             (do_rel_wr || !(card->quirks & MMC_QUIRK_BLK_NO_CMD23) ||
1352              do_data_tag)) {
1353                 brq->sbc.opcode = MMC_SET_BLOCK_COUNT;
1354                 brq->sbc.arg = brq->data.blocks |
1355                         (do_rel_wr ? (1 << 31) : 0) |
1356                         (do_data_tag ? (1 << 29) : 0);
1357                 brq->sbc.flags = MMC_RSP_R1 | MMC_CMD_AC;
1358                 brq->mrq.sbc = &brq->sbc;
1359         }
1360
1361         mmc_set_data_timeout(&brq->data, card);
1362
1363         brq->data.sg = mqrq->sg;
1364         brq->data.sg_len = mmc_queue_map_sg(mq, mqrq);
1365
1366         /*
1367          * Adjust the sg list so it is the same size as the
1368          * request.
1369          */
1370         if (brq->data.blocks != blk_rq_sectors(req)) {
1371                 int i, data_size = brq->data.blocks << 9;
1372                 struct scatterlist *sg;
1373
1374                 for_each_sg(brq->data.sg, sg, brq->data.sg_len, i) {
1375                         data_size -= sg->length;
1376                         if (data_size <= 0) {
1377                                 sg->length += data_size;
1378                                 i++;
1379                                 break;
1380                         }
1381                 }
1382                 brq->data.sg_len = i;
1383         }
1384
1385         mqrq->mmc_active.mrq = &brq->mrq;
1386         mqrq->mmc_active.err_check = mmc_blk_err_check;
1387
1388         mmc_queue_bounce_pre(mqrq);
1389 }
1390
1391 static inline u8 mmc_calc_packed_hdr_segs(struct request_queue *q,
1392                                           struct mmc_card *card)
1393 {
1394         unsigned int hdr_sz = mmc_large_sector(card) ? 4096 : 512;
1395         unsigned int max_seg_sz = queue_max_segment_size(q);
1396         unsigned int len, nr_segs = 0;
1397
1398         do {
1399                 len = min(hdr_sz, max_seg_sz);
1400                 hdr_sz -= len;
1401                 nr_segs++;
1402         } while (hdr_sz);
1403
1404         return nr_segs;
1405 }
1406
1407 static u8 mmc_blk_prep_packed_list(struct mmc_queue *mq, struct request *req)
1408 {
1409         struct request_queue *q = mq->queue;
1410         struct mmc_card *card = mq->card;
1411         struct request *cur = req, *next = NULL;
1412         struct mmc_blk_data *md = mq->data;
1413         struct mmc_queue_req *mqrq = mq->mqrq_cur;
1414         bool en_rel_wr = card->ext_csd.rel_param & EXT_CSD_WR_REL_PARAM_EN;
1415         unsigned int req_sectors = 0, phys_segments = 0;
1416         unsigned int max_blk_count, max_phys_segs;
1417         bool put_back = true;
1418         u8 max_packed_rw = 0;
1419         u8 reqs = 0;
1420
1421         if (!(md->flags & MMC_BLK_PACKED_CMD))
1422                 goto no_packed;
1423
1424         if ((rq_data_dir(cur) == WRITE) &&
1425             mmc_host_packed_wr(card->host))
1426                 max_packed_rw = card->ext_csd.max_packed_writes;
1427
1428         if (max_packed_rw == 0)
1429                 goto no_packed;
1430
1431         if (mmc_req_rel_wr(cur) &&
1432             (md->flags & MMC_BLK_REL_WR) && !en_rel_wr)
1433                 goto no_packed;
1434
1435         if (mmc_large_sector(card) &&
1436             !IS_ALIGNED(blk_rq_sectors(cur), 8))
1437                 goto no_packed;
1438
1439         mmc_blk_clear_packed(mqrq);
1440
1441         max_blk_count = min(card->host->max_blk_count,
1442                             card->host->max_req_size >> 9);
1443         if (unlikely(max_blk_count > 0xffff))
1444                 max_blk_count = 0xffff;
1445
1446         max_phys_segs = queue_max_segments(q);
1447         req_sectors += blk_rq_sectors(cur);
1448         phys_segments += cur->nr_phys_segments;
1449
1450         if (rq_data_dir(cur) == WRITE) {
1451                 req_sectors += mmc_large_sector(card) ? 8 : 1;
1452                 phys_segments += mmc_calc_packed_hdr_segs(q, card);
1453         }
1454
1455         do {
1456                 if (reqs >= max_packed_rw - 1) {
1457                         put_back = false;
1458                         break;
1459                 }
1460
1461                 spin_lock_irq(q->queue_lock);
1462                 next = blk_fetch_request(q);
1463                 spin_unlock_irq(q->queue_lock);
1464                 if (!next) {
1465                         put_back = false;
1466                         break;
1467                 }
1468
1469                 if (mmc_large_sector(card) &&
1470                     !IS_ALIGNED(blk_rq_sectors(next), 8))
1471                         break;
1472
1473                 if (next->cmd_flags & REQ_DISCARD ||
1474                     next->cmd_flags & REQ_FLUSH)
1475                         break;
1476
1477                 if (rq_data_dir(cur) != rq_data_dir(next))
1478                         break;
1479
1480                 if (mmc_req_rel_wr(next) &&
1481                     (md->flags & MMC_BLK_REL_WR) && !en_rel_wr)
1482                         break;
1483
1484                 req_sectors += blk_rq_sectors(next);
1485                 if (req_sectors > max_blk_count)
1486                         break;
1487
1488                 phys_segments +=  next->nr_phys_segments;
1489                 if (phys_segments > max_phys_segs)
1490                         break;
1491
1492                 list_add_tail(&next->queuelist, &mqrq->packed->list);
1493                 cur = next;
1494                 reqs++;
1495         } while (1);
1496
1497         if (put_back) {
1498                 spin_lock_irq(q->queue_lock);
1499                 blk_requeue_request(q, next);
1500                 spin_unlock_irq(q->queue_lock);
1501         }
1502
1503         if (reqs > 0) {
1504                 list_add(&req->queuelist, &mqrq->packed->list);
1505                 mqrq->packed->nr_entries = ++reqs;
1506                 mqrq->packed->retries = reqs;
1507                 return reqs;
1508         }
1509
1510 no_packed:
1511         mqrq->cmd_type = MMC_PACKED_NONE;
1512         return 0;
1513 }
1514
1515 static void mmc_blk_packed_hdr_wrq_prep(struct mmc_queue_req *mqrq,
1516                                         struct mmc_card *card,
1517                                         struct mmc_queue *mq)
1518 {
1519         struct mmc_blk_request *brq = &mqrq->brq;
1520         struct request *req = mqrq->req;
1521         struct request *prq;
1522         struct mmc_blk_data *md = mq->data;
1523         struct mmc_packed *packed = mqrq->packed;
1524         bool do_rel_wr, do_data_tag;
1525         u32 *packed_cmd_hdr;
1526         u8 hdr_blocks;
1527         u8 i = 1;
1528
1529         BUG_ON(!packed);
1530
1531         mqrq->cmd_type = MMC_PACKED_WRITE;
1532         packed->blocks = 0;
1533         packed->idx_failure = MMC_PACKED_NR_IDX;
1534
1535         packed_cmd_hdr = packed->cmd_hdr;
1536         memset(packed_cmd_hdr, 0, sizeof(packed->cmd_hdr));
1537         packed_cmd_hdr[0] = (packed->nr_entries << 16) |
1538                 (PACKED_CMD_WR << 8) | PACKED_CMD_VER;
1539         hdr_blocks = mmc_large_sector(card) ? 8 : 1;
1540
1541         /*
1542          * Argument for each entry of packed group
1543          */
1544         list_for_each_entry(prq, &packed->list, queuelist) {
1545                 do_rel_wr = mmc_req_rel_wr(prq) && (md->flags & MMC_BLK_REL_WR);
1546                 do_data_tag = (card->ext_csd.data_tag_unit_size) &&
1547                         (prq->cmd_flags & REQ_META) &&
1548                         (rq_data_dir(prq) == WRITE) &&
1549                         ((brq->data.blocks * brq->data.blksz) >=
1550                          card->ext_csd.data_tag_unit_size);
1551                 /* Argument of CMD23 */
1552                 packed_cmd_hdr[(i * 2)] =
1553                         (do_rel_wr ? MMC_CMD23_ARG_REL_WR : 0) |
1554                         (do_data_tag ? MMC_CMD23_ARG_TAG_REQ : 0) |
1555                         blk_rq_sectors(prq);
1556                 /* Argument of CMD18 or CMD25 */
1557                 packed_cmd_hdr[((i * 2)) + 1] =
1558                         mmc_card_blockaddr(card) ?
1559                         blk_rq_pos(prq) : blk_rq_pos(prq) << 9;
1560                 packed->blocks += blk_rq_sectors(prq);
1561                 i++;
1562         }
1563
1564         memset(brq, 0, sizeof(struct mmc_blk_request));
1565         brq->mrq.cmd = &brq->cmd;
1566         brq->mrq.data = &brq->data;
1567         brq->mrq.sbc = &brq->sbc;
1568         brq->mrq.stop = &brq->stop;
1569
1570         brq->sbc.opcode = MMC_SET_BLOCK_COUNT;
1571         brq->sbc.arg = MMC_CMD23_ARG_PACKED | (packed->blocks + hdr_blocks);
1572         brq->sbc.flags = MMC_RSP_R1 | MMC_CMD_AC;
1573
1574         brq->cmd.opcode = MMC_WRITE_MULTIPLE_BLOCK;
1575         brq->cmd.arg = blk_rq_pos(req);
1576         if (!mmc_card_blockaddr(card))
1577                 brq->cmd.arg <<= 9;
1578         brq->cmd.flags = MMC_RSP_SPI_R1 | MMC_RSP_R1 | MMC_CMD_ADTC;
1579
1580         brq->data.blksz = 512;
1581         brq->data.blocks = packed->blocks + hdr_blocks;
1582         brq->data.flags |= MMC_DATA_WRITE;
1583
1584         brq->stop.opcode = MMC_STOP_TRANSMISSION;
1585         brq->stop.arg = 0;
1586         brq->stop.flags = MMC_RSP_SPI_R1B | MMC_RSP_R1B | MMC_CMD_AC;
1587
1588         mmc_set_data_timeout(&brq->data, card);
1589
1590         brq->data.sg = mqrq->sg;
1591         brq->data.sg_len = mmc_queue_map_sg(mq, mqrq);
1592
1593         mqrq->mmc_active.mrq = &brq->mrq;
1594         mqrq->mmc_active.err_check = mmc_blk_packed_err_check;
1595
1596         mmc_queue_bounce_pre(mqrq);
1597 }
1598
1599 static int mmc_blk_cmd_err(struct mmc_blk_data *md, struct mmc_card *card,
1600                            struct mmc_blk_request *brq, struct request *req,
1601                            int ret)
1602 {
1603         struct mmc_queue_req *mq_rq;
1604         mq_rq = container_of(brq, struct mmc_queue_req, brq);
1605
1606         /*
1607          * If this is an SD card and we're writing, we can first
1608          * mark the known good sectors as ok.
1609          *
1610          * If the card is not SD, we can still ok written sectors
1611          * as reported by the controller (which might be less than
1612          * the real number of written sectors, but never more).
1613          */
1614         if (mmc_card_sd(card)) {
1615                 u32 blocks;
1616
1617                 blocks = mmc_sd_num_wr_blocks(card);
1618                 if (blocks != (u32)-1) {
1619                         ret = blk_end_request(req, 0, blocks << 9);
1620                 }
1621         } else {
1622                 if (!mmc_packed_cmd(mq_rq->cmd_type))
1623                         ret = blk_end_request(req, 0, brq->data.bytes_xfered);
1624         }
1625         return ret;
1626 }
1627
1628 static int mmc_blk_end_packed_req(struct mmc_queue_req *mq_rq)
1629 {
1630         struct request *prq;
1631         struct mmc_packed *packed = mq_rq->packed;
1632         int idx = packed->idx_failure, i = 0;
1633         int ret = 0;
1634
1635         BUG_ON(!packed);
1636
1637         while (!list_empty(&packed->list)) {
1638                 prq = list_entry_rq(packed->list.next);
1639                 if (idx == i) {
1640                         /* retry from error index */
1641                         packed->nr_entries -= idx;
1642                         mq_rq->req = prq;
1643                         ret = 1;
1644
1645                         if (packed->nr_entries == MMC_PACKED_NR_SINGLE) {
1646                                 list_del_init(&prq->queuelist);
1647                                 mmc_blk_clear_packed(mq_rq);
1648                         }
1649                         return ret;
1650                 }
1651                 list_del_init(&prq->queuelist);
1652                 blk_end_request(prq, 0, blk_rq_bytes(prq));
1653                 i++;
1654         }
1655
1656         mmc_blk_clear_packed(mq_rq);
1657         return ret;
1658 }
1659
1660 static void mmc_blk_abort_packed_req(struct mmc_queue_req *mq_rq)
1661 {
1662         struct request *prq;
1663         struct mmc_packed *packed = mq_rq->packed;
1664
1665         BUG_ON(!packed);
1666
1667         while (!list_empty(&packed->list)) {
1668                 prq = list_entry_rq(packed->list.next);
1669                 list_del_init(&prq->queuelist);
1670                 blk_end_request(prq, -EIO, blk_rq_bytes(prq));
1671         }
1672
1673         mmc_blk_clear_packed(mq_rq);
1674 }
1675
1676 static void mmc_blk_revert_packed_req(struct mmc_queue *mq,
1677                                       struct mmc_queue_req *mq_rq)
1678 {
1679         struct request *prq;
1680         struct request_queue *q = mq->queue;
1681         struct mmc_packed *packed = mq_rq->packed;
1682
1683         BUG_ON(!packed);
1684
1685         while (!list_empty(&packed->list)) {
1686                 prq = list_entry_rq(packed->list.prev);
1687                 if (prq->queuelist.prev != &packed->list) {
1688                         list_del_init(&prq->queuelist);
1689                         spin_lock_irq(q->queue_lock);
1690                         blk_requeue_request(mq->queue, prq);
1691                         spin_unlock_irq(q->queue_lock);
1692                 } else {
1693                         list_del_init(&prq->queuelist);
1694                 }
1695         }
1696
1697         mmc_blk_clear_packed(mq_rq);
1698 }
1699
1700 static int mmc_blk_issue_rw_rq(struct mmc_queue *mq, struct request *rqc)
1701 {
1702         struct mmc_blk_data *md = mq->data;
1703         struct mmc_card *card = md->queue.card;
1704         struct mmc_blk_request *brq = &mq->mqrq_cur->brq;
1705         int ret = 1, disable_multi = 0, retry = 0, type;
1706         enum mmc_blk_status status;
1707         struct mmc_queue_req *mq_rq;
1708         struct request *req = rqc;
1709         struct mmc_async_req *areq;
1710         const u8 packed_nr = 2;
1711         u8 reqs = 0;
1712
1713         if (!rqc && !mq->mqrq_prev->req)
1714                 return 0;
1715
1716         if (rqc)
1717                 reqs = mmc_blk_prep_packed_list(mq, rqc);
1718
1719         do {
1720                 if (rqc) {
1721                         /*
1722                          * When 4KB native sector is enabled, only 8 blocks
1723                          * multiple read or write is allowed
1724                          */
1725                         if ((brq->data.blocks & 0x07) &&
1726                             (card->ext_csd.data_sector_size == 4096)) {
1727                                 pr_err("%s: Transfer size is not 4KB sector size aligned\n",
1728                                         req->rq_disk->disk_name);
1729                                 mq_rq = mq->mqrq_cur;
1730                                 goto cmd_abort;
1731                         }
1732
1733                         if (reqs >= packed_nr)
1734                                 mmc_blk_packed_hdr_wrq_prep(mq->mqrq_cur,
1735                                                             card, mq);
1736                         else
1737                                 mmc_blk_rw_rq_prep(mq->mqrq_cur, card, 0, mq);
1738                         areq = &mq->mqrq_cur->mmc_active;
1739                 } else
1740                         areq = NULL;
1741                 areq = mmc_start_req(card->host, areq, (int *) &status);
1742                 if (!areq) {
1743                         if (status == MMC_BLK_NEW_REQUEST)
1744                                 mq->flags |= MMC_QUEUE_NEW_REQUEST;
1745                         return 0;
1746                 }
1747
1748                 mq_rq = container_of(areq, struct mmc_queue_req, mmc_active);
1749                 brq = &mq_rq->brq;
1750                 req = mq_rq->req;
1751                 type = rq_data_dir(req) == READ ? MMC_BLK_READ : MMC_BLK_WRITE;
1752                 mmc_queue_bounce_post(mq_rq);
1753
1754                 switch (status) {
1755                 case MMC_BLK_SUCCESS:
1756                 case MMC_BLK_PARTIAL:
1757                         /*
1758                          * A block was successfully transferred.
1759                          */
1760                         mmc_blk_reset_success(md, type);
1761
1762                         if (mmc_packed_cmd(mq_rq->cmd_type)) {
1763                                 ret = mmc_blk_end_packed_req(mq_rq);
1764                                 break;
1765                         } else {
1766                                 ret = blk_end_request(req, 0,
1767                                                 brq->data.bytes_xfered);
1768                         }
1769
1770                         /*
1771                          * If the blk_end_request function returns non-zero even
1772                          * though all data has been transferred and no errors
1773                          * were returned by the host controller, it's a bug.
1774                          */
1775                         if (status == MMC_BLK_SUCCESS && ret) {
1776                                 pr_err("%s BUG rq_tot %d d_xfer %d\n",
1777                                        __func__, blk_rq_bytes(req),
1778                                        brq->data.bytes_xfered);
1779                                 rqc = NULL;
1780                                 goto cmd_abort;
1781                         }
1782                         break;
1783                 case MMC_BLK_CMD_ERR:
1784                         ret = mmc_blk_cmd_err(md, card, brq, req, ret);
1785                         if (!mmc_blk_reset(md, card->host, type))
1786                                 break;
1787                         goto cmd_abort;
1788                 case MMC_BLK_RETRY:
1789                         if (retry++ < 5)
1790                                 break;
1791                         /* Fall through */
1792                 case MMC_BLK_ABORT:
1793                         if (!mmc_blk_reset(md, card->host, type))
1794                                 break;
1795                         goto cmd_abort;
1796                 case MMC_BLK_DATA_ERR: {
1797                         int err;
1798
1799                         err = mmc_blk_reset(md, card->host, type);
1800                         if (!err)
1801                                 break;
1802                         if (err == -ENODEV ||
1803                                 mmc_packed_cmd(mq_rq->cmd_type))
1804                                 goto cmd_abort;
1805                         /* Fall through */
1806                 }
1807                 case MMC_BLK_ECC_ERR:
1808                         if (brq->data.blocks > 1) {
1809                                 /* Redo read one sector at a time */
1810                                 pr_warning("%s: retrying using single block read\n",
1811                                            req->rq_disk->disk_name);
1812                                 disable_multi = 1;
1813                                 break;
1814                         }
1815                         /*
1816                          * After an error, we redo I/O one sector at a
1817                          * time, so we only reach here after trying to
1818                          * read a single sector.
1819                          */
1820                         ret = blk_end_request(req, -EIO,
1821                                                 brq->data.blksz);
1822                         if (!ret)
1823                                 goto start_new_req;
1824                         break;
1825                 case MMC_BLK_NOMEDIUM:
1826                         goto cmd_abort;
1827                 default:
1828                         pr_err("%s: Unhandled return value (%d)",
1829                                         req->rq_disk->disk_name, status);
1830                         goto cmd_abort;
1831                 }
1832
1833                 if (ret) {
1834                         if (mmc_packed_cmd(mq_rq->cmd_type)) {
1835                                 if (!mq_rq->packed->retries)
1836                                         goto cmd_abort;
1837                                 mmc_blk_packed_hdr_wrq_prep(mq_rq, card, mq);
1838                                 mmc_start_req(card->host,
1839                                               &mq_rq->mmc_active, NULL);
1840                         } else {
1841
1842                                 /*
1843                                  * In case of a incomplete request
1844                                  * prepare it again and resend.
1845                                  */
1846                                 mmc_blk_rw_rq_prep(mq_rq, card,
1847                                                 disable_multi, mq);
1848                                 mmc_start_req(card->host,
1849                                                 &mq_rq->mmc_active, NULL);
1850                         }
1851                 }
1852         } while (ret);
1853
1854         return 1;
1855
1856  cmd_abort:
1857         if (mmc_packed_cmd(mq_rq->cmd_type)) {
1858                 mmc_blk_abort_packed_req(mq_rq);
1859         } else {
1860                 if (mmc_card_removed(card))
1861                         req->cmd_flags |= REQ_QUIET;
1862                 while (ret)
1863                         ret = blk_end_request(req, -EIO,
1864                                         blk_rq_cur_bytes(req));
1865         }
1866
1867  start_new_req:
1868         if (rqc) {
1869                 if (mmc_card_removed(card)) {
1870                         rqc->cmd_flags |= REQ_QUIET;
1871                         blk_end_request_all(rqc, -EIO);
1872                 } else {
1873                         /*
1874                          * If current request is packed, it needs to put back.
1875                          */
1876                         if (mmc_packed_cmd(mq->mqrq_cur->cmd_type))
1877                                 mmc_blk_revert_packed_req(mq, mq->mqrq_cur);
1878
1879                         mmc_blk_rw_rq_prep(mq->mqrq_cur, card, 0, mq);
1880                         mmc_start_req(card->host,
1881                                       &mq->mqrq_cur->mmc_active, NULL);
1882                 }
1883         }
1884
1885         return 0;
1886 }
1887
1888 static int mmc_blk_issue_rq(struct mmc_queue *mq, struct request *req)
1889 {
1890         int ret;
1891         struct mmc_blk_data *md = mq->data;
1892         struct mmc_card *card = md->queue.card;
1893         struct mmc_host *host = card->host;
1894         unsigned long flags;
1895
1896         if (req && !mq->mqrq_prev->req)
1897                 /* claim host only for the first request */
1898                 mmc_claim_host(card->host);
1899
1900         ret = mmc_blk_part_switch(card, md);
1901         if (ret) {
1902                 if (req) {
1903                         blk_end_request_all(req, -EIO);
1904                 }
1905                 ret = 0;
1906                 goto out;
1907         }
1908
1909         mq->flags &= ~MMC_QUEUE_NEW_REQUEST;
1910         if (req && req->cmd_flags & REQ_DISCARD) {
1911                 /* complete ongoing async transfer before issuing discard */
1912                 if (card->host->areq)
1913                         mmc_blk_issue_rw_rq(mq, NULL);
1914                 if (req->cmd_flags & REQ_SECURE &&
1915                         !(card->quirks & MMC_QUIRK_SEC_ERASE_TRIM_BROKEN))
1916                         ret = mmc_blk_issue_secdiscard_rq(mq, req);
1917                 else
1918                         ret = mmc_blk_issue_discard_rq(mq, req);
1919         } else if (req && req->cmd_flags & REQ_FLUSH) {
1920                 /* complete ongoing async transfer before issuing flush */
1921                 if (card->host->areq)
1922                         mmc_blk_issue_rw_rq(mq, NULL);
1923                 ret = mmc_blk_issue_flush(mq, req);
1924         } else {
1925                 if (!req && host->areq) {
1926                         spin_lock_irqsave(&host->context_info.lock, flags);
1927                         host->context_info.is_waiting_last_req = true;
1928                         spin_unlock_irqrestore(&host->context_info.lock, flags);
1929                 }
1930                 ret = mmc_blk_issue_rw_rq(mq, req);
1931         }
1932
1933 out:
1934         if ((!req && !(mq->flags & MMC_QUEUE_NEW_REQUEST)) ||
1935              (req && (req->cmd_flags & MMC_REQ_SPECIAL_MASK)))
1936                 /*
1937                  * Release host when there are no more requests
1938                  * and after special request(discard, flush) is done.
1939                  * In case sepecial request, there is no reentry to
1940                  * the 'mmc_blk_issue_rq' with 'mqrq_prev->req'.
1941                  */
1942                 mmc_release_host(card->host);
1943         return ret;
1944 }
1945
1946 static inline int mmc_blk_readonly(struct mmc_card *card)
1947 {
1948         return mmc_card_readonly(card) ||
1949                !(card->csd.cmdclass & CCC_BLOCK_WRITE);
1950 }
1951
1952 static struct mmc_blk_data *mmc_blk_alloc_req(struct mmc_card *card,
1953                                               struct device *parent,
1954                                               sector_t size,
1955                                               bool default_ro,
1956                                               const char *subname,
1957                                               int area_type)
1958 {
1959         struct mmc_blk_data *md;
1960         int devidx, ret;
1961
1962         devidx = find_first_zero_bit(dev_use, max_devices);
1963         if (devidx >= max_devices)
1964                 return ERR_PTR(-ENOSPC);
1965         __set_bit(devidx, dev_use);
1966
1967         md = kzalloc(sizeof(struct mmc_blk_data), GFP_KERNEL);
1968         if (!md) {
1969                 ret = -ENOMEM;
1970                 goto out;
1971         }
1972
1973         /*
1974          * !subname implies we are creating main mmc_blk_data that will be
1975          * associated with mmc_card with mmc_set_drvdata. Due to device
1976          * partitions, devidx will not coincide with a per-physical card
1977          * index anymore so we keep track of a name index.
1978          */
1979         if (!subname) {
1980                 md->name_idx = find_first_zero_bit(name_use, max_devices);
1981                 __set_bit(md->name_idx, name_use);
1982         } else
1983                 md->name_idx = ((struct mmc_blk_data *)
1984                                 dev_to_disk(parent)->private_data)->name_idx;
1985
1986         md->area_type = area_type;
1987
1988         /*
1989          * Set the read-only status based on the supported commands
1990          * and the write protect switch.
1991          */
1992         md->read_only = mmc_blk_readonly(card);
1993
1994         md->disk = alloc_disk(perdev_minors);
1995         if (md->disk == NULL) {
1996                 ret = -ENOMEM;
1997                 goto err_kfree;
1998         }
1999
2000         spin_lock_init(&md->lock);
2001         INIT_LIST_HEAD(&md->part);
2002         md->usage = 1;
2003
2004         ret = mmc_init_queue(&md->queue, card, &md->lock, subname);
2005         if (ret)
2006                 goto err_putdisk;
2007
2008         md->queue.issue_fn = mmc_blk_issue_rq;
2009         md->queue.data = md;
2010
2011         md->disk->major = MMC_BLOCK_MAJOR;
2012         md->disk->first_minor = devidx * perdev_minors;
2013         md->disk->fops = &mmc_bdops;
2014         md->disk->private_data = md;
2015         md->disk->queue = md->queue.queue;
2016         md->disk->driverfs_dev = parent;
2017         set_disk_ro(md->disk, md->read_only || default_ro);
2018         if (area_type & MMC_BLK_DATA_AREA_RPMB)
2019                 md->disk->flags |= GENHD_FL_NO_PART_SCAN;
2020
2021         /*
2022          * As discussed on lkml, GENHD_FL_REMOVABLE should:
2023          *
2024          * - be set for removable media with permanent block devices
2025          * - be unset for removable block devices with permanent media
2026          *
2027          * Since MMC block devices clearly fall under the second
2028          * case, we do not set GENHD_FL_REMOVABLE.  Userspace
2029          * should use the block device creation/destruction hotplug
2030          * messages to tell when the card is present.
2031          */
2032
2033         snprintf(md->disk->disk_name, sizeof(md->disk->disk_name),
2034                  "mmcblk%d%s", md->name_idx, subname ? subname : "");
2035
2036         if (mmc_card_mmc(card))
2037                 blk_queue_logical_block_size(md->queue.queue,
2038                                              card->ext_csd.data_sector_size);
2039         else
2040                 blk_queue_logical_block_size(md->queue.queue, 512);
2041
2042         set_capacity(md->disk, size);
2043
2044         if (mmc_host_cmd23(card->host)) {
2045                 if (mmc_card_mmc(card) ||
2046                     (mmc_card_sd(card) &&
2047                      card->scr.cmds & SD_SCR_CMD23_SUPPORT))
2048                         md->flags |= MMC_BLK_CMD23;
2049         }
2050
2051         if (mmc_card_mmc(card) &&
2052             md->flags & MMC_BLK_CMD23 &&
2053             ((card->ext_csd.rel_param & EXT_CSD_WR_REL_PARAM_EN) ||
2054              card->ext_csd.rel_sectors)) {
2055                 md->flags |= MMC_BLK_REL_WR;
2056                 blk_queue_flush(md->queue.queue, REQ_FLUSH | REQ_FUA);
2057         }
2058
2059         if (mmc_card_mmc(card) &&
2060             (area_type == MMC_BLK_DATA_AREA_MAIN) &&
2061             (md->flags & MMC_BLK_CMD23) &&
2062             card->ext_csd.packed_event_en) {
2063                 if (!mmc_packed_init(&md->queue, card))
2064                         md->flags |= MMC_BLK_PACKED_CMD;
2065         }
2066
2067         return md;
2068
2069  err_putdisk:
2070         put_disk(md->disk);
2071  err_kfree:
2072         kfree(md);
2073  out:
2074         return ERR_PTR(ret);
2075 }
2076
2077 static struct mmc_blk_data *mmc_blk_alloc(struct mmc_card *card)
2078 {
2079         sector_t size;
2080         struct mmc_blk_data *md;
2081
2082         if (!mmc_card_sd(card) && mmc_card_blockaddr(card)) {
2083                 /*
2084                  * The EXT_CSD sector count is in number or 512 byte
2085                  * sectors.
2086                  */
2087                 size = card->ext_csd.sectors;
2088         } else {
2089                 /*
2090                  * The CSD capacity field is in units of read_blkbits.
2091                  * set_capacity takes units of 512 bytes.
2092                  */
2093                 size = card->csd.capacity << (card->csd.read_blkbits - 9);
2094         }
2095
2096         md = mmc_blk_alloc_req(card, &card->dev, size, false, NULL,
2097                                         MMC_BLK_DATA_AREA_MAIN);
2098         return md;
2099 }
2100
2101 static int mmc_blk_alloc_part(struct mmc_card *card,
2102                               struct mmc_blk_data *md,
2103                               unsigned int part_type,
2104                               sector_t size,
2105                               bool default_ro,
2106                               const char *subname,
2107                               int area_type)
2108 {
2109         char cap_str[10];
2110         struct mmc_blk_data *part_md;
2111
2112         part_md = mmc_blk_alloc_req(card, disk_to_dev(md->disk), size, default_ro,
2113                                     subname, area_type);
2114         if (IS_ERR(part_md))
2115                 return PTR_ERR(part_md);
2116         part_md->part_type = part_type;
2117         list_add(&part_md->part, &md->part);
2118
2119         string_get_size((u64)get_capacity(part_md->disk) << 9, STRING_UNITS_2,
2120                         cap_str, sizeof(cap_str));
2121         pr_info("%s: %s %s partition %u %s\n",
2122                part_md->disk->disk_name, mmc_card_id(card),
2123                mmc_card_name(card), part_md->part_type, cap_str);
2124         return 0;
2125 }
2126
2127 /* MMC Physical partitions consist of two boot partitions and
2128  * up to four general purpose partitions.
2129  * For each partition enabled in EXT_CSD a block device will be allocatedi
2130  * to provide access to the partition.
2131  */
2132
2133 static int mmc_blk_alloc_parts(struct mmc_card *card, struct mmc_blk_data *md)
2134 {
2135         int idx, ret = 0;
2136
2137         if (!mmc_card_mmc(card))
2138                 return 0;
2139
2140         for (idx = 0; idx < card->nr_parts; idx++) {
2141                 if (card->part[idx].size) {
2142                         ret = mmc_blk_alloc_part(card, md,
2143                                 card->part[idx].part_cfg,
2144                                 card->part[idx].size >> 9,
2145                                 card->part[idx].force_ro,
2146                                 card->part[idx].name,
2147                                 card->part[idx].area_type);
2148                         if (ret)
2149                                 return ret;
2150                 }
2151         }
2152
2153         return ret;
2154 }
2155
2156 static void mmc_blk_remove_req(struct mmc_blk_data *md)
2157 {
2158         struct mmc_card *card;
2159
2160         if (md) {
2161                 card = md->queue.card;
2162                 if (md->disk->flags & GENHD_FL_UP) {
2163                         device_remove_file(disk_to_dev(md->disk), &md->force_ro);
2164                         if ((md->area_type & MMC_BLK_DATA_AREA_BOOT) &&
2165                                         card->ext_csd.boot_ro_lockable)
2166                                 device_remove_file(disk_to_dev(md->disk),
2167                                         &md->power_ro_lock);
2168
2169                         /* Stop new requests from getting into the queue */
2170                         del_gendisk(md->disk);
2171                 }
2172
2173                 /* Then flush out any already in there */
2174                 mmc_cleanup_queue(&md->queue);
2175                 if (md->flags & MMC_BLK_PACKED_CMD)
2176                         mmc_packed_clean(&md->queue);
2177                 mmc_blk_put(md);
2178         }
2179 }
2180
2181 static void mmc_blk_remove_parts(struct mmc_card *card,
2182                                  struct mmc_blk_data *md)
2183 {
2184         struct list_head *pos, *q;
2185         struct mmc_blk_data *part_md;
2186
2187         __clear_bit(md->name_idx, name_use);
2188         list_for_each_safe(pos, q, &md->part) {
2189                 part_md = list_entry(pos, struct mmc_blk_data, part);
2190                 list_del(pos);
2191                 mmc_blk_remove_req(part_md);
2192         }
2193 }
2194
2195 static int mmc_add_disk(struct mmc_blk_data *md)
2196 {
2197         int ret;
2198         struct mmc_card *card = md->queue.card;
2199
2200         add_disk(md->disk);
2201         md->force_ro.show = force_ro_show;
2202         md->force_ro.store = force_ro_store;
2203         sysfs_attr_init(&md->force_ro.attr);
2204         md->force_ro.attr.name = "force_ro";
2205         md->force_ro.attr.mode = S_IRUGO | S_IWUSR;
2206         ret = device_create_file(disk_to_dev(md->disk), &md->force_ro);
2207         if (ret)
2208                 goto force_ro_fail;
2209
2210         if ((md->area_type & MMC_BLK_DATA_AREA_BOOT) &&
2211              card->ext_csd.boot_ro_lockable) {
2212                 umode_t mode;
2213
2214                 if (card->ext_csd.boot_ro_lock & EXT_CSD_BOOT_WP_B_PWR_WP_DIS)
2215                         mode = S_IRUGO;
2216                 else
2217                         mode = S_IRUGO | S_IWUSR;
2218
2219                 md->power_ro_lock.show = power_ro_lock_show;
2220                 md->power_ro_lock.store = power_ro_lock_store;
2221                 sysfs_attr_init(&md->power_ro_lock.attr);
2222                 md->power_ro_lock.attr.mode = mode;
2223                 md->power_ro_lock.attr.name =
2224                                         "ro_lock_until_next_power_on";
2225                 ret = device_create_file(disk_to_dev(md->disk),
2226                                 &md->power_ro_lock);
2227                 if (ret)
2228                         goto power_ro_lock_fail;
2229         }
2230         return ret;
2231
2232 power_ro_lock_fail:
2233         device_remove_file(disk_to_dev(md->disk), &md->force_ro);
2234 force_ro_fail:
2235         del_gendisk(md->disk);
2236
2237         return ret;
2238 }
2239
2240 #define CID_MANFID_SANDISK      0x2
2241 #define CID_MANFID_TOSHIBA      0x11
2242 #define CID_MANFID_MICRON       0x13
2243 #define CID_MANFID_SAMSUNG      0x15
2244
2245 static const struct mmc_fixup blk_fixups[] =
2246 {
2247         MMC_FIXUP("SEM02G", CID_MANFID_SANDISK, 0x100, add_quirk,
2248                   MMC_QUIRK_INAND_CMD38),
2249         MMC_FIXUP("SEM04G", CID_MANFID_SANDISK, 0x100, add_quirk,
2250                   MMC_QUIRK_INAND_CMD38),
2251         MMC_FIXUP("SEM08G", CID_MANFID_SANDISK, 0x100, add_quirk,
2252                   MMC_QUIRK_INAND_CMD38),
2253         MMC_FIXUP("SEM16G", CID_MANFID_SANDISK, 0x100, add_quirk,
2254                   MMC_QUIRK_INAND_CMD38),
2255         MMC_FIXUP("SEM32G", CID_MANFID_SANDISK, 0x100, add_quirk,
2256                   MMC_QUIRK_INAND_CMD38),
2257
2258         /*
2259          * Some MMC cards experience performance degradation with CMD23
2260          * instead of CMD12-bounded multiblock transfers. For now we'll
2261          * black list what's bad...
2262          * - Certain Toshiba cards.
2263          *
2264          * N.B. This doesn't affect SD cards.
2265          */
2266         MMC_FIXUP("MMC08G", CID_MANFID_TOSHIBA, CID_OEMID_ANY, add_quirk_mmc,
2267                   MMC_QUIRK_BLK_NO_CMD23),
2268         MMC_FIXUP("MMC16G", CID_MANFID_TOSHIBA, CID_OEMID_ANY, add_quirk_mmc,
2269                   MMC_QUIRK_BLK_NO_CMD23),
2270         MMC_FIXUP("MMC32G", CID_MANFID_TOSHIBA, CID_OEMID_ANY, add_quirk_mmc,
2271                   MMC_QUIRK_BLK_NO_CMD23),
2272
2273         /*
2274          * Some Micron MMC cards needs longer data read timeout than
2275          * indicated in CSD.
2276          */
2277         MMC_FIXUP(CID_NAME_ANY, CID_MANFID_MICRON, 0x200, add_quirk_mmc,
2278                   MMC_QUIRK_LONG_READ_TIME),
2279
2280         /*
2281          * On these Samsung MoviNAND parts, performing secure erase or
2282          * secure trim can result in unrecoverable corruption due to a
2283          * firmware bug.
2284          */
2285         MMC_FIXUP("M8G2FA", CID_MANFID_SAMSUNG, CID_OEMID_ANY, add_quirk_mmc,
2286                   MMC_QUIRK_SEC_ERASE_TRIM_BROKEN),
2287         MMC_FIXUP("MAG4FA", CID_MANFID_SAMSUNG, CID_OEMID_ANY, add_quirk_mmc,
2288                   MMC_QUIRK_SEC_ERASE_TRIM_BROKEN),
2289         MMC_FIXUP("MBG8FA", CID_MANFID_SAMSUNG, CID_OEMID_ANY, add_quirk_mmc,
2290                   MMC_QUIRK_SEC_ERASE_TRIM_BROKEN),
2291         MMC_FIXUP("MCGAFA", CID_MANFID_SAMSUNG, CID_OEMID_ANY, add_quirk_mmc,
2292                   MMC_QUIRK_SEC_ERASE_TRIM_BROKEN),
2293         MMC_FIXUP("VAL00M", CID_MANFID_SAMSUNG, CID_OEMID_ANY, add_quirk_mmc,
2294                   MMC_QUIRK_SEC_ERASE_TRIM_BROKEN),
2295         MMC_FIXUP("VYL00M", CID_MANFID_SAMSUNG, CID_OEMID_ANY, add_quirk_mmc,
2296                   MMC_QUIRK_SEC_ERASE_TRIM_BROKEN),
2297         MMC_FIXUP("KYL00M", CID_MANFID_SAMSUNG, CID_OEMID_ANY, add_quirk_mmc,
2298                   MMC_QUIRK_SEC_ERASE_TRIM_BROKEN),
2299         MMC_FIXUP("VZL00M", CID_MANFID_SAMSUNG, CID_OEMID_ANY, add_quirk_mmc,
2300                   MMC_QUIRK_SEC_ERASE_TRIM_BROKEN),
2301
2302         END_FIXUP
2303 };
2304
2305 static int mmc_blk_probe(struct mmc_card *card)
2306 {
2307         struct mmc_blk_data *md, *part_md;
2308         char cap_str[10];
2309
2310         /*
2311          * Check that the card supports the command class(es) we need.
2312          */
2313         if (!(card->csd.cmdclass & CCC_BLOCK_READ))
2314                 return -ENODEV;
2315
2316         md = mmc_blk_alloc(card);
2317         if (IS_ERR(md))
2318                 return PTR_ERR(md);
2319
2320         string_get_size((u64)get_capacity(md->disk) << 9, STRING_UNITS_2,
2321                         cap_str, sizeof(cap_str));
2322         pr_info("%s: %s %s %s %s\n",
2323                 md->disk->disk_name, mmc_card_id(card), mmc_card_name(card),
2324                 cap_str, md->read_only ? "(ro)" : "");
2325
2326         if (mmc_blk_alloc_parts(card, md))
2327                 goto out;
2328
2329         mmc_set_drvdata(card, md);
2330         mmc_fixup_device(card, blk_fixups);
2331
2332         if (mmc_add_disk(md))
2333                 goto out;
2334
2335         list_for_each_entry(part_md, &md->part, part) {
2336                 if (mmc_add_disk(part_md))
2337                         goto out;
2338         }
2339         return 0;
2340
2341  out:
2342         mmc_blk_remove_parts(card, md);
2343         mmc_blk_remove_req(md);
2344         return 0;
2345 }
2346
2347 static void mmc_blk_remove(struct mmc_card *card)
2348 {
2349         struct mmc_blk_data *md = mmc_get_drvdata(card);
2350
2351         mmc_blk_remove_parts(card, md);
2352         mmc_claim_host(card->host);
2353         mmc_blk_part_switch(card, md);
2354         mmc_release_host(card->host);
2355         mmc_blk_remove_req(md);
2356         mmc_set_drvdata(card, NULL);
2357 }
2358
2359 #ifdef CONFIG_PM
2360 static int mmc_blk_suspend(struct mmc_card *card)
2361 {
2362         struct mmc_blk_data *part_md;
2363         struct mmc_blk_data *md = mmc_get_drvdata(card);
2364
2365         if (md) {
2366                 mmc_queue_suspend(&md->queue);
2367                 list_for_each_entry(part_md, &md->part, part) {
2368                         mmc_queue_suspend(&part_md->queue);
2369                 }
2370         }
2371         return 0;
2372 }
2373
2374 static int mmc_blk_resume(struct mmc_card *card)
2375 {
2376         struct mmc_blk_data *part_md;
2377         struct mmc_blk_data *md = mmc_get_drvdata(card);
2378
2379         if (md) {
2380                 /*
2381                  * Resume involves the card going into idle state,
2382                  * so current partition is always the main one.
2383                  */
2384                 md->part_curr = md->part_type;
2385                 mmc_queue_resume(&md->queue);
2386                 list_for_each_entry(part_md, &md->part, part) {
2387                         mmc_queue_resume(&part_md->queue);
2388                 }
2389         }
2390         return 0;
2391 }
2392 #else
2393 #define mmc_blk_suspend NULL
2394 #define mmc_blk_resume  NULL
2395 #endif
2396
2397 static struct mmc_driver mmc_driver = {
2398         .drv            = {
2399                 .name   = "mmcblk",
2400         },
2401         .probe          = mmc_blk_probe,
2402         .remove         = mmc_blk_remove,
2403         .suspend        = mmc_blk_suspend,
2404         .resume         = mmc_blk_resume,
2405 };
2406
2407 static int __init mmc_blk_init(void)
2408 {
2409         int res;
2410
2411         if (perdev_minors != CONFIG_MMC_BLOCK_MINORS)
2412                 pr_info("mmcblk: using %d minors per device\n", perdev_minors);
2413
2414         max_devices = 256 / perdev_minors;
2415
2416         res = register_blkdev(MMC_BLOCK_MAJOR, "mmc");
2417         if (res)
2418                 goto out;
2419
2420         res = mmc_register_driver(&mmc_driver);
2421         if (res)
2422                 goto out2;
2423
2424         return 0;
2425  out2:
2426         unregister_blkdev(MMC_BLOCK_MAJOR, "mmc");
2427  out:
2428         return res;
2429 }
2430
2431 static void __exit mmc_blk_exit(void)
2432 {
2433         mmc_unregister_driver(&mmc_driver);
2434         unregister_blkdev(MMC_BLOCK_MAJOR, "mmc");
2435 }
2436
2437 module_init(mmc_blk_init);
2438 module_exit(mmc_blk_exit);
2439
2440 MODULE_LICENSE("GPL");
2441 MODULE_DESCRIPTION("Multimedia Card (MMC) block device driver");
2442