arch/mips/kernel/sysirix.c

   1 /*
   2  * sysirix.c: IRIX system call emulation.
   3  *
   4  * Copyright (C) 1996 David S. Miller
   5  * Copyright (C) 1997 Miguel de Icaza
   6  * Copyright (C) 1997, 1998, 1999, 2000 Ralf Baechle
   7  */
   8 #include <linux/kernel.h>
   9 #include <linux/sched.h>
  10 #include <linux/binfmts.h>
  11 #include <linux/highuid.h>
  12 #include <linux/pagemap.h>
  13 #include <linux/mm.h>
  14 #include <linux/mman.h>
  15 #include <linux/slab.h>
  16 #include <linux/swap.h>
  17 #include <linux/errno.h>
  18 #include <linux/time.h>
  19 #include <linux/timex.h>
  20 #include <linux/times.h>
  21 #include <linux/elf.h>
  22 #include <linux/msg.h>
  23 #include <linux/shm.h>
  24 #include <linux/smp.h>
  25 #include <linux/smp_lock.h>
  26 #include <linux/utsname.h>
  27 #include <linux/file.h>
  28 #include <linux/vfs.h>
  29 #include <linux/namei.h>
  30 #include <linux/socket.h>
  31 #include <linux/security.h>
  32 #include <linux/syscalls.h>
  33
  34 #include <asm/ptrace.h>
  35 #include <asm/page.h>
  36 #include <asm/uaccess.h>
  37 #include <asm/inventory.h>
  38
  39 /* 2,191 lines of complete and utter shit coming up... */
  40
  41 extern int max_threads;
  42
  43 /* The sysmp commands supported thus far. */
  44 #define MP_NPROCS               1 /* # processor in complex */
  45 #define MP_NAPROCS              2 /* # active processors in complex */
  46 #define MP_PGSIZE               14 /* Return system page size in v1. */
  47
  48 asmlinkage int irix_sysmp(struct pt_regs *regs)
  49 {
  50         unsigned long cmd;
  51         int base = 0;
  52         int error = 0;
  53
  54         if(regs->regs[2] == 1000)
  55                 base = 1;
  56         cmd = regs->regs[base + 4];
  57         switch(cmd) {
  58         case MP_PGSIZE:
  59                 error = PAGE_SIZE;
  60                 break;
  61         case MP_NPROCS:
  62         case MP_NAPROCS:
  63                 error = num_online_cpus();
  64                 break;
  65         default:
  66                 printk("SYSMP[%s:%d]: Unsupported opcode %d\n",
  67                        current->comm, current->pid, (int)cmd);
  68                 error = -EINVAL;
  69                 break;
  70         }
  71
  72         return error;
  73 }
  74
  75 /* The prctl commands. */
  76 #define PR_MAXPROCS          1 /* Tasks/user. */
  77 #define PR_ISBLOCKED         2 /* If blocked, return 1. */
  78 #define PR_SETSTACKSIZE      3 /* Set largest task stack size. */
  79 #define PR_GETSTACKSIZE      4 /* Get largest task stack size. */
  80 #define PR_MAXPPROCS         5 /* Num parallel tasks. */
  81 #define PR_UNBLKONEXEC       6 /* When task exec/exit's, unblock. */
  82 #define PR_SETEXITSIG        8 /* When task exit's, set signal. */
  83 #define PR_RESIDENT          9 /* Make task unswappable. */
  84 #define PR_ATTACHADDR       10 /* (Re-)Connect a vma to a task. */
  85 #define PR_DETACHADDR       11 /* Disconnect a vma from a task. */
  86 #define PR_TERMCHILD        12 /* When parent sleeps with fishes, kill child. */
  87 #define PR_GETSHMASK        13 /* Get the sproc() share mask. */
  88 #define PR_GETNSHARE        14 /* Number of share group members. */
  89 #define PR_COREPID          15 /* Add task pid to name when it core. */
  90 #define PR_ATTACHADDRPERM   16 /* (Re-)Connect vma, with specified prot. */
  91 #define PR_PTHREADEXIT      17 /* Kill a pthread without prejudice. */
  92
  93 asmlinkage int irix_prctl(struct pt_regs *regs)
  94 {
  95         unsigned long cmd;
  96         int error = 0, base = 0;
  97
  98         if (regs->regs[2] == 1000)
  99                 base = 1;
 100         cmd = regs->regs[base + 4];
 101         switch (cmd) {
 102         case PR_MAXPROCS:
 103                 printk("irix_prctl[%s:%d]: Wants PR_MAXPROCS\n",
 104                        current->comm, current->pid);
 105                 error = max_threads;
 106                 break;
 107
 108         case PR_ISBLOCKED: {
 109                 struct task_struct *task;
 110
 111                 printk("irix_prctl[%s:%d]: Wants PR_ISBLOCKED\n",
 112                        current->comm, current->pid);
 113                 read_lock(&tasklist_lock);
 114                 task = find_task_by_pid(regs->regs[base + 5]);
 115                 error = -ESRCH;
 116                 if (error)
 117                         error = (task->run_list.next != NULL);
 118                 read_unlock(&tasklist_lock);
 119                 /* Can _your_ OS find this out that fast? */
 120                 break;
 121         }
 122
 123         case PR_SETSTACKSIZE: {
 124                 long value = regs->regs[base + 5];
 125
 126                 printk("irix_prctl[%s:%d]: Wants PR_SETSTACKSIZE<%08lx>\n",
 127                        current->comm, current->pid, (unsigned long) value);
 128                 if (value > RLIM_INFINITY)
 129                         value = RLIM_INFINITY;
 130                 if (capable(CAP_SYS_ADMIN)) {
 131                         task_lock(current->group_leader);
 132                         current->signal->rlim[RLIMIT_STACK].rlim_max =
 133                                 current->signal->rlim[RLIMIT_STACK].rlim_cur = value;
 134                         task_unlock(current->group_leader);
 135                         error = value;
 136                         break;
 137                 }
 138                 task_lock(current->group_leader);
 139                 if (value > current->signal->rlim[RLIMIT_STACK].rlim_max) {
 140                         error = -EINVAL;
 141                         task_unlock(current->group_leader);
 142                         break;
 143                 }
 144                 current->signal->rlim[RLIMIT_STACK].rlim_cur = value;
 145                 task_unlock(current->group_leader);
 146                 error = value;
 147                 break;
 148         }
 149
 150         case PR_GETSTACKSIZE:
 151                 printk("irix_prctl[%s:%d]: Wants PR_GETSTACKSIZE\n",
 152                        current->comm, current->pid);
 153                 error = current->signal->rlim[RLIMIT_STACK].rlim_cur;
 154                 break;
 155
 156         case PR_MAXPPROCS:
 157                 printk("irix_prctl[%s:%d]: Wants PR_MAXPROCS\n",
 158                        current->comm, current->pid);
 159                 error = 1;
 160                 break;
 161
 162         case PR_UNBLKONEXEC:
 163                 printk("irix_prctl[%s:%d]: Wants PR_UNBLKONEXEC\n",
 164                        current->comm, current->pid);
 165                 error = -EINVAL;
 166                 break;
 167
 168         case PR_SETEXITSIG:
 169                 printk("irix_prctl[%s:%d]: Wants PR_SETEXITSIG\n",
 170                        current->comm, current->pid);
 171
 172                 /* We can probably play some game where we set the task
 173                  * exit_code to some non-zero value when this is requested,
 174                  * and check whether exit_code is already set in do_exit().
 175                  */
 176                 error = -EINVAL;
 177                 break;
 178
 179         case PR_RESIDENT:
 180                 printk("irix_prctl[%s:%d]: Wants PR_RESIDENT\n",
 181                        current->comm, current->pid);
 182                 error = 0; /* Compatibility indeed. */
 183                 break;
 184
 185         case PR_ATTACHADDR:
 186                 printk("irix_prctl[%s:%d]: Wants PR_ATTACHADDR\n",
 187                        current->comm, current->pid);
 188                 error = -EINVAL;
 189                 break;
 190
 191         case PR_DETACHADDR:
 192                 printk("irix_prctl[%s:%d]: Wants PR_DETACHADDR\n",
 193                        current->comm, current->pid);
 194                 error = -EINVAL;
 195                 break;
 196
 197         case PR_TERMCHILD:
 198                 printk("irix_prctl[%s:%d]: Wants PR_TERMCHILD\n",
 199                        current->comm, current->pid);
 200                 error = -EINVAL;
 201                 break;
 202
 203         case PR_GETSHMASK:
 204                 printk("irix_prctl[%s:%d]: Wants PR_GETSHMASK\n",
 205                        current->comm, current->pid);
 206                 error = -EINVAL; /* Until I have the sproc() stuff in. */
 207                 break;
 208
 209         case PR_GETNSHARE:
 210                 error = 0;       /* Until I have the sproc() stuff in. */
 211                 break;
 212
 213         case PR_COREPID:
 214                 printk("irix_prctl[%s:%d]: Wants PR_COREPID\n",
 215                        current->comm, current->pid);
 216                 error = -EINVAL;
 217                 break;
 218
 219         case PR_ATTACHADDRPERM:
 220                 printk("irix_prctl[%s:%d]: Wants PR_ATTACHADDRPERM\n",
 221                        current->comm, current->pid);
 222                 error = -EINVAL;
 223                 break;
 224
 225         case PR_PTHREADEXIT:
 226                 printk("irix_prctl[%s:%d]: Wants PR_PTHREADEXIT\n",
 227                        current->comm, current->pid);
 228                 do_exit(regs->regs[base + 5]);
 229
 230         default:
 231                 printk("irix_prctl[%s:%d]: Non-existant opcode %d\n",
 232                        current->comm, current->pid, (int)cmd);
 233                 error = -EINVAL;
 234                 break;
 235         }
 236
 237         return error;
 238 }
 239
 240 #undef DEBUG_PROCGRPS
 241
 242 extern unsigned long irix_mapelf(int fd, struct elf_phdr *user_phdrp, int cnt);
 243 extern int getrusage(struct task_struct *p, int who, struct rusage __user *ru);
 244 extern char *prom_getenv(char *name);
 245 extern long prom_setenv(char *name, char *value);
 246
 247 /* The syssgi commands supported thus far. */
 248 #define SGI_SYSID         1       /* Return unique per-machine identifier. */
 249 #define SGI_INVENT        5       /* Fetch inventory  */
 250 #   define SGI_INV_SIZEOF 1
 251 #   define SGI_INV_READ   2
 252 #define SGI_RDNAME        6       /* Return string name of a process. */
 253 #define SGI_SETNVRAM      8       /* Set PROM variable. */
 254 #define SGI_GETNVRAM      9       /* Get PROM variable. */
 255 #define SGI_SETPGID      21       /* Set process group id. */
 256 #define SGI_SYSCONF      22       /* POSIX sysconf garbage. */
 257 #define SGI_PATHCONF     24       /* POSIX sysconf garbage. */
 258 #define SGI_SETGROUPS    40       /* POSIX sysconf garbage. */
 259 #define SGI_GETGROUPS    41       /* POSIX sysconf garbage. */
 260 #define SGI_RUSAGE       56       /* BSD style rusage(). */
 261 #define SGI_SSYNC        62       /* Synchronous fs sync. */
 262 #define SGI_GETSID       65       /* SysVr4 get session id. */
 263 #define SGI_ELFMAP       68       /* Map an elf image. */
 264 #define SGI_TOSSTSAVE   108       /* Toss saved vma's. */
 265 #define SGI_FP_BCOPY    129       /* Should FPU bcopy be used on this machine? */
 266 #define SGI_PHYSP      1011       /* Translate virtual into physical page. */
 267
 268 asmlinkage int irix_syssgi(struct pt_regs *regs)
 269 {
 270         unsigned long cmd;
 271         int retval, base = 0;
 272
 273         if (regs->regs[2] == 1000)
 274                 base = 1;
 275
 276         cmd = regs->regs[base + 4];
 277         switch(cmd) {
 278         case SGI_SYSID: {
 279                 char *buf = (char *) regs->regs[base + 5];
 280
 281                 /* XXX Use ethernet addr.... */
 282                 retval = clear_user(buf, 64);
 283                 break;
 284         }
 285 #if 0
 286         case SGI_RDNAME: {
 287                 int pid = (int) regs->regs[base + 5];
 288                 char *buf = (char *) regs->regs[base + 6];
 289                 struct task_struct *p;
 290                 char tcomm[sizeof(current->comm)];
 291
 292                 if (!access_ok(VERIFY_WRITE, buf, sizeof(tcomm))) {
 293                         retval = -EFAULT;
 294                         break;
 295                 }
 296                 read_lock(&tasklist_lock);
 297                 p = find_task_by_pid(pid);
 298                 if (!p) {
 299                         read_unlock(&tasklist_lock);
 300                         retval = -ESRCH;
 301                         break;
 302                 }
 303                 get_task_comm(tcomm, p);
 304                 read_unlock(&tasklist_lock);
 305
 306                 /* XXX Need to check sizes. */
 307                 copy_to_user(buf, tcomm, sizeof(tcomm));
 308                 retval = 0;
 309                 break;
 310         }
 311
 312         case SGI_GETNVRAM: {
 313                 char *name = (char *) regs->regs[base+5];
 314                 char *buf = (char *) regs->regs[base+6];
 315                 char *value;
 316                 return -EINVAL; /* til I fix it */
 317                 if (!access_ok(VERIFY_WRITE, buf, 128)) {
 318                         retval = -EFAULT;
 319                         break;
 320                 }
 321                 value = prom_getenv(name);      /* PROM lock?  */
 322                 if (!value) {
 323                         retval = -EINVAL;
 324                         break;
 325                 }
 326                 /* Do I strlen() for the length? */
 327                 copy_to_user(buf, value, 128);
 328                 retval = 0;
 329                 break;
 330         }
 331
 332         case SGI_SETNVRAM: {
 333                 char *name = (char *) regs->regs[base+5];
 334                 char *value = (char *) regs->regs[base+6];
 335                 return -EINVAL; /* til I fix it */
 336                 retval = prom_setenv(name, value);
 337                 /* XXX make sure retval conforms to syssgi(2) */
 338                 printk("[%s:%d] setnvram(\"%s\", \"%s\"): retval %d",
 339                        current->comm, current->pid, name, value, retval);
 340 /*              if (retval == PROM_ENOENT)
 341                         retval = -ENOENT; */
 342                 break;
 343         }
 344 #endif
 345
 346         case SGI_SETPGID: {
 347 #ifdef DEBUG_PROCGRPS
 348                 printk("[%s:%d] setpgid(%d, %d) ",
 349                        current->comm, current->pid,
 350                        (int) regs->regs[base + 5], (int)regs->regs[base + 6]);
 351 #endif
 352                 retval = sys_setpgid(regs->regs[base + 5], regs->regs[base + 6]);
 353
 354 #ifdef DEBUG_PROCGRPS
 355                 printk("retval=%d\n", retval);
 356 #endif
 357         }
 358
 359         case SGI_SYSCONF: {
 360                 switch(regs->regs[base + 5]) {
 361                 case 1:
 362                         retval = (MAX_ARG_PAGES >> 4); /* XXX estimate... */
 363                         goto out;
 364                 case 2:
 365                         retval = max_threads;
 366                         goto out;
 367                 case 3:
 368                         retval = HZ;
 369                         goto out;
 370                 case 4:
 371                         retval = NGROUPS_MAX;
 372                         goto out;
 373                 case 5:
 374                         retval = NR_OPEN;
 375                         goto out;
 376                 case 6:
 377                         retval = 1;
 378                         goto out;
 379                 case 7:
 380                         retval = 1;
 381                         goto out;
 382                 case 8:
 383                         retval = 199009;
 384                         goto out;
 385                 case 11:
 386                         retval = PAGE_SIZE;
 387                         goto out;
 388                 case 12:
 389                         retval = 4;
 390                         goto out;
 391                 case 25:
 392                 case 26:
 393                 case 27:
 394                 case 28:
 395                 case 29:
 396                 case 30:
 397                         retval = 0;
 398                         goto out;
 399                 case 31:
 400                         retval = 32;
 401                         goto out;
 402                 default:
 403                         retval = -EINVAL;
 404                         goto out;
 405                 };
 406         }
 407
 408         case SGI_SETGROUPS:
 409                 retval = sys_setgroups((int) regs->regs[base + 5],
 410                                        (gid_t *) regs->regs[base + 6]);
 411                 break;
 412
 413         case SGI_GETGROUPS:
 414                 retval = sys_getgroups((int) regs->regs[base + 5],
 415                                        (gid_t *) regs->regs[base + 6]);
 416                 break;
 417
 418         case SGI_RUSAGE: {
 419                 struct rusage *ru = (struct rusage *) regs->regs[base + 6];
 420
 421                 switch((int) regs->regs[base + 5]) {
 422                 case 0:
 423                         /* rusage self */
 424                         retval = getrusage(current, RUSAGE_SELF, ru);
 425                         goto out;
 426
 427                 case -1:
 428                         /* rusage children */
 429                         retval = getrusage(current, RUSAGE_CHILDREN, ru);
 430                         goto out;
 431
 432                 default:
 433                         retval = -EINVAL;
 434                         goto out;
 435                 };
 436         }
 437
 438         case SGI_SSYNC:
 439                 sys_sync();
 440                 retval = 0;
 441                 break;
 442
 443         case SGI_GETSID:
 444 #ifdef DEBUG_PROCGRPS
 445                 printk("[%s:%d] getsid(%d) ", current->comm, current->pid,
 446                        (int) regs->regs[base + 5]);
 447 #endif
 448                 retval = sys_getsid(regs->regs[base + 5]);
 449 #ifdef DEBUG_PROCGRPS
 450                 printk("retval=%d\n", retval);
 451 #endif
 452                 break;
 453
 454         case SGI_ELFMAP:
 455                 retval = irix_mapelf((int) regs->regs[base + 5],
 456                                      (struct elf_phdr *) regs->regs[base + 6],
 457                                      (int) regs->regs[base + 7]);
 458                 break;
 459
 460         case SGI_TOSSTSAVE:
 461                 /* XXX We don't need to do anything? */
 462                 retval = 0;
 463                 break;
 464
 465         case SGI_FP_BCOPY:
 466                 retval = 0;
 467                 break;
 468
 469         case SGI_PHYSP: {
 470                 unsigned long addr = regs->regs[base + 5];
 471                 int *pageno = (int *) (regs->regs[base + 6]);
 472                 struct mm_struct *mm = current->mm;
 473                 pgd_t *pgdp;
 474                 pmd_t *pmdp;
 475                 pte_t *ptep;
 476
 477                 if (!access_ok(VERIFY_WRITE, pageno, sizeof(int)))
 478                         return -EFAULT;
 479
 480                 down_read(&mm->mmap_sem);
 481                 pgdp = pgd_offset(mm, addr);
 482                 pmdp = pmd_offset(pgdp, addr);
 483                 ptep = pte_offset(pmdp, addr);
 484                 retval = -EINVAL;
 485                 if (ptep) {
 486                         pte_t pte = *ptep;
 487
 488                         if (pte_val(pte) & (_PAGE_VALID | _PAGE_PRESENT)) {
 489                                 retval =  put_user((pte_val(pte) & PAGE_MASK) >>
 490                                                    PAGE_SHIFT, pageno);
 491                         }
 492                 }
 493                 up_read(&mm->mmap_sem);
 494                 break;
 495         }
 496
 497         case SGI_INVENT: {
 498                 int  arg1    = (int)    regs->regs [base + 5];
 499                 void *buffer = (void *) regs->regs [base + 6];
 500                 int  count   = (int)    regs->regs [base + 7];
 501
 502                 switch (arg1) {
 503                 case SGI_INV_SIZEOF:
 504                         retval = sizeof (inventory_t);
 505                         break;
 506                 case SGI_INV_READ:
 507                         retval = dump_inventory_to_user (buffer, count);
 508                         break;
 509                 default:
 510                         retval = -EINVAL;
 511                 }
 512                 break;
 513         }
 514
 515         default:
 516                 printk("irix_syssgi: Unsupported command %d\n", (int)cmd);
 517                 retval = -EINVAL;
 518                 break;
 519         };
 520
 521 out:
 522         return retval;
 523 }
 524
 525 asmlinkage int irix_gtime(struct pt_regs *regs)
 526 {
 527         return get_seconds();
 528 }
 529
 530 /*
 531  * IRIX is completely broken... it returns 0 on success, otherwise
 532  * ENOMEM.
 533  */
 534 asmlinkage int irix_brk(unsigned long brk)
 535 {
 536         unsigned long rlim;
 537         unsigned long newbrk, oldbrk;
 538         struct mm_struct *mm = current->mm;
 539         int ret;
 540
 541         down_write(&mm->mmap_sem);
 542         if (brk < mm->end_code) {
 543                 ret = -ENOMEM;
 544                 goto out;
 545         }
 546
 547         newbrk = PAGE_ALIGN(brk);
 548         oldbrk = PAGE_ALIGN(mm->brk);
 549         if (oldbrk == newbrk) {
 550                 mm->brk = brk;
 551                 ret = 0;
 552                 goto out;
 553         }
 554
 555         /*
 556          * Always allow shrinking brk
 557          */
 558         if (brk <= mm->brk) {
 559                 mm->brk = brk;
 560                 do_munmap(mm, newbrk, oldbrk-newbrk);
 561                 ret = 0;
 562                 goto out;
 563         }
 564         /*
 565          * Check against rlimit and stack..
 566          */
 567         rlim = current->signal->rlim[RLIMIT_DATA].rlim_cur;
 568         if (rlim >= RLIM_INFINITY)
 569                 rlim = ~0;
 570         if (brk - mm->end_code > rlim) {
 571                 ret = -ENOMEM;
 572                 goto out;
 573         }
 574
 575         /*
 576          * Check against existing mmap mappings.
 577          */
 578         if (find_vma_intersection(mm, oldbrk, newbrk+PAGE_SIZE)) {
 579                 ret = -ENOMEM;
 580                 goto out;
 581         }
 582
 583         /*
 584          * Check if we have enough memory..
 585          */
 586         if (security_vm_enough_memory((newbrk-oldbrk) >> PAGE_SHIFT)) {
 587                 ret = -ENOMEM;
 588                 goto out;
 589         }
 590
 591         /*
 592          * Ok, looks good - let it rip.
 593          */
 594         mm->brk = brk;
 595         do_brk(oldbrk, newbrk-oldbrk);
 596         ret = 0;
 597
 598 out:
 599         up_write(&mm->mmap_sem);
 600         return ret;
 601 }
 602
 603 asmlinkage int irix_getpid(struct pt_regs *regs)
 604 {
 605         regs->regs[3] = current->real_parent->pid;
 606         return current->pid;
 607 }
 608
 609 asmlinkage int irix_getuid(struct pt_regs *regs)
 610 {
 611         regs->regs[3] = current->euid;
 612         return current->uid;
 613 }
 614
 615 asmlinkage int irix_getgid(struct pt_regs *regs)
 616 {
 617         regs->regs[3] = current->egid;
 618         return current->gid;
 619 }
 620
 621 asmlinkage int irix_stime(int value)
 622 {
 623         int err;
 624         struct timespec tv;
 625
 626         tv.tv_sec = value;
 627         tv.tv_nsec = 0;
 628         err = security_settime(&tv, NULL);
 629         if (err)
 630                 return err;
 631
 632         write_seqlock_irq(&xtime_lock);
 633         xtime.tv_sec = value;
 634         xtime.tv_nsec = 0;
 635         ntp_clear();
 636         write_sequnlock_irq(&xtime_lock);
 637
 638         return 0;
 639 }
 640
 641 static inline void jiffiestotv(unsigned long jiffies, struct timeval *value)
 642 {
 643         value->tv_usec = (jiffies % HZ) * (1000000 / HZ);
 644         value->tv_sec = jiffies / HZ;
 645 }
 646
 647 static inline void getitimer_real(struct itimerval *value)
 648 {
 649         register unsigned long val, interval;
 650
 651         interval = current->it_real_incr;
 652         val = 0;
 653         if (del_timer(&current->real_timer)) {
 654                 unsigned long now = jiffies;
 655                 val = current->real_timer.expires;
 656                 add_timer(&current->real_timer);
 657                 /* look out for negative/zero itimer.. */
 658                 if (val <= now)
 659                         val = now+1;
 660                 val -= now;
 661         }
 662         jiffiestotv(val, &value->it_value);
 663         jiffiestotv(interval, &value->it_interval);
 664 }
 665
 666 asmlinkage unsigned int irix_alarm(unsigned int seconds)
 667 {
 668         struct itimerval it_new, it_old;
 669         unsigned int oldalarm;
 670
 671         if (!seconds) {
 672                 getitimer_real(&it_old);
 673                 del_timer(&current->real_timer);
 674         } else {
 675                 it_new.it_interval.tv_sec = it_new.it_interval.tv_usec = 0;
 676                 it_new.it_value.tv_sec = seconds;
 677                 it_new.it_value.tv_usec = 0;
 678                 do_setitimer(ITIMER_REAL, &it_new, &it_old);
 679         }
 680         oldalarm = it_old.it_value.tv_sec;
 681         /*
 682          * ehhh.. We can't return 0 if we have an alarm pending ...
 683          * And we'd better return too much than too little anyway
 684          */
 685         if (it_old.it_value.tv_usec)
 686                 oldalarm++;
 687
 688         return oldalarm;
 689 }
 690
 691 asmlinkage int irix_pause(void)
 692 {
 693         current->state = TASK_INTERRUPTIBLE;
 694         schedule();
 695
 696         return -EINTR;
 697 }
 698
 699 /* XXX need more than this... */
 700 asmlinkage int irix_mount(char *dev_name, char *dir_name, unsigned long flags,
 701                           char *type, void *data, int datalen)
 702 {
 703         printk("[%s:%d] irix_mount(%p,%p,%08lx,%p,%p,%d)\n",
 704                current->comm, current->pid,
 705                dev_name, dir_name, flags, type, data, datalen);
 706
 707         return sys_mount(dev_name, dir_name, type, flags, data);
 708 }
 709
 710 struct irix_statfs {
 711         short f_type;
 712         long  f_bsize, f_frsize, f_blocks, f_bfree, f_files, f_ffree;
 713         char  f_fname[6], f_fpack[6];
 714 };
 715
 716 asmlinkage int irix_statfs(const char *path, struct irix_statfs *buf,
 717                            int len, int fs_type)
 718 {
 719         struct nameidata nd;
 720         struct kstatfs kbuf;
 721         int error, i;
 722
 723         /* We don't support this feature yet. */
 724         if (fs_type) {
 725                 error = -EINVAL;
 726                 goto out;
 727         }
 728         if (!access_ok(VERIFY_WRITE, buf, sizeof(struct irix_statfs))) {
 729                 error = -EFAULT;
 730                 goto out;
 731         }
 732         error = user_path_walk(path, &nd);
 733         if (error)
 734                 goto out;
 735
 736         error = vfs_statfs(nd.dentry->d_inode->i_sb, &kbuf);
 737         if (error)
 738                 goto dput_and_out;
 739
 740         __put_user(kbuf.f_type, &buf->f_type);
 741         __put_user(kbuf.f_bsize, &buf->f_bsize);
 742         __put_user(kbuf.f_frsize, &buf->f_frsize);
 743         __put_user(kbuf.f_blocks, &buf->f_blocks);
 744         __put_user(kbuf.f_bfree, &buf->f_bfree);
 745         __put_user(kbuf.f_files, &buf->f_files);
 746         __put_user(kbuf.f_ffree, &buf->f_ffree);
 747         for (i = 0; i < 6; i++) {
 748                 __put_user(0, &buf->f_fname[i]);
 749                 __put_user(0, &buf->f_fpack[i]);
 750         }
 751         error = 0;
 752
 753 dput_and_out:
 754         path_release(&nd);
 755 out:
 756         return error;
 757 }
 758
 759 asmlinkage int irix_fstatfs(unsigned int fd, struct irix_statfs *buf)
 760 {
 761         struct kstatfs kbuf;
 762         struct file *file;
 763         int error, i;
 764
 765         if (!access_ok(VERIFY_WRITE, buf, sizeof(struct irix_statfs))) {
 766                 error = -EFAULT;
 767                 goto out;
 768         }
 769         if (!(file = fget(fd))) {
 770                 error = -EBADF;
 771                 goto out;
 772         }
 773
 774         error = vfs_statfs(file->f_dentry->d_inode->i_sb, &kbuf);
 775         if (error)
 776                 goto out_f;
 777
 778         __put_user(kbuf.f_type, &buf->f_type);
 779         __put_user(kbuf.f_bsize, &buf->f_bsize);
 780         __put_user(kbuf.f_frsize, &buf->f_frsize);
 781         __put_user(kbuf.f_blocks, &buf->f_blocks);
 782         __put_user(kbuf.f_bfree, &buf->f_bfree);
 783         __put_user(kbuf.f_files, &buf->f_files);
 784         __put_user(kbuf.f_ffree, &buf->f_ffree);
 785         for(i = 0; i < 6; i++) {
 786                 __put_user(0, &buf->f_fname[i]);
 787                 __put_user(0, &buf->f_fpack[i]);
 788         }
 789
 790 out_f:
 791         fput(file);
 792 out:
 793         return error;
 794 }
 795
 796 asmlinkage int irix_setpgrp(int flags)
 797 {
 798         int error;
 799
 800 #ifdef DEBUG_PROCGRPS
 801         printk("[%s:%d] setpgrp(%d) ", current->comm, current->pid, flags);
 802 #endif
 803         if(!flags)
 804                 error = process_group(current);
 805         else
 806                 error = sys_setsid();
 807 #ifdef DEBUG_PROCGRPS
 808         printk("returning %d\n", process_group(current));
 809 #endif
 810
 811         return error;
 812 }
 813
 814 asmlinkage int irix_times(struct tms * tbuf)
 815 {
 816         int err = 0;
 817
 818         if (tbuf) {
 819                 if (!access_ok(VERIFY_WRITE,tbuf,sizeof *tbuf))
 820                         return -EFAULT;
 821                 err |= __put_user(current->utime, &tbuf->tms_utime);
 822                 err |= __put_user(current->stime, &tbuf->tms_stime);
 823                 err |= __put_user(current->signal->cutime, &tbuf->tms_cutime);
 824                 err |= __put_user(current->signal->cstime, &tbuf->tms_cstime);
 825         }
 826
 827         return err;
 828 }
 829
 830 asmlinkage int irix_exec(struct pt_regs *regs)
 831 {
 832         int error, base = 0;
 833         char *filename;
 834
 835         if(regs->regs[2] == 1000)
 836                 base = 1;
 837         filename = getname((char *) (long)regs->regs[base + 4]);
 838         error = PTR_ERR(filename);
 839         if (IS_ERR(filename))
 840                 return error;
 841
 842         error = do_execve(filename, (char **) (long)regs->regs[base + 5],
 843                           (char **) 0, regs);
 844         putname(filename);
 845
 846         return error;
 847 }
 848
 849 asmlinkage int irix_exece(struct pt_regs *regs)
 850 {
 851         int error, base = 0;
 852         char *filename;
 853
 854         if (regs->regs[2] == 1000)
 855                 base = 1;
 856         filename = getname((char *) (long)regs->regs[base + 4]);
 857         error = PTR_ERR(filename);
 858         if (IS_ERR(filename))
 859                 return error;
 860         error = do_execve(filename, (char **) (long)regs->regs[base + 5],
 861                           (char **) (long)regs->regs[base + 6], regs);
 862         putname(filename);
 863
 864         return error;
 865 }
 866
 867 asmlinkage unsigned long irix_gethostid(void)
 868 {
 869         printk("[%s:%d]: irix_gethostid() called...\n",
 870                current->comm, current->pid);
 871
 872         return -EINVAL;
 873 }
 874
 875 asmlinkage unsigned long irix_sethostid(unsigned long val)
 876 {
 877         printk("[%s:%d]: irix_sethostid(%08lx) called...\n",
 878                current->comm, current->pid, val);
 879
 880         return -EINVAL;
 881 }
 882
 883 asmlinkage int irix_socket(int family, int type, int protocol)
 884 {
 885         switch(type) {
 886         case 1:
 887                 type = SOCK_DGRAM;
 888                 break;
 889
 890         case 2:
 891                 type = SOCK_STREAM;
 892                 break;
 893
 894         case 3:
 895                 type = 9; /* Invalid... */
 896                 break;
 897
 898         case 4:
 899                 type = SOCK_RAW;
 900                 break;
 901
 902         case 5:
 903                 type = SOCK_RDM;
 904                 break;
 905
 906         case 6:
 907                 type = SOCK_SEQPACKET;
 908                 break;
 909
 910         default:
 911                 break;
 912         }
 913
 914         return sys_socket(family, type, protocol);
 915 }
 916
 917 asmlinkage int irix_getdomainname(char *name, int len)
 918 {
 919         int error;
 920
 921         if (!access_ok(VERIFY_WRITE, name, len))
 922                 return -EFAULT;
 923
 924         down_read(&uts_sem);
 925         if (len > __NEW_UTS_LEN)
 926                 len = __NEW_UTS_LEN;
 927         error = 0;
 928         if (copy_to_user(name, system_utsname.domainname, len))
 929                 error = -EFAULT;
 930         up_read(&uts_sem);
 931
 932         return error;
 933 }
 934
 935 asmlinkage unsigned long irix_getpagesize(void)
 936 {
 937         return PAGE_SIZE;
 938 }
 939
 940 asmlinkage int irix_msgsys(int opcode, unsigned long arg0, unsigned long arg1,
 941                            unsigned long arg2, unsigned long arg3,
 942                            unsigned long arg4)
 943 {
 944         switch (opcode) {
 945         case 0:
 946                 return sys_msgget((key_t) arg0, (int) arg1);
 947         case 1:
 948                 return sys_msgctl((int) arg0, (int) arg1, (struct msqid_ds *)arg2);
 949         case 2:
 950                 return sys_msgrcv((int) arg0, (struct msgbuf *) arg1,
 951                                   (size_t) arg2, (long) arg3, (int) arg4);
 952         case 3:
 953                 return sys_msgsnd((int) arg0, (struct msgbuf *) arg1,
 954                                   (size_t) arg2, (int) arg3);
 955         default:
 956                 return -EINVAL;
 957         }
 958 }
 959
 960 asmlinkage int irix_shmsys(int opcode, unsigned long arg0, unsigned long arg1,
 961                            unsigned long arg2, unsigned long arg3)
 962 {
 963         switch (opcode) {
 964         case 0:
 965                 return do_shmat((int) arg0, (char *)arg1, (int) arg2,
 966                                  (unsigned long *) arg3);
 967         case 1:
 968                 return sys_shmctl((int)arg0, (int)arg1, (struct shmid_ds *)arg2);
 969         case 2:
 970                 return sys_shmdt((char *)arg0);
 971         case 3:
 972                 return sys_shmget((key_t) arg0, (int) arg1, (int) arg2);
 973         default:
 974                 return -EINVAL;
 975         }
 976 }
 977
 978 asmlinkage int irix_semsys(int opcode, unsigned long arg0, unsigned long arg1,
 979                            unsigned long arg2, int arg3)
 980 {
 981         switch (opcode) {
 982         case 0:
 983                 return sys_semctl((int) arg0, (int) arg1, (int) arg2,
 984                                   (union semun) arg3);
 985         case 1:
 986                 return sys_semget((key_t) arg0, (int) arg1, (int) arg2);
 987         case 2:
 988                 return sys_semop((int) arg0, (struct sembuf *)arg1,
 989                                  (unsigned int) arg2);
 990         default:
 991                 return -EINVAL;
 992         }
 993 }
 994
 995 static inline loff_t llseek(struct file *file, loff_t offset, int origin)
 996 {
 997         loff_t (*fn)(struct file *, loff_t, int);
 998         loff_t retval;
 999
1000         fn = default_llseek;
1001         if (file->f_op && file->f_op->llseek)
1002         fn = file->f_op->llseek;
1003         lock_kernel();
1004         retval = fn(file, offset, origin);
1005         unlock_kernel();
1006         return retval;
1007 }
1008
1009 asmlinkage int irix_lseek64(int fd, int _unused, int offhi, int offlow,
1010                             int origin)
1011 {
1012         int retval;
1013         struct file * file;
1014         loff_t offset;
1015
1016         retval = -EBADF;
1017         file = fget(fd);
1018         if (!file)
1019                 goto bad;
1020         retval = -EINVAL;
1021         if (origin > 2)
1022                 goto out_putf;
1023
1024         offset = llseek(file, ((loff_t) offhi << 32) | offlow, origin);
1025         retval = (int) offset;
1026
1027 out_putf:
1028         fput(file);
1029 bad:
1030         return retval;
1031 }
1032
1033 asmlinkage int irix_sginap(int ticks)
1034 {
1035         current->state = TASK_INTERRUPTIBLE;
1036         schedule_timeout(ticks);
1037         return 0;
1038 }
1039
1040 asmlinkage int irix_sgikopt(char *istring, char *ostring, int len)
1041 {
1042         return -EINVAL;
1043 }
1044
1045 asmlinkage int irix_gettimeofday(struct timeval *tv)
1046 {
1047         time_t sec;
1048         long nsec, seq;
1049         int err;
1050
1051         if (!access_ok(VERIFY_WRITE, tv, sizeof(struct timeval)))
1052                 return -EFAULT;
1053
1054         do {
1055                 seq = read_seqbegin(&xtime_lock);
1056                 sec = xtime.tv_sec;
1057                 nsec = xtime.tv_nsec;
1058         } while (read_seqretry(&xtime_lock, seq));
1059
1060         err = __put_user(sec, &tv->tv_sec);
1061         err |= __put_user((nsec / 1000), &tv->tv_usec);
1062
1063         return err;
1064 }
1065
1066 #define IRIX_MAP_AUTOGROW 0x40
1067
1068 asmlinkage unsigned long irix_mmap32(unsigned long addr, size_t len, int prot,
1069                                      int flags, int fd, off_t offset)
1070 {
1071         struct file *file = NULL;
1072         unsigned long retval;
1073
1074         if (!(flags & MAP_ANONYMOUS)) {
1075                 if (!(file = fget(fd)))
1076                         return -EBADF;
1077
1078                 /* Ok, bad taste hack follows, try to think in something else
1079                  * when reading this.  */
1080                 if (flags & IRIX_MAP_AUTOGROW) {
1081                         unsigned long old_pos;
1082                         long max_size = offset + len;
1083
1084                         if (max_size > file->f_dentry->d_inode->i_size) {
1085                                 old_pos = sys_lseek (fd, max_size - 1, 0);
1086                                 sys_write (fd, "", 1);
1087                                 sys_lseek (fd, old_pos, 0);
1088                         }
1089                 }
1090         }
1091
1092         flags &= ~(MAP_EXECUTABLE | MAP_DENYWRITE);
1093
1094         down_write(&current->mm->mmap_sem);
1095         retval = do_mmap(file, addr, len, prot, flags, offset);
1096         up_write(&current->mm->mmap_sem);
1097         if (file)
1098                 fput(file);
1099
1100         return retval;
1101 }
1102
1103 asmlinkage int irix_madvise(unsigned long addr, int len, int behavior)
1104 {
1105         printk("[%s:%d] Wheee.. irix_madvise(%08lx,%d,%d)\n",
1106                current->comm, current->pid, addr, len, behavior);
1107
1108         return -EINVAL;
1109 }
1110
1111 asmlinkage int irix_pagelock(char *addr, int len, int op)
1112 {
1113         printk("[%s:%d] Wheee.. irix_pagelock(%p,%d,%d)\n",
1114                current->comm, current->pid, addr, len, op);
1115
1116         return -EINVAL;
1117 }
1118
1119 asmlinkage int irix_quotactl(struct pt_regs *regs)
1120 {
1121         printk("[%s:%d] Wheee.. irix_quotactl()\n",
1122                current->comm, current->pid);
1123
1124         return -EINVAL;
1125 }
1126
1127 asmlinkage int irix_BSDsetpgrp(int pid, int pgrp)
1128 {
1129         int error;
1130
1131 #ifdef DEBUG_PROCGRPS
1132         printk("[%s:%d] BSDsetpgrp(%d, %d) ", current->comm, current->pid,
1133                pid, pgrp);
1134 #endif
1135         if(!pid)
1136                 pid = current->pid;
1137
1138         /* Wheee, weird sysv thing... */
1139         if ((pgrp == 0) && (pid == current->pid))
1140                 error = sys_setsid();
1141         else
1142                 error = sys_setpgid(pid, pgrp);
1143
1144 #ifdef DEBUG_PROCGRPS
1145         printk("error = %d\n", error);
1146 #endif
1147
1148         return error;
1149 }
1150
1151 asmlinkage int irix_systeminfo(int cmd, char *buf, int cnt)
1152 {
1153         printk("[%s:%d] Wheee.. irix_systeminfo(%d,%p,%d)\n",
1154                current->comm, current->pid, cmd, buf, cnt);
1155
1156         return -EINVAL;
1157 }
1158
1159 struct iuname {
1160         char sysname[257], nodename[257], release[257];
1161         char version[257], machine[257];
1162         char m_type[257], base_rel[257];
1163         char _unused0[257], _unused1[257], _unused2[257];
1164         char _unused3[257], _unused4[257], _unused5[257];
1165 };
1166
1167 asmlinkage int irix_uname(struct iuname *buf)
1168 {
1169         down_read(&uts_sem);
1170         if (copy_to_user(system_utsname.sysname, buf->sysname, 65)
1171             || copy_to_user(system_utsname.nodename, buf->nodename, 65)
1172             || copy_to_user(system_utsname.release, buf->release, 65)
1173             || copy_to_user(system_utsname.version, buf->version, 65)
1174             || copy_to_user(system_utsname.machine, buf->machine, 65)) {
1175                 return -EFAULT;
1176         }
1177         up_read(&uts_sem);
1178
1179         return 1;
1180 }
1181
1182 #undef DEBUG_XSTAT
1183
1184 static int irix_xstat32_xlate(struct kstat *stat, void *ubuf)
1185 {
1186         struct xstat32 {
1187                 u32 st_dev, st_pad1[3], st_ino, st_mode, st_nlink, st_uid, st_gid;
1188                 u32 st_rdev, st_pad2[2], st_size, st_pad3;
1189                 u32 st_atime0, st_atime1;
1190                 u32 st_mtime0, st_mtime1;
1191                 u32 st_ctime0, st_ctime1;
1192                 u32 st_blksize, st_blocks;
1193                 char st_fstype[16];
1194                 u32 st_pad4[8];
1195         } ub;
1196
1197         if (!sysv_valid_dev(stat->dev) || !sysv_valid_dev(stat->rdev))
1198                 return -EOVERFLOW;
1199         ub.st_dev     = sysv_encode_dev(stat->dev);
1200         ub.st_ino     = stat->ino;
1201         ub.st_mode    = stat->mode;
1202         ub.st_nlink   = stat->nlink;
1203         SET_UID(ub.st_uid, stat->uid);
1204         SET_GID(ub.st_gid, stat->gid);
1205         ub.st_rdev    = sysv_encode_dev(stat->rdev);
1206 #if BITS_PER_LONG == 32
1207         if (stat->size > MAX_NON_LFS)
1208                 return -EOVERFLOW;
1209 #endif
1210         ub.st_size    = stat->size;
1211         ub.st_atime0  = stat->atime.tv_sec;
1212         ub.st_atime1  = stat->atime.tv_nsec;
1213         ub.st_mtime0  = stat->mtime.tv_sec;
1214         ub.st_mtime1  = stat->atime.tv_nsec;
1215         ub.st_ctime0  = stat->ctime.tv_sec;
1216         ub.st_ctime1  = stat->atime.tv_nsec;
1217         ub.st_blksize = stat->blksize;
1218         ub.st_blocks  = stat->blocks;
1219         strcpy (ub.st_fstype, "efs");
1220
1221         return copy_to_user(ubuf, &ub, sizeof(ub)) ? -EFAULT : 0;
1222 }
1223
1224 static int irix_xstat64_xlate(struct kstat *stat, void *ubuf)
1225 {
1226         struct xstat64 {
1227                 u32 st_dev; s32 st_pad1[3];
1228                 unsigned long long st_ino;
1229                 u32 st_mode;
1230                 u32 st_nlink; s32 st_uid; s32 st_gid; u32 st_rdev;
1231                 s32 st_pad2[2];
1232                 long long st_size;
1233                 s32 st_pad3;
1234                 struct { s32 tv_sec, tv_nsec; } st_atime, st_mtime, st_ctime;
1235                 s32 st_blksize;
1236                 long long  st_blocks;
1237                 char st_fstype[16];
1238                 s32 st_pad4[8];
1239         } ks;
1240
1241         if (!sysv_valid_dev(stat->dev) || !sysv_valid_dev(stat->rdev))
1242                 return -EOVERFLOW;
1243
1244         ks.st_dev = sysv_encode_dev(stat->dev);
1245         ks.st_pad1[0] = ks.st_pad1[1] = ks.st_pad1[2] = 0;
1246         ks.st_ino = (unsigned long long) stat->ino;
1247         ks.st_mode = (u32) stat->mode;
1248         ks.st_nlink = (u32) stat->nlink;
1249         ks.st_uid = (s32) stat->uid;
1250         ks.st_gid = (s32) stat->gid;
1251         ks.st_rdev = sysv_encode_dev (stat->rdev);
1252         ks.st_pad2[0] = ks.st_pad2[1] = 0;
1253         ks.st_size = (long long) stat->size;
1254         ks.st_pad3 = 0;
1255
1256         /* XXX hackety hack... */
1257         ks.st_atime.tv_sec = (s32) stat->atime.tv_sec;
1258         ks.st_atime.tv_nsec = stat->atime.tv_nsec;
1259         ks.st_mtime.tv_sec = (s32) stat->mtime.tv_sec;
1260         ks.st_mtime.tv_nsec = stat->mtime.tv_nsec;
1261         ks.st_ctime.tv_sec = (s32) stat->ctime.tv_sec;
1262         ks.st_ctime.tv_nsec = stat->ctime.tv_nsec;
1263
1264         ks.st_blksize = (s32) stat->blksize;
1265         ks.st_blocks = (long long) stat->blocks;
1266         memset(ks.st_fstype, 0, 16);
1267         ks.st_pad4[0] = ks.st_pad4[1] = ks.st_pad4[2] = ks.st_pad4[3] = 0;
1268         ks.st_pad4[4] = ks.st_pad4[5] = ks.st_pad4[6] = ks.st_pad4[7] = 0;
1269
1270         /* Now write it all back. */
1271         return copy_to_user(ubuf, &ks, sizeof(ks)) ? -EFAULT : 0;
1272 }
1273
1274 asmlinkage int irix_xstat(int version, char *filename, struct stat *statbuf)
1275 {
1276         int retval;
1277         struct kstat stat;
1278
1279 #ifdef DEBUG_XSTAT
1280         printk("[%s:%d] Wheee.. irix_xstat(%d,%s,%p) ",
1281                current->comm, current->pid, version, filename, statbuf);
1282 #endif
1283
1284         retval = vfs_stat(filename, &stat);
1285         if (!retval) {
1286                 switch(version) {
1287                         case 2:
1288                                 retval = irix_xstat32_xlate(&stat, statbuf);
1289                                 break;
1290                         case 3:
1291                                 retval = irix_xstat64_xlate(&stat, statbuf);
1292                                 break;
1293                         default:
1294                                 retval = -EINVAL;
1295                 }
1296         }
1297         return retval;
1298 }
1299
1300 asmlinkage int irix_lxstat(int version, char *filename, struct stat *statbuf)
1301 {
1302         int error;
1303         struct kstat stat;
1304
1305 #ifdef DEBUG_XSTAT
1306         printk("[%s:%d] Wheee.. irix_lxstat(%d,%s,%p) ",
1307                current->comm, current->pid, version, filename, statbuf);
1308 #endif
1309
1310         error = vfs_lstat(filename, &stat);
1311
1312         if (!error) {
1313                 switch (version) {
1314                         case 2:
1315                                 error = irix_xstat32_xlate(&stat, statbuf);
1316                                 break;
1317                         case 3:
1318                                 error = irix_xstat64_xlate(&stat, statbuf);
1319                                 break;
1320                         default:
1321                                 error = -EINVAL;
1322                 }
1323         }
1324         return error;
1325 }
1326
1327 asmlinkage int irix_fxstat(int version, int fd, struct stat *statbuf)
1328 {
1329         int error;
1330         struct kstat stat;
1331
1332 #ifdef DEBUG_XSTAT
1333         printk("[%s:%d] Wheee.. irix_fxstat(%d,%d,%p) ",
1334                current->comm, current->pid, version, fd, statbuf);
1335 #endif
1336
1337         error = vfs_fstat(fd, &stat);
1338         if (!error) {
1339                 switch (version) {
1340                         case 2:
1341                                 error = irix_xstat32_xlate(&stat, statbuf);
1342                                 break;
1343                         case 3:
1344                                 error = irix_xstat64_xlate(&stat, statbuf);
1345                                 break;
1346                         default:
1347                                 error = -EINVAL;
1348                 }
1349         }
1350         return error;
1351 }
1352
1353 asmlinkage int irix_xmknod(int ver, char *filename, int mode, unsigned dev)
1354 {
1355         int retval;
1356         printk("[%s:%d] Wheee.. irix_xmknod(%d,%s,%x,%x)\n",
1357                current->comm, current->pid, ver, filename, mode, dev);
1358
1359         switch(ver) {
1360         case 2:
1361                 /* shouldn't we convert here as well as on stat()? */
1362                 retval = sys_mknod(filename, mode, dev);
1363                 break;
1364
1365         default:
1366                 retval = -EINVAL;
1367                 break;
1368         };
1369
1370         return retval;
1371 }
1372
1373 asmlinkage int irix_swapctl(int cmd, char *arg)
1374 {
1375         printk("[%s:%d] Wheee.. irix_swapctl(%d,%p)\n",
1376                current->comm, current->pid, cmd, arg);
1377
1378         return -EINVAL;
1379 }
1380
1381 struct irix_statvfs {
1382         u32 f_bsize; u32 f_frsize; u32 f_blocks;
1383         u32 f_bfree; u32 f_bavail; u32 f_files; u32 f_ffree; u32 f_favail;
1384         u32 f_fsid; char f_basetype[16];
1385         u32 f_flag; u32 f_namemax;
1386         char    f_fstr[32]; u32 f_filler[16];
1387 };
1388
1389 asmlinkage int irix_statvfs(char *fname, struct irix_statvfs *buf)
1390 {
1391         struct nameidata nd;
1392         struct kstatfs kbuf;
1393         int error, i;
1394
1395         printk("[%s:%d] Wheee.. irix_statvfs(%s,%p)\n",
1396                current->comm, current->pid, fname, buf);
1397         if (!access_ok(VERIFY_WRITE, buf, sizeof(struct irix_statvfs))) {
1398                 error = -EFAULT;
1399                 goto out;
1400         }
1401         error = user_path_walk(fname, &nd);
1402         if (error)
1403                 goto out;
1404         error = vfs_statfs(nd.dentry->d_inode->i_sb, &kbuf);
1405         if (error)
1406                 goto dput_and_out;
1407
1408         __put_user(kbuf.f_bsize, &buf->f_bsize);
1409         __put_user(kbuf.f_frsize, &buf->f_frsize);
1410         __put_user(kbuf.f_blocks, &buf->f_blocks);
1411         __put_user(kbuf.f_bfree, &buf->f_bfree);
1412         __put_user(kbuf.f_bfree, &buf->f_bavail);  /* XXX hackety hack... */
1413         __put_user(kbuf.f_files, &buf->f_files);
1414         __put_user(kbuf.f_ffree, &buf->f_ffree);
1415         __put_user(kbuf.f_ffree, &buf->f_favail);  /* XXX hackety hack... */
1416 #ifdef __MIPSEB__
1417         __put_user(kbuf.f_fsid.val[1], &buf->f_fsid);
1418 #else
1419         __put_user(kbuf.f_fsid.val[0], &buf->f_fsid);
1420 #endif
1421         for (i = 0; i < 16; i++)
1422                 __put_user(0, &buf->f_basetype[i]);
1423         __put_user(0, &buf->f_flag);
1424         __put_user(kbuf.f_namelen, &buf->f_namemax);
1425         for (i = 0; i < 32; i++)
1426                 __put_user(0, &buf->f_fstr[i]);
1427
1428         error = 0;
1429
1430 dput_and_out:
1431         path_release(&nd);
1432 out:
1433         return error;
1434 }
1435
1436 asmlinkage int irix_fstatvfs(int fd, struct irix_statvfs *buf)
1437 {
1438         struct kstatfs kbuf;
1439         struct file *file;
1440         int error, i;
1441
1442         printk("[%s:%d] Wheee.. irix_fstatvfs(%d,%p)\n",
1443                current->comm, current->pid, fd, buf);
1444
1445         if (!access_ok(VERIFY_WRITE, buf, sizeof(struct irix_statvfs))) {
1446                 error = -EFAULT;
1447                 goto out;
1448         }
1449         if (!(file = fget(fd))) {
1450                 error = -EBADF;
1451                 goto out;
1452         }
1453         error = vfs_statfs(file->f_dentry->d_inode->i_sb, &kbuf);
1454         if (error)
1455                 goto out_f;
1456
1457         __put_user(kbuf.f_bsize, &buf->f_bsize);
1458         __put_user(kbuf.f_frsize, &buf->f_frsize);
1459         __put_user(kbuf.f_blocks, &buf->f_blocks);
1460         __put_user(kbuf.f_bfree, &buf->f_bfree);
1461         __put_user(kbuf.f_bfree, &buf->f_bavail); /* XXX hackety hack... */
1462         __put_user(kbuf.f_files, &buf->f_files);
1463         __put_user(kbuf.f_ffree, &buf->f_ffree);
1464         __put_user(kbuf.f_ffree, &buf->f_favail); /* XXX hackety hack... */
1465 #ifdef __MIPSEB__
1466         __put_user(kbuf.f_fsid.val[1], &buf->f_fsid);
1467 #else
1468         __put_user(kbuf.f_fsid.val[0], &buf->f_fsid);
1469 #endif
1470         for(i = 0; i < 16; i++)
1471                 __put_user(0, &buf->f_basetype[i]);
1472         __put_user(0, &buf->f_flag);
1473         __put_user(kbuf.f_namelen, &buf->f_namemax);
1474         __clear_user(&buf->f_fstr, sizeof(buf->f_fstr));
1475
1476 out_f:
1477         fput(file);
1478 out:
1479         return error;
1480 }
1481
1482 asmlinkage int irix_priocntl(struct pt_regs *regs)
1483 {
1484         printk("[%s:%d] Wheee.. irix_priocntl()\n",
1485                current->comm, current->pid);
1486
1487         return -EINVAL;
1488 }
1489
1490 asmlinkage int irix_sigqueue(int pid, int sig, int code, int val)
1491 {
1492         printk("[%s:%d] Wheee.. irix_sigqueue(%d,%d,%d,%d)\n",
1493                current->comm, current->pid, pid, sig, code, val);
1494
1495         return -EINVAL;
1496 }
1497
1498 asmlinkage int irix_truncate64(char *name, int pad, int size1, int size2)
1499 {
1500         int retval;
1501
1502         if (size1) {
1503                 retval = -EINVAL;
1504                 goto out;
1505         }
1506         retval = sys_truncate(name, size2);
1507
1508 out:
1509         return retval;
1510 }
1511
1512 asmlinkage int irix_ftruncate64(int fd, int pad, int size1, int size2)
1513 {
1514         int retval;
1515
1516         if (size1) {
1517                 retval = -EINVAL;
1518                 goto out;
1519         }
1520         retval = sys_ftruncate(fd, size2);
1521
1522 out:
1523         return retval;
1524 }
1525
1526 asmlinkage int irix_mmap64(struct pt_regs *regs)
1527 {
1528         int len, prot, flags, fd, off1, off2, error, base = 0;
1529         unsigned long addr, pgoff, *sp;
1530         struct file *file = NULL;
1531
1532         if (regs->regs[2] == 1000)
1533                 base = 1;
1534         sp = (unsigned long *) (regs->regs[29] + 16);
1535         addr = regs->regs[base + 4];
1536         len = regs->regs[base + 5];
1537         prot = regs->regs[base + 6];
1538         if (!base) {
1539                 flags = regs->regs[base + 7];
1540                 if (!access_ok(VERIFY_READ, sp, (4 * sizeof(unsigned long)))) {
1541                         error = -EFAULT;
1542                         goto out;
1543                 }
1544                 fd = sp[0];
1545                 __get_user(off1, &sp[1]);
1546                 __get_user(off2, &sp[2]);
1547         } else {
1548                 if (!access_ok(VERIFY_READ, sp, (5 * sizeof(unsigned long)))) {
1549                         error = -EFAULT;
1550                         goto out;
1551                 }
1552                 __get_user(flags, &sp[0]);
1553                 __get_user(fd, &sp[1]);
1554                 __get_user(off1, &sp[2]);
1555                 __get_user(off2, &sp[3]);
1556         }
1557
1558         if (off1 & PAGE_MASK) {
1559                 error = -EOVERFLOW;
1560                 goto out;
1561         }
1562
1563         pgoff = (off1 << (32 - PAGE_SHIFT)) | (off2 >> PAGE_SHIFT);
1564
1565         if (!(flags & MAP_ANONYMOUS)) {
1566                 if (!(file = fget(fd))) {
1567                         error = -EBADF;
1568                         goto out;
1569                 }
1570
1571                 /* Ok, bad taste hack follows, try to think in something else
1572                    when reading this */
1573                 if (flags & IRIX_MAP_AUTOGROW) {
1574                         unsigned long old_pos;
1575                         long max_size = off2 + len;
1576
1577                         if (max_size > file->f_dentry->d_inode->i_size) {
1578                                 old_pos = sys_lseek (fd, max_size - 1, 0);
1579                                 sys_write (fd, "", 1);
1580                                 sys_lseek (fd, old_pos, 0);
1581                         }
1582                 }
1583         }
1584
1585         flags &= ~(MAP_EXECUTABLE | MAP_DENYWRITE);
1586
1587         down_write(&current->mm->mmap_sem);
1588         error = do_mmap_pgoff(file, addr, len, prot, flags, pgoff);
1589         up_write(&current->mm->mmap_sem);
1590
1591         if (file)
1592                 fput(file);
1593
1594 out:
1595         return error;
1596 }
1597
1598 asmlinkage int irix_dmi(struct pt_regs *regs)
1599 {
1600         printk("[%s:%d] Wheee.. irix_dmi()\n",
1601                current->comm, current->pid);
1602
1603         return -EINVAL;
1604 }
1605
1606 asmlinkage int irix_pread(int fd, char *buf, int cnt, int off64,
1607                           int off1, int off2)
1608 {
1609         printk("[%s:%d] Wheee.. irix_pread(%d,%p,%d,%d,%d,%d)\n",
1610                current->comm, current->pid, fd, buf, cnt, off64, off1, off2);
1611
1612         return -EINVAL;
1613 }
1614
1615 asmlinkage int irix_pwrite(int fd, char *buf, int cnt, int off64,
1616                            int off1, int off2)
1617 {
1618         printk("[%s:%d] Wheee.. irix_pwrite(%d,%p,%d,%d,%d,%d)\n",
1619                current->comm, current->pid, fd, buf, cnt, off64, off1, off2);
1620
1621         return -EINVAL;
1622 }
1623
1624 asmlinkage int irix_sgifastpath(int cmd, unsigned long arg0, unsigned long arg1,
1625                                 unsigned long arg2, unsigned long arg3,
1626                                 unsigned long arg4, unsigned long arg5)
1627 {
1628         printk("[%s:%d] Wheee.. irix_fastpath(%d,%08lx,%08lx,%08lx,%08lx,"
1629                "%08lx,%08lx)\n",
1630                current->comm, current->pid, cmd, arg0, arg1, arg2,
1631                arg3, arg4, arg5);
1632
1633         return -EINVAL;
1634 }
1635
1636 struct irix_statvfs64 {
1637         u32  f_bsize; u32 f_frsize;
1638         u64  f_blocks; u64 f_bfree; u64 f_bavail;
1639         u64  f_files; u64 f_ffree; u64 f_favail;
1640         u32  f_fsid;
1641         char f_basetype[16];
1642         u32  f_flag; u32 f_namemax;
1643         char f_fstr[32];
1644         u32  f_filler[16];
1645 };
1646
1647 asmlinkage int irix_statvfs64(char *fname, struct irix_statvfs64 *buf)
1648 {
1649         struct nameidata nd;
1650         struct kstatfs kbuf;
1651         int error, i;
1652
1653         printk("[%s:%d] Wheee.. irix_statvfs64(%s,%p)\n",
1654                current->comm, current->pid, fname, buf);
1655         if (!access_ok(VERIFY_WRITE, buf, sizeof(struct irix_statvfs64))) {
1656                 error = -EFAULT;
1657                 goto out;
1658         }
1659         error = user_path_walk(fname, &nd);
1660         if (error)
1661                 goto out;
1662         error = vfs_statfs(nd.dentry->d_inode->i_sb, &kbuf);
1663         if (error)
1664                 goto dput_and_out;
1665
1666         __put_user(kbuf.f_bsize, &buf->f_bsize);
1667         __put_user(kbuf.f_frsize, &buf->f_frsize);
1668         __put_user(kbuf.f_blocks, &buf->f_blocks);
1669         __put_user(kbuf.f_bfree, &buf->f_bfree);
1670         __put_user(kbuf.f_bfree, &buf->f_bavail);  /* XXX hackety hack... */
1671         __put_user(kbuf.f_files, &buf->f_files);
1672         __put_user(kbuf.f_ffree, &buf->f_ffree);
1673         __put_user(kbuf.f_ffree, &buf->f_favail);  /* XXX hackety hack... */
1674 #ifdef __MIPSEB__
1675         __put_user(kbuf.f_fsid.val[1], &buf->f_fsid);
1676 #else
1677         __put_user(kbuf.f_fsid.val[0], &buf->f_fsid);
1678 #endif
1679         for(i = 0; i < 16; i++)
1680                 __put_user(0, &buf->f_basetype[i]);
1681         __put_user(0, &buf->f_flag);
1682         __put_user(kbuf.f_namelen, &buf->f_namemax);
1683         for(i = 0; i < 32; i++)
1684                 __put_user(0, &buf->f_fstr[i]);
1685
1686         error = 0;
1687
1688 dput_and_out:
1689         path_release(&nd);
1690 out:
1691         return error;
1692 }
1693
1694 asmlinkage int irix_fstatvfs64(int fd, struct irix_statvfs *buf)
1695 {
1696         struct kstatfs kbuf;
1697         struct file *file;
1698         int error, i;
1699
1700         printk("[%s:%d] Wheee.. irix_fstatvfs64(%d,%p)\n",
1701                current->comm, current->pid, fd, buf);
1702
1703         if (!access_ok(VERIFY_WRITE, buf, sizeof(struct irix_statvfs))) {
1704                 error = -EFAULT;
1705                 goto out;
1706         }
1707         if (!(file = fget(fd))) {
1708                 error = -EBADF;
1709                 goto out;
1710         }
1711         error = vfs_statfs(file->f_dentry->d_inode->i_sb, &kbuf);
1712         if (error)
1713                 goto out_f;
1714
1715         __put_user(kbuf.f_bsize, &buf->f_bsize);
1716         __put_user(kbuf.f_frsize, &buf->f_frsize);
1717         __put_user(kbuf.f_blocks, &buf->f_blocks);
1718         __put_user(kbuf.f_bfree, &buf->f_bfree);
1719         __put_user(kbuf.f_bfree, &buf->f_bavail);  /* XXX hackety hack... */
1720         __put_user(kbuf.f_files, &buf->f_files);
1721         __put_user(kbuf.f_ffree, &buf->f_ffree);
1722         __put_user(kbuf.f_ffree, &buf->f_favail);  /* XXX hackety hack... */
1723 #ifdef __MIPSEB__
1724         __put_user(kbuf.f_fsid.val[1], &buf->f_fsid);
1725 #else
1726         __put_user(kbuf.f_fsid.val[0], &buf->f_fsid);
1727 #endif
1728         for(i = 0; i < 16; i++)
1729                 __put_user(0, &buf->f_basetype[i]);
1730         __put_user(0, &buf->f_flag);
1731         __put_user(kbuf.f_namelen, &buf->f_namemax);
1732         __clear_user(buf->f_fstr, sizeof(buf->f_fstr[i]));
1733
1734 out_f:
1735         fput(file);
1736 out:
1737         return error;
1738 }
1739
1740 asmlinkage int irix_getmountid(char *fname, unsigned long *midbuf)
1741 {
1742         int err = 0;
1743
1744         printk("[%s:%d] irix_getmountid(%s, %p)\n",
1745                current->comm, current->pid, fname, midbuf);
1746         if (!access_ok(VERIFY_WRITE, midbuf, (sizeof(unsigned long) * 4)))
1747                 return -EFAULT;
1748
1749         /*
1750          * The idea with this system call is that when trying to determine
1751          * 'pwd' and it's a toss-up for some reason, userland can use the
1752          * fsid of the filesystem to try and make the right decision, but
1753          * we don't have this so for now. XXX
1754          */
1755         err |= __put_user(0, &midbuf[0]);
1756         err |= __put_user(0, &midbuf[1]);
1757         err |= __put_user(0, &midbuf[2]);
1758         err |= __put_user(0, &midbuf[3]);
1759
1760         return err;
1761 }
1762
1763 asmlinkage int irix_nsproc(unsigned long entry, unsigned long mask,
1764                            unsigned long arg, unsigned long sp, int slen)
1765 {
1766         printk("[%s:%d] Wheee.. irix_nsproc(%08lx,%08lx,%08lx,%08lx,%d)\n",
1767                current->comm, current->pid, entry, mask, arg, sp, slen);
1768
1769         return -EINVAL;
1770 }
1771
1772 #undef DEBUG_GETDENTS
1773
1774 struct irix_dirent32 {
1775         u32  d_ino;
1776         u32  d_off;
1777         unsigned short  d_reclen;
1778         char d_name[1];
1779 };
1780
1781 struct irix_dirent32_callback {
1782         struct irix_dirent32 *current_dir;
1783         struct irix_dirent32 *previous;
1784         int count;
1785         int error;
1786 };
1787
1788 #define NAME_OFFSET32(de) ((int) ((de)->d_name - (char *) (de)))
1789 #define ROUND_UP32(x) (((x)+sizeof(u32)-1) & ~(sizeof(u32)-1))
1790
1791 static int irix_filldir32(void *__buf, const char *name, int namlen,
1792                           loff_t offset, ino_t ino, unsigned int d_type)
1793 {
1794         struct irix_dirent32 *dirent;
1795         struct irix_dirent32_callback *buf =
1796                  (struct irix_dirent32_callback *)__buf;
1797         unsigned short reclen = ROUND_UP32(NAME_OFFSET32(dirent) + namlen + 1);
1798
1799 #ifdef DEBUG_GETDENTS
1800         printk("\nirix_filldir32[reclen<%d>namlen<%d>count<%d>]",
1801                reclen, namlen, buf->count);
1802 #endif
1803         buf->error = -EINVAL;   /* only used if we fail.. */
1804         if (reclen > buf->count)
1805                 return -EINVAL;
1806         dirent = buf->previous;
1807         if (dirent)
1808                 __put_user(offset, &dirent->d_off);
1809         dirent = buf->current_dir;
1810         buf->previous = dirent;
1811         __put_user(ino, &dirent->d_ino);
1812         __put_user(reclen, &dirent->d_reclen);
1813         copy_to_user(dirent->d_name, name, namlen);
1814         __put_user(0, &dirent->d_name[namlen]);
1815         ((char *) dirent) += reclen;
1816         buf->current_dir = dirent;
1817         buf->count -= reclen;
1818
1819         return 0;
1820 }
1821
1822 asmlinkage int irix_ngetdents(unsigned int fd, void * dirent,
1823         unsigned int count, int *eob)
1824 {
1825         struct file *file;
1826         struct irix_dirent32 *lastdirent;
1827         struct irix_dirent32_callback buf;
1828         int error;
1829
1830 #ifdef DEBUG_GETDENTS
1831         printk("[%s:%d] ngetdents(%d, %p, %d, %p) ", current->comm,
1832                current->pid, fd, dirent, count, eob);
1833 #endif
1834         error = -EBADF;
1835         file = fget(fd);
1836         if (!file)
1837                 goto out;
1838
1839         buf.current_dir = (struct irix_dirent32 *) dirent;
1840         buf.previous = NULL;
1841         buf.count = count;
1842         buf.error = 0;
1843
1844         error = vfs_readdir(file, irix_filldir32, &buf);
1845         if (error < 0)
1846                 goto out_putf;
1847
1848         error = buf.error;
1849         lastdirent = buf.previous;
1850         if (lastdirent) {
1851                 put_user(file->f_pos, &lastdirent->d_off);
1852                 error = count - buf.count;
1853         }
1854
1855         if (put_user(0, eob) < 0) {
1856                 error = -EFAULT;
1857                 goto out_putf;
1858         }
1859
1860 #ifdef DEBUG_GETDENTS
1861         printk("eob=%d returning %d\n", *eob, count - buf.count);
1862 #endif
1863         error = count - buf.count;
1864
1865 out_putf:
1866         fput(file);
1867 out:
1868         return error;
1869 }
1870
1871 struct irix_dirent64 {
1872         u64            d_ino;
1873         u64            d_off;
1874         unsigned short d_reclen;
1875         char           d_name[1];
1876 };
1877
1878 struct irix_dirent64_callback {
1879         struct irix_dirent64 *curr;
1880         struct irix_dirent64 *previous;
1881         int count;
1882         int error;
1883 };
1884
1885 #define NAME_OFFSET64(de) ((int) ((de)->d_name - (char *) (de)))
1886 #define ROUND_UP64(x) (((x)+sizeof(u64)-1) & ~(sizeof(u64)-1))
1887
1888 static int irix_filldir64(void * __buf, const char * name, int namlen,
1889                           loff_t offset, ino_t ino, unsigned int d_type)
1890 {
1891         struct irix_dirent64 *dirent;
1892         struct irix_dirent64_callback * buf =
1893                 (struct irix_dirent64_callback *) __buf;
1894         unsigned short reclen = ROUND_UP64(NAME_OFFSET64(dirent) + namlen + 1);
1895
1896         buf->error = -EINVAL;   /* only used if we fail.. */
1897         if (reclen > buf->count)
1898                 return -EINVAL;
1899         dirent = buf->previous;
1900         if (dirent)
1901                 __put_user(offset, &dirent->d_off);
1902         dirent = buf->curr;
1903         buf->previous = dirent;
1904         __put_user(ino, &dirent->d_ino);
1905         __put_user(reclen, &dirent->d_reclen);
1906         __copy_to_user(dirent->d_name, name, namlen);
1907         __put_user(0, &dirent->d_name[namlen]);
1908         ((char *) dirent) += reclen;
1909         buf->curr = dirent;
1910         buf->count -= reclen;
1911
1912         return 0;
1913 }
1914
1915 asmlinkage int irix_getdents64(int fd, void *dirent, int cnt)
1916 {
1917         struct file *file;
1918         struct irix_dirent64 *lastdirent;
1919         struct irix_dirent64_callback buf;
1920         int error;
1921
1922 #ifdef DEBUG_GETDENTS
1923         printk("[%s:%d] getdents64(%d, %p, %d) ", current->comm,
1924                current->pid, fd, dirent, cnt);
1925 #endif
1926         error = -EBADF;
1927         if (!(file = fget(fd)))
1928                 goto out;
1929
1930         error = -EFAULT;
1931         if (!access_ok(VERIFY_WRITE, dirent, cnt))
1932                 goto out_f;
1933
1934         error = -EINVAL;
1935         if (cnt < (sizeof(struct irix_dirent64) + 255))
1936                 goto out_f;
1937
1938         buf.curr = (struct irix_dirent64 *) dirent;
1939         buf.previous = NULL;
1940         buf.count = cnt;
1941         buf.error = 0;
1942         error = vfs_readdir(file, irix_filldir64, &buf);
1943         if (error < 0)
1944                 goto out_f;
1945         lastdirent = buf.previous;
1946         if (!lastdirent) {
1947                 error = buf.error;
1948                 goto out_f;
1949         }
1950         lastdirent->d_off = (u64) file->f_pos;
1951 #ifdef DEBUG_GETDENTS
1952         printk("returning %d\n", cnt - buf.count);
1953 #endif
1954         error = cnt - buf.count;
1955
1956 out_f:
1957         fput(file);
1958 out:
1959         return error;
1960 }
1961
1962 asmlinkage int irix_ngetdents64(int fd, void *dirent, int cnt, int *eob)
1963 {
1964         struct file *file;
1965         struct irix_dirent64 *lastdirent;
1966         struct irix_dirent64_callback buf;
1967         int error;
1968
1969 #ifdef DEBUG_GETDENTS
1970         printk("[%s:%d] ngetdents64(%d, %p, %d) ", current->comm,
1971                current->pid, fd, dirent, cnt);
1972 #endif
1973         error = -EBADF;
1974         if (!(file = fget(fd)))
1975                 goto out;
1976
1977         error = -EFAULT;
1978         if (!access_ok(VERIFY_WRITE, dirent, cnt) ||
1979             !access_ok(VERIFY_WRITE, eob, sizeof(*eob)))
1980                 goto out_f;
1981
1982         error = -EINVAL;
1983         if (cnt < (sizeof(struct irix_dirent64) + 255))
1984                 goto out_f;
1985
1986         *eob = 0;
1987         buf.curr = (struct irix_dirent64 *) dirent;
1988         buf.previous = NULL;
1989         buf.count = cnt;
1990         buf.error = 0;
1991         error = vfs_readdir(file, irix_filldir64, &buf);
1992         if (error < 0)
1993                 goto out_f;
1994         lastdirent = buf.previous;
1995         if (!lastdirent) {
1996                 error = buf.error;
1997                 goto out_f;
1998         }
1999         lastdirent->d_off = (u64) file->f_pos;
2000 #ifdef DEBUG_GETDENTS
2001         printk("eob=%d returning %d\n", *eob, cnt - buf.count);
2002 #endif
2003         error = cnt - buf.count;
2004
2005 out_f:
2006         fput(file);
2007 out:
2008         return error;
2009 }
2010
2011 asmlinkage int irix_uadmin(unsigned long op, unsigned long func, unsigned long arg)
2012 {
2013         int retval;
2014
2015         switch (op) {
2016         case 1:
2017                 /* Reboot */
2018                 printk("[%s:%d] irix_uadmin: Wants to reboot...\n",
2019                        current->comm, current->pid);
2020                 retval = -EINVAL;
2021                 goto out;
2022
2023         case 2:
2024                 /* Shutdown */
2025                 printk("[%s:%d] irix_uadmin: Wants to shutdown...\n",
2026                        current->comm, current->pid);
2027                 retval = -EINVAL;
2028                 goto out;
2029
2030         case 4:
2031                 /* Remount-root */
2032                 printk("[%s:%d] irix_uadmin: Wants to remount root...\n",
2033                        current->comm, current->pid);
2034                 retval = -EINVAL;
2035                 goto out;
2036
2037         case 8:
2038                 /* Kill all tasks. */
2039                 printk("[%s:%d] irix_uadmin: Wants to kill all tasks...\n",
2040                        current->comm, current->pid);
2041                 retval = -EINVAL;
2042                 goto out;
2043
2044         case 256:
2045                 /* Set magic mushrooms... */
2046                 printk("[%s:%d] irix_uadmin: Wants to set magic mushroom[%d]...\n",
2047                        current->comm, current->pid, (int) func);
2048                 retval = -EINVAL;
2049                 goto out;
2050
2051         default:
2052                 printk("[%s:%d] irix_uadmin: Unknown operation [%d]...\n",
2053                        current->comm, current->pid, (int) op);
2054                 retval = -EINVAL;
2055                 goto out;
2056         };
2057
2058 out:
2059         return retval;
2060 }
2061
2062 asmlinkage int irix_utssys(char *inbuf, int arg, int type, char *outbuf)
2063 {
2064         int retval;
2065
2066         switch(type) {
2067         case 0:
2068                 /* uname() */
2069                 retval = irix_uname((struct iuname *)inbuf);
2070                 goto out;
2071
2072         case 2:
2073                 /* ustat() */
2074                 printk("[%s:%d] irix_utssys: Wants to do ustat()\n",
2075                        current->comm, current->pid);
2076                 retval = -EINVAL;
2077                 goto out;
2078
2079         case 3:
2080                 /* fusers() */
2081                 printk("[%s:%d] irix_utssys: Wants to do fusers()\n",
2082                        current->comm, current->pid);
2083                 retval = -EINVAL;
2084                 goto out;
2085
2086         default:
2087                 printk("[%s:%d] irix_utssys: Wants to do unknown type[%d]\n",
2088                        current->comm, current->pid, (int) type);
2089                 retval = -EINVAL;
2090                 goto out;
2091         }
2092
2093 out:
2094         return retval;
2095 }
2096
2097 #undef DEBUG_FCNTL
2098
2099 #define IRIX_F_ALLOCSP 10
2100
2101 asmlinkage int irix_fcntl(int fd, int cmd, int arg)
2102 {
2103         int retval;
2104
2105 #ifdef DEBUG_FCNTL
2106         printk("[%s:%d] irix_fcntl(%d, %d, %d) ", current->comm,
2107                current->pid, fd, cmd, arg);
2108 #endif
2109         if (cmd == IRIX_F_ALLOCSP){
2110                 return 0;
2111         }
2112         retval = sys_fcntl(fd, cmd, arg);
2113 #ifdef DEBUG_FCNTL
2114         printk("%d\n", retval);
2115 #endif
2116         return retval;
2117 }
2118
2119 asmlinkage int irix_ulimit(int cmd, int arg)
2120 {
2121         int retval;
2122
2123         switch(cmd) {
2124         case 1:
2125                 printk("[%s:%d] irix_ulimit: Wants to get file size limit.\n",
2126                        current->comm, current->pid);
2127                 retval = -EINVAL;
2128                 goto out;
2129
2130         case 2:
2131                 printk("[%s:%d] irix_ulimit: Wants to set file size limit.\n",
2132                        current->comm, current->pid);
2133                 retval = -EINVAL;
2134                 goto out;
2135
2136         case 3:
2137                 printk("[%s:%d] irix_ulimit: Wants to get brk limit.\n",
2138                        current->comm, current->pid);
2139                 retval = -EINVAL;
2140                 goto out;
2141
2142         case 4:
2143 #if 0
2144                 printk("[%s:%d] irix_ulimit: Wants to get fd limit.\n",
2145                        current->comm, current->pid);
2146                 retval = -EINVAL;
2147                 goto out;
2148 #endif
2149                 retval = current->signal->rlim[RLIMIT_NOFILE].rlim_cur;
2150                 goto out;
2151
2152         case 5:
2153                 printk("[%s:%d] irix_ulimit: Wants to get txt offset.\n",
2154                        current->comm, current->pid);
2155                 retval = -EINVAL;
2156                 goto out;
2157
2158         default:
2159                 printk("[%s:%d] irix_ulimit: Unknown command [%d].\n",
2160                        current->comm, current->pid, cmd);
2161                 retval = -EINVAL;
2162                 goto out;
2163         }
2164 out:
2165         return retval;
2166 }
2167
2168 asmlinkage int irix_unimp(struct pt_regs *regs)
2169 {
2170         printk("irix_unimp [%s:%d] v0=%d v1=%d a0=%08lx a1=%08lx a2=%08lx "
2171                "a3=%08lx\n", current->comm, current->pid,
2172                (int) regs->regs[2], (int) regs->regs[3],
2173                regs->regs[4], regs->regs[5], regs->regs[6], regs->regs[7]);
2174
2175         return -ENOSYS;
2176 }