4 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
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.
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).
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
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
27 * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
28 * Use is subject to license terms.
31 * This file is part of Lustre, http://www.lustre.org/
32 * Lustre is a trademark of Sun Microsystems, Inc.
34 * lnet/selftest/brw_test.c
36 * Author: Isaac Huang <isaac@clusterfs.com>
41 static int brw_srv_workitems = SFW_TEST_WI_MAX;
42 CFS_MODULE_PARM(brw_srv_workitems, "i", int, 0644, "# BRW server workitems");
44 static int brw_inject_errors;
45 CFS_MODULE_PARM(brw_inject_errors, "i", int, 0644,
46 "# data errors to inject randomly, zero by default");
49 brw_client_fini (sfw_test_instance_t *tsi)
54 LASSERT (tsi->tsi_is_client);
56 cfs_list_for_each_entry_typed (tsu, &tsi->tsi_units,
57 sfw_test_unit_t, tsu_list) {
58 bulk = tsu->tsu_private;
59 if (bulk == NULL) continue;
62 tsu->tsu_private = NULL;
67 brw_client_init (sfw_test_instance_t *tsi)
69 sfw_session_t *sn = tsi->tsi_batch->bat_session;
78 LASSERT(tsi->tsi_is_client);
80 if ((sn->sn_features & LST_FEAT_BULK_LEN) == 0) {
81 test_bulk_req_t *breq = &tsi->tsi_u.bulk_v0;
84 flags = breq->blk_flags;
86 /* NB: this is not going to work for variable page size,
87 * but we have to keep it for compatibility */
88 len = npg * CFS_PAGE_SIZE;
91 test_bulk_req_v1_t *breq = &tsi->tsi_u.bulk_v1;
93 /* I should never get this step if it's unknown feature
94 * because make_session will reject unknown feature */
95 LASSERT((sn->sn_features & ~LST_FEATS_MASK) == 0);
98 flags = breq->blk_flags;
100 npg = (len + CFS_PAGE_SIZE - 1) >> CFS_PAGE_SHIFT;
103 if (npg > LNET_MAX_IOV || npg <= 0)
106 if (opc != LST_BRW_READ && opc != LST_BRW_WRITE)
109 if (flags != LST_BRW_CHECK_NONE &&
110 flags != LST_BRW_CHECK_FULL && flags != LST_BRW_CHECK_SIMPLE)
113 cfs_list_for_each_entry_typed(tsu, &tsi->tsi_units,
114 sfw_test_unit_t, tsu_list) {
115 bulk = srpc_alloc_bulk(lnet_cpt_of_nid(tsu->tsu_dest.nid),
116 npg, len, opc == LST_BRW_READ);
118 brw_client_fini(tsi);
122 tsu->tsu_private = bulk;
128 #define BRW_POISON 0xbeefbeefbeefbeefULL
129 #define BRW_MAGIC 0xeeb0eeb1eeb2eeb3ULL
130 #define BRW_MSIZE sizeof(__u64)
133 brw_inject_one_error (void)
137 if (brw_inject_errors <= 0) return 0;
140 gettimeofday(&tv, NULL);
142 cfs_gettimeofday(&tv);
145 if ((tv.tv_usec & 1) == 0) return 0;
147 return brw_inject_errors--;
151 brw_fill_page (cfs_page_t *pg, int pattern, __u64 magic)
153 char *addr = cfs_page_address(pg);
156 LASSERT (addr != NULL);
158 if (pattern == LST_BRW_CHECK_NONE) return;
160 if (magic == BRW_MAGIC)
161 magic += brw_inject_one_error();
163 if (pattern == LST_BRW_CHECK_SIMPLE) {
164 memcpy(addr, &magic, BRW_MSIZE);
165 addr += CFS_PAGE_SIZE - BRW_MSIZE;
166 memcpy(addr, &magic, BRW_MSIZE);
170 if (pattern == LST_BRW_CHECK_FULL) {
171 for (i = 0; i < CFS_PAGE_SIZE / BRW_MSIZE; i++)
172 memcpy(addr + i * BRW_MSIZE, &magic, BRW_MSIZE);
181 brw_check_page (cfs_page_t *pg, int pattern, __u64 magic)
183 char *addr = cfs_page_address(pg);
184 __u64 data = 0; /* make compiler happy */
187 LASSERT (addr != NULL);
189 if (pattern == LST_BRW_CHECK_NONE)
192 if (pattern == LST_BRW_CHECK_SIMPLE) {
193 data = *((__u64 *) addr);
194 if (data != magic) goto bad_data;
196 addr += CFS_PAGE_SIZE - BRW_MSIZE;
197 data = *((__u64 *) addr);
198 if (data != magic) goto bad_data;
203 if (pattern == LST_BRW_CHECK_FULL) {
204 for (i = 0; i < CFS_PAGE_SIZE / BRW_MSIZE; i++) {
205 data = *(((__u64 *) addr) + i);
206 if (data != magic) goto bad_data;
215 CERROR ("Bad data in page %p: "LPX64", "LPX64" expected\n",
221 brw_fill_bulk (srpc_bulk_t *bk, int pattern, __u64 magic)
226 for (i = 0; i < bk->bk_niov; i++) {
228 pg = bk->bk_iovs[i].kiov_page;
230 LASSERT (bk->bk_pages != NULL);
231 pg = bk->bk_pages[i];
233 brw_fill_page(pg, pattern, magic);
238 brw_check_bulk (srpc_bulk_t *bk, int pattern, __u64 magic)
243 for (i = 0; i < bk->bk_niov; i++) {
245 pg = bk->bk_iovs[i].kiov_page;
247 LASSERT (bk->bk_pages != NULL);
248 pg = bk->bk_pages[i];
250 if (brw_check_page(pg, pattern, magic) != 0) {
251 CERROR ("Bulk page %p (%d/%d) is corrupted!\n",
261 brw_client_prep_rpc (sfw_test_unit_t *tsu,
262 lnet_process_id_t dest, srpc_client_rpc_t **rpcpp)
264 srpc_bulk_t *bulk = tsu->tsu_private;
265 sfw_test_instance_t *tsi = tsu->tsu_instance;
266 sfw_session_t *sn = tsi->tsi_batch->bat_session;
267 srpc_client_rpc_t *rpc;
268 srpc_brw_reqst_t *req;
276 LASSERT(bulk != NULL);
278 if ((sn->sn_features & LST_FEAT_BULK_LEN) == 0) {
279 test_bulk_req_t *breq = &tsi->tsi_u.bulk_v0;
282 flags = breq->blk_flags;
284 len = npg * CFS_PAGE_SIZE;
287 test_bulk_req_v1_t *breq = &tsi->tsi_u.bulk_v1;
289 /* I should never get this step if it's unknown feature
290 * because make_session will reject unknown feature */
291 LASSERT((sn->sn_features & ~LST_FEATS_MASK) == 0);
294 flags = breq->blk_flags;
296 npg = (len + CFS_PAGE_SIZE - 1) >> CFS_PAGE_SHIFT;
299 rc = sfw_create_test_rpc(tsu, dest, sn->sn_features, npg, len, &rpc);
303 memcpy(&rpc->crpc_bulk, bulk, offsetof(srpc_bulk_t, bk_iovs[npg]));
304 if (opc == LST_BRW_WRITE)
305 brw_fill_bulk(&rpc->crpc_bulk, flags, BRW_MAGIC);
307 brw_fill_bulk(&rpc->crpc_bulk, flags, BRW_POISON);
309 req = &rpc->crpc_reqstmsg.msg_body.brw_reqst;
310 req->brw_flags = flags;
319 brw_client_done_rpc (sfw_test_unit_t *tsu, srpc_client_rpc_t *rpc)
321 __u64 magic = BRW_MAGIC;
322 sfw_test_instance_t *tsi = tsu->tsu_instance;
323 sfw_session_t *sn = tsi->tsi_batch->bat_session;
324 srpc_msg_t *msg = &rpc->crpc_replymsg;
325 srpc_brw_reply_t *reply = &msg->msg_body.brw_reply;
326 srpc_brw_reqst_t *reqst = &rpc->crpc_reqstmsg.msg_body.brw_reqst;
328 LASSERT (sn != NULL);
330 if (rpc->crpc_status != 0) {
331 CERROR ("BRW RPC to %s failed with %d\n",
332 libcfs_id2str(rpc->crpc_dest), rpc->crpc_status);
333 if (!tsi->tsi_stopping) /* rpc could have been aborted */
334 cfs_atomic_inc(&sn->sn_brw_errors);
338 if (msg->msg_magic != SRPC_MSG_MAGIC) {
340 __swab32s(&reply->brw_status);
343 CDEBUG (reply->brw_status ? D_WARNING : D_NET,
344 "BRW RPC to %s finished with brw_status: %d\n",
345 libcfs_id2str(rpc->crpc_dest), reply->brw_status);
347 if (reply->brw_status != 0) {
348 cfs_atomic_inc(&sn->sn_brw_errors);
349 rpc->crpc_status = -(int)reply->brw_status;
353 if (reqst->brw_rw == LST_BRW_WRITE) goto out;
355 if (brw_check_bulk(&rpc->crpc_bulk, reqst->brw_flags, magic) != 0) {
356 CERROR ("Bulk data from %s is corrupted!\n",
357 libcfs_id2str(rpc->crpc_dest));
358 cfs_atomic_inc(&sn->sn_brw_errors);
359 rpc->crpc_status = -EBADMSG;
364 rpc->crpc_bulk.bk_pages = NULL;
370 brw_server_rpc_done (srpc_server_rpc_t *rpc)
372 srpc_bulk_t *blk = rpc->srpc_bulk;
374 if (blk == NULL) return;
376 if (rpc->srpc_status != 0)
377 CERROR ("Bulk transfer %s %s has failed: %d\n",
378 blk->bk_sink ? "from" : "to",
379 libcfs_id2str(rpc->srpc_peer), rpc->srpc_status);
381 CDEBUG (D_NET, "Transfered %d pages bulk data %s %s\n",
382 blk->bk_niov, blk->bk_sink ? "from" : "to",
383 libcfs_id2str(rpc->srpc_peer));
389 brw_bulk_ready (srpc_server_rpc_t *rpc, int status)
391 __u64 magic = BRW_MAGIC;
392 srpc_brw_reply_t *reply = &rpc->srpc_replymsg.msg_body.brw_reply;
393 srpc_brw_reqst_t *reqst;
394 srpc_msg_t *reqstmsg;
396 LASSERT (rpc->srpc_bulk != NULL);
397 LASSERT (rpc->srpc_reqstbuf != NULL);
399 reqstmsg = &rpc->srpc_reqstbuf->buf_msg;
400 reqst = &reqstmsg->msg_body.brw_reqst;
403 CERROR ("BRW bulk %s failed for RPC from %s: %d\n",
404 reqst->brw_rw == LST_BRW_READ ? "READ" : "WRITE",
405 libcfs_id2str(rpc->srpc_peer), status);
409 if (reqst->brw_rw == LST_BRW_READ)
412 if (reqstmsg->msg_magic != SRPC_MSG_MAGIC)
415 if (brw_check_bulk(rpc->srpc_bulk, reqst->brw_flags, magic) != 0) {
416 CERROR ("Bulk data from %s is corrupted!\n",
417 libcfs_id2str(rpc->srpc_peer));
418 reply->brw_status = EBADMSG;
425 brw_server_handle(struct srpc_server_rpc *rpc)
427 struct srpc_service *sv = rpc->srpc_scd->scd_svc;
428 srpc_msg_t *replymsg = &rpc->srpc_replymsg;
429 srpc_msg_t *reqstmsg = &rpc->srpc_reqstbuf->buf_msg;
430 srpc_brw_reply_t *reply = &replymsg->msg_body.brw_reply;
431 srpc_brw_reqst_t *reqst = &reqstmsg->msg_body.brw_reqst;
435 LASSERT (sv->sv_id == SRPC_SERVICE_BRW);
437 if (reqstmsg->msg_magic != SRPC_MSG_MAGIC) {
438 LASSERT (reqstmsg->msg_magic == __swab32(SRPC_MSG_MAGIC));
440 __swab32s(&reqst->brw_rw);
441 __swab32s(&reqst->brw_len);
442 __swab32s(&reqst->brw_flags);
443 __swab64s(&reqst->brw_rpyid);
444 __swab64s(&reqst->brw_bulkid);
446 LASSERT (reqstmsg->msg_type == (__u32)srpc_service2request(sv->sv_id));
448 reply->brw_status = 0;
449 rpc->srpc_done = brw_server_rpc_done;
451 if ((reqst->brw_rw != LST_BRW_READ && reqst->brw_rw != LST_BRW_WRITE) ||
452 (reqst->brw_flags != LST_BRW_CHECK_NONE &&
453 reqst->brw_flags != LST_BRW_CHECK_FULL &&
454 reqst->brw_flags != LST_BRW_CHECK_SIMPLE)) {
455 reply->brw_status = EINVAL;
459 if ((reqstmsg->msg_ses_feats & ~LST_FEATS_MASK) != 0) {
460 replymsg->msg_ses_feats = LST_FEATS_MASK;
461 reply->brw_status = EPROTO;
465 if ((reqstmsg->msg_ses_feats & LST_FEAT_BULK_LEN) == 0) {
466 /* compat with old version */
467 if ((reqst->brw_len & ~CFS_PAGE_MASK) != 0) {
468 reply->brw_status = EINVAL;
471 npg = reqst->brw_len >> CFS_PAGE_SHIFT;
474 npg = (reqst->brw_len + CFS_PAGE_SIZE - 1) >> CFS_PAGE_SHIFT;
477 replymsg->msg_ses_feats = reqstmsg->msg_ses_feats;
479 if (reqst->brw_len == 0 || npg > LNET_MAX_IOV) {
480 reply->brw_status = EINVAL;
484 rc = sfw_alloc_pages(rpc, rpc->srpc_scd->scd_cpt, npg,
486 reqst->brw_rw == LST_BRW_WRITE);
490 if (reqst->brw_rw == LST_BRW_READ)
491 brw_fill_bulk(rpc->srpc_bulk, reqst->brw_flags, BRW_MAGIC);
493 brw_fill_bulk(rpc->srpc_bulk, reqst->brw_flags, BRW_POISON);
498 sfw_test_client_ops_t brw_test_client;
499 void brw_init_test_client(void)
501 brw_test_client.tso_init = brw_client_init;
502 brw_test_client.tso_fini = brw_client_fini;
503 brw_test_client.tso_prep_rpc = brw_client_prep_rpc;
504 brw_test_client.tso_done_rpc = brw_client_done_rpc;
507 srpc_service_t brw_test_service;
508 void brw_init_test_service(void)
513 s = getenv("BRW_INJECT_ERRORS");
514 brw_inject_errors = s != NULL ? atoi(s) : brw_inject_errors;
517 brw_test_service.sv_id = SRPC_SERVICE_BRW;
518 brw_test_service.sv_name = "brw_test";
519 brw_test_service.sv_handler = brw_server_handle;
520 brw_test_service.sv_bulk_ready = brw_bulk_ready;
521 brw_test_service.sv_wi_total = brw_srv_workitems;