Pull add-mmio-to-proc-iomem into release branch
[linux-2.6] / arch / m32r / kernel / process.c
1 /*
2  *  linux/arch/m32r/kernel/process.c
3  *
4  *  Copyright (c) 2001, 2002  Hiroyuki Kondo, Hirokazu Takata,
5  *                            Hitoshi Yamamoto
6  *  Taken from sh version.
7  *    Copyright (C) 1995  Linus Torvalds
8  *    SuperH version:  Copyright (C) 1999, 2000  Niibe Yutaka & Kaz Kojima
9  */
10
11 #undef DEBUG_PROCESS
12 #ifdef DEBUG_PROCESS
13 #define DPRINTK(fmt, args...)  printk("%s:%d:%s: " fmt, __FILE__, __LINE__, \
14   __FUNCTION__, ##args)
15 #else
16 #define DPRINTK(fmt, args...)
17 #endif
18
19 /*
20  * This file handles the architecture-dependent parts of process handling..
21  */
22
23 #include <linux/fs.h>
24 #include <linux/config.h>
25 #include <linux/module.h>
26 #include <linux/ptrace.h>
27 #include <linux/unistd.h>
28 #include <linux/slab.h>
29 #include <linux/hardirq.h>
30
31 #include <asm/io.h>
32 #include <asm/uaccess.h>
33 #include <asm/mmu_context.h>
34 #include <asm/elf.h>
35 #include <asm/m32r.h>
36
37 #include <linux/err.h>
38
39 static int hlt_counter=0;
40
41 /*
42  * Return saved PC of a blocked thread.
43  */
44 unsigned long thread_saved_pc(struct task_struct *tsk)
45 {
46         return tsk->thread.lr;
47 }
48
49 /*
50  * Powermanagement idle function, if any..
51  */
52 void (*pm_idle)(void) = NULL;
53
54 void disable_hlt(void)
55 {
56         hlt_counter++;
57 }
58
59 EXPORT_SYMBOL(disable_hlt);
60
61 void enable_hlt(void)
62 {
63         hlt_counter--;
64 }
65
66 EXPORT_SYMBOL(enable_hlt);
67
68 /*
69  * We use this is we don't have any better
70  * idle routine..
71  */
72 void default_idle(void)
73 {
74         /* M32R_FIXME: Please use "cpu_sleep" mode.  */
75         cpu_relax();
76 }
77
78 /*
79  * On SMP it's slightly faster (but much more power-consuming!)
80  * to poll the ->work.need_resched flag instead of waiting for the
81  * cross-CPU IPI to arrive. Use this option with caution.
82  */
83 static void poll_idle (void)
84 {
85         /* M32R_FIXME */
86         cpu_relax();
87 }
88
89 /*
90  * The idle thread. There's no useful work to be
91  * done, so just try to conserve power and have a
92  * low exit latency (ie sit in a loop waiting for
93  * somebody to say that they'd like to reschedule)
94  */
95 void cpu_idle (void)
96 {
97         /* endless idle loop with no priority at all */
98         while (1) {
99                 while (!need_resched()) {
100                         void (*idle)(void) = pm_idle;
101
102                         if (!idle)
103                                 idle = default_idle;
104
105                         idle();
106                 }
107                 preempt_enable_no_resched();
108                 schedule();
109                 preempt_disable();
110         }
111 }
112
113 void machine_restart(char *__unused)
114 {
115         printk("Please push reset button!\n");
116         while (1)
117                 cpu_relax();
118 }
119
120 void machine_halt(void)
121 {
122         printk("Please push reset button!\n");
123         while (1)
124                 cpu_relax();
125 }
126
127 void machine_power_off(void)
128 {
129         /* M32R_FIXME */
130 }
131
132 static int __init idle_setup (char *str)
133 {
134         if (!strncmp(str, "poll", 4)) {
135                 printk("using poll in idle threads.\n");
136                 pm_idle = poll_idle;
137         } else if (!strncmp(str, "sleep", 4)) {
138                 printk("using sleep in idle threads.\n");
139                 pm_idle = default_idle;
140         }
141
142         return 1;
143 }
144
145 __setup("idle=", idle_setup);
146
147 void show_regs(struct pt_regs * regs)
148 {
149         printk("\n");
150         printk("BPC[%08lx]:PSW[%08lx]:LR [%08lx]:FP [%08lx]\n", \
151           regs->bpc, regs->psw, regs->lr, regs->fp);
152         printk("BBPC[%08lx]:BBPSW[%08lx]:SPU[%08lx]:SPI[%08lx]\n", \
153           regs->bbpc, regs->bbpsw, regs->spu, regs->spi);
154         printk("R0 [%08lx]:R1 [%08lx]:R2 [%08lx]:R3 [%08lx]\n", \
155           regs->r0, regs->r1, regs->r2, regs->r3);
156         printk("R4 [%08lx]:R5 [%08lx]:R6 [%08lx]:R7 [%08lx]\n", \
157           regs->r4, regs->r5, regs->r6, regs->r7);
158         printk("R8 [%08lx]:R9 [%08lx]:R10[%08lx]:R11[%08lx]\n", \
159           regs->r8, regs->r9, regs->r10, regs->r11);
160         printk("R12[%08lx]\n", \
161           regs->r12);
162
163 #if defined(CONFIG_ISA_M32R2) && defined(CONFIG_ISA_DSP_LEVEL2)
164         printk("ACC0H[%08lx]:ACC0L[%08lx]\n", \
165           regs->acc0h, regs->acc0l);
166         printk("ACC1H[%08lx]:ACC1L[%08lx]\n", \
167           regs->acc1h, regs->acc1l);
168 #elif defined(CONFIG_ISA_M32R2) || defined(CONFIG_ISA_M32R)
169         printk("ACCH[%08lx]:ACCL[%08lx]\n", \
170           regs->acch, regs->accl);
171 #else
172 #error unknown isa configuration
173 #endif
174 }
175
176 /*
177  * Create a kernel thread
178  */
179
180 /*
181  * This is the mechanism for creating a new kernel thread.
182  *
183  * NOTE! Only a kernel-only process(ie the swapper or direct descendants
184  * who haven't done an "execve()") should use this: it will work within
185  * a system call from a "real" process, but the process memory space will
186  * not be free'd until both the parent and the child have exited.
187  */
188 static void kernel_thread_helper(void *nouse, int (*fn)(void *), void *arg)
189 {
190         fn(arg);
191         do_exit(-1);
192 }
193
194 int kernel_thread(int (*fn)(void *), void *arg, unsigned long flags)
195 {
196         struct pt_regs regs;
197
198         memset(&regs, 0, sizeof (regs));
199         regs.r1 = (unsigned long)fn;
200         regs.r2 = (unsigned long)arg;
201
202         regs.bpc = (unsigned long)kernel_thread_helper;
203
204         regs.psw = M32R_PSW_BIE;
205
206         /* Ok, create the new process. */
207         return do_fork(flags | CLONE_VM | CLONE_UNTRACED, 0, &regs, 0, NULL,
208                 NULL);
209 }
210
211 /*
212  * Free current thread data structures etc..
213  */
214 void exit_thread(void)
215 {
216         /* Nothing to do. */
217         DPRINTK("pid = %d\n", current->pid);
218 }
219
220 void flush_thread(void)
221 {
222         DPRINTK("pid = %d\n", current->pid);
223         memset(&current->thread.debug_trap, 0, sizeof(struct debug_trap));
224 }
225
226 void release_thread(struct task_struct *dead_task)
227 {
228         /* do nothing */
229         DPRINTK("pid = %d\n", dead_task->pid);
230 }
231
232 /* Fill in the fpu structure for a core dump.. */
233 int dump_fpu(struct pt_regs *regs, elf_fpregset_t *fpu)
234 {
235         return 0; /* Task didn't use the fpu at all. */
236 }
237
238 int copy_thread(int nr, unsigned long clone_flags, unsigned long spu,
239         unsigned long unused, struct task_struct *tsk, struct pt_regs *regs)
240 {
241         struct pt_regs *childregs;
242         unsigned long sp = (unsigned long)tsk->thread_info + THREAD_SIZE;
243         extern void ret_from_fork(void);
244
245         /* Copy registers */
246         sp -= sizeof (struct pt_regs);
247         childregs = (struct pt_regs *)sp;
248         *childregs = *regs;
249
250         childregs->spu = spu;
251         childregs->r0 = 0;      /* Child gets zero as return value */
252         regs->r0 = tsk->pid;
253         tsk->thread.sp = (unsigned long)childregs;
254         tsk->thread.lr = (unsigned long)ret_from_fork;
255
256         return 0;
257 }
258
259 /*
260  * fill in the user structure for a core dump..
261  */
262 void dump_thread(struct pt_regs * regs, struct user * dump)
263 {
264         /* M32R_FIXME */
265 }
266
267 /*
268  * Capture the user space registers if the task is not running (in user space)
269  */
270 int dump_task_regs(struct task_struct *tsk, elf_gregset_t *regs)
271 {
272         /* M32R_FIXME */
273         return 1;
274 }
275
276 asmlinkage int sys_fork(unsigned long r0, unsigned long r1, unsigned long r2,
277         unsigned long r3, unsigned long r4, unsigned long r5, unsigned long r6,
278         struct pt_regs regs)
279 {
280 #ifdef CONFIG_MMU
281         return do_fork(SIGCHLD, regs.spu, &regs, 0, NULL, NULL);
282 #else
283         return -EINVAL;
284 #endif /* CONFIG_MMU */
285 }
286
287 asmlinkage int sys_clone(unsigned long clone_flags, unsigned long newsp,
288                          unsigned long parent_tidptr,
289                          unsigned long child_tidptr,
290                          unsigned long r4, unsigned long r5, unsigned long r6,
291                          struct pt_regs regs)
292 {
293         if (!newsp)
294                 newsp = regs.spu;
295
296         return do_fork(clone_flags, newsp, &regs, 0,
297                        (int __user *)parent_tidptr, (int __user *)child_tidptr);
298 }
299
300 /*
301  * This is trivial, and on the face of it looks like it
302  * could equally well be done in user mode.
303  *
304  * Not so, for quite unobvious reasons - register pressure.
305  * In user mode vfork() cannot have a stack frame, and if
306  * done by calling the "clone()" system call directly, you
307  * do not have enough call-clobbered registers to hold all
308  * the information you need.
309  */
310 asmlinkage int sys_vfork(unsigned long r0, unsigned long r1, unsigned long r2,
311         unsigned long r3, unsigned long r4, unsigned long r5, unsigned long r6,
312         struct pt_regs regs)
313 {
314         return do_fork(CLONE_VFORK | CLONE_VM | SIGCHLD, regs.spu, &regs, 0,
315                         NULL, NULL);
316 }
317
318 /*
319  * sys_execve() executes a new program.
320  */
321 asmlinkage int sys_execve(char __user *ufilename, char __user * __user *uargv,
322                           char __user * __user *uenvp,
323                           unsigned long r3, unsigned long r4, unsigned long r5,
324                           unsigned long r6, struct pt_regs regs)
325 {
326         int error;
327         char *filename;
328
329         filename = getname(ufilename);
330         error = PTR_ERR(filename);
331         if (IS_ERR(filename))
332                 goto out;
333
334         error = do_execve(filename, uargv, uenvp, &regs);
335         if (error == 0) {
336                 task_lock(current);
337                 current->ptrace &= ~PT_DTRACE;
338                 task_unlock(current);
339         }
340         putname(filename);
341 out:
342         return error;
343 }
344
345 /*
346  * These bracket the sleeping functions..
347  */
348 #define first_sched     ((unsigned long) scheduling_functions_start_here)
349 #define last_sched      ((unsigned long) scheduling_functions_end_here)
350
351 unsigned long get_wchan(struct task_struct *p)
352 {
353         /* M32R_FIXME */
354         return (0);
355 }