//ICMap, Copyright 2006, clifford L. Collins, Collins Software, all rights reserved, http://collinssoftware.com, not for distribution or resale, use License is required: icparse
function isTrue(value)
{
var test;
test=value.toLowerCase();
if(test=='true')return true;
if(test=='t')return true;
if(test=='yes')return true;
if(test=='y')return true;
return false;
}
function ic$parser(fd)
{
this.fd=fd;
this.topTable=null;
this.curTable=null;
this.line=0;
this.image='';
this.c=new ic$copy();
this.copy=new Array(0);
this.copy[0]=-1;
this.sectionName='';
this.csvRecord='';
this.csv=new ic$csv();
this.cg2_=$332;
this.style_=$333;
this.define_=$383;
this.section_=$385;
this.read=$386;
this.readLine=$386Line;
this.splitSub=$387;
this.parseField=$384;
this.findTable=$325;
this.nextSection=$328;
this.readGraphic=$329;
this.nextValue=$326;
this.makeCsv=$330;
this.defineCsv=$327;
this.loadGraphic=$331;
while(this.read())
{
switch(this.type)
{
case'*cg2':
this.cg2_();
break;
case'*style':
this.style_();
break;
case'*define':
this.define_();
break;
case'*section':
this.section_();
return;
break;
case'*end-of-file':
return;
break;
}
}
}
function $325(name)
{
var tbl;
tbl=this.topTable;
while(tbl)
{
if(tbl.name==name)return tbl
tbl=tbl.next;
}
return null;
}
function $326()
{
if(this.pos >=this.tokens.length)return'';
this.pos=this.pos+1;
return this.tokens[this.pos-1];
}
function $327(otable)
{
var nc;
var ofld;
var itable;
this.copy=new Array(0);
nc=0;
this.copy[0]=-1;
if(!otable)return;
ofld=otable.topField;
itable=this.findTable(this.sectionName);
if(! itable)return;
while(ofld)
{
nc=nc+1;
this.copy[nc-1]=itable.indexOf(ofld.name);
ofld=ofld.next;
}
}
function $328()
{
this.sectionName='';
while(true)
{
switch(this.type)
{
case'*section':
this.sectionName=trim(this.tokens[1].toLowerCase());
return true;
case'*define':
this.define_();
break;
}
if(! this.read())return false;
}
}
function $329()
{
while(this.read())
{
switch(this.type)
{
case'*section':
this.sectionName=this.tokens[1].toLowerCase();
return null;
case'*define':
this.define_();
break;
default:
if(this.loadGraphic(this.type))return this.gra;
}
}
return null;
}
function $330(tbl)
{
this.csv.clear();
for(i=0; i <this.copy.length;++i)
{
text='';
j=this.copy[i];
if((j >=0)&&(j <this.tokens.length-1))text=this.tokens[j+1];
this.csv.add(text);
}
this.csvRecord=this.csv.data;
}
function $331(tag)
{
tbl=this.topTable;
var i;
this.gra=null;
while(tbl)
{
if(tbl.tag==tag)
{
if(tbl.makeGraphic)
{
tbl.makeGraphic(this);
if(this.gra)return true;
return false;
}
if(tbl.name==this.sectionName)
{
this.makeCsv(tbl);
return false;
}
}
tbl=tbl.next;
}
return false;
}
function $332()
{
}
function $333()
{
}
function ic$copy()
{
this.clear=$337;
this.DCLine=$334;
this.DCSymbol=$335;
this.DCText=$336;
}
function $334(dc)
{
dc.lineColor=this.color;
dc.lineFillcolor=this.fillcolor;
dc.lineFill=this.fill;
dc.lineWidth=this.linewidth;
dc.lineDashStyle=this.dashstyle;
dc.lineStyle=this.style;
dc.lineJoin=this.join;
dc.lineTransparent=this.transparent;
dc.lineFillTransparent=this.filltransparent;
dc.lineGradient=this.gradient;
dc.lineShadow=this.shadow;
dc.z=this.z;
}
function $335(dc)
{
dc.symbolColor=this.color;
dc.symbolFillcolor=this.fillcolor;
dc.symbolFill=this.fill;
dc.symbolName=this.name;
dc.symbolSize=this.size;
dc.symbolFillTransparent=this.filltransparent;
dc.z=this.z;
}
function $336(dc)
{
dc.textColor=this.color;
dc.textBgcolor=this.bgcolor;
dc.textFill=this.fill;
dc.textFont=this.font;
dc.textSize=this.size;
dc.textBold=this.bold;
dc.textItalic=this.italic;
dc.textUnderline=this.underline;
dc.textText=this.text;
dc.textLineWidth=this.linewidth;
dc.textFixedSize=this.fixedsize;
dc.z=this.z;
}
function $337()
{
this.color='red';
this.x=0;
this.y=0;
this.z=0;
this.np=0
this.px=new Array(0);
this.py=new Array(0);
this.xmin=0;
this.ymin=0;
this.xmax=0;
this.ymax=0;
this.height=0;
this.width=0;
this.fillcolor='white';
this.dashstyle='solid';
this.style='solid';
this.join='';
this.transparent=30;
this.filltransparent=true;
this.gradient=false;
this.shadow=false;
this.xmin=0;
this.ymin=0;
this.xmax=0;
this.ymax=0;
this.radius=0;
this.start=0;
this.sweep=0;
this.angle=0;
this.fill=true;
this.bgcolor='white';
this.linewidth='1';
this.fixedsize=false;
this.font='arial';
this.size='10';
this.text='';
this.bold=false;
this.italic=false;
this.underline=false;
this.name='';
}
function $338(p)
{
var text;
var sub;
text=p.nextValue();
sub=p.splitSub(text);
p.c.x=parseFloat(sub[0]);
p.c.y=parseFloat(sub[1]);
}
function $339(p)
{
var text;
var sub;
var n;
text=p.nextValue();
sub=p.splitSub(text);
n=sub.length;
if(n >0)p.c.xmin=parseFloat(sub[0]);
if(n >1)p.c.ymin=parseFloat(sub[1]);
if(n >2)p.c.xmax=parseFloat(sub[2]);
if(n >3)p.c.ymax=parseFloat(sub[3]);
}
function $340(p)
{
var text;
var sub;
var n;
text=p.nextValue();
sub=p.splitSub(text);
n=sub.length;
if(n >0)p.c.fixed=isTrue(sub[0]);
if(n >1)p.c.height=parseInt(sub[1]);
if(n >2)p.c.width=parseInt(sub[2]);
}
function $338_list(p)
{
var text;
p.c.np=p.nextValue();
for(i=0; i <p.c.np;++i)
{
text=p.nextValue();
sub=p.splitSub(text);
if(sub.length <2)sub[1]=0;
p.c.px[i]=parseFloat(sub[0]);
p.c.py[i]=parseFloat(sub[1]);
}
}
function $342(p){ p.c.color=p.nextValue(); }
function $343(p){ p.c.x=parseFloat(p.nextValue()); }
function $344(p){ p.c.y=parseFloat(p.nextValue()); }
function $345(p){ p.c.z=parseInt(p.nextValue()); }
function $346(p){ p.c.fillcolor=p.nextValue(); }
function $347(p){ p.c.width=parseInt(p.nextValue()); }
function $348(p){ p.c.height=parseInt(p.nextValue()); }
function $349(p){ p.c.dashstyle=p.nextValue(); }
function $350(p){ p.c.style=p.nextValue(); }
function $351(p){ p.c.join=p.nextValue(); }
function $352(p){ p.c.transparent=p.nextValue(); }
function $353(p){ p.c.filltransparent=p.nextValue(); }
function $354(p){ p.c.gradient=isTrue(p.nextValue()); }
function $355(p){ p.c.shadow=isTrue(p.nextValue()); }
function $343min(p){ p.c.xmin=parseFloat(p.nextValue()); }
function $344min(p){ p.c.ymin=parseFloat(p.nextValue()); }
function $343max(p){ p.c.xmax=parseFloat(p.nextValue()); }
function $344max(p){ p.c.ymax=parseFloat(p.nextValue()); }
function $360(p){ p.c.radius=parseFloat(p.nextValue()); }
function $361(p){ p.c.start=$67(parseFloat(p.nextValue())); }
function $362(p){ p.c.sweep=$67(parseFloat(p.nextValue())); }
function $363(p){ p.c.angle=$67(parseFloat(p.nextValue())); }
function $364(p){ p.c.fill=isTrue(p.nextValue()); }
function $365(p){ p.c.bgcolor=p.nextValue(); }
function $366(p){ p.c.linewidth=parseInt(p.nextValue()); }
function $367(p){ p.c.font=p.nextValue(); }
function $368(p){ p.c.size=parseInt(p.nextValue()); }
function $369(p){ p.c.text=p.nextValue(); }
function $370(p){ p.c.bold=isTrue(p.nextValue()); }
function $371(p){ p.c.italic=isTrue(p.nextValue()); }
function $372(p){ p.c.underline=isTrue(p.nextValue()); }
function $373(p){ p.c.name=p.nextValue(); }
function $374(p){ p.c.dummy=p.nextValue()}
function $375(p)
{
this.loadValues(p);
p.gra=new ic$Shape(p.c.np,p.c.px,p.c.py);
p.c.DCLine(p.gra.dc);
p.gra.csv=p.csvRecord;
}
function $376(p)
{
this.loadValues(p);
p.gra=new ic$Polygon(p.c.np,p.c.px,p.c.py);
p.c.DCLine(p.gra.dc);
p.gra.csv=p.csvRecord;
}
function $377(p)
{
this.loadValues(p);
p.gra=new ic$Arc(p.c.x,p.c.y,p.c.radius,p.c.start,p.c.sweep);
p.c.DCLine(p.gra.dc);
p.gra.csv=p.csvRecord;
}
function $378(p)
{
this.loadValues(p);
p.gra=new ic$Circle(p.c.x,p.c.y,p.c.radius);
p.c.DCLine(p.gra.dc);
p.gra.csv=p.csvRecord;
}
function $379(p)
{
this.loadValues(p);
p.gra=new ic$Symbol(p.c.x,p.c.y,p.c.angle);
p.c.DCSymbol(p.gra.dc);
p.gra.csv=p.csvRecord;
$266(p.gra);
}
function $380(p)
{
this.loadValues(p);
p.gra=new ic$Text(p.c.x,p.c.y,p.c.angle);
p.c.DCText(p.gra.dc);
p.gra.csv=p.csvRecord;
$267(p.gra);
}
function $380box(p)
{
var xmin,ymin,xmax,ymax,height,width;
this.loadValues(p);
xmin=parseFloat(p.c.xmin);
ymin=parseFloat(p.c.ymin);
xmax=parseFloat(p.c.xmax);
ymax=parseFloat(p.c.ymax);
height=parseInt(p.c.height);
width=parseInt(p.c.width);
p.gra=new ic$Textbox(xmin,ymin,xmax,ymax,height,width);
p.c.DCText(p.gra.dc);
p.gra.csv=p.csvRecord;
}
function $382(p)
{
var fld;
var i;
p.c.clear();
p.pos=1;
fld=this.topField;
while(fld)
{
fld.put(p);
fld=fld.next;
}
}
function $383()
{
var type,tag;
var tbl;
if(!this.sub[1])return;
type=trim(this.sub[1]).toLowerCase();
tag=trim(this.tokens[1]).toLowerCase();
tbl=new ic$table(this);
tbl.name=tag;
tbl.tag=tag;
tbl.type=type;
tbl.loadValues=$382;
tbl.makeGraphic=null;
if(type=='line')tbl.makeGraphic=$375;
if(type=='polygon')tbl.makeGraphic=$376;
if(type=='arc')tbl.makeGraphic=$377;
if(type=='circle')tbl.makeGraphic=$378;
if(type=='symbol')tbl.makeGraphic=$379;
if(type=='text')tbl.makeGraphic=$380;
if(type=='textbox')tbl.makeGraphic=$380box;
if(this.botTable==null)
{
this.botTable=tbl;
this.topTable=tbl;
}
else
{
this.botTable.next=tbl;
this.botTable=tbl;
}
for(i=2; i <this.tokens.length;++i)
{
fld=tbl.addField('');
this.parseField(fld,this.tokens[i]);
fld.put=$374;
if(tbl.makeGraphic)
{
switch(fld.name)
{
case'long': fld.put=$343; break;
case'lat': fld.put=$344; break;
case'color': fld.put=$342; break;
case'x': fld.put=$343; break;
case'y': fld.put=$344; break;
case'z': fld.put=$345; break;
case'xy': fld.put=$338; break;
case'xy_list': fld.put=$338_list; break;
case'fillcolor': fld.put=$346; break;
case'width': fld.put=$347; break;
case'height': fld.put=$348; break;
case'dashstyle': fld.put=$349; break;
case'style': fld.put=$350; break;
case'join': fld.put=$351; break;
case'transparent': fld.put=$352; break;
case'filltransparent': fld.put=$353; break;
case'gradient': fld.put=$354; break;
case'shadow': fld.put=$355; break;
case'xmin': fld.put=$343min; break;
case'ymin': fld.put=$344min; break;
case'xmax': fld.put=$343max; break;
case'ymax': fld.put=$344max; break;
case'range': fld.put=$339; break;
case'fixed': fld.put=$340; break;
case'radius': fld.put=$360; break;
case'start': fld.put=$361; break;
case'sweep': fld.put=$362; break;
case'angle': fld.put=$363; break;
case'fill': fld.put=$364; break;
case'bgcolor': fld.put=$365; break;
case'linewidth': fld.put=$366; break;
case'fixedsize': fld.put=$340size; break;
case'font': fld.put=$367; break;
case'size': fld.put=$368; break;
case'text': fld.put=$369; break;
case'bold': fld.put=$370; break;
case'italic': fld.put=$371; break;
case'underline': fld.put=$372; break;
case'name': fld.put=$373; break;
}
}
}
}
function $384(fld,text)
{
var list;
var list2;
list=this.splitSub(text);
name=trim(list[0]).toLowerCase();
list2=name.split("(");
fld.name=list2[0];
}
function $385()
{
}
function $386()
{
if(! this.readLine())return false;
this.tokens=this.csv.split(this.image);
this.sub=this.splitSub(this.tokens[0]);
this.type=trim(this.sub[0].toLowerCase());
return true;
}
function $387(text)
{
var nl,list;
var i,a;
list=new Array(0);
nl=0;
list[0]='';
while(true)
{
i=text.indexOf(':');
if(i <0)
{
nl=nl+1;
list[nl-1]=trim(text);
return list;
}
a=text.substr(0,i);
nl=nl+1
list[nl-1]=trim(a);
text=text.substr(i+1);
}
}
function $386Line()
{
this.image='';
try
{
while(true)
{
this.text=this.fd.read();
this.text=trimComment(this.text);
if(this.text=='')continue;
if(this.text.substr(this.text.length-1)==';')
{
this.text=this.text.substr(0,this.text.length-1);
this.image=this.image+this.text;
return true;
}
this.image=this.image+this.text;
}
}
catch(e)
{
if(this.image !='')return true;
}
}