/* ************************************************************************ * Copyright (C) 2020-2025 Advanced Micro Devices, Inc. All rights Reserved. * * Permission is hereby granted, free of charge, to any person obtaining a copy * of this software and associated documentation files (the "Software"), to deal * in the Software without restriction, including without limitation the rights * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell * copies of the Software, and to permit persons to whom the Software is * furnished to do so, subject to the following conditions: * * The above copyright notice and this permission notice shall be included in * all copies or substantial portions of the Software. * * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN * THE SOFTWARE. * * ************************************************************************ */ #include "testing.hpp" template void testing_spvv_bad_arg(const Arguments& arg) { static const size_t safe_size = 100; // Create rocsparse handle rocsparse_local_handle local_handle; rocsparse_handle handle = local_handle; I size = safe_size; I nnz = safe_size; void* x_ind = (void*)0x4; void* x_val = (void*)0x4; void* py = (void*)0x4; void* result = (void*)0x4; rocsparse_operation trans = rocsparse_operation_none; rocsparse_index_base base = rocsparse_index_base_zero; rocsparse_indextype itype = get_indextype(); rocsparse_datatype compute_type = get_datatype(); // Structures rocsparse_local_spvec local_vec_x(size, nnz, x_ind, x_val, itype, base, compute_type); rocsparse_local_dnvec local_vec_y(size, py, compute_type); rocsparse_spvec_descr x = local_vec_x; rocsparse_dnvec_descr y = local_vec_y; int nargs_to_exclude = 2; const int args_to_exclude[2] = {6, 7}; #define PARAMS handle, trans, x, y, result, compute_type, buffer_size, temp_buffer { size_t* buffer_size = (size_t*)0x4; void* temp_buffer = (void*)0x4; select_bad_arg_analysis(rocsparse_spvv, nargs_to_exclude, args_to_exclude, PARAMS); } { size_t* buffer_size = (size_t*)0x4; void* temp_buffer = nullptr; select_bad_arg_analysis(rocsparse_spvv, nargs_to_exclude, args_to_exclude, PARAMS); } { size_t* buffer_size = nullptr; void* temp_buffer = (void*)0x4; select_bad_arg_analysis(rocsparse_spvv, nargs_to_exclude, args_to_exclude, PARAMS); } { size_t* buffer_size = nullptr; void* temp_buffer = nullptr; select_bad_arg_analysis(rocsparse_spvv, nargs_to_exclude, args_to_exclude, PARAMS); } #undef PARAMS EXPECT_ROCSPARSE_STATUS( rocsparse_spvv(handle, trans, x, y, result, compute_type, nullptr, nullptr), rocsparse_status_invalid_pointer); } template void testing_spvv(const Arguments& arg) { I size = arg.M; I nnz = arg.nnz; size_t buffer_size; void* temp_buffer; rocsparse_operation trans = arg.transA; rocsparse_index_base base = arg.baseA; // Index and data type rocsparse_indextype itype = get_indextype(); rocsparse_datatype xtype = get_datatype(); rocsparse_datatype ytype = get_datatype(); rocsparse_datatype ttype = get_datatype(); // Create rocsparse handle rocsparse_local_handle handle(arg); // Grab stream used by handle hipStream_t stream = handle.get_stream(); // Allocate host memory host_vector hx_ind(nnz); host_vector hx_val(nnz); host_vector hy(size); host_vector hdot_1(1); host_vector hdot_2(1); host_vector hdot_gold(1); // Initialize data on CPU rocsparse_seedrand(); rocsparse_init_index(hx_ind, nnz, base, size + base); rocsparse_init_alternating_sign(hx_val, 1, nnz, 1); rocsparse_init_exact(hy, 1, size, 1); // Allocate device memory device_vector dx_ind(nnz); device_vector dx_val(nnz); device_vector dy(size); device_vector ddot_2(1); // Copy data from CPU to device CHECK_HIP_ERROR(hipMemcpy(dx_ind, hx_ind, sizeof(I) * nnz, hipMemcpyHostToDevice)); CHECK_HIP_ERROR(hipMemcpy(dx_val, hx_val, sizeof(X) * nnz, hipMemcpyHostToDevice)); CHECK_HIP_ERROR(hipMemcpy(dy, hy, sizeof(Y) * size, hipMemcpyHostToDevice)); // Create descriptors rocsparse_local_spvec x(size, nnz, dx_ind, dx_val, itype, base, xtype); rocsparse_local_dnvec y(size, dy, ytype); // Obtain buffer size CHECK_ROCSPARSE_ERROR( rocsparse_spvv(handle, trans, x, y, &hdot_1[0], ttype, &buffer_size, nullptr)); CHECK_HIP_ERROR(rocsparse_hipMalloc(&temp_buffer, buffer_size)); if(arg.unit_check) { // Pointer mode host CHECK_ROCSPARSE_ERROR(rocsparse_set_pointer_mode(handle, rocsparse_pointer_mode_host)); CHECK_ROCSPARSE_ERROR(testing::rocsparse_spvv( handle, trans, x, y, &hdot_1[0], ttype, &buffer_size, temp_buffer)); CHECK_HIP_ERROR(hipStreamSynchronize(stream)); // Pointer mode device CHECK_ROCSPARSE_ERROR(rocsparse_set_pointer_mode(handle, rocsparse_pointer_mode_device)); CHECK_ROCSPARSE_ERROR( testing::rocsparse_spvv(handle, trans, x, y, ddot_2, ttype, &buffer_size, temp_buffer)); // Copy output to host CHECK_HIP_ERROR(hipMemcpy(hdot_2, ddot_2, sizeof(T), hipMemcpyDeviceToHost)); // CPU SpVV if(trans == rocsparse_operation_none) { host_doti(nnz, hx_val, hx_ind, hy, hdot_gold, base); } else { host_dotci(nnz, hx_val, hx_ind, hy, hdot_gold, base); } hdot_gold.unit_check(hdot_1); hdot_gold.unit_check(hdot_2); if(ROCSPARSE_REPRODUCIBILITY) { rocsparse_reproducibility::save( "DOT pointer mode host", hdot_1, "DOT pointer mode device", hdot_2); } } if(arg.timing) { CHECK_ROCSPARSE_ERROR(rocsparse_set_pointer_mode(handle, rocsparse_pointer_mode_host)); const double gpu_time_used = rocsparse_clients::run_benchmark( arg, rocsparse_spvv, handle, trans, x, y, &hdot_1[0], ttype, &buffer_size, temp_buffer); double gflop_count = doti_gflop_count(nnz); double gbyte_count = doti_gbyte_count(nnz); double gpu_gbyte = get_gpu_gbyte(gpu_time_used, gbyte_count); double gpu_gflops = get_gpu_gflops(gpu_time_used, gflop_count); display_timing_info(display_key_t::nnz, nnz, display_key_t::gflops, gpu_gflops, display_key_t::bandwidth, gpu_gbyte, display_key_t::time_ms, get_gpu_time_msec(gpu_time_used)); } CHECK_HIP_ERROR(rocsparse_hipFree(temp_buffer)); } #define INSTANTIATE(ITYPE, TTYPE) \ template void testing_spvv_bad_arg(const Arguments& arg); \ template void testing_spvv(const Arguments& arg) INSTANTIATE(int32_t, float); INSTANTIATE(int32_t, double); INSTANTIATE(int32_t, rocsparse_float_complex); INSTANTIATE(int32_t, rocsparse_double_complex); INSTANTIATE(int64_t, float); INSTANTIATE(int64_t, double); INSTANTIATE(int64_t, rocsparse_float_complex); INSTANTIATE(int64_t, rocsparse_double_complex); #define INSTANTIATE_MIXED(ITYPE, XTYPE, YTYPE, TTYPE) \ template void testing_spvv_bad_arg(const Arguments& arg); \ template void testing_spvv(const Arguments& arg) INSTANTIATE_MIXED(int32_t, int8_t, int8_t, int32_t); INSTANTIATE_MIXED(int64_t, int8_t, int8_t, int32_t); INSTANTIATE_MIXED(int32_t, _Float16, _Float16, float); INSTANTIATE_MIXED(int64_t, _Float16, _Float16, float); INSTANTIATE_MIXED(int32_t, rocsparse_bfloat16, rocsparse_bfloat16, float); INSTANTIATE_MIXED(int64_t, rocsparse_bfloat16, rocsparse_bfloat16, float); INSTANTIATE_MIXED(int32_t, int8_t, int8_t, float); INSTANTIATE_MIXED(int64_t, int8_t, int8_t, float); void testing_spvv_extra(const Arguments& arg) {}