<?php // $Revision: 1.9 $
/* vim: set expandtab ts=4 sw=4 sts=4: */

/**
 * $Id: library.php,v 1.9 2005/05/05 09:58:21 luis Exp $
 * 
 * Copyright (c) 2003 by the NetOffice developers
 * 
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 */

error_reporting(E_ALL & ~E_NOTICE);
// error_reporting(E_ALL & ~E_NOTICE & ~E_WARNING);

// start the benchmark
$parse_start = getmicrotime();

// Session Settings
ini_set('session.use_trans_sid', 0); // Stop adding SID to URLs
ini_set('session.save_handler', 'user'); // User-defined save handler (files|user)
ini_set('session.serialize_handler', 'php'); // How to store data
ini_set('session.use_cookies', 1); // Cookies store the session ID

// if the phpversion is >= 4.3.0 then set the 'use_only_cookies' to true
if (version_compare(phpversion(), '4.3.0', '>=')) {
    ini_set('session.use_only_cookies', 1);
}

// set the cache pages expire time in minutes
if(version_compare(phpversion(), '4.2.0', '>=')) {
    session_cache_expire(180);
}

// set more session settings
ini_set('session.name', 'netOfficeSID'); // Name of the cookie
ini_set('session.gc_probability', 1); // Garbage Collection
ini_set('session.gc_maxlifetime', 3600); // max session time
ini_set('session.cookie_lifetime', 0); // cookie last browser session
ini_set('session.auto_start', 0); // don't auto start sessions

// how long a session can be inactive
define('SESS_MAXLIFE', 3600);

// {nocache|private|publuc|private_no_cache}
session_cache_limiter('none');

// if we should check IPADDR along with SESSID for enhanced security?
define('SESS_IPCHECK', true);

// get the remote IP only if needed
define('SESS_REMOTE_ADDR', get_remote_addr());

// database link needs to be initialized
$SESS_DBH = null;

// user call-back functions for session events
// PHP doesn't allow these functions to work within an OO Class Structure, sorry.
session_set_save_handler('_sess_mysql_open', '_sess_mysql_close',
                         '_sess_mysql_read', '_sess_mysql_write',
                         '_sess_mysql_destroy', '_sess_mysql_gc');

// PHP version check, force version greater than or equal to 4.1.0
// if you take this out don't even think about asking for help with bugs!!
$phpVersiondata = explode('.', phpversion());
if ($phpVersiondata[0] >= 4) {
    // only need to check subversion if this is php4
    if ($phpVersiondata[0] == 4 && $phpVersiondata[1] < 1) {
        // need to display nice error
        if ($indexRedirect == true) {
            header('Location: general/error.php?type=phpversion');
            exit;
        } else {
            header('Location: ../general/error.php?type=phpversion');
            exit;
        } 
        exit;
    } 
} else {
    // need to display nice error
    if ($indexRedirect == true) {
        header('Location: general/error.php?type=phpversion');
        exit;
    } else {
        header('Location: ../general/error.php?type=phpversion');
        exit;
    } 
    exit;
} 

// OS detection that NetOffice is running on
if (strToUpper(substr(PHP_OS, 0, 3) == 'WIN')) {
    define('SYS_OS', 'WIN');
} else {
    define('SYS_OS', strToUpper(PHP_OS));
}

// settings and date selector includes
if ($indexRedirect == true) {
    // get configuration settings
    require_once('includes/settings.php'); 
    // request data class
    require_once('includes/initrequests.php');
    require_once('includes/request.class.php'); 
    // layout class
    require_once('themes/' . THEME . '/block.class.php');
} else {
    // get configuration settings
    require_once('../includes/settings.php'); 
    // request data class
    require_once('../includes/initrequests.php');
    require_once('../includes/request.class.php'); 
    // layout class
    require_once('../themes/' . THEME . '/block.class.php');
} 

// path used for auth and session cookies
$cookiePath = parse_url($root);

// session cookie save path, more secure this way
ini_set('session.cookie_path', $cookiePath['path'].'/');

// Kick it, lets get this party started
session_start();

// register globals work around, I don't like this and am working
// to get rid if it
if (ini_get('register_globals') == false) {
    //GET array
    if (!empty($_GET)) {
        extract($_GET);
    } else if (!empty($HTTP_GET_VARS)) {
        extract($HTTP_GET_VARS);
    }

    //POST array
    if (!empty($_POST)) {
        extract($_POST);
    } else if (!empty($HTTP_POST_VARS)) {
        extract($HTTP_POST_VARS);
    }

    //SESSION array
    if (!empty($_SESSION)) {
        extract($_SESSION);
    } else if (!empty($HTTP_SESSION_VARS)) {
        extract($HTTP_SESSION_VARS);
    }

    //SERVER array
    if (!empty($_SERVER)) {
        extract($_SERVER);
    } else if (!empty($HTTP_SERVER_VARS)) {
        extract($HTTP_SERVER_VARS);
    }

    //$_COOKIE array
    if (!empty($_COOKIE)) {
        extract($_COOKIE);
    } else if (!empty($HTTP_COOKIE_VARS)) {
        extract($HTTP_COOKIE_VARS);
    }
}

// Defines for status
DEFINE("ST_CLIENT_COMPLETED", "0");
DEFINE("ST_COMPLETED", "1");
DEFINE("ST_NOT_STARTED", "2");
DEFINE("ST_OPEN", "3");
DEFINE("ST_SUSPENDED", "4");

// Defines for profile
DEFINE("PF_ADMINISTRATOR", "0");
DEFINE("PF_PROJECT_MANAGER", "1");
DEFINE("PF_USER", "2");
DEFINE("PF_CLIENT_USER", "3");
DEFINE("PF_DISABLED", "4");
DEFINE("PF_PROJECT_MANAGER_ADMINISTRATOR", "5");
DEFINE("PF_PERSONNEL_MANAGER", "6");

// Defines for priority
DEFINE("PR_NONE", "0");
DEFINE("PR_VERY_LOW", "1");
DEFINE("PR_LOW", "2");
DEFINE("PR_MEDIUM", "3");
DEFINE("PR_HIGH", "4");
DEFINE("PR_VERY_HIGH", "5");

// Defines for publish status
DEFINE("PB_YES", "0");
DEFINE("PB_NO", "1");

// Defines for file status
DEFINE("FS_APPROVED", "0");
DEFINE("FS_APPROVED_WITH_CHANGES", "1");
DEFINE("FS_NEEDS_APPROVAL", "2");
DEFINE("FS_NO_APPROVALS_NEEDED", "3");
DEFINE("FS_NOT_APPROVED", "4");

// Defines for phase status
DEFINE("PS_NOT_STARTED", "0");
DEFINE("PS_OPEN", "1");
DEFINE("PS_COMPLETE", "2");
DEFINE("PS_SUSPENDED", "3");

// Defines for request status
DEFINE("RQ_NEW", "0");
DEFINE("RQ_OPEN", "1");
DEFINE("RQ_COMPLETE", "2");

// Defines for project type
DEFINE("PT_INTERNAL_PROJECT", "0");
DEFINE("PT_EXTERNAL_PROJECT", "1");

// Defines for fixed duration status
DEFINE("FD_YES", "0");
DEFINE("FD_NO", "1");

// Defines for milestone status
DEFINE("MS_YES", "0");
DEFINE("MS_NO", "1");

// Defines for task group status
DEFINE("TG_YES", "0");
DEFINE("TG_NO", "1");

// Defines for person evaluation status
DEFINE("PE_SUBMITTED", "0");
DEFINE("PE_OPEN", "1");

// languages array
$langValue = array(
    'en' => 'English',
    'fr' => 'French',
    'de' => 'German',
    'it' => 'Italian',
    'es' => 'Spanish',
    'pt' => 'Portuguese',
    'da' => 'Danish',
    'no' => 'Norwegian',
    'nl' => 'Dutch',
    'zh' => 'Chinese simplified',
    'uk' => 'Ukrainian',
    'pl' => 'Polish',
    'in' => 'Indonesian',
    'ru' => 'Russian',
    'az' => 'Azerbaijani',
    'ko' => 'Korean',
    'zh-tw' => 'Chinese traditional',
    'ca' => 'Catalan',
    'pt-br' => 'Brazilian Portuguese',
    'et' => 'Estonian',
    'bg' => 'Bulgarian',
    'ro' => 'Romanian',
    'hu' => 'Hungarian',
    'cs-iso' => 'Czech (iso)',
    'cs-win1250' => 'Czech (win1250)',
    'is' => 'Icelandic',
    'sk-win1250' => 'Slovak (win1250)',
    'sv' => 'Swedish',
    'tr' => 'Turkish',
    'lv' => 'Latvian',
    'jp' => 'Japanese'
    );

if ($langDefault != '') {
    $langSelected[$langDefault] = 'selected';
} else {
    $langSelected = '';
} 

// language browser detection
if ($langDefault == '') {
    if (isset($HTTP_ACCEPT_LANGUAGE)) {
        $plng = split(',', $HTTP_ACCEPT_LANGUAGE);
        if (count($plng) > 0) {
            while (list($k, $v) = each($plng)) {
                $k = split(';', $v, 1);
                $k = split('-', $k[0]);
                // does the language file exists and is it in the array?
                if (@file_exists('../languages/lang_' . $k[0] . '.php') &&
                        array_key_exists($k[0], $langValue)) {
                    $langDefault = $k[0];
                    break;
                }
                $langDefault = 'en';
            }
        } else {
            $langDefault = 'en';
        }
    } else {
        $langDefault = 'en';
    }
}

// check session validity, except for demo user
if (($checkSession == true) && ($demoSession != true)) {
    // a client user trying to get outside of the "client project site"
    if (($profilSession == 3) && (!strstr($_SERVER['PHP_SELF'], 'projects_site'))) {
        header('Location: ../index.php?session=false');
        exit;
    } 

    // if auto logout feature used, check the idle time
    if ($_SESSION['profilSession'] != '3') {
        if ($_SESSION['logouttimeSession'] != '0' && $_SESSION['logouttimeSession'] != '') {
            $dateunix = date('U');
            $diff = $dateunix - $_SESSION['dateunixSession'];

            if ($diff > $_SESSION['logouttimeSession']) {
                // the defined idle time as passed, log'em out
                header('Location: ../general/login.php?logout=true');
                exit;
            } else {
                // update the last activity time in the session
                $_SESSION['dateunixSession'] = $dateunix;
            } 
        } 
    } 

    // verify they have logged in, if not redirect to the login page
    if ($_SESSION['loginToken'] != md5($_SESSION['loginSession'] . $cryptKey)) {
        header('Location: ../index.php?session=false');
        exit;
    }

    // query the logs table
    $tmpquery = "WHERE log.login = '" . $_SESSION['loginSession'] . "'";
    $checkLog = new request();
    $checkLog->openLogs($tmpquery);
    $comptCheckLog = count($checkLog->log_id);

    // make sure there is a row for them
    if ($comptCheckLog != '0') {
        if (session_id() != $checkLog->log_session[0]) {
            header('Location: ../index.php?session=false');
            exit;
        }
    } else {
        header('Location: ../index.php?session=false');
        exit;
    }
}

if ($checkConnected != 'false') {
    $dateunix = date('U');
    $tmpquery1 = 'UPDATE ' . $tableCollab['logs'] . " SET connected='$dateunix' WHERE login = '" . $_SESSION['loginSession'] . "'";
    connectSql($tmpquery1);
    $tmpsql = 'SELECT * FROM ' . $tableCollab['logs'] . " WHERE connected > $dateunix-5*60";
    compt($tmpsql);
    $connectedUsers = $countEnregTotal;
} 

// redirect if server/database in error
if ($databaseType == 'mysql') {
    if (!mysql_connect(MYSERVER, MYLOGIN, MYPASSWORD)) {
        header('Location: ../general/error.php?type=myserver');
        exit;
    } else {
        $res = mysql_connect(MYSERVER, MYLOGIN, MYPASSWORD);
    } 

    if (!mysql_select_db(MYDATABASE, $res)) {
        header('Location: ../general/error.php?type=mydatabase');
        exit;
    } else {
        mysql_close($res);
    } 
} 

// disable actions if demo user logged in demo mode
if (!empty($action)) {
    if ($demoSession == 'true') {
        $closeTopic = '';
        $addToSiteTask = '';
        $removeToSiteTask = '';
        $addToSiteTopic = '';
        $removeToSiteTopic = '';
        $addToSiteTeam = '';
        $removeToSiteTeam = '';
        $action = '';
        $msg = 'demo';
    } 
} 

// set language session
if (!isset($_SESSION['languageSession'])) {
    $lang = $langDefault;
} else {
    $lang = $_SESSION['languageSession'];
} 

// language include
if ($indexRedirect == true) {
    // first load the master language files
    require_once('languages/lang_en.php');
    require_once('languages/help_en.php'); 
    // then load language specific files if other than en
    if ($lang != 'en') {
        require_once('languages/lang_' . $lang . '.php');
        require_once('languages/help_' . $lang . '.php');
    } 
    // then load the global language specific file
    if (@file_exists('languages/lang_' . $lang . '_global.php')) {
        require_once('languages/lang_' . $lang . '_global.php');
    } 
} else {
    // first load the master language files
    require_once('../languages/lang_en.php');
    require_once('../languages/help_en.php'); 
    // then load language specific files if other than en
    if ($lang != 'en') {
        require_once('../languages/lang_' . $lang . '.php');
        require_once('../languages/help_' . $lang . '.php');
    } 
    // then load the global custom language file
    if (@file_exists('../languages/lang_' . $lang . '_global.php')) {
        require_once('../languages/lang_' . $lang . '_global.php');
    } 
} 

// Defines for graphtasks
if (!defined("GRAPH_TITLE_FONT")) {
    DEFINE("GRAPH_TITLE_FONT", FF_FONT1);
    DEFINE("GRAPH_TITLE_FONT_STYLE", FS_BOLD);

    DEFINE("GRAPH_WEEK_FONT", FF_FONT0);

    DEFINE("GRAPH_ACTINFO_FONT", FF_FONT1);
    DEFINE("GRAPH_ACTINFO_FONT_STYLE", FS_BOLD);

    DEFINE("ACTIVITY_TITLE_FONT", "");

    DEFINE("ACTIVITY_CAPTION_FONT", FF_FONT0);
}

// notifications include
if ($notifications == 'true') {
    if ($indexRedirect != true) {
        require_once('../includes/notification.class.php');
    } 
} 

// time variables
if ($gmtTimezone == 'true') {
    $date = gmdate("Y-m-d");
    $dateheure = gmdate("Y-m-d H:i");
    $dateheures = gmdate("Y-m-d H:i:s");
} else {
    $date = date("Y-m-d");
    $dateheure = date("Y-m-d H:i");
    $dateheures = date("Y-m-d H:i:s");
} 

// update sorting table if query sort column
if (!empty($sor_cible) && $sor_champs != 'none') {
    $tmpquery = 'UPDATE ' . $tableCollab['sorting'] . " SET $sor_cible='$sor_champs $sor_ordre' WHERE member = '" . $_SESSION['idSession'] . "'";
    connectSql($tmpquery);
} 

// set all sorting values for logged user
if (isset($_SESSION['idSession'])) {
    $tmpquery = "WHERE sor.member = '" . $_SESSION['idSession'] . "'";
    $sortingUser = new request();
    $sortingUser->openSorting($tmpquery);
} 

$setCopyright = '<!-- Powered by NetOffice v' . $version . ' -->';

// ---------------------------------------------------------------------------#
// FUNCTIONS
// ---------------------------------------------------------------------------#
/**
 * Checks for NetOffice releases greater than the current version installed
 * 
 * @param string $iCV Version to compare
 * @access public 
 */
function updatechecker($iCV) {
    global $strings; 

    // get latest available version number
    $iNV = trim(implode('', file('http://netoffice.sourceforge.net/version.txt'))); 

    // version comparisions
    // version string order: dev < alpha = a < beta = b < RC < pl
    // this allows for versions such as 2.5.2b1, 2.6.0RC1, and so on
    if (version_compare($iNV, $iCV, '>')) {
        $checkMsg  = '<br><b>' . $strings['update_available'] . '</b> ';
        $checkMsg .= $strings['version_current'] . " $iCV. ";
        $checkMsg .= $strings['version_latest'] . " $iNV.<br>";
        $checkMsg .= '<a href="http://www.sourceforge.net/projects/netoffice" target="_blank">';
        $checkMsg .= $strings['sourceforge_link'] . '</a>.';
    } 

    return($checkMsg);
} 

/**
 * Checks for NetOffice DWINS Enhanced releases greater than the current
 * version installed
 * 
 * @param string $iCV Version to compare
 * @access public 
 */
function dwinsupdatechecker($iCV) {
    global $strings; 

    // get latest available version number
    $iNV = trim(implode('', file('http://netoffice.dwins.com/version.txt'))); 

    // version comparisions
    // version string order: dev < alpha = a < beta = b < RC < pl
    if (version_compare($iNV, $iCV, '>')) {
        $checkMsg  = '<br><b>' . $strings['update_available'] . '</b> ';
        $checkMsg .= $strings['version_current'] . " $iCV. ";
        $checkMsg .= $strings['version_latest'] . " $iNV.<br>";
        $checkMsg .= '<a href="http://netoffice.dwins.com" target="_blank">';
        $checkMsg .= $strings['dwins_link'] . '</a>.';
    } 

    return($checkMsg);
} 

/**
 * Calculate time to parse page (used with footer.php)
 * 
 * @access public 
 */
function getmicrotime() {
    list($usec, $sec) = explode(' ', microtime());
    return((float)$usec + (float)$sec);
} 

/**
 * Automatic links
 * 
 * @param string $data Text to parse
 * @access public 
 */
function autoLinks($data) {
    global $newText;

    $lines = explode("\n", $data);

    while (list($key, $line) = each($lines)) {
        $line = eregi_replace("([ \t]|^)www\.", " http://www.", $line);
        $line = eregi_replace("([ \t]|^)ftp\.", " ftp://ftp.", $line);
        $line = eregi_replace("(http://[^ )\r\n]+)", "<a href=\"\\1\" target=\"_blank\">\\1</a>", $line);
        $line = eregi_replace("(https://[^ )\r\n]+)", "<a href=\"\\1\" target=\"_blank\">\\1</a>", $line);
        $line = eregi_replace("(ftp://[^ )\r\n]+)", "<a href=\"\\1\" target=\"_blank\">\\1</a>", $line);
        $line = eregi_replace("([-a-z0-9_]+(\.[_a-z0-9-]+)*@([a-z0-9-]+(\.[a-z0-9-]+)+))", "<a href=\"mailto:\\1\">\\1</a>", $line);

        if (empty($newText)) {
            $newText = $line;
        } else {
            $newText .= "\n$line";
        } 
    } 
} 

/**
 * Return timestamp of date
 *
 * @param string $date1 Date to transform
 */
function date2timestamp($date1) {
    list($an1, $mois1, $jour1) = split('-', $date1, 3);
    $timestamp1 = mktime(0, 0, 0, $mois1, $jour1, $an1);
    return($timestamp1);
}

/**
 * Return number of day between 2 dates
 * 
 * @param string $date1 Date to compare
 * @param string $date2 Date to compare
 * @access public
 */
function diff_date($date1, $date2) {
    $timestamp1 = date2timestamp($date1);
    $timestamp2 = date2timestamp($date2);
    $diff = ($timestamp1 - $timestamp2) / (3600 * 24);
    $diff = intval($diff + 1);
    return($diff);
} 

/**
 * Return number of hour between 2 dates
 *
 * @param string $date1 Date to compare
 * @param string $date2 Date to compare
 * @access public
 */
function diff_hour($date1, $date2) {
    global $dayHourArray;

    $timestamp1 = date2timestamp($date1);
    $timestamp2 = date2timestamp($date2);
    $diff = 0;
    while ($timestamp1<=$timestamp2) {
        $currDate = date("Y-m-d", $timestamp1);
        $tmpquery = " WHERE hol.date='$currDate'";
        $listHoliday = new request();
        $listHoliday->openHoliday($tmpquery);
        $comptListHoliday = count($listHoliday->hol_id);
        if ($comptListHoliday == 0) {
            $weekDay = date("w", $timestamp1);
            $diff += $dayHourArray[$weekDay];
        } else {
            $diff += $listHoliday->hol_hours[0];
        }
        $timestamp1 += (3600 * 24);
    }
    return($diff);
} 

/**
 * Return date some hours after
 *
 * @param string $date1 Date to compare
 * @param string $hour1 Hours after
 * @access public
 */
function hours_after($date1, $hour1) {
    global $dayHourArray;

    $timestamp1 = date2timestamp($date1);
    $diff = 0;
    while ($diff < $hour1) {
        $currDate = date("Y-m-d", $timestamp1);
        $tmpquery = " WHERE hol.date='$currDate'";
        $listHoliday = new request();
        $listHoliday->openHoliday($tmpquery);
        $comptListHoliday = count($listHoliday->hol_id);
        if ($comptListHoliday == 0) {
            $weekDay = date("w", $timestamp1);
            $diff += $dayHourArray[$weekDay];
        } else {
            $diff += $listHoliday->hol_hours[0];
        }
        if ($diff >= $hour1)
            break;
        $timestamp1 += (3600 * 24);
    }
    return(date("Y-m-d", $timestamp1));
} 

/**
 * Return date some hours before
 *
 * @param string $date1 Date to compare
 * @param string $hour1 Hours before
 * @access public
 */
function hours_before($date1, $hour1) {
    global $dayHourArray;

    $timestamp1 = date2timestamp($date1);
    $diff = 0;
    while ($diff < $hour1) {
        $currDate = date("Y-m-d", $timestamp1);
        $tmpquery = " WHERE hol.date='$currDate'";
        $listHoliday = new request();
        $listHoliday->openHoliday($tmpquery);
        $comptListHoliday = count($listHoliday->hol_id);
        if ($comptListHoliday == 0) {
            $weekDay = date("w", $timestamp1);
            $diff += $dayHourArray[$weekDay];
        } else {
            $diff += $listHoliday->hol_hours[0];
        }
        if ($diff >= $hour1)
            break;
        $timestamp1 -= (3600 * 24);
    }
    return(date("Y-m-d", $timestamp1));
} 

/**
 * Checks for password match using the globally specified login method
 * 
 * @param string $formUsername User name to test
 * @param string $formPassword User name password to test
 * @param string $storedPassword Password stored in database
 * @access public 
 */
function is_password_match($formUsername, $formPassword, $storedPassword) {
    global $loginMethod, $useLDAP, $configLDAP;

    if ($useLDAP == 'true') {
        if ($formUsername == 'admin') {
            switch ($loginMethod) {
                case MD5:
                    if (md5($formPassword) == $storedPassword) {
                        return(true);
                    } else {
                        return(false);
                    } 
                case CRYPT:
                    $salt = substr($storedPassword, 0, 2);
                    if (crypt($formPassword, $salt) == $storedPassword) {
                        return(true);
                    } else {
                        return(false);
                    } 
                case PLAIN:
                    if ($formPassword == $storedPassword) {
                        return(true);
                    } else {
                        return(false);
                    } 

                    return(false);
            } 
        } 

        $conn = ldap_connect($configLDAP['ldapserver']);
        $sr = ldap_search($conn, $configLDAP['searchroot'], 'uid=' . $formUsername);
        $info = ldap_get_entries($conn, $sr);
        $user_dn = $info[0]['dn'];

        if (!$bind = ldap_bind($conn, $user_dn, $formPassword)) {
            return(false);
        } else {
            return(true);
        } 
    } else {
        switch ($loginMethod) {
            case MD5:
                if (md5($formPassword) == $storedPassword) {
                    return(true);
                } else {
                    return(false);
                } 
            case CRYPT:
                $salt = substr($storedPassword, 0, 2);
                if (crypt($formPassword, $salt) == $storedPassword) {
                    return(true);
                } else {
                    return(false);
                } 
            case PLAIN:
                if ($formPassword == $storedPassword) {
                    return(true);
                } else {
                    return(false);
                } 

                return(false);
        } 
    } 
} 

/**
 * Return a password using the globally specified method
 * 
 * @param string $newPassword Password to transfom
 * @access public 
 */
function get_password($newPassword) {
    global $loginMethod;

    switch ($loginMethod) {
        case MD5:
            return(md5($newPassword));
        case CRYPT:
            $salt = substr($newPassword, 0, 2);
            return(crypt($newPassword, $salt));
        case PLAIN:
            return($newPassword);

            return($newPassword);
    } 
} 

/**
 * Generate a random password
 * 
 * @param string $size Size of geenrated password
 * @param boolean $with_numbers Option to use numbers
 * @param boolean $with_tiny_letters Option to use tiny letters
 * @param boolean $with_capital_letters Option to use capital letters
 * @access public 
 */
function password_generator($size = 8, $with_numbers = true, $with_tiny_letters = true, $with_capital_letters = true) {
    global $pass_g;

    $pass_g = '';
    $sizeof_lchar = 0;
    $letter = '';
    $letter_tiny = 'abcdefghijklmnopqrstuvwxyz';
    $letter_capital = 'ABCDEFGHIJKLMNOPQRSTUVWXYZ';
    $letter_number = '0123456789';

    if ($with_tiny_letters == true) {
        $sizeof_lchar += 26;

        if (isset($letter)) {
            $letter .= $letter_tiny;
        } else {
            $letter = $letter_tiny;
        } 
    } 

    if ($with_capital_letters == true) {
        $sizeof_lchar += 26;

        if (isset($letter)) {
            $letter .= $letter_capital;
        } else {
            $letter = $letter_capital;
        } 
    } 

    if ($with_numbers == true) {
        $sizeof_lchar += 10;

        if (isset($letter)) {
            $letter .= $letter_number;
        } else {
            $letter = $letter_number;
        } 
    } 

    if ($sizeof_lchar > 0) {
        srand((double)microtime() * date("YmdGis"));

        for ($cnt = 0; $cnt < $size; $cnt++) {
            $char_select = rand(0, $sizeof_lchar - 1);
            $pass_g .= $letter[$char_select];
        } 
    } 

    return($pass_g);
} 

/**
 * Move a file in a new destination
 * 
 * @param string $source Current path of file
 * @param string $dest New path of file
 * @access public 
 */
function moveFile($source, $dest)
{
    global $mkdirMethod, $ftpRoot;

    if ($mkdirMethod == 'FTP') {
        $ftp = ftp_connect(FTPSERVER);
        ftp_login($ftp, FTPLOGIN, FTPPASSWORD);
        ftp_rename($ftp, $ftpRoot . '/' . $source, $ftpRoot . '/' . $dest);
        ftp_quit($ftp);
    } else {
        copy('../' . $source, '../' . $dest);
    } 
} 

/**
 * Delete a file with a specified path
 * 
 * @param string $source Path of file
 * @access public 
 */
function deleteFile($source)
{
    global $mkdirMethod, $ftpRoot;

    if ($mkdirMethod == 'FTP') {
        $ftp = ftp_connect(FTPSERVER);
        ftp_login($ftp, FTPLOGIN, FTPPASSWORD);
        ftp_chdir($ftp, $pathNew);
        ftp_delete($ftp, $ftpRoot . '/' . $source);
        ftp_quit($ftp);
    } else {
        unlink('../' . $source);
    } 
} 

/**
 * Upload a file to a specified destination
 * 
 * @param string $path Path of original file
 * @param string $source Temp file
 * @param string $dest Destination path
 * @access public 
 */
function uploadFile($path, $source, $dest)
{
    global $mkdirMethod, $ftpRoot;

    if ($mkdirMethod == 'FTP') {
        $pathNew = $ftpRoot . '/' . $path;
        $ftp = ftp_connect(FTPSERVER);
        ftp_login($ftp, FTPLOGIN, FTPPASSWORD);
        ftp_chdir($ftp, $pathNew);
        ftp_put($ftp, $dest, $source, FTP_BINARY);
        ftp_quit($ftp);
    } else if ($mkdirMethod == 'PHP') {
        #$source = str_replace('\\', '/', $source);;
        if (!is_dir('../' . $path)) {
            createDir($path);
        }
        $destination = '../' . $path . '/' . $dest;
        move_uploaded_file($source, $destination);
    } 
} 

/**
 * Folder creation
 * 
 * @param string $path Path to the new directory
 * @access public 
 */
function createDir($path)
{
    global $mkdirMethod, $ftpRoot;

    $pathNew = explode('/', $path);

    if ($mkdirMethod == 'FTP') {
        $ftp = ftp_connect(FTPSERVER);
        ftp_login($ftp, FTPLOGIN, FTPPASSWORD);
        ftp_chdir($ftp, $ftpRoot);
        foreach ($pathNew as $dir) {
            $create_dir .= $dir . '/';
            @ftp_mkdir($ftp, $create_dir);
        } 
        ftp_quit($ftp);
    } else if ($mkdirMethod == 'PHP') {
        foreach ($pathNew as $dir) {
            $create_dir .= $dir . '/';
            @mkdir('../' . $create_dir, 0755);
        } 
    } 
} 

/**
 * Folder recursive deletion
 * 
 * @param string $location Path of directory to delete
 * @access public 
 */
function delDir($location)
{
    if (is_dir($location)) {
        $all = opendir($location);

        while ($file = readdir($all)) {
            if (is_dir($location . '/' . $file) && $file != '..' && $file != '.') {
                deldir($location . '/' . $file);
                if (file_exists($location . '/' . $file)) {
                    rmdir($location . '/' . $file);
                } 
                unset($file);
            } else if (!is_dir($location . '/' . $file)) {
                if (file_exists($location . '/' . $file)) {
                    unlink("$location/$file");
                } 
                unset($file);
            } 
        } 

        closedir($all);
        rmdir($location);
    } else {
        if (file_exists($location)) {
            unlink($location);
        } 
    } 
} 

/**
 * Return recursive folder size
 * 
 * @param string $location Path of directory to calculate
 * @param boolean $recursive Option to use recursivity
 * @access public 
 */
function folder_info_size($path, $recursive = true)
{
    $result = 0;

    if (is_dir($path) || is_readable($path)) {
        $dir = opendir($path);

        while ($file = readdir($dir)) {
            if ($file != '.' && $file != '..') {
                if (is_dir($path . $file)) {
                    $result += $recursive ? folder_info_size($path . $file . '/') : 0;
                } else {
                    $result += filesize($path . $file);
                } 
            } 
        } 

        closedir($dir);
        return($result);
    } 
} 

/**
 * Return size converted with units (in the user language)
 * 
 * @param string $result Result to convert
 * @access public 
 */
function convertSize($result)
{
    global $byteUnits;

    if ($result >= 1073741824) {
        $result = round($result / 1073741824 * 100) / 100 . ' ' . $byteUnits[3];
    } else if ($result >= 1048576) {
        $result = round($result / 1048576 * 100) / 100 . ' ' . $byteUnits[2];
    } else if ($result >= 1024) {
        $result = round($result / 1024 * 100) / 100 . ' ' . $byteUnits[1];
    } else {
        $result = $result . ' ' . $byteUnits[0];
    } 

    if ($result == 0) {
        $result = '-';
    } 

    return($result);
} 

/**
 * Return file size
 * 
 * @param string $fichier File used
 * @access public 
 */
function file_info_size($fichier)
{
    global $taille;
    $taille = filesize($fichier);
    return($taille);
} 

/**
 * Return file dimensions
 * 
 * @param string $fichier File used
 * @access public 
 */
function file_info_dim($fichier)
{
    global $dim;
    $temp = GetImageSize($fichier);
    $dim = $temp[0] . 'x' . $temp[1];
    return($dim);
} 

/**
 * Return file date
 * 
 * @param string $fichier File used
 * @access public 
 */
function file_info_date($fichier)
{
    global $dateFile;
    $dateFile = date("Y-m-d", filemtime($fichier));
    return($dateFile);
} 

/**
 * Read the content of a file
 * 
 * @param string $file File used
 * @access public 
 */
function recupFile($file)
{
    if (!file_exists($file)) {
        echo 'File does not exist : ' . $file;
        return(false);
    } 

    $fp = fopen($file, 'r');

    if (!$fp) {
        echo 'Unable to open file : ' . $file;
        return(false);
    } while (!feof ($fp)) {
        $tmpline = fgets($fp, 4096);
        $content .= $tmpline;
    } 

    fclose($fp);
    return($content);
} 

/**
 * Displat date according to timezone (if timezone enabled)
 * 
 * @param string $storedDate Date stored in database
 * @param string $gmtUser User timezone
 * @access public 
 */
function createDate($storedDate, $gmtUser)
{
    global $gmtTimezone;

    if ($gmtTimezone == 'true') {
        if ($storedDate != '') {
            $extractHour = substr($storedDate, 11, 2);
            $extractMinute = substr($storedDate, 14, 2);
            $extractYear = substr($storedDate, 0, 4);
            $extractMonth = substr($storedDate, 5, 2);
            $extractDay = substr($storedDate, 8, 2);

            return(date("Y-m-d H:i", mktime($extractHour + $gmtUser, $extractMinute, '', $extractMonth, $extractDay, $extractYear)));
        } 
    } else {
        return($storedDate);
    } 
} 

/**
 * Convert insert data value in form
 * 
 * @param string $data Data to convert
 * @access public 
 */
function convertData($data)
{
    if (get_magic_quotes_gpc() == 1) {
        $data = str_replace('"', '&quot;', $data);
        $data = str_replace('<', '&lt;', $data);
        $data = str_replace('>', '&gt;', $data);
        return($data);
    } else {
        $data = str_replace('"', '&quot;', $data);
        $data = str_replace('<', '&lt;', $data);
        $data = str_replace('>', '&gt;', $data);
        $data = addslashes($data);
        return($data);
    } 
} 

/**
 * Count total results from a request
 * 
 * @param string $tmpsql Sql query
 * @access public 
 */
function compt($tmpsql)
{
    global $tableCollab, $databaseType, $countEnregTotal, $comptRequest;

    $comptRequest += 1;

    if ($databaseType == 'mysql') {
        $res = mysql_connect(MYSERVER, MYLOGIN, MYPASSWORD) or die($strings['error_server']);
        mysql_select_db(MYDATABASE, $res) or die($strings['error_database']);
        $sql = $tmpsql;
        $index = mysql_query($sql, $res);

        while ($row = mysql_fetch_row($index)) {
            $countEnreg[] = ($row[0]);
        } 

        $countEnregTotal = count($countEnreg);
        mysql_free_result($index);
        mysql_close($res);
    } 

    return($countEnregTotal);
} 

/**
 * Simple query
 * 
 * @param string $tmpsql Sql query
 * @access public 
 */
function connectSql($tmpsql)
{
    global $tableCollab, $databaseType;

    if ($databaseType == 'mysql') {
        $res = mysql_connect(MYSERVER, MYLOGIN, MYPASSWORD) or die($strings['error_server']);
        mysql_select_db(MYDATABASE, $res) or die($strings['error_database']);
        $sql = $tmpsql;
        $index = mysql_query($sql, $res);
        @mysql_free_result($index);
        mysql_close($res);
    } 
} 

/**
 * Return last id from any table
 * 
 * @param string $tmpsql Table name
 * @access public 
 */
function last_id($tmpsql)
{
    global $tableCollab, $databaseType;

    if ($databaseType == 'mysql') {
        $res = mysql_connect(MYSERVER, MYLOGIN, MYPASSWORD) or die($strings['error_server']);
        mysql_select_db(MYDATABASE, $res) or die($strings['error_database']);
        global $lastId;
        $sql = 'SELECT id FROM ' . $tmpsql . ' ORDER BY id DESC';
        $index = mysql_query($sql, $res);

        while ($row = mysql_fetch_row($index)) {
            $lastId[] = $row[0];
        } 

        mysql_free_result($index);
        mysql_close($res);
    } 
} 

/**
 * Convert an array to a CSV line
 * 
 * @author Michael Cook <mcook83@sourceforge.net> 
 * @param array $row Row of data
 * @access public 
 */
function write_csv($row)
{
    $line = '';

    foreach ($row as $value) {
        if (is_numeric($value)) {
            $line .= $value . ',';
        } else {
            $line .= '"' . $value . '",';
        } 
    } 

    $line = substr($line, 0, -1);
    $line .= "\n";
    return($line);
} 
// This function is called by the session handler to initialize things
// this NEEDS persistent database connections!!
function _sess_mysql_open($save_path, $session_name)
{
    global $SESS_DBH; 
    // Establishes a new persistent database connection, or grabs an existing one
    if (!$SESS_DBH = mysql_pconnect(MYSERVER, MYLOGIN, MYPASSWORD)) {
        // There was an error connecting to the database
        print '<li>Can not connect to ' . MYSERVER . ' as ' . MYLOGIN;
        print '<li>MySQL Error: ' . mysql_error();
        exit;
    } 
    // Set the database for this resource link
    if (!mysql_select_db(MYDATABASE, $SESS_DBH)) {
        // Unable to set the database
        print '<li>Unable to select database ' . MYDATABASE;
        print '<li>MySQL Error: ' . mysql_error();
        exit;
    } 

    return(true);
} 
// This function is called when the page has finished executing and the session
// handler needs to close things off.

// (Note, do not confuse this with _sess_mysql_destroy(), which is called to
// kill the session).
function _sess_mysql_close()
{ 
    // Nothing needs to be done in this function
    // since we use persistent connections.
    return(true);
} 
// This function is called by the session handler to read the data associated
// with a given session key ($key) and remote address (SESS_REMOTE_ADDR). This
// function must retrieve and return the session data for the identified session.

// (Note: you do not have to worry about unserializing data, if you do not know
// what this means, then don't worry about it).
function _sess_mysql_read($session_id)
{
    global $SESS_DBH, $tableCollab;

    $data = ''; // init
    $valid_session_time = time() - SESS_MAXLIFE; // earliest valid session time
     
    // Select statement
    $select = 'SELECT session_data ';
    $select .= 'FROM ' . $tableCollab['sessions'] . ' ';
    $select .= 'WHERE id="' . $session_id . '" '; 
    // shall we check the ip?
    if (constant("SESS_IPCHECK") == true) {
        $select .= 'AND ipaddr="' . SESS_REMOTE_ADDR . '" ';
    } 

    $select .= 'AND last_access > ' . $valid_session_time; 
    // Execute the query
    if (!$result = mysql_query($select, $SESS_DBH)) {
        // error with query
        print '<li>Unable to query the database ' . MYDATABASE;
        print '<li>MySQL Error: ' . mysql_error();
        exit;
    } 
    // Check for result, must only be one to return data
    if (mysql_num_rows($result) == 1) {
        // Session data found, strip any slashes used for escaping
        $row = mysql_fetch_array($result);
        $data = stripSlashes($row['session_data']);
    } else {
        // We have an invalid or stale session, destroy it!
        _sess_mysql_destroy($session_id);
    }
    // Free up the resources used by the statement
    @mysql_free_result($result);

    return($data);
} 
// This function is called when the session handler has session data to save,
// which usually happens at the end of your script. It is responsible for saving
// the session data in such a way that it can be retrieved later on by
// _sess_mysql_read($session_id).

// (Note: you do not have to worry about serializing data, if you do not know
// what this means, then don't worry about it).
function _sess_mysql_write($session_id, $val)
{
    global $SESS_DBH, $tableCollab; 
    // Escape any characters needed for storage within a database
    $data = addSlashes($val);
    $valid_session_time = time() - SESS_MAXLIFE; // earliest valid session time
     
    // Insert statement for initial session entry
    $insert = 'INSERT INTO ' . $tableCollab['sessions'] . ' (id, ipaddr, session_data, last_access) ';
    $insert .= 'VALUES ("' . $session_id . '", "' . SESS_REMOTE_ADDR . '", "' . $data . '", "' . time() . '")'; 
    // Update statements for current/active sessions
    $update = 'UPDATE ' . $tableCollab['sessions'] . ' SET session_data="' . $data . '", last_access=' . time() . ' ';
    $update .= 'WHERE id="' . $session_id . '" '; 
    // shall we check the ip?
    if (constant("SESS_IPCHECK") == true) {
        $update .= 'AND ipaddr="' . SESS_REMOTE_ADDR . '" ';
    } 

    $update .= 'AND last_access > ' . $valid_session_time; 
    // First try the insert, if that doesn't succeed, it means the
    // session already exists and we need to update it instead.
    if (!mysql_query($insert, $SESS_DBH)) {
        // Insert faild, issue an update
        if (!mysql_query($update, $SESS_DBH)) {
            // Everything faild, return false
            return(false);
        } 
    } 

    return(true);
} 
// This function is called when a session is destroyed. It is responsible for
// deleting the session and cleaning things up.
function _sess_mysql_destroy($session_id)
{
    global $SESS_DBH, $tableCollab; 
    // Delete from the sessions table all data for the session $session_id
    // and SESS_REMOTE_ADDR
    $select = 'DELETE FROM ' . $tableCollab['sessions'] . ' WHERE id="' . $session_id . '"'; 
    // shall we check the ip?
    if (constant("SESS_IPCHECK") == true) {
        $select .= ' AND ipaddr="' . SESS_REMOTE_ADDR . '"';
    } 
    // Execute the query
    if (!$result = mysql_query($select, $SESS_DBH)) {
        // error with query
        print '<li>Unable to query the database ' . MYDATABASE;
        print '<li>MySQL Error: ' . mysql_error();
        exit;
    } 
    // Free up resources used by the query
    @mysql_free_result($result);

    return($result);
} 
// This function is responsible for garbage collection. In the case of session
// handling, it is responsible for deleting old, stale sessions that are hanging
// around. The session handler will call this every now and then.
function _sess_mysql_gc($max_lifetime)
{
    global $SESS_DBH, $tableCollab;

    $valid_session_time = time() - 172800; // 48 hrs ago
     
    // Delete old values from the sessions table, greater than 48 hrs old
    $query = 'DELETE FROM ' . $tableCollab['sessions'] . ' WHERE last_access < ' . $valid_session_time; 
    // Execute the query
    if (!$result = mysql_query($query, $SESS_DBH)) {
        // error with query
        print '<li>Unable to query the database ' . MYDATABASE;
        print '<li>MySQL Error: ' . mysql_error();
        exit;
    } 
    // Free up resources used by the query
    @mysql_free_result($result);

    return($result);
} 
// this function returns the client host address
function get_http_host ()
{ 
    // Get the refering host for security checks
    $sess_host = $_SERVER['HTTP_HOST'];

    if (empty($sess_host)) {
        $sess_host = getenv('HTTP_HOST');
    } 

    if (!empty($_SERVER['HTTP_X_FORWARDED_HOST'])) {
        $sess_host = $_SERVER['HTTP_X_FORWARDED_HOST'];
    } 

    $sess_host = preg_replace('/:.*/', '', $sess_host);
    $sess_host = trim($sess_host); // strip leading/trailing white space
    
    return($sess_host);
} 
// Get the (actual) client IP addr, used in combination with
// the SID as the primary key in the database, security.
function get_remote_addr ()
{
    $ipaddr = $_SERVER['REMOTE_ADDR'];

    if (empty($ipaddr)) {
        $ipaddr = getenv('REMOTE_ADDR');
    } 

    if (!empty($_SERVER['HTTP_CLIENT_IP'])) {
        $ipaddr = $_SERVER['HTTP_CLIENT_IP'];
    } 

    $tmpipaddr = getenv('HTTP_CLIENT_IP');

    if (!empty($tmpipaddr)) {
        $ipaddr = $tmpipaddr;
    } 

    if (!empty($_SERVER['HTTP_X_FORWARDED_FOR'])) {
        $ipaddr = preg_replace('/,.*/', '', $_SERVER['HTTP_X_FORWARDED_FOR']);
    } 

    $tmpipaddr = getenv('HTTP_X_FORWARDED_FOR');

    if (!empty($tmpipaddr)) {
        $ipaddr = preg_replace('/,.*/', '', $tmpipaddr);
    } 

    if (isset($_SERVER['HTTP_CLIENTADDRESS'])) {
        $tmpipaddr = $_SERVER['HTTP_CLIENTADDRESS'];

        if (!empty($tmpipaddr)) {
            $ipaddr = preg_replace('/,.*/', '', $tmpipaddr);
        } 
    } 

    $ipaddr = trim($ipaddr);

    return($ipaddr);
}
/**
 * This function is called when a session try to enter critical section
 *
 * @access public 
 */
function enter_critical_section() {
    global $msg;

    if ((function_exists('ftok'))&&(function_exists('sem_get'))&&(function_exists('sem_acquire'))) {
        $key = ftok(realpath('../includes/library.php'), 'N');
        if ($key == -1) {
            $msg = 'ftokError';
            return -1;
        }
        $id = sem_get($key);
        if ($id == FALSE) {
            $msg = 'semgetError';
            return -1;
        }
        if (sem_acquire($id)==FALSE) {
            $msg = 'semacquireError';
            return -1;
        }
        return $id;
    } else {
       ignore_user_abort(1);
       $lockfile = '../files/mutex';

       if (file_exists($lockfile)) {
           if (time() - filemtime($lockfile) > 5) unlink($lockfile);
       }

       $id = @fopen($lockfile, 'x');
       for ($i=0; ($id === false) && ($i < 20); $i++) {
           clearstatcache();
           usleep(rand(9, 999));
           $id = @fopen($lockfile, 'x');
       }

       if ($id == false) {
           $msg = 'semacquireError';
           $id = -1;
       }

       ignore_user_abort(0);
       return $id;
    }
}
/*
 * This function is called when a session try to leave critical section
 *
 * @access public 
 */
function leave_critical_section($id) {
    if (function_exists('sem_release')) {
        sem_release($id);
    } else {
       ignore_user_abort(1);
       $lockfile = '../files/mutex';

       fclose($id);
       unlink($lockfile);

       ignore_user_abort(0);
    }
}

?>