/* ************************************************************************ * 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_rot_bad_arg(const Arguments& arg) { rocsparse_local_handle local_handle; rocsparse_handle handle = local_handle; const void* c = (const void*)0x4; const void* s = (const void*)0x4; rocsparse_spvec_descr x = (rocsparse_spvec_descr)0x4; rocsparse_dnvec_descr y = (rocsparse_dnvec_descr)0x4; bad_arg_analysis(rocsparse_rot, handle, c, s, x, y); } template void testing_rot(const Arguments& arg) { I size = arg.M; I nnz = arg.nnz; rocsparse_index_base base = arg.baseA; // Index and data type rocsparse_indextype itype = get_indextype(); rocsparse_datatype ttype = get_datatype(); // Create rocsparse handle rocsparse_local_handle handle(arg); // Allocate host memory for matrix host_vector hx_ind(nnz); host_vector hx_val_1(nnz); host_vector hx_val_2(nnz); host_vector hx_val_gold(nnz); host_vector hy_1(size); host_vector hy_2(size); host_vector hy_gold(size); host_vector hc(1); host_vector hs(1); // Initialize data on CPU rocsparse_seedrand(); rocsparse_init_index(hx_ind, nnz, base, size + base); rocsparse_init_exact(hx_val_1, 1, nnz, 1); rocsparse_init_exact(hy_1, 1, size, 1); rocsparse_init_exact(hc, 1, 1, 1); rocsparse_init_exact(hs, 1, 1, 1); hx_val_2 = hx_val_1; hx_val_gold = hx_val_1; hy_2 = hy_1; hy_gold = hy_1; // Allocate device memory device_vector dx_ind(nnz); device_vector dx_val_1(nnz); device_vector dx_val_2(nnz); device_vector dx_val_gold(nnz); device_vector dy_1(size); device_vector dy_2(size); device_vector dy_gold(size); device_vector dc(1); device_vector ds(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_1, hx_val_1, sizeof(T) * nnz, hipMemcpyHostToDevice)); CHECK_HIP_ERROR(hipMemcpy(dx_val_2, dx_val_1, sizeof(T) * nnz, hipMemcpyDeviceToDevice)); CHECK_HIP_ERROR(hipMemcpy(dy_1, hy_1, sizeof(T) * size, hipMemcpyHostToDevice)); CHECK_HIP_ERROR(hipMemcpy(dy_2, dy_1, sizeof(T) * size, hipMemcpyDeviceToDevice)); CHECK_HIP_ERROR(hipMemcpy(dc, hc, sizeof(T), hipMemcpyHostToDevice)); CHECK_HIP_ERROR(hipMemcpy(ds, hs, sizeof(T), hipMemcpyHostToDevice)); // Create descriptors rocsparse_local_spvec x1(size, nnz, dx_ind, dx_val_1, itype, base, ttype); rocsparse_local_spvec x2(size, nnz, dx_ind, dx_val_2, itype, base, ttype); rocsparse_local_dnvec y1(size, dy_1, ttype); rocsparse_local_dnvec y2(size, dy_2, ttype); if(arg.unit_check) { // rot - host pointer mode CHECK_ROCSPARSE_ERROR(rocsparse_set_pointer_mode(handle, rocsparse_pointer_mode_host)); CHECK_ROCSPARSE_ERROR(testing::rocsparse_rot(handle, &hc[0], &hs[0], x1, y1)); // rot - device pointer mode CHECK_ROCSPARSE_ERROR(rocsparse_set_pointer_mode(handle, rocsparse_pointer_mode_device)); CHECK_ROCSPARSE_ERROR(testing::rocsparse_rot(handle, dc, ds, x2, y2)); // Copy output to host CHECK_HIP_ERROR(hipMemcpy(hx_val_1, dx_val_1, sizeof(T) * nnz, hipMemcpyDeviceToHost)); CHECK_HIP_ERROR(hipMemcpy(hx_val_2, dx_val_2, sizeof(T) * nnz, hipMemcpyDeviceToHost)); CHECK_HIP_ERROR(hipMemcpy(hy_1, dy_1, sizeof(T) * size, hipMemcpyDeviceToHost)); CHECK_HIP_ERROR(hipMemcpy(hy_2, dy_2, sizeof(T) * size, hipMemcpyDeviceToHost)); // CPU rot host_roti(nnz, hx_val_gold, hx_ind, hy_gold, hc, hs, base); hx_val_gold.unit_check(hx_val_1); hx_val_gold.unit_check(hx_val_2); hy_gold.unit_check(hy_1); hy_gold.unit_check(hy_2); if(ROCSPARSE_REPRODUCIBILITY) { rocsparse_reproducibility::save("X pointer mode host", hx_val_1, "Y pointer mode host", hy_1, "X pointer mode device", hx_val_2, "Y pointer mode device", hy_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_rot, handle, &hc[0], &hs[0], x1, y1); double gflop_count = roti_gflop_count(nnz); double gbyte_count = roti_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)); } } #define INSTANTIATE(ITYPE, TTYPE) \ template void testing_rot_bad_arg(const Arguments& arg); \ template void testing_rot(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); void testing_rot_extra(const Arguments& arg) {}