xDataMisc.cc File Reference

#include <stdlib.h>
#include <string.h>
#include <ctype.h>
#include <unistd.h>
#include "xData.h"

Go to the source code of this file.

Functions
void *	xData_malloc (statusMessageReporting *smr, size_t size, int zero, const char *forItem, const char *file, int line)
void *	xData_realloc (statusMessageReporting *smr, void *pOld, size_t size, const char *forItem, const char *file, int line)
void *	xData_free (statusMessageReporting *, void *p)
char *	xDataMisc_allocateCopyString (statusMessageReporting *smr, const char *s, const char *forItem, const char *file, int line)
char *	xDataMisc_getAbsPath (statusMessageReporting *smr, const char *fileName)
int	xData_setMessageError_ReturnInt (int value, statusMessageReporting *smr, void *userInterface, const char *packageName, int lineNumber, int code, const char *fmt,...)

---

Function Documentation

void* xData_free	(	statusMessageReporting *	,
		void *	p
	)

Definition at line 89 of file xDataMisc.cc.

Referenced by G4GIDI::freeTarget(), G4GIDI_Z_AMass(), G4GIDI::getAlreadyReadTarget(), G4GIDI::getNamesOfAvailableLibraries(), tpi_channelID_free(), tpi_spectralID_free(), tpi_spectralID_release(), tpia_angular_release(), tpia_angularEnergy_release(), tpia_channel_free(), tpia_channel_release(), tpia_depot_free(), tpia_depot_release(), tpia_Legendre_release(), tpia_map_free(), tpia_map_release(), tpia_misc_getEqualProbableBins(), tpia_multiplicity_free(), tpia_multiplicity_release(), tpia_particle_free(), tpia_particle_freeInternalList(), tpia_product_free(), tpia_product_release(), tpia_target_createRead(), tpia_target_createReadFromMap(), tpia_target_free(), tpia_target_heated_create(), tpia_target_heated_createRead(), tpia_target_heated_free(), tpia_target_heated_release(), tpia_target_release(), xData_1d_x_free_copyData(), xData_2d_xindex_y_free_rawIndices(), xData_2d_xindex_y_free_toFilledYs(), xData_2d_xShared_yHistogram_free_copyData(), xData_2d_xy_free_copyData(), xData_freeElementList(), xData_matrix_free_copyData(), xData_parseFree(), xData_releaseAttributionList(), xData_setFileName(), and G4GIDI_target::~G4GIDI_target().

                                                      {

    if( p != NULL ) free( p );
    return( NULL );
}

void* xData_malloc	(	statusMessageReporting *	smr,
		size_t	size,
		int	zero,
		const char *	forItem,
		const char *	file,
		int	line
	)

Definition at line 56 of file xDataMisc.cc.

References xData_realloc().

Referenced by xDataMisc_allocateCopyString().

                                                                                                                          {

    void *p = xData_realloc( smr, NULL, size, forItem, file, line );
    int i;
    char *c;
    long long *l;

    if( ( p != NULL ) && zero ) {
        //for( i = 0, l = (long long *) p; i < size / sizeof( long long ); i++, l++ ) *l = 0;
        for( i = 0, l = (long long *) p; i < (int)( size / sizeof( long long ) ); i++, l++ ) *l = 0;
        //for( i = sizeof( long long ) * i, c = (char *) l; i < size; i++, c++ ) *c = 0;
        for( i = sizeof( long long ) * i, c = (char *) l; i < (int) size; i++, c++ ) *c = 0;
    }

    return( p );
}

void* xData_realloc	(	statusMessageReporting *	smr,
		void *	pOld,
		size_t	size,
		const char *	forItem,
		const char *	file,
		int	line
	)

Definition at line 75 of file xDataMisc.cc.

References smr_setMessageError().

Referenced by xData_malloc().

                                                                                                                             {

    void *p = realloc( pOld, size );

    if( ( p == NULL ) && ( smr != NULL ) ) {
        smr_setMessageError( smr, NULL, file, line, -1, " xData_realloc: failed to realloc size = %llu for variable %s\n", 
            (unsigned long long) size, forItem );
    }
    return( p );
}

int xData_setMessageError_ReturnInt	(	int	value,
		statusMessageReporting *	smr,
		void *	userInterface,
		const char *	packageName,
		int	lineNumber,
		int	code,
		const char *	fmt,
			...
	)

Definition at line 160 of file xDataMisc.cc.

References smr_setMessageError().

                           {

    va_list args;

    va_start( args, fmt );
    smr_setMessageError( smr, userInterface, packageName, lineNumber, code, fmt, args );
    va_end( args );
    return( value );
}

char* xDataMisc_allocateCopyString	(	statusMessageReporting *	smr,
		const char *	s,
		const char *	forItem,
		const char *	file,
		int	line
	)

Definition at line 97 of file xDataMisc.cc.

References xData_malloc().

                                                                                                                                  {
/*
*   User must free returned string.
*/
    char *c;

    //if( ( c = xData_malloc( smr, strlen( s ) + 1, 0, forItem, file, line ) ) != NULL ) {
    if( ( c = (char*) xData_malloc( smr, strlen( s ) + 1, 0, forItem, file, line ) ) != NULL ) {
        strcpy( c, s );
    }
    return( c );
}

char* xDataMisc_getAbsPath	(	statusMessageReporting *	smr,
		const char *	fileName
	)

Definition at line 112 of file xDataMisc.cc.

References CLHEP::detail::n, and smr_setMessageError().

Referenced by tpia_target_heated_read(), and tpia_target_read().

                                                                                {
/*
*   User must free returned string.
*/
    int n = strlen( fileName ) + 1, nCwd = 0;
    //char *absPath, cwd[4 * 1024] = "", *p, *needle;
    char *absPath, cwd[4 * 1024 + 1] = "", *p, *needle;

    if( fileName[0] != '/' ) {
        //if( getcwd( cwd, sizeof( cwd ) + 1 ) == NULL ) {
        if( getcwd( cwd, sizeof( cwd ) ) == NULL ) {
            smr_setMessageError( smr, NULL, __FILE__, __LINE__, -1, "hardwired cwd too small" );
            return( NULL );
        }
        nCwd = strlen( cwd );
        n += nCwd + 1;                                  /* cwd + '/'. */
    }
    //if( ( absPath = xData_malloc2( smr, n, 0, "absPath" ) ) == NULL ) return( NULL );
    if( ( absPath = (char*) xData_malloc2( smr, n, 0, "absPath" ) ) == NULL ) return( NULL );
    if( fileName[0] != '/' ) {
        strcpy( absPath, cwd );
        strcat( absPath, "/" );
        strcat( absPath, fileName ); }
    else {
        strcpy( absPath, fileName );
    }

    while( 1 ) {                                        /* Remove all ./ from path. */
        if( ( needle = strstr( absPath, "/./" ) ) == NULL ) break;
        p = needle;
        for( needle += 2; *needle; p++, needle++ ) *p = *needle;
        *p = 0;
    }

    while( 1 ) {                                        /* Remove all ../ from path. */
        if( ( needle = strstr( absPath, "/../" ) ) == NULL ) break;
        p = needle - 1;
        while( ( p > absPath ) && ( *p != '/' ) ) p--;
        if( *p != '/' ) break;                           /* This should not happen if path is legit, I think, and I do not know what to do so will leave it. */
        if( p == absPath ) break;                       /* Ditto. */
        for( needle += 3; *needle; p++, needle++ ) *p = *needle;
        *p = 0;
    }
    return( absPath );
}

---