OneNAND: One-Time Programmable (OTP) support
[linux-2.6] / drivers / mtd / mtdchar.c
1 /*
2  * $Id: mtdchar.c,v 1.76 2005/11/07 11:14:20 gleixner Exp $
3  *
4  * Character-device access to raw MTD devices.
5  *
6  */
7
8 #include <linux/config.h>
9 #include <linux/device.h>
10 #include <linux/fs.h>
11 #include <linux/init.h>
12 #include <linux/kernel.h>
13 #include <linux/module.h>
14 #include <linux/slab.h>
15 #include <linux/sched.h>
16
17 #include <linux/mtd/mtd.h>
18 #include <linux/mtd/compatmac.h>
19
20 #include <asm/uaccess.h>
21
22 static struct class *mtd_class;
23
24 static void mtd_notify_add(struct mtd_info* mtd)
25 {
26         if (!mtd)
27                 return;
28
29         class_device_create(mtd_class, NULL, MKDEV(MTD_CHAR_MAJOR, mtd->index*2),
30                             NULL, "mtd%d", mtd->index);
31
32         class_device_create(mtd_class, NULL,
33                             MKDEV(MTD_CHAR_MAJOR, mtd->index*2+1),
34                             NULL, "mtd%dro", mtd->index);
35 }
36
37 static void mtd_notify_remove(struct mtd_info* mtd)
38 {
39         if (!mtd)
40                 return;
41
42         class_device_destroy(mtd_class, MKDEV(MTD_CHAR_MAJOR, mtd->index*2));
43         class_device_destroy(mtd_class, MKDEV(MTD_CHAR_MAJOR, mtd->index*2+1));
44 }
45
46 static struct mtd_notifier notifier = {
47         .add    = mtd_notify_add,
48         .remove = mtd_notify_remove,
49 };
50
51 /*
52  * We use file->private_data to store a pointer to the MTDdevice.
53  * Since alighment is at least 32 bits, we have 2 bits free for OTP
54  * modes as well.
55  */
56
57 #define TO_MTD(file) (struct mtd_info *)((long)((file)->private_data) & ~3L)
58
59 #define MTD_MODE_OTP_FACT       1
60 #define MTD_MODE_OTP_USER       2
61 #define MTD_MODE(file)          ((long)((file)->private_data) & 3)
62
63 #define SET_MTD_MODE(file, mode) \
64         do { long __p = (long)((file)->private_data); \
65              (file)->private_data = (void *)((__p & ~3L) | mode); } while (0)
66
67 static loff_t mtd_lseek (struct file *file, loff_t offset, int orig)
68 {
69         struct mtd_info *mtd = TO_MTD(file);
70
71         switch (orig) {
72         case 0:
73                 /* SEEK_SET */
74                 break;
75         case 1:
76                 /* SEEK_CUR */
77                 offset += file->f_pos;
78                 break;
79         case 2:
80                 /* SEEK_END */
81                 offset += mtd->size;
82                 break;
83         default:
84                 return -EINVAL;
85         }
86
87         if (offset >= 0 && offset < mtd->size)
88                 return file->f_pos = offset;
89
90         return -EINVAL;
91 }
92
93
94
95 static int mtd_open(struct inode *inode, struct file *file)
96 {
97         int minor = iminor(inode);
98         int devnum = minor >> 1;
99         struct mtd_info *mtd;
100
101         DEBUG(MTD_DEBUG_LEVEL0, "MTD_open\n");
102
103         if (devnum >= MAX_MTD_DEVICES)
104                 return -ENODEV;
105
106         /* You can't open the RO devices RW */
107         if ((file->f_mode & 2) && (minor & 1))
108                 return -EACCES;
109
110         mtd = get_mtd_device(NULL, devnum);
111
112         if (!mtd)
113                 return -ENODEV;
114
115         if (MTD_ABSENT == mtd->type) {
116                 put_mtd_device(mtd);
117                 return -ENODEV;
118         }
119
120         file->private_data = mtd;
121
122         /* You can't open it RW if it's not a writeable device */
123         if ((file->f_mode & 2) && !(mtd->flags & MTD_WRITEABLE)) {
124                 put_mtd_device(mtd);
125                 return -EACCES;
126         }
127
128         return 0;
129 } /* mtd_open */
130
131 /*====================================================================*/
132
133 static int mtd_close(struct inode *inode, struct file *file)
134 {
135         struct mtd_info *mtd;
136
137         DEBUG(MTD_DEBUG_LEVEL0, "MTD_close\n");
138
139         mtd = TO_MTD(file);
140
141         if (mtd->sync)
142                 mtd->sync(mtd);
143
144         put_mtd_device(mtd);
145
146         return 0;
147 } /* mtd_close */
148
149 /* FIXME: This _really_ needs to die. In 2.5, we should lock the
150    userspace buffer down and use it directly with readv/writev.
151 */
152 #define MAX_KMALLOC_SIZE 0x20000
153
154 static ssize_t mtd_read(struct file *file, char __user *buf, size_t count,loff_t *ppos)
155 {
156         struct mtd_info *mtd = TO_MTD(file);
157         size_t retlen=0;
158         size_t total_retlen=0;
159         int ret=0;
160         int len;
161         char *kbuf;
162
163         DEBUG(MTD_DEBUG_LEVEL0,"MTD_read\n");
164
165         if (*ppos + count > mtd->size)
166                 count = mtd->size - *ppos;
167
168         if (!count)
169                 return 0;
170
171         /* FIXME: Use kiovec in 2.5 to lock down the user's buffers
172            and pass them directly to the MTD functions */
173
174         if (count > MAX_KMALLOC_SIZE)
175                 kbuf=kmalloc(MAX_KMALLOC_SIZE, GFP_KERNEL);
176         else
177                 kbuf=kmalloc(count, GFP_KERNEL);
178
179         if (!kbuf)
180                 return -ENOMEM;
181
182         while (count) {
183
184                 if (count > MAX_KMALLOC_SIZE)
185                         len = MAX_KMALLOC_SIZE;
186                 else
187                         len = count;
188
189                 switch (MTD_MODE(file)) {
190                 case MTD_MODE_OTP_FACT:
191                         ret = mtd->read_fact_prot_reg(mtd, *ppos, len, &retlen, kbuf);
192                         break;
193                 case MTD_MODE_OTP_USER:
194                         ret = mtd->read_user_prot_reg(mtd, *ppos, len, &retlen, kbuf);
195                         break;
196                 default:
197                         ret = MTD_READ(mtd, *ppos, len, &retlen, kbuf);
198                 }
199                 /* Nand returns -EBADMSG on ecc errors, but it returns
200                  * the data. For our userspace tools it is important
201                  * to dump areas with ecc errors !
202                  * Userspace software which accesses NAND this way
203                  * must be aware of the fact that it deals with NAND
204                  */
205                 if (!ret || (ret == -EBADMSG)) {
206                         *ppos += retlen;
207                         if (copy_to_user(buf, kbuf, retlen)) {
208                                 kfree(kbuf);
209                                 return -EFAULT;
210                         }
211                         else
212                                 total_retlen += retlen;
213
214                         count -= retlen;
215                         buf += retlen;
216                         if (retlen == 0)
217                                 count = 0;
218                 }
219                 else {
220                         kfree(kbuf);
221                         return ret;
222                 }
223
224         }
225
226         kfree(kbuf);
227         return total_retlen;
228 } /* mtd_read */
229
230 static ssize_t mtd_write(struct file *file, const char __user *buf, size_t count,loff_t *ppos)
231 {
232         struct mtd_info *mtd = TO_MTD(file);
233         char *kbuf;
234         size_t retlen;
235         size_t total_retlen=0;
236         int ret=0;
237         int len;
238
239         DEBUG(MTD_DEBUG_LEVEL0,"MTD_write\n");
240
241         if (*ppos == mtd->size)
242                 return -ENOSPC;
243
244         if (*ppos + count > mtd->size)
245                 count = mtd->size - *ppos;
246
247         if (!count)
248                 return 0;
249
250         if (count > MAX_KMALLOC_SIZE)
251                 kbuf=kmalloc(MAX_KMALLOC_SIZE, GFP_KERNEL);
252         else
253                 kbuf=kmalloc(count, GFP_KERNEL);
254
255         if (!kbuf)
256                 return -ENOMEM;
257
258         while (count) {
259
260                 if (count > MAX_KMALLOC_SIZE)
261                         len = MAX_KMALLOC_SIZE;
262                 else
263                         len = count;
264
265                 if (copy_from_user(kbuf, buf, len)) {
266                         kfree(kbuf);
267                         return -EFAULT;
268                 }
269
270                 switch (MTD_MODE(file)) {
271                 case MTD_MODE_OTP_FACT:
272                         ret = -EROFS;
273                         break;
274                 case MTD_MODE_OTP_USER:
275                         if (!mtd->write_user_prot_reg) {
276                                 ret = -EOPNOTSUPP;
277                                 break;
278                         }
279                         ret = mtd->write_user_prot_reg(mtd, *ppos, len, &retlen, kbuf);
280                         break;
281                 default:
282                         ret = (*(mtd->write))(mtd, *ppos, len, &retlen, kbuf);
283                 }
284                 if (!ret) {
285                         *ppos += retlen;
286                         total_retlen += retlen;
287                         count -= retlen;
288                         buf += retlen;
289                 }
290                 else {
291                         kfree(kbuf);
292                         return ret;
293                 }
294         }
295
296         kfree(kbuf);
297         return total_retlen;
298 } /* mtd_write */
299
300 /*======================================================================
301
302     IOCTL calls for getting device parameters.
303
304 ======================================================================*/
305 static void mtdchar_erase_callback (struct erase_info *instr)
306 {
307         wake_up((wait_queue_head_t *)instr->priv);
308 }
309
310 static int mtd_ioctl(struct inode *inode, struct file *file,
311                      u_int cmd, u_long arg)
312 {
313         struct mtd_info *mtd = TO_MTD(file);
314         void __user *argp = (void __user *)arg;
315         int ret = 0;
316         u_long size;
317
318         DEBUG(MTD_DEBUG_LEVEL0, "MTD_ioctl\n");
319
320         size = (cmd & IOCSIZE_MASK) >> IOCSIZE_SHIFT;
321         if (cmd & IOC_IN) {
322                 if (!access_ok(VERIFY_READ, argp, size))
323                         return -EFAULT;
324         }
325         if (cmd & IOC_OUT) {
326                 if (!access_ok(VERIFY_WRITE, argp, size))
327                         return -EFAULT;
328         }
329
330         switch (cmd) {
331         case MEMGETREGIONCOUNT:
332                 if (copy_to_user(argp, &(mtd->numeraseregions), sizeof(int)))
333                         return -EFAULT;
334                 break;
335
336         case MEMGETREGIONINFO:
337         {
338                 struct region_info_user ur;
339
340                 if (copy_from_user(&ur, argp, sizeof(struct region_info_user)))
341                         return -EFAULT;
342
343                 if (ur.regionindex >= mtd->numeraseregions)
344                         return -EINVAL;
345                 if (copy_to_user(argp, &(mtd->eraseregions[ur.regionindex]),
346                                 sizeof(struct mtd_erase_region_info)))
347                         return -EFAULT;
348                 break;
349         }
350
351         case MEMGETINFO:
352                 if (copy_to_user(argp, mtd, sizeof(struct mtd_info_user)))
353                         return -EFAULT;
354                 break;
355
356         case MEMERASE:
357         {
358                 struct erase_info *erase;
359
360                 if(!(file->f_mode & 2))
361                         return -EPERM;
362
363                 erase=kmalloc(sizeof(struct erase_info),GFP_KERNEL);
364                 if (!erase)
365                         ret = -ENOMEM;
366                 else {
367                         wait_queue_head_t waitq;
368                         DECLARE_WAITQUEUE(wait, current);
369
370                         init_waitqueue_head(&waitq);
371
372                         memset (erase,0,sizeof(struct erase_info));
373                         if (copy_from_user(&erase->addr, argp,
374                                     sizeof(struct erase_info_user))) {
375                                 kfree(erase);
376                                 return -EFAULT;
377                         }
378                         erase->mtd = mtd;
379                         erase->callback = mtdchar_erase_callback;
380                         erase->priv = (unsigned long)&waitq;
381
382                         /*
383                           FIXME: Allow INTERRUPTIBLE. Which means
384                           not having the wait_queue head on the stack.
385
386                           If the wq_head is on the stack, and we
387                           leave because we got interrupted, then the
388                           wq_head is no longer there when the
389                           callback routine tries to wake us up.
390                         */
391                         ret = mtd->erase(mtd, erase);
392                         if (!ret) {
393                                 set_current_state(TASK_UNINTERRUPTIBLE);
394                                 add_wait_queue(&waitq, &wait);
395                                 if (erase->state != MTD_ERASE_DONE &&
396                                     erase->state != MTD_ERASE_FAILED)
397                                         schedule();
398                                 remove_wait_queue(&waitq, &wait);
399                                 set_current_state(TASK_RUNNING);
400
401                                 ret = (erase->state == MTD_ERASE_FAILED)?-EIO:0;
402                         }
403                         kfree(erase);
404                 }
405                 break;
406         }
407
408         case MEMWRITEOOB:
409         {
410                 struct mtd_oob_buf buf;
411                 void *databuf;
412                 ssize_t retlen;
413
414                 if(!(file->f_mode & 2))
415                         return -EPERM;
416
417                 if (copy_from_user(&buf, argp, sizeof(struct mtd_oob_buf)))
418                         return -EFAULT;
419
420                 if (buf.length > 0x4096)
421                         return -EINVAL;
422
423                 if (!mtd->write_oob)
424                         ret = -EOPNOTSUPP;
425                 else
426                         ret = access_ok(VERIFY_READ, buf.ptr,
427                                         buf.length) ? 0 : EFAULT;
428
429                 if (ret)
430                         return ret;
431
432                 databuf = kmalloc(buf.length, GFP_KERNEL);
433                 if (!databuf)
434                         return -ENOMEM;
435
436                 if (copy_from_user(databuf, buf.ptr, buf.length)) {
437                         kfree(databuf);
438                         return -EFAULT;
439                 }
440
441                 ret = (mtd->write_oob)(mtd, buf.start, buf.length, &retlen, databuf);
442
443                 if (copy_to_user(argp + sizeof(uint32_t), &retlen, sizeof(uint32_t)))
444                         ret = -EFAULT;
445
446                 kfree(databuf);
447                 break;
448
449         }
450
451         case MEMREADOOB:
452         {
453                 struct mtd_oob_buf buf;
454                 void *databuf;
455                 ssize_t retlen;
456
457                 if (copy_from_user(&buf, argp, sizeof(struct mtd_oob_buf)))
458                         return -EFAULT;
459
460                 if (buf.length > 0x4096)
461                         return -EINVAL;
462
463                 if (!mtd->read_oob)
464                         ret = -EOPNOTSUPP;
465                 else
466                         ret = access_ok(VERIFY_WRITE, buf.ptr,
467                                         buf.length) ? 0 : -EFAULT;
468
469                 if (ret)
470                         return ret;
471
472                 databuf = kmalloc(buf.length, GFP_KERNEL);
473                 if (!databuf)
474                         return -ENOMEM;
475
476                 ret = (mtd->read_oob)(mtd, buf.start, buf.length, &retlen, databuf);
477
478                 if (put_user(retlen, (uint32_t __user *)argp))
479                         ret = -EFAULT;
480                 else if (retlen && copy_to_user(buf.ptr, databuf, retlen))
481                         ret = -EFAULT;
482
483                 kfree(databuf);
484                 break;
485         }
486
487         case MEMLOCK:
488         {
489                 struct erase_info_user info;
490
491                 if (copy_from_user(&info, argp, sizeof(info)))
492                         return -EFAULT;
493
494                 if (!mtd->lock)
495                         ret = -EOPNOTSUPP;
496                 else
497                         ret = mtd->lock(mtd, info.start, info.length);
498                 break;
499         }
500
501         case MEMUNLOCK:
502         {
503                 struct erase_info_user info;
504
505                 if (copy_from_user(&info, argp, sizeof(info)))
506                         return -EFAULT;
507
508                 if (!mtd->unlock)
509                         ret = -EOPNOTSUPP;
510                 else
511                         ret = mtd->unlock(mtd, info.start, info.length);
512                 break;
513         }
514
515         case MEMSETOOBSEL:
516         {
517                 if (copy_from_user(&mtd->oobinfo, argp, sizeof(struct nand_oobinfo)))
518                         return -EFAULT;
519                 break;
520         }
521
522         case MEMGETOOBSEL:
523         {
524                 if (copy_to_user(argp, &(mtd->oobinfo), sizeof(struct nand_oobinfo)))
525                         return -EFAULT;
526                 break;
527         }
528
529         case MEMGETBADBLOCK:
530         {
531                 loff_t offs;
532
533                 if (copy_from_user(&offs, argp, sizeof(loff_t)))
534                         return -EFAULT;
535                 if (!mtd->block_isbad)
536                         ret = -EOPNOTSUPP;
537                 else
538                         return mtd->block_isbad(mtd, offs);
539                 break;
540         }
541
542         case MEMSETBADBLOCK:
543         {
544                 loff_t offs;
545
546                 if (copy_from_user(&offs, argp, sizeof(loff_t)))
547                         return -EFAULT;
548                 if (!mtd->block_markbad)
549                         ret = -EOPNOTSUPP;
550                 else
551                         return mtd->block_markbad(mtd, offs);
552                 break;
553         }
554
555 #if defined(CONFIG_MTD_OTP) || defined(CONFIG_MTD_ONENAND_OTP)
556         case OTPSELECT:
557         {
558                 int mode;
559                 if (copy_from_user(&mode, argp, sizeof(int)))
560                         return -EFAULT;
561                 SET_MTD_MODE(file, 0);
562                 switch (mode) {
563                 case MTD_OTP_FACTORY:
564                         if (!mtd->read_fact_prot_reg)
565                                 ret = -EOPNOTSUPP;
566                         else
567                                 SET_MTD_MODE(file, MTD_MODE_OTP_FACT);
568                         break;
569                 case MTD_OTP_USER:
570                         if (!mtd->read_fact_prot_reg)
571                                 ret = -EOPNOTSUPP;
572                         else
573                                 SET_MTD_MODE(file, MTD_MODE_OTP_USER);
574                         break;
575                 default:
576                         ret = -EINVAL;
577                 case MTD_OTP_OFF:
578                         break;
579                 }
580                 file->f_pos = 0;
581                 break;
582         }
583
584         case OTPGETREGIONCOUNT:
585         case OTPGETREGIONINFO:
586         {
587                 struct otp_info *buf = kmalloc(4096, GFP_KERNEL);
588                 if (!buf)
589                         return -ENOMEM;
590                 ret = -EOPNOTSUPP;
591                 switch (MTD_MODE(file)) {
592                 case MTD_MODE_OTP_FACT:
593                         if (mtd->get_fact_prot_info)
594                                 ret = mtd->get_fact_prot_info(mtd, buf, 4096);
595                         break;
596                 case MTD_MODE_OTP_USER:
597                         if (mtd->get_user_prot_info)
598                                 ret = mtd->get_user_prot_info(mtd, buf, 4096);
599                         break;
600                 }
601                 if (ret >= 0) {
602                         if (cmd == OTPGETREGIONCOUNT) {
603                                 int nbr = ret / sizeof(struct otp_info);
604                                 ret = copy_to_user(argp, &nbr, sizeof(int));
605                         } else
606                                 ret = copy_to_user(argp, buf, ret);
607                         if (ret)
608                                 ret = -EFAULT;
609                 }
610                 kfree(buf);
611                 break;
612         }
613
614         case OTPLOCK:
615         {
616                 struct otp_info info;
617
618                 if (MTD_MODE(file) != MTD_MODE_OTP_USER)
619                         return -EINVAL;
620                 if (copy_from_user(&info, argp, sizeof(info)))
621                         return -EFAULT;
622                 if (!mtd->lock_user_prot_reg)
623                         return -EOPNOTSUPP;
624                 ret = mtd->lock_user_prot_reg(mtd, info.start, info.length);
625                 break;
626         }
627 #endif
628
629         default:
630                 ret = -ENOTTY;
631         }
632
633         return ret;
634 } /* memory_ioctl */
635
636 static struct file_operations mtd_fops = {
637         .owner          = THIS_MODULE,
638         .llseek         = mtd_lseek,
639         .read           = mtd_read,
640         .write          = mtd_write,
641         .ioctl          = mtd_ioctl,
642         .open           = mtd_open,
643         .release        = mtd_close,
644 };
645
646 static int __init init_mtdchar(void)
647 {
648         if (register_chrdev(MTD_CHAR_MAJOR, "mtd", &mtd_fops)) {
649                 printk(KERN_NOTICE "Can't allocate major number %d for Memory Technology Devices.\n",
650                        MTD_CHAR_MAJOR);
651                 return -EAGAIN;
652         }
653
654         mtd_class = class_create(THIS_MODULE, "mtd");
655
656         if (IS_ERR(mtd_class)) {
657                 printk(KERN_ERR "Error creating mtd class.\n");
658                 unregister_chrdev(MTD_CHAR_MAJOR, "mtd");
659                 return PTR_ERR(mtd_class);
660         }
661
662         register_mtd_user(&notifier);
663         return 0;
664 }
665
666 static void __exit cleanup_mtdchar(void)
667 {
668         unregister_mtd_user(&notifier);
669         class_destroy(mtd_class);
670         unregister_chrdev(MTD_CHAR_MAJOR, "mtd");
671 }
672
673 module_init(init_mtdchar);
674 module_exit(cleanup_mtdchar);
675
676
677 MODULE_LICENSE("GPL");
678 MODULE_AUTHOR("David Woodhouse <dwmw2@infradead.org>");
679 MODULE_DESCRIPTION("Direct character-device access to MTD devices");