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