]>
Commit | Line | Data |
---|---|---|
1da177e4 LT |
1 | /* |
2 | * File...........: linux/drivers/s390/block/dasd_proc.c | |
3 | * Author(s)......: Holger Smolinski <[email protected]> | |
4 | * Horst Hummel <[email protected]> | |
5 | * Carsten Otte <[email protected]> | |
6 | * Martin Schwidefsky <[email protected]> | |
7 | * Bugreports.to..: <[email protected]> | |
8 | * (C) IBM Corporation, IBM Deutschland Entwicklung GmbH, 1999-2002 | |
9 | * | |
10 | * /proc interface for the dasd driver. | |
11 | * | |
1da177e4 LT |
12 | */ |
13 | ||
fc19f381 SH |
14 | #define KMSG_COMPONENT "dasd" |
15 | ||
1da177e4 | 16 | #include <linux/ctype.h> |
5a0e3ad6 | 17 | #include <linux/slab.h> |
e7d2860b | 18 | #include <linux/string.h> |
1da177e4 LT |
19 | #include <linux/seq_file.h> |
20 | #include <linux/vmalloc.h> | |
66a464db | 21 | #include <linux/proc_fs.h> |
1da177e4 LT |
22 | |
23 | #include <asm/debug.h> | |
24 | #include <asm/uaccess.h> | |
25 | ||
26 | /* This is ugly... */ | |
27 | #define PRINTK_HEADER "dasd_proc:" | |
28 | ||
29 | #include "dasd_int.h" | |
30 | ||
31 | static struct proc_dir_entry *dasd_proc_root_entry = NULL; | |
32 | static struct proc_dir_entry *dasd_devices_entry = NULL; | |
33 | static struct proc_dir_entry *dasd_statistics_entry = NULL; | |
34 | ||
3d62149f | 35 | #ifdef CONFIG_DASD_PROFILE |
4d284cac | 36 | static char * |
1da177e4 LT |
37 | dasd_get_user_string(const char __user *user_buf, size_t user_len) |
38 | { | |
39 | char *buffer; | |
40 | ||
41 | buffer = kmalloc(user_len + 1, GFP_KERNEL); | |
42 | if (buffer == NULL) | |
43 | return ERR_PTR(-ENOMEM); | |
44 | if (copy_from_user(buffer, user_buf, user_len) != 0) { | |
45 | kfree(buffer); | |
46 | return ERR_PTR(-EFAULT); | |
47 | } | |
48 | /* got the string, now strip linefeed. */ | |
49 | if (buffer[user_len - 1] == '\n') | |
50 | buffer[user_len - 1] = 0; | |
51 | else | |
52 | buffer[user_len] = 0; | |
53 | return buffer; | |
54 | } | |
3d62149f | 55 | #endif /* CONFIG_DASD_PROFILE */ |
1da177e4 LT |
56 | |
57 | static int | |
58 | dasd_devices_show(struct seq_file *m, void *v) | |
59 | { | |
60 | struct dasd_device *device; | |
8e09f215 | 61 | struct dasd_block *block; |
1da177e4 LT |
62 | char *substr; |
63 | ||
64 | device = dasd_device_from_devindex((unsigned long) v - 1); | |
65 | if (IS_ERR(device)) | |
66 | return 0; | |
8e09f215 SW |
67 | if (device->block) |
68 | block = device->block; | |
a5e23839 SW |
69 | else { |
70 | dasd_put_device(device); | |
8e09f215 | 71 | return 0; |
a5e23839 | 72 | } |
1da177e4 | 73 | /* Print device number. */ |
2a0217d5 | 74 | seq_printf(m, "%s", dev_name(&device->cdev->dev)); |
1da177e4 | 75 | /* Print discipline string. */ |
294001a8 | 76 | if (device->discipline != NULL) |
1da177e4 LT |
77 | seq_printf(m, "(%s)", device->discipline->name); |
78 | else | |
79 | seq_printf(m, "(none)"); | |
80 | /* Print kdev. */ | |
8e09f215 | 81 | if (block->gdp) |
1da177e4 | 82 | seq_printf(m, " at (%3d:%6d)", |
f331c029 TH |
83 | MAJOR(disk_devt(block->gdp)), |
84 | MINOR(disk_devt(block->gdp))); | |
1da177e4 LT |
85 | else |
86 | seq_printf(m, " at (???:??????)"); | |
87 | /* Print device name. */ | |
8e09f215 SW |
88 | if (block->gdp) |
89 | seq_printf(m, " is %-8s", block->gdp->disk_name); | |
1da177e4 LT |
90 | else |
91 | seq_printf(m, " is ????????"); | |
92 | /* Print devices features. */ | |
c6eb7b77 | 93 | substr = (device->features & DASD_FEATURE_READONLY) ? "(ro)" : " "; |
1da177e4 LT |
94 | seq_printf(m, "%4s: ", substr); |
95 | /* Print device status information. */ | |
294001a8 | 96 | switch (device->state) { |
1da177e4 LT |
97 | case DASD_STATE_NEW: |
98 | seq_printf(m, "new"); | |
99 | break; | |
100 | case DASD_STATE_KNOWN: | |
101 | seq_printf(m, "detected"); | |
102 | break; | |
103 | case DASD_STATE_BASIC: | |
104 | seq_printf(m, "basic"); | |
105 | break; | |
90f0094d | 106 | case DASD_STATE_UNFMT: |
b707dbe6 | 107 | seq_printf(m, "unformatted"); |
90f0094d | 108 | break; |
1da177e4 LT |
109 | case DASD_STATE_READY: |
110 | case DASD_STATE_ONLINE: | |
111 | seq_printf(m, "active "); | |
8e09f215 | 112 | if (dasd_check_blocksize(block->bp_block)) |
1da177e4 LT |
113 | seq_printf(m, "n/f "); |
114 | else | |
115 | seq_printf(m, | |
b44b0ab3 | 116 | "at blocksize: %d, %lld blocks, %lld MB", |
8e09f215 SW |
117 | block->bp_block, block->blocks, |
118 | ((block->bp_block >> 9) * | |
119 | block->blocks) >> 11); | |
1da177e4 LT |
120 | break; |
121 | default: | |
122 | seq_printf(m, "no stat"); | |
123 | break; | |
124 | } | |
125 | dasd_put_device(device); | |
126 | if (dasd_probeonly) | |
127 | seq_printf(m, "(probeonly)"); | |
128 | seq_printf(m, "\n"); | |
129 | return 0; | |
130 | } | |
131 | ||
132 | static void *dasd_devices_start(struct seq_file *m, loff_t *pos) | |
133 | { | |
134 | if (*pos >= dasd_max_devindex) | |
135 | return NULL; | |
136 | return (void *)((unsigned long) *pos + 1); | |
137 | } | |
138 | ||
139 | static void *dasd_devices_next(struct seq_file *m, void *v, loff_t *pos) | |
140 | { | |
141 | ++*pos; | |
142 | return dasd_devices_start(m, pos); | |
143 | } | |
144 | ||
145 | static void dasd_devices_stop(struct seq_file *m, void *v) | |
146 | { | |
147 | } | |
148 | ||
5c81cdbe | 149 | static const struct seq_operations dasd_devices_seq_ops = { |
1da177e4 LT |
150 | .start = dasd_devices_start, |
151 | .next = dasd_devices_next, | |
152 | .stop = dasd_devices_stop, | |
153 | .show = dasd_devices_show, | |
154 | }; | |
155 | ||
156 | static int dasd_devices_open(struct inode *inode, struct file *file) | |
157 | { | |
158 | return seq_open(file, &dasd_devices_seq_ops); | |
159 | } | |
160 | ||
d54b1fdb | 161 | static const struct file_operations dasd_devices_file_ops = { |
8b594007 | 162 | .owner = THIS_MODULE, |
1da177e4 LT |
163 | .open = dasd_devices_open, |
164 | .read = seq_read, | |
165 | .llseek = seq_lseek, | |
166 | .release = seq_release, | |
167 | }; | |
168 | ||
3d62149f | 169 | #ifdef CONFIG_DASD_PROFILE |
34b9243a | 170 | static void dasd_statistics_array(struct seq_file *m, unsigned int *array, int factor) |
1da177e4 LT |
171 | { |
172 | int i; | |
173 | ||
174 | for (i = 0; i < 32; i++) { | |
34b9243a | 175 | seq_printf(m, "%7d ", array[i] / factor); |
1da177e4 | 176 | if (i == 15) |
34b9243a | 177 | seq_putc(m, '\n'); |
1da177e4 | 178 | } |
34b9243a | 179 | seq_putc(m, '\n'); |
1da177e4 | 180 | } |
3d62149f | 181 | #endif /* CONFIG_DASD_PROFILE */ |
1da177e4 | 182 | |
34b9243a | 183 | static int dasd_stats_proc_show(struct seq_file *m, void *v) |
1da177e4 | 184 | { |
1da177e4 LT |
185 | #ifdef CONFIG_DASD_PROFILE |
186 | struct dasd_profile_info_t *prof; | |
2bf373b3 | 187 | int factor; |
1da177e4 LT |
188 | |
189 | /* check for active profiling */ | |
190 | if (dasd_profile_level == DASD_PROFILE_OFF) { | |
34b9243a | 191 | seq_printf(m, "Statistics are off - they might be " |
1da177e4 LT |
192 | "switched on using 'echo set on > " |
193 | "/proc/dasd/statistics'\n"); | |
34b9243a | 194 | return 0; |
1da177e4 LT |
195 | } |
196 | ||
197 | prof = &dasd_global_profile; | |
fbfecd37 | 198 | /* prevent counter 'overflow' on output */ |
2bf373b3 SH |
199 | for (factor = 1; (prof->dasd_io_reqs / factor) > 9999999; |
200 | factor *= 10); | |
1da177e4 | 201 | |
34b9243a AD |
202 | seq_printf(m, "%d dasd I/O requests\n", prof->dasd_io_reqs); |
203 | seq_printf(m, "with %u sectors(512B each)\n", | |
1da177e4 | 204 | prof->dasd_io_sects); |
34b9243a AD |
205 | seq_printf(m, "Scale Factor is %d\n", factor); |
206 | seq_printf(m, | |
1da177e4 LT |
207 | " __<4 ___8 __16 __32 __64 _128 " |
208 | " _256 _512 __1k __2k __4k __8k " | |
209 | " _16k _32k _64k 128k\n"); | |
34b9243a | 210 | seq_printf(m, |
1da177e4 LT |
211 | " _256 _512 __1M __2M __4M __8M " |
212 | " _16M _32M _64M 128M 256M 512M " | |
213 | " __1G __2G __4G " " _>4G\n"); | |
214 | ||
34b9243a AD |
215 | seq_printf(m, "Histogram of sizes (512B secs)\n"); |
216 | dasd_statistics_array(m, prof->dasd_io_secs, factor); | |
217 | seq_printf(m, "Histogram of I/O times (microseconds)\n"); | |
218 | dasd_statistics_array(m, prof->dasd_io_times, factor); | |
219 | seq_printf(m, "Histogram of I/O times per sector\n"); | |
220 | dasd_statistics_array(m, prof->dasd_io_timps, factor); | |
221 | seq_printf(m, "Histogram of I/O time till ssch\n"); | |
222 | dasd_statistics_array(m, prof->dasd_io_time1, factor); | |
223 | seq_printf(m, "Histogram of I/O time between ssch and irq\n"); | |
224 | dasd_statistics_array(m, prof->dasd_io_time2, factor); | |
225 | seq_printf(m, "Histogram of I/O time between ssch " | |
1da177e4 | 226 | "and irq per sector\n"); |
34b9243a AD |
227 | dasd_statistics_array(m, prof->dasd_io_time2ps, factor); |
228 | seq_printf(m, "Histogram of I/O time between irq and end\n"); | |
229 | dasd_statistics_array(m, prof->dasd_io_time3, factor); | |
230 | seq_printf(m, "# of req in chanq at enqueuing (1..32) \n"); | |
231 | dasd_statistics_array(m, prof->dasd_io_nr_req, factor); | |
1da177e4 | 232 | #else |
34b9243a | 233 | seq_printf(m, "Statistics are not activated in this kernel\n"); |
1da177e4 | 234 | #endif |
34b9243a | 235 | return 0; |
1da177e4 LT |
236 | } |
237 | ||
34b9243a AD |
238 | static int dasd_stats_proc_open(struct inode *inode, struct file *file) |
239 | { | |
240 | return single_open(file, dasd_stats_proc_show, NULL); | |
241 | } | |
242 | ||
243 | static ssize_t dasd_stats_proc_write(struct file *file, | |
244 | const char __user *user_buf, size_t user_len, loff_t *pos) | |
1da177e4 LT |
245 | { |
246 | #ifdef CONFIG_DASD_PROFILE | |
247 | char *buffer, *str; | |
248 | ||
249 | if (user_len > 65536) | |
250 | user_len = 65536; | |
251 | buffer = dasd_get_user_string(user_buf, user_len); | |
252 | if (IS_ERR(buffer)) | |
253 | return PTR_ERR(buffer); | |
fc19f381 | 254 | DBF_EVENT(DBF_DEBUG, "/proc/dasd/statictics: '%s'\n", buffer); |
1da177e4 LT |
255 | |
256 | /* check for valid verbs */ | |
e7d2860b | 257 | str = skip_spaces(buffer); |
1da177e4 LT |
258 | if (strncmp(str, "set", 3) == 0 && isspace(str[3])) { |
259 | /* 'set xxx' was given */ | |
e7d2860b | 260 | str = skip_spaces(str + 4); |
1da177e4 LT |
261 | if (strcmp(str, "on") == 0) { |
262 | /* switch on statistics profiling */ | |
263 | dasd_profile_level = DASD_PROFILE_ON; | |
fc19f381 SH |
264 | pr_info("The statistics feature has been switched " |
265 | "on\n"); | |
1da177e4 LT |
266 | } else if (strcmp(str, "off") == 0) { |
267 | /* switch off and reset statistics profiling */ | |
268 | memset(&dasd_global_profile, | |
269 | 0, sizeof (struct dasd_profile_info_t)); | |
270 | dasd_profile_level = DASD_PROFILE_OFF; | |
fc19f381 SH |
271 | pr_info("The statistics feature has been switched " |
272 | "off\n"); | |
1da177e4 LT |
273 | } else |
274 | goto out_error; | |
275 | } else if (strncmp(str, "reset", 5) == 0) { | |
276 | /* reset the statistics */ | |
277 | memset(&dasd_global_profile, 0, | |
278 | sizeof (struct dasd_profile_info_t)); | |
fc19f381 | 279 | pr_info("The statistics have been reset\n"); |
1da177e4 LT |
280 | } else |
281 | goto out_error; | |
282 | kfree(buffer); | |
283 | return user_len; | |
284 | out_error: | |
fc19f381 SH |
285 | pr_warning("%s is not a supported value for /proc/dasd/statistics\n", |
286 | str); | |
1da177e4 LT |
287 | kfree(buffer); |
288 | return -EINVAL; | |
289 | #else | |
fc19f381 | 290 | pr_warning("/proc/dasd/statistics: is not activated in this kernel\n"); |
1da177e4 LT |
291 | return user_len; |
292 | #endif /* CONFIG_DASD_PROFILE */ | |
293 | } | |
294 | ||
34b9243a AD |
295 | static const struct file_operations dasd_stats_proc_fops = { |
296 | .owner = THIS_MODULE, | |
297 | .open = dasd_stats_proc_open, | |
298 | .read = seq_read, | |
299 | .llseek = seq_lseek, | |
300 | .release = single_release, | |
301 | .write = dasd_stats_proc_write, | |
302 | }; | |
303 | ||
7220fe8b HH |
304 | /* |
305 | * Create dasd proc-fs entries. | |
306 | * In case creation failed, cleanup and return -ENOENT. | |
307 | */ | |
1da177e4 LT |
308 | int |
309 | dasd_proc_init(void) | |
310 | { | |
c74c120a | 311 | dasd_proc_root_entry = proc_mkdir("dasd", NULL); |
7220fe8b HH |
312 | if (!dasd_proc_root_entry) |
313 | goto out_nodasd; | |
8b594007 DL |
314 | dasd_devices_entry = proc_create("devices", |
315 | S_IFREG | S_IRUGO | S_IWUSR, | |
316 | dasd_proc_root_entry, | |
317 | &dasd_devices_file_ops); | |
7220fe8b HH |
318 | if (!dasd_devices_entry) |
319 | goto out_nodevices; | |
34b9243a AD |
320 | dasd_statistics_entry = proc_create("statistics", |
321 | S_IFREG | S_IRUGO | S_IWUSR, | |
322 | dasd_proc_root_entry, | |
323 | &dasd_stats_proc_fops); | |
7220fe8b HH |
324 | if (!dasd_statistics_entry) |
325 | goto out_nostatistics; | |
1da177e4 | 326 | return 0; |
7220fe8b HH |
327 | |
328 | out_nostatistics: | |
329 | remove_proc_entry("devices", dasd_proc_root_entry); | |
330 | out_nodevices: | |
c74c120a | 331 | remove_proc_entry("dasd", NULL); |
7220fe8b HH |
332 | out_nodasd: |
333 | return -ENOENT; | |
1da177e4 LT |
334 | } |
335 | ||
336 | void | |
337 | dasd_proc_exit(void) | |
338 | { | |
339 | remove_proc_entry("devices", dasd_proc_root_entry); | |
340 | remove_proc_entry("statistics", dasd_proc_root_entry); | |
c74c120a | 341 | remove_proc_entry("dasd", NULL); |
1da177e4 | 342 | } |