function duplicateCourse()
{
$id_dupcourse = Get::req('id_course', DOTY_INT, 0);
// read the old course info
$query_sel = "SELECT *\n\tFROM " . $GLOBALS['prefix_lms'] . "_course\n\tWHERE idCourse = '" . $id_dupcourse . "' ";
$result_sel = sql_query($query_sel);
$list_sel = sql_fetch_array($result_sel);
foreach ($list_sel as $k => $v) {
$list_sel[$k] = mysql_escape_string($v);
}
$new_course_dup = 0;
$new_file_array = array();
if ($list_sel['imgSponsor'] !== '') {
$new_name_array = explode('_', str_replace('course_sponsor_logo_', '', $list_sel['imgSponsor']));
$filename = 'course_sponsor_logo_' . mt_rand(0, 100) . '_' . time() . '_' . str_replace('course_sponsor_logo_' . $new_name_array[0] . '_' . $new_name_array[1] . '_', '', $list_sel['imgSponsor']);
$new_file_array[0]['old'] = $list_sel['imgSponsor'];
$new_file_array[0]['new'] = $filename;
$list_sel['imgSponsor'] = $filename;
}
if ($list_sel['img_course'] !== '') {
$new_name_array = explode('_', str_replace('course_logo_', '', $list_sel['img_course']));
$filename = 'course_logo_' . mt_rand(0, 100) . '_' . time() . '_' . str_replace('course_logo_' . $new_name_array[0] . '_' . $new_name_array[1] . '_', '', $list_sel['img_course']);
$new_file_array[1]['old'] = $list_sel['img_course'];
$new_file_array[1]['new'] = $filename;
$list_sel['img_course'] = $filename;
}
if ($list_sel['img_material'] !== '') {
$new_name_array = explode('_', str_replace('course_user_material_', '', $list_sel['img_material']));
$filename = 'course_user_material_' . mt_rand(0, 100) . '_' . time() . '_' . str_replace('course_user_material_' . $new_name_array[0] . '_' . $new_name_array[1] . '_', '', $list_sel['img_material']);
$new_file_array[2]['old'] = $list_sel['img_material'];
$new_file_array[2]['new'] = $filename;
$list_sel['img_material'] = $filename;
}
if ($list_sel['img_othermaterial'] !== '') {
$new_name_array = explode('_', str_replace('course_otheruser_material_', '', $list_sel['img_othermaterial']));
$filename = 'course_otheruser_material_' . mt_rand(0, 100) . '_' . time() . '_' . str_replace('course_otheruser_material_' . $new_name_array[0] . '_' . $new_name_array[1] . '_', '', $list_sel['img_othermaterial']);
$new_file_array[3]['old'] = $list_sel['img_othermaterial'];
$new_file_array[3]['new'] = $filename;
$list_sel['img_othermaterial'] = $filename;
}
if ($list_sel['course_demo'] !== '') {
$new_name_array = explode('_', str_replace('course_demo_', '', $list_sel['course_demo']));
$filename = 'course_demo_' . mt_rand(0, 100) . '_' . time() . '_' . str_replace('course_demo_' . $new_name_array[0] . '_' . $new_name_array[1] . '_', '', $list_sel['course_demo']);
$new_file_array[4]['old'] = $list_sel['course_demo'];
$new_file_array[4]['new'] = $filename;
$list_sel['course_demo'] = $filename;
}
// duplicate the entry of learning_course
$query_ins = "INSERT INTO " . $GLOBALS['prefix_lms'] . "_course\n\t\t( idCategory, code, name, description, lang_code, status, level_show_user,\n\t\tsubscribe_method, linkSponsor, imgSponsor, img_course, img_material, img_othermaterial,\n\t\tcourse_demo, mediumTime, permCloseLO, userStatusOp, difficult, show_progress, show_time, show_extra_info,\n\t\tshow_rules, valid_time, max_num_subscribe, min_num_subscribe,\n\t\tmax_sms_budget, selling, prize, course_type, policy_point, point_to_all, course_edition, classrooms, certificates,\n\t\tcreate_date, security_code, imported_from_connection, course_quota, used_space, course_vote, allow_overbooking, can_subscribe,\n\t\tsub_start_date, sub_end_date, advance, show_who_online, direct_play, autoregistration_code, use_logo_in_courselist )\n\tVALUES\n\t\t( '" . $list_sel['idCategory'] . "', '" . $list_sel['code'] . "', '" . "Copia di " . $list_sel['name'] . "', '" . $list_sel['description'] . "', '" . $list_sel['lang_code'] . "', '" . $list_sel['status'] . "', '" . $list_sel['level_show_user'] . "',\n\t\t'" . $list_sel['subscribe_method'] . "', '" . $list_sel['linkSponsor'] . "', '" . $list_sel['imgSponsor'] . "', '" . $list_sel['img_course'] . "', '" . $list_sel['img_material'] . "', '" . $list_sel['img_othermaterial'] . "',\n\t\t'" . $list_sel['course_demo'] . "', '" . $list_sel['mediumTime'] . "', '" . $list_sel['permCloseLO'] . "', '" . $list_sel['userStatusOp'] . "', '" . $list_sel['difficult'] . "', '" . $list_sel['show_progress'] . "', '" . $list_sel['show_time'] . "', '" . $list_sel['show_extra_info'] . "',\n\t\t'" . $list_sel['show_rules'] . "', '" . $list_sel['valid_time'] . "', '" . $list_sel['max_num_subscribe'] . "', '" . $list_sel['min_num_subscribe'] . "',\n\t\t'" . $list_sel['max_sms_budget'] . "', '" . $list_sel['selling'] . "', '" . $list_sel['prize'] . "', '" . $list_sel['course_type'] . "', '" . $list_sel['policy_point'] . "', '" . $list_sel['point_to_all'] . "', '" . $list_sel['course_edition'] . "', '" . $list_sel['classrooms'] . "', '" . $list_sel['certificates'] . "',\n\t\t'" . $list_sel['create_date'] . "', '" . $list_sel['security_code'] . "', '" . $list_sel['imported_from_connection'] . "', '" . $list_sel['course_quota'] . "', '" . $list_sel['used_space'] . "', '" . $list_sel['course_vote'] . "', '" . $list_sel['allow_overbooking'] . "', '" . $list_sel['can_subscribe'] . "',\n\t\t'" . $list_sel['sub_start_date'] . "', '" . $list_sel['sub_end_date'] . "', '" . $list_sel['advance'] . "', '" . $list_sel['show_who_online'] . "', '" . $list_sel['direct_play'] . "', '" . $list_sel['autoregistration_code'] . "', '" . $list_sel['use_logo_in_courselist'] . "' )";
$result_ins = sql_query($query_ins);
if (!$result_ins) {
//Util::jump_to('index.php?modname=course&op=course_list&result=err_course');
return false;
}
// the id of the new course created
$new_course_dup = sql_insert_id();
//Create the new course file
$path = Get::sett('pathcourse');
$path = '/appLms/' . Get::sett('pathcourse') . (substr($path, -1) != '/' && substr($path, -1) != '\\' ? '/' : '');
require_once _base_ . '/lib/lib.upload.php';
sl_open_fileoperations();
foreach ($new_file_array as $file_info) {
sl_copy($path . $file_info['old'], $path . $file_info['new']);
}
sl_close_fileoperations();
// copy the old course menu into the new one
$query_selmen = "SELECT *\n\tFROM " . $GLOBALS['prefix_lms'] . "_menucourse_main\n\tWHERE idCourse = '" . $id_dupcourse . "' ";
$result_selmen = sql_query($query_selmen);
while ($list_selmen = sql_fetch_array($result_selmen)) {
$query_dupmen = "INSERT INTO " . $GLOBALS['prefix_lms'] . "_menucourse_main " . " (idCourse, sequence, name, image) " . " VALUES " . " ( '" . $new_course_dup . "', '" . $list_selmen['sequence'] . "', '" . $list_selmen['name'] . "', '" . $list_selmen['image'] . "' )";
$result_dupmen = sql_query($query_dupmen);
$array_seq[$list_selmen['idMain']] = sql_insert_id();
}
$query_selmenun = "SELECT *\n\tFROM " . $GLOBALS['prefix_lms'] . "_menucourse_under\n\tWHERE idCourse = '" . $id_dupcourse . "' ";
$result_selmenun = sql_query($query_selmenun);
while ($list_selmenun = sql_fetch_array($result_selmenun)) {
$valore_idn = $list_selmenun['idMain'];
$_idMain = $array_seq[$valore_idn];
$query_dupmen = "INSERT INTO " . $GLOBALS['prefix_lms'] . "_menucourse_under\n\t\t(idMain, idCourse, sequence, idModule, my_name)\n\t\tVALUES\n\t\t('" . $_idMain . "', '" . $new_course_dup . "', '" . $list_selmenun['sequence'] . "', '" . $list_selmenun['idModule'] . "', '" . $list_selmenun['my_name'] . "')";
$result_dupmen = sql_query($query_dupmen);
}
function &getCourseLevelSt($id_course)
{
$map = array();
$levels = CourseLevel::getLevels();
$acl_man =& $GLOBALS['current_user']->getAclManager();
// find all the group created for this menu custom for permission management
foreach ($levels as $lv => $name_level) {
$group_info = $acl_man->getGroup(FALSE, '/lms/course/' . $id_course . '/subscribed/' . $lv);
$map[$lv] = $group_info[ACL_INFO_IDST];
}
return $map;
}
function funAccess($functionname, $mode, $returnValue = false, $custom_mod_name = false)
{
return true;
}
require_once $GLOBALS['where_lms'] . '/lib/lib.course.php';
require_once $GLOBALS['where_lms'] . '/lib/lib.manmenu.php';
require_once $GLOBALS['where_lms'] . '/lib/lib.subscribe.php';
$docebo_course = new DoceboCourse($id_dupcourse);
$subscribe_man = new CourseSubscribe_Manager();
$group_idst =& $docebo_course->createCourseLevel($new_course_dup);
$group_of_from =& $docebo_course->getCourseLevel($id_dupcourse);
$perm_form =& createPermForCoursebis($group_of_from, $new_course_dup, $id_dupcourse);
$levels = $subscribe_man->getUserLevel();
foreach ($levels as $lv => $name_level) {
foreach ($perm_form[$lv] as $idrole => $v) {
if ($group_idst[$lv] != 0 && $idrole != 0) {
$acl_man =& $GLOBALS['current_user']->getAclManager();
$acl_man->addToRole($idrole, $group_idst[$lv]);
}
}
}
// duplicate the certificate assigned
$query_selmenun = "SELECT *\n\tFROM " . $GLOBALS['prefix_lms'] . "_certificate_course\n\tWHERE id_course = '" . $id_dupcourse . "' ";
$result_selmenun = sql_query($query_selmenun);
while ($list_selmenun = sql_fetch_array($result_selmenun)) {
$query_dupmen = "INSERT INTO " . $GLOBALS['prefix_lms'] . "_certificate_course\n\t\t\t(id_certificate, id_course, available_for_status)\n\t\t\tVALUES\n\t\t\t('" . $list_selmenun['id_certificate'] . "', '" . $new_course_dup . "', '" . $list_selmenun['available_for_status'] . "' )";
$result_dupmen = sql_query($query_dupmen);
}
require_once $GLOBALS['where_lms'] . '/modules/organization/orglib.php';
require_once $GLOBALS['where_lms'] . '/lib/lib.param.php';
require_once $GLOBALS['where_lms'] . '/class.module/track.object.php';
require_once $GLOBALS['where_lms'] . '/class.module/learning.object.php';
function createLO($objectType, $idResource = NULL)
{
$query = "SELECT className, fileName FROM " . $GLOBALS['prefix_lms'] . "_lo_types WHERE objectType='" . $objectType . "'";
$rs = sql_query($query);
list($className, $fileName) = sql_fetch_row($rs);
require_once $GLOBALS['where_lms'] . '/class.module/' . $fileName;
$lo = new $className($idResource);
return $lo;
}
$nullVal = NULL;
$array_cor = array();
$map_org = array();
$tree_course = new OrgDirDb($id_dupcourse);
$coll = $tree_course->getFoldersCollection($nullVal);
while ($folder = $coll->getNext()) {
//if($folder->otherValues[REPOFIELDIDRESOURCE] != 0 ) {
if (!empty($folder->otherValues[REPOFIELDOBJECTTYPE])) {
$lo = createLO($folder->otherValues[REPOFIELDOBJECTTYPE]);
$id_nuovo_lo = $lo->copy($folder->otherValues[REPOFIELDIDRESOURCE]);
$id_vecchio = $folder->otherValues[REPOFIELDIDRESOURCE];
$query_selmenun = "SELECT * FROM\n\t\t\t" . $GLOBALS['prefix_lms'] . "_organization\n\t\t\tWHERE idCourse = '" . $id_dupcourse . "'\n\t\t\tAND idResource = '" . $id_vecchio . "' ";
$result_selmenun = sql_query($query_selmenun);
while ($list_selmenun = mysql_fetch_array($result_selmenun)) {
$query_dupmen = "INSERT INTO " . $GLOBALS['prefix_lms'] . "_organization\n\t\t\t\t(idParent, path, lev, title,\n\t\t\t\tobjectType, idResource, idCategory, idUser, idAuthor,\n\t\t\t\tversion, difficult, description, language, resource,\n\t\t\t\tobjective, dateInsert, idCourse, prerequisites, isTerminator,\n\t\t\t\tidParam, visible, milestone)\n\t\t\t\tVALUES\n\t\t\t\t('" . (isset($map_org[$list_selmenun['idParent']]) ? $map_org[$list_selmenun['idParent']] : 0) . "', '" . $list_selmenun['path'] . "', '" . $list_selmenun['lev'] . "', '" . $list_selmenun['title'] . "',\n\t\t\t\t'" . $list_selmenun['objectType'] . "', '" . $id_nuovo_lo . "', '" . $list_selmenun['idCategory'] . "', '" . $list_selmenun['idUser'] . "', '" . $list_selmenun['idAuthor'] . "',\n\t\t\t\t'" . $list_selmenun['version'] . "', '" . $list_selmenun['difficult'] . "', '" . $list_selmenun['description'] . "', '" . $list_selmenun['language'] . "', '" . $list_selmenun['resource'] . "',\n\t\t\t\t'" . $list_selmenun['objective'] . "', '" . $list_selmenun['dateInsert'] . "', '" . $new_course_dup . "', '" . $list_selmenun['prerequisites'] . "', '" . $list_selmenun['isTerminator'] . "',\n\t\t\t\t'" . $list_selmenun['idParam'] . "', '" . $list_selmenun['visible'] . "', '" . $list_selmenun['milestone'] . "')";
$result_dupmen = sql_query($query_dupmen);
$id_org = $list_selmenun['idOrg'];
$id_last = sql_insert_id();
$array_cor[$id_org] = $id_last;
$query_lo_par = "INSERT INTO " . $GLOBALS['prefix_lms'] . "_lo_param\n\t\t\t\t(param_name, param_value)\n\t\t\t\tVALUES\n\t\t\t\t('idReference', '" . $id_last . "') ";
$result_lo_par = sql_query($query_lo_par);
$id_lo_par = sql_insert_id();
$query_up_lo = "UPDATE " . $GLOBALS['prefix_lms'] . "_lo_param\n\t\t\t\tSET idParam = '" . $id_lo_par . "'\n\t\t\t\tWHERE id = '" . $id_lo_par . "' ";
$result_up_lo = sql_query($query_up_lo);
$query_up_or = "UPDATE " . $GLOBALS['prefix_lms'] . "_organization\n\t\t\t\tSET\tidParam = '" . $id_lo_par . "'\n\t\t\t\tWHERE idOrg = '" . $id_last . "' ";
$result_up_or = sql_query($query_up_or);
}
} else {
// copy folder
echo $id_vecchio = $folder->id;
$query_selmenun = "SELECT * FROM\n\t\t\t" . $GLOBALS['prefix_lms'] . "_organization\n\t\t\tWHERE idCourse = '" . $id_dupcourse . "'\n\t\t\tAND idOrg = '" . $id_vecchio . "' ";
$result_selmenun = sql_query($query_selmenun);
$list_selmenun = mysql_fetch_array($result_selmenun);
$query_dupmen = " INSERT INTO " . $GLOBALS['prefix_lms'] . "_organization\n\t\t\t(idParent, path, lev, title,\n\t\t\tobjectType, idResource, idCategory, idUser, idAuthor,\n\t\t\tversion, difficult, description, language, resource,\n\t\t\tobjective, dateInsert, idCourse, prerequisites, isTerminator,\n\t\t\tidParam, visible, milestone)\n\t\t\tVALUES\n\t\t\t('" . (isset($map_org[$list_selmenun['idParent']]) ? $map_org[$list_selmenun['idParent']] : 0) . "', '" . $list_selmenun['path'] . "', '" . $list_selmenun['lev'] . "', '" . $list_selmenun['title'] . "',\n\t\t\t'" . $list_selmenun['objectType'] . "', '" . $id_nuovo_lo . "', '" . $list_selmenun['idCategory'] . "', '" . $list_selmenun['idUser'] . "', '" . $list_selmenun['idAuthor'] . "',\n\t\t\t'" . $list_selmenun['version'] . "', '" . $list_selmenun['difficult'] . "', '" . $list_selmenun['description'] . "', '" . $list_selmenun['language'] . "', '" . $list_selmenun['resource'] . "',\n\t\t\t'" . $list_selmenun['objective'] . "', '" . $list_selmenun['dateInsert'] . "', '" . $new_course_dup . "', '" . $list_selmenun['prerequisites'] . "', '" . $list_selmenun['isTerminator'] . "',\n\t\t\t'" . $list_selmenun['idParam'] . "', '" . $list_selmenun['visible'] . "', '" . $list_selmenun['milestone'] . "')";
$result_dupmen = sql_query($query_dupmen);
$map_org[$id_vecchio] = sql_insert_id();
}
}
$query_cor = "SELECT *\n\tFROM " . $GLOBALS['prefix_lms'] . "_organization\n\tWHERE\n\tidCourse = '" . $new_course_dup . "'\n\tAND prerequisites !='' ";
$result_cor = sql_query($query_cor);
while ($list_cor = sql_fetch_array($result_cor)) {
$id_orgup = $list_cor['prerequisites'];
$arr_pre = explode(",", $id_orgup);
for ($i = 0; $i < sizeof($arr_pre); $i++) {
$arr_pre[$i] = str_replace(intval($arr_pre[$i]), $array_cor[intval($arr_pre[$i])], $arr_pre[$i]);
}
$query_updcor = "UPDATE " . $GLOBALS['prefix_lms'] . "_organization\n\t\t\tSET prerequisites = '";
for ($i = 0; $i < sizeof($arr_pre); $i++) {
if ($i != 0) {
$query_updcor .= ",";
}
$query_updcor .= $arr_pre[$i];
}
$query_updcor .= "' WHERE idOrg = '" . $list_cor['idOrg'] . "' ";
$result_upcor = sql_query($query_updcor);
}
$query_selmenun = "SELECT * FROM\n\t" . $GLOBALS['prefix_lms'] . "_forum\n\tWHERE idCourse = '" . $id_dupcourse . "' ";
$result_selmenun = sql_query($query_selmenun);
while ($list_selmenun = sql_fetch_array($result_selmenun)) {
$query_dupmen = "INSERT INTO\n\t\t" . $GLOBALS['prefix_lms'] . "_forum\n\t\t(idCourse, title, description, locked, sequence, emoticons)\n\t\tVALUES\n\t\t('" . $new_course_dup . "', '" . $list_selmenun['title'] . "', '" . $list_selmenun['description'] . "',\n\t\t'" . $list_selmenun['locked'] . "', '" . $list_selmenun['sequence'] . "', '" . $list_selmenun['emoticons'] . "')";
$result_dupmen = sql_query($query_dupmen);
}
$query_selmenun = "SELECT * FROM\n\t" . $GLOBALS['prefix_lms'] . "_coursereport\n\tWHERE id_course = '" . $id_dupcourse . "' ";
$sql2 = $query_selmenun;
$result_selmenun = sql_query($query_selmenun);
while ($list_selmenun = sql_fetch_array($result_selmenun)) {
if (!isset($array_organization[$list_selmenun['id_source']]) or $array_organization[$list_selmenun['id_source']] == "") {
$array_organization[$list_selmenun['id_source']] = 0;
}
$query_dupmen = "INSERT INTO\n\t\t" . $GLOBALS['prefix_lms'] . "_coursereport\n\t\t(id_course,title,max_score,required_score,weight,show_to_user,use_for_final,sequence,source_of,id_source)\n\t\tVALUES\n\t\t('" . $new_course_dup . "', '" . $list_selmenun['title'] . "', '" . $list_selmenun['max_score'] . "',\n\t\t'" . $list_selmenun['required_score'] . "', '" . $list_selmenun['weight'] . "', '" . $list_selmenun['show_to_user'] . "', '" . $list_selmenun['use_for_final'] . "', '" . $list_selmenun['sequence'] . "', '" . $list_selmenun['source_of'] . "', '" . $array_organization[$list_selmenun['id_source']] . "')";
$sql2 = $query_dupmen;
$result_dupmen = sql_query($query_dupmen);
}
$query_selmenun = "SELECT *\n\tFROM " . $GLOBALS['prefix_lms'] . "_htmlfront\n\tWHERE id_course = '" . $id_dupcourse . "' ";
$result_selmenun = sql_query($query_selmenun);
while ($list_selmenun = sql_fetch_array($result_selmenun)) {
$query_dupmen = "INSERT INTO " . $GLOBALS['prefix_lms'] . "_htmlfront\n\t\t(id_course, textof)\n\t\tVALUES\n\t\t('" . $new_course_dup . "', '" . mysql_escape_string($list_selmenun['textof']) . "')";
$result_dupmen = sql_query($query_dupmen);
}
//Util::jump_to('index.php?modname=course&op=course_list&result=ok_course');
return true;
}
