void Node_Value_Parser::give_input(const std::string& i, Node_Value& nv, Moldable* bc)
{
input = i;
if (input.empty())
{
nv.set_string("");
return;
}
tokenize_input(input);
reduce_expressions(bc);
/* As long as we have input that is reducable, keep reducing it.*/
while (Mogu_Syntax::TOKEN_DELIM == tm.current_token()
&& (!tm.fetch_string().empty())
&& (tm.fetch_string().at(0)!='"')
&& (tm.fetch_string().find_first_of(" ") != std::string::npos))
{
std::string new_input = tm.fetch_string();
if (input!=new_input)
{
tm.reset();
input = new_input;
tokenize_input(input);
reduce_expressions(bc);
}
else break;
}
//if we have more than one token in numTokens at this point (or
//two if the first token is TOKEN DELIM), something has gone wrong
if(tm.current_token() == Mogu_Syntax::TOKEN_DELIM)
nv.set_string(tm.fetch_string());
else
nv.set_int((int)tm.current_token());
tm.reset(); // Clear the TokenManager to prepare for the next input
}
int process_edgesetdelay_waveform(int actablelines, char *GCTNAME, char *cyclebuff, long *tell,
int which, int *forward, char *pin, int DSET, int CNT, int *modcode,
char name[][FINDME_SIZE + 1], int en[], int enable_edge[]) {
int CHANSECOND[MAX_EDGES + 1];
int edgecnt, splitcell = 0, found;
int i, j, ne, neST = 0, wtlookup;
int holdlen, ret, delay[MAX_EDGES + 1], formatpick[MAX_EDGES + 1],
nDELAYDATA[MAX_EDGES + 1];
int D0L, D0H, D1L, D1H, DbL, DbH, cxL, cxH, A0, A1, Z0, Z1;
int lcode0[MAX_EDGES + 1], lcode1[MAX_EDGES + 1];
int cellisdrv, cellisNOTstrb, eloc, laststart;
char findme[FINDME_SIZE + 1], ALIASSTR[MAX_EDGES + 1], tpin[PINSIZE];
char org[MAX_EDGES + 1][WF_EXPR_LEN];
char field[MAX_EDGES + 1][100][WF_EXPR_LEN], dupwarn[WF_EXPR_LEN];
static int WINLEFTPEND = 0;
/* FIXME: APS since pinlist is last we can ignore it... for now */
/* EdgeSet (wave,edge,edgetype,time) */
/* EdgeSetDelay (wave,edge,edgetype,time,delay) */
/* EdgeSetDelayData(wave,edge,chan,edgetype0,vth0,time0,delay0,edgetype1,vth1,time1,delay1) */
/* EdgeSetPinList(wave,edge,edgetype,time,pinlist) */
/* EdgeSetDelayPinList(wave,edge,edgetype,time,delay,pinlist) */
/* EdgeSetDelayDataPinList(wave,edge,chan,edgetype0,vth0,time0,delay0,edgetype1,vth1,time1,delay1,pinlist) */
strcpy(findme, acwaves[which + 0].w);
eloc = acwaves[which + 0].loc;
laststart = acwaves[which + 0].laststart;
if (MUXFLAG && NOMUX == 0) sprintf(tpin, "%s-MUXSECONDARYPINS", pin);
else strcpy(tpin, pin);
/* This is now done in process_waveforms() */
// for (i=0;i<=MAX_EDGES;i++) { en[i]=enable_edge[i]=0; name[i][0]='\0'; }
ne = break_up_edges(actablelines, en, enable_edge, name, findme, which, forward);
for (splitcell = i = 0; i <= ne; i++) {
if (strstr(name[i], "EdgeSetDelayData") != NULL) {
formatpick[i] = 3;
nDELAYDATA[i] = 0;
splitcell = 1;
}
else { /* This is for EdgeSet() with No delay, or just EdgeSetDelay() */
formatpick[i] = 2;
nDELAYDATA[i] = 1;
}
delay[i] = 0;
if (strstr(name[i], "Delay") != NULL) delay[i] = 1;
if (strstr(name[i], "DelayData") != NULL) delay[i] = 2;
ALIASSTR[i] = 'n';
for (j = 0; j < MF_EDGESETDATA; j++) field[en[i]][j][0] = '\0';
lcode1[i] = lcode0[i] = FC_NULLEDGE;
}
ALIASSTR[i] = '\0';
*modcode = FC_NULLEDGE;
if (CNT != 0) sprintf(dupwarn, "_MULTIPLE_DEF%03d", CNT);
else dupwarn[0] = '\0';
reduce_expressions(ne, en, name, field);
neST = 0;
if (ne >= 4) { /* we can only deal with four */
if (strstr(field[en[0]][formatpick[0]], "DriveOff") != NULL) {
/* move everything forward. FIXME: APS Not sure if this is valid in all cases. */
fprintf(fpstatus,"AdvisoryC0[%04d]:Warning we have more than four edges on wfm[%s]\n", WARNING, field[en[0]][0]);
fprintf(fpstatus,"AdvisoryC1[%04d]:Since the first is a DriveOff we'll ignore it and move everything forward.\n", WARNING);
fprintf(fpstatus,"AdvisoryC2[%04d]:This assumption needs to be validated!\n", WARNING);
fprintf(fpstatus, "AdvisoryC3[%04d]:Sourced from %s,%d,%s\n",
WARNING, __FILE__, __LINE__, __FUNCTION__);
WARNING++;
neST = 1;
}
else {
fprintf(fpstatus,"AdvisoryD0[%04d]:Can't represent a 5+ edge waveform [%s]\n", WARNING, field[en[0]][0]);
fprintf(fpstatus,"AdvisoryD1[%04d]:You'll need to look at this one...\n", WARNING);
fprintf(fpstatus, "AdvisoryD2[%04d]:Sourced from %s,%d,%s\n",
WARNING, __FILE__, __LINE__, __FUNCTION__);
}
}
for (i = neST; i <= ne; i++) {
if (nDELAYDATA[i] == 1) sprintf(SCATcycle, "//ES[%d]:%s\n", ne, name[en[i]]);
else if (nDELAYDATA[i] == 0) sprintf(SCATcycle, "//ESD[%d]:%s\n", ne, name[en[i]]);
strcat(cyclebuff, SCATcycle);
if (NULL != strstr(field[i][2], "ChanSecond")) CHANSECOND[i] = 1;
else CHANSECOND[i] = 0;
}
/* need to search origin array also!!!!! */
for (i = 0; i <= MAX_EDGES; i++) org[i][0] = '\0';
for (i = neST; i <= ne; i++) {
ret = find_origin(&field[en[i]][0][0], org, laststart, __FILE__);
if (ret == -1) {
fprintf(stderr,"element=%d,GCT=%s,Cellname=%s,cellname[elem]=%s,PIN=[%s], from source[%s,%d,%s]\n",
en[i], GCTNAME, field[0][0], field[en[i]][0], pin,
__FILE__, __LINE__, __FUNCTION__);
exit(1);
}
}
D0L = AM_driveoffLOD0;
D0H = AM_driveoffHID0; /* Default */
D1L = AM_driveoffLOD1;
D1H = AM_driveoffHID1; /* this is DriveOff DSET0 should be z/Z */
lcode0[0] = lcode0[1] = lcode0[2] = lcode0[3] = lcode0[4] = FC_DUMMY;
lcode1[0] = lcode1[1] = lcode1[2] = lcode1[3] = lcode1[4] = FC_DUMMY;
/* Process the "Offs" first so drives and strobes later can change the settings. */
for (i = neST; i <= ne; i++) { /* was: (i=ne-1;i>=0;i--) */
if (0 == strcmp(field[en[i]][formatpick[i]], "DriveOff")) {
D0L = AM_driveoffLOD0;
D0H = AM_driveoffHID0;
DbL = D1L = AM_driveoffLOD1;
DbH = D1H = AM_driveoffHID1;
if (*modcode == FC_NULLEDGE) *modcode = FC_DRIVEOFF;
if (DSET == 0) lcode0[i] = FC_DRIVEOFF;
if (DSET == 1) lcode1[i] = FC_DRIVEOFF;
}
else if (0 == strcmp(field[en[i]][formatpick[i]], "StrobeOff")) {
D0L = AM_strobeoffLOD0;
D0H = AM_strobeoffHID0;
DbL = D1L = AM_strobeoffLOD1;
DbH = D1H = AM_strobeoffHID1;
if (*modcode == FC_NULLEDGE) *modcode = FC_STROBEOFF;
if (DSET == 0) lcode0[i] = FC_STROBEOFF;
if (DSET == 1) lcode1[i] = FC_STROBEOFF;
}
}
cellisNOTstrb = 1;
cellisdrv = 0;
nDELAYDATA[0] = nDELAYDATA[1] = nDELAYDATA[2] = nDELAYDATA[3] = nDELAYDATA[4] = 0;
for (i = neST; i <= ne; i++) { /* was: (i=ne-1;i>=0;i--) */
/* assume that first edges dominate!!! same drives dominate to DSET1 */
if (strstr(name[i], "EdgeSetDelayData") != NULL) {
formatpick[i] = 3;
nDELAYDATA[i] = 0;
}
else {
formatpick[i] = 2;
nDELAYDATA[i] = 1;
} /* this is for EdgeSet with No delay, or just EdgeSetDelay() */
if (0 == strcmp(field[en[i]][formatpick[i]], "DriveHigh") ||
0 == strcmp(field[en[i]][formatpick[i]], "DriveLow") ||
0 == strcmp(field[en[i]][formatpick[i]], "DriveData") ||
0 == strcmp(field[en[i]][formatpick[i]], "DriveComplement")) {
D0L = AM_driveLOD0;
D0H = AM_driveHID0;
DbL = D1L = AM_driveLOD1;
DbH = D1H = AM_driveHID1;
*modcode = FC_DRIVEDATA;
if (DSET == 0) lcode0[i] = FC_DRIVEDATA; /* these will overwrite offs */
if (DSET == 1) lcode1[i] = FC_DRIVEDATA;
cellisdrv = 1;
}
else if (0 == strcmp(field[en[i]][formatpick[i]], "NullEdge")) {
DbL = D0L = D1L = AM_continueLO;
DbH = D0H = D1H = AM_continue;
if (*modcode == FC_NULLEDGE) *modcode = FC_NULLEDGE;
lcode0[i] = lcode1[i] = FC_NULLEDGE;
}
// else if (0==strcmp(field[en[i]][formatpick[i]],"StrobeLatch")) {
// DbL=D0L=DbH=D0H=D1L=D1H=AM_continue;
// if (*modcode==FC_NULLEDGE) *modcode=FC_NULLEDGE;
// lcode0[i]=lcode1[i]=FC_NULLEDGE;
// }
else if (0 == strcmp(field[en[i]][formatpick[i]], "EdgeStrobeLow")
|| 0 == strcmp(field[en[i]][formatpick[i]], "EdgeStrobeHigh")
|| 0 == strcmp(field[en[i]][formatpick[i]], "EdgeStrobeData")
|| 0 == strcmp(field[en[i]][formatpick[i]], "EdgeStrobeComplement")) {
DbL = D0L = AM_edgestbLOD0;
DbH = D0H = AM_edgestbHID0;
D1L = AM_edgestbLOD1;
D1H = AM_edgestbHID1;
*modcode = FC_EDGEDATA;
if (DSET == 0) lcode0[i] = FC_EDGEDATA; /* these will overwrite offs */
if (DSET == 1) lcode1[i] = FC_EDGEDATA;
cellisNOTstrb = 0;
}
else if (0 == strcmp(field[en[i]][formatpick[i]], "EdgeStrobeZ")) { /* but this should have one value..., but we'll give it two */
D0L = AM_edgefloatD0;
D0H = AM_edgefloatD0;
D1L = AM_edgefloatD1;
D1H = AM_edgefloatD1;
*modcode = lcode0[i] = FC_EDGEFLOAT;
if (DSET == 0) lcode0[i] = FC_EDGEFLOAT; /* these will overwrite offs */
if (DSET == 1) lcode1[i] = FC_EDGEFLOAT;
cellisNOTstrb = 0;
}
else if (0 == strcmp(field[en[i]][formatpick[i]], "StrobeLow") ||
0 == strcmp(field[en[i]][formatpick[i]], "StrobeHigh") ||
0 == strcmp(field[en[i]][formatpick[i]], "StrobeData") ||
0 == strcmp(field[en[i]][formatpick[i]], "StrobeComplement")) {
DbL = D0L = AM_windowLOD0;
DbH = D0H = AM_windowHID0;
D1L = AM_windowLOD1;
D1H = AM_windowHID1;
*modcode = FC_WINDOWOPEN; /* initially leave this pending for close by strobeoffs */
if (DSET == 0) lcode0[i] = FC_WINDOWDATA;
if (DSET == 1) lcode1[i] = FC_WINDOWDATA;
cellisNOTstrb = 0;
}
else if (0 == strcmp(field[en[i]][formatpick[i]], "StrobeZ")) { /* but this should have one value..., but we'll give it two */
DbL = D0L = AM_windowfloatD0;
DbH = D0H = AM_windowfloatD0;
D1L = AM_windowfloatD1;
D1H = AM_windowfloatD1;
*modcode = FC_WINDOWOPENZ; /* initially leave this pending for close by strobeoffs */
if (DSET == 0) {
lcode0[i] = FC_WINDOWFLOAT;
}
if (DSET == 1) {
lcode1[i] = FC_WINDOWFLOAT;
}
cellisNOTstrb = 0;
}
else if ((0 == strcmp(field[en[i]][formatpick[i]], "StrobeOffLow")
|| 0 == strcmp(field[en[i]][formatpick[i]], "StrobeOffHigh")
|| 0 == strcmp(field[en[i]][formatpick[i]], "StrobeOffData")
|| 0 == strcmp(field[en[i]][formatpick[i]], "StrobeOffComplement")
|| 0 == strcmp(field[en[i]][formatpick[i]], "StrobeOff"))) {
if (DSET == 0) lcode0[i] = FC_STROBEOFF;
if (DSET == 1) lcode1[i] = FC_STROBEOFF;
if (*modcode == FC_WINDOWOPEN) *modcode = FC_WINDOWDATA; /* close the window! */
else if (*modcode == FC_WINDOWOPENZ) *modcode = FC_WINDOWFLOAT; /* close the window! */
if (DbL != AM_windowLOD0 && DbL != AM_windowfloatD0) { /* if its already a window strobe then don't erase it ! */
DbL = D0L = AM_strobeoffLOD0;
DbH = D0H = AM_strobeoffHID0;
D1L = AM_strobeoffLOD1;
D1H = AM_strobeoffHID1;
if (*modcode == FC_NULLEDGE) *modcode = FC_STROBEOFF;
// else {
// fprintf(stdout,"FC_STROBEOFF=%c SET to STROBEOFF\n",*modcode);
// *modcode = FC_STROBEOFF;
// }
} /* this is for strobeoff as compare which could be masked */
cellisNOTstrb = 0;
//cellisNOTstrb=1;/* assume if its !ONLY! strobe off then it has been preset before entering */
}
} /* drives dominate to DSET1 if same, strobes and offs to DSET0 */
wtlookup = -2;
holdlen = *tell + strlen(cyclebuff);
/* WAS: (APS 0/4/27/2009) */
// for (i=0;i<maxstartstop;i++) { /* if we don't find it then it gets left at the multidef from above */
// if (startstop[i].type==SSSTART && startstop[i].loc<acwaves[which+0].loc) {
// dupwarn[0]=startstop[i].cdtcode;
// dupwarn[1]='\0';
// }
// }
/* NEW: this exists in process_edgesets too! */
found = 0;
/* find which start/stop pair it lies between */
for (i = 0; i < maxstartstop; i++) { /* if we don't find it then it gets left at the multidef from above */
if (startstop[i].type == SSSTART
&& startstop[i].loc <= acwaves[which + 0].loc
&& startstop[startstop[i].startpt2stop].loc >= acwaves[which + 0].loc) {
dupwarn[0] = cellinfo[cellcnt].cdtcode = startstop[i].cdtcode;
cellinfo[cellcnt].cdtstr[0] = startstop[i].cdtcode;
// fprintf(stdout,"FOUND[%s,%s,%c,%d], source[%s,%d,%s]\n",GCTNAME,field[0][0],
// cellinfo[cellcnt].cdtstr[0],acwaves[which+0].loc,__FILE__,__LINE__,__FUNCTION__);
cellinfo[cellcnt].cdtstr[1] = '\0';
dupwarn[1] = '\0';
found++;
}
}
if (found == 0) {
fprintf(stderr, "NOT FOUND![%s,%s,%c,%d], source[%s,%d,%s]\n",
GCTNAME, field[0][0], cellinfo[cellcnt].cdtstr[0],
acwaves[which + 0].loc, __FILE__, __LINE__, __FUNCTION__);
exit(1);
}
edgecnt = 0;
for (i = 0; i < MAX_EDGES; i++) {
cellinfo[cellcnt].formats[i] = -1;
}
if (DSET == 0) chk_problem_type(0, lcode0, field, GCTNAME, dupwarn);
if (DSET == 1) chk_problem_type(1, lcode1, field, GCTNAME, dupwarn);
if (DSET == 0) {
for (i = 0; i <= ne; i++) ALIASSTR[i] = (lcode0[i] == FC_DUMMY) ? FC_ASCII : lcode0[i];
ALIASSTR[i] = '\0';
}
else { /* (DSET==1) */
for (i = 0; i <= ne; i++) ALIASSTR[i] = (lcode1[i] == FC_DUMMY) ? FC_ASCII : lcode1[i];
ALIASSTR[i] = '\0';
}
if (*modcode == FC_WINDOWOPEN || *modcode == FC_WINDOWOPENZ) {
fprintf(fpstatus,"CELL[%s]%c window left pending\n",field[0][0],*modcode);
if (WINLEFTPEND == 0) {
fprintf(stdout,"CELL[%s]%c window left pending\n",field[0][0],*modcode);
fprintf(stdout,"*********\nSupressing future wintype prints to stdout (remainder logged to %s)\n**********\n",TRANSLATION_STATUS);
WINLEFTPEND = 1;
}
}
if (cellisdrv) cellisNOTstrb = 1;
if (D0H == AM_continue || D0L == AM_continueLO) {
cellinfo[cellcnt].filepos = holdlen;
cellinfo[cellcnt].cdtstr[0] = cellinfo[cellcnt].cdtcode = startstop[i].cdtcode;
cellinfo[cellcnt].cdtstr[1] = '\0';
cellinfo[cellcnt].actline = which;
strcpy(cellinfo[cellcnt].wftname, GCTNAME);
strcpy(cellinfo[cellcnt].cellname, field[0][0]);
strcpy(cellinfo[cellcnt].pin, tpin);
cellinfo[cellcnt].multidefnum = CNT;
cellinfo[cellcnt].formatnum = wtlookup;
for (i = 0; i < MAX_EDGES; i++) {
cellinfo[cellcnt].formats[i] = (DSET == 0) ? lcode0[i] : lcode1[i];
}
cellinfo[cellcnt].problemtype = PT_NOPROBLEM;
cellinfo[cellcnt].alias0 = A0 = AM_continueLO;
cellinfo[cellcnt].alias1 = A1 = AM_BOGUS;
sprintf(SCATcycle,"Cell \"%s\" %c %s_ADSET%01d%s_cat_%s {\n Data %c;\n", pin,
A0,field[0][0], DSET, ALIASSTR, dupwarn,'0');
strcat(cyclebuff, SCATcycle);
sprintf(SCATcycle," Compare { \n EntryState CompareLow;\n }\n");
strcpy(cellinfo[cellcnt].cellexpr," Compare { \n EntryState CompareOpenLow;\n }\n");
strcat(cyclebuff, SCATcycle);
// edgeset_make_wfms(cyclebuff, field, en, ne, neST, org, 0, delay, nDELAYDATA);
strcat(cyclebuff, "}\n");
cellcnt++;
/* --- */
cellinfo[cellcnt].filepos = holdlen;
cellinfo[cellcnt].cdtstr[0] = cellinfo[cellcnt].cdtcode = startstop[i].cdtcode;
cellinfo[cellcnt].cdtstr[1] = '\0';
cellinfo[cellcnt].actline = which;
strcpy(cellinfo[cellcnt].wftname, GCTNAME);
strcpy(cellinfo[cellcnt].cellname, field[0][0]);
strcpy(cellinfo[cellcnt].pin, tpin);
cellinfo[cellcnt].multidefnum = CNT;
cellinfo[cellcnt].formatnum = wtlookup;
for (i = 0; i < MAX_EDGES; i++) {
cellinfo[cellcnt].formats[i] = (DSET == 0) ? lcode0[i] : lcode1[i];
}
cellinfo[cellcnt].problemtype = PT_NOPROBLEM;
cellinfo[cellcnt].alias0 = A0 = AM_continue;
cellinfo[cellcnt].alias1 = A1 = AM_BOGUS;
sprintf(SCATcycle,"Cell \"%s\" %c %s_BDSET%01d%s_cat_%s {\n Data %c;\n", pin,
A0,field[0][0], DSET, ALIASSTR, dupwarn,'1');
strcat(cyclebuff, SCATcycle);
sprintf(SCATcycle," Compare { \n EntryState CompareOpenHigh;\n }\n");
strcpy(cellinfo[cellcnt].cellexpr," Compare { \n EntryState CompareOpenHigh;\n }\n");
strcat(cyclebuff, SCATcycle);
// edgeset_make_wfms(cyclebuff, field, en, ne, neST, org, 0, delay,
// nDELAYDATA);
strcat(cyclebuff, "}\n");
cellcnt++;
/* --- */
/* continue Drive is dealt with in the generic/COMMON_WFT table */
}
else if (cellisNOTstrb) { /* drive */
/* ok, here we've decided for code simplicity to update the primary cell and */
/* the splitHi cell but increment by one if combined, and increment by two if */
/* split. control variable is splitcell. */
cellinfo[cellcnt].filepos = cellinfo[cellcnt + 1].filepos = holdlen;
cellinfo[cellcnt].cdtstr[0] = cellinfo[cellcnt].cdtcode = startstop[i].cdtcode;
cellinfo[cellcnt].cdtstr[1] = '\0';
cellinfo[cellcnt + 1].cdtstr[0] = cellinfo[cellcnt + 1].cdtcode = startstop[i].cdtcode;
cellinfo[cellcnt + 1].cdtstr[1] = '\0';
cellinfo[cellcnt].actline = cellinfo[cellcnt + 1].actline = which;
strcpy(cellinfo[cellcnt].wftname, GCTNAME);
strcpy(cellinfo[cellcnt + 1].wftname, GCTNAME);
strcpy(cellinfo[cellcnt].cellname, field[0][0]);
strcpy(cellinfo[cellcnt + 1].cellname, field[0][0]);
strcpy(cellinfo[cellcnt].pin, tpin);
strcpy(cellinfo[cellcnt + 1].pin, tpin);
cellinfo[cellcnt].multidefnum = cellinfo[cellcnt + 1].multidefnum = CNT;
cellinfo[cellcnt].formatnum = cellinfo[cellcnt + 1].formatnum = wtlookup;
for (i = 0; i < MAX_EDGES; i++) {
cellinfo[cellcnt].formats[i] = (DSET == 0) ? lcode0[i] : lcode1[i];
cellinfo[cellcnt + 1].formats[i] = (DSET == 0) ? lcode0[i] : lcode1[i];
}
cellinfo[cellcnt].problemtype = cellinfo[cellcnt + 1].problemtype = PT_NOPROBLEM;
cellinfo[cellcnt].alias0 = A0 = (DSET == 0) ? D0L : (DSET == 1) ? D1L : DbL;
cellinfo[cellcnt + 1].alias0 = A1 = (DSET == 0) ? D0H : (DSET == 1) ? D1H : DbH;
if (splitcell) cellinfo[cellcnt].alias1 = cellinfo[cellcnt + 1].alias1 = AM_BOGUS; /* bogus value */
else cellinfo[cellcnt].alias1 = A1 = (DSET == 0) ? D0H : (DSET == 1) ? D1H : DbH;
if (splitcell)
sprintf(SCATcycle,"Cell \"%s\" %c %s_ADSET%01d%s_cat_%s {\n Data %c;\n",
tpin, A0, field[0][0], DSET, ALIASSTR, dupwarn,
cellisdrv * 4 + 2 + '0');
else
sprintf(SCATcycle,"Cell \"%s\" %c/%c %s_DSET%01d%s_cat_%s {\n Data %c/%c;\n",
tpin, A0, A1, field[0][0], DSET, ALIASSTR, dupwarn,
cellisdrv * 4 + 2 + '0', cellisdrv * 4 + 2 + '1');
strcat(cyclebuff, SCATcycle);
edgeset_make_wfms(cyclebuff, field, en, ne, neST, org, 0, delay, nDELAYDATA);
strcat(cyclebuff, "}\n");
if (splitcell) {
cellcnt++;
sprintf(SCATcycle,"Cell \"%s\" %c %s_BDSET%01d%s_cat_%s {\n Data %c;\n",
tpin, A1, field[0][0], DSET, ALIASSTR, dupwarn, cellisdrv * 4 + 2 + '1');
strcat(cyclebuff, SCATcycle);
edgeset_make_wfms(cyclebuff, field, en, ne, neST, org, 1, delay, nDELAYDATA);
strcat(cyclebuff, "}\n");
}
cellcnt++;
}
else { /* strobe */
cxL = (DSET == 0) ? AM_maskD0 : AM_maskD1;
cxH = (DSET == 0) ? AM_maskHID0 : AM_maskHID1;
cellinfo[cellcnt].filepos = cellinfo[cellcnt + 1].filepos = holdlen;
cellinfo[cellcnt].cdtstr[0] = cellinfo[cellcnt].cdtcode = startstop[i].cdtcode;
cellinfo[cellcnt].cdtstr[1] = '\0';
cellinfo[cellcnt + 1].cdtstr[0] = cellinfo[cellcnt + 1].cdtcode = startstop[i].cdtcode;
cellinfo[cellcnt + 1].cdtstr[1] = '\0';
cellinfo[cellcnt].actline = cellinfo[cellcnt + 1].actline = which;
strcpy(cellinfo[cellcnt].wftname, GCTNAME);
strcpy(cellinfo[cellcnt + 1].wftname, GCTNAME);
strcpy(cellinfo[cellcnt].cellname, field[0][0]);
strcpy(cellinfo[cellcnt + 1].cellname, field[0][0]);
strcpy(cellinfo[cellcnt].pin, tpin);
strcpy(cellinfo[cellcnt + 1].pin, tpin);
cellinfo[cellcnt].multidefnum = cellinfo[cellcnt + 1].multidefnum = CNT;
cellinfo[cellcnt].formatnum = cellinfo[cellcnt + 1].formatnum = wtlookup;
for (i = 0; i < MAX_EDGES; i++) {
cellinfo[cellcnt].formats[i] = (DSET == 0) ? lcode0[i] : lcode1[i];
cellinfo[cellcnt + 1].formats[i] = (DSET == 0) ? lcode0[i] : lcode1[i];
}
cellinfo[cellcnt].problemtype = cellinfo[cellcnt + 1].problemtype = PT_NOPROBLEM;
cellinfo[cellcnt].alias0 = A0 = (DSET == 0) ? D0L : (DSET == 1) ? D1L : DbL;
cellinfo[cellcnt + 1].alias0 = A1 = (DSET == 0) ? D0H : (DSET == 1) ? D1H : DbH;
Z0 = (DSET == 0) ? AM_driveoffLOD0:AM_driveoffLOD1;
Z1 = (DSET == 0) ? AM_driveoffHID0:AM_driveoffHID1;
if (splitcell) {
cellinfo[cellcnt].alias1 = cxL;
cellinfo[cellcnt + 1].alias1 = cxH;
if (A0 == AM_strobeoffLOD0 || A0 == AM_strobeoffLOD1) {
sprintf(SCATcycle,"Cell \"%s\" %c/%c/%c %s_ADSET%01d%s_cat_%s {\n Data %c/%c/%c;\n",
tpin, A0, cxL, Z0, field[0][0], DSET, ALIASSTR, dupwarn, '0', '2', '6');
}
else {
sprintf(SCATcycle,"Cell \"%s\" %c/%c %s_ADSET%01d%s_cat_%s {\n Data %c/%c;\n",
tpin, A0, cxL, field[0][0], DSET, ALIASSTR, dupwarn, '0', '2');
}
}
else {
cellinfo[cellcnt].alias1 = A1 = (DSET == 0) ? D0H : (DSET == 1) ? D1H : DbH;
if (A0 == AM_strobeoffLOD0 || A0 == AM_strobeoffLOD1) {
sprintf(SCATcycle,"Cell \"%s\" %c/%c/%c/%c/%c/%c %s_DSET%01d%s_cat_%s {\n Data %c/%c/%c/%c/%c/%c;\n",
tpin, A0, A1, cxL, cxH, Z0, Z1, field[0][0], DSET, ALIASSTR, dupwarn, '0', '1', '2', '3', '6', '7');
}
else {
sprintf(SCATcycle,"Cell \"%s\" %c/%c/%c/%c %s_DSET%01d%s_cat_%s {\n Data %c/%c/%c/%c;\n",
tpin, A0, A1, cxL, cxH, field[0][0], DSET, ALIASSTR, dupwarn, '0', '1', '2', '3');
}
}
strcat(cyclebuff, SCATcycle);
/* Now modify the waveforms if necessary */
edgeset_make_wfms(cyclebuff, field, en, ne, neST, org, 0, delay, nDELAYDATA);
strcat(cyclebuff, "}\n");
if (splitcell) {
cellcnt++;
if (A0 == AM_strobeoffLOD0 || A0 == AM_strobeoffLOD1) {
sprintf(SCATcycle,"Cell \"%s\" %c/%c/%c %s_BDSET%01d%s_cat_%s {\n Data %c/%c/%c;\n",
tpin, A1, cxH, Z1, field[0][0], DSET, ALIASSTR, dupwarn, '1', '3', '7');
}
else {
sprintf(SCATcycle,"Cell \"%s\" %c/%c %s_BDSET%01d%s_cat_%s {\n Data %c/%c;\n",
tpin, A1, cxH, field[0][0], DSET, ALIASSTR, dupwarn, '1', '3');
}
strcat(cyclebuff, SCATcycle);
/* Now modify the waveforms if necessary */
edgeset_make_wfms(cyclebuff, field, en, ne, neST, org, 1, delay, nDELAYDATA);
strcat(cyclebuff, "}\n");
}
cellcnt++;
}
if (cellcnt > MAXCELLS) {
fprintf(stderr, "Too many cells., source[%s,%d,%s]\n", __FILE__,__LINE__, __FUNCTION__);
fprintf(fperrors, "Too many cells., source[%s,%d,%s]\n", __FILE__,__LINE__, __FUNCTION__);
exit(1);
}
if (MUXFLAG && NOMUX == 0) { /* FIXME: APS need more checks here, specifically ChanFirst,ChanSecond... */
/* all wavesets will assume normal edges from only channel '0' */
/* this means the muxpin should produce null edges */
cellinfo[cellcnt].filepos = holdlen;
cellinfo[cellcnt].cdtstr[0] = cellinfo[cellcnt].cdtcode = startstop[i].cdtcode;
cellinfo[cellcnt].cdtstr[1] = '\0';
cellinfo[cellcnt].actline = which;
strcpy(cellinfo[cellcnt].wftname, GCTNAME);
strcpy(cellinfo[cellcnt].cellname, field[0][0]);
sprintf(cellinfo[cellcnt].pin, "%s-MUXPRIMARYPINS", pin);
cellinfo[cellcnt].multidefnum = CNT;
cellinfo[cellcnt].formatnum = wtlookup;
for (i = 0; i < MAX_EDGES; i++) {
cellinfo[cellcnt].formats[i] = FC_NULLEDGE;
}
cellinfo[cellcnt].problemtype = PT_NOPROBLEM;
cellinfo[cellcnt].alias0 = A0;
cellinfo[cellcnt].alias1 = A1;
cellinfo[cellcnt].cellexpr[0] = '\0'; /* either use edgeset_make_wfms or '\0' */
if (cellisNOTstrb) {
sprintf(SCATcycle,"Cell \"%s-MUXPRIMARYPINS\" %c/%c %s_DSETMUX%01d%s_cat_%s {\n Data %c/%c;\n",
pin, A0, A1, field[0][0], DSET, ALIASSTR, dupwarn, '6', '7');
}
else {
sprintf(SCATcycle,"Cell \"%s-MUXPRIMARYPINS\" %c/%c/%c/%c %s_DSETMUX%01d%s_cat_%s {\n Data %c/%c/%c/%c;\n",
pin, A0, A1, cxL, cxH, field[0][0], DSET, ALIASSTR,
dupwarn, '0', '1', '2', '3');
}
strcat(cyclebuff, SCATcycle);
strcat(cyclebuff, " Drive {\n EntryState DriveOn;}\n");
strcat(cyclebuff, "}\n");
cellcnt++;
if (cellcnt > MAXCELLS) {
fprintf(stderr,"Too many Cells for buffer, source[%s,%d,%s]\n",__FILE__, __LINE__, __FUNCTION__);
fprintf(fperrors,"Too many Cells for buffer, source[%s,%d,%s]\n",__FILE__, __LINE__, __FUNCTION__);
exit(1);
}
}
return (ne);
}