<?php
/* For licensing terms, see /license.txt */

/**
 * This tool allows platform admins to create courses by uploading a CSV file
 * Copyright (c) 2010 Chamilo Association
 * Copyright (c) 2008 Dokeos SPRL
 * Copyright (c) 2005 Bart Mollet <bart.mollet@hogent.be>
 * @todo Add some language variables to Chamilo Translation Application
 * @package chamilo.admin
 */

/**
 * Validates imported data.
 */
function validate_data($courses) {
    global $_configuration;
    global $purification_option_for_usernames;
    $dbnamelength = strlen($_configuration['db_prefix']);
    // Ensure the prefix + database name do not get over 40 characters.
    $maxlength = 40 - $dbnamelength;

    $errors = array ();
    $coursecodes = array ();
    foreach ($courses as $index => $course) {
        $course['line'] = $index +1;
        // 1. Check whether mandatory fields are set.
        $mandatory_fields = array ('Code', 'Title', 'CourseCategory', 'Teacher');
        foreach ($mandatory_fields as $key => $field) {
            if (!isset($course[$field]) || strlen($course[$field]) == 0) {
                $course['error'] = get_lang($field.'Mandatory');
                $errors[] = $course;
            }
        }
        // 2. Check current course code.
        if (isset ($course['Code']) && strlen($course['Code']) != 0) {
            // 2.1 Check whether code has been allready used by this CVS-file.
            if (isset($coursecodes[$course['Code']])) {
                $course['error'] = get_lang('CodeTwiceInFile');
                $errors[] = $course;
            }
            // 2.2 Check course code length.
            elseif (api_strlen($course['Code']) > $maxlength) {
                $course['error'] = get_lang('Max');
                $errors[] = $course;
            }
            // 2.3 Check whether course code has been occupied.
            else {
                $course_table = Database :: get_main_table(TABLE_MAIN_COURSE);
                $sql = "SELECT * FROM $course_table WHERE code = '".Database::escape_string($course['Code'])."'";
                $res = Database::query($sql);
                if (Database::num_rows($res) > 0) {
                    $course['error'] = get_lang('CodeExists');
                    $errors[] = $course;
                }
            }
            $coursecodes[$course['Code']] = 1;
        }
        /*
        // 3. Check whether teacher exists.
        if (!UserManager::is_username_empty($course['Teacher'])) {
            $teacher = UserManager::purify_username($course['Teacher'], $purification_option_for_usernames);
            if (UserManager::is_username_available($teacher)) {
                $course['error'] = get_lang('UnknownTeacher').' ('.$teacher.')';
                $errors[] = $course;
            }
        }
        */
        // 4. Check whether course category exists.
        if (isset($course['CourseCategory']) && strlen($course['CourseCategory']) != 0) {
            $category_table = Database :: get_main_table(TABLE_MAIN_CATEGORY);
            $sql = "SELECT * FROM $category_table WHERE code = '".Database::escape_string($course['CourseCategory'])."'";
            $res = Database::query($sql);
            if (Database::num_rows($res) == 0) {
                $course['error'] = get_lang('UnkownCategoryCourseCode').' ('.$course['CourseCategory'].')';
                $errors[] = $course;
            }
        }
    }
    return $errors;
}

/**
 * Saves imported data.
 * @param array   List of courses
 */
function save_data($courses) {
    global $_configuration, $firstExpirationDelay;
    global $purification_option_for_usernames;

    $user_table = Database::get_main_table(TABLE_MAIN_USER);
    $msg = '';
    foreach ($courses as $index => $course) {
        $course_language = api_get_valid_language($course['Language']);
        $keys = define_course_keys($course['Code'], '', $_configuration['db_prefix']);

        $titular = $uidCreator = $username = '';

        // Get username from name (firstname lastname).
        if (!UserManager::is_username_empty($course['Teacher'])) {
            $teacher = UserManager::purify_username($course['Teacher'], $purification_option_for_usernames);
            if (UserManager::is_username_available($teacher)) {
                $sql    = "SELECT username FROM $user_table WHERE ".(api_is_western_name_order(null, $course_language) ? "CONCAT(firstname,' ',lastname)" : "CONCAT(lastname,' ',firstname)")." = '{$course['Teacher']}' LIMIT 1";
                $rs     = Database::query($sql);
                $user   = Database::fetch_object($rs);
                $username = $user->username;
            } else {
                $username = $teacher;
            }
        }

        // Get name and uid creator from username.
        if (!empty($username)) {
            $sql = "SELECT user_id, ".(api_is_western_name_order(null, $course_language) ? "CONCAT(firstname,' ',lastname)" : "CONCAT(lastname,' ',firstname)")." AS name FROM $user_table WHERE username = '".Database::escape_string(UserManager::purify_username($username, $purification_option_for_usernames))."'";
            $res = Database::query($sql);
            $teacher    = Database::fetch_object($res);
            $titular    = $teacher->name;
            $uidCreator = $teacher->user_id;
        } else {
            $titular    = $course['Teacher'];
            $uidCreator = 1;
        }

        $visual_code = $keys['currentCourseCode'];
        $code = $keys['currentCourseId'];
        $db_name = $keys['currentCourseDbName'];
        $directory = $keys['currentCourseRepository'];
        $expiration_date = time() + $firstExpirationDelay;
        prepare_course_repository($directory, $code);
        update_Db_course($db_name);
        fill_course_repository($directory);
        fill_Db_course($db_name, $directory, $course_language, array());
        register_course($code, $visual_code, $directory, $db_name, $titular, $course['CourseCategory'], $course['Title'], $course_language, $uidCreator, $expiration_date);
        $msg .= '<a href="'.api_get_path(WEB_COURSE_PATH).$directory.'/">'.$code.'</a> '.get_lang('Created').'<br />';
    }
    if (!empty($msg)) {
        Display::display_normal_message($msg, false);
    }
}

/**
 * Read the CSV-file
 * @param string $file Path to the CSV-file
 * @return array All course-information read from the file
 */
function parse_csv_data($file) {
    $courses = Import :: csv_to_array($file);
    return $courses;
}

$language_file = array('admin', 'registration','create_course', 'document');

$cidReset = true;

require '../inc/global.inc.php';

$this_section = SECTION_PLATFORM_ADMIN;
api_protect_admin_script();

require_once api_get_path(LIBRARY_PATH).'fileManage.lib.php';
require_once api_get_path(LIBRARY_PATH).'import.lib.php';
require_once api_get_path(LIBRARY_PATH).'usermanager.lib.php';
require_once api_get_path(CONFIGURATION_PATH).'add_course.conf.php';
require_once api_get_path(LIBRARY_PATH).'add_course.lib.inc.php';
require_once api_get_path(LIBRARY_PATH).'formvalidator/FormValidator.class.php';

$defined_auth_sources[] = PLATFORM_AUTH_SOURCE;
if (is_array($extAuthSource)) {
    $defined_auth_sources = array_merge($defined_auth_sources, array_keys($extAuthSource));
}

$tool_name = get_lang('ImportCourses').' CSV';

$interbreadcrumb[] = array('url' => 'index.php', 'name' => get_lang('PlatformAdmin'));

set_time_limit(0);
Display :: display_header($tool_name);

if ($_POST['formSent']) {
    if (empty($_FILES['import_file']['tmp_name'])) {
        $error_message = get_lang('UplUploadFailed');
        Display :: display_error_message($error_message, false);
    } else {
        $allowed_file_mimetype = array('csv');

        $ext_import_file = substr($_FILES['import_file']['name'], (strrpos($_FILES['import_file']['name'], '.') + 1));

        if (!in_array($ext_import_file, $allowed_file_mimetype)) {
            Display :: display_error_message(get_lang('YouMustImportAFileAccordingToSelectedOption'));
        } else {
            $courses = parse_csv_data($_FILES['import_file']['tmp_name']);
            $errors = validate_data($courses);
            if (count($errors) == 0) {
                save_data($courses);
            }
        }
    }
}

if (count($errors) != 0) {
    $error_message = '<ul>';
    foreach ($errors as $index => $error_course) {
        $error_message .= '<li>'.get_lang('Line').' '.$error_course['line'].': <strong>'.$error_course['error'].'</strong>: ';
        $error_message .= $error_course['Code'].' '.$error_course['Title'];
        $error_message .= '</li>';
    }
    $error_message .= '</ul>';
    Display :: display_error_message($error_message, false);
}
?>
<form method="post" action="<?php echo api_get_self(); ?>" enctype="multipart/form-data" style="margin: 0px;">
<div class="row"><div class="form_header"><?php echo $tool_name; ?></div></div>
<div class="row">
    <div class="label"><?php echo get_lang('ImportCSVFileLocation'); ?></div>
    <div class="formw">
        <input type="file" name="import_file"/>
    </div>
</div>
<div class="row">
    <div class="label"></div>
    <div class="formw">
        <button type="submit" class="save" value="<?php echo get_lang('Import'); ?>"><?php echo get_lang('Import'); ?></button>
    </div>
</div>


<input type="hidden" name="formSent" value="1"/>

</form>

<div style="clear: both;"></div>

<p><?php echo get_lang('CSVMustLookLike').' ('.get_lang('MandatoryFields').')'; ?> :</p>

<blockquote>
<pre>
<strong>Code</strong>;<strong>Title</strong>;<strong>CourseCategory</strong>;<strong>Teacher</strong>;Language
BIO0015;Biology;BIO;username;english
</pre>
</blockquote>

<?php

Display :: display_footer();