git.sur5r.net Git - bacula/bacula/blob - gui/bacula-web/js/mini/overlib_exclusive_mini.js

   1 //\/////
   2 //\  overLIB Exclusive Plugin
   3 //\  This file requires overLIB 4.00 or later.
   4 //\
   5 //\  overLIB 4.00 - You may not remove or change this notice.
   6 //\  Copyright Erik Bosrup 1998-2004. All rights reserved.
   7 //\  Contributors are listed on the homepage.
   8 //\  See http://www.bosrup.com/web/overlib/ for details.
   9 //\/////
  10 if (typeof olInfo=='undefined'||olInfo.simpleversion<400) alert('overLIB 4.00 or later is required for the Debug Plugin.');registerCommands('exclusive,exclusivestatus,exclusiveoverride');var olOverrideIsSet;
  11 if (typeof ol_exclusive=='undefined') var ol_exclusive=0;if (typeof ol_exclusivestatus=='undefined') var ol_exclusivestatus='Please close open popup first.';
  12 var o3_exclusive=0;var o3_exclusivestatus='';
  13 function setExclusiveVariables() {o3_exclusive=ol_exclusive;o3_exclusivestatus=ol_exclusivestatus;}
  14 function parseExclusiveExtras(pf,i,ar) {var k=i,v;
  15 olOverrideIsSet=false;
  16 if (k<ar.length) {if (ar[k]==EXCLUSIVEOVERRIDE) { if(pf!='ol_') olOverrideIsSet=true; return k; }
  17 if (ar[k]==EXCLUSIVE) { eval(pf+'exclusive=('+pf+'exclusive==0)?1:0'); return k; }
  18 if (ar[k]==EXCLUSIVESTATUS) { eval(pf+"exclusivestatus='"+escSglQuote(ar[++k])+"'"); return k; }
  19 }
  20 return-1;}
  21 function isExclusive(args) {var rtnVal=false;
  22 if(args!=null) rtnVal=hasCommand(args, EXCLUSIVEOVERRIDE);
  23 if(rtnVal) return false;else {self.status=(o3_exclusive)?o3_exclusivestatus:'';return o3_exclusive;}
  24 }
  25 function hasCommand(args, COMMAND) {var rtnFlag=false;
  26 for (var i=0; i<args.length; i++) {if (typeof args[i]=='number'&& args[i]==COMMAND) {rtnFlag=true;break;}
  27 }
  28 return rtnFlag;}
  29 function clearExclusive() {o3_exclusive=0;}
  30 function setExclusive() {o3_exclusive=(o3_showingsticky&& o3_exclusive);}
  31 function chkForExclusive() {if (olOverrideIsSet) o3_exclusive=0;
  32 return true;}
  33 registerRunTimeFunction(setExclusiveVariables);registerCmdLineFunction(parseExclusiveExtras);registerPostParseFunction(chkForExclusive);registerHook("createPopup",setExclusive,FBEFORE);registerHook("hideObject",clearExclusive,FAFTER);