blob: 20070b7c573d0087416213cec1fd16bf6ba825d7 [file] [log] [blame]
Linus Torvalds1da177e2005-04-16 15:20:36 -07001/*
2 * linux/drivers/char/mem.c
3 *
4 * Copyright (C) 1991, 1992 Linus Torvalds
5 *
6 * Added devfs support.
7 * Jan-11-1998, C. Scott Ananian <cananian@alumni.princeton.edu>
8 * Shared /dev/zero mmaping support, Feb 2000, Kanoj Sarcar <kanoj@sgi.com>
9 */
10
Linus Torvalds1da177e2005-04-16 15:20:36 -070011#include <linux/mm.h>
12#include <linux/miscdevice.h>
13#include <linux/slab.h>
14#include <linux/vmalloc.h>
15#include <linux/mman.h>
16#include <linux/random.h>
17#include <linux/init.h>
18#include <linux/raw.h>
19#include <linux/tty.h>
20#include <linux/capability.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070021#include <linux/ptrace.h>
22#include <linux/device.h>
Vivek Goyal50b1fdb2005-06-25 14:58:23 -070023#include <linux/highmem.h>
24#include <linux/crash_dump.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070025#include <linux/backing-dev.h>
Vivek Goyal315c2152005-06-25 14:58:24 -070026#include <linux/bootmem.h>
Jens Axboed6b29d72007-06-04 09:59:47 +020027#include <linux/splice.h>
Linus Torvaldsb8a3ad52006-10-13 08:42:10 -070028#include <linux/pfn.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070029
30#include <asm/uaccess.h>
31#include <asm/io.h>
32
33#ifdef CONFIG_IA64
34# include <linux/efi.h>
35#endif
36
Linus Torvalds1da177e2005-04-16 15:20:36 -070037/*
38 * Architectures vary in how they handle caching for addresses
39 * outside of main memory.
40 *
41 */
42static inline int uncached_access(struct file *file, unsigned long addr)
43{
Al Viroca5cd872007-10-29 04:31:16 +000044#if defined(__i386__) && !defined(__arch_um__)
Linus Torvalds1da177e2005-04-16 15:20:36 -070045 /*
46 * On the PPro and successors, the MTRRs are used to set
47 * memory types for physical addresses outside main memory,
48 * so blindly setting PCD or PWT on those pages is wrong.
49 * For Pentiums and earlier, the surround logic should disable
50 * caching for the high addresses through the KEN pin, but
51 * we maintain the tradition of paranoia in this code.
52 */
53 if (file->f_flags & O_SYNC)
54 return 1;
55 return !( test_bit(X86_FEATURE_MTRR, boot_cpu_data.x86_capability) ||
56 test_bit(X86_FEATURE_K6_MTRR, boot_cpu_data.x86_capability) ||
57 test_bit(X86_FEATURE_CYRIX_ARR, boot_cpu_data.x86_capability) ||
58 test_bit(X86_FEATURE_CENTAUR_MCR, boot_cpu_data.x86_capability) )
59 && addr >= __pa(high_memory);
Al Viroca5cd872007-10-29 04:31:16 +000060#elif defined(__x86_64__) && !defined(__arch_um__)
Linus Torvalds1da177e2005-04-16 15:20:36 -070061 /*
62 * This is broken because it can generate memory type aliases,
63 * which can cause cache corruptions
64 * But it is only available for root and we have to be bug-to-bug
65 * compatible with i386.
66 */
67 if (file->f_flags & O_SYNC)
68 return 1;
69 /* same behaviour as i386. PAT always set to cached and MTRRs control the
70 caching behaviour.
71 Hopefully a full PAT implementation will fix that soon. */
72 return 0;
73#elif defined(CONFIG_IA64)
74 /*
75 * On ia64, we ignore O_SYNC because we cannot tolerate memory attribute aliases.
76 */
77 return !(efi_mem_attributes(addr) & EFI_MEMORY_WB);
Ralf Baechle24e9d0b2007-07-10 17:32:56 +010078#elif defined(CONFIG_MIPS)
79 {
80 extern int __uncached_access(struct file *file,
81 unsigned long addr);
82
83 return __uncached_access(file, addr);
84 }
Linus Torvalds1da177e2005-04-16 15:20:36 -070085#else
86 /*
87 * Accessing memory above the top the kernel knows about or through a file pointer
88 * that was marked O_SYNC will be done non-cached.
89 */
90 if (file->f_flags & O_SYNC)
91 return 1;
92 return addr >= __pa(high_memory);
93#endif
94}
95
96#ifndef ARCH_HAS_VALID_PHYS_ADDR_RANGE
Bjorn Helgaas136939a2006-03-26 01:37:05 -080097static inline int valid_phys_addr_range(unsigned long addr, size_t count)
Linus Torvalds1da177e2005-04-16 15:20:36 -070098{
Bjorn Helgaas136939a2006-03-26 01:37:05 -080099 if (addr + count > __pa(high_memory))
Linus Torvalds1da177e2005-04-16 15:20:36 -0700100 return 0;
101
Linus Torvalds1da177e2005-04-16 15:20:36 -0700102 return 1;
103}
Bjorn Helgaas80851ef2006-01-08 01:04:13 -0800104
Lennert Buytenhek06c67be2006-07-10 04:45:27 -0700105static inline int valid_mmap_phys_addr_range(unsigned long pfn, size_t size)
Bjorn Helgaas80851ef2006-01-08 01:04:13 -0800106{
107 return 1;
108}
Linus Torvalds1da177e2005-04-16 15:20:36 -0700109#endif
110
111/*
112 * This funcion reads the *physical* memory. The f_pos points directly to the
113 * memory location.
114 */
115static ssize_t read_mem(struct file * file, char __user * buf,
116 size_t count, loff_t *ppos)
117{
118 unsigned long p = *ppos;
119 ssize_t read, sz;
120 char *ptr;
121
Bjorn Helgaas136939a2006-03-26 01:37:05 -0800122 if (!valid_phys_addr_range(p, count))
Linus Torvalds1da177e2005-04-16 15:20:36 -0700123 return -EFAULT;
124 read = 0;
125#ifdef __ARCH_HAS_NO_PAGE_ZERO_MAPPED
126 /* we don't have page 0 mapped on sparc and m68k.. */
127 if (p < PAGE_SIZE) {
128 sz = PAGE_SIZE - p;
129 if (sz > count)
130 sz = count;
131 if (sz > 0) {
132 if (clear_user(buf, sz))
133 return -EFAULT;
134 buf += sz;
135 p += sz;
136 count -= sz;
137 read += sz;
138 }
139 }
140#endif
141
142 while (count > 0) {
143 /*
144 * Handle first page in case it's not aligned
145 */
146 if (-p & (PAGE_SIZE - 1))
147 sz = -p & (PAGE_SIZE - 1);
148 else
149 sz = PAGE_SIZE;
150
151 sz = min_t(unsigned long, sz, count);
152
153 /*
154 * On ia64 if a page has been mapped somewhere as
155 * uncached, then it must also be accessed uncached
156 * by the kernel or data corruption may occur
157 */
158 ptr = xlate_dev_mem_ptr(p);
159
160 if (copy_to_user(buf, ptr, sz))
161 return -EFAULT;
162 buf += sz;
163 p += sz;
164 count -= sz;
165 read += sz;
166 }
167
168 *ppos += read;
169 return read;
170}
171
172static ssize_t write_mem(struct file * file, const char __user * buf,
173 size_t count, loff_t *ppos)
174{
175 unsigned long p = *ppos;
176 ssize_t written, sz;
177 unsigned long copied;
178 void *ptr;
179
Bjorn Helgaas136939a2006-03-26 01:37:05 -0800180 if (!valid_phys_addr_range(p, count))
Linus Torvalds1da177e2005-04-16 15:20:36 -0700181 return -EFAULT;
182
183 written = 0;
184
185#ifdef __ARCH_HAS_NO_PAGE_ZERO_MAPPED
186 /* we don't have page 0 mapped on sparc and m68k.. */
187 if (p < PAGE_SIZE) {
188 unsigned long sz = PAGE_SIZE - p;
189 if (sz > count)
190 sz = count;
191 /* Hmm. Do something? */
192 buf += sz;
193 p += sz;
194 count -= sz;
195 written += sz;
196 }
197#endif
198
199 while (count > 0) {
200 /*
201 * Handle first page in case it's not aligned
202 */
203 if (-p & (PAGE_SIZE - 1))
204 sz = -p & (PAGE_SIZE - 1);
205 else
206 sz = PAGE_SIZE;
207
208 sz = min_t(unsigned long, sz, count);
209
210 /*
211 * On ia64 if a page has been mapped somewhere as
212 * uncached, then it must also be accessed uncached
213 * by the kernel or data corruption may occur
214 */
215 ptr = xlate_dev_mem_ptr(p);
216
217 copied = copy_from_user(ptr, buf, sz);
218 if (copied) {
Jan Beulichc654d602006-03-25 03:07:31 -0800219 written += sz - copied;
220 if (written)
221 break;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700222 return -EFAULT;
223 }
224 buf += sz;
225 p += sz;
226 count -= sz;
227 written += sz;
228 }
229
230 *ppos += written;
231 return written;
232}
233
Bjorn Helgaas44ac8412006-01-08 01:04:10 -0800234#ifndef __HAVE_PHYS_MEM_ACCESS_PROT
235static pgprot_t phys_mem_access_prot(struct file *file, unsigned long pfn,
236 unsigned long size, pgprot_t vma_prot)
237{
238#ifdef pgprot_noncached
239 unsigned long offset = pfn << PAGE_SHIFT;
240
241 if (uncached_access(file, offset))
242 return pgprot_noncached(vma_prot);
243#endif
244 return vma_prot;
245}
246#endif
247
David Howells5da61852006-09-27 01:50:16 -0700248#ifndef CONFIG_MMU
249static unsigned long get_unmapped_area_mem(struct file *file,
250 unsigned long addr,
251 unsigned long len,
252 unsigned long pgoff,
253 unsigned long flags)
254{
255 if (!valid_mmap_phys_addr_range(pgoff, len))
256 return (unsigned long) -EINVAL;
Benjamin Herrenschmidt8a932582007-04-16 22:53:16 -0700257 return pgoff << PAGE_SHIFT;
David Howells5da61852006-09-27 01:50:16 -0700258}
259
260/* can't do an in-place private mapping if there's no MMU */
261static inline int private_mapping_ok(struct vm_area_struct *vma)
262{
263 return vma->vm_flags & VM_MAYSHARE;
264}
265#else
266#define get_unmapped_area_mem NULL
267
268static inline int private_mapping_ok(struct vm_area_struct *vma)
269{
270 return 1;
271}
272#endif
273
Linus Torvalds1da177e2005-04-16 15:20:36 -0700274static int mmap_mem(struct file * file, struct vm_area_struct * vma)
275{
Bjorn Helgaas80851ef2006-01-08 01:04:13 -0800276 size_t size = vma->vm_end - vma->vm_start;
277
Lennert Buytenhek06c67be2006-07-10 04:45:27 -0700278 if (!valid_mmap_phys_addr_range(vma->vm_pgoff, size))
Bjorn Helgaas80851ef2006-01-08 01:04:13 -0800279 return -EINVAL;
280
David Howells5da61852006-09-27 01:50:16 -0700281 if (!private_mapping_ok(vma))
282 return -ENOSYS;
283
Roland Dreier8b150472005-10-28 17:46:18 -0700284 vma->vm_page_prot = phys_mem_access_prot(file, vma->vm_pgoff,
Bjorn Helgaas80851ef2006-01-08 01:04:13 -0800285 size,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700286 vma->vm_page_prot);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700287
288 /* Remap-pfn-range will mark the range VM_IO and VM_RESERVED */
289 if (remap_pfn_range(vma,
290 vma->vm_start,
291 vma->vm_pgoff,
Bjorn Helgaas80851ef2006-01-08 01:04:13 -0800292 size,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700293 vma->vm_page_prot))
294 return -EAGAIN;
295 return 0;
296}
297
298static int mmap_kmem(struct file * file, struct vm_area_struct * vma)
299{
Linus Torvalds4bb82552005-08-13 14:22:59 -0700300 unsigned long pfn;
301
Linus Torvalds6d3154c2007-01-22 08:53:24 -0800302 /* Turn a kernel-virtual address into a physical page frame */
303 pfn = __pa((u64)vma->vm_pgoff << PAGE_SHIFT) >> PAGE_SHIFT;
Linus Torvalds4bb82552005-08-13 14:22:59 -0700304
Linus Torvalds1da177e2005-04-16 15:20:36 -0700305 /*
306 * RED-PEN: on some architectures there is more mapped memory
307 * than available in mem_map which pfn_valid checks
308 * for. Perhaps should add a new macro here.
309 *
310 * RED-PEN: vmalloc is not supported right now.
311 */
Linus Torvalds4bb82552005-08-13 14:22:59 -0700312 if (!pfn_valid(pfn))
Linus Torvalds1da177e2005-04-16 15:20:36 -0700313 return -EIO;
Linus Torvalds4bb82552005-08-13 14:22:59 -0700314
315 vma->vm_pgoff = pfn;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700316 return mmap_mem(file, vma);
317}
318
Vivek Goyal50b1fdb2005-06-25 14:58:23 -0700319#ifdef CONFIG_CRASH_DUMP
320/*
321 * Read memory corresponding to the old kernel.
Vivek Goyal50b1fdb2005-06-25 14:58:23 -0700322 */
Vivek Goyal315c2152005-06-25 14:58:24 -0700323static ssize_t read_oldmem(struct file *file, char __user *buf,
Vivek Goyal50b1fdb2005-06-25 14:58:23 -0700324 size_t count, loff_t *ppos)
325{
Vivek Goyal315c2152005-06-25 14:58:24 -0700326 unsigned long pfn, offset;
327 size_t read = 0, csize;
328 int rc = 0;
Vivek Goyal50b1fdb2005-06-25 14:58:23 -0700329
Maneesh Soni72414d32005-06-25 14:58:28 -0700330 while (count) {
Vivek Goyal50b1fdb2005-06-25 14:58:23 -0700331 pfn = *ppos / PAGE_SIZE;
Vivek Goyal315c2152005-06-25 14:58:24 -0700332 if (pfn > saved_max_pfn)
333 return read;
Vivek Goyal50b1fdb2005-06-25 14:58:23 -0700334
Vivek Goyal315c2152005-06-25 14:58:24 -0700335 offset = (unsigned long)(*ppos % PAGE_SIZE);
336 if (count > PAGE_SIZE - offset)
337 csize = PAGE_SIZE - offset;
338 else
339 csize = count;
Vivek Goyal50b1fdb2005-06-25 14:58:23 -0700340
Vivek Goyal315c2152005-06-25 14:58:24 -0700341 rc = copy_oldmem_page(pfn, buf, csize, offset, 1);
342 if (rc < 0)
343 return rc;
Vivek Goyal50b1fdb2005-06-25 14:58:23 -0700344 buf += csize;
345 *ppos += csize;
346 read += csize;
347 count -= csize;
348 }
Vivek Goyal50b1fdb2005-06-25 14:58:23 -0700349 return read;
350}
351#endif
352
Linus Torvalds1da177e2005-04-16 15:20:36 -0700353extern long vread(char *buf, char *addr, unsigned long count);
354extern long vwrite(char *buf, char *addr, unsigned long count);
355
356/*
357 * This function reads the *virtual* memory as seen by the kernel.
358 */
359static ssize_t read_kmem(struct file *file, char __user *buf,
360 size_t count, loff_t *ppos)
361{
362 unsigned long p = *ppos;
363 ssize_t low_count, read, sz;
364 char * kbuf; /* k-addr because vread() takes vmlist_lock rwlock */
365
366 read = 0;
367 if (p < (unsigned long) high_memory) {
368 low_count = count;
369 if (count > (unsigned long) high_memory - p)
370 low_count = (unsigned long) high_memory - p;
371
372#ifdef __ARCH_HAS_NO_PAGE_ZERO_MAPPED
373 /* we don't have page 0 mapped on sparc and m68k.. */
374 if (p < PAGE_SIZE && low_count > 0) {
375 size_t tmp = PAGE_SIZE - p;
376 if (tmp > low_count) tmp = low_count;
377 if (clear_user(buf, tmp))
378 return -EFAULT;
379 buf += tmp;
380 p += tmp;
381 read += tmp;
382 low_count -= tmp;
383 count -= tmp;
384 }
385#endif
386 while (low_count > 0) {
387 /*
388 * Handle first page in case it's not aligned
389 */
390 if (-p & (PAGE_SIZE - 1))
391 sz = -p & (PAGE_SIZE - 1);
392 else
393 sz = PAGE_SIZE;
394
395 sz = min_t(unsigned long, sz, low_count);
396
397 /*
398 * On ia64 if a page has been mapped somewhere as
399 * uncached, then it must also be accessed uncached
400 * by the kernel or data corruption may occur
401 */
402 kbuf = xlate_dev_kmem_ptr((char *)p);
403
404 if (copy_to_user(buf, kbuf, sz))
405 return -EFAULT;
406 buf += sz;
407 p += sz;
408 read += sz;
409 low_count -= sz;
410 count -= sz;
411 }
412 }
413
414 if (count > 0) {
415 kbuf = (char *)__get_free_page(GFP_KERNEL);
416 if (!kbuf)
417 return -ENOMEM;
418 while (count > 0) {
419 int len = count;
420
421 if (len > PAGE_SIZE)
422 len = PAGE_SIZE;
423 len = vread(kbuf, (char *)p, len);
424 if (!len)
425 break;
426 if (copy_to_user(buf, kbuf, len)) {
427 free_page((unsigned long)kbuf);
428 return -EFAULT;
429 }
430 count -= len;
431 buf += len;
432 read += len;
433 p += len;
434 }
435 free_page((unsigned long)kbuf);
436 }
437 *ppos = p;
438 return read;
439}
440
441
442static inline ssize_t
443do_write_kmem(void *p, unsigned long realp, const char __user * buf,
444 size_t count, loff_t *ppos)
445{
446 ssize_t written, sz;
447 unsigned long copied;
448
449 written = 0;
450#ifdef __ARCH_HAS_NO_PAGE_ZERO_MAPPED
451 /* we don't have page 0 mapped on sparc and m68k.. */
452 if (realp < PAGE_SIZE) {
453 unsigned long sz = PAGE_SIZE - realp;
454 if (sz > count)
455 sz = count;
456 /* Hmm. Do something? */
457 buf += sz;
458 p += sz;
459 realp += sz;
460 count -= sz;
461 written += sz;
462 }
463#endif
464
465 while (count > 0) {
466 char *ptr;
467 /*
468 * Handle first page in case it's not aligned
469 */
470 if (-realp & (PAGE_SIZE - 1))
471 sz = -realp & (PAGE_SIZE - 1);
472 else
473 sz = PAGE_SIZE;
474
475 sz = min_t(unsigned long, sz, count);
476
477 /*
478 * On ia64 if a page has been mapped somewhere as
479 * uncached, then it must also be accessed uncached
480 * by the kernel or data corruption may occur
481 */
482 ptr = xlate_dev_kmem_ptr(p);
483
484 copied = copy_from_user(ptr, buf, sz);
485 if (copied) {
Jan Beulichc654d602006-03-25 03:07:31 -0800486 written += sz - copied;
487 if (written)
488 break;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700489 return -EFAULT;
490 }
491 buf += sz;
492 p += sz;
493 realp += sz;
494 count -= sz;
495 written += sz;
496 }
497
498 *ppos += written;
499 return written;
500}
501
502
503/*
504 * This function writes to the *virtual* memory as seen by the kernel.
505 */
506static ssize_t write_kmem(struct file * file, const char __user * buf,
507 size_t count, loff_t *ppos)
508{
509 unsigned long p = *ppos;
510 ssize_t wrote = 0;
511 ssize_t virtr = 0;
512 ssize_t written;
513 char * kbuf; /* k-addr because vwrite() takes vmlist_lock rwlock */
514
515 if (p < (unsigned long) high_memory) {
516
517 wrote = count;
518 if (count > (unsigned long) high_memory - p)
519 wrote = (unsigned long) high_memory - p;
520
521 written = do_write_kmem((void*)p, p, buf, wrote, ppos);
522 if (written != wrote)
523 return written;
524 wrote = written;
525 p += wrote;
526 buf += wrote;
527 count -= wrote;
528 }
529
530 if (count > 0) {
531 kbuf = (char *)__get_free_page(GFP_KERNEL);
532 if (!kbuf)
533 return wrote ? wrote : -ENOMEM;
534 while (count > 0) {
535 int len = count;
536
537 if (len > PAGE_SIZE)
538 len = PAGE_SIZE;
539 if (len) {
540 written = copy_from_user(kbuf, buf, len);
541 if (written) {
Jan Beulichc654d602006-03-25 03:07:31 -0800542 if (wrote + virtr)
543 break;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700544 free_page((unsigned long)kbuf);
Jan Beulichc654d602006-03-25 03:07:31 -0800545 return -EFAULT;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700546 }
547 }
548 len = vwrite(kbuf, (char *)p, len);
549 count -= len;
550 buf += len;
551 virtr += len;
552 p += len;
553 }
554 free_page((unsigned long)kbuf);
555 }
556
557 *ppos = p;
558 return virtr + wrote;
559}
560
Russell King4f911d62007-05-08 00:28:17 -0700561#ifdef CONFIG_DEVPORT
Linus Torvalds1da177e2005-04-16 15:20:36 -0700562static ssize_t read_port(struct file * file, char __user * buf,
563 size_t count, loff_t *ppos)
564{
565 unsigned long i = *ppos;
566 char __user *tmp = buf;
567
568 if (!access_ok(VERIFY_WRITE, buf, count))
569 return -EFAULT;
570 while (count-- > 0 && i < 65536) {
571 if (__put_user(inb(i),tmp) < 0)
572 return -EFAULT;
573 i++;
574 tmp++;
575 }
576 *ppos = i;
577 return tmp-buf;
578}
579
580static ssize_t write_port(struct file * file, const char __user * buf,
581 size_t count, loff_t *ppos)
582{
583 unsigned long i = *ppos;
584 const char __user * tmp = buf;
585
586 if (!access_ok(VERIFY_READ,buf,count))
587 return -EFAULT;
588 while (count-- > 0 && i < 65536) {
589 char c;
Jan Beulichc654d602006-03-25 03:07:31 -0800590 if (__get_user(c, tmp)) {
591 if (tmp > buf)
592 break;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700593 return -EFAULT;
Jan Beulichc654d602006-03-25 03:07:31 -0800594 }
Linus Torvalds1da177e2005-04-16 15:20:36 -0700595 outb(c,i);
596 i++;
597 tmp++;
598 }
599 *ppos = i;
600 return tmp-buf;
601}
602#endif
603
604static ssize_t read_null(struct file * file, char __user * buf,
605 size_t count, loff_t *ppos)
606{
607 return 0;
608}
609
610static ssize_t write_null(struct file * file, const char __user * buf,
611 size_t count, loff_t *ppos)
612{
613 return count;
614}
615
Jens Axboe1ebd32f2006-04-26 14:40:08 +0200616static int pipe_to_null(struct pipe_inode_info *info, struct pipe_buffer *buf,
617 struct splice_desc *sd)
618{
619 return sd->len;
620}
621
622static ssize_t splice_write_null(struct pipe_inode_info *pipe,struct file *out,
623 loff_t *ppos, size_t len, unsigned int flags)
624{
625 return splice_from_pipe(pipe, out, ppos, len, flags, pipe_to_null);
626}
627
Linus Torvalds1da177e2005-04-16 15:20:36 -0700628static ssize_t read_zero(struct file * file, char __user * buf,
629 size_t count, loff_t *ppos)
630{
Nick Piggin557ed1f2007-10-16 01:24:40 -0700631 size_t written;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700632
633 if (!count)
634 return 0;
635
636 if (!access_ok(VERIFY_WRITE, buf, count))
637 return -EFAULT;
638
Nick Piggin557ed1f2007-10-16 01:24:40 -0700639 written = 0;
640 while (count) {
641 unsigned long unwritten;
642 size_t chunk = count;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700643
Nick Piggin557ed1f2007-10-16 01:24:40 -0700644 if (chunk > PAGE_SIZE)
645 chunk = PAGE_SIZE; /* Just for latency reasons */
646 unwritten = clear_user(buf, chunk);
647 written += chunk - unwritten;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700648 if (unwritten)
Nick Piggin557ed1f2007-10-16 01:24:40 -0700649 break;
650 buf += chunk;
651 count -= chunk;
652 cond_resched();
Linus Torvalds1da177e2005-04-16 15:20:36 -0700653 }
Linus Torvalds1da177e2005-04-16 15:20:36 -0700654 return written ? written : -EFAULT;
655}
656
657static int mmap_zero(struct file * file, struct vm_area_struct * vma)
658{
Nick Piggin557ed1f2007-10-16 01:24:40 -0700659#ifndef CONFIG_MMU
660 return -ENOSYS;
661#endif
Linus Torvalds1da177e2005-04-16 15:20:36 -0700662 if (vma->vm_flags & VM_SHARED)
663 return shmem_zero_setup(vma);
Nick Piggin557ed1f2007-10-16 01:24:40 -0700664 return 0;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700665}
Linus Torvalds1da177e2005-04-16 15:20:36 -0700666
667static ssize_t write_full(struct file * file, const char __user * buf,
668 size_t count, loff_t *ppos)
669{
670 return -ENOSPC;
671}
672
673/*
674 * Special lseek() function for /dev/null and /dev/zero. Most notably, you
675 * can fopen() both devices with "a" now. This was previously impossible.
676 * -- SRB.
677 */
678
679static loff_t null_lseek(struct file * file, loff_t offset, int orig)
680{
681 return file->f_pos = 0;
682}
683
684/*
685 * The memory devices use the full 32/64 bits of the offset, and so we cannot
686 * check against negative addresses: they are ok. The return value is weird,
687 * though, in that case (0).
688 *
689 * also note that seeking relative to the "end of file" isn't supported:
690 * it has no meaning, so it returns -EINVAL.
691 */
692static loff_t memory_lseek(struct file * file, loff_t offset, int orig)
693{
694 loff_t ret;
695
Josef Sipeka7113a92006-12-08 02:36:55 -0800696 mutex_lock(&file->f_path.dentry->d_inode->i_mutex);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700697 switch (orig) {
698 case 0:
699 file->f_pos = offset;
700 ret = file->f_pos;
701 force_successful_syscall_return();
702 break;
703 case 1:
704 file->f_pos += offset;
705 ret = file->f_pos;
706 force_successful_syscall_return();
707 break;
708 default:
709 ret = -EINVAL;
710 }
Josef Sipeka7113a92006-12-08 02:36:55 -0800711 mutex_unlock(&file->f_path.dentry->d_inode->i_mutex);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700712 return ret;
713}
714
715static int open_port(struct inode * inode, struct file * filp)
716{
717 return capable(CAP_SYS_RAWIO) ? 0 : -EPERM;
718}
719
720#define zero_lseek null_lseek
721#define full_lseek null_lseek
722#define write_zero write_null
723#define read_full read_zero
724#define open_mem open_port
725#define open_kmem open_mem
Vivek Goyal50b1fdb2005-06-25 14:58:23 -0700726#define open_oldmem open_mem
Linus Torvalds1da177e2005-04-16 15:20:36 -0700727
Arjan van de Ven62322d22006-07-03 00:24:21 -0700728static const struct file_operations mem_fops = {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700729 .llseek = memory_lseek,
730 .read = read_mem,
731 .write = write_mem,
732 .mmap = mmap_mem,
733 .open = open_mem,
David Howells5da61852006-09-27 01:50:16 -0700734 .get_unmapped_area = get_unmapped_area_mem,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700735};
736
Arjan van de Ven62322d22006-07-03 00:24:21 -0700737static const struct file_operations kmem_fops = {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700738 .llseek = memory_lseek,
739 .read = read_kmem,
740 .write = write_kmem,
741 .mmap = mmap_kmem,
742 .open = open_kmem,
David Howells5da61852006-09-27 01:50:16 -0700743 .get_unmapped_area = get_unmapped_area_mem,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700744};
745
Arjan van de Ven62322d22006-07-03 00:24:21 -0700746static const struct file_operations null_fops = {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700747 .llseek = null_lseek,
748 .read = read_null,
749 .write = write_null,
Jens Axboe1ebd32f2006-04-26 14:40:08 +0200750 .splice_write = splice_write_null,
Linus Torvalds1da177e2005-04-16 15:20:36 -0700751};
752
Russell King4f911d62007-05-08 00:28:17 -0700753#ifdef CONFIG_DEVPORT
Arjan van de Ven62322d22006-07-03 00:24:21 -0700754static const struct file_operations port_fops = {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700755 .llseek = memory_lseek,
756 .read = read_port,
757 .write = write_port,
758 .open = open_port,
759};
760#endif
761
Arjan van de Ven62322d22006-07-03 00:24:21 -0700762static const struct file_operations zero_fops = {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700763 .llseek = zero_lseek,
764 .read = read_zero,
765 .write = write_zero,
766 .mmap = mmap_zero,
767};
768
David Howells5da61852006-09-27 01:50:16 -0700769/*
770 * capabilities for /dev/zero
771 * - permits private mappings, "copies" are taken of the source of zeros
772 */
Linus Torvalds1da177e2005-04-16 15:20:36 -0700773static struct backing_dev_info zero_bdi = {
774 .capabilities = BDI_CAP_MAP_COPY,
775};
776
Arjan van de Ven62322d22006-07-03 00:24:21 -0700777static const struct file_operations full_fops = {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700778 .llseek = full_lseek,
779 .read = read_full,
780 .write = write_full,
781};
782
Vivek Goyal50b1fdb2005-06-25 14:58:23 -0700783#ifdef CONFIG_CRASH_DUMP
Arjan van de Ven62322d22006-07-03 00:24:21 -0700784static const struct file_operations oldmem_fops = {
Vivek Goyal50b1fdb2005-06-25 14:58:23 -0700785 .read = read_oldmem,
786 .open = open_oldmem,
787};
788#endif
789
Linus Torvalds1da177e2005-04-16 15:20:36 -0700790static ssize_t kmsg_write(struct file * file, const char __user * buf,
791 size_t count, loff_t *ppos)
792{
793 char *tmp;
Guillaume Chazaraincd140a52006-01-08 01:02:43 -0800794 ssize_t ret;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700795
796 tmp = kmalloc(count + 1, GFP_KERNEL);
797 if (tmp == NULL)
798 return -ENOMEM;
799 ret = -EFAULT;
800 if (!copy_from_user(tmp, buf, count)) {
801 tmp[count] = 0;
802 ret = printk("%s", tmp);
Guillaume Chazaraincd140a52006-01-08 01:02:43 -0800803 if (ret > count)
804 /* printk can add a prefix */
805 ret = count;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700806 }
807 kfree(tmp);
808 return ret;
809}
810
Arjan van de Ven62322d22006-07-03 00:24:21 -0700811static const struct file_operations kmsg_fops = {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700812 .write = kmsg_write,
813};
814
815static int memory_open(struct inode * inode, struct file * filp)
816{
817 switch (iminor(inode)) {
818 case 1:
819 filp->f_op = &mem_fops;
David Howells5da61852006-09-27 01:50:16 -0700820 filp->f_mapping->backing_dev_info =
821 &directly_mappable_cdev_bdi;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700822 break;
823 case 2:
824 filp->f_op = &kmem_fops;
David Howells5da61852006-09-27 01:50:16 -0700825 filp->f_mapping->backing_dev_info =
826 &directly_mappable_cdev_bdi;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700827 break;
828 case 3:
829 filp->f_op = &null_fops;
830 break;
Russell King4f911d62007-05-08 00:28:17 -0700831#ifdef CONFIG_DEVPORT
Linus Torvalds1da177e2005-04-16 15:20:36 -0700832 case 4:
833 filp->f_op = &port_fops;
834 break;
835#endif
836 case 5:
837 filp->f_mapping->backing_dev_info = &zero_bdi;
838 filp->f_op = &zero_fops;
839 break;
840 case 7:
841 filp->f_op = &full_fops;
842 break;
843 case 8:
844 filp->f_op = &random_fops;
845 break;
846 case 9:
847 filp->f_op = &urandom_fops;
848 break;
849 case 11:
850 filp->f_op = &kmsg_fops;
851 break;
Vivek Goyal50b1fdb2005-06-25 14:58:23 -0700852#ifdef CONFIG_CRASH_DUMP
853 case 12:
854 filp->f_op = &oldmem_fops;
855 break;
856#endif
Linus Torvalds1da177e2005-04-16 15:20:36 -0700857 default:
858 return -ENXIO;
859 }
860 if (filp->f_op && filp->f_op->open)
861 return filp->f_op->open(inode,filp);
862 return 0;
863}
864
Arjan van de Ven62322d22006-07-03 00:24:21 -0700865static const struct file_operations memory_fops = {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700866 .open = memory_open, /* just a selector for the real open */
867};
868
869static const struct {
870 unsigned int minor;
871 char *name;
872 umode_t mode;
Arjan van de Ven99ac48f2006-03-28 01:56:41 -0800873 const struct file_operations *fops;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700874} devlist[] = { /* list of minor devices */
875 {1, "mem", S_IRUSR | S_IWUSR | S_IRGRP, &mem_fops},
876 {2, "kmem", S_IRUSR | S_IWUSR | S_IRGRP, &kmem_fops},
877 {3, "null", S_IRUGO | S_IWUGO, &null_fops},
Russell King4f911d62007-05-08 00:28:17 -0700878#ifdef CONFIG_DEVPORT
Linus Torvalds1da177e2005-04-16 15:20:36 -0700879 {4, "port", S_IRUSR | S_IWUSR | S_IRGRP, &port_fops},
880#endif
881 {5, "zero", S_IRUGO | S_IWUGO, &zero_fops},
882 {7, "full", S_IRUGO | S_IWUGO, &full_fops},
883 {8, "random", S_IRUGO | S_IWUSR, &random_fops},
884 {9, "urandom", S_IRUGO | S_IWUSR, &urandom_fops},
885 {11,"kmsg", S_IRUGO | S_IWUSR, &kmsg_fops},
Vivek Goyal50b1fdb2005-06-25 14:58:23 -0700886#ifdef CONFIG_CRASH_DUMP
887 {12,"oldmem", S_IRUSR | S_IWUSR | S_IRGRP, &oldmem_fops},
888#endif
Linus Torvalds1da177e2005-04-16 15:20:36 -0700889};
890
gregkh@suse.deca8eca62005-03-23 09:53:09 -0800891static struct class *mem_class;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700892
893static int __init chr_dev_init(void)
894{
895 int i;
Peter Zijlstrae0bf68d2007-10-16 23:25:46 -0700896 int err;
897
898 err = bdi_init(&zero_bdi);
899 if (err)
900 return err;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700901
902 if (register_chrdev(MEM_MAJOR,"mem",&memory_fops))
903 printk("unable to get major %d for memory devs\n", MEM_MAJOR);
904
gregkh@suse.deca8eca62005-03-23 09:53:09 -0800905 mem_class = class_create(THIS_MODULE, "mem");
Greg Kroah-Hartman7c69ef72005-06-20 21:15:16 -0700906 for (i = 0; i < ARRAY_SIZE(devlist); i++)
Greg Kroah-Hartmanebf644c2006-07-25 17:13:31 -0700907 device_create(mem_class, NULL,
908 MKDEV(MEM_MAJOR, devlist[i].minor),
909 devlist[i].name);
910
Linus Torvalds1da177e2005-04-16 15:20:36 -0700911 return 0;
912}
913
914fs_initcall(chr_dev_init);