GCC Code Coverage Report

Directory:	./
File:	src/svd/interface/dlregissvd.c
Date:	2026-03-16 03:58: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()`
    
      @*/
    
      2332
      PetscErrorCode SVDFinalizePackage(void)
    
      {
    
        1/2✓ Branch 0 taken 2 times.
✗ Branch 1 not taken.

      2332
        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.

      2332
        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.

      2332
        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.

      2332
        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.

      2332
        PetscCall(PetscFunctionListDestroy(&SVDMonitorDestroyList));
    
      2332
        SVDPackageInitialized       = PETSC_FALSE;
    
      2332
        SVDRegisterAllCalled        = PETSC_FALSE;
    
      2332
        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.

      2332
        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()`
    
      @*/
    
      35694
      PetscErrorCode SVDInitializePackage(void)
    
      {
    
      35694
        char           logList[256];
    
      35694
        PetscBool      opt,pkg;
    
      35694
        PetscClassId   classids[1];
    
        1/2✓ Branch 0 taken 2 times.
✗ Branch 1 not taken.

      35694
        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.

      35694
        if (SVDPackageInitialized) PetscFunctionReturn(PETSC_SUCCESS);
    
      2332
        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.

      2332
        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.

      2332
        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.

      2332
        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.

      2332
        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.

      2332
        PetscCall(PetscLogEventRegister("SVDSolve",SVD_CLASSID,&SVD_Solve));
    
        /* Process Info */
    
      2332
        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.

      2332
        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.

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

      2332
        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.

      2332
        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.

      457
        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		2332	PetscErrorCode SVDFinalizePackage(void)
32			{
33	1/2 ✓ Branch 0 taken 2 times. ✗ Branch 1 not taken.	2332	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.	2332	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.	2332	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.	2332	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.	2332	PetscCall(PetscFunctionListDestroy(&SVDMonitorDestroyList));
38		2332	SVDPackageInitialized = PETSC_FALSE;
39		2332	SVDRegisterAllCalled = PETSC_FALSE;
40		2332	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.	2332	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		35694	PetscErrorCode SVDInitializePackage(void)
57			{
58		35694	char logList[256];
59		35694	PetscBool opt,pkg;
60		35694	PetscClassId classids[1];
61
62	1/2 ✓ Branch 0 taken 2 times. ✗ Branch 1 not taken.	35694	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.	35694	if (SVDPackageInitialized) PetscFunctionReturn(PETSC_SUCCESS);
64		2332	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.	2332	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.	2332	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.	2332	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.	2332	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.	2332	PetscCall(PetscLogEventRegister("SVDSolve",SVD_CLASSID,&SVD_Solve));
74			/* Process Info */
75		2332	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.	2332	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.	2332	PetscCall(PetscOptionsGetString(NULL,NULL,"-log_exclude",logList,sizeof(logList),&opt));
79	2/2 ✓ Branch 0 taken 10 times. ✓ Branch 1 taken 10 times.	2332	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.	2332	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.	457	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 2332 times	79.0%
SVDInitializePackage (line 56)	called 35694 times	80.0%