linux-ia64-updates-20021209
[openafs.git] / src / afs / LINUX / osi_module.c
1 /*
2  * Copyright 2000, International Business Machines Corporation and others.
3  * All Rights Reserved.
4  * 
5  * This software has been released under the terms of the IBM Public
6  * License.  For details, see the LICENSE file in the top-level source
7  * directory or online at http://www.openafs.org/dl/license10.html
8  */
9
10 /*
11  * Linux module support routines.
12  *
13  */
14 #include <afsconfig.h>
15 #include "afs/param.h"
16
17 RCSID("$Header$");
18
19 #include "afs/sysincludes.h"
20 #include "afsincludes.h"
21 #include "h/unistd.h" /* For syscall numbers. */
22 #include "h/mm.h"
23
24 #include <linux/module.h>
25 #include <linux/slab.h>
26 #if LINUX_VERSION_CODE >= KERNEL_VERSION(2,4,0)
27 #include <linux/init.h>
28 #endif
29 #ifndef EXPORTED_SYS_CALL_TABLE
30 #include <linux/sched.h>
31 #include <linux/syscall.h>
32 #endif
33
34
35
36 #ifdef AFS_SPARC64_LINUX24_ENV
37 #define __NR_setgroups32      82 /* This number is not exported for some bizarre reason. */
38 #endif
39
40 asmlinkage int (*sys_settimeofdayp)(struct timeval *tv, struct timezone *tz);
41 asmlinkage int (*sys_killp)(int pid, int signal);
42 asmlinkage long (*sys_setgroupsp)(int gidsetsize, gid_t *grouplist);
43
44 #ifdef EXPORTED_SYS_CALL_TABLE
45 #ifdef AFS_SPARC64_LINUX20_ENV
46 extern unsigned int sys_call_table[];  /* changed to uint because SPARC64 has syscaltable of 32bit items */
47 #else
48 extern void * sys_call_table[]; /* safer for other linuces */
49 #endif
50 #else /* EXPORTED_SYS_CALL_TABLE */
51 #ifdef AFS_SPARC64_LINUX20_ENV
52 static unsigned int *sys_call_table;  /* changed to uint because SPARC64 has syscaltable of 32bit items */
53 #else
54 static void ** sys_call_table; /* safer for other linuces */
55 #endif
56 #endif
57 extern struct file_system_type afs_file_system;
58
59 static long get_page_offset(void);
60
61 #if defined(AFS_LINUX24_ENV)
62 DECLARE_MUTEX(afs_global_lock);
63 #else
64 struct semaphore afs_global_lock = MUTEX;
65 #endif
66 int afs_global_owner = 0;
67 unsigned long afs_linux_page_offset = 0; /* contains the PAGE_OFFSET value */
68
69 /* Since sys_ni_syscall is not exported, I need to cache it in order to restore
70  * it.
71  */
72 #ifdef AFS_SPARC64_LINUX20_ENV
73 static unsigned int afs_ni_syscall = 0;
74 #else
75 static void* afs_ni_syscall = 0;
76 #endif
77  
78 #ifdef AFS_SPARC64_LINUX20_ENV
79 static unsigned int afs_ni_syscall32 = 0;
80 asmlinkage int (*sys32_setgroupsp)(int gidsetsize, __kernel_gid_t32 *grouplist);
81 #if defined(__NR_setgroups32)
82 asmlinkage int (*sys32_setgroups32p)(int gidsetsize, __kernel_gid_t32 *grouplist);
83 #endif
84 #ifdef EXPORTED_SYS_CALL_TABLE
85 extern unsigned int sys_call_table32[];
86 #else
87 static unsigned int *sys_call_table32;
88 #endif
89
90 asmlinkage int afs_syscall32(long syscall, long parm1, long parm2, long parm3,
91                              long parm4, long parm5)
92 {
93 __asm__ __volatile__ ("
94         srl %o4, 0, %o4
95         mov %o7, %i7
96         call afs_syscall
97         srl %o5, 0, %o5
98         ret
99         nop
100 ");
101 }
102 #endif
103
104 #ifdef AFS_IA64_LINUX20_ENV
105
106 asmlinkage long
107 afs_syscall_stub(int r0, int r1, long r2, long r3, long r4, long gp)
108 {
109 __asm__ __volatile__ ("
110         alloc r42 = ar.pfs, 8, 3, 6, 0
111         mov r41 = b0                    /* save rp */
112         mov out0 = in0
113         mov out1 = in1
114         mov out2 = in2
115         mov out3 = in3
116         mov out4 = in4
117         mov out5 = gp                   /* save gp */
118         ;;
119 .L1:    mov r3 = ip
120         ;;
121         addl r15=.fptr_afs_syscall-.L1,r3
122         ;;
123         ld8 r15=[r15]
124         ;;
125         ld8 r16=[r15],8
126         ;;
127         ld8 gp=[r15]
128         mov b6=r16
129         br.call.sptk.many b0 = b6
130         ;;
131         mov ar.pfs = r42
132         mov b0 = r41
133         mov gp = r48                    /* restore gp */
134         br.ret.sptk.many b0
135 .fptr_afs_syscall:
136         data8 @fptr(afs_syscall)
137 ");
138 }
139
140 asmlinkage long
141 afs_xsetgroups_stub(int r0, int r1, long r2, long r3, long r4, long gp)
142 {
143 __asm__ __volatile__ ("
144         alloc r42 = ar.pfs, 8, 3, 6, 0
145         mov r41 = b0                    /* save rp */
146         mov out0 = in0
147         mov out1 = in1
148         mov out2 = in2
149         mov out3 = in3
150         mov out4 = in4
151         mov out5 = gp                   /* save gp */
152         ;;
153 .L2:    mov r3 = ip
154         ;;
155         addl r15=.fptr_afs_xsetgroups - .L2,r3
156         ;;
157         ld8 r15=[r15]
158         ;;
159         ld8 r16=[r15],8
160         ;;
161         ld8 gp=[r15]
162         mov b6=r16
163         br.call.sptk.many b0 = b6
164         ;;
165         mov ar.pfs = r42
166         mov b0 = r41
167         mov gp = r48                    /* restore gp */
168         br.ret.sptk.many b0
169 .fptr_afs_xsetgroups:
170         data8 @fptr(afs_xsetgroups)
171 ");
172 }
173
174 struct fptr
175 {
176         void *ip;
177         unsigned long gp;
178 };
179
180 #endif /* AFS_IA64_LINUX20_ENV */
181
182 #ifdef AFS_LINUX24_ENV
183 asmlinkage int (*sys_setgroups32p)(int gidsetsize, __kernel_gid32_t *grouplist);
184 #endif 
185
186 #ifdef AFS_SPARC64_LINUX20_ENV
187 #define POINTER2SYSCALL (unsigned int)(unsigned long)
188 #define SYSCALL2POINTER (void *)(long)
189 #else
190 #define POINTER2SYSCALL (void *)
191 #define SYSCALL2POINTER (void *)
192 #endif
193
194 #if LINUX_VERSION_CODE >= KERNEL_VERSION(2,4,0)
195 int __init afs_init(void)
196 #else
197 int init_module(void)
198 #endif
199 {
200 #if defined(AFS_IA64_LINUX20_ENV)
201     unsigned long kernel_gp;
202     static struct fptr sys_kill, sys_settimeofday, sys_setgroups;
203 #endif
204     extern int afs_syscall();
205     extern long afs_xsetgroups();
206 #if defined(__NR_setgroups32)
207     extern int afs_xsetgroups32();
208 #endif
209 #ifdef AFS_SPARC64_LINUX20_ENV
210     extern int afs32_xsetgroups();
211 #if defined(__NR_setgroups32)
212     extern int afs32_xsetgroups32();
213 #endif
214 #endif
215
216 #ifndef EXPORTED_SYS_CALL_TABLE
217     unsigned long *ptr;
218     unsigned long offset;
219     unsigned long datalen;
220     int ret;
221     unsigned long token;
222     char      *mod_name;
223     unsigned long    mod_start;
224     unsigned long    mod_end;
225     char      *sec_name;
226     unsigned long    sec_start;
227     unsigned long    sec_end;
228     char      *sym_name;
229     unsigned long    sym_start;
230     unsigned long    sym_end;
231 #endif
232
233     RWLOCK_INIT(&afs_xosi, "afs_xosi");
234
235     /* obtain PAGE_OFFSET value */
236     afs_linux_page_offset = get_page_offset();
237
238 #ifndef AFS_S390_LINUX22_ENV
239     if (afs_linux_page_offset == 0) {
240         /* couldn't obtain page offset so can't continue */
241         printf("afs: Unable to obtain PAGE_OFFSET. Exiting..");
242         return -EIO;
243     }
244 #endif
245 #ifndef EXPORTED_SYS_CALL_TABLE
246     sys_call_table=0;
247
248 #ifdef EXPORTED_KALLSYMS_SYMBOL
249     ret=1;
250     token=0;
251     while (ret) {
252       sym_start=0;
253       ret=kallsyms_symbol_to_address("sys_call_table", &token, &mod_name,
254                                      &mod_start, &mod_end, &sec_name, &sec_start, &sec_end,
255                                      &sym_name, &sym_start, &sym_end);
256       if (ret && !strcmp(mod_name, "kernel"))
257         break;
258     }
259     if (ret && sym_start) {
260       sys_call_table=sym_start;
261     }
262 #else
263 #ifdef EXPORTED_KALLSYMS_ADDRESS
264     ret=kallsyms_address_to_symbol((unsigned long)&init_mm, &mod_name,
265                                    &mod_start, &mod_end, &sec_name, &sec_start, &sec_end,
266                                    &sym_name, &sym_start, &sym_end);
267     ptr=(unsigned long *)sec_start;
268     datalen=(sec_end-sec_start)/sizeof(unsigned long);
269 #else
270 #if defined(AFS_IA64_LINUX20_ENV)
271     ptr = (unsigned long *) (&sys_close - 0x180000);
272     datalen=0x180000/sizeof(ptr);
273 #else
274     ptr=(unsigned long *)&init_mm;
275     datalen=16384;
276 #endif
277 #endif
278     for (offset=0;offset <datalen;ptr++,offset++) {
279 #if defined(AFS_IA64_LINUX20_ENV)
280         unsigned long close_ip=(unsigned long) ((struct fptr *)&sys_close)->ip;
281         unsigned long chdir_ip=(unsigned long) ((struct fptr *)&sys_chdir)->ip;
282         unsigned long write_ip=(unsigned long) ((struct fptr *)&sys_write)->ip;
283         if (ptr[0] == close_ip &&
284             ptr[__NR_chdir - __NR_close] == chdir_ip &&
285             ptr[__NR_write - __NR_close] == write_ip) {
286             sys_call_table=(void *) &(ptr[ -1 * (__NR_close-1024)]);
287             break;
288         }
289 #else
290       if (ptr[0] == (unsigned long)&sys_exit &&
291           ptr[__NR_open - __NR_exit] == (unsigned long)&sys_open) {
292         sys_call_table=ptr - __NR_exit;
293         break;
294       }
295 #endif
296     }
297 #ifdef EXPORTED_KALLSYMS_ADDRESS
298     ret=kallsyms_address_to_symbol((unsigned long)sys_call_table, &mod_name,
299                                    &mod_start, &mod_end, &sec_name, &sec_start, &sec_end,
300                                    &sym_name, &sym_start, &sym_end);
301     if (ret && strcmp(sym_name, "sys_call_table"))
302       sys_call_table=0;
303 #endif
304 #endif
305     if (!sys_call_table) {
306       printf("Failed to find address of sys_call_table\n");
307       return -EIO;
308     }
309 # ifdef AFS_SPARC64_LINUX20_ENV
310     error cant support this yet.
311 #endif
312 #endif /* EXPORTED_SYS_CALL_TABLE */
313       
314     /* Initialize pointers to kernel syscalls. */
315 #if defined(AFS_IA64_LINUX20_ENV)
316     kernel_gp = ((struct fptr *)printk)->gp;
317
318     sys_settimeofdayp = (void *) &sys_settimeofday;
319     sys_killp = (void *) &sys_kill;
320
321     ((struct fptr *)sys_settimeofdayp)->ip =
322                 SYSCALL2POINTER sys_call_table[__NR_settimeofday - 1024];
323     ((struct fptr *)sys_settimeofdayp)->gp = kernel_gp;
324     
325     ((struct fptr *)sys_killp)->ip =
326                 SYSCALL2POINTER sys_call_table[__NR_kill - 1024];
327     ((struct fptr *)sys_killp)->gp = kernel_gp;
328 #else /* !AFS_IA64_LINUX20_ENV */
329     sys_settimeofdayp = SYSCALL2POINTER sys_call_table[__NR_settimeofday];
330     sys_killp = SYSCALL2POINTER sys_call_table[__NR_kill];
331 #endif /* AFS_IA64_LINUX20_ENV */
332
333     /* setup AFS entry point. */
334     if (
335 #if defined(AFS_IA64_LINUX20_ENV)
336         SYSCALL2POINTER sys_call_table[__NR_afs_syscall - 1024]
337 #else
338         SYSCALL2POINTER sys_call_table[__NR_afs_syscall] 
339 #endif
340         == afs_syscall) {
341         printf("AFS syscall entry point already in use!\n");
342         return -EBUSY;
343     }
344
345 #if defined(AFS_IA64_LINUX20_ENV)
346     afs_ni_syscall = sys_call_table[__NR_afs_syscall - 1024];
347     sys_call_table[__NR_afs_syscall - 1024] = POINTER2SYSCALL ((struct fptr *)afs_syscall_stub)->ip;
348 #else /* AFS_IA64_LINUX20_ENV */
349     afs_ni_syscall = sys_call_table[__NR_afs_syscall];
350     sys_call_table[__NR_afs_syscall] = POINTER2SYSCALL afs_syscall;
351 # ifdef AFS_SPARC64_LINUX20_ENV
352     afs_ni_syscall32 = sys_call_table32[__NR_afs_syscall];
353     sys_call_table32[__NR_afs_syscall] = POINTER2SYSCALL afs_syscall32;
354 # endif
355 #endif /* AFS_IA64_LINUX20_ENV */
356
357     osi_Init();
358     register_filesystem(&afs_file_system);
359
360     /* Intercept setgroups calls */
361 #if defined(AFS_IA64_LINUX20_ENV)
362     sys_setgroupsp = (void *) &sys_setgroups;
363
364     ((struct fptr *)sys_setgroupsp)->ip =
365                 SYSCALL2POINTER sys_call_table[__NR_setgroups - 1024];
366     ((struct fptr *)sys_setgroupsp)->gp = kernel_gp;
367
368     sys_call_table[__NR_setgroups - 1024] = POINTER2SYSCALL ((struct fptr *)afs_xsetgroups_stub)->ip;
369 #else /* AFS_IA64_LINUX20_ENV */
370     sys_setgroupsp = SYSCALL2POINTER sys_call_table[__NR_setgroups];
371     sys_call_table[__NR_setgroups] = POINTER2SYSCALL afs_xsetgroups;
372 # ifdef AFS_SPARC64_LINUX20_ENV
373     sys32_setgroupsp = SYSCALL2POINTER sys_call_table32[__NR_setgroups];
374     sys_call_table32[__NR_setgroups] = POINTER2SYSCALL afs32_xsetgroups;
375 # endif
376 # if defined(__NR_setgroups32)
377     sys_setgroups32p = SYSCALL2POINTER sys_call_table[__NR_setgroups32];
378     sys_call_table[__NR_setgroups32] = POINTER2SYSCALL afs_xsetgroups32;
379 # ifdef AFS_SPARC64_LINUX20_ENV
380     sys32_setgroups32p = SYSCALL2POINTER sys_call_table32[__NR_setgroups32];
381     sys_call_table32[__NR_setgroups32] = POINTER2SYSCALL afs32_xsetgroups32;
382 # endif
383 # endif
384 #endif /* AFS_IA64_LINUX20_ENV */
385
386     osi_sysctl_init();
387
388     return 0;
389 }
390
391 #if LINUX_VERSION_CODE >= KERNEL_VERSION(2,4,0)
392 void __exit afs_cleanup(void)
393 #else
394 void cleanup_module(void)
395 #endif
396 {
397     struct task_struct *t;
398
399     osi_sysctl_clean();
400
401 #if defined(AFS_IA64_LINUX20_ENV)
402     sys_call_table[__NR_setgroups - 1024] = POINTER2SYSCALL ((struct fptr *) sys_setgroupsp)->ip;
403     sys_call_table[__NR_afs_syscall - 1024] = afs_ni_syscall;
404 #else /* AFS_IA64_LINUX20_ENV */
405     sys_call_table[__NR_setgroups] = POINTER2SYSCALL sys_setgroupsp;
406     sys_call_table[__NR_afs_syscall] = afs_ni_syscall;
407 # ifdef AFS_SPARC64_LINUX20_ENV
408     sys_call_table32[__NR_setgroups] = POINTER2SYSCALL sys32_setgroupsp;
409     sys_call_table32[__NR_afs_syscall] = afs_ni_syscall32;
410 # endif
411 # if defined(__NR_setgroups32)
412     sys_call_table[__NR_setgroups32] = POINTER2SYSCALL sys_setgroups32p;
413 # ifdef AFS_SPARC64_LINUX20_ENV
414     sys_call_table32[__NR_setgroups32] = POINTER2SYSCALL sys32_setgroups32p;
415 # endif
416 # endif
417 #endif /* AFS_IA64_LINUX20_ENV */
418     unregister_filesystem(&afs_file_system);
419
420     osi_linux_free_inode_pages(); /* Invalidate all pages using AFS inodes. */
421     osi_linux_free_afs_memory();
422
423     return;
424 }
425
426 #if LINUX_VERSION_CODE >= KERNEL_VERSION(2,4,0)
427 module_init(afs_init);
428 module_exit(afs_cleanup);
429 #endif
430
431
432 static long get_page_offset(void)
433 {
434 #if defined(AFS_PPC_LINUX22_ENV) || defined(AFS_SPARC64_LINUX20_ENV) || defined(AFS_SPARC_LINUX20_ENV) || defined(AFS_ALPHA_LINUX20_ENV) || defined(AFS_S390_LINUX22_ENV) || defined(AFS_IA64_LINUX20_ENV) || defined(AFS_PARISC_LINUX24_ENV)
435     return PAGE_OFFSET;
436 #else
437     struct task_struct *p;
438
439     /* search backward thru the circular list */
440     for(p = current; p; p = p->prev_task)
441         if (p->pid == 1)
442             return p->addr_limit.seg;
443
444     return 0;
445 #endif
446 }