ioperm.c 6.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249
  1. /* Copyright (C) 1998, 1999 Free Software Foundation, Inc.
  2. This file is part of the GNU C Library.
  3. Contributed by Phil Blundell, based on the Alpha version by
  4. David Mosberger.
  5. The GNU C Library is free software; you can redistribute it and/or
  6. modify it under the terms of the GNU Lesser General Public
  7. License as published by the Free Software Foundation; either
  8. version 2.1 of the License, or (at your option) any later version.
  9. The GNU C Library is distributed in the hope that it will be useful,
  10. but WITHOUT ANY WARRANTY; without even the implied warranty of
  11. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  12. Lesser General Public License for more details.
  13. You should have received a copy of the GNU Lesser General Public
  14. License along with the GNU C Library; if not, write to the Free
  15. Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
  16. 02111-1307 USA. */
  17. /* I/O port access on the ARM is something of a fiction. What we do is to
  18. map an appropriate area of /dev/mem into user space so that a program
  19. can blast away at the hardware in such a way as to generate I/O cycles
  20. on the bus. To insulate user code from dependencies on particular
  21. hardware we don't allow calls to inb() and friends to be inlined, but
  22. force them to come through code in here every time. Performance-critical
  23. registers tend to be memory mapped these days so this should be no big
  24. problem. */
  25. /* Once upon a time this file used mprotect to enable and disable
  26. access to particular areas of I/O space. Unfortunately the
  27. mprotect syscall also has the side effect of enabling caching for
  28. the area affected (this is a kernel limitation). So we now just
  29. enable all the ports all of the time. */
  30. #define readlink __readlink
  31. #define mmap __mmap
  32. #define sscanf __sscanf
  33. #define fscanf __fscanf
  34. #include <errno.h>
  35. #include <fcntl.h>
  36. #include <stdio.h>
  37. #include <ctype.h>
  38. #include <stdlib.h>
  39. #include <string.h>
  40. #include <unistd.h>
  41. #include <sys/types.h>
  42. #include <sys/mman.h>
  43. #include <asm/page.h>
  44. #include <sys/sysctl.h>
  45. #include <linux/version.h>
  46. #define PATH_ARM_SYSTYPE "/etc/arm_systype"
  47. #define PATH_CPUINFO "/proc/cpuinfo"
  48. #define MAX_PORT 0x10000
  49. static struct {
  50. unsigned long int base;
  51. unsigned long int io_base;
  52. unsigned int shift;
  53. unsigned int initdone; /* since all the above could be 0 */
  54. } io;
  55. #define IO_BASE_FOOTBRIDGE 0x7c000000
  56. #define IO_SHIFT_FOOTBRIDGE 0
  57. static struct platform {
  58. const char *name;
  59. unsigned long int io_base;
  60. unsigned int shift;
  61. } platform[] = {
  62. /* All currently supported platforms are in fact the same. :-) */
  63. {"Chalice-CATS", IO_BASE_FOOTBRIDGE, IO_SHIFT_FOOTBRIDGE},
  64. {"DEC-EBSA285", IO_BASE_FOOTBRIDGE, IO_SHIFT_FOOTBRIDGE},
  65. {"Corel-NetWinder", IO_BASE_FOOTBRIDGE, IO_SHIFT_FOOTBRIDGE},
  66. {"Rebel-NetWinder", IO_BASE_FOOTBRIDGE, IO_SHIFT_FOOTBRIDGE},
  67. };
  68. #define IO_ADDR(port) (io.base + ((port) << io.shift))
  69. /*
  70. * Initialize I/O system. There are several ways to get the information
  71. * we need. Each is tried in turn until one succeeds.
  72. *
  73. * 1. Sysctl (CTL_BUS, BUS_ISA, ISA_*). This is the preferred method
  74. * but not all kernels support it.
  75. *
  76. * 2. Read the value (not the contents) of symlink PATH_ARM_SYSTYPE.
  77. * - If it matches one of the entries in the table above, use the
  78. * corresponding values.
  79. * - If it begins with a number, assume this is a previously
  80. * unsupported system and the values encode, in order,
  81. * "<io_base>,<port_shift>".
  82. *
  83. * 3. Lookup the "system type" field in /proc/cpuinfo. Again, if it
  84. * matches an entry in the platform[] table, use the corresponding
  85. * values.
  86. *
  87. * 4. BUS_ISA is changed to CTL_BUS_ISA (for kernel since 2.4.23).
  88. */
  89. static int
  90. init_iosys (void)
  91. {
  92. char systype[256];
  93. int i, n;
  94. #if LINUX_VERSION_CODE < 132119
  95. static int iobase_name[] = { CTL_BUS, BUS_ISA, BUS_ISA_PORT_BASE };
  96. static int ioshift_name[] = { CTL_BUS, BUS_ISA, BUS_ISA_PORT_SHIFT };
  97. #else
  98. static int iobase_name[] = { CTL_BUS, CTL_BUS_ISA, BUS_ISA_PORT_BASE };
  99. static int ioshift_name[] = { CTL_BUS, CTL_BUS_ISA, BUS_ISA_PORT_SHIFT };
  100. #endif
  101. size_t len = sizeof(io.base);
  102. if (! sysctl (iobase_name, 3, &io.io_base, &len, NULL, 0)
  103. && ! sysctl (ioshift_name, 3, &io.shift, &len, NULL, 0)) {
  104. io.initdone = 1;
  105. return 0;
  106. }
  107. n = readlink (PATH_ARM_SYSTYPE, systype, sizeof (systype) - 1);
  108. if (n > 0) {
  109. systype[n] = '\0';
  110. if (isdigit (systype[0])) {
  111. if (sscanf (systype, "%li,%i", &io.io_base, &io.shift) == 2) {
  112. io.initdone = 1;
  113. return 0;
  114. }
  115. /* else we're likely going to fail with the system match below */
  116. }
  117. }
  118. else {
  119. FILE * fp;
  120. fp = fopen (PATH_CPUINFO, "r");
  121. if (! fp)
  122. return -1;
  123. while ((n = fscanf (fp, "Hardware\t: %256[^\n]\n", systype)) != EOF) {
  124. if (n == 1)
  125. break;
  126. else
  127. fgets (systype, 256, fp);
  128. }
  129. fclose (fp);
  130. if (n == EOF) {
  131. /* this can happen if the format of /proc/cpuinfo changes... */
  132. fprintf (stderr, "ioperm: Unable to determine system type.\n"
  133. "\t(May need " PATH_ARM_SYSTYPE " symlink?)\n");
  134. __set_errno (ENODEV);
  135. return -1;
  136. }
  137. }
  138. /* translate systype name into i/o system: */
  139. for (i = 0; i < sizeof (platform) / sizeof (platform[0]); ++i) {
  140. if (__strcmp (platform[i].name, systype) == 0) {
  141. io.shift = platform[i].shift;
  142. io.io_base = platform[i].io_base;
  143. io.initdone = 1;
  144. return 0;
  145. }
  146. }
  147. /* systype is not a known platform name... */
  148. __set_errno (EINVAL);
  149. return -1;
  150. }
  151. int ioperm (unsigned long int from, unsigned long int num, int turn_on)
  152. {
  153. if (! io.initdone && init_iosys () < 0)
  154. return -1;
  155. /* this test isn't as silly as it may look like; consider overflows! */
  156. if (from >= MAX_PORT || from + num > MAX_PORT) {
  157. __set_errno (EINVAL);
  158. return -1;
  159. }
  160. if (turn_on) {
  161. if (! io.base) {
  162. int fd;
  163. fd = __open ("/dev/mem", O_RDWR);
  164. if (fd < 0)
  165. return -1;
  166. io.base = (unsigned long int) mmap (0, MAX_PORT << io.shift,
  167. PROT_READ | PROT_WRITE,
  168. MAP_SHARED, fd, io.io_base);
  169. __close (fd);
  170. if ((long) io.base == -1)
  171. return -1;
  172. }
  173. }
  174. return 0;
  175. }
  176. void
  177. outb(unsigned char b, unsigned long int port)
  178. {
  179. *((volatile unsigned char *)(IO_ADDR (port))) = b;
  180. }
  181. void
  182. outw(unsigned short b, unsigned long int port)
  183. {
  184. *((volatile unsigned short *)(IO_ADDR (port))) = b;
  185. }
  186. void
  187. outl(unsigned int b, unsigned long int port)
  188. {
  189. *((volatile unsigned long *)(IO_ADDR (port))) = b;
  190. }
  191. unsigned int
  192. inb (unsigned long int port)
  193. {
  194. return *((volatile unsigned char *)(IO_ADDR (port)));
  195. }
  196. unsigned int
  197. inw(unsigned long int port)
  198. {
  199. return *((volatile unsigned short *)(IO_ADDR (port)));
  200. }
  201. unsigned int
  202. inl(unsigned long int port)
  203. {
  204. return *((volatile unsigned long *)(IO_ADDR (port)));
  205. }