tpia_particle.cc File Reference

#include <string.h>
#include <tpia_target.h>

Go to the source code of this file.

Functions
tpia_particle *	tpia_particle_create (statusMessageReporting *smr)
int	tpia_particle_initialize (statusMessageReporting *, tpia_particle *particle)
tpia_particle *	tpia_particle_free (statusMessageReporting *smr, tpia_particle *particle)
int	tpia_particle_release (statusMessageReporting *smr, tpia_particle *particle)
int	tpia_particle_freeInternalList (statusMessageReporting *smr)
tpia_particle *	tpia_particle_getInternalID (statusMessageReporting *smr, const char *const name)
int	tpia_particle_printInternalSortedList (statusMessageReporting *)

Function Documentation

tpia_particle_create()

tpia_particle * tpia_particle_create

(

statusMessageReporting *

smr

)

Definition at line 51 of file tpia_particle.cc.

                                                                   {
 
    //tpia_particle *particle = xData_malloc2( smr, sizeof( tpia_particle ), 0, "particle" );
    tpia_particle *particle = (tpia_particle*) xData_malloc2( smr, sizeof( tpia_particle ), 0, "particle" );
 
    if( particle == NULL ) return( NULL );
    tpia_particle_initialize( smr, particle );
    return( particle );
}

Referenced by tpia_particle_getInternalID().

tpia_particle_free()

tpia_particle * tpia_particle_free	(	statusMessageReporting *	smr,
		tpia_particle *	particle
	)

Definition at line 72 of file tpia_particle.cc.

                                                                                          {
 
    int i, j;
    tpia_particle **p;
 
    for( i = 0, p = particleSortedList; i < numberOfParticles; i++, p++ ) {
        if( *p == particle ) {
            numberOfParticles--;
            for( j = i; j < numberOfParticles; j++, p++ ) *p = p[1];
            break;
        }
    }
    if( particle == particleListEnd ) particleListEnd = particle->prior;
    if( particle == particleList ) particleList = particle->next;
    if( particle->prior != NULL ) particle->prior->next = particle->next;
    if( particle->next != NULL ) particle->next->prior = particle->prior;
    tpia_particle_release( smr, particle );
    xData_free( smr, particle );
    return( NULL );
}

Referenced by tpia_particle_freeInternalList(), and tpia_particle_getInternalID().

tpia_particle_freeInternalList()

int tpia_particle_freeInternalList

(

statusMessageReporting *

smr

)

Definition at line 103 of file tpia_particle.cc.

                                                                  {
 
    while( particleList != NULL ) tpia_particle_free( smr, particleList );
    //particleSortedList = xData_free( smr, particleSortedList );
    particleSortedList = (tpia_particle**) xData_free( smr, particleSortedList );
    return( 0 );
}

tpia_particle_getInternalID()

tpia_particle * tpia_particle_getInternalID	(	statusMessageReporting *	smr,
		const char *const	name
	)

Definition at line 113 of file tpia_particle.cc.

                                                                                                   {
 
    int i, iCmp, min, mid, max, Z, A, m;
    tpia_particle *particle;
    char *EOP;
 
    iCmp = 0;
    min = mid = 0;
    max = numberOfParticles;
    while( min != max ) {
        mid = ( min + max ) / 2;
        iCmp = strcmp( name, particleSortedList[mid]->name );
        if( iCmp == 0 ) return( particleSortedList[mid] );
        if( iCmp < 0 ) {
            max = mid - 1;
            if( mid == 0 ) max = 0; }
        else {
            min = mid + 1;
            if( min > max ) min = max;
        }
    }
    mid = min;
    if( numberOfParticles > 0 ) {
        iCmp = strcmp( name, particleSortedList[mid]->name );
        if( iCmp == 0 ) return( particleSortedList[mid] );
        if( ( iCmp < 0 ) && ( mid != 0 ) ) {
            mid--;
            iCmp = strcmp( name, particleSortedList[mid]->name );
        }
    }
 
    if( ( particle = tpia_particle_create( smr ) ) == NULL ) return( NULL );
    if( ( particle->spectralID = tpi_spectralID_parse( smr, name, &(EOP) ) ) == NULL ) return( tpia_particle_free( smr, particle ) );
    particle->name = particle->spectralID->name;
    if( tpia_miscNameToZAm( smr, particle->name, &Z, &A, &m ) != 0 ) return( tpia_particle_free( smr, particle ) );
    particle->prior = NULL;
    particle->next = NULL;
    particle->Z = Z;
    particle->A = A;
    particle->m = m;
    particle->mass = tpia_particleMass_AMU( smr, particle->name );
    if( !smr_isOk( smr ) ) return( tpia_particle_free( smr, particle ) );
    particle->fullMass_MeV = tpia_AMU2MeV * particle->mass + particle->spectralID->level;
 
    if( sizeOfParticleSortedList < ( numberOfParticles + 1 ) ) {
        if( sizeOfParticleSortedList == 0 ) {
            sizeOfParticleSortedList = initialSizeOfList; }
        else {
            sizeOfParticleSortedList += incrementalSizeOfList;
        }
        //if( ( particleSortedList = xData_realloc2( smr, particleSortedList, sizeOfParticleSortedList * sizeof( tpia_particle * ), 
        if( ( particleSortedList = (tpia_particle** ) xData_realloc2( smr, particleSortedList, sizeOfParticleSortedList * sizeof( tpia_particle * ), 
            "particleSortedList" ) ) == NULL ) return( tpia_particle_free( smr, particle ) );
    }
 
    if( particleList == NULL ) {
        particle->ordinal = 0;
        particleListEnd = particleList = particle; }
    else {
        particle->ordinal = particleListEnd->ordinal + 1;
        particle->prior = particleListEnd;
        particleListEnd->next = particle;
        particleListEnd = particle;
    }
 
    if( ( mid != 0 ) || ( iCmp > 0 ) ) mid++;
    for( i = numberOfParticles; i > mid; i-- ) particleSortedList[i] = particleSortedList[i-1];
    particleSortedList[mid] = particle;
    numberOfParticles++;
 
    return( particle );
}

Referenced by tpia_product_getFromElement(), tpia_target_heated_read(), and tpia_target_read().

tpia_particle_initialize()

int tpia_particle_initialize	(	statusMessageReporting *	smr,
		tpia_particle *	particle
	)

Definition at line 64 of file tpia_particle.cc.

                                                                                  {
 
    memset( particle, 0, sizeof( tpia_particle ) );
    return( 0 );
}

Referenced by tpia_particle_create().

tpia_particle_printInternalSortedList()

int tpia_particle_printInternalSortedList

(

statusMessageReporting *

smr

)

Definition at line 189 of file tpia_particle.cc.

                                                                      {
 
    int i;
 
    for( i = 0; i < numberOfParticles; i++ ) printf( "%s\n", particleSortedList[i]->name );
    return( 0 );
}

tpia_particle_release()

int tpia_particle_release	(	statusMessageReporting *	smr,
		tpia_particle *	particle
	)

Definition at line 95 of file tpia_particle.cc.

                                                                                  {
 
    if( particle->spectralID != NULL ) tpi_spectralID_free( smr, particle->spectralID );
    return( 0 );
}

Referenced by tpia_particle_free().