lnet/selftest/brw_test.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) 2012, 2015, 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  * lnet/selftest/brw_test.c
  37  *
  38  * Author: Isaac Huang <isaac@clusterfs.com>
  39  */
  40
  41 #include "selftest.h"
  42
  43 static int brw_srv_workitems = SFW_TEST_WI_MAX;
  44 module_param(brw_srv_workitems, int, 0644);
  45 MODULE_PARM_DESC(brw_srv_workitems, "# BRW server workitems");
  46
  47 static int brw_inject_errors;
  48 module_param(brw_inject_errors, int, 0644);
  49 MODULE_PARM_DESC(brw_inject_errors, "# data errors to inject randomly, zero by default");
  50
  51 #define BRW_POISON      0xbeefbeefbeefbeefULL
  52 #define BRW_MAGIC       0xeeb0eeb1eeb2eeb3ULL
  53 #define BRW_MSIZE       sizeof(__u64)
  54
  55 static void
  56 brw_client_fini (sfw_test_instance_t *tsi)
  57 {
  58         srpc_bulk_t     *bulk;
  59         sfw_test_unit_t *tsu;
  60
  61         LASSERT(tsi->tsi_is_client);
  62
  63         list_for_each_entry(tsu, &tsi->tsi_units, tsu_list) {
  64                 bulk = tsu->tsu_private;
  65                 if (bulk == NULL)
  66                         continue;
  67
  68                 srpc_free_bulk(bulk);
  69                 tsu->tsu_private = NULL;
  70         }
  71 }
  72
  73 static int
  74 brw_client_init (sfw_test_instance_t *tsi)
  75 {
  76         sfw_session_t    *sn = tsi->tsi_batch->bat_session;
  77         int               flags;
  78         int               off;
  79         int               npg;
  80         int               len;
  81         int               opc;
  82         srpc_bulk_t      *bulk;
  83         sfw_test_unit_t  *tsu;
  84
  85         LASSERT(sn != NULL);
  86         LASSERT(tsi->tsi_is_client);
  87
  88         if ((sn->sn_features & LST_FEAT_BULK_LEN) == 0) {
  89                 test_bulk_req_t  *breq = &tsi->tsi_u.bulk_v0;
  90
  91                 opc   = breq->blk_opc;
  92                 flags = breq->blk_flags;
  93                 npg   = breq->blk_npg;
  94                 /* NB: this is not going to work for variable page size,
  95                  * but we have to keep it for compatibility */
  96                 len   = npg * PAGE_SIZE;
  97                 off   = 0;
  98
  99         } else {
 100                 test_bulk_req_v1_t  *breq = &tsi->tsi_u.bulk_v1;
 101
 102                 /* I should never get this step if it's unknown feature
 103                  * because make_session will reject unknown feature */
 104                 LASSERT((sn->sn_features & ~LST_FEATS_MASK) == 0);
 105
 106                 opc   = breq->blk_opc;
 107                 flags = breq->blk_flags;
 108                 len   = breq->blk_len;
 109                 off   = breq->blk_offset & ~PAGE_MASK;
 110                 npg   = (off + len + PAGE_SIZE - 1) >> PAGE_SHIFT;
 111         }
 112
 113         if (off % BRW_MSIZE != 0)
 114                 return -EINVAL;
 115
 116         if (npg > LNET_MAX_IOV || npg <= 0)
 117                 return -EINVAL;
 118
 119         if (opc != LST_BRW_READ && opc != LST_BRW_WRITE)
 120                 return -EINVAL;
 121
 122         if (flags != LST_BRW_CHECK_NONE &&
 123             flags != LST_BRW_CHECK_FULL && flags != LST_BRW_CHECK_SIMPLE)
 124                 return -EINVAL;
 125
 126         list_for_each_entry(tsu, &tsi->tsi_units, tsu_list) {
 127                 bulk = srpc_alloc_bulk(lnet_cpt_of_nid(tsu->tsu_dest.nid),
 128                                        off, npg, len, opc == LST_BRW_READ);
 129                 if (bulk == NULL) {
 130                         brw_client_fini(tsi);
 131                         return -ENOMEM;
 132                 }
 133
 134                 tsu->tsu_private = bulk;
 135         }
 136
 137         return 0;
 138 }
 139
 140 #define BRW_POISON      0xbeefbeefbeefbeefULL
 141 #define BRW_MAGIC       0xeeb0eeb1eeb2eeb3ULL
 142 #define BRW_MSIZE       sizeof(__u64)
 143
 144 int brw_inject_one_error(void)
 145 {
 146         struct timeval tv;
 147
 148         if (brw_inject_errors <= 0) return 0;
 149
 150         do_gettimeofday(&tv);
 151
 152         if ((tv.tv_usec & 1) == 0) return 0;
 153
 154         return brw_inject_errors--;
 155 }
 156
 157 static void
 158 brw_fill_page(struct page *pg, int off, int len, int pattern, __u64 magic)
 159 {
 160         char *addr = page_address(pg) + off;
 161         int   i;
 162
 163         LASSERT(addr != NULL);
 164         LASSERT(off % BRW_MSIZE == 0 && len % BRW_MSIZE == 0);
 165
 166         if (pattern == LST_BRW_CHECK_NONE)
 167                 return;
 168
 169         if (magic == BRW_MAGIC)
 170                 magic += brw_inject_one_error();
 171
 172         if (pattern == LST_BRW_CHECK_SIMPLE) {
 173                 memcpy(addr, &magic, BRW_MSIZE);
 174                 if (len > BRW_MSIZE) {
 175                         addr += len - BRW_MSIZE;
 176                         memcpy(addr, &magic, BRW_MSIZE);
 177                 }
 178                 return;
 179         }
 180
 181         if (pattern == LST_BRW_CHECK_FULL) {
 182                 for (i = 0; i < len; i += BRW_MSIZE)
 183                         memcpy(addr + i, &magic, BRW_MSIZE);
 184                 return;
 185         }
 186         LBUG();
 187 }
 188
 189 static int
 190 brw_check_page(struct page *pg, int off, int len, int pattern, __u64 magic)
 191 {
 192         char  *addr = page_address(pg) + off;
 193         __u64  data = 0; /* make compiler happy */
 194         int    i;
 195
 196         LASSERT(addr != NULL);
 197         LASSERT(off % BRW_MSIZE == 0 && len % BRW_MSIZE == 0);
 198
 199         if (pattern == LST_BRW_CHECK_NONE)
 200                 return 0;
 201
 202         if (pattern == LST_BRW_CHECK_SIMPLE) {
 203                 data = *((__u64 *) addr);
 204                 if (data != magic)
 205                         goto bad_data;
 206
 207                 if (len > BRW_MSIZE) {
 208                         addr += len - BRW_MSIZE;
 209                         data = *((__u64 *) addr);
 210                         if (data != magic)
 211                                 goto bad_data;
 212                 }
 213                 return 0;
 214         }
 215
 216         if (pattern == LST_BRW_CHECK_FULL) {
 217                 for (i = 0; i < len; i += BRW_MSIZE) {
 218                         data = *(__u64 *)(addr + i);
 219                         if (data != magic)
 220                                 goto bad_data;
 221                 }
 222                 return 0;
 223         }
 224
 225         LBUG();
 226
 227 bad_data:
 228         CERROR ("Bad data in page %p: %#llx, %#llx expected\n",
 229                 pg, data, magic);
 230         return 1;
 231 }
 232
 233 static void
 234 brw_fill_bulk(srpc_bulk_t *bk, int pattern, __u64 magic)
 235 {
 236         int          i;
 237         struct page *pg;
 238
 239         for (i = 0; i < bk->bk_niov; i++) {
 240                 int     off;
 241                 int     len;
 242
 243                 pg = bk->bk_iovs[i].kiov_page;
 244                 off = bk->bk_iovs[i].kiov_offset;
 245                 len = bk->bk_iovs[i].kiov_len;
 246                 brw_fill_page(pg, off, len, pattern, magic);
 247         }
 248 }
 249
 250 static int
 251 brw_check_bulk(srpc_bulk_t *bk, int pattern, __u64 magic)
 252 {
 253         int          i;
 254         struct page *pg;
 255
 256         for (i = 0; i < bk->bk_niov; i++) {
 257                 int     off;
 258                 int     len;
 259
 260                 pg = bk->bk_iovs[i].kiov_page;
 261                 off = bk->bk_iovs[i].kiov_offset;
 262                 len = bk->bk_iovs[i].kiov_len;
 263                 if (brw_check_page(pg, off, len, pattern, magic) != 0) {
 264                         CERROR("Bulk page %p (%d/%d) is corrupted!\n",
 265                                pg, i, bk->bk_niov);
 266                         return 1;
 267                 }
 268         }
 269
 270         return 0;
 271 }
 272
 273 static int
 274 brw_client_prep_rpc(sfw_test_unit_t *tsu,
 275                     lnet_process_id_t dest, srpc_client_rpc_t **rpcpp)
 276 {
 277         srpc_bulk_t         *bulk = tsu->tsu_private;
 278         sfw_test_instance_t *tsi = tsu->tsu_instance;
 279         sfw_session_t       *sn = tsi->tsi_batch->bat_session;
 280         srpc_client_rpc_t   *rpc;
 281         srpc_brw_reqst_t    *req;
 282         int                  flags;
 283         int                  npg;
 284         int                  len;
 285         int                  opc;
 286         int                  rc;
 287
 288         LASSERT(sn != NULL);
 289         LASSERT(bulk != NULL);
 290
 291         if ((sn->sn_features & LST_FEAT_BULK_LEN) == 0) {
 292                 test_bulk_req_t *breq = &tsi->tsi_u.bulk_v0;
 293
 294                 opc   = breq->blk_opc;
 295                 flags = breq->blk_flags;
 296                 npg   = breq->blk_npg;
 297                 len   = npg * PAGE_SIZE;
 298
 299         } else {
 300                 test_bulk_req_v1_t  *breq = &tsi->tsi_u.bulk_v1;
 301                 int                  off;
 302
 303                 /* I should never get this step if it's unknown feature
 304                  * because make_session will reject unknown feature */
 305                 LASSERT((sn->sn_features & ~LST_FEATS_MASK) == 0);
 306
 307                 opc   = breq->blk_opc;
 308                 flags = breq->blk_flags;
 309                 len   = breq->blk_len;
 310                 off   = breq->blk_offset;
 311                 npg   = (off + len + PAGE_SIZE - 1) >> PAGE_SHIFT;
 312         }
 313
 314         rc = sfw_create_test_rpc(tsu, dest, sn->sn_features, npg, len, &rpc);
 315         if (rc != 0)
 316                 return rc;
 317
 318         memcpy(&rpc->crpc_bulk, bulk, offsetof(srpc_bulk_t, bk_iovs[npg]));
 319         if (opc == LST_BRW_WRITE)
 320                 brw_fill_bulk(&rpc->crpc_bulk, flags, BRW_MAGIC);
 321         else
 322                 brw_fill_bulk(&rpc->crpc_bulk, flags, BRW_POISON);
 323
 324         req = &rpc->crpc_reqstmsg.msg_body.brw_reqst;
 325         req->brw_flags = flags;
 326         req->brw_rw    = opc;
 327         req->brw_len   = len;
 328
 329         *rpcpp = rpc;
 330         return 0;
 331 }
 332
 333 static void
 334 brw_client_done_rpc(sfw_test_unit_t *tsu, srpc_client_rpc_t *rpc)
 335 {
 336         __u64                magic = BRW_MAGIC;
 337         sfw_test_instance_t *tsi = tsu->tsu_instance;
 338         sfw_session_t       *sn = tsi->tsi_batch->bat_session;
 339         srpc_msg_t          *msg = &rpc->crpc_replymsg;
 340         srpc_brw_reply_t    *reply = &msg->msg_body.brw_reply;
 341         srpc_brw_reqst_t    *reqst = &rpc->crpc_reqstmsg.msg_body.brw_reqst;
 342
 343         LASSERT(sn != NULL);
 344
 345         if (rpc->crpc_status != 0) {
 346                 CERROR("BRW RPC to %s failed with %d\n",
 347                        libcfs_id2str(rpc->crpc_dest), rpc->crpc_status);
 348                 if (!tsi->tsi_stopping) /* rpc could have been aborted */
 349                         atomic_inc(&sn->sn_brw_errors);
 350                 return;
 351         }
 352
 353         if (msg->msg_magic != SRPC_MSG_MAGIC) {
 354                 __swab64s(&magic);
 355                 __swab32s(&reply->brw_status);
 356         }
 357
 358         CDEBUG(reply->brw_status ? D_WARNING : D_NET,
 359                "BRW RPC to %s finished with brw_status: %d\n",
 360                libcfs_id2str(rpc->crpc_dest), reply->brw_status);
 361
 362         if (reply->brw_status != 0) {
 363                 atomic_inc(&sn->sn_brw_errors);
 364                 rpc->crpc_status = -(int)reply->brw_status;
 365                 return;
 366         }
 367
 368         if (reqst->brw_rw == LST_BRW_WRITE)
 369                 return;
 370
 371         if (brw_check_bulk(&rpc->crpc_bulk, reqst->brw_flags, magic) != 0) {
 372                 CERROR("Bulk data from %s is corrupted!\n",
 373                        libcfs_id2str(rpc->crpc_dest));
 374                 atomic_inc(&sn->sn_brw_errors);
 375                 rpc->crpc_status = -EBADMSG;
 376         }
 377
 378         return;
 379 }
 380
 381 static void
 382 brw_server_rpc_done(srpc_server_rpc_t *rpc)
 383 {
 384         srpc_bulk_t *blk = rpc->srpc_bulk;
 385
 386         if (blk == NULL)
 387                 return;
 388
 389         if (rpc->srpc_status != 0)
 390                 CERROR("Bulk transfer %s %s has failed: %d\n",
 391                        blk->bk_sink ? "from" : "to",
 392                        libcfs_id2str(rpc->srpc_peer), rpc->srpc_status);
 393         else
 394                 CDEBUG(D_NET, "Transferred %d pages bulk data %s %s\n",
 395                        blk->bk_niov, blk->bk_sink ? "from" : "to",
 396                        libcfs_id2str(rpc->srpc_peer));
 397
 398         sfw_free_pages(rpc);
 399 }
 400
 401 static int
 402 brw_bulk_ready(srpc_server_rpc_t *rpc, int status)
 403 {
 404         __u64             magic = BRW_MAGIC;
 405         srpc_brw_reply_t *reply = &rpc->srpc_replymsg.msg_body.brw_reply;
 406         srpc_brw_reqst_t *reqst;
 407         srpc_msg_t       *reqstmsg;
 408
 409         LASSERT (rpc->srpc_bulk != NULL);
 410         LASSERT (rpc->srpc_reqstbuf != NULL);
 411
 412         reqstmsg = &rpc->srpc_reqstbuf->buf_msg;
 413         reqst = &reqstmsg->msg_body.brw_reqst;
 414
 415         if (status != 0) {
 416                 CERROR ("BRW bulk %s failed for RPC from %s: %d\n",
 417                         reqst->brw_rw == LST_BRW_READ ? "READ" : "WRITE",
 418                         libcfs_id2str(rpc->srpc_peer), status);
 419                 return -EIO;
 420         }
 421
 422         if (reqst->brw_rw == LST_BRW_READ)
 423                 return 0;
 424
 425         if (reqstmsg->msg_magic != SRPC_MSG_MAGIC)
 426                 __swab64s(&magic);
 427
 428         if (brw_check_bulk(rpc->srpc_bulk, reqst->brw_flags, magic) != 0) {
 429                 CERROR ("Bulk data from %s is corrupted!\n",
 430                         libcfs_id2str(rpc->srpc_peer));
 431                 reply->brw_status = EBADMSG;
 432         }
 433
 434         return 0;
 435 }
 436
 437 static int
 438 brw_server_handle(struct srpc_server_rpc *rpc)
 439 {
 440         struct srpc_service     *sv = rpc->srpc_scd->scd_svc;
 441         srpc_msg_t       *replymsg = &rpc->srpc_replymsg;
 442         srpc_msg_t       *reqstmsg = &rpc->srpc_reqstbuf->buf_msg;
 443         srpc_brw_reply_t *reply = &replymsg->msg_body.brw_reply;
 444         srpc_brw_reqst_t *reqst = &reqstmsg->msg_body.brw_reqst;
 445         int               npg;
 446         int               rc;
 447
 448         LASSERT (sv->sv_id == SRPC_SERVICE_BRW);
 449
 450         if (reqstmsg->msg_magic != SRPC_MSG_MAGIC) {
 451                 LASSERT (reqstmsg->msg_magic == __swab32(SRPC_MSG_MAGIC));
 452
 453                 __swab32s(&reqst->brw_rw);
 454                 __swab32s(&reqst->brw_len);
 455                 __swab32s(&reqst->brw_flags);
 456                 __swab64s(&reqst->brw_rpyid);
 457                 __swab64s(&reqst->brw_bulkid);
 458         }
 459         LASSERT (reqstmsg->msg_type == (__u32)srpc_service2request(sv->sv_id));
 460
 461         reply->brw_status = 0;
 462         rpc->srpc_done = brw_server_rpc_done;
 463
 464         if ((reqst->brw_rw != LST_BRW_READ && reqst->brw_rw != LST_BRW_WRITE) ||
 465             (reqst->brw_flags != LST_BRW_CHECK_NONE &&
 466              reqst->brw_flags != LST_BRW_CHECK_FULL &&
 467              reqst->brw_flags != LST_BRW_CHECK_SIMPLE)) {
 468                 reply->brw_status = EINVAL;
 469                 return 0;
 470         }
 471
 472         if ((reqstmsg->msg_ses_feats & ~LST_FEATS_MASK) != 0) {
 473                 replymsg->msg_ses_feats = LST_FEATS_MASK;
 474                 reply->brw_status = EPROTO;
 475                 return 0;
 476         }
 477
 478         if ((reqstmsg->msg_ses_feats & LST_FEAT_BULK_LEN) == 0) {
 479                 /* compat with old version */
 480                 if ((reqst->brw_len & ~PAGE_MASK) != 0) {
 481                         reply->brw_status = EINVAL;
 482                         return 0;
 483                 }
 484                 npg = reqst->brw_len >> PAGE_SHIFT;
 485
 486         } else {
 487                 npg = (reqst->brw_len + PAGE_SIZE - 1) >> PAGE_SHIFT;
 488         }
 489
 490         replymsg->msg_ses_feats = reqstmsg->msg_ses_feats;
 491
 492         if (reqst->brw_len == 0 || npg > LNET_MAX_IOV) {
 493                 reply->brw_status = EINVAL;
 494                 return 0;
 495         }
 496
 497         rc = sfw_alloc_pages(rpc, rpc->srpc_scd->scd_cpt, npg,
 498                              reqst->brw_len,
 499                              reqst->brw_rw == LST_BRW_WRITE);
 500         if (rc != 0)
 501                 return rc;
 502
 503         if (reqst->brw_rw == LST_BRW_READ)
 504                 brw_fill_bulk(rpc->srpc_bulk, reqst->brw_flags, BRW_MAGIC);
 505         else
 506                 brw_fill_bulk(rpc->srpc_bulk, reqst->brw_flags, BRW_POISON);
 507
 508         return 0;
 509 }
 510
 511 sfw_test_client_ops_t brw_test_client;
 512 void brw_init_test_client(void)
 513 {
 514         brw_test_client.tso_init       = brw_client_init;
 515         brw_test_client.tso_fini       = brw_client_fini;
 516         brw_test_client.tso_prep_rpc   = brw_client_prep_rpc;
 517         brw_test_client.tso_done_rpc   = brw_client_done_rpc;
 518 };
 519
 520 srpc_service_t brw_test_service;
 521 void brw_init_test_service(void)
 522 {
 523
 524         brw_test_service.sv_id         = SRPC_SERVICE_BRW;
 525         brw_test_service.sv_name       = "brw_test";
 526         brw_test_service.sv_handler    = brw_server_handle;
 527         brw_test_service.sv_bulk_ready = brw_bulk_ready;
 528         brw_test_service.sv_wi_total   = brw_srv_workitems;
 529 }