--- loncom/html/res/adm/pages/menu.html	2001/06/02 16:07:19	1.31
+++ loncom/html/res/adm/pages/menu.html	2002/05/15 20:44:24	1.52
@@ -2,6 +2,33 @@
 <!--
 The LearningOnline Network with CAPA
 Remote Control
+
+//
+// $Id: menu.html,v 1.52 2002/05/15 20:44:24 matthew Exp $
+//
+// Copyright Michigan State University Board of Trustees
+//
+// This file is part of the LearningOnline Network with CAPA (LON-CAPA).
+//
+// LON-CAPA is free software; you can redistribute it and/or modify
+// it under the terms of the GNU General Public License as published by
+// the Free Software Foundation; either version 2 of the License, or
+// (at your option) any later version.
+//
+// LON-CAPA is distributed in the hope that it will be useful,
+// but WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+// GNU General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with LON-CAPA; if not, write to the Free Software
+// Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+//
+// /home/httpd/html/adm/gpl.txt
+//
+// http://www.lon-capa.org/
+//
+
 6/12/00,6/13,6/14,6/15 Gerd Kortemeyer
 Sept Ben Tyszka
 10/2,10/3,10/4,10/17,10/19,3/1/1 Gerd Kortemeyer
@@ -11,7 +38,17 @@ Jan Guy Albertelli
 3/21 Gerd Kortemeyer
 4/30 Ben Tyszka
 5/2 Scott Harrison
-5/4,5/9,5/28,5/30,6/1,6/2 Gerd Kortemeyer
+5/4,5/9,5/28,5/30,6/1,6/2,6/3,6/8,6/15,6/16 Gerd Kortemeyer
+7/24,8/6 Scott Harrison
+8/24 Gerd Kortemeyer
+YEAR=2002
+March 2002 Matthew Hall
+3/19 Gerd Kortemeyer
+5/6/02 Matthew Hall
+
+// Note: use of style="background-image: url(remotebg.gif)"
+// in body tag causes trouble for NS4.x on multiple platforms. 
+
 -->
 <head>
 <title>LON-CAPA Remote</title>
@@ -20,20 +57,23 @@ Jan Guy Albertelli
 
 <body bgcolor="#BBBBBB" 
       background="remotebg.gif"
-      onLoad="activate();" 
-      onUnload="logout();">
+      onUnload="logout();"
+      >
+<style type="text/css">
+</style>
 <basefont size="1" />
 
 <script type="text/javascript">
 <!--
-statustop='';
-statusbot='';
-active=0;
+var statustop = '';
+var statusbot = '';
+var active = 0;
 
-imgpath='/res/adm/pages/';
+var imgpath='/res/adm/pages/';
 
 var currentURL='';
 var currentStale=1;
+var menucltim;
 
 // not used (yet)
 // var w_Annotator;
@@ -51,24 +91,36 @@ var w_LONcatInfo_flag=-1;
  // -1 means never yet opened/defined
 ///////////////////////////////////////
 
-hr=new Array;
-db=new Array;
-dt=new Array;
+var hr = new Array;
+var db = new Array;
+var dt = new Array;
+
+for (var i=1;i<=3;i++) {
+   for (var j=1;j<=10;j++) {
+      var index = 10*j+i;
+      hr[index]='';
+      db[index]='';
+      dt[index]='';
+   }
+}
 
-clienthost=window.location.host;
-clientwindow=opener;
+var clienthost=window.location.host;
+var clientwindow=opener;
 
 function windowcheck() {
-   if (clientwindow.closed) {
-      clientwindow=window.open("http://"+clienthost+"/"); 
+   if (clientwindow==null || clientwindow.closed) {
+      clientwindow=window.open("http://"+clienthost+"/",'',
+      "height=400,width=440,"+
+      "scrollbars=1,toolbar=1,status=1,resizable=1,location=1,"+
+      "left=190,top=15,screenX=190,screenY=15"); 
    }
    clientwindow.name='loncapaclient';
+   clientwindow.menuwindow=self;
 }
 
 function logout () {
    windowcheck();
-   if (clientwindow.status!='MenuControl:nologout')
-   {   
+
       if (w_Annotator_flag!=-1 && annotator && !annotator.closed) {
           annotator.close();
       }
@@ -82,41 +134,12 @@ function logout () {
           loncatinfo.close();
       }
       clientwindow.window.location.href="http://"+clienthost+"/adm/logout";
-   }
-}
 
-function checkurl () {
-   if (currentURL) {
-      if (currentStale) {
-         clearbut(2,1);
-         clearbut(2,3);
-         clearbut(8,1);
-         clearbut(8,2);
-         clearbut(8,3);
-         switchbutton(3,1,'reload.gif','return','location','go(currentURL)');
-      } else {
-         clearbut(3,1);
-         switchbutton(8,1,'eval.gif','evaluate','this','gopost("/adm/evaluate",currentURL)');
-         switchbutton(8,2,'fdbk.gif','feedback','on this','gopost("/adm/feedback",currentURL)');
-         switchbutton(8,3,'prt.gif','prepare','printout','gopost("/adm/printout",currentURL)');
-         switchbutton(2,1,'back.gif','backward','','gopost("/adm/flip","back:"+currentURL)');
-         switchbutton(2,3,'forw.gif','forward','','gopost("/adm/flip","forward:"+currentURL)');
-     }
-   } else {
-      clearbut(2,1);
-      clearbut(2,3);
-      clearbut(3,1);
-      clearbut(8,1);
-      clearbut(8,2);
-      clearbut(8,3);
-   }
-   setTimeout('checkurl();',500);   
 }
 
 function activate () {
    opener.menuloaded=1;
    setTimeout('active=1;',2000);
-   setTimeout('checkurl();',1500);
 }
 
 function deactivate () {
@@ -126,8 +149,10 @@ function deactivate () {
 function display(utext,ltext) {
   var i; var ch;
   this.window.focus();
-  if (utext==undefined) { utext=''; }
-  if (ltext==undefined) { ltext=''; }
+  if (utext == null) { utext = '';}
+  if (ltext == null) { ltext = '';}
+  if (typeof(utext)!="string") { utext=''; }
+  if (typeof(ltext)!="string") { ltext=''; }
   if ((utext=='') && (ltext=='')) {
      utext=statustop;
      ltext=statusbot;
@@ -159,15 +184,15 @@ function defdis() {
 
 function switchbutton(row,col,imgsrc,texttop,textbot,action) {
    var idx=10*row+col;
-   this.document['b'+idx].src=imgpath+imgsrc;
+   this.document['b'+idx].src="http://"+clienthost+imgpath+imgsrc;
    hr[idx]=action;
    dt[idx]=texttop;
    db[idx]=textbot;
-}
+} 
 
 function clearbut(row,col) {
    var idx=10*row+col;
-   this.document['b'+idx].src=imgpath+'empty.gif';
+   this.document['b'+idx].src="http://"+clienthost+imgpath+'empty.gif';
    hr[idx]='javascript:defdis();';
    dt[idx]='';
    db[idx]='';
@@ -181,10 +206,43 @@ function setstatus(tp,bt) {
    endsend();
 }
 
+function is_editable_resource (url) {
+   var Chunks = url.split('.');
+   var tmp = Chunks[Chunks.length-1];
+   if ((Chunks.length > 1) && (Math.floor(tmp) == tmp)) {
+       return true;
+   } 
+   return false;
+}
+
+function cstrgo(currenturl,defaulturl) {
+   windowcheck();
+   var url;
+   if ((currenturl == null) || 
+       (currenturl == '')   || 
+       (! is_editable_resource(currenturl))) {
+      url = defaulturl;
+   } else {
+      url = currenturl;
+      var res_pattern     = /^\/res\/[A-z0-p]+\//;
+      if (res_pattern.test(url)) {
+         // map /res/103/turtle to /priv/turtle
+         url = url.replace(/^\/res\/[A-z0-9]+\//,'/priv/');
+      } else {
+         url = defaulturl;
+      }
+   }
+   this.document['led'].src="ledsend.gif";
+   if (url != '') {
+       clientwindow.window.location.href="http://"+clienthost+url;
+   }
+}
+
 function go(url) {
    windowcheck();
    this.document['led'].src="ledsend.gif";
    if (url!='') {
+       currentURL = null;
        clientwindow.window.location.href="http://"+clienthost+url;
    }
 }
@@ -195,6 +253,20 @@ function gopost(url,postdata) {
    if (url!='') {
       this.document.server.action="http://"+clienthost+url;
       this.document.server.postdata.value=postdata;
+      this.document.server.command.value='';
+      this.document.server.url.value='';
+      this.document.server.submit();
+   }
+}
+
+function gocmd(url,cmd) {
+   windowcheck();
+   this.document['led'].src="ledsend.gif";
+   if (url!='') {
+      this.document.server.action="http://"+clienthost+url;
+      this.document.server.postdata.value='';
+      this.document.server.command.value=cmd;
+      this.document.server.url.value=currentURL;
       this.document.server.submit();
    }
 }
@@ -206,15 +278,20 @@ function annotate() {
    "<html><body onload='Javascript:document.goannotate.submit();'>"
   +"<form name='goannotate' target='Annotator' method='post' "
   +"action='/adm/annotations'>"
-  +"<input type='hidden' name='urlnew' value='"+clientwindow.location.href+"'>"
+  +"<input type='hidden' name='urlnew' value='"+currentURL+"'>"
   +"</form></body></html>");
    annotator.document.close();
 }
 
 function set_bookmark() {
    go('');
-   clienttitle="Enter Title";
-   clienthref="Enter Address";
+   if (currentStale) {
+      clienttitle="Enter Title";
+      clienthref=currentURL;
+   } else {
+      clienttitle=clientwindow.document.title;
+      clienthref=clientwindow.location.pathname;
+   }
    w_bmquery_flag=1;
    bmquery=window.open('','bmquery','width=365,height=165,scrollbars=0');
    bmquery.document.write(
@@ -334,7 +411,14 @@ function catalog_info() {
 
 <tr>
 <td><a href="javascript:eval(hr[91]);" onMouseOver="display(dt[91],db[91]);"><img border="0" name="b91" src="empty.gif"></img></a></td>
-<td colspan="2"><a href="javascript:eval(hr[92]);" onMouseOver="display(dt[92],db[92]);"><img border="0" name="b92" src="dempty.gif"></img></a></td>
+<td><a href="javascript:eval(hr[92]);" onMouseOver="display(dt[92],db[92]);"><img border="0" name="b92" src="empty.gif"></img></a></td>
+<td><a href="javascript:eval(hr[93]);" onMouseOver="display(dt[93],db[93]);"><img border="0" name="b93" src="empty.gif"></img></a></td>
+</tr>
+
+<tr>
+<td><a href="javascript:eval(hr[101]);" onMouseOver="display(dt[101],db[101]);"><img border="0" name="b101" src="empty.gif"></img></a></td>
+<td><a href="javascript:eval(hr[102]);" onMouseOver="display(dt[102],db[102]);"><img border="0" name="b102" src="empty.gif"></img></a></td>
+<td><a href="javascript:eval(hr[103]);" onMouseOver="display(dt[103],db[103]);"><img border="0" name="b103" src="empty.gif"></img></a></td>
 </tr>
 
 </table>
@@ -345,8 +429,20 @@ function catalog_info() {
 ><img border="0" src="spacer.gif"></img></a><br />
 
 <form name='server' action='/adm/logout' method='post' target='loncapaclient'>
-<input type='hidden' name='postdata' value='none'></input>
-</form>
+<input type='hidden' name='postdata' value='none' />
+<input type="hidden" name="command" value="none" />
+<input type="hidden" name="url" value="none" />
+ </form>
 </center>
+<script>
+activate();
+</script>
 </body>
 </html>
+
+
+
+
+
+
+
