Merge branch 'task_killable' of git://git.kernel.org/pub/scm/linux/kernel/git/willy...
[linux-2.6] / arch / powerpc / platforms / cell / spufs / file.c
1 /*
2  * SPU file system -- file contents
3  *
4  * (C) Copyright IBM Deutschland Entwicklung GmbH 2005
5  *
6  * Author: Arnd Bergmann <arndb@de.ibm.com>
7  *
8  * This program is free software; you can redistribute it and/or modify
9  * it under the terms of the GNU General Public License as published by
10  * the Free Software Foundation; either version 2, or (at your option)
11  * any later version.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  * GNU General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License
19  * along with this program; if not, write to the Free Software
20  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21  */
22
23 #undef DEBUG
24
25 #include <linux/fs.h>
26 #include <linux/ioctl.h>
27 #include <linux/module.h>
28 #include <linux/pagemap.h>
29 #include <linux/poll.h>
30 #include <linux/ptrace.h>
31 #include <linux/seq_file.h>
32
33 #include <asm/io.h>
34 #include <asm/semaphore.h>
35 #include <asm/spu.h>
36 #include <asm/spu_info.h>
37 #include <asm/uaccess.h>
38
39 #include "spufs.h"
40
41 #define SPUFS_MMAP_4K (PAGE_SIZE == 0x1000)
42
43 /* Simple attribute files */
44 struct spufs_attr {
45         int (*get)(void *, u64 *);
46         int (*set)(void *, u64);
47         char get_buf[24];       /* enough to store a u64 and "\n\0" */
48         char set_buf[24];
49         void *data;
50         const char *fmt;        /* format for read operation */
51         struct mutex mutex;     /* protects access to these buffers */
52 };
53
54 static int spufs_attr_open(struct inode *inode, struct file *file,
55                 int (*get)(void *, u64 *), int (*set)(void *, u64),
56                 const char *fmt)
57 {
58         struct spufs_attr *attr;
59
60         attr = kmalloc(sizeof(*attr), GFP_KERNEL);
61         if (!attr)
62                 return -ENOMEM;
63
64         attr->get = get;
65         attr->set = set;
66         attr->data = inode->i_private;
67         attr->fmt = fmt;
68         mutex_init(&attr->mutex);
69         file->private_data = attr;
70
71         return nonseekable_open(inode, file);
72 }
73
74 static int spufs_attr_release(struct inode *inode, struct file *file)
75 {
76        kfree(file->private_data);
77         return 0;
78 }
79
80 static ssize_t spufs_attr_read(struct file *file, char __user *buf,
81                 size_t len, loff_t *ppos)
82 {
83         struct spufs_attr *attr;
84         size_t size;
85         ssize_t ret;
86
87         attr = file->private_data;
88         if (!attr->get)
89                 return -EACCES;
90
91         ret = mutex_lock_interruptible(&attr->mutex);
92         if (ret)
93                 return ret;
94
95         if (*ppos) {            /* continued read */
96                 size = strlen(attr->get_buf);
97         } else {                /* first read */
98                 u64 val;
99                 ret = attr->get(attr->data, &val);
100                 if (ret)
101                         goto out;
102
103                 size = scnprintf(attr->get_buf, sizeof(attr->get_buf),
104                                  attr->fmt, (unsigned long long)val);
105         }
106
107         ret = simple_read_from_buffer(buf, len, ppos, attr->get_buf, size);
108 out:
109         mutex_unlock(&attr->mutex);
110         return ret;
111 }
112
113 static ssize_t spufs_attr_write(struct file *file, const char __user *buf,
114                 size_t len, loff_t *ppos)
115 {
116         struct spufs_attr *attr;
117         u64 val;
118         size_t size;
119         ssize_t ret;
120
121         attr = file->private_data;
122         if (!attr->set)
123                 return -EACCES;
124
125         ret = mutex_lock_interruptible(&attr->mutex);
126         if (ret)
127                 return ret;
128
129         ret = -EFAULT;
130         size = min(sizeof(attr->set_buf) - 1, len);
131         if (copy_from_user(attr->set_buf, buf, size))
132                 goto out;
133
134         ret = len; /* claim we got the whole input */
135         attr->set_buf[size] = '\0';
136         val = simple_strtol(attr->set_buf, NULL, 0);
137         attr->set(attr->data, val);
138 out:
139         mutex_unlock(&attr->mutex);
140         return ret;
141 }
142
143 #define DEFINE_SPUFS_SIMPLE_ATTRIBUTE(__fops, __get, __set, __fmt)      \
144 static int __fops ## _open(struct inode *inode, struct file *file)      \
145 {                                                                       \
146         __simple_attr_check_format(__fmt, 0ull);                        \
147         return spufs_attr_open(inode, file, __get, __set, __fmt);       \
148 }                                                                       \
149 static struct file_operations __fops = {                                \
150         .owner   = THIS_MODULE,                                         \
151         .open    = __fops ## _open,                                     \
152         .release = spufs_attr_release,                                  \
153         .read    = spufs_attr_read,                                     \
154         .write   = spufs_attr_write,                                    \
155 };
156
157
158 static int
159 spufs_mem_open(struct inode *inode, struct file *file)
160 {
161         struct spufs_inode_info *i = SPUFS_I(inode);
162         struct spu_context *ctx = i->i_ctx;
163
164         mutex_lock(&ctx->mapping_lock);
165         file->private_data = ctx;
166         if (!i->i_openers++)
167                 ctx->local_store = inode->i_mapping;
168         mutex_unlock(&ctx->mapping_lock);
169         return 0;
170 }
171
172 static int
173 spufs_mem_release(struct inode *inode, struct file *file)
174 {
175         struct spufs_inode_info *i = SPUFS_I(inode);
176         struct spu_context *ctx = i->i_ctx;
177
178         mutex_lock(&ctx->mapping_lock);
179         if (!--i->i_openers)
180                 ctx->local_store = NULL;
181         mutex_unlock(&ctx->mapping_lock);
182         return 0;
183 }
184
185 static ssize_t
186 __spufs_mem_read(struct spu_context *ctx, char __user *buffer,
187                         size_t size, loff_t *pos)
188 {
189         char *local_store = ctx->ops->get_ls(ctx);
190         return simple_read_from_buffer(buffer, size, pos, local_store,
191                                         LS_SIZE);
192 }
193
194 static ssize_t
195 spufs_mem_read(struct file *file, char __user *buffer,
196                                 size_t size, loff_t *pos)
197 {
198         struct spu_context *ctx = file->private_data;
199         ssize_t ret;
200
201         ret = spu_acquire(ctx);
202         if (ret)
203                 return ret;
204         ret = __spufs_mem_read(ctx, buffer, size, pos);
205         spu_release(ctx);
206
207         return ret;
208 }
209
210 static ssize_t
211 spufs_mem_write(struct file *file, const char __user *buffer,
212                                         size_t size, loff_t *ppos)
213 {
214         struct spu_context *ctx = file->private_data;
215         char *local_store;
216         loff_t pos = *ppos;
217         int ret;
218
219         if (pos < 0)
220                 return -EINVAL;
221         if (pos > LS_SIZE)
222                 return -EFBIG;
223         if (size > LS_SIZE - pos)
224                 size = LS_SIZE - pos;
225
226         ret = spu_acquire(ctx);
227         if (ret)
228                 return ret;
229
230         local_store = ctx->ops->get_ls(ctx);
231         ret = copy_from_user(local_store + pos, buffer, size);
232         spu_release(ctx);
233
234         if (ret)
235                 return -EFAULT;
236         *ppos = pos + size;
237         return size;
238 }
239
240 static unsigned long spufs_mem_mmap_nopfn(struct vm_area_struct *vma,
241                                           unsigned long address)
242 {
243         struct spu_context *ctx = vma->vm_file->private_data;
244         unsigned long pfn, offset, addr0 = address;
245 #ifdef CONFIG_SPU_FS_64K_LS
246         struct spu_state *csa = &ctx->csa;
247         int psize;
248
249         /* Check what page size we are using */
250         psize = get_slice_psize(vma->vm_mm, address);
251
252         /* Some sanity checking */
253         BUG_ON(csa->use_big_pages != (psize == MMU_PAGE_64K));
254
255         /* Wow, 64K, cool, we need to align the address though */
256         if (csa->use_big_pages) {
257                 BUG_ON(vma->vm_start & 0xffff);
258                 address &= ~0xfffful;
259         }
260 #endif /* CONFIG_SPU_FS_64K_LS */
261
262         offset = (address - vma->vm_start) + (vma->vm_pgoff << PAGE_SHIFT);
263         if (offset >= LS_SIZE)
264                 return NOPFN_SIGBUS;
265
266         pr_debug("spufs_mem_mmap_nopfn address=0x%lx -> 0x%lx, offset=0x%lx\n",
267                  addr0, address, offset);
268
269         if (spu_acquire(ctx))
270                 return NOPFN_REFAULT;
271
272         if (ctx->state == SPU_STATE_SAVED) {
273                 vma->vm_page_prot = __pgprot(pgprot_val(vma->vm_page_prot)
274                                                         & ~_PAGE_NO_CACHE);
275                 pfn = vmalloc_to_pfn(ctx->csa.lscsa->ls + offset);
276         } else {
277                 vma->vm_page_prot = __pgprot(pgprot_val(vma->vm_page_prot)
278                                              | _PAGE_NO_CACHE);
279                 pfn = (ctx->spu->local_store_phys + offset) >> PAGE_SHIFT;
280         }
281         vm_insert_pfn(vma, address, pfn);
282
283         spu_release(ctx);
284
285         return NOPFN_REFAULT;
286 }
287
288
289 static struct vm_operations_struct spufs_mem_mmap_vmops = {
290         .nopfn = spufs_mem_mmap_nopfn,
291 };
292
293 static int spufs_mem_mmap(struct file *file, struct vm_area_struct *vma)
294 {
295 #ifdef CONFIG_SPU_FS_64K_LS
296         struct spu_context      *ctx = file->private_data;
297         struct spu_state        *csa = &ctx->csa;
298
299         /* Sanity check VMA alignment */
300         if (csa->use_big_pages) {
301                 pr_debug("spufs_mem_mmap 64K, start=0x%lx, end=0x%lx,"
302                          " pgoff=0x%lx\n", vma->vm_start, vma->vm_end,
303                          vma->vm_pgoff);
304                 if (vma->vm_start & 0xffff)
305                         return -EINVAL;
306                 if (vma->vm_pgoff & 0xf)
307                         return -EINVAL;
308         }
309 #endif /* CONFIG_SPU_FS_64K_LS */
310
311         if (!(vma->vm_flags & VM_SHARED))
312                 return -EINVAL;
313
314         vma->vm_flags |= VM_IO | VM_PFNMAP;
315         vma->vm_page_prot = __pgprot(pgprot_val(vma->vm_page_prot)
316                                      | _PAGE_NO_CACHE);
317
318         vma->vm_ops = &spufs_mem_mmap_vmops;
319         return 0;
320 }
321
322 #ifdef CONFIG_SPU_FS_64K_LS
323 static unsigned long spufs_get_unmapped_area(struct file *file,
324                 unsigned long addr, unsigned long len, unsigned long pgoff,
325                 unsigned long flags)
326 {
327         struct spu_context      *ctx = file->private_data;
328         struct spu_state        *csa = &ctx->csa;
329
330         /* If not using big pages, fallback to normal MM g_u_a */
331         if (!csa->use_big_pages)
332                 return current->mm->get_unmapped_area(file, addr, len,
333                                                       pgoff, flags);
334
335         /* Else, try to obtain a 64K pages slice */
336         return slice_get_unmapped_area(addr, len, flags,
337                                        MMU_PAGE_64K, 1, 0);
338 }
339 #endif /* CONFIG_SPU_FS_64K_LS */
340
341 static const struct file_operations spufs_mem_fops = {
342         .open                   = spufs_mem_open,
343         .release                = spufs_mem_release,
344         .read                   = spufs_mem_read,
345         .write                  = spufs_mem_write,
346         .llseek                 = generic_file_llseek,
347         .mmap                   = spufs_mem_mmap,
348 #ifdef CONFIG_SPU_FS_64K_LS
349         .get_unmapped_area      = spufs_get_unmapped_area,
350 #endif
351 };
352
353 static unsigned long spufs_ps_nopfn(struct vm_area_struct *vma,
354                                     unsigned long address,
355                                     unsigned long ps_offs,
356                                     unsigned long ps_size)
357 {
358         struct spu_context *ctx = vma->vm_file->private_data;
359         unsigned long area, offset = address - vma->vm_start;
360
361         offset += vma->vm_pgoff << PAGE_SHIFT;
362         if (offset >= ps_size)
363                 return NOPFN_SIGBUS;
364
365         /*
366          * We have to wait for context to be loaded before we have
367          * pages to hand out to the user, but we don't want to wait
368          * with the mmap_sem held.
369          * It is possible to drop the mmap_sem here, but then we need
370          * to return NOPFN_REFAULT because the mappings may have
371          * hanged.
372          */
373         if (spu_acquire(ctx))
374                 return NOPFN_REFAULT;
375
376         if (ctx->state == SPU_STATE_SAVED) {
377                 up_read(&current->mm->mmap_sem);
378                 spufs_wait(ctx->run_wq, ctx->state == SPU_STATE_RUNNABLE);
379                 down_read(&current->mm->mmap_sem);
380         } else {
381                 area = ctx->spu->problem_phys + ps_offs;
382                 vm_insert_pfn(vma, address, (area + offset) >> PAGE_SHIFT);
383         }
384
385         spu_release(ctx);
386         return NOPFN_REFAULT;
387 }
388
389 #if SPUFS_MMAP_4K
390 static unsigned long spufs_cntl_mmap_nopfn(struct vm_area_struct *vma,
391                                            unsigned long address)
392 {
393         return spufs_ps_nopfn(vma, address, 0x4000, 0x1000);
394 }
395
396 static struct vm_operations_struct spufs_cntl_mmap_vmops = {
397         .nopfn = spufs_cntl_mmap_nopfn,
398 };
399
400 /*
401  * mmap support for problem state control area [0x4000 - 0x4fff].
402  */
403 static int spufs_cntl_mmap(struct file *file, struct vm_area_struct *vma)
404 {
405         if (!(vma->vm_flags & VM_SHARED))
406                 return -EINVAL;
407
408         vma->vm_flags |= VM_IO | VM_PFNMAP;
409         vma->vm_page_prot = __pgprot(pgprot_val(vma->vm_page_prot)
410                                      | _PAGE_NO_CACHE | _PAGE_GUARDED);
411
412         vma->vm_ops = &spufs_cntl_mmap_vmops;
413         return 0;
414 }
415 #else /* SPUFS_MMAP_4K */
416 #define spufs_cntl_mmap NULL
417 #endif /* !SPUFS_MMAP_4K */
418
419 static int spufs_cntl_get(void *data, u64 *val)
420 {
421         struct spu_context *ctx = data;
422         int ret;
423
424         ret = spu_acquire(ctx);
425         if (ret)
426                 return ret;
427         *val = ctx->ops->status_read(ctx);
428         spu_release(ctx);
429
430         return 0;
431 }
432
433 static int spufs_cntl_set(void *data, u64 val)
434 {
435         struct spu_context *ctx = data;
436         int ret;
437
438         ret = spu_acquire(ctx);
439         if (ret)
440                 return ret;
441         ctx->ops->runcntl_write(ctx, val);
442         spu_release(ctx);
443
444         return 0;
445 }
446
447 static int spufs_cntl_open(struct inode *inode, struct file *file)
448 {
449         struct spufs_inode_info *i = SPUFS_I(inode);
450         struct spu_context *ctx = i->i_ctx;
451
452         mutex_lock(&ctx->mapping_lock);
453         file->private_data = ctx;
454         if (!i->i_openers++)
455                 ctx->cntl = inode->i_mapping;
456         mutex_unlock(&ctx->mapping_lock);
457         return spufs_attr_open(inode, file, spufs_cntl_get,
458                                         spufs_cntl_set, "0x%08lx");
459 }
460
461 static int
462 spufs_cntl_release(struct inode *inode, struct file *file)
463 {
464         struct spufs_inode_info *i = SPUFS_I(inode);
465         struct spu_context *ctx = i->i_ctx;
466
467         spufs_attr_release(inode, file);
468
469         mutex_lock(&ctx->mapping_lock);
470         if (!--i->i_openers)
471                 ctx->cntl = NULL;
472         mutex_unlock(&ctx->mapping_lock);
473         return 0;
474 }
475
476 static const struct file_operations spufs_cntl_fops = {
477         .open = spufs_cntl_open,
478         .release = spufs_cntl_release,
479         .read = spufs_attr_read,
480         .write = spufs_attr_write,
481         .mmap = spufs_cntl_mmap,
482 };
483
484 static int
485 spufs_regs_open(struct inode *inode, struct file *file)
486 {
487         struct spufs_inode_info *i = SPUFS_I(inode);
488         file->private_data = i->i_ctx;
489         return 0;
490 }
491
492 static ssize_t
493 __spufs_regs_read(struct spu_context *ctx, char __user *buffer,
494                         size_t size, loff_t *pos)
495 {
496         struct spu_lscsa *lscsa = ctx->csa.lscsa;
497         return simple_read_from_buffer(buffer, size, pos,
498                                       lscsa->gprs, sizeof lscsa->gprs);
499 }
500
501 static ssize_t
502 spufs_regs_read(struct file *file, char __user *buffer,
503                 size_t size, loff_t *pos)
504 {
505         int ret;
506         struct spu_context *ctx = file->private_data;
507
508         ret = spu_acquire_saved(ctx);
509         if (ret)
510                 return ret;
511         ret = __spufs_regs_read(ctx, buffer, size, pos);
512         spu_release_saved(ctx);
513         return ret;
514 }
515
516 static ssize_t
517 spufs_regs_write(struct file *file, const char __user *buffer,
518                  size_t size, loff_t *pos)
519 {
520         struct spu_context *ctx = file->private_data;
521         struct spu_lscsa *lscsa = ctx->csa.lscsa;
522         int ret;
523
524         size = min_t(ssize_t, sizeof lscsa->gprs - *pos, size);
525         if (size <= 0)
526                 return -EFBIG;
527         *pos += size;
528
529         ret = spu_acquire_saved(ctx);
530         if (ret)
531                 return ret;
532
533         ret = copy_from_user(lscsa->gprs + *pos - size,
534                              buffer, size) ? -EFAULT : size;
535
536         spu_release_saved(ctx);
537         return ret;
538 }
539
540 static const struct file_operations spufs_regs_fops = {
541         .open    = spufs_regs_open,
542         .read    = spufs_regs_read,
543         .write   = spufs_regs_write,
544         .llseek  = generic_file_llseek,
545 };
546
547 static ssize_t
548 __spufs_fpcr_read(struct spu_context *ctx, char __user * buffer,
549                         size_t size, loff_t * pos)
550 {
551         struct spu_lscsa *lscsa = ctx->csa.lscsa;
552         return simple_read_from_buffer(buffer, size, pos,
553                                       &lscsa->fpcr, sizeof(lscsa->fpcr));
554 }
555
556 static ssize_t
557 spufs_fpcr_read(struct file *file, char __user * buffer,
558                 size_t size, loff_t * pos)
559 {
560         int ret;
561         struct spu_context *ctx = file->private_data;
562
563         ret = spu_acquire_saved(ctx);
564         if (ret)
565                 return ret;
566         ret = __spufs_fpcr_read(ctx, buffer, size, pos);
567         spu_release_saved(ctx);
568         return ret;
569 }
570
571 static ssize_t
572 spufs_fpcr_write(struct file *file, const char __user * buffer,
573                  size_t size, loff_t * pos)
574 {
575         struct spu_context *ctx = file->private_data;
576         struct spu_lscsa *lscsa = ctx->csa.lscsa;
577         int ret;
578
579         size = min_t(ssize_t, sizeof(lscsa->fpcr) - *pos, size);
580         if (size <= 0)
581                 return -EFBIG;
582
583         ret = spu_acquire_saved(ctx);
584         if (ret)
585                 return ret;
586
587         *pos += size;
588         ret = copy_from_user((char *)&lscsa->fpcr + *pos - size,
589                              buffer, size) ? -EFAULT : size;
590
591         spu_release_saved(ctx);
592         return ret;
593 }
594
595 static const struct file_operations spufs_fpcr_fops = {
596         .open = spufs_regs_open,
597         .read = spufs_fpcr_read,
598         .write = spufs_fpcr_write,
599         .llseek = generic_file_llseek,
600 };
601
602 /* generic open function for all pipe-like files */
603 static int spufs_pipe_open(struct inode *inode, struct file *file)
604 {
605         struct spufs_inode_info *i = SPUFS_I(inode);
606         file->private_data = i->i_ctx;
607
608         return nonseekable_open(inode, file);
609 }
610
611 /*
612  * Read as many bytes from the mailbox as possible, until
613  * one of the conditions becomes true:
614  *
615  * - no more data available in the mailbox
616  * - end of the user provided buffer
617  * - end of the mapped area
618  */
619 static ssize_t spufs_mbox_read(struct file *file, char __user *buf,
620                         size_t len, loff_t *pos)
621 {
622         struct spu_context *ctx = file->private_data;
623         u32 mbox_data, __user *udata;
624         ssize_t count;
625
626         if (len < 4)
627                 return -EINVAL;
628
629         if (!access_ok(VERIFY_WRITE, buf, len))
630                 return -EFAULT;
631
632         udata = (void __user *)buf;
633
634         count = spu_acquire(ctx);
635         if (count)
636                 return count;
637
638         for (count = 0; (count + 4) <= len; count += 4, udata++) {
639                 int ret;
640                 ret = ctx->ops->mbox_read(ctx, &mbox_data);
641                 if (ret == 0)
642                         break;
643
644                 /*
645                  * at the end of the mapped area, we can fault
646                  * but still need to return the data we have
647                  * read successfully so far.
648                  */
649                 ret = __put_user(mbox_data, udata);
650                 if (ret) {
651                         if (!count)
652                                 count = -EFAULT;
653                         break;
654                 }
655         }
656         spu_release(ctx);
657
658         if (!count)
659                 count = -EAGAIN;
660
661         return count;
662 }
663
664 static const struct file_operations spufs_mbox_fops = {
665         .open   = spufs_pipe_open,
666         .read   = spufs_mbox_read,
667 };
668
669 static ssize_t spufs_mbox_stat_read(struct file *file, char __user *buf,
670                         size_t len, loff_t *pos)
671 {
672         struct spu_context *ctx = file->private_data;
673         ssize_t ret;
674         u32 mbox_stat;
675
676         if (len < 4)
677                 return -EINVAL;
678
679         ret = spu_acquire(ctx);
680         if (ret)
681                 return ret;
682
683         mbox_stat = ctx->ops->mbox_stat_read(ctx) & 0xff;
684
685         spu_release(ctx);
686
687         if (copy_to_user(buf, &mbox_stat, sizeof mbox_stat))
688                 return -EFAULT;
689
690         return 4;
691 }
692
693 static const struct file_operations spufs_mbox_stat_fops = {
694         .open   = spufs_pipe_open,
695         .read   = spufs_mbox_stat_read,
696 };
697
698 /* low-level ibox access function */
699 size_t spu_ibox_read(struct spu_context *ctx, u32 *data)
700 {
701         return ctx->ops->ibox_read(ctx, data);
702 }
703
704 static int spufs_ibox_fasync(int fd, struct file *file, int on)
705 {
706         struct spu_context *ctx = file->private_data;
707
708         return fasync_helper(fd, file, on, &ctx->ibox_fasync);
709 }
710
711 /* interrupt-level ibox callback function. */
712 void spufs_ibox_callback(struct spu *spu)
713 {
714         struct spu_context *ctx = spu->ctx;
715
716         if (!ctx)
717                 return;
718
719         wake_up_all(&ctx->ibox_wq);
720         kill_fasync(&ctx->ibox_fasync, SIGIO, POLLIN);
721 }
722
723 /*
724  * Read as many bytes from the interrupt mailbox as possible, until
725  * one of the conditions becomes true:
726  *
727  * - no more data available in the mailbox
728  * - end of the user provided buffer
729  * - end of the mapped area
730  *
731  * If the file is opened without O_NONBLOCK, we wait here until
732  * any data is available, but return when we have been able to
733  * read something.
734  */
735 static ssize_t spufs_ibox_read(struct file *file, char __user *buf,
736                         size_t len, loff_t *pos)
737 {
738         struct spu_context *ctx = file->private_data;
739         u32 ibox_data, __user *udata;
740         ssize_t count;
741
742         if (len < 4)
743                 return -EINVAL;
744
745         if (!access_ok(VERIFY_WRITE, buf, len))
746                 return -EFAULT;
747
748         udata = (void __user *)buf;
749
750         count = spu_acquire(ctx);
751         if (count)
752                 return count;
753
754         /* wait only for the first element */
755         count = 0;
756         if (file->f_flags & O_NONBLOCK) {
757                 if (!spu_ibox_read(ctx, &ibox_data))
758                         count = -EAGAIN;
759         } else {
760                 count = spufs_wait(ctx->ibox_wq, spu_ibox_read(ctx, &ibox_data));
761         }
762         if (count)
763                 goto out;
764
765         /* if we can't write at all, return -EFAULT */
766         count = __put_user(ibox_data, udata);
767         if (count)
768                 goto out;
769
770         for (count = 4, udata++; (count + 4) <= len; count += 4, udata++) {
771                 int ret;
772                 ret = ctx->ops->ibox_read(ctx, &ibox_data);
773                 if (ret == 0)
774                         break;
775                 /*
776                  * at the end of the mapped area, we can fault
777                  * but still need to return the data we have
778                  * read successfully so far.
779                  */
780                 ret = __put_user(ibox_data, udata);
781                 if (ret)
782                         break;
783         }
784
785 out:
786         spu_release(ctx);
787
788         return count;
789 }
790
791 static unsigned int spufs_ibox_poll(struct file *file, poll_table *wait)
792 {
793         struct spu_context *ctx = file->private_data;
794         unsigned int mask;
795
796         poll_wait(file, &ctx->ibox_wq, wait);
797
798         /*
799          * For now keep this uninterruptible and also ignore the rule
800          * that poll should not sleep.  Will be fixed later.
801          */
802         mutex_lock(&ctx->state_mutex);
803         mask = ctx->ops->mbox_stat_poll(ctx, POLLIN | POLLRDNORM);
804         spu_release(ctx);
805
806         return mask;
807 }
808
809 static const struct file_operations spufs_ibox_fops = {
810         .open   = spufs_pipe_open,
811         .read   = spufs_ibox_read,
812         .poll   = spufs_ibox_poll,
813         .fasync = spufs_ibox_fasync,
814 };
815
816 static ssize_t spufs_ibox_stat_read(struct file *file, char __user *buf,
817                         size_t len, loff_t *pos)
818 {
819         struct spu_context *ctx = file->private_data;
820         ssize_t ret;
821         u32 ibox_stat;
822
823         if (len < 4)
824                 return -EINVAL;
825
826         ret = spu_acquire(ctx);
827         if (ret)
828                 return ret;
829         ibox_stat = (ctx->ops->mbox_stat_read(ctx) >> 16) & 0xff;
830         spu_release(ctx);
831
832         if (copy_to_user(buf, &ibox_stat, sizeof ibox_stat))
833                 return -EFAULT;
834
835         return 4;
836 }
837
838 static const struct file_operations spufs_ibox_stat_fops = {
839         .open   = spufs_pipe_open,
840         .read   = spufs_ibox_stat_read,
841 };
842
843 /* low-level mailbox write */
844 size_t spu_wbox_write(struct spu_context *ctx, u32 data)
845 {
846         return ctx->ops->wbox_write(ctx, data);
847 }
848
849 static int spufs_wbox_fasync(int fd, struct file *file, int on)
850 {
851         struct spu_context *ctx = file->private_data;
852         int ret;
853
854         ret = fasync_helper(fd, file, on, &ctx->wbox_fasync);
855
856         return ret;
857 }
858
859 /* interrupt-level wbox callback function. */
860 void spufs_wbox_callback(struct spu *spu)
861 {
862         struct spu_context *ctx = spu->ctx;
863
864         if (!ctx)
865                 return;
866
867         wake_up_all(&ctx->wbox_wq);
868         kill_fasync(&ctx->wbox_fasync, SIGIO, POLLOUT);
869 }
870
871 /*
872  * Write as many bytes to the interrupt mailbox as possible, until
873  * one of the conditions becomes true:
874  *
875  * - the mailbox is full
876  * - end of the user provided buffer
877  * - end of the mapped area
878  *
879  * If the file is opened without O_NONBLOCK, we wait here until
880  * space is availabyl, but return when we have been able to
881  * write something.
882  */
883 static ssize_t spufs_wbox_write(struct file *file, const char __user *buf,
884                         size_t len, loff_t *pos)
885 {
886         struct spu_context *ctx = file->private_data;
887         u32 wbox_data, __user *udata;
888         ssize_t count;
889
890         if (len < 4)
891                 return -EINVAL;
892
893         udata = (void __user *)buf;
894         if (!access_ok(VERIFY_READ, buf, len))
895                 return -EFAULT;
896
897         if (__get_user(wbox_data, udata))
898                 return -EFAULT;
899
900         count = spu_acquire(ctx);
901         if (count)
902                 return count;
903
904         /*
905          * make sure we can at least write one element, by waiting
906          * in case of !O_NONBLOCK
907          */
908         count = 0;
909         if (file->f_flags & O_NONBLOCK) {
910                 if (!spu_wbox_write(ctx, wbox_data))
911                         count = -EAGAIN;
912         } else {
913                 count = spufs_wait(ctx->wbox_wq, spu_wbox_write(ctx, wbox_data));
914         }
915
916         if (count)
917                 goto out;
918
919         /* write as much as possible */
920         for (count = 4, udata++; (count + 4) <= len; count += 4, udata++) {
921                 int ret;
922                 ret = __get_user(wbox_data, udata);
923                 if (ret)
924                         break;
925
926                 ret = spu_wbox_write(ctx, wbox_data);
927                 if (ret == 0)
928                         break;
929         }
930
931 out:
932         spu_release(ctx);
933         return count;
934 }
935
936 static unsigned int spufs_wbox_poll(struct file *file, poll_table *wait)
937 {
938         struct spu_context *ctx = file->private_data;
939         unsigned int mask;
940
941         poll_wait(file, &ctx->wbox_wq, wait);
942
943         /*
944          * For now keep this uninterruptible and also ignore the rule
945          * that poll should not sleep.  Will be fixed later.
946          */
947         mutex_lock(&ctx->state_mutex);
948         mask = ctx->ops->mbox_stat_poll(ctx, POLLOUT | POLLWRNORM);
949         spu_release(ctx);
950
951         return mask;
952 }
953
954 static const struct file_operations spufs_wbox_fops = {
955         .open   = spufs_pipe_open,
956         .write  = spufs_wbox_write,
957         .poll   = spufs_wbox_poll,
958         .fasync = spufs_wbox_fasync,
959 };
960
961 static ssize_t spufs_wbox_stat_read(struct file *file, char __user *buf,
962                         size_t len, loff_t *pos)
963 {
964         struct spu_context *ctx = file->private_data;
965         ssize_t ret;
966         u32 wbox_stat;
967
968         if (len < 4)
969                 return -EINVAL;
970
971         ret = spu_acquire(ctx);
972         if (ret)
973                 return ret;
974         wbox_stat = (ctx->ops->mbox_stat_read(ctx) >> 8) & 0xff;
975         spu_release(ctx);
976
977         if (copy_to_user(buf, &wbox_stat, sizeof wbox_stat))
978                 return -EFAULT;
979
980         return 4;
981 }
982
983 static const struct file_operations spufs_wbox_stat_fops = {
984         .open   = spufs_pipe_open,
985         .read   = spufs_wbox_stat_read,
986 };
987
988 static int spufs_signal1_open(struct inode *inode, struct file *file)
989 {
990         struct spufs_inode_info *i = SPUFS_I(inode);
991         struct spu_context *ctx = i->i_ctx;
992
993         mutex_lock(&ctx->mapping_lock);
994         file->private_data = ctx;
995         if (!i->i_openers++)
996                 ctx->signal1 = inode->i_mapping;
997         mutex_unlock(&ctx->mapping_lock);
998         return nonseekable_open(inode, file);
999 }
1000
1001 static int
1002 spufs_signal1_release(struct inode *inode, struct file *file)
1003 {
1004         struct spufs_inode_info *i = SPUFS_I(inode);
1005         struct spu_context *ctx = i->i_ctx;
1006
1007         mutex_lock(&ctx->mapping_lock);
1008         if (!--i->i_openers)
1009                 ctx->signal1 = NULL;
1010         mutex_unlock(&ctx->mapping_lock);
1011         return 0;
1012 }
1013
1014 static ssize_t __spufs_signal1_read(struct spu_context *ctx, char __user *buf,
1015                         size_t len, loff_t *pos)
1016 {
1017         int ret = 0;
1018         u32 data;
1019
1020         if (len < 4)
1021                 return -EINVAL;
1022
1023         if (ctx->csa.spu_chnlcnt_RW[3]) {
1024                 data = ctx->csa.spu_chnldata_RW[3];
1025                 ret = 4;
1026         }
1027
1028         if (!ret)
1029                 goto out;
1030
1031         if (copy_to_user(buf, &data, 4))
1032                 return -EFAULT;
1033
1034 out:
1035         return ret;
1036 }
1037
1038 static ssize_t spufs_signal1_read(struct file *file, char __user *buf,
1039                         size_t len, loff_t *pos)
1040 {
1041         int ret;
1042         struct spu_context *ctx = file->private_data;
1043
1044         ret = spu_acquire_saved(ctx);
1045         if (ret)
1046                 return ret;
1047         ret = __spufs_signal1_read(ctx, buf, len, pos);
1048         spu_release_saved(ctx);
1049
1050         return ret;
1051 }
1052
1053 static ssize_t spufs_signal1_write(struct file *file, const char __user *buf,
1054                         size_t len, loff_t *pos)
1055 {
1056         struct spu_context *ctx;
1057         ssize_t ret;
1058         u32 data;
1059
1060         ctx = file->private_data;
1061
1062         if (len < 4)
1063                 return -EINVAL;
1064
1065         if (copy_from_user(&data, buf, 4))
1066                 return -EFAULT;
1067
1068         ret = spu_acquire(ctx);
1069         if (ret)
1070                 return ret;
1071         ctx->ops->signal1_write(ctx, data);
1072         spu_release(ctx);
1073
1074         return 4;
1075 }
1076
1077 static unsigned long spufs_signal1_mmap_nopfn(struct vm_area_struct *vma,
1078                                               unsigned long address)
1079 {
1080 #if PAGE_SIZE == 0x1000
1081         return spufs_ps_nopfn(vma, address, 0x14000, 0x1000);
1082 #elif PAGE_SIZE == 0x10000
1083         /* For 64k pages, both signal1 and signal2 can be used to mmap the whole
1084          * signal 1 and 2 area
1085          */
1086         return spufs_ps_nopfn(vma, address, 0x10000, 0x10000);
1087 #else
1088 #error unsupported page size
1089 #endif
1090 }
1091
1092 static struct vm_operations_struct spufs_signal1_mmap_vmops = {
1093         .nopfn = spufs_signal1_mmap_nopfn,
1094 };
1095
1096 static int spufs_signal1_mmap(struct file *file, struct vm_area_struct *vma)
1097 {
1098         if (!(vma->vm_flags & VM_SHARED))
1099                 return -EINVAL;
1100
1101         vma->vm_flags |= VM_IO | VM_PFNMAP;
1102         vma->vm_page_prot = __pgprot(pgprot_val(vma->vm_page_prot)
1103                                      | _PAGE_NO_CACHE | _PAGE_GUARDED);
1104
1105         vma->vm_ops = &spufs_signal1_mmap_vmops;
1106         return 0;
1107 }
1108
1109 static const struct file_operations spufs_signal1_fops = {
1110         .open = spufs_signal1_open,
1111         .release = spufs_signal1_release,
1112         .read = spufs_signal1_read,
1113         .write = spufs_signal1_write,
1114         .mmap = spufs_signal1_mmap,
1115 };
1116
1117 static const struct file_operations spufs_signal1_nosched_fops = {
1118         .open = spufs_signal1_open,
1119         .release = spufs_signal1_release,
1120         .write = spufs_signal1_write,
1121         .mmap = spufs_signal1_mmap,
1122 };
1123
1124 static int spufs_signal2_open(struct inode *inode, struct file *file)
1125 {
1126         struct spufs_inode_info *i = SPUFS_I(inode);
1127         struct spu_context *ctx = i->i_ctx;
1128
1129         mutex_lock(&ctx->mapping_lock);
1130         file->private_data = ctx;
1131         if (!i->i_openers++)
1132                 ctx->signal2 = inode->i_mapping;
1133         mutex_unlock(&ctx->mapping_lock);
1134         return nonseekable_open(inode, file);
1135 }
1136
1137 static int
1138 spufs_signal2_release(struct inode *inode, struct file *file)
1139 {
1140         struct spufs_inode_info *i = SPUFS_I(inode);
1141         struct spu_context *ctx = i->i_ctx;
1142
1143         mutex_lock(&ctx->mapping_lock);
1144         if (!--i->i_openers)
1145                 ctx->signal2 = NULL;
1146         mutex_unlock(&ctx->mapping_lock);
1147         return 0;
1148 }
1149
1150 static ssize_t __spufs_signal2_read(struct spu_context *ctx, char __user *buf,
1151                         size_t len, loff_t *pos)
1152 {
1153         int ret = 0;
1154         u32 data;
1155
1156         if (len < 4)
1157                 return -EINVAL;
1158
1159         if (ctx->csa.spu_chnlcnt_RW[4]) {
1160                 data =  ctx->csa.spu_chnldata_RW[4];
1161                 ret = 4;
1162         }
1163
1164         if (!ret)
1165                 goto out;
1166
1167         if (copy_to_user(buf, &data, 4))
1168                 return -EFAULT;
1169
1170 out:
1171         return ret;
1172 }
1173
1174 static ssize_t spufs_signal2_read(struct file *file, char __user *buf,
1175                         size_t len, loff_t *pos)
1176 {
1177         struct spu_context *ctx = file->private_data;
1178         int ret;
1179
1180         ret = spu_acquire_saved(ctx);
1181         if (ret)
1182                 return ret;
1183         ret = __spufs_signal2_read(ctx, buf, len, pos);
1184         spu_release_saved(ctx);
1185
1186         return ret;
1187 }
1188
1189 static ssize_t spufs_signal2_write(struct file *file, const char __user *buf,
1190                         size_t len, loff_t *pos)
1191 {
1192         struct spu_context *ctx;
1193         ssize_t ret;
1194         u32 data;
1195
1196         ctx = file->private_data;
1197
1198         if (len < 4)
1199                 return -EINVAL;
1200
1201         if (copy_from_user(&data, buf, 4))
1202                 return -EFAULT;
1203
1204         ret = spu_acquire(ctx);
1205         if (ret)
1206                 return ret;
1207         ctx->ops->signal2_write(ctx, data);
1208         spu_release(ctx);
1209
1210         return 4;
1211 }
1212
1213 #if SPUFS_MMAP_4K
1214 static unsigned long spufs_signal2_mmap_nopfn(struct vm_area_struct *vma,
1215                                               unsigned long address)
1216 {
1217 #if PAGE_SIZE == 0x1000
1218         return spufs_ps_nopfn(vma, address, 0x1c000, 0x1000);
1219 #elif PAGE_SIZE == 0x10000
1220         /* For 64k pages, both signal1 and signal2 can be used to mmap the whole
1221          * signal 1 and 2 area
1222          */
1223         return spufs_ps_nopfn(vma, address, 0x10000, 0x10000);
1224 #else
1225 #error unsupported page size
1226 #endif
1227 }
1228
1229 static struct vm_operations_struct spufs_signal2_mmap_vmops = {
1230         .nopfn = spufs_signal2_mmap_nopfn,
1231 };
1232
1233 static int spufs_signal2_mmap(struct file *file, struct vm_area_struct *vma)
1234 {
1235         if (!(vma->vm_flags & VM_SHARED))
1236                 return -EINVAL;
1237
1238         vma->vm_flags |= VM_IO | VM_PFNMAP;
1239         vma->vm_page_prot = __pgprot(pgprot_val(vma->vm_page_prot)
1240                                      | _PAGE_NO_CACHE | _PAGE_GUARDED);
1241
1242         vma->vm_ops = &spufs_signal2_mmap_vmops;
1243         return 0;
1244 }
1245 #else /* SPUFS_MMAP_4K */
1246 #define spufs_signal2_mmap NULL
1247 #endif /* !SPUFS_MMAP_4K */
1248
1249 static const struct file_operations spufs_signal2_fops = {
1250         .open = spufs_signal2_open,
1251         .release = spufs_signal2_release,
1252         .read = spufs_signal2_read,
1253         .write = spufs_signal2_write,
1254         .mmap = spufs_signal2_mmap,
1255 };
1256
1257 static const struct file_operations spufs_signal2_nosched_fops = {
1258         .open = spufs_signal2_open,
1259         .release = spufs_signal2_release,
1260         .write = spufs_signal2_write,
1261         .mmap = spufs_signal2_mmap,
1262 };
1263
1264 /*
1265  * This is a wrapper around DEFINE_SIMPLE_ATTRIBUTE which does the
1266  * work of acquiring (or not) the SPU context before calling through
1267  * to the actual get routine. The set routine is called directly.
1268  */
1269 #define SPU_ATTR_NOACQUIRE      0
1270 #define SPU_ATTR_ACQUIRE        1
1271 #define SPU_ATTR_ACQUIRE_SAVED  2
1272
1273 #define DEFINE_SPUFS_ATTRIBUTE(__name, __get, __set, __fmt, __acquire)  \
1274 static int __##__get(void *data, u64 *val)                              \
1275 {                                                                       \
1276         struct spu_context *ctx = data;                                 \
1277         int ret = 0;                                                    \
1278                                                                         \
1279         if (__acquire == SPU_ATTR_ACQUIRE) {                            \
1280                 ret = spu_acquire(ctx);                                 \
1281                 if (ret)                                                \
1282                         return ret;                                     \
1283                 *val = __get(ctx);                                      \
1284                 spu_release(ctx);                                       \
1285         } else if (__acquire == SPU_ATTR_ACQUIRE_SAVED) {               \
1286                 ret = spu_acquire_saved(ctx);                           \
1287                 if (ret)                                                \
1288                         return ret;                                     \
1289                 *val = __get(ctx);                                      \
1290                 spu_release_saved(ctx);                                 \
1291         } else                                                          \
1292                 *val = __get(ctx);                                      \
1293                                                                         \
1294         return 0;                                                       \
1295 }                                                                       \
1296 DEFINE_SPUFS_SIMPLE_ATTRIBUTE(__name, __##__get, __set, __fmt);
1297
1298 static int spufs_signal1_type_set(void *data, u64 val)
1299 {
1300         struct spu_context *ctx = data;
1301         int ret;
1302
1303         ret = spu_acquire(ctx);
1304         if (ret)
1305                 return ret;
1306         ctx->ops->signal1_type_set(ctx, val);
1307         spu_release(ctx);
1308
1309         return 0;
1310 }
1311
1312 static u64 spufs_signal1_type_get(struct spu_context *ctx)
1313 {
1314         return ctx->ops->signal1_type_get(ctx);
1315 }
1316 DEFINE_SPUFS_ATTRIBUTE(spufs_signal1_type, spufs_signal1_type_get,
1317                        spufs_signal1_type_set, "%llu", SPU_ATTR_ACQUIRE);
1318
1319
1320 static int spufs_signal2_type_set(void *data, u64 val)
1321 {
1322         struct spu_context *ctx = data;
1323         int ret;
1324
1325         ret = spu_acquire(ctx);
1326         if (ret)
1327                 return ret;
1328         ctx->ops->signal2_type_set(ctx, val);
1329         spu_release(ctx);
1330
1331         return 0;
1332 }
1333
1334 static u64 spufs_signal2_type_get(struct spu_context *ctx)
1335 {
1336         return ctx->ops->signal2_type_get(ctx);
1337 }
1338 DEFINE_SPUFS_ATTRIBUTE(spufs_signal2_type, spufs_signal2_type_get,
1339                        spufs_signal2_type_set, "%llu", SPU_ATTR_ACQUIRE);
1340
1341 #if SPUFS_MMAP_4K
1342 static unsigned long spufs_mss_mmap_nopfn(struct vm_area_struct *vma,
1343                                           unsigned long address)
1344 {
1345         return spufs_ps_nopfn(vma, address, 0x0000, 0x1000);
1346 }
1347
1348 static struct vm_operations_struct spufs_mss_mmap_vmops = {
1349         .nopfn = spufs_mss_mmap_nopfn,
1350 };
1351
1352 /*
1353  * mmap support for problem state MFC DMA area [0x0000 - 0x0fff].
1354  */
1355 static int spufs_mss_mmap(struct file *file, struct vm_area_struct *vma)
1356 {
1357         if (!(vma->vm_flags & VM_SHARED))
1358                 return -EINVAL;
1359
1360         vma->vm_flags |= VM_IO | VM_PFNMAP;
1361         vma->vm_page_prot = __pgprot(pgprot_val(vma->vm_page_prot)
1362                                      | _PAGE_NO_CACHE | _PAGE_GUARDED);
1363
1364         vma->vm_ops = &spufs_mss_mmap_vmops;
1365         return 0;
1366 }
1367 #else /* SPUFS_MMAP_4K */
1368 #define spufs_mss_mmap NULL
1369 #endif /* !SPUFS_MMAP_4K */
1370
1371 static int spufs_mss_open(struct inode *inode, struct file *file)
1372 {
1373         struct spufs_inode_info *i = SPUFS_I(inode);
1374         struct spu_context *ctx = i->i_ctx;
1375
1376         file->private_data = i->i_ctx;
1377
1378         mutex_lock(&ctx->mapping_lock);
1379         if (!i->i_openers++)
1380                 ctx->mss = inode->i_mapping;
1381         mutex_unlock(&ctx->mapping_lock);
1382         return nonseekable_open(inode, file);
1383 }
1384
1385 static int
1386 spufs_mss_release(struct inode *inode, struct file *file)
1387 {
1388         struct spufs_inode_info *i = SPUFS_I(inode);
1389         struct spu_context *ctx = i->i_ctx;
1390
1391         mutex_lock(&ctx->mapping_lock);
1392         if (!--i->i_openers)
1393                 ctx->mss = NULL;
1394         mutex_unlock(&ctx->mapping_lock);
1395         return 0;
1396 }
1397
1398 static const struct file_operations spufs_mss_fops = {
1399         .open    = spufs_mss_open,
1400         .release = spufs_mss_release,
1401         .mmap    = spufs_mss_mmap,
1402 };
1403
1404 static unsigned long spufs_psmap_mmap_nopfn(struct vm_area_struct *vma,
1405                                             unsigned long address)
1406 {
1407         return spufs_ps_nopfn(vma, address, 0x0000, 0x20000);
1408 }
1409
1410 static struct vm_operations_struct spufs_psmap_mmap_vmops = {
1411         .nopfn = spufs_psmap_mmap_nopfn,
1412 };
1413
1414 /*
1415  * mmap support for full problem state area [0x00000 - 0x1ffff].
1416  */
1417 static int spufs_psmap_mmap(struct file *file, struct vm_area_struct *vma)
1418 {
1419         if (!(vma->vm_flags & VM_SHARED))
1420                 return -EINVAL;
1421
1422         vma->vm_flags |= VM_IO | VM_PFNMAP;
1423         vma->vm_page_prot = __pgprot(pgprot_val(vma->vm_page_prot)
1424                                      | _PAGE_NO_CACHE | _PAGE_GUARDED);
1425
1426         vma->vm_ops = &spufs_psmap_mmap_vmops;
1427         return 0;
1428 }
1429
1430 static int spufs_psmap_open(struct inode *inode, struct file *file)
1431 {
1432         struct spufs_inode_info *i = SPUFS_I(inode);
1433         struct spu_context *ctx = i->i_ctx;
1434
1435         mutex_lock(&ctx->mapping_lock);
1436         file->private_data = i->i_ctx;
1437         if (!i->i_openers++)
1438                 ctx->psmap = inode->i_mapping;
1439         mutex_unlock(&ctx->mapping_lock);
1440         return nonseekable_open(inode, file);
1441 }
1442
1443 static int
1444 spufs_psmap_release(struct inode *inode, struct file *file)
1445 {
1446         struct spufs_inode_info *i = SPUFS_I(inode);
1447         struct spu_context *ctx = i->i_ctx;
1448
1449         mutex_lock(&ctx->mapping_lock);
1450         if (!--i->i_openers)
1451                 ctx->psmap = NULL;
1452         mutex_unlock(&ctx->mapping_lock);
1453         return 0;
1454 }
1455
1456 static const struct file_operations spufs_psmap_fops = {
1457         .open    = spufs_psmap_open,
1458         .release = spufs_psmap_release,
1459         .mmap    = spufs_psmap_mmap,
1460 };
1461
1462
1463 #if SPUFS_MMAP_4K
1464 static unsigned long spufs_mfc_mmap_nopfn(struct vm_area_struct *vma,
1465                                           unsigned long address)
1466 {
1467         return spufs_ps_nopfn(vma, address, 0x3000, 0x1000);
1468 }
1469
1470 static struct vm_operations_struct spufs_mfc_mmap_vmops = {
1471         .nopfn = spufs_mfc_mmap_nopfn,
1472 };
1473
1474 /*
1475  * mmap support for problem state MFC DMA area [0x0000 - 0x0fff].
1476  */
1477 static int spufs_mfc_mmap(struct file *file, struct vm_area_struct *vma)
1478 {
1479         if (!(vma->vm_flags & VM_SHARED))
1480                 return -EINVAL;
1481
1482         vma->vm_flags |= VM_IO | VM_PFNMAP;
1483         vma->vm_page_prot = __pgprot(pgprot_val(vma->vm_page_prot)
1484                                      | _PAGE_NO_CACHE | _PAGE_GUARDED);
1485
1486         vma->vm_ops = &spufs_mfc_mmap_vmops;
1487         return 0;
1488 }
1489 #else /* SPUFS_MMAP_4K */
1490 #define spufs_mfc_mmap NULL
1491 #endif /* !SPUFS_MMAP_4K */
1492
1493 static int spufs_mfc_open(struct inode *inode, struct file *file)
1494 {
1495         struct spufs_inode_info *i = SPUFS_I(inode);
1496         struct spu_context *ctx = i->i_ctx;
1497
1498         /* we don't want to deal with DMA into other processes */
1499         if (ctx->owner != current->mm)
1500                 return -EINVAL;
1501
1502         if (atomic_read(&inode->i_count) != 1)
1503                 return -EBUSY;
1504
1505         mutex_lock(&ctx->mapping_lock);
1506         file->private_data = ctx;
1507         if (!i->i_openers++)
1508                 ctx->mfc = inode->i_mapping;
1509         mutex_unlock(&ctx->mapping_lock);
1510         return nonseekable_open(inode, file);
1511 }
1512
1513 static int
1514 spufs_mfc_release(struct inode *inode, struct file *file)
1515 {
1516         struct spufs_inode_info *i = SPUFS_I(inode);
1517         struct spu_context *ctx = i->i_ctx;
1518
1519         mutex_lock(&ctx->mapping_lock);
1520         if (!--i->i_openers)
1521                 ctx->mfc = NULL;
1522         mutex_unlock(&ctx->mapping_lock);
1523         return 0;
1524 }
1525
1526 /* interrupt-level mfc callback function. */
1527 void spufs_mfc_callback(struct spu *spu)
1528 {
1529         struct spu_context *ctx = spu->ctx;
1530
1531         if (!ctx)
1532                 return;
1533
1534         wake_up_all(&ctx->mfc_wq);
1535
1536         pr_debug("%s %s\n", __FUNCTION__, spu->name);
1537         if (ctx->mfc_fasync) {
1538                 u32 free_elements, tagstatus;
1539                 unsigned int mask;
1540
1541                 /* no need for spu_acquire in interrupt context */
1542                 free_elements = ctx->ops->get_mfc_free_elements(ctx);
1543                 tagstatus = ctx->ops->read_mfc_tagstatus(ctx);
1544
1545                 mask = 0;
1546                 if (free_elements & 0xffff)
1547                         mask |= POLLOUT;
1548                 if (tagstatus & ctx->tagwait)
1549                         mask |= POLLIN;
1550
1551                 kill_fasync(&ctx->mfc_fasync, SIGIO, mask);
1552         }
1553 }
1554
1555 static int spufs_read_mfc_tagstatus(struct spu_context *ctx, u32 *status)
1556 {
1557         /* See if there is one tag group is complete */
1558         /* FIXME we need locking around tagwait */
1559         *status = ctx->ops->read_mfc_tagstatus(ctx) & ctx->tagwait;
1560         ctx->tagwait &= ~*status;
1561         if (*status)
1562                 return 1;
1563
1564         /* enable interrupt waiting for any tag group,
1565            may silently fail if interrupts are already enabled */
1566         ctx->ops->set_mfc_query(ctx, ctx->tagwait, 1);
1567         return 0;
1568 }
1569
1570 static ssize_t spufs_mfc_read(struct file *file, char __user *buffer,
1571                         size_t size, loff_t *pos)
1572 {
1573         struct spu_context *ctx = file->private_data;
1574         int ret = -EINVAL;
1575         u32 status;
1576
1577         if (size != 4)
1578                 goto out;
1579
1580         ret = spu_acquire(ctx);
1581         if (ret)
1582                 return ret;
1583
1584         ret = -EINVAL;
1585         if (file->f_flags & O_NONBLOCK) {
1586                 status = ctx->ops->read_mfc_tagstatus(ctx);
1587                 if (!(status & ctx->tagwait))
1588                         ret = -EAGAIN;
1589                 else
1590                         /* XXX(hch): shouldn't we clear ret here? */
1591                         ctx->tagwait &= ~status;
1592         } else {
1593                 ret = spufs_wait(ctx->mfc_wq,
1594                            spufs_read_mfc_tagstatus(ctx, &status));
1595         }
1596         spu_release(ctx);
1597
1598         if (ret)
1599                 goto out;
1600
1601         ret = 4;
1602         if (copy_to_user(buffer, &status, 4))
1603                 ret = -EFAULT;
1604
1605 out:
1606         return ret;
1607 }
1608
1609 static int spufs_check_valid_dma(struct mfc_dma_command *cmd)
1610 {
1611         pr_debug("queueing DMA %x %lx %x %x %x\n", cmd->lsa,
1612                  cmd->ea, cmd->size, cmd->tag, cmd->cmd);
1613
1614         switch (cmd->cmd) {
1615         case MFC_PUT_CMD:
1616         case MFC_PUTF_CMD:
1617         case MFC_PUTB_CMD:
1618         case MFC_GET_CMD:
1619         case MFC_GETF_CMD:
1620         case MFC_GETB_CMD:
1621                 break;
1622         default:
1623                 pr_debug("invalid DMA opcode %x\n", cmd->cmd);
1624                 return -EIO;
1625         }
1626
1627         if ((cmd->lsa & 0xf) != (cmd->ea &0xf)) {
1628                 pr_debug("invalid DMA alignment, ea %lx lsa %x\n",
1629                                 cmd->ea, cmd->lsa);
1630                 return -EIO;
1631         }
1632
1633         switch (cmd->size & 0xf) {
1634         case 1:
1635                 break;
1636         case 2:
1637                 if (cmd->lsa & 1)
1638                         goto error;
1639                 break;
1640         case 4:
1641                 if (cmd->lsa & 3)
1642                         goto error;
1643                 break;
1644         case 8:
1645                 if (cmd->lsa & 7)
1646                         goto error;
1647                 break;
1648         case 0:
1649                 if (cmd->lsa & 15)
1650                         goto error;
1651                 break;
1652         error:
1653         default:
1654                 pr_debug("invalid DMA alignment %x for size %x\n",
1655                         cmd->lsa & 0xf, cmd->size);
1656                 return -EIO;
1657         }
1658
1659         if (cmd->size > 16 * 1024) {
1660                 pr_debug("invalid DMA size %x\n", cmd->size);
1661                 return -EIO;
1662         }
1663
1664         if (cmd->tag & 0xfff0) {
1665                 /* we reserve the higher tag numbers for kernel use */
1666                 pr_debug("invalid DMA tag\n");
1667                 return -EIO;
1668         }
1669
1670         if (cmd->class) {
1671                 /* not supported in this version */
1672                 pr_debug("invalid DMA class\n");
1673                 return -EIO;
1674         }
1675
1676         return 0;
1677 }
1678
1679 static int spu_send_mfc_command(struct spu_context *ctx,
1680                                 struct mfc_dma_command cmd,
1681                                 int *error)
1682 {
1683         *error = ctx->ops->send_mfc_command(ctx, &cmd);
1684         if (*error == -EAGAIN) {
1685                 /* wait for any tag group to complete
1686                    so we have space for the new command */
1687                 ctx->ops->set_mfc_query(ctx, ctx->tagwait, 1);
1688                 /* try again, because the queue might be
1689                    empty again */
1690                 *error = ctx->ops->send_mfc_command(ctx, &cmd);
1691                 if (*error == -EAGAIN)
1692                         return 0;
1693         }
1694         return 1;
1695 }
1696
1697 static ssize_t spufs_mfc_write(struct file *file, const char __user *buffer,
1698                         size_t size, loff_t *pos)
1699 {
1700         struct spu_context *ctx = file->private_data;
1701         struct mfc_dma_command cmd;
1702         int ret = -EINVAL;
1703
1704         if (size != sizeof cmd)
1705                 goto out;
1706
1707         ret = -EFAULT;
1708         if (copy_from_user(&cmd, buffer, sizeof cmd))
1709                 goto out;
1710
1711         ret = spufs_check_valid_dma(&cmd);
1712         if (ret)
1713                 goto out;
1714
1715         ret = spu_acquire(ctx);
1716         if (ret)
1717                 goto out;
1718
1719         ret = spufs_wait(ctx->run_wq, ctx->state == SPU_STATE_RUNNABLE);
1720         if (ret)
1721                 goto out;
1722
1723         if (file->f_flags & O_NONBLOCK) {
1724                 ret = ctx->ops->send_mfc_command(ctx, &cmd);
1725         } else {
1726                 int status;
1727                 ret = spufs_wait(ctx->mfc_wq,
1728                                  spu_send_mfc_command(ctx, cmd, &status));
1729                 if (status)
1730                         ret = status;
1731         }
1732
1733         if (ret)
1734                 goto out_unlock;
1735
1736         ctx->tagwait |= 1 << cmd.tag;
1737         ret = size;
1738
1739 out_unlock:
1740         spu_release(ctx);
1741 out:
1742         return ret;
1743 }
1744
1745 static unsigned int spufs_mfc_poll(struct file *file,poll_table *wait)
1746 {
1747         struct spu_context *ctx = file->private_data;
1748         u32 free_elements, tagstatus;
1749         unsigned int mask;
1750
1751         poll_wait(file, &ctx->mfc_wq, wait);
1752
1753         /*
1754          * For now keep this uninterruptible and also ignore the rule
1755          * that poll should not sleep.  Will be fixed later.
1756          */
1757         mutex_lock(&ctx->state_mutex);
1758         ctx->ops->set_mfc_query(ctx, ctx->tagwait, 2);
1759         free_elements = ctx->ops->get_mfc_free_elements(ctx);
1760         tagstatus = ctx->ops->read_mfc_tagstatus(ctx);
1761         spu_release(ctx);
1762
1763         mask = 0;
1764         if (free_elements & 0xffff)
1765                 mask |= POLLOUT | POLLWRNORM;
1766         if (tagstatus & ctx->tagwait)
1767                 mask |= POLLIN | POLLRDNORM;
1768
1769         pr_debug("%s: free %d tagstatus %d tagwait %d\n", __FUNCTION__,
1770                 free_elements, tagstatus, ctx->tagwait);
1771
1772         return mask;
1773 }
1774
1775 static int spufs_mfc_flush(struct file *file, fl_owner_t id)
1776 {
1777         struct spu_context *ctx = file->private_data;
1778         int ret;
1779
1780         ret = spu_acquire(ctx);
1781         if (ret)
1782                 return ret;
1783 #if 0
1784 /* this currently hangs */
1785         ret = spufs_wait(ctx->mfc_wq,
1786                          ctx->ops->set_mfc_query(ctx, ctx->tagwait, 2));
1787         if (ret)
1788                 goto out;
1789         ret = spufs_wait(ctx->mfc_wq,
1790                          ctx->ops->read_mfc_tagstatus(ctx) == ctx->tagwait);
1791 out:
1792 #else
1793         ret = 0;
1794 #endif
1795         spu_release(ctx);
1796
1797         return ret;
1798 }
1799
1800 static int spufs_mfc_fsync(struct file *file, struct dentry *dentry,
1801                            int datasync)
1802 {
1803         return spufs_mfc_flush(file, NULL);
1804 }
1805
1806 static int spufs_mfc_fasync(int fd, struct file *file, int on)
1807 {
1808         struct spu_context *ctx = file->private_data;
1809
1810         return fasync_helper(fd, file, on, &ctx->mfc_fasync);
1811 }
1812
1813 static const struct file_operations spufs_mfc_fops = {
1814         .open    = spufs_mfc_open,
1815         .release = spufs_mfc_release,
1816         .read    = spufs_mfc_read,
1817         .write   = spufs_mfc_write,
1818         .poll    = spufs_mfc_poll,
1819         .flush   = spufs_mfc_flush,
1820         .fsync   = spufs_mfc_fsync,
1821         .fasync  = spufs_mfc_fasync,
1822         .mmap    = spufs_mfc_mmap,
1823 };
1824
1825 static int spufs_npc_set(void *data, u64 val)
1826 {
1827         struct spu_context *ctx = data;
1828         int ret;
1829
1830         ret = spu_acquire(ctx);
1831         if (ret)
1832                 return ret;
1833         ctx->ops->npc_write(ctx, val);
1834         spu_release(ctx);
1835
1836         return 0;
1837 }
1838
1839 static u64 spufs_npc_get(struct spu_context *ctx)
1840 {
1841         return ctx->ops->npc_read(ctx);
1842 }
1843 DEFINE_SPUFS_ATTRIBUTE(spufs_npc_ops, spufs_npc_get, spufs_npc_set,
1844                        "0x%llx\n", SPU_ATTR_ACQUIRE);
1845
1846 static int spufs_decr_set(void *data, u64 val)
1847 {
1848         struct spu_context *ctx = data;
1849         struct spu_lscsa *lscsa = ctx->csa.lscsa;
1850         int ret;
1851
1852         ret = spu_acquire_saved(ctx);
1853         if (ret)
1854                 return ret;
1855         lscsa->decr.slot[0] = (u32) val;
1856         spu_release_saved(ctx);
1857
1858         return 0;
1859 }
1860
1861 static u64 spufs_decr_get(struct spu_context *ctx)
1862 {
1863         struct spu_lscsa *lscsa = ctx->csa.lscsa;
1864         return lscsa->decr.slot[0];
1865 }
1866 DEFINE_SPUFS_ATTRIBUTE(spufs_decr_ops, spufs_decr_get, spufs_decr_set,
1867                        "0x%llx\n", SPU_ATTR_ACQUIRE_SAVED);
1868
1869 static int spufs_decr_status_set(void *data, u64 val)
1870 {
1871         struct spu_context *ctx = data;
1872         int ret;
1873
1874         ret = spu_acquire_saved(ctx);
1875         if (ret)
1876                 return ret;
1877         if (val)
1878                 ctx->csa.priv2.mfc_control_RW |= MFC_CNTL_DECREMENTER_RUNNING;
1879         else
1880                 ctx->csa.priv2.mfc_control_RW &= ~MFC_CNTL_DECREMENTER_RUNNING;
1881         spu_release_saved(ctx);
1882
1883         return 0;
1884 }
1885
1886 static u64 spufs_decr_status_get(struct spu_context *ctx)
1887 {
1888         if (ctx->csa.priv2.mfc_control_RW & MFC_CNTL_DECREMENTER_RUNNING)
1889                 return SPU_DECR_STATUS_RUNNING;
1890         else
1891                 return 0;
1892 }
1893 DEFINE_SPUFS_ATTRIBUTE(spufs_decr_status_ops, spufs_decr_status_get,
1894                        spufs_decr_status_set, "0x%llx\n",
1895                        SPU_ATTR_ACQUIRE_SAVED);
1896
1897 static int spufs_event_mask_set(void *data, u64 val)
1898 {
1899         struct spu_context *ctx = data;
1900         struct spu_lscsa *lscsa = ctx->csa.lscsa;
1901         int ret;
1902
1903         ret = spu_acquire_saved(ctx);
1904         if (ret)
1905                 return ret;
1906         lscsa->event_mask.slot[0] = (u32) val;
1907         spu_release_saved(ctx);
1908
1909         return 0;
1910 }
1911
1912 static u64 spufs_event_mask_get(struct spu_context *ctx)
1913 {
1914         struct spu_lscsa *lscsa = ctx->csa.lscsa;
1915         return lscsa->event_mask.slot[0];
1916 }
1917
1918 DEFINE_SPUFS_ATTRIBUTE(spufs_event_mask_ops, spufs_event_mask_get,
1919                        spufs_event_mask_set, "0x%llx\n",
1920                        SPU_ATTR_ACQUIRE_SAVED);
1921
1922 static u64 spufs_event_status_get(struct spu_context *ctx)
1923 {
1924         struct spu_state *state = &ctx->csa;
1925         u64 stat;
1926         stat = state->spu_chnlcnt_RW[0];
1927         if (stat)
1928                 return state->spu_chnldata_RW[0];
1929         return 0;
1930 }
1931 DEFINE_SPUFS_ATTRIBUTE(spufs_event_status_ops, spufs_event_status_get,
1932                        NULL, "0x%llx\n", SPU_ATTR_ACQUIRE_SAVED)
1933
1934 static int spufs_srr0_set(void *data, u64 val)
1935 {
1936         struct spu_context *ctx = data;
1937         struct spu_lscsa *lscsa = ctx->csa.lscsa;
1938         int ret;
1939
1940         ret = spu_acquire_saved(ctx);
1941         if (ret)
1942                 return ret;
1943         lscsa->srr0.slot[0] = (u32) val;
1944         spu_release_saved(ctx);
1945
1946         return 0;
1947 }
1948
1949 static u64 spufs_srr0_get(struct spu_context *ctx)
1950 {
1951         struct spu_lscsa *lscsa = ctx->csa.lscsa;
1952         return lscsa->srr0.slot[0];
1953 }
1954 DEFINE_SPUFS_ATTRIBUTE(spufs_srr0_ops, spufs_srr0_get, spufs_srr0_set,
1955                        "0x%llx\n", SPU_ATTR_ACQUIRE_SAVED)
1956
1957 static u64 spufs_id_get(struct spu_context *ctx)
1958 {
1959         u64 num;
1960
1961         if (ctx->state == SPU_STATE_RUNNABLE)
1962                 num = ctx->spu->number;
1963         else
1964                 num = (unsigned int)-1;
1965
1966         return num;
1967 }
1968 DEFINE_SPUFS_ATTRIBUTE(spufs_id_ops, spufs_id_get, NULL, "0x%llx\n",
1969                        SPU_ATTR_ACQUIRE)
1970
1971 static u64 spufs_object_id_get(struct spu_context *ctx)
1972 {
1973         /* FIXME: Should there really be no locking here? */
1974         return ctx->object_id;
1975 }
1976
1977 static int spufs_object_id_set(void *data, u64 id)
1978 {
1979         struct spu_context *ctx = data;
1980         ctx->object_id = id;
1981
1982         return 0;
1983 }
1984
1985 DEFINE_SPUFS_ATTRIBUTE(spufs_object_id_ops, spufs_object_id_get,
1986                        spufs_object_id_set, "0x%llx\n", SPU_ATTR_NOACQUIRE);
1987
1988 static u64 spufs_lslr_get(struct spu_context *ctx)
1989 {
1990         return ctx->csa.priv2.spu_lslr_RW;
1991 }
1992 DEFINE_SPUFS_ATTRIBUTE(spufs_lslr_ops, spufs_lslr_get, NULL, "0x%llx\n",
1993                        SPU_ATTR_ACQUIRE_SAVED);
1994
1995 static int spufs_info_open(struct inode *inode, struct file *file)
1996 {
1997         struct spufs_inode_info *i = SPUFS_I(inode);
1998         struct spu_context *ctx = i->i_ctx;
1999         file->private_data = ctx;
2000         return 0;
2001 }
2002
2003 static int spufs_caps_show(struct seq_file *s, void *private)
2004 {
2005         struct spu_context *ctx = s->private;
2006
2007         if (!(ctx->flags & SPU_CREATE_NOSCHED))
2008                 seq_puts(s, "sched\n");
2009         if (!(ctx->flags & SPU_CREATE_ISOLATE))
2010                 seq_puts(s, "step\n");
2011         return 0;
2012 }
2013
2014 static int spufs_caps_open(struct inode *inode, struct file *file)
2015 {
2016         return single_open(file, spufs_caps_show, SPUFS_I(inode)->i_ctx);
2017 }
2018
2019 static const struct file_operations spufs_caps_fops = {
2020         .open           = spufs_caps_open,
2021         .read           = seq_read,
2022         .llseek         = seq_lseek,
2023         .release        = single_release,
2024 };
2025
2026 static ssize_t __spufs_mbox_info_read(struct spu_context *ctx,
2027                         char __user *buf, size_t len, loff_t *pos)
2028 {
2029         u32 data;
2030
2031         /* EOF if there's no entry in the mbox */
2032         if (!(ctx->csa.prob.mb_stat_R & 0x0000ff))
2033                 return 0;
2034
2035         data = ctx->csa.prob.pu_mb_R;
2036
2037         return simple_read_from_buffer(buf, len, pos, &data, sizeof data);
2038 }
2039
2040 static ssize_t spufs_mbox_info_read(struct file *file, char __user *buf,
2041                                    size_t len, loff_t *pos)
2042 {
2043         int ret;
2044         struct spu_context *ctx = file->private_data;
2045
2046         if (!access_ok(VERIFY_WRITE, buf, len))
2047                 return -EFAULT;
2048
2049         ret = spu_acquire_saved(ctx);
2050         if (ret)
2051                 return ret;
2052         spin_lock(&ctx->csa.register_lock);
2053         ret = __spufs_mbox_info_read(ctx, buf, len, pos);
2054         spin_unlock(&ctx->csa.register_lock);
2055         spu_release_saved(ctx);
2056
2057         return ret;
2058 }
2059
2060 static const struct file_operations spufs_mbox_info_fops = {
2061         .open = spufs_info_open,
2062         .read = spufs_mbox_info_read,
2063         .llseek  = generic_file_llseek,
2064 };
2065
2066 static ssize_t __spufs_ibox_info_read(struct spu_context *ctx,
2067                                 char __user *buf, size_t len, loff_t *pos)
2068 {
2069         u32 data;
2070
2071         /* EOF if there's no entry in the ibox */
2072         if (!(ctx->csa.prob.mb_stat_R & 0xff0000))
2073                 return 0;
2074
2075         data = ctx->csa.priv2.puint_mb_R;
2076
2077         return simple_read_from_buffer(buf, len, pos, &data, sizeof data);
2078 }
2079
2080 static ssize_t spufs_ibox_info_read(struct file *file, char __user *buf,
2081                                    size_t len, loff_t *pos)
2082 {
2083         struct spu_context *ctx = file->private_data;
2084         int ret;
2085
2086         if (!access_ok(VERIFY_WRITE, buf, len))
2087                 return -EFAULT;
2088
2089         ret = spu_acquire_saved(ctx);
2090         if (ret)
2091                 return ret;
2092         spin_lock(&ctx->csa.register_lock);
2093         ret = __spufs_ibox_info_read(ctx, buf, len, pos);
2094         spin_unlock(&ctx->csa.register_lock);
2095         spu_release_saved(ctx);
2096
2097         return ret;
2098 }
2099
2100 static const struct file_operations spufs_ibox_info_fops = {
2101         .open = spufs_info_open,
2102         .read = spufs_ibox_info_read,
2103         .llseek  = generic_file_llseek,
2104 };
2105
2106 static ssize_t __spufs_wbox_info_read(struct spu_context *ctx,
2107                         char __user *buf, size_t len, loff_t *pos)
2108 {
2109         int i, cnt;
2110         u32 data[4];
2111         u32 wbox_stat;
2112
2113         wbox_stat = ctx->csa.prob.mb_stat_R;
2114         cnt = 4 - ((wbox_stat & 0x00ff00) >> 8);
2115         for (i = 0; i < cnt; i++) {
2116                 data[i] = ctx->csa.spu_mailbox_data[i];
2117         }
2118
2119         return simple_read_from_buffer(buf, len, pos, &data,
2120                                 cnt * sizeof(u32));
2121 }
2122
2123 static ssize_t spufs_wbox_info_read(struct file *file, char __user *buf,
2124                                    size_t len, loff_t *pos)
2125 {
2126         struct spu_context *ctx = file->private_data;
2127         int ret;
2128
2129         if (!access_ok(VERIFY_WRITE, buf, len))
2130                 return -EFAULT;
2131
2132         ret = spu_acquire_saved(ctx);
2133         if (ret)
2134                 return ret;
2135         spin_lock(&ctx->csa.register_lock);
2136         ret = __spufs_wbox_info_read(ctx, buf, len, pos);
2137         spin_unlock(&ctx->csa.register_lock);
2138         spu_release_saved(ctx);
2139
2140         return ret;
2141 }
2142
2143 static const struct file_operations spufs_wbox_info_fops = {
2144         .open = spufs_info_open,
2145         .read = spufs_wbox_info_read,
2146         .llseek  = generic_file_llseek,
2147 };
2148
2149 static ssize_t __spufs_dma_info_read(struct spu_context *ctx,
2150                         char __user *buf, size_t len, loff_t *pos)
2151 {
2152         struct spu_dma_info info;
2153         struct mfc_cq_sr *qp, *spuqp;
2154         int i;
2155
2156         info.dma_info_type = ctx->csa.priv2.spu_tag_status_query_RW;
2157         info.dma_info_mask = ctx->csa.lscsa->tag_mask.slot[0];
2158         info.dma_info_status = ctx->csa.spu_chnldata_RW[24];
2159         info.dma_info_stall_and_notify = ctx->csa.spu_chnldata_RW[25];
2160         info.dma_info_atomic_command_status = ctx->csa.spu_chnldata_RW[27];
2161         for (i = 0; i < 16; i++) {
2162                 qp = &info.dma_info_command_data[i];
2163                 spuqp = &ctx->csa.priv2.spuq[i];
2164
2165                 qp->mfc_cq_data0_RW = spuqp->mfc_cq_data0_RW;
2166                 qp->mfc_cq_data1_RW = spuqp->mfc_cq_data1_RW;
2167                 qp->mfc_cq_data2_RW = spuqp->mfc_cq_data2_RW;
2168                 qp->mfc_cq_data3_RW = spuqp->mfc_cq_data3_RW;
2169         }
2170
2171         return simple_read_from_buffer(buf, len, pos, &info,
2172                                 sizeof info);
2173 }
2174
2175 static ssize_t spufs_dma_info_read(struct file *file, char __user *buf,
2176                               size_t len, loff_t *pos)
2177 {
2178         struct spu_context *ctx = file->private_data;
2179         int ret;
2180
2181         if (!access_ok(VERIFY_WRITE, buf, len))
2182                 return -EFAULT;
2183
2184         ret = spu_acquire_saved(ctx);
2185         if (ret)
2186                 return ret;
2187         spin_lock(&ctx->csa.register_lock);
2188         ret = __spufs_dma_info_read(ctx, buf, len, pos);
2189         spin_unlock(&ctx->csa.register_lock);
2190         spu_release_saved(ctx);
2191
2192         return ret;
2193 }
2194
2195 static const struct file_operations spufs_dma_info_fops = {
2196         .open = spufs_info_open,
2197         .read = spufs_dma_info_read,
2198 };
2199
2200 static ssize_t __spufs_proxydma_info_read(struct spu_context *ctx,
2201                         char __user *buf, size_t len, loff_t *pos)
2202 {
2203         struct spu_proxydma_info info;
2204         struct mfc_cq_sr *qp, *puqp;
2205         int ret = sizeof info;
2206         int i;
2207
2208         if (len < ret)
2209                 return -EINVAL;
2210
2211         if (!access_ok(VERIFY_WRITE, buf, len))
2212                 return -EFAULT;
2213
2214         info.proxydma_info_type = ctx->csa.prob.dma_querytype_RW;
2215         info.proxydma_info_mask = ctx->csa.prob.dma_querymask_RW;
2216         info.proxydma_info_status = ctx->csa.prob.dma_tagstatus_R;
2217         for (i = 0; i < 8; i++) {
2218                 qp = &info.proxydma_info_command_data[i];
2219                 puqp = &ctx->csa.priv2.puq[i];
2220
2221                 qp->mfc_cq_data0_RW = puqp->mfc_cq_data0_RW;
2222                 qp->mfc_cq_data1_RW = puqp->mfc_cq_data1_RW;
2223                 qp->mfc_cq_data2_RW = puqp->mfc_cq_data2_RW;
2224                 qp->mfc_cq_data3_RW = puqp->mfc_cq_data3_RW;
2225         }
2226
2227         return simple_read_from_buffer(buf, len, pos, &info,
2228                                 sizeof info);
2229 }
2230
2231 static ssize_t spufs_proxydma_info_read(struct file *file, char __user *buf,
2232                                    size_t len, loff_t *pos)
2233 {
2234         struct spu_context *ctx = file->private_data;
2235         int ret;
2236
2237         ret = spu_acquire_saved(ctx);
2238         if (ret)
2239                 return ret;
2240         spin_lock(&ctx->csa.register_lock);
2241         ret = __spufs_proxydma_info_read(ctx, buf, len, pos);
2242         spin_unlock(&ctx->csa.register_lock);
2243         spu_release_saved(ctx);
2244
2245         return ret;
2246 }
2247
2248 static const struct file_operations spufs_proxydma_info_fops = {
2249         .open = spufs_info_open,
2250         .read = spufs_proxydma_info_read,
2251 };
2252
2253 static int spufs_show_tid(struct seq_file *s, void *private)
2254 {
2255         struct spu_context *ctx = s->private;
2256
2257         seq_printf(s, "%d\n", ctx->tid);
2258         return 0;
2259 }
2260
2261 static int spufs_tid_open(struct inode *inode, struct file *file)
2262 {
2263         return single_open(file, spufs_show_tid, SPUFS_I(inode)->i_ctx);
2264 }
2265
2266 static const struct file_operations spufs_tid_fops = {
2267         .open           = spufs_tid_open,
2268         .read           = seq_read,
2269         .llseek         = seq_lseek,
2270         .release        = single_release,
2271 };
2272
2273 static const char *ctx_state_names[] = {
2274         "user", "system", "iowait", "loaded"
2275 };
2276
2277 static unsigned long long spufs_acct_time(struct spu_context *ctx,
2278                 enum spu_utilization_state state)
2279 {
2280         struct timespec ts;
2281         unsigned long long time = ctx->stats.times[state];
2282
2283         /*
2284          * In general, utilization statistics are updated by the controlling
2285          * thread as the spu context moves through various well defined
2286          * state transitions, but if the context is lazily loaded its
2287          * utilization statistics are not updated as the controlling thread
2288          * is not tightly coupled with the execution of the spu context.  We
2289          * calculate and apply the time delta from the last recorded state
2290          * of the spu context.
2291          */
2292         if (ctx->spu && ctx->stats.util_state == state) {
2293                 ktime_get_ts(&ts);
2294                 time += timespec_to_ns(&ts) - ctx->stats.tstamp;
2295         }
2296
2297         return time / NSEC_PER_MSEC;
2298 }
2299
2300 static unsigned long long spufs_slb_flts(struct spu_context *ctx)
2301 {
2302         unsigned long long slb_flts = ctx->stats.slb_flt;
2303
2304         if (ctx->state == SPU_STATE_RUNNABLE) {
2305                 slb_flts += (ctx->spu->stats.slb_flt -
2306                              ctx->stats.slb_flt_base);
2307         }
2308
2309         return slb_flts;
2310 }
2311
2312 static unsigned long long spufs_class2_intrs(struct spu_context *ctx)
2313 {
2314         unsigned long long class2_intrs = ctx->stats.class2_intr;
2315
2316         if (ctx->state == SPU_STATE_RUNNABLE) {
2317                 class2_intrs += (ctx->spu->stats.class2_intr -
2318                                  ctx->stats.class2_intr_base);
2319         }
2320
2321         return class2_intrs;
2322 }
2323
2324
2325 static int spufs_show_stat(struct seq_file *s, void *private)
2326 {
2327         struct spu_context *ctx = s->private;
2328         int ret;
2329
2330         ret = spu_acquire(ctx);
2331         if (ret)
2332                 return ret;
2333
2334         seq_printf(s, "%s %llu %llu %llu %llu "
2335                       "%llu %llu %llu %llu %llu %llu %llu %llu\n",
2336                 ctx_state_names[ctx->stats.util_state],
2337                 spufs_acct_time(ctx, SPU_UTIL_USER),
2338                 spufs_acct_time(ctx, SPU_UTIL_SYSTEM),
2339                 spufs_acct_time(ctx, SPU_UTIL_IOWAIT),
2340                 spufs_acct_time(ctx, SPU_UTIL_IDLE_LOADED),
2341                 ctx->stats.vol_ctx_switch,
2342                 ctx->stats.invol_ctx_switch,
2343                 spufs_slb_flts(ctx),
2344                 ctx->stats.hash_flt,
2345                 ctx->stats.min_flt,
2346                 ctx->stats.maj_flt,
2347                 spufs_class2_intrs(ctx),
2348                 ctx->stats.libassist);
2349         spu_release(ctx);
2350         return 0;
2351 }
2352
2353 static int spufs_stat_open(struct inode *inode, struct file *file)
2354 {
2355         return single_open(file, spufs_show_stat, SPUFS_I(inode)->i_ctx);
2356 }
2357
2358 static const struct file_operations spufs_stat_fops = {
2359         .open           = spufs_stat_open,
2360         .read           = seq_read,
2361         .llseek         = seq_lseek,
2362         .release        = single_release,
2363 };
2364
2365
2366 struct tree_descr spufs_dir_contents[] = {
2367         { "capabilities", &spufs_caps_fops, 0444, },
2368         { "mem",  &spufs_mem_fops,  0666, },
2369         { "regs", &spufs_regs_fops,  0666, },
2370         { "mbox", &spufs_mbox_fops, 0444, },
2371         { "ibox", &spufs_ibox_fops, 0444, },
2372         { "wbox", &spufs_wbox_fops, 0222, },
2373         { "mbox_stat", &spufs_mbox_stat_fops, 0444, },
2374         { "ibox_stat", &spufs_ibox_stat_fops, 0444, },
2375         { "wbox_stat", &spufs_wbox_stat_fops, 0444, },
2376         { "signal1", &spufs_signal1_fops, 0666, },
2377         { "signal2", &spufs_signal2_fops, 0666, },
2378         { "signal1_type", &spufs_signal1_type, 0666, },
2379         { "signal2_type", &spufs_signal2_type, 0666, },
2380         { "cntl", &spufs_cntl_fops,  0666, },
2381         { "fpcr", &spufs_fpcr_fops, 0666, },
2382         { "lslr", &spufs_lslr_ops, 0444, },
2383         { "mfc", &spufs_mfc_fops, 0666, },
2384         { "mss", &spufs_mss_fops, 0666, },
2385         { "npc", &spufs_npc_ops, 0666, },
2386         { "srr0", &spufs_srr0_ops, 0666, },
2387         { "decr", &spufs_decr_ops, 0666, },
2388         { "decr_status", &spufs_decr_status_ops, 0666, },
2389         { "event_mask", &spufs_event_mask_ops, 0666, },
2390         { "event_status", &spufs_event_status_ops, 0444, },
2391         { "psmap", &spufs_psmap_fops, 0666, },
2392         { "phys-id", &spufs_id_ops, 0666, },
2393         { "object-id", &spufs_object_id_ops, 0666, },
2394         { "mbox_info", &spufs_mbox_info_fops, 0444, },
2395         { "ibox_info", &spufs_ibox_info_fops, 0444, },
2396         { "wbox_info", &spufs_wbox_info_fops, 0444, },
2397         { "dma_info", &spufs_dma_info_fops, 0444, },
2398         { "proxydma_info", &spufs_proxydma_info_fops, 0444, },
2399         { "tid", &spufs_tid_fops, 0444, },
2400         { "stat", &spufs_stat_fops, 0444, },
2401         {},
2402 };
2403
2404 struct tree_descr spufs_dir_nosched_contents[] = {
2405         { "capabilities", &spufs_caps_fops, 0444, },
2406         { "mem",  &spufs_mem_fops,  0666, },
2407         { "mbox", &spufs_mbox_fops, 0444, },
2408         { "ibox", &spufs_ibox_fops, 0444, },
2409         { "wbox", &spufs_wbox_fops, 0222, },
2410         { "mbox_stat", &spufs_mbox_stat_fops, 0444, },
2411         { "ibox_stat", &spufs_ibox_stat_fops, 0444, },
2412         { "wbox_stat", &spufs_wbox_stat_fops, 0444, },
2413         { "signal1", &spufs_signal1_nosched_fops, 0222, },
2414         { "signal2", &spufs_signal2_nosched_fops, 0222, },
2415         { "signal1_type", &spufs_signal1_type, 0666, },
2416         { "signal2_type", &spufs_signal2_type, 0666, },
2417         { "mss", &spufs_mss_fops, 0666, },
2418         { "mfc", &spufs_mfc_fops, 0666, },
2419         { "cntl", &spufs_cntl_fops,  0666, },
2420         { "npc", &spufs_npc_ops, 0666, },
2421         { "psmap", &spufs_psmap_fops, 0666, },
2422         { "phys-id", &spufs_id_ops, 0666, },
2423         { "object-id", &spufs_object_id_ops, 0666, },
2424         { "tid", &spufs_tid_fops, 0444, },
2425         { "stat", &spufs_stat_fops, 0444, },
2426         {},
2427 };
2428
2429 struct spufs_coredump_reader spufs_coredump_read[] = {
2430         { "regs", __spufs_regs_read, NULL, sizeof(struct spu_reg128[128])},
2431         { "fpcr", __spufs_fpcr_read, NULL, sizeof(struct spu_reg128) },
2432         { "lslr", NULL, spufs_lslr_get, 19 },
2433         { "decr", NULL, spufs_decr_get, 19 },
2434         { "decr_status", NULL, spufs_decr_status_get, 19 },
2435         { "mem", __spufs_mem_read, NULL, LS_SIZE, },
2436         { "signal1", __spufs_signal1_read, NULL, sizeof(u32) },
2437         { "signal1_type", NULL, spufs_signal1_type_get, 19 },
2438         { "signal2", __spufs_signal2_read, NULL, sizeof(u32) },
2439         { "signal2_type", NULL, spufs_signal2_type_get, 19 },
2440         { "event_mask", NULL, spufs_event_mask_get, 19 },
2441         { "event_status", NULL, spufs_event_status_get, 19 },
2442         { "mbox_info", __spufs_mbox_info_read, NULL, sizeof(u32) },
2443         { "ibox_info", __spufs_ibox_info_read, NULL, sizeof(u32) },
2444         { "wbox_info", __spufs_wbox_info_read, NULL, 4 * sizeof(u32)},
2445         { "dma_info", __spufs_dma_info_read, NULL, sizeof(struct spu_dma_info)},
2446         { "proxydma_info", __spufs_proxydma_info_read,
2447                            NULL, sizeof(struct spu_proxydma_info)},
2448         { "object-id", NULL, spufs_object_id_get, 19 },
2449         { "npc", NULL, spufs_npc_get, 19 },
2450         { NULL },
2451 };