One Hat Cyber Team

View File Name : functions.php

<?

$nav_links=array("index.php" => enruua("Main page","Главная страница управления","Головна сторінка конфігурації"),
"manage_authors.php" => enruua("Table of authors","Таблица авторов","Таблиця авторів"), 
"manage_articles.php" =>
enruua("Table of articles","Таблица статей","Таблиця статей"));


$www = "http://www.imath.kiev.ua/~nosc";
$publname="Нелінійні коливання";

function language_button($which_lang,$style)
{
 global $lang,$where,$volume,$number,$article_id,$author_id,$who,$search_what,
 $fullcontents;
  if (!$style) $style="button_language_small";
 $which_lang = trim($which_lang);
 
  switch($style)
  {case "button_language_small":
  
  $v="<a title=\"".enruua_var($which_lang,"Select the English 
language","Читать по-русски","Читати українською")."\" ";
 $v=$v." class=";
   if($lang==$which_lang) $v=$v.$style."_selected";  else 
{$v=$v.$style; }
  $v=$v." href=\"".$_SERVER['PHP_SELF']."?lang=".$which_lang;
    if ($volume) $v=$v."&volume=".$volume;
      if ($number) $v=$v."&number=".$number;
        if ($article_id) $v=$v."&article_id=".$article_id;
	  if ($author_id) $v=$v."&author_id=".$author_id;
	    if ($search_what) $v=$v."&search_what=".$search_what;
	      if ($fullcontents) $v=$v."&fullcontents=".$fullcontents;
	        if ($who) $v=$v."&who=".$who;
		  if ($where) {
		   $v=$v."&where=".$where."#".$where;}
		   $v= $v."\">".enruua_var($which_lang,"In 
English","По-русски","Українською")."</a>";
   break;
   
    case "flag":
    
       $v = "<a title=\"".enruua_var($which_lang,"in English","По-русски","Українською")."\" ";
   $v=$v." href=\"".$_SERVER['PHP_SELF']."?lang=".$which_lang;
     if ($volume) $v=$v."&volume=".$volume;
       if ($number) $v=$v."&number=".$number;
         if ($article_id) $v=$v."&article_id=".$article_id;
	   if ($author_id) $v=$v."&author_id=".$author_id;
	     if ($search_what) $v=$v."&search_what=".$search_what;
	       if ($fullcontents) $v=$v."&fullcontents=".$fullcontents;
	         if ($who) $v=$v."&who=".$who;
		   if ($where) { $v=$v."&where=".$where."#".$where;}
$v= $v."\">";
$v = $v."<img class=\"flag\" src=\"icons/".$which_lang.".png\" 
alt=\"".enruua_var($which_lang,"English","По-русски","Українською")."\"".">"."</a>";
 
  break;
  } //switch
  
  return $v;
  
}// language_button

function language_select($style)
{
global $lang;
if (!$style) $style="button_language_small";
$res="";
$langs = array("en","ru","ua");
while ($i = current($langs))
{
 if (trim($lang) !=$i)
   {
      if ($res) $res = $res." ";
         $res = $res.language_button($i,$style);
	    }
	       next($langs);
	        }
		return $res;
		} //function
		

function note($text)
{global $lang;
return "<div class=admin_note>\n<h4>".enruua("Note","Примечание","Примiтка").":</h4>\n"."<p><small>".$text.".</small></p></div>\n";
}//note

function author_edit_link($id,$title="")
{global $lang;
 if (!trim($title)) $title="<b>".$id."</b>";
return "<a href=manage_authors_action.php?id_selected=".$id."&todo=modify&lang=".$lang."#main>".$title."</a>";
} //author_edit_link 
//NB: This is a *modified* copy from ../functions.php!

function article_edit_link($id,$title="")
{global $lang;
 if (!trim($title)) $title="<b>".$id."</b>";
return "<a href=manage_articles_action.php?id_selected=".$id."&todo=modify&lang=".$lang."#main>".$title."</a>";
} //author_edit_link 

function status($key)
{global $lang;
 switch ($key)
{
case "rejected": 
 $s=enruua("rejected","отклонена","відхилено");
 break;

case "accepted": 
 $s=enruua("accepted","принята к печати","прийнято до друку");
 break;
 
 case "review_1": 
 $s=enruua("under refereeing","на рецензировании","на рецензіюванні");
 break;
 
  case "review_2": 
 $s=enruua("under second refereeing",
 "на повторном рецензировании","на повторному рецензіюванні");
 break;
 
  case "published": 
 $s=enruua("published","опубликована","опубліковано");
 break;
}
 return $s;
}//status

function fill_var_enruua($varprefix,$trim="1")
{ global $lang,${$varprefix."_en"},${$varprefix."_ru"},${$varprefix."_ua"};

$l["en"] = array(0 => "ru", 1=> "ua");
$l["ru"] = array(0 => "en", 1=> "ua");
$l["ua"] = array(0 => "en", 1=> "ru");

//echo "filling \"$varprefix...\"";

 if ($trim) {${$varprefix."_en"} = trim(${$varprefix."_en"});
${$varprefix."_ru"} = trim(${$varprefix."_ru"});
${$varprefix."_ua"} = trim(${$varprefix."_ua"});
}

$vl = ${$varprefix."_".$lang};
//echo "[vl = \"$vl\", lang=\"$lang\"]";

 if ($vl)
 {// echo "<p>".$varprefix."_".$lang." is non-empty (".$vl.")</p>\n";
  while (list($litem,$val)=each($l["$lang"]))
    {
    // echo "(litem=$litem, val=$val) ";
     if (!${$varprefix."_".$val}) 
       { ${$varprefix."_".$val} = $vl;
      // echo "<new value of ".$varprefix."_".$val." is ".${$varprefix."_".$val}."> ";
       }
    }//while
 } //iflang

} //fill...


function enruua($en,$ru,$ua)
{
  global $lang;
  switch ($lang){
  case "en": 
    return $en; break;

  case "ru": 
   return $ru; break;

  case "ua": 
    return $ua; break;
  }
}

// to convert cyrillic text (windows-1251) to english
// letters (e.g. for sending to a cell phone)

function koi2transl( $text_koi )
{ 
$text = convert_cyr_string ( $text_koi, "k", "w");

 $cyrlet = 'юабцде╗фгхийклмнопярстужвьызшэщчъ'.
          'ЮАБЦДЕ╦ФГХИЙКЛМНОПЯРСТУЖВЬЫЗШЭЩЧЪ';

 $englet = 'ABVGD   ZIJKLMNOPRSTUFHC   `Y`E  '.
           'abvgd   zijklmnoprstufhc   `y`e  ';

 $result = '';
 for ( $i=0; $i<strlen($text); $i++ ) {
   $c1 = $text[ $i ];
   $p1 = strpos( $cyrlet, $c1 );
  if ( $p1 === FALSE ) { $result .= $c1; continue; }

   $ct = $englet[ $p1 ];
   if ( $ct != ' ' ) { $result .= $ct; continue; }
  switch ( $c1 )
   {
     case 'е':
       $ct = 'Je';
      break;

     case 'Е':
       $ct = 'e';
      break;

     case '╗':
       $ct = 'Jo';
      break;

     case '╦':
       $ct = 'jo';
      break;

     case 'ф':
       $ct = 'Zh';
      break;

     case 'Ф':
       $ct = 'zh';
      break;

     case 'в':
       $ct = 'Ch';
      break;

     case 'В':
       $ct = 'ch';
      break;

     case 'ь':
       $ct = 'Sh';
      break;

     case 'Ь':
       $ct = 'sh';
      break;

     case 'ы':
       $ct = 'Sch';
      break;

     case 'Ы':
       $ct = 'sch';
      break;

     case 'ч':
       $ct = 'Ju';
      break;

     case 'Ч':
       $ct = 'ju';
      break;

     case 'ъ':
       $ct = 'Ja';
      break;

     case 'Ъ':
       $ct = 'ja';
      break;

     default:
       $ct = '?';
   }
   $result .= $ct;
 }
 return $result;
}

?>