48 static inline PetscErrorCode PetscStrtolower(char a[])  in PetscStrtolower()  argument
51   PetscAssertPointer_Private(a, 1);  in PetscStrtolower()
52   while (*a) {  in PetscStrtolower()
53     if (*a >= 'A' && *a <= 'Z') *a += 'a' - 'A';  in PetscStrtolower()
54     a++;  in PetscStrtolower()
71 static inline PetscErrorCode PetscStrtoupper(char a[])  in PetscStrtoupper()  argument
74   PetscAssertPointer_Private(a, 1);  in PetscStrtoupper()
75   while (*a) {  in PetscStrtoupper()
76     if (*a >= 'a' && *a <= 'z') *a += 'A' - 'a';  in PetscStrtoupper()
77     a++;  in PetscStrtoupper()
162 static inline void PetscStrcmpNoError(const char a[], const char b[], PetscBool *flg)  in PetscStrcmpNoError()  argument
164   if (!a && !b) {  in PetscStrcmpNoError()
166   } else if (!a || !b) {  in PetscStrcmpNoError()
170     *flg = __builtin_strcmp(a, b) ? PETSC_FALSE : PETSC_TRUE;  in PetscStrcmpNoError()
172     *flg = strcmp(a, b) ? PETSC_FALSE : PETSC_TRUE;  in PetscStrcmpNoError()
193 static inline PetscErrorCode PetscStrcmp(const char a[], const char b[], PetscBool *flg)  in PetscStrcmp()  argument
197   PetscStrcmpNoError(a, b, flg);  in PetscStrcmp()
325 static inline PetscErrorCode PetscStrncmp(const char a[], const char b[], size_t n, PetscBool *t)  in PetscStrncmp()  argument
331     PetscAssertPointer_Private(a, 1);  in PetscStrncmp()
335   *t = __builtin_strncmp(a, b, n) ? PETSC_FALSE : PETSC_TRUE;  in PetscStrncmp()
337   *t = strncmp(a, b, n) ? PETSC_FALSE : PETSC_TRUE;  in PetscStrncmp()
360 static inline PetscErrorCode PetscStrrstr(const char a[], const char b[], char *tmp[]) PeNS  in PetscStrrstr()  argument
365   PetscAssertPointer_Private(a, 1);  in PetscStrrstr()
368   while (a) {  in PetscStrrstr()
370     a = (char *)__builtin_strstr(a, b);  in PetscStrrstr()
372     a = (char *)strstr(a, b);  in PetscStrrstr()
374     if (a) ltmp = a++;  in PetscStrrstr()
432 static inline PetscErrorCode PetscStrgrt(const char a[], const char b[], PetscBool *t)  in PetscStrgrt()  argument
436   if (!a && !b) {  in PetscStrgrt()
438   } else if (a && !b) {  in PetscStrgrt()
440   } else if (!a && b) {  in PetscStrgrt()
444     *t = __builtin_strcmp(a, b) > 0 ? PETSC_TRUE : PETSC_FALSE;  in PetscStrgrt()
446     *t = strcmp(a, b) > 0 ? PETSC_TRUE : PETSC_FALSE;  in PetscStrgrt()
468 static inline PetscErrorCode PetscStrchr(const char a[], char b, char *c[]) PeNS  in PetscStrchr()  argument
471   PetscAssertPointer_Private(a, 1);  in PetscStrchr()
474   *c = (char *)__builtin_strchr(a, b);  in PetscStrchr()
476   *c = (char *)strchr(a, b);  in PetscStrchr()
498 static inline PetscErrorCode PetscStrrchr(const char a[], char b, char *c[]) PeNS  in PetscStrrchr()  argument
501   PetscAssertPointer_Private(a, 1);  in PetscStrrchr()
504   *c = (char *)__builtin_strrchr(a, b);  in PetscStrrchr()
506   *c = (char *)strrchr(a, b);  in PetscStrrchr()
508   if (!*c) *c = (char *)a;  in PetscStrrchr()
534 static inline PetscErrorCode PetscStrendswith(const char a[], const char b[], PetscBool *flg)  in PetscStrendswith()  argument
542   PetscCall(PetscStrlen(a, &na));  in PetscStrendswith()
546     *flg = __builtin_memcmp(b, a + (na - nb), nb) == 0 ? PETSC_TRUE : PETSC_FALSE;  in PetscStrendswith()
548     *flg = memcmp(b, a + (na - nb), nb) == 0 ? PETSC_TRUE : PETSC_FALSE;  in PetscStrendswith()
578 static inline PetscErrorCode PetscStrbeginswith(const char a[], const char b[], PetscBool *flg)  in PetscStrbeginswith()  argument
587   PetscCall(PetscStrncmp(a, b, len, flg));  in PetscStrbeginswith()
615 static inline PetscErrorCode PetscMemmove(void *a, const void *b, size_t n)  in PetscMemmove()  argument
618   if (PetscUnlikely((n == 0) || (a == b))) PetscFunctionReturn(PETSC_SUCCESS);  in PetscMemmove()
619 …PetscAssert(a, PETSC_COMM_SELF, PETSC_ERR_ARG_NULL, "Trying to copy %zu bytes to null pointer (Arg…  in PetscMemmove()
622   memmove((char *)a, (const char *)b, n);  in PetscMemmove()
624   if (a < b) {  in PetscMemmove()
625     if ((char *)a <= (char *)b - n) {  in PetscMemmove()
626       memcpy(a, b, n);  in PetscMemmove()
628       const size_t ptr_diff = (size_t)((char *)b - (char *)a);  in PetscMemmove()
630       memcpy(a, b, ptr_diff);  in PetscMemmove()
634     if ((char *)b <= (char *)a - n) {  in PetscMemmove()
635       memcpy(a, b, n);  in PetscMemmove()
637       const size_t ptr_diff = (size_t)((char *)a - (char *)b);  in PetscMemmove()
640       PetscCall(PetscMemmove(a, b, n - ptr_diff));  in PetscMemmove()
675 static inline PetscErrorCode PetscMemcpy(void *a, const void *b, size_t n)  in PetscMemcpy()  argument
677   const PETSC_UINTPTR_T al = (PETSC_UINTPTR_T)a;  in PetscMemcpy()
681   if (PetscUnlikely((n == 0) || (a == b))) PetscFunctionReturn(PETSC_SUCCESS);  in PetscMemcpy()
682 …PetscAssert(a, PETSC_COMM_SELF, PETSC_ERR_ARG_NULL, "Trying to copy %zu bytes to a null pointer (A…  in PetscMemcpy()
689     PetscScalar       *y          = (PetscScalar *)a;  in PetscMemcpy()
707   memcpy(a, b, n);  in PetscMemcpy()
731 static inline PetscErrorCode PetscMemzero(void *a, size_t n)  in PetscMemzero()  argument
735 …PetscAssert(a, PETSC_COMM_SELF, PETSC_ERR_ARG_NULL, "Trying to zero %zu bytes at a null pointer", …  in PetscMemzero()
737   if (!(((PETSC_UINTPTR_T)a) % sizeof(PetscScalar)) && !(n % sizeof(PetscScalar))) {  in PetscMemzero()
739     PetscScalar *x          = (PetscScalar *)a;  in PetscMemzero()
750   bzero(a, n);  in PetscMemzero()
752   memset(a, 0, n);  in PetscMemzero()