'; echo '

'; print ''; print '';; print ''; echo '

Login :
Password :

'; } /* * * */ function accessforbidden() { llxHeader(); print "Accés interdit"; llxFooter(); exit(0); } function doliMoveFileUpload($src_file, $dest_file) { $file_name = $dest_file; if (substr($file_name, strlen($file_name) -3 , 3) == 'php') { $file_name = $dest_file . ".txt"; } return move_uploaded_file($src_file, $file_name); } function transcoS2L($zonein,$devise) { // Open source offert par alainfloch@free.fr 28/10/2001, sans garantie. // début de la fonction de transcodification de somme en toutes lettres /* $zonein = "123,56"; * $devise = "E"; // préciser F si francs , sinon ce sera de l'euro * $r = transcoS2L($zonein,$devise); // appeler la fonction * echo "résultat vaut $r
"; * $zonelettresM = strtoupper($r); // si vous voulez la même zone mais tout en majuscules * echo "résultat en Majuscules vaut $zonelettresM
"; * $zonein = "1,01"; * $r = transcoS2L($zonein,$devise); * echo "résultat vaut $r
"; */ if ($devise == "F") { $unite_singulier = " franc "; $unite_pluriel = " francs "; $cent_singulier = " centime"; } else { $unite_singulier = " euro "; $unite_pluriel = " euros "; $cent_singulier = " centime"; } $arr1_99 = array("zéro","un","deux","trois", "quatre","cinq","six","sept", "huit","neuf","dix","onze","douze", "treize","quatorze","quinze","seize", "dix-sept","dix-huit","dix-neuf","vingt "); $arr1_99[30] = "trente "; $arr1_99[40] = "quarante "; $arr1_99[50] = "cinquante "; $arr1_99[60] = "soixante "; $arr1_99[70] = "soixante-dix "; $arr1_99[71] = "soixante et onze"; $arr1_99[80] = "quatre-vingts "; $i = 22; while ($i < 63) {// initialise la table $arr1_99[$i - 1] = $arr1_99[$i - 2]." et un"; $j = 0; while ($j < 8) { $k = $i + $j; $arr1_99[$k] = $arr1_99[$i - 2].$arr1_99[$j + 2]; $j++; } $i = $i + 10; } // fin initialise la table $i = 12; while ($i < 20) {// initialise la table (suite) $j = 60 + $i; $arr1_99[$j] = "soixante-".$arr1_99[$i]; $i++; } // fin initialise la table (suite) $i = 1; while ($i < 20) {// initialise la table (fin) $j = 80 + $i; $arr1_99[$j] = "quatre-vingt-".$arr1_99[$i]; $i++; } // fin initialise la table (fin) // echo "Pour une valeur en entrée = $zonein
"; //pour ceux qui ne croient que ce qu'ils voient ! // quelques petits controles s'imposent !! $valid = "[a-zA-Z\&\é\"\'\(\-\è\_\ç\à\)\=\;\:\!\*\$\^\<\>]"; if (ereg($valid,$zonein)) { $r = "la chaîne ".$zonein." n'est pas valide"; return($r); } $zone = explode(" ",$zonein); // supprimer les blancs séparateurs $zonein = implode("",$zone); // reconcatène la zone input $zone = explode(".",$zonein); // supprimer les points séparateurs $zonein = implode("",$zone); // reconcatène la zone input, ça c'est fort ! merci PHP $virg = strpos($zonein,",",1); // à la poursuite de la virgule $i = strlen($zonein); // et de la longueur de la zone input if ($virg == 0) { // ya pas de virgule if ($i > 7) { $r = "la chaîne ".$zonein." est trop longue (maxi = 9 millions)"; return($r); } $deb = 7 - $i; $zoneanaly = substr($zonechiffres,0,$deb).$zonein.",00"; } else { //ya une virgule $ti = explode(",",$zonein); // mettre de côté ce qu'il y a devant la virgule $i = strlen($ti[0]); // en controler la longueur $zonechiffres = "0000000,00"; if ($i > 7) { $r = "la chaîne ".$zonein." est trop longue (maxi = 9 millions,00)"; return($r); } $deb = 7 - $i; $zoneanaly = substr($zonechiffres,0,$deb).$zonein; } $M= substr($zoneanaly,0,1); if ($M != 0) { // qui veut gagner des millions $r = $arr1_99[$M]." million"; if ($M ==1) $r = $r." "; else $r = $r."s "; if (substr($zoneanaly,1,6)==0) { if ($devise == 'F') $r = $r." de "; else $r = $r."d'"; } } $CM= substr($zoneanaly,1,1); if ($CM == 1) { // qui veut gagner des centaines de mille $r = $r." cent "; } else { // ya des centaines de mille if ($CM > 1) { $r = $r. $arr1_99[$CM]." cent "; } } // fin du else ya des centaines de mille $MM= substr($zoneanaly,2,2); if (substr($zoneanaly,2,1)==0){ $MM = substr($zoneanaly,3,1);} // enlever le zéro des milliers cause indexation if ($MM ==0 && $CM > 0) { $r = $r."mille "; } if ($MM != 0) { if ($MM == 80) { $r = $r."quatre-vingt mille "; } else { if ($MM > 1 ) { $r = $r.$arr1_99[$MM]." mille "; } else { if ($CM == 0) $r = $r." mille "; else { $r = $r.$arr1_99[$MM]." mille "; } } } } $C2= substr($zoneanaly,5,2); if (substr($zoneanaly,5,1)==0){ $C2 = substr($zoneanaly,6,1);} // enlever le zéro des centaines cause indexation $C1= substr($zoneanaly,4,1); if ($C2 ==0 && $C1 > 1) { $r = $r.$arr1_99[$C1]." cents "; } else { if ($C1 == 1) $r = $r." cent "; else { if ($C1 > 1) $r = $r.$arr1_99[$C1]." cent "; } } if ($C2 != 0) { $r = $r.$arr1_99[$C2]; } if ($virg !=0) { if ($ti[0] > 1) $r = $r. $unite_pluriel; else $r = "un ".$unite_singulier; } else { if ($zonein > 1) $r = $r.$unite_pluriel; else $r = "un ".$unite_singulier; } $UN= substr($zoneanaly,8,2); if ($UN != "00") { $cts = $UN; if (substr($UN,0,1)==0){ $cts = substr($UN,1,1);} // enlever le zéro des centimes cause indexation $r = $r." et ". $arr1_99[$cts].$cent_singulier; if ($UN > 1) $r =$r."s"; // accorde au pluriel } $r1 = ltrim($r); // enleve quelques blancs possibles en début de zone $r = ucfirst($r1); // met le 1er caractère en Majuscule, c'est + zoli return($r); // retourne le résultat } // fin fonction transcoS2L function print_liste_field_titre($name, $file, $field, $begin="", $options="") { global $conf; print $name." "; print ''; print ''; print ''; print ''; } function print_liste_field_titre_new($name, $file, $field, $begin="", $options="", $td="", $sortfield="") { /* * idem à la fonction ci dessus mais ajoute des fonctionnalités * * */ global $conf; if ($sortfield == $field) { print ''; } else { print ''; } print $name." "; print ''; print ''; print ''; print ''; print ""; } function print_titre($titre) { print ''; } /* * * */ function print_fiche_titre($titre, $mesg='') { print "\n".''; print ''; if (strlen($mesg)) { print ''; } print '

'.$titre.'

'.$mesg.'

'."\n"; } /* * * */ function dol_delete_file($file) { return unlink($file); } /* * * */ function block_access() { llxHeader(); print "Accés refusé"; llxFooter(); } /* * * */ function print_barre_liste($titre, $page, $file, $options='', $sortfield='', $sortorder='', $form='', $num=-1) { global $conf; if ($num > $conf->liste_limit or $num == -1) { $nextpage = 1; } else { $nextpage = 0; } print ''; if ($page > 0) { print ''; } else { print ''; } if ($form) { print ''; } print '

'.$titre.' - page '.($page+1).'
'.$titre.'	'.$form.'	'; if (strlen($sortfield)) { $options .= "&sortfield=$sortfield"; } if (strlen($sortorder)) { $options .= "&sortorder=$sortorder"; } // affichage des fleches de navigation print_fleche_navigation($page,$file,$options, $nextpage); print '

'; } /* * fonction servant a afficher les fleches de navigation dans les * pages de liste */ function print_fleche_navigation($page,$file,$options='', $nextpage) { global $conf; if ($page > 0) { print ''; } if ($nextpage > 0) { print ''; } } /* * * */ function print_oui_non($value) { if ($value) { print 'non'; print 'oui'; } else { print 'non'; print 'oui'; } } /* * * */ function print_date_select($set_time='') { if (! $set_time) { $set_time = time(); } $strmonth[1] = "Janvier"; $strmonth[2] = "Février"; $strmonth[3] = "Mars"; $strmonth[4] = "Avril"; $strmonth[5] = "Mai"; $strmonth[6] = "Juin"; $strmonth[7] = "Juillet"; $strmonth[8] = "Août"; $strmonth[9] = "Septembre"; $strmonth[10] = "Octobre"; $strmonth[11] = "Novembre"; $strmonth[12] = "Décembre"; $smonth = 1; $endmonth = 12; $sday = 1; $endday = 31; $cday = date("d", $set_time); $cmonth = date("n", $set_time); $syear = date("Y", $set_time); print ""; for ($day = 1 ; $day <= $endday ; $day++) { if ($day == $cday) { print "$day"; } else { print "$day"; } } print ""; print ""; for ($month = $smonth ; $month <= $endmonth ; $month++) { if ($month == $cmonth) { print "" . $strmonth[$month]; } else { print "" . $strmonth[$month]; } } print ""; print ""; for ($year = $syear - 2; $year < $syear + 5 ; $year++) { if ($year == $syear) { print "$year"; } else { print "$year"; } } print "\n"; } /* * * */ function print_heure_select($prefix,$begin=1,$end=23) { print ''; for ($hour = $begin ; $hour <= $end ; $hour++) { print "$hour"; } print " H "; print ''; for ($min = 0 ; $min < 60 ; $min=$min+5) { if ($min < 10) { $min = "0" . $min; } print "$min"; } print "\n"; } /* * * */ function print_duree_select($prefix) { print ''; print "0"; print "1"; for ($hour = 2 ; $hour < 13 ; $hour++) { print "$hour"; } print " H "; print ''; for ($min = 0 ; $min < 55 ; $min=$min+5) { print "$min"; } print "\n"; } function price($amount) { return number_format($amount, 2, '.', ' '); //return sprintf("%.2f", $amount); } function francs($euros) { return price($euros * 6.55957); } function tva($euros, $taux=19.6) { $taux = $taux / 100 ; return sprintf("%01.2f",($euros * $taux)); } function inctva($euros, $taux=1.196) { return sprintf("%01.2f",($euros * $taux)); } /* * * */ function stat_print($basename,$bc1,$bc2,$ftc, $jour) { $db = pg_Connect("","","","","$basename"); if (!$db) { echo "Pas de connexion a la base\n"; exit ; } $offset = $jour * 9; $sql="SELECT s.date, s.nb, l.libelle FROM stat_base as s, stat_cat as l WHERE s.cat = l.id ORDER by s.date DESC, s.cat ASC LIMIT 9 OFFSET $offset"; $result = $db->query($sql); if (!$result) { print "Erreur SELECT

$sql

"; return 1; } print ""; print ""; print ""; print ""; $num = $db->num_rows(); $i = 0; $tag = 1; while ( $i < $num) { $obj = $db->fetch_object( $i); $tag = !$tag; print "\n"; print "\n"; $i++; } print "

base $basename	libelle
$obj->date	$obj->libelle	$obj->nb

"; $db->free(); $db->close(); } function tab_count($basename,$bc1,$bc2,$ftc) { $db = pg_Connect("","","","","$basename"); if (!$db) { echo "Pas de connexion a la base\n"; exit ; } $sql="SELECT count(*) AS nbcv from candidat WHERE active=1"; $result = $db->query($sql); if (!$result) { print "Erreur SELECT

$sql

"; return 1; } print "

"; print ""; print ""; print ""; print ""; $nbcv = $db->result( $i, "nbcv"); print "\n"; print "\n"; print "\n"; $db->free(); $sql="SELECT count(*) AS nbcv from offre WHERE active=1"; $result = $db->query($sql); if (!$result) { print "Erreur SELECT $sql "; } $nbcv = $db->result( $i, "nbcv"); print ""; print ""; print ""; $db->free(); $sql="SELECT count(*) AS nbcv from candidat WHERE active=0"; $result = $db->query($sql); if (!$result) { print "Erreur SELECT $sql "; } $nbcv = $db->result( $i, "nbcv"); print "\n"; print ""; print ""; $db->free(); $sql="SELECT count(*) AS nbcv from offre WHERE active=0"; $result = $db->query($sql); if (!$result) { print "Erreur SELECT $sql "; } $nbcv = $db->result( $i, "nbcv"); print "\n"; print "\n"; print "\n"; $db->free(); $sql="SELECT count(*) AS nbsoc from logsoc"; $result = $db->query($sql); if (!$result) { print "Erreur SELECT $sql "; } $nbsoc = $db->result( $i, "nbsoc"); print "\n"; print ""; print ""; print " base $basename libelle $ftc Nombre de CV $ftc $nbcv $ftc Nombre d'offre $ftc $nbcv $ftc Nombre de CV inactifs $ftc $nbcv $ftc Nombre d'offres inactives $ftc $nbcv $ftc Nombre de logins societes $ftc $nbsoc

"; $db->close(); } /* * logfile : permet de logguer dans un fichier * cette fonction ne fonctionenra que si et seulement si le fichier de * la constante globale MAIN_DEBUG existe et vaut 1 */ function logfile($str,$log="/var/log/dolibarr/dolibarr.log") { if (defined("MAIN_DEBUG") && MAIN_DEBUG ==1) { if (!file_exists($log)) { if (!$file=fopen($log,"w")) { return 0; } } else { if (!$file=fopen($log,"a+")) { return 0; } } $logentry=date("[d/M/Y:H:i:s] ").$str."\n"; if(!fwrite($file,$logentry)) { fclose($file); return 0; } fclose($file); return 1; } } /* * Fonctions reprise sur spip * http://www.uzine.net/spip/ */ function creer_pass_aleatoire($longueur = 8, $sel = "") { $seed = (double) (microtime() + 1) * time(); srand($seed); for ($i = 0; $i < $longueur; $i++) { if (!$s) { if (!$s) $s = rand(); $s = substr(md5(uniqid($s).$sel), 0, 16); } $r = unpack("Cr", pack("H2", $s.$s)); $x = $r['r'] & 63; if ($x < 10) $x = chr($x + 48); else if ($x < 36) $x = chr($x + 55); else if ($x < 62) $x = chr($x + 61); else if ($x == 63) $x = '/'; else $x = '.'; $pass .= $x; $s = substr($s, 2); } return $pass; } /* * Fonctions reprise sur spip * http://www.uzine.net/spip/ */ function initialiser_sel() { global $htsalt; $htsalt = '$1$'.creer_pass_aleatoire(); } ?>