%%# @(#)[HyperWave] [WWW-G] namesuggest.html 2.58 [attributes template file] [Martin Polz 190897] %%
%%# --------------------------------------------------%%
%%#   NAME SUGGEST                                    %%
%%# --------------------------------------------------%%

%%macro findobjectwithname_script%%
function findObjectwithName(theForm,nol)
{
  retidx=-1;
  for (var idx=0;idx<theForm.elements.length;idx++)
  {
    if (theForm.elements[idx].name==nol)
    {
      retidx=idx;
      break;
    }
  }
  return retidx;
}
%%endmacro%%

%%macro name_suggest_code%%
<SCRIPT>
<!--
var file = "";
var ext = "";
var ftype = "";
var title_suggested = "";
var name_suggested = "";
var something_changed = false;
var old_file = "";

%%getformscript%%

function file_ext() {
   var theForm=getForm("insertform");
   if (typeof theForm =="undefined")
     return;
   var path = theForm.%%insert.upload.form%%.value;
   var slashpos = Math.max(path.lastIndexOf("/"), path.lastIndexOf("\\"));
   path  = path.substring(slashpos+1, path.length);
   var filename = "";
   for (var i=0; i<path.length; i++)
      if (path.charAt(i)==' ') filename+='_'; else filename+=path.charAt(i);
   var dotpos = filename.lastIndexOf(".");
   if (dotpos == -1) {
      file = filename;
      ext = "";
   } else {
      file  = filename.substring(0,dotpos);
      ext   = filename.substring(dotpos, filename.length);
   }
   ftype = ext.toLowerCase().substring(1,4);
}

function suggestTitle() {
   var new_tit;
   var theForm=getForm("insertform");
   if (typeof theForm =="undefined")
     return;
   if (title_suggested == theForm.Title.value) {
      new_tit = theForm.Title.value = (ftype == "htm") ? "" : file;
      if (title_suggested != new_tit) { 
         title_suggested = new_tit;
         something_changed=true;
      }
   }
}

function suggestName() {
   var theForm=getForm("insertform");
   if (typeof theForm =="undefined")
     return;
   if (name_suggested == theForm.Name.value) {
      var pcoll = theForm.%%insert.form.collection%%.value;
      if (pcoll.charAt(0)=="0")
        pcoll="GOID"+pcoll;
      if (pcoll.charAt(pcoll.length-1) != "/")
         pcoll += "/";
      theForm.Name.value = pcoll + file + ext;
      if (name_suggested != theForm.Name.value) {
         name_suggested = theForm.Name.value;
         something_changed = true;
      }
   }
}

function validateFile() { // called by onSubmit of form object
   var theForm=getForm("insertform");
   if (typeof theForm =="undefined")
     return true;
   var filename = theForm.%%insert.upload.form%%.value;
   if (filename == "") {
      alert("%%ge:Bitte zuerst einen Dateinamen angeben!,:Please select a file first!%%");
      return false;
   }
   file_ext();
   if (filename!=old_file) {
      title_suggested = ""; 
      name_suggested = "%%suggest_name_pref%%/";
      old_file = filename;
   }
   something_changed=false;
   suggestTitle();
   suggestName();
   if (ftype=="htm" && theForm.Title.value.length==0) title_text =
      "%%ge:[Wird dem HTML TITLE tag entnommen],:[will be taken from HTML TITLE tag]%%";
   else title_text = theForm.Title.value;
   var confirm_value=true;
   if (something_changed) {
     confirm_value = confirm (
       "%%ge:Sie haben keinen Namen oder Titel angegeben,:You did not enter a document name or title%%, "+
       "%%ge:daher folgender Vorschlag,:so I have chosen the following%%:\n \n"+
       "Title:    " + title_text +"\n"+
       "Name:  "    + theForm.Name.value +"\n"+
       "URL:    "   + "%%gate.protocol%%://%%gate.hostname_with_port%%/"+theForm.Name.value+"\n"+
       " \n%%ge:Diese Einstellung übernehmen,:Is this OK for you%%?"
     );
   }
%%if action == "insertdocument.action" || action=="dialog.uploadfile.action"%%
   var path = theForm.Name.value;
   if (path.charAt(path.length-1) == "/")
   {
     alert("%%ge:Kein gültiger Name eingegeben,:No valid Name entered%%!");
     theForm.Name.focus();
     return false;
   }
   var slashpos = path.lastIndexOf("/");
   if (slashpos == -1)
     path = "";
   else
     path = path.substring(0, slashpos+1);
   theForm.%%insert.upload.form.base%%.value = "%%gate.protocol%%://%%gate.hostname_with_port%%/"+path;
%%endif%%
  return confirm_value;
}

// -->
</SCRIPT>
%%endmacro%%