Whamcloud - gitweb
LU-6507 obdclass: Fix possible NULL pointer dereference
[fs/lustre-release.git] / lustre / obdclass / lprocfs_status.c
1 /*
2  * GPL HEADER START
3  *
4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License version 2 only,
8  * as published by the Free Software Foundation.
9  *
10  * This program is distributed in the hope that it will be useful, but
11  * WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  * General Public License version 2 for more details (a copy is included
14  * in the LICENSE file that accompanied this code).
15  *
16  * You should have received a copy of the GNU General Public License
17  * version 2 along with this program; If not, see
18  * http://www.sun.com/software/products/lustre/docs/GPLv2.pdf
19  *
20  * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
21  * CA 95054 USA or visit www.sun.com if you need additional information or
22  * have any questions.
23  *
24  * GPL HEADER END
25  */
26 /*
27  * Copyright (c) 2002, 2010, Oracle and/or its affiliates. All rights reserved.
28  * Use is subject to license terms.
29  *
30  * Copyright (c) 2011, 2014, Intel Corporation.
31  */
32 /*
33  * This file is part of Lustre, http://www.lustre.org/
34  * Lustre is a trademark of Sun Microsystems, Inc.
35  *
36  * lustre/obdclass/lprocfs_status.c
37  *
38  * Author: Hariharan Thantry <thantry@users.sourceforge.net>
39  */
40
41 #define DEBUG_SUBSYSTEM S_CLASS
42
43 #include <obd_class.h>
44 #include <lprocfs_status.h>
45 #include <lustre/lustre_idl.h>
46
47 #ifdef CONFIG_PROC_FS
48
49 static int lprocfs_no_percpu_stats = 0;
50 CFS_MODULE_PARM(lprocfs_no_percpu_stats, "i", int, 0644,
51                 "Do not alloc percpu data for lprocfs stats");
52
53 #define MAX_STRING_SIZE 128
54
55 int lprocfs_single_release(struct inode *inode, struct file *file)
56 {
57         return single_release(inode, file);
58 }
59 EXPORT_SYMBOL(lprocfs_single_release);
60
61 int lprocfs_seq_release(struct inode *inode, struct file *file)
62 {
63         return seq_release(inode, file);
64 }
65 EXPORT_SYMBOL(lprocfs_seq_release);
66
67 struct proc_dir_entry *
68 lprocfs_add_simple(struct proc_dir_entry *root, char *name,
69                    void *data, const struct file_operations *fops)
70 {
71         struct proc_dir_entry *proc;
72         mode_t mode = 0;
73
74         if (root == NULL || name == NULL || fops == NULL)
75                 return ERR_PTR(-EINVAL);
76
77         if (fops->read)
78                 mode = 0444;
79         if (fops->write)
80                 mode |= 0200;
81         proc = proc_create_data(name, mode, root, fops, data);
82         if (!proc) {
83                 CERROR("LprocFS: No memory to create /proc entry %s\n",
84                        name);
85                 return ERR_PTR(-ENOMEM);
86         }
87         return proc;
88 }
89 EXPORT_SYMBOL(lprocfs_add_simple);
90
91 struct proc_dir_entry *lprocfs_add_symlink(const char *name,
92                         struct proc_dir_entry *parent, const char *format, ...)
93 {
94         struct proc_dir_entry *entry;
95         char *dest;
96         va_list ap;
97
98         if (parent == NULL || format == NULL)
99                 return NULL;
100
101         OBD_ALLOC_WAIT(dest, MAX_STRING_SIZE + 1);
102         if (dest == NULL)
103                 return NULL;
104
105         va_start(ap, format);
106         vsnprintf(dest, MAX_STRING_SIZE, format, ap);
107         va_end(ap);
108
109         entry = proc_symlink(name, parent, dest);
110         if (entry == NULL)
111                 CERROR("LprocFS: Could not create symbolic link from "
112                        "%s to %s\n", name, dest);
113
114         OBD_FREE(dest, MAX_STRING_SIZE + 1);
115         return entry;
116 }
117 EXPORT_SYMBOL(lprocfs_add_symlink);
118
119 static const struct file_operations lprocfs_generic_fops = { };
120
121 /**
122  * Add /proc entries.
123  *
124  * \param root [in]  The parent proc entry on which new entry will be added.
125  * \param list [in]  Array of proc entries to be added.
126  * \param data [in]  The argument to be passed when entries read/write routines
127  *                   are called through /proc file.
128  *
129  * \retval 0   on success
130  *         < 0 on error
131  */
132 int
133 lprocfs_add_vars(struct proc_dir_entry *root, struct lprocfs_vars *list,
134                  void *data)
135 {
136         if (root == NULL || list == NULL)
137                 return -EINVAL;
138
139         while (list->name != NULL) {
140                 struct proc_dir_entry *proc;
141                 mode_t mode = 0;
142
143                 if (list->proc_mode != 0000) {
144                         mode = list->proc_mode;
145                 } else if (list->fops) {
146                         if (list->fops->read)
147                                 mode = 0444;
148                         if (list->fops->write)
149                                 mode |= 0200;
150                 }
151                 proc = proc_create_data(list->name, mode, root,
152                                         list->fops ?: &lprocfs_generic_fops,
153                                         list->data ?: data);
154                 if (proc == NULL)
155                         return -ENOMEM;
156                 list++;
157         }
158         return 0;
159 }
160 EXPORT_SYMBOL(lprocfs_add_vars);
161
162 #ifndef HAVE_REMOVE_PROC_SUBTREE
163 /* for b=10866, global variable */
164 DECLARE_RWSEM(_lprocfs_lock);
165 EXPORT_SYMBOL(_lprocfs_lock);
166
167 static void lprocfs_remove_nolock(struct proc_dir_entry **proot)
168 {
169         struct proc_dir_entry *root = *proot;
170         struct proc_dir_entry *temp = root;
171         struct proc_dir_entry *rm_entry;
172         struct proc_dir_entry *parent;
173
174         *proot = NULL;
175         if (root == NULL || IS_ERR(root))
176                 return;
177
178         parent = root->parent;
179         LASSERT(parent != NULL);
180
181         while (1) {
182                 while (temp->subdir != NULL)
183                         temp = temp->subdir;
184
185                 rm_entry = temp;
186                 temp = temp->parent;
187
188                 /* Memory corruption once caused this to fail, and
189                    without this LASSERT we would loop here forever. */
190                 LASSERTF(strlen(rm_entry->name) == rm_entry->namelen,
191                          "0x%p  %s/%s len %d\n", rm_entry, temp->name,
192                          rm_entry->name, (int)strlen(rm_entry->name));
193
194                 remove_proc_entry(rm_entry->name, temp);
195                 if (temp == parent)
196                         break;
197         }
198 }
199
200 int remove_proc_subtree(const char *name, struct proc_dir_entry *parent)
201 {
202         struct proc_dir_entry    *t = NULL;
203         struct proc_dir_entry   **p;
204         int                       len, busy = 0;
205
206         LASSERT(parent != NULL);
207         len = strlen(name);
208
209         down_write(&_lprocfs_lock);
210         /* lookup target name */
211         for (p = &parent->subdir; *p; p = &(*p)->next) {
212                 if ((*p)->namelen != len)
213                         continue;
214                 if (memcmp(name, (*p)->name, len))
215                         continue;
216                 t = *p;
217                 break;
218         }
219
220         if (t) {
221                 /* verify it's empty: do not count "num_refs" */
222                 for (p = &t->subdir; *p; p = &(*p)->next) {
223                         if ((*p)->namelen != strlen("num_refs")) {
224                                 busy = 1;
225                                 break;
226                         }
227                         if (memcmp("num_refs", (*p)->name,
228                                    strlen("num_refs"))) {
229                                 busy = 1;
230                                 break;
231                         }
232                 }
233         }
234
235         if (busy == 0)
236                 lprocfs_remove_nolock(&t);
237
238         up_write(&_lprocfs_lock);
239         return 0;
240 }
241 #endif /* !HAVE_REMOVE_PROC_SUBTREE */
242
243 #ifndef HAVE_PROC_REMOVE
244 void proc_remove(struct proc_dir_entry *de)
245 {
246 #ifndef HAVE_REMOVE_PROC_SUBTREE
247         down_write(&_lprocfs_lock); /* search vs remove race */
248         lprocfs_remove_nolock(&de);
249         up_write(&_lprocfs_lock);
250 #else
251         if (de)
252                 remove_proc_subtree(de->name, de->parent);
253 #endif
254 }
255 #endif
256
257 void lprocfs_remove(struct proc_dir_entry **rooth)
258 {
259         proc_remove(*rooth);
260         *rooth = NULL;
261 }
262 EXPORT_SYMBOL(lprocfs_remove);
263
264 void lprocfs_remove_proc_entry(const char *name, struct proc_dir_entry *parent)
265 {
266         LASSERT(parent != NULL);
267         remove_proc_entry(name, parent);
268 }
269 EXPORT_SYMBOL(lprocfs_remove_proc_entry);
270
271 struct proc_dir_entry *
272 lprocfs_register(const char *name, struct proc_dir_entry *parent,
273                  struct lprocfs_vars *list, void *data)
274 {
275         struct proc_dir_entry *newchild;
276
277         newchild = proc_mkdir(name, parent);
278         if (newchild == NULL)
279                 return ERR_PTR(-ENOMEM);
280
281         if (list != NULL) {
282                 int rc = lprocfs_add_vars(newchild, list, data);
283                 if (rc) {
284                         lprocfs_remove(&newchild);
285                         return ERR_PTR(rc);
286                 }
287         }
288         return newchild;
289 }
290 EXPORT_SYMBOL(lprocfs_register);
291
292 /* Generic callbacks */
293 int lprocfs_uint_seq_show(struct seq_file *m, void *data)
294 {
295         return seq_printf(m, "%u\n", *(unsigned int *)data);
296 }
297 EXPORT_SYMBOL(lprocfs_uint_seq_show);
298
299 int lprocfs_wr_uint(struct file *file, const char __user *buffer,
300                     unsigned long count, void *data)
301 {
302         unsigned *p = data;
303         char dummy[MAX_STRING_SIZE + 1], *end;
304         unsigned long tmp;
305
306         dummy[MAX_STRING_SIZE] = '\0';
307         if (copy_from_user(dummy, buffer, MAX_STRING_SIZE))
308                 return -EFAULT;
309
310         tmp = simple_strtoul(dummy, &end, 0);
311         if (dummy == end)
312                 return -EINVAL;
313
314         *p = (unsigned int)tmp;
315         return count;
316 }
317 EXPORT_SYMBOL(lprocfs_wr_uint);
318
319 ssize_t lprocfs_uint_seq_write(struct file *file, const char __user *buffer,
320                                size_t count, loff_t *off)
321 {
322         int *data = ((struct seq_file *)file->private_data)->private;
323         int val = 0, rc;
324
325         rc = lprocfs_write_helper(buffer, count, &val);
326         if (rc < 0)
327                 return rc;
328
329         return lprocfs_wr_uint(file, buffer, count, data);
330 }
331 EXPORT_SYMBOL(lprocfs_uint_seq_write);
332
333 int lprocfs_u64_seq_show(struct seq_file *m, void *data)
334 {
335         LASSERT(data != NULL);
336         return seq_printf(m, LPU64"\n", *(__u64 *)data);
337 }
338 EXPORT_SYMBOL(lprocfs_u64_seq_show);
339
340 int lprocfs_atomic_seq_show(struct seq_file *m, void *data)
341 {
342         atomic_t *atom = data;
343         LASSERT(atom != NULL);
344         return seq_printf(m, "%d\n", atomic_read(atom));
345 }
346 EXPORT_SYMBOL(lprocfs_atomic_seq_show);
347
348 ssize_t
349 lprocfs_atomic_seq_write(struct file *file, const char __user *buffer,
350                         size_t count, loff_t *off)
351 {
352         atomic_t *atm = ((struct seq_file *)file->private_data)->private;
353         int val = 0;
354         int rc;
355
356         rc = lprocfs_write_helper(buffer, count, &val);
357         if (rc < 0)
358                 return rc;
359
360         if (val <= 0)
361                 return -ERANGE;
362
363         atomic_set(atm, val);
364         return count;
365 }
366 EXPORT_SYMBOL(lprocfs_atomic_seq_write);
367
368 int lprocfs_uuid_seq_show(struct seq_file *m, void *data)
369 {
370         struct obd_device *obd = data;
371
372         LASSERT(obd != NULL);
373         return seq_printf(m, "%s\n", obd->obd_uuid.uuid);
374 }
375 EXPORT_SYMBOL(lprocfs_uuid_seq_show);
376
377 int lprocfs_name_seq_show(struct seq_file *m, void *data)
378 {
379         struct obd_device *dev = data;
380
381         LASSERT(dev != NULL);
382         return seq_printf(m, "%s\n", dev->obd_name);
383 }
384 EXPORT_SYMBOL(lprocfs_name_seq_show);
385
386 int lprocfs_blksize_seq_show(struct seq_file *m, void *data)
387 {
388         struct obd_device *obd = data;
389         struct obd_statfs  osfs;
390         int rc = obd_statfs(NULL, obd->obd_self_export, &osfs,
391                             cfs_time_shift_64(-OBD_STATFS_CACHE_SECONDS),
392                             OBD_STATFS_NODELAY);
393         if (!rc)
394                 rc = seq_printf(m, "%u\n", osfs.os_bsize);
395         return rc;
396 }
397 EXPORT_SYMBOL(lprocfs_blksize_seq_show);
398
399 int lprocfs_kbytestotal_seq_show(struct seq_file *m, void *data)
400 {
401         struct obd_device *obd = data;
402         struct obd_statfs  osfs;
403         int rc = obd_statfs(NULL, obd->obd_self_export, &osfs,
404                             cfs_time_shift_64(-OBD_STATFS_CACHE_SECONDS),
405                             OBD_STATFS_NODELAY);
406         if (!rc) {
407                 __u32 blk_size = osfs.os_bsize >> 10;
408                 __u64 result = osfs.os_blocks;
409
410                 while (blk_size >>= 1)
411                         result <<= 1;
412
413                 rc = seq_printf(m, LPU64"\n", result);
414         }
415         return rc;
416 }
417 EXPORT_SYMBOL(lprocfs_kbytestotal_seq_show);
418
419 int lprocfs_kbytesfree_seq_show(struct seq_file *m, void *data)
420 {
421         struct obd_device *obd = data;
422         struct obd_statfs  osfs;
423         int rc = obd_statfs(NULL, obd->obd_self_export, &osfs,
424                             cfs_time_shift_64(-OBD_STATFS_CACHE_SECONDS),
425                             OBD_STATFS_NODELAY);
426         if (!rc) {
427                 __u32 blk_size = osfs.os_bsize >> 10;
428                 __u64 result = osfs.os_bfree;
429
430                 while (blk_size >>= 1)
431                         result <<= 1;
432
433                 rc = seq_printf(m, LPU64"\n", result);
434         }
435         return rc;
436 }
437 EXPORT_SYMBOL(lprocfs_kbytesfree_seq_show);
438
439 int lprocfs_kbytesavail_seq_show(struct seq_file *m, void *data)
440 {
441         struct obd_device *obd = data;
442         struct obd_statfs  osfs;
443         int rc = obd_statfs(NULL, obd->obd_self_export, &osfs,
444                             cfs_time_shift_64(-OBD_STATFS_CACHE_SECONDS),
445                             OBD_STATFS_NODELAY);
446         if (!rc) {
447                 __u32 blk_size = osfs.os_bsize >> 10;
448                 __u64 result = osfs.os_bavail;
449
450                 while (blk_size >>= 1)
451                         result <<= 1;
452
453                 rc = seq_printf(m, LPU64"\n", result);
454         }
455         return rc;
456 }
457 EXPORT_SYMBOL(lprocfs_kbytesavail_seq_show);
458
459 int lprocfs_filestotal_seq_show(struct seq_file *m, void *data)
460 {
461         struct obd_device *obd = data;
462         struct obd_statfs  osfs;
463         int rc = obd_statfs(NULL, obd->obd_self_export, &osfs,
464                             cfs_time_shift_64(-OBD_STATFS_CACHE_SECONDS),
465                             OBD_STATFS_NODELAY);
466         if (!rc)
467                 rc = seq_printf(m, LPU64"\n", osfs.os_files);
468         return rc;
469 }
470 EXPORT_SYMBOL(lprocfs_filestotal_seq_show);
471
472 int lprocfs_filesfree_seq_show(struct seq_file *m, void *data)
473 {
474         struct obd_device *obd = data;
475         struct obd_statfs  osfs;
476         int rc = obd_statfs(NULL, obd->obd_self_export, &osfs,
477                             cfs_time_shift_64(-OBD_STATFS_CACHE_SECONDS),
478                             OBD_STATFS_NODELAY);
479         if (!rc)
480                 rc = seq_printf(m, LPU64"\n", osfs.os_ffree);
481         return rc;
482 }
483 EXPORT_SYMBOL(lprocfs_filesfree_seq_show);
484
485 int lprocfs_server_uuid_seq_show(struct seq_file *m, void *data)
486 {
487         struct obd_device *obd = data;
488         struct obd_import *imp;
489         char *imp_state_name = NULL;
490         int rc = 0;
491
492         LASSERT(obd != NULL);
493         LPROCFS_CLIMP_CHECK(obd);
494         imp = obd->u.cli.cl_import;
495         imp_state_name = ptlrpc_import_state_name(imp->imp_state);
496         rc = seq_printf(m, "%s\t%s%s\n", obd2cli_tgt(obd), imp_state_name,
497                         imp->imp_deactive ? "\tDEACTIVATED" : "");
498
499         LPROCFS_CLIMP_EXIT(obd);
500         return rc;
501 }
502 EXPORT_SYMBOL(lprocfs_server_uuid_seq_show);
503
504 int lprocfs_conn_uuid_seq_show(struct seq_file *m, void *data)
505 {
506         struct obd_device *obd = data;
507         struct ptlrpc_connection *conn;
508         int rc = 0;
509
510         LASSERT(obd != NULL);
511
512         LPROCFS_CLIMP_CHECK(obd);
513         conn = obd->u.cli.cl_import->imp_connection;
514         if (conn && obd->u.cli.cl_import)
515                 rc = seq_printf(m, "%s\n", conn->c_remote_uuid.uuid);
516         else
517                 rc = seq_printf(m, "%s\n", "<none>");
518
519         LPROCFS_CLIMP_EXIT(obd);
520         return rc;
521 }
522 EXPORT_SYMBOL(lprocfs_conn_uuid_seq_show);
523
524 /** add up per-cpu counters */
525 void lprocfs_stats_collect(struct lprocfs_stats *stats, int idx,
526                            struct lprocfs_counter *cnt)
527 {
528         unsigned int                    num_entry;
529         struct lprocfs_counter          *percpu_cntr;
530         int                             i;
531         unsigned long                   flags = 0;
532
533         memset(cnt, 0, sizeof(*cnt));
534
535         if (stats == NULL) {
536                 /* set count to 1 to avoid divide-by-zero errs in callers */
537                 cnt->lc_count = 1;
538                 return;
539         }
540
541         cnt->lc_min = LC_MIN_INIT;
542
543         num_entry = lprocfs_stats_lock(stats, LPROCFS_GET_NUM_CPU, &flags);
544
545         for (i = 0; i < num_entry; i++) {
546                 if (stats->ls_percpu[i] == NULL)
547                         continue;
548                 percpu_cntr = lprocfs_stats_counter_get(stats, i, idx);
549
550                 cnt->lc_count += percpu_cntr->lc_count;
551                 cnt->lc_sum += percpu_cntr->lc_sum;
552                 if (percpu_cntr->lc_min < cnt->lc_min)
553                         cnt->lc_min = percpu_cntr->lc_min;
554                 if (percpu_cntr->lc_max > cnt->lc_max)
555                         cnt->lc_max = percpu_cntr->lc_max;
556                 cnt->lc_sumsquare += percpu_cntr->lc_sumsquare;
557         }
558
559         lprocfs_stats_unlock(stats, LPROCFS_GET_NUM_CPU, &flags);
560 }
561
562 /**
563  * Append a space separated list of current set flags to str.
564  */
565 #define flag2str(flag)                                          \
566         do {                                                            \
567                 if (imp->imp_##flag) {                                  \
568                         seq_printf(m, "%s" #flag, first ? "" : ", ");   \
569                         first = false;                                  \
570                 }                                                       \
571         } while (0)
572 static void obd_import_flags2str(struct obd_import *imp, struct seq_file *m)
573 {
574         bool first = true;
575
576         if (imp->imp_obd->obd_no_recov) {
577                 seq_printf(m, "no_recov");
578                 first = false;
579         }
580
581         flag2str(invalid);
582         flag2str(deactive);
583         flag2str(replayable);
584         flag2str(delayed_recovery);
585         flag2str(no_lock_replay);
586         flag2str(vbr_failed);
587         flag2str(pingable);
588         flag2str(resend_replay);
589         flag2str(no_pinger_recover);
590         flag2str(need_mne_swab);
591         flag2str(connect_tried);
592 }
593 #undef flag2str
594
595 static const char *obd_connect_names[] = {
596         "read_only",
597         "lov_index",
598         "connect_from_mds",
599         "write_grant",
600         "server_lock",
601         "version",
602         "request_portal",
603         "acl",
604         "xattr",
605         "create_on_write",
606         "truncate_lock",
607         "initial_transno",
608         "inode_bit_locks",
609         "join_file(obsolete)",
610         "getattr_by_fid",
611         "no_oh_for_devices",
612         "remote_client",
613         "remote_client_by_force",
614         "max_byte_per_rpc",
615         "64bit_qdata",
616         "mds_capability",
617         "oss_capability",
618         "early_lock_cancel",
619         "som",
620         "adaptive_timeouts",
621         "lru_resize",
622         "mds_mds_connection",
623         "real_conn",
624         "change_qunit_size",
625         "alt_checksum_algorithm",
626         "fid_is_enabled",
627         "version_recovery",
628         "pools",
629         "grant_shrink",
630         "skip_orphan",
631         "large_ea",
632         "full20",
633         "layout_lock",
634         "64bithash",
635         "object_max_bytes",
636         "imp_recov",
637         "jobstats",
638         "umask",
639         "einprogress",
640         "grant_param",
641         "flock_owner",
642         "lvb_type",
643         "nanoseconds_times",
644         "lightweight_conn",
645         "short_io",
646         "pingless",
647         "flock_deadlock",
648         "disp_stripe",
649         "open_by_fid",
650         "lfsck",
651         "unknown",
652         "unlink_close",
653         "multi_mod_rpcs",
654         "dir_stripe",
655         "unknown",
656         NULL
657 };
658
659 static void obd_connect_seq_flags2str(struct seq_file *m, __u64 flags, char *sep)
660 {
661         bool first = true;
662         __u64 mask = 1;
663         int i;
664
665         for (i = 0; obd_connect_names[i] != NULL; i++, mask <<= 1) {
666                 if (flags & mask) {
667                         seq_printf(m, "%s%s",
668                                    first ? "" : sep, obd_connect_names[i]);
669                         first = false;
670                 }
671         }
672         if (flags & ~(mask - 1))
673                 seq_printf(m, "%sunknown_"LPX64,
674                            first ? "" : sep, flags & ~(mask - 1));
675 }
676
677 int obd_connect_flags2str(char *page, int count, __u64 flags, char *sep)
678 {
679         __u64 mask = 1;
680         int i, ret = 0;
681
682         for (i = 0; obd_connect_names[i] != NULL; i++, mask <<= 1) {
683                 if (flags & mask)
684                         ret += snprintf(page + ret, count - ret, "%s%s",
685                                         ret ? sep : "", obd_connect_names[i]);
686         }
687         if (flags & ~(mask - 1))
688                 ret += snprintf(page + ret, count - ret,
689                                 "%sunknown_"LPX64,
690                                 ret ? sep : "", flags & ~(mask - 1));
691         return ret;
692 }
693 EXPORT_SYMBOL(obd_connect_flags2str);
694
695 static void obd_connect_data_seqprint(struct seq_file *m,
696                                       struct obd_connect_data *ocd)
697 {
698         __u64 flags;
699
700         LASSERT(ocd != NULL);
701         flags = ocd->ocd_connect_flags;
702
703         seq_printf(m, "    connect_data:\n"
704                       "       flags: "LPX64"\n"
705                       "       instance: %u\n",
706                       ocd->ocd_connect_flags,
707                       ocd->ocd_instance);
708         if (flags & OBD_CONNECT_VERSION)
709                 seq_printf(m, "       target_version: %u.%u.%u.%u\n",
710                               OBD_OCD_VERSION_MAJOR(ocd->ocd_version),
711                               OBD_OCD_VERSION_MINOR(ocd->ocd_version),
712                               OBD_OCD_VERSION_PATCH(ocd->ocd_version),
713                               OBD_OCD_VERSION_FIX(ocd->ocd_version));
714         if (flags & OBD_CONNECT_MDS)
715                 seq_printf(m, "       mdt_index: %d\n", ocd->ocd_group);
716         if (flags & OBD_CONNECT_GRANT)
717                 seq_printf(m, "       initial_grant: %d\n", ocd->ocd_grant);
718         if (flags & OBD_CONNECT_INDEX)
719                 seq_printf(m, "       target_index: %u\n", ocd->ocd_index);
720         if (flags & OBD_CONNECT_BRW_SIZE)
721                 seq_printf(m, "       max_brw_size: %d\n", ocd->ocd_brw_size);
722         if (flags & OBD_CONNECT_IBITS)
723                 seq_printf(m, "       ibits_known: "LPX64"\n",
724                                 ocd->ocd_ibits_known);
725         if (flags & OBD_CONNECT_GRANT_PARAM)
726                 seq_printf(m, "       grant_block_size: %d\n"
727                               "       grant_inode_size: %d\n"
728                               "       grant_extent_overhead: %d\n",
729                               ocd->ocd_blocksize,
730                               ocd->ocd_inodespace,
731                               ocd->ocd_grant_extent);
732         if (flags & OBD_CONNECT_TRANSNO)
733                 seq_printf(m, "       first_transno: "LPX64"\n",
734                                 ocd->ocd_transno);
735         if (flags & OBD_CONNECT_CKSUM)
736                 seq_printf(m, "       cksum_types: %#x\n",
737                               ocd->ocd_cksum_types);
738         if (flags & OBD_CONNECT_MAX_EASIZE)
739                 seq_printf(m, "       max_easize: %d\n", ocd->ocd_max_easize);
740         if (flags & OBD_CONNECT_MAXBYTES)
741                 seq_printf(m, "       max_object_bytes: "LPU64"\n",
742                               ocd->ocd_maxbytes);
743         if (flags & OBD_CONNECT_MULTIMODRPCS)
744                 seq_printf(m, "       max_mod_rpcs: %hu\n",
745                               ocd->ocd_maxmodrpcs);
746 }
747
748 int lprocfs_import_seq_show(struct seq_file *m, void *data)
749 {
750         char                            nidstr[LNET_NIDSTR_SIZE];
751         struct lprocfs_counter          ret;
752         struct lprocfs_counter_header   *header;
753         struct obd_device               *obd    = (struct obd_device *)data;
754         struct obd_import               *imp;
755         struct obd_import_conn          *conn;
756         struct obd_connect_data         *ocd;
757         int                             j;
758         int                             k;
759         int                             rw      = 0;
760
761         LASSERT(obd != NULL);
762         LPROCFS_CLIMP_CHECK(obd);
763         imp = obd->u.cli.cl_import;
764         ocd = &imp->imp_connect_data;
765
766         seq_printf(m, "import:\n"
767                       "    name: %s\n"
768                       "    target: %s\n"
769                       "    state: %s\n"
770                       "    connect_flags: [ ",
771                       obd->obd_name,
772                       obd2cli_tgt(obd),
773                       ptlrpc_import_state_name(imp->imp_state));
774         obd_connect_seq_flags2str(m, imp->imp_connect_data.ocd_connect_flags,
775                                         ", ");
776         seq_printf(m, " ]\n");
777         obd_connect_data_seqprint(m, ocd);
778         seq_printf(m, "    import_flags: [ ");
779         obd_import_flags2str(imp, m);
780
781         seq_printf(m, " ]\n"
782                       "    connection:\n"
783                       "       failover_nids: [ ");
784         spin_lock(&imp->imp_lock);
785         j = 0;
786         list_for_each_entry(conn, &imp->imp_conn_list, oic_item) {
787                 libcfs_nid2str_r(conn->oic_conn->c_peer.nid,
788                                  nidstr, sizeof(nidstr));
789                 seq_printf(m, "%s%s", j ? ", " : "", nidstr);
790                 j++;
791         }
792         if (imp->imp_connection != NULL)
793                 libcfs_nid2str_r(imp->imp_connection->c_peer.nid,
794                                  nidstr, sizeof(nidstr));
795         else
796                 strncpy(nidstr, "<none>", sizeof(nidstr));
797         seq_printf(m, " ]\n"
798                       "       current_connection: %s\n"
799                       "       connection_attempts: %u\n"
800                       "       generation: %u\n"
801                       "       in-progress_invalidations: %u\n",
802                       nidstr,
803                       imp->imp_conn_cnt,
804                       imp->imp_generation,
805                       atomic_read(&imp->imp_inval_count));
806         spin_unlock(&imp->imp_lock);
807
808         if (obd->obd_svc_stats == NULL)
809                 goto out_climp;
810
811         header = &obd->obd_svc_stats->ls_cnt_header[PTLRPC_REQWAIT_CNTR];
812         lprocfs_stats_collect(obd->obd_svc_stats, PTLRPC_REQWAIT_CNTR, &ret);
813         if (ret.lc_count != 0) {
814                 /* first argument to do_div MUST be __u64 */
815                 __u64 sum = ret.lc_sum;
816                 do_div(sum, ret.lc_count);
817                 ret.lc_sum = sum;
818         } else
819                 ret.lc_sum = 0;
820         seq_printf(m, "    rpcs:\n"
821                       "       inflight: %u\n"
822                       "       unregistering: %u\n"
823                       "       timeouts: %u\n"
824                       "       avg_waittime: "LPU64" %s\n",
825                       atomic_read(&imp->imp_inflight),
826                       atomic_read(&imp->imp_unregistering),
827                       atomic_read(&imp->imp_timeouts),
828                       ret.lc_sum, header->lc_units);
829
830         k = 0;
831         for(j = 0; j < IMP_AT_MAX_PORTALS; j++) {
832                 if (imp->imp_at.iat_portal[j] == 0)
833                         break;
834                 k = max_t(unsigned int, k,
835                           at_get(&imp->imp_at.iat_service_estimate[j]));
836         }
837         seq_printf(m, "    service_estimates:\n"
838                       "       services: %u sec\n"
839                       "       network: %u sec\n",
840                       k,
841                       at_get(&imp->imp_at.iat_net_latency));
842
843         seq_printf(m, "    transactions:\n"
844                       "       last_replay: "LPU64"\n"
845                       "       peer_committed: "LPU64"\n"
846                       "       last_checked: "LPU64"\n",
847                       imp->imp_last_replay_transno,
848                       imp->imp_peer_committed_transno,
849                       imp->imp_last_transno_checked);
850
851         /* avg data rates */
852         for (rw = 0; rw <= 1; rw++) {
853                 lprocfs_stats_collect(obd->obd_svc_stats,
854                                       PTLRPC_LAST_CNTR + BRW_READ_BYTES + rw,
855                                       &ret);
856                 if (ret.lc_sum > 0 && ret.lc_count > 0) {
857                         /* first argument to do_div MUST be __u64 */
858                         __u64 sum = ret.lc_sum;
859                         do_div(sum, ret.lc_count);
860                         ret.lc_sum = sum;
861                         seq_printf(m, "    %s_data_averages:\n"
862                                       "       bytes_per_rpc: "LPU64"\n",
863                                       rw ? "write" : "read",
864                                       ret.lc_sum);
865                 }
866                 k = (int)ret.lc_sum;
867                 j = opcode_offset(OST_READ + rw) + EXTRA_MAX_OPCODES;
868                 header = &obd->obd_svc_stats->ls_cnt_header[j];
869                 lprocfs_stats_collect(obd->obd_svc_stats, j, &ret);
870                 if (ret.lc_sum > 0 && ret.lc_count != 0) {
871                         /* first argument to do_div MUST be __u64 */
872                         __u64 sum = ret.lc_sum;
873                         do_div(sum, ret.lc_count);
874                         ret.lc_sum = sum;
875                         seq_printf(m, "       %s_per_rpc: "LPU64"\n",
876                                         header->lc_units, ret.lc_sum);
877                         j = (int)ret.lc_sum;
878                         if (j > 0)
879                                 seq_printf(m, "       MB_per_sec: %u.%.02u\n",
880                                                 k / j, (100 * k / j) % 100);
881                 }
882         }
883
884 out_climp:
885         LPROCFS_CLIMP_EXIT(obd);
886         return 0;
887 }
888 EXPORT_SYMBOL(lprocfs_import_seq_show);
889
890 int lprocfs_state_seq_show(struct seq_file *m, void *data)
891 {
892         struct obd_device *obd = (struct obd_device *)data;
893         struct obd_import *imp;
894         int j, k;
895
896         LASSERT(obd != NULL);
897         LPROCFS_CLIMP_CHECK(obd);
898         imp = obd->u.cli.cl_import;
899
900         seq_printf(m, "current_state: %s\n",
901                    ptlrpc_import_state_name(imp->imp_state));
902         seq_printf(m, "state_history:\n");
903         k = imp->imp_state_hist_idx;
904         for (j = 0; j < IMP_STATE_HIST_LEN; j++) {
905                 struct import_state_hist *ish =
906                         &imp->imp_state_hist[(k + j) % IMP_STATE_HIST_LEN];
907                 if (ish->ish_state == 0)
908                         continue;
909                 seq_printf(m, " - [ "CFS_TIME_T", %s ]\n",
910                            ish->ish_time,
911                 ptlrpc_import_state_name(ish->ish_state));
912         }
913
914         LPROCFS_CLIMP_EXIT(obd);
915         return 0;
916 }
917 EXPORT_SYMBOL(lprocfs_state_seq_show);
918
919 int lprocfs_at_hist_helper(struct seq_file *m, struct adaptive_timeout *at)
920 {
921         int i;
922         for (i = 0; i < AT_BINS; i++)
923                 seq_printf(m, "%3u ", at->at_hist[i]);
924         seq_printf(m, "\n");
925         return 0;
926 }
927 EXPORT_SYMBOL(lprocfs_at_hist_helper);
928
929 /* See also ptlrpc_lprocfs_timeouts_show_seq */
930 int lprocfs_timeouts_seq_show(struct seq_file *m, void *data)
931 {
932         struct obd_device *obd = (struct obd_device *)data;
933         struct obd_import *imp;
934         unsigned int cur, worst;
935         time_t now, worstt;
936         struct dhms ts;
937         int i;
938
939         LASSERT(obd != NULL);
940         LPROCFS_CLIMP_CHECK(obd);
941         imp = obd->u.cli.cl_import;
942
943         now = cfs_time_current_sec();
944
945         /* Some network health info for kicks */
946         s2dhms(&ts, now - imp->imp_last_reply_time);
947         seq_printf(m, "%-10s : %ld, "DHMS_FMT" ago\n",
948                    "last reply", imp->imp_last_reply_time, DHMS_VARS(&ts));
949
950         cur = at_get(&imp->imp_at.iat_net_latency);
951         worst = imp->imp_at.iat_net_latency.at_worst_ever;
952         worstt = imp->imp_at.iat_net_latency.at_worst_time;
953         s2dhms(&ts, now - worstt);
954         seq_printf(m, "%-10s : cur %3u  worst %3u (at %ld, "DHMS_FMT" ago) ",
955                    "network", cur, worst, worstt, DHMS_VARS(&ts));
956         lprocfs_at_hist_helper(m, &imp->imp_at.iat_net_latency);
957
958         for(i = 0; i < IMP_AT_MAX_PORTALS; i++) {
959                 if (imp->imp_at.iat_portal[i] == 0)
960                         break;
961                 cur = at_get(&imp->imp_at.iat_service_estimate[i]);
962                 worst = imp->imp_at.iat_service_estimate[i].at_worst_ever;
963                 worstt = imp->imp_at.iat_service_estimate[i].at_worst_time;
964                 s2dhms(&ts, now - worstt);
965                 seq_printf(m, "portal %-2d  : cur %3u  worst %3u (at %ld, "
966                            DHMS_FMT" ago) ", imp->imp_at.iat_portal[i],
967                            cur, worst, worstt, DHMS_VARS(&ts));
968                 lprocfs_at_hist_helper(m, &imp->imp_at.iat_service_estimate[i]);
969         }
970
971         LPROCFS_CLIMP_EXIT(obd);
972         return 0;
973 }
974 EXPORT_SYMBOL(lprocfs_timeouts_seq_show);
975
976 int lprocfs_connect_flags_seq_show(struct seq_file *m, void *data)
977 {
978         struct obd_device *obd = data;
979         __u64 flags;
980
981         LPROCFS_CLIMP_CHECK(obd);
982         flags = obd->u.cli.cl_import->imp_connect_data.ocd_connect_flags;
983         seq_printf(m, "flags="LPX64"\n", flags);
984         obd_connect_seq_flags2str(m, flags, "\n");
985         seq_printf(m, "\n");
986         LPROCFS_CLIMP_EXIT(obd);
987         return 0;
988 }
989 EXPORT_SYMBOL(lprocfs_connect_flags_seq_show);
990
991 int
992 lprocfs_obd_setup(struct obd_device *obd)
993 {
994         int rc = 0;
995
996         LASSERT(obd != NULL);
997         LASSERT(obd->obd_magic == OBD_DEVICE_MAGIC);
998         LASSERT(obd->obd_type->typ_procroot != NULL);
999
1000         obd->obd_proc_entry = lprocfs_register(obd->obd_name,
1001                                                obd->obd_type->typ_procroot,
1002                                                obd->obd_vars, obd);
1003         if (IS_ERR(obd->obd_proc_entry)) {
1004                 rc = PTR_ERR(obd->obd_proc_entry);
1005                 CERROR("error %d setting up lprocfs for %s\n",rc,obd->obd_name);
1006                 obd->obd_proc_entry = NULL;
1007         }
1008         return rc;
1009 }
1010 EXPORT_SYMBOL(lprocfs_obd_setup);
1011
1012 int lprocfs_obd_cleanup(struct obd_device *obd)
1013 {
1014         if (!obd)
1015                 return -EINVAL;
1016         if (obd->obd_proc_exports_entry) {
1017                 /* Should be no exports left */
1018                 lprocfs_remove(&obd->obd_proc_exports_entry);
1019                 obd->obd_proc_exports_entry = NULL;
1020         }
1021         if (obd->obd_proc_entry) {
1022                 lprocfs_remove(&obd->obd_proc_entry);
1023                 obd->obd_proc_entry = NULL;
1024         }
1025         return 0;
1026 }
1027 EXPORT_SYMBOL(lprocfs_obd_cleanup);
1028
1029 int lprocfs_stats_alloc_one(struct lprocfs_stats *stats, unsigned int cpuid)
1030 {
1031         struct lprocfs_counter  *cntr;
1032         unsigned int            percpusize;
1033         int                     rc = -ENOMEM;
1034         unsigned long           flags = 0;
1035         int                     i;
1036
1037         LASSERT(stats->ls_percpu[cpuid] == NULL);
1038         LASSERT((stats->ls_flags & LPROCFS_STATS_FLAG_NOPERCPU) == 0);
1039
1040         percpusize = lprocfs_stats_counter_size(stats);
1041         LIBCFS_ALLOC_ATOMIC(stats->ls_percpu[cpuid], percpusize);
1042         if (stats->ls_percpu[cpuid] != NULL) {
1043                 rc = 0;
1044                 if (unlikely(stats->ls_biggest_alloc_num <= cpuid)) {
1045                         if (stats->ls_flags & LPROCFS_STATS_FLAG_IRQ_SAFE)
1046                                 spin_lock_irqsave(&stats->ls_lock, flags);
1047                         else
1048                                 spin_lock(&stats->ls_lock);
1049                         if (stats->ls_biggest_alloc_num <= cpuid)
1050                                 stats->ls_biggest_alloc_num = cpuid + 1;
1051                         if (stats->ls_flags & LPROCFS_STATS_FLAG_IRQ_SAFE) {
1052                                 spin_unlock_irqrestore(&stats->ls_lock, flags);
1053                         } else {
1054                                 spin_unlock(&stats->ls_lock);
1055                         }
1056                 }
1057                 /* initialize the ls_percpu[cpuid] non-zero counter */
1058                 for (i = 0; i < stats->ls_num; ++i) {
1059                         cntr = lprocfs_stats_counter_get(stats, cpuid, i);
1060                         cntr->lc_min = LC_MIN_INIT;
1061                 }
1062         }
1063         return rc;
1064 }
1065
1066 struct lprocfs_stats *lprocfs_alloc_stats(unsigned int num,
1067                                           enum lprocfs_stats_flags flags)
1068 {
1069         struct lprocfs_stats    *stats;
1070         unsigned int            num_entry;
1071         unsigned int            percpusize = 0;
1072         int                     i;
1073
1074         if (num == 0)
1075                 return NULL;
1076
1077         if (lprocfs_no_percpu_stats != 0)
1078                 flags |= LPROCFS_STATS_FLAG_NOPERCPU;
1079
1080         if (flags & LPROCFS_STATS_FLAG_NOPERCPU)
1081                 num_entry = 1;
1082         else
1083                 num_entry = num_possible_cpus();
1084
1085         /* alloc percpu pointers for all possible cpu slots */
1086         LIBCFS_ALLOC(stats, offsetof(typeof(*stats), ls_percpu[num_entry]));
1087         if (stats == NULL)
1088                 return NULL;
1089
1090         stats->ls_num = num;
1091         stats->ls_flags = flags;
1092         spin_lock_init(&stats->ls_lock);
1093
1094         /* alloc num of counter headers */
1095         LIBCFS_ALLOC(stats->ls_cnt_header,
1096                      stats->ls_num * sizeof(struct lprocfs_counter_header));
1097         if (stats->ls_cnt_header == NULL)
1098                 goto fail;
1099
1100         if ((flags & LPROCFS_STATS_FLAG_NOPERCPU) != 0) {
1101                 /* contains only one set counters */
1102                 percpusize = lprocfs_stats_counter_size(stats);
1103                 LIBCFS_ALLOC_ATOMIC(stats->ls_percpu[0], percpusize);
1104                 if (stats->ls_percpu[0] == NULL)
1105                         goto fail;
1106                 stats->ls_biggest_alloc_num = 1;
1107         } else if ((flags & LPROCFS_STATS_FLAG_IRQ_SAFE) != 0) {
1108                 /* alloc all percpu data, currently only obd_memory use this */
1109                 for (i = 0; i < num_entry; ++i)
1110                         if (lprocfs_stats_alloc_one(stats, i) < 0)
1111                                 goto fail;
1112         }
1113
1114         return stats;
1115
1116 fail:
1117         lprocfs_free_stats(&stats);
1118         return NULL;
1119 }
1120 EXPORT_SYMBOL(lprocfs_alloc_stats);
1121
1122 void lprocfs_free_stats(struct lprocfs_stats **statsh)
1123 {
1124         struct lprocfs_stats *stats = *statsh;
1125         unsigned int num_entry;
1126         unsigned int percpusize;
1127         unsigned int i;
1128
1129         if (stats == NULL || stats->ls_num == 0)
1130                 return;
1131         *statsh = NULL;
1132
1133         if (stats->ls_flags & LPROCFS_STATS_FLAG_NOPERCPU)
1134                 num_entry = 1;
1135         else
1136                 num_entry = num_possible_cpus();
1137
1138         percpusize = lprocfs_stats_counter_size(stats);
1139         for (i = 0; i < num_entry; i++)
1140                 if (stats->ls_percpu[i] != NULL)
1141                         LIBCFS_FREE(stats->ls_percpu[i], percpusize);
1142         if (stats->ls_cnt_header != NULL)
1143                 LIBCFS_FREE(stats->ls_cnt_header, stats->ls_num *
1144                                         sizeof(struct lprocfs_counter_header));
1145         LIBCFS_FREE(stats, offsetof(typeof(*stats), ls_percpu[num_entry]));
1146 }
1147 EXPORT_SYMBOL(lprocfs_free_stats);
1148
1149 void lprocfs_clear_stats(struct lprocfs_stats *stats)
1150 {
1151         struct lprocfs_counter          *percpu_cntr;
1152         int                             i;
1153         int                             j;
1154         unsigned int                    num_entry;
1155         unsigned long                   flags = 0;
1156
1157         num_entry = lprocfs_stats_lock(stats, LPROCFS_GET_NUM_CPU, &flags);
1158
1159         for (i = 0; i < num_entry; i++) {
1160                 if (stats->ls_percpu[i] == NULL)
1161                         continue;
1162                 for (j = 0; j < stats->ls_num; j++) {
1163                         percpu_cntr = lprocfs_stats_counter_get(stats, i, j);
1164                         percpu_cntr->lc_count           = 0;
1165                         percpu_cntr->lc_min             = LC_MIN_INIT;
1166                         percpu_cntr->lc_max             = 0;
1167                         percpu_cntr->lc_sumsquare       = 0;
1168                         percpu_cntr->lc_sum             = 0;
1169                         if (stats->ls_flags & LPROCFS_STATS_FLAG_IRQ_SAFE)
1170                                 percpu_cntr->lc_sum_irq = 0;
1171                 }
1172         }
1173
1174         lprocfs_stats_unlock(stats, LPROCFS_GET_NUM_CPU, &flags);
1175 }
1176 EXPORT_SYMBOL(lprocfs_clear_stats);
1177
1178 static ssize_t lprocfs_stats_seq_write(struct file *file,
1179                                        const char __user *buf,
1180                                        size_t len, loff_t *off)
1181 {
1182         struct seq_file *seq = file->private_data;
1183         struct lprocfs_stats *stats = seq->private;
1184
1185         lprocfs_clear_stats(stats);
1186
1187         return len;
1188 }
1189
1190 static void *lprocfs_stats_seq_start(struct seq_file *p, loff_t *pos)
1191 {
1192         struct lprocfs_stats *stats = p->private;
1193
1194         return (*pos < stats->ls_num) ? pos : NULL;
1195 }
1196
1197 static void lprocfs_stats_seq_stop(struct seq_file *p, void *v)
1198 {
1199 }
1200
1201 static void *lprocfs_stats_seq_next(struct seq_file *p, void *v, loff_t *pos)
1202 {
1203         (*pos)++;
1204
1205         return lprocfs_stats_seq_start(p, pos);
1206 }
1207
1208 /* seq file export of one lprocfs counter */
1209 static int lprocfs_stats_seq_show(struct seq_file *p, void *v)
1210 {
1211         struct lprocfs_stats            *stats  = p->private;
1212         struct lprocfs_counter_header   *hdr;
1213         struct lprocfs_counter           ctr;
1214         int                              idx    = *(loff_t *)v;
1215         int                              rc     = 0;
1216
1217         if (idx == 0) {
1218                 struct timeval now;
1219
1220                 do_gettimeofday(&now);
1221                 rc = seq_printf(p, "%-25s %lu.%lu secs.usecs\n",
1222                                 "snapshot_time", now.tv_sec, now.tv_usec);
1223                 if (rc < 0)
1224                         return rc;
1225         }
1226
1227         hdr = &stats->ls_cnt_header[idx];
1228         lprocfs_stats_collect(stats, idx, &ctr);
1229
1230         if (ctr.lc_count == 0)
1231                 goto out;
1232
1233         rc = seq_printf(p, "%-25s "LPD64" samples [%s]", hdr->lc_name,
1234                         ctr.lc_count, hdr->lc_units);
1235         if (rc < 0)
1236                 goto out;
1237
1238         if ((hdr->lc_config & LPROCFS_CNTR_AVGMINMAX) && ctr.lc_count > 0) {
1239                 rc = seq_printf(p, " "LPD64" "LPD64" "LPD64,
1240                                 ctr.lc_min, ctr.lc_max, ctr.lc_sum);
1241                 if (rc < 0)
1242                         goto out;
1243                 if (hdr->lc_config & LPROCFS_CNTR_STDDEV)
1244                         rc = seq_printf(p, " "LPD64, ctr.lc_sumsquare);
1245                 if (rc < 0)
1246                         goto out;
1247         }
1248         rc = seq_printf(p, "\n");
1249 out:
1250         return (rc < 0) ? rc : 0;
1251 }
1252
1253 static const struct seq_operations lprocfs_stats_seq_sops = {
1254         .start  = lprocfs_stats_seq_start,
1255         .stop   = lprocfs_stats_seq_stop,
1256         .next   = lprocfs_stats_seq_next,
1257         .show   = lprocfs_stats_seq_show,
1258 };
1259
1260 static int lprocfs_stats_seq_open(struct inode *inode, struct file *file)
1261 {
1262         struct seq_file *seq;
1263         int rc;
1264
1265         rc = LPROCFS_ENTRY_CHECK(inode);
1266         if (rc < 0)
1267                 return rc;
1268
1269         rc = seq_open(file, &lprocfs_stats_seq_sops);
1270         if (rc)
1271                 return rc;
1272         seq = file->private_data;
1273         seq->private = PDE_DATA(inode);
1274         return 0;
1275 }
1276
1277 static const struct file_operations lprocfs_stats_seq_fops = {
1278         .owner   = THIS_MODULE,
1279         .open    = lprocfs_stats_seq_open,
1280         .read    = seq_read,
1281         .write   = lprocfs_stats_seq_write,
1282         .llseek  = seq_lseek,
1283         .release = lprocfs_seq_release,
1284 };
1285
1286 int lprocfs_register_stats(struct proc_dir_entry *root, const char *name,
1287                            struct lprocfs_stats *stats)
1288 {
1289         struct proc_dir_entry *entry;
1290         LASSERT(root != NULL);
1291
1292         entry = proc_create_data(name, 0644, root,
1293                                  &lprocfs_stats_seq_fops, stats);
1294         if (entry == NULL)
1295                 return -ENOMEM;
1296         return 0;
1297 }
1298 EXPORT_SYMBOL(lprocfs_register_stats);
1299
1300 void lprocfs_counter_init(struct lprocfs_stats *stats, int index,
1301                           unsigned conf, const char *name, const char *units)
1302 {
1303         struct lprocfs_counter_header   *header;
1304         struct lprocfs_counter          *percpu_cntr;
1305         unsigned long                   flags = 0;
1306         unsigned int                    i;
1307         unsigned int                    num_cpu;
1308
1309         LASSERT(stats != NULL);
1310
1311         header = &stats->ls_cnt_header[index];
1312         LASSERTF(header != NULL, "Failed to allocate stats header:[%d]%s/%s\n",
1313                  index, name, units);
1314
1315         header->lc_config = conf;
1316         header->lc_name   = name;
1317         header->lc_units  = units;
1318
1319         num_cpu = lprocfs_stats_lock(stats, LPROCFS_GET_NUM_CPU, &flags);
1320         for (i = 0; i < num_cpu; ++i) {
1321                 if (stats->ls_percpu[i] == NULL)
1322                         continue;
1323                 percpu_cntr = lprocfs_stats_counter_get(stats, i, index);
1324                 percpu_cntr->lc_count           = 0;
1325                 percpu_cntr->lc_min             = LC_MIN_INIT;
1326                 percpu_cntr->lc_max             = 0;
1327                 percpu_cntr->lc_sumsquare       = 0;
1328                 percpu_cntr->lc_sum             = 0;
1329                 if ((stats->ls_flags & LPROCFS_STATS_FLAG_IRQ_SAFE) != 0)
1330                         percpu_cntr->lc_sum_irq = 0;
1331         }
1332         lprocfs_stats_unlock(stats, LPROCFS_GET_NUM_CPU, &flags);
1333 }
1334 EXPORT_SYMBOL(lprocfs_counter_init);
1335
1336 /* Note that we only init md counters for ops whose offset is less
1337  * than NUM_MD_STATS. This is explained in a comment in the definition
1338  * of struct md_ops. */
1339 #define LPROCFS_MD_OP_INIT(base, stats, op)                                    \
1340         do {                                                                   \
1341                 unsigned int _idx = base + MD_COUNTER_OFFSET(op);              \
1342                                                                                \
1343                 if (MD_COUNTER_OFFSET(op) < NUM_MD_STATS) {                    \
1344                         LASSERT(_idx < stats->ls_num);                         \
1345                         lprocfs_counter_init(stats, _idx, 0, #op, "reqs");     \
1346                 }                                                              \
1347         } while (0)
1348
1349 void lprocfs_init_mps_stats(int num_private_stats, struct lprocfs_stats *stats)
1350 {
1351         LPROCFS_MD_OP_INIT(num_private_stats, stats, getstatus);
1352         LPROCFS_MD_OP_INIT(num_private_stats, stats, null_inode);
1353         LPROCFS_MD_OP_INIT(num_private_stats, stats, find_cbdata);
1354         LPROCFS_MD_OP_INIT(num_private_stats, stats, close);
1355         LPROCFS_MD_OP_INIT(num_private_stats, stats, create);
1356         LPROCFS_MD_OP_INIT(num_private_stats, stats, enqueue);
1357         LPROCFS_MD_OP_INIT(num_private_stats, stats, getattr);
1358         LPROCFS_MD_OP_INIT(num_private_stats, stats, getattr_name);
1359         LPROCFS_MD_OP_INIT(num_private_stats, stats, intent_lock);
1360         LPROCFS_MD_OP_INIT(num_private_stats, stats, link);
1361         LPROCFS_MD_OP_INIT(num_private_stats, stats, rename);
1362         LPROCFS_MD_OP_INIT(num_private_stats, stats, setattr);
1363         LPROCFS_MD_OP_INIT(num_private_stats, stats, fsync);
1364         LPROCFS_MD_OP_INIT(num_private_stats, stats, read_page);
1365         LPROCFS_MD_OP_INIT(num_private_stats, stats, unlink);
1366         LPROCFS_MD_OP_INIT(num_private_stats, stats, setxattr);
1367         LPROCFS_MD_OP_INIT(num_private_stats, stats, getxattr);
1368         LPROCFS_MD_OP_INIT(num_private_stats, stats, init_ea_size);
1369         LPROCFS_MD_OP_INIT(num_private_stats, stats, get_lustre_md);
1370         LPROCFS_MD_OP_INIT(num_private_stats, stats, free_lustre_md);
1371         LPROCFS_MD_OP_INIT(num_private_stats, stats, merge_attr);
1372         LPROCFS_MD_OP_INIT(num_private_stats, stats, set_open_replay_data);
1373         LPROCFS_MD_OP_INIT(num_private_stats, stats, clear_open_replay_data);
1374         LPROCFS_MD_OP_INIT(num_private_stats, stats, set_lock_data);
1375         LPROCFS_MD_OP_INIT(num_private_stats, stats, lock_match);
1376         LPROCFS_MD_OP_INIT(num_private_stats, stats, cancel_unused);
1377         LPROCFS_MD_OP_INIT(num_private_stats, stats, renew_capa);
1378         LPROCFS_MD_OP_INIT(num_private_stats, stats, unpack_capa);
1379         LPROCFS_MD_OP_INIT(num_private_stats, stats, get_remote_perm);
1380         LPROCFS_MD_OP_INIT(num_private_stats, stats, intent_getattr_async);
1381         LPROCFS_MD_OP_INIT(num_private_stats, stats, revalidate_lock);
1382 }
1383
1384 int lprocfs_alloc_md_stats(struct obd_device *obd,
1385                            unsigned int num_private_stats)
1386 {
1387         struct lprocfs_stats *stats;
1388         unsigned int num_stats;
1389         int rc, i;
1390
1391         CLASSERT(offsetof(struct md_ops, MD_STATS_FIRST_OP) == 0);
1392         CLASSERT(_MD_COUNTER_OFFSET(MD_STATS_FIRST_OP) == 0);
1393         CLASSERT(_MD_COUNTER_OFFSET(MD_STATS_LAST_OP) > 0);
1394
1395         /* TODO Ensure that this function is only used where
1396          * appropriate by adding an assertion to the effect that
1397          * obd->obd_type->typ_md_ops is not NULL. We can't do this now
1398          * because mdt_procfs_init() uses this function to allocate
1399          * the stats backing /proc/fs/lustre/mdt/.../md_stats but the
1400          * mdt layer does not use the md_ops interface. This is
1401          * confusing and a waste of memory. See LU-2484.
1402          */
1403         LASSERT(obd->obd_proc_entry != NULL);
1404         LASSERT(obd->obd_md_stats == NULL);
1405         LASSERT(obd->obd_md_cntr_base == 0);
1406
1407         num_stats = NUM_MD_STATS + num_private_stats;
1408         stats = lprocfs_alloc_stats(num_stats, 0);
1409         if (stats == NULL)
1410                 return -ENOMEM;
1411
1412         lprocfs_init_mps_stats(num_private_stats, stats);
1413
1414         for (i = num_private_stats; i < num_stats; i++) {
1415                 if (stats->ls_cnt_header[i].lc_name == NULL) {
1416                         CERROR("Missing md_stat initializer md_op "
1417                                "operation at offset %d. Aborting.\n",
1418                                i - num_private_stats);
1419                         LBUG();
1420                 }
1421         }
1422
1423         rc = lprocfs_register_stats(obd->obd_proc_entry, "md_stats", stats);
1424         if (rc < 0) {
1425                 lprocfs_free_stats(&stats);
1426         } else {
1427                 obd->obd_md_stats = stats;
1428                 obd->obd_md_cntr_base = num_private_stats;
1429         }
1430
1431         return rc;
1432 }
1433 EXPORT_SYMBOL(lprocfs_alloc_md_stats);
1434
1435 void lprocfs_free_md_stats(struct obd_device *obd)
1436 {
1437         struct lprocfs_stats *stats = obd->obd_md_stats;
1438
1439         if (stats != NULL) {
1440                 obd->obd_md_stats = NULL;
1441                 obd->obd_md_cntr_base = 0;
1442                 lprocfs_free_stats(&stats);
1443         }
1444 }
1445 EXPORT_SYMBOL(lprocfs_free_md_stats);
1446
1447 void lprocfs_init_ldlm_stats(struct lprocfs_stats *ldlm_stats)
1448 {
1449         lprocfs_counter_init(ldlm_stats,
1450                              LDLM_ENQUEUE - LDLM_FIRST_OPC,
1451                              0, "ldlm_enqueue", "reqs");
1452         lprocfs_counter_init(ldlm_stats,
1453                              LDLM_CONVERT - LDLM_FIRST_OPC,
1454                              0, "ldlm_convert", "reqs");
1455         lprocfs_counter_init(ldlm_stats,
1456                              LDLM_CANCEL - LDLM_FIRST_OPC,
1457                              0, "ldlm_cancel", "reqs");
1458         lprocfs_counter_init(ldlm_stats,
1459                              LDLM_BL_CALLBACK - LDLM_FIRST_OPC,
1460                              0, "ldlm_bl_callback", "reqs");
1461         lprocfs_counter_init(ldlm_stats,
1462                              LDLM_CP_CALLBACK - LDLM_FIRST_OPC,
1463                              0, "ldlm_cp_callback", "reqs");
1464         lprocfs_counter_init(ldlm_stats,
1465                              LDLM_GL_CALLBACK - LDLM_FIRST_OPC,
1466                              0, "ldlm_gl_callback", "reqs");
1467 }
1468 EXPORT_SYMBOL(lprocfs_init_ldlm_stats);
1469
1470 __s64 lprocfs_read_helper(struct lprocfs_counter *lc,
1471                           struct lprocfs_counter_header *header,
1472                           enum lprocfs_stats_flags flags,
1473                           enum lprocfs_fields_flags field)
1474 {
1475         __s64 ret = 0;
1476
1477         if (lc == NULL || header == NULL)
1478                 RETURN(0);
1479
1480         switch (field) {
1481                 case LPROCFS_FIELDS_FLAGS_CONFIG:
1482                         ret = header->lc_config;
1483                         break;
1484                 case LPROCFS_FIELDS_FLAGS_SUM:
1485                         ret = lc->lc_sum;
1486                         if ((flags & LPROCFS_STATS_FLAG_IRQ_SAFE) != 0)
1487                                 ret += lc->lc_sum_irq;
1488                         break;
1489                 case LPROCFS_FIELDS_FLAGS_MIN:
1490                         ret = lc->lc_min;
1491                         break;
1492                 case LPROCFS_FIELDS_FLAGS_MAX:
1493                         ret = lc->lc_max;
1494                         break;
1495                 case LPROCFS_FIELDS_FLAGS_AVG:
1496                         ret = (lc->lc_max - lc->lc_min) / 2;
1497                         break;
1498                 case LPROCFS_FIELDS_FLAGS_SUMSQUARE:
1499                         ret = lc->lc_sumsquare;
1500                         break;
1501                 case LPROCFS_FIELDS_FLAGS_COUNT:
1502                         ret = lc->lc_count;
1503                         break;
1504                 default:
1505                         break;
1506         };
1507         RETURN(ret);
1508 }
1509 EXPORT_SYMBOL(lprocfs_read_helper);
1510
1511 int lprocfs_write_helper(const char __user *buffer, unsigned long count,
1512                          int *val)
1513 {
1514         return lprocfs_write_frac_helper(buffer, count, val, 1);
1515 }
1516 EXPORT_SYMBOL(lprocfs_write_helper);
1517
1518 int lprocfs_write_frac_helper(const char __user *buffer, unsigned long count,
1519                               int *val, int mult)
1520 {
1521         char kernbuf[20], *end, *pbuf;
1522
1523         if (count > (sizeof(kernbuf) - 1))
1524                 return -EINVAL;
1525
1526         if (copy_from_user(kernbuf, buffer, count))
1527                 return -EFAULT;
1528
1529         kernbuf[count] = '\0';
1530         pbuf = kernbuf;
1531         if (*pbuf == '-') {
1532                 mult = -mult;
1533                 pbuf++;
1534         }
1535
1536         *val = (int)simple_strtoul(pbuf, &end, 10) * mult;
1537         if (pbuf == end)
1538                 return -EINVAL;
1539
1540         if (end != NULL && *end == '.') {
1541                 int temp_val, pow = 1;
1542                 int i;
1543
1544                 pbuf = end + 1;
1545                 if (strlen(pbuf) > 5)
1546                         pbuf[5] = '\0'; /*only allow 5bits fractional*/
1547
1548                 temp_val = (int)simple_strtoul(pbuf, &end, 10) * mult;
1549
1550                 if (pbuf < end) {
1551                         for (i = 0; i < (end - pbuf); i++)
1552                                 pow *= 10;
1553
1554                         *val += temp_val / pow;
1555                 }
1556         }
1557         return 0;
1558 }
1559 EXPORT_SYMBOL(lprocfs_write_frac_helper);
1560
1561 int lprocfs_read_frac_helper(char *buffer, unsigned long count, long val,
1562                              int mult)
1563 {
1564         long decimal_val, frac_val;
1565         int prtn;
1566
1567         if (count < 10)
1568                 return -EINVAL;
1569
1570         decimal_val = val / mult;
1571         prtn = snprintf(buffer, count, "%ld", decimal_val);
1572         frac_val = val % mult;
1573
1574         if (prtn < (count - 4) && frac_val > 0) {
1575                 long temp_frac;
1576                 int i, temp_mult = 1, frac_bits = 0;
1577
1578                 temp_frac = frac_val * 10;
1579                 buffer[prtn++] = '.';
1580                 while (frac_bits < 2 && (temp_frac / mult) < 1 ) {
1581                         /* only reserved 2 bits fraction */
1582                         buffer[prtn++] ='0';
1583                         temp_frac *= 10;
1584                         frac_bits++;
1585                 }
1586                 /*
1587                  * Need to think these cases :
1588                  *      1. #echo x.00 > /proc/xxx       output result : x
1589                  *      2. #echo x.0x > /proc/xxx       output result : x.0x
1590                  *      3. #echo x.x0 > /proc/xxx       output result : x.x
1591                  *      4. #echo x.xx > /proc/xxx       output result : x.xx
1592                  *      Only reserved 2 bits fraction.
1593                  */
1594                 for (i = 0; i < (5 - prtn); i++)
1595                         temp_mult *= 10;
1596
1597                 frac_bits = min((int)count - prtn, 3 - frac_bits);
1598                 prtn += snprintf(buffer + prtn, frac_bits, "%ld",
1599                                  frac_val * temp_mult / mult);
1600
1601                 prtn--;
1602                 while(buffer[prtn] < '1' || buffer[prtn] > '9') {
1603                         prtn--;
1604                         if (buffer[prtn] == '.') {
1605                                 prtn--;
1606                                 break;
1607                         }
1608                 }
1609                 prtn++;
1610         }
1611         buffer[prtn++] ='\n';
1612         return prtn;
1613 }
1614
1615 int lprocfs_seq_read_frac_helper(struct seq_file *m, long val, int mult)
1616 {
1617         long decimal_val, frac_val;
1618
1619         decimal_val = val / mult;
1620         seq_printf(m, "%ld", decimal_val);
1621         frac_val = val % mult;
1622
1623         if (frac_val > 0) {
1624                 frac_val *= 100;
1625                 frac_val /= mult;
1626         }
1627         if (frac_val > 0) {
1628                 /* Three cases: x0, xx, 0x */
1629                 if ((frac_val % 10) != 0)
1630                         seq_printf(m, ".%ld", frac_val);
1631                 else
1632                         seq_printf(m, ".%ld", frac_val / 10);
1633         }
1634
1635         seq_printf(m, "\n");
1636         return 0;
1637 }
1638 EXPORT_SYMBOL(lprocfs_seq_read_frac_helper);
1639
1640 int lprocfs_write_u64_helper(const char __user *buffer, unsigned long count,
1641                              __u64 *val)
1642 {
1643         return lprocfs_write_frac_u64_helper(buffer, count, val, 1);
1644 }
1645 EXPORT_SYMBOL(lprocfs_write_u64_helper);
1646
1647 int lprocfs_write_frac_u64_helper(const char __user *buffer,
1648                                   unsigned long count,
1649                                   __u64 *val, int mult)
1650 {
1651         char kernbuf[22], *end, *pbuf;
1652         __u64 whole, frac = 0, units;
1653         unsigned frac_d = 1;
1654
1655         if (count > (sizeof(kernbuf) - 1))
1656                 return -EINVAL;
1657
1658         if (copy_from_user(kernbuf, buffer, count))
1659                 return -EFAULT;
1660
1661         kernbuf[count] = '\0';
1662         pbuf = kernbuf;
1663         if (*pbuf == '-') {
1664                 mult = -mult;
1665                 pbuf++;
1666         }
1667
1668         whole = simple_strtoull(pbuf, &end, 10);
1669         if (pbuf == end)
1670                 return -EINVAL;
1671
1672         if (end != NULL && *end == '.') {
1673                 int i;
1674                 pbuf = end + 1;
1675
1676                 /* need to limit frac_d to a __u32 */
1677                 if (strlen(pbuf) > 10)
1678                         pbuf[10] = '\0';
1679
1680                 frac = simple_strtoull(pbuf, &end, 10);
1681                 /* count decimal places */
1682                 for (i = 0; i < (end - pbuf); i++)
1683                         frac_d *= 10;
1684         }
1685
1686         units = 1;
1687         if (end != NULL) {
1688                 switch (*end) {
1689                 case 'p': case 'P':
1690                         units <<= 10;
1691                 case 't': case 'T':
1692                         units <<= 10;
1693                 case 'g': case 'G':
1694                         units <<= 10;
1695                 case 'm': case 'M':
1696                         units <<= 10;
1697                 case 'k': case 'K':
1698                         units <<= 10;
1699                 }
1700         }
1701         /* Specified units override the multiplier */
1702         if (units > 1)
1703                 mult = mult < 0 ? -units : units;
1704
1705         frac *= mult;
1706         do_div(frac, frac_d);
1707         *val = whole * mult + frac;
1708         return 0;
1709 }
1710 EXPORT_SYMBOL(lprocfs_write_frac_u64_helper);
1711
1712 static char *lprocfs_strnstr(const char *s1, const char *s2, size_t len)
1713 {
1714         size_t l2;
1715
1716         l2 = strlen(s2);
1717         if (!l2)
1718                 return (char *)s1;
1719         while (len >= l2) {
1720                 len--;
1721                 if (!memcmp(s1, s2, l2))
1722                         return (char *)s1;
1723                 s1++;
1724         }
1725         return NULL;
1726 }
1727
1728 /**
1729  * Find the string \a name in the input \a buffer, and return a pointer to the
1730  * value immediately following \a name, reducing \a count appropriately.
1731  * If \a name is not found the original \a buffer is returned.
1732  */
1733 char *lprocfs_find_named_value(const char *buffer, const char *name,
1734                                 size_t *count)
1735 {
1736         char *val;
1737         size_t buflen = *count;
1738
1739         /* there is no strnstr() in rhel5 and ubuntu kernels */
1740         val = lprocfs_strnstr(buffer, name, buflen);
1741         if (val == NULL)
1742                 return (char *)buffer;
1743
1744         val += strlen(name);                             /* skip prefix */
1745         while (val < buffer + buflen && isspace(*val)) /* skip separator */
1746                 val++;
1747
1748         *count = 0;
1749         while (val < buffer + buflen && isalnum(*val)) {
1750                 ++*count;
1751                 ++val;
1752         }
1753
1754         return val - *count;
1755 }
1756 EXPORT_SYMBOL(lprocfs_find_named_value);
1757
1758 int lprocfs_seq_create(struct proc_dir_entry *parent,
1759                        const char *name,
1760                        mode_t mode,
1761                        const struct file_operations *seq_fops,
1762                        void *data)
1763 {
1764         struct proc_dir_entry *entry;
1765         ENTRY;
1766
1767         /* Disallow secretly (un)writable entries. */
1768         LASSERT((seq_fops->write == NULL) == ((mode & 0222) == 0));
1769
1770         entry = proc_create_data(name, mode, parent, seq_fops, data);
1771
1772         if (entry == NULL)
1773                 RETURN(-ENOMEM);
1774
1775         RETURN(0);
1776 }
1777 EXPORT_SYMBOL(lprocfs_seq_create);
1778
1779 int lprocfs_obd_seq_create(struct obd_device *dev,
1780                            const char *name,
1781                            mode_t mode,
1782                            const struct file_operations *seq_fops,
1783                            void *data)
1784 {
1785         return (lprocfs_seq_create(dev->obd_proc_entry, name,
1786                                    mode, seq_fops, data));
1787 }
1788 EXPORT_SYMBOL(lprocfs_obd_seq_create);
1789
1790 void lprocfs_oh_tally(struct obd_histogram *oh, unsigned int value)
1791 {
1792         if (value >= OBD_HIST_MAX)
1793                 value = OBD_HIST_MAX - 1;
1794
1795         spin_lock(&oh->oh_lock);
1796         oh->oh_buckets[value]++;
1797         spin_unlock(&oh->oh_lock);
1798 }
1799 EXPORT_SYMBOL(lprocfs_oh_tally);
1800
1801 void lprocfs_oh_tally_log2(struct obd_histogram *oh, unsigned int value)
1802 {
1803         unsigned int val = 0;
1804
1805         if (likely(value != 0))
1806                 val = min(fls(value - 1), OBD_HIST_MAX);
1807
1808         lprocfs_oh_tally(oh, val);
1809 }
1810 EXPORT_SYMBOL(lprocfs_oh_tally_log2);
1811
1812 unsigned long lprocfs_oh_sum(struct obd_histogram *oh)
1813 {
1814         unsigned long ret = 0;
1815         int i;
1816
1817         for (i = 0; i < OBD_HIST_MAX; i++)
1818                 ret +=  oh->oh_buckets[i];
1819         return ret;
1820 }
1821 EXPORT_SYMBOL(lprocfs_oh_sum);
1822
1823 void lprocfs_oh_clear(struct obd_histogram *oh)
1824 {
1825         spin_lock(&oh->oh_lock);
1826         memset(oh->oh_buckets, 0, sizeof(oh->oh_buckets));
1827         spin_unlock(&oh->oh_lock);
1828 }
1829 EXPORT_SYMBOL(lprocfs_oh_clear);
1830
1831 int lprocfs_obd_rd_max_pages_per_rpc(char *page, char **start, off_t off,
1832                                      int count, int *eof, void *data)
1833 {
1834         struct obd_device *dev = data;
1835         struct client_obd *cli = &dev->u.cli;
1836         int rc;
1837
1838         spin_lock(&cli->cl_loi_list_lock);
1839         rc = snprintf(page, count, "%d\n", cli->cl_max_pages_per_rpc);
1840         spin_unlock(&cli->cl_loi_list_lock);
1841
1842         return rc;
1843 }
1844
1845 int lprocfs_obd_max_pages_per_rpc_seq_show(struct seq_file *m, void *data)
1846 {
1847         struct obd_device *dev = data;
1848         struct client_obd *cli = &dev->u.cli;
1849         int rc;
1850
1851         spin_lock(&cli->cl_loi_list_lock);
1852         rc = seq_printf(m, "%d\n", cli->cl_max_pages_per_rpc);
1853         spin_unlock(&cli->cl_loi_list_lock);
1854         return rc;
1855 }
1856 EXPORT_SYMBOL(lprocfs_obd_max_pages_per_rpc_seq_show);
1857
1858 int lprocfs_wr_root_squash(const char __user *buffer, unsigned long count,
1859                            struct root_squash_info *squash, char *name)
1860 {
1861         int rc;
1862         char kernbuf[64], *tmp, *errmsg;
1863         unsigned long uid, gid;
1864         ENTRY;
1865
1866         if (count >= sizeof(kernbuf)) {
1867                 errmsg = "string too long";
1868                 GOTO(failed_noprint, rc = -EINVAL);
1869         }
1870         if (copy_from_user(kernbuf, buffer, count)) {
1871                 errmsg = "bad address";
1872                 GOTO(failed_noprint, rc = -EFAULT);
1873         }
1874         kernbuf[count] = '\0';
1875
1876         /* look for uid gid separator */
1877         tmp = strchr(kernbuf, ':');
1878         if (tmp == NULL) {
1879                 errmsg = "needs uid:gid format";
1880                 GOTO(failed, rc = -EINVAL);
1881         }
1882         *tmp = '\0';
1883         tmp++;
1884
1885         /* parse uid */
1886         if (kstrtoul(kernbuf, 0, &uid) != 0) {
1887                 errmsg = "bad uid";
1888                 GOTO(failed, rc = -EINVAL);
1889         }
1890
1891         /* parse gid */
1892         if (kstrtoul(tmp, 0, &gid) != 0) {
1893                 errmsg = "bad gid";
1894                 GOTO(failed, rc = -EINVAL);
1895         }
1896
1897         squash->rsi_uid = uid;
1898         squash->rsi_gid = gid;
1899
1900         LCONSOLE_INFO("%s: root_squash is set to %u:%u\n",
1901                       name, squash->rsi_uid, squash->rsi_gid);
1902         RETURN(count);
1903
1904 failed:
1905         if (tmp != NULL) {
1906                 tmp--;
1907                 *tmp = ':';
1908         }
1909         CWARN("%s: failed to set root_squash to \"%s\", %s, rc = %d\n",
1910               name, kernbuf, errmsg, rc);
1911         RETURN(rc);
1912 failed_noprint:
1913         CWARN("%s: failed to set root_squash due to %s, rc = %d\n",
1914               name, errmsg, rc);
1915         RETURN(rc);
1916 }
1917 EXPORT_SYMBOL(lprocfs_wr_root_squash);
1918
1919
1920 int lprocfs_wr_nosquash_nids(const char __user *buffer, unsigned long count,
1921                              struct root_squash_info *squash, char *name)
1922 {
1923         int rc;
1924         char *kernbuf = NULL;
1925         char *errmsg;
1926         struct list_head tmp;
1927         ENTRY;
1928
1929         if (count > 4096) {
1930                 errmsg = "string too long";
1931                 GOTO(failed, rc = -EINVAL);
1932         }
1933
1934         OBD_ALLOC(kernbuf, count + 1);
1935         if (kernbuf == NULL) {
1936                 errmsg = "no memory";
1937                 GOTO(failed, rc = -ENOMEM);
1938         }
1939         if (copy_from_user(kernbuf, buffer, count)) {
1940                 errmsg = "bad address";
1941                 GOTO(failed, rc = -EFAULT);
1942         }
1943         kernbuf[count] = '\0';
1944
1945         if (count > 0 && kernbuf[count - 1] == '\n')
1946                 kernbuf[count - 1] = '\0';
1947
1948         if (strcmp(kernbuf, "NONE") == 0 || strcmp(kernbuf, "clear") == 0) {
1949                 /* empty string is special case */
1950                 down_write(&squash->rsi_sem);
1951                 if (!list_empty(&squash->rsi_nosquash_nids))
1952                         cfs_free_nidlist(&squash->rsi_nosquash_nids);
1953                 up_write(&squash->rsi_sem);
1954                 LCONSOLE_INFO("%s: nosquash_nids is cleared\n", name);
1955                 OBD_FREE(kernbuf, count + 1);
1956                 RETURN(count);
1957         }
1958
1959         INIT_LIST_HEAD(&tmp);
1960         if (cfs_parse_nidlist(kernbuf, count, &tmp) <= 0) {
1961                 errmsg = "can't parse";
1962                 GOTO(failed, rc = -EINVAL);
1963         }
1964         LCONSOLE_INFO("%s: nosquash_nids set to %s\n",
1965                       name, kernbuf);
1966         OBD_FREE(kernbuf, count + 1);
1967         kernbuf = NULL;
1968
1969         down_write(&squash->rsi_sem);
1970         if (!list_empty(&squash->rsi_nosquash_nids))
1971                 cfs_free_nidlist(&squash->rsi_nosquash_nids);
1972         list_splice(&tmp, &squash->rsi_nosquash_nids);
1973         up_write(&squash->rsi_sem);
1974
1975         RETURN(count);
1976
1977 failed:
1978         if (kernbuf) {
1979                 CWARN("%s: failed to set nosquash_nids to \"%s\", %s rc = %d\n",
1980                       name, kernbuf, errmsg, rc);
1981                 OBD_FREE(kernbuf, count + 1);
1982         } else {
1983                 CWARN("%s: failed to set nosquash_nids due to %s rc = %d\n",
1984                       name, errmsg, rc);
1985         }
1986         RETURN(rc);
1987 }
1988 EXPORT_SYMBOL(lprocfs_wr_nosquash_nids);
1989
1990 #endif /* CONFIG_PROC_FS*/