--- loncom/publisher/publisher.html	2000/12/23 15:53:26	1.3
+++ loncom/publisher/publisher.html	2004/12/15 19:02:45	1.39
@@ -1,21 +1,191 @@
 <html>
 <head>
 <title>LON-CAPA Publishing Frame</title>
-<script>
+<script type="text/javascript">
+//<!--
+function frameloc() {
+    if (parent.LONCAPAToBePublished.location.pathname.indexOf("/~")!=-1) {
+       parent.lastknownpriv=parent.LONCAPAToBePublished.location.pathname;
+    }
+// alert ('We are at '+parent.lastknownpriv);
+    return unescape(parent.lastknownpriv);
+}
 
 function getfilename() {
-   document.publisher.filename.value=parent.LONCAPAToBePublished.location.href;
+   document.publisher.filename.value=frameloc();
+   if ((document.publisher.filename.value.charAt(
+        document.publisher.filename.value.length-1)!='/') &&
+       (document.publisher.filename.value.indexOf('/adm/pubdir')==-1)) {
+        document.publisher.submit();
+   } else {
+      alert('MT{Cannot publish directory}');
+   }
+}
+
+function getdfilename() {
+  document.dpublisher.filename.value=frameloc();
+  if (document.dpublisher.filename.value.indexOf('/adm/pubdir')==-1) {
+      document.dpublisher.submit();
+  }
+}
+
+function getufilename() {
+  document.upublisher.filename.value=frameloc();
+  if (document.upublisher.filename.value.indexOf('/adm/pubdir')!=-1) {
+      document.upublisher.filename.value=document.dpublisher.filename.value;
+  }
+  document.upublisher.submit();
+}
+
+function getrfilename() {
+  document.rpublisher.filename.value=frameloc();
+   if ((document.rpublisher.filename.value.charAt(
+        document.rpublisher.filename.value.length-1)!='/') &&
+       (document.rpublisher.filename.value.indexOf('/adm/pubdir')==-1)) {
+        document.rpublisher.submit();
+   } else {
+      alert('MT{Cannot retrieve directory}');
+   }
+}
+
+function getactionfilename() {
+  document.fileaction.filename.value=frameloc();
+  var test=document.fileaction.action.selectedIndex;
+  if (test == 8) { // trying to create a directory
+      if (document.fileaction.filename.value.indexOf('/adm/pubdir')!=-1) {
+          document.fileaction.filename.value=document.dpublisher.filename.value;
+      }
+      if ((document.fileaction.filename.value.charAt(
+           document.fileaction.filename.value.length-1)!='/') &&
+           (document.fileaction.filename.value.indexOf('/adm/pubdir')==-1)) {
+          alert('MT{Must create new subdirectory inside a directory}');
+          return;
+      }
+   }
+   document.fileaction.submit();
 }
 
+function getdelfilename() {
+  document.del.filename.value=frameloc();
+  document.del.submit();
+}
+
+function getcurseed() {
+  if (parent.LONCAPAToBePublished.document.lonhomework
+       &&
+      parent.LONCAPAToBePublished.document.lonhomework.rndseed
+       &&
+      parent.LONCAPAToBePublished.document.lonhomework.rndseed.value) {
+    return parent.LONCAPAToBePublished.document.lonhomework.rndseed.value;
+  }
+  return 0;
+}
+
+function getproblemtype() {
+  if (parent.LONCAPAToBePublished.document.lonhomework
+       &&
+      parent.LONCAPAToBePublished.document.lonhomework.problemtype) {
+    if (parent.LONCAPAToBePublished.document.lonhomework.problemtype.value) {
+      return parent.LONCAPAToBePublished.document.lonhomework.problemtype.value;
+    }
+    if (parent.LONCAPAToBePublished.document.lonhomework.problemtype.options) {
+       var optionelement;
+       var valueIndex=0;
+       for (var optionIndex=0;
+            optionIndex < parent.LONCAPAToBePublished.document.lonhomework.problemtype.options.length;
+	    optionIndex++)
+       {
+           optionElement=parent.LONCAPAToBePublished.document.lonhomework.problemtype.options[optionIndex];
+	   if (optionElement.selected) {
+	      return optionElement.value;
+           }	  
+       } 	  
+    }
+  }
+  return 0;
+}
+
+function getpostdata() {
+  document.printout.postdata.value=frameloc();
+  document.printout.curseed.value=getcurseed();
+  document.printout.problemtype.value=getproblemtype();
+  document.printout.submit();
+}
+//-->
 </script>
-</head>
-<body bgcolor="#FFFFFF">
-<form name="publisher" action="/adm/publish" target="_parent" method="post"
- onSubmit="getfilename();">
-<input type="hidden" name="filename" value="">
-<input type="submit" value="Publish this Resource">
-<input type="submit" name="pubdir" value="Publish this Directory">
-&nbsp;&nbsp;<b>LON-CAPA Construction Space</b>
-</form>
-</body>
-</html>
\ No newline at end of file
+    </head>
+    <body bgcolor="#ccffdd" text='#002200' link='#003333' vlink='#006666'>
+	<table border="0" align="center"><tr><th bgcolor="#004400" height="20">
+	      <table border="0" cellspacing="2" cellpadding="2"><tr valign="middle">
+		  <td bgcolor="#ccddaa" align="center">
+		    <form name="publisher" action="/adm/publish" target="_parent" method="post">
+		      <input type="hidden" name="filename" value="" />
+	              <input type="button" value="MT{Publish this Resource}" onclick="getfilename();" />
+		    </form>
+		  </td>
+		  <td bgcolor="#ccddaa" align="center">
+		    <form name="dpublisher" action="/adm/pubdir" target="LONCAPAToBePublished" method="post">
+		      <input type="hidden" name="filename" value="" />
+		      <input type="button" value="MT{List Directory}" onclick="getdfilename();" />
+		    </form>
+		  </td>
+		  <td bgcolor="#ccddaa" valign="top" align="center">
+		    <form name="upublisher" action="/adm/upload" target="_parent"
+			method="post" enctype="multipart/form-data">
+		      <input type="hidden" name="filename" value="" />
+		      <input type="file" name="upfile" size="20" />
+		      <input type="button" value="MT{Upload file}"  onclick="getufilename();" />
+		    </form>
+		  </td>
+		  <td rowspan="2" bgcolor="#ccddaa" align="center">
+		    <form name="printout" target="_parent" action="/adm/printout" method="post" onsubmit="getpostdata();">
+		      <input type="hidden" name="postdata" value="" />
+		      <input type="hidden" name="curseed" value="" />
+		      <input type="hidden" name="problemtype" value="" />
+		      <input type="button" value="MT{Print}" onclick="getpostdata();" />
+		    </form>
+		  </td>
+
+		</tr>
+		<tr valign="middle">
+		  <td bgcolor="#ccddaa" align="center">
+		    <form name="rpublisher" action="/adm/retrieve" target="_parent" method="post">
+		      <input type="hidden" name="filename" value="" />
+		      <input type="button" value="MT{Retrieve Old Version}" onclick="getrfilename();" />
+		    </form>
+		  </td>
+		  <td bgcolor="#ccddaa">
+		    <form name="del" action="/adm/cfile" target="_parent" method="post">
+		      <input type="hidden" name="filename" value="" />
+		      <input type="hidden" name="action" value="delete" />
+	              <input type="button" value="MT{Delete}" onclick="getdelfilename();" />
+		    </form>
+		  </td>
+		  <td bgcolor="#ccddaa" align="center">
+		    <form name="fileaction" action="/adm/cfile" target="_parent" method="post" onsubmit="getactionfilename();">
+		      <nobr>
+			<input type="hidden" name="filename" value="" />
+			  <select name="action">
+			    <option>MT{Select Action}</option>
+			    <option value="newfile">MT{New file}:</option>
+			    <option value="newhtmlfile">MT{New HTML file}:</option>
+			    <option value="newproblemfile">MT{New problem}:</option>
+                            <option value="newpagefile">MT{New assembled page}:</option>
+                            <option value="newsequencefile">MT{New assembled sequence}:</option>
+                            <option value="newrightsfile">MT{New custom rights file}:</option>
+                            <option value="newstyfile">MT{New style file}:</option>
+			    <option value="newdir">MT{New subdirectory}:</option>
+			    <option value="rename">MT{Rename current file to}:</option>
+			    <option value="move">MT{Move current file to}:</option>
+			    <option value="copy">MT{Copy current file to}:</option>
+			  </select>&nbsp;<input type="text" name="newfilename" value="MT{Type Name Here}" onfocus="if (this.value == 'MT{Type Name Here}') this.value=''" />&nbsp;<input type="button" value="MT{Go}" onclick="getactionfilename();" />
+		      </nobr>
+		    </form>
+		   </td>
+		</tr>
+	      </table>
+	    </th>
+	  </tr>
+	</table>
+    </body>
+  </html>
