Actual source code: version.c
1: #include <petscsys.h>
2: /*@C
3: PetscGetVersion - Gets the PETSc version information in a string.
5: Input Parameter:
6: . len - length of the string
8: Output Parameter:
9: . version - version string
11: Level: developer
13: Fortran Note:
14: This routine is not supported in Fortran.
16: For doing runtime checking off supported versions we recommend using PetscGetVersionNumber() instead of this routine.
18: Developer Note: The version information is also listed in
19: $ src/docs/website/index.html.
21: .seealso: PetscGetProgramName(), PetscGetVersionNumber()
23: @*/
25: PetscErrorCode PetscGetVersion(char version[], size_t len)
26: {
30: #if (PETSC_VERSION_RELEASE == 1)
31: PetscSNPrintf(version,len,"Petsc Release Version %d.%d.%d, %s ",PETSC_VERSION_MAJOR,PETSC_VERSION_MINOR, PETSC_VERSION_SUBMINOR,PETSC_VERSION_DATE);
32: #else
33: PetscSNPrintf(version,len,"Petsc Development GIT revision: %s GIT Date: %s",PETSC_VERSION_GIT, PETSC_VERSION_DATE_GIT);
34: #endif
35: return(0);
36: }
38: /*@C
39: PetscGetVersionNumber - Gets the PETSc version information from the library
41: Not collective
43: Output Parameter:
44: + major - the major version (optional, pass NULL if not requested)
45: . minor - the minor version (optional, pass NULL if not requested)
46: . subminor - the subminor version (patch number) (optional, pass NULL if not requested)
47: - release - indicates the library is from a release, not random git repository (optional, pass NULL if not requested)
49: Level: developer
51: Notes:
52: The C macros PETSC_VERSION_MAJOR, PETSC_VERSION_MINOR, PETSC_VERSION_SUBMINOR, PETSC_VERSION_RELEASE provide the information at
53: compile time. This can be used to confirm that the shared library being loaded at runtime has the appropriate version updates.
55: This function can be called before PetscInitialize()
57: .seealso: PetscGetProgramName(), PetscGetVersion(), PetscInitialize()
59: @*/
60: PetscErrorCode PetscGetVersionNumber(PetscInt *major, PetscInt *minor, PetscInt *subminor,PetscInt *release)
61: {
62: if (major) *major = PETSC_VERSION_MAJOR;
63: if (minor) *minor = PETSC_VERSION_MINOR;
64: if (subminor) *subminor = PETSC_VERSION_SUBMINOR;
65: if (release) *release = PETSC_VERSION_RELEASE;
66: return 0;
67: }