1 /* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*-
2 * vim:expandtab:shiftwidth=8:tabstop=8:
6 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
8 * This program is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License version 2 only,
10 * as published by the Free Software Foundation.
12 * This program is distributed in the hope that it will be useful, but
13 * WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * General Public License version 2 for more details (a copy is included
16 * in the LICENSE file that accompanied this code).
18 * You should have received a copy of the GNU General Public License
19 * version 2 along with this program; If not, see
20 * http://www.sun.com/software/products/lustre/docs/GPLv2.pdf
22 * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
23 * CA 95054 USA or visit www.sun.com if you need additional information or
29 * Copyright (c) 2003, 2010, Oracle and/or its affiliates. All rights reserved.
30 * Use is subject to license terms.
33 * This file is part of Lustre, http://www.lustre.org/
34 * Lustre is a trademark of Sun Microsystems, Inc.
43 #include <sys/types.h>
51 gettimeofday (&tv, NULL);
52 return (tv.tv_sec + tv.tv_usec / 1000000.0);
56 unsigned long msgs_alloc;
57 unsigned long msgs_max;
59 unsigned long send_count;
60 unsigned long recv_count;
61 unsigned long route_count;
62 unsigned long drop_count;
63 unsigned long long send_length;
64 unsigned long long recv_length;
65 unsigned long long route_length;
66 unsigned long long drop_length;
69 unsigned long long subull(unsigned long long a, unsigned long long b)
72 return -1ULL - b + a + 1;
77 unsigned long long subul(unsigned long a, unsigned long b)
80 return -1UL - b + a + 1;
85 double rul(unsigned long a, double secs)
87 return (double)a/secs;
90 double rull(unsigned long long a, double secs)
92 return (double)a/secs;
98 static char buffer[1024];
99 static double last = 0.0;
100 static counters_t old_counter;
103 counters_t new_counter;
107 lseek (fd, 0, SEEK_SET);
109 n = read (fd, buffer, sizeof (buffer));
112 fprintf (stderr, "Can't read statfile\n");
117 n = sscanf(buffer, "%lu %lu %lu %lu %lu %lu %lu %llu %llu %llu %llu",
118 &new_counter.msgs_alloc, &new_counter.msgs_max,
120 &new_counter.send_count, &new_counter.recv_count,
121 &new_counter.route_count, &new_counter.drop_count,
122 &new_counter.send_length, &new_counter.recv_length,
123 &new_counter.route_length, &new_counter.drop_length);
126 fprintf (stderr, "Can't parse statfile\n");
131 printf("M %lu(%lu) E %lu S %llu/%lu R %llu/%lu F %llu/%lu "
133 new_counter.msgs_alloc, new_counter.msgs_max,
135 new_counter.send_length, new_counter.send_count,
136 new_counter.recv_length, new_counter.recv_count,
137 new_counter.route_length, new_counter.route_count,
138 new_counter.drop_length, new_counter.drop_count);
142 counter.msgs_alloc = new_counter.msgs_alloc;
143 counter.msgs_max = new_counter.msgs_max;
145 counter.errors = subul(new_counter.errors, old_counter.errors);
146 counter.send_count = subul(new_counter.send_count, old_counter.send_count);
147 counter.recv_count = subul(new_counter.recv_count, old_counter.recv_count);
148 counter.route_count = subul(new_counter.route_count, old_counter.route_count);
149 counter.drop_count = subul(new_counter.drop_count, old_counter.drop_count);
150 counter.send_length = subull(new_counter.send_length, old_counter.send_length);
151 counter.recv_length = subull(new_counter.recv_length, old_counter.recv_length);
152 counter.route_length = subull(new_counter.route_length, old_counter.route_length);
153 counter.drop_length = subull(new_counter.drop_length, old_counter.drop_length);
155 printf ("M %3lu(%3lu) E %0.0f S %7.2f/%6.0f R %7.2f/%6.0f F %7.2f/%6.0f D %4.2f/%0.0f\n",
156 counter.msgs_alloc, counter.msgs_max,
157 rul(counter.errors,t),
158 rull(counter.send_length,t*1024.0*1024.0), rul(counter.send_count, t),
159 rull(counter.recv_length,t*1024.0*1024.0), rul(counter.recv_count, t),
160 rull(counter.route_length,t*1024.0*1024.0), rul(counter.route_count, t),
161 rull(counter.drop_length,t*1024.0*1024.0), rul(counter.drop_count, t));
164 old_counter = new_counter;
167 lseek (fd, 0, SEEK_SET);
171 int main (int argc, char **argv)
177 interval = atoi (argv[1]);
179 fd = open ("/proc/sys/lnet/stats", O_RDONLY);
182 fprintf (stderr, "Can't open stat: %s\n", strerror (errno));