sys_parisc.c 6.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239
  1. /*
  2. * PARISC specific syscalls
  3. *
  4. * Copyright (C) 1999-2003 Matthew Wilcox <willy at parisc-linux.org>
  5. * Copyright (C) 2000-2003 Paul Bame <bame at parisc-linux.org>
  6. * Copyright (C) 2001 Thomas Bogendoerfer <tsbogend at parisc-linux.org>
  7. *
  8. *
  9. * This program is free software; you can redistribute it and/or modify
  10. * it under the terms of the GNU General Public License as published by
  11. * the Free Software Foundation; either version 2 of the License, or
  12. * (at your option) any later version.
  13. *
  14. * This program is distributed in the hope that it will be useful,
  15. * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16. * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  17. * GNU General Public License for more details.
  18. *
  19. * You should have received a copy of the GNU General Public License
  20. * along with this program; if not, write to the Free Software
  21. * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
  22. */
  23. #include <asm/uaccess.h>
  24. #include <linux/file.h>
  25. #include <linux/fs.h>
  26. #include <linux/linkage.h>
  27. #include <linux/mm.h>
  28. #include <linux/mman.h>
  29. #include <linux/shm.h>
  30. #include <linux/syscalls.h>
  31. #include <linux/utsname.h>
  32. #include <linux/personality.h>
  33. static unsigned long get_unshared_area(unsigned long addr, unsigned long len)
  34. {
  35. struct vm_area_struct *vma;
  36. addr = PAGE_ALIGN(addr);
  37. for (vma = find_vma(current->mm, addr); ; vma = vma->vm_next) {
  38. /* At this point: (!vma || addr < vma->vm_end). */
  39. if (TASK_SIZE - len < addr)
  40. return -ENOMEM;
  41. if (!vma || addr + len <= vma->vm_start)
  42. return addr;
  43. addr = vma->vm_end;
  44. }
  45. }
  46. #define DCACHE_ALIGN(addr) (((addr) + (SHMLBA - 1)) &~ (SHMLBA - 1))
  47. /*
  48. * We need to know the offset to use. Old scheme was to look for
  49. * existing mapping and use the same offset. New scheme is to use the
  50. * address of the kernel data structure as the seed for the offset.
  51. * We'll see how that works...
  52. *
  53. * The mapping is cacheline aligned, so there's no information in the bottom
  54. * few bits of the address. We're looking for 10 bits (4MB / 4k), so let's
  55. * drop the bottom 8 bits and use bits 8-17.
  56. */
  57. static int get_offset(struct address_space *mapping)
  58. {
  59. int offset = (unsigned long) mapping << (PAGE_SHIFT - 8);
  60. return offset & 0x3FF000;
  61. }
  62. static unsigned long get_shared_area(struct address_space *mapping,
  63. unsigned long addr, unsigned long len, unsigned long pgoff)
  64. {
  65. struct vm_area_struct *vma;
  66. int offset = mapping ? get_offset(mapping) : 0;
  67. offset = (offset + (pgoff << PAGE_SHIFT)) & 0x3FF000;
  68. addr = DCACHE_ALIGN(addr - offset) + offset;
  69. for (vma = find_vma(current->mm, addr); ; vma = vma->vm_next) {
  70. /* At this point: (!vma || addr < vma->vm_end). */
  71. if (TASK_SIZE - len < addr)
  72. return -ENOMEM;
  73. if (!vma || addr + len <= vma->vm_start)
  74. return addr;
  75. addr = DCACHE_ALIGN(vma->vm_end - offset) + offset;
  76. if (addr < vma->vm_end) /* handle wraparound */
  77. return -ENOMEM;
  78. }
  79. }
  80. unsigned long arch_get_unmapped_area(struct file *filp, unsigned long addr,
  81. unsigned long len, unsigned long pgoff, unsigned long flags)
  82. {
  83. if (len > TASK_SIZE)
  84. return -ENOMEM;
  85. /* Might want to check for cache aliasing issues for MAP_FIXED case
  86. * like ARM or MIPS ??? --BenH.
  87. */
  88. if (flags & MAP_FIXED)
  89. return addr;
  90. if (!addr)
  91. addr = TASK_UNMAPPED_BASE;
  92. if (filp) {
  93. addr = get_shared_area(filp->f_mapping, addr, len, pgoff);
  94. } else if(flags & MAP_SHARED) {
  95. addr = get_shared_area(NULL, addr, len, pgoff);
  96. } else {
  97. addr = get_unshared_area(addr, len);
  98. }
  99. return addr;
  100. }
  101. asmlinkage unsigned long sys_mmap2(unsigned long addr, unsigned long len,
  102. unsigned long prot, unsigned long flags, unsigned long fd,
  103. unsigned long pgoff)
  104. {
  105. /* Make sure the shift for mmap2 is constant (12), no matter what PAGE_SIZE
  106. we have. */
  107. return sys_mmap_pgoff(addr, len, prot, flags, fd,
  108. pgoff >> (PAGE_SHIFT - 12));
  109. }
  110. asmlinkage unsigned long sys_mmap(unsigned long addr, unsigned long len,
  111. unsigned long prot, unsigned long flags, unsigned long fd,
  112. unsigned long offset)
  113. {
  114. if (!(offset & ~PAGE_MASK)) {
  115. return sys_mmap_pgoff(addr, len, prot, flags, fd,
  116. offset >> PAGE_SHIFT);
  117. } else {
  118. return -EINVAL;
  119. }
  120. }
  121. /* Fucking broken ABI */
  122. #ifdef CONFIG_64BIT
  123. asmlinkage long parisc_truncate64(const char __user * path,
  124. unsigned int high, unsigned int low)
  125. {
  126. return sys_truncate(path, (long)high << 32 | low);
  127. }
  128. asmlinkage long parisc_ftruncate64(unsigned int fd,
  129. unsigned int high, unsigned int low)
  130. {
  131. return sys_ftruncate(fd, (long)high << 32 | low);
  132. }
  133. /* stubs for the benefit of the syscall_table since truncate64 and truncate
  134. * are identical on LP64 */
  135. asmlinkage long sys_truncate64(const char __user * path, unsigned long length)
  136. {
  137. return sys_truncate(path, length);
  138. }
  139. asmlinkage long sys_ftruncate64(unsigned int fd, unsigned long length)
  140. {
  141. return sys_ftruncate(fd, length);
  142. }
  143. asmlinkage long sys_fcntl64(unsigned int fd, unsigned int cmd, unsigned long arg)
  144. {
  145. return sys_fcntl(fd, cmd, arg);
  146. }
  147. #else
  148. asmlinkage long parisc_truncate64(const char __user * path,
  149. unsigned int high, unsigned int low)
  150. {
  151. return sys_truncate64(path, (loff_t)high << 32 | low);
  152. }
  153. asmlinkage long parisc_ftruncate64(unsigned int fd,
  154. unsigned int high, unsigned int low)
  155. {
  156. return sys_ftruncate64(fd, (loff_t)high << 32 | low);
  157. }
  158. #endif
  159. asmlinkage ssize_t parisc_pread64(unsigned int fd, char __user *buf, size_t count,
  160. unsigned int high, unsigned int low)
  161. {
  162. return sys_pread64(fd, buf, count, (loff_t)high << 32 | low);
  163. }
  164. asmlinkage ssize_t parisc_pwrite64(unsigned int fd, const char __user *buf,
  165. size_t count, unsigned int high, unsigned int low)
  166. {
  167. return sys_pwrite64(fd, buf, count, (loff_t)high << 32 | low);
  168. }
  169. asmlinkage ssize_t parisc_readahead(int fd, unsigned int high, unsigned int low,
  170. size_t count)
  171. {
  172. return sys_readahead(fd, (loff_t)high << 32 | low, count);
  173. }
  174. asmlinkage long parisc_fadvise64_64(int fd,
  175. unsigned int high_off, unsigned int low_off,
  176. unsigned int high_len, unsigned int low_len, int advice)
  177. {
  178. return sys_fadvise64_64(fd, (loff_t)high_off << 32 | low_off,
  179. (loff_t)high_len << 32 | low_len, advice);
  180. }
  181. asmlinkage long parisc_sync_file_range(int fd,
  182. u32 hi_off, u32 lo_off, u32 hi_nbytes, u32 lo_nbytes,
  183. unsigned int flags)
  184. {
  185. return sys_sync_file_range(fd, (loff_t)hi_off << 32 | lo_off,
  186. (loff_t)hi_nbytes << 32 | lo_nbytes, flags);
  187. }
  188. asmlinkage unsigned long sys_alloc_hugepages(int key, unsigned long addr, unsigned long len, int prot, int flag)
  189. {
  190. return -ENOMEM;
  191. }
  192. asmlinkage int sys_free_hugepages(unsigned long addr)
  193. {
  194. return -EINVAL;
  195. }
  196. long parisc_personality(unsigned long personality)
  197. {
  198. long err;
  199. if (personality(current->personality) == PER_LINUX32
  200. && personality == PER_LINUX)
  201. personality = PER_LINUX32;
  202. err = sys_personality(personality);
  203. if (err == PER_LINUX32)
  204. err = PER_LINUX;
  205. return err;
  206. }