20. Araxis Merge File Comparison Report

Produced by Araxis Merge on Mon May 18 06:28:33 2009 UTC. See www.araxis.com for information about Merge. This report uses XHTML and CSS2, and is best viewed with a reasonably standards compliant browser such as the latest version of Firefox or Internet Explorer. For optimum results when printing this report, use landscape orientation and enable printing of background images and colours in your browser.

20.1 Files compared

# Location File Last Modified
1 D:\Dolphin-v.6.1.5\ray\modules\global\inc content.inc.php Wed Apr 29 09:36:15 2009 UTC
2 D:\Dolphin-v.6.1.6\ray\modules\global\inc content.inc.php Fri May 15 08:22:45 2009 UTC

20.2 Comparison summary

Description Between
Files 1 and 2
Text Blocks Lines
Unchanged 3 720
Changed 1 5
Inserted 1 1
Removed 0 0

20.3 Comparison options

Whitespace All differences in whitespace within lines are ignored
Character case Differences in character case are ignored
Line endings Differences in line endings (CR and LF characters) are significant
CR/LF characters Not shown in the comparison detail

20.4 Active regular expressions

No regular expressions were active.

20.5 Comparison detail

1   <?   1   <?
2   /********* ********** ********** ********** ********** ********** ********** ******   2   /********* ********** ********** ********** ********** ********** ********** ******
3   *   3   *
4   * IMPORTAN T: This is  a commerc ial produc t made by  BoonEx Ltd . and cann ot be modi fied for o ther than  personal u sage.   4   * IMPORTAN T: This is  a commerc ial produc t made by  BoonEx Ltd . and cann ot be modi fied for o ther than  personal u sage.
5   * This pro duct canno t be redis tributed f or free or  a fee wit hout writt en permiss ion from B oonEx Ltd.   5   * This pro duct canno t be redis tributed f or free or  a fee wit hout writt en permiss ion from B oonEx Ltd.
6   * This not ice may no t be remov ed from th e source c ode.   6   * This not ice may no t be remov ed from th e source c ode.
7   *   7   *
8   ********** ********** ********** ********** ********** ********** ********** *****/   8   ********** ********** ********** ********** ********** ********** ********** *****/
9     9  
10   require_on ce('header .inc.php') ;   10   require_on ce('header .inc.php') ;
11   require_on ce($sIncPa th . "xml. inc.php");   11   require_on ce($sIncPa th . "xml. inc.php");
12   require_on ce($sIncPa th . "cons tants.inc. php");   12   require_on ce($sIncPa th . "cons tants.inc. php");
    13   require_on ce($sIncPa th . "func tions.inc. php");
13   require_on ce($sIncPa th . "apiF unctions.i nc.php");   14   require_on ce($sIncPa th . "apiF unctions.i nc.php");
14     15  
15   function r ayGetSetti ngValue($s Widget, $s SettingKey )   16   function r ayGetSetti ngValue($s Widget, $s SettingKey )
16   {   17   {
17           re turn getSe ttingValue ($sWidget,  $sSetting Key);   18           re turn getSe ttingValue ($sWidget,  $sSetting Key);
18   }   19   }
19     20  
20   function i sBoonexWid getsRegist ered()   21   function i sBoonexWid getsRegist ered()
21   {   22   {
22           gl obal $sGlo balDir;   23           gl obal $sGlo balDir;
23           re turn getSe ttingValue ($sGlobalD ir, "regis tered") ==  TRUE_VAL;   24           re turn getSe ttingValue ($sGlobalD ir, "regis tered") ==  TRUE_VAL;
24   }   25   }
25     26  
26   function s etRayBoone xLicense($ sLicense)   27   function s etRayBoone xLicense($ sLicense)
27   {   28   {
28           if (getSettin gValue(GLO BAL_MODULE , "license ", "main")  == $sLice nse) retur n;   29           if (getSettin gValue(GLO BAL_MODULE , "license ", "main")  == $sLice nse) retur n;
29              30           
30           gl obal $sMod ulesPath;   31           gl obal $sMod ulesPath;
31           $r DirHandler  = opendir ($sModules Path);   32           $r DirHandler  = opendir ($sModules Path);
32           wh ile(($sInn er = readd ir($rDirHa ndler)) != = false)   33           wh ile(($sInn er = readd ir($rDirHa ndler)) != = false)
33                    if(i s_dir($sMo dulesPath  . $sInner)  && substr ($sInner,  0, 1) != ' .')   34                    if(i s_dir($sMo dulesPath  . $sInner)  && substr ($sInner,  0, 1) != ' .')
34                    {   35                    {
35                if(isset ($aInfo))  unset($aIn fo);   36                if(isset ($aInfo))  unset($aIn fo);
36                             $sCons tantsFile  = $sModule sPath . $s Inner . "/ inc/consta nts.inc.ph p";   37                             $sCons tantsFile  = $sModule sPath . $s Inner . "/ inc/consta nts.inc.ph p";
37                             if(!fi le_exists( $sConstant sFile)) co ntinue;   38                             if(!fi le_exists( $sConstant sFile)) co ntinue;
38                             requir e($sConsta ntsFile);   39                             requir e($sConsta ntsFile);
39                             if(str tolower($a Info['auth or']) == ' boonex')   40                             if(str tolower($a Info['auth or']) == ' boonex')
40                                      setSetti ngValue($s Inner, "li cense", $s License, " main");   41                                      setSetti ngValue($s Inner, "li cense", $s License, " main");
41                    }   42                    }
42   }   43   }
43     44  
44   function g etRayInteg rationJS()   45   function g etRayInteg rationJS()
45   {   46   {
46           gl obal $sHom eUrl;   47           gl obal $sHom eUrl;
47           gl obal $sGlo balPath;   48           gl obal $sGlo balPath;
48           gl obal $sGlo balUrl;   49           gl obal $sGlo balUrl;
49           gl obal $sDat aPath;   50           gl obal $sDat aPath;
50              51           
51           $s Integratio nData = $s DataPath .  "integrat ion.dat";   52           $s Integratio nData = $s DataPath .  "integrat ion.dat";
52           $s Return = ' <script ty pe="text/j avascript"  language= "javascrip t">var sRa yUrl = "'  . $sHomeUr l . '";var  aRayApps  = new Arra y();';   53           $s Return = ' <script ty pe="text/j avascript"  language= "javascrip t">var sRa yUrl = "'  . $sHomeUr l . '";var  aRayApps  = new Arra y();';
53           if (file_exis ts($sInteg rationData ) && files ize($sInte grationDat a) > 0)   54           if (file_exis ts($sInteg rationData ) && files ize($sInte grationDat a) > 0)
54                    $sRe turn .= @f ile_get_co ntents($sI ntegration Data);   55                    $sRe turn .= @f ile_get_co ntents($sI ntegration Data);
55           $s Return .=  '</script> <script sr c="' . $sG lobalUrl .  'js/integ ration.js"  type="tex t/javascri pt" langua ge="javasc ript"></sc ript><scri pt src="'  . $sGlobal Url . 'js/ swfobject. js" type=" text/javas cript" lan guage="jav ascript">< /script>';   56           $s Return .=  '</script> <script sr c="' . $sG lobalUrl .  'js/integ ration.js"  type="tex t/javascri pt" langua ge="javasc ript"></sc ript><scri pt src="'  . $sGlobal Url . 'js/ swfobject. js" type=" text/javas cript" lan guage="jav ascript">< /script>';
56           re turn $sRet urn;   57           re turn $sRet urn;
57   }   58   }
58     59  
59   /**   60   /**
60    * Checks  if given w idget exis ts   61    * Checks  if given w idget exis ts
61    * @param  sWidget -  widget nam e   62    * @param  sWidget -  widget nam e
62    * @return  bExists -  true/fals e   63    * @return  bExists -  true/fals e
63    */   64    */
64   function w idgetExist s($sWidget )   65   function w idgetExist s($sWidget )
65   {   66   {
66           gl obal $sMod ulesPath;   67           gl obal $sMod ulesPath;
67              68           
68           $s FilePath =  $sModules Path . $sW idget . "/ xml/main.x ml";   69           $s FilePath =  $sModules Path . $sW idget . "/ xml/main.x ml";
69           $b Exists = f ile_exists ($sFilePat h) && file size($sFil ePath) > 0 ;   70           $b Exists = f ile_exists ($sFilePat h) && file size($sFil ePath) > 0 ;
70           re turn $bExi sts;   71           re turn $bExi sts;
71   }   72   }
72     73  
73   function g etFlashCon fig($sModu le, $sApp,  $aParamVa lues, $bEm bedCode)   74   function g etFlashCon fig($sModu le, $sApp,  $aParamVa lues, $bEm bedCode)
74   {   75   {
75           gl obal $sMod ulesPath;   76           gl obal $sMod ulesPath;
76           gl obal $sMod ulesUrl;   77           gl obal $sMod ulesUrl;
77           gl obal $sRay XmlUrl;   78           gl obal $sRay XmlUrl;
78              79           
79           if (isset($aM odules)) u nset($aMod ules);   80           if (isset($aM odules)) u nset($aMod ules);
80           if ($sModule  != GLOBAL_ MODULE) re quire($sMo dulesPath  . $sModule  . "/inc/h eader.inc. php");   81           if ($sModule  != GLOBAL_ MODULE) re quire($sMo dulesPath  . $sModule  . "/inc/h eader.inc. php");
81           re quire($sMo dulesPath  . $sModule  . "/inc/c onstants.i nc.php");   82           re quire($sMo dulesPath  . $sModule  . "/inc/c onstants.i nc.php");
82     83  
83           $s Holder = $ aInfo['mod e'] == "as 3" ? "hold er_as3.swf " : "holde r.swf";   84            if(isset($ aModules[$ sApp]['hol der']))   $sHolder   =   $aModules[ $sApp]['ho lder']
;
84            if(isset($ aModules[$ sApp]['hol der']))   $sHolder   =   $aModules[ $sApp]['ho lder']   .   ".swf" ;   85            else   $sHolder   =   $sModulesU rl   .   GLOBAL_MOD ULE   .   "/app/"   .   ( $ aInfo['mod e']   ==   "a s 3"   ?   "holder_as 3.swf"   :   " holder .swf") ;
85           
$sHolder   =   $sModulesU rl   .   GLOBAL_MOD ULE   .   "/app/"   .  
$
s
Holder
;
   
86              86           
87           $i Width = ge tSettingVa lue($sModu le, $sApp  . "_width" );   87           $i Width = ge tSettingVa lue($sModu le, $sApp  . "_width" );
88           if (empty($iW idth)) $iW idth = $bE mbedCode ?  $aModules [$sApp]['m inSize'][' width'] :  $aModules[ $sApp]['la yout']['wi dth'];   88           if (empty($iW idth)) $iW idth = $bE mbedCode ?  $aModules [$sApp]['m inSize'][' width'] :  $aModules[ $sApp]['la yout']['wi dth'];
89           $i Height = g etSettingV alue($sMod ule, $sApp  . "_heigh t");   89           $i Height = g etSettingV alue($sMod ule, $sApp  . "_heigh t");
90           if (empty($iH eight)) $i Height = $ bEmbedCode  ? $aModul es[$sApp][ 'minSize'] ['height']  : $aModul es[$sApp][ 'layout'][ 'height'];   90           if (empty($iH eight)) $i Height = $ bEmbedCode  ? $aModul es[$sApp][ 'minSize'] ['height']  : $aModul es[$sApp][ 'layout'][ 'height'];
91                       91                    
92           $a FlashVars  = array(   92           $a FlashVars  = array(
93                    'url ' => $sRay XmlUrl,   93                    'url ' => $sRay XmlUrl,
94                    'mod ule' => $s Module,   94                    'mod ule' => $s Module,
95                    'app ' => $sApp   95                    'app ' => $sApp
96           );   96           );
97           fo reach($aMo dules[$sAp p]['parame ters'] as  $sParamete r)   97           fo reach($aMo dules[$sAp p]['parame ters'] as  $sParamete r)
98           {   98           {
99                    $aFl ashVars[$s Parameter]  = isset($ aParamValu es[$sParam eter]) ? $ aParamValu es[$sParam eter] : $_ REQUEST[$s Parameter] ;   99                    $aFl ashVars[$s Parameter]  = isset($ aParamValu es[$sParam eter]) ? $ aParamValu es[$sParam eter] : $_ REQUEST[$s Parameter] ;
100           }   100           }
101              101           
102           $a Params = a rray(   102           $a Params = a rray(
103                    'all owScriptAc cess' => " always",   103                    'all owScriptAc cess' => " always",
104                    'all owFullScre en' => "tr ue",   104                    'all owFullScre en' => "tr ue",
105                    'bas e' => $sMo dulesUrl .  $sModule  . "/",   105                    'bas e' => $sMo dulesUrl .  $sModule  . "/",
106                    'bgc olor' => " #" . getSe ttingValue (GLOBAL_MO DULE, "bac kColor"),   106                    'bgc olor' => " #" . getSe ttingValue (GLOBAL_MO DULE, "bac kColor"),
107                    'wmo de' => iss et($aModul es[$sApp][ 'wmode'])  ? $aModule s[$sApp][' wmode'] :  getWMode()   107                    'wmo de' => iss et($aModul es[$sApp][ 'wmode'])  ? $aModule s[$sApp][' wmode'] :  getWMode()
108           );   108           );
109              109           
110           re turn array (   110           re turn array (
111                    'hol der' => $s Holder,   111                    'hol der' => $s Holder,
112                    'wid th' => $iW idth,   112                    'wid th' => $iW idth,
113                    'hei ght' => $i Height,   113                    'hei ght' => $i Height,
114                    'fla shVars' =>  $aFlashVa rs,   114                    'fla shVars' =>  $aFlashVa rs,
115                    'par ams' => $a Params,   115                    'par ams' => $a Params,
116                    'mod ules' => $ aModules   116                    'mod ules' => $ aModules
117           );   117           );
118   }   118   }
119     119  
120   /**   120   /**
121    * Gets th e embed co de of nece ssary widg et's appli cation.   121    * Gets th e embed co de of nece ssary widg et's appli cation.
122    * @param  sModule -  module(wid get) name.   122    * @param  sModule -  module(wid get) name.
123    * @param  sApp - app lication n ame in the  widget.   123    * @param  sApp - app lication n ame in the  widget.
124    * @param  aParamValu es - an as sociative  array of p arameters  to be pass ed into th e Flash ob ject.   124    * @param  aParamValu es - an as sociative  array of p arameters  to be pass ed into th e Flash ob ject.
125    */   125    */
126   function g etEmbedCod e($sModule , $sApp, $ aParamValu es)   126   function g etEmbedCod e($sModule , $sApp, $ aParamValu es)
127   {   127   {
128           gl obal $sGlo balUrl;   128           gl obal $sGlo balUrl;
129              129           
130           $s Template =  '<object  width="#wi dth#" heig ht="#heigh t#"><param  name="mov ie" value= "#holder#" ></param># objectPara ms#<embed  src="#hold er#" type= "applicati on/x-shock wave-flash " width="# width#" he ight="#hei ght#" #emb edParams#> </embed></ object>';   130           $s Template =  '<object  width="#wi dth#" heig ht="#heigh t#"><param  name="mov ie" value= "#holder#" ></param># objectPara ms#<embed  src="#hold er#" type= "applicati on/x-shock wave-flash " width="# width#" he ight="#hei ght#" #emb edParams#> </embed></ object>';
131           $a Config = g etFlashCon fig($sModu le, $sApp,  $aParamVa lues, true );   131           $a Config = g etFlashCon fig($sModu le, $sApp,  $aParamVa lues, true );
132     132  
133           $a FlashVars  = array();   133           $a FlashVars  = array();
134           fo reach($aCo nfig['flas hVars'] as  $sKey =>  $sValue)   134           fo reach($aCo nfig['flas hVars'] as  $sKey =>  $sValue)
135                    $aFl ashVars[]  = $sKey .  '=' . $sVa lue;   135                    $aFl ashVars[]  = $sKey .  '=' . $sVa lue;
136           $a Config['pa rams']['fl ashVars']  = implode( '&amp;', $ aFlashVars );   136           $a Config['pa rams']['fl ashVars']  = implode( '&amp;', $ aFlashVars );
137              137           
138           $a ObjectPara ms = array ();   138           $a ObjectPara ms = array ();
139           $a EmbedParam s = array( );   139           $a EmbedParam s = array( );
140           fo reach($aCo nfig['para ms'] as $s Key => $sV alue)   140           fo reach($aCo nfig['para ms'] as $s Key => $sV alue)
141           {   141           {
142                    $aOb jectParams [] = '<par am name="'  . $sKey .  '" value= "' . $sVal ue . '"></ param>';   142                    $aOb jectParams [] = '<par am name="'  . $sKey .  '" value= "' . $sVal ue . '"></ param>';
143                    $aEm bedParams[ ] = $sKey  . '="' . $ sValue . ' "';   143                    $aEm bedParams[ ] = $sKey  . '="' . $ sValue . ' "';
144           }   144           }
145              145           
146           $s Return = s tr_replace ("#holder# ", $aConfi g['holder' ], $sTempl ate);   146           $s Return = s tr_replace ("#holder# ", $aConfi g['holder' ], $sTempl ate);
147           $s Return = s tr_replace ("#width#" , $aConfig ['width'],  $sReturn) ;   147           $s Return = s tr_replace ("#width#" , $aConfig ['width'],  $sReturn) ;
148           $s Return = s tr_replace ("#height# ", $aConfi g['height' ], $sRetur n);   148           $s Return = s tr_replace ("#height# ", $aConfi g['height' ], $sRetur n);
149           $s Return = s tr_replace ("#objectP arams#", i mplode("",  $aObjectP arams), $s Return);   149           $s Return = s tr_replace ("#objectP arams#", i mplode("",  $aObjectP arams), $s Return);
150           $s Return = s tr_replace ("#embedPa rams#", im plode(" ",  $aEmbedPa rams), $sR eturn);   150           $s Return = s tr_replace ("#embedPa rams#", im plode(" ",  $aEmbedPa rams), $sR eturn);
151           re turn $sRet urn;   151           re turn $sRet urn;
152   }   152   }
153     153  
154   /**   154   /**
155    * Gets th e content  of necessa ry widget' s applicat ion.   155    * Gets th e content  of necessa ry widget' s applicat ion.
156    * @param  sModule -  module(wid get) name.   156    * @param  sModule -  module(wid get) name.
157    * @param  sApp - app lication n ame in the  widget.   157    * @param  sApp - app lication n ame in the  widget.
158    * @param  aParamValu es - an as sociative  array of p arameters  to be pass ed into th e Flash ob ject.   158    * @param  aParamValu es - an as sociative  array of p arameters  to be pass ed into th e Flash ob ject.
159    * @param  bInline -  whether yo u want to  have it wi th the ful l page cod e(for open ing in a n ew window)   159    * @param  bInline -  whether yo u want to  have it wi th the ful l page cod e(for open ing in a n ew window)
160    * or only  DIV with  flash obje ct (for em bedding in to the exi sting page ).   160    * or only  DIV with  flash obje ct (for em bedding in to the exi sting page ).
161    */   161    */
162   function g etApplicat ionContent ($sModule,  $sApp, $a ParamValue s = array( ), $bInlin e = false,  $bEmbedCo de = false , $sHtmlId  = "")   162   function g etApplicat ionContent ($sModule,  $sApp, $a ParamValue s = array( ), $bInlin e = false,  $bEmbedCo de = false , $sHtmlId  = "")
163   {   163   {
164           gl obal $sGlo balUrl;   164           gl obal $sGlo balUrl;
165           gl obal $sHom eUrl;   165           gl obal $sHom eUrl;
166           gl obal $sRay HomeDir;   166           gl obal $sRay HomeDir;
167           gl obal $sMod ulesUrl;   167           gl obal $sMod ulesUrl;
168           gl obal $sMod ulesPath;   168           gl obal $sMod ulesPath;
169           gl obal $sFla shPlayerVe rsion;   169           gl obal $sFla shPlayerVe rsion;
170                       170                    
171           $s Module = i sset($sMod ule) ? $sM odule : $_ REQUEST['m odule'];   171           $s Module = i sset($sMod ule) ? $sM odule : $_ REQUEST['m odule'];
172           $s App = isse t($sApp) ?  $sApp : $ _REQUEST[' app'];   172           $s App = isse t($sApp) ?  $sApp : $ _REQUEST[' app'];
173           if (empty($sH tmlId)) $s HtmlId = " ray_" . $s Module . " _" . $sApp  . "_objec t";   173           if (empty($sH tmlId)) $s HtmlId = " ray_" . $s Module . " _" . $sApp  . "_objec t";
174                       174                    
175           $s ModuleStat us = getSe ttingValue ($sModule,  "status",  "main");   175           $s ModuleStat us = getSe ttingValue ($sModule,  "status",  "main");
176           if ($sModuleS tatus == W IDGET_STAT US_NOT_INS TALLED ||  $sModuleSt atus == WI DGET_STATU S_DISABLED ) return " ";   176           if ($sModuleS tatus == W IDGET_STAT US_NOT_INS TALLED ||  $sModuleSt atus == WI DGET_STATU S_DISABLED ) return " ";
177                       177                    
178           $a Config = g etFlashCon fig($sModu le, $sApp,  $aParamVa lues, $bEm bedCode);   178           $a Config = g etFlashCon fig($sModu le, $sApp,  $aParamVa lues, $bEm bedCode);
179           $a Modules =  $aConfig[' modules'];   179           $a Modules =  $aConfig[' modules'];
180           if (!isset($b Inline))$b Inline = $ aModules[$ sApp]['inl ine'];   180           if (!isset($b Inline))$b Inline = $ aModules[$ sApp]['inl ine'];
181                       181                    
182           // --- Parame ters for c ontainer's  div ---//   182           // --- Parame ters for c ontainer's  div ---//
183           $s DivId = !e mpty($aMod ules[$sApp ]['div'][' id']) ? $a Modules[$s App]['div' ]['id'] :  '';   183           $s DivId = !e mpty($aMod ules[$sApp ]['div'][' id']) ? $a Modules[$s App]['div' ]['id'] :  '';
184           if (!empty($s HtmlId)) $ sDivId = $ sHtmlId;   184           if (!empty($s HtmlId)) $ sDivId = $ sHtmlId;
185           if (empty($sD ivId)) $sD ivId = $sM odule . '_ ' . $sApp;   185           if (empty($sD ivId)) $sD ivId = $sM odule . '_ ' . $sApp;
186           $s InnerDivId  = $sDivId  . "_" . t ime();   186           $s InnerDivId  = $sDivId  . "_" . t ime();
187           $s DivName =  !empty($aM odules[$sA pp]['div'] ['name'])  ? ' name=" ' . $aModu les[$sApp] ['div']['n ame'] . '" ' : '';   187           $s DivName =  !empty($aM odules[$sA pp]['div'] ['name'])  ? ' name=" ' . $aModu les[$sApp] ['div']['n ame'] . '" ' : '';
188           if (count($aM odules[$sA pp]['div'] ['style']) )   188           if (count($aM odules[$sA pp]['div'] ['style']) )
189           {   189           {
190                    $sDi vStyle = '  style="';   190                    $sDi vStyle = '  style="';
191                    fore ach($aModu les[$sApp] ['div']['s tyle'] as  $sKey => $ sValue)   191                    fore ach($aModu les[$sApp] ['div']['s tyle'] as  $sKey => $ sValue)
192                             $sDivS tyle .= $s Key . ':'  . $sValue  . ';';   192                             $sDivS tyle .= $s Key . ':'  . $sValue  . ';';
193                    $sDi vStyle .=  '"';   193                    $sDi vStyle .=  '"';
194           }   194           }
195           el se $sDivSt yle='';   195           el se $sDivSt yle='';
196                       196                    
197           // --- Parame ters for S WF object  and reload ing ---//   197           // --- Parame ters for S WF object  and reload ing ---//
198           $a Parameters Reload = a rray();   198           $a Parameters Reload = a rray();
199           if (!isset($_ GET["modul e"])) $aPa rametersRe load[] = " module=" .  $sModule;   199           if (!isset($_ GET["modul e"])) $aPa rametersRe load[] = " module=" .  $sModule;
200           if (!isset($_ GET["app"] )) $aParam etersReloa d[] = "app =" . $sApp ;   200           if (!isset($_ GET["app"] )) $aParam etersReloa d[] = "app =" . $sApp ;
201     201  
202           ob _start();   202           ob _start();
203           if (!$bInline )   203           if (!$bInline )
204           {   204           {
205   ?>   205   ?>
206           <! DOCTYPE ht ml PUBLIC  "-//W3C//D TD XHTML 1 .0 Transit ional//EN"  "http://w ww.w3.org/ TR/xhtml1/ DTD/xhtml1 -transitio nal.dtd">   206           <! DOCTYPE ht ml PUBLIC  "-//W3C//D TD XHTML 1 .0 Transit ional//EN"  "http://w ww.w3.org/ TR/xhtml1/ DTD/xhtml1 -transitio nal.dtd">
207           <h tml>   207           <h tml>
208                    <hea d>   208                    <hea d>
209                             <title ><?=$aModu les[$sApp] ['caption' ]; ?></tit le>   209                             <title ><?=$aModu les[$sApp] ['caption' ]; ?></tit le>
210                             <meta  http-equiv =Content-T ype conten t="text/ht ml;charset =UTF-8" />   210                             <meta  http-equiv =Content-T ype conten t="text/ht ml;charset =UTF-8" />
211                    </he ad>   211                    </he ad>
212                    <bod y style="m argin:0; p adding:0;"   <?=$aMod ules[$sApp ]['hResiza ble'] || $ aModules[$ sApp]['vRe sizable']  ? 'onLoad= "resizeWin dow()" onR esize="if  ( window.r esizeWindo w ) resize Window()"'  : ''; ?>  >   212                    <bod y style="m argin:0; p adding:0;"   <?=$aMod ules[$sApp ]['hResiza ble'] || $ aModules[$ sApp]['vRe sizable']  ? 'onLoad= "resizeWin dow()" onR esize="if  ( window.r esizeWindo w ) resize Window()"'  : ''; ?>  >
213   <?   213   <?
214                    echo  getRayInt egrationJS ();   214                    echo  getRayInt egrationJS ();
215           }   215           }
216           if (!$bEmbedC ode)   216           if (!$bEmbedC ode)
217                    fore ach($aModu les[$sApp] ['js'] as  $sJSUrl)   217                    fore ach($aModu les[$sApp] ['js'] as  $sJSUrl)
218                             echo " \t\t<scrip t src=\""  . $sJSUrl  . "\" type =\"text/ja vascript\"  language= \"javascri pt\"></scr ipt>\n";   218                             echo " \t\t<scrip t src=\""  . $sJSUrl  . "\" type =\"text/ja vascript\"  language= \"javascri pt\"></scr ipt>\n";
219                       219                    
220           if (!$bEmbedC ode && ($a Modules[$s App]['hRes izable'] | | $aModule s[$sApp][' vResizable ']))   220           if (!$bEmbedC ode && ($a Modules[$s App]['hRes izable'] | | $aModule s[$sApp][' vResizable ']))
221           {   221           {
222                    $iMi nWidth = ( int)$aModu les[$sApp] ['minSize' ]['width'] ;   222                    $iMi nWidth = ( int)$aModu les[$sApp] ['minSize' ]['width'] ;
223                    $iMi nHeight =  (int)$aMod ules[$sApp ]['minSize ']['height '];   223                    $iMi nHeight =  (int)$aMod ules[$sApp ]['minSize ']['height '];
224   ?>   224   ?>
225           <s cript type ="text/jav ascript" l anguage="j avascript" >   225           <s cript type ="text/jav ascript" l anguage="j avascript" >
226           <! --   226           <! --
227                    func tion resiz eWindow()   227                    func tion resiz eWindow()
228                    {   228                    {
229                             var fr ameWidth =  0;   229                             var fr ameWidth =  0;
230                             var fr ameHeight  = 0;   230                             var fr ameHeight  = 0;
231                                         231                                      
232                             if (do cument.doc umentEleme nt)   232                             if (do cument.doc umentEleme nt)
233                             {   233                             {
234                                      if(docum ent.docume ntElement. clientHeig ht)   234                                      if(docum ent.docume ntElement. clientHeig ht)
235                                      {   235                                      {
236                                               frameWidth  = documen t.document Element.cl ientWidth;   236                                               frameWidth  = documen t.document Element.cl ientWidth;
237                                               frameHeigh t = docume nt.documen tElement.c lientHeigh t;   237                                               frameHeigh t = docume nt.documen tElement.c lientHeigh t;
238                                      }   238                                      }
239                             }   239                             }
240                             else i f(window.i nnerWidth)   240                             else i f(window.i nnerWidth)
241                             {   241                             {
242                                      frameWid th = windo w.innerWid th;   242                                      frameWid th = windo w.innerWid th;
243                                      frameHei ght = wind ow.innerHe ight;   243                                      frameHei ght = wind ow.innerHe ight;
244                             }   244                             }
245                             else i f (documen t.body)   245                             else i f (documen t.body)
246                             {   246                             {
247                                      frameWid th = docum ent.body.o ffsetWidth ;   247                                      frameWid th = docum ent.body.o ffsetWidth ;
248                                      frameHei ght = docu ment.body. offsetHeig ht;   248                                      frameHei ght = docu ment.body. offsetHeig ht;
249                             }   249                             }
250                                         250                                      
251                             var sA ppName = ' ray_flash_ <?=$sModul e?>_<?=$sA pp?>_';   251                             var sA ppName = ' ray_flash_ <?=$sModul e?>_<?=$sA pp?>_';
252                             var o  = document .getElemen tById(sApp Name + 'ob ject');   252                             var o  = document .getElemen tById(sApp Name + 'ob ject');
253                             var e  = document .getElemen tById(sApp Name + 'em bed');   253                             var e  = document .getElemen tById(sApp Name + 'em bed');
254                                         254                                      
255                             frameW idth = (fr ameWidth <  <?=$iMinW idth?>) ?  <?=$iMinWi dth?> : fr ameWidth;   255                             frameW idth = (fr ameWidth <  <?=$iMinW idth?>) ?  <?=$iMinWi dth?> : fr ameWidth;
256                             frameH eight = (f rameHeight  < <?=$iMi nHeight?>)  ? <?=$iMi nHeight?>  : frameHei ght;   256                             frameH eight = (f rameHeight  < <?=$iMi nHeight?>)  ? <?=$iMi nHeight?>  : frameHei ght;
257                                         257                                      
258   <?   258   <?
259           $s Ret = $aMo dules[$sAp p]['hResiz able'] ? " o.width =  frameWidth ;\n" : "";   259           $s Ret = $aMo dules[$sAp p]['hResiz able'] ? " o.width =  frameWidth ;\n" : "";
260           $s Ret .= $aM odules[$sA pp]['vResi zable'] ?  "o.height  = frameHei ght;\n" :  "";   260           $s Ret .= $aM odules[$sA pp]['vResi zable'] ?  "o.height  = frameHei ght;\n" :  "";
261           $s Ret .= "if (e != null ){";   261           $s Ret .= "if (e != null ){";
262           $s Ret .= $aM odules[$sA pp]['hResi zable'] ?  "e.width =  frameWidt h;\n" : "" ;   262           $s Ret .= $aM odules[$sA pp]['hResi zable'] ?  "e.width =  frameWidt h;\n" : "" ;
263           $s Ret .= $aM odules[$sA pp]['vResi zable'] ?  "e.height  = frameHei ght;\n" :  "";   263           $s Ret .= $aM odules[$sA pp]['vResi zable'] ?  "e.height  = frameHei ght;\n" :  "";
264           $s Ret .= "}" ;   264           $s Ret .= "}" ;
265           ec ho $sRet;   265           ec ho $sRet;
266   ?>   266   ?>
267                    }   267                    }
268           -- >   268           -- >
269           </ script>   269           </ script>
270   <?   270   <?
271           }   271           }
272           if (!$bEmbedC ode && $aM odules[$sA pp]['reloa dable'])   272           if (!$bEmbedC ode && $aM odules[$sA pp]['reloa dable'])
273           {   273           {
274                    if(! $bInline)  echo getRe directForm ($sModule,  $sApp, ar ray_merge( $_GET, $_P OST));   274                    if(! $bInline)  echo getRe directForm ($sModule,  $sApp, ar ray_merge( $_GET, $_P OST));
275   ?>   275   ?>
276           <s cript type ="text/jav ascript" l anguage="j avascript" >   276           <s cript type ="text/jav ascript" l anguage="j avascript" >
277           <! --   277           <! --
278                    func tion reloa d()   278                    func tion reloa d()
279                    {   279                    {
280   <?   280   <?
281                             $sGet  = $_SERVER ['QUERY_ST RING'];   281                             $sGet  = $_SERVER ['QUERY_ST RING'];
282                             $sExtr aGet = imp lode("&",  $aParamete rsReload);   282                             $sExtr aGet = imp lode("&",  $aParamete rsReload);
283                             if(!em pty($sGet)  && !empty ($sExtraGe t)) $sGet  .= "&";   283                             if(!em pty($sGet)  && !empty ($sExtraGe t)) $sGet  .= "&";
284   ?>   284   ?>
285   <?= !$bInl ine ? "red irect();"  : "locatio n.href='"  . $_SERVER ['PHP_SELF '] . "?" .  $sGet . $ sExtraGet  . "';" ?>   285   <?= !$bInl ine ? "red irect();"  : "locatio n.href='"  . $_SERVER ['PHP_SELF '] . "?" .  $sGet . $ sExtraGet  . "';" ?>
286                    }   286                    }
287           -- >   287           -- >
288           </ script>   288           </ script>
289   <?   289   <?
290           }   290           }
291   ?>   291   ?>
292   <div id="< ?=$sDivId? >" <?=$sDi vName . $s DivStyle?> ><div id=" <?=$sInner DivId?>">< /div></div >   292   <div id="< ?=$sDivId? >" <?=$sDi vName . $s DivStyle?> ><div id=" <?=$sInner DivId?>">< /div></div >
293   <script ty pe="text/j avascript"  language= "javascrip t">   293   <script ty pe="text/j avascript"  language= "javascrip t">
294   <?         294   <?      
295           fo reach($aCo nfig['flas hVars'] as  $sKey =>  $sValue)   295           fo reach($aCo nfig['flas hVars'] as  $sKey =>  $sValue)
296           {   296           {
297                    if(! isset($_GE T[$sKey])  && $sKey ! = 'url') $ aParameter sReload[]  = $sKey .  "=" . (iss et($aConfi g['flashVa rs'][$sKey ]) ? $aCon fig['flash Vars'][$sK ey] : $_RE QUEST[$sKe y]);   297                    if(! isset($_GE T[$sKey])  && $sKey ! = 'url') $ aParameter sReload[]  = $sKey .  "=" . (iss et($aConfi g['flashVa rs'][$sKey ]) ? $aCon fig['flash Vars'][$sK ey] : $_RE QUEST[$sKe y]);
298           }   298           }
299   ?>   299   ?>
300   <?=phpArra yToJS($aCo nfig['flas hVars'], " flashvars" )?>   300   <?=phpArra yToJS($aCo nfig['flas hVars'], " flashvars" )?>
301   <?=phpArra yToJS($aCo nfig['para ms'], "par ams")?>   301   <?=phpArra yToJS($aCo nfig['para ms'], "par ams")?>
302     302  
303   var attrib utes = {   303   var attrib utes = {
304           id : "ray_fla sh_<?=$sMo dule?>_<?= $sApp?>_ob ject",   304           id : "ray_fla sh_<?=$sMo dule?>_<?= $sApp?>_ob ject",
305           na me: "ray_f lash_<?=$s Module?>_< ?=$sApp?>_ embed"   305           na me: "ray_f lash_<?=$s Module?>_< ?=$sApp?>_ embed"
306   };   306   };
307   swfobject. embedSWF(" <?=$aConfi g['holder' ]?>", "<?= $sInnerDiv Id?>", "<? =$aConfig[ 'width']?> ", "<?=$aC onfig['hei ght']?>",  "<?=$sFlas hPlayerVer sion?>", " <?=$sGloba lUrl?>app/ expressIns tall.swf",  flashvars , params,  attributes );   307   swfobject. embedSWF(" <?=$aConfi g['holder' ]?>", "<?= $sInnerDiv Id?>", "<? =$aConfig[ 'width']?> ", "<?=$aC onfig['hei ght']?>",  "<?=$sFlas hPlayerVer sion?>", " <?=$sGloba lUrl?>app/ expressIns tall.swf",  flashvars , params,  attributes );
308   </script>   308   </script>
309   <?   309   <?
310           if (!$bInline )   310           if (!$bInline )
311           {   311           {
312   ?>   312   ?>
313                    </bo dy>   313                    </bo dy>
314           </ html>   314           </ html>
315   <?   315   <?
316           }   316           }
317           $s WidgetCont ent = ob_g et_content s();   317           $s WidgetCont ent = ob_g et_content s();
318           ob _end_clean ();   318           ob _end_clean ();
319                       319                    
320           re turn $sWid getContent ;   320           re turn $sWid getContent ;
321   }   321   }
322     322  
323   /**   323   /**
324    * Make re direct and  send nece ssary para meters usi ng POST me thod.   324    * Make re direct and  send nece ssary para meters usi ng POST me thod.
325    */   325    */
326   function g etRedirect Form($sMod ule, $sApp , $aReques t)   326   function g etRedirect Form($sMod ule, $sApp , $aReques t)
327   {   327   {
328           ob _start();   328           ob _start();
329   ?>   329   ?>
330           <f orm style= "margin:0;  padding:0 ;" name="< ?= $sModul e . "-" .  $sApp; ?>"  method="P OST" actio n="<?= $_S ERVER['PHP _SELF']; ? >">   330           <f orm style= "margin:0;  padding:0 ;" name="< ?= $sModul e . "-" .  $sApp; ?>"  method="P OST" actio n="<?= $_S ERVER['PHP _SELF']; ? >">
331                    <inp ut type="h idden" nam e="module"  value="<? = $sModule ; ?>" />   331                    <inp ut type="h idden" nam e="module"  value="<? = $sModule ; ?>" />
332                    <inp ut type="h idden" nam e="app" va lue="<?= $ sApp; ?>"  />   332                    <inp ut type="h idden" nam e="app" va lue="<?= $ sApp; ?>"  />
333   <?   333   <?
334                    fore ach($aRequ est as $sK ey => $sVa lue)   334                    fore ach($aRequ est as $sK ey => $sVa lue)
335                    {   335                    {
336   ?>   336   ?>
337                             <input  type="hid den" name= "<?=htmlsp ecialchars ($sKey)?>"  value="<? =htmlspeci alchars($s Value)?>"  />   337                             <input  type="hid den" name= "<?=htmlsp ecialchars ($sKey)?>"  value="<? =htmlspeci alchars($s Value)?>"  />
338   <?   338   <?
339                    }   339                    }
340   ?>   340   ?>
341           </ form>   341           </ form>
342           <s cript>   342           <s cript>
343           <! --   343           <! --
344                    func tion redir ect()   344                    func tion redir ect()
345                    {   345                    {
346                             docume nt.forms[' <?= $sModu le . "-" .  $sApp; ?> '].submit( );   346                             docume nt.forms[' <?= $sModu le . "-" .  $sApp; ?> '].submit( );
347                    }   347                    }
348           -- >   348           -- >
349           </ script>   349           </ script>
350   <?   350   <?
351           $s Return = o b_get_cont ents();   351           $s Return = o b_get_cont ents();
352           ob _end_clean ();   352           ob _end_clean ();
353           re turn $sRet urn;   353           re turn $sRet urn;
354   }   354   }
355     355  
356   function p hpArrayToJ S($aArray,  $sName)   356   function p hpArrayToJ S($aArray,  $sName)
357   {   357   {
358           $a NewArray =  array();   358           $a NewArray =  array();
359           fo reach($aAr ray as $sK ey => $sVa lue)   359           fo reach($aAr ray as $sK ey => $sVa lue)
360                    $aNe wArray[] =  $sKey . ' :"' . $sVa lue . '"';   360                    $aNe wArray[] =  $sKey . ' :"' . $sVa lue . '"';
361           re turn "var  " . $sName  . "={" .  implode(", ", $aNewAr ray) . "}; ";   361           re turn "var  " . $sName  . "={" .  implode(", ", $aNewAr ray) . "}; ";
362   }   362   }
363   ?>   363   ?>