zhyang-dev/openfoam
1
0
Fork 0
mirror of https://develop.openfoam.com/Development/openfoam.git synced 2025-11-28 03:28:01 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Creation of OpenFOAM-dev repository 15/04/2008

Browse Source
This commit is contained in:
OpenFOAM-admin
2008-04-15 18:56:58 +01:00
commit 3170c7c0c9
9896 changed files with 4016171 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

163
applications/utilities/parallelProcessing/decompositionMethods/metis-5.0pre2/libmetis/streamio.c Normal file
View File

@ -0,0 +1,163 @@
/*
* Copyright 2007, Regents of the University of Minnesota
*
* streamio.c
*
* This function contains various functions that deal with extending the
* functionality of prinf and mscanf family of routines to understand
* additional format conversions.
*
* At this point the following conversions are support:
* %D for idxtype (which either 32 or 64 bits)
*
* Started 4/6/07
* George
*
* $Id: util.c,v 1.4 2003/04/13 04:45:12 karypis Exp $
*/
#include <metislib.h>
#define D_PATTERN "((^%|[^%]%)[0-\\s\\+]*[0-9]*)D"
#define D_SCAN_REPLACEMENT "$1" SCNIDX
#define D_PRINT_REPLACEMENT "$1" PRIIDX
/*************************************************************************
* Custom mprintf() routine
**************************************************************************/
int mprintf(char *format,...)
{
char *new_format;
int rc;
va_list argp;
gk_strstr_replace(format, D_PATTERN, D_PRINT_REPLACEMENT, "g", &new_format);
/*mprintf("new_format: %s\n", new_format);*/
va_start(argp, format);
rc = vprintf((char *)new_format, argp);
va_end(argp);
gk_free((void **)&new_format, LTERM);
return rc;
}
/*************************************************************************
* Custom msprintf() routine
**************************************************************************/
int msprintf(char *str, char *format,...)
{
char *new_format;
int rc;
va_list argp;
gk_strstr_replace(format, D_PATTERN, D_PRINT_REPLACEMENT, "g", &new_format);
/*mprintf("new_format: %s\n", new_format);*/
va_start(argp, format);
rc = vsprintf(str, (char *)new_format, argp);
va_end(argp);
gk_free((void **)&new_format, LTERM);
return rc;
}
/*************************************************************************
* Custom mfprintf() routine
**************************************************************************/
int mfprintf(FILE *stream, char *format,...)
{
char *new_format;
int rc;
va_list argp;
gk_strstr_replace(format, D_PATTERN, D_PRINT_REPLACEMENT, "g", &new_format);
/*mprintf("new_format: %s\n", new_format);*/
va_start(argp, format);
rc = vfprintf(stream, (char *)new_format, argp);
va_end(argp);
gk_free((void **)&new_format, LTERM);
return rc;
}
/*************************************************************************
* Custom mscanf() routine
**************************************************************************/
int mscanf(char *format,...)
{
char *new_format;
int rc;
va_list argp;
gk_strstr_replace(format, D_PATTERN, D_SCAN_REPLACEMENT, "g", &new_format);
/*mprintf("new_format: %s\n", new_format);*/
va_start(argp, format);
rc = vscanf((char *)new_format, argp);
va_end(argp);
gk_free((void **)&new_format, LTERM);
return rc;
}
/*************************************************************************
* Custom msscanf() routine
**************************************************************************/
int msscanf(char *str, char *format,...)
{
char *new_format;
int rc;
va_list argp;
gk_strstr_replace(format, D_PATTERN, D_SCAN_REPLACEMENT, "g", &new_format);
/*mprintf("new_format: %s\n", new_format);*/
va_start(argp, format);
rc = vsscanf(str, (char *)new_format, argp);
va_end(argp);
gk_free((void **)&new_format, LTERM);
return rc;
}
/*************************************************************************
* Custom mfscanf() routine
**************************************************************************/
int mfscanf(FILE *stream, char *format,...)
{
char *new_format;
int rc;
va_list argp;
gk_strstr_replace(format, D_PATTERN, D_SCAN_REPLACEMENT, "g", &new_format);
/*mprintf("new_format: %s\n", new_format);*/
va_start(argp, format);
rc = vfscanf(stream, (char *)new_format, argp);
va_end(argp);
gk_free((void **)&new_format, LTERM);
return rc;
}