lustre/fid/lproc_fid.c

   1 /*
   2  * GPL HEADER START
   3  *
   4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   5  *
   6  * This program is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License version 2 only,
   8  * as published by the Free Software Foundation.
   9  *
  10  * This program is distributed in the hope that it will be useful, but
  11  * WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * General Public License version 2 for more details (a copy is included
  14  * in the LICENSE file that accompanied this code).
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * version 2 along with this program; If not, see
  18  * http://www.sun.com/software/products/lustre/docs/GPLv2.pdf
  19  *
  20  * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
  21  * CA 95054 USA or visit www.sun.com if you need additional information or
  22  * have any questions.
  23  *
  24  * GPL HEADER END
  25  */
  26 /*
  27  * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
  28  * Use is subject to license terms.
  29  *
  30  * Copyright (c) 2011, 2013, Intel Corporation.
  31  */
  32 /*
  33  * This file is part of Lustre, http://www.lustre.org/
  34  * Lustre is a trademark of Sun Microsystems, Inc.
  35  *
  36  * lustre/fid/lproc_fid.c
  37  *
  38  * Lustre Sequence Manager
  39  *
  40  * Author: Yury Umanets <umka@clusterfs.com>
  41  */
  42
  43 #define DEBUG_SUBSYSTEM S_FID
  44
  45 #include <libcfs/libcfs.h>
  46 #include <linux/module.h>
  47 #include <obd.h>
  48 #include <obd_class.h>
  49 #include <obd_support.h>
  50 #include <lustre_fid.h>
  51 #include <lprocfs_status.h>
  52 #include "fid_internal.h"
  53 #include <md_object.h>
  54
  55 #ifdef LPROCFS
  56 /**
  57  * Reduce the SEQ range allocated to a node to a strict subset of the range
  58  * currently-allocated SEQ range.  If the specified range is "clear", then
  59  * drop all allocated sequences and request a new one from the master.
  60  *
  61  * Note: this function should only be used for testing, it is not necessarily
  62  * safe for production use.
  63  */
  64 static int seq_proc_write_common(struct file *file, const char *buffer,
  65                                  unsigned long count, void *data,
  66                                  struct lu_seq_range *range)
  67 {
  68         struct lu_seq_range tmp = { 0, };
  69         int rc;
  70         ENTRY;
  71
  72         LASSERT(range != NULL);
  73
  74         if (count == 5 && strcmp(buffer, "clear") == 0) {
  75                 memset(range, 0, sizeof(*range));
  76                 RETURN(0);
  77         }
  78
  79         /* of the form "[0x0000000240000400 - 0x000000028000400]" */
  80         rc = sscanf(buffer, "[%llx - %llx]\n",
  81                     (long long unsigned *)&tmp.lsr_start,
  82                     (long long unsigned *)&tmp.lsr_end);
  83         if (!range_is_sane(&tmp) || range_is_zero(&tmp) ||
  84             tmp.lsr_start < range->lsr_start || tmp.lsr_end > range->lsr_end)
  85                 RETURN(-EINVAL);
  86         *range = tmp;
  87         RETURN(0);
  88 }
  89
  90 static int seq_proc_read_common(char *page, char **start, off_t off,
  91                                 int count, int *eof, void *data,
  92                                 struct lu_seq_range *range)
  93 {
  94         int rc;
  95         ENTRY;
  96
  97         *eof = 1;
  98         rc = snprintf(page, count, "["LPX64" - "LPX64"]:%x:%s\n",
  99                         PRANGE(range));
 100         RETURN(rc);
 101 }
 102
 103 #ifdef HAVE_SERVER_SUPPORT
 104 /*
 105  * Server side procfs stuff.
 106  */
 107 static int
 108 seq_server_proc_write_space(struct file *file, const char *buffer,
 109                             unsigned long count, void *data)
 110 {
 111         struct lu_server_seq *seq = (struct lu_server_seq *)data;
 112         int rc;
 113         ENTRY;
 114
 115         LASSERT(seq != NULL);
 116
 117         mutex_lock(&seq->lss_mutex);
 118         rc = seq_proc_write_common(file, buffer, count,
 119                                    data, &seq->lss_space);
 120         if (rc == 0) {
 121                 CDEBUG(D_INFO, "%s: Space: "DRANGE"\n",
 122                        seq->lss_name, PRANGE(&seq->lss_space));
 123         }
 124
 125         mutex_unlock(&seq->lss_mutex);
 126
 127         RETURN(count);
 128 }
 129
 130 static int
 131 seq_server_proc_read_space(char *page, char **start, off_t off,
 132                            int count, int *eof, void *data)
 133 {
 134         struct lu_server_seq *seq = (struct lu_server_seq *)data;
 135         int rc;
 136         ENTRY;
 137
 138         LASSERT(seq != NULL);
 139
 140         mutex_lock(&seq->lss_mutex);
 141         rc = seq_proc_read_common(page, start, off, count, eof,
 142                                   data, &seq->lss_space);
 143         mutex_unlock(&seq->lss_mutex);
 144
 145         RETURN(rc);
 146 }
 147
 148 static int
 149 seq_server_proc_read_server(char *page, char **start, off_t off,
 150                             int count, int *eof, void *data)
 151 {
 152         struct lu_server_seq *seq = (struct lu_server_seq *)data;
 153         struct client_obd *cli;
 154         int rc;
 155         ENTRY;
 156
 157         LASSERT(seq != NULL);
 158
 159         *eof = 1;
 160         if (seq->lss_cli) {
 161                 if (seq->lss_cli->lcs_exp != NULL) {
 162                         cli = &seq->lss_cli->lcs_exp->exp_obd->u.cli;
 163                         rc = snprintf(page, count, "%s\n",
 164                                       cli->cl_target_uuid.uuid);
 165                 } else {
 166                         rc = snprintf(page, count, "%s\n",
 167                                       seq->lss_cli->lcs_srv->lss_name);
 168                 }
 169         } else {
 170                 rc = snprintf(page, count, "<none>\n");
 171         }
 172
 173         RETURN(rc);
 174 }
 175
 176 static int
 177 seq_server_proc_write_width(struct file *file, const char *buffer,
 178                             unsigned long count, void *data)
 179 {
 180         struct lu_server_seq *seq = (struct lu_server_seq *)data;
 181         int rc, val;
 182         ENTRY;
 183
 184         LASSERT(seq != NULL);
 185
 186         mutex_lock(&seq->lss_mutex);
 187
 188         rc = lprocfs_write_helper(buffer, count, &val);
 189         if (rc != 0) {
 190                 CERROR("%s: invalid width.\n", seq->lss_name);
 191                 GOTO(out_unlock, count = rc);
 192         }
 193
 194         seq->lss_width = val;
 195
 196         CDEBUG(D_INFO, "%s: Width: "LPU64"\n",
 197                seq->lss_name, seq->lss_width);
 198 out_unlock:
 199         mutex_unlock(&seq->lss_mutex);
 200
 201         RETURN(count);
 202 }
 203
 204 static int
 205 seq_server_proc_read_width(char *page, char **start, off_t off,
 206                            int count, int *eof, void *data)
 207 {
 208         struct lu_server_seq *seq = (struct lu_server_seq *)data;
 209         int rc;
 210         ENTRY;
 211
 212         LASSERT(seq != NULL);
 213
 214         mutex_lock(&seq->lss_mutex);
 215         rc = snprintf(page, count, LPU64"\n", seq->lss_width);
 216         mutex_unlock(&seq->lss_mutex);
 217
 218         RETURN(rc);
 219 }
 220
 221 struct lprocfs_vars seq_server_proc_list[] = {
 222         { "space",
 223           seq_server_proc_read_space, seq_server_proc_write_space, NULL },
 224         { "width",
 225           seq_server_proc_read_width, seq_server_proc_write_width, NULL },
 226         { "server",
 227           seq_server_proc_read_server, NULL, NULL },
 228         { NULL }
 229 };
 230
 231 struct fld_seq_param {
 232         struct lu_env           fsp_env;
 233         struct dt_it            *fsp_it;
 234         struct lu_server_fld    *fsp_fld;
 235         struct lu_server_seq    *fsp_seq;
 236         unsigned int            fsp_stop:1;
 237 };
 238
 239 /*
 240  * XXX: below is a copy of the functions in lustre/fld/lproc_fld.c.
 241  * we want to avoid this duplication either by exporting the
 242  * functions or merging fid and fld into a single module.
 243  */
 244 static void *fldb_seq_start(struct seq_file *p, loff_t *pos)
 245 {
 246         struct fld_seq_param    *param = p->private;
 247         struct lu_server_fld    *fld;
 248         struct dt_object        *obj;
 249         const struct dt_it_ops  *iops;
 250
 251         if (param == NULL || param->fsp_stop)
 252                 return NULL;
 253
 254         fld = param->fsp_fld;
 255         obj = fld->lsf_obj;
 256         LASSERT(obj != NULL);
 257         iops = &obj->do_index_ops->dio_it;
 258
 259         iops->load(&param->fsp_env, param->fsp_it, *pos);
 260
 261         *pos = be64_to_cpu(*(__u64 *)iops->key(&param->fsp_env, param->fsp_it));
 262         return param;
 263 }
 264
 265 static void fldb_seq_stop(struct seq_file *p, void *v)
 266 {
 267         struct fld_seq_param    *param = p->private;
 268         const struct dt_it_ops  *iops;
 269         struct lu_server_fld    *fld;
 270         struct dt_object        *obj;
 271
 272         if (param == NULL)
 273                 return;
 274
 275         fld = param->fsp_fld;
 276         obj = fld->lsf_obj;
 277         LASSERT(obj != NULL);
 278         iops = &obj->do_index_ops->dio_it;
 279
 280         iops->put(&param->fsp_env, param->fsp_it);
 281 }
 282
 283 static void *fldb_seq_next(struct seq_file *p, void *v, loff_t *pos)
 284 {
 285         struct fld_seq_param    *param = p->private;
 286         struct lu_server_fld    *fld;
 287         struct dt_object        *obj;
 288         const struct dt_it_ops  *iops;
 289         int                     rc;
 290
 291         if (param == NULL || param->fsp_stop)
 292                 return NULL;
 293
 294         fld = param->fsp_fld;
 295         obj = fld->lsf_obj;
 296         LASSERT(obj != NULL);
 297         iops = &obj->do_index_ops->dio_it;
 298
 299         rc = iops->next(&param->fsp_env, param->fsp_it);
 300         if (rc > 0) {
 301                 param->fsp_stop = 1;
 302                 return NULL;
 303         }
 304
 305         *pos = be64_to_cpu(*(__u64 *)iops->key(&param->fsp_env, param->fsp_it));
 306         return param;
 307 }
 308
 309 static int fldb_seq_show(struct seq_file *p, void *v)
 310 {
 311         struct fld_seq_param    *param = p->private;
 312         struct lu_server_fld    *fld;
 313         struct dt_object        *obj;
 314         const struct dt_it_ops  *iops;
 315         struct lu_seq_range      fld_rec;
 316         int                     rc;
 317
 318         if (param == NULL || param->fsp_stop)
 319                 return 0;
 320
 321         fld = param->fsp_fld;
 322         obj = fld->lsf_obj;
 323         LASSERT(obj != NULL);
 324         iops = &obj->do_index_ops->dio_it;
 325
 326         rc = iops->rec(&param->fsp_env, param->fsp_it,
 327                        (struct dt_rec *)&fld_rec, 0);
 328         if (rc != 0) {
 329                 CERROR("%s: read record error: rc = %d\n",
 330                        fld->lsf_name, rc);
 331         } else if (fld_rec.lsr_start != 0) {
 332                 range_be_to_cpu(&fld_rec, &fld_rec);
 333                 rc = seq_printf(p, DRANGE"\n", PRANGE(&fld_rec));
 334         }
 335
 336         return rc;
 337 }
 338
 339 struct seq_operations fldb_sops = {
 340         .start = fldb_seq_start,
 341         .stop = fldb_seq_stop,
 342         .next = fldb_seq_next,
 343         .show = fldb_seq_show,
 344 };
 345
 346 static int fldb_seq_open(struct inode *inode, struct file *file)
 347 {
 348         struct proc_dir_entry   *dp = PDE(inode);
 349         struct seq_file         *seq;
 350         struct lu_server_seq    *ss = (struct lu_server_seq *)dp->data;
 351         struct lu_server_fld    *fld;
 352         struct dt_object        *obj;
 353         const struct dt_it_ops  *iops;
 354         struct fld_seq_param    *param = NULL;
 355         int                     env_init = 0;
 356         int                     rc;
 357
 358         fld = ss->lss_site->ss_server_fld;
 359         LASSERT(fld != NULL);
 360
 361         LPROCFS_ENTRY_CHECK(dp);
 362         rc = seq_open(file, &fldb_sops);
 363         if (rc)
 364                 return rc;
 365
 366         obj = fld->lsf_obj;
 367         if (obj == NULL) {
 368                 seq = file->private_data;
 369                 seq->private = NULL;
 370                 return 0;
 371         }
 372
 373         OBD_ALLOC_PTR(param);
 374         if (param == NULL)
 375                 GOTO(out, rc = -ENOMEM);
 376
 377         rc = lu_env_init(&param->fsp_env, LCT_MD_THREAD);
 378         if (rc != 0)
 379                 GOTO(out, rc);
 380
 381         env_init = 1;
 382         iops = &obj->do_index_ops->dio_it;
 383         param->fsp_it = iops->init(&param->fsp_env, obj, 0, NULL);
 384         if (IS_ERR(param->fsp_it))
 385                 GOTO(out, rc = PTR_ERR(param->fsp_it));
 386
 387         param->fsp_fld = fld;
 388         param->fsp_seq = ss;
 389         param->fsp_stop = 0;
 390
 391         seq = file->private_data;
 392         seq->private = param;
 393 out:
 394         if (rc != 0) {
 395                 if (env_init == 1)
 396                         lu_env_fini(&param->fsp_env);
 397                 if (param != NULL)
 398                         OBD_FREE_PTR(param);
 399         }
 400         return rc;
 401 }
 402
 403 static int fldb_seq_release(struct inode *inode, struct file *file)
 404 {
 405         struct seq_file         *seq = file->private_data;
 406         struct fld_seq_param    *param;
 407         struct lu_server_fld    *fld;
 408         struct dt_object        *obj;
 409         const struct dt_it_ops  *iops;
 410
 411         param = seq->private;
 412         if (param == NULL) {
 413                 lprocfs_seq_release(inode, file);
 414                 return 0;
 415         }
 416
 417         fld = param->fsp_fld;
 418         obj = fld->lsf_obj;
 419         LASSERT(obj != NULL);
 420         iops = &obj->do_index_ops->dio_it;
 421
 422         LASSERT(iops != NULL);
 423         LASSERT(param->fsp_it != NULL);
 424         iops->fini(&param->fsp_env, param->fsp_it);
 425         lu_env_fini(&param->fsp_env);
 426         OBD_FREE_PTR(param);
 427         lprocfs_seq_release(inode, file);
 428
 429         return 0;
 430 }
 431
 432 static ssize_t fldb_seq_write(struct file *file, const char *buf,
 433                               size_t len, loff_t *off)
 434 {
 435         struct seq_file         *seq = file->private_data;
 436         struct fld_seq_param    *param;
 437         struct lu_seq_range      range;
 438         int                      rc = 0;
 439         char                    *buffer, *_buffer;
 440         ENTRY;
 441
 442         param = seq->private;
 443         if (param == NULL)
 444                 RETURN(-EINVAL);
 445
 446         OBD_ALLOC(buffer, len + 1);
 447         if (buffer == NULL)
 448                 RETURN(-ENOMEM);
 449         memcpy(buffer, buf, len);
 450         buffer[len] = 0;
 451         _buffer = buffer;
 452
 453         /*
 454          * format - [0x0000000200000007-0x0000000200000008):0:mdt
 455          */
 456         if (*buffer != '[')
 457                 GOTO(out, rc = -EINVAL);
 458         buffer++;
 459
 460         range.lsr_start = simple_strtoull(buffer, &buffer, 0);
 461         if (*buffer != '-')
 462                 GOTO(out, rc = -EINVAL);
 463         buffer++;
 464
 465         range.lsr_end = simple_strtoull(buffer, &buffer, 0);
 466         if (*buffer != ')')
 467                 GOTO(out, rc = -EINVAL);
 468         buffer++;
 469         if (*buffer != ':')
 470                 GOTO(out, rc = -EINVAL);
 471         buffer++;
 472
 473         range.lsr_index = simple_strtoul(buffer, &buffer, 0);
 474         if (*buffer != ':')
 475                 GOTO(out, rc = -EINVAL);
 476         buffer++;
 477
 478         if (strncmp(buffer, "mdt", 3) == 0)
 479                 range.lsr_flags = LU_SEQ_RANGE_MDT;
 480         else if (strncmp(buffer, "ost", 3) == 0)
 481                 range.lsr_flags = LU_SEQ_RANGE_OST;
 482         else
 483                 GOTO(out, rc = -EINVAL);
 484
 485         rc = seq_server_alloc_spec(param->fsp_seq->lss_site->ss_control_seq,
 486                                    &range, &param->fsp_env);
 487
 488 out:
 489         OBD_FREE(_buffer, len + 1);
 490         RETURN(rc < 0 ? rc : len);
 491 }
 492
 493 const struct file_operations seq_fld_proc_seq_fops = {
 494         .owner   = THIS_MODULE,
 495         .open    = fldb_seq_open,
 496         .read    = seq_read,
 497         .write   = fldb_seq_write,
 498         .release = fldb_seq_release,
 499 };
 500
 501 #endif /* HAVE_SERVER_SUPPORT */
 502
 503 /* Client side procfs stuff */
 504 static int
 505 seq_client_proc_write_space(struct file *file, const char *buffer,
 506                             unsigned long count, void *data)
 507 {
 508         struct lu_client_seq *seq = (struct lu_client_seq *)data;
 509         int rc;
 510         ENTRY;
 511
 512         LASSERT(seq != NULL);
 513
 514         mutex_lock(&seq->lcs_mutex);
 515         rc = seq_proc_write_common(file, buffer, count,
 516                                    data, &seq->lcs_space);
 517
 518         if (rc == 0) {
 519                 CDEBUG(D_INFO, "%s: Space: "DRANGE"\n",
 520                        seq->lcs_name, PRANGE(&seq->lcs_space));
 521         }
 522
 523         mutex_unlock(&seq->lcs_mutex);
 524
 525         RETURN(count);
 526 }
 527
 528 static int
 529 seq_client_proc_read_space(char *page, char **start, off_t off,
 530                            int count, int *eof, void *data)
 531 {
 532         struct lu_client_seq *seq = (struct lu_client_seq *)data;
 533         int rc;
 534         ENTRY;
 535
 536         LASSERT(seq != NULL);
 537
 538         mutex_lock(&seq->lcs_mutex);
 539         rc = seq_proc_read_common(page, start, off, count, eof,
 540                                   data, &seq->lcs_space);
 541         mutex_unlock(&seq->lcs_mutex);
 542
 543         RETURN(rc);
 544 }
 545
 546 static int
 547 seq_client_proc_write_width(struct file *file, const char *buffer,
 548                             unsigned long count, void *data)
 549 {
 550         struct lu_client_seq *seq = (struct lu_client_seq *)data;
 551         __u64  max;
 552         int rc, val;
 553         ENTRY;
 554
 555         LASSERT(seq != NULL);
 556
 557         mutex_lock(&seq->lcs_mutex);
 558
 559         rc = lprocfs_write_helper(buffer, count, &val);
 560         if (rc) {
 561                 mutex_unlock(&seq->lcs_mutex);
 562                 RETURN(rc);
 563         }
 564
 565         if (seq->lcs_type == LUSTRE_SEQ_DATA)
 566                 max = LUSTRE_DATA_SEQ_MAX_WIDTH;
 567         else
 568                 max = LUSTRE_METADATA_SEQ_MAX_WIDTH;
 569
 570         if (val <= max && val > 0) {
 571                 seq->lcs_width = val;
 572
 573                 if (rc == 0) {
 574                         CDEBUG(D_INFO, "%s: Sequence size: "LPU64"\n",
 575                                seq->lcs_name, seq->lcs_width);
 576                 }
 577         }
 578
 579         mutex_unlock(&seq->lcs_mutex);
 580
 581         RETURN(count);
 582 }
 583
 584 static int
 585 seq_client_proc_read_width(char *page, char **start, off_t off,
 586                            int count, int *eof, void *data)
 587 {
 588         struct lu_client_seq *seq = (struct lu_client_seq *)data;
 589         int rc;
 590         ENTRY;
 591
 592         LASSERT(seq != NULL);
 593
 594         mutex_lock(&seq->lcs_mutex);
 595         rc = snprintf(page, count, LPU64"\n", seq->lcs_width);
 596         mutex_unlock(&seq->lcs_mutex);
 597
 598         RETURN(rc);
 599 }
 600
 601 static int
 602 seq_client_proc_read_fid(char *page, char **start, off_t off,
 603                          int count, int *eof, void *data)
 604 {
 605         struct lu_client_seq *seq = (struct lu_client_seq *)data;
 606         int rc;
 607         ENTRY;
 608
 609         LASSERT(seq != NULL);
 610
 611         mutex_lock(&seq->lcs_mutex);
 612         rc = snprintf(page, count, DFID"\n", PFID(&seq->lcs_fid));
 613         mutex_unlock(&seq->lcs_mutex);
 614
 615         RETURN(rc);
 616 }
 617
 618 static int
 619 seq_client_proc_read_server(char *page, char **start, off_t off,
 620                             int count, int *eof, void *data)
 621 {
 622         struct lu_client_seq *seq = (struct lu_client_seq *)data;
 623         struct client_obd *cli;
 624         int rc;
 625         ENTRY;
 626
 627         LASSERT(seq != NULL);
 628
 629         if (seq->lcs_exp != NULL) {
 630                 cli = &seq->lcs_exp->exp_obd->u.cli;
 631                 rc = snprintf(page, count, "%s\n", cli->cl_target_uuid.uuid);
 632         } else {
 633                 rc = snprintf(page, count, "%s\n", seq->lcs_srv->lss_name);
 634         }
 635         RETURN(rc);
 636 }
 637
 638 struct lprocfs_vars seq_client_proc_list[] = {
 639         { "space",    seq_client_proc_read_space, seq_client_proc_write_space, NULL },
 640         { "width",    seq_client_proc_read_width, seq_client_proc_write_width, NULL },
 641         { "server",   seq_client_proc_read_server, NULL, NULL },
 642         { "fid",      seq_client_proc_read_fid, NULL, NULL },
 643         { NULL }};
 644 #endif