mn10300: add the MN10300/AM33 architecture to the kernel
[linux-2.6] / arch / mn10300 / kernel / process.c
1 /* MN10300  Process handling code
2  *
3  * Copyright (C) 2007 Red Hat, Inc. All Rights Reserved.
4  * Written by David Howells (dhowells@redhat.com)
5  *
6  * This program is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU General Public Licence
8  * as published by the Free Software Foundation; either version
9  * 2 of the Licence, or (at your option) any later version.
10  */
11 #include <linux/module.h>
12 #include <linux/errno.h>
13 #include <linux/sched.h>
14 #include <linux/kernel.h>
15 #include <linux/mm.h>
16 #include <linux/smp.h>
17 #include <linux/smp_lock.h>
18 #include <linux/stddef.h>
19 #include <linux/unistd.h>
20 #include <linux/ptrace.h>
21 #include <linux/slab.h>
22 #include <linux/user.h>
23 #include <linux/a.out.h>
24 #include <linux/interrupt.h>
25 #include <linux/delay.h>
26 #include <linux/reboot.h>
27 #include <linux/percpu.h>
28 #include <linux/err.h>
29 #include <linux/fs.h>
30 #include <asm/uaccess.h>
31 #include <asm/pgtable.h>
32 #include <asm/system.h>
33 #include <asm/io.h>
34 #include <asm/processor.h>
35 #include <asm/mmu_context.h>
36 #include <asm/fpu.h>
37 #include <asm/reset-regs.h>
38 #include <asm/gdb-stub.h>
39 #include "internal.h"
40
41 /*
42  * power management idle function, if any..
43  */
44 void (*pm_idle)(void);
45 EXPORT_SYMBOL(pm_idle);
46
47 /*
48  * return saved PC of a blocked thread.
49  */
50 unsigned long thread_saved_pc(struct task_struct *tsk)
51 {
52         return ((unsigned long *) tsk->thread.sp)[3];
53 }
54
55 /*
56  * power off function, if any
57  */
58 void (*pm_power_off)(void);
59 EXPORT_SYMBOL(pm_power_off);
60
61 /*
62  * we use this if we don't have any better idle routine
63  */
64 static void default_idle(void)
65 {
66         local_irq_disable();
67         if (!need_resched())
68                 safe_halt();
69         else
70                 local_irq_enable();
71 }
72
73 /*
74  * the idle thread
75  * - there's no useful work to be done, so just try to conserve power and have
76  *   a low exit latency (ie sit in a loop waiting for somebody to say that
77  *   they'd like to reschedule)
78  */
79 void cpu_idle(void)
80 {
81         int cpu = smp_processor_id();
82
83         /* endless idle loop with no priority at all */
84         for (;;) {
85                 while (!need_resched()) {
86                         void (*idle)(void);
87
88                         smp_rmb();
89                         idle = pm_idle;
90                         if (!idle)
91                                 idle = default_idle;
92
93                         irq_stat[cpu].idle_timestamp = jiffies;
94                         idle();
95                 }
96
97                 preempt_enable_no_resched();
98                 schedule();
99                 preempt_disable();
100         }
101 }
102
103 void release_segments(struct mm_struct *mm)
104 {
105 }
106
107 void machine_restart(char *cmd)
108 {
109 #ifdef CONFIG_GDBSTUB
110         gdbstub_exit(0);
111 #endif
112
113 #ifdef mn10300_unit_hard_reset
114         mn10300_unit_hard_reset();
115 #else
116         mn10300_proc_hard_reset();
117 #endif
118 }
119
120 void machine_halt(void)
121 {
122 #ifdef CONFIG_GDBSTUB
123         gdbstub_exit(0);
124 #endif
125 }
126
127 void machine_power_off(void)
128 {
129 #ifdef CONFIG_GDBSTUB
130         gdbstub_exit(0);
131 #endif
132 }
133
134 void show_regs(struct pt_regs *regs)
135 {
136 }
137
138 /*
139  * create a kernel thread
140  */
141 int kernel_thread(int (*fn)(void *), void *arg, unsigned long flags)
142 {
143         struct pt_regs regs;
144
145         memset(&regs, 0, sizeof(regs));
146
147         regs.a2 = (unsigned long) fn;
148         regs.d2 = (unsigned long) arg;
149         regs.pc = (unsigned long) kernel_thread_helper;
150         local_save_flags(regs.epsw);
151         regs.epsw |= EPSW_IE | EPSW_IM_7;
152
153         /* Ok, create the new process.. */
154         return do_fork(flags | CLONE_VM | CLONE_UNTRACED, 0, &regs, 0,
155                        NULL, NULL);
156 }
157
158 /*
159  * free current thread data structures etc..
160  */
161 void exit_thread(void)
162 {
163         exit_fpu();
164 }
165
166 void flush_thread(void)
167 {
168         flush_fpu();
169 }
170
171 void release_thread(struct task_struct *dead_task)
172 {
173 }
174
175 /*
176  * we do not have to muck with descriptors here, that is
177  * done in switch_mm() as needed.
178  */
179 void copy_segments(struct task_struct *p, struct mm_struct *new_mm)
180 {
181 }
182
183 /*
184  * this gets called before we allocate a new thread and copy the current task
185  * into it so that we can store lazy state into memory
186  */
187 void prepare_to_copy(struct task_struct *tsk)
188 {
189         unlazy_fpu(tsk);
190 }
191
192 /*
193  * set up the kernel stack for a new thread and copy arch-specific thread
194  * control information
195  */
196 int copy_thread(int nr, unsigned long clone_flags,
197                 unsigned long c_usp, unsigned long ustk_size,
198                 struct task_struct *p, struct pt_regs *kregs)
199 {
200         struct pt_regs *c_uregs, *c_kregs, *uregs;
201         unsigned long c_ksp;
202
203         uregs = current->thread.uregs;
204
205         c_ksp = (unsigned long) task_stack_page(p) + THREAD_SIZE;
206
207         /* allocate the userspace exception frame and set it up */
208         c_ksp -= sizeof(struct pt_regs);
209         c_uregs = (struct pt_regs *) c_ksp;
210
211         p->thread.uregs = c_uregs;
212         *c_uregs = *uregs;
213         c_uregs->sp = c_usp;
214         c_uregs->epsw &= ~EPSW_FE; /* my FPU */
215
216         c_ksp -= 12; /* allocate function call ABI slack */
217
218         /* the new TLS pointer is passed in as arg #5 to sys_clone() */
219         if (clone_flags & CLONE_SETTLS)
220                 c_uregs->e2 = __frame->d3;
221
222         /* set up the return kernel frame if called from kernel_thread() */
223         c_kregs = c_uregs;
224         if (kregs != uregs) {
225                 c_ksp -= sizeof(struct pt_regs);
226                 c_kregs = (struct pt_regs *) c_ksp;
227                 *c_kregs = *kregs;
228                 c_kregs->sp = c_usp;
229                 c_kregs->next = c_uregs;
230 #ifdef CONFIG_MN10300_CURRENT_IN_E2
231                 c_kregs->e2 = (unsigned long) p; /* current */
232 #endif
233
234                 c_ksp -= 12; /* allocate function call ABI slack */
235         }
236
237         /* set up things up so the scheduler can start the new task */
238         p->thread.__frame = c_kregs;
239         p->thread.a3    = (unsigned long) c_kregs;
240         p->thread.sp    = c_ksp;
241         p->thread.pc    = (unsigned long) ret_from_fork;
242         p->thread.wchan = (unsigned long) ret_from_fork;
243         p->thread.usp   = c_usp;
244
245         return 0;
246 }
247
248 /*
249  * clone a process
250  * - tlsptr is retrieved by copy_thread() from __frame->d3
251  */
252 asmlinkage long sys_clone(unsigned long clone_flags, unsigned long newsp,
253                           int __user *parent_tidptr, int __user *child_tidptr,
254                           int __user *tlsptr)
255 {
256         return do_fork(clone_flags, newsp ?: __frame->sp, __frame, 0,
257                        parent_tidptr, child_tidptr);
258 }
259
260 asmlinkage long sys_fork(void)
261 {
262         return do_fork(SIGCHLD, __frame->sp, __frame, 0, NULL, NULL);
263 }
264
265 asmlinkage long sys_vfork(void)
266 {
267         return do_fork(CLONE_VFORK | CLONE_VM | SIGCHLD, __frame->sp, __frame,
268                        0, NULL, NULL);
269 }
270
271 asmlinkage long sys_execve(char __user *name,
272                            char __user * __user *argv,
273                            char __user * __user *envp)
274 {
275         char *filename;
276         int error;
277
278         lock_kernel();
279
280         filename = getname(name);
281         error = PTR_ERR(filename);
282         if (!IS_ERR(filename)) {
283                 error = do_execve(filename, argv, envp, __frame);
284                 if (error == 0)
285                         current->ptrace &= ~PT_DTRACE;
286
287                 putname(filename);
288         }
289
290         unlock_kernel();
291         return error;
292 }
293
294 unsigned long get_wchan(struct task_struct *p)
295 {
296         return p->thread.wchan;
297 }