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 }