//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_=$373;
this.style_=$374;
this.define_=$435;
this.section_=$437;
this.read=$438;
this.readLine=$438Line;
this.splitSub=$439;
this.parseField=$436;
this.findTable=$366;
this.nextSection=$369;
this.readGraphic=$370;
this.nextValue=$367;
this.makeCsv=$371;
this.defineCsv=$368;
this.loadGraphic=$372;
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 $366(name)
{
var tbl;
tbl=this.topTable;
while(tbl)
{
if(tbl.name==name)return tbl
tbl=tbl.next;
}
return null;
}
function $367()
{
if(this.pos >=this.tokens.length)return'';
this.pos=this.pos+1;
return this.tokens[this.pos-1];
}
function $368(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 $369()
{
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 $370()
{
while(this.read())
{
this.gra=null;
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 $371(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 $372(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 $373()
{
}
function $374()
{
}
function ic$copy()
{
this.clear=$381;
this.DCLine=$376;
this.DCSymbol=$377;
this.DCText=$378;
this.DCShape=$379;
this.DCImage=$380;
this.GRAcommon=$375;
}
function $375(gra)
{
gra.id=this.id;
gra.link=this.link;
gra.tag=this.tag;
}
function $376(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 $377(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 $378(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 $379(dc)
{
dc.shapeStyle=this.style;
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 $380(dc)
{
dc.imageName=this.imagename;
dc.imageFixedSize=this.fixedsize;
dc.z=this.z;
}
function $381()
{
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.gid=0;
this.id='';
this.link='';
this.tag='';
this.style=62;
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='';
this.imagename='';
}
function $382(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 $383(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 $384(p)
{
var text;
var sub;
var n;
text=p.nextValue();
sub=p.splitSub(text);
n=sub.length;
p.c.fixed=false;
p.c.height=0;
p.c.width=0;
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 $382_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 $386(p){ p.c.gid=parseInt(p.nextValue()); }
function $387(p){ p.c.id=p.nextValue(); }
function $388(p){ p.c.link=p.nextValue(); }
function $389(p){ p.c.tag=p.nextValue(); }
function $390(p){ p.c.color=p.nextValue(); }
function $391(p){ p.c.x=parseFloat(p.nextValue()); }
function $392(p){ p.c.y=parseFloat(p.nextValue()); }
function $393(p){ p.c.z=parseInt(p.nextValue()); }
function $394(p){ p.c.fillcolor=p.nextValue(); }
function $395(p){ p.c.width=parseInt(p.nextValue()); }
function $396(p){ p.c.height=parseInt(p.nextValue()); }
function $397(p){ p.c.dashstyle=p.nextValue(); }
function $398(p){ p.c.style=p.nextValue(); }
function $399(p){ p.c.join=p.nextValue(); }
function $400(p){ p.c.transparent=p.nextValue(); }
function $401(p){ p.c.filltransparent=p.nextValue(); }
function $402(p){ p.c.gradient=isTrue(p.nextValue()); }
function $403(p){ p.c.shadow=isTrue(p.nextValue()); }
function $391min(p){ p.c.xmin=parseFloat(p.nextValue()); }
function $392min(p){ p.c.ymin=parseFloat(p.nextValue()); }
function $391max(p){ p.c.xmax=parseFloat(p.nextValue()); }
function $392max(p){ p.c.ymax=parseFloat(p.nextValue()); }
function $408(p){ p.c.radius=parseFloat(p.nextValue()); }
function $409(p){ p.c.start=$71(parseFloat(p.nextValue())); }
function $410(p){ p.c.sweep=$71(parseFloat(p.nextValue())); }
function $411(p){ p.c.angle=$71(parseFloat(p.nextValue())); }
function $412(p){ p.c.fill=isTrue(p.nextValue()); }
function $413(p){ p.c.bgcolor=p.nextValue(); }
function $414(p){ p.c.linewidth=parseInt(p.nextValue()); }
function $398(p){ p.c.style=parseInt(p.nextValue()); }
function $415(p){ p.c.font=p.nextValue(); }
function $416(p){ p.c.size=parseInt(p.nextValue()); }
function $417(p){ p.c.text=p.nextValue(); }
function $418(p){ p.c.bold=isTrue(p.nextValue()); }
function $419(p){ p.c.italic=isTrue(p.nextValue()); }
function $420(p){ p.c.underline=isTrue(p.nextValue()); }
function $421(p){ p.c.name=p.nextValue(); }
function $422(p){ p.c.imagename=p.nextValue(); }
function $423(p){ p.c.dummy=p.nextValue(); }
function $424(p)
{
this.loadValues(p);
p.gra=new ic$Pline(p.c.np,p.c.px,p.c.py);
p.c.GRAcommon(p.gra);
p.c.DCLine(p.gra.dc);
}
function $425(p)
{
this.loadValues(p);
p.gra=new ic$Polygon(p.c.np,p.c.px,p.c.py);
p.c.GRAcommon(p.gra);
p.c.DCLine(p.gra.dc);
}
function $426(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.GRAcommon(p.gra);
p.c.DCLine(p.gra.dc);
}
function $427(p)
{
this.loadValues(p);
p.gra=new ic$Circle(p.c.x,p.c.y,p.c.radius);
p.c.GRAcommon(p.gra);
p.c.DCLine(p.gra.dc);
}
function $428(p)
{
this.loadValues(p);
p.gra=new ic$Symbol(p.c.x,p.c.y,p.c.angle);
p.c.GRAcommon(p.gra);
p.c.DCSymbol(p.gra.dc);
$280(p.gra);
}
function $429(p)
{
this.loadValues(p);
p.gra=new ic$Text(p.c.x,p.c.y,p.c.angle);
p.c.GRAcommon(p.gra);
p.c.DCText(p.gra.dc);
$281(p.gra);
}
function $429box(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.GRAcommon(p.gra);
p.c.DCText(p.gra.dc);
}
function $431(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);
style=parseInt(p.c.style);
p.gra=new ic$Shape(xmin,ymin,xmax,ymax,height,width);
p.c.GRAcommon(p.gra);
p.c.DCShape(p.gra.dc);
}
function $432(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);
style=parseInt(p.c.style);
p.gra=new ic$Image(xmin,ymin,xmax,ymax,height,width);
p.c.GRAcommon(p.gra);
p.c.DCImage(p.gra.dc);
}
function $433(p)
{
var xmin,ymin,xmax,ymax;
this.loadValues(p);
xmin=parseFloat(p.c.xmin);
ymin=parseFloat(p.c.ymin);
xmax=parseFloat(p.c.xmax);
ymax=parseFloat(p.c.ymax);
p.gra=new ic$Rectangle(xmin,ymin,xmax,ymax);
p.c.GRAcommon(p.gra);
p.c.DCLine(p.gra.dc);
}
function $434(p)
{
var fld;
var i;
p.c.clear();
p.pos=1;
fld=this.topField;
while(fld)
{
fld.put(p);
fld=fld.next;
}
}
function $435()
{
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=$434;
tbl.makeGraphic=null;
if(type=='line')tbl.makeGraphic=$424;
if(type=='polygon')tbl.makeGraphic=$425;
if(type=='arc')tbl.makeGraphic=$426;
if(type=='circle')tbl.makeGraphic=$427;
if(type=='rectangle')tbl.makeGraphic=$433;
if(type=='symbol')tbl.makeGraphic=$428;
if(type=='text')tbl.makeGraphic=$429;
if(type=='textbox')tbl.makeGraphic=$429box;
if(type=='shape')tbl.makeGraphic=$431;
if(type=='image')tbl.makeGraphic=$432;
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=$423;
if(tbl.makeGraphic)
{
switch(fld.name)
{
case'gid': fld.put=$386; break;
case'id': fld.put=$387; break;
case'link': fld.put=$388; break;
case'tag': fld.put=$389; break;
case'long': fld.put=$391; break;
case'lat': fld.put=$392; break;
case'color': fld.put=$390; break;
case'x': fld.put=$391; break;
case'y': fld.put=$392; break;
case'z': fld.put=$393; break;
case'xy': fld.put=$382; break;
case'xy_list': fld.put=$382_list; break;
case'fillcolor': fld.put=$394; break;
case'width': fld.put=$395; break;
case'height': fld.put=$396; break;
case'dashstyle': fld.put=$397; break;
case'style': fld.put=$398; break;
case'join': fld.put=$399; break;
case'transparent': fld.put=$400; break;
case'filltransparent': fld.put=$401; break;
case'gradient': fld.put=$402; break;
case'shadow': fld.put=$403; break;
case'xmin': fld.put=$391min; break;
case'ymin': fld.put=$392min; break;
case'xmax': fld.put=$391max; break;
case'ymax': fld.put=$392max; break;
case'range': fld.put=$383; break;
case'fixed': fld.put=$384; break;
case'radius': fld.put=$408; break;
case'start': fld.put=$409; break;
case'sweep': fld.put=$410; break;
case'angle': fld.put=$411; break;
case'fill': fld.put=$412; break;
case'bgcolor': fld.put=$413; break;
case'linewidth': fld.put=$414; break;
case'style': fld.put=$398; break;
case'fixedsize': fld.put=$384size; break;
case'font': fld.put=$415; break;
case'size': fld.put=$416; break;
case'text': fld.put=$417; break;
case'bold': fld.put=$418; break;
case'italic': fld.put=$419; break;
case'underline': fld.put=$420; break;
case'name': fld.put=$421; break;
case'imagename': fld.put=$422; break;
}
}
}
}
function $436(fld,text)
{
var list;
var list2;
list=this.splitSub(text);
name=trim(list[0]).toLowerCase();
list2=name.split("(");
fld.name=list2[0];
}
function $437()
{
}
function $438()
{
this.image='';
this.type='';
this.sub='';
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 $439(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 $438Line()
{
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;
}
}