--- rat/client/Attic/code.html	2001/03/15 18:08:44	1.27
+++ rat/client/Attic/code.html	2001/07/04 19:59:24	1.41
@@ -11,6 +11,11 @@ Resource Assembly Tool
 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,7/31,8/5,8/19,8/24,
 01/17/01,03/03,03/05 Gerd Kortemeyer with Scott Harrison
+March/April 01 Scott Harrison
+04/20 Gerd Kortemeyer
+04/30 Scott Harrison
+05/31 Scott Harrison
+06/11,06/25,06/27,06/28,06/29,07/04 Gerd Kortemeyer
 -->
 
 
@@ -73,6 +78,23 @@ var data5=new Array(1024);
 
 var inf;
 var srch;
+var srchflag=-1; // 1 means currently open
+                 // 0 means closed (but has been open)
+                 // -1 means never yet opened/defined
+var srchmode='';
+
+var idx;
+var idxflag=-1; // 1 means currently open
+                 // 0 means closed (but has been open)
+                 // -1 means never yet opened/defined
+var idxmode='';
+
+var parm;
+var parmflag=-1; // 1 means currently open
+                 // 0 means closed (but has been open)
+                 // -1 means never yet opened/defined
+                 
+var iconpath='/adm/lonIcons/';
 
 function testfunction() {
    inf.document.forms.resinfo.elements.t.value="ABC";
@@ -917,20 +939,50 @@ function delres (obj1,recon) {
 
 function drawcell (rtype,ctype,what,cm,obj1,ej,ek,ne) {
  var bgcolor;
+ var url='';
+ var urlparts=new Array;
+ var mime;
+ var ext;
+ var objref;
+ var objnum;
+
  if ((what=='') && (ne==0)) { cm="#DDDDDD"; }
  if (ctype!=0) {
    parent.mapout.document.write('<td bgcolor='+cm+' width='+cw[ctype]+'>');
    if ((what!='') && (what!=undefined)) {
      if ((obj1!='') && (obj1!=undefined)) {
-       obj1="'"+obj1+"'";
+       objref="'"+obj1+"'";
        parent.mapout.document.write
-        ('<a href="javascript:parent.code.handler('+obj1
-         +');" onMouseOver="parent.code.info('+obj1+');">');
+        ('<a href="javascript:parent.code.handler('+objref
+         +');" onMouseOver="parent.code.info('+objref+');">');
      } 
      if (what=='r:') {
+        mime='';
+        objnum=(obj1.split('&'))[1];
+        if (objcont[objnum]!=undefined) {
+            urlparts=objcont[objnum].split(':');
+            url=urlparts[1];
+            ext=urlparts[2];
+            urlparts=url.split('.');
+            mime=urlparts[urlparts.length-1];
+            if (mime==undefined) { mime=''; }
+        }
         parent.mapout.document.write
-         ('<img border=0 width='+cw[ctype]+' height='+rh[rtype]
+         ('<img border=0 width='+cw[ctype]+' height='+rh[1]
           +' src="resource.gif">');
+        if ((mime!='') && (ext!='true')) {
+           parent.mapout.document.write
+           ('<br><img border=0 src="left.gif"></a><a target="preview" href="'+
+           url+'.meta"><img border=0 src="'+iconpath+
+           'meta.gif"><a target="preview" href="'+url+
+           '"><img border=0 src="'+iconpath+mime+'.gif">'+
+           '<img border=0 src="right.gif">');
+        } else {
+           parent.mapout.document.write
+           ('<br><img border=0 src="middle.gif">');
+        }
+        parent.mapout.document.write
+           ('<br><img border=0 src="bottom.gif">');
      } else {
         if (what=='c:') {
            parent.mapout.document.write
@@ -938,14 +990,61 @@ function drawcell (rtype,ctype,what,cm,o
              +' src="condition.gif">');          
         } else {
            if (what=='rs:') {
+        mime='';
+        objnum=(obj1.split('&'))[1];
+        if (objcont[objnum]!=undefined) {
+            urlparts=objcont[objnum].split(':');
+            url=urlparts[1];
+            ext=urlparts[2];
+            urlparts=url.split('.');
+            mime=urlparts[urlparts.length-1];
+            if (mime==undefined) { mime=''; }
+        }
               parent.mapout.document.write
-               ('<img border=0 width='+cw[ctype]+' height='+rh[rtype]
+               ('<img border=0 width='+cw[ctype]+' height='+rh[1]
                +' src="start.gif">');
+        if ((mime!='') && (ext!='true')) {
+           parent.mapout.document.write
+           ('<br><img border=0 src="left.gif"></a><a target="preview" href="'+
+           url+'.meta"><img border=0 src="'+iconpath+
+           'meta.gif"><a target="preview" href="'+url+
+           '"><img border=0 src="'+iconpath+mime+'.gif">'+
+           '<img border=0 src="right.gif">');
+        } else {
+           parent.mapout.document.write
+           ('<br><img border=0 src="middle.gif">');
+        }
+        parent.mapout.document.write
+           ('<br><img border=0 src="bottom.gif">');
+
            } else {
              if (what=='rf:') {
+        mime='';
+        objnum=(obj1.split('&'))[1];
+        if (objcont[objnum]!=undefined) {
+            urlparts=objcont[objnum].split(':');
+            url=urlparts[1];
+            ext=urlparts[2];
+            urlparts=url.split('.');
+            mime=urlparts[urlparts.length-1];
+            if (mime==undefined) { mime=''; }
+        }
                 parent.mapout.document.write
-                ('<img border=0 width='+cw[ctype]+' height='+rh[rtype]
+                ('<img border=0 width='+cw[ctype]+' height='+rh[1]
                 +' src="finish.gif">');
+        if ((mime!='') && (ext!='true')) {
+           parent.mapout.document.write
+           ('<br><img border=0 src="left.gif"></a><a target="preview" href="'+
+           url+'.meta"><img border=0 src="'+iconpath+
+           'meta.gif"><a target="preview" href="'+url+
+           '"><img border=0 src="'+iconpath+mime+'.gif">'+
+           '<img border=0 src="right.gif">');
+        } else {
+           parent.mapout.document.write
+           ('<br><img border=0 src="middle.gif">');
+        }
+        parent.mapout.document.write
+           ('<br><img border=0 src="bottom.gif">');
              } else {
                 parent.mapout.document.write
                 ('<img border=0 width='+cw[ctype]+' height='+rh[rtype]
@@ -1286,8 +1385,15 @@ function infoclear() {
   }
   inf.document.writeln('</tr></table></body></html>');
   inf.document.close();
-  srchclose();
-
+  if (srchflag==1) {
+    srchclose();
+  }
+  if (idxflag==1) {
+    idxclose();
+  }
+  if (parmflag==1) {
+    parmclose();
+  }
   parent.top.focus();
   parent.mapout.focus();
   notclear=1;
@@ -1313,6 +1419,10 @@ function infcheck() {
 // --------------------------------------------------- Prints out resource info
 
 function info(infostr) {
+ var mime='';
+ var ext;
+ var urlparts=new Array;
+ var url='';
  if ((editmode!=1) && (infostr!=lastinfo)) {
   notclear=1;
   infcheck();
@@ -1343,7 +1453,18 @@ function info(infostr) {
   } else {
      if (data1[0]=='r') {
         data2=objcont[data1[1]].split(':');
-        inf.document.write('<b>');
+        url=data2[1];
+        ext=data2[2];
+        urlparts=url.split('.');
+        mime=urlparts[urlparts.length-1];
+        if (mime==undefined) { mime=''; }
+        if (ext=='true') { mime=''; }
+        if (mime!='') {
+           inf.document.write
+           ('<br><a target="preview" align="right" href="'+url+
+           '"><img border=0 src="'+iconpath+mime+'.gif"></a>&nbsp;&nbsp;');
+        }
+       inf.document.write('<b>');
         if (data2[2]=='true') { inf.document.write('External '); }
         if (data2[3]=='start') {
            inf.document.writeln('<b>Start</b>');
@@ -1463,24 +1584,67 @@ function insertcondlink(cid,lnr) {
 
 
 
+// ------------------------------------------------------ Clears indexer window
+
+function idxclear() {
+  idx.document.clear();
+}
+
 // ------------------------------------------------------- Clears search window
 
 function srchclear() {
   srch.document.clear();
 }
 
+// --------------------------------------------------------- Clears parm window
+
+function parmclear() {
+  parm.document.clear();
+}
+
+// ------------------------------------------------------ Closes indexer window
+
+function idxclose() {
+  if (idx && !idx.closed) {
+    idxflag=0;
+    idx.close();
+  }
+}
+
 // ------------------------------------------------------- Closes search window
 
 function srchclose() {
   if (srch && !srch.closed) {
+    srchflag=0;
     srch.close();
   }
 }
 
+// ------------------------------------------------------- Closes search window
+
+function parmclose() {
+  if (parm && !parm.closed) {
+    parmflag=0;
+    parm.close();
+  }
+}
+
+// -------------------------------------------------------- Open indexer window
+
+function idxopen(mode) {
+   var options="scrollbars=1,resizable=1,menubar=0";
+   idxmode=mode;
+   idxflag=1;
+   idx=open("/res?catalogmode="+mode,"idxout",options);
+   idx.focus();
+}
+
 // --------------------------------------------------------- Open search window
 
-function srchopen() {
+function srchopen(mode) {
    var options="scrollbars=1,resizable=1,menubar=0";
+   srchmode=mode;
+   srchflag=1;
    srch=open("/adm/searchcat?catalogmode=interactive","srchout",options);
    srch.focus();
 }
@@ -1493,13 +1657,22 @@ function search() {
 
 // ------------------------------------------------------- Do srch status check
 
-function srchcheck() {
-   if (!srch || srch.closed) {
+function srchcheck(mode) {
+   if (!srch || srch.closed || srchmode!=mode) {
       srchopen();
    }
    srch.focus();
 }
 
+// -------------------------------------------------------- Do idx status check
+
+function idxcheck(mode) {
+   if (!idx || idx.closed || idxmode!=mode) {
+      idxopen(mode);
+   }
+   idx.focus();
+}
+
 // ---------------------------------------------------- Handles "click to edit"
 
 function handler(infostr) {
@@ -1547,7 +1720,7 @@ function handler(infostr) {
      }
      inf.document.writeln(
       'opener.infoclear();opener.editmode=0;opener.draw('
-      +');"><b>Change to above values</b></a>&nbsp;&nbsp;'
+      +');"><b>Save Changes</b></a>&nbsp;&nbsp;'
     +' <a href="javascript:self.document.forms.condinfo.reset()">Reset</a><br>'
       +'<input type=hidden name=h value='+data2[1]+'>');
 
@@ -1590,13 +1763,16 @@ function handler(infostr) {
          '<form name=resinfo><table><tr><td>Title:</td><td colspan=2>'
         +'<input type=text name=t size=30 value="'
         +data2[0]+'"><input type=hidden name=h value='+data2[3]+'></td></tr>');
-    if ((data2[3]!='start') && (data2[3]!='finish')) {
            inf.document.write('<tr><td>URL:</td><td colspan=2>'
         +'<input type=text name=u size=30 value="'+data2[1]+'"></td></tr>'
         +'<tr><td>External:</td><td><input type=checkbox name=e');
         if (data2[2]=='true') { inf.document.write(' checked'); }
-        inf.document.write('></td><td align=right><a href="javascript:opener.srchcheck()">Search</a></td></tr>'
-        +'<tr><td colspan=3>'
+        inf.document.write('></td><td align=right>'
+        +'<a href="javascript:opener.idxcheck(\'interactive\')">Browse</a> '
+        +'<a href="javascript:opener'
+	+'.srchcheck(\'interactive\')">Search</a></td></tr>');
+    if ((data2[3]!='start') && (data2[3]!='finish')) {
+        inf.document.write('<tr><td colspan=3>'
         +'<input type=radio name=y value=normal '+
  'onClick="self.document.forms.resinfo.elements.h.value='+"'normal'"+'"');
      if (data2[3]=='normal') { inf.document.write(' checked'); }
@@ -1609,11 +1785,7 @@ function handler(infostr) {
  'onClick="self.document.forms.resinfo.elements.h.value='+"'optional'"+'"');
      if (data2[3]=='optional') { inf.document.write(' checked'); }
      inf.document.write('> Optional</td></tr>');
-    } else {
-     inf.document.write(
-        '<tr><td><input type=hidden name=e value=false>'
-               +'<input type=hidden name=u value=""></td></tr>');
-    }
+    } 
         inf.document.writeln(
          '<tr><td colspan=3><a href="javascript:opener.editmode=0;'
         +'opener.notclear=0;opener.objcont['+data1[1]
@@ -1622,7 +1794,7 @@ function handler(infostr) {
         +'+self.document.forms.resinfo.elements.e.checked+'+"':'"
         +'+self.document.forms.resinfo.elements.h.value+'+"':res'"
         +';opener.infoclear();opener.editmode=0;opener.draw();">'
-        +'<b>Change to above values</b></a>&nbsp;&nbsp;'
+        +'<b>Save Changes</b></a>&nbsp;&nbsp;'
         +' <a href="javascript:self.document.forms.resinfo.reset()">Reset</a>'
         +'</td></tr></table>');
     if ((data2[3]!='start') && (data2[3]!='finish')) {
@@ -1666,7 +1838,7 @@ function handler(infostr) {
   }
   inf.document.writeln(
      '<br><a href="javascript:opener.editmode=0;opener.notclear=0;'
-     +'opener.infoclear();">Done</a>');
+     +'opener.infoclear();">Cancel</a>');
   inf.document.writeln('</form></td></tr></table></body></html>');
   inf.document.close();
   inf.focus();
@@ -1736,7 +1908,7 @@ function empty(rid,k) {
 
   inf.document.writeln(
    '<br><a href="javascript:opener.editmode=0;opener.notclear=0;'
-  +'opener.infoclear();">Done</a>');
+  +'opener.infoclear();">Cancel</a>');
   inf.document.writeln('</td></tr></table></body></html>');
   inf.document.close();
   inf.focus();
@@ -1777,7 +1949,13 @@ function save() {
  }
  parent.server.document.forms.storage.output.value+=
    '<&>tablemode<:>'+tablemode;
-   
+      
+   for (k=0;k<objparms.length;k++) {
+      if (objparms[k]) {
+         parent.server.document.forms.storage.output.value+=
+          '<&>objparms<:>'+k+'<:>'+objparms[k];
+      }
+   }  
    for (k=0;k<objcont.length;k++) {
       if (objcont[k]) {
          parent.server.document.forms.storage.output.value+=
@@ -1858,6 +2036,10 @@ function tabledraw() {
   var ck;
   var cck;
   var condid;
+  var url='';
+  var mime='';
+  var ext='';
+  var urlparts=new Array;
   var sortstr=sortobjs();
  insrestab(1,-1,-1,'');
  if ((sortstr!='') && (sortstr!=undefined)) {
@@ -1876,8 +2058,21 @@ function tabledraw() {
        }
        data1=objcont[i].split(':');
        ck=rescolor(data1[2],data1[3]);
-        parent.mapout.document.write('<tr><td bgcolor="'+ck
-        +'"><b><a href="javascript:if (parent.code.linkmode!=0) { '
+        parent.mapout.document.write('<tr><td bgcolor="'+ck+'">');
+        url=data1[1];
+        ext=data1[2];
+        urlparts=url.split('.');
+        mime=urlparts[urlparts.length-1];
+        if (mime==undefined) { mime=''; }
+        if ((mime!='') && (ext!='true')) {
+           parent.mapout.document.write
+           ('<a target="preview" align="right" href="'+url+'.meta'+
+           '"><img src="'+iconpath+'meta.gif"></a><p>'+
+           '<a target="preview" align="right"href="'+url+
+           '"><img src="'+iconpath+mime+'.gif"></a><p>');
+        }
+         parent.mapout.document.write(
+         '<b><a href="javascript:if (parent.code.linkmode!=0) { '
         +'parent.code.joinres(parent.code.linkmode,'+i+',0);'
         +'parent.code.linkmode=0;parent.code.editmode=0;'
         +'parent.code.notclear=0;parent.code.infoclear();'
@@ -1885,6 +2080,7 @@ function tabledraw() {
         +'"><form name=r'+i+' method=post>');
       data2=obj[i].split('&');
       parent.mapout.document.write('<table bgcolor="#CCCCCC">');
+
       if (data1[3]=='start') { 
          parent.mapout.document.writeln('<tr><td><b>Start</b></td></tr>');
       }
@@ -1895,14 +2091,15 @@ function tabledraw() {
        '<tr><td>Title:</td><td><input type=text name=t size=50 value="'
             +data1[0]+'"><input type=hidden name=h value='+data1[3]
             +'></td></tr>');
-    if ((data1[3]!='start') && (data1[3]!='finish')) {
       parent.mapout.document.write(
        '<tr><td>URL:</td><td><input type=text name=u size=50 value="'
                                   +data1[1]+'"></td></tr>'
           +'<tr><td>External:</td><td><input type=checkbox name=e');
         if (data1[2]=='true') { parent.mapout.document.write(' checked'); }
-        parent.mapout.document.write('></td></tr>'
-        +'<tr><td colspan=2><input type=radio name=y value=normal '+
+        parent.mapout.document.write('></td></tr>');
+    if ((data1[3]!='start') && (data1[3]!='finish')) {
+        parent.mapout.document.write(
+        '<tr><td colspan=2><input type=radio name=y value=normal '+
  'onClick="parent.mapout.document.forms.r'+i+'.elements.h.value='+
      "'normal'"+'"');
      if (data1[3]=='normal') { parent.mapout.document.write(' checked'); }
@@ -1917,11 +2114,7 @@ function tabledraw() {
      "'optional'"+'"');
      if (data1[3]=='optional') { parent.mapout.document.write(' checked'); }
      parent.mapout.document.write('> Optional</td></tr>');
-    } else {
-     parent.mapout.document.write(
-       '<tr><td><input type=hidden name=u value="">'
-              +'<input type=hidden name=e value=false></td></tr>');
-    }
+    } 
      parent.mapout.document.write(
          '<tr><td colspan=2><a href="javascript:parent.code.objcont['+i        
         +']=parent.code.escape(parent.mapout.document.forms.r'+i
@@ -1931,7 +2124,7 @@ function tabledraw() {
         +'+parent.mapout.document.forms.r'+i+'.elements.e.checked+'+"':'"
         +'+parent.mapout.document.forms.r'+i+'.elements.h.value+'+"':res'"
         +';parent.code.draw();">'
-        +'<b>Change to above values</b></a>&nbsp;&nbsp;'
+        +'<b>Save Changes</b></a>&nbsp;&nbsp;'
         +' <a href="javascript:parent.mapout.document.forms.r'+i
         +'.reset()">Reset</a></td></tr><tr><td colspan=2>');
     if ((data1[3]!='start') && (data1[3]!='finish')) {
@@ -2062,6 +2255,10 @@ function simpletabledraw() {
   var nr;
   var ck;
   var cck;
+  var mime;
+  var ext;
+  var url;
+  var urlparts=new Array;
   var condid;
   var sortstr=sortobjs();
  if ((sortstr!='') && (sortstr!=undefined)) {
@@ -2080,11 +2277,23 @@ function simpletabledraw() {
        }
        data1=objcont[i].split(':');
        ck=rescolor(data1[2],data1[3]);
-        parent.mapout.document.write('<tr><td bgcolor="'+ck
-        +'"><b>'+k+'</b></td><td bgcolor="'+ck
-        +'">');
+        parent.mapout.document.write('<tr><td bgcolor="'+ck+'">');
+        url=data1[1];
+        ext=data1[2];
+        urlparts=url.split('.');
+        mime=urlparts[urlparts.length-1];
+        if (mime==undefined) { mime=''; }
+        if ((mime!='') && (ext!='true')) {
+           parent.mapout.document.write
+           ('<a target="preview" align="right" href="'+url+'.meta'+
+           '"><img src="'+iconpath+'meta.gif"></a><p>'+
+           '<a target="preview" align="right"href="'+url+
+           '"><img src="'+iconpath+mime+'.gif"></a><p>');
+        }        
+      parent.mapout.document.write('<b>'+k+'</b></td><td bgcolor="'+ck+'">');
       data2=obj[i].split('&');
       parent.mapout.document.write('<table>');
+
       if (data1[3]=='start') { 
          parent.mapout.document.writeln('<tr><td><b>Start</b></td></tr>');
       }
@@ -2303,7 +2512,6 @@ function condense() {
 function load() {
    message("Loading");
    schedule('load');
-   checkdef();
 }
 
 function finishload() {
@@ -2323,13 +2531,20 @@ function finishload() {
    data1=inputstr.split('<&>');
    var k;
    for (k=0;k<data1.length;k++) {
-       data2=data1[k].split('<:>');
+       data2=data1[k].split('&colon;').join('&#58;').split('<:>');
        if (data2[0]=='graphdef') { graphdef=data2[1]; }
        if (data2[0]=='maxcol') { maxcol=1*data2[1]; }
        if (data2[0]=='maxrow') { maxrow=1*data2[1]; }
        if (data2[0]=='obj') { obj[data2[1]]=data2[2]; }
        if (data2[0]=='objcont') { objcont[data2[1]]=data2[2]; }
        if (data2[0]=='objlinks') { objlinks[data2[1]]=data2[2]; }
+       if (data2[0]=='objparms') {
+          if (objparms[data2[1]]==undefined) {
+             objparms[data2[1]]=data2[2];
+          } else {
+             objparms[data2[1]]+=':'+data2[2];
+          }
+       }
        if (data2[0]=='rowcont') { rowcont[data2[1]]=data2[2]; }
        if (data2[0]=='row') { row[data2[1]]=1*data2[2]; }
        if (data2[0]=='col') { col[data2[1]]=1*data2[2]; }
@@ -2348,7 +2563,12 @@ function finishload() {
 // -------------------------------------------------------------- Parameter set
 
 function setparms(resid) {
-   alert('Called setparms for '+resid);
+   var options="scrollbars=1,resizable=1,menubar=0";
+   parmflag=1;
+   data1=objcont[resid].split(':');
+   parm=open("/adm/ratparms?url="+data1[1]+"&parms="+objparms[resid]+
+             "&resid="+resid,"parmout",options);
+   parm.focus();
 }
 
 // -------------------------------------------------------------- Undo function
@@ -2413,8 +2633,8 @@ function wheelswitch() {
 // --------------------------------------------- Checks if server frame defined
 
 function checkdef() {
-   if (parent.server.document.forms.storage.output.value!=undefined) {
-      srvloaded();
+   if (parent.flag==1) {
+     srvloaded();
    }
    if ((finishdone==0) && (tim==0)) { setTimeout('checkdef()',100); }
 }
@@ -2443,14 +2663,26 @@ function schedule(action) {
    reqaction=action;
    tim=0;
    finishdone=0;
-   canceltim=setTimeout('tim=1;',20000)
+   canceltim=setTimeout('tim=1;',20000);
+   checkdef();
    wait();
 }
 
+// ----------------------------------------------------- launch indexer browser
+
+function groupsearch() {
+   alert('not yet implemented');
+}
+
+function groupimport() {
+   idxcheck('groupimport');
+}
+
 // -------------------------------------------------------------- Store changes
 
 function storechange() {
    var k;
+   parent.flag=0;
    parent.server.document.forms.storage.submit();
    schedule('save');
 }
@@ -2490,8 +2722,6 @@ function togglemode() {
 function main() {
 
    if (mainrun==0) {
-      srchopen();
-//      srchclose();
       infopen();
       infoclear();
       load();
@@ -2510,6 +2740,9 @@ function leave() {
    if (srch && !srch.closed) {
       srchclose();
    }
+   if (idx && !idx.closed) {
+      srchclose();
+   }
 }
 
 </script>
@@ -2524,11 +2757,8 @@ function leave() {
 <a href="javascript:revert();">Revert</a>
 <a href="javascript:undo();">Undo</a>
 <a href="javascript:redo();">Redo</a>
-<a href="javascript:storechange();">Store</a>
+<a href="javascript:groupsearch();">Group Search</a>
+<a href="javascript:groupimport();">Group Import</a>
+<a href="javascript:storechange();">Save Map</a>
 </body>
 </html>
-
-
-
-
-