Merge branch 'irq-cleanups-upstream' of git://git.kernel.org/pub/scm/linux/kernel...
[linux-2.6] / arch / powerpc / platforms / cell / spufs / coredump.c
1 /*
2  * SPU core dump code
3  *
4  * (C) Copyright 2006 IBM Corp.
5  *
6  * Author: Dwayne Grant McConnell <decimal@us.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 #include <linux/elf.h>
24 #include <linux/file.h>
25 #include <linux/fs.h>
26 #include <linux/list.h>
27 #include <linux/module.h>
28 #include <linux/syscalls.h>
29
30 #include <asm/uaccess.h>
31
32 #include "spufs.h"
33
34 static ssize_t do_coredump_read(int num, struct spu_context *ctx, void *buffer,
35                                 size_t size, loff_t *off)
36 {
37         u64 data;
38         int ret;
39
40         if (spufs_coredump_read[num].read)
41                 return spufs_coredump_read[num].read(ctx, buffer, size, off);
42
43         data = spufs_coredump_read[num].get(ctx);
44         ret = snprintf(buffer, size, "0x%.16lx", data);
45         if (ret >= size)
46                 return size;
47         return ++ret; /* count trailing NULL */
48 }
49
50 /*
51  * These are the only things you should do on a core-file: use only these
52  * functions to write out all the necessary info.
53  */
54 static int spufs_dump_write(struct file *file, const void *addr, int nr, loff_t *foffset)
55 {
56         unsigned long limit = current->signal->rlim[RLIMIT_CORE].rlim_cur;
57         ssize_t written;
58
59         if (*foffset + nr > limit)
60                 return -EIO;
61
62         written = file->f_op->write(file, addr, nr, &file->f_pos);
63         *foffset += written;
64
65         if (written != nr)
66                 return -EIO;
67
68         return 0;
69 }
70
71 static int spufs_dump_align(struct file *file, char *buf, loff_t new_off,
72                             loff_t *foffset)
73 {
74         int rc, size;
75
76         size = min((loff_t)PAGE_SIZE, new_off - *foffset);
77         memset(buf, 0, size);
78
79         rc = 0;
80         while (rc == 0 && new_off > *foffset) {
81                 size = min((loff_t)PAGE_SIZE, new_off - *foffset);
82                 rc = spufs_dump_write(file, buf, size, foffset);
83         }
84
85         return rc;
86 }
87
88 static int spufs_ctx_note_size(struct spu_context *ctx, int dfd)
89 {
90         int i, sz, total = 0;
91         char *name;
92         char fullname[80];
93
94         for (i = 0; spufs_coredump_read[i].name != NULL; i++) {
95                 name = spufs_coredump_read[i].name;
96                 sz = spufs_coredump_read[i].size;
97
98                 sprintf(fullname, "SPU/%d/%s", dfd, name);
99
100                 total += sizeof(struct elf_note);
101                 total += roundup(strlen(fullname) + 1, 4);
102                 total += roundup(sz, 4);
103         }
104
105         return total;
106 }
107
108 /*
109  * The additional architecture-specific notes for Cell are various
110  * context files in the spu context.
111  *
112  * This function iterates over all open file descriptors and sees
113  * if they are a directory in spufs.  In that case we use spufs
114  * internal functionality to dump them without needing to actually
115  * open the files.
116  */
117 static struct spu_context *coredump_next_context(int *fd)
118 {
119         struct fdtable *fdt = files_fdtable(current->files);
120         struct file *file;
121         struct spu_context *ctx = NULL;
122
123         for (; *fd < fdt->max_fds; (*fd)++) {
124                 if (!FD_ISSET(*fd, fdt->open_fds))
125                         continue;
126
127                 file = fcheck(*fd);
128
129                 if (!file || file->f_op != &spufs_context_fops)
130                         continue;
131
132                 ctx = SPUFS_I(file->f_dentry->d_inode)->i_ctx;
133                 if (ctx->flags & SPU_CREATE_NOSCHED)
134                         continue;
135
136                 break;
137         }
138
139         return ctx;
140 }
141
142 int spufs_coredump_extra_notes_size(void)
143 {
144         struct spu_context *ctx;
145         int size = 0, rc, fd;
146
147         fd = 0;
148         while ((ctx = coredump_next_context(&fd)) != NULL) {
149                 rc = spu_acquire_saved(ctx);
150                 if (rc)
151                         break;
152                 rc = spufs_ctx_note_size(ctx, fd);
153                 spu_release_saved(ctx);
154                 if (rc < 0)
155                         break;
156
157                 size += rc;
158
159                 /* start searching the next fd next time */
160                 fd++;
161         }
162
163         return size;
164 }
165
166 static int spufs_arch_write_note(struct spu_context *ctx, int i,
167                                   struct file *file, int dfd, loff_t *foffset)
168 {
169         loff_t pos = 0;
170         int sz, rc, nread, total = 0;
171         const int bufsz = PAGE_SIZE;
172         char *name;
173         char fullname[80], *buf;
174         struct elf_note en;
175
176         buf = (void *)get_zeroed_page(GFP_KERNEL);
177         if (!buf)
178                 return -ENOMEM;
179
180         name = spufs_coredump_read[i].name;
181         sz = spufs_coredump_read[i].size;
182
183         sprintf(fullname, "SPU/%d/%s", dfd, name);
184         en.n_namesz = strlen(fullname) + 1;
185         en.n_descsz = sz;
186         en.n_type = NT_SPU;
187
188         rc = spufs_dump_write(file, &en, sizeof(en), foffset);
189         if (rc)
190                 goto out;
191
192         rc = spufs_dump_write(file, fullname, en.n_namesz, foffset);
193         if (rc)
194                 goto out;
195
196         rc = spufs_dump_align(file, buf, roundup(*foffset, 4), foffset);
197         if (rc)
198                 goto out;
199
200         do {
201                 nread = do_coredump_read(i, ctx, buf, bufsz, &pos);
202                 if (nread > 0) {
203                         rc = spufs_dump_write(file, buf, nread, foffset);
204                         if (rc)
205                                 goto out;
206                         total += nread;
207                 }
208         } while (nread == bufsz && total < sz);
209
210         if (nread < 0) {
211                 rc = nread;
212                 goto out;
213         }
214
215         rc = spufs_dump_align(file, buf, roundup(*foffset - total + sz, 4),
216                               foffset);
217
218 out:
219         free_page((unsigned long)buf);
220         return rc;
221 }
222
223 int spufs_coredump_extra_notes_write(struct file *file, loff_t *foffset)
224 {
225         struct spu_context *ctx;
226         int fd, j, rc;
227
228         fd = 0;
229         while ((ctx = coredump_next_context(&fd)) != NULL) {
230                 rc = spu_acquire_saved(ctx);
231                 if (rc)
232                         return rc;
233
234                 for (j = 0; spufs_coredump_read[j].name != NULL; j++) {
235                         rc = spufs_arch_write_note(ctx, j, file, fd, foffset);
236                         if (rc) {
237                                 spu_release_saved(ctx);
238                                 return rc;
239                         }
240                 }
241
242                 spu_release_saved(ctx);
243
244                 /* start searching the next fd next time */
245                 fd++;
246         }
247
248         return 0;
249 }