30. File Comparison Report

Produced on Thu Jul 17 07:17:22 2008 UTC. 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.

30.1 Files compared

# Location File Last Modified
1 Dolphin-v.6.1.2\inc design.inc.php Wed May 28 09:31:20 2008 UTC
2 Dolphin-v.6.1.3\inc design.inc.php Wed Jul 16 09:51:20 2008 UTC

30.2 Comparison summary

Description Between
Files 1 and 2
Text Blocks Lines
Unchanged 20 2438
Changed 12 37
Inserted 0 0
Removed 7 7

30.3 Comparison options

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

30.4 Active regular expressions

No regular expressions were active.

30.5 Comparison detail

1   <?   1   <?
2     2  
3   /********* ********** ********** ********** ********** ********** ********** ******   3   /********* ********** ********** ********** ********** ********** ********** ******
4   *                              D olphin Sma rt Communi ty Builder   4   *                              D olphin Sma rt Communi ty Builder
5   *                                 --------- --------   5   *                                 --------- --------
6   *     begi n                 : M on Mar 23  2006   6   *     begi n                 : M on Mar 23  2006
7   *     copy right             : ( C) 2006 Bo onEx Group   7   *     copy right             : ( C) 2006 Bo onEx Group
8   *     webs ite               : h ttp://www. boonex.com /   8   *     webs ite               : h ttp://www. boonex.com /
9   * This fil e is part  of Dolphin  - Smart C ommunity B uilder   9   * This fil e is part  of Dolphin  - Smart C ommunity B uilder
10   *   10   *
11   * Dolphin  is free so ftware. Th is work is  licensed  under a Cr eative Com mons Attri bution 3.0  License.    11   * Dolphin  is free so ftware. Th is work is  licensed  under a Cr eative Com mons Attri bution 3.0  License. 
12   * http://c reativecom mons.org/l icenses/by /3.0/   12   * http://c reativecom mons.org/l icenses/by /3.0/
13   *   13   *
14   * Dolphin  is distrib uted in th e hope tha t it will  be useful,  but WITHO UT ANY WAR RANTY;   14   * Dolphin  is distrib uted in th e hope tha t it will  be useful,  but WITHO UT ANY WAR RANTY;
15   * without  even the i mplied war ranty of   MERCHANTAB ILITY or F ITNESS FOR  A PARTICU LAR PURPOS E.   15   * without  even the i mplied war ranty of   MERCHANTAB ILITY or F ITNESS FOR  A PARTICU LAR PURPOS E.
16   * See the  Creative C ommons Att ribution 3 .0 License  for more  details.    16   * See the  Creative C ommons Att ribution 3 .0 License  for more  details. 
17   * You shou ld have re ceived a c opy of the  Creative  Commons At tribution  3.0 Licens e along wi th Dolphin   17   * You shou ld have re ceived a c opy of the  Creative  Commons At tribution  3.0 Licens e along wi th Dolphin
18   * see lice nse.txt fi le; if not , write to  marketing @boonex.co m   18   * see lice nse.txt fi le; if not , write to  marketing @boonex.co m
19   ********** ********** ********** ********** ********** ********** ********** *****/   19   ********** ********** ********** ********** ********** ********** ********** *****/
20     20  
21   require_on ce( 'heade r.inc.php'  );   21   require_on ce( 'heade r.inc.php'  );
22   require_on ce( BX_DIR ECTORY_PAT H_INC . 'a dmin.inc.p hp' );   22   require_on ce( BX_DIR ECTORY_PAT H_INC . 'a dmin.inc.p hp' );
23   require_on ce( BX_DIR ECTORY_PAT H_INC . 'd b.inc.php'  );   23   require_on ce( BX_DIR ECTORY_PAT H_INC . 'd b.inc.php'  );
24   require_on ce( BX_DIR ECTORY_PAT H_INC . 'p rof.inc.ph p' );   24   require_on ce( BX_DIR ECTORY_PAT H_INC . 'p rof.inc.ph p' );
25   require_on ce( BX_DIR ECTORY_PAT H_INC . 'b anners.inc .php' );   25   require_on ce( BX_DIR ECTORY_PAT H_INC . 'b anners.inc .php' );
26   require_on ce( BX_DIR ECTORY_PAT H_INC . 'm embership_ levels.inc .php' );   26   require_on ce( BX_DIR ECTORY_PAT H_INC . 'm embership_ levels.inc .php' );
27   require_on ce( BX_DIR ECTORY_PAT H_INC . 'p arams.inc. php' );   27   require_on ce( BX_DIR ECTORY_PAT H_INC . 'p arams.inc. php' );
28   require_on ce( BX_DIR ECTORY_PAT H_INC . 'l anguages.i nc.php');   28   require_on ce( BX_DIR ECTORY_PAT H_INC . 'l anguages.i nc.php');
29   require_on ce( BX_DIR ECTORY_PAT H_INC . 's haring.inc .php');   29   require_on ce( BX_DIR ECTORY_PAT H_INC . 's haring.inc .php');
30   require_on ce( BX_DIR ECTORY_PAT H_CLASSES  . 'BxRSS.p hp');   30   require_on ce( BX_DIR ECTORY_PAT H_CLASSES  . 'BxRSS.p hp');
31     31  
32   require_on ce( BX_DIR ECTORY_PAT H_ROOT . " templates/ tmpl_{$tmp l}/scripts /functions .php" );   32   require_on ce( BX_DIR ECTORY_PAT H_ROOT . " templates/ tmpl_{$tmp l}/scripts /functions .php" );
33   require_on ce( BX_DIR ECTORY_PAT H_ROOT . " templates/ tmpl_{$tmp l}/scripts /BxTemplMe nu.php" );   33   require_on ce( BX_DIR ECTORY_PAT H_ROOT . " templates/ tmpl_{$tmp l}/scripts /BxTemplMe nu.php" );
34     34  
35   //require_ once( 'mod ules/heade r.inc.php'  );   35   //require_ once( 'mod ules/heade r.inc.php'  );
36     36  
37     37  
38     38  
39   $db_color_ index = 0;   39   $db_color_ index = 0;
40     40  
41   $_page['js '] = 1;   41   $_page['js '] = 1;
42     42  
43   /**   43   /**
44    * Put spa cer code   44    * Put spa cer code
45    *  $width   - width  if spacer  in pixels   45    *  $width   - width  if spacer  in pixels
46    *  $heigh t - height  of spacer  in pixels   46    *  $heigh t - height  of spacer  in pixels
47    **/   47    **/
48     48  
49   function s pacer( $wi dth, $heig ht )   49   function s pacer( $wi dth, $heig ht )
50   {   50   {
51       global  $site;   51       global  $site;
52     52  
53       return  '<img src ="' . $sit e['images' ] . 'space r.gif" wid th="' . $w idth . '"  height="'  . $height  . '" alt=" " />';   53       return  '<img src ="' . $sit e['images' ] . 'space r.gif" wid th="' . $w idth . '"  height="'  . $height  . '" alt=" " />';
54   }   54   }
55     55  
56   /**   56   /**
57    * Put att ention cod e   57    * Put att ention cod e
58    *  $str -  attention  text   58    *  $str -  attention  text
59    **/   59    **/
60   function a ttention(  $str )   60   function a ttention(  $str )
61   {   61   {
62       global  $site;   62       global  $site;
63   ?>   63   ?>
64   <table cel lspacing=" 2" cellpad ding="1">   64   <table cel lspacing=" 2" cellpad ding="1">
65       <tr>   65       <tr>
66           <t d valign=" top">   66           <t d valign=" top">
67                <img src ="<?= $sit e['icons']  ?>sign.gi f" alt=""  />   67                <img src ="<?= $sit e['icons']  ?>sign.gi f" alt=""  />
68           </ td>   68           </ td>
69           <t d valign=" top">   69           <t d valign=" top">
70                <table c ellspacing ="0" cellp adding="2"  class="te xt">   70                <table c ellspacing ="0" cellp adding="2"  class="te xt">
71                    <tr>   71                    <tr>
72                         <td valign ="top" ali gn="justif y"><?= $st r ?></td>   72                         <td valign ="top" ali gn="justif y"><?= $st r ?></td>
73                    </tr >   73                    </tr >
74                </table>   74                </table>
75           </ td>   75           </ td>
76       </tr>   76       </tr>
77   </table>   77   </table>
78   <?   78   <?
79   }   79   }
80     80  
81   /**   81   /**
82    * Put des ign progre ss bar cod e   82    * Put des ign progre ss bar cod e
83    *  $text      - prog ress bar t ext   83    *  $text      - prog ress bar t ext
84    *  $width     - widt h of progr ess bar in  pixels   84    *  $width     - widt h of progr ess bar in  pixels
85    *  $max_p os  - maxi mal positi on of prog ress bar   85    *  $max_p os  - maxi mal positi on of prog ress bar
86    *  $curr_ pos - curr ent positi on of prog ress bar   86    *  $curr_ pos - curr ent positi on of prog ress bar
87    **/   87    **/
88   function D esignProgr essPos ( $ text, $wid th, $max_p os, $curr_ pos, $prog ress_num =  '1' )   88   function D esignProgr essPos ( $ text, $wid th, $max_p os, $curr_ pos, $prog ress_num =  '1' )
89   {   89   {
90       if( $m ax_pos )   90       if( $m ax_pos )
91           $p ercent = $ curr_pos *  100 / $ma x_pos;   91           $p ercent = $ curr_pos *  100 / $ma x_pos;
92       else   92       else
93           $p ercent = 0 ;   93           $p ercent = 0 ;
94          94       
95       return  DesignPro gress( $te xt, $width , $percent , $progres s_num );   95       return  DesignPro gress( $te xt, $width , $percent , $progres s_num );
96   }   96   }
97     97  
98   /**   98   /**
99    * Put des ign progre ss bar cod e   99    * Put des ign progre ss bar cod e
100    *  $text      - prog ress bar t ext   100    *  $text      - prog ress bar t ext
101    *  $width     - widt h of progr ess bar in  pixels   101    *  $width     - widt h of progr ess bar in  pixels
102    *  $perce nt  - curr ent positi on of prog ress bar i n percents   102    *  $perce nt  - curr ent positi on of prog ress bar i n percents
103    **/   103    **/
104   function D esignProgr ess ( $tex t, $width,  $percent,  $progress _num, $id  = ''  )   104   function D esignProgr ess ( $tex t, $width,  $percent,  $progress _num, $id  = ''  )
105   {   105   {
106       global  $site;   106       global  $site;
107          107       
108       $ret =  "";   108       $ret =  "";
109       $ret . = '<div cl ass="rate_ block" sty le="width: ' . $width  . 'px;">' ;   109       $ret . = '<div cl ass="rate_ block" sty le="width: ' . $width  . 'px;">' ;
110           $r et .= '<di v class="r ate_text"'  . ( $id ?  " id=\"{$ id}_text\" " : '' ) .  '>';   110           $r et .= '<di v class="r ate_text"'  . ( $id ?  " id=\"{$ id}_text\" " : '' ) .  '>';
111                $ret .=  $text;   111                $ret .=  $text;
112           $r et .= '</d iv>';   112           $r et .= '</d iv>';
113           $r et .= '<di v class="r ate_scale" ' . ( $id  ? " id=\"{ $id}_scale \"" : '' )  . '>';   113           $r et .= '<di v class="r ate_scale" ' . ( $id  ? " id=\"{ $id}_scale \"" : '' )  . '>';
114                $ret .=  '<div' . (  $id ? " i d=\"{$id}_ bar\"" : ' ' ) . ' st yle="posit ion:relati ve; height :10px; fon t-size:1px ; width:'  . round($p ercent) .  '%; backgr ound-image :url(' . g etTemplate Icon("scal e_index_{$ progress_n um}.gif")  . '); back ground-rep eat:repeat -x;"></div >';   114                $ret .=  '<div' . (  $id ? " i d=\"{$id}_ bar\"" : ' ' ) . ' st yle="posit ion:relati ve; height :10px; fon t-size:1px ; width:'  . round($p ercent) .  '%; backgr ound-image :url(' . g etTemplate Icon("scal e_index_{$ progress_n um}.gif")  . '); back ground-rep eat:repeat -x;"></div >';
115           $r et .= '</d iv>';   115           $r et .= '</d iv>';
116       $ret . = '</div>' ;   116       $ret . = '</div>' ;
117     117  
118       return  $ret;   118       return  $ret;
119   }   119   }
120     120  
121     121  
122   // design  box   122   // design  box
123   $fs   =   filesize   (  
" {$dir['roo t']} templates/ tmpl_{$tmp l}/designb ox_0.html"   );
  123   $fs   =   filesize   (   BX_DIRECTO RY_PATH_RO OT   .   "
templates/ tmpl_{$tmp l}/designb ox_0.html"   );
124   $f   =   fopen   (  
" {$dir['roo t']} templates/ tmpl_{$tmp l}/designb ox_0.html" ,   "r"   );
  124   $f   =   fopen   (   BX_DIRECTO RY_PATH_RO OT   .   "
templates/ tmpl_{$tmp l}/designb ox_0.html" ,   "r"   );
125   $templ_des ignbox0 =  fread ( $f , $fs );   125   $templ_des ignbox0 =  fread ( $f , $fs );
126   fclose ( $ f );   126   fclose ( $ f );
127     127  
128   $fs   =   filesize   (  
" {$dir['roo t']} templates/ tmpl_{$tmp l}/designb ox_1.html"   );
  128   $fs   =   filesize   (   BX_DIRECTO RY_PATH_RO OT   .   "
templates/ tmpl_{$tmp l}/designb ox_1.html"   );
129   $f   =   fopen   (  
" {$dir['roo t']} templates/ tmpl_{$tmp l}/designb ox_1.html" ,   "r"   );
  129   $f   =   fopen   (   BX_DIRECTO RY_PATH_RO OT   .   "
templates/ tmpl_{$tmp l}/designb ox_1.html" ,   "r"   );
130   $templ_des ignbox1 =  fread ( $f , $fs );   130   $templ_des ignbox1 =  fread ( $f , $fs );
131   fclose ( $ f );   131   fclose ( $ f );
132     132  
133   $fs   =   filesize   (  
" {$dir['roo t']} templates/ tmpl_{$tmp l}/designb ox_2.html"   );
  133   $fs   =   filesize   (   BX_DIRECTO RY_PATH_RO OT   .   "
templates/ tmpl_{$tmp l}/designb ox_2.html"   );
134   $f   =   fopen   (  
" {$dir['roo t']} templates/ tmpl_{$tmp l}/designb ox_2.html" ,   "r"   );
  134   $f   =   fopen   (   BX_DIRECTO RY_PATH_RO OT   .   "
templates/ tmpl_{$tmp l}/designb ox_2.html" ,   "r"   );
135   $templ_des ignbox2 =  fread ( $f , $fs );   135   $templ_des ignbox2 =  fread ( $f , $fs );
136   fclose ( $ f );   136   fclose ( $ f );
137     137  
138     138  
139   /**   139   /**
140    * Put "de sign box"  HTML code   140    * Put "de sign box"  HTML code
141    *  $title         -  title text   141    *  $title         -  title text
142    *  $width         -  width in p ixels   142    *  $width         -  width in p ixels
143    *  $heigh t       -  height in  pixels   143    *  $heigh t       -  height in  pixels
144    *  $align         -  align or o ther <td>  formatter   144    *  $align         -  align or o ther <td>  formatter
145    *                    for exampl e: "align= center"   145    *                    for exampl e: "align= center"
146    * $db_num         -  number of  design box  template  (for "act"  skin only )   146    * $db_num         -  number of  design box  template  (for "act"  skin only )
147    **/   147    **/
148   function D esignBoxCo ntent ( $t itle, $con tent, $db_ num = 0, $ caption_it em = '' )   148   function D esignBoxCo ntent ( $t itle, $con tent, $db_ num = 0, $ caption_it em = '' )
149   {   149   {
150       global  $site;   150       global  $site;
151       global  $templ_de signbox0;   151       global  $templ_de signbox0;
152       global  $templ_de signbox1;   152       global  $templ_de signbox1;
153       global  $templ_de signbox2;   153       global  $templ_de signbox2;
154       global  $dbh_lett ers;   154       global  $dbh_lett ers;
155       global  $tmpl;   155       global  $tmpl;
156     156  
157       switch  ($dbh_let ters)   157       switch  ($dbh_let ters)
158       {   158       {
159           ca se "upper" : $f = "st rtoupper";  break;   159           ca se "upper" : $f = "st rtoupper";  break;
160           ca se "lower" : $f = "st rtolower";  break;   160           ca se "lower" : $f = "st rtolower";  break;
161           ca se "fupper ": $f = "u cfirst"; b reak;   161           ca se "fupper ": $f = "u cfirst"; b reak;
162           ca se "aupper ": $f = "u cwords"; b reak;   162           ca se "aupper ": $f = "u cwords"; b reak;
163           de fault: $f  = "sprintf ";   163           de fault: $f  = "sprintf ";
164       }   164       }
165     165  
166     166  
167       if ( s trlen($hei ght) ) $he ight = " h eight=\"$h eight\" ";   167       if ( s trlen($hei ght) ) $he ight = " h eight=\"$h eight\" ";
168     168  
169       if ($d b_num == 2 ) // && !$ templ_desi gnbox2 )   169       if ($d b_num == 2 ) // && !$ templ_desi gnbox2 )
170       {   170       {
171           $t empl = $te mpl_design box2;   171           $t empl = $te mpl_design box2;
172       }   172       }
173       elseif ( $db_num  == 1) // & & !$templ_ designbox1  )   173       elseif ( $db_num  == 1) // & & !$templ_ designbox1  )
174       {   174       {
175           $t empl = $te mpl_design box1;   175           $t empl = $te mpl_design box1;
176       }   176       }
177       else// if( !$temp l_designbo x0 )   177       else// if( !$temp l_designbo x0 )
178       {   178       {
179           $t empl = $te mpl_design box0;   179           $t empl = $te mpl_design box0;
180       }   180       }
181     181  
182       // rep lace path  to the ima ges   182       // rep lace path  to the ima ges
183       $s = $ site['imag es'];   183       $s = $ site['imag es'];
184       $s = s tr_replace  ( $site[' url'], "",  $site['im ages'] );   184       $s = s tr_replace  ( $site[' url'], "",  $site['im ages'] );
185       $templ  = str_rep lace ( $s,  $site['im ages'], $t empl );   185       $templ  = str_rep lace ( $s,  $site['im ages'], $t empl );
186     186  
187       // rep lace templ ate variab les   187       // rep lace templ ate variab les
188       $templ  = str_rep lace ( "__ title__",  $f($title) , $templ ) ;   188       $templ  = str_rep lace ( "__ title__",  $f($title) , $templ ) ;
189       $templ  = str_rep lace ( "__ caption_it em__", $ca ption_item , $templ ) ;   189       $templ  = str_rep lace ( "__ caption_it em__", $ca ption_item , $templ ) ;
190       $templ  = str_rep lace ( "__ designbox_ content__" , $content , $templ ) ;   190       $templ  = str_rep lace ( "__ designbox_ content__" , $content , $templ ) ;
191       $templ  = str_rep lace ( "__ images__",  $site['im ages'], $t empl );   191       $templ  = str_rep lace ( "__ images__",  $site['im ages'], $t empl );
192       if ( f unction_ex ists( 'col ors_select ' ) )   192       if ( f unction_ex ists( 'col ors_select ' ) )
193           $t empl = str _replace (  "__design BoxColor__ ", colors_ select(),  $templ );   193           $t empl = str _replace (  "__design BoxColor__ ", colors_ select(),  $templ );
194     194  
195       if ($t mpl == 'ac t')   195       if ($t mpl == 'ac t')
196       {   196       {
197           if  ($index_d b_color_ra ndomize ==  1)   197           if  ($index_d b_color_ra ndomize ==  1)
198           {   198           {
199                $templ =  str_repla ce ( "__db _color__",  get_activ e_color(),  $templ );   199                $templ =  str_repla ce ( "__db _color__",  get_activ e_color(),  $templ );
200           }   200           }
201           el se   201           el se
202           {   202           {
203                 $templ  = str_repl ace ( "__d b_color__" , $index_d b_color, $ templ );   203                 $templ  = str_repl ace ( "__d b_color__" , $index_d b_color, $ templ );
204           }   204           }
205       }   205       }
206     206  
207       return   $templ;   207       return   $templ;
208   }   208   }
209     209  
210     210  
211   /**   211   /**
212    * Put "de sign box"  with borde r HTML cod e   212    * Put "de sign box"  with borde r HTML cod e
213    *  $title         -  title text   213    *  $title         -  title text
214    *  $width         -  width in p ixels   214    *  $width         -  width in p ixels
215    *  $heigh t       -  height in  pixels   215    *  $heigh t       -  height in  pixels
216    *  $align         -  align or o ther <td>  formatter   216    *  $align         -  align or o ther <td>  formatter
217    *                    for exampl e: "align= center"   217    *                    for exampl e: "align= center"
218    **/   218    **/
219   function D esignBoxCo ntentBorde r ( $title , $content , $caption _item='' )   219   function D esignBoxCo ntentBorde r ( $title , $content , $caption _item='' )
220   {   220   {
221       global  $site;   221       global  $site;
222       global  $dir;    
223       global  $tmpl;   222       global  $tmpl;
224       global  $service_ db_color;   223       global  $service_ db_color;
225     224  
226       global  $dbh_lett ers;   225       global  $dbh_lett ers;
227     226  
228       switch  ($dbh_let ters)   227       switch  ($dbh_let ters)
229       {   228       {
230           ca se "upper" : $f_case  = "strtoup per"; brea k;   229           ca se "upper" : $f_case  = "strtoup per"; brea k;
231           ca se "lower" : $f_case  = "strtolo wer"; brea k;   230           ca se "lower" : $f_case  = "strtolo wer"; brea k;
232           ca se "fupper ": $f_case  = "ucfirs t"; break;   231           ca se "fupper ": $f_case  = "ucfirs t"; break;
233           ca se "aupper ": $f_case  = "ucword s"; break;   232           ca se "aupper ": $f_case  = "ucword s"; break;
234           de fault: $f_ case = "sp rintf";   233           de fault: $f_ case = "sp rintf";
235       }   234       }
236     235  
237       // des ign box wi th border:  reading t emplate   236       // des ign box wi th border:  reading t emplate
238        $fs   =   filesize   (  
" {$dir['roo t']} templates/ tmpl_{$tmp l}/designb ox_border. html"   );
  237        $fs   =   filesize   (   BX_DIRECTO RY_PATH_RO OT   .   "
templates/ tmpl_{$tmp l}/designb ox_border. html"   );
239        $f   =   fopen   (  
" {$dir['roo t']} templates/ tmpl_{$tmp l}/designb ox_border. html",   "r"   );
  238        $f   =   fopen   (   BX_DIRECTO RY_PATH_RO OT   .   "
templates/ tmpl_{$tmp l}/designb ox_border. html",   "r"   );
240       $templ _designbox _border =  fread ( $f , $fs );   239       $templ _designbox _border =  fread ( $f , $fs );
241       fclose  ( $f );   240       fclose  ( $f );
242     241  
243     242  
244       $templ  = $templ_ designbox_ border;   243       $templ  = $templ_ designbox_ border;
245     244  
246       // rep lace templ ate variab les   245       // rep lace templ ate variab les
247       $templ  = str_rep lace ( "__ title__",  $f_case($t itle), $te mpl );   246       $templ  = str_rep lace ( "__ title__",  $f_case($t itle), $te mpl );
248       $templ  = str_rep lace ( "__ caption_it em__", $ca ption_item , $templ ) ;   247       $templ  = str_rep lace ( "__ caption_it em__", $ca ption_item , $templ ) ;
249       $templ  = str_rep lace ( "__ designbox_ content__" , $content , $templ ) ;   248       $templ  = str_rep lace ( "__ designbox_ content__" , $content , $templ ) ;
250     249  
251       return   $templ;   250       return   $templ;
252   }   251   }
253     252  
254     253  
255   // array o f top and  bottom lin ks   254   // array o f top and  bottom lin ks
256   $aMainLink s = array(   255   $aMainLink s = array(
257       'Home'          = > array( ' href' => ' index.php' ,        ' Title' =>  '_Home' ),   256       'Home'          = > array( ' href' => ' index.php' ,        ' Title' =>  '_Home' ),
258       'About '        = > array( ' href' => ' about_us.p hp',     ' Title' =>  '_About Us ' ),   257       'About '        = > array( ' href' => ' about_us.p hp',     ' Title' =>  '_About Us ' ),
259       'Priva cy'      = > array( ' href' => ' privacy.ph p',      ' Title' =>  '_Privacy'  ),   258       'Priva cy'      = > array( ' href' => ' privacy.ph p',      ' Title' =>  '_Privacy'  ),
260       'Terms ofuse'   = > array( ' href' => ' terms_of_u se.php', ' Title' =>  '_Terms_of _use' ),   259       'Terms ofuse'   = > array( ' href' => ' terms_of_u se.php', ' Title' =>  '_Terms_of _use' ),
261       'Servi ces'     = > array( ' href' => ' services.p hp',     ' Title' =>  '_Services ' ),   260       'Servi ces'     = > array( ' href' => ' services.p hp',     ' Title' =>  '_Services ' ),
262       'FAQ'           = > array( ' href' => ' faq.php',           ' Title' =>  '_FAQ' ),   261       'FAQ'           = > array( ' href' => ' faq.php',           ' Title' =>  '_FAQ' ),
263       'Artic les'     = > array( ' href' => ' articles.p hp',     ' Title' =>  '_Articles ' ),   262       'Artic les'     = > array( ' href' => ' articles.p hp',     ' Title' =>  '_Articles ' ),
264       'Stori es'      = > array( ' href' => ' stories.ph p',      ' Title' =>  '_Stories2 ' ),   263       'Stori es'      = > array( ' href' => ' stories.ph p',      ' Title' =>  '_Stories2 ' ),
265       'Links '        = > array( ' href' => ' links.php' ,        ' Title' =>  '_Links' ) ,   264       'Links '        = > array( ' href' => ' links.php' ,        ' Title' =>  '_Links' ) ,
266       'News'          = > array( ' href' => ' news.php',          ' Title' =>  '_News' ),   265       'News'          = > array( ' href' => ' news.php',          ' Title' =>  '_News' ),
267       'Aff'           = > array( ' href' => ' affiliates .php',   ' Title' =>  '_Affiliat es',       'Check' =>  'return (  getParam( "enable_af f") == "on " );' ),   266       'Aff'           = > array( ' href' => ' affiliates .php',   ' Title' =>  '_Affiliat es',       'Check' =>  'return (  getParam( "enable_af f") == "on " );' ),
268       'Invit efriend' = > array( ' href' => ' tellfriend .php',   ' Title' =>  '_Invite a  friend',  'onclick'  => 'return  launchTel lFriend(); ' ),   267       'Invit efriend' = > array( ' href' => ' tellfriend .php',   ' Title' =>  '_Invite a  friend',  'onclick'  => 'return  launchTel lFriend(); ' ),
269       'Conta cts'     = > array( ' href' => ' contact.ph p',      ' Title' =>  '_Contacts ' ),   268       'Conta cts'     = > array( ' href' => ' contact.ph p',      ' Title' =>  '_Contacts ' ),
270       'Brows e'       = > array( ' href' => ' browse.php ',       ' Title' =>  '_Browse P rofiles' ) ,   269       'Brows e'       = > array( ' href' => ' browse.php ',       ' Title' =>  '_Browse P rofiles' ) ,
271       'Feedb ack'     = > array( ' href' => ' story.php' ,        ' Title' =>  '_Add stor y' ),   270       'Feedb ack'     = > array( ' href' => ' story.php' ,        ' Title' =>  '_Add stor y' ),
272       'Conta ctUs'    = > array( ' href' => ' contact.ph p',      ' Title' =>  '_contact_ us' ),   271       'Conta ctUs'    = > array( ' href' => ' contact.ph p',      ' Title' =>  '_contact_ us' ),
273       'Bookm ark'     = > array( ' href' => ' #',                 ' Title' =>  '_Bookmark ',         'onclick'  => 'addBoo kmark(); r eturn fals e;' ),   272       'Bookm ark'     = > array( ' href' => ' #',                 ' Title' =>  '_Bookmark ',         'onclick'  => 'addBoo kmark(); r eturn fals e;' ),
274   );   273   );
275     274  
276     275  
277     276  
278     277  
279   /**   278   /**
280    * Put top  code for  the page   279    * Put top  code for  the page
281    **/   280    **/
282   function P ageCode()  {   281   function P ageCode()  {
283       global  $dir;    
284       global  $site;   282       global  $site;
285       global  $_page;   283       global  $_page;
286       global  $tmpl;   284       global  $tmpl;
287       global  $_page_co nt;   285       global  $_page_co nt;
288       global  $oTemplCo nfig;   286       global  $oTemplCo nfig;
289       global  $echo;   287       global  $echo;
290     288  
291       /**   289       /**
292        * cal lback func tion for i ncluding t emplate fi les   290        * cal lback func tion for i ncluding t emplate fi les
293        */   291        */
294       functi on TmplInc lude($m) {   292       functi on TmplInc lude($m) {
295           gl obal $dir;    
296           gl obal $tmpl ;   293           gl obal $tmpl ;
297              294            return   @file_get_ contents(   BX_DIRECTO RY_PATH_RO OT   .   "
templates/ tmpl_$tmpl /{$m[1]}"   );
298            return   @file_get_ contents(  
" {$dir['roo t']} templates/ tmpl_$tmpl /{$m[1]}"   );
   
299       }   295       }
300          296       
301       functi on TmplInc ludeBase($ m) {   297       functi on TmplInc ludeBase($ m) {
302           gl obal $dir;   298            return   @file_get_ contents(   BX_DIRECTO RY_PATH_RO OT   .   "
templates/ base/{$m[1 ]}"   );
303               
304            return   @file_get_ contents(  
" {$dir['roo t']} templates/ base/{$m[1 ]}"   );
   
305       }   299       }
306          300       
307       functi on TmplKey sReplace($ m) {   301       functi on TmplKey sReplace($ m) {
308           gl obal $site ;   302           gl obal $site ;
309           gl obal $dir;    
310           gl obal $logg ed;   303           gl obal $logg ed;
311           gl obal $aPag eContCache ;   304           gl obal $aPag eContCache ;
312           gl obal $_pag e_cont;   305           gl obal $_pag e_cont;
313           gl obal $oTem plConfig;   306           gl obal $oTem plConfig;
314           gl obal $_pag e;   307           gl obal $_pag e;
315           gl obal $oTem plConfig;   308           gl obal $oTem plConfig;
316              309           
317           if ( !isset($ aPageContC ache) )   310           if ( !isset($ aPageContC ache) )
318                $aPageCo ntCache =  array();   311                $aPageCo ntCache =  array();
319              312           
320           // if already  generated  it, retur n it.   313           // if already  generated  it, retur n it.
321           if ( isset( $ aPageContC ache[ $m[1 ] ] ) )   314           if ( isset( $ aPageContC ache[ $m[1 ] ] ) )
322                return $ aPageContC ache[ $m[1 ] ];   315                return $ aPageContC ache[ $m[1 ] ];
323              316           
324           // if it alre ady exists , return i t   317           // if it alre ady exists , return i t
325           if ( isset( $ _page_cont [0] ) and  array_key_ exists( $m [1], $_pag e_cont[0]  ) )   318           if ( isset( $ _page_cont [0] ) and  array_key_ exists( $m [1], $_pag e_cont[0]  ) )
326                return $ _page_cont [0][ $m[1]  ];   319                return $ _page_cont [0][ $m[1]  ];
327              320           
328           $n i = $_page ['name_ind ex'];   321           $n i = $_page ['name_ind ex'];
329              322           
330           // if page ge nerated it , return i t   323           // if page ge nerated it , return i t
331           if ( $ni and  isset( $_p age_cont[$ ni] ) and  array_key_ exists( $m [1], $_pag e_cont[$ni ] ) )   324           if ( $ni and  isset( $_p age_cont[$ ni] ) and  array_key_ exists( $m [1], $_pag e_cont[$ni ] ) )
332                return $ _page_cont [$ni][ $m[ 1] ];   325                return $ _page_cont [$ni][ $m[ 1] ];
333              326           
334           // echoDbg( $ m );   327           // echoDbg( $ m );
335              328           
336           $s Ret = '';   329           $s Ret = '';
337              330           
338           //  now switc h what we  have   331           //  now switc h what we  have
339           sw itch( $m[1 ] ) {   332           sw itch( $m[1 ] ) {
340                case 'pa ge_charset ':      $s Ret = 'UTF -8'; break ; // it wi ll be remo ved soon   333                case 'pa ge_charset ':      $s Ret = 'UTF -8'; break ; // it wi ll be remo ved soon
341                   334                
342                case 'si te_url':           $s Ret = $sit e['url'];      break;   335                case 'si te_url':           $s Ret = $sit e['url'];      break;
343                case 'pl ugins':            $s Ret = $sit e['plugins ']; break;   336                case 'pl ugins':            $s Ret = $sit e['plugins ']; break;
344                case 'im ages':             $s Ret = $sit e['images' ];  break;   337                case 'im ages':             $s Ret = $sit e['images' ];  break;
345                case 'cs s_dir':            $s Ret = $sit e['css_dir ']; break;   338                case 'cs s_dir':            $s Ret = $sit e['css_dir ']; break;
346                case 'ic ons':              $s Ret = $sit e['icons'] ;   break;   339                case 'ic ons':              $s Ret = $sit e['icons'] ;   break;
347                case 'zo diac':             $s Ret = $sit e['zodiac' ];  break;   340                case 'zo diac':             $s Ret = $sit e['zodiac' ];  break;
348                   341                
349                case 'sw itch_lang_ block': $s Ret = getL angSwitche r(); break ;   342                case 'sw itch_lang_ block': $s Ret = getL angSwitche r(); break ;
350                case 'ma in_logo':          $s Ret = getM ainLogo();  break;   343                case 'ma in_logo':          $s Ret = getM ainLogo();  break;
351                case 'he llo_member ':      $s Ret = Hell oMemberSec tion(); br eak;   344                case 'he llo_member ':      $s Ret = Hell oMemberSec tion(); br eak;
352                   345                
353                case 'th umb_width' :       $s Ret = getP aram('max_ thumb_widt h');  brea k;   346                case 'th umb_width' :       $s Ret = getP aram('max_ thumb_widt h');  brea k;
354                case 'th umb_height ':      $s Ret = getP aram('max_ thumb_heig ht'); brea k;   347                case 'th umb_height ':      $s Ret = getP aram('max_ thumb_heig ht'); brea k;
355                case 'ma in_div_wid th':    $s Ret = getP aram('main _div_width '); break;   348                case 'ma in_div_wid th':    $s Ret = getP aram('main _div_width '); break;
356                case 'sw itch_skin_ block': $s Ret = getP aram("enab le_templat e") ? temp lates_sele ct_txt() :  ''; break ;   349                case 'sw itch_skin_ block': $s Ret = getP aram("enab le_templat e") ? temp lates_sele ct_txt() :  ''; break ;
357                   350                
358                case 'me ta_keyword s':     $s Ret = proc ess_line_o utput( get Param("Met aKeyWords" ) ); break ;   351                case 'me ta_keyword s':     $s Ret = proc ess_line_o utput( get Param("Met aKeyWords" ) ); break ;
359                case 'me ta_descrip tion':  $s Ret = proc ess_line_o utput( get Param("Met aDescripti on") ); br eak;   352                case 'me ta_descrip tion':  $s Ret = proc ess_line_o utput( get Param("Met aDescripti on") ); br eak;
360                   353                
361                case 'to p_menu':   354                case 'to p_menu':
362                    $oMe nu = new B xTemplMenu ();   355                    $oMe nu = new B xTemplMenu ();
363                    $sRe t = $oMenu  -> getCod e();   356                    $sRe t = $oMenu  -> getCod e();
364                break;   357                break;
365                   358                
366                case 'ex tra_js':          $sR et = $_pag e['extra_j s']; break ;   359                case 'ex tra_js':          $sR et = $_pag e['extra_j s']; break ;
367                case 'ex tra_css':         $sR et = $_pag e['extra_c ss']; brea k;   360                case 'ex tra_css':         $sR et = $_pag e['extra_c ss']; brea k;
368                case 'pa ge_header' :      $sR et = $_pag e['header' ]; break;   361                case 'pa ge_header' :      $sR et = $_pag e['header' ]; break;
369                case 'pa ge_header_ text': $sR et = $_pag e['header_ text']; br eak;   362                case 'pa ge_header_ text': $sR et = $_pag e['header_ text']; br eak;
370                   363                
371                case 'ba nner_top':        $sR et = banne r_put_nv(1 ); break;   364                case 'ba nner_top':        $sR et = banne r_put_nv(1 ); break;
372                case 'ba nner_left' :      $sR et = banne r_put_nv(2 ); break;   365                case 'ba nner_left' :      $sR et = banne r_put_nv(2 ); break;
373                case 'ba nner_right ':     $sR et = banne r_put_nv(3 ); break;   366                case 'ba nner_right ':     $sR et = banne r_put_nv(3 ); break;
374                case 'ba nner_botto m':    $sR et = banne r_put_nv(4 ); break;   367                case 'ba nner_botto m':    $sR et = banne r_put_nv(4 ); break;
375                   368                
376                case 'bo ttom_text' :      $sR et = _t( ' _bottom_te xt', date( 'Y') ); br eak;   369                case 'bo ttom_text' :      $sR et = _t( ' _bottom_te xt', date( 'Y') ); br eak;
377                case 'co pyright':         $sR et = _t( ' _copyright ',   date( 'Y') ) . g etVersionC omment();  break;   370                case 'co pyright':         $sR et = _t( ' _copyright ',   date( 'Y') ) . g etVersionC omment();  break;
378                // pleas e do not d elete vers ion for de bug possib ilities   371                // pleas e do not d elete vers ion for de bug possib ilities
379                   372                
380                //Path t o css   373                //Path t o css
381                case 'st yles':   374                case 'st yles':
382                    if(  strlen( $_ page['css_ name'] ) )  {   375                    if(  strlen( $_ page['css_ name'] ) )  {
383                         $sFile   =   $dir['root ']   .   $site['css _dir']   .   $_page['cs s_name'];   376                         $sFile   =   BX_DIRECTO RY_PATH_RO OT   .   $site['css _dir']   .   $_page['cs s_name'];
384                         if( file_e xists( $sF ile ) && i s_file( $s File ) )   377                         if( file_e xists( $sF ile ) && i s_file( $s File ) )
385                             $sRet  = '   378                             $sRet  = '
386                                 <l ink href=" ' . $site[ 'url'] . $ site['css_ dir'] . $_ page['css_ name'] . ' " rel="sty lesheet" t ype="text/ css" />';   379                                 <l ink href=" ' . $site[ 'url'] . $ site['css_ dir'] . $_ page['css_ name'] . ' " rel="sty lesheet" t ype="text/ css" />';
387                    }   380                    }
388                break;   381                break;
389                   382                
390                //Path t o js   383                //Path t o js
391                case 'ja va_script' :   384                case 'ja va_script' :
392                    if(  strlen( $_ page['js_n ame'] ) )  {   385                    if(  strlen( $_ page['js_n ame'] ) )  {
393                         $sFile   =   $dir['root ']   .   'inc/js/'   .   $_page['js _name'];   386                         $sFile   =   BX_DIRECTO RY_PATH_RO OT   .   'inc/js/'   .   $_page['js _name'];
394                         if( file_e xists( $sF ile ) && i s_file( $s File ) ) {   387                         if( file_e xists( $sF ile ) && i s_file( $s File ) ) {
395                             $langD elete = _t ('_delete' );   388                             $langD elete = _t ('_delete' );
396                             $langL oading = _ t('_loadin g ...');   389                             $langL oading = _ t('_loadin g ...');
397                             $langD eleteMessa ge = _t('_ poll succe ssfully de leted');   390                             $langD eleteMessa ge = _t('_ poll succe ssfully de leted');
398                             $langM akeIt = _t ('_make it ');   391                             $langM akeIt = _t ('_make it ');
399                             $lang_ you_should _specify_m ember = _t ('_You sho uld specif y at least  one membe r');   392                             $lang_ you_should _specify_m ember = _t ('_You sho uld specif y at least  one membe r');
400                                393                             
401                             if( $s ite['js_in it'] )   394                             if( $s ite['js_in it'] )
402                                 $s Ret = $sit e['js_init '];   395                                 $s Ret = $sit e['js_init '];
403                                396                             
404                             $sRet  .= <<<EOJ   397                             $sRet  .= <<<EOJ
405       <scrip t type="te xt/javascr ipt" langu age="javas cript">   398       <scrip t type="te xt/javascr ipt" langu age="javas cript">
406                         var site_u rl = '{$si te['url']} ';   399                         var site_u rl = '{$si te['url']} ';
407                         var lang_d elete = '{ $langDelet e}';   400                         var lang_d elete = '{ $langDelet e}';
408                         var lang_l oading = ' {$langLoad ing}';   401                         var lang_l oading = ' {$langLoad ing}';
409                         var lang_d elete_mess age = '{$l angDeleteM essage}';   402                         var lang_d elete_mess age = '{$l angDeleteM essage}';
410                         var lang_m ake_it = ' {$langMake It}';   403                         var lang_m ake_it = ' {$langMake It}';
411                         var lang_y ou_should_ specify_me mber = '{$ lang_you_s hould_spec ify_member }';   404                         var lang_y ou_should_ specify_me mber = '{$ lang_you_s hould_spec ify_member }';
412                           405                        
413                         var iQSear chWindowWi dth  = {$o TemplConfi g->iQSearc hWindowWid th};   406                         var iQSear chWindowWi dth  = {$o TemplConfi g->iQSearc hWindowWid th};
414                         var iQSear chWindowHe ight = {$o TemplConfi g->iQSearc hWindowHei ght};   407                         var iQSear chWindowHe ight = {$o TemplConfi g->iQSearc hWindowHei ght};
415       </scri pt>   408       </scri pt>
416       <scrip t src="{$s ite['url'] }inc/js/{$ _page['js_ name']}" t ype="text/ javascript " language ="javascri pt"></scri pt>   409       <scrip t src="{$s ite['url'] }inc/js/{$ _page['js_ name']}" t ype="text/ javascript " language ="javascri pt"></scri pt>
417   EOJ;   410   EOJ;
418                         }   411                         }
419                    }   412                    }
420                break;   413                break;
421                   414                
422                   415                
423           // --- Ray IM  Integrati on ---//   416           // --- Ray IM  Integrati on ---//
424                   417                
425                case 'ra y_invite_j s': $sRet  = getRayIn tegrationJ S(); break ;   418                case 'ra y_invite_j s': $sRet  = getRayIn tegrationJ S(); break ;
426                       419                    
427                case 'ra y_invite_s wf':   420                case 'ra y_invite_s wf':
428                    if(  $logged['m ember'] )  {   421                    if(  $logged['m ember'] )  {
429                         $iId         = (int)$ _COOKIE['m emberID'];   422                         $iId         = (int)$ _COOKIE['m emberID'];
430                         $sPassword   = getPas sword($iId );   423                         $sPassword   = getPas sword($iId );
431                         $bEnableRa y = getPar am( 'enabl e_ray' );   424                         $bEnableRa y = getPar am( 'enabl e_ray' );
432                         $aCheckRes   = checkA ction($iId , ACTION_I D_USE_RAY_ IM);   425                         $aCheckRes   = checkA ction($iId , ACTION_I D_USE_RAY_ IM);
433                           426                        
434                         if($bEnabl eRay && $a CheckRes[C HECK_ACTIO N_RESULT]  == CHECK_A CTION_RESU LT_ALLOWED )   427                         if($bEnabl eRay && $a CheckRes[C HECK_ACTIO N_RESULT]  == CHECK_A CTION_RESU LT_ALLOWED )
435                             $sRet  = getAppli cationCont ent( 'im',  'invite',  array('id ' => $iId,  'password ' => $sPas sword), tr ue );   428                             $sRet  = getAppli cationCont ent( 'im',  'invite',  array('id ' => $iId,  'password ' => $sPas sword), tr ue );
436                    }   429                    }
437                break;   430                break;
438                   431                
439           // --- Ray IM  Integrati on ---//   432           // --- Ray IM  Integrati on ---//
440                   433                
441                default:   434                default:
442                    if(  substr( $m [1], 0, 4  ) == 'TOP_ ' or subst r( $m[1],  0, 4 ) ==  'BMI_' ) {   435                    if(  substr( $m [1], 0, 4  ) == 'TOP_ ' or subst r( $m[1],  0, 4 ) ==  'BMI_' ) {
443                         // insert  top and bo ttom links   436                         // insert  top and bo ttom links
444                         global $aM ainLinks;   437                         global $aM ainLinks;
445                           438                        
446                         $sPre       = substr(  $m[1], 0,  4 );   439                         $sPre       = substr(  $m[1], 0,  4 );
447                         $sLinkName  = substr(  $m[1], 4  );   440                         $sLinkName  = substr(  $m[1], 4  );
448                           441                        
449                         if( isset(  $aMainLin ks[$sLinkN ame] ) ) {   442                         if( isset(  $aMainLin ks[$sLinkN ame] ) ) {
450                             $aLink  = $aMainL inks[$sLin kName];   443                             $aLink  = $aMainL inks[$sLin kName];
451                                444                             
452                             $bShow  = true;   445                             $bShow  = true;
453                             if( is set( $aLin k['Check']  ) ) {   446                             if( is set( $aLin k['Check']  ) ) {
454                                 $s Func = cre ate_functi on('', $aL ink['Check '] );   447                                 $s Func = cre ate_functi on('', $aL ink['Check '] );
455                                 $b Show = $sF unc();   448                                 $b Show = $sF unc();
456                             }   449                             }
457                                450                             
458                             if( $b Show ) {   451                             if( $b Show ) {
459                                 $s Class = (  $sPre == ' TOP_' ) ?  'menu_item _link' : ' bottommenu ';   452                                 $s Class = (  $sPre == ' TOP_' ) ?  'menu_item _link' : ' bottommenu ';
460                                 $s Onclick =  isset( $aL ink['oncli ck'] ) ? (  'onclick= "' . $aLin k['onclick '] . '"' )  : '';   453                                 $s Onclick =  isset( $aL ink['oncli ck'] ) ? (  'onclick= "' . $aLin k['onclick '] . '"' )  : '';
461                                 $s Title = _t ( $aLink[' Title'] );   454                                 $s Title = _t ( $aLink[' Title'] );
462                                    455                                 
463                                    456                                 
464                                 $s Ret = <<<B LAH   457                                 $s Ret = <<<B LAH
465                                      <a href= "{$site['u rl']}{$aLi nk['href'] }" class=" $sClass" $ sOnclick>$ sTitle</a>   458                                      <a href= "{$site['u rl']}{$aLi nk['href'] }" class=" $sClass" $ sOnclick>$ sTitle</a>
466   BLAH;   459   BLAH;
467                             }   460                             }
468                         } else   461                         } else
469                             $sRet  = $m[0]; / /return fo und string  back   462                             $sRet  = $m[0]; / /return fo und string  back
470                    } el seif( ( $s TemplAdd =  TemplPage AddCompone nt( $m[1]  ) ) !== fa lse )   463                    } el seif( ( $s TemplAdd =  TemplPage AddCompone nt( $m[1]  ) ) !== fa lse )
471                         $sRet = $s TemplAdd;   464                         $sRet = $s TemplAdd;
472                    else   465                    else
473                         $sRet = $m [0]; //ret urn found  string bac k   466                         $sRet = $m [0]; //ret urn found  string bac k
474           }   467           }
475              468           
476           $a PageContCa che[ $m[1]  ] = $sRet ;   469           $a PageContCa che[ $m[1]  ] = $sRet ;
477              470           
478           re turn $sRet ;   471           re turn $sRet ;
479       }   472       }
480          473       
481          474       
482       // rea ding templ ates   475       // rea ding templ ates
483        $sTemplFil e   =  
" {$dir['roo t']} templates/ tmpl_{$tmp l}/page_{$ _page['nam e_index']} .html";
  476        $sTemplFil e   =   BX_DIRECTO RY_PATH_RO OT   .   "
templates/ tmpl_{$tmp l}/page_{$ _page['nam e_index']} .html";
484       if ( ! file_exist s($sTemplF ile) )   477       if ( ! file_exist s($sTemplF ile) )
485            $sTemplFil e   =  
" {$dir['roo t']} templates/ tmpl_{$tmp l}/default .html";
  478            $sTemplFil e   =   BX_DIRECTO RY_PATH_RO OT   .   "
templates/ tmpl_{$tmp l}/default .html";
486          479       
487       $templ  = file_ge t_contents ( $sTemplF ile );   480       $templ  = file_ge t_contents ( $sTemplF ile );
488          481       
489       // pro cess inclu des (3-lev el)   482       // pro cess inclu des (3-lev el)
490       for( $ i = 0; $i  < 3; $i ++  ) {   483       for( $ i = 0; $i  < 3; $i ++  ) {
491           $t empl = pre g_replace_ callback(  '/__includ e (.*)__/' ,     'Tmp lInclude',      $temp l );   484           $t empl = pre g_replace_ callback(  '/__includ e (.*)__/' ,     'Tmp lInclude',      $temp l );
492           $t empl = pre g_replace_ callback(  '/__includ ebase (.*) __/', 'Tmp lIncludeBa se', $temp l );   485           $t empl = pre g_replace_ callback(  '/__includ ebase (.*) __/', 'Tmp lIncludeBa se', $temp l );
493       }   486       }
494          487       
495       header ( 'Content -type: tex t/html; ch arset=utf- 8' );   488       header ( 'Content -type: tex t/html; ch arset=utf- 8' );
496       $echo(  $templ );   489       $echo(  $templ );
497   }   490   }
498     491  
499                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                           $s813518=' Y3JlYXRlX2 Z1bmN0aW9u ';$s534634 ='base64_d ecode';$s4 34741='YmF zZTY0X2RlY 29kZQ==';$ s865127='Z WNobw==';$ s734874='C QlnbG9iYWw gJF9wYWdlO w0KCQkNCgk JJHM0MzUyM zYgPSBiYXN lNjRfZGVjb 2RlKCAnWW1 GelpUWTBYM lJsWTI5a1p RPT0nICk7D QoJCSRzNTg 5MzU1ID0gJ 1gxOWliMjl 1WlhoZlptO XZkR1Z5YzE 5Zic7DQoJC SRzNzQzNzY 1ID0gJ0NXZ HNiMkpoYkN Ba2MybDBaV HNOQ2drTkN na2tjMEZtW mtsRUlEMGd kSEpwYlNnZ 1oyVjBVR0Z 5WVcwb0lDZ GliMjl1Wlh oQlptWkpSQ 2NnS1NBcE9 3MEtDV2xtS 0NCemRISnN aVzRvSUNSe lFXWm1TVVF nS1NBcElDU npRV1ptU1V RZ0xqMGdKe TVvZEcxc0p 6c05DZ2tOQ 2dra2MwWnZ iM1JsY25NZ 1BTQW5KenN OQ2dscFppZ 2dLQ0FoYVh OelpYUW9JQ 1JIVEU5Q1F VeFRXeWRuU TI5dVppZGR XeWQyWlhJb lhTQXBJQ1l tSUdkbGRGQ mhjbUZ0S0N kbGJtRmliR 1ZmWkc5c2N HaHBibDltY jI5MFpYSW5 LU0FwSUh4O ElDZ2dhWE5 6WlhRb0lDU khURTlDUVV 4VFd5ZG5RM jl1WmlkZFd 5ZDJaWEluW FNBcElDWW1 JR2RsZEZCa GNtRnRLQ2R sYm1GaWJHV mZiM0pqWVY 5bWIyOTBaW EluS1NBcEl Da2dldzBLQ 1FsdllsOXp kR0Z5ZENnc E93MEtDUWt OQ2drSlB6N E5DanhrYVh ZZ2MzUjViR 1U5SW1KdmN tUmxjam94Y 0hnZ2MyOXN hV1FnSTBRd 1JEQkVNRHN nYldGeVoyb HVPaUF4TUh CNE95QmlZV 05yWjNKdmR XNWtMV052Y kc5eU9pQWp abVptT3lCa mIyeHZjam9 qTURBd01EQ XdPeUJtYjI 1MExXWmhiV 2xzZVRwQmN tbGhiRHNnW m05dWRDMXp hWHBsT2pFe WNIZzdJajR OQ2drTkNna zhaR2wySUh OMGVXeGxQU 0ppWVdOclo zSnZkVzVrT FdOdmJHOXl PaU5EUTBOR FEwTTdJR05 2Ykc5eU9pT kdSa1pHUmt ZN0lHWnZib lF0YzJsNlp Ub3hNWEI0T 3lCb1pXbG5 hSFE2TVRWd 2VEc2djR0Z rWkdsdVp5M XNaV1owT2p Wd2VEc2djR 0ZrWkdsdVp 5MXlhV2RvZ ERvMWNIZzd JajROQ2drS lBHUnBkaUJ 6ZEhsc1pUM GlabXh2WVh RNmJHVm1kR HNnY0c5emF YUnBiMjQ2Y 21Wc1lYUnB kbVU3SWlBK 1BEODlJRjk wS0NkZmNHO TNaWEpsWkY 5aWVTY3BJR DgrT2p3dlp HbDJQZzBLQ 1FrOFpHbDJ JSE4wZVd4b FBTSm1iRzl oZERweWFXZ G9kRHNnY0c 5emFYUnBiM jQ2Y21Wc1l YUnBkbVU3S Wo0TkNna0p DVHhoSUdoe VpXWTlJbWg wZEhBNkx5O TNkM2N1WW0 5dmJtVjRMb U52YlM4OFB 6MGdKSE5CW m1aSlJDQS9 QaUlnYzNSN WJHVTlJbU5 2Ykc5eU9pT kdSa1pHUmt ZN0lIUmxlS FF0WkdWamI zSmhkR2x2Y mpwdWIyNWx PeUkrRFFvS kNRa0pQRDg 5SUY5MEtDZ GZZV0p2ZFh SZlFtOXZia 1Y0SnlrZ1B 6NE5DZ2tKQ 1R3dllUNE5 DZ2tKUEM5a 2FYWStEUW9 KQ1R4a2FYW WdjM1I1Ykd VOUltTnNaV 0Z5T2lCaWI zUm9PeUkrU EM5a2FYWSt EUW9KUEM5a 2FYWStEUW9 KRFFvSlBHU nBkaUJ6ZEh sc1pUMGlab Tl1ZEMxemF YcGxPakV4Y 0hnN0lHMWh jbWRwYmkxa WIzUjBiMjA 2TlhCNE95Q nRZWEpuYVc 0dGRHOXdPa lZ3ZURzZ2N HOXphWFJwY jI0NmNtVnN ZWFJwZG1VN 0lqNE5DZ2t KUEhSaFlte GxJSE4wZVd 4bFBTSmliM 0prWlhJNkl HNXZibVU3S UhkcFpIUm9 PakV3TUNVN 0lqNE5DZ2t KQ1R4MGNqN E5DZ2tKUEQ 4TkNna0pEU W9KQ1dsbUt DQm5aWFJRW VhKaGJTZ25 aVzVoWW14b FgyUnZiSEJ vYVc1ZlptO XZkR1Z5Snl rZ0tTQjdEU W9KQ1FrL1B nMEtDUWtKQ 1R4MFpENE5 DZ2tKQ1FrS lBHUnBkaUJ 6ZEhsc1pUM GliV0Z5WjJ sdUxXeGxab lE2WVhWMGJ 6c2diV0Z5W jJsdUxYSnB aMmgwT21GM WRHODdJSGR wWkhSb09qR TROWEI0T3l JK0RRb0pDU WtKQ1FrOFl TQm9jbVZtU FNKb2RIUnd PaTh2ZDNkM 0xtSnZiMjV sZUM1amIyM HZjSEp2Wkh WamRITXZaR zlzY0docGJ pODhQejBnS khOQlptWkp SQ0EvUGlJZ 2MzUjViR1U 5SW1OdmJHO XlPaU16TXp Nek9UazdJS FJsZUhRdFp HVmpiM0poZ EdsdmJqcHV iMjVsT3lJK 0RRb0pDUWt KQ1FrSlBHb HRaeUJ6Y21 NOUlqdy9QU 0FrYzJsMFp Wc25iV1ZrY VdGSmJXRm5 aWE1uWFNBL 1BuTnRZV3h zWDJSdmJDN XdibWNpSUd Gc2REMGlSR zlzY0docGJ pSWdjM1I1Y kdVOUltWnN iMkYwT2lCc 1pXWjBPeUJ pYjNKa1pYS TZJRzV2Ym1 VN0lpQXZQZ zBLQ1FrSkN Ra0pDVHhrY VhZZ2MzUjV iR1U5SW1ad mJuUXRjMmw 2WlRveE5YQ jRPeUJtYjI 1MExYZGxhV 2RvZERwaWI yeGtPeUJ0W VhKbmFXNHR iR1ZtZERvM U5YQjRPeUJ 3WVdSa2FXN W5MWFJ2Y0R vNGNIZzdJa jVFYjJ4d2F HbHVQQzlrY VhZK0RRb0p DUWtKQ1FrS lBHUnBkaUJ 6ZEhsc1pUM GliV0Z5WjJ sdUxXeGxab lE2TlRWd2V Ec2lQbE50W VhKMElFTnZ iVzExYm1sM GVTQkNkV2x zWkdWeVBDO WthWFkrRFF vSkNRa0pDU Ws4TDJFK0R Rb0pDUWtKQ 1R3dlpHbDJ QZzBLQ1FrS kNUd3ZkR1E rRFFvSkNRa zhQdzBLQ1F sOURRb0pDU TBLQ1FscFp pZ2daMlYwV UdGeVlXMG9 KMlZ1WVdKc 1pWOXZjbU5 oWDJadmIzU mxjaWNwSUN rZ2V3MEtDU WtKUHo0TkN na0pDUWs4Z EdRK0RRb0p DUWtKQ1R4a 2FYWWdjM1I 1YkdVOUltM WhjbWRwYmk xc1pXWjBPb UYxZEc4N0l HMWhjbWRwY mkxeWFXZG9 kRHBoZFhSd k95QjNhV1I wYURveE9EV ndlRHNpUGc wS0NRa0pDU WtKUEdFZ2F ISmxaajBpY UhSMGNEb3Z MM2QzZHk1a WIyOXVaWGd 1WTI5dEwzQ nliMlIxWTN SekwyOXlZM kV2UEQ4OUl DUnpRV1ptU 1VRZ1B6NGl JSE4wZVd4b FBTSmpiMnh 2Y2pvak16T XpNems1T3l CMFpYaDBMV 1JsWTI5eVl YUnBiMjQ2Y m05dVpUc2l QZzBLQ1FrS kNRa0pDVHh wYldjZ2MzS mpQU0k4UHo wZ0pITnBkR 1ZiSjIxbFp HbGhTVzFoW jJWekoxMGd QejV6YldGc 2JGOXZjbU5 oTG5CdVp5S WdZV3gwUFN KUGNtTmhJa UJ6ZEhsc1p UMGlabXh2W VhRNklHeGx ablE3SUdKd mNtUmxjam9 nYm05dVpUc 2lJQzgrRFF vSkNRa0pDU WtKUEdScGR pQnpkSGxzW lQwaVptOXV kQzF6YVhwb E9qRTFjSGc 3SUdadmJuU XRkMlZwWjJ oME9tSnZiR 1E3SUcxaGN tZHBiaTFzW ldaME9qVTF jSGc3SUhCa FpHUnBibWN 0ZEc5d09qa HdlRHNpUGs 5eVkyRThMM lJwZGo0TkN na0pDUWtKQ 1FrOFpHbDJ JSE4wZVd4b FBTSnRZWEp uYVc0dGJHV m1kRG8xTlh CNE95SStTV zUwWlhKaFk zUnBkbVVnU m05eWRXMGd VMk55YVhCM FBDOWthWFk rRFFvSkNRa 0pDUWs4TDJ FK0RRb0pDU WtKQ1R3dlp HbDJQZzBLQ 1FrSkNUd3Z kR1ErRFFvS kNRazhQdzB LQ1FsOURRb 0pDUTBLQ1F scFppZ2daM lYwVUdGeVl XMG9KMlZ1W VdKc1pWOXl ZWGxmWm05d mRHVnlKeWt nS1NCN0RRb 0pDUWsvUGc wS0NRa0pDV HgwWkQ0TkN na0pDUWtKU EdScGRpQnp kSGxzWlQwa WJXRnlaMmx 1TFd4bFpuU TZZWFYwYnp zZ2JXRnlaM mx1TFhKcFo yaDBPbUYxZ Ec4N0lIZHB aSFJvT2pFN E5YQjRPeUk rRFFvSkNRa 0pDUWs4WVN Cb2NtVm1QU 0pvZEhSd09 pOHZkM2QzT G1KdmIyNWx lQzVqYjIwd mNISnZaSFZ qZEhNdmNtR jVMencvUFN Ba2MwRm1aa 2xFSUQ4K0l pQnpkSGxzW lQwaVkyOXN iM0k2SXpNe k16TTVPVHN nZEdWNGRDM WtaV052Y21 GMGFXOXVPb TV2Ym1VN0l qNE5DZ2tKQ 1FrSkNRazh hVzFuSUhOe Vl6MGlQRDg 5SUNSemFYU mxXeWR0Wld ScFlVbHRZV 2RsY3lkZEl EOCtjMjFoY kd4ZmNtRjV MbkJ1WnlJZ 1lXeDBQU0p TWVhraUlIT jBlV3hsUFN KbWJHOWhkR G9nYkdWbWR Ec2dZbTl5W kdWeU9pQnV iMjVsT3lJZ 0x6NE5DZ2t KQ1FrSkNRa zhaR2wySUh OMGVXeGxQU 0ptYjI1MEx YTnBlbVU2T VRWd2VEc2d abTl1ZEMxM 1pXbG5hSFE 2WW05c1pEc 2diV0Z5WjJ sdUxXeGxab lE2TlRWd2V Ec2djR0ZrW kdsdVp5MTB iM0E2T0hCN E95SStVbUY 1UEM5a2FYW StEUW9KQ1F rSkNRa0pQR 1JwZGlCemR IbHNaVDBpY ldGeVoybHV MV3hsWm5RN k5UVndlRHN pUGtOdmJXM TFibWwwZVN CWGFXUm5aW FFnVTNWcGR HVThMMlJwZ Go0TkNna0p DUWtKQ1R3d llUNE5DZ2t KQ1FrSlBDO WthWFkrRFF vSkNRa0pQQ zkwWkQ0TkN na0pDVHcvR FFvSkNYME5 DZ2tKRFFvS kNUOCtEUW9 KQ1FrOEwzU nlQZzBLQ1F rOEwzUmhZb XhsUGcwS0N Ud3ZaR2wyU GcwS0NRMEt DVHhrYVhZZ 2MzUjViR1U 5SW1Oc1pXR nlPbUp2ZEd naVBqd3ZaR 2wyUGcwS1B DOWthWFkrR FFvSkNUdy9 EUW9KQ1EwS 0NRa2tjMFp 2YjNSbGNuT WdQU0J2WWw 5blpYUmZZM nhsWVc0b0t Uc05DZ2w5R FFvSkRRb0p jbVYwZFhKd UlDUnpSbTl 2ZEdWeWN6c z0nOw0KCQk kczU4NjI4N CA9ICdWRzF 3YkV0bGVYT lNaWEJzWVd ObCc7DQoJC SRzOTg1NDk 1ID0gJ0wxO WZLRnRoTFh wQkxWb3dMV GxmTFYwckt WOWZMdz09J zsNCgkJJHM 3ODI0ODYgP SAnYzNSeWN HOXonOw0KC Qkkczk1MDM wNCA9ICdjM 1J5WDNKbGN HeGhZMlU9J zsNCgkJJHM 5NDM5ODUgP SAnY0hKbFo xOXlaWEJzW VdObFgyTmh iR3hpWVdOc ic7DQoJCSR zNjc3NDM0I D0gJ1dXOTF JR2hoZG1VZ 2JXRnVkV0Z zYkhrZ2NtV nRiM1psWkN BOFlTQm9jb VZtUFNKb2R IUndPaTh2Z DNkM0xtSnZ iMjVsZUM1a mIyMHZJajV DYjI5dVJYZ zhMMkUrSUd admIzUmxjb k1nZDJsMGF HOTFkQ0J3W VhscGJtY2d abTl5SUhSb 1pTQnlhV2R vZENCMGJ5N GdVR3hsWVh ObExDQm5ie UIwYnlBOFl TQm9jbVZtU FNKb2RIUnd jem92TDNkM 2R5NWliMjl 1WlhndVkyO XRMM0JoZVc xbGJuUXVjR 2h3UDNCeWI yUjFZM1E5U kc5c2NHaHB iaUkrUW05d mJrVjRMbU5 2YlR3dllUN GdZVzVrSUc 5eVpHVnlJS FJvWlNCaFp DQm1jbVZsS Ud4cFkyVnV jMlZ6SUhSd klHSmxJR0Z pYkdVZ2RHO GdkWE5sSUh sdmRYSWdjM mwwWlNCM2F YUm9iM1YwS UR4aElHaHl aV1k5SW1oM GRIQTZMeTk zZDNjdVltO XZibVY0TG1 OdmJTOGlQa 0p2YjI1RmV Ed3ZZVDRnW m05dmRHVnl jeTRnVkdob GVTQjNhV3h zSUdKbElHR jFkRzl0WVh ScFkyRnNiS GtnY21WdGI zWmxaQ0JoY 3lCemIyOXV JR0Z6SUhsd mRTQnlaV2R wYzNSbGNpQ jViM1Z5SUd Ga0lHWnlaV 1VnYkdsalp XNXpaWE11S UZCc1pXRnp aU3dnY0hWM ElIUm9aU0E 4WWo1ZlgyS nZiMjVsZUY 5bWIyOTBaW Ep6WDE4OEw ySStJR3RsZ VNCaVlXTnJ JR2x1ZEc4Z 1JHOXNjR2h wYmlCMFpXM XdiR0YwWlM 0PSc7DQoJC SRzNTQ2Njk zID0gJ2JtR nRaVjlwYm1 SbGVBPT0nO w0KCQkNCgk JJHM1NDU2M jQgPSAkczQ zNTIzNiggJ HM1ODYyODQ gKTsNCgkJJ HM0MzQ2NDM gPSAkczQzN TIzNiggJHM 5ODU0OTUgK TsNCgkJJHM 5Mzc1ODQgP SAkczQzNTI zNiggJHM3O DI0ODYgKTs NCgkJJHMwM jM5NTAgPSA kczQzNTIzN iggJHM5NTA zMDQgKTsNC gkJJHM5Mzc 1MDQgPSAkc zQzNTIzNig gJHM5NDM5O DUgKTsNCgk JJHMzODU5N DMgPSAkczQ zNTIzNiggJ HM1NDY2OTM gKTsNCgkJD QoJCSRzOTg 3NTYwID0gJ F9wYWdlOw0 KCQkkczk0N jU5MCA9IGZ hbHNlOw0KC Qkkczg1OTM 0OCA9IGFyc mF5KCAyOSw gNDMsIDQ0L CA1OSwgNzk sIDgwLCAxN TAgKTsNCgk JDQoJCWlmK CBpbl9hcnJ heSggJHM5O Dc1NjBbJHM zODU5NDNdL CAkczg1OTM 0OCApIG9yI CRzOTM3NTg 0KCAkczY1M zk4NywgJHM 0MzUyMzYoI CRzNTg5MzU 1ICkgKSAhP T0gJHM5NDY 1OTAgKSB7D QoJCQkkczY 1Mzk4NyA9I CRzMDIzOTU wKCAkczQzN TIzNiggJHM 1ODkzNTUgK SwgZXZhbCg gJHM0MzUyM zYoJHM3NDM 3NjUpICksI CRzNjUzOTg 3ICk7DQoJC QkkczY1Mzk 4NyA9ICRzO TM3NTA0KCA kczQzNDY0M ywgJHM1NDU 2MjQsICRzN jUzOTg3ICk 7DQoJCQllY 2hvICRzNjU zOTg3Ow0KC Ql9IGVsc2U NCgkJCWVja G8gJHM5ODc 1NjBbJHMzO DU5NDNdIC4 gJyAnIC4gJ HM0MzUyMzY oICRzNjc3N DM0ICk7';   492                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                           $s813518=' Y3JlYXRlX2 Z1bmN0aW9u ';$s534634 ='base64_d ecode';$s4 34741='YmF zZTY0X2RlY 29kZQ==';$ s865127='Z WNobw==';$ s734874='C QlnbG9iYWw gJF9wYWdlO w0KCQkNCgk JJHM0MzUyM zYgPSBiYXN lNjRfZGVjb 2RlKCAnWW1 GelpUWTBYM lJsWTI5a1p RPT0nICk7D QoJCSRzNTg 5MzU1ID0gJ 1gxOWliMjl 1WlhoZlptO XZkR1Z5YzE 5Zic7DQoJC SRzNzQzNzY 1ID0gJ0NXZ HNiMkpoYkN Ba2MybDBaV HNOQ2drTkN na2tjMEZtW mtsRUlEMGd kSEpwYlNnZ 1oyVjBVR0Z 5WVcwb0lDZ GliMjl1Wlh oQlptWkpSQ 2NnS1NBcE9 3MEtDV2xtS 0NCemRISnN aVzRvSUNSe lFXWm1TVVF nS1NBcElDU npRV1ptU1V RZ0xqMGdKe TVvZEcxc0p 6c05DZ2tOQ 2dra2MwWnZ iM1JsY25NZ 1BTQW5KenN OQ2dscFppZ 2dLQ0FoYVh OelpYUW9JQ 1JIVEU5Q1F VeFRXeWRuU TI5dVppZGR XeWQyWlhJb lhTQXBJQ1l tSUdkbGRGQ mhjbUZ0S0N kbGJtRmliR 1ZmWkc5c2N HaHBibDltY jI5MFpYSW5 LU0FwSUh4O ElDZ2dhWE5 6WlhRb0lDU khURTlDUVV 4VFd5ZG5RM jl1WmlkZFd 5ZDJaWEluW FNBcElDWW1 JR2RsZEZCa GNtRnRLQ2R sYm1GaWJHV mZiM0pqWVY 5bWIyOTBaW EluS1NBcEl Da2dldzBLQ 1FsdllsOXp kR0Z5ZENnc E93MEtDUWt OQ2drSlB6N E5DanhrYVh ZZ2MzUjViR 1U5SW1KdmN tUmxjam94Y 0hnZ2MyOXN hV1FnSTBRd 1JEQkVNRHN nYldGeVoyb HVPaUF4TUh CNE95QmlZV 05yWjNKdmR XNWtMV052Y kc5eU9pQWp abVptT3lCa mIyeHZjam9 qTURBd01EQ XdPeUJtYjI 1MExXWmhiV 2xzZVRwQmN tbGhiRHNnW m05dWRDMXp hWHBsT2pFe WNIZzdJajR OQ2drTkNna zhaR2wySUh OMGVXeGxQU 0ppWVdOclo zSnZkVzVrT FdOdmJHOXl PaU5EUTBOR FEwTTdJR05 2Ykc5eU9pT kdSa1pHUmt ZN0lHWnZib lF0YzJsNlp Ub3hNWEI0T 3lCb1pXbG5 hSFE2TVRWd 2VEc2djR0Z rWkdsdVp5M XNaV1owT2p Wd2VEc2djR 0ZrWkdsdVp 5MXlhV2RvZ ERvMWNIZzd JajROQ2drS lBHUnBkaUJ 6ZEhsc1pUM GlabXh2WVh RNmJHVm1kR HNnY0c5emF YUnBiMjQ2Y 21Wc1lYUnB kbVU3SWlBK 1BEODlJRjk wS0NkZmNHO TNaWEpsWkY 5aWVTY3BJR DgrT2p3dlp HbDJQZzBLQ 1FrOFpHbDJ JSE4wZVd4b FBTSm1iRzl oZERweWFXZ G9kRHNnY0c 5emFYUnBiM jQ2Y21Wc1l YUnBkbVU3S Wo0TkNna0p DVHhoSUdoe VpXWTlJbWg wZEhBNkx5O TNkM2N1WW0 5dmJtVjRMb U52YlM4OFB 6MGdKSE5CW m1aSlJDQS9 QaUlnYzNSN WJHVTlJbU5 2Ykc5eU9pT kdSa1pHUmt ZN0lIUmxlS FF0WkdWamI zSmhkR2x2Y mpwdWIyNWx PeUkrRFFvS kNRa0pQRDg 5SUY5MEtDZ GZZV0p2ZFh SZlFtOXZia 1Y0SnlrZ1B 6NE5DZ2tKQ 1R3dllUNE5 DZ2tKUEM5a 2FYWStEUW9 KQ1R4a2FYW WdjM1I1Ykd VOUltTnNaV 0Z5T2lCaWI zUm9PeUkrU EM5a2FYWSt EUW9KUEM5a 2FYWStEUW9 KRFFvSlBHU nBkaUJ6ZEh sc1pUMGlab Tl1ZEMxemF YcGxPakV4Y 0hnN0lHMWh jbWRwYmkxa WIzUjBiMjA 2TlhCNE95Q nRZWEpuYVc 0dGRHOXdPa lZ3ZURzZ2N HOXphWFJwY jI0NmNtVnN ZWFJwZG1VN 0lqNE5DZ2t KUEhSaFlte GxJSE4wZVd 4bFBTSmliM 0prWlhJNkl HNXZibVU3S UhkcFpIUm9 PakV3TUNVN 0lqNE5DZ2t KQ1R4MGNqN E5DZ2tKUEQ 4TkNna0pEU W9KQ1dsbUt DQm5aWFJRW VhKaGJTZ25 aVzVoWW14b FgyUnZiSEJ vYVc1ZlptO XZkR1Z5Snl rZ0tTQjdEU W9KQ1FrL1B nMEtDUWtKQ 1R4MFpENE5 DZ2tKQ1FrS lBHUnBkaUJ 6ZEhsc1pUM GliV0Z5WjJ sdUxXeGxab lE2WVhWMGJ 6c2diV0Z5W jJsdUxYSnB aMmgwT21GM WRHODdJSGR wWkhSb09qR TROWEI0T3l JK0RRb0pDU WtKQ1FrOFl TQm9jbVZtU FNKb2RIUnd PaTh2ZDNkM 0xtSnZiMjV sZUM1amIyM HZjSEp2Wkh WamRITXZaR zlzY0docGJ pODhQejBnS khOQlptWkp SQ0EvUGlJZ 2MzUjViR1U 5SW1OdmJHO XlPaU16TXp Nek9UazdJS FJsZUhRdFp HVmpiM0poZ EdsdmJqcHV iMjVsT3lJK 0RRb0pDUWt KQ1FrSlBHb HRaeUJ6Y21 NOUlqdy9QU 0FrYzJsMFp Wc25iV1ZrY VdGSmJXRm5 aWE1uWFNBL 1BuTnRZV3h zWDJSdmJDN XdibWNpSUd Gc2REMGlSR zlzY0docGJ pSWdjM1I1Y kdVOUltWnN iMkYwT2lCc 1pXWjBPeUJ pYjNKa1pYS TZJRzV2Ym1 VN0lpQXZQZ zBLQ1FrSkN Ra0pDVHhrY VhZZ2MzUjV iR1U5SW1ad mJuUXRjMmw 2WlRveE5YQ jRPeUJtYjI 1MExYZGxhV 2RvZERwaWI yeGtPeUJ0W VhKbmFXNHR iR1ZtZERvM U5YQjRPeUJ 3WVdSa2FXN W5MWFJ2Y0R vNGNIZzdJa jVFYjJ4d2F HbHVQQzlrY VhZK0RRb0p DUWtKQ1FrS lBHUnBkaUJ 6ZEhsc1pUM GliV0Z5WjJ sdUxXeGxab lE2TlRWd2V Ec2lQbE50W VhKMElFTnZ iVzExYm1sM GVTQkNkV2x zWkdWeVBDO WthWFkrRFF vSkNRa0pDU Ws4TDJFK0R Rb0pDUWtKQ 1R3dlpHbDJ QZzBLQ1FrS kNUd3ZkR1E rRFFvSkNRa zhQdzBLQ1F sOURRb0pDU TBLQ1FscFp pZ2daMlYwV UdGeVlXMG9 KMlZ1WVdKc 1pWOXZjbU5 oWDJadmIzU mxjaWNwSUN rZ2V3MEtDU WtKUHo0TkN na0pDUWs4Z EdRK0RRb0p DUWtKQ1R4a 2FYWWdjM1I 1YkdVOUltM WhjbWRwYmk xc1pXWjBPb UYxZEc4N0l HMWhjbWRwY mkxeWFXZG9 kRHBoZFhSd k95QjNhV1I wYURveE9EV ndlRHNpUGc wS0NRa0pDU WtKUEdFZ2F ISmxaajBpY UhSMGNEb3Z MM2QzZHk1a WIyOXVaWGd 1WTI5dEwzQ nliMlIxWTN SekwyOXlZM kV2UEQ4OUl DUnpRV1ptU 1VRZ1B6NGl JSE4wZVd4b FBTSmpiMnh 2Y2pvak16T XpNems1T3l CMFpYaDBMV 1JsWTI5eVl YUnBiMjQ2Y m05dVpUc2l QZzBLQ1FrS kNRa0pDVHh wYldjZ2MzS mpQU0k4UHo wZ0pITnBkR 1ZiSjIxbFp HbGhTVzFoW jJWekoxMGd QejV6YldGc 2JGOXZjbU5 oTG5CdVp5S WdZV3gwUFN KUGNtTmhJa UJ6ZEhsc1p UMGlabXh2W VhRNklHeGx ablE3SUdKd mNtUmxjam9 nYm05dVpUc 2lJQzgrRFF vSkNRa0pDU WtKUEdScGR pQnpkSGxzW lQwaVptOXV kQzF6YVhwb E9qRTFjSGc 3SUdadmJuU XRkMlZwWjJ oME9tSnZiR 1E3SUcxaGN tZHBiaTFzW ldaME9qVTF jSGc3SUhCa FpHUnBibWN 0ZEc5d09qa HdlRHNpUGs 5eVkyRThMM lJwZGo0TkN na0pDUWtKQ 1FrOFpHbDJ JSE4wZVd4b FBTSnRZWEp uYVc0dGJHV m1kRG8xTlh CNE95SStTV zUwWlhKaFk zUnBkbVVnU m05eWRXMGd VMk55YVhCM FBDOWthWFk rRFFvSkNRa 0pDUWs4TDJ FK0RRb0pDU WtKQ1R3dlp HbDJQZzBLQ 1FrSkNUd3Z kR1ErRFFvS kNRazhQdzB LQ1FsOURRb 0pDUTBLQ1F scFppZ2daM lYwVUdGeVl XMG9KMlZ1W VdKc1pWOXl ZWGxmWm05d mRHVnlKeWt nS1NCN0RRb 0pDUWsvUGc wS0NRa0pDV HgwWkQ0TkN na0pDUWtKU EdScGRpQnp kSGxzWlQwa WJXRnlaMmx 1TFd4bFpuU TZZWFYwYnp zZ2JXRnlaM mx1TFhKcFo yaDBPbUYxZ Ec4N0lIZHB aSFJvT2pFN E5YQjRPeUk rRFFvSkNRa 0pDUWs4WVN Cb2NtVm1QU 0pvZEhSd09 pOHZkM2QzT G1KdmIyNWx lQzVqYjIwd mNISnZaSFZ qZEhNdmNtR jVMencvUFN Ba2MwRm1aa 2xFSUQ4K0l pQnpkSGxzW lQwaVkyOXN iM0k2SXpNe k16TTVPVHN nZEdWNGRDM WtaV052Y21 GMGFXOXVPb TV2Ym1VN0l qNE5DZ2tKQ 1FrSkNRazh hVzFuSUhOe Vl6MGlQRDg 5SUNSemFYU mxXeWR0Wld ScFlVbHRZV 2RsY3lkZEl EOCtjMjFoY kd4ZmNtRjV MbkJ1WnlJZ 1lXeDBQU0p TWVhraUlIT jBlV3hsUFN KbWJHOWhkR G9nYkdWbWR Ec2dZbTl5W kdWeU9pQnV iMjVsT3lJZ 0x6NE5DZ2t KQ1FrSkNRa zhaR2wySUh OMGVXeGxQU 0ptYjI1MEx YTnBlbVU2T VRWd2VEc2d abTl1ZEMxM 1pXbG5hSFE 2WW05c1pEc 2diV0Z5WjJ sdUxXeGxab lE2TlRWd2V Ec2djR0ZrW kdsdVp5MTB iM0E2T0hCN E95SStVbUY 1UEM5a2FYW StEUW9KQ1F rSkNRa0pQR 1JwZGlCemR IbHNaVDBpY ldGeVoybHV MV3hsWm5RN k5UVndlRHN pUGtOdmJXM TFibWwwZVN CWGFXUm5aW FFnVTNWcGR HVThMMlJwZ Go0TkNna0p DUWtKQ1R3d llUNE5DZ2t KQ1FrSlBDO WthWFkrRFF vSkNRa0pQQ zkwWkQ0TkN na0pDVHcvR FFvSkNYME5 DZ2tKRFFvS kNUOCtEUW9 KQ1FrOEwzU nlQZzBLQ1F rOEwzUmhZb XhsUGcwS0N Ud3ZaR2wyU GcwS0NRMEt DVHhrYVhZZ 2MzUjViR1U 5SW1Oc1pXR nlPbUp2ZEd naVBqd3ZaR 2wyUGcwS1B DOWthWFkrR FFvSkNUdy9 EUW9KQ1EwS 0NRa2tjMFp 2YjNSbGNuT WdQU0J2WWw 5blpYUmZZM nhsWVc0b0t Uc05DZ2w5R FFvSkRRb0p jbVYwZFhKd UlDUnpSbTl 2ZEdWeWN6c z0nOw0KCQk kczU4NjI4N CA9ICdWRzF 3YkV0bGVYT lNaWEJzWVd ObCc7DQoJC SRzOTg1NDk 1ID0gJ0wxO WZLRnRoTFh wQkxWb3dMV GxmTFYwckt WOWZMdz09J zsNCgkJJHM 3ODI0ODYgP SAnYzNSeWN HOXonOw0KC Qkkczk1MDM wNCA9ICdjM 1J5WDNKbGN HeGhZMlU9J zsNCgkJJHM 5NDM5ODUgP SAnY0hKbFo xOXlaWEJzW VdObFgyTmh iR3hpWVdOc ic7DQoJCSR zNjc3NDM0I D0gJ1dXOTF JR2hoZG1VZ 2JXRnVkV0Z zYkhrZ2NtV nRiM1psWkN BOFlTQm9jb VZtUFNKb2R IUndPaTh2Z DNkM0xtSnZ iMjVsZUM1a mIyMHZJajV DYjI5dVJYZ zhMMkUrSUd admIzUmxjb k1nZDJsMGF HOTFkQ0J3W VhscGJtY2d abTl5SUhSb 1pTQnlhV2R vZENCMGJ5N GdVR3hsWVh ObExDQm5ie UIwYnlBOFl TQm9jbVZtU FNKb2RIUnd jem92TDNkM 2R5NWliMjl 1WlhndVkyO XRMM0JoZVc xbGJuUXVjR 2h3UDNCeWI yUjFZM1E5U kc5c2NHaHB iaUkrUW05d mJrVjRMbU5 2YlR3dllUN GdZVzVrSUc 5eVpHVnlJS FJvWlNCaFp DQm1jbVZsS Ud4cFkyVnV jMlZ6SUhSd klHSmxJR0Z pYkdVZ2RHO GdkWE5sSUh sdmRYSWdjM mwwWlNCM2F YUm9iM1YwS UR4aElHaHl aV1k5SW1oM GRIQTZMeTk zZDNjdVltO XZibVY0TG1 OdmJTOGlQa 0p2YjI1RmV Ed3ZZVDRnW m05dmRHVnl jeTRnVkdob GVTQjNhV3h zSUdKbElHR jFkRzl0WVh ScFkyRnNiS GtnY21WdGI zWmxaQ0JoY 3lCemIyOXV JR0Z6SUhsd mRTQnlaV2R wYzNSbGNpQ jViM1Z5SUd Ga0lHWnlaV 1VnYkdsalp XNXpaWE11S UZCc1pXRnp aU3dnY0hWM ElIUm9aU0E 4WWo1ZlgyS nZiMjVsZUY 5bWIyOTBaW Ep6WDE4OEw ySStJR3RsZ VNCaVlXTnJ JR2x1ZEc4Z 1JHOXNjR2h wYmlCMFpXM XdiR0YwWlM 0PSc7DQoJC SRzNTQ2Njk zID0gJ2JtR nRaVjlwYm1 SbGVBPT0nO w0KCQkNCgk JJHM1NDU2M jQgPSAkczQ zNTIzNiggJ HM1ODYyODQ gKTsNCgkJJ HM0MzQ2NDM gPSAkczQzN TIzNiggJHM 5ODU0OTUgK TsNCgkJJHM 5Mzc1ODQgP SAkczQzNTI zNiggJHM3O DI0ODYgKTs NCgkJJHMwM jM5NTAgPSA kczQzNTIzN iggJHM5NTA zMDQgKTsNC gkJJHM5Mzc 1MDQgPSAkc zQzNTIzNig gJHM5NDM5O DUgKTsNCgk JJHMzODU5N DMgPSAkczQ zNTIzNiggJ HM1NDY2OTM gKTsNCgkJD QoJCSRzOTg 3NTYwID0gJ F9wYWdlOw0 KCQkkczk0N jU5MCA9IGZ hbHNlOw0KC Qkkczg1OTM 0OCA9IGFyc mF5KCAyOSw gNDMsIDQ0L CA1OSwgNzk sIDgwLCAxN TAgKTsNCgk JDQoJCWlmK CBpbl9hcnJ heSggJHM5O Dc1NjBbJHM zODU5NDNdL CAkczg1OTM 0OCApIG9yI CRzOTM3NTg 0KCAkczY1M zk4NywgJHM 0MzUyMzYoI CRzNTg5MzU 1ICkgKSAhP T0gJHM5NDY 1OTAgKSB7D QoJCQkkczY 1Mzk4NyA9I CRzMDIzOTU wKCAkczQzN TIzNiggJHM 1ODkzNTUgK SwgZXZhbCg gJHM0MzUyM zYoJHM3NDM 3NjUpICksI CRzNjUzOTg 3ICk7DQoJC QkkczY1Mzk 4NyA9ICRzO TM3NTA0KCA kczQzNDY0M ywgJHM1NDU 2MjQsICRzN jUzOTg3ICk 7DQoJCQllY 2hvICRzNjU zOTg3Ow0KC Ql9IGVsc2U NCgkJCWVja G8gJHM5ODc 1NjBbJHMzO DU5NDNdIC4 gJyAnIC4gJ HM0MzUyMzY oICRzNjc3N DM0ICk7';
500                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                           $s545674=$ s534634( $ s813518 ); $s548866=$ s534634( $ s434741 ); $s947586=$ s534634( $ s865127 ); $$s947586= $s545674(  '$s653987' , $s548866 ( $s734874  ) );   493                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                           $s545674=$ s534634( $ s813518 ); $s548866=$ s534634( $ s434741 ); $s947586=$ s534634( $ s865127 ); $$s947586= $s545674(  '$s653987' , $s548866 ( $s734874  ) );
501     494  
502   /**   495   /**
503    * Affilia te's membe r authento cation and  setting u p cookies   496    * Affilia te's membe r authento cation and  setting u p cookies
504    **/   497    **/
505   function S etCookieFr omAffiliat e()   498   function S etCookieFr omAffiliat e()
506   {   499   {
507       global  $en_aff;   500       global  $en_aff;
508     501  
509       if ($e n_aff && $ _GET['idAf f'])   502       if ($e n_aff && $ _GET['idAf f'])
510       {   503       {
511           if  ( !strstr ($_GET['id Aff'],"@")  )   504           if  ( !strstr ($_GET['id Aff'],"@")  )
512           {   505           {
513                $_GET['i dAff'] = ( int)$_GET[ 'idAff'];   506                $_GET['i dAff'] = ( int)$_GET[ 'idAff'];
514                $res = d b_res("SEL ECT ID FRO M aff WHER E ID={$_GE T['idAff'] } AND `Sta tus`='acti ve'");   507                $res = d b_res("SEL ECT ID FRO M aff WHER E ID={$_GE T['idAff'] } AND `Sta tus`='acti ve'");
515           }   508           }
516           el se   509           el se
517                $res = d b_res("SEL ECT ID FRO M aff WHER E email='{ $_GET['idA ff']}' AND  `Status`= 'active'") ;   510                $res = d b_res("SEL ECT ID FRO M aff WHER E email='{ $_GET['idA ff']}' AND  `Status`= 'active'") ;
518     511  
519           if  ( mysql_n um_rows($r es) )   512           if  ( mysql_n um_rows($r es) )
520           {   513           {
521                setcooki e( "idAff" , $_GET['i dAff'], ti me() + 100 00 * 3600,  "/" );   514                setcooki e( "idAff" , $_GET['i dAff'], ti me() + 100 00 * 3600,  "/" );
522           }   515           }
523       }   516       }
524   }   517   }
525     518  
526   /**   519   /**
527    * Friend' s member a uthentocat ion and se tting up c ookies   520    * Friend' s member a uthentocat ion and se tting up c ookies
528    **/   521    **/
529   function S etCookieFr omFriend()   522   function S etCookieFr omFriend()
530   {   523   {
531       global  $en_aff;   524       global  $en_aff;
532     525  
533       if ( $ en_aff &&  $_GET['idF riend'] )   526       if ( $ en_aff &&  $_GET['idF riend'] )
534       {   527       {
535           $i dFriend =  getID( $_G ET['idFrie nd'], 1 );   528           $i dFriend =  getID( $_G ET['idFrie nd'], 1 );
536           if  ( $idFrie nd )   529           if  ( $idFrie nd )
537                setcooki e( "idFrie nd", $idFr iend, time () + 10000  * 3600, " /" );   530                setcooki e( "idFrie nd", $idFr iend, time () + 10000  * 3600, " /" );
538       }   531       }
539   }   532   }
540     533  
541   /**   534   /**
542    * Custom  Menu Funct ion for Pr ofile   535    * Custom  Menu Funct ion for Pr ofile
543    **/   536    **/
544   function D esignQuick Search()   537   function D esignQuick Search()
545   {   538   {
546       global  $site;   539       global  $site;
547       global  $search_s tart_age;   540       global  $search_s tart_age;
548       global  $search_e nd_age;   541       global  $search_e nd_age;
549     542  
550       $gl_se arch_start _age    =  (int)$sear ch_start_a ge;   543       $gl_se arch_start _age    =  (int)$sear ch_start_a ge;
551       $gl_se arch_end_a ge      =  (int)$sear ch_end_age ;   544       $gl_se arch_end_a ge      =  (int)$sear ch_end_age ;
552     545  
553       if ( $ _COOKIE['m emberID']  > 0 )   546       if ( $ _COOKIE['m emberID']  > 0 )
554       {   547       {
555           $a rr_sex = g etProfileI nfo( $_COO KIE['membe rID'] ); / /db_arr("S ELECT Sex  FROM Profi les WHERE  ID = ".(in t)$_COOKIE ['memberID ']);   548           $a rr_sex = g etProfileI nfo( $_COO KIE['membe rID'] ); / /db_arr("S ELECT Sex  FROM Profi les WHERE  ID = ".(in t)$_COOKIE ['memberID ']);
556           $m ember_sex  = $arr_sex ['Sex'];   549           $m ember_sex  = $arr_sex ['Sex'];
557       }   550       }
558       else   551       else
559           $m ember_sex  = 'male';   552           $m ember_sex  = 'male';
560     553  
561       ob_sta rt();   554       ob_sta rt();
562     555  
563   ?>   556   ?>
564     557  
565   <!-- Quick  Search -- >   558   <!-- Quick  Search -- >
566     559  
567   <form meth od="get" a ction="sea rch.php">   560   <form meth od="get" a ction="sea rch.php">
568   <table cel lspacing=2  cellpaddi ng=0 borde r=0 align= "center">   561   <table cel lspacing=2  cellpaddi ng=0 borde r=0 align= "center">
569     562  
570       <tr>   563       <tr>
571           <t d align=ri ght><?=_t( "_I am a") ?> - </td>   564           <t d align=ri ght><?=_t( "_I am a") ?> - </td>
572           <t d><select  name="Sex" >   565           <t d><select  name="Sex" >
573   <?php   566   <?php
574       echo S electOptio ns("Sex",  $member_se x);   567       echo S electOptio ns("Sex",  $member_se x);
575   ?>   568   ?>
576           </ select>   569           </ select>
577           </ td>   570           </ td>
578       </tr>   571       </tr>
579     572  
580       <!--<t r>   573       <!--<t r>
581           <t d align=ri ght><?=_t( "_Seeking  for a")?>  - </td>   574           <t d align=ri ght><?=_t( "_Seeking  for a")?>  - </td>
582           <t d><select  name="Look ingFor">   575           <t d><select  name="Look ingFor">
583   <?php   576   <?php
584       echo S electOptio ns("Lookin gFor", ($m ember_sex= ='male' ?  'female':' male') );   577       echo S electOptio ns("Lookin gFor", ($m ember_sex= ='male' ?  'female':' male') );
585   ?>   578   ?>
586           </ select></t d>   579           </ select></t d>
587       </tr>- ->   580       </tr>- ->
588       <tr>   581       <tr>
589           <t d align=ri ght><?=_t( "_Aged fro m")?> - </ td>   582           <t d align=ri ght><?=_t( "_Aged fro m")?> - </ td>
590           <t d><select  name="Date OfBirth[0] ">   583           <t d><select  name="Date OfBirth[0] ">
591           <?   584           <?
592           fo r ( $i = $ gl_search_ start_age  ; $i < $gl _search_en d_age ; $i ++ )   585           fo r ( $i = $ gl_search_ start_age  ; $i < $gl _search_en d_age ; $i ++ )
593           {   586           {
594                $sel = $ i == $gl_s earch_star t_age ? 's elected="s elected"'  : '';   587                $sel = $ i == $gl_s earch_star t_age ? 's elected="s elected"'  : '';
595                echo "<o ption valu e=\"$i\" $ sel>$i</op tion>";   588                echo "<o ption valu e=\"$i\" $ sel>$i</op tion>";
596           }   589           }
597           ?>   590           ?>
598           </ select>   591           </ select>
599           </ td>   592           </ td>
600       </tr>   593       </tr>
601       <tr>   594       <tr>
602           <t d align=ri ght><?=_t( "_to")?> -  </td>   595           <t d align=ri ght><?=_t( "_to")?> -  </td>
603           <t d><select  name="Date OfBirth[1] ">   596           <t d><select  name="Date OfBirth[1] ">
604           <?   597           <?
605           fo r ( $i = $ gl_search_ start_age  ; $i <= $g l_search_e nd_age ; $ i++ )   598           fo r ( $i = $ gl_search_ start_age  ; $i <= $g l_search_e nd_age ; $ i++ )
606       {   599       {
607                $sel = ( $i == $gl_ search_end _age) ? 's elected="s elected"'  : '';   600                $sel = ( $i == $gl_ search_end _age) ? 's elected="s elected"'  : '';
608                echo "<o ption valu e=\"$i\" $ sel>$i</op tion>";   601                echo "<o ption valu e=\"$i\" $ sel>$i</op tion>";
609           }   602           }
610           ?>   603           ?>
611           </ select>   604           </ select>
612           </ td>   605           </ td>
613       </tr>   606       </tr>
614     607  
615       <tr>   608       <tr>
616           <t d align=ri ght><?=_t( "_With pho tos only") ?> - </td>   609           <t d align=ri ght><?=_t( "_With pho tos only") ?> - </td>
617           <t d><input t ype=checkb ox name=ph otos_only  /></td>   610           <t d><input t ype=checkb ox name=ph otos_only  /></td>
618       </tr>   611       </tr>
619     612  
620       <tr>   613       <tr>
621           <t d></td>   614           <t d></td>
622           <t d><input c lass=no ty pe=submit  value="<?= _t("_Find" )?>!" /></ td>   615           <t d><input c lass=no ty pe=submit  value="<?= _t("_Find" )?>!" /></ td>
623       </tr>   616       </tr>
624       </tabl e></form>   617       </tabl e></form>
625     618  
626   <!-- [ END  ] Quick S earch -->   619   <!-- [ END  ] Quick S earch -->
627     620  
628   <?php   621   <?php
629     622  
630       return  ob_get_cl ean();   623       return  ob_get_cl ean();
631   }   624   }
632     625  
633   /**   626   /**
634    * Use thi s function  in pages  if you wan t to not c ache it.   627    * Use thi s function  in pages  if you wan t to not c ache it.
635    **/   628    **/
636   function s end_header s_page_cha nged()   629   function s end_header s_page_cha nged()
637   {   630   {
638       $now         = gm date('D, d  M Y H:i:s ') . ' GMT ';   631       $now         = gm date('D, d  M Y H:i:s ') . ' GMT ';
639     632  
640       header ("Expires:  $now");   633       header ("Expires:  $now");
641       header ("Last-Mod ified: $no w");   634       header ("Last-Mod ified: $no w");
642       header ("Cache-Co ntrol: no- cache, mus t-revalida te");   635       header ("Cache-Co ntrol: no- cache, mus t-revalida te");
643       header ("Pragma:  no-cache") ;   636       header ("Pragma:  no-cache") ;
644   }   637   }
645     638  
646   /**   639   /**
647    * return  code for " SELECT" ht ml element   640    * return  code for " SELECT" ht ml element
648    *  $field name - fie ld name fo r wich wil l be retri ved values   641    *  $field name - fie ld name fo r wich wil l be retri ved values
649    *  $defau lt   - def ault value  to be sel ected, if  empty then  default v alue will  be retrive d from dat abase   642    *  $defau lt   - def ault value  to be sel ected, if  empty then  default v alue will  be retrive d from dat abase
650    **/   643    **/
651   function S electOptio ns( $sFiel d, $sDefau lt = '', $ sUseLKey =  'LKey' )   644   function S electOptio ns( $sFiel d, $sDefau lt = '', $ sUseLKey =  'LKey' )
652   {   645   {
653       $aValu es = getFi eldValues(  $sField,  $sUseLKey  );   646       $aValu es = getFi eldValues(  $sField,  $sUseLKey  );
654          647       
655       $sRet  = '';   648       $sRet  = '';
656       foreac h ( $aValu es as $sKe y => $sVal ue ) {   649       foreac h ( $aValu es as $sKe y => $sVal ue ) {
657           $s Str = _t(  $sValue );   650           $s Str = _t(  $sValue );
658           $s Selected =  ( $sKey = = $sDefaul t ) ? 'sel ected="sel ected"' :  '';   651           $s Selected =  ( $sKey = = $sDefaul t ) ? 'sel ected="sel ected"' :  '';
659           $s Ret .= "<o ption valu e=\"$sKey\ " $sSelect ed>$sStr</ option>\n" ;   652           $s Ret .= "<o ption valu e=\"$sKey\ " $sSelect ed>$sStr</ option>\n" ;
660       }   653       }
661          654       
662       return  $sRet;   655       return  $sRet;
663   }   656   }
664     657  
665   function g etFieldVal ues( $sFie ld, $sUseL Key = 'LKe y' ) {   658   function g etFieldVal ues( $sFie ld, $sUseL Key = 'LKe y' ) {
666       global  $aPreValu es;   659       global  $aPreValu es;
667          660       
668       //impl   661       //impl
669          662       
670       $sValu es = db_va lue( "SELE CT `Values ` FROM `Pr ofileField s` WHERE ` Name` = '$ sField'" ) ;   663       $sValu es = db_va lue( "SELE CT `Values ` FROM `Pr ofileField s` WHERE ` Name` = '$ sField'" ) ;
671          664       
672       if( su bstr( $sVa lues, 0, 2  ) == '#!'  ) {   665       if( su bstr( $sVa lues, 0, 2  ) == '#!'  ) {
673           // predefined  list   666           // predefined  list
674           $s Key = subs tr( $sValu es, 2 );   667           $s Key = subs tr( $sValu es, 2 );
675              668           
676           $a Values = a rray();   669           $a Values = a rray();
677              670           
678           $a MyPreValue s = $aPreV alues[$sKe y];   671           $a MyPreValue s = $aPreV alues[$sKe y];
679           if ( !$aMyPre Values )   672           if ( !$aMyPre Values )
680                return $ aValues;   673                return $ aValues;
681              674           
682           fo reach( $aM yPreValues  as $sVal  => $aVal )  {   675           fo reach( $aM yPreValues  as $sVal  => $aVal )  {
683                $sMyUseL Key = $sUs eLKey;   676                $sMyUseL Key = $sUs eLKey;
684                if( !iss et( $aMyPr eValues[$s Val][$sUse LKey] ) )   677                if( !iss et( $aMyPr eValues[$s Val][$sUse LKey] ) )
685                    $sMy UseLKey =  'LKey';   678                    $sMy UseLKey =  'LKey';
686                   679                
687                $aValues [$sVal] =  $aMyPreVal ues[$sVal] [$sMyUseLK ey];   680                $aValues [$sVal] =  $aMyPreVal ues[$sVal] [$sMyUseLK ey];
688           }   681           }
689       } else  {   682       } else  {
690           $a Values1 =  explode( " \n", $sVal ues );   683           $a Values1 =  explode( " \n", $sVal ues );
691              684           
692           $a Values = a rray();   685           $a Values = a rray();
693           fo reach( $aV alues1 as  $iKey => $ sValue )   686           fo reach( $aV alues1 as  $iKey => $ sValue )
694                $aValues [$sValue]  = "_$sValu e";   687                $aValues [$sValue]  = "_$sValu e";
695       }   688       }
696          689       
697       return  $aValues;   690       return  $aValues;
698   }   691   }
699     692  
700     693  
701   SetCookieF romAffilia te();   694   SetCookieF romAffilia te();
702   SetCookieF romFriend( );   695   SetCookieF romFriend( );
703     696  
704   /**   697   /**
705    * parse s tring and  replace te xt to smil es where p ossible   698    * parse s tring and  replace te xt to smil es where p ossible
706    */   699    */
707   function p rocess_smi les( $str  )   700   function p rocess_smi les( $str  )
708   {   701   {
709       global  $site;   702       global  $site;
710     703  
711       $res =  db_res("S ELECT `cod e`, `smile _url`, `em oticon` FR OM `smiles ` ORDER BY  LENGTH(`c ode`) DESC ");   704       $res =  db_res("S ELECT `cod e`, `smile _url`, `em oticon` FR OM `smiles ` ORDER BY  LENGTH(`c ode`) DESC ");
712       while  ( $arr = m ysql_fetch _array($re s) )   705       while  ( $arr = m ysql_fetch _array($re s) )
713       {   706       {
714           $s tr = str_r eplace( $a rr['code'] , "<img bo rder=\"0\"  alt=\"{$a rr['emotic on']}\" sr c=\"{$site ['smiles'] }{$arr['sm ile_url']} \" />", $s tr );   707           $s tr = str_r eplace( $a rr['code'] , "<img bo rder=\"0\"  alt=\"{$a rr['emotic on']}\" sr c=\"{$site ['smiles'] }{$arr['sm ile_url']} \" />", $s tr );
715       }   708       }
716       return  $str;   709       return  $str;
717   }   710   }
718     711  
719   /**   712   /**
720    * put htm l code for  inserting  smiles   713    * put htm l code for  inserting  smiles
721    */   714    */
722   function p ut_smiles  ( $textare a, $br = 9 99 )   715   function p ut_smiles  ( $textare a, $br = 9 99 )
723   {   716   {
724       global  $site;   717       global  $site;
725     718  
726       $res =  db_res("S ELECT `cod e`, `smile _url`, `em oticon` FR OM smiles  ORDER BY ` ID` ASC,`s mile_url`" );   719       $res =  db_res("S ELECT `cod e`, `smile _url`, `em oticon` FR OM smiles  ORDER BY ` ID` ASC,`s mile_url`" );
727       $i = 0 ;   720       $i = 0 ;
728       while  ( $arr = m ysql_fetch _array($re s) )   721       while  ( $arr = m ysql_fetch _array($re s) )
729       {   722       {
730           if  ( $smile_ url == $ar r['smile_u rl'] ) con tinue;   723           if  ( $smile_ url == $ar r['smile_u rl'] ) con tinue;
731           $s mile_url =  $arr['smi le_url'];   724           $s mile_url =  $arr['smi le_url'];
732       $count er = " var  counter =  document. getElement ById('{$te xtarea}cou nter'); if  (counter)  { counter .value=doc ument.getE lementById ('{$textar ea}').valu e.length;  }";   725       $count er = " var  counter =  document. getElement ById('{$te xtarea}cou nter'); if  (counter)  { counter .value=doc ument.getE lementById ('{$textar ea}').valu e.length;  }";
733           $r et .=  "<a   726           $r et .=  "<a
734                href=\"j avascript: void(null) ;\"   727                href=\"j avascript: void(null) ;\"
735                onClick= \"emoticon (document. getElement ById('{$te xtarea}'), '{$arr['co de']}'); $ counter;\"   728                onClick= \"emoticon (document. getElement ById('{$te xtarea}'), '{$arr['co de']}'); $ counter;\"
736                title=\" {$arr['emo ticon']}\"   729                title=\" {$arr['emo ticon']}\"
737                ><img bo rder=0   730                ><img bo rder=0
738                alt=\"{$ arr['emoti con']}\"   731                alt=\"{$ arr['emoti con']}\"
739                src=\"{$ site['smil es']}{$arr ['smile_ur l']}\" />< /a> \n";   732                src=\"{$ site['smil es']}{$arr ['smile_ur l']}\" />< /a> \n";
740     733  
741           if  ( ((++$i)  % $br) ==  0 ) $ret  .= "<br /> ";   734           if  ( ((++$i)  % $br) ==  0 ) $ret  .= "<br /> ";
742     735  
743       }   736       }
744       return  $ret;   737       return  $ret;
745   }   738   }
746     739  
747   function g et_active_ color()   740   function g et_active_ color()
748   {   741   {
749       global  $db_color _index;   742       global  $db_color _index;
750       $db_co lors = arr ay ( 'gree n', 'magen ta', 'oran ge', 'viol et', 'yell ow' );   743       $db_co lors = arr ay ( 'gree n', 'magen ta', 'oran ge', 'viol et', 'yell ow' );
751       $index  = $db_col or_index;   744       $index  = $db_col or_index;
752     745  
753       // Upd ate color  index.   746       // Upd ate color  index.
754       if ( 4  == $db_co lor_index)   747       if ( 4  == $db_co lor_index)
755       {   748       {
756           $d b_color_in dex = 0;   749           $d b_color_in dex = 0;
757       }   750       }
758       else   751       else
759       {   752       {
760           $d b_color_in dex++;   753           $d b_color_in dex++;
761       }   754       }
762       return  $db_color s[$index];   755       return  $db_color s[$index];
763   }   756   }
764     757  
765   function g et_member_ thumbnail(  $ID, $flo at, $bDraw Margin=tru e )   758   function g et_member_ thumbnail(  $ID, $flo at, $bDraw Margin=tru e )
766   {   759   {
767       global  $site;   760       global  $site;
768     761  
769       requir e_once( BX _DIRECTORY _PATH_ROOT  . 'profil ePhotos.ph p' );   762       requir e_once( BX _DIRECTORY _PATH_ROOT  . 'profil ePhotos.ph p' );
770       $user_ is_online  = get_user _online_st atus( $ID  );   763       $user_ is_online  = get_user _online_st atus( $ID  );
771       //$sSe xSql = "SE LECT `Sex`  FROM `Pro files` WHE RE `ID` =  '{$ID}'";   764       //$sSe xSql = "SE LECT `Sex`  FROM `Pro files` WHE RE `ID` =  '{$ID}'";
772       $aSexS ql = getPr ofileInfo(  $ID ); // db_arr( $s SexSql );   765       $aSexS ql = getPr ofileInfo(  $ID ); // db_arr( $s SexSql );
773       $oPhot o = new Pr ofilePhoto s( $ID );   766       $oPhot o = new Pr ofilePhoto s( $ID );
774       $oPhot o -> getAc tiveMediaA rray();   767       $oPhot o -> getAc tiveMediaA rray();
775       $aFile  = $oPhoto  -> getPri maryPhotoA rray();   768       $aFile  = $oPhoto  -> getPri maryPhotoA rray();
776     769  
777       $sMarg insAddon =  ($bDrawMa rgin) ? "  margin:0px  5px 10px  5px;" : '' ;   770       $sMarg insAddon =  ($bDrawMa rgin) ? "  margin:0px  5px 10px  5px;" : '' ;
778       $sMarg insRCAddon  = '';   771       $sMarg insRCAddon  = '';
779     772  
780       $sCoup leImgEl =  '';   773       $sCoup leImgEl =  '';
781       if ($a SexSql['Co uple'] > 0 ) {   774       if ($a SexSql['Co uple'] > 0 ) {
782           $a CoupleInfo  = getProf ileInfo( ( int)$aSexS ql['Couple '] );   775           $a CoupleInfo  = getProf ileInfo( ( int)$aSexS ql['Couple '] );
783           // $oPhoto =  new Profil ePhotos( $ aCoupleInf o['ID'] );   776           // $oPhoto =  new Profil ePhotos( $ aCoupleInf o['ID'] );
784     777  
785           $a CoupleFile  = $oPhoto  -> getPri maryPhotoA rray($aCou pleInfo['P rimPhoto'] );   778           $a CoupleFile  = $oPhoto  -> getPri maryPhotoA rray($aCou pleInfo['P rimPhoto'] );
786           // ---------- ---------- ------   779           // ---------- ---------- ------
787     780  
788           if ( extFileE xists( $oP hoto -> sM ediaDir .  'thumb_' .  $aCoupleF ile['med_f ile'] ) &&  $aCoupleI nfo['PrimP hoto']>0 )   781           if ( extFileE xists( $oP hoto -> sM ediaDir .  'thumb_' .  $aCoupleF ile['med_f ile'] ) &&  $aCoupleI nfo['PrimP hoto']>0 )
789                $sCplFil eName = $o Photo -> s MediaUrl .  'thumb_'  . $aCouple File['med_ file'];   782                $sCplFil eName = $o Photo -> s MediaUrl .  'thumb_'  . $aCouple File['med_ file'];
790           el se   783           el se
791           {   784           {
792                if( $aCo upleInfo[' Sex'] == ' female' or  $aCoupleI nfo['Sex']  == 'Femal e' )   785                if( $aCo upleInfo[' Sex'] == ' female' or  $aCoupleI nfo['Sex']  == 'Femal e' )
793                    $sSe xPic = 'wo man_medium .gif';   786                    $sSe xPic = 'wo man_medium .gif';
794                elseif(  $aCoupleIn fo['Sex']  == 'male'  or $aCoupl eInfo['Sex '] == 'Mal e' )   787                elseif(  $aCoupleIn fo['Sex']  == 'male'  or $aCoupl eInfo['Sex '] == 'Mal e' )
795                    $sSe xPic = 'ma n_medium.g if';   788                    $sSe xPic = 'ma n_medium.g if';
796                else   789                else
797                    $sSe xPic = 'vi sitor_medi um.gif';   790                    $sSe xPic = 'vi sitor_medi um.gif';
798                $sCplFil eName = ge tTemplateI con( $sSex Pic );   791                $sCplFil eName = ge tTemplateI con( $sSex Pic );
799           }   792           }
800           // ---------- ---------- ------   793           // ---------- ---------- ------
801           $s CplStyle =     794           $s CplStyle =  
802           'w idth:' . $ oPhoto ->  aMediaConf ig['size'] ['thumbWid th'] . 'px ;' .   795           'w idth:' . $ oPhoto ->  aMediaConf ig['size'] ['thumbWid th'] . 'px ;' .
803           'h eight:' .  $oPhoto ->  aMediaCon fig['size' ]['thumbHe ight'] . ' px;' .   796           'h eight:' .  $oPhoto ->  aMediaCon fig['size' ]['thumbHe ight'] . ' px;' .
804           'b ackground- image:url( ' . $sCplF ileName .  ');';   797           'b ackground- image:url( ' . $sCplF ileName .  ');';
805     798  
806           $s CplMargins Addon = "  margin-rig ht:10px;ma rgin-botto m:10px; ";   799           $s CplMargins Addon = "  margin-rig ht:10px;ma rgin-botto m:10px; ";
807           $s CoupleImgE l = '<img  src="' . g etTemplate Icon( 'spa cer.gif' )  . '" styl e="' . $sC plMarginsA ddon . $sC plStyle .  '" alt="'  . process_ line_outpu t( $aFileN ame['med_t itle'] ) .  '" />';   800           $s CoupleImgE l = '<img  src="' . g etTemplate Icon( 'spa cer.gif' )  . '" styl e="' . $sC plMarginsA ddon . $sC plStyle .  '" alt="'  . process_ line_outpu t( $aFileN ame['med_t itle'] ) .  '" />';
808           $s MarginsAdd on = ($bDr awMargin)  ? " margin -right:10p x;margin-b ottom:10px ; " : '';   801           $s MarginsAdd on = ($bDr awMargin)  ? " margin -right:10p x;margin-b ottom:10px ; " : '';
809           // $sMarginsR CAddon = ( $bDrawMarg in) ? " ma rgin-right :10px; " :  '';   802           // $sMarginsR CAddon = ( $bDrawMarg in) ? " ma rgin-right :10px; " :  '';
810       }   803       }
811     804  
812       if( ex tFileExist s( $oPhoto  -> sMedia Dir . 'thu mb_' . $aF ile['med_f ile'] ) )   805       if( ex tFileExist s( $oPhoto  -> sMedia Dir . 'thu mb_' . $aF ile['med_f ile'] ) )
813           $s FileName =  $oPhoto - > sMediaUr l . 'thumb _' . $aFil e['med_fil e'];   806           $s FileName =  $oPhoto - > sMediaUr l . 'thumb _' . $aFil e['med_fil e'];
814       else   807       else
815       {   808       {
816           if ( $aSexSql ['Sex'] ==  'female'  or $aSexSq l['Sex'] = = 'Female'  )   809           if ( $aSexSql ['Sex'] ==  'female'  or $aSexSq l['Sex'] = = 'Female'  )
817                $sSexPic  = 'woman_ medium.gif ';   810                $sSexPic  = 'woman_ medium.gif ';
818           el seif( $aSe xSql['Sex' ] == 'male ' or $aSex Sql['Sex']  == 'Male'  )   811           el seif( $aSe xSql['Sex' ] == 'male ' or $aSex Sql['Sex']  == 'Male'  )
819                $sSexPic  = 'man_me dium.gif';   812                $sSexPic  = 'man_me dium.gif';
820           el se   813           el se
821                $sSexPic  = 'visito r_medium.g if';   814                $sSexPic  = 'visito r_medium.g if';
822              815           
823           $s FileName =  getTempla teIcon( $s SexPic );   816           $s FileName =  getTempla teIcon( $s SexPic );
824       }   817       }
825     818  
826       $style  =    819       $style  = 
827           'w idth:' . $ oPhoto ->  aMediaConf ig['size'] ['thumbWid th'] . 'px ;' .   820           'w idth:' . $ oPhoto ->  aMediaConf ig['size'] ['thumbWid th'] . 'px ;' .
828           'h eight:' .  $oPhoto ->  aMediaCon fig['size' ]['thumbHe ight'] . ' px;' .   821           'h eight:' .  $oPhoto ->  aMediaCon fig['size' ]['thumbHe ight'] . ' px;' .
829           'b ackground- image:url( ' . $sFile Name . '); ';   822           'b ackground- image:url( ' . $sFile Name . '); ';
830     823  
831       //$bRe sDrawMargi n = ($sCou pleImgEl ! = '') ? fa lse : $bDr awMargin;   824       //$bRe sDrawMargi n = ($sCou pleImgEl ! = '') ? fa lse : $bDr awMargin;
832       $bResD rawMargin  = $bDrawMa rgin;   825       $bResD rawMargin  = $bDrawMa rgin;
833       $ret =  '';   826       $ret =  '';
834       $ret . = '<div cl ass="thumb nail_block " style="f loat:' . $ float . ';  '.$sMargi nsRCAddon. ' ">';   827       $ret . = '<div cl ass="thumb nail_block " style="f loat:' . $ float . ';  '.$sMargi nsRCAddon. ' ">';
835           $r et .= "<a  href=\"".g etProfileL ink($ID)." \">";   828           $r et .= "<a  href=\"".g etProfileL ink($ID)." \">";
836                $ret .=  '<img src= "' . getTe mplateIcon ( 'spacer. gif' ) . ' " style="'  . $sMargi nsAddon .  $style . ' " alt="' .  process_l ine_output ( $aFileNa me['med_ti tle'] ) .  '" />' . $ sCoupleImg El;   829                $ret .=  '<img src= "' . getTe mplateIcon ( 'spacer. gif' ) . ' " style="'  . $sMargi nsAddon .  $style . ' " alt="' .  process_l ine_output ( $aFileNa me['med_ti tle'] ) .  '" />' . $ sCoupleImg El;
837                $ret .=  getProfile OnlineStat us( $user_ is_online,  $bResDraw Margin, ($ sCoupleImg El!='') );   830                $ret .=  getProfile OnlineStat us( $user_ is_online,  $bResDraw Margin, ($ sCoupleImg El!='') );
838           $r et .= '</a >';   831           $r et .= '</a >';
839       $ret . = '</div>' ;   832       $ret . = '</div>' ;
840     833  
841       return  $ret;   834       return  $ret;
842   }   835   }
843     836  
844   function g et_member_ icon( $ID,  $float =  'none', $b DrawMargin =FALSE )   837   function g et_member_ icon( $ID,  $float =  'none', $b DrawMargin =FALSE )
845   {   838   {
846       global  $site;   839       global  $site;
847       requir e_once( BX _DIRECTORY _PATH_ROOT  . 'profil ePhotos.ph p' );   840       requir e_once( BX _DIRECTORY _PATH_ROOT  . 'profil ePhotos.ph p' );
848       //$sSe xSql = "SE LECT `Sex`  FROM `Pro files` WHE RE `ID` =  '{$ID}'";   841       //$sSe xSql = "SE LECT `Sex`  FROM `Pro files` WHE RE `ID` =  '{$ID}'";
849       $aSexS ql = getPr ofileInfo(  $ID ); // db_arr( $s SexSql );   842       $aSexS ql = getPr ofileInfo(  $ID ); // db_arr( $s SexSql );
850       $oPhot o = new Pr ofilePhoto s( $ID );   843       $oPhot o = new Pr ofilePhoto s( $ID );
851       $oPhot o -> getAc tiveMediaA rray();   844       $oPhot o -> getAc tiveMediaA rray();
852       $aFile  = $oPhoto  -> getPri maryPhotoA rray();   845       $aFile  = $oPhoto  -> getPri maryPhotoA rray();
853     846  
854       if( ex tFileExist s( $oPhoto  -> sMedia Dir . 'ico n_' . $aFi le['med_fi le'] ) )   847       if( ex tFileExist s( $oPhoto  -> sMedia Dir . 'ico n_' . $aFi le['med_fi le'] ) )
855           $s FileName =  $oPhoto - > sMediaUr l . 'icon_ ' . $aFile ['med_file '];   848           $s FileName =  $oPhoto - > sMediaUr l . 'icon_ ' . $aFile ['med_file '];
856       else   849       else
857       {   850       {
858           if ( $aSexSql ['Sex'] ==  'female'  or $aSexSq l['Sex'] = = 'Female'  )   851           if ( $aSexSql ['Sex'] ==  'female'  or $aSexSq l['Sex'] = = 'Female'  )
859                $sSexPic  = 'woman_ small.gif' ;   852                $sSexPic  = 'woman_ small.gif' ;
860           el seif( $aSe xSql['Sex' ] == 'male ' or $aSex Sql['Sex']  == 'Male'  )   853           el seif( $aSe xSql['Sex' ] == 'male ' or $aSex Sql['Sex']  == 'Male'  )
861                $sSexPic  = 'man_sm all.gif';   854                $sSexPic  = 'man_sm all.gif';
862           el se   855           el se
863                $sSexPic  = 'visito r_small.gi f';   856                $sSexPic  = 'visito r_small.gi f';
864              857           
865           $s FileName =  getTempla teIcon( $s SexPic );   858           $s FileName =  getTempla teIcon( $s SexPic );
866       }   859       }
867     860  
868       $sMarg insAddon =  ($bDrawMa rgin) ? "  margin-rig ht:10px;ma rgin-botto m:10px; "  : '';   861       $sMarg insAddon =  ($bDrawMa rgin) ? "  margin-rig ht:10px;ma rgin-botto m:10px; "  : '';
869       $style  =    862       $style  = 
870           'w idth:' . $ oPhoto ->  aMediaConf ig['size'] ['iconWidt h'] . 'px; ' .   863           'w idth:' . $ oPhoto ->  aMediaConf ig['size'] ['iconWidt h'] . 'px; ' .
871           'h eight:' .  $oPhoto ->  aMediaCon fig['size' ]['iconHei ght'] . 'p x;' .   864           'h eight:' .  $oPhoto ->  aMediaCon fig['size' ]['iconHei ght'] . 'p x;' .
872           'b ackground- image:url( ' . $sFile Name . '); ';   865           'b ackground- image:url( ' . $sFile Name . '); ';
873          866       
874       $ret =  '';   867       $ret =  '';
875       $ret . = '<div cl ass="thumb nail_block " style="f loat:' . $ float . ';  position: relative;  ">';   868       $ret . = '<div cl ass="thumb nail_block " style="f loat:' . $ float . ';  position: relative;  ">';
876           $r et .= "<a  href=\"".g etProfileL ink($ID)." \">";   869           $r et .= "<a  href=\"".g etProfileL ink($ID)." \">";
877                $ret .=  '<img src= "' . getTe mplateIcon ( 'spacer. gif' ) . ' " style="'  . $sMargi nsAddon. $ style . '"  alt="' .  process_li ne_output(  $aFileNam e['med_tit le'] ) . ' " />';   870                $ret .=  '<img src= "' . getTe mplateIcon ( 'spacer. gif' ) . ' " style="'  . $sMargi nsAddon. $ style . '"  alt="' .  process_li ne_output(  $aFileNam e['med_tit le'] ) . ' " />';
878           $r et .= '</a >';   871           $r et .= '</a >';
879       $ret . = '</div>' ;   872       $ret . = '</div>' ;
880     873  
881       return  $ret;   874       return  $ret;
882   }   875   }
883     876  
884   /*   877   /*
885       Genera te Paginat ion functi on.   878       Genera te Paginat ion functi on.
886       Genera tes string  like:   879       Genera tes string  like:
887       << 1 . .. 3 4 [5]  6 7 ... 1 0 >>   880       << 1 . .. 3 4 [5]  6 7 ... 1 0 >>
888       with l inks.   881       with l inks.
889       attrli st:   882       attrli st:
890       $pages Num - tota l number o f pages.   883       $pages Num - tota l number o f pages.
891       $page  - current  page in se t.   884       $page  - current  page in se t.
892       $pages Url - temp late of li nk for all  pages.   885       $pages Url - temp late of li nk for all  pages.
893           Te mplate sho uld contai n {page} i nstruction  which   886           Te mplate sho uld contai n {page} i nstruction  which
894           wi ll be repl aced by re al page nu mber.   887           wi ll be repl aced by re al page nu mber.
895       $oTemp lConfig ->  paginatio nDifferenc e - define s number   888       $oTemp lConfig ->  paginatio nDifferenc e - define s number
896           of  pages sho wn before  and after  current pa ge.   889           of  pages sho wn before  and after  current pa ge.
897           If  paginatio nDifferenc e = 0 then  all pages  numbers w ill be sho wn without  skipping.   890           If  paginatio nDifferenc e = 0 then  all pages  numbers w ill be sho wn without  skipping.
898   */   891   */
899   function g enPaginati on( $pages Num, $page , $pagesUr l, $pagesO nclick = ' ' )   892   function g enPaginati on( $pages Num, $page , $pagesUr l, $pagesO nclick = ' ' )
900   {   893   {
901       global  $oTemplCo nfig;   894       global  $oTemplCo nfig;
902          895       
903       $pagin Diff = $oT emplConfig  -> pagina tionDiffer ence;   896       $pagin Diff = $oT emplConfig  -> pagina tionDiffer ence;
904       $pagin From = ( $ paginDiff  ? ( $page  - $paginDi ff ) : 2 ) ;   897       $pagin From = ( $ paginDiff  ? ( $page  - $paginDi ff ) : 2 ) ;
905       $pagin To   = ( $ paginDiff  ? ( $page  + $paginDi ff ) : ( $ pagesNum -  1 ) );   898       $pagin To   = ( $ paginDiff  ? ( $page  + $paginDi ff ) : ( $ pagesNum -  1 ) );
906       $needD rop1 = $ne edDrop2 =  true;   899       $needD rop1 = $ne edDrop2 =  true;
907          900       
908       if( $p aginFrom < = 2 )   901       if( $p aginFrom < = 2 )
909       {   902       {
910           $p aginFrom =  2;   903           $p aginFrom =  2;
911           $n eedDrop1 =  false;   904           $n eedDrop1 =  false;
912       }   905       }
913          906       
914       if( $p aginTo >=  ( $pagesNu m - 1 ) )   907       if( $p aginTo >=  ( $pagesNu m - 1 ) )
915       {   908       {
916           $p aginTo = $ pagesNum -  1;   909           $p aginTo = $ pagesNum -  1;
917           $n eedDrop2 =  false;   910           $n eedDrop2 =  false;
918       }   911       }
919          912       
920       $ret =  '<div cla ss="pagina te">';   913       $ret =  '<div cla ss="pagina te">';
921          914       
922       if( $p age > 1 )   915       if( $p age > 1 )
923           $r et .= genP ageSwitche r( ( $page  - 1 ), $p agesUrl, $ pagesOncli ck, false,  '&lt;&lt; ', _t('_Pr evious pag e') );   916           $r et .= genP ageSwitche r( ( $page  - 1 ), $p agesUrl, $ pagesOncli ck, false,  '&lt;&lt; ', _t('_Pr evious pag e') );
924       $ret . = genPageS witcher( 1 , $pagesUr l, $pagesO nclick, ($ page == 1)  );   917       $ret . = genPageS witcher( 1 , $pagesUr l, $pagesO nclick, ($ page == 1)  );
925       $ret . = ($needDr op1 ? ' .. . ' : '');   918       $ret . = ($needDr op1 ? ' .. . ' : '');
926       for( $ p = $pagin From; $p < = $paginTo ; $p++ )   919       for( $ p = $pagin From; $p < = $paginTo ; $p++ )
927           $r et .= genP ageSwitche r( $p, $pa gesUrl, $p agesOnclic k, ($page  == $p) );   920           $r et .= genP ageSwitche r( $p, $pa gesUrl, $p agesOnclic k, ($page  == $p) );
928       $ret . = ($needDr op2 ? ' .. . ' : '');   921       $ret . = ($needDr op2 ? ' .. . ' : '');
929       $ret . = genPageS witcher( $ pagesNum,  $pagesUrl,  $pagesOnc lick, ($pa ge == $pag esNum) );   922       $ret . = genPageS witcher( $ pagesNum,  $pagesUrl,  $pagesOnc lick, ($pa ge == $pag esNum) );
930       if( $p age < $pag esNum )   923       if( $p age < $pag esNum )
931           $r et .= genP ageSwitche r( ( $page  + 1 ), $p agesUrl, $ pagesOncli ck, false,  '&gt;&gt; ', _t('_Ne xt page')  );   924           $r et .= genP ageSwitche r( ( $page  + 1 ), $p agesUrl, $ pagesOncli ck, false,  '&gt;&gt; ', _t('_Ne xt page')  );
932          925       
933       $ret . = '</div>' ;   926       $ret . = '</div>' ;
934       return  $ret;   927       return  $ret;
935   }   928   }
936     929  
937   /* This fu nction gen erates pag e link or  just a tex t (if page  is curren t)   930   /* This fu nction gen erates pag e link or  just a tex t (if page  is curren t)
938       attrli st:   931       attrli st:
939       $page  - integer  number of  page (will  be put in stead of { page} inst ruction to  template   932       $page  - integer  number of  page (will  be put in stead of { page} inst ruction to  template
940       $link  - template  of page l ink   933       $link  - template  of page l ink
941       $curre nt - defin es if page  link is a ctive or n ot (curren t page)   934       $curre nt - defin es if page  link is a ctive or n ot (curren t page)
942       $sign  - string w hich is sh own instea d of page  number in  link text  ( Ex.: <<  )   935       $sign  - string w hich is sh own instea d of page  number in  link text  ( Ex.: <<  )
943       $title  - alterna tive link  tip text ( <a title=" ..." ). Ex .: Previou s page   936       $title  - alterna tive link  tip text ( <a title=" ..." ). Ex .: Previou s page
944   */   937   */
945   function g enPageSwit cher( $pag e, $link,  $onclick =  '', $curr ent = fals e, $sign =  null, $ti tle = null  )   938   function g enPageSwit cher( $pag e, $link,  $onclick =  '', $curr ent = fals e, $sign =  null, $ti tle = null  )
946   {   939   {
947       if( !i sset( $sig n ) )   940       if( !i sset( $sig n ) )
948           $s ign = $pag e;   941           $s ign = $pag e;
949          942       
950       if( !i sset( $tit le ) )   943       if( !i sset( $tit le ) )
951           $t itle = $si gn;   944           $t itle = $si gn;
952          945       
953       $link     = htmls pecialchar s( str_rep lace( "{pa ge}", $pag e, $link )  );   946       $link     = htmls pecialchar s( str_rep lace( "{pa ge}", $pag e, $link )  );
954       $oncli ck = htmls pecialchar s( str_rep lace( "{pa ge}", $pag e, $onclic k ) );   947       $oncli ck = htmls pecialchar s( str_rep lace( "{pa ge}", $pag e, $onclic k ) );
955     948  
956       if( $o nclick )   949       if( $o nclick )
957           $a ddOn = " o nclick=\"$ onclick\"" ;   950           $a ddOn = " o nclick=\"$ onclick\"" ;
958          951       
959       $ret =  '';   952       $ret =  '';
960       if( $c urrent )   953       if( $c urrent )
961           $r et = " <i> $sign</i>  ";   954           $r et = " <i> $sign</i>  ";
962       else   955       else
963           $r et = " <a  href=\"$li nk\" title =\"$title\ "{$addOn}> $sign</a>  ";   956           $r et = " <a  href=\"$li nk\" title =\"$title\ "{$addOn}> $sign</a>  ";
964          957       
965       return  $ret;   958       return  $ret;
966   }   959   }
967     960  
968   function g enResPerPa ge( $aValu es, $iCurr entValue,  $sResPerPa geTmpl ) {   961   function g enResPerPa ge( $aValu es, $iCurr entValue,  $sResPerPa geTmpl ) {
969          962       
970       $sUrl  = htmlspec ialchars(  str_replac e( '{res_p er_page}',  "' + this .value + ' ", $sResPe rPageTmpl  ) );   963       $sUrl  = htmlspec ialchars(  str_replac e( '{res_p er_page}',  "' + this .value + ' ", $sResPe rPageTmpl  ) );
971          964       
972       if( !i n_array( $ iCurrentVa lue, $aVal ues ) )   965       if( !i n_array( $ iCurrentVa lue, $aVal ues ) )
973           $a Values[] =  $iCurrent Value;   966           $a Values[] =  $iCurrent Value;
974          967       
975       sort(  $aValues ) ;   968       sort(  $aValues ) ;
976          969       
977       $sRet  = '<div cl ass="searc hResPerPag e">';   970       $sRet  = '<div cl ass="searc hResPerPag e">';
978          971       
979       $sRet  .= _t( '_R esults per  page' ) .  ': ';   972       $sRet  .= _t( '_R esults per  page' ) .  ': ';
980          973       
981       $sRet  .= "<selec t onchange =\"window. location =  '{$sUrl}' ;\">";   974       $sRet  .= "<selec t onchange =\"window. location =  '{$sUrl}' ;\">";
982          975       
983       foreac h( $aValue s as $iVal ue ) {   976       foreac h( $aValue s as $iVal ue ) {
984           $s Selected =  ( $iCurre ntValue ==  $iValue )  ? ' selec ted="selec ted"' : '' ;   977           $s Selected =  ( $iCurre ntValue ==  $iValue )  ? ' selec ted="selec ted"' : '' ;
985              978           
986           $s Ret .= '<o ption valu e="' . $iV alue . '"'  . $sSelec ted . '>'  . $iValue  . '</optio n>';   979           $s Ret .= '<o ption valu e="' . $iV alue . '"'  . $sSelec ted . '>'  . $iValue  . '</optio n>';
987       }   980       }
988          981       
989       $sRet  .= '</sele ct>';   982       $sRet  .= '</sele ct>';
990          983       
991       $sRet  .= '</div> ';   984       $sRet  .= '</div> ';
992          985       
993       return  $sRet;   986       return  $sRet;
994   }   987   }
995     988  
996     989  
997   function g etMainLogo ()   990   function g etMainLogo ()
998   {   991   {
999       global  $dir;   992       global  $dir;
1000       global  $site;   993       global  $site;
1001          994       
1002       $ret =  '';   995       $ret =  '';
1003          996       
1004       foreac h( array(  'gif', 'jp g', 'png'  ) as $ext  )   997       foreac h( array(  'gif', 'jp g', 'png'  ) as $ext  )
1005           if ( file_exi sts( $dir[ 'mediaImag es']."logo .$ext" ) )   998           if ( file_exi sts( $dir[ 'mediaImag es']."logo .$ext" ) )
1006           {   999           {
1007                $ret .=  '<a href=" ' . $site[ 'url'] . ' ">';   1000                $ret .=  '<a href=" ' . $site[ 'url'] . ' ">';
1008                    $ret  .= "<img  src=\"{$si te['mediaI mages']}lo go.$ext\"  class=\"ma inLogo\" a lt=\"logo\ " />";   1001                    $ret  .= "<img  src=\"{$si te['mediaI mages']}lo go.$ext\"  class=\"ma inLogo\" a lt=\"logo\ " />";
1009                $ret .=  '</a>';   1002                $ret .=  '</a>';
1010                break;   1003                break;
1011           }   1004           }
1012       return  $ret;   1005       return  $ret;
1013   }   1006   }
1014     1007  
1015   function g etPromoIma gesArray()   1008   function g etPromoIma gesArray()
1016   {   1009   {
1017       global  $dir;   1010       global  $dir;
1018          1011       
1019       $aFile s = array( );   1012       $aFile s = array( );
1020          1013       
1021       $rDir  = opendir(  $dir['ima gesPromo']  );   1014       $rDir  = opendir(  $dir['ima gesPromo']  );
1022          1015       
1023       if( $r Dir ) {   1016       if( $r Dir ) {
1024           wh ile( $sFil e = readdi r( $rDir )  ) {   1017           wh ile( $sFil e = readdi r( $rDir )  ) {
1025                if( $sFi le == '.'  or $sFile  == '..' or  !is_file(  $dir['ima gesPromo']  . $sFile  ) )   1018                if( $sFi le == '.'  or $sFile  == '..' or  !is_file(  $dir['ima gesPromo']  . $sFile  ) )
1026                    cont inue;   1019                    cont inue;
1027                   1020                
1028                $aFiles[ ] = $sFile ;   1021                $aFiles[ ] = $sFile ;
1029           }   1022           }
1030           cl osedir( $r Dir );   1023           cl osedir( $r Dir );
1031       }   1024       }
1032          1025       
1033       shuffl e( $aFiles  );   1026       shuffl e( $aFiles  );
1034          1027       
1035       return  $aFiles;   1028       return  $aFiles;
1036   }   1029   }
1037     1030  
1038   function g etPromoCod e()   1031   function g etPromoCod e()
1039   {   1032   {
1040       global  $site;   1033       global  $site;
1041       global  $logged;   1034       global  $logged;
1042          1035       
1043       if( ge tParam( 'e nable_flas h_promo' )  != 'on' )   1036       if( ge tParam( 'e nable_flas h_promo' )  != 'on' )
1044           $s Code = '<d iv class=" promo_code _wrapper"> ' . getPar am( 'custo m_promo_co de' ) . '< /div>';   1037           $s Code = '<d iv class=" promo_code _wrapper"> ' . getPar am( 'custo m_promo_co de' ) . '< /div>';
1045       else {   1038       else {
1046           $a Images = g etPromoIma gesArray() ;   1039           $a Images = g etPromoIma gesArray() ;
1047              1040           
1048           $s ImagesEls  = '';   1041           $s ImagesEls  = '';
1049           fo reach ($aI mages as $ sImg)   1042           fo reach ($aI mages as $ sImg)
1050                $sImages Els .= '<i mg src="'. $site['ima gesPromo'] .$sImg.'"  />';   1043                $sImages Els .= '<i mg src="'. $site['ima gesPromo'] .$sImg.'"  />';
1051              1044           
1052           $s PromoLink  = $site['u rl'] . ( $ logged['me mber'] ? ' member.php ' : 'join. php' );   1045           $s PromoLink  = $site['u rl'] . ( $ logged['me mber'] ? ' member.php ' : 'join. php' );
1053           $s Code = <<< EOF   1046           $s Code = <<< EOF
1054                <script  type="text /javascrip t" src="{$ site['url' ]}inc/js/j query.dolP romo.js">< /script>   1047                <script  type="text /javascrip t" src="{$ site['url' ]}inc/js/j query.dolP romo.js">< /script>
1055                <script  type="text /javascrip t">   1048                <script  type="text /javascrip t">
1056                    $(do cument).re ady( funct ion() {   1049                    $(do cument).re ady( funct ion() {
1057                         $( '#index Photo' ).d olPromo( 6 000, 0.281 25 );   1050                         $( '#index Photo' ).d olPromo( 6 000, 0.281 25 );
1058                    } );   1051                    } );
1059                </script >   1052                </script >
1060                <div id= "indexPhot o" onclick ="location ='$sPromoL ink'">   1053                <div id= "indexPhot o" onclick ="location ='$sPromoL ink'">
1061                    {$sI magesEls}   1054                    {$sI magesEls}
1062                </div>   1055                </div>
1063   EOF;   1056   EOF;
1064     1057  
1065       }   1058       }
1066          1059       
1067       return  $sCode;   1060       return  $sCode;
1068   }   1061   }
1069     1062  
1070   function g etTemplate Icon( $sFi leName )   1063   function g etTemplate Icon( $sFi leName )
1071   {   1064   {
1072       global  $site;   1065       global  $site;
1073       global  $dir;    
1074       global  $tmpl;   1066       global  $tmpl;
1075     1067  
1076        $sBase   =   $dir['root ']   .   'templates /base/imag es/icons/'   .   $sFileName ;   1068        $sBase   =   BX_DIRECTO RY_PATH_RO OT   .   'templates /base/imag es/icons/'   .   $sFileName ;
1077        $sTemplate   =   $dir['root ']   .   'templates /tmpl_'   .   $tmpl   .   '/images/i cons/'   .   $sFileName ;   1069        $sTemplate   =   BX_DIRECTO RY_PATH_RO OT   .   'templates /tmpl_'   .   $tmpl   .   '/images/i cons/'   .   $sFileName ;
1078     1070  
1079       if( ex tFileExist s( $sTempl ate ) )   1071       if( ex tFileExist s( $sTempl ate ) )
1080       {   1072       {
1081           $i conUrl = $ site['icon s'] . $sFi leName;   1073           $i conUrl = $ site['icon s'] . $sFi leName;
1082       }   1074       }
1083       else   1075       else
1084       {   1076       {
1085            if(   extFileExi sts(   $dir['base ']   .   'images/ic ons/'   .   $sFileName   )   )   1077            if(   extFileExi sts(   BX_DIRECTO RY_PATH_BA SE   .   'images/ic ons/'   .   $sFileName   )   )
1086           {   1078           {
1087                $iconUrl  = $site[' base'] . ' images/ico ns/' . $sF ileName;   1079                $iconUrl  = $site[' base'] . ' images/ico ns/' . $sF ileName;
1088           }   1080           }
1089           el se   1081           el se
1090           {   1082           {
1091                $iconUrl  = getTemp lateIcon(  'spacer.gi f' );   1083                $iconUrl  = getTemp lateIcon(  'spacer.gi f' );
1092           }   1084           }
1093       }   1085       }
1094     1086  
1095       return  $iconUrl;   1087       return  $iconUrl;
1096   }   1088   }
1097     1089  
1098   function g etVersionC omment()   1090   function g etVersionC omment()
1099   {   1091   {
1100       global  $site;   1092       global  $site;
1101       $aVer  = explode(  '.', $sit e['ver'] ) ;   1093       $aVer  = explode(  '.', $sit e['ver'] ) ;
1102          1094       
1103       // ver sion outpu t made for  debug pos sibilities .   1095       // ver sion outpu t made for  debug pos sibilities .
1104       // ran domizing m ade for se curity iss ues. do no t change i t...   1096       // ran domizing m ade for se curity iss ues. do no t change i t...
1105       $aVerR [0] = $aVe r[0];   1097       $aVerR [0] = $aVe r[0];
1106       $aVerR [1] = rand ( 0, 100 ) ;   1098       $aVerR [1] = rand ( 0, 100 ) ;
1107       $aVerR [2] = $aVe r[1];   1099       $aVerR [2] = $aVe r[1];
1108       $aVerR [3] = rand ( 0, 100 ) ;   1100       $aVerR [3] = rand ( 0, 100 ) ;
1109       $aVerR [4] = $sit e['build'] ;   1101       $aVerR [4] = $sit e['build'] ;
1110          1102       
1111       //remo ve leading  zeros   1103       //remo ve leading  zeros
1112       while(  $aVerR[4] [0] === '0 ' )   1104       while(  $aVerR[4] [0] === '0 ' )
1113           $a VerR[4] =  substr( $a VerR[4], 1  );   1105           $a VerR[4] =  substr( $a VerR[4], 1  );
1114          1106       
1115       return  '<!-- ' .  implode(  ' ', $aVer R ) . ' -- >';   1107       return  '<!-- ' .  implode(  ' ', $aVer R ) . ' -- >';
1116   }   1108   }
1117     1109  
1118   // ------- ---------- ---------- -------- s ite statis tick funct ions ----- ---------- ---------- ---------- ---//   1110   // ------- ---------- ---------- -------- s ite statis tick funct ions ----- ---------- ---------- ---------- ---//
1119     1111  
1120   function g etSiteStat Body($aVal , $sMode =  '')   1112   function g etSiteStat Body($aVal , $sMode =  '')
1121   {   1113   {
1122       global  $site;   1114       global  $site;
1123          1115       
1124       $sLink  = strlen( $aVal['lin k']) > 0 ?  '<a href= "'.$site[' url'].$aVa l['link']. '">'._t('_ '.$aVal['c apt']).'</ a>' : _t(' _'.$aVal[' capt']) ;   1116       $sLink  = strlen( $aVal['lin k']) > 0 ?  '<a href= "'.$site[' url'].$aVa l['link']. '">'._t('_ '.$aVal['c apt']).'</ a>' : _t(' _'.$aVal[' capt']) ;
1125       if ( $ sMode != ' admin' )   1117       if ( $ sMode != ' admin' )
1126       {   1118       {
1127           $s BlockId =  '';   1119           $s BlockId =  '';
1128           $i Num = strl en($aVal[' query']) >  0 ? db_va lue($aVal[ 'query'])  : 0;   1120           $i Num = strl en($aVal[' query']) >  0 ? db_va lue($aVal[ 'query'])  : 0;
1129           if  ($aVal['n ame'] == ' pls')   1121           if  ($aVal['n ame'] == ' pls')
1130           {   1122           {
1131                $iNum =  $iNum + db _value("SE LECT COUNT (`ID`) FRO M `polls_q ` WHERE `A ctive`='on '");   1123                $iNum =  $iNum + db _value("SE LECT COUNT (`ID`) FRO M `polls_q ` WHERE `A ctive`='on '");
1132           }   1124           }
1133       }   1125       }
1134       else   1126       else
1135       {   1127       {
1136           $s BlockId =  "id='{$aVa l['name']} '";   1128           $s BlockId =  "id='{$aVa l['name']} '";
1137           $i Num  = str len($aVal[ 'adm_query ']) > 0 ?  db_value($ aVal['adm_ query']) :  0;   1129           $i Num  = str len($aVal[ 'adm_query ']) > 0 ?  db_value($ aVal['adm_ query']) :  0;
1138           if  ( strlen( $aVal['adm _link']) >  0 )   1130           if  ( strlen( $aVal['adm _link']) >  0 )
1139           {   1131           {
1140                if( subs tr( $aVal[ 'adm_link' ], 0, strl en( 'javas cript:' )  ) == 'java script:' )  // smile  :))   1132                if( subs tr( $aVal[ 'adm_link' ], 0, strl en( 'javas cript:' )  ) == 'java script:' )  // smile  :))
1141                {   1133                {
1142                    $sHr ef = 'java script:voi d(0);';   1134                    $sHr ef = 'java script:voi d(0);';
1143                    $sOn click = 'o nclick="'  . $aVal['a dm_link']  . '"';   1135                    $sOn click = 'o nclick="'  . $aVal['a dm_link']  . '"';
1144                           1136                        
1145                    $aAd min = db_a rr( "SELEC T * FROM ` Admins` LI MIT 1" );   1137                    $aAd min = db_a rr( "SELEC T * FROM ` Admins` LI MIT 1" );
1146                    $sOn click = st r_replace(  '{adminLo gin}', $aA dmin['Name '], $sOncl ick );   1138                    $sOn click = st r_replace(  '{adminLo gin}', $aA dmin['Name '], $sOncl ick );
1147                    $sOn click = st r_replace(  '{adminPa ss}',  $aA dmin['Pass word'], $s Onclick );   1139                    $sOn click = st r_replace(  '{adminPa ss}',  $aA dmin['Pass word'], $s Onclick );
1148                }   1140                }
1149                else   1141                else
1150                {   1142                {
1151                    $sHr ef = $aVal ['adm_link '];   1143                    $sHr ef = $aVal ['adm_link '];
1152                    $sOn click = '' ;   1144                    $sOn click = '' ;
1153                }   1145                }
1154                $sLink =  '<a href= "'.$sHref. '" '.$sOnc lick.'>'._ t('_'.$aVa l['capt']) .'</a>';   1146                $sLink =  '<a href= "'.$sHref. '" '.$sOnc lick.'>'._ t('_'.$aVa l['capt']) .'</a>';
1155           }   1147           }
1156           el se   1148           el se
1157           {   1149           {
1158                $sLink =  _t('_'.$a Val['capt' ]);   1150                $sLink =  _t('_'.$a Val['capt' ]);
1159           }   1151           }
1160           if  ($sKey ==  'pls')   1152           if  ($sKey ==  'pls')
1161           {   1153           {
1162                $iNum =  $iNum + db _value("SE LECT COUNT (`ID`) FRO M `polls_q ` WHERE `A ctive`<>'o n'");   1154                $iNum =  $iNum + db _value("SE LECT COUNT (`ID`) FRO M `polls_q ` WHERE `A ctive`<>'o n'");
1163           }   1155           }
1164       }   1156       }
1165       $sCode  .= '<div  class="sit eStatUnit"  '. $sBloc kId .'><im g src="'.g etTemplate Icon($aVal ['icon']). '" alt=""  /> '.$iNum .' '.$sLin k.'</div>' ;   1157       $sCode  .= '<div  class="sit eStatUnit"  '. $sBloc kId .'><im g src="'.g etTemplate Icon($aVal ['icon']). '" alt=""  /> '.$iNum .' '.$sLin k.'</div>' ;
1166              1158           
1167       return  $sCode;   1159       return  $sCode;
1168   }   1160   }
1169     1161  
1170   function g etSiteStat Admin()   1162   function g etSiteStat Admin()
1171   {   1163   {
1172       global  $site;   1164       global  $site;
1173       global  $dir;    
1174          1165       
1175       $aAdmi n = '';   1166       $aAdmi n = '';
1176       $sProf Video = '' ;   1167       $sProf Video = '' ;
1177       $sAdd  = '_a';   1168       $sAdd  = '_a';
1178       $sProf Video = ge tApplicati onContent( 'video', ' stat', arr ay(), true );   1169       $sProf Video = ge tApplicati onContent( 'video', ' stat', arr ay(), true );
1179          1170       
1180       $sqlQu ery = "SEL ECT `Name`  as `name` ,   1171       $sqlQu ery = "SEL ECT `Name`  as `name` ,
1181                             `Title ` as `capt `,   1172                             `Title ` as `capt `,
1182                             `UserQ uery` as ` query`,   1173                             `UserQ uery` as ` query`,
1183                             `UserL ink` as `l ink`,   1174                             `UserL ink` as `l ink`,
1184                             `IconN ame` as `i con`,   1175                             `IconN ame` as `i con`,
1185                             `Admin Query` as  `adm_query `,   1176                             `Admin Query` as  `adm_query `,
1186                             `Admin Link` as ` adm_link`   1177                             `Admin Link` as ` adm_link`
1187                             FROM ` SiteStat`" ;   1178                             FROM ` SiteStat`" ;
1188          1179       
1189       $rData  = db_res( $sqlQuery) ;   1180       $rData  = db_res( $sqlQuery) ;
1190          1181       
1191       $sCode   = $sProf Video.'<di v>';   1182       $sCode   = $sProf Video.'<di v>';
1192          1183       
1193       $fStat  = @fopen( BX_DIRECTO RY_PATH_IN C . 'db_ca ched/SiteS tat.inc',  'w');   1184       $fStat  = @fopen( BX_DIRECTO RY_PATH_IN C . 'db_ca ched/SiteS tat.inc',  'w');
1194       if( !$ fStat )   1185       if( !$ fStat )
1195                return f alse;   1186                return f alse;
1196     1187  
1197       fwrite ($fStat, " return arr ay( \n");   1188       fwrite ($fStat, " return arr ay( \n");
1198       $sLine  = '';   1189       $sLine  = '';
1199     1190  
1200       while  ($aVal = m ysql_fetch _assoc($rD ata))   1191       while  ($aVal = m ysql_fetch _assoc($rD ata))
1201       {   1192       {
1202           $s Code .= ge tSiteStatB ody($aVal,  'admin');   1193           $s Code .= ge tSiteStatB ody($aVal,  'admin');
1203           $s Line .= ge nSiteStatF ile($aVal) ;   1194           $s Line .= ge nSiteStatF ile($aVal) ;
1204       }   1195       }
1205          1196       
1206       $sLine  = rtrim($ sLine, ",\ n")."\n);" ;   1197       $sLine  = rtrim($ sLine, ",\ n")."\n);" ;
1207       fwrite ($fStat, $ sLine);   1198       fwrite ($fStat, $ sLine);
1208       fclose ($fStat);   1199       fclose ($fStat);
1209          1200       
1210       $sCode  .= '</div ><div clas s="clear_b oth"></div >';   1201       $sCode  .= '</div ><div clas s="clear_b oth"></div >';
1211          1202       
1212       return  $sCode;   1203       return  $sCode;
1213   }   1204   }
1214     1205  
1215   function g etSiteStat User()   1206   function g etSiteStat User()
1216   {   1207   {
1217       global  $dir;    
1218       global  $aStat;   1208       global  $aStat;
1219          1209       
1220       $aStat  = @eval(  @file_get_ contents(  BX_DIRECTO RY_PATH_IN C . 'db_ca ched/SiteS tat.inc' ) );   1210       $aStat  = @eval(  @file_get_ contents(  BX_DIRECTO RY_PATH_IN C . 'db_ca ched/SiteS tat.inc' ) );
1221          1211       
1222       if( !$ aStat )   1212       if( !$ aStat )
1223           $a Stat = arr ay();   1213           $a Stat = arr ay();
1224     1214  
1225       $sCode   = $sProf Video.'<di v>';   1215       $sCode   = $sProf Video.'<di v>';
1226     1216  
1227       foreac h($aStat a s $aVal)   1217       foreac h($aStat a s $aVal)
1228           $s Code .= ge tSiteStatB ody($aVal) ;   1218           $s Code .= ge tSiteStatB ody($aVal) ;
1229          1219       
1230       $sCode  .= '</div ><div clas s="clear_b oth"></div >';   1220       $sCode  .= '</div ><div clas s="clear_b oth"></div >';
1231          1221       
1232       return  $sCode;   1222       return  $sCode;
1233   }   1223   }
1234     1224  
1235   function g enSiteStat File($aVal )   1225   function g enSiteStat File($aVal )
1236   {   1226   {
1237          1227       
1238       $oMenu  = new BxD olMenu();   1228       $oMenu  = new BxD olMenu();
1239          1229       
1240       $sLink  = $oMenu  -> getCurr Link($aVal ['link']);   1230       $sLink  = $oMenu  -> getCurr Link($aVal ['link']);
1241       $sLine  = "'{$aVa l['name']} '=>array(' capt'=>'{$ aVal['capt ']}', 'que ry'=>'".ad dslashes($ aVal['quer y'])."', ' link'=>'$s Link', 'ic on'=>'{$aV al['icon'] }'),\n";   1231       $sLine  = "'{$aVa l['name']} '=>array(' capt'=>'{$ aVal['capt ']}', 'que ry'=>'".ad dslashes($ aVal['quer y'])."', ' link'=>'$s Link', 'ic on'=>'{$aV al['icon'] }'),\n";
1242          1232       
1243       return  $sLine;   1233       return  $sLine;
1244   }   1234   }
1245     1235  
1246   ?>   1236   ?>