GCC Code Coverage Report

Directory:	./
File:	src/svd/interface/dlregissvd.c
Date:	2026-05-14 04:00:17

	Exec	Total	Coverage
Lines:	34	34	100.0%
Functions:	3	3	100.0%
Branches:	92	150	61.3%

  
      Line
      Branch
      Exec
      Source
    
      /*
    
         - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
    
         SLEPc - Scalable Library for Eigenvalue Problem Computations
    
         Copyright (c) 2002-, Universitat Politecnica de Valencia, Spain
    
         This file is part of SLEPc.
    
         SLEPc is distributed under a 2-clause BSD license (see LICENSE).
    
         - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
    
      */
    
      #include <slepc/private/svdimpl.h>
    
      static PetscBool SVDPackageInitialized = PETSC_FALSE;
    
      const char *SVDTRLanczosGBidiags[] = {"SINGLE","UPPER","LOWER","SVDTRLanczosGBidiag","SVD_TRLANCZOS_GBIDIAG_",NULL};
    
      const char *SVDErrorTypes[] = {"ABSOLUTE","RELATIVE","SVDErrorType","SVD_ERROR_",NULL};
    
      const char *SVDPRIMMEMethods[] = {"","HYBRID","NORMALEQUATIONS","AUGMENTED","SVDPRIMMEMethod","SVD_PRIMME_",NULL};
    
      const char *SVDKSVDEigenMethods[] = {"","MRRR","DC","ELPA","SVDKSVDEigenMethod","SVD_KSVD_EIGEN_",NULL};
    
      const char *SVDKSVDPolarMethods[] = {"","QDWH","ZOLOPD","SVDKSVDPolarMethod","SVD_KSVD_POLAR_",NULL};
    
      const char *const SVDConvergedReasons_Shifted[] = {"","DIVERGED_SYMMETRY_LOST","DIVERGED_BREAKDOWN","DIVERGED_ITS","CONVERGED_ITERATING","CONVERGED_TOL","CONVERGED_USER","CONVERGED_MAXIT","SVDConvergedReason","SVD_",NULL};
    
      const char *const*SVDConvergedReasons = SVDConvergedReasons_Shifted + 4;
    
      /*@C
    
        SVDFinalizePackage - This function destroys everything in the SLEPc interface
    
        to the `SVD` package. It is called from `SlepcFinalize()`.
    
        Level: developer
    
      .seealso: [](ch:svd), `SlepcFinalize()`, `SVDInitializePackage()`
    
      @*/
    
      2321
      PetscErrorCode SVDFinalizePackage(void)
    
      {
    
        1/2✓ Branch 0 taken 2 times.
✗ Branch 1 not taken.

      2321
        PetscFunctionBegin;
    
        4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.

      2321
        PetscCall(PetscFunctionListDestroy(&SVDList));
    
        4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.

      2321
        PetscCall(PetscFunctionListDestroy(&SVDMonitorList));
    
        4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.

      2321
        PetscCall(PetscFunctionListDestroy(&SVDMonitorCreateList));
    
        4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.

      2321
        PetscCall(PetscFunctionListDestroy(&SVDMonitorDestroyList));
    
      2321
        SVDPackageInitialized       = PETSC_FALSE;
    
      2321
        SVDRegisterAllCalled        = PETSC_FALSE;
    
      2321
        SVDMonitorRegisterAllCalled = PETSC_FALSE;
    
        6/12✓ Branch 0 taken 2 times.
✗ Branch 1 not taken.
✗ Branch 2 not taken.
✓ Branch 3 taken 2 times.
✓ Branch 4 taken 2 times.
✗ Branch 5 not taken.
✓ Branch 6 taken 2 times.
✗ Branch 7 not taken.
✓ Branch 8 taken 2 times.
✗ Branch 9 not taken.
✗ Branch 10 not taken.
✓ Branch 11 taken 2 times.

      2321
        PetscFunctionReturn(PETSC_SUCCESS);
    
      }
    
      /*@C
    
         SVDInitializePackage - This function initializes everything in the `SVD` package.
    
         It is called from `PetscDLLibraryRegister_slepcsvd()` when using dynamic libraries, and
    
         on the first call to `SVDCreate()` when using shared or static libraries.
    
         Note:
    
         This function never needs to be called by SLEPc users.
    
         Level: developer
    
      .seealso: [](ch:svd), `SVD`, `SlepcInitialize()`, `SVDFinalizePackage()`
    
      @*/
    
      35523
      PetscErrorCode SVDInitializePackage(void)
    
      {
    
      35523
        char           logList[256];
    
      35523
        PetscBool      opt,pkg;
    
      35523
        PetscClassId   classids[1];
    
        1/2✓ Branch 0 taken 2 times.
✗ Branch 1 not taken.

      35523
        PetscFunctionBegin;
    
        8/14✓ Branch 0 taken 10 times.
✓ Branch 1 taken 10 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.
✓ Branch 6 taken 2 times.
✗ Branch 7 not taken.
✓ Branch 8 taken 2 times.
✗ Branch 9 not taken.
✓ Branch 10 taken 2 times.
✗ Branch 11 not taken.
✗ Branch 12 not taken.
✓ Branch 13 taken 2 times.

      35523
        if (SVDPackageInitialized) PetscFunctionReturn(PETSC_SUCCESS);
    
      2321
        SVDPackageInitialized = PETSC_TRUE;
    
        /* Register Classes */
    
        4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.

      2321
        PetscCall(PetscClassIdRegister("SVD Solver",&SVD_CLASSID));
    
        /* Register Constructors */
    
        4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.

      2321
        PetscCall(SVDRegisterAll());
    
        /* Register Monitors */
    
        4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.

      2321
        PetscCall(SVDMonitorRegisterAll());
    
        /* Register Events */
    
        4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.

      2321
        PetscCall(PetscLogEventRegister("SVDSetUp",SVD_CLASSID,&SVD_SetUp));
    
        4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.

      2321
        PetscCall(PetscLogEventRegister("SVDSolve",SVD_CLASSID,&SVD_Solve));
    
        /* Process Info */
    
      2321
        classids[0] = SVD_CLASSID;
    
        4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.

      2321
        PetscCall(PetscInfoProcessClass("svd",1,&classids[0]));
    
        /* Process summary exclusions */
    
        4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.

      2321
        PetscCall(PetscOptionsGetString(NULL,NULL,"-log_exclude",logList,sizeof(logList),&opt));
    
        2/2✓ Branch 0 taken 10 times.
✓ Branch 1 taken 10 times.

      2321
        if (opt) {
    
        4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.

      14
          PetscCall(PetscStrInList("svd",logList,',',&pkg));
    
        5/8✓ Branch 0 taken 10 times.
✗ Branch 1 not taken.
✓ Branch 2 taken 2 times.
✓ Branch 3 taken 8 times.
✓ Branch 4 taken 2 times.
✗ Branch 5 not taken.
✗ Branch 6 not taken.
✓ Branch 7 taken 2 times.

      14
          if (pkg) PetscCall(PetscLogEventDeactivateClass(SVD_CLASSID));
    
        }
    
        /* Register package finalizer */
    
        4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.

      2321
        PetscCall(PetscRegisterFinalize(SVDFinalizePackage));
    
        6/12✓ Branch 0 taken 2 times.
✗ Branch 1 not taken.
✗ Branch 2 not taken.
✓ Branch 3 taken 2 times.
✓ Branch 4 taken 2 times.
✗ Branch 5 not taken.
✓ Branch 6 taken 2 times.
✗ Branch 7 not taken.
✓ Branch 8 taken 2 times.
✗ Branch 9 not taken.
✗ Branch 10 not taken.
✓ Branch 11 taken 2 times.

      454
        PetscFunctionReturn(PETSC_SUCCESS);
    
      }
    
      #if defined(PETSC_HAVE_DYNAMIC_LIBRARIES)
    
      /*
    
        PetscDLLibraryRegister - This function is called when the dynamic library
    
        it is in is opened.
    
        This one registers all the SVD methods that are in the basic SLEPc libslepcsvd
    
        library.
    
       */
    
      10
      SLEPC_EXTERN PetscErrorCode PetscDLLibraryRegister_slepcsvd(void)
    
      {
    
        1/2✓ Branch 0 taken 2 times.
✗ Branch 1 not taken.

      10
        PetscFunctionBegin;
    
        4/6✓ Branch 0 taken 2 times.
✓ Branch 1 taken 8 times.
✓ Branch 2 taken 2 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 2 times.

      10
        PetscCall(SVDInitializePackage());
    
        6/12✓ Branch 0 taken 2 times.
✗ Branch 1 not taken.
✗ Branch 2 not taken.
✓ Branch 3 taken 2 times.
✓ Branch 4 taken 2 times.
✗ Branch 5 not taken.
✓ Branch 6 taken 2 times.
✗ Branch 7 not taken.
✓ Branch 8 taken 2 times.
✗ Branch 9 not taken.
✗ Branch 10 not taken.
✓ Branch 11 taken 2 times.

      2
        PetscFunctionReturn(PETSC_SUCCESS);
    
      }
    
      #endif /* PETSC_HAVE_DYNAMIC_LIBRARIES */

Line	Branch	Exec	Source
1			/*
2			- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
3			SLEPc - Scalable Library for Eigenvalue Problem Computations
4			Copyright (c) 2002-, Universitat Politecnica de Valencia, Spain
5
6			This file is part of SLEPc.
7			SLEPc is distributed under a 2-clause BSD license (see LICENSE).
8			- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
9			*/
10
11			#include <slepc/private/svdimpl.h>
12
13			static PetscBool SVDPackageInitialized = PETSC_FALSE;
14
15			const char *SVDTRLanczosGBidiags[] = {"SINGLE","UPPER","LOWER","SVDTRLanczosGBidiag","SVD_TRLANCZOS_GBIDIAG_",NULL};
16			const char *SVDErrorTypes[] = {"ABSOLUTE","RELATIVE","SVDErrorType","SVD_ERROR_",NULL};
17			const char *SVDPRIMMEMethods[] = {"","HYBRID","NORMALEQUATIONS","AUGMENTED","SVDPRIMMEMethod","SVD_PRIMME_",NULL};
18			const char *SVDKSVDEigenMethods[] = {"","MRRR","DC","ELPA","SVDKSVDEigenMethod","SVD_KSVD_EIGEN_",NULL};
19			const char *SVDKSVDPolarMethods[] = {"","QDWH","ZOLOPD","SVDKSVDPolarMethod","SVD_KSVD_POLAR_",NULL};
20			const char *const SVDConvergedReasons_Shifted[] = {"","DIVERGED_SYMMETRY_LOST","DIVERGED_BREAKDOWN","DIVERGED_ITS","CONVERGED_ITERATING","CONVERGED_TOL","CONVERGED_USER","CONVERGED_MAXIT","SVDConvergedReason","SVD_",NULL};
21			const char constSVDConvergedReasons = SVDConvergedReasons_Shifted + 4;
22
23			/*@C
24			SVDFinalizePackage - This function destroys everything in the SLEPc interface
25			to the `SVD` package. It is called from `SlepcFinalize()`.
26
27			Level: developer
28
29			.seealso: [](ch:svd), `SlepcFinalize()`, `SVDInitializePackage()`
30			@*/
31		2321	PetscErrorCode SVDFinalizePackage(void)
32			{
33	1/2 ✓ Branch 0 taken 2 times. ✗ Branch 1 not taken.	2321	PetscFunctionBegin;
34	4/6 ✓ Branch 0 taken 2 times. ✓ Branch 1 taken 8 times. ✓ Branch 2 taken 2 times. ✗ Branch 3 not taken. ✗ Branch 4 not taken. ✓ Branch 5 taken 2 times.	2321	PetscCall(PetscFunctionListDestroy(&SVDList));
35	4/6 ✓ Branch 0 taken 2 times. ✓ Branch 1 taken 8 times. ✓ Branch 2 taken 2 times. ✗ Branch 3 not taken. ✗ Branch 4 not taken. ✓ Branch 5 taken 2 times.	2321	PetscCall(PetscFunctionListDestroy(&SVDMonitorList));
36	4/6 ✓ Branch 0 taken 2 times. ✓ Branch 1 taken 8 times. ✓ Branch 2 taken 2 times. ✗ Branch 3 not taken. ✗ Branch 4 not taken. ✓ Branch 5 taken 2 times.	2321	PetscCall(PetscFunctionListDestroy(&SVDMonitorCreateList));
37	4/6 ✓ Branch 0 taken 2 times. ✓ Branch 1 taken 8 times. ✓ Branch 2 taken 2 times. ✗ Branch 3 not taken. ✗ Branch 4 not taken. ✓ Branch 5 taken 2 times.	2321	PetscCall(PetscFunctionListDestroy(&SVDMonitorDestroyList));
38		2321	SVDPackageInitialized = PETSC_FALSE;
39		2321	SVDRegisterAllCalled = PETSC_FALSE;
40		2321	SVDMonitorRegisterAllCalled = PETSC_FALSE;
41	6/12 ✓ Branch 0 taken 2 times. ✗ Branch 1 not taken. ✗ Branch 2 not taken. ✓ Branch 3 taken 2 times. ✓ Branch 4 taken 2 times. ✗ Branch 5 not taken. ✓ Branch 6 taken 2 times. ✗ Branch 7 not taken. ✓ Branch 8 taken 2 times. ✗ Branch 9 not taken. ✗ Branch 10 not taken. ✓ Branch 11 taken 2 times.	2321	PetscFunctionReturn(PETSC_SUCCESS);
42			}
43
44			/*@C
45			SVDInitializePackage - This function initializes everything in the `SVD` package.
46			It is called from `PetscDLLibraryRegister_slepcsvd()` when using dynamic libraries, and
47			on the first call to `SVDCreate()` when using shared or static libraries.
48
49			Note:
50			This function never needs to be called by SLEPc users.
51
52			Level: developer
53
54			.seealso: [](ch:svd), `SVD`, `SlepcInitialize()`, `SVDFinalizePackage()`
55			@*/
56		35523	PetscErrorCode SVDInitializePackage(void)
57			{
58		35523	char logList[256];
59		35523	PetscBool opt,pkg;
60		35523	PetscClassId classids[1];
61
62	1/2 ✓ Branch 0 taken 2 times. ✗ Branch 1 not taken.	35523	PetscFunctionBegin;
63	8/14 ✓ Branch 0 taken 10 times. ✓ Branch 1 taken 10 times. ✓ Branch 2 taken 2 times. ✗ Branch 3 not taken. ✗ Branch 4 not taken. ✓ Branch 5 taken 2 times. ✓ Branch 6 taken 2 times. ✗ Branch 7 not taken. ✓ Branch 8 taken 2 times. ✗ Branch 9 not taken. ✓ Branch 10 taken 2 times. ✗ Branch 11 not taken. ✗ Branch 12 not taken. ✓ Branch 13 taken 2 times.	35523	if (SVDPackageInitialized) PetscFunctionReturn(PETSC_SUCCESS);
64		2321	SVDPackageInitialized = PETSC_TRUE;
65			/* Register Classes */
66	4/6 ✓ Branch 0 taken 2 times. ✓ Branch 1 taken 8 times. ✓ Branch 2 taken 2 times. ✗ Branch 3 not taken. ✗ Branch 4 not taken. ✓ Branch 5 taken 2 times.	2321	PetscCall(PetscClassIdRegister("SVD Solver",&SVD_CLASSID));
67			/* Register Constructors */
68	4/6 ✓ Branch 0 taken 2 times. ✓ Branch 1 taken 8 times. ✓ Branch 2 taken 2 times. ✗ Branch 3 not taken. ✗ Branch 4 not taken. ✓ Branch 5 taken 2 times.	2321	PetscCall(SVDRegisterAll());
69			/* Register Monitors */
70	4/6 ✓ Branch 0 taken 2 times. ✓ Branch 1 taken 8 times. ✓ Branch 2 taken 2 times. ✗ Branch 3 not taken. ✗ Branch 4 not taken. ✓ Branch 5 taken 2 times.	2321	PetscCall(SVDMonitorRegisterAll());
71			/* Register Events */
72	4/6 ✓ Branch 0 taken 2 times. ✓ Branch 1 taken 8 times. ✓ Branch 2 taken 2 times. ✗ Branch 3 not taken. ✗ Branch 4 not taken. ✓ Branch 5 taken 2 times.	2321	PetscCall(PetscLogEventRegister("SVDSetUp",SVD_CLASSID,&SVD_SetUp));
73	4/6 ✓ Branch 0 taken 2 times. ✓ Branch 1 taken 8 times. ✓ Branch 2 taken 2 times. ✗ Branch 3 not taken. ✗ Branch 4 not taken. ✓ Branch 5 taken 2 times.	2321	PetscCall(PetscLogEventRegister("SVDSolve",SVD_CLASSID,&SVD_Solve));
74			/* Process Info */
75		2321	classids[0] = SVD_CLASSID;
76	4/6 ✓ Branch 0 taken 2 times. ✓ Branch 1 taken 8 times. ✓ Branch 2 taken 2 times. ✗ Branch 3 not taken. ✗ Branch 4 not taken. ✓ Branch 5 taken 2 times.	2321	PetscCall(PetscInfoProcessClass("svd",1,&classids[0]));
77			/* Process summary exclusions */
78	4/6 ✓ Branch 0 taken 2 times. ✓ Branch 1 taken 8 times. ✓ Branch 2 taken 2 times. ✗ Branch 3 not taken. ✗ Branch 4 not taken. ✓ Branch 5 taken 2 times.	2321	PetscCall(PetscOptionsGetString(NULL,NULL,"-log_exclude",logList,sizeof(logList),&opt));
79	2/2 ✓ Branch 0 taken 10 times. ✓ Branch 1 taken 10 times.	2321	if (opt) {
80	4/6 ✓ Branch 0 taken 2 times. ✓ Branch 1 taken 8 times. ✓ Branch 2 taken 2 times. ✗ Branch 3 not taken. ✗ Branch 4 not taken. ✓ Branch 5 taken 2 times.	14	PetscCall(PetscStrInList("svd",logList,',',&pkg));
81	5/8 ✓ Branch 0 taken 10 times. ✗ Branch 1 not taken. ✓ Branch 2 taken 2 times. ✓ Branch 3 taken 8 times. ✓ Branch 4 taken 2 times. ✗ Branch 5 not taken. ✗ Branch 6 not taken. ✓ Branch 7 taken 2 times.	14	if (pkg) PetscCall(PetscLogEventDeactivateClass(SVD_CLASSID));
82			}
83			/* Register package finalizer */
84	4/6 ✓ Branch 0 taken 2 times. ✓ Branch 1 taken 8 times. ✓ Branch 2 taken 2 times. ✗ Branch 3 not taken. ✗ Branch 4 not taken. ✓ Branch 5 taken 2 times.	2321	PetscCall(PetscRegisterFinalize(SVDFinalizePackage));
85	6/12 ✓ Branch 0 taken 2 times. ✗ Branch 1 not taken. ✗ Branch 2 not taken. ✓ Branch 3 taken 2 times. ✓ Branch 4 taken 2 times. ✗ Branch 5 not taken. ✓ Branch 6 taken 2 times. ✗ Branch 7 not taken. ✓ Branch 8 taken 2 times. ✗ Branch 9 not taken. ✗ Branch 10 not taken. ✓ Branch 11 taken 2 times.	454	PetscFunctionReturn(PETSC_SUCCESS);
86			}
87
88			#if defined(PETSC_HAVE_DYNAMIC_LIBRARIES)
89			/*
90			PetscDLLibraryRegister - This function is called when the dynamic library
91			it is in is opened.
92
93			This one registers all the SVD methods that are in the basic SLEPc libslepcsvd
94			library.
95			*/
96		10	SLEPC_EXTERN PetscErrorCode PetscDLLibraryRegister_slepcsvd(void)
97			{
98	1/2 ✓ Branch 0 taken 2 times. ✗ Branch 1 not taken.	10	PetscFunctionBegin;
99	4/6 ✓ Branch 0 taken 2 times. ✓ Branch 1 taken 8 times. ✓ Branch 2 taken 2 times. ✗ Branch 3 not taken. ✗ Branch 4 not taken. ✓ Branch 5 taken 2 times.	10	PetscCall(SVDInitializePackage());
100	6/12 ✓ Branch 0 taken 2 times. ✗ Branch 1 not taken. ✗ Branch 2 not taken. ✓ Branch 3 taken 2 times. ✓ Branch 4 taken 2 times. ✗ Branch 5 not taken. ✓ Branch 6 taken 2 times. ✗ Branch 7 not taken. ✓ Branch 8 taken 2 times. ✗ Branch 9 not taken. ✗ Branch 10 not taken. ✓ Branch 11 taken 2 times.	2	PetscFunctionReturn(PETSC_SUCCESS);
101			}
102			#endif /* PETSC_HAVE_DYNAMIC_LIBRARIES */
103

Function (Line)	Call count	Block coverage
PetscDLLibraryRegister_slepcsvd (line 96)	called 10 times	76.0%
SVDFinalizePackage (line 31)	called 2321 times	79.0%
SVDInitializePackage (line 56)	called 35523 times	80.0%