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.
30 * Copyright (c) 2012, 2013, Intel Corporation.
33 * This file is part of Lustre, http://www.lustre.org/
34 * Lustre is a trademark of Sun Microsystems, Inc.
36 * lnet/selftest/brw_test.c
38 * Author: Isaac Huang <isaac@clusterfs.com>
43 static int brw_srv_workitems = SFW_TEST_WI_MAX;
44 CFS_MODULE_PARM(brw_srv_workitems, "i", int, 0644, "# BRW server workitems");
46 static int brw_inject_errors;
47 CFS_MODULE_PARM(brw_inject_errors, "i", int, 0644,
48 "# data errors to inject randomly, zero by default");
51 brw_client_fini (sfw_test_instance_t *tsi)
56 LASSERT (tsi->tsi_is_client);
58 cfs_list_for_each_entry_typed (tsu, &tsi->tsi_units,
59 sfw_test_unit_t, tsu_list) {
60 bulk = tsu->tsu_private;
61 if (bulk == NULL) continue;
64 tsu->tsu_private = NULL;
69 brw_client_init (sfw_test_instance_t *tsi)
71 sfw_session_t *sn = tsi->tsi_batch->bat_session;
80 LASSERT(tsi->tsi_is_client);
82 if ((sn->sn_features & LST_FEAT_BULK_LEN) == 0) {
83 test_bulk_req_t *breq = &tsi->tsi_u.bulk_v0;
86 flags = breq->blk_flags;
88 /* NB: this is not going to work for variable page size,
89 * but we have to keep it for compatibility */
90 len = npg * PAGE_CACHE_SIZE;
93 test_bulk_req_v1_t *breq = &tsi->tsi_u.bulk_v1;
95 /* I should never get this step if it's unknown feature
96 * because make_session will reject unknown feature */
97 LASSERT((sn->sn_features & ~LST_FEATS_MASK) == 0);
100 flags = breq->blk_flags;
102 npg = (len + PAGE_CACHE_SIZE - 1) >> PAGE_CACHE_SHIFT;
105 if (npg > LNET_MAX_IOV || npg <= 0)
108 if (opc != LST_BRW_READ && opc != LST_BRW_WRITE)
111 if (flags != LST_BRW_CHECK_NONE &&
112 flags != LST_BRW_CHECK_FULL && flags != LST_BRW_CHECK_SIMPLE)
115 cfs_list_for_each_entry_typed(tsu, &tsi->tsi_units,
116 sfw_test_unit_t, tsu_list) {
117 bulk = srpc_alloc_bulk(lnet_cpt_of_nid(tsu->tsu_dest.nid),
118 npg, len, opc == LST_BRW_READ);
120 brw_client_fini(tsi);
124 tsu->tsu_private = bulk;
130 #define BRW_POISON 0xbeefbeefbeefbeefULL
131 #define BRW_MAGIC 0xeeb0eeb1eeb2eeb3ULL
132 #define BRW_MSIZE sizeof(__u64)
135 brw_inject_one_error (void)
139 if (brw_inject_errors <= 0) return 0;
142 gettimeofday(&tv, NULL);
144 cfs_gettimeofday(&tv);
147 if ((tv.tv_usec & 1) == 0) return 0;
149 return brw_inject_errors--;
153 brw_fill_page (struct page *pg, int pattern, __u64 magic)
155 char *addr = page_address(pg);
158 LASSERT (addr != NULL);
160 if (pattern == LST_BRW_CHECK_NONE) return;
162 if (magic == BRW_MAGIC)
163 magic += brw_inject_one_error();
165 if (pattern == LST_BRW_CHECK_SIMPLE) {
166 memcpy(addr, &magic, BRW_MSIZE);
167 addr += PAGE_CACHE_SIZE - BRW_MSIZE;
168 memcpy(addr, &magic, BRW_MSIZE);
172 if (pattern == LST_BRW_CHECK_FULL) {
173 for (i = 0; i < PAGE_CACHE_SIZE / BRW_MSIZE; i++)
174 memcpy(addr + i * BRW_MSIZE, &magic, BRW_MSIZE);
183 brw_check_page (struct page *pg, int pattern, __u64 magic)
185 char *addr = page_address(pg);
186 __u64 data = 0; /* make compiler happy */
189 LASSERT (addr != NULL);
191 if (pattern == LST_BRW_CHECK_NONE)
194 if (pattern == LST_BRW_CHECK_SIMPLE) {
195 data = *((__u64 *) addr);
196 if (data != magic) goto bad_data;
198 addr += PAGE_CACHE_SIZE - BRW_MSIZE;
199 data = *((__u64 *) addr);
200 if (data != magic) goto bad_data;
205 if (pattern == LST_BRW_CHECK_FULL) {
206 for (i = 0; i < PAGE_CACHE_SIZE / BRW_MSIZE; i++) {
207 data = *(((__u64 *) addr) + i);
208 if (data != magic) goto bad_data;
217 CERROR ("Bad data in page %p: "LPX64", "LPX64" expected\n",
223 brw_fill_bulk (srpc_bulk_t *bk, int pattern, __u64 magic)
228 for (i = 0; i < bk->bk_niov; i++) {
230 pg = bk->bk_iovs[i].kiov_page;
232 LASSERT (bk->bk_pages != NULL);
233 pg = bk->bk_pages[i];
235 brw_fill_page(pg, pattern, magic);
240 brw_check_bulk (srpc_bulk_t *bk, int pattern, __u64 magic)
245 for (i = 0; i < bk->bk_niov; i++) {
247 pg = bk->bk_iovs[i].kiov_page;
249 LASSERT (bk->bk_pages != NULL);
250 pg = bk->bk_pages[i];
252 if (brw_check_page(pg, pattern, magic) != 0) {
253 CERROR ("Bulk page %p (%d/%d) is corrupted!\n",
263 brw_client_prep_rpc (sfw_test_unit_t *tsu,
264 lnet_process_id_t dest, srpc_client_rpc_t **rpcpp)
266 srpc_bulk_t *bulk = tsu->tsu_private;
267 sfw_test_instance_t *tsi = tsu->tsu_instance;
268 sfw_session_t *sn = tsi->tsi_batch->bat_session;
269 srpc_client_rpc_t *rpc;
270 srpc_brw_reqst_t *req;
278 LASSERT(bulk != NULL);
280 if ((sn->sn_features & LST_FEAT_BULK_LEN) == 0) {
281 test_bulk_req_t *breq = &tsi->tsi_u.bulk_v0;
284 flags = breq->blk_flags;
286 len = npg * PAGE_CACHE_SIZE;
289 test_bulk_req_v1_t *breq = &tsi->tsi_u.bulk_v1;
291 /* I should never get this step if it's unknown feature
292 * because make_session will reject unknown feature */
293 LASSERT((sn->sn_features & ~LST_FEATS_MASK) == 0);
296 flags = breq->blk_flags;
298 npg = (len + PAGE_CACHE_SIZE - 1) >> PAGE_CACHE_SHIFT;
301 rc = sfw_create_test_rpc(tsu, dest, sn->sn_features, npg, len, &rpc);
305 memcpy(&rpc->crpc_bulk, bulk, offsetof(srpc_bulk_t, bk_iovs[npg]));
306 if (opc == LST_BRW_WRITE)
307 brw_fill_bulk(&rpc->crpc_bulk, flags, BRW_MAGIC);
309 brw_fill_bulk(&rpc->crpc_bulk, flags, BRW_POISON);
311 req = &rpc->crpc_reqstmsg.msg_body.brw_reqst;
312 req->brw_flags = flags;
321 brw_client_done_rpc (sfw_test_unit_t *tsu, srpc_client_rpc_t *rpc)
323 __u64 magic = BRW_MAGIC;
324 sfw_test_instance_t *tsi = tsu->tsu_instance;
325 sfw_session_t *sn = tsi->tsi_batch->bat_session;
326 srpc_msg_t *msg = &rpc->crpc_replymsg;
327 srpc_brw_reply_t *reply = &msg->msg_body.brw_reply;
328 srpc_brw_reqst_t *reqst = &rpc->crpc_reqstmsg.msg_body.brw_reqst;
330 LASSERT (sn != NULL);
332 if (rpc->crpc_status != 0) {
333 CERROR ("BRW RPC to %s failed with %d\n",
334 libcfs_id2str(rpc->crpc_dest), rpc->crpc_status);
335 if (!tsi->tsi_stopping) /* rpc could have been aborted */
336 cfs_atomic_inc(&sn->sn_brw_errors);
340 if (msg->msg_magic != SRPC_MSG_MAGIC) {
342 __swab32s(&reply->brw_status);
345 CDEBUG (reply->brw_status ? D_WARNING : D_NET,
346 "BRW RPC to %s finished with brw_status: %d\n",
347 libcfs_id2str(rpc->crpc_dest), reply->brw_status);
349 if (reply->brw_status != 0) {
350 cfs_atomic_inc(&sn->sn_brw_errors);
351 rpc->crpc_status = -(int)reply->brw_status;
355 if (reqst->brw_rw == LST_BRW_WRITE) goto out;
357 if (brw_check_bulk(&rpc->crpc_bulk, reqst->brw_flags, magic) != 0) {
358 CERROR ("Bulk data from %s is corrupted!\n",
359 libcfs_id2str(rpc->crpc_dest));
360 cfs_atomic_inc(&sn->sn_brw_errors);
361 rpc->crpc_status = -EBADMSG;
366 rpc->crpc_bulk.bk_pages = NULL;
372 brw_server_rpc_done (srpc_server_rpc_t *rpc)
374 srpc_bulk_t *blk = rpc->srpc_bulk;
376 if (blk == NULL) return;
378 if (rpc->srpc_status != 0)
379 CERROR ("Bulk transfer %s %s has failed: %d\n",
380 blk->bk_sink ? "from" : "to",
381 libcfs_id2str(rpc->srpc_peer), rpc->srpc_status);
383 CDEBUG (D_NET, "Transfered %d pages bulk data %s %s\n",
384 blk->bk_niov, blk->bk_sink ? "from" : "to",
385 libcfs_id2str(rpc->srpc_peer));
391 brw_bulk_ready (srpc_server_rpc_t *rpc, int status)
393 __u64 magic = BRW_MAGIC;
394 srpc_brw_reply_t *reply = &rpc->srpc_replymsg.msg_body.brw_reply;
395 srpc_brw_reqst_t *reqst;
396 srpc_msg_t *reqstmsg;
398 LASSERT (rpc->srpc_bulk != NULL);
399 LASSERT (rpc->srpc_reqstbuf != NULL);
401 reqstmsg = &rpc->srpc_reqstbuf->buf_msg;
402 reqst = &reqstmsg->msg_body.brw_reqst;
405 CERROR ("BRW bulk %s failed for RPC from %s: %d\n",
406 reqst->brw_rw == LST_BRW_READ ? "READ" : "WRITE",
407 libcfs_id2str(rpc->srpc_peer), status);
411 if (reqst->brw_rw == LST_BRW_READ)
414 if (reqstmsg->msg_magic != SRPC_MSG_MAGIC)
417 if (brw_check_bulk(rpc->srpc_bulk, reqst->brw_flags, magic) != 0) {
418 CERROR ("Bulk data from %s is corrupted!\n",
419 libcfs_id2str(rpc->srpc_peer));
420 reply->brw_status = EBADMSG;
427 brw_server_handle(struct srpc_server_rpc *rpc)
429 struct srpc_service *sv = rpc->srpc_scd->scd_svc;
430 srpc_msg_t *replymsg = &rpc->srpc_replymsg;
431 srpc_msg_t *reqstmsg = &rpc->srpc_reqstbuf->buf_msg;
432 srpc_brw_reply_t *reply = &replymsg->msg_body.brw_reply;
433 srpc_brw_reqst_t *reqst = &reqstmsg->msg_body.brw_reqst;
437 LASSERT (sv->sv_id == SRPC_SERVICE_BRW);
439 if (reqstmsg->msg_magic != SRPC_MSG_MAGIC) {
440 LASSERT (reqstmsg->msg_magic == __swab32(SRPC_MSG_MAGIC));
442 __swab32s(&reqst->brw_rw);
443 __swab32s(&reqst->brw_len);
444 __swab32s(&reqst->brw_flags);
445 __swab64s(&reqst->brw_rpyid);
446 __swab64s(&reqst->brw_bulkid);
448 LASSERT (reqstmsg->msg_type == (__u32)srpc_service2request(sv->sv_id));
450 reply->brw_status = 0;
451 rpc->srpc_done = brw_server_rpc_done;
453 if ((reqst->brw_rw != LST_BRW_READ && reqst->brw_rw != LST_BRW_WRITE) ||
454 (reqst->brw_flags != LST_BRW_CHECK_NONE &&
455 reqst->brw_flags != LST_BRW_CHECK_FULL &&
456 reqst->brw_flags != LST_BRW_CHECK_SIMPLE)) {
457 reply->brw_status = EINVAL;
461 if ((reqstmsg->msg_ses_feats & ~LST_FEATS_MASK) != 0) {
462 replymsg->msg_ses_feats = LST_FEATS_MASK;
463 reply->brw_status = EPROTO;
467 if ((reqstmsg->msg_ses_feats & LST_FEAT_BULK_LEN) == 0) {
468 /* compat with old version */
469 if ((reqst->brw_len & ~CFS_PAGE_MASK) != 0) {
470 reply->brw_status = EINVAL;
473 npg = reqst->brw_len >> PAGE_CACHE_SHIFT;
476 npg = (reqst->brw_len + PAGE_CACHE_SIZE - 1) >> PAGE_CACHE_SHIFT;
479 replymsg->msg_ses_feats = reqstmsg->msg_ses_feats;
481 if (reqst->brw_len == 0 || npg > LNET_MAX_IOV) {
482 reply->brw_status = EINVAL;
486 rc = sfw_alloc_pages(rpc, rpc->srpc_scd->scd_cpt, npg,
488 reqst->brw_rw == LST_BRW_WRITE);
492 if (reqst->brw_rw == LST_BRW_READ)
493 brw_fill_bulk(rpc->srpc_bulk, reqst->brw_flags, BRW_MAGIC);
495 brw_fill_bulk(rpc->srpc_bulk, reqst->brw_flags, BRW_POISON);
500 sfw_test_client_ops_t brw_test_client;
501 void brw_init_test_client(void)
503 brw_test_client.tso_init = brw_client_init;
504 brw_test_client.tso_fini = brw_client_fini;
505 brw_test_client.tso_prep_rpc = brw_client_prep_rpc;
506 brw_test_client.tso_done_rpc = brw_client_done_rpc;
509 srpc_service_t brw_test_service;
510 void brw_init_test_service(void)
515 s = getenv("BRW_INJECT_ERRORS");
516 brw_inject_errors = s != NULL ? atoi(s) : brw_inject_errors;
519 brw_test_service.sv_id = SRPC_SERVICE_BRW;
520 brw_test_service.sv_name = "brw_test";
521 brw_test_service.sv_handler = brw_server_handle;
522 brw_test_service.sv_bulk_ready = brw_bulk_ready;
523 brw_test_service.sv_wi_total = brw_srv_workitems;