OpenRadioss 2025.1.11
OpenRadioss project
Loading...
Searching...
No Matches
mumps_save_restore_C.c File Reference
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "mumps_save_restore_C.h"
#include "mumps_common.h"

Go to the source code of this file.

Functions

void MUMPS_CALL MUMPS_GET_SAVE_DIR_C (MUMPS_INT *len_save_dir, char *save_dir, mumps_ftnlen l1)
void MUMPS_CALL MUMPS_GET_SAVE_PREFIX_C (MUMPS_INT *len_save_prefix, char *save_prefix, mumps_ftnlen l1)
void MUMPS_CALL MUMPS_SAVE_RESTORE_RETURN_C ()

Function Documentation

◆ MUMPS_GET_SAVE_DIR_C()

void MUMPS_CALL MUMPS_GET_SAVE_DIR_C ( MUMPS_INT * len_save_dir,
char * save_dir,
mumps_ftnlen l1 )

Definition at line 23 of file mumps_save_restore_C.c.

24{
25 char *tmp_save_dir;
26 tmp_save_dir = getenv ("MUMPS_SAVE_DIR");
27 if (tmp_save_dir==NULL)
28 {
29 tmp_save_dir = "NAME_NOT_INITIALIZED";
30 }
31 *len_save_dir = strlen(tmp_save_dir);
32 save_dir = strncpy(save_dir, tmp_save_dir, l1);
33}

◆ MUMPS_GET_SAVE_PREFIX_C()

void MUMPS_CALL MUMPS_GET_SAVE_PREFIX_C ( MUMPS_INT * len_save_prefix,
char * save_prefix,
mumps_ftnlen l1 )

Definition at line 35 of file mumps_save_restore_C.c.

36{
37 char *tmp_save_prefix;
38 tmp_save_prefix = getenv ("MUMPS_SAVE_PREFIX");
39 if (tmp_save_prefix==NULL)
40 {
41 tmp_save_prefix = "NAME_NOT_INITIALIZED";
42 }
43 *len_save_prefix = strlen(tmp_save_prefix);
44 save_prefix = strncpy(save_prefix, tmp_save_prefix, l1);
45}

◆ MUMPS_SAVE_RESTORE_RETURN_C()

void MUMPS_CALL MUMPS_SAVE_RESTORE_RETURN_C ( )

Definition at line 47 of file mumps_save_restore_C.c.

48{
49 /*
50 Save/restore feature will be available in the future
51 */
52}