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