54a5a1c35ad1ed4c552058d2bd5f3016a703c766
[linux-2.6.git] / drivers / misc / sgi-gru / gruprocfs.c
1 /*
2  * SN Platform GRU Driver
3  *
4  *              PROC INTERFACES
5  *
6  * This file supports the /proc interfaces for the GRU driver
7  *
8  *  Copyright (c) 2008 Silicon Graphics, Inc.  All Rights Reserved.
9  *
10  *  This program is free software; you can redistribute it and/or modify
11  *  it under the terms of the GNU General Public License as published by
12  *  the Free Software Foundation; either version 2 of the License, or
13  *  (at your option) any later version.
14  *
15  *  This program is distributed in the hope that it will be useful,
16  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
17  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18  *  GNU General Public License for more details.
19  *
20  *  You should have received a copy of the GNU General Public License
21  *  along with this program; if not, write to the Free Software
22  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
23  */
24
25 #include <linux/proc_fs.h>
26 #include <linux/device.h>
27 #include <linux/seq_file.h>
28 #include <linux/uaccess.h>
29 #include "gru.h"
30 #include "grulib.h"
31 #include "grutables.h"
32
33 #define printstat(s, f)         printstat_val(s, &gru_stats.f, #f)
34
35 static void printstat_val(struct seq_file *s, atomic_long_t *v, char *id)
36 {
37         unsigned long val = atomic_long_read(v);
38
39         seq_printf(s, "%16lu %s\n", val, id);
40 }
41
42 static int statistics_show(struct seq_file *s, void *p)
43 {
44         printstat(s, vdata_alloc);
45         printstat(s, vdata_free);
46         printstat(s, gts_alloc);
47         printstat(s, gts_free);
48         printstat(s, gms_alloc);
49         printstat(s, gms_free);
50         printstat(s, gts_double_allocate);
51         printstat(s, assign_context);
52         printstat(s, assign_context_failed);
53         printstat(s, free_context);
54         printstat(s, load_user_context);
55         printstat(s, load_kernel_context);
56         printstat(s, lock_kernel_context);
57         printstat(s, unlock_kernel_context);
58         printstat(s, steal_user_context);
59         printstat(s, steal_kernel_context);
60         printstat(s, steal_context_failed);
61         printstat(s, nopfn);
62         printstat(s, asid_new);
63         printstat(s, asid_next);
64         printstat(s, asid_wrap);
65         printstat(s, asid_reuse);
66         printstat(s, intr);
67         printstat(s, intr_cbr);
68         printstat(s, intr_tfh);
69         printstat(s, intr_mm_lock_failed);
70         printstat(s, call_os);
71         printstat(s, call_os_wait_queue);
72         printstat(s, user_flush_tlb);
73         printstat(s, user_unload_context);
74         printstat(s, user_exception);
75         printstat(s, set_context_option);
76         printstat(s, check_context_retarget_intr);
77         printstat(s, check_context_unload);
78         printstat(s, tlb_dropin);
79         printstat(s, tlb_preload_page);
80         printstat(s, tlb_dropin_fail_no_asid);
81         printstat(s, tlb_dropin_fail_upm);
82         printstat(s, tlb_dropin_fail_invalid);
83         printstat(s, tlb_dropin_fail_range_active);
84         printstat(s, tlb_dropin_fail_idle);
85         printstat(s, tlb_dropin_fail_fmm);
86         printstat(s, tlb_dropin_fail_no_exception);
87         printstat(s, tfh_stale_on_fault);
88         printstat(s, mmu_invalidate_range);
89         printstat(s, mmu_invalidate_page);
90         printstat(s, flush_tlb);
91         printstat(s, flush_tlb_gru);
92         printstat(s, flush_tlb_gru_tgh);
93         printstat(s, flush_tlb_gru_zero_asid);
94         printstat(s, copy_gpa);
95         printstat(s, read_gpa);
96         printstat(s, mesq_receive);
97         printstat(s, mesq_receive_none);
98         printstat(s, mesq_send);
99         printstat(s, mesq_send_failed);
100         printstat(s, mesq_noop);
101         printstat(s, mesq_send_unexpected_error);
102         printstat(s, mesq_send_lb_overflow);
103         printstat(s, mesq_send_qlimit_reached);
104         printstat(s, mesq_send_amo_nacked);
105         printstat(s, mesq_send_put_nacked);
106         printstat(s, mesq_qf_locked);
107         printstat(s, mesq_qf_noop_not_full);
108         printstat(s, mesq_qf_switch_head_failed);
109         printstat(s, mesq_qf_unexpected_error);
110         printstat(s, mesq_noop_unexpected_error);
111         printstat(s, mesq_noop_lb_overflow);
112         printstat(s, mesq_noop_qlimit_reached);
113         printstat(s, mesq_noop_amo_nacked);
114         printstat(s, mesq_noop_put_nacked);
115         printstat(s, mesq_noop_page_overflow);
116         return 0;
117 }
118
119 static ssize_t statistics_write(struct file *file, const char __user *userbuf,
120                                 size_t count, loff_t *data)
121 {
122         memset(&gru_stats, 0, sizeof(gru_stats));
123         return count;
124 }
125
126 static int mcs_statistics_show(struct seq_file *s, void *p)
127 {
128         int op;
129         unsigned long total, count, max;
130         static char *id[] = {"cch_allocate", "cch_start", "cch_interrupt",
131                 "cch_interrupt_sync", "cch_deallocate", "tfh_write_only",
132                 "tfh_write_restart", "tgh_invalidate"};
133
134         seq_printf(s, "%-20s%12s%12s%12s\n", "#id", "count", "aver-clks", "max-clks");
135         for (op = 0; op < mcsop_last; op++) {
136                 count = atomic_long_read(&mcs_op_statistics[op].count);
137                 total = atomic_long_read(&mcs_op_statistics[op].total);
138                 max = mcs_op_statistics[op].max;
139                 seq_printf(s, "%-20s%12ld%12ld%12ld\n", id[op], count,
140                            count ? total / count : 0, max);
141         }
142         return 0;
143 }
144
145 static ssize_t mcs_statistics_write(struct file *file,
146                         const char __user *userbuf, size_t count, loff_t *data)
147 {
148         memset(mcs_op_statistics, 0, sizeof(mcs_op_statistics));
149         return count;
150 }
151
152 static int options_show(struct seq_file *s, void *p)
153 {
154         seq_printf(s, "#bitmask: 1=trace, 2=statistics\n");
155         seq_printf(s, "0x%lx\n", gru_options);
156         return 0;
157 }
158
159 static ssize_t options_write(struct file *file, const char __user *userbuf,
160                              size_t count, loff_t *data)
161 {
162         char buf[20];
163
164         if (count >= sizeof(buf))
165                 return -EINVAL;
166         if (copy_from_user(buf, userbuf, count))
167                 return -EFAULT;
168         buf[count] = '\0';
169         if (strict_strtoul(buf, 0, &gru_options))
170                 return -EINVAL;
171
172         return count;
173 }
174
175 static int cch_seq_show(struct seq_file *file, void *data)
176 {
177         long gid = *(long *)data;
178         int i;
179         struct gru_state *gru = GID_TO_GRU(gid);
180         struct gru_thread_state *ts;
181         const char *mode[] = { "??", "UPM", "INTR", "OS_POLL" };
182
183         if (gid == 0)
184                 seq_printf(file, "#%5s%5s%6s%7s%9s%6s%8s%8s\n", "gid", "bid",
185                            "ctx#", "asid", "pid", "cbrs", "dsbytes", "mode");
186         if (gru)
187                 for (i = 0; i < GRU_NUM_CCH; i++) {
188                         ts = gru->gs_gts[i];
189                         if (!ts)
190                                 continue;
191                         seq_printf(file, " %5d%5d%6d%7d%9d%6d%8d%8s\n",
192                                    gru->gs_gid, gru->gs_blade_id, i,
193                                    is_kernel_context(ts) ? 0 : ts->ts_gms->ms_asids[gid].mt_asid,
194                                    is_kernel_context(ts) ? 0 : ts->ts_tgid_owner,
195                                    ts->ts_cbr_au_count * GRU_CBR_AU_SIZE,
196                                    ts->ts_cbr_au_count * GRU_DSR_AU_BYTES,
197                                    mode[ts->ts_user_options &
198                                         GRU_OPT_MISS_MASK]);
199                 }
200
201         return 0;
202 }
203
204 static int gru_seq_show(struct seq_file *file, void *data)
205 {
206         long gid = *(long *)data, ctxfree, cbrfree, dsrfree;
207         struct gru_state *gru = GID_TO_GRU(gid);
208
209         if (gid == 0) {
210                 seq_printf(file, "#%5s%5s%7s%6s%6s%8s%6s%6s\n", "gid", "nid",
211                            "ctx", "cbr", "dsr", "ctx", "cbr", "dsr");
212                 seq_printf(file, "#%5s%5s%7s%6s%6s%8s%6s%6s\n", "", "", "busy",
213                            "busy", "busy", "free", "free", "free");
214         }
215         if (gru) {
216                 ctxfree = GRU_NUM_CCH - gru->gs_active_contexts;
217                 cbrfree = hweight64(gru->gs_cbr_map) * GRU_CBR_AU_SIZE;
218                 dsrfree = hweight64(gru->gs_dsr_map) * GRU_DSR_AU_BYTES;
219                 seq_printf(file, " %5d%5d%7ld%6ld%6ld%8ld%6ld%6ld\n",
220                            gru->gs_gid, gru->gs_blade_id, GRU_NUM_CCH - ctxfree,
221                            GRU_NUM_CBE - cbrfree, GRU_NUM_DSR_BYTES - dsrfree,
222                            ctxfree, cbrfree, dsrfree);
223         }
224
225         return 0;
226 }
227
228 static void seq_stop(struct seq_file *file, void *data)
229 {
230 }
231
232 static void *seq_start(struct seq_file *file, loff_t *gid)
233 {
234         if (*gid < gru_max_gids)
235                 return gid;
236         return NULL;
237 }
238
239 static void *seq_next(struct seq_file *file, void *data, loff_t *gid)
240 {
241         (*gid)++;
242         if (*gid < gru_max_gids)
243                 return gid;
244         return NULL;
245 }
246
247 static const struct seq_operations cch_seq_ops = {
248         .start  = seq_start,
249         .next   = seq_next,
250         .stop   = seq_stop,
251         .show   = cch_seq_show
252 };
253
254 static const struct seq_operations gru_seq_ops = {
255         .start  = seq_start,
256         .next   = seq_next,
257         .stop   = seq_stop,
258         .show   = gru_seq_show
259 };
260
261 static int statistics_open(struct inode *inode, struct file *file)
262 {
263         return single_open(file, statistics_show, NULL);
264 }
265
266 static int mcs_statistics_open(struct inode *inode, struct file *file)
267 {
268         return single_open(file, mcs_statistics_show, NULL);
269 }
270
271 static int options_open(struct inode *inode, struct file *file)
272 {
273         return single_open(file, options_show, NULL);
274 }
275
276 static int cch_open(struct inode *inode, struct file *file)
277 {
278         return seq_open(file, &cch_seq_ops);
279 }
280
281 static int gru_open(struct inode *inode, struct file *file)
282 {
283         return seq_open(file, &gru_seq_ops);
284 }
285
286 /* *INDENT-OFF* */
287 static const struct file_operations statistics_fops = {
288         .open           = statistics_open,
289         .read           = seq_read,
290         .write          = statistics_write,
291         .llseek         = seq_lseek,
292         .release        = single_release,
293 };
294
295 static const struct file_operations mcs_statistics_fops = {
296         .open           = mcs_statistics_open,
297         .read           = seq_read,
298         .write          = mcs_statistics_write,
299         .llseek         = seq_lseek,
300         .release        = single_release,
301 };
302
303 static const struct file_operations options_fops = {
304         .open           = options_open,
305         .read           = seq_read,
306         .write          = options_write,
307         .llseek         = seq_lseek,
308         .release        = single_release,
309 };
310
311 static const struct file_operations cch_fops = {
312         .open           = cch_open,
313         .read           = seq_read,
314         .llseek         = seq_lseek,
315         .release        = seq_release,
316 };
317 static const struct file_operations gru_fops = {
318         .open           = gru_open,
319         .read           = seq_read,
320         .llseek         = seq_lseek,
321         .release        = seq_release,
322 };
323
324 static struct proc_entry {
325         char *name;
326         int mode;
327         const struct file_operations *fops;
328         struct proc_dir_entry *entry;
329 } proc_files[] = {
330         {"statistics", 0644, &statistics_fops},
331         {"mcs_statistics", 0644, &mcs_statistics_fops},
332         {"debug_options", 0644, &options_fops},
333         {"cch_status", 0444, &cch_fops},
334         {"gru_status", 0444, &gru_fops},
335         {NULL}
336 };
337 /* *INDENT-ON* */
338
339 static struct proc_dir_entry *proc_gru __read_mostly;
340
341 static int create_proc_file(struct proc_entry *p)
342 {
343         p->entry = proc_create(p->name, p->mode, proc_gru, p->fops);
344         if (!p->entry)
345                 return -1;
346         return 0;
347 }
348
349 static void delete_proc_files(void)
350 {
351         struct proc_entry *p;
352
353         if (proc_gru) {
354                 for (p = proc_files; p->name; p++)
355                         if (p->entry)
356                                 remove_proc_entry(p->name, proc_gru);
357                 remove_proc_entry("gru", proc_gru->parent);
358         }
359 }
360
361 int gru_proc_init(void)
362 {
363         struct proc_entry *p;
364
365         proc_gru = proc_mkdir("sgi_uv/gru", NULL);
366
367         for (p = proc_files; p->name; p++)
368                 if (create_proc_file(p))
369                         goto err;
370         return 0;
371
372 err:
373         delete_proc_files();
374         return -1;
375 }
376
377 void gru_proc_exit(void)
378 {
379         delete_proc_files();
380 }