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