2 * File...........: linux/drivers/s390/block/dasd_proc.c
3 * Author(s)......: Holger Smolinski <Holger.Smolinski@de.ibm.com>
4 * Horst Hummel <Horst.Hummel@de.ibm.com>
5 * Carsten Otte <Cotte@de.ibm.com>
6 * Martin Schwidefsky <schwidefsky@de.ibm.com>
7 * Bugreports.to..: <Linux390@de.ibm.com>
8 * (C) IBM Corporation, IBM Deutschland Entwicklung GmbH, 1999-2002
10 * /proc interface for the dasd driver.
14 #define KMSG_COMPONENT "dasd"
16 #include <linux/ctype.h>
17 #include <linux/slab.h>
18 #include <linux/string.h>
19 #include <linux/seq_file.h>
20 #include <linux/vmalloc.h>
21 #include <linux/proc_fs.h>
23 #include <asm/debug.h>
24 #include <asm/uaccess.h>
27 #define PRINTK_HEADER "dasd_proc:"
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
;
35 #ifdef CONFIG_DASD_PROFILE
37 dasd_get_user_string(const char __user
*user_buf
, size_t user_len
)
41 buffer
= kmalloc(user_len
+ 1, GFP_KERNEL
);
43 return ERR_PTR(-ENOMEM
);
44 if (copy_from_user(buffer
, user_buf
, user_len
) != 0) {
46 return ERR_PTR(-EFAULT
);
48 /* got the string, now strip linefeed. */
49 if (buffer
[user_len
- 1] == '\n')
50 buffer
[user_len
- 1] = 0;
55 #endif /* CONFIG_DASD_PROFILE */
58 dasd_devices_show(struct seq_file
*m
, void *v
)
60 struct dasd_device
*device
;
61 struct dasd_block
*block
;
64 device
= dasd_device_from_devindex((unsigned long) v
- 1);
68 block
= device
->block
;
70 dasd_put_device(device
);
73 /* Print device number. */
74 seq_printf(m
, "%s", dev_name(&device
->cdev
->dev
));
75 /* Print discipline string. */
76 if (device
->discipline
!= NULL
)
77 seq_printf(m
, "(%s)", device
->discipline
->name
);
79 seq_printf(m
, "(none)");
82 seq_printf(m
, " at (%3d:%6d)",
83 MAJOR(disk_devt(block
->gdp
)),
84 MINOR(disk_devt(block
->gdp
)));
86 seq_printf(m
, " at (???:??????)");
87 /* Print device name. */
89 seq_printf(m
, " is %-8s", block
->gdp
->disk_name
);
91 seq_printf(m
, " is ????????");
92 /* Print devices features. */
93 substr
= (device
->features
& DASD_FEATURE_READONLY
) ? "(ro)" : " ";
94 seq_printf(m
, "%4s: ", substr
);
95 /* Print device status information. */
96 switch (device
->state
) {
100 case DASD_STATE_KNOWN
:
101 seq_printf(m
, "detected");
103 case DASD_STATE_BASIC
:
104 seq_printf(m
, "basic");
106 case DASD_STATE_UNFMT
:
107 seq_printf(m
, "unformatted");
109 case DASD_STATE_READY
:
110 case DASD_STATE_ONLINE
:
111 seq_printf(m
, "active ");
112 if (dasd_check_blocksize(block
->bp_block
))
113 seq_printf(m
, "n/f ");
116 "at blocksize: %d, %lld blocks, %lld MB",
117 block
->bp_block
, block
->blocks
,
118 ((block
->bp_block
>> 9) *
119 block
->blocks
) >> 11);
122 seq_printf(m
, "no stat");
125 dasd_put_device(device
);
127 seq_printf(m
, "(probeonly)");
132 static void *dasd_devices_start(struct seq_file
*m
, loff_t
*pos
)
134 if (*pos
>= dasd_max_devindex
)
136 return (void *)((unsigned long) *pos
+ 1);
139 static void *dasd_devices_next(struct seq_file
*m
, void *v
, loff_t
*pos
)
142 return dasd_devices_start(m
, pos
);
145 static void dasd_devices_stop(struct seq_file
*m
, void *v
)
149 static const struct seq_operations dasd_devices_seq_ops
= {
150 .start
= dasd_devices_start
,
151 .next
= dasd_devices_next
,
152 .stop
= dasd_devices_stop
,
153 .show
= dasd_devices_show
,
156 static int dasd_devices_open(struct inode
*inode
, struct file
*file
)
158 return seq_open(file
, &dasd_devices_seq_ops
);
161 static const struct file_operations dasd_devices_file_ops
= {
162 .owner
= THIS_MODULE
,
163 .open
= dasd_devices_open
,
166 .release
= seq_release
,
169 #ifdef CONFIG_DASD_PROFILE
170 static void dasd_statistics_array(struct seq_file
*m
, unsigned int *array
, int factor
)
174 for (i
= 0; i
< 32; i
++) {
175 seq_printf(m
, "%7d ", array
[i
] / factor
);
181 #endif /* CONFIG_DASD_PROFILE */
183 static int dasd_stats_proc_show(struct seq_file
*m
, void *v
)
185 #ifdef CONFIG_DASD_PROFILE
186 struct dasd_profile_info_t
*prof
;
189 /* check for active profiling */
190 if (dasd_profile_level
== DASD_PROFILE_OFF
) {
191 seq_printf(m
, "Statistics are off - they might be "
192 "switched on using 'echo set on > "
193 "/proc/dasd/statistics'\n");
197 prof
= &dasd_global_profile
;
198 /* prevent counter 'overflow' on output */
199 for (factor
= 1; (prof
->dasd_io_reqs
/ factor
) > 9999999;
202 seq_printf(m
, "%d dasd I/O requests\n", prof
->dasd_io_reqs
);
203 seq_printf(m
, "with %u sectors(512B each)\n",
204 prof
->dasd_io_sects
);
205 seq_printf(m
, "Scale Factor is %d\n", factor
);
207 " __<4 ___8 __16 __32 __64 _128 "
208 " _256 _512 __1k __2k __4k __8k "
209 " _16k _32k _64k 128k\n");
211 " _256 _512 __1M __2M __4M __8M "
212 " _16M _32M _64M 128M 256M 512M "
213 " __1G __2G __4G " " _>4G\n");
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 "
226 "and irq per sector\n");
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
);
233 seq_printf(m
, "Statistics are not activated in this kernel\n");
238 static int dasd_stats_proc_open(struct inode
*inode
, struct file
*file
)
240 return single_open(file
, dasd_stats_proc_show
, NULL
);
243 static ssize_t
dasd_stats_proc_write(struct file
*file
,
244 const char __user
*user_buf
, size_t user_len
, loff_t
*pos
)
246 #ifdef CONFIG_DASD_PROFILE
249 if (user_len
> 65536)
251 buffer
= dasd_get_user_string(user_buf
, user_len
);
253 return PTR_ERR(buffer
);
255 /* check for valid verbs */
256 str
= skip_spaces(buffer
);
257 if (strncmp(str
, "set", 3) == 0 && isspace(str
[3])) {
258 /* 'set xxx' was given */
259 str
= skip_spaces(str
+ 4);
260 if (strcmp(str
, "on") == 0) {
261 /* switch on statistics profiling */
262 dasd_profile_level
= DASD_PROFILE_ON
;
263 pr_info("The statistics feature has been switched "
265 } else if (strcmp(str
, "off") == 0) {
266 /* switch off and reset statistics profiling */
267 memset(&dasd_global_profile
,
268 0, sizeof (struct dasd_profile_info_t
));
269 dasd_profile_level
= DASD_PROFILE_OFF
;
270 pr_info("The statistics feature has been switched "
274 } else if (strncmp(str
, "reset", 5) == 0) {
275 /* reset the statistics */
276 memset(&dasd_global_profile
, 0,
277 sizeof (struct dasd_profile_info_t
));
278 pr_info("The statistics have been reset\n");
284 pr_warning("%s is not a supported value for /proc/dasd/statistics\n",
289 pr_warning("/proc/dasd/statistics: is not activated in this kernel\n");
291 #endif /* CONFIG_DASD_PROFILE */
294 static const struct file_operations dasd_stats_proc_fops
= {
295 .owner
= THIS_MODULE
,
296 .open
= dasd_stats_proc_open
,
299 .release
= single_release
,
300 .write
= dasd_stats_proc_write
,
304 * Create dasd proc-fs entries.
305 * In case creation failed, cleanup and return -ENOENT.
310 dasd_proc_root_entry
= proc_mkdir("dasd", NULL
);
311 if (!dasd_proc_root_entry
)
313 dasd_devices_entry
= proc_create("devices",
314 S_IFREG
| S_IRUGO
| S_IWUSR
,
315 dasd_proc_root_entry
,
316 &dasd_devices_file_ops
);
317 if (!dasd_devices_entry
)
319 dasd_statistics_entry
= proc_create("statistics",
320 S_IFREG
| S_IRUGO
| S_IWUSR
,
321 dasd_proc_root_entry
,
322 &dasd_stats_proc_fops
);
323 if (!dasd_statistics_entry
)
324 goto out_nostatistics
;
328 remove_proc_entry("devices", dasd_proc_root_entry
);
330 remove_proc_entry("dasd", NULL
);
338 remove_proc_entry("devices", dasd_proc_root_entry
);
339 remove_proc_entry("statistics", dasd_proc_root_entry
);
340 remove_proc_entry("dasd", NULL
);