Jspice3
cktfnda.c
Go to the documentation of this file.
1 /***************************************************************************
2 JSPICE3 adaptation of Spice3e2 - Copyright (c) Stephen R. Whiteley 1992
3 Copyright 1990 Regents of the University of California. All rights reserved.
4 Authors: 1985 Thomas L. Quarles
5  1992 Stephen R. Whiteley
6 ****************************************************************************/
7 
8 /* CKTfndAnal
9  * find the given Analysis given its name and return the Analysis pointer
10  */
11 
12 #include "spice.h"
13 #include <stdio.h>
14 #include "cktdefs.h"
15 #include "jobdefs.h"
16 #include "tskdefs.h"
17 #include "sperror.h"
18 #include "cktext.h"
19 
20 
21 /* ARGSUSED */
22 int
23 CKTfndAnal(ckt,numjobs,anal,name,inTask,taskName)
24 
25 GENERIC *ckt;
26 int *numjobs;
27 GENERIC **anal;
28 IFuid name;
29 GENERIC *inTask;
30 IFuid taskName;
31 {
32  TSKtask *task = (TSKtask *)inTask;
33  JOB *here;
34 
35  for (here = task->jobs; here; here = here->JOBnextJob) {
36 
37  if (!name && here->JOBname) {
38  if (numjobs) {
39  *numjobs = 0;
40  for ( ; here; here = here->JOBnextJob)
41  (*numjobs)++;
42  }
43  return (OK);
44  }
45 
46  if (strcmp(here->JOBname,name) == 0) {
47  if (anal) *anal = (GENERIC *)here;
48  return (OK);
49  }
50  }
51  return (E_NOTFOUND);
52 }
IFuid JOBname
Definition: cktdefs.h:26
#define E_NOTFOUND
Definition: iferrmsg.h:35
Definition: cktdefs.h:23
#define OK
Definition: iferrmsg.h:17
GENERIC * IFuid
Definition: ifsim.h:72
int CKTfndAnal(GENERIC *ckt, int *numjobs, GENERIC **anal, IFuid name, GENERIC *inTask, IFuid taskName)
Definition: cktfnda.c:23
JOB * jobs
Definition: tskdefs.h:13
struct sJOB * JOBnextJob
Definition: cktdefs.h:25
char GENERIC
Definition: ifsim.h:27