Whamcloud - gitweb
b=20355 formalize support for pthreads
[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 (c) 2002, 2010, Oracle and/or its affiliates. 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_PTHREAD
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_seq, 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             secs > 1.0)                    /* someone screwed with the time? */
537                 printf("%d/%d Total: %f/second\n", non_zero, total_threads, total / secs);
538
539         memcpy(counter_snapshot[1], counter_snapshot[0],
540                total_threads * sizeof(counter_snapshot[0][0]));
541         prev_time = this_time;
542         if (!prev_valid &&
543             running == total_threads)
544                 prev_valid = 1;
545 }
546
547 static void shmem_stop(void)
548 {
549         if (shared_data == NULL)
550                 return;
551
552         shared_data->stop = 1;
553 }
554
555 static int shmem_running(void)
556 {
557         return (shared_data == NULL ||
558                 !shared_data->stop);
559 }
560 #else
561 static void shmem_setup(void)
562 {
563 }
564
565 static inline void shmem_reset(int total_threads)
566 {
567 }
568
569 static inline void shmem_bump(void)
570 {
571 }
572
573 static void shmem_lock()
574 {
575 }
576
577 static void shmem_unlock()
578 {
579 }
580
581 static void shmem_stop(void)
582 {
583 }
584
585 static int shmem_running(void)
586 {
587         return 1;
588 }
589 #endif
590
591 extern command_t cmdlist[];
592
593 static int do_device(char *func, char *devname)
594 {
595         int dev;
596
597         dev = parse_devname(func, devname);
598         if (dev < 0)
599                 return -1;
600
601         lcfg_set_devname(devname);
602         cur_device = dev;
603         return 0;
604 }
605
606 int jt_obd_get_device()
607 {
608         return cur_device;
609 }
610
611 int jt_obd_device(int argc, char **argv)
612 {
613         int rc;
614
615         if (argc > 2)
616                 return CMD_HELP;
617
618         if (argc == 1) {
619                 printf("current device is %d - %s\n",
620                        cur_device, lcfg_get_devname() ? : "not set");
621                 return 0;
622         }
623         rc = do_device("device", argv[1]);
624         return rc;
625 }
626
627 int jt_opt_device(int argc, char **argv)
628 {
629         int ret;
630         int rc;
631
632         if (argc < 3)
633                 return CMD_HELP;
634
635         rc = do_device("device", argv[1]);
636
637         if (!rc)
638                 rc = Parser_execarg(argc - 2, argv + 2, cmdlist);
639
640         ret = do_disconnect(argv[0], 0);
641         if (!rc)
642                 rc = ret;
643
644         return rc;
645 }
646
647 #ifdef MAX_THREADS
648 static void parent_sighandler (int sig)
649 {
650         return;
651 }
652
653 int jt_opt_threads(int argc, char **argv)
654 {
655         static char      cmdstr[128];
656         sigset_t         saveset;
657         sigset_t         sigset;
658         struct sigaction sigact;
659         struct sigaction saveact1;
660         struct sigaction saveact2;
661         unsigned long    threads;
662         __u64            next_thread;
663         int verbose;
664         int rc = 0;
665         int report_count = -1;
666         char *end;
667         int i;
668
669         if (argc < 5)
670                 return CMD_HELP;
671
672         threads = strtoul(argv[1], &end, 0);
673
674         if (*end == '.')
675                 report_count = strtoul(end + 1, &end, 0);
676
677         if (*end || threads > MAX_THREADS) {
678                 fprintf(stderr, "error: %s: invalid thread count '%s'\n",
679                         jt_cmdname(argv[0]), argv[1]);
680                 return CMD_HELP;
681         }
682
683         verbose = get_verbose(argv[0], argv[2]);
684         if (verbose == BAD_VERBOSE)
685                 return CMD_HELP;
686
687         if (verbose != 0) {
688                 snprintf(cmdstr, sizeof(cmdstr), "%s", argv[4]);
689                 for (i = 5; i < argc; i++)
690                         snprintf(cmdstr + strlen(cmdstr), sizeof(cmdstr),
691                                  " %s", argv[i]);
692
693                 printf("%s: starting %ld threads on device %s running %s\n",
694                        argv[0], threads, argv[3], cmdstr);
695         }
696
697         shmem_reset(threads);
698
699         sigemptyset(&sigset);
700         sigaddset(&sigset, SIGALRM);
701         sigaddset(&sigset, SIGCHLD);
702         sigprocmask(SIG_BLOCK, &sigset, &saveset);
703
704         nthreads = threads;
705
706         for (i = 1, next_thread = verbose; i <= threads; i++) {
707                 rc = fork();
708                 if (rc < 0) {
709                         fprintf(stderr, "error: %s: #%d - %s\n", argv[0], i,
710                                 strerror(rc = errno));
711                         break;
712                 } else if (rc == 0) {
713                         sigprocmask(SIG_SETMASK, &saveset, NULL);
714
715                         thread = i;
716                         argv[2] = "--device";
717                         exit(jt_opt_device(argc - 2, argv + 2));
718                 } else if (be_verbose(verbose, NULL, i, &next_thread, threads))
719                         printf("%s: thread #%d (PID %d) started\n",
720                                argv[0], i, rc);
721                 rc = 0;
722         }
723
724         if (!thread) {          /* parent process */
725                 int live_threads = threads;
726
727                 sigemptyset(&sigset);
728                 sigemptyset(&sigact.sa_mask);
729                 sigact.sa_handler = parent_sighandler;
730                 sigact.sa_flags = 0;
731
732                 sigaction(SIGALRM, &sigact, &saveact1);
733                 sigaction(SIGCHLD, &sigact, &saveact2);
734
735                 while (live_threads > 0) {
736                         int status;
737                         pid_t ret;
738
739                         if (verbose < 0)        /* periodic stats */
740                                 alarm(-verbose);
741
742                         sigsuspend(&sigset);
743                         alarm(0);
744
745                         while (live_threads > 0) {
746                                 ret = waitpid(0, &status, WNOHANG);
747                                 if (ret == 0)
748                                         break;
749
750                                 if (ret < 0) {
751                                         fprintf(stderr, "error: %s: wait - %s\n",
752                                                 argv[0], strerror(errno));
753                                         if (!rc)
754                                                 rc = errno;
755                                         continue;
756                                 } else {
757                                         /*
758                                          * This is a hack.  We _should_ be able
759                                          * to use WIFEXITED(status) to see if
760                                          * there was an error, but it appears
761                                          * to be broken and it always returns 1
762                                          * (OK).  See wait(2).
763                                          */
764                                         int err = WEXITSTATUS(status);
765                                         if (err || WIFSIGNALED(status))
766                                                 fprintf(stderr,
767                                                         "%s: PID %d had rc=%d\n",
768                                                         argv[0], ret, err);
769                                         if (!rc)
770                                                 rc = err;
771
772                                         live_threads--;
773                                 }
774                         }
775
776                         /* Show stats while all threads running */
777                         if (verbose < 0) {
778                                 shmem_snap(threads, live_threads);
779                                 if (report_count > 0 && --report_count == 0)
780                                         shmem_stop();
781                         }
782                 }
783                 sigaction(SIGCHLD, &saveact2, NULL);
784                 sigaction(SIGALRM, &saveact1, NULL);
785         }
786
787         sigprocmask(SIG_SETMASK, &saveset, NULL);
788
789         return rc;
790 }
791 #else
792 int jt_opt_threads(int argc, char **argv)
793 {
794         fprintf(stderr, "%s not-supported in a single-threaded runtime\n",
795                 jt_cmdname(argv[0]));
796         return CMD_HELP;
797 }
798 #endif
799
800 int jt_opt_net(int argc, char **argv)
801 {
802         char *arg2[3];
803         int rc;
804
805         if (argc < 3)
806                 return CMD_HELP;
807
808         arg2[0] = argv[0];
809         arg2[1] = argv[1];
810         arg2[2] = NULL;
811         rc = jt_ptl_network (2, arg2);
812
813         if (!rc)
814                 rc = Parser_execarg(argc - 2, argv + 2, cmdlist);
815
816         return rc;
817 }
818
819 int jt_obd_no_transno(int argc, char **argv)
820 {
821         struct obd_ioctl_data data;
822         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
823         int rc;
824
825         memset(&data, 0x00, sizeof(data));
826         data.ioc_dev = cur_device;
827
828         if (argc != 1)
829                 return CMD_HELP;
830
831         memset(buf, 0, sizeof(rawbuf));
832         rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
833         if (rc) {
834                 fprintf(stderr, "error: %s: invalid ioctl\n",
835                         jt_cmdname(argv[0]));
836                 return rc;
837         }
838         rc = l2_ioctl(OBD_DEV_ID, OBD_IOC_NO_TRANSNO, buf);
839         if (rc < 0)
840                 fprintf(stderr, "error: %s: %s\n", jt_cmdname(argv[0]),
841                         strerror(rc = errno));
842
843         return rc;
844 }
845
846 int jt_obd_set_readonly(int argc, char **argv)
847 {
848         struct obd_ioctl_data data;
849         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
850         int rc;
851
852         memset(&data, 0x00, sizeof(data));
853         data.ioc_dev = cur_device;
854
855         if (argc != 1)
856                 return CMD_HELP;
857
858         memset(buf, 0, sizeof(rawbuf));
859         rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
860         if (rc) {
861                 fprintf(stderr, "error: %s: invalid ioctl\n",
862                         jt_cmdname(argv[0]));
863                 return rc;
864         }
865         rc = l2_ioctl(OBD_DEV_ID, OBD_IOC_SET_READONLY, buf);
866         if (rc < 0)
867                 fprintf(stderr, "error: %s: %s\n", jt_cmdname(argv[0]),
868                         strerror(rc = errno));
869
870         return rc;
871 }
872
873 int jt_obd_abort_recovery(int argc, char **argv)
874 {
875         struct obd_ioctl_data data;
876         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
877         int rc;
878
879         memset(&data, 0x00, sizeof(data));
880         data.ioc_dev = cur_device;
881
882         if (argc != 1)
883                 return CMD_HELP;
884
885         memset(buf, 0, sizeof(rawbuf));
886         rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
887         if (rc) {
888                 fprintf(stderr, "error: %s: invalid ioctl\n",
889                         jt_cmdname(argv[0]));
890                 return rc;
891         }
892         rc = l2_ioctl(OBD_DEV_ID, OBD_IOC_ABORT_RECOVERY, buf);
893         if (rc < 0)
894                 fprintf(stderr, "error: %s: %s\n", jt_cmdname(argv[0]),
895                         strerror(rc = errno));
896
897         return rc;
898 }
899
900 int jt_get_version(int argc, char **argv)
901 {
902         int rc;
903         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
904         struct obd_ioctl_data *data = (struct obd_ioctl_data *)buf;
905
906         if (argc != 1)
907                 return CMD_HELP;
908
909         memset(buf, 0, sizeof(rawbuf));
910         data->ioc_version = OBD_IOCTL_VERSION;
911         data->ioc_inllen1 = sizeof(rawbuf) - cfs_size_round(sizeof(*data));
912         data->ioc_inlbuf1 = buf + cfs_size_round(sizeof(*data));
913         data->ioc_len = obd_ioctl_packlen(data);
914
915         rc = l2_ioctl(OBD_DEV_ID, OBD_GET_VERSION, buf);
916         if (rc < 0)
917                 fprintf(stderr, "error: %s: %s\n", jt_cmdname(argv[0]),
918                         strerror(rc = errno));
919         else {
920                 printf("Lustre version: %s\n", data->ioc_bulk);
921         }
922
923         printf("lctl   version: %s\n", BUILD_VERSION);
924         return rc;
925 }
926
927 /*
928  * Print an obd device line with the ost_conn_uuid inserted, if the obd
929  * is an osc.
930  */
931 static void print_obd_line(char *s)
932 {
933         char buf[MAX_STRING_SIZE];
934         char obd_name[MAX_OBD_NAME];
935         FILE *fp = NULL;
936         char *ptr;
937
938         if (sscanf(s, " %*d %*s osc %s %*s %*d ", obd_name) == 0)
939                 goto try_mdc;
940         snprintf(buf, sizeof(buf),
941                  "/proc/fs/lustre/osc/%s/ost_conn_uuid", obd_name);
942         if ((fp = fopen(buf, "r")) == NULL)
943                 goto try_mdc;
944         goto got_one;
945
946 try_mdc:
947         if (sscanf(s, " %*d %*s mdc %s %*s %*d ", obd_name) == 0)
948                 goto fail;
949         snprintf(buf, sizeof(buf),
950                  "/proc/fs/lustre/mdc/%s/mds_conn_uuid", obd_name);
951         if ((fp = fopen(buf, "r")) == NULL)
952                 goto fail;
953
954 got_one:
955         /* should not ignore fgets(3)'s return value */
956         if (!fgets(buf, sizeof(buf), fp)) {
957                 fprintf(stderr, "reading from %s: %s", buf, strerror(errno));
958                 fclose(fp);
959                 return;
960         }
961         fclose(fp);
962
963         /* trim trailing newlines */
964         ptr = strrchr(buf, '\n');
965         if (ptr) *ptr = '\0';
966         ptr = strrchr(s, '\n');
967         if (ptr) *ptr = '\0';
968
969         printf("%s %s\n", s, buf);
970         return;
971
972 fail:
973         printf("%s", s);
974         return;
975 }
976
977 /* get device list by ioctl */
978 int jt_obd_list_ioctl(int argc, char **argv)
979 {
980         int rc, index;
981         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
982         struct obd_ioctl_data *data = (struct obd_ioctl_data *)buf;
983
984         if (argc > 2)
985                 return CMD_HELP;
986         /* Just ignore a -t option.  Only supported with /proc. */
987         else if (argc == 2 && strcmp(argv[1], "-t") != 0)
988                 return CMD_HELP;
989
990         for (index = 0;; index++) {
991                 memset(buf, 0, sizeof(rawbuf));
992                 data->ioc_version = OBD_IOCTL_VERSION;
993                 data->ioc_inllen1 =
994                         sizeof(rawbuf) - cfs_size_round(sizeof(*data));
995                 data->ioc_inlbuf1 = buf + cfs_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) % nthr_per_obj == 0)
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) - cfs_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) - cfs_size_round(sizeof(data)) -
2110                 cfs_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) - cfs_size_round(sizeof(data)) -
2155                 cfs_size_round(data.ioc_inllen1) -
2156                 cfs_size_round(data.ioc_inllen2) -
2157                 cfs_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) - cfs_size_round(sizeof(data)) -
2237                 cfs_size_round(data.ioc_inllen1) -
2238                 cfs_size_round(data.ioc_inllen2) -
2239                 cfs_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 check_pool_cmd(enum lcfg_command_type cmd,
2531                           char *fsname, char *poolname,
2532                           char *ostname)
2533 {
2534         int rc;
2535
2536         rc = llapi_search_ost(fsname, poolname, ostname);
2537         if (rc < 0 && (cmd != LCFG_POOL_NEW)) {
2538                 fprintf(stderr, "Pool %s.%s not found\n",
2539                         fsname, poolname);
2540                 return rc;
2541         }
2542
2543         switch (cmd) {
2544         case LCFG_POOL_NEW: {
2545                 LASSERT(ostname == NULL);
2546                 if (rc >= 0) {
2547                         fprintf(stderr, "Pool %s.%s already exists\n",
2548                                 fsname, poolname);
2549                         return -EEXIST;
2550                 }
2551                 return 0;
2552         }
2553         case LCFG_POOL_DEL: {
2554                 LASSERT(ostname == NULL);
2555                 if (rc == 1) {
2556                         fprintf(stderr, "Pool %s.%s not empty, "
2557                                 "please remove all members\n",
2558                                 fsname, poolname);
2559                         return -ENOTEMPTY;
2560                 }
2561                 return 0;
2562         }
2563         case LCFG_POOL_ADD: {
2564                 if (rc == 1) {
2565                         fprintf(stderr, "OST %s is already in pool %s.%s\n",
2566                                 ostname, fsname, poolname);
2567                         return -EEXIST;
2568                 }
2569                 rc = llapi_search_ost(fsname, NULL, ostname);
2570                 if (rc == 0) {
2571                         fprintf(stderr, "OST %s is not part of the '%s' fs.\n",
2572                                 ostname, fsname);
2573                         return -ENOENT;
2574                 }
2575                 return 0;
2576         }
2577         case LCFG_POOL_REM: {
2578                 if (rc == 0) {
2579                         fprintf(stderr, "OST %s not found in pool %s.%s\n",
2580                                 ostname, fsname, poolname);
2581                         return -ENOENT;
2582                 }
2583                 return 0;
2584         }
2585         default:
2586                 break;
2587         } /* switch */
2588         return -EINVAL;
2589 }
2590
2591 /* This check only verifies that the changes have been "pushed out" to
2592    the client successfully.  This involves waiting for a config update,
2593    and so may fail because of problems in that code or post-command
2594    network loss. So reporting a warning is appropriate, but not a failure.
2595 */
2596 static int check_pool_cmd_result(enum lcfg_command_type cmd,
2597                                  char *fsname, char *poolname,
2598                                  char *ostname)
2599 {
2600         int cpt = 10;
2601         int rc = 0;
2602
2603         switch (cmd) {
2604         case LCFG_POOL_NEW: {
2605                 do {
2606                         rc = llapi_search_ost(fsname, poolname, NULL);
2607                         if (rc == -ENODEV)
2608                                 return rc;
2609                         if (rc < 0)
2610                                 sleep(2);
2611                         cpt--;
2612                 } while ((rc < 0) && (cpt > 0));
2613                 if (rc >= 0) {
2614                         fprintf(stderr, "Pool %s.%s created\n",
2615                                 fsname, poolname);
2616                         return 0;
2617                 } else {
2618                         fprintf(stderr, "Warning, pool %s.%s not found\n",
2619                                 fsname, poolname);
2620                         return -ENOENT;
2621                 }
2622         }
2623         case LCFG_POOL_DEL: {
2624                 do {
2625                         rc = llapi_search_ost(fsname, poolname, NULL);
2626                         if (rc == -ENODEV)
2627                                 return rc;
2628                         if (rc >= 0)
2629                                 sleep(2);
2630                         cpt--;
2631                 } while ((rc >= 0) && (cpt > 0));
2632                 if (rc < 0) {
2633                         fprintf(stderr, "Pool %s.%s destroyed\n",
2634                                 fsname, poolname);
2635                         return 0;
2636                 } else {
2637                         fprintf(stderr, "Warning, pool %s.%s still found\n",
2638                                 fsname, poolname);
2639                         return -EEXIST;
2640                 }
2641         }
2642         case LCFG_POOL_ADD: {
2643                 do {
2644                         rc = llapi_search_ost(fsname, poolname, ostname);
2645                         if (rc == -ENODEV)
2646                                 return rc;
2647                         if (rc != 1)
2648                                 sleep(2);
2649                         cpt--;
2650                 } while ((rc != 1) && (cpt > 0));
2651                 if (rc == 1) {
2652                         fprintf(stderr, "OST %s added to pool %s.%s\n",
2653                                 ostname, fsname, poolname);
2654                         return 0;
2655                 } else {
2656                         fprintf(stderr, "Warning, OST %s not found in pool %s.%s\n",
2657                                 ostname, fsname, poolname);
2658                         return -ENOENT;
2659                 }
2660         }
2661         case LCFG_POOL_REM: {
2662                 do {
2663                         rc = llapi_search_ost(fsname, poolname, ostname);
2664                         if (rc == -ENODEV)
2665                                 return rc;
2666                         if (rc == 1)
2667                                 sleep(2);
2668                         cpt--;
2669                 } while ((rc == 1) && (cpt > 0));
2670                 if (rc != 1) {
2671                         fprintf(stderr, "OST %s removed from pool %s.%s\n",
2672                                 ostname, fsname, poolname);
2673                         return 0;
2674                 } else {
2675                         fprintf(stderr, "Warning, OST %s still found in pool %s.%s\n",
2676                                 ostname, fsname, poolname);
2677                         return -EEXIST;
2678                 }
2679         }
2680         default:
2681                 break;
2682         }
2683         return -EINVAL;
2684 }
2685
2686 static int check_and_complete_ostname(char *fsname, char *ostname)
2687 {
2688         char *ptr;
2689         char real_ostname[MAX_OBD_NAME + 1];
2690         char i;
2691
2692         /* if OST name does not start with fsname, we add it */
2693         /* if not check if the fsname is the right one */
2694         ptr = strchr(ostname, '-');
2695         if (ptr == NULL) {
2696                 sprintf(real_ostname, "%s-%s", fsname, ostname);
2697         } else if (strncmp(ostname, fsname, strlen(fsname)) != 0) {
2698                 fprintf(stderr, "%s does not start with fsname %s\n",
2699                         ostname, fsname);
2700                 return -EINVAL;
2701         } else {
2702              strcpy(real_ostname, ostname);
2703         }
2704         /* real_ostname is fsname-????? */
2705         ptr = real_ostname + strlen(fsname) + 1;
2706         if (strncmp(ptr, "OST", 3) != 0) {
2707                 fprintf(stderr, "%s does not start by %s-OST nor OST\n",
2708                         ostname, fsname);
2709                 return -EINVAL;
2710         }
2711         /* real_ostname is fsname-OST????? */
2712         ptr += 3;
2713         for (i = 0; i < 4; i++) {
2714                 if (!isxdigit(*ptr)) {
2715                         fprintf(stderr,
2716                                 "ost's index in %s is not an hexa number\n",
2717                                 ostname);
2718                         return -EINVAL;
2719                 }
2720                 ptr++;
2721         }
2722         /* real_ostname is fsname-OSTXXXX????? */
2723         /* if OST name does not end with _UUID, we add it */
2724         if (*ptr == '\0') {
2725                 strcat(real_ostname, "_UUID");
2726         } else if (strcmp(ptr, "_UUID") != 0) {
2727                 fprintf(stderr,
2728                         "ostname %s does not end with _UUID\n", ostname);
2729                 return -EINVAL;
2730         }
2731         /* real_ostname is fsname-OSTXXXX_UUID */
2732         strcpy(ostname, real_ostname);
2733         return 0;
2734 }
2735
2736 /* returns 0 or -errno */
2737 static int pool_cmd(enum lcfg_command_type cmd,
2738                     char *cmdname, char *fullpoolname,
2739                     char *fsname, char *poolname, char *ostname)
2740 {
2741         int rc = 0;
2742         struct obd_ioctl_data data;
2743         struct lustre_cfg_bufs bufs;
2744         struct lustre_cfg *lcfg;
2745         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
2746
2747         rc = check_pool_cmd(cmd, fsname, poolname, ostname);
2748         if (rc == -ENODEV)
2749                 fprintf(stderr, "Can't verify pool command since there "
2750                         "is no local MDT or client, proceeding anyhow...\n");
2751         else if (rc)
2752                 return rc;
2753
2754         lustre_cfg_bufs_reset(&bufs, NULL);
2755         lustre_cfg_bufs_set_string(&bufs, 0, cmdname);
2756         lustre_cfg_bufs_set_string(&bufs, 1, fullpoolname);
2757         if (ostname != NULL)
2758                 lustre_cfg_bufs_set_string(&bufs, 2, ostname);
2759
2760         lcfg = lustre_cfg_new(cmd, &bufs);
2761         if (IS_ERR(lcfg)) {
2762                 rc = PTR_ERR(lcfg);
2763                 return rc;
2764         }
2765
2766         memset(&data, 0x00, sizeof(data));
2767         rc = data.ioc_dev = get_mgs_device();
2768         if (rc < 0)
2769                 goto out;
2770
2771         data.ioc_type = LUSTRE_CFG_TYPE;
2772         data.ioc_plen1 = lustre_cfg_len(lcfg->lcfg_bufcount,
2773                                         lcfg->lcfg_buflens);
2774         data.ioc_pbuf1 = (void *)lcfg;
2775
2776         memset(buf, 0, sizeof(rawbuf));
2777         rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
2778         if (rc) {
2779                 fprintf(stderr, "error: %s: invalid ioctl\n",
2780                         jt_cmdname(cmdname));
2781                 return rc;
2782         }
2783         rc = l_ioctl(OBD_DEV_ID, OBD_IOC_POOL, buf);
2784 out:
2785         if (rc)
2786                 rc = -errno;
2787         lustre_cfg_free(lcfg);
2788         return rc;
2789 }
2790
2791 /*
2792  * this function tranforms a rule [start-end/step] into an array
2793  * of matching numbers
2794  * supported forms are:
2795  * [start]                : just this number
2796  * [start-end]            : all numbers from start to end
2797  * [start-end/step]       : numbers from start to end with increment of step
2798  * on return, format contains a printf format string which can be used
2799  * to generate all the strings
2800  */
2801 static int get_array_idx(char *rule, char *format, int **array)
2802 {
2803         char *start, *end, *ptr;
2804         unsigned int lo, hi, step;
2805         int array_sz = 0;
2806         int i, array_idx;
2807         int rc;
2808
2809         start = strchr(rule, '[');
2810         end = strchr(rule, ']');
2811         if ((start == NULL) || (end == NULL)) {
2812                 *array = malloc(sizeof(int));
2813                 if (*array == NULL)
2814                         return 0;
2815                 strcpy(format, rule);
2816                 array_sz = 1;
2817                 return array_sz;
2818         }
2819         *start = '\0';
2820         *end = '\0';
2821         end++;
2822         start++;
2823         /* put in format the printf format (the rule without the range) */
2824         sprintf(format, "%s%%.4x%s", rule, end);
2825
2826         array_idx = 0;
2827         array_sz = 0;
2828         *array = NULL;
2829         /* loop on , separator */
2830         do {
2831                 /* extract the 3 fields */
2832                 rc = sscanf(start, "%x-%x/%u", &lo, &hi, &step);
2833                 switch (rc) {
2834                 case 0: {
2835                         return 0;
2836                 }
2837                 case 1: {
2838                         array_sz++;
2839                         *array = realloc(*array, array_sz * sizeof(int));
2840                         if (*array == NULL)
2841                                 return 0;
2842                         (*array)[array_idx] = lo;
2843                         array_idx++;
2844                         break;
2845                 }
2846                 case 2: {
2847                         step = 1;
2848                         /* do not break to share code with case 3: */
2849                 }
2850                 case 3: {
2851                         if ((hi < lo) || (step == 0))
2852                                 return 0;
2853                         array_sz += (hi - lo) / step + 1;
2854                         *array = realloc(*array, sizeof(int) * array_sz);
2855                         if (*array == NULL)
2856                                 return 0;
2857                         for (i = lo; i <= hi; i+=step, array_idx++)
2858                                 (*array)[array_idx] = i;
2859                         break;
2860                 }
2861                 }
2862                 ptr = strchr(start, ',');
2863                 if (ptr != NULL)
2864                         start = ptr + 1;
2865
2866         } while (ptr != NULL);
2867         return array_sz;
2868 }
2869
2870 static int extract_fsname_poolname(char *arg, char *fsname, char *poolname)
2871 {
2872         char *ptr;
2873         int len;
2874         int rc;
2875
2876         strcpy(fsname, arg);
2877         ptr = strchr(fsname, '.');
2878         if (ptr == NULL) {
2879                 fprintf(stderr, ". is missing in %s\n", fsname);
2880                 rc = -EINVAL;
2881                 goto err;
2882         }
2883
2884         len = ptr - fsname;
2885         if (len == 0) {
2886                 fprintf(stderr, "fsname is empty\n");
2887                 rc = -EINVAL;
2888                 goto err;
2889         }
2890
2891         len = strlen(ptr + 1);
2892         if (len == 0) {
2893                 fprintf(stderr, "poolname is empty\n");
2894                 rc = -EINVAL;
2895                 goto err;
2896         }
2897         if (len > LOV_MAXPOOLNAME) {
2898                 fprintf(stderr,
2899                         "poolname %s is too long (length is %d max is %d)\n",
2900                         ptr + 1, len, LOV_MAXPOOLNAME);
2901                 rc = -ENAMETOOLONG;
2902                 goto err;
2903         }
2904         strncpy(poolname, ptr + 1, LOV_MAXPOOLNAME);
2905         poolname[LOV_MAXPOOLNAME] = '\0';
2906         *ptr = '\0';
2907         return 0;
2908
2909 err:
2910         fprintf(stderr, "argument %s must be <fsname>.<poolname>\n", arg);
2911         return rc;
2912 }
2913
2914 int jt_pool_cmd(int argc, char **argv)
2915 {
2916         enum lcfg_command_type cmd;
2917         char fsname[PATH_MAX + 1];
2918         char poolname[LOV_MAXPOOLNAME + 1];
2919         char *ostnames_buf = NULL;
2920         int i, rc;
2921         int *array = NULL, array_sz;
2922         struct {
2923                 int     rc;
2924                 char   *ostname;
2925         } *cmds = NULL;
2926
2927         switch (argc) {
2928         case 0:
2929         case 1: return CMD_HELP;
2930         case 2: {
2931                 if (strcmp("pool_new", argv[0]) == 0)
2932                         cmd = LCFG_POOL_NEW;
2933                 else if (strcmp("pool_destroy", argv[0]) == 0)
2934                         cmd = LCFG_POOL_DEL;
2935                 else if (strcmp("pool_list", argv[0]) == 0)
2936                          return llapi_poollist(argv[1]);
2937                 else return CMD_HELP;
2938
2939                 rc = extract_fsname_poolname(argv[1], fsname, poolname);
2940                 if (rc)
2941                         break;
2942
2943                 rc = pool_cmd(cmd, argv[0], argv[1], fsname, poolname, NULL);
2944                 if (rc)
2945                         break;
2946
2947                 check_pool_cmd_result(cmd, fsname, poolname, NULL);
2948                 break;
2949         }
2950         default: {
2951                 char format[2*MAX_OBD_NAME];
2952
2953                 if (strcmp("pool_remove", argv[0]) == 0) {
2954                         cmd = LCFG_POOL_REM;
2955                 } else if (strcmp("pool_add", argv[0]) == 0) {
2956                         cmd = LCFG_POOL_ADD;
2957                 } else {
2958                         return CMD_HELP;
2959                 }
2960
2961                 rc = extract_fsname_poolname(argv[1], fsname, poolname);
2962                 if (rc)
2963                         break;
2964
2965                 for (i = 2; i < argc; i++) {
2966                         int j;
2967
2968                         array_sz = get_array_idx(argv[i], format, &array);
2969                         if (array_sz == 0)
2970                                 return CMD_HELP;
2971
2972                         cmds = malloc(array_sz * sizeof(cmds[0]));
2973                         if (cmds != NULL) {
2974                                 ostnames_buf = malloc(array_sz *
2975                                                       (MAX_OBD_NAME + 1));
2976                         } else {
2977                                 free(array);
2978                                 rc = -ENOMEM;
2979                                 goto out;
2980                         }
2981
2982                         for (j = 0; j < array_sz; j++) {
2983                                 char ostname[MAX_OBD_NAME + 1];
2984
2985                                 snprintf(ostname, MAX_OBD_NAME, format,
2986                                          array[j]);
2987                                 ostname[MAX_OBD_NAME] = '\0';
2988
2989                                 rc = check_and_complete_ostname(fsname,ostname);
2990                                 if (rc) {
2991                                         free(array);
2992                                         free(cmds);
2993                                         if (ostnames_buf)
2994                                                 free(ostnames_buf);
2995                                         goto out;
2996                                 }
2997                                 if (ostnames_buf != NULL) {
2998                                         cmds[j].ostname =
2999                                           &ostnames_buf[(MAX_OBD_NAME + 1) * j];
3000                                         strcpy(cmds[j].ostname, ostname);
3001                                 } else {
3002                                         cmds[j].ostname = NULL;
3003                                 }
3004                                 cmds[j].rc = pool_cmd(cmd, argv[0], argv[1],
3005                                                       fsname, poolname,
3006                                                       ostname);
3007                                 /* Return an err if any of the add/dels fail */
3008                                 if (!rc)
3009                                         rc = cmds[j].rc;
3010                         }
3011                         for (j = 0; j < array_sz; j++) {
3012                                 if (!cmds[j].rc) {
3013                                         char ostname[MAX_OBD_NAME + 1];
3014
3015                                         if (!cmds[j].ostname) {
3016                                                 snprintf(ostname, MAX_OBD_NAME,
3017                                                          format, array[j]);
3018                                                 ostname[MAX_OBD_NAME] = '\0';
3019                                                 check_and_complete_ostname(
3020                                                         fsname, ostname);
3021                                         } else {
3022                                                 strcpy(ostname,
3023                                                        cmds[j].ostname);
3024                                         }
3025                                         check_pool_cmd_result(cmd, fsname,
3026                                                               poolname,ostname);
3027                                 }
3028                         }
3029                         if (array_sz > 0)
3030                                 free(array);
3031                         if (cmds)
3032                                 free(cmds);
3033                         if (ostnames_buf);
3034                                 free(ostnames_buf);
3035                 }
3036                 /* fall through */
3037         }
3038         } /* switch */
3039
3040 out:
3041         if (rc != 0) {
3042                 errno = -rc;
3043                 perror(argv[0]);
3044         }
3045
3046         return rc;
3047 }
3048
3049 int jt_get_obj_version(int argc, char **argv)
3050 {
3051         struct lu_fid fid;
3052         struct obd_ioctl_data data;
3053         __u64 version;
3054         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf, *fidstr;
3055         int rc;
3056
3057         if (argc != 2)
3058                 return CMD_HELP;
3059
3060         fidstr = argv[1];
3061         while (*fidstr == '[')
3062                 fidstr++;
3063         sscanf(fidstr, SFID, RFID(&fid));
3064         if (!fid_is_sane(&fid)) {
3065                 fprintf(stderr, "bad FID format [%s], should be "DFID"\n",
3066                         fidstr, (__u64)1, 2, 0);
3067                 return -EINVAL;
3068         }
3069
3070         memset(&data, 0, sizeof data);
3071         data.ioc_dev = cur_device;
3072         data.ioc_inlbuf1 = (char *) &fid;
3073         data.ioc_inllen1 = sizeof fid;
3074         data.ioc_inlbuf2 = (char *) &version;
3075         data.ioc_inllen2 = sizeof version;
3076
3077         memset(buf, 0, sizeof *buf);
3078         rc = obd_ioctl_pack(&data, &buf, sizeof rawbuf);
3079         if (rc) {
3080                 fprintf(stderr, "error: %s: packing ioctl arguments: %s\n",
3081                         jt_cmdname(argv[0]), strerror(-rc));
3082                 return rc;
3083         }
3084
3085         rc = l2_ioctl(OBD_DEV_ID, OBD_IOC_GET_OBJ_VERSION, buf);
3086         if (rc == -1) {
3087                 fprintf(stderr, "error: %s: ioctl: %s\n",
3088                         jt_cmdname(argv[0]), strerror(errno));
3089                 return -errno;
3090         }
3091
3092         obd_ioctl_unpack(&data, buf, sizeof rawbuf);
3093         printf(LPX64"\n", version);
3094         return 0;
3095 }
3096
3097 void  llapi_ping_target(char *obd_type, char *obd_name,
3098                         char *obd_uuid, void *args)
3099 {
3100         int  rc;
3101         struct obd_ioctl_data data;
3102         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
3103
3104         memset(&data, 0, sizeof(data));
3105         data.ioc_inlbuf4 = obd_name;
3106         data.ioc_inllen4 = strlen(obd_name) + 1;
3107         data.ioc_dev = OBD_DEV_BY_DEVNAME;
3108         memset(buf, 0, sizeof(rawbuf));
3109         if (obd_ioctl_pack(&data, &buf, sizeof(rawbuf))) {
3110                 fprintf(stderr, "error: invalid ioctl\n");
3111                 return;
3112         }
3113         rc = l_ioctl(OBD_DEV_ID, OBD_IOC_PING_TARGET, buf);
3114         if (rc)
3115                 rc = errno;
3116         if (rc == ENOTCONN || rc == ESHUTDOWN) {
3117                 printf("%s inactive.\n", obd_name);
3118         } else if (rc) {
3119                 fprintf(stderr, "error: check '%s' %s\n",
3120                         obd_name, strerror(errno));
3121         } else {
3122                 printf("%s active.\n", obd_name);
3123         }
3124 }
3125
3126 int jt_changelog_register(int argc, char **argv)
3127 {
3128         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
3129         struct obd_ioctl_data data;
3130         char devname[30];
3131         int rc;
3132
3133         if (argc > 2)
3134                 return CMD_HELP;
3135         else if (argc == 2 && strcmp(argv[1], "-n") != 0)
3136                 return CMD_HELP;
3137         if (cur_device < 0)
3138                 return CMD_HELP;
3139
3140         memset(&data, 0x00, sizeof(data));
3141         data.ioc_dev = cur_device;
3142         memset(buf, 0, sizeof(rawbuf));
3143         rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
3144         if (rc) {
3145                 fprintf(stderr, "error: %s: invalid ioctl\n",
3146                         jt_cmdname(argv[0]));
3147                return rc;
3148         }
3149
3150         rc = l2_ioctl(OBD_DEV_ID, OBD_IOC_CHANGELOG_REG, buf);
3151         if (rc < 0) {
3152                 fprintf(stderr, "error: %s: %s\n", jt_cmdname(argv[0]),
3153                         strerror(rc = errno));
3154                 return rc;
3155         }
3156         obd_ioctl_unpack(&data, buf, sizeof(rawbuf));
3157
3158         if (data.ioc_u32_1 == 0) {
3159                 fprintf(stderr, "received invalid userid!\n");
3160                 return EPROTO;
3161         }
3162
3163         if (lcfg_get_devname() != NULL)
3164                 strcpy(devname, lcfg_get_devname());
3165         else
3166                 sprintf(devname, "dev %d", cur_device);
3167
3168         if (argc == 2)
3169                 /* -n means bare name */
3170                 printf(CHANGELOG_USER_PREFIX"%u\n", data.ioc_u32_1);
3171         else
3172                 printf("%s: Registered changelog userid '"CHANGELOG_USER_PREFIX
3173                        "%u'\n", devname, data.ioc_u32_1);
3174         return 0;
3175 }
3176
3177 int jt_changelog_deregister(int argc, char **argv)
3178 {
3179         char rawbuf[MAX_IOC_BUFLEN], *buf = rawbuf;
3180         struct obd_ioctl_data data;
3181         char devname[30];
3182         int id, rc;
3183
3184         if (argc != 2 || cur_device < 0)
3185                 return CMD_HELP;
3186
3187         id = strtol(argv[1] + strlen(CHANGELOG_USER_PREFIX), NULL, 10);
3188         if ((id == 0) || (strncmp(argv[1], CHANGELOG_USER_PREFIX,
3189                                   strlen(CHANGELOG_USER_PREFIX)) != 0)) {
3190                 fprintf(stderr, "expecting id of the form '"
3191                         CHANGELOG_USER_PREFIX"<num>'; got '%s'\n", argv[1]);
3192                 return CMD_HELP;
3193         }
3194
3195         memset(&data, 0x00, sizeof(data));
3196         data.ioc_dev = cur_device;
3197         data.ioc_u32_1 = id;
3198         memset(buf, 0, sizeof(rawbuf));
3199         rc = obd_ioctl_pack(&data, &buf, sizeof(rawbuf));
3200         if (rc) {
3201                 fprintf(stderr, "error: %s: invalid ioctl\n",
3202                         jt_cmdname(argv[0]));
3203                 return rc;
3204         }
3205
3206         rc = l2_ioctl(OBD_DEV_ID, OBD_IOC_CHANGELOG_DEREG, buf);
3207         if (rc < 0) {
3208                 fprintf(stderr, "error: %s: %s\n", jt_cmdname(argv[0]),
3209                         strerror(rc = errno));
3210                 return rc;
3211         }
3212         obd_ioctl_unpack(&data, buf, sizeof(rawbuf));
3213
3214         if (data.ioc_u32_1 != id) {
3215                 fprintf(stderr, "No changelog user '%s'.  Blocking user"
3216                         " is '"CHANGELOG_USER_PREFIX"%d'.\n", argv[1],
3217                         data.ioc_u32_1);
3218                 return ENOENT;
3219         }
3220
3221         if (lcfg_get_devname() != NULL)
3222                 strcpy(devname, lcfg_get_devname());
3223         else
3224                 sprintf(devname, "dev %d", cur_device);
3225
3226         printf("%s: Deregistered changelog user '"CHANGELOG_USER_PREFIX"%d'\n",
3227                devname, data.ioc_u32_1);
3228         return 0;
3229 }
3230
3231