[BACK]Return to code.html CVS log [TXT] [DIR] Up to [LON-CAPA] / rat / client

Diff for /rat/client/Attic/code.html between versions 1.8 and 1.28

version 1.8, 2000/07/28 21:36:13 version 1.28, 2001/04/20 15:13:06
Line 9  Resource Assembly Tool Line 9  Resource Assembly Tool
 1/7,1/8,1/10,1/14,1/15,1/16,1/21,1/22,1/29,1/30,1/31,  1/7,1/8,1/10,1/14,1/15,1/16,1/21,1/22,1/29,1/30,1/31,
 2/2,2/3,2/10,2/12,2/13,2/14,2/15,2/17,2/18,2/19,2/20,2/21,2/22,  2/2,2/3,2/10,2/12,2/13,2/14,2/15,2/17,2/18,2/19,2/20,2/21,2/22,
 5/2,5/3,5/4,5/5,5/6,5/8,5/9,5/13,5/18,5/20,5/22,5/24,5/25,  5/2,5/3,5/4,5/5,5/6,5/8,5/9,5/13,5/18,5/20,5/22,5/24,5/25,
 6/7,6/8,6/9,6/10,6/12,6/15,7/4,7/26,7/28  6/7,6/8,6/9,6/10,6/12,6/15,7/4,7/26,7/28,7/31,8/5,8/19,8/24,
 Gerd Kortemeyer with Scott Harrison  01/17/01,03/03,03/05 Gerd Kortemeyer with Scott Harrison
   March/April 01 Scott Harrison
   04/20 Gerd Kortemeyer
 -->  -->
   
   
Line 30  var colmap5=new Array(); Line 32  var colmap5=new Array();
 var colmap6=new Array();  var colmap6=new Array();
 var obj=new Array();  var obj=new Array();
 var objcont=new Array();  var objcont=new Array();
   var objparms=new Array();
 var objlinks=new Array();  var objlinks=new Array();
 var rowcont=new Array();  var rowcont=new Array();
 var rowtype=new Array();  var rowtype=new Array();
Line 62  var funny='|'; Line 65  var funny='|';
 var reqaction='';  var reqaction='';
 var canceltim;  var canceltim;
   
   var expense=0;
   
 var data1=new Array(1024);  var data1=new Array(1024);
 var data2=new Array(1024);  var data2=new Array(1024);
 var data3=new Array(1024);  var data3=new Array(1024);
Line 69  var data4=new Array(1024); Line 74  var data4=new Array(1024);
 var data5=new Array(1024);  var data5=new Array(1024);
   
 var inf;  var inf;
   var srch;
   
   function testfunction() {
      inf.document.forms.resinfo.elements.t.value="ABC";
   }
   
 // ------------------------------------------------ Insert a row into the table  // ------------------------------------------------ Insert a row into the table
   
 function insertrow(j,ex1,ex2) {  function insertrow(j,ex1,ex2) {
    var kj;     var kj;
    stored=0;     stored=0;
      expense++; expense++;
    objects1='';     objects1='';
    objects2='';     objects2='';
    for (kj=0;kj<=maxrow;kj++) {     for (kj=0;kj<=maxrow;kj++) {
Line 89  function insertrow(j,ex1,ex2) { Line 100  function insertrow(j,ex1,ex2) {
    objects=objects1+':'+objects2;     objects=objects1+':'+objects2;
    data1=objects.split(':');     data1=objects.split(':');
    for (kj=0;kj<data1.length;kj++) {     for (kj=0;kj<data1.length;kj++) {
      if (data1[kj]!='') {       if ((data1[kj]!='') && (data1[kj]!=undefined)) {
        thisisobj=obj[data1[kj]];         thisisobj=obj[data1[kj]];
        thisobjtype=thisisobj.split('&')[0];         thisobjtype=thisisobj.split('&')[0];
        if (thisobjtype=='v') {         if (thisobjtype=='v') {
Line 130  function insertrow(j,ex1,ex2) { Line 141  function insertrow(j,ex1,ex2) {
                    }                     }
                 }                  }
              }               }
              if (newobj!='') {               if ((newobj!='') && (newobj!=undefined)) {
                 thisobjcol=newobj.split('&')[1];                  thisobjcol=newobj.split('&')[1];
                 if (colcover.indexOf(':'+thisobjcol+':',0)==-1) {                  if (colcover.indexOf(':'+thisobjcol+':',0)==-1) {
                    colcover+=thisobjcol+':';                       colcover+=thisobjcol+':';  
Line 156  function insertrow(j,ex1,ex2) { Line 167  function insertrow(j,ex1,ex2) {
                    }                     }
                 }                  }
              }               }
              if (newobj!='') {               if ((newobj!='') && (newobj!=undefined)) {
                 thisobjcol=newobj.split('&')[1];                  thisobjcol=newobj.split('&')[1];
                 if (colcover.indexOf(':'+thisobjcol+':',0)==-1) {                  if (colcover.indexOf(':'+thisobjcol+':',0)==-1) {
                    colcover+=thisobjcol+':';                       colcover+=thisobjcol+':';  
Line 220  function insertcol(j) { Line 231  function insertcol(j) {
       if ( col[kj]>j ) { col[kj]++; }         if ( col[kj]>j ) { col[kj]++; } 
    }     }
    maxcol++;     maxcol++;
      expense++; expense++;
    col[maxcol]=j+1;     col[maxcol]=j+1;
 }  }
             
Line 252  function maprow (jid,obj1,ign) { Line 264  function maprow (jid,obj1,ign) {
  var j; var k; var left; var right; var middle;   var j; var k; var left; var right; var middle;
  middle=-1;   middle=-1;
  for (j=0;j<=maxcol;j++) { colmap[j]=0; }   for (j=0;j<=maxcol;j++) { colmap[j]=0; }
  if (rowcont[jid]!='') {   if ((rowcont[jid]!='') && (rowcont[jid]!=undefined)) {
    data2=rowcont[jid].split(':');     data2=rowcont[jid].split(':');
    for (j=0;j<data2.length;j++) {     for (j=0;j<data2.length;j++) {
       data3=obj[data2[j]].split('&');        data3=obj[data2[j]].split('&');
Line 343  function comingthru (jid,kid,dkid) { Line 355  function comingthru (jid,kid,dkid) {
   
 function insertport (obj1,d,inout,linkobj) {  function insertport (obj1,d,inout,linkobj) {
   
   
    var k; var port; var revport;     var k; var port; var revport;
    stored=0;     stored=0;
    data1=obj[obj1].split('&');     data1=obj[obj1].split('&');
Line 422  function insertport (obj1,d,inout,linkob Line 433  function insertport (obj1,d,inout,linkob
     
 function addobj(kjid,objs) {  function addobj(kjid,objs) {
    stored=0;     stored=0;
    if (rowcont[kjid]!='') { rowcont[kjid]+=':'; }     expense++;
      if ((rowcont[kjid]!='') && (rowcont[kjid]!=undefined)) { 
         rowcont[kjid]+=':'; 
      }
    rowcont[kjid]+=obj.length;     rowcont[kjid]+=obj.length;
    obj[obj.length]=objs;     obj[obj.length]=objs;
    return obj.length-1;     return obj.length-1;
Line 476  function delobj(obj1) { Line 490  function delobj(obj1) {
       rowcont[k]='';        rowcont[k]='';
       for (k2=0;k2<data4.length;k2++) {        for (k2=0;k2<data4.length;k2++) {
          if (data4[k2]!=obj1) {           if (data4[k2]!=obj1) {
             if (rowcont[k]!='') { rowcont[k]+=':'; }               if ((rowcont[k]!='') && (rowcont[k]!=undefined)) { 
                  rowcont[k]+=':'; 
               } 
             rowcont[k]+=data4[k2];               rowcont[k]+=data4[k2]; 
          }           }
       }        }
    }     }
      obj[obj1]='';
 }  }
   
 // --------------------------------------------------------- Garbage collection  // --------------------------------------------------------- Garbage collection
Line 495  function cleanup () { Line 512  function cleanup () {
    for (kj=0;kj<=maxcol;kj++) { data1[kj]=0; }     for (kj=0;kj<=maxcol;kj++) { data1[kj]=0; }
    for (kj=0;kj<=maxrow;kj++) {     for (kj=0;kj<=maxrow;kj++) {
      rowtype[kj]=0;       rowtype[kj]=0;
      if (rowcont[kj]!='') {       if ((rowcont[kj]!='') && (rowcont[kj]!=undefined)) {
        data2=rowcont[kj].split(':');         data2=rowcont[kj].split(':');
        for (j=0;j<data2.length;j++) {         for (j=0;j<data2.length;j++) {
          if (obj[data2[j]].substring(0,2)=='e&') {           if (obj[data2[j]].substring(0,2)=='e&') {
Line 588  function crecond(obj1,colid,condtext,con Line 605  function crecond(obj1,colid,condtext,con
 function dellink (linknr) {  function dellink (linknr) {
   var k; var obj1; var obj2;    var k; var obj1; var obj2;
   stored=0;    stored=0;
   if (objlinks[linknr]!='') {    if ((objlinks[linknr]!='') && (objlinks[linknr]!=undefined)) {
    data3=objlinks[linknr].split(':');     data3=objlinks[linknr].split(':');
    obj1=data3[0];     obj1=data3[0];
    obj2=data3[1];     obj2=data3[1];
Line 611  function dellink (linknr) { Line 628  function dellink (linknr) {
       }        }
    }     }
    for (k=0;k<obj.length;k++) {     for (k=0;k<obj.length;k++) {
      if (obj[k]!='') {       if ((obj[k]!='') && (obj[k]!=undefined)) {
        data3=obj[k].split('&');         data3=obj[k].split('&');
        if (((data3[0]=='v') || (data3[0]=='h')) &&          if (((data3[0]=='v') || (data3[0]=='h')) && 
            (data3[data3.length-2]==linknr)) {             (data3[data3.length-2]==linknr)) {
Line 627  function dellink (linknr) { Line 644  function dellink (linknr) {
 // Links obj1 with obj2, creates new objlink, marks all elements with number  // Links obj1 with obj2, creates new objlink, marks all elements with number
   
 function joinres (obj1,obj2,cond) {  function joinres (obj1,obj2,cond) {
    var k; var kr; var outcol; var incol; var d;  
    stored=0;     stored=0;
      var minexpense;
      var best;
   
      expense=0;
      tryjoin(obj1,obj2,cond,1,1);
      minexpense=expense;
      best=0;
      finishload();
   
      expense=0;
      tryjoin(obj1,obj2,cond,1,-1);
      if (expense<minexpense) {
         best=1;
         minexpense=expense;
      }
      finishload();
   
      expense=0;
      tryjoin(obj1,obj2,cond,-1,1);
      if (expense<minexpense) {
         best=2;
         minexpense=expense;
      }
      finishload();
   
      expense=0;
      tryjoin(obj1,obj2,cond,-1,-1);
      if (expense<minexpense) {
         best=3;
         minexpense=expense;
      }
   
   
      if (best==0) {
         finishload();
         tryjoin(obj1,obj2,cond,1,1);
      }
      if (best==1) {
         finishload();
         tryjoin(obj1,obj2,cond,1,-1);
      }
      if (best==2) {
         finishload();
         tryjoin(obj1,obj2,cond,-1,1);
      }
   
   }
   
   
   function tryjoin(obj1,obj2,cond,d1,d2) {
      var k; var kr; var outcol; var incol; var d; var dest;
   
    dest=objlinks.length;     dest=objlinks.length;
    objlinks[dest]=obj1+':'+obj2+':'+cond;     objlinks[dest]=obj1+':'+obj2+':'+cond;
    data3=obj[obj1].split('&');  
    sum=0;     outcol=insertport(obj1,d1,2,dest);
    for (k=2;k<data3.length;k++) { sum+=col[data3[k].split(':')[0]]; }  
    outmiddle=sum/(data3.length-2);  
    data3=obj[obj2].split('&');  
    sum=0;  
    for (k=2;k<data3.length;k++) { sum+=col[data3[k].split(':')[0]]; }  
    inmiddle=sum/(data3.length-2);  
    d=inmiddle-outmiddle;  
    outcol=insertport(obj1,d,2,dest);  
    insertcond(obj1,outcol,cond);     insertcond(obj1,outcol,cond);
    incol=insertport(obj2,-d,1,dest);     incol=insertport(obj2,d2,1,dest);
    if (row[inrow]==(row[outrow]+1)) {     if (row[inrow]==(row[outrow]+1)) {
       insertrow(row[outrow],-1,-1);        insertrow(row[outrow],-1,-1);
    }     }
Line 779  function delres (obj1,recon) { Line 839  function delres (obj1,recon) {
             for (k2=0;k2<inobjs.length;k2++) {              for (k2=0;k2<inobjs.length;k2++) {
                if (inobjs[k2]==infromobj[k]) {                 if (inobjs[k2]==infromobj[k]) {
                   if (inwithcon[k]!=0) {                    if (inwithcon[k]!=0) {
                      if (inobjscond[k2]!='') { inobjscond[k2]+='||'; }                       if ((inobjscond[k2]!='') &&
                            (inobjscond[k2]!=undefined)) { 
                            inobjscond[k2]+='||'; 
                        }
                      inobjscond[k2]+=                       inobjscond[k2]+=
                       '('+(objcont[inwithcon[k]].split(':'))[0]+')';                        '('+(objcont[inwithcon[k]].split(':'))[0]+')';
                    }                     }
Line 805  function delres (obj1,recon) { Line 868  function delres (obj1,recon) {
             for (k2=0;k2<outobjs.length;k2++) {              for (k2=0;k2<outobjs.length;k2++) {
                if (outobjs[k2]==outtoobj[k]) {                 if (outobjs[k2]==outtoobj[k]) {
                  if (outwithcon[k]!=0) {                   if (outwithcon[k]!=0) {
                      if (outobjscond[k2]!='') { outobjscond[k2]+='||'; }                       if ((outobjscond[k2]!='') &&
                            (outobjscond[k2]!=undefined)) { 
                            outobjscond[k2]+='||'; 
                        }
                      outobjscond[k2]+=                       outobjscond[k2]+=
                       '('+(objcont[outwithcon[k]].split(':'))[0]+')';                        '('+(objcont[outwithcon[k]].split(':'))[0]+')';
                   }                    }
Line 827  function delres (obj1,recon) { Line 893  function delres (obj1,recon) {
   
       for (k=0;k<inobjs.length;k++) {        for (k=0;k<inobjs.length;k++) {
           cond='';            cond='';
           if (inobjscond[k]!='') { cond='('+inobjscond[k]+')'; }            if ((inobjscond[k]!='') && (inobjscond[k]!=undefined)) { 
                cond='('+inobjscond[k]+')'; 
             }
           for (k2=0;k2<outobjs.length;k2++) {            for (k2=0;k2<outobjs.length;k2++) {
               thiscond=cond;                thiscond=cond;
               if (outobjscond[k2]!='') {                if ((outobjscond[k2]!='') && (outobjscond[k2]!=undefined)) {
                  if (thiscond!='') { thiscond+='&&'; }                   if ((thiscond!='') && (thiscond!=undefined)) { 
                       thiscond+='&&'; 
                    }
                  thiscond+='('+outobjscond[k2]+')';                   thiscond+='('+outobjscond[k2]+')';
               }                }
               condnr=0;                condnr=0;
               if (thiscond!='') { condnr=newcondition(thiscond,'normal'); }                 if ((thiscond!='') && (thiscond!=undefined)) { 
                    condnr=newcondition(thiscond,'normal'); 
                 }
                 save(); 
               joinres(inobjs[k],outobjs[k2],condnr);                joinres(inobjs[k],outobjs[k2],condnr);
           }            }
       }        }
Line 849  function drawcell (rtype,ctype,what,cm,o Line 922  function drawcell (rtype,ctype,what,cm,o
  if ((what=='') && (ne==0)) { cm="#DDDDDD"; }   if ((what=='') && (ne==0)) { cm="#DDDDDD"; }
  if (ctype!=0) {   if (ctype!=0) {
    parent.mapout.document.write('<td bgcolor='+cm+' width='+cw[ctype]+'>');     parent.mapout.document.write('<td bgcolor='+cm+' width='+cw[ctype]+'>');
    if (what!='') {     if ((what!='') && (what!=undefined)) {
      if (obj1!='') {       if ((obj1!='') && (obj1!=undefined)) {
        obj1="'"+obj1+"'";         obj1="'"+obj1+"'";
        parent.mapout.document.write         parent.mapout.document.write
         ('<a href="javascript:parent.code.handler('+obj1          ('<a href="javascript:parent.code.handler('+obj1
Line 883  function drawcell (rtype,ctype,what,cm,o Line 956  function drawcell (rtype,ctype,what,cm,o
            }             }
         }          }
      }       }
      if (obj1!='') {       if ((obj1!='') && (obj1!=undefined)) {
        parent.mapout.document.write('</a>');         parent.mapout.document.write('</a>');
      }       }
    } else {     } else {
Line 940  if (rowtype[jid]!=0) { Line 1013  if (rowtype[jid]!=0) {
  }   }
   
  parent.mapout.document.writeln('<tr height='+rh[rowtype[jid]]+'>');   parent.mapout.document.writeln('<tr height='+rh[rowtype[jid]]+'>');
  if (rowcont[jid]!='') {   if ((rowcont[jid]!='') && (rowcont[jid]!=undefined)) {
    data2=rowcont[jid].split(':');     data2=rowcont[jid].split(':');
    for (jk=0;jk<data2.length;jk++) {     for (jk=0;jk<data2.length;jk++) {
       data3=obj[data2[jk]].split('&');        data3=obj[data2[jk]].split('&');
Line 997  if (rowtype[jid]!=0) { Line 1070  if (rowtype[jid]!=0) {
   
          if (rightin>middle) {           if (rightin>middle) {
             for (k=middle+1;k<rightin;k++) {               for (k=middle+1;k<rightin;k++) { 
                if (colmap4[k]!='') {                 if ((colmap4[k]!='') && (colmap4[k]!=undefined)) {
                   colmap[k]='rlt';                     colmap[k]='rlt'; 
                } else {                 } else {
                   colmap[k]='rl';                    colmap[k]='rl';
Line 1007  if (rowtype[jid]!=0) { Line 1080  if (rowtype[jid]!=0) {
          }           }
          if (leftin<middle) {           if (leftin<middle) {
             for (k=middle-1;k>leftin;k--) {               for (k=middle-1;k>leftin;k--) { 
                if (colmap4[k]!='') {                 if ((colmap4[k]!='') && (colmap4[k]!=undefined)) {
                   colmap[k]='lrt';                     colmap[k]='lrt'; 
                } else {                 } else {
                   colmap[k]='lr';                    colmap[k]='lr';
Line 1027  if (rowtype[jid]!=0) { Line 1100  if (rowtype[jid]!=0) {
             if (rightout<middle)  { colmap2[middle]='tl'; }              if (rightout<middle)  { colmap2[middle]='tl'; }
             if (rightout==middle) { colmap2[middle]='tdl'; }              if (rightout==middle) { colmap2[middle]='tdl'; }
             if (rightout>middle)  {               if (rightout>middle)  { 
               if (colmap3[middle]!='') {                if ((colmap3[middle]!='') && (colmap3[middle]!=undefined)) {
                  colmap2[middle]='rtdl';                    colmap2[middle]='rtdl'; 
               } else {                } else {
                  colmap2[middle]='rtl';                   colmap2[middle]='rtl';
Line 1036  if (rowtype[jid]!=0) { Line 1109  if (rowtype[jid]!=0) {
          }           }
          if (leftout<middle) {           if (leftout<middle) {
             for (k=middle-1;k>leftout;k--) {               for (k=middle-1;k>leftout;k--) { 
                if (colmap3[k]!='') {                 if ((colmap3[k]!='') && (colmap3[k]!=undefined)) {
                   colmap2[k]='rld';                     colmap2[k]='rld'; 
                } else {                 } else {
                   colmap2[k]='rl';                    colmap2[k]='rl';
Line 1046  if (rowtype[jid]!=0) { Line 1119  if (rowtype[jid]!=0) {
          }           }
          if (rightout>middle) {           if (rightout>middle) {
             for (k=middle+1;k<rightout;k++) {               for (k=middle+1;k<rightout;k++) { 
                if (colmap3[k]!='') {                 if ((colmap3[k]!='') && (colmap3[k]!=undefined)) {
                   colmap2[k]='lrd';                     colmap2[k]='lrd'; 
                } else {                 } else {
                   colmap2[k]='lr';                    colmap2[k]='lr';
Line 1215  function infoclear() { Line 1288  function infoclear() {
   }    }
   inf.document.writeln('</tr></table></body></html>');    inf.document.writeln('</tr></table></body></html>');
   inf.document.close();    inf.document.close();
   parent.focus();    srchclose();
   
     parent.top.focus();
   parent.mapout.focus();    parent.mapout.focus();
   notclear=1;    notclear=1;
   lastinfo='';    lastinfo='';
Line 1308  function info(infostr) { Line 1383  function info(infostr) {
   }    }
   inf.document.writeln('</td></tr></table></body></html>');    inf.document.writeln('</td></tr></table></body></html>');
   inf.document.close();    inf.document.close();
   parent.focus();    parent.top.focus();
   parent.mapout.focus();    parent.mapout.focus();
   notclear=0;    notclear=0;
   lastinfo=infostr;    lastinfo=infostr;
Line 1359  function insertreslink(infostr) { Line 1434  function insertreslink(infostr) {
    dellink(lnr);     dellink(lnr);
    newresource(rid,cid,'','','false','normal');     newresource(rid,cid,'','','false','normal');
    nobj=obj.length-1;     nobj=obj.length-1;
      save();
    joinres(fobj,nobj,cobj);     joinres(fobj,nobj,cobj);
      save();
    joinres(nobj,tobj,0);     joinres(nobj,tobj,0);
 }  }
   
Line 1379  function insertcondlink(cid,lnr) { Line 1456  function insertcondlink(cid,lnr) {
    dellink(lnr);     dellink(lnr);
    newresource(maxrow,cid,'','','false','normal');     newresource(maxrow,cid,'','','false','normal');
    nobj=obj.length-1;     nobj=obj.length-1;
      save();
    joinres(fobj,nobj,cobj);     joinres(fobj,nobj,cobj);
      save();
    joinres(nobj,tobj,0);     joinres(nobj,tobj,0);
 }  }
   
   
   
   
   // ------------------------------------------------------- Clears search window
   
   function srchclear() {
     srch.document.clear();
   }
   
   // ------------------------------------------------------- Closes search window
   
   function srchclose() {
     if (srch && !srch.closed) {
       srch.close();
     }
   }
   
   // --------------------------------------------------------- Open search window
   
   function srchopen() {
      var options="scrollbars=1,resizable=1,menubar=0";
      srch=open("/adm/searchcat?catalogmode=interactive","srchout",options);
      srch.focus();
   }
   
   // -------------------------------------------- Interface function to searching
   
   function search() {
      alert("Searching not yet implemented");
   }
   
   // ------------------------------------------------------- Do srch status check
   
   function srchcheck() {
      if (!srch || srch.closed) {
         srchopen();
      }
      srch.focus();
   }
   
 // ---------------------------------------------------- Handles "click to edit"  // ---------------------------------------------------- Handles "click to edit"
   
 function handler(infostr) {  function handler(infostr) {
Line 1470  function handler(infostr) { Line 1589  function handler(infostr) {
            }             }
         }          }
         inf.document.write(          inf.document.write(
          '<form name=resinfo><table><tr><td>Title:</td><td>'           '<form name=resinfo><table><tr><td>Title:</td><td colspan=2>'
         +'<input type=text name=t size=30 value="'          +'<input type=text name=t size=30 value="'
         +data2[0]+'"><input type=hidden name=h value='+data2[3]+'></td></tr>');          +data2[0]+'"><input type=hidden name=h value='+data2[3]+'></td></tr>');
     if ((data2[3]!='start') && (data2[3]!='finish')) {      if ((data2[3]!='start') && (data2[3]!='finish')) {
            inf.document.write('<tr><td>URL:</td><td>'             inf.document.write('<tr><td>URL:</td><td colspan=2>'
         +'<input type=text name=u size=30 value="'+data2[1]+'"></td></tr>'          +'<input type=text name=u size=30 value="'+data2[1]+'"></td></tr>'
         +'<tr><td>External:</td><td><input type=checkbox name=e');          +'<tr><td>External:</td><td><input type=checkbox name=e');
         if (data2[2]=='true') { inf.document.write(' checked'); }          if (data2[2]=='true') { inf.document.write(' checked'); }
         inf.document.write('></td></tr>'          inf.document.write('></td><td align=right><a href="javascript:opener.srchcheck()">Search</a></td></tr>'
         +'<tr><td colspan=2>'          +'<tr><td colspan=3>'
         +'<input type=radio name=y value=normal '+          +'<input type=radio name=y value=normal '+
  'onClick="self.document.forms.resinfo.elements.h.value='+"'normal'"+'"');   'onClick="self.document.forms.resinfo.elements.h.value='+"'normal'"+'"');
      if (data2[3]=='normal') { inf.document.write(' checked'); }       if (data2[3]=='normal') { inf.document.write(' checked'); }
Line 1498  function handler(infostr) { Line 1617  function handler(infostr) {
                +'<input type=hidden name=u value=""></td></tr>');                 +'<input type=hidden name=u value=""></td></tr>');
     }      }
         inf.document.writeln(          inf.document.writeln(
          '<tr><td colspan=2><a href="javascript:opener.editmode=0;'           '<tr><td colspan=3><a href="javascript:opener.editmode=0;'
         +'opener.notclear=0;opener.objcont['+data1[1]          +'opener.notclear=0;opener.objcont['+data1[1]
         +']=opener.escape(self.document.forms.resinfo.elements.t.value)+'+"':'"          +']=opener.escape(self.document.forms.resinfo.elements.t.value)+'+"':'"
         +'+opener.escape(self.document.forms.resinfo.elements.u.value)+'+"':'"          +'+opener.escape(self.document.forms.resinfo.elements.u.value)+'+"':'"
Line 1524  function handler(infostr) { Line 1643  function handler(infostr) {
          +'opener.linkmode='+data1[1]+';'           +'opener.linkmode='+data1[1]+';'
          +'opener.infoclear();">Link Resource</a>');           +'opener.infoclear();">Link Resource</a>');
     }      }
           inf.document.writeln(
             '<br><a href="javascript:'
            +'opener.setparms('+data1[1]+');'
            +'opener.infoclear();">Set Parameters</a>');
       
       }        }
      } else {       } else {
         linkmode=0;          linkmode=0;
Line 1573  function empty(rid,k) { Line 1697  function empty(rid,k) {
          'opener.editmode=0;opener.notclear=0;opener.infoclear();opener.draw('           'opener.editmode=0;opener.notclear=0;opener.infoclear();opener.draw('
           +');">Insert resource</a>');            +');">Insert resource</a>');
   
   if ((mostrecent!=0) && (objcont[mostrecent]!='')) {    if ((mostrecent!=0) && (objcont[mostrecent]!='') && 
                            (objcont[mostrecent]!=undefined)) {
   
         inf.document.writeln('<br><a href="javascript:opener.newresource('+          inf.document.writeln('<br><a href="javascript:opener.newresource('+
           rid+','+cid+",'','','false','normal');"+            rid+','+cid+",'','','false','normal');"+
Line 1695  function graphreset() { Line 1820  function graphreset() {
    insertcol(-1);     insertcol(-1);
   
    objcont[0]='';     objcont[0]='';
    objcont[1]='Start::false:start:res'  
    objcont[2]='Finish::false:finish:res';  
    objlinks[0]='';     objlinks[0]='';
    objlinks[1]='1:2:0';     if (((objcont[1]==undefined)&&(objcont[2]==undefined)) ||
          ((objcont[1]=='')&&(objcont[2]==''))) { 
         objcont[1]='Start::false:start:res'
         objcont[2]='Finish::false:finish:res';
      }
    graphdef='no';     graphdef='no';
   
 }  }
Line 1736  function tabledraw() { Line 1862  function tabledraw() {
   var condid;    var condid;
   var sortstr=sortobjs();    var sortstr=sortobjs();
  insrestab(1,-1,-1,'');   insrestab(1,-1,-1,'');
  if (sortstr!='') {   if ((sortstr!='') && (sortstr!=undefined)) {
   objsorted=sortstr.split('&');    objsorted=sortstr.split('&');
   for (k=0;k<objsorted.length;k++) {    for (k=0;k<objsorted.length;k++) {
      i=(objsorted[k].split(':'))[0];       i=(objsorted[k].split(':'))[0];
Line 1823  function tabledraw() { Line 1949  function tabledraw() {
        parent.mapout.document.writeln(         parent.mapout.document.writeln(
         '<a href="javascript:parent.code.linkmode='+i+          '<a href="javascript:parent.code.linkmode='+i+
        ';parent.code.notclear=0;parent.code.infoclear();">'+         ';parent.code.notclear=0;parent.code.infoclear();">'+
        'Link resource</a></td></tr>');         'Link resource</a>');
     }      }
           parent.mapout.document.writeln(
             '<br><a href="javascript:'
            +'parent.code.setparms('+i+');">Set Parameters</a>');
   
         parent.mapout.document.writeln('</td></tr>');
        parent.mapout.document.writeln('<tr><td colspan=2><table><tr>');         parent.mapout.document.writeln('<tr><td colspan=2><table><tr>');
        for (j=2;j<data2.length;j++) {         for (j=2;j<data2.length;j++) {
            data4=data2[j].split(':');             data4=data2[j].split(':');
Line 1892  function insrestab(irow,be,af,typ) { Line 2023  function insrestab(irow,be,af,typ) {
        '<a href="javascript:parent.code.insertrow('         '<a href="javascript:parent.code.insertrow('
        +irow+');parent.code.newresource(parent.code.maxrow,'+rcol[0]         +irow+');parent.code.newresource(parent.code.maxrow,'+rcol[0]
  +",'','','false','normal');parent.code.mostrecent=parent.code.obj.length-1;"   +",'','','false','normal');parent.code.mostrecent=parent.code.obj.length-1;"
          +"parent.code.save();"
        +'parent.code.joinres('+be+',parent.code.mostrecent,0);'         +'parent.code.joinres('+be+',parent.code.mostrecent,0);'
        +'parent.code.draw();">'         +'parent.code.draw();">'
        +'Insert resource linked to from above</a><br>');         +'Insert resource linked to from above</a><br>');
Line 1901  function insrestab(irow,be,af,typ) { Line 2033  function insrestab(irow,be,af,typ) {
        '<a href="javascript:parent.code.insertrow('         '<a href="javascript:parent.code.insertrow('
        +irow+');parent.code.newresource(parent.code.maxrow,'+rcol[0]         +irow+');parent.code.newresource(parent.code.maxrow,'+rcol[0]
  +",'','','false','normal');parent.code.mostrecent=parent.code.obj.length-1;"   +",'','','false','normal');parent.code.mostrecent=parent.code.obj.length-1;"
          +"parent.code.save();"
        +'parent.code.joinres('+be+',parent.code.mostrecent,0);'         +'parent.code.joinres('+be+',parent.code.mostrecent,0);'
          +"parent.code.save();"
        +'parent.code.joinres(parent.code.mostrecent,'+af+',0);'         +'parent.code.joinres(parent.code.mostrecent,'+af+',0);'
        +'parent.code.draw();">'         +'parent.code.draw();">'
        +'Insert resource linked to from above and linking to below</a><br>');         +'Insert resource linked to from above and linking to below</a><br>');
Line 1911  function insrestab(irow,be,af,typ) { Line 2045  function insrestab(irow,be,af,typ) {
        '<a href="javascript:parent.code.insertrow('         '<a href="javascript:parent.code.insertrow('
        +irow+');parent.code.newresource(parent.code.maxrow,'+rcol[0]         +irow+');parent.code.newresource(parent.code.maxrow,'+rcol[0]
  +",'','','false','normal');parent.code.mostrecent=parent.code.obj.length-1;"   +",'','','false','normal');parent.code.mostrecent=parent.code.obj.length-1;"
          +"parent.code.save();"
        +'parent.code.joinres(parent.code.mostrecent,'+af+',0);'         +'parent.code.joinres(parent.code.mostrecent,'+af+',0);'
        +'parent.code.draw();">'         +'parent.code.draw();">'
        +'Insert resource linking to below</a><br>');         +'Insert resource linking to below</a><br>');
Line 1931  function simpletabledraw() { Line 2066  function simpletabledraw() {
   var cck;    var cck;
   var condid;    var condid;
   var sortstr=sortobjs();    var sortstr=sortobjs();
  if (sortstr!='') {   if ((sortstr!='') && (sortstr!=undefined)) {
   objsorted=sortstr.split('&');    objsorted=sortstr.split('&');
   for (k=0;k<objsorted.length;k++) {    for (k=0;k<objsorted.length;k++) {
      i=(objsorted[k].split(':'))[0];       i=(objsorted[k].split(':'))[0];
Line 2029  function sortobjs() { Line 2164  function sortobjs() {
    for (k=1;k<objlinks.length;k++) {     for (k=1;k<objlinks.length;k++) {
      wheelswitch();       wheelswitch();
      message("Sorting Resources: "+funny);       message("Sorting Resources: "+funny);
      if (objlinks[k]!='') {       if ((objlinks[k]!=undefined) && (objlinks[k]!='')) {
       sortthis=1;        sortthis=1;
       data1=objlinks[k].split(':');        data1=objlinks[k].split(':');
       kj=-1;        kj=-1;
Line 2118  function graphopt() { Line 2253  function graphopt() {
       row[k]=k;        row[k]=k;
    }     }
    maxrow=rowcont.length-1;     maxrow=rowcont.length-1;
   
    var oldlinks=new Array();     var oldlinks=new Array();
    for (k=0;k<objlinks.length;k++) { oldlinks[k]=objlinks[k]; }     for (k=0;k<objlinks.length;k++) { 
         oldlinks[k]=objlinks[k]; 
         objlinks[k]='';
      }
    objlinks.length=0;     objlinks.length=0;
    objlinks[0]='';     objlinks[0]='';
      graphdef='yes';
      save();
   
    for (k=0;k<objsorted.length;k++) {     for (k=0;k<objsorted.length;k++) {
       kj=(objsorted[k].split(':'))[0];       wheelswitch();
        message("Connecting Resources: "+funny);
        kj=(objsorted[k].split(':'))[0];
       for (ij=1;ij<oldlinks.length;ij++) {        for (ij=1;ij<oldlinks.length;ij++) {
         if (oldlinks[ij]) {          if (oldlinks[ij]) {
           data1=oldlinks[ij].split(':');            data1=oldlinks[ij].split(':');
           if (data1[0]==kj) {            if (data1[0]==kj) {
              joinres(data1[0],data1[1],data1[2]);               joinres(data1[0],data1[1],data1[2]);
                save();
           }            }
          }           }
       }        }
    }     }
    graphdef='yes';  
 }  }
   
 // ----------------------------------------------------------- Remove e-objects  // ----------------------------------------------------------- Remove e-objects
Line 2143  function condense() { Line 2285  function condense() {
    message("Condensing");     message("Condensing");
    var j;     var j;
    for (j=0;j<=maxrow;j++) {     for (j=0;j<=maxrow;j++) {
      if (rowcont[j]!='') {       if ((rowcont[j]!='') && (rowcont[j]!=undefined)) {
       data1=rowcont[j].split(':');        data1=rowcont[j].split(':');
       rowcont[j]='';        rowcont[j]='';
       for (k=0;k<data1.length;k++) {        for (k=0;k<data1.length;k++) {
          if (obj[data1[k]].substring(0,2)!='e&') {           if (obj[data1[k]].substring(0,2)!='e&') {
             if (rowcont[j]!='') { rowcont[j]+=':'; }              if ((rowcont[j]!='') && (rowcont[j]!=undefined)) { 
                  rowcont[j]+=':'; 
               }
             rowcont[j]+=data1[k];              rowcont[j]+=data1[k];
          }           }
       }        }
Line 2177  function finishload() { Line 2321  function finishload() {
    lastinfo='';     lastinfo='';
    graphreset();     graphreset();
    var inputstr=parent.server.document.forms.storage.output.value;     var inputstr=parent.server.document.forms.storage.output.value;
    if (inputstr!='') {     if ((inputstr!='') && (inputstr!=undefined)) {
    data1=inputstr.split('<&>');     data1=inputstr.split('<&>');
    var k;     var k;
    for (k=0;k<data1.length;k++) {     for (k=0;k<data1.length;k++) {
Line 2196  function finishload() { Line 2340  function finishload() {
        if (data2[0]=='zscale') { zscale=1*data2[1]; }         if (data2[0]=='zscale') { zscale=1*data2[1]; }
    }     }
   }    }
     if (graphdef=='yes') {
        for (k=1;k<=maxrow;k++) {
           if (rowcont[k]==undefined) { rowcont[k]=''; }
        }
     }
   }
   
   // -------------------------------------------------------------- Parameter set
   
   function setparms(resid) {
      alert('Called setparms for '+resid);
 }  }
   
 // -------------------------------------------------------------- Undo function  // -------------------------------------------------------------- Undo function
Line 2260  function wheelswitch() { Line 2415  function wheelswitch() {
 // --------------------------------------------- Checks if server frame defined  // --------------------------------------------- Checks if server frame defined
   
 function checkdef() {  function checkdef() {
    if (parent.server.document.forms.storage.output.value!=undefined) {     if (parent.server!=undefined) {
       srvloaded();      if (parent.server.document!=undefined) {
        if (parent.server.document.forms.storage.output.value!=undefined) {
           srvloaded();
        }
       }
    }     }
    if ((finishdone==0) && (tim==0)) { setTimeout('checkdef()',100); }     if ((finishdone==0) && (tim==0)) { setTimeout('checkdef()',100); }
 }  }
Line 2337  function togglemode() { Line 2496  function togglemode() {
 function main() {  function main() {
   
    if (mainrun==0) {     if (mainrun==0) {
         srchopen();
   //      srchclose();
       infopen();        infopen();
       infoclear();        infoclear();
       load();        load();
Line 2346  function main() { Line 2507  function main() {
   
 }  }
   
 // ------------------------------------------------------------- Save on leave?  // ---------------------------------------------------------- Close the window?
   
 function leave() {  function leave() {
    if (!inf.closed) {     if (!inf.closed) {
       inf.close();        inf.close();
    }     }
    if (stored==0) {     if (srch && !srch.closed) {
       if (confirm('Store changes?')) {        srchclose();
          storechange();     
       }  
    }     }
 }  }
   
Removed from v.1.8  
changed lines
  Added in v.1.28

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>