Files
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

515 lines
27 KiB
C

/*! \file */
/* ************************************************************************
* Copyright (C) 2023 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.
*
* ************************************************************************ */
#ifndef ROCSPARSE_CSRSV_H
#define ROCSPARSE_CSRSV_H
#include "../../rocsparse-types.h"
#include "rocsparse/rocsparse-export.h"
#ifdef __cplusplus
extern "C" {
#endif
/*! \ingroup level2_module
* \details
* \p rocsparse_csrsv_zero_pivot returns \ref rocsparse_status_zero_pivot if either a
* structural or numerical zero has been found during \ref rocsparse_scsrsv_solve "rocsparse_Xcsrsv_solve()"
* computation. The first zero pivot \f$j\f$ at \f$A_{j,j}\f$ is stored in \p position,
* using the same index base as the CSR matrix.
*
* \p position can be in host or device memory. If no zero pivot has been found,
* \p position is set to -1 and \ref rocsparse_status_success is returned instead.
*
* \note \p rocsparse_csrsv_zero_pivot is a blocking function. It might negatively influence
* performance.
*
* \note
* This routine does not support execution in a hipGraph context.
*
* @param[in]
* handle handle to the rocSPARSE library context queue.
* @param[in]
* descr descriptor of the sparse CSR matrix.
* @param[in]
* info structure that holds the information collected during the analysis step.
* @param[inout]
* position pointer to zero pivot \f$j\f$, can be in host or device memory.
*
* \retval rocsparse_status_success the operation completed successfully.
* \retval rocsparse_status_invalid_handle the library context was not initialized.
* \retval rocsparse_status_invalid_pointer \p info or \p position pointer is
* invalid.
* \retval rocsparse_status_internal_error an internal error occurred.
* \retval rocsparse_status_zero_pivot zero pivot has been found.
*/
ROCSPARSE_EXPORT
rocsparse_status rocsparse_csrsv_zero_pivot(rocsparse_handle handle,
const rocsparse_mat_descr descr,
rocsparse_mat_info info,
rocsparse_int* position);
/*! \ingroup level2_module
* \details
* \p rocsparse_csrsv_buffer_size returns the size of the temporary storage buffer that
* is required by \ref rocsparse_scsrsv_analysis "rocsparse_Xcsrsv_analysis()" and
* \ref rocsparse_scsrsv_solve "rocsparse_Xcsrsv_solve()". The temporary storage buffer
* must be allocated by the user. The size of the temporary storage buffer is identical
* to the size returned by \ref rocsparse_scsrilu0_buffer_size "rocsparse_Xcsrilu0_buffer_size()"
* if the matrix sparsity pattern is identical. The user-allocated buffer can therefore be shared
* between subsequent calls to those functions.
*
* \note
* This function is non-blocking and executed asynchronously with respect to the host.
* It can return before the actual computation has finished.
*
* \note
* This routine supports execution in a hipGraph context.
*
* @param[in]
* handle handle to the rocSPARSE library context queue.
* @param[in]
* trans matrix operation type.
* @param[in]
* m number of rows of the sparse CSR matrix.
* @param[in]
* nnz number of non-zero entries of the sparse CSR matrix.
* @param[in]
* descr descriptor of the sparse CSR matrix.
* @param[in]
* csr_val array of \p nnz elements of the sparse CSR matrix.
* @param[in]
* csr_row_ptr array of \p m+1 elements that point to the start of every row of the
* sparse CSR matrix.
* @param[in]
* csr_col_ind array of \p nnz elements containing the column indices of the sparse
* CSR matrix.
* @param[out]
* info structure that holds the information collected during the analysis step.
* @param[out]
* buffer_size number of bytes of the temporary storage buffer required by
* \ref rocsparse_scsrsv_analysis "rocsparse_Xcsrsv_analysis()" and
* \ref rocsparse_scsrsv_solve "rocsparse_Xcsrsv_solve()".
*
* \retval rocsparse_status_success the operation completed successfully.
* \retval rocsparse_status_invalid_handle the library context was not initialized.
* \retval rocsparse_status_invalid_size \p m or \p nnz is invalid.
* \retval rocsparse_status_invalid_pointer \p descr, \p csr_val, \p csr_row_ptr,
* \p csr_col_ind, \p info, or \p buffer_size pointer is invalid.
* \retval rocsparse_status_internal_error an internal error occurred.
* \retval rocsparse_status_not_implemented
* \p trans == \ref rocsparse_operation_conjugate_transpose or
* \ref rocsparse_matrix_type != \ref rocsparse_matrix_type_general.
*/
/**@{*/
ROCSPARSE_EXPORT
rocsparse_status rocsparse_scsrsv_buffer_size(rocsparse_handle handle,
rocsparse_operation trans,
rocsparse_int m,
rocsparse_int nnz,
const rocsparse_mat_descr descr,
const float* csr_val,
const rocsparse_int* csr_row_ptr,
const rocsparse_int* csr_col_ind,
rocsparse_mat_info info,
size_t* buffer_size);
ROCSPARSE_EXPORT
rocsparse_status rocsparse_dcsrsv_buffer_size(rocsparse_handle handle,
rocsparse_operation trans,
rocsparse_int m,
rocsparse_int nnz,
const rocsparse_mat_descr descr,
const double* csr_val,
const rocsparse_int* csr_row_ptr,
const rocsparse_int* csr_col_ind,
rocsparse_mat_info info,
size_t* buffer_size);
ROCSPARSE_EXPORT
rocsparse_status rocsparse_ccsrsv_buffer_size(rocsparse_handle handle,
rocsparse_operation trans,
rocsparse_int m,
rocsparse_int nnz,
const rocsparse_mat_descr descr,
const rocsparse_float_complex* csr_val,
const rocsparse_int* csr_row_ptr,
const rocsparse_int* csr_col_ind,
rocsparse_mat_info info,
size_t* buffer_size);
ROCSPARSE_EXPORT
rocsparse_status rocsparse_zcsrsv_buffer_size(rocsparse_handle handle,
rocsparse_operation trans,
rocsparse_int m,
rocsparse_int nnz,
const rocsparse_mat_descr descr,
const rocsparse_double_complex* csr_val,
const rocsparse_int* csr_row_ptr,
const rocsparse_int* csr_col_ind,
rocsparse_mat_info info,
size_t* buffer_size);
/**@}*/
/*! \ingroup level2_module
* \details
* \p rocsparse_csrsv_analysis performs the analysis step for
* \ref rocsparse_scsrsv_solve "rocsparse_Xcsrsv_solve()". It is expected that this
* function will be executed only once for a given matrix and particular operation
* type. The analysis metadata can be cleared by \ref rocsparse_csrsv_clear().
*
* If the matrix sparsity pattern changes, the gathered information will become invalid. To perform another
* sparse triangular solve with a matrix having a different sparsity pattern, either destroy
* the old \p info object and create a new one or clear the existing \p info object using
* \ref rocsparse_csrsv_clear(). In both cases, the analysis will need to be called again.
*
* \p rocsparse_csrsv_analysis can share its meta data with
* \ref rocsparse_scsrsm_analysis "rocsparse_Xcsrsm_analysis()",
* \ref rocsparse_scsrilu0_analysis "rocsparse_Xcsrilu0_analysis()", and
* \ref rocsparse_scsric0_analysis "rocsparse_Xcsric0_analysis()". Selecting
* \ref rocsparse_analysis_policy_reuse policy can greatly improve the computation
* performance of the metadata. However, the user needs to ensure that the sparsity
* pattern remains unchanged. If this cannot be assured,
* \ref rocsparse_analysis_policy_force must be used.
*
* \note
* If the matrix sparsity pattern changes, the gathered information will become invalid.
*
* \note
* This function is blocking with respect to the host.
*
* \note
* This routine does not support execution in a hipGraph context.
*
* @param[in]
* handle handle to the rocSPARSE library context queue.
* @param[in]
* trans matrix operation type.
* @param[in]
* m number of rows of the sparse CSR matrix.
* @param[in]
* nnz number of non-zero entries of the sparse CSR matrix.
* @param[in]
* descr descriptor of the sparse CSR matrix.
* @param[in]
* csr_val array of \p nnz elements of the sparse CSR matrix.
* @param[in]
* csr_row_ptr array of \p m+1 elements that point to the start of every row of the
* sparse CSR matrix.
* @param[in]
* csr_col_ind array of \p nnz elements containing the column indices of the sparse
* CSR matrix.
* @param[out]
* info structure that holds the information collected during
* the analysis step.
* @param[in]
* analysis \ref rocsparse_analysis_policy_reuse or
* \ref rocsparse_analysis_policy_force.
* @param[in]
* solve \ref rocsparse_solve_policy_auto.
* @param[in]
* temp_buffer temporary storage buffer allocated by the user.
*
* \retval rocsparse_status_success the operation completed successfully.
* \retval rocsparse_status_invalid_handle the library context was not initialized.
* \retval rocsparse_status_invalid_size \p m or \p nnz is invalid.
* \retval rocsparse_status_invalid_pointer \p descr, \p csr_row_ptr,
* \p csr_col_ind, \p info, or \p temp_buffer pointer is invalid.
* \retval rocsparse_status_internal_error an internal error occurred.
* \retval rocsparse_status_not_implemented
* \p trans == \ref rocsparse_operation_conjugate_transpose or
* \ref rocsparse_matrix_type != \ref rocsparse_matrix_type_general.
*/
/**@{*/
ROCSPARSE_EXPORT
rocsparse_status rocsparse_scsrsv_analysis(rocsparse_handle handle,
rocsparse_operation trans,
rocsparse_int m,
rocsparse_int nnz,
const rocsparse_mat_descr descr,
const float* csr_val,
const rocsparse_int* csr_row_ptr,
const rocsparse_int* csr_col_ind,
rocsparse_mat_info info,
rocsparse_analysis_policy analysis,
rocsparse_solve_policy solve,
void* temp_buffer);
ROCSPARSE_EXPORT
rocsparse_status rocsparse_dcsrsv_analysis(rocsparse_handle handle,
rocsparse_operation trans,
rocsparse_int m,
rocsparse_int nnz,
const rocsparse_mat_descr descr,
const double* csr_val,
const rocsparse_int* csr_row_ptr,
const rocsparse_int* csr_col_ind,
rocsparse_mat_info info,
rocsparse_analysis_policy analysis,
rocsparse_solve_policy solve,
void* temp_buffer);
ROCSPARSE_EXPORT
rocsparse_status rocsparse_ccsrsv_analysis(rocsparse_handle handle,
rocsparse_operation trans,
rocsparse_int m,
rocsparse_int nnz,
const rocsparse_mat_descr descr,
const rocsparse_float_complex* csr_val,
const rocsparse_int* csr_row_ptr,
const rocsparse_int* csr_col_ind,
rocsparse_mat_info info,
rocsparse_analysis_policy analysis,
rocsparse_solve_policy solve,
void* temp_buffer);
ROCSPARSE_EXPORT
rocsparse_status rocsparse_zcsrsv_analysis(rocsparse_handle handle,
rocsparse_operation trans,
rocsparse_int m,
rocsparse_int nnz,
const rocsparse_mat_descr descr,
const rocsparse_double_complex* csr_val,
const rocsparse_int* csr_row_ptr,
const rocsparse_int* csr_col_ind,
rocsparse_mat_info info,
rocsparse_analysis_policy analysis,
rocsparse_solve_policy solve,
void* temp_buffer);
/**@}*/
/*! \ingroup level2_module
* \details
* \p rocsparse_csrsv_clear deallocates all memory that was allocated by
* \ref rocsparse_scsrsv_analysis "rocsparse_Xcsrsv_analysis()". This is especially useful
* if memory is an issue and the analysis data is not required for further computation, for example,
* when switching to another sparse matrix format.
*
* Calling \p rocsparse_csrsv_clear is optional. All allocated resources will be cleared when the
* opaque \ref rocsparse_mat_info struct is destroyed using \ref rocsparse_destroy_mat_info().
*
* \note
* This routine does not support execution in a hipGraph context.
*
* @param[in]
* handle handle to the rocSPARSE library context queue.
* @param[in]
* descr descriptor of the sparse CSR matrix.
* @param[inout]
* info structure that holds the information collected during the analysis step.
*
* \retval rocsparse_status_success the operation completed successfully.
* \retval rocsparse_status_invalid_handle the library context was not initialized.
* \retval rocsparse_status_invalid_pointer \p info pointer is invalid.
* \retval rocsparse_status_memory_error the buffer holding the meta data could not
* be deallocated.
* \retval rocsparse_status_internal_error an internal error occurred.
*/
ROCSPARSE_EXPORT
rocsparse_status rocsparse_csrsv_clear(rocsparse_handle handle,
const rocsparse_mat_descr descr,
rocsparse_mat_info info);
/*! \ingroup level2_module
* \brief Sparse triangular solve using CSR storage format.
*
* \details
* \p rocsparse_csrsv_solve solves a sparse triangular linear system of a sparse
* \f$m \times m\f$ matrix, defined in CSR storage format, a dense solution vector
* \f$y\f$ and the right-hand side \f$x\f$ that is multiplied by \f$\alpha\f$, such that
* \f[
* op(A) \cdot y = \alpha \cdot x,
* \f]
* with
* \f[
* op(A) = \left\{
* \begin{array}{ll}
* A, & \text{if trans == rocsparse_operation_none} \\
* A^T, & \text{if trans == rocsparse_operation_transpose} \\
* A^H, & \text{if trans == rocsparse_operation_conjugate_transpose}
* \end{array}
* \right.
* \f]
*
* Performing the above operation requires three steps. First, call
* \ref rocsparse_scsrsv_buffer_size "rocsparse_Xcsrsv_buffer_size()", which determines the size of the required
* temporary storage buffer. Then allocate this buffer and call
* \ref rocsparse_scsrsv_analysis "rocsparse_Xcsrsv_analysis()", which will perform analysis on the sparse matrix
* \f$op(A)\f$. Finally, complete the computation by calling \p rocsparse_csrsv_solve. The buffer size,
* buffer allocation, and analysis only need to be called once for a given sparse matrix \f$op(A)\f$, while the
* computation stage can be repeatedly used with different \f$x\f$ and \f$y\f$ vectors. After all calls to
* \p rocsparse_csrsv_solve are complete, the temporary buffer can be deallocated.
*
* Solving a triangular system involves division by the diagonal elements. This means that if the sparse matrix is
* missing the diagonal entry (referred to as a structural zero) or the diagonal entry is zero (referred to as a numerical zero),
* then a division by zero would occur. \p rocsparse_csrsv_solve tracks the location of the first zero pivot (either numerical
* or structural zero). The zero pivot status can be checked by calling \ref rocsparse_csrsv_zero_pivot(). If
* \ref rocsparse_csrsv_zero_pivot() returns \ref rocsparse_status_success, then no zero pivot was found and therefore
* the matrix does not have a structural or numerical zero.
*
* The user can specify that the sparse matrix should be interpreted as having ones on the diagonal by setting the diagonal type
* on the descriptor \p descr to \ref rocsparse_diag_type_unit using \ref rocsparse_set_mat_diag_type. If
* \ref rocsparse_diag_type == \ref rocsparse_diag_type_unit, no zero pivot will be reported, even if \f$A_{j,j} = 0\f$ for
* some \f$j\f$.
*
* The sparse CSR matrix passed to \p rocsparse_csrsv_solve does not actually have to be a triangular matrix. Instead the
* triangular upper or lower part of the sparse matrix is solved based on \ref rocsparse_fill_mode set on the descriptor
* \p descr. If the fill mode is set to \ref rocsparse_fill_mode_lower, then the lower triangular matrix is solved. If the
* fill mode is set to \ref rocsparse_fill_mode_upper, then the upper triangular matrix is solved.
*
* \note
* The sparse CSR matrix has to be sorted. This can be achieved by calling
* rocsparse_csrsort().
*
* \note
* This function is non-blocking and executed asynchronously with respect to the host.
* It can return before the actual computation has finished.
*
* \note
* Currently, only \p trans == \ref rocsparse_operation_none and
* \p trans == \ref rocsparse_operation_transpose is supported.
*
* \note
* This routine supports execution in a hipGraph context.
*
* @param[in]
* handle handle to the rocSPARSE library context queue.
* @param[in]
* trans matrix operation type.
* @param[in]
* m number of rows of the sparse CSR matrix.
* @param[in]
* nnz number of non-zero entries of the sparse CSR matrix.
* @param[in]
* alpha scalar \f$\alpha\f$.
* @param[in]
* descr descriptor of the sparse CSR matrix.
* @param[in]
* csr_val array of \p nnz elements of the sparse CSR matrix.
* @param[in]
* csr_row_ptr array of \p m+1 elements that point to the start
* of every row of the sparse CSR matrix.
* @param[in]
* csr_col_ind array of \p nnz elements containing the column indices of the sparse
* CSR matrix.
* @param[in]
* info structure that holds the information collected during the analysis step.
* @param[in]
* x array of \p m elements, holding the right-hand side.
* @param[out]
* y array of \p m elements, holding the solution.
* @param[in]
* policy \ref rocsparse_solve_policy_auto.
* @param[in]
* temp_buffer temporary storage buffer allocated by the user.
*
* \retval rocsparse_status_success the operation completed successfully.
* \retval rocsparse_status_invalid_handle the library context was not initialized.
* \retval rocsparse_status_invalid_size \p m or \p nnz is invalid.
* \retval rocsparse_status_invalid_pointer \p descr, \p alpha, \p csr_val,
* \p csr_row_ptr, \p csr_col_ind, \p x, or \p y pointer is invalid.
* \retval rocsparse_status_arch_mismatch the device is not supported.
* \retval rocsparse_status_internal_error an internal error occurred.
* \retval rocsparse_status_not_implemented
* \p trans == \ref rocsparse_operation_conjugate_transpose or
* \ref rocsparse_matrix_type != \ref rocsparse_matrix_type_general.
*
* \par Example
* Consider the lower triangular \f$m \times m\f$ matrix \f$L\f$, stored in CSR
* storage format with unit diagonal. The following example solves \f$L \cdot y = x\f$.
* \snippet example_rocsparse_csrsv.cpp doc example
*/
/**@{*/
ROCSPARSE_EXPORT
rocsparse_status rocsparse_scsrsv_solve(rocsparse_handle handle,
rocsparse_operation trans,
rocsparse_int m,
rocsparse_int nnz,
const float* alpha,
const rocsparse_mat_descr descr,
const float* csr_val,
const rocsparse_int* csr_row_ptr,
const rocsparse_int* csr_col_ind,
rocsparse_mat_info info,
const float* x,
float* y,
rocsparse_solve_policy policy,
void* temp_buffer);
ROCSPARSE_EXPORT
rocsparse_status rocsparse_dcsrsv_solve(rocsparse_handle handle,
rocsparse_operation trans,
rocsparse_int m,
rocsparse_int nnz,
const double* alpha,
const rocsparse_mat_descr descr,
const double* csr_val,
const rocsparse_int* csr_row_ptr,
const rocsparse_int* csr_col_ind,
rocsparse_mat_info info,
const double* x,
double* y,
rocsparse_solve_policy policy,
void* temp_buffer);
ROCSPARSE_EXPORT
rocsparse_status rocsparse_ccsrsv_solve(rocsparse_handle handle,
rocsparse_operation trans,
rocsparse_int m,
rocsparse_int nnz,
const rocsparse_float_complex* alpha,
const rocsparse_mat_descr descr,
const rocsparse_float_complex* csr_val,
const rocsparse_int* csr_row_ptr,
const rocsparse_int* csr_col_ind,
rocsparse_mat_info info,
const rocsparse_float_complex* x,
rocsparse_float_complex* y,
rocsparse_solve_policy policy,
void* temp_buffer);
ROCSPARSE_EXPORT
rocsparse_status rocsparse_zcsrsv_solve(rocsparse_handle handle,
rocsparse_operation trans,
rocsparse_int m,
rocsparse_int nnz,
const rocsparse_double_complex* alpha,
const rocsparse_mat_descr descr,
const rocsparse_double_complex* csr_val,
const rocsparse_int* csr_row_ptr,
const rocsparse_int* csr_col_ind,
rocsparse_mat_info info,
const rocsparse_double_complex* x,
rocsparse_double_complex* y,
rocsparse_solve_policy policy,
void* temp_buffer);
/**@}*/
#ifdef __cplusplus
}
#endif
#endif /* ROCSPARSE_CSRSV_H */