Files
TheRock/rocm-libraries/projects/hipsparse/clients/include/testing_prune_dense2csr.hpp
T
derek.holloway 7502bf64a4
CodeQL / Analyze (actions) (push) Canceled after 0s
CodeQL / Analyze (python) (push) Canceled after 0s
pre-commit / pre-commit (push) Canceled after 0s
Multi-Arch CI / setup (push) Canceled after 0s
Publish build_manylinux_x86_64 images / publish_build_manylinux_x86_64 (push) Canceled after 0s
Setup (Multi-Arch) / setup (push) Canceled after 0s
Multi-Arch CI / Linux::${{ fromJSON(needs.setup.outputs.linux_build_config || '{}').build_variant_label || 'skip' }} (push) Canceled after 0s
Publish TheRock Docker image / build-and-push-image (push) Canceled after 0s
Publish no_rocm_image_ubi10 image / publish_no_rocm_image_ubi10 (push) Canceled after 0s
Multi-Arch CI / Windows::${{ fromJSON(needs.setup.outputs.windows_build_config || '{}').build_variant_label || 'skip' }} (push) Canceled after 0s
Publish TheRock Docker image / build-and-push-image (push) Canceled after 0s
Multi-Arch CI / Manifest Diff (push) Canceled after 0s
TheRock Manifest Diff Report / Generate Manifest Diff Report (push) Canceled after 0s
Multi-Arch CI / CI Summary (push) Canceled after 0s
Publish no_rocm_image_ubuntu24_04 images / publish_no_rocm_image_ubuntu24_04 (push) Canceled after 0s
Publish no_rocm_image_ubuntu24_04_ocl_rt images / publish_no_rocm_image_ubuntu24_04_ocl_rt (push) Canceled after 0s
Publish TheRock Docker image / build-and-push-image (push) Canceled after 0s
Publish TheRock Docker image / build-and-push-image (push) Canceled after 0s
Publish no_rocm_image_ubuntu24_04 images / publish_no_rocm_image_ubuntu24_04_rocgdb (push) Canceled after 0s
Publish no_rocm_image_ubuntu24_04_rocgdb images / publish_no_rocm_image_ubuntu24_04_rocgdb (push) Canceled after 0s
Publish no_rocm_image_ubuntu24_04 images / publish_no_rocm_image_ubuntu24_04_ocl_rt (push) Canceled after 0s
Publish TheRock Docker image / build-and-push-image (push) Canceled after 0s
Unit Tests / Unit Tests :: ubuntu-24.04 (push) Canceled after 0s
Unit Tests / Unit Tests :: windows-2022 (push) Canceled after 0s
Publish no_rocm_image_ubuntu24_04 images / publish_no_rocm_image_ubuntu24_04_media (push) Canceled after 0s
Unit Tests / Unit Tests Summary (push) Canceled after 0s
Publish no_rocm_image_ubuntu24_04 images / publish_no_rocm_image_ubuntu24_04_openmpi (push) Canceled after 0s
Flatten subprojects into a single base monorepo
2026-09-02 16:34:47 -07:00

486 lines
22 KiB
C++

/* ************************************************************************
* 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.
*
* ************************************************************************ */
#pragma once
#ifndef TESTING_PRUNE_DENSE2CSR_HPP
#define TESTING_PRUNE_DENSE2CSR_HPP
#include "display.hpp"
#include "flops.hpp"
#include "gbyte.hpp"
#include "hipsparse.hpp"
#include "hipsparse_arguments.hpp"
#include "hipsparse_test_unique_ptr.hpp"
#include "unit.hpp"
#include "utility.hpp"
#include <algorithm>
#include <hipsparse.h>
#include <string>
using namespace hipsparse;
using namespace hipsparse_test;
template <typename T>
void testing_prune_dense2csr_bad_arg(const Arguments& argus)
{
#if(!defined(CUDART_VERSION))
size_t safe_size = 100;
int M = 1;
int N = 1;
int LDA = M;
T threshold = static_cast<T>(1);
int nnz_total_dev_host_ptr = 100;
size_t buffer_size = 100;
hipsparseStatus_t status;
std::unique_ptr<handle_struct> unique_ptr_handle(new handle_struct);
hipsparseHandle_t handle = unique_ptr_handle->handle;
std::unique_ptr<descr_struct> unique_ptr_descr(new descr_struct);
hipsparseMatDescr_t descr = unique_ptr_descr->descr;
auto csr_row_ptr_managed
= hipsparse_unique_ptr{device_malloc(sizeof(int) * (safe_size + 1)), device_free};
auto csr_col_ind_managed
= hipsparse_unique_ptr{device_malloc(sizeof(int) * safe_size), device_free};
auto csr_val_managed = hipsparse_unique_ptr{device_malloc(sizeof(T) * safe_size), device_free};
auto A_managed = hipsparse_unique_ptr{device_malloc(sizeof(T) * safe_size), device_free};
auto temp_buffer_managed
= hipsparse_unique_ptr{device_malloc(sizeof(T) * safe_size), device_free};
int* csr_row_ptr = (int*)csr_row_ptr_managed.get();
int* csr_col_ind = (int*)csr_col_ind_managed.get();
T* csr_val = (T*)csr_val_managed.get();
T* A = (T*)A_managed.get();
T* temp_buffer = (T*)temp_buffer_managed.get();
int local_ptr[2] = {0, 1};
CHECK_HIP_ERROR(
hipMemcpy(csr_row_ptr, local_ptr, sizeof(int) * (1 + 1), hipMemcpyHostToDevice));
// Test hipsparseXpruneDense2csr_bufferSize
status = hipsparseXpruneDense2csr_bufferSize(
nullptr, M, N, A, LDA, &threshold, descr, csr_val, csr_row_ptr, csr_col_ind, &buffer_size);
verify_hipsparse_status_invalid_handle(status);
status = hipsparseXpruneDense2csr_bufferSize(
handle, M, N, A, LDA, &threshold, descr, csr_val, csr_row_ptr, csr_col_ind, nullptr);
verify_hipsparse_status_invalid_pointer(status, "Error: buffer size is nullptr");
// Test hipsparseXpruneDense2csrNnz
status = hipsparseXpruneDense2csrNnz(nullptr,
M,
N,
A,
LDA,
&threshold,
descr,
csr_row_ptr,
&nnz_total_dev_host_ptr,
temp_buffer);
verify_hipsparse_status_invalid_handle(status);
status = hipsparseXpruneDense2csrNnz(handle,
-1,
N,
A,
LDA,
&threshold,
descr,
csr_row_ptr,
&nnz_total_dev_host_ptr,
temp_buffer);
verify_hipsparse_status_invalid_size(status, "Error: M is invalid");
status = hipsparseXpruneDense2csrNnz(handle,
M,
-1,
A,
LDA,
&threshold,
descr,
csr_row_ptr,
&nnz_total_dev_host_ptr,
temp_buffer);
verify_hipsparse_status_invalid_size(status, "Error: N is invalid");
status = hipsparseXpruneDense2csrNnz(
handle, M, N, A, -1, &threshold, descr, csr_row_ptr, &nnz_total_dev_host_ptr, temp_buffer);
verify_hipsparse_status_invalid_size(status, "Error: LDA is invalid");
status = hipsparseXpruneDense2csrNnz(handle,
M,
N,
(const T*)nullptr,
LDA,
&threshold,
descr,
csr_row_ptr,
&nnz_total_dev_host_ptr,
temp_buffer);
verify_hipsparse_status_invalid_pointer(status, "Error: A is nullptr");
status = hipsparseXpruneDense2csrNnz(handle,
M,
N,
A,
LDA,
(const T*)nullptr,
descr,
csr_row_ptr,
&nnz_total_dev_host_ptr,
temp_buffer);
verify_hipsparse_status_invalid_pointer(status, "Error: threshold is nullptr");
status = hipsparseXpruneDense2csrNnz(handle,
M,
N,
A,
LDA,
&threshold,
nullptr,
csr_row_ptr,
&nnz_total_dev_host_ptr,
temp_buffer);
verify_hipsparse_status_invalid_pointer(status, "Error: descr is nullptr");
status = hipsparseXpruneDense2csrNnz(
handle, M, N, A, LDA, &threshold, descr, nullptr, &nnz_total_dev_host_ptr, temp_buffer);
verify_hipsparse_status_invalid_pointer(status, "Error: csr_row_ptr is nullptr");
status = hipsparseXpruneDense2csrNnz(
handle, M, N, A, LDA, &threshold, descr, csr_row_ptr, nullptr, temp_buffer);
verify_hipsparse_status_invalid_pointer(status, "Error: nnz_total_dev_host_ptr is nullptr");
// Test hipsparseXpruneDense2csr
status = hipsparseXpruneDense2csr(
nullptr, M, N, A, LDA, &threshold, descr, csr_val, csr_row_ptr, csr_col_ind, temp_buffer);
verify_hipsparse_status_invalid_handle(status);
status = hipsparseXpruneDense2csr(
handle, -1, N, A, LDA, &threshold, descr, csr_val, csr_row_ptr, csr_col_ind, temp_buffer);
verify_hipsparse_status_invalid_size(status, "Error: M is invalid");
status = hipsparseXpruneDense2csr(
handle, M, -1, A, LDA, &threshold, descr, csr_val, csr_row_ptr, csr_col_ind, temp_buffer);
verify_hipsparse_status_invalid_size(status, "Error: N is invalid");
status = hipsparseXpruneDense2csr(
handle, M, N, A, -1, &threshold, descr, csr_val, csr_row_ptr, csr_col_ind, temp_buffer);
verify_hipsparse_status_invalid_size(status, "Error: LDA is invalid");
status = hipsparseXpruneDense2csr(handle,
M,
N,
(const T*)nullptr,
LDA,
&threshold,
descr,
csr_val,
csr_row_ptr,
csr_col_ind,
temp_buffer);
verify_hipsparse_status_invalid_pointer(status, "Error: A is nullptr");
status = hipsparseXpruneDense2csr(handle,
M,
N,
A,
LDA,
(const T*)nullptr,
descr,
csr_val,
csr_row_ptr,
csr_col_ind,
temp_buffer);
verify_hipsparse_status_invalid_pointer(status, "Error: threshold is nullptr");
status = hipsparseXpruneDense2csr(
handle, M, N, A, LDA, &threshold, nullptr, csr_val, csr_row_ptr, csr_col_ind, temp_buffer);
verify_hipsparse_status_invalid_pointer(status, "Error: descr is nullptr");
status = hipsparseXpruneDense2csr(handle,
M,
N,
A,
LDA,
&threshold,
descr,
(T*)nullptr,
csr_row_ptr,
csr_col_ind,
temp_buffer);
verify_hipsparse_status_invalid_pointer(status, "Error: csr_val is nullptr");
status = hipsparseXpruneDense2csr(
handle, M, N, A, LDA, &threshold, descr, csr_val, nullptr, csr_col_ind, temp_buffer);
verify_hipsparse_status_invalid_pointer(status, "Error: csr_row_ptr is nullptr");
status = hipsparseXpruneDense2csr(
handle, M, N, A, LDA, &threshold, descr, csr_val, csr_row_ptr, nullptr, temp_buffer);
verify_hipsparse_status_invalid_pointer(status, "Error: csr_col_ind is nullptr");
#endif
}
template <typename T>
void testing_prune_dense2csr(Arguments argus)
{
#if(!defined(CUDART_VERSION) || CUDART_VERSION < 13000)
int M = argus.M;
int N = argus.N;
int LDA = argus.lda;
T threshold = make_DataType<T>(argus.threshold);
hipsparseIndexBase_t idx_base = argus.baseA;
std::unique_ptr<handle_struct> unique_ptr_handle(new handle_struct);
hipsparseHandle_t handle = unique_ptr_handle->handle;
std::unique_ptr<descr_struct> unique_ptr_descr(new descr_struct);
hipsparseMatDescr_t descr = unique_ptr_descr->descr;
CHECK_HIPSPARSE_ERROR(hipsparseSetPointerMode(handle, HIPSPARSE_POINTER_MODE_HOST));
CHECK_HIPSPARSE_ERROR(hipsparseSetMatIndexBase(descr, idx_base));
// Allocate host memory
std::vector<T> h_A(LDA * N);
std::vector<int> h_nnz_total_dev_host_ptr(1);
// Allocate device memory
auto d_A_managed = hipsparse_unique_ptr{device_malloc(sizeof(T) * LDA * N), device_free};
auto d_nnz_total_dev_host_ptr_managed
= hipsparse_unique_ptr{device_malloc(sizeof(int)), device_free};
auto d_csr_row_ptr_managed
= hipsparse_unique_ptr{device_malloc(sizeof(int) * (M + 1)), device_free};
T* d_A = (T*)d_A_managed.get();
int* d_nnz_total_dev_host_ptr = (int*)d_nnz_total_dev_host_ptr_managed.get();
int* d_csr_row_ptr = (int*)d_csr_row_ptr_managed.get();
// Initialize the entire allocated memory.
for(int i = 0; i < LDA; ++i)
{
for(int j = 0; j < N; ++j)
{
h_A[j * LDA + i] = make_DataType<T>(-1);
}
}
// Initialize a random dense matrix.
srand(0);
gen_dense_random_sparsity_pattern(M, N, h_A.data(), LDA, HIPSPARSE_ORDER_COL, 0.2);
// Transfer.
CHECK_HIP_ERROR(hipMemcpy(d_A, h_A.data(), sizeof(T) * LDA * N, hipMemcpyHostToDevice));
size_t buffer_size = 512;
CHECK_HIPSPARSE_ERROR(hipsparseXpruneDense2csr_bufferSize(handle,
M,
N,
d_A,
LDA,
&threshold,
descr,
(const T*)nullptr,
d_csr_row_ptr,
(const int*)nullptr,
&buffer_size));
auto d_temp_buffer_managed = hipsparse_unique_ptr{device_malloc(buffer_size), device_free};
T* d_temp_buffer = (T*)d_temp_buffer_managed.get();
auto d_threshold_managed = hipsparse_unique_ptr{device_malloc(sizeof(T)), device_free};
T* d_threshold = (T*)d_threshold_managed.get();
CHECK_HIP_ERROR(hipMemcpy(d_threshold, &threshold, sizeof(T), hipMemcpyHostToDevice));
CHECK_HIPSPARSE_ERROR(hipsparseSetPointerMode(handle, HIPSPARSE_POINTER_MODE_HOST));
CHECK_HIPSPARSE_ERROR(hipsparseXpruneDense2csrNnz(handle,
M,
N,
d_A,
LDA,
&threshold,
descr,
d_csr_row_ptr,
&h_nnz_total_dev_host_ptr[0],
d_temp_buffer));
CHECK_HIPSPARSE_ERROR(hipsparseSetPointerMode(handle, HIPSPARSE_POINTER_MODE_DEVICE));
CHECK_HIPSPARSE_ERROR(hipsparseXpruneDense2csrNnz(handle,
M,
N,
d_A,
LDA,
d_threshold,
descr,
d_csr_row_ptr,
d_nnz_total_dev_host_ptr,
d_temp_buffer));
std::vector<int> h_nnz_total_copied_from_device(1);
CHECK_HIP_ERROR(hipMemcpy(h_nnz_total_copied_from_device.data(),
d_nnz_total_dev_host_ptr,
sizeof(int),
hipMemcpyDeviceToHost));
if(argus.unit_check)
{
unit_check_general<int>(
1, 1, 1, h_nnz_total_dev_host_ptr.data(), h_nnz_total_copied_from_device.data());
}
auto d_csr_col_ind_managed = hipsparse_unique_ptr{
device_malloc(sizeof(int) * h_nnz_total_dev_host_ptr[0]), device_free};
auto d_csr_val_managed
= hipsparse_unique_ptr{device_malloc(sizeof(T) * h_nnz_total_dev_host_ptr[0]), device_free};
int* d_csr_col_ind = (int*)d_csr_col_ind_managed.get();
T* d_csr_val = (T*)d_csr_val_managed.get();
if(argus.unit_check)
{
CHECK_HIPSPARSE_ERROR(hipsparseSetPointerMode(handle, HIPSPARSE_POINTER_MODE_HOST));
CHECK_HIPSPARSE_ERROR(hipsparseXpruneDense2csr(handle,
M,
N,
d_A,
LDA,
&threshold,
descr,
d_csr_val,
d_csr_row_ptr,
d_csr_col_ind,
d_temp_buffer));
std::vector<int> h_csr_row_ptr(M + 1);
std::vector<int> h_csr_col_ind(h_nnz_total_dev_host_ptr[0]);
std::vector<T> h_csr_val(h_nnz_total_dev_host_ptr[0]);
CHECK_HIP_ERROR(hipMemcpy(
h_csr_row_ptr.data(), d_csr_row_ptr, sizeof(int) * (M + 1), hipMemcpyDeviceToHost));
CHECK_HIP_ERROR(hipMemcpy(h_csr_col_ind.data(),
d_csr_col_ind,
sizeof(int) * h_nnz_total_dev_host_ptr[0],
hipMemcpyDeviceToHost));
CHECK_HIP_ERROR(hipMemcpy(h_csr_val.data(),
d_csr_val,
sizeof(T) * h_nnz_total_dev_host_ptr[0],
hipMemcpyDeviceToHost));
// call host and check results
std::vector<int> h_nnz_cpu(1);
std::vector<int> h_csr_row_ptr_cpu;
std::vector<int> h_csr_col_ind_cpu;
std::vector<T> h_csr_val_cpu;
host_prune_dense2csr(M,
N,
h_A,
LDA,
idx_base,
threshold,
h_nnz_cpu[0],
h_csr_val_cpu,
h_csr_row_ptr_cpu,
h_csr_col_ind_cpu);
unit_check_general<int>(1, 1, 1, h_nnz_cpu.data(), h_nnz_total_dev_host_ptr.data());
unit_check_general<int>(1, (M + 1), 1, h_csr_row_ptr_cpu.data(), h_csr_row_ptr.data());
unit_check_general<int>(
1, h_nnz_total_dev_host_ptr[0], 1, h_csr_col_ind_cpu.data(), h_csr_col_ind.data());
unit_check_general<T>(
1, h_nnz_total_dev_host_ptr[0], 1, h_csr_val_cpu.data(), h_csr_val.data());
}
if(argus.timing)
{
int number_cold_calls = 2;
int number_hot_calls = argus.iters;
CHECK_HIPSPARSE_ERROR(hipsparseSetPointerMode(handle, HIPSPARSE_POINTER_MODE_HOST));
// Warm up
for(int iter = 0; iter < number_cold_calls; ++iter)
{
CHECK_HIPSPARSE_ERROR(hipsparseXpruneDense2csr(handle,
M,
N,
d_A,
LDA,
&threshold,
descr,
d_csr_val,
d_csr_row_ptr,
d_csr_col_ind,
d_temp_buffer));
}
double gpu_time_used = get_time_us();
// Performance run
for(int iter = 0; iter < number_hot_calls; ++iter)
{
CHECK_HIPSPARSE_ERROR(hipsparseXpruneDense2csr(handle,
M,
N,
d_A,
LDA,
&threshold,
descr,
d_csr_val,
d_csr_row_ptr,
d_csr_col_ind,
d_temp_buffer));
}
gpu_time_used = (get_time_us() - gpu_time_used) / number_hot_calls;
double gbyte_count = prune_dense2csr_gbyte_count<T>(M, N, h_nnz_total_dev_host_ptr[0]);
double gpu_gbyte = get_gpu_gbyte(gpu_time_used, gbyte_count);
display_timing_info(display_key_t::M,
M,
display_key_t::N,
N,
display_key_t::LD,
LDA,
display_key_t::nnz,
h_nnz_total_dev_host_ptr[0],
display_key_t::threshold,
threshold,
display_key_t::bandwidth,
gpu_gbyte,
display_key_t::time_ms,
get_gpu_time_msec(gpu_time_used));
}
#endif
}
#endif // TESTING_PRUNE_DENSE2CSR_HPP