Go to most recent revision | Blame | Last modification | View Log | RSS feed
<?php// This library is free software; you can redistribute it and/or// modify it under the terms of the GNU Lesser General Public// License as published by the Free Software Foundation; either// version 2.1 of the License, or (at your option) any later version.//// This library is distributed in the hope that it will be useful,// but WITHOUT ANY WARRANTY; without even the implied warranty of// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU// Lesser General Public License for more details.//// You should have received a copy of the GNU Lesser General Public// License along with this library; if not, write to the Free Software// Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA//------------------------------------------------------------------------------//==============================================================================// gs_hex2bin ($data)// $data : hex data (string) to be converted to binary.//// Convert hex value into binary value.//==============================================================================function gs_hex2bin ($data) {$len = strlen ($data);return pack ("H$len", $data);}//==============================================================================// gs_localizeTimestamp ($ts, $locale)// $ts : unix time stamp// $locale : locale code//// Convert an unix time stamp in respect with locale (en, fr, sp).//==============================================================================function gs_localizeTimestamp ($ts, $locale) {$format = 'Y/m/d H:m:s';if ($locale == 'fr') $format = 'd/m/Y H:m:s';if ($locale == 'sp') $format = 'd/m/Y H:m:s';return date ($format, $ts);}//==============================================================================// gs_localizeDate ($date, $locale)// $date : date (MySQL format: YYYY-MM-DD)// $locale : locale code//// Convert a MySQL date in respect with locale (en, fr, sp).//==============================================================================function gs_localizeDate ($date, $locale) {$dateArray = explode ('-', $date);$y = $dateArray[0];$m = $dateArray[1];$d = $dateArray[2];if ($locale == 'en') return "$y/$m/$d";if ($locale == 'fr') return "$d/$m/$y";if ($locale == 'sp') return "$d/$m/$y";return $date;}//==============================================================================// gs_localizeDateTime ($date, $locale)// $datetime : datetime field (MySQL format: YYYY-MM-DD HH:MM:SS)// $locale : locale code//// Convert a MySQL date in respect with locale (en, fr, sp).//==============================================================================function gs_localizeDateTime ($datetime, $locale) {$date = substr ($datetime, 0, 10);$time = substr ($datetime, 11, 8);return gs_localizeDate ($date, $locale).' - '.$time;}//==============================================================================// gs_localizeDate2MySQL ($date, $locale)// $date : date (following locale)// $locale : locale code//// Convert a date to MySQL format in respect with locale (en, fr, sp).//==============================================================================function gs_localizeDate2MySQL ($date, $locale) {$dateArray = explode ('/', $date);if ($locale == 'en') return "$dateArray[0]-$dateArray[1]-$dateArray[2]";if ($locale == 'fr') return "$dateArray[2]-$dateArray[1]-$dateArray[0]";if ($locale == 'sp') return "$dateArray[2]-$dateArray[1]-$dateArray[0]";return $date;}//==============================================================================// gs_getLabel ($db, $link, $ident, $locale, $appl, $entities)// $db : database name// $link : database link// $ident : label name// $locale : locale code// $appl : application name// $entities : htmlentities transformation ?//// Get localized label. If the label appears into a JavaScript string, $entities// MUST be false.//==============================================================================function gs_getLabel ($dbname, $link, $ident, $locale, $appl = '', $entities = true) {static $labelsCache = array ();$tag = "$ident $locale $appl";if (isset ($labelsCache[$tag])) {return ($entities ? htmlentities ($labelsCache[$tag]) : $labelsCache[$tag]);}$query ="select L_TRANSLATION from $dbname.LABELS"." where L_IDENT='$ident' and L_LOCALE='$locale' and L_APPL='$appl'";$result = mysql_query ($query, $link);if (! $result) {die ("Unable to perform query ($query / " . mysql_error ($link) . ")");}if (mysql_num_rows ($result) == 0) {mysql_free_result ($result);return "($ident)";}$row = mysql_fetch_object ($result);mysql_free_result ($result);$labelsCache[$tag] = $row->L_TRANSLATION;return ($entities ? htmlentities ($row->L_TRANSLATION) : $row->L_TRANSLATION);}//==============================================================================// gs_buildControlAndPages ($db, $link, $locale, $url, $first, $max, $numItems,// $noResponse, $oneResponse, $responses,// $width, $style, $imgdir)// $db : database name// $link : database link// $locale : locale code// $url : URL to show datas, without first and max limits// $first : in the result set, the index of the first item to show// $max : max count of results by page// $numItems : results count// $noResponse : label (if no responses)// $oneResponse : label (if only one response)// $responses : label (if more than one response)// $width : table widh (if equal to zero, 100%)// $style : style used into the images control cells// $imgdir : the image set used for the control buttons//// Generation of control buttons (first, previous, next, last) and pages numbers// (search result, for example).//==============================================================================function gs_buildControlAndPages ($db, $link, $locale,$url,$first, $max, $numItems,$noResponse = null,$oneResponse = null,$responses = null,$width = null,$style = null,$imgdir = null,$appl = 'gsite') {//----------------------------------------------------------------------------// Manage default values.if (empty ($noResponse)) $noResponse = 'ctrl_no_response';if (empty ($oneResponse)) $oneResponse = 'ctrl_one_response';if (empty ($responses)) $responses = 'ctrl_responses';if (empty ($width)) $width = '100%';if (empty ($style)) $style = 'line';if (empty ($imgdir)) $imgdir = 'dft';//----------------------------------------------------------------------------// Build style.global $GS_GLOBAL;$STYLErow = $GS_GLOBAL['style_row'];$fontStyle ="font-family:$STYLErow->S_FONT_FAMILY;"."font-size:$STYLErow->S_FONT_SIZE_SMALL;"."color:$STYLErow->S_COLOR_TEXT;"."font-style:normal;"."font-weight:bold;";$anchorStyle = "";// "text-decoration:none;".// "color:$STYLErow->S_COLOR_TEXT;";//----------------------------------------------------------------------------// Get labels.$pageLabel = gs_getLabel ($db, $link, 'ctrl_page', $locale, $appl);$numresLabel0 = gs_getLabel ($db, $link, $noResponse, $locale, $appl);$numresLabel1 = gs_getLabel ($db, $link, $oneResponse, $locale, $appl);$numresLabel = gs_getLabel ($db, $link, $responses, $locale, $appl);//----------------------------------------------------------------------------// Build labels, switch number of results.$responses = '';if ($numItems == 0) {$responses = $numresLabel0;} else if ($numItems == 1) {$responses = $numresLabel1;} else {$responses = $numresLabel.' : '.$numItems;}//----------------------------------------------------------------------------// Build pages count.if ($numItems > $max) {//-- More than one page.$count = $pageLabel.' :';$pgcount = 1;//-- For all sets of items.$current = 0;$blockArray = array ();for ($i = 0; $i < $numItems; $i += $max) {if ($first == $i) {//-- This is the current set.$current = $pgcount;$tag = '['.$pgcount.']';} else {//-- Another set: [$i, $i+$max]$href = $url.'&first='.$i.'&max='.$max;$tag = ('<A href="'.$href.'" style="'.$anchorStyle.'">'.$pgcount.'</A>');}$blockArray[$pgcount] = $tag;$pgcount++;}$firstTag = ($current - 5 > 0 ? $current - 5 : 1);$lastTag = $firstTag + 10;if ($firstTag > 1) $count .= ' ... ';while (list ($k, $v) = each ($blockArray)) {if (($k >= $firstTag) && ($k <= $lastTag)) {$count .= ' '.$v;}}if ($lastTag + 1 < $pgcount) $count .= ' ... ';} else {//-- Zero or one page.$count = ' ';}//----------------------------------------------------------------------------// Build table.$str = '';$str .= "\n".' <TABLE width="'.$width.'" border="0" cellspacing="0" cellpadding="0" summary="">';$str .= "\n".' <TR>';$str .= "\n".' <TD width="25%" align="left">'.gs_buildControl ($url, $first, $max, $numItems, $style, $imgdir).'</TD>';$str .= "\n".' <TD width="50%" align="center"><SPAN style="'.$fontStyle.'">'.$responses.'</SPAN></TD>';$str .= "\n".' <TD width="25%" style="'.$fontStyle.'" align="right"><SPAN style="'.$fontStyle.'">'.$count.'</SPAN></TD>';$str .= "\n".' </TR>';$str .= "\n".' </TABLE>';return $str;}//==============================================================================// gs_buildControl ($url, $first, $max, $numItems, $style = 'line', $imgdir = 'dft')// $url : URL to show datas, without first and max limits// $first : in the result set, the index of the first item to show// $max : max count of results by page// $numItems : results count// $style : style used into the images control cells// $imgdir : the image set used for the control buttons//// Generation of control buttons (first, previous, next, last) for search// result, for example.//==============================================================================function gs_buildControl ($url,$first, $max, $numItems,$style = 'line',$imgdir = 'dft') {//----------------------------------------------------------------------------// Compute index of last set.if ($numItems == 0) {$last = 0;} else {$last = ($numItems % $max == 0 ?((int)($numItems / $max) - 1) * $max :((int)($numItems / $max)) * $max);}//----------------------------------------------------------------------------// Build infos for gs_control.$ctrlParam = array ('style' => $style,'imgdir' => $imgdir,'begin' => $url.'&first=0&max='.$max,'last' => $url.'&first='.$last.'&max='.$max);if ($first > 0) {$ctrlParam['prev'] = $url.'&first='.($first - $max).'&max='.$max;}if ($first + $max < $numItems) {$ctrlParam['next'] = $url.'&first='.($first + $max).'&max='.$max;}//----------------------------------------------------------------------------// Build control.return gs_control ($ctrlParam);}//==============================================================================// gs_control ($param)// $param : (...)//// Dump a table containing images for first, prev, next, last navigation,// according to $param parameters array.//// $param is an array, with the following items:// - style : style used for the table cells// - imgdir : the directory of the control images set (Local/controls/$imgdir)// - begin : URL to the first set// - prev : URL to the previous set// - next : URL to the next set// - last : URL to the last set//==============================================================================function gs_control ($param) {$imgdir = (empty ($param['imgdir']) ? 'dft' : $param['imgdir']);$icon1 = "Local/controls/$imgdir/01$imgdir.gif";$icon2 = "Local/controls/$imgdir/02$imgdir.gif";$icon3 = "Local/controls/$imgdir/03$imgdir.gif";$icon4 = "Local/controls/$imgdir/04$imgdir.gif";$icon5 = "Local/controls/$imgdir/05$imgdir.gif";$icon6 = "Local/controls/$imgdir/06$imgdir.gif";$beginImg = '<IMG src="'.$icon2.'" border="0" alt="">';$prevImg = '<IMG src="'.$icon3.'" border="0" alt="">';$nextImg = '<IMG src="'.$icon4.'" border="0" alt="">';$lastImg = '<IMG src="'.$icon5.'" border="0" alt="">';$style = (empty ($param['style']) ? '' : ' class="'.$param['style'].'"');$beginImg = (empty ($param['begin']) ? $beginImg : '<A href="'.$param['begin'].'">'.$beginImg.'</A>');$prevImg = (empty ($param['prev']) ? $prevImg : '<A href="'.$param['prev'].'">'.$prevImg.'</A>');$nextImg = (empty ($param['next']) ? $nextImg : '<A href="'.$param['next'].'">'.$nextImg.'</A>');$lastImg = (empty ($param['last']) ? $lastImg : '<A href="'.$param['last'].'">'.$lastImg.'</A>');$str = '';$str .= "\n".'<TABLE border="0" cellspacing="0" cellpadding="0" summary="">';$str .= "\n".' <TR>';$str .= "\n".' <TD><IMG src="'.$icon1.'" border="0" alt=""></TD>';$str .= "\n".' <TD'.$style.'>'.$beginImg.'</TD>';$str .= "\n".' <TD'.$style.'>'.$prevImg.'</TD>';$str .= "\n".' <TD'.$style.'>'.$nextImg.'</TD>';$str .= "\n".' <TD'.$style.'>'.$lastImg.'</TD>';$str .= "\n".' <TD><IMG src="'.$icon6.'" border="0" alt=""></TD>';$str .= "\n".' </TR>';$str .= "\n".'</TABLE>';return $str;}//==============================================================================// gs_buildOptionInVar ($db, $link, $query, $current, $valueFieldName, $labelFieldName, $locale, $appl, $isLabel)// $db : database name// $link : database link// $query : query to perform// $current : current expected value of the select (option SELECTED)// $valueFieldName : in the query, the field name of the value// $labelFieldName : in the query, the field name of the text// $locale : current locale, in case of labelled text// $name : name of application, for labels// $isLabel : true if $labelFieldName field is a label name.//// According to the result of the query $query, build SELECT options. The result// is a string.//==============================================================================function gs_buildOptionInVar ($db, $query, $current, $valueFieldName, $labelFieldName, $locale = '', $appl= '', $isLabel = false) {//----------------------------------------------------------------------------// Perform query.$res = $db->query ($query);if (DB::isError($res)) {die ("Unable to perform query ($query / " . $res->getMessage() . ")");}//----------------------------------------------------------------------------// Build options.$str = '';while ($row = $res->fetchRow(DB_FETCHMODE_ASSOC)) {//-- Option label. If $isLabel is true, the field named $labelFieldName is//-- used as a label. Otherwise, it's only a string.$label = htmlentities ($row[$labelFieldName]);//-- The value: field $valueFieldName of the result set.$value = $row[$valueFieldName];//-- If the value if equal to $current, this option is selected.$selected = ($current == $value ? ' selected' : '');//-- Build option.$str .= "\n".'<OPTION value="'.$value.'"'.$selected.'>'.$label.'</OPTION>';}$res->free();return $str;}//==============================================================================// gs_localePutLanguagesFlagsInVar ($dbname, $dblink, $project)// $dbname : database name// $dblink : database link// $project : project name//// Dump array of flags, one for each language supported by the project.// Images are taken from Local/flags directory.//==============================================================================function gs_localePutLanguagesFlagsInVar ($dbname, $dblink, $project) {//----------------------------------------------------------------------------// List of all the languages supported by project.$query ="select * from $dbname.LOCALE, $dbname.LOCALE_PRJ"." where LP_PROJECT='$project' and LP_CODE=L_CODE"." order by LP_ORDER";$result = mysql_query ($query, $dblink);if (! $result) {die ("Unable to perform query (" . mysql_error ($dblink) . ")");}//----------------------------------------------------------------------------// Only one language ? Do nothing.if (mysql_num_rows ($result) <= 1) {mysql_free_result ($result);return;}//----------------------------------------------------------------------------// Dump array of flags.$outputText = '';$outputText .= "\n".'<TABLE summary="" cellspacing="3" cellpadding="0" border="0">';$outputText .= "\n".' <TR>';while ($row = mysql_fetch_object ($result)) {//--------------------------------------------------------------------------// The flags images are taken from Local/flags.$url = "index.php?project=$project&locale=$row->LP_CODE";$img = "Local/flags/$row->L_FLAG";$alt = htmlentities ($row->L_DESCRIPTION);$outputText .= "\n".'<TD>';$outputText .= '<A target="_top" href="'.$url.'">';$outputText .= '<IMG border="0" src="'.$img.'" alt="'.$alt.'">';$outputText .= '</A>';$outputText .= '</TD>';}$outputText .= "\n".' </TR>';$outputText .= "\n".'</TABLE>';mysql_free_result ($result);return $outputText;}//==============================================================================// FUNCTION gs_putAmount ($frf, $euro)//// Convert an amount into euro.//// NOTE: must be move into project module.//==============================================================================function gs_putAmount ($frf, $euro) {if ($euro == 0) {$euro = $frf / 6.55957;$euro = (round ($euro * 100)) / 100;}if ($euro == 0) return ' ';if ($euro >= 150000) return 'A ( >= 150 000 € )';if ($euro >= 45000) return 'B ( < 150 000 €, >= 45 000 € )';if ($euro >= 15000) return 'C ( < 45 000 €, >= 15 000 € )';return 'D ( < 15 000 €)';}/** function includeFile () Inclue des fichiers en essayant dans divers lieux** @param mixed Un tableau contenant les fichiers à inclure* @param string Un message d'erreur* return boolean true en cas de succès*/function includeFile($incFiles, $msg) {if (! isset ($incFiles)) die ('Bad include path');if (! is_array ($incFiles)) die ('Bad include path');$searchPath = '';for ($i = 0; $i < count ($incFiles); $i++) {$searchPath .= $incFiles[$i].'<BR>'."\n";if (file_exists ($incFiles[$i])) {include_once ($incFiles[$i]);return;}}die ("$msg<BR>\nSearch path:<BR>\n$searchPath");}//==============================================================================// FUNCTION gs_getUser ($db, $link, $annu, $userid)//// Returns an array with user informations.//==============================================================================function gs_getUser ($db, $link, $annu, $userid) {$query ="select * from $db.annu_USERS"." where U_ID=$userid"." and U_ANNU_NAME='$annu'";$result = mysql_query ($query, $link);if (! $result) {die ("Unable to perform query ($query / " . mysql_error ($link) . ")");}$row = mysql_fetch_object ($result);if (! $row) return false;$userInfo['login'] = $row->U_LOGIN;$userInfo['name'] = $row->U_NAME;$userInfo['surname'] = $row->U_SURNAME;$userInfo['row'] = $row;mysql_free_result ($result);return $userInfo;}//==============================================================================//==============================================================================//==============================================================================//==============================================================================//==============================================================================// FUNCTION messageTo ($project, $locale, $to)//// Dump an icon to send a message.//==============================================================================function messageTo ($project, $locale, $to) {$args = "'$project', '$locale', $to";$icon = '<IMG src="Local/icons/newmsg.gif" alt="" width="16" height="16" border="0">';return'<A href="javascript:openMessenger ('.$args.')">'.$icon.'</A>';}//==============================================================================//==============================================================================function gs_print ($item) {ob_start ();print_r ($item);$p = ob_get_contents ();ob_end_clean ();echo '<PRE>'.htmlentities ($p).'</PRE>';}//==============================================================================?>