1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161
|
/* ************************************************************************
* Copyright (C) 2023-2024 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 <typename T>
void testing_const_dnmat_descr_bad_arg(const Arguments& arg)
{
static const size_t safe_size = 100;
rocsparse_const_dnmat_descr local_descr{};
int64_t local_rows = safe_size;
int64_t local_cols = safe_size;
int64_t local_ld = safe_size;
rocsparse_order local_order = rocsparse_order_column;
rocsparse_datatype local_data_type = get_datatype<T>();
rocsparse_int local_batch_count = safe_size;
int64_t local_batch_stride = safe_size;
{
rocsparse_const_dnmat_descr* descr = &local_descr;
int64_t rows = local_rows;
int64_t cols = local_cols;
int64_t ld = local_ld;
const void* values = (const void*)0x4;
rocsparse_order order = local_order;
rocsparse_datatype data_type = local_data_type;
#define PARAMS_CREATE descr, rows, cols, ld, values, data_type, order
bad_arg_analysis(rocsparse_create_const_dnmat_descr, PARAMS_CREATE);
#undef PARAMS_CREATE
// rocsparse_destroy_dnmat_descr_ex
EXPECT_ROCSPARSE_STATUS(rocsparse_destroy_dnmat_descr(nullptr),
rocsparse_status_invalid_pointer);
// Check valid descriptor creations
EXPECT_ROCSPARSE_STATUS(
rocsparse_create_const_dnmat_descr(descr, 0, cols, ld, nullptr, data_type, order),
rocsparse_status_success);
EXPECT_ROCSPARSE_STATUS(rocsparse_destroy_dnmat_descr(*descr), rocsparse_status_success);
EXPECT_ROCSPARSE_STATUS(
rocsparse_create_const_dnmat_descr(descr, rows, 0, ld, nullptr, data_type, order),
rocsparse_status_success);
EXPECT_ROCSPARSE_STATUS(rocsparse_destroy_dnmat_descr(*descr), rocsparse_status_success);
}
{
int64_t* rows = &local_rows;
int64_t* cols = &local_cols;
int64_t* ld = &local_ld;
const void** values = (const void**)0x4;
rocsparse_order* order = &local_order;
rocsparse_datatype* data_type = &local_data_type;
// Create valid descriptor
EXPECT_ROCSPARSE_STATUS(rocsparse_create_const_dnmat_descr(&local_descr,
local_rows,
local_cols,
local_ld,
(const void*)0x4,
local_data_type,
local_order),
rocsparse_status_success);
rocsparse_const_dnmat_descr descr = local_descr;
#define PARAMS_GET descr, rows, cols, ld, values, data_type, order
bad_arg_analysis(rocsparse_const_dnmat_get, PARAMS_GET);
#undef PARAMS_GET
rocsparse_int* batch_count = &local_batch_count;
int64_t* batch_stride = &local_batch_stride;
#define PARAMS_GET descr, batch_count, batch_stride
bad_arg_analysis(rocsparse_dnmat_get_strided_batch, PARAMS_GET);
#undef PARAMS_GET
EXPECT_ROCSPARSE_STATUS(rocsparse_destroy_dnmat_descr(descr), rocsparse_status_success);
}
}
template <typename T>
void testing_const_dnmat_descr(const Arguments& arg)
{
int64_t m = arg.M;
int64_t n = arg.N;
int64_t ld = arg.denseld;
rocsparse_order order = arg.order;
rocsparse_datatype ttype = get_datatype<T>();
device_vector<T> values(ld * ((order == rocsparse_order_column) ? n : m));
if(arg.unit_check)
{
rocsparse_const_dnmat_descr A{};
// Create valid descriptor
CHECK_ROCSPARSE_ERROR(
rocsparse_create_const_dnmat_descr(&A, m, n, ld, (const void*)values, ttype, order));
int64_t gold_m;
int64_t gold_n;
int64_t gold_ld;
rocsparse_order gold_order;
rocsparse_datatype gold_ttype;
const T* gold_values;
CHECK_ROCSPARSE_ERROR(rocsparse_const_dnmat_get(
A, &gold_m, &gold_n, &gold_ld, (const void**)&gold_values, &gold_ttype, &gold_order));
unit_check_scalar<int64_t>(m, gold_m);
unit_check_scalar<int64_t>(n, gold_n);
unit_check_scalar<int64_t>(ld, gold_ld);
unit_check_enum<rocsparse_order>(order, gold_order);
unit_check_enum<rocsparse_datatype>(ttype, gold_ttype);
ASSERT_EQ(values, (const T*)gold_values);
gold_values = nullptr;
CHECK_ROCSPARSE_ERROR(rocsparse_const_dnmat_get_values(A, (const void**)&gold_values));
ASSERT_EQ(values, (const T*)gold_values);
CHECK_ROCSPARSE_ERROR(rocsparse_destroy_dnmat_descr(A));
}
if(arg.timing)
{
}
}
#define INSTANTIATE(TTYPE) \
template void testing_const_dnmat_descr_bad_arg<TTYPE>(const Arguments& arg); \
template void testing_const_dnmat_descr<TTYPE>(const Arguments& arg)
INSTANTIATE(float);
INSTANTIATE(double);
INSTANTIATE(rocsparse_float_complex);
INSTANTIATE(rocsparse_double_complex);
void testing_const_dnmat_descr_extra(const Arguments& arg) {}
|