cktfndm.c File Reference

#include "spice.h"
#include <stdio.h>
#include <math.h>
#include "cktdefs.h"
#include "sperror.h"
#include "util.h"
#include "cktext.h"

Include dependency graph for cktfndm.c:

Go to the source code of this file.

Functions
int	CKTfndMod (GENERIC *ckt, int *type, GENERIC **modfast, IFuid modname)

Function Documentation

int CKTfndMod	(	GENERIC *	ckt,
		int *	type,
		GENERIC **	modfast,
		IFuid	modname
	)

Definition at line 18 of file cktfndm.c.

{
    GENmodel *mods;

    if (modfast != NULL && *(GENmodel **)modfast != NULL) {
        /* already have  modfast, so nothing to do */
        if (type) *type = (*(GENmodel **)modfast)->GENmodType;
            return (OK);
    } 
    if (*type >=0 && *type < DEVmaxnum) {
        /* have device type, need to find model */
        /* look through all models */
        for (mods = ((CKTcircuit *)ckt)->CKThead[*type]; mods != NULL ; 
                mods = mods->GENnextModel) {
            if (mods->GENmodName == modname) {
                *modfast = (char *)mods;
                return (OK);
            }
        }
        return (E_NOMOD);
    }
    else if(*type == -1) {
        /* look through all types (UGH - worst case - take forever) */ 
        for (*type = 0; *type < DEVmaxnum; (*type)++) {
            /* need to find model & device */
            /* look through all models */
            for (mods = ((CKTcircuit *)ckt)->CKThead[*type]; mods!=NULL;
                    mods = mods->GENnextModel) {
                if (mods->GENmodName == modname) {
                    *modfast = (char *)mods;
                    return (OK);
                }
            }
        }
        *type = -1;
        return (E_NOMOD);
    }
    else
        return (E_BADPARM);
}