Whamcloud - gitweb
4542228cfe090f465f0c75c5a3d4e9be102e1a47
[fs/lustre-release.git] / lustre / utils / obd.c
1 /* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*-
2  * vim:expandtab:shiftwidth=8:tabstop=8:
3  *
4  * GPL HEADER START
5  *
6  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
7  *
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.
11  *
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).
17  *
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
21  *
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
24  * have any questions.
25  *
26  * GPL HEADER END
27  */
28 /*
29  * Copyright  2008 Sun Microsystems, Inc. All rights reserved
30  * Use is subject to license terms.
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/utils/obd.c
37  *
38  * Author: Peter J. Braam <braam@clusterfs.com>
39  * Author: Phil Schwan <phil@clusterfs.com>
40  * Author: Andreas Dilger <adilger@clusterfs.com>
41  * Author: Robert Read <rread@clusterfs.com>
42  */
43
44 #include <stdlib.h>
45 #include <sys/ioctl.h>
46 #include <fcntl.h>
47 #include <sys/socket.h>
48 #include <sys/types.h>
49 #include <sys/wait.h>
50 #include <sys/stat.h>
51 #include <stdio.h>
52 #include <stdarg.h>
53 #include <signal.h>
54 #include <ctype.h>
55 #include <glob.h>
56
57 #include "obdctl.h"
58
59 #include <obd.h>          /* for struct lov_stripe_md */
60 #include <lustre/lustre_build_version.h>
61
62 #include <unistd.h>
63 #include <sys/un.h>
64 #include <time.h>
65 #include <sys/time.h>
66 #include <errno.h>
67 #include <string.h>
68
69 #include <obd_class.h>
70 #include <lnet/lnetctl.h>
71 #include <libcfs/libcfsutil.h>
72 #include <stdio.h>
73 #include <lustre/liblustreapi.h>
74
75 #define MAX_STRING_SIZE 128
76 #define DEVICES_LIST "/proc/fs/lustre/devices"
77
78 #if HAVE_LIBPTHREAD
79 #include <sys/ipc.h>
80 #include <sys/shm.h>
81 #include <pthread.h>
82
83 #define MAX_THREADS 1024
84
85 struct shared_data {
86         __u64 counters[MAX_THREADS];
87         __u64 offsets[MAX_THREADS];
88         int   running;
89         int   barrier;
90         int   stop;
91         l_mutex_t mutex;
92         l_cond_t  cond;
93 };
94
95 static struct shared_data *shared_data;
96 static __u64 counter_snapshot[2][MAX_THREADS];
97 static int prev_valid;
98 static struct timeval prev_time;
99 static int thread;
100 static int nthreads;
101 #else
102 const int thread = 0;
103 const int nthreads = 1;
104 #endif
105
106 #define MAX_IOC_BUFLEN 8192
107
108 static int cur_device = -1;
109
110 #define MAX_STRIPES     170
111 struct lov_oinfo lov_oinfos[MAX_STRIPES];
112
113 struct lsm_buffer {
114         struct lov_stripe_md lsm;
115         struct lov_oinfo *ptrs[MAX_STRIPES];
116 } lsm_buffer;
117
118 static int l2_ioctl(int dev_id, int opc, void *buf)
119 {
120         return l_ioctl(dev_id, opc, buf);
121 }
122
123 int lcfg_ioctl(char * func, int dev_id, struct lustre_cfg *lcfg)
124 {
125         struct obd_ioctl_data data;
126         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
127         int rc;
128
129         memset(&data, 0x00, sizeof(data));
130         data.ioc_dev = cur_device;
131         data.ioc_type = LUSTRE_CFG_TYPE;
132         data.ioc_plen1 = lustre_cfg_len(lcfg->lcfg_bufcount,
133                                         lcfg->lcfg_buflens);
134         data.ioc_pbuf1 = (void *)lcfg;
135         memset(buf, 0, sizeof(rawbuf));
136         rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
137         if (rc) {
138                 fprintf(stderr, "error: %s: invalid ioctl\n",
139                         jt_cmdname(func));
140                 return rc;
141         }
142
143         rc =  l_ioctl(dev_id, OBD_IOC_PROCESS_CFG, buf);
144
145         return rc;
146 }
147
148 static int do_device(char *func, char *devname);
149
150 static int get_mgs_device()
151 {
152         char mgs[] = "$MGS";
153         static int mgs_device = -1;
154
155         if (mgs_device == -1) {
156                 int rc;
157                 do_disconnect(NULL, 1);
158                 rc = do_device("mgsioc", mgs);
159                 if (rc) {
160                         fprintf(stderr,
161                                 "This command must be run on the MGS.\n");
162                         errno = ENODEV;
163                         return -1;
164                 }
165                 mgs_device = cur_device;
166         }
167         return mgs_device;
168 }
169
170 /* Returns -1 on error with errno set */
171 int lcfg_mgs_ioctl(char *func, int dev_id, struct lustre_cfg *lcfg)
172 {
173         struct obd_ioctl_data data;
174         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
175         int rc;
176
177         memset(&data, 0x00, sizeof(data));
178         rc = data.ioc_dev = get_mgs_device();
179         if (rc < 0)
180                 goto out;
181         data.ioc_type = LUSTRE_CFG_TYPE;
182         data.ioc_plen1 = lustre_cfg_len(lcfg->lcfg_bufcount,
183                                         lcfg->lcfg_buflens);
184         data.ioc_pbuf1 = (void *)lcfg;
185         memset(buf, 0, sizeof(rawbuf));
186         rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
187         if (rc) {
188                 fprintf(stderr, "error: %s: invalid ioctl\n",
189                         jt_cmdname(func));
190                 return rc;
191         }
192
193         rc = l_ioctl(dev_id, OBD_IOC_PARAM, buf);
194 out:
195         if (rc) {
196                 if (errno == ENOSYS)
197                         fprintf(stderr, "Make sure cfg_device is set first.\n");
198         }
199         return rc;
200 }
201
202 char *obdo_print(struct obdo *obd)
203 {
204         char buf[1024];
205
206         sprintf(buf, "id: "LPX64"\ngrp: "LPX64"\natime: "LPU64"\nmtime: "LPU64
207                 "\nctime: "LPU64"\nsize: "LPU64"\nblocks: "LPU64
208                 "\nblksize: %u\nmode: %o\nuid: %d\ngid: %d\nflags: %x\n"
209                 "misc: %x\nnlink: %d,\nvalid "LPX64"\n",
210                 obd->o_id, obd->o_gr, obd->o_atime, obd->o_mtime, obd->o_ctime,
211                 obd->o_size, obd->o_blocks, obd->o_blksize, obd->o_mode,
212                 obd->o_uid, obd->o_gid, obd->o_flags, obd->o_misc,
213                 obd->o_nlink, obd->o_valid);
214         return strdup(buf);
215 }
216
217
218 #define BAD_VERBOSE (-999999999)
219
220 #define N2D_OFF 0x100      /* So we can tell between error codes and devices */
221
222 static int do_name2dev(char *func, char *name)
223 {
224         struct obd_ioctl_data data;
225         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
226         int rc;
227
228         memset(&data, 0x00, sizeof(data));
229         data.ioc_dev = cur_device;
230         data.ioc_inllen1 = strlen(name) + 1;
231         data.ioc_inlbuf1 = name;
232
233         memset(buf, 0, sizeof(rawbuf));
234         rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
235         if (rc) {
236                 fprintf(stderr, "error: %s: invalid ioctl\n",
237                         jt_cmdname(func));
238                 return rc;
239         }
240         rc = l2_ioctl(OBD_DEV_ID, OBD_IOC_NAME2DEV, buf);
241         if (rc < 0)
242                 return errno;
243         rc = obd_ioctl_unpack(&data, buf, sizeof(rawbuf));
244         if (rc) {
245                 fprintf(stderr, "error: %s: invalid reply\n",
246                         jt_cmdname(func));
247                 return rc;
248         }
249
250         return data.ioc_dev + N2D_OFF;
251 }
252
253 /*
254  * resolve a device name to a device number.
255  * supports a number, $name or %uuid.
256  */
257 int parse_devname(char *func, char *name)
258 {
259         int rc;
260         int ret = -1;
261
262         if (!name)
263                 return ret;
264         if (isdigit(name[0])) {
265                 ret = strtoul(name, NULL, 0);
266         } else {
267                 if (name[0] == '$' || name[0] == '%')
268                         name++;
269                 rc = do_name2dev(func, name);
270                 if (rc >= N2D_OFF) {
271                         ret = rc - N2D_OFF;
272                         // printf("Name %s is device %d\n", name, ret);
273                 } else {
274                         fprintf(stderr, "No device found for name %s: %s\n",
275                                 name, strerror(rc));
276                 }
277         }
278         return ret;
279 }
280
281 static void
282 reset_lsmb (struct lsm_buffer *lsmb)
283 {
284         memset (&lsmb->lsm, 0, sizeof (lsmb->lsm));
285         memset(lov_oinfos, 0, sizeof(lov_oinfos));
286         lsmb->lsm.lsm_magic = LOV_MAGIC;
287 }
288
289 static int
290 parse_lsm (struct lsm_buffer *lsmb, char *string)
291 {
292         struct lov_stripe_md *lsm = &lsmb->lsm;
293         char                 *end;
294         int                   i;
295
296         /*
297          * object_id[=size#count[@offset:id]*]
298          */
299
300         reset_lsmb (lsmb);
301
302         lsm->lsm_object_id = strtoull (string, &end, 0);
303         if (end == string)
304                 return (-1);
305         string = end;
306
307         if (*string == 0)
308                 return (0);
309
310         if (*string != '=')
311                 return (-1);
312         string++;
313
314         lsm->lsm_stripe_size = strtoul (string, &end, 0);
315         if (end == string)
316                 return (-1);
317         string = end;
318
319         if (*string != '#')
320                 return (-1);
321         string++;
322
323         lsm->lsm_stripe_count = strtoul (string, &end, 0);
324         if (end == string)
325                 return (-1);
326         string = end;
327
328         if (*string == 0)               /* don't have to specify obj ids */
329                 return (0);
330
331         for (i = 0; i < lsm->lsm_stripe_count; i++) {
332                 if (*string != '@')
333                         return (-1);
334                 string++;
335                 lsm->lsm_oinfo[i]->loi_ost_idx = strtoul(string, &end, 0);
336                 if (*end != ':')
337                         return (-1);
338                 string = end + 1;
339                 lsm->lsm_oinfo[i]->loi_id = strtoull(string, &end, 0);
340                 string = end;
341         }
342
343         if (*string != 0)
344                 return (-1);
345
346         return (0);
347 }
348
349 char *jt_cmdname(char *func)
350 {
351         static char buf[512];
352
353         if (thread) {
354                 sprintf(buf, "%s-%d", func, thread);
355                 return buf;
356         }
357
358         return func;
359 }
360
361 #define difftime(a, b)                                  \
362         ((a)->tv_sec - (b)->tv_sec +                    \
363          ((a)->tv_usec - (b)->tv_usec) / 1000000.0)
364
365 static int be_verbose(int verbose, struct timeval *next_time,
366                       __u64 num, __u64 *next_num, int num_total)
367 {
368         struct timeval now;
369
370         if (!verbose)
371                 return 0;
372
373         if (next_time != NULL)
374                 gettimeofday(&now, NULL);
375
376         /* A positive verbosity means to print every X iterations */
377         if (verbose > 0 && (num >= *next_num || num >= num_total)) {
378                 *next_num += verbose;
379                 if (next_time) {
380                         next_time->tv_sec = now.tv_sec - verbose;
381                         next_time->tv_usec = now.tv_usec;
382                 }
383                 return 1;
384         }
385
386         /* A negative verbosity means to print at most each X seconds */
387         if (verbose < 0 && next_time != NULL &&
388             difftime(&now, next_time) >= 0.0){
389                 next_time->tv_sec = now.tv_sec - verbose;
390                 next_time->tv_usec = now.tv_usec;
391                 *next_num = num;
392                 return 1;
393         }
394
395         return 0;
396 }
397
398 static int get_verbose(char *func, const char *arg)
399 {
400         int verbose;
401         char *end;
402
403         if (!arg || arg[0] == 'v')
404                 verbose = 1;
405         else if (arg[0] == 's' || arg[0] == 'q')
406                 verbose = 0;
407         else {
408                 verbose = (int)strtoul(arg, &end, 0);
409                 if (*end) {
410                         fprintf(stderr, "error: %s: bad verbose option '%s'\n",
411                                 jt_cmdname(func), arg);
412                         return BAD_VERBOSE;
413                 }
414         }
415
416         if (verbose < 0)
417                 printf("Print status every %d seconds\n", -verbose);
418         else if (verbose == 1)
419                 printf("Print status every operation\n");
420         else if (verbose > 1)
421                 printf("Print status every %d operations\n", verbose);
422
423         return verbose;
424 }
425
426 int do_disconnect(char *func, int verbose)
427 {
428         lcfg_set_devname(NULL);
429         cur_device = -1;
430         return 0;
431 }
432
433 #ifdef MAX_THREADS
434 static void shmem_setup(void)
435 {
436         /* Create new segment */
437         int shmid = shmget(IPC_PRIVATE, sizeof(*shared_data), 0600);
438
439         if (shmid == -1) {
440                 fprintf(stderr, "Can't create shared data: %s\n",
441                         strerror(errno));
442                 return;
443         }
444
445         /* Attatch to new segment */
446         shared_data = (struct shared_data *)shmat(shmid, NULL, 0);
447
448         if (shared_data == (struct shared_data *)(-1)) {
449                 fprintf(stderr, "Can't attach shared data: %s\n",
450                         strerror(errno));
451                 shared_data = NULL;
452                 return;
453         }
454
455         /* Mark segment as destroyed, so it will disappear when we exit.
456          * Forks will inherit attached segments, so we should be OK.
457          */
458         if (shmctl(shmid, IPC_RMID, NULL) == -1) {
459                 fprintf(stderr, "Can't destroy shared data: %s\n",
460                         strerror(errno));
461         }
462 }
463
464 static inline void shmem_lock(void)
465 {
466         l_mutex_lock(&shared_data->mutex);
467 }
468
469 static inline void shmem_unlock(void)
470 {
471         l_mutex_unlock(&shared_data->mutex);
472 }
473
474 static inline void shmem_reset(int total_threads)
475 {
476         if (shared_data == NULL)
477                 return;
478
479         memset(shared_data, 0, sizeof(*shared_data));
480         l_mutex_init(&shared_data->mutex);
481         l_cond_init(&shared_data->cond);
482         memset(counter_snapshot, 0, sizeof(counter_snapshot));
483         prev_valid = 0;
484         shared_data->barrier = total_threads;
485 }
486
487 static inline void shmem_bump(void)
488 {
489         static int bumped_running;
490
491         if (shared_data == NULL || thread <= 0 || thread > MAX_THREADS)
492                 return;
493
494         shmem_lock();
495         shared_data->counters[thread - 1]++;
496         if (!bumped_running)
497                 shared_data->running++;
498         shmem_unlock();
499         bumped_running = 1;
500 }
501
502 static void shmem_snap(int total_threads, int live_threads)
503 {
504         struct timeval this_time;
505         int non_zero = 0;
506         __u64 total = 0;
507         double secs;
508         int running;
509         int i;
510
511         if (shared_data == NULL || total_threads > MAX_THREADS)
512                 return;
513
514         shmem_lock();
515         memcpy(counter_snapshot[0], shared_data->counters,
516                total_threads * sizeof(counter_snapshot[0][0]));
517         running = shared_data->running;
518         shmem_unlock();
519
520         gettimeofday(&this_time, NULL);
521
522         for (i = 0; i < total_threads; i++) {
523                 long long this_count =
524                         counter_snapshot[0][i] - counter_snapshot[1][i];
525
526                 if (this_count != 0) {
527                         non_zero++;
528                         total += this_count;
529                 }
530         }
531
532         secs = (this_time.tv_sec + this_time.tv_usec / 1000000.0) -
533                (prev_time.tv_sec + prev_time.tv_usec / 1000000.0);
534
535         if (prev_valid &&
536             live_threads == total_threads &&
537             secs > 0.0)                    /* someone screwed with the time? */
538                 printf("%d/%d Total: %f/second\n", non_zero, total_threads, total / secs);
539
540         memcpy(counter_snapshot[1], counter_snapshot[0],
541                total_threads * sizeof(counter_snapshot[0][0]));
542         prev_time = this_time;
543         if (!prev_valid &&
544             running == total_threads)
545                 prev_valid = 1;
546 }
547
548 static void shmem_stop(void)
549 {
550         if (shared_data == NULL)
551                 return;
552
553         shared_data->stop = 1;
554 }
555
556 static int shmem_running(void)
557 {
558         return (shared_data == NULL ||
559                 !shared_data->stop);
560 }
561 #else
562 static void shmem_setup(void)
563 {
564 }
565
566 static inline void shmem_reset(int total_threads)
567 {
568 }
569
570 static inline void shmem_bump(void)
571 {
572 }
573
574 static void shmem_lock()
575 {
576 }
577
578 static void shmem_unlock()
579 {
580 }
581
582 static void shmem_stop(void)
583 {
584 }
585
586 static int shmem_running(void)
587 {
588         return 1;
589 }
590 #endif
591
592 extern command_t cmdlist[];
593
594 static int do_device(char *func, char *devname)
595 {
596         int dev;
597
598         dev = parse_devname(func, devname);
599         if (dev < 0)
600                 return -1;
601
602         lcfg_set_devname(devname);
603         cur_device = dev;
604         return 0;
605 }
606
607 int jt_obd_get_device()
608 {
609         return cur_device;
610 }
611
612 int jt_obd_device(int argc, char **argv)
613 {
614         int rc;
615
616         if (argc > 2)
617                 return CMD_HELP;
618
619         if (argc == 1) {
620                 printf("current device is %d - %s\n",
621                        cur_device, lcfg_get_devname() ? : "not set");
622                 return 0;
623         }
624         rc = do_device("device", argv[1]);
625         return rc;
626 }
627
628 int jt_opt_device(int argc, char **argv)
629 {
630         int ret;
631         int rc;
632
633         if (argc < 3)
634                 return CMD_HELP;
635
636         rc = do_device("device", argv[1]);
637
638         if (!rc)
639                 rc = Parser_execarg(argc - 2, argv + 2, cmdlist);
640
641         ret = do_disconnect(argv[0], 0);
642         if (!rc)
643                 rc = ret;
644
645         return rc;
646 }
647
648 #ifdef MAX_THREADS
649 static void parent_sighandler (int sig)
650 {
651         return;
652 }
653
654 int jt_opt_threads(int argc, char **argv)
655 {
656         static char      cmdstr[128];
657         sigset_t         saveset;
658         sigset_t         sigset;
659         struct sigaction sigact;
660         struct sigaction saveact1;
661         struct sigaction saveact2;
662         unsigned long    threads;
663         __u64            next_thread;
664         int verbose;
665         int rc = 0;
666         int report_count = -1;
667         char *end;
668         int i;
669
670         if (argc < 5)
671                 return CMD_HELP;
672
673         threads = strtoul(argv[1], &end, 0);
674
675         if (*end == '.')
676                 report_count = strtoul(end + 1, &end, 0);
677
678         if (*end || threads > MAX_THREADS) {
679                 fprintf(stderr, "error: %s: invalid thread count '%s'\n",
680                         jt_cmdname(argv[0]), argv[1]);
681                 return CMD_HELP;
682         }
683
684         verbose = get_verbose(argv[0], argv[2]);
685         if (verbose == BAD_VERBOSE)
686                 return CMD_HELP;
687
688         if (verbose != 0) {
689                 snprintf(cmdstr, sizeof(cmdstr), "%s", argv[4]);
690                 for (i = 5; i < argc; i++)
691                         snprintf(cmdstr + strlen(cmdstr), sizeof(cmdstr),
692                                  " %s", argv[i]);
693
694                 printf("%s: starting %ld threads on device %s running %s\n",
695                        argv[0], threads, argv[3], cmdstr);
696         }
697
698         shmem_reset(threads);
699
700         sigemptyset(&sigset);
701         sigaddset(&sigset, SIGALRM);
702         sigaddset(&sigset, SIGCHLD);
703         sigprocmask(SIG_BLOCK, &sigset, &saveset);
704
705         nthreads = threads;
706
707         for (i = 1, next_thread = verbose; i <= threads; i++) {
708                 rc = fork();
709                 if (rc < 0) {
710                         fprintf(stderr, "error: %s: #%d - %s\n", argv[0], i,
711                                 strerror(rc = errno));
712                         break;
713                 } else if (rc == 0) {
714                         sigprocmask(SIG_SETMASK, &saveset, NULL);
715
716                         thread = i;
717                         argv[2] = "--device";
718                         return jt_opt_device(argc - 2, argv + 2);
719                 } else if (be_verbose(verbose, NULL, i, &next_thread, threads))
720                         printf("%s: thread #%d (PID %d) started\n",
721                                argv[0], i, rc);
722                 rc = 0;
723         }
724
725         if (!thread) {          /* parent process */
726                 int live_threads = threads;
727
728                 sigemptyset(&sigset);
729                 sigemptyset(&sigact.sa_mask);
730                 sigact.sa_handler = parent_sighandler;
731                 sigact.sa_flags = 0;
732
733                 sigaction(SIGALRM, &sigact, &saveact1);
734                 sigaction(SIGCHLD, &sigact, &saveact2);
735
736                 while (live_threads > 0) {
737                         int status;
738                         pid_t ret;
739
740                         if (verbose < 0)        /* periodic stats */
741                                 alarm(-verbose);
742
743                         sigsuspend(&sigset);
744                         alarm(0);
745
746                         while (live_threads > 0) {
747                                 ret = waitpid(0, &status, WNOHANG);
748                                 if (ret == 0)
749                                         break;
750
751                                 if (ret < 0) {
752                                         fprintf(stderr, "error: %s: wait - %s\n",
753                                                 argv[0], strerror(errno));
754                                         if (!rc)
755                                                 rc = errno;
756                                         continue;
757                                 } else {
758                                         /*
759                                          * This is a hack.  We _should_ be able
760                                          * to use WIFEXITED(status) to see if
761                                          * there was an error, but it appears
762                                          * to be broken and it always returns 1
763                                          * (OK).  See wait(2).
764                                          */
765                                         int err = WEXITSTATUS(status);
766                                         if (err || WIFSIGNALED(status))
767                                                 fprintf(stderr,
768                                                         "%s: PID %d had rc=%d\n",
769                                                         argv[0], ret, err);
770                                         if (!rc)
771                                                 rc = err;
772
773                                         live_threads--;
774                                 }
775                         }
776
777                         /* Show stats while all threads running */
778                         if (verbose < 0) {
779                                 shmem_snap(threads, live_threads);
780                                 if (report_count > 0 && --report_count == 0)
781                                         shmem_stop();
782                         }
783                 }
784                 sigaction(SIGCHLD, &saveact2, NULL);
785                 sigaction(SIGALRM, &saveact1, NULL);
786         }
787
788         sigprocmask(SIG_SETMASK, &saveset, NULL);
789
790         return rc;
791 }
792 #else
793 int jt_opt_threads(int argc, char **argv)
794 {
795         fprintf(stderr, "%s not-supported in a single-threaded runtime\n",
796                 jt_cmdname(argv[0]));
797         return CMD_HELP;
798 }
799 #endif
800
801 int jt_opt_net(int argc, char **argv)
802 {
803         char *arg2[3];
804         int rc;
805
806         if (argc < 3)
807                 return CMD_HELP;
808
809         arg2[0] = argv[0];
810         arg2[1] = argv[1];
811         arg2[2] = NULL;
812         rc = jt_ptl_network (2, arg2);
813
814         if (!rc)
815                 rc = Parser_execarg(argc - 2, argv + 2, cmdlist);
816
817         return rc;
818 }
819
820 int jt_obd_no_transno(int argc, char **argv)
821 {
822         struct obd_ioctl_data data;
823         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
824         int rc;
825
826         memset(&data, 0x00, sizeof(data));
827         data.ioc_dev = cur_device;
828
829         if (argc != 1)
830                 return CMD_HELP;
831
832         memset(buf, 0, sizeof(rawbuf));
833         rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
834         if (rc) {
835                 fprintf(stderr, "error: %s: invalid ioctl\n",
836                         jt_cmdname(argv[0]));
837                 return rc;
838         }
839         rc = l2_ioctl(OBD_DEV_ID, OBD_IOC_NO_TRANSNO, buf);
840         if (rc < 0)
841                 fprintf(stderr, "error: %s: %s\n", jt_cmdname(argv[0]),
842                         strerror(rc = errno));
843
844         return rc;
845 }
846
847 int jt_obd_set_readonly(int argc, char **argv)
848 {
849         struct obd_ioctl_data data;
850         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
851         int rc;
852
853         memset(&data, 0x00, sizeof(data));
854         data.ioc_dev = cur_device;
855
856         if (argc != 1)
857                 return CMD_HELP;
858
859         memset(buf, 0, sizeof(rawbuf));
860         rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
861         if (rc) {
862                 fprintf(stderr, "error: %s: invalid ioctl\n",
863                         jt_cmdname(argv[0]));
864                 return rc;
865         }
866         rc = l2_ioctl(OBD_DEV_ID, OBD_IOC_SET_READONLY, buf);
867         if (rc < 0)
868                 fprintf(stderr, "error: %s: %s\n", jt_cmdname(argv[0]),
869                         strerror(rc = errno));
870
871         return rc;
872 }
873
874 int jt_obd_abort_recovery(int argc, char **argv)
875 {
876         struct obd_ioctl_data data;
877         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
878         int rc;
879
880         memset(&data, 0x00, sizeof(data));
881         data.ioc_dev = cur_device;
882
883         if (argc != 1)
884                 return CMD_HELP;
885
886         memset(buf, 0, sizeof(rawbuf));
887         rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
888         if (rc) {
889                 fprintf(stderr, "error: %s: invalid ioctl\n",
890                         jt_cmdname(argv[0]));
891                 return rc;
892         }
893         rc = l2_ioctl(OBD_DEV_ID, OBD_IOC_ABORT_RECOVERY, buf);
894         if (rc < 0)
895                 fprintf(stderr, "error: %s: %s\n", jt_cmdname(argv[0]),
896                         strerror(rc = errno));
897
898         return rc;
899 }
900
901 int jt_get_version(int argc, char **argv)
902 {
903         int rc;
904         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
905         struct obd_ioctl_data *data = (struct obd_ioctl_data *)buf;
906
907         if (argc != 1)
908                 return CMD_HELP;
909
910         memset(buf, 0, sizeof(rawbuf));
911         data->ioc_version = OBD_IOCTL_VERSION;
912         data->ioc_inllen1 = sizeof(rawbuf) - size_round(sizeof(*data));
913         data->ioc_inlbuf1 = buf + size_round(sizeof(*data));
914         data->ioc_len = obd_ioctl_packlen(data);
915
916         rc = l2_ioctl(OBD_DEV_ID, OBD_GET_VERSION, buf);
917         if (rc < 0)
918                 fprintf(stderr, "error: %s: %s\n", jt_cmdname(argv[0]),
919                         strerror(rc = errno));
920         else {
921                 printf("Lustre version: %s\n", data->ioc_bulk);
922         }
923
924         printf("lctl   version: %s\n", BUILD_VERSION);
925         return rc;
926 }
927
928 /*
929  * Print an obd device line with the ost_conn_uuid inserted, if the obd
930  * is an osc.
931  */
932 static void print_obd_line(char *s)
933 {
934         char buf[MAX_STRING_SIZE];
935         char obd_name[MAX_OBD_NAME];
936         FILE *fp = NULL;
937         char *ptr;
938
939         if (sscanf(s, " %*d %*s osc %s %*s %*d ", obd_name) == 0)
940                 goto try_mdc;
941         snprintf(buf, sizeof(buf),
942                  "/proc/fs/lustre/osc/%s/ost_conn_uuid", obd_name);
943         if ((fp = fopen(buf, "r")) == NULL)
944                 goto try_mdc;
945         goto got_one;
946
947 try_mdc:
948         if (sscanf(s, " %*d %*s mdc %s %*s %*d ", obd_name) == 0)
949                 goto fail;
950         snprintf(buf, sizeof(buf),
951                  "/proc/fs/lustre/mdc/%s/mds_conn_uuid", obd_name);
952         if ((fp = fopen(buf, "r")) == NULL)
953                 goto fail;
954
955 got_one:
956         /* should not ignore fgets(3)'s return value */
957         if (!fgets(buf, sizeof(buf), fp)) {
958                 fprintf(stderr, "reading from %s: %s", buf, strerror(errno));
959                 fclose(fp);
960                 return;
961         }
962         fclose(fp);
963
964         /* trim trailing newlines */
965         ptr = strrchr(buf, '\n');
966         if (ptr) *ptr = '\0';
967         ptr = strrchr(s, '\n');
968         if (ptr) *ptr = '\0';
969
970         printf("%s %s\n", s, buf);
971         return;
972
973 fail:
974         printf("%s", s);
975         return;
976 }
977
978 /* get device list by ioctl */
979 int jt_obd_list_ioctl(int argc, char **argv)
980 {
981         int rc, index;
982         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
983         struct obd_ioctl_data *data = (struct obd_ioctl_data *)buf;
984
985         if (argc > 2)
986                 return CMD_HELP;
987         /* Just ignore a -t option.  Only supported with /proc. */
988         else if (argc == 2 && strcmp(argv[1], "-t") != 0)
989                 return CMD_HELP;
990
991         for (index = 0;; index++) {
992                 memset(buf, 0, sizeof(rawbuf));
993                 data->ioc_version = OBD_IOCTL_VERSION;
994                 data->ioc_inllen1 = sizeof(rawbuf) - size_round(sizeof(*data));
995                 data->ioc_inlbuf1 = buf + size_round(sizeof(*data));
996                 data->ioc_len = obd_ioctl_packlen(data);
997                 data->ioc_count = index;
998
999                 rc = l2_ioctl(OBD_DEV_ID, OBD_IOC_GETDEVICE, buf);
1000                 if (rc != 0)
1001                         break;
1002                 printf("%s\n", (char *)data->ioc_bulk);
1003         }
1004         if (rc != 0) {
1005                 if (errno == ENOENT)
1006                         /* no device or the last device */
1007                         rc = 0;
1008                 else
1009                         fprintf(stderr, "Error getting device list: %s: "
1010                                 "check dmesg.\n", strerror(errno));
1011         }
1012         return rc;
1013 }
1014
1015 int jt_obd_list(int argc, char **argv)
1016 {
1017         int rc;
1018         char buf[MAX_STRING_SIZE];
1019         FILE *fp = NULL;
1020         int print_obd = 0;
1021
1022         if (argc > 2)
1023                 return CMD_HELP;
1024         else if (argc == 2) {
1025                 if (strcmp(argv[1], "-t") == 0)
1026                         print_obd = 1;
1027                 else
1028                         return CMD_HELP;
1029         }
1030
1031         fp = fopen(DEVICES_LIST, "r");
1032         if (fp == NULL) {
1033                 fprintf(stderr, "error: %s: %s opening "DEVICES_LIST"\n",
1034                         jt_cmdname(argv[0]), strerror(rc =  errno));
1035                 return jt_obd_list_ioctl(argc, argv);
1036         }
1037
1038         while (fgets(buf, sizeof(buf), fp) != NULL)
1039                 if (print_obd)
1040                         print_obd_line(buf);
1041                 else
1042                         printf("%s", buf);
1043
1044         fclose(fp);
1045         return 0;
1046 }
1047
1048 /* Create one or more objects, arg[4] may describe stripe meta-data.  If
1049  * not, defaults assumed.  This echo-client instance stashes the stripe
1050  * object ids.  Use get_stripe on this node to print full lsm and
1051  * set_stripe on another node to cut/paste between nodes.
1052  */
1053 /* create <count> [<file_create_mode>] [q|v|# verbosity] [striping] */
1054 int jt_obd_create(int argc, char **argv)
1055 {
1056         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
1057         struct obd_ioctl_data data;
1058         struct timeval next_time;
1059         __u64 count = 1, next_count, base_id = 0;
1060         int verbose = 1, mode = 0100644, rc = 0, i, valid_lsm = 0;
1061         char *end;
1062
1063         memset(&data, 0x00, sizeof(data));
1064         data.ioc_dev = cur_device;
1065         if (argc < 2 || argc > 5)
1066                 return CMD_HELP;
1067
1068         count = strtoull(argv[1], &end, 0);
1069         if (*end) {
1070                 fprintf(stderr, "error: %s: invalid iteration count '%s'\n",
1071                         jt_cmdname(argv[0]), argv[1]);
1072                 return CMD_HELP;
1073         }
1074
1075         if (argc > 2) {
1076                 mode = strtoul(argv[2], &end, 0);
1077                 if (*end) {
1078                         fprintf(stderr, "error: %s: invalid mode '%s'\n",
1079                                 jt_cmdname(argv[0]), argv[2]);
1080                         return CMD_HELP;
1081                 }
1082                 if (!(mode & S_IFMT))
1083                         mode |= S_IFREG;
1084         }
1085
1086         if (argc > 3) {
1087                 verbose = get_verbose(argv[0], argv[3]);
1088                 if (verbose == BAD_VERBOSE)
1089                         return CMD_HELP;
1090         }
1091
1092         if (argc < 5)
1093                 reset_lsmb (&lsm_buffer);       /* will set default */
1094         else {
1095                 rc = parse_lsm (&lsm_buffer, argv[4]);
1096                 if (rc != 0) {
1097                         fprintf(stderr, "error: %s: invalid lsm '%s'\n",
1098                                 jt_cmdname(argv[0]), argv[4]);
1099                         return CMD_HELP;
1100                 }
1101                 base_id = lsm_buffer.lsm.lsm_object_id;
1102                 valid_lsm = 1;
1103         }
1104
1105         printf("%s: "LPD64" objects\n", jt_cmdname(argv[0]), count);
1106         gettimeofday(&next_time, NULL);
1107         next_time.tv_sec -= verbose;
1108
1109         for (i = 1, next_count = verbose; i <= count && shmem_running(); i++) {
1110                 data.ioc_obdo1.o_mode = mode;
1111                 data.ioc_obdo1.o_id = base_id;
1112                 data.ioc_obdo1.o_uid = 0;
1113                 data.ioc_obdo1.o_gid = 0;
1114                 data.ioc_obdo1.o_valid = OBD_MD_FLTYPE | OBD_MD_FLMODE |
1115                         OBD_MD_FLID | OBD_MD_FLUID | OBD_MD_FLGID;
1116
1117                 if (valid_lsm) {
1118                         data.ioc_plen1 = sizeof lsm_buffer;
1119                         data.ioc_pbuf1 = (char *)&lsm_buffer;
1120                 }
1121
1122                 memset(buf, 0, sizeof(rawbuf));
1123                 rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
1124                 if (rc) {
1125                         fprintf(stderr, "error: %s: invalid ioctl\n",
1126                                 jt_cmdname(argv[0]));
1127                         return rc;
1128                 }
1129                 rc = l2_ioctl(OBD_DEV_ID, OBD_IOC_CREATE, buf);
1130                 obd_ioctl_unpack(&data, buf, sizeof(rawbuf));
1131                 shmem_bump();
1132                 if (rc < 0) {
1133                         fprintf(stderr, "error: %s: #%d - %s\n",
1134                                 jt_cmdname(argv[0]), i, strerror(rc = errno));
1135                         break;
1136                 }
1137                 if (!(data.ioc_obdo1.o_valid & OBD_MD_FLID)) {
1138                         fprintf(stderr,"error: %s: oid not valid #%d:"LPX64"\n",
1139                                 jt_cmdname(argv[0]), i, data.ioc_obdo1.o_valid);
1140                         rc = EINVAL;
1141                         break;
1142                 }
1143
1144                 if (be_verbose(verbose, &next_time, i, &next_count, count))
1145                         printf("%s: #%d is object id "LPX64"\n",
1146                                 jt_cmdname(argv[0]), i, data.ioc_obdo1.o_id);
1147         }
1148         return rc;
1149 }
1150
1151 int jt_obd_setattr(int argc, char **argv)
1152 {
1153         struct obd_ioctl_data data;
1154         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
1155         char *end;
1156         int rc;
1157
1158         memset(&data, 0x00, sizeof(data));
1159         data.ioc_dev = cur_device;
1160         if (argc != 2)
1161                 return CMD_HELP;
1162
1163         data.ioc_obdo1.o_id = strtoull(argv[1], &end, 0);
1164         if (*end) {
1165                 fprintf(stderr, "error: %s: invalid objid '%s'\n",
1166                         jt_cmdname(argv[0]), argv[1]);
1167                 return CMD_HELP;
1168         }
1169         data.ioc_obdo1.o_mode = S_IFREG | strtoul(argv[2], &end, 0);
1170         if (*end) {
1171                 fprintf(stderr, "error: %s: invalid mode '%s'\n",
1172                         jt_cmdname(argv[0]), argv[2]);
1173                 return CMD_HELP;
1174         }
1175         data.ioc_obdo1.o_valid = OBD_MD_FLID | OBD_MD_FLTYPE | OBD_MD_FLMODE;
1176
1177         memset(buf, 0, sizeof(rawbuf));
1178         rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
1179         if (rc) {
1180                 fprintf(stderr, "error: %s: invalid ioctl\n",
1181                         jt_cmdname(argv[0]));
1182                 return rc;
1183         }
1184         rc = l2_ioctl(OBD_DEV_ID, OBD_IOC_SETATTR, buf);
1185         if (rc < 0)
1186                 fprintf(stderr, "error: %s: %s\n", jt_cmdname(argv[0]),
1187                         strerror(rc = errno));
1188
1189         return rc;
1190 }
1191
1192 int jt_obd_test_setattr(int argc, char **argv)
1193 {
1194         struct obd_ioctl_data data;
1195         struct timeval start, next_time;
1196         __u64 i, count, next_count;
1197         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
1198         int verbose = 1;
1199         obd_id objid = 3;
1200         char *end;
1201         int rc = 0;
1202
1203         if (argc < 2 || argc > 4)
1204                 return CMD_HELP;
1205
1206         memset(&data, 0x00, sizeof(data));
1207         data.ioc_dev = cur_device;
1208         count = strtoull(argv[1], &end, 0);
1209         if (*end) {
1210                 fprintf(stderr, "error: %s: invalid iteration count '%s'\n",
1211                         jt_cmdname(argv[0]), argv[1]);
1212                 return CMD_HELP;
1213         }
1214
1215         if (argc >= 3) {
1216                 verbose = get_verbose(argv[0], argv[2]);
1217                 if (verbose == BAD_VERBOSE)
1218                         return CMD_HELP;
1219         }
1220
1221         if (argc >= 4) {
1222                 if (argv[3][0] == 't') {
1223                         objid = strtoull(argv[3] + 1, &end, 0);
1224                         if (thread)
1225                                 objid += thread - 1;
1226                 } else
1227                         objid = strtoull(argv[3], &end, 0);
1228                 if (*end) {
1229                         fprintf(stderr, "error: %s: invalid objid '%s'\n",
1230                                 jt_cmdname(argv[0]), argv[3]);
1231                         return CMD_HELP;
1232                 }
1233         }
1234
1235         gettimeofday(&start, NULL);
1236         next_time.tv_sec = start.tv_sec - verbose;
1237         next_time.tv_usec = start.tv_usec;
1238         if (verbose != 0)
1239                 printf("%s: setting "LPD64" attrs (objid "LPX64"): %s",
1240                        jt_cmdname(argv[0]), count, objid, ctime(&start.tv_sec));
1241
1242         for (i = 1, next_count = verbose; i <= count && shmem_running(); i++) {
1243                 data.ioc_obdo1.o_id = objid;
1244                 data.ioc_obdo1.o_mode = S_IFREG;
1245                 data.ioc_obdo1.o_valid = OBD_MD_FLID | OBD_MD_FLTYPE | OBD_MD_FLMODE;
1246                 memset(buf, 0x00, sizeof(rawbuf));
1247                 rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
1248                 if (rc) {
1249                         fprintf(stderr, "error: %s: invalid ioctl\n",
1250                                 jt_cmdname(argv[0]));
1251                         return rc;
1252                 }
1253                 rc = l2_ioctl(OBD_DEV_ID, OBD_IOC_SETATTR, &data);
1254                 shmem_bump();
1255                 if (rc < 0) {
1256                         fprintf(stderr, "error: %s: #"LPD64" - %d:%s\n",
1257                                 jt_cmdname(argv[0]), i, errno, strerror(rc = errno));
1258                         break;
1259                 } else {
1260                         if (be_verbose
1261                             (verbose, &next_time, i, &next_count, count))
1262                                 printf("%s: set attr #"LPD64"\n",
1263                                        jt_cmdname(argv[0]), i);
1264                 }
1265         }
1266
1267         if (!rc) {
1268                 struct timeval end;
1269                 double diff;
1270
1271                 gettimeofday(&end, NULL);
1272
1273                 diff = difftime(&end, &start);
1274
1275                 --i;
1276                 if (verbose != 0)
1277                         printf("%s: "LPD64" attrs in %.3fs (%.3f attr/s): %s",
1278                                jt_cmdname(argv[0]), i, diff, i / diff,
1279                                ctime(&end.tv_sec));
1280         }
1281         return rc;
1282 }
1283
1284 int jt_obd_destroy(int argc, char **argv)
1285 {
1286         struct obd_ioctl_data data;
1287         struct timeval next_time;
1288         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
1289         __u64 count = 1, next_count;
1290         int verbose = 1;
1291         __u64 id;
1292         char *end;
1293         int rc = 0, i;
1294
1295         memset(&data, 0x00, sizeof(data));
1296         data.ioc_dev = cur_device;
1297         if (argc < 2 || argc > 4)
1298                 return CMD_HELP;
1299
1300         id = strtoull(argv[1], &end, 0);
1301         if (*end || id == 0 || errno != 0) {
1302                 fprintf(stderr, "error: %s: invalid objid '%s'\n",
1303                         jt_cmdname(argv[0]), argv[1]);
1304                 return CMD_HELP;
1305         }
1306         if (argc > 2) {
1307                 count = strtoull(argv[2], &end, 0);
1308                 if (*end) {
1309                         fprintf(stderr,
1310                                 "error: %s: invalid iteration count '%s'\n",
1311                                 jt_cmdname(argv[0]), argv[2]);
1312                         return CMD_HELP;
1313                 }
1314         }
1315
1316         if (argc > 3) {
1317                 verbose = get_verbose(argv[0], argv[3]);
1318                 if (verbose == BAD_VERBOSE)
1319                         return CMD_HELP;
1320         }
1321
1322         printf("%s: "LPD64" objects\n", jt_cmdname(argv[0]), count);
1323         gettimeofday(&next_time, NULL);
1324         next_time.tv_sec -= verbose;
1325
1326         for (i = 1, next_count = verbose; i <= count && shmem_running(); i++, id++) {
1327                 data.ioc_obdo1.o_id = id;
1328                 data.ioc_obdo1.o_mode = S_IFREG | 0644;
1329                 data.ioc_obdo1.o_valid = OBD_MD_FLID | OBD_MD_FLMODE;
1330
1331                 memset(buf, 0, sizeof(rawbuf));
1332                 rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
1333                 if (rc) {
1334                         fprintf(stderr, "error: %s: invalid ioctl\n",
1335                                 jt_cmdname(argv[0]));
1336                         return rc;
1337                 }
1338                 rc = l2_ioctl(OBD_DEV_ID, OBD_IOC_DESTROY, buf);
1339                 obd_ioctl_unpack(&data, buf, sizeof(rawbuf));
1340                 shmem_bump();
1341                 if (rc < 0) {
1342                         fprintf(stderr, "error: %s: objid "LPX64": %s\n",
1343                                 jt_cmdname(argv[0]), id, strerror(rc = errno));
1344                         break;
1345                 }
1346
1347                 if (be_verbose(verbose, &next_time, i, &next_count, count))
1348                         printf("%s: #%d is object id "LPX64"\n",
1349                                jt_cmdname(argv[0]), i, id);
1350         }
1351
1352         return rc;
1353 }
1354
1355 int jt_obd_getattr(int argc, char **argv)
1356 {
1357         struct obd_ioctl_data data;
1358         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
1359         char *end;
1360         int rc;
1361
1362         if (argc != 2)
1363                 return CMD_HELP;
1364
1365         memset(&data, 0x00, sizeof(data));
1366         data.ioc_dev = cur_device;
1367         data.ioc_obdo1.o_id = strtoull(argv[1], &end, 0);
1368         if (*end) {
1369                 fprintf(stderr, "error: %s: invalid objid '%s'\n",
1370                         jt_cmdname(argv[0]), argv[1]);
1371                 return CMD_HELP;
1372         }
1373         /* to help obd filter */
1374         data.ioc_obdo1.o_mode = 0100644;
1375         data.ioc_obdo1.o_valid = 0xffffffff;
1376         printf("%s: object id "LPX64"\n", jt_cmdname(argv[0]),data.ioc_obdo1.o_id);
1377
1378         memset(buf, 0, sizeof(rawbuf));
1379         rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
1380         if (rc) {
1381                 fprintf(stderr, "error: %s: invalid ioctl\n",
1382                         jt_cmdname(argv[0]));
1383                 return rc;
1384         }
1385         rc = l2_ioctl(OBD_DEV_ID, OBD_IOC_GETATTR, buf);
1386         obd_ioctl_unpack(&data, buf, sizeof(rawbuf));
1387         if (rc) {
1388                 fprintf(stderr, "error: %s: %s\n", jt_cmdname(argv[0]),
1389                         strerror(rc = errno));
1390         } else {
1391                 printf("%s: object id "LPX64", mode %o\n", jt_cmdname(argv[0]),
1392                        data.ioc_obdo1.o_id, data.ioc_obdo1.o_mode);
1393         }
1394         return rc;
1395 }
1396
1397 int jt_obd_test_getattr(int argc, char **argv)
1398 {
1399         struct obd_ioctl_data data;
1400         struct timeval start, next_time;
1401         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
1402         __u64 i, count, next_count;
1403         int verbose = 1;
1404         obd_id objid = 3;
1405         char *end;
1406         int rc = 0;
1407
1408         if (argc < 2 || argc > 4)
1409                 return CMD_HELP;
1410
1411         memset(&data, 0x00, sizeof(data));
1412         data.ioc_dev = cur_device;
1413         count = strtoull(argv[1], &end, 0);
1414         if (*end) {
1415                 fprintf(stderr, "error: %s: invalid iteration count '%s'\n",
1416                         jt_cmdname(argv[0]), argv[1]);
1417                 return CMD_HELP;
1418         }
1419
1420         if (argc >= 3) {
1421                 verbose = get_verbose(argv[0], argv[2]);
1422                 if (verbose == BAD_VERBOSE)
1423                         return CMD_HELP;
1424         }
1425
1426         if (argc >= 4) {
1427                 if (argv[3][0] == 't') {
1428                         objid = strtoull(argv[3] + 1, &end, 0);
1429                         if (thread)
1430                                 objid += thread - 1;
1431                 } else
1432                         objid = strtoull(argv[3], &end, 0);
1433                 if (*end) {
1434                         fprintf(stderr, "error: %s: invalid objid '%s'\n",
1435                                 jt_cmdname(argv[0]), argv[3]);
1436                         return CMD_HELP;
1437                 }
1438         }
1439
1440         gettimeofday(&start, NULL);
1441         next_time.tv_sec = start.tv_sec - verbose;
1442         next_time.tv_usec = start.tv_usec;
1443         if (verbose != 0)
1444                 printf("%s: getting "LPD64" attrs (objid "LPX64"): %s",
1445                        jt_cmdname(argv[0]), count, objid, ctime(&start.tv_sec));
1446
1447         for (i = 1, next_count = verbose; i <= count && shmem_running(); i++) {
1448                 data.ioc_obdo1.o_id = objid;
1449                 data.ioc_obdo1.o_mode = S_IFREG;
1450                 data.ioc_obdo1.o_valid = 0xffffffff;
1451                 memset(buf, 0x00, sizeof(rawbuf));
1452                 rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
1453                 if (rc) {
1454                         fprintf(stderr, "error: %s: invalid ioctl\n",
1455                                 jt_cmdname(argv[0]));
1456                         return rc;
1457                 }
1458                 rc = l2_ioctl(OBD_DEV_ID, OBD_IOC_GETATTR, &data);
1459                 shmem_bump();
1460                 if (rc < 0) {
1461                         fprintf(stderr, "error: %s: #"LPD64" - %d:%s\n",
1462                                 jt_cmdname(argv[0]), i, errno, strerror(rc = errno));
1463                         break;
1464                 } else {
1465                         if (be_verbose
1466                             (verbose, &next_time, i, &next_count, count))
1467                                 printf("%s: got attr #"LPD64"\n",
1468                                        jt_cmdname(argv[0]), i);
1469                 }
1470         }
1471
1472         if (!rc) {
1473                 struct timeval end;
1474                 double diff;
1475
1476                 gettimeofday(&end, NULL);
1477
1478                 diff = difftime(&end, &start);
1479
1480                 --i;
1481                 if (verbose != 0)
1482                         printf("%s: "LPD64" attrs in %.3fs (%.3f attr/s): %s",
1483                                jt_cmdname(argv[0]), i, diff, i / diff,
1484                                ctime(&end.tv_sec));
1485         }
1486         return rc;
1487 }
1488
1489 /* test_brw <cnt>                                               count
1490         <r|w[r(repeat)x(noverify)]>                             mode
1491         <q|v|#(print interval)>                                 verbosity
1492         <npages[+offset]>                                       blocksize
1493         <[[<interleave_threads>]t(inc obj by thread#)]obj>      object
1494         [p|g<args>]                                             batch */
1495 int jt_obd_test_brw(int argc, char **argv)
1496 {
1497         struct obd_ioctl_data data;
1498         struct timeval start, next_time;
1499         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
1500         __u64 count, next_count, len, stride, thr_offset = 0, objid = 3;
1501         int write = 0, verbose = 1, cmd, i, rc = 0, pages = 1;
1502         int offset_pages = 0;
1503         long n;
1504         int repeat_offset = 0;
1505         unsigned long long ull;
1506         int  nthr_per_obj = 0;
1507         int  verify = 1;
1508         int  obj_idx = 0;
1509         char *end;
1510
1511         if (argc < 2 || argc > 7) {
1512                 fprintf(stderr, "error: %s: bad number of arguments: %d\n",
1513                         jt_cmdname(argv[0]), argc);
1514                 return CMD_HELP;
1515         }
1516
1517         count = strtoull(argv[1], &end, 0);
1518         if (*end) {
1519                 fprintf(stderr, "error: %s: bad iteration count '%s'\n",
1520                         jt_cmdname(argv[0]), argv[1]);
1521                 return CMD_HELP;
1522         }
1523
1524         if (argc >= 3) {
1525                 if (argv[2][0] == 'w' || argv[2][0] == '1')
1526                         write = 1;
1527                 /* else it's a read */
1528
1529                 if (argv[2][0] != 0)
1530                         for (i = 1; argv[2][i] != 0; i++)
1531                                 switch (argv[2][i]) {
1532                                 case 'r':
1533                                         repeat_offset = 1;
1534                                         break;
1535
1536                                 case 'x':
1537                                         verify = 0;
1538                                         break;
1539
1540                                 default:
1541                                         fprintf (stderr, "Can't parse cmd '%s'\n",
1542                                                  argv[2]);
1543                                         return CMD_HELP;
1544                                 }
1545         }
1546
1547         if (argc >= 4) {
1548                 verbose = get_verbose(argv[0], argv[3]);
1549                 if (verbose == BAD_VERBOSE)
1550                         return CMD_HELP;
1551         }
1552
1553         if (argc >= 5) {
1554                 pages = strtoul(argv[4], &end, 0);
1555
1556                 if (*end == '+')
1557                         offset_pages = strtoul(end + 1, &end, 0);
1558
1559                 if (*end != 0 ||
1560                     offset_pages < 0 || offset_pages >= pages) {
1561                         fprintf(stderr, "error: %s: bad npages[+offset] parameter '%s'\n",
1562                                 jt_cmdname(argv[0]), argv[4]);
1563                         return CMD_HELP;
1564                 }
1565         }
1566
1567         if (argc >= 6) {
1568                 if (thread &&
1569                     (n = strtol(argv[5], &end, 0)) > 0 &&
1570                     *end == 't' &&
1571                     (ull = strtoull(end + 1, &end, 0)) > 0 &&
1572                     *end == 0) {
1573                         nthr_per_obj = n;
1574                         objid = ull;
1575                 } else if (thread &&
1576                            argv[5][0] == 't') {
1577                         nthr_per_obj = 1;
1578                         objid = strtoull(argv[5] + 1, &end, 0);
1579                 } else {
1580                         nthr_per_obj = 0;
1581                         objid = strtoull(argv[5], &end, 0);
1582                 }
1583                 if (*end) {
1584                         fprintf(stderr, "error: %s: bad objid '%s'\n",
1585                                 jt_cmdname(argv[0]), argv[5]);
1586                         return CMD_HELP;
1587                 }
1588         }
1589
1590         memset(&data, 0x00, sizeof(data));
1591         data.ioc_dev = cur_device;
1592
1593         /* communicate the 'type' of brw test and batching to echo_client.
1594          * don't start.  we'd love to refactor this lctl->echo_client
1595          * interface */
1596         data.ioc_pbuf1 = (void *)1;
1597         data.ioc_plen1 = 1;
1598
1599         if (argc >= 7) {
1600                 switch(argv[6][0]) {
1601                         case 'g': /* plug and unplug */
1602                                 data.ioc_pbuf1 = (void *)2;
1603                                 data.ioc_plen1 = strtoull(argv[6] + 1, &end,
1604                                                           0);
1605                                 break;
1606                         case 'p': /* prep and commit */
1607                                 data.ioc_pbuf1 = (void *)3;
1608                                 data.ioc_plen1 = strtoull(argv[6] + 1, &end,
1609                                                           0);
1610                                 break;
1611                         default:
1612                                 fprintf(stderr, "error: %s: batching '%s' "
1613                                         "needs to specify 'p' or 'g'\n",
1614                                         jt_cmdname(argv[0]), argv[6]);
1615                                 return CMD_HELP;
1616                 }
1617
1618                 if (*end) {
1619                         fprintf(stderr, "error: %s: bad batching '%s'\n",
1620                                 jt_cmdname(argv[0]), argv[6]);
1621                         return CMD_HELP;
1622                 }
1623                 data.ioc_plen1 *= getpagesize();
1624         }
1625
1626         len = pages * getpagesize();
1627         thr_offset = offset_pages * getpagesize();
1628         stride = len;
1629
1630 #ifdef MAX_THREADS
1631         if (thread) {
1632                 shmem_lock ();
1633                 if (nthr_per_obj != 0) {
1634                         /* threads interleave */
1635                         obj_idx = (thread - 1)/nthr_per_obj;
1636                         objid += obj_idx;
1637                         stride *= nthr_per_obj;
1638                         if (thread == 1)
1639                                 shared_data->offsets[obj_idx] = stride + thr_offset;
1640                         thr_offset += ((thread - 1) % nthr_per_obj) * len;
1641                 } else {
1642                         /* threads disjoint */
1643                         thr_offset += (thread - 1) * len;
1644                 }
1645
1646                 shared_data->barrier--;
1647                 if (shared_data->barrier == 0)
1648                         l_cond_broadcast(&shared_data->cond);
1649                 else
1650                         l_cond_wait(&shared_data->cond,
1651                                           &shared_data->mutex);
1652
1653                 shmem_unlock ();
1654         }
1655 #endif
1656
1657         data.ioc_obdo1.o_id = objid;
1658         data.ioc_obdo1.o_mode = S_IFREG;
1659         data.ioc_obdo1.o_valid = OBD_MD_FLID | OBD_MD_FLTYPE | OBD_MD_FLMODE | OBD_MD_FLFLAGS;
1660         data.ioc_obdo1.o_flags = (verify ? OBD_FL_DEBUG_CHECK : 0);
1661         data.ioc_count = len;
1662         data.ioc_offset = (repeat_offset ? 0 : thr_offset);
1663
1664         gettimeofday(&start, NULL);
1665         next_time.tv_sec = start.tv_sec - verbose;
1666         next_time.tv_usec = start.tv_usec;
1667
1668         if (verbose != 0)
1669                 printf("%s: %s "LPU64"x%d pages (obj "LPX64", off "LPU64"): %s",
1670                        jt_cmdname(argv[0]), write ? "writing" : "reading", count,
1671                        pages, objid, data.ioc_offset, ctime(&start.tv_sec));
1672
1673         cmd = write ? OBD_IOC_BRW_WRITE : OBD_IOC_BRW_READ;
1674         for (i = 1, next_count = verbose; i <= count && shmem_running(); i++) {
1675                 data.ioc_obdo1.o_valid &= ~(OBD_MD_FLBLOCKS|OBD_MD_FLGRANT);
1676                 memset(buf, 0x00, sizeof(rawbuf));
1677                 rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
1678                 if (rc) {
1679                         fprintf(stderr, "error: %s: invalid ioctl\n",
1680                                 jt_cmdname(argv[0]));
1681                         return rc;
1682                 }
1683                 rc = l2_ioctl(OBD_DEV_ID, cmd, buf);
1684                 shmem_bump();
1685                 if (rc) {
1686                         fprintf(stderr, "error: %s: #%d - %s on %s\n",
1687                                 jt_cmdname(argv[0]), i, strerror(rc = errno),
1688                                 write ? "write" : "read");
1689                         break;
1690                 } else if (be_verbose(verbose, &next_time,i, &next_count,count)) {
1691                         shmem_lock ();
1692                         printf("%s: %s number %d @ "LPD64":"LPU64" for %d\n",
1693                                jt_cmdname(argv[0]), write ? "write" : "read", i,
1694                                data.ioc_obdo1.o_id, data.ioc_offset,
1695                                (int)(pages * getpagesize()));
1696                         shmem_unlock ();
1697                 }
1698
1699                 if (!repeat_offset) {
1700 #ifdef MAX_THREADS
1701                         if (stride == len) {
1702                                 data.ioc_offset += stride;
1703                         } else if (i < count) {
1704                                 shmem_lock ();
1705                                 data.ioc_offset = shared_data->offsets[obj_idx];
1706                                 shared_data->offsets[obj_idx] += len;
1707                                 shmem_unlock ();
1708                         }
1709 #else
1710                         data.ioc_offset += len;
1711                         obj_idx = 0; /* avoids an unused var warning */
1712 #endif
1713                 }
1714         }
1715
1716         if (!rc) {
1717                 struct timeval end;
1718                 double diff;
1719
1720                 gettimeofday(&end, NULL);
1721
1722                 diff = difftime(&end, &start);
1723
1724                 --i;
1725                 if (verbose != 0)
1726                         printf("%s: %s %dx%d pages in %.3fs (%.3f MB/s): %s",
1727                                jt_cmdname(argv[0]), write ? "wrote" : "read",
1728                                i, pages, diff,
1729                                ((double)i * pages * getpagesize()) /
1730                                (diff * 1048576.0),
1731                                ctime(&end.tv_sec));
1732         }
1733
1734         return rc;
1735 }
1736
1737 int jt_obd_lov_getconfig(int argc, char **argv)
1738 {
1739         struct obd_ioctl_data data;
1740         struct lov_desc desc;
1741         struct obd_uuid *uuidarray;
1742         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
1743         __u32 *obdgens;
1744         char *path;
1745         int rc, fd;
1746
1747         memset(&data, 0x00, sizeof(data));
1748         data.ioc_dev = cur_device;
1749
1750         if (argc != 2)
1751                 return CMD_HELP;
1752
1753         path = argv[1];
1754         fd = open(path, O_RDONLY);
1755         if (fd < 0) {
1756                 fprintf(stderr, "open \"%s\" failed: %s\n", path,
1757                         strerror(errno));
1758                 return -errno;
1759         }
1760
1761         memset(&desc, 0, sizeof(desc));
1762         obd_str2uuid(&desc.ld_uuid, argv[1]);
1763         desc.ld_tgt_count = ((OBD_MAX_IOCTL_BUFFER-sizeof(data)-sizeof(desc)) /
1764                              (sizeof(*uuidarray) + sizeof(*obdgens)));
1765
1766 repeat:
1767         uuidarray = calloc(desc.ld_tgt_count, sizeof(*uuidarray));
1768         if (!uuidarray) {
1769                 fprintf(stderr, "error: %s: no memory for %d uuid's\n",
1770                         jt_cmdname(argv[0]), desc.ld_tgt_count);
1771                 rc = -ENOMEM;
1772                 goto out;
1773         }
1774         obdgens = calloc(desc.ld_tgt_count, sizeof(*obdgens));
1775         if (!obdgens) {
1776                 fprintf(stderr, "error: %s: no memory for %d generation #'s\n",
1777                         jt_cmdname(argv[0]), desc.ld_tgt_count);
1778                 rc = -ENOMEM;
1779                 goto out_uuidarray;
1780         }
1781
1782         memset(buf, 0x00, sizeof(rawbuf));
1783         data.ioc_inllen1 = sizeof(desc);
1784         data.ioc_inlbuf1 = (char *)&desc;
1785         data.ioc_inllen2 = desc.ld_tgt_count * sizeof(*uuidarray);
1786         data.ioc_inlbuf2 = (char *)uuidarray;
1787         data.ioc_inllen3 = desc.ld_tgt_count * sizeof(*obdgens);
1788         data.ioc_inlbuf3 = (char *)obdgens;
1789
1790         if (obd_ioctl_pack(&data, &buf, sizeof(rawbuf))) {
1791                 fprintf(stderr, "error: %s: invalid ioctl\n",
1792                         jt_cmdname(argv[0]));
1793                 rc = -EINVAL;
1794                 goto out_obdgens;
1795         }
1796         rc = ioctl(fd, OBD_IOC_LOV_GET_CONFIG, buf);
1797         if (rc == -ENOSPC) {
1798                 free(uuidarray);
1799                 free(obdgens);
1800                 goto repeat;
1801         } else if (rc) {
1802                 fprintf(stderr, "error: %s: ioctl error: %s\n",
1803                         jt_cmdname(argv[0]), strerror(rc = errno));
1804         } else {
1805                 struct obd_uuid *uuidp;
1806                 __u32 *genp;
1807                 int i;
1808
1809                 if (obd_ioctl_unpack(&data, buf, sizeof(rawbuf))) {
1810                         fprintf(stderr, "error: %s: invalid reply\n",
1811                                 jt_cmdname(argv[0]));
1812                         rc = -EINVAL;
1813                         goto out;
1814                 }
1815                 if (desc.ld_default_stripe_count == (__u32)-1)
1816                         printf("default_stripe_count: %d\n", -1);
1817                 else
1818                         printf("default_stripe_count: %u\n",
1819                                desc.ld_default_stripe_count);
1820                 printf("default_stripe_size: "LPU64"\n",
1821                        desc.ld_default_stripe_size);
1822                 printf("default_stripe_offset: "LPU64"\n",
1823                        desc.ld_default_stripe_offset);
1824                 printf("default_stripe_pattern: %u\n", desc.ld_pattern);
1825                 printf("obd_count: %u\n", desc.ld_tgt_count);
1826                 printf("OBDS:\tobdidx\t\tobdgen\t\t obduuid\n");
1827                 uuidp = uuidarray;
1828                 genp = obdgens;
1829                 for (i = 0; i < desc.ld_tgt_count; i++, uuidp++, genp++)
1830                         printf("\t%6u\t%14u\t\t %s\n", i, *genp, (char *)uuidp);
1831         }
1832 out_obdgens:
1833         free(obdgens);
1834 out_uuidarray:
1835         free(uuidarray);
1836 out:
1837         close(fd);
1838         return rc;
1839 }
1840
1841 int jt_obd_ldlm_regress_start(int argc, char **argv)
1842 {
1843         int rc;
1844         struct obd_ioctl_data data;
1845         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
1846         char argstring[200];
1847         int i, count = sizeof(argstring) - 1;
1848
1849         memset(&data, 0x00, sizeof(data));
1850         data.ioc_dev = cur_device;
1851         if (argc > 5)
1852                 return CMD_HELP;
1853
1854         argstring[0] = '\0';
1855         for (i = 1; i < argc; i++) {
1856                 strncat(argstring, " ", count);
1857                 count--;
1858                 strncat(argstring, argv[i], count);
1859                 count -= strlen(argv[i]);
1860         }
1861
1862         if (strlen(argstring)) {
1863                 data.ioc_inlbuf1 = argstring;
1864                 data.ioc_inllen1 = strlen(argstring) + 1;
1865         }
1866
1867         memset(buf, 0, sizeof(rawbuf));
1868         rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
1869         if (rc) {
1870                 fprintf(stderr, "error: %s: invalid ioctl\n",
1871                         jt_cmdname(argv[0]));
1872                 return rc;
1873         }
1874         rc = l2_ioctl(OBD_DEV_ID, IOC_LDLM_REGRESS_START, buf);
1875         if (rc)
1876                 fprintf(stderr, "error: %s: test failed: %s\n",
1877                         jt_cmdname(argv[0]), strerror(rc = errno));
1878
1879         return rc;
1880 }
1881
1882 int jt_obd_ldlm_regress_stop(int argc, char **argv)
1883 {
1884         int rc;
1885         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
1886         struct obd_ioctl_data data;
1887
1888         memset(&data, 0x00, sizeof(data));
1889         data.ioc_dev = cur_device;
1890
1891         if (argc != 1)
1892                 return CMD_HELP;
1893
1894         memset(buf, 0, sizeof(rawbuf));
1895         rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
1896         if (rc) {
1897                 fprintf(stderr, "error: %s: invalid ioctl\n",
1898                         jt_cmdname(argv[0]));
1899                 return rc;
1900         }
1901         rc = l2_ioctl(OBD_DEV_ID, IOC_LDLM_REGRESS_STOP, buf);
1902
1903         if (rc)
1904                 fprintf(stderr, "error: %s: test failed: %s\n",
1905                         jt_cmdname(argv[0]), strerror(rc = errno));
1906         return rc;
1907 }
1908
1909 static int do_activate(int argc, char **argv, int flag)
1910 {
1911         struct obd_ioctl_data data;
1912         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
1913         int rc;
1914
1915         memset(&data, 0x00, sizeof(data));
1916         data.ioc_dev = cur_device;
1917         if (argc != 1)
1918                 return CMD_HELP;
1919
1920         /* reuse offset for 'active' */
1921         data.ioc_offset = flag;
1922
1923         memset(buf, 0, sizeof(rawbuf));
1924         rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
1925         if (rc) {
1926                 fprintf(stderr, "error: %s: invalid ioctl\n",
1927                         jt_cmdname(argv[0]));
1928                 return rc;
1929         }
1930         rc = l2_ioctl(OBD_DEV_ID, IOC_OSC_SET_ACTIVE, buf);
1931         if (rc)
1932                 fprintf(stderr, "error: %s: failed: %s\n",
1933                         jt_cmdname(argv[0]), strerror(rc = errno));
1934
1935         return rc;
1936 }
1937
1938 int jt_obd_deactivate(int argc, char **argv)
1939 {
1940         return do_activate(argc, argv, 0);
1941 }
1942
1943 int jt_obd_activate(int argc, char **argv)
1944 {
1945         return do_activate(argc, argv, 1);
1946 }
1947
1948 int jt_obd_recover(int argc, char **argv)
1949 {
1950         int rc;
1951         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
1952         struct obd_ioctl_data data;
1953
1954         memset(&data, 0x00, sizeof(data));
1955         data.ioc_dev = cur_device;
1956         if (argc > 2)
1957                 return CMD_HELP;
1958
1959         if (argc == 2) {
1960                 data.ioc_inllen1 = strlen(argv[1]) + 1;
1961                 data.ioc_inlbuf1 = argv[1];
1962         }
1963
1964         memset(buf, 0, sizeof(rawbuf));
1965         rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
1966         if (rc) {
1967                 fprintf(stderr, "error: %s: invalid ioctl\n",
1968                         jt_cmdname(argv[0]));
1969                 return rc;
1970         }
1971         rc = l2_ioctl(OBD_DEV_ID, OBD_IOC_CLIENT_RECOVER, buf);
1972         if (rc < 0) {
1973                 fprintf(stderr, "error: %s: %s\n", jt_cmdname(argv[0]),
1974                         strerror(rc = errno));
1975         }
1976
1977         return rc;
1978 }
1979
1980 int jt_obd_mdc_lookup(int argc, char **argv)
1981 {
1982         struct obd_ioctl_data data;
1983         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
1984         char *parent, *child;
1985         int rc, fd, verbose = 1;
1986
1987         if (argc < 3 || argc > 4)
1988                 return CMD_HELP;
1989
1990         parent = argv[1];
1991         child = argv[2];
1992         if (argc == 4)
1993                 verbose = get_verbose(argv[0], argv[3]);
1994
1995         memset(&data, 0x00, sizeof(data));
1996         data.ioc_dev = cur_device;
1997
1998         data.ioc_inllen1 = strlen(child) + 1;
1999         data.ioc_inlbuf1 = child;
2000
2001         memset(buf, 0, sizeof(rawbuf));
2002         rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
2003         if (rc) {
2004                 fprintf(stderr, "error: %s: invalid ioctl\n",
2005                         jt_cmdname(argv[0]));
2006                 return rc;
2007         }
2008
2009         fd = open(parent, O_RDONLY);
2010         if (fd < 0) {
2011                 fprintf(stderr, "open \"%s\" failed: %s\n", parent,
2012                         strerror(errno));
2013                 return -1;
2014         }
2015
2016         rc = ioctl(fd, IOC_MDC_LOOKUP, buf);
2017         if (rc < 0) {
2018                 fprintf(stderr, "error: %s: ioctl error: %s\n",
2019                         jt_cmdname(argv[0]), strerror(rc = errno));
2020         }
2021         close(fd);
2022
2023         if (verbose) {
2024                 rc = obd_ioctl_unpack(&data, buf, sizeof(rawbuf));
2025                 if (rc) {
2026                         fprintf(stderr, "error: %s: invalid reply\n",
2027                                 jt_cmdname(argv[0]));
2028                         return rc;
2029                 }
2030                 printf("%s: mode %o uid %d gid %d\n", child,
2031                        data.ioc_obdo1.o_mode, data.ioc_obdo1.o_uid,
2032                        data.ioc_obdo1.o_gid);
2033         }
2034
2035         return rc;
2036 }
2037
2038 int jt_cfg_dump_log(int argc, char **argv)
2039 {
2040         struct obd_ioctl_data data;
2041         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
2042         int rc;
2043
2044         if (argc != 2)
2045                 return CMD_HELP;
2046
2047         memset(&data, 0x00, sizeof(data));
2048         data.ioc_dev = cur_device;
2049         data.ioc_inllen1 = strlen(argv[1]) + 1;
2050         data.ioc_inlbuf1 = argv[1];
2051
2052         memset(buf, 0, sizeof(rawbuf));
2053         rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
2054         if (rc) {
2055                 fprintf(stderr, "error: %s: invalid ioctl\n",
2056                         jt_cmdname(argv[0]));
2057                 return rc;
2058         }
2059         rc = l_ioctl(OBD_DEV_ID, OBD_IOC_DUMP_LOG, buf);
2060         if (rc < 0)
2061                 fprintf(stderr, "OBD_IOC_DUMP_LOG failed: %s\n",
2062                         strerror(errno));
2063
2064         return rc;
2065 }
2066
2067 int jt_llog_catlist(int argc, char **argv)
2068 {
2069         struct obd_ioctl_data data;
2070         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
2071         int rc;
2072
2073         if (argc != 1)
2074                 return CMD_HELP;
2075
2076         memset(&data, 0x00, sizeof(data));
2077         data.ioc_dev = cur_device;
2078         data.ioc_inllen1 = sizeof(rawbuf) - size_round(sizeof(data));
2079         memset(buf, 0, sizeof(rawbuf));
2080         rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
2081         if (rc) {
2082                 fprintf(stderr, "error: %s: invalid ioctl\n",
2083                         jt_cmdname(argv[0]));
2084                 return rc;
2085         }
2086         rc = l_ioctl(OBD_DEV_ID, OBD_IOC_CATLOGLIST, buf);
2087         if (rc == 0)
2088                 fprintf(stdout, "%s", ((struct obd_ioctl_data*)buf)->ioc_bulk);
2089         else
2090                 fprintf(stderr, "OBD_IOC_CATLOGLIST failed: %s\n",
2091                         strerror(errno));
2092
2093         return rc;
2094 }
2095
2096 int jt_llog_info(int argc, char **argv)
2097 {
2098         struct obd_ioctl_data data;
2099         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
2100         int rc;
2101
2102         if (argc != 2)
2103                 return CMD_HELP;
2104
2105         memset(&data, 0x00, sizeof(data));
2106         data.ioc_dev = cur_device;
2107         data.ioc_inllen1 = strlen(argv[1]) + 1;
2108         data.ioc_inlbuf1 = argv[1];
2109         data.ioc_inllen2 = sizeof(rawbuf) - size_round(sizeof(data)) -
2110                 size_round(data.ioc_inllen1);
2111         memset(buf, 0, sizeof(rawbuf));
2112         rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
2113         if (rc) {
2114                 fprintf(stderr, "error: %s: invalid ioctl\n",
2115                         jt_cmdname(argv[0]));
2116                 return rc;
2117         }
2118
2119         rc = l_ioctl(OBD_DEV_ID, OBD_IOC_LLOG_INFO, buf);
2120         if (rc == 0)
2121                 fprintf(stdout, "%s", ((struct obd_ioctl_data*)buf)->ioc_bulk);
2122         else
2123                 fprintf(stderr, "OBD_IOC_LLOG_INFO failed: %s\n",
2124                         strerror(errno));
2125
2126         return rc;
2127 }
2128
2129 int jt_llog_print(int argc, char **argv)
2130 {
2131         struct obd_ioctl_data data;
2132         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
2133         int rc;
2134
2135         if (argc != 2 && argc != 4)
2136                 return CMD_HELP;
2137
2138         memset(&data, 0x00, sizeof(data));
2139         data.ioc_dev = cur_device;
2140         data.ioc_inllen1 = strlen(argv[1]) + 1;
2141         data.ioc_inlbuf1 = argv[1];
2142         if (argc == 4) {
2143                 data.ioc_inllen2 = strlen(argv[2]) + 1;
2144                 data.ioc_inlbuf2 = argv[2];
2145                 data.ioc_inllen3 = strlen(argv[3]) + 1;
2146                 data.ioc_inlbuf3 = argv[3];
2147         } else {
2148                 char from[2] = "1", to[3] = "-1";
2149                 data.ioc_inllen2 = strlen(from) + 1;
2150                 data.ioc_inlbuf2 = from;
2151                 data.ioc_inllen3 = strlen(to) + 1;
2152                 data.ioc_inlbuf3 = to;
2153         }
2154         data.ioc_inllen4 = sizeof(rawbuf) - size_round(sizeof(data)) -
2155                 size_round(data.ioc_inllen1) -
2156                 size_round(data.ioc_inllen2) -
2157                 size_round(data.ioc_inllen3);
2158         memset(buf, 0, sizeof(rawbuf));
2159         rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
2160         if (rc) {
2161                 fprintf(stderr, "error: %s: invalid ioctl\n",
2162                         jt_cmdname(argv[0]));
2163                 return rc;
2164         }
2165
2166         rc = l_ioctl(OBD_DEV_ID, OBD_IOC_LLOG_PRINT, buf);
2167         if (rc == 0)
2168                 fprintf(stdout, "%s", ((struct obd_ioctl_data*)buf)->ioc_bulk);
2169         else
2170                 fprintf(stderr, "OBD_IOC_LLOG_PRINT failed: %s\n",
2171                         strerror(errno));
2172
2173         return rc;
2174 }
2175
2176 int jt_llog_cancel(int argc, char **argv)
2177 {
2178         struct obd_ioctl_data data;
2179         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
2180         int rc;
2181
2182         if (argc != 4)
2183                 return CMD_HELP;
2184
2185         memset(&data, 0x00, sizeof(data));
2186         data.ioc_dev = cur_device;
2187         data.ioc_inllen1 = strlen(argv[1]) + 1;
2188         data.ioc_inlbuf1 = argv[1];
2189         data.ioc_inllen2 = strlen(argv[2]) + 1;
2190         data.ioc_inlbuf2 = argv[2];
2191         data.ioc_inllen3 = strlen(argv[3]) + 1;
2192         data.ioc_inlbuf3 = argv[3];
2193         memset(buf, 0, sizeof(rawbuf));
2194         rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
2195         if (rc) {
2196                 fprintf(stderr, "error: %s: invalid ioctl\n",
2197                         jt_cmdname(argv[0]));
2198                 return rc;
2199         }
2200
2201         rc = l_ioctl(OBD_DEV_ID, OBD_IOC_LLOG_CANCEL, buf);
2202         if (rc == 0)
2203                 fprintf(stdout, "index %s be canceled.\n", argv[3]);
2204         else
2205                 fprintf(stderr, "OBD_IOC_LLOG_CANCEL failed: %s\n",
2206                         strerror(errno));
2207
2208         return rc;
2209
2210 }
2211 int jt_llog_check(int argc, char **argv)
2212 {
2213         struct obd_ioctl_data data;
2214         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
2215         int rc;
2216
2217         if (argc != 2 && argc != 4)
2218                 return CMD_HELP;
2219
2220         memset(&data, 0x00, sizeof(data));
2221         data.ioc_dev = cur_device;
2222         data.ioc_inllen1 = strlen(argv[1]) + 1;
2223         data.ioc_inlbuf1 = argv[1];
2224         if (argc == 4) {
2225                 data.ioc_inllen2 = strlen(argv[2]) + 1;
2226                 data.ioc_inlbuf2 = argv[2];
2227                 data.ioc_inllen3 = strlen(argv[3]) + 1;
2228                 data.ioc_inlbuf3 = argv[3];
2229         } else {
2230                 char from[2] = "1", to[3] = "-1";
2231                 data.ioc_inllen2 = strlen(from) + 1;
2232                 data.ioc_inlbuf2 = from;
2233                 data.ioc_inllen3 = strlen(to) + 1;
2234                 data.ioc_inlbuf3 = to;
2235         }
2236         data.ioc_inllen4 = sizeof(rawbuf) - size_round(sizeof(data)) -
2237                 size_round(data.ioc_inllen1) -
2238                 size_round(data.ioc_inllen2) -
2239                 size_round(data.ioc_inllen3);
2240         memset(buf, 0, sizeof(rawbuf));
2241         rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
2242         if (rc) {
2243                 fprintf(stderr, "error: %s: invalid ioctl\n",
2244                         jt_cmdname(argv[0]));
2245                 return rc;
2246         }
2247
2248         rc = l_ioctl(OBD_DEV_ID, OBD_IOC_LLOG_CHECK, buf);
2249         if (rc == 0)
2250                 fprintf(stdout, "%s", ((struct obd_ioctl_data*)buf)->ioc_bulk);
2251         else
2252                 fprintf(stderr, "OBD_IOC_LLOG_CHECK failed: %s\n",
2253                         strerror(errno));
2254         return rc;
2255 }
2256
2257 int jt_llog_remove(int argc, char **argv)
2258 {
2259         struct obd_ioctl_data data;
2260         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
2261         int rc;
2262
2263         if (argc != 3 && argc != 2)
2264                 return CMD_HELP;
2265
2266         memset(&data, 0x00, sizeof(data));
2267         data.ioc_dev = cur_device;
2268         data.ioc_inllen1 = strlen(argv[1]) + 1;
2269         data.ioc_inlbuf1 = argv[1];
2270         if (argc == 3){
2271                 data.ioc_inllen2 = strlen(argv[2]) + 1;
2272                 data.ioc_inlbuf2 = argv[2];
2273         }
2274         memset(buf, 0, sizeof(rawbuf));
2275         rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
2276         if (rc) {
2277                 fprintf(stderr, "error: %s: invalid ioctl\n",
2278                         jt_cmdname(argv[0]));
2279                 return rc;
2280         }
2281
2282         rc = l_ioctl(OBD_DEV_ID, OBD_IOC_LLOG_REMOVE, buf);
2283         if (rc == 0) {
2284                 if (argc == 3)
2285                         fprintf(stdout, "log %s are removed.\n", argv[2]);
2286                 else
2287                         fprintf(stdout, "the log in catalog %s are removed. \n", argv[1]);
2288         } else
2289                 fprintf(stderr, "OBD_IOC_LLOG_REMOVE failed: %s\n",
2290                         strerror(errno));
2291
2292         return rc;
2293 }
2294
2295 /* attach a regular file to virtual block device.
2296  * return vaule:
2297  *  -1: fatal error
2298  *  1: error, it always means the command run failed
2299  *  0: success
2300  */
2301 static int jt_blockdev_run_process(const char *file, char *argv[])
2302 {
2303         pid_t pid;
2304         int rc;
2305
2306         pid = vfork();
2307         if (pid == 0) { /* child process */
2308                 /* don't print error messages */
2309                 close(1), close(2);
2310                 (void)execvp(file, argv);
2311                 exit(-1);
2312         } else if (pid > 0) {
2313                 int status;
2314
2315                 rc = waitpid(pid, &status, 0);
2316                 if (rc < 0 || !WIFEXITED(status))
2317                         return -1;
2318
2319                 return WEXITSTATUS(status);
2320         }
2321
2322         return -1;
2323 }
2324
2325 static int jt_blockdev_find_module(const char *module)
2326 {
2327         FILE *fp;
2328         int found = 0;
2329         char buf[1024];
2330
2331         fp = fopen("/proc/modules", "r");
2332         if (fp == NULL)
2333                 return -1;
2334
2335         while (fgets(buf, 1024, fp) != NULL) {
2336                 *strchr(buf, ' ') = 0;
2337                 if (strcmp(module, buf) == 0) {
2338                         found = 1;
2339                         break;
2340                 }
2341         }
2342         fclose(fp);
2343
2344         return found;
2345 }
2346
2347 static int jt_blockdev_probe_module(const char *module)
2348 {
2349         char buf[1024];
2350         char *argv[10];
2351         int c, rc;
2352
2353         if (jt_blockdev_find_module(module) == 1)
2354                 return 0;
2355
2356         /* run modprobe first */
2357         c = 0;
2358         argv[c++] = "/sbin/modprobe";
2359         argv[c++] = "-q";
2360         argv[c++] = (char *)module;
2361         argv[c++] = NULL;
2362         rc = jt_blockdev_run_process("modprobe", argv);
2363         if (rc != 1)
2364                 return rc;
2365
2366         /* cannot find the module in default directory ... */
2367         sprintf(buf, "../llite/%s.ko", module);
2368         c = 0;
2369         argv[c++] = "/sbin/insmod";
2370         argv[c++] = buf;
2371         argv[c++] = NULL;
2372         rc = jt_blockdev_run_process("insmod", argv);
2373         return rc ? -1 : 0;
2374 }
2375
2376 int jt_blockdev_attach(int argc, char **argv)
2377 {
2378         int rc, fd;
2379         struct stat st;
2380         char *filename, *devname;
2381         unsigned long dev;
2382
2383         if (argc != 3)
2384                 return CMD_HELP;
2385
2386         if (jt_blockdev_probe_module("llite_lloop") < 0) {
2387                 fprintf(stderr, "error: cannot find module llite_lloop.(k)o\n");
2388                 return ENOENT;
2389         }
2390
2391         filename = argv[1];
2392         devname = argv[2];
2393
2394         fd = open(filename, O_RDWR);
2395         if (fd < 0) {
2396                 fprintf(stderr, "file %s can't be opened(%s)\n\n",
2397                         filename, strerror(errno));
2398                 return CMD_HELP;
2399         }
2400
2401         rc = ioctl(fd, LL_IOC_LLOOP_ATTACH, &dev);
2402         if (rc < 0) {
2403                 rc = errno;
2404                 fprintf(stderr, "attach error(%s)\n", strerror(rc));
2405                 goto out;
2406         }
2407
2408         rc = stat(devname, &st);
2409         if (rc == 0 && (!S_ISBLK(st.st_mode) || st.st_rdev != dev)) {
2410                 rc = EEXIST;
2411         } else if (rc < 0) {
2412                 if (errno == ENOENT &&
2413                     !mknod(devname, S_IFBLK|S_IRUSR|S_IWUSR, dev))
2414                         rc = 0;
2415                 else
2416                         rc = errno;
2417         }
2418
2419         if (rc) {
2420                 fprintf(stderr, "error: the file %s could be attached to block "
2421                                 "device %X but creating %s failed: %s\n"
2422                                 "now detaching the block device..",
2423                         filename, (int)dev, devname, strerror(rc));
2424
2425                 (void)ioctl(fd, LL_IOC_LLOOP_DETACH_BYDEV, dev);
2426                 fprintf(stderr, "%s\n", strerror(errno));
2427         }
2428 out:
2429         close(fd);
2430         return -rc;
2431 }
2432
2433 int jt_blockdev_detach(int argc, char **argv)
2434 {
2435         char *filename;
2436         int rc, fd;
2437
2438         if (argc != 2)
2439                 return CMD_HELP;
2440
2441         filename = argv[1];
2442         fd = open(filename, O_RDONLY);
2443         if (fd < 0) {
2444                 fprintf(stderr, "cannot open file %s error %s\n",
2445                         filename, strerror(errno));
2446                 return CMD_HELP;
2447         }
2448
2449         rc = ioctl(fd, LL_IOC_LLOOP_DETACH, 0);
2450         if (rc < 0) {
2451                 rc = errno;
2452                 fprintf(stderr, "detach error(%s)\n", strerror(rc));
2453         } else {
2454                 (void)unlink(filename);
2455         }
2456
2457         close(fd);
2458         return -rc;
2459 }
2460
2461 int jt_blockdev_info(int argc, char **argv)
2462 {
2463         char *filename;
2464         int rc, fd;
2465         __u64  ino;
2466
2467         if (argc != 2)
2468                 return CMD_HELP;
2469
2470         filename = argv[1];
2471         fd = open(filename, O_RDONLY);
2472         if (fd < 0) {
2473                 fprintf(stderr, "cannot open file %s error: %s\n",
2474                         filename, strerror(errno));
2475                 return CMD_HELP;
2476         }
2477
2478         rc = ioctl(fd, LL_IOC_LLOOP_INFO, &ino);
2479         if (rc < 0) {
2480                 rc = errno;
2481                 fprintf(stderr, "error: %s\n", strerror(errno));
2482                 goto out;
2483         }
2484         fprintf(stdout, "lloop device info: ");
2485         if (ino == 0ULL)
2486                 fprintf(stdout, "Not attached\n");
2487         else
2488                 fprintf(stdout, "attached to inode "LPU64"\n", ino);
2489 out:
2490         close(fd);
2491         return -rc;
2492 }
2493
2494 static void signal_server(int sig)
2495 {
2496         if (sig == SIGINT) {
2497                 do_disconnect("sigint", 1);
2498                 exit(1);
2499         } else
2500                 fprintf(stderr, "%s: got signal %d\n", jt_cmdname("sigint"), sig);
2501 }
2502
2503 int obd_initialize(int argc, char **argv)
2504 {
2505         int i;
2506
2507         for (i = 0; i < MAX_STRIPES; i++)
2508                 lsm_buffer.lsm.lsm_oinfo[i] = lov_oinfos + i;
2509
2510         shmem_setup();
2511         register_ioc_dev(OBD_DEV_ID, OBD_DEV_PATH,
2512                          OBD_DEV_MAJOR, OBD_DEV_MINOR);
2513
2514         return 0;
2515 }
2516
2517 void obd_finalize(int argc, char **argv)
2518 {
2519         struct sigaction sigact;
2520
2521         sigact.sa_handler = signal_server;
2522         sigfillset(&sigact.sa_mask);
2523         sigact.sa_flags = SA_RESTART;
2524         sigaction(SIGINT, &sigact, NULL);
2525
2526         shmem_stop();
2527         do_disconnect(argv[0], 1);
2528 }
2529
2530 static int find_target_obdpath(char *fsname, char *path)
2531 {
2532         glob_t glob_info;
2533         char pattern[PATH_MAX + 1];
2534         int rc;
2535
2536         snprintf(pattern, PATH_MAX,
2537                  "/proc/fs/lustre/lov/%s-*/target_obd",
2538                  fsname);
2539         rc = glob(pattern, GLOB_BRACE, NULL, &glob_info);
2540         if (rc == GLOB_NOMATCH)
2541                 return -ENODEV;
2542         else if (rc)
2543                 return -EINVAL;
2544
2545         strcpy(path, glob_info.gl_pathv[0]);
2546         globfree(&glob_info);
2547         return 0;
2548 }
2549
2550 static int find_poolpath(char *fsname, char *poolname, char *poolpath)
2551 {
2552         glob_t glob_info;
2553         char pattern[PATH_MAX + 1];
2554         int rc;
2555
2556         snprintf(pattern, PATH_MAX,
2557                  "/proc/fs/lustre/lov/%s-*/pools/%s",
2558                  fsname, poolname);
2559         rc = glob(pattern, GLOB_BRACE, NULL, &glob_info);
2560         /* If no pools, make sure the lov is available */
2561         if ((rc == GLOB_NOMATCH) &&
2562             (find_target_obdpath(fsname, poolpath) == -ENODEV))
2563                 return -ENODEV;
2564         if (rc)
2565                 return -EINVAL;
2566
2567         strcpy(poolpath, glob_info.gl_pathv[0]);
2568         globfree(&glob_info);
2569         return 0;
2570 }
2571
2572 /*
2573  * if pool is NULL, search ostname in target_obd
2574  * if pool is no NULL
2575  *  if pool not found returns errno < 0
2576  *  if ostname is NULL, returns 1 if pool is not empty and 0 if pool empty
2577  *  if ostname is not NULL, returns 1 if OST is in pool and 0 if not
2578  */
2579 int llapi_search_ost(char *fsname, char *poolname, char *ostname)
2580 {
2581         FILE *fd;
2582         char buffer[PATH_MAX + 1];
2583         int len = 0, rc;
2584
2585         if (ostname != NULL)
2586                 len = strlen(ostname);
2587
2588         if (poolname == NULL)
2589                 rc = find_target_obdpath(fsname, buffer);
2590         else
2591                 rc = find_poolpath(fsname, poolname, buffer);
2592         if (rc)
2593                 return rc;
2594
2595         if ((fd = fopen(buffer, "r")) == NULL)
2596                 return -EINVAL;
2597
2598         while (fgets(buffer, sizeof(buffer), fd) != NULL) {
2599                 if (poolname == NULL) {
2600                         char *ptr;
2601                         /* Search for an ostname in the list of OSTs
2602                            Line format is IDX: fsname-OSTxxxx_UUID STATUS */
2603                         ptr = strchr(buffer, ' ');
2604                         if ((ptr != NULL) &&
2605                             (strncmp(ptr + 1, ostname, len) == 0)) {
2606                                 fclose(fd);
2607                                 return 1;
2608                         }
2609                 } else {
2610                         /* Search for an ostname in a pool,
2611                            (or an existing non-empty pool if no ostname) */
2612                         if ((ostname == NULL) ||
2613                             (strncmp(buffer, ostname, len) == 0)) {
2614                                 fclose(fd);
2615                                 return 1;
2616                         }
2617                 }
2618         }
2619         fclose(fd);
2620         return 0;
2621 }
2622
2623 static int check_pool_cmd(enum lcfg_command_type cmd,
2624                           char *fsname, char *poolname,
2625                           char *ostname)
2626 {
2627         int rc;
2628
2629         rc = llapi_search_ost(fsname, poolname, ostname);
2630         if (rc < 0 && (cmd != LCFG_POOL_NEW)) {
2631                 fprintf(stderr, "Pool %s.%s not found\n",
2632                         fsname, poolname);
2633                 return rc;
2634         }
2635
2636         switch (cmd) {
2637         case LCFG_POOL_NEW: {
2638                 LASSERT(ostname == NULL);
2639                 if (rc >= 0) {
2640                         fprintf(stderr, "Pool %s.%s already exists\n",
2641                                 fsname, poolname);
2642                         return -EEXIST;
2643                 }
2644                 return 0;
2645         }
2646         case LCFG_POOL_DEL: {
2647                 LASSERT(ostname == NULL);
2648                 if (rc == 1) {
2649                         fprintf(stderr, "Pool %s.%s not empty, "
2650                                 "please remove all members\n",
2651                                 fsname, poolname);
2652                         return -ENOTEMPTY;
2653                 }
2654                 return 0;
2655         }
2656         case LCFG_POOL_ADD: {
2657                 if (rc == 1) {
2658                         fprintf(stderr, "OST %s is already in pool %s.%s\n",
2659                                 ostname, fsname, poolname);
2660                         return -EEXIST;
2661                 }
2662                 rc = llapi_search_ost(fsname, NULL, ostname);
2663                 if (rc == 0) {
2664                         fprintf(stderr, "OST %s is not part of the '%s' fs.\n",
2665                                 ostname, fsname);
2666                         return -ENOENT;
2667                 }
2668                 return 0;
2669         }
2670         case LCFG_POOL_REM: {
2671                 if (rc == 0) {
2672                         fprintf(stderr, "OST %s not found in pool %s.%s\n",
2673                                 ostname, fsname, poolname);
2674                         return -ENOENT;
2675                 }
2676                 return 0;
2677         }
2678         default:
2679                 break;
2680         } /* switch */
2681         return -EINVAL;
2682 }
2683
2684 /* This check only verifies that the changes have been "pushed out" to
2685    the client successfully.  This involves waiting for a config update,
2686    and so may fail because of problems in that code or post-command
2687    network loss. So reporting a warning is appropriate, but not a failure.
2688 */
2689 static int check_pool_cmd_result(enum lcfg_command_type cmd,
2690                                  char *fsname, char *poolname,
2691                                  char *ostname)
2692 {
2693         int cpt = 10;
2694         int rc = 0;
2695
2696         switch (cmd) {
2697         case LCFG_POOL_NEW: {
2698                 do {
2699                         rc = llapi_search_ost(fsname, poolname, NULL);
2700                         if (rc == -ENODEV)
2701                                 return rc;
2702                         if (rc < 0)
2703                                 sleep(2);
2704                         cpt--;
2705                 } while ((rc < 0) && (cpt > 0));
2706                 if (rc >= 0) {
2707                         fprintf(stderr, "Pool %s.%s created\n",
2708                                 fsname, poolname);
2709                         return 0;
2710                 } else {
2711                         fprintf(stderr, "Warning, pool %s.%s not found\n",
2712                                 fsname, poolname);
2713                         return -ENOENT;
2714                 }
2715         }
2716         case LCFG_POOL_DEL: {
2717                 do {
2718                         rc = llapi_search_ost(fsname, poolname, NULL);
2719                         if (rc == -ENODEV)
2720                                 return rc;
2721                         if (rc >= 0)
2722                                 sleep(2);
2723                         cpt--;
2724                 } while ((rc >= 0) && (cpt > 0));
2725                 if (rc < 0) {
2726                         fprintf(stderr, "Pool %s.%s destroyed\n",
2727                                 fsname, poolname);
2728                         return 0;
2729                 } else {
2730                         fprintf(stderr, "Warning, pool %s.%s still found\n",
2731                                 fsname, poolname);
2732                         return -EEXIST;
2733                 }
2734         }
2735         case LCFG_POOL_ADD: {
2736                 do {
2737                         rc = llapi_search_ost(fsname, poolname, ostname);
2738                         if (rc == -ENODEV)
2739                                 return rc;
2740                         if (rc != 1)
2741                                 sleep(2);
2742                         cpt--;
2743                 } while ((rc != 1) && (cpt > 0));
2744                 if (rc == 1) {
2745                         fprintf(stderr, "OST %s added to pool %s.%s\n",
2746                                 ostname, fsname, poolname);
2747                         return 0;
2748                 } else {
2749                         fprintf(stderr, "Warning, OST %s not found in pool %s.%s\n",
2750                                 ostname, fsname, poolname);
2751                         return -ENOENT;
2752                 }
2753         }
2754         case LCFG_POOL_REM: {
2755                 do {
2756                         rc = llapi_search_ost(fsname, poolname, ostname);
2757                         if (rc == -ENODEV)
2758                                 return rc;
2759                         if (rc == 1)
2760                                 sleep(2);
2761                         cpt--;
2762                 } while ((rc == 1) && (cpt > 0));
2763                 if (rc != 1) {
2764                         fprintf(stderr, "OST %s removed from pool %s.%s\n",
2765                                 ostname, fsname, poolname);
2766                         return 0;
2767                 } else {
2768                         fprintf(stderr, "Warning, OST %s still found in pool %s.%s\n",
2769                                 ostname, fsname, poolname);
2770                         return -EEXIST;
2771                 }
2772         }
2773         default:
2774                 break;
2775         }
2776         return -EINVAL;
2777 }
2778
2779 static int check_and_complete_ostname(char *fsname, char *ostname)
2780 {
2781         char *ptr;
2782         char real_ostname[MAX_OBD_NAME + 1];
2783         char i;
2784
2785         /* if OST name does not start with fsname, we add it */
2786         /* if not check if the fsname is the right one */
2787         ptr = strchr(ostname, '-');
2788         if (ptr == NULL) {
2789                 sprintf(real_ostname, "%s-%s", fsname, ostname);
2790         } else if (strncmp(ostname, fsname, strlen(fsname)) != 0) {
2791                 fprintf(stderr, "%s does not start with fsname %s\n",
2792                         ostname, fsname);
2793                 return -EINVAL;
2794         } else {
2795              strcpy(real_ostname, ostname);
2796         }
2797         /* real_ostname is fsname-????? */
2798         ptr = real_ostname + strlen(fsname) + 1;
2799         if (strncmp(ptr, "OST", 3) != 0) {
2800                 fprintf(stderr, "%s does not start by %s-OST nor OST\n",
2801                         ostname, fsname);
2802                 return -EINVAL;
2803         }
2804         /* real_ostname is fsname-OST????? */
2805         ptr += 3;
2806         for (i = 0; i < 4; i++) {
2807                 if (!isxdigit(*ptr)) {
2808                         fprintf(stderr,
2809                                 "ost's index in %s is not an hexa number\n",
2810                                 ostname);
2811                         return -EINVAL;
2812                 }
2813                 ptr++;
2814         }
2815         /* real_ostname is fsname-OSTXXXX????? */
2816         /* if OST name does not end with _UUID, we add it */
2817         if (*ptr == '\0') {
2818                 strcat(real_ostname, "_UUID");
2819         } else if (strcmp(ptr, "_UUID") != 0) {
2820                 fprintf(stderr,
2821                         "ostname %s does not end with _UUID\n", ostname);
2822                 return -EINVAL;
2823         }
2824         /* real_ostname is fsname-OSTXXXX_UUID */
2825         strcpy(ostname, real_ostname);
2826         return 0;
2827 }
2828
2829 /* returns 0 or -errno */
2830 static int pool_cmd(enum lcfg_command_type cmd,
2831                     char *cmdname, char *fullpoolname,
2832                     char *fsname, char *poolname, char *ostname)
2833 {
2834         int rc = 0;
2835         struct obd_ioctl_data data;
2836         struct lustre_cfg_bufs bufs;
2837         struct lustre_cfg *lcfg;
2838         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
2839
2840         rc = check_pool_cmd(cmd, fsname, poolname, ostname);
2841         if (rc == -ENODEV)
2842                 fprintf(stderr, "Can't verify pool command since there "
2843                         "is no local MDT or client, proceeding anyhow...\n");
2844         else if (rc)
2845                 return rc;
2846
2847         lustre_cfg_bufs_reset(&bufs, NULL);
2848         lustre_cfg_bufs_set_string(&bufs, 0, cmdname);
2849         lustre_cfg_bufs_set_string(&bufs, 1, fullpoolname);
2850         if (ostname != NULL)
2851                 lustre_cfg_bufs_set_string(&bufs, 2, ostname);
2852
2853         lcfg = lustre_cfg_new(cmd, &bufs);
2854         if (IS_ERR(lcfg)) {
2855                 rc = PTR_ERR(lcfg);
2856                 return rc;
2857         }
2858
2859         memset(&data, 0x00, sizeof(data));
2860         rc = data.ioc_dev = get_mgs_device();
2861         if (rc < 0)
2862                 goto out;
2863
2864         data.ioc_type = LUSTRE_CFG_TYPE;
2865         data.ioc_plen1 = lustre_cfg_len(lcfg->lcfg_bufcount,
2866                                         lcfg->lcfg_buflens);
2867         data.ioc_pbuf1 = (void *)lcfg;
2868
2869         memset(buf, 0, sizeof(rawbuf));
2870         rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
2871         if (rc) {
2872                 fprintf(stderr, "error: %s: invalid ioctl\n",
2873                         jt_cmdname(cmdname));
2874                 return rc;
2875         }
2876         rc = l_ioctl(OBD_DEV_ID, OBD_IOC_POOL, buf);
2877 out:
2878         if (rc)
2879                 rc = -errno;
2880         lustre_cfg_free(lcfg);
2881         return rc;
2882 }
2883
2884 /*
2885  * this function tranforms a rule [start-end/step] into an array
2886  * of matching numbers
2887  * supported forms are:
2888  * [start]                : just this number
2889  * [start-end]            : all numbers from start to end
2890  * [start-end/step]       : numbers from start to end with increment of step
2891  * on return, format contains a printf format string which can be used
2892  * to generate all the strings
2893  */
2894 static int get_array_idx(char *rule, char *format, int **array)
2895 {
2896         char *start, *end, *ptr;
2897         unsigned int lo, hi, step;
2898         int array_sz = 0;
2899         int i, array_idx;
2900         int rc;
2901
2902         start = strchr(rule, '[');
2903         end = strchr(rule, ']');
2904         if ((start == NULL) || (end == NULL)) {
2905                 *array = malloc(sizeof(int));
2906                 if (*array == NULL)
2907                         return 0;
2908                 strcpy(format, rule);
2909                 array_sz = 1;
2910                 return array_sz;
2911         }
2912         *start = '\0';
2913         *end = '\0';
2914         end++;
2915         start++;
2916         /* put in format the printf format (the rule without the range) */
2917         sprintf(format, "%s%%.4x%s", rule, end);
2918
2919         array_idx = 0;
2920         array_sz = 0;
2921         *array = NULL;
2922         /* loop on , separator */
2923         do {
2924                 /* extract the 3 fields */
2925                 rc = sscanf(start, "%x-%x/%u", &lo, &hi, &step);
2926                 switch (rc) {
2927                 case 0: {
2928                         return 0;
2929                 }
2930                 case 1: {
2931                         array_sz++;
2932                         *array = realloc(*array, array_sz * sizeof(int));
2933                         if (*array == NULL)
2934                                 return 0;
2935                         (*array)[array_idx] = lo;
2936                         array_idx++;
2937                         break;
2938                 }
2939                 case 2: {
2940                         step = 1;
2941                         /* do not break to share code with case 3: */
2942                 }
2943                 case 3: {
2944                         if ((hi < lo) || (step == 0))
2945                                 return 0;
2946                         array_sz += (hi - lo) / step + 1;
2947                         *array = realloc(*array, sizeof(int) * array_sz);
2948                         if (*array == NULL)
2949                                 return 0;
2950                         for (i = lo; i <= hi; i+=step, array_idx++)
2951                                 (*array)[array_idx] = i;
2952                         break;
2953                 }
2954                 }
2955                 ptr = strchr(start, ',');
2956                 if (ptr != NULL)
2957                         start = ptr + 1;
2958
2959         } while (ptr != NULL);
2960         return array_sz;
2961 }
2962
2963 static int extract_fsname_poolname(char *arg, char *fsname, char *poolname)
2964 {
2965         char *ptr;
2966         int len;
2967         int rc;
2968
2969         strcpy(fsname, arg);
2970         ptr = strchr(fsname, '.');
2971         if (ptr == NULL) {
2972                 fprintf(stderr, ". is missing in %s\n", fsname);
2973                 rc = -EINVAL;
2974                 goto err;
2975         }
2976
2977         len = ptr - fsname;
2978         if (len == 0) {
2979                 fprintf(stderr, "fsname is empty\n");
2980                 rc = -EINVAL;
2981                 goto err;
2982         }
2983
2984         len = strlen(ptr + 1);
2985         if (len == 0) {
2986                 fprintf(stderr, "poolname is empty\n");
2987                 rc = -EINVAL;
2988                 goto err;
2989         }
2990         if (len > LOV_MAXPOOLNAME) {
2991                 fprintf(stderr,
2992                         "poolname %s is too long (length is %d max is %d)\n",
2993                         ptr + 1, len, LOV_MAXPOOLNAME);
2994                 rc = -ENAMETOOLONG;
2995                 goto err;
2996         }
2997         strncpy(poolname, ptr + 1, LOV_MAXPOOLNAME);
2998         poolname[LOV_MAXPOOLNAME] = '\0';
2999         *ptr = '\0';
3000         return 0;
3001
3002 err:
3003         fprintf(stderr, "argument %s must be <fsname>.<poolname>\n", arg);
3004         return rc;
3005 }
3006
3007 int jt_pool_cmd(int argc, char **argv)
3008 {
3009         enum lcfg_command_type cmd;
3010         char fsname[PATH_MAX + 1];
3011         char poolname[LOV_MAXPOOLNAME + 1];
3012         char *ostnames_buf = NULL;
3013         int i, rc;
3014         int *array = NULL, array_sz;
3015         struct {
3016                 int     rc;
3017                 char   *ostname;
3018         } *cmds = NULL;
3019
3020         switch (argc) {
3021         case 0:
3022         case 1: return CMD_HELP;
3023         case 2: {
3024                 if (strcmp("pool_new", argv[0]) == 0)
3025                         cmd = LCFG_POOL_NEW;
3026                 else if (strcmp("pool_destroy", argv[0]) == 0)
3027                         cmd = LCFG_POOL_DEL;
3028                 else if (strcmp("pool_list", argv[0]) == 0)
3029                          return llapi_poollist(argv[1]);
3030                 else return CMD_HELP;
3031
3032                 rc = extract_fsname_poolname(argv[1], fsname, poolname);
3033                 if (rc)
3034                         break;
3035
3036                 rc = pool_cmd(cmd, argv[0], argv[1], fsname, poolname, NULL);
3037                 if (rc)
3038                         break;
3039
3040                 check_pool_cmd_result(cmd, fsname, poolname, NULL);
3041                 break;
3042         }
3043         default: {
3044                 char format[2*MAX_OBD_NAME];
3045
3046                 if (strcmp("pool_remove", argv[0]) == 0) {
3047                         cmd = LCFG_POOL_REM;
3048                 } else if (strcmp("pool_add", argv[0]) == 0) {
3049                         cmd = LCFG_POOL_ADD;
3050                 } else {
3051                         return CMD_HELP;
3052                 }
3053
3054                 rc = extract_fsname_poolname(argv[1], fsname, poolname);
3055                 if (rc)
3056                         break;
3057
3058                 for (i = 2; i < argc; i++) {
3059                         int j;
3060
3061                         array_sz = get_array_idx(argv[i], format, &array);
3062                         if (array_sz == 0)
3063                                 return CMD_HELP;
3064
3065                         cmds = malloc(array_sz * sizeof(cmds[0]));
3066                         if (cmds != NULL) {
3067                                 ostnames_buf = malloc(array_sz *
3068                                                       (MAX_OBD_NAME + 1));
3069                         } else {
3070                                 free(array);
3071                                 rc = -ENOMEM;
3072                                 goto out;
3073                         }
3074
3075                         for (j = 0; j < array_sz; j++) {
3076                                 char ostname[MAX_OBD_NAME + 1];
3077
3078                                 snprintf(ostname, MAX_OBD_NAME, format,
3079                                          array[j]);
3080                                 ostname[MAX_OBD_NAME] = '\0';
3081
3082                                 rc = check_and_complete_ostname(fsname,ostname);
3083                                 if (rc) {
3084                                         free(array);
3085                                         free(cmds);
3086                                         if (ostnames_buf)
3087                                                 free(ostnames_buf);
3088                                         goto out;
3089                                 }
3090                                 if (ostnames_buf != NULL) {
3091                                         cmds[j].ostname =
3092                                           &ostnames_buf[(MAX_OBD_NAME + 1) * j];
3093                                         strcpy(cmds[j].ostname, ostname);
3094                                 } else {
3095                                         cmds[j].ostname = NULL;
3096                                 }
3097                                 cmds[j].rc = pool_cmd(cmd, argv[0], argv[1],
3098                                                       fsname, poolname,
3099                                                       ostname);
3100                                 /* Return an err if any of the add/dels fail */
3101                                 if (!rc)
3102                                         rc = cmds[j].rc;
3103                         }
3104                         for (j = 0; j < array_sz; j++) {
3105                                 if (!cmds[j].rc) {
3106                                         char ostname[MAX_OBD_NAME + 1];
3107
3108                                         if (!cmds[j].ostname) {
3109                                                 snprintf(ostname, MAX_OBD_NAME,
3110                                                          format, array[j]);
3111                                                 ostname[MAX_OBD_NAME] = '\0';
3112                                                 check_and_complete_ostname(
3113                                                         fsname, ostname);
3114                                         } else {
3115                                                 strcpy(ostname,
3116                                                        cmds[j].ostname);
3117                                         }
3118                                         check_pool_cmd_result(cmd, fsname,
3119                                                               poolname,ostname);
3120                                 }
3121                         }
3122                         if (array_sz > 0)
3123                                 free(array);
3124                         if (cmds)
3125                                 free(cmds);
3126                         if (ostnames_buf);
3127                                 free(ostnames_buf);
3128                 }
3129                 /* fall through */
3130         }
3131         } /* switch */
3132
3133 out:
3134         if (rc != 0) {
3135                 errno = -rc;
3136                 perror(argv[0]);
3137         }
3138
3139         return rc;
3140 }
3141
3142 int jt_get_obj_version(int argc, char **argv)
3143 {
3144         struct lu_fid fid;
3145         struct obd_ioctl_data data;
3146         __u64 version;
3147         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf, *fidstr;
3148         int rc;
3149
3150         if (argc != 2)
3151                 return CMD_HELP;
3152
3153         fidstr = argv[1];
3154         while (*fidstr == '[')
3155                 fidstr++;
3156         sscanf(fidstr, SFID, RFID(&fid));
3157         if (!fid_is_sane(&fid)) {
3158                 fprintf(stderr, "bad FID format [%s], should be "DFID"\n",
3159                         fidstr, (__u64)1, 2, 0);
3160                 return -EINVAL;
3161         }
3162
3163         memset(&data, 0, sizeof data);
3164         data.ioc_dev = cur_device;
3165         data.ioc_inlbuf1 = (char *) &fid;
3166         data.ioc_inllen1 = sizeof fid;
3167         data.ioc_inlbuf2 = (char *) &version;
3168         data.ioc_inllen2 = sizeof version;
3169
3170         memset(buf, 0, sizeof *buf);
3171         rc = obd_ioctl_pack(&data, &buf, sizeof rawbuf);
3172         if (rc) {
3173                 fprintf(stderr, "error: %s: packing ioctl arguments: %s\n",
3174                         jt_cmdname(argv[0]), strerror(-rc));
3175                 return rc;
3176         }
3177
3178         rc = l2_ioctl(OBD_DEV_ID, OBD_IOC_GET_OBJ_VERSION, buf);
3179         if (rc == -1) {
3180                 fprintf(stderr, "error: %s: ioctl: %s\n",
3181                         jt_cmdname(argv[0]), strerror(errno));
3182                 return -errno;
3183         }
3184
3185         obd_ioctl_unpack(&data, buf, sizeof rawbuf);
3186         printf("0x%llx\n", version);
3187         return 0;
3188 }
3189
3190 void  llapi_ping_target(char *obd_type, char *obd_name,
3191                         char *obd_uuid, void *args)
3192 {
3193         int  rc;
3194         struct obd_ioctl_data data;
3195         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
3196
3197         memset(&data, 0, sizeof(data));
3198         data.ioc_inlbuf4 = obd_name;
3199         data.ioc_inllen4 = strlen(obd_name) + 1;
3200         data.ioc_dev = OBD_DEV_BY_DEVNAME;
3201         memset(buf, 0, sizeof(rawbuf));
3202         if (obd_ioctl_pack(&data, &buf, sizeof(rawbuf))) {
3203                 fprintf(stderr, "error: invalid ioctl\n");
3204                 return;
3205         }
3206         rc = l_ioctl(OBD_DEV_ID, OBD_IOC_PING_TARGET, buf);
3207         if (rc)
3208                 rc = errno;
3209         if (rc == ENOTCONN || rc == ESHUTDOWN) {
3210                 printf("%s inactive.\n", obd_name);
3211         } else if (rc) {
3212                 fprintf(stderr, "error: check '%s' %s\n",
3213                         obd_name, strerror(errno));
3214         } else {
3215                 printf("%s active.\n", obd_name);
3216         }
3217 }
3218
3219 int jt_changelog_register(int argc, char **argv)
3220 {
3221         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
3222         struct obd_ioctl_data data;
3223         char devname[30];
3224         int rc;
3225
3226         if (argc > 2)
3227                 return CMD_HELP;
3228         else if (argc == 2 && strcmp(argv[1], "-n") != 0)
3229                 return CMD_HELP;
3230         if (cur_device < 0)
3231                 return CMD_HELP;
3232
3233         memset(&data, 0x00, sizeof(data));
3234         data.ioc_dev = cur_device;
3235         memset(buf, 0, sizeof(rawbuf));
3236         rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
3237         if (rc) {
3238                 fprintf(stderr, "error: %s: invalid ioctl\n",
3239                         jt_cmdname(argv[0]));
3240                return rc;
3241         }
3242
3243         rc = l2_ioctl(OBD_DEV_ID, OBD_IOC_CHANGELOG_REG, buf);
3244         if (rc < 0) {
3245                 fprintf(stderr, "error: %s: %s\n", jt_cmdname(argv[0]),
3246                         strerror(rc = errno));
3247                 return rc;
3248         }
3249         obd_ioctl_unpack(&data, buf, sizeof(rawbuf));
3250
3251         if (data.ioc_u32_1 == 0) {
3252                 fprintf(stderr, "received invalid userid!\n");
3253                 return EPROTO;
3254         }
3255
3256         if (lcfg_get_devname() != NULL)
3257                 strcpy(devname, lcfg_get_devname());
3258         else
3259                 sprintf(devname, "dev %d", cur_device);
3260
3261         if (argc == 2)
3262                 /* -n means bare name */
3263                 printf(CHANGELOG_USER_PREFIX"%u\n", data.ioc_u32_1);
3264         else
3265                 printf("%s: Registered changelog userid '"CHANGELOG_USER_PREFIX
3266                        "%u'\n", devname, data.ioc_u32_1);
3267         return 0;
3268 }
3269
3270 int jt_changelog_deregister(int argc, char **argv)
3271 {
3272         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
3273         struct obd_ioctl_data data;
3274         char devname[30];
3275         int id, rc;
3276
3277         if (argc != 2 || cur_device < 0)
3278                 return CMD_HELP;
3279
3280         id = strtol(argv[1] + strlen(CHANGELOG_USER_PREFIX), NULL, 10);
3281         if ((id == 0) || (strncmp(argv[1], CHANGELOG_USER_PREFIX,
3282                                   strlen(CHANGELOG_USER_PREFIX)) != 0)) {
3283                 fprintf(stderr, "expecting id of the form '"
3284                         CHANGELOG_USER_PREFIX"<num>'; got '%s'\n", argv[1]);
3285                 return CMD_HELP;
3286         }
3287
3288         memset(&data, 0x00, sizeof(data));
3289         data.ioc_dev = cur_device;
3290         data.ioc_u32_1 = id;
3291         memset(buf, 0, sizeof(rawbuf));
3292         rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
3293         if (rc) {
3294                 fprintf(stderr, "error: %s: invalid ioctl\n",
3295                         jt_cmdname(argv[0]));
3296                 return rc;
3297         }
3298
3299         rc = l2_ioctl(OBD_DEV_ID, OBD_IOC_CHANGELOG_DEREG, buf);
3300         if (rc < 0) {
3301                 fprintf(stderr, "error: %s: %s\n", jt_cmdname(argv[0]),
3302                         strerror(rc = errno));
3303                 return rc;
3304         }
3305         obd_ioctl_unpack(&data, buf, sizeof(rawbuf));
3306
3307         if (data.ioc_u32_1 != id) {
3308                 fprintf(stderr, "No changelog user '%s'.  Blocking user"
3309                         " is '"CHANGELOG_USER_PREFIX"%d'.\n", argv[1],
3310                         data.ioc_u32_1);
3311                 return ENOENT;
3312         }
3313
3314         if (lcfg_get_devname() != NULL)
3315                 strcpy(devname, lcfg_get_devname());
3316         else
3317                 sprintf(devname, "dev %d", cur_device);
3318
3319         printf("%s: Deregistered changelog user '"CHANGELOG_USER_PREFIX"%d'\n",
3320                devname, data.ioc_u32_1);
3321         return 0;
3322 }
3323
3324