diff --git a/main/install/update-db-scorm-1.6.x-1.8.0.inc.php b/main/install/update-db-scorm-1.6.x-1.8.0.inc.php
index e94aa4db13..4272ffc6fb 100755
--- a/main/install/update-db-scorm-1.6.x-1.8.0.inc.php
+++ b/main/install/update-db-scorm-1.6.x-1.8.0.inc.php
@@ -25,17 +25,18 @@ $loglevel = 0;
//get table prefix from $prefix variable declared in update-db-....inc.php
$table_prefix = $prefix;
$sys_course_path = $pathForm.'courses/';
+$upd_course_path = $proposedUpdatePath.'courses/';
function my_get_time($time){
- $matches = array();
- if(preg_match('/(\d{1,4}):(\d{2})(:(\d{2})(\.\d*)?)?/',$time,$matches)){
- if(count($matches)==3){
- return ($matches[1]*60)+($matches[2]);
- }else{
- return ($matches[1]*3600)+($matches[2]*60)+($matches[4]);
- }
- }
- else return 0;
+ $matches = array();
+ if(preg_match('/(\d{1,4}):(\d{2})(:(\d{2})(\.\d*)?)?/',$time,$matches)){
+ if(count($matches)==3){
+ return ($matches[1]*60)+($matches[2]);
+ }else{
+ return ($matches[1]*3600)+($matches[2]*60)+($matches[4]);
+ }
+ }
+ else return 0;
}
//open log file
@@ -67,19 +68,19 @@ $sql = "SELECT * FROM course";
$res = api_sql_query($sql,__FILE__,__LINE__);
while ($row = Database::fetch_array($res))
{
- $course_pref = $table_prefix;
- if($singleDbForm)
- {
- $dbname = $_configuration['main_database'].'.'.$course_pref.$row['db_name'].'_';
- }
- else
- {
- $dbname = $row['db_name'].'.'.$course_pref;
- }
- $courses_list[] = $row['db_name'];
- $courses_id_list[$row['code']] = $row['db_name'];
- $courses_id_full_table_prefix_list[$row['code']] = $dbname;
- $courses_dir_list[$row['code']] = $row['directory'];
+ $course_pref = $table_prefix;
+ if($singleDbForm)
+ {
+ $dbname = $_configuration['main_database'].'.'.$course_pref.$row['db_name'].'_';
+ }
+ else
+ {
+ $dbname = $row['db_name'].'.'.$course_pref;
+ }
+ $courses_list[] = $row['db_name'];
+ $courses_id_list[$row['code']] = $row['db_name'];
+ $courses_id_full_table_prefix_list[$row['code']] = $dbname;
+ $courses_dir_list[$row['code']] = $row['directory'];
}
if($loglevel>0){error_log("Tables created/deleted for all courses",0);}
@@ -89,381 +90,399 @@ if($loglevel>0){error_log("Tables created/deleted for all courses",0);}
*/
//MIGRATING LEARNPATHS
//test only one course
-//$courses_list = array('fadtest_BLA');
foreach($courses_id_full_table_prefix_list as $course_code => $db)
{
- if(strlen($courses_id_list[$course_code])>40)
- {
- error_log('Database '.$courses_id_list[$course_code].' is too long, skipping',0);
- continue;
- }
- $incoherences = 0;
- if($loglevel>0){error_log("Now starting migration of learnpath tables from $db database...",0);}
- $lp_main = $db.TABLE_LEARNPATH_MAIN;
- $lp_ids = array();
- $lp_user = $db.TABLE_LEARNPATH_USER;
- $lp_users = array();
- $lp_chap = $db.TABLE_LEARNPATH_CHAPTER;
- $parent_chaps = array();
- $lp_chap_items = array();
- $ordered_chaps = array();
- $lp_item = $db.TABLE_LEARNPATH_ITEM;
- $lp_items = array();
- $lp_ordered_items = array();
- $parent_lps = array(); //keeps a track of chapter's learnpath ids
- $my_new_lp = $db.$new_lp;
- $my_new_lp_item = $db.$new_lp_item;
- $my_new_lp_view = $db.$new_lp_view;
- $my_new_lp_item_view = $db.$new_lp_item_view;
-
- //migrate learnpaths
- $sql_test = "SELECT * FROM $my_new_lp";
- $res_test = mysql_query($sql_test);
- $sql_lp = "SELECT * FROM $lp_main";
- if($loglevel>1){error_log("$sql_lp",0);}
- $res_lp = mysql_query($sql_lp);//using mysql_query to avoid dying on failure
- if(!$res_lp or !$res_test){
- if($loglevel>1){
- error_log("+++Problem querying DB $lp_main+++ skipping (".mysql_error().")",0);
- if(!$res_test){
- error_log("This might be due to no existing table in the destination course",0);
- }
- }
- continue;
- }
- $dsp_ord = 1;
- while($row = Database::fetch_array($res_lp))
- {
- //echo "Treating lp id : ".$row['learnpath_id']."
\n";
- $ins_lp_sql = "INSERT INTO $my_new_lp (lp_type,name,description,display_order,content_maker) " .
- "VALUES (1," .
- "'".mysql_real_escape_string($row['learnpath_name'])."'," .
- "'".mysql_real_escape_string($row['learnpath_description'])."',$dsp_ord,'Dokeos')";
- $ins_lp_res = api_sql_query($ins_lp_sql);
- $in_id = Database::get_last_insert_id();
- if(empty($in_id) or $in_id == false) die('Could not insert lp: '.$ins_lp_sql);
- $lp_ids[$row['learnpath_id']] = $in_id;
- $dsp_ord++;
- $max_dsp_lp = $dsp_ord;
- }
- //echo "lp_ids:".print_r($lp_ids,true)."
\n";
-
+ if(strlen($courses_id_list[$course_code])>40)
+ {
+ error_log('Database '.$courses_id_list[$course_code].' is too long, skipping',0);
+ continue;
+ }
+ $incoherences = 0;
+ if($loglevel>0){error_log("Now starting migration of learnpath tables from $db database...",0);}
+ $lp_doc = $db.TABLE_DOCUMENT;
+ $lp_main = $db.TABLE_LEARNPATH_MAIN;
+ $lp_ids = array();
+ $lp_user = $db.TABLE_LEARNPATH_USER;
+ $lp_users = array();
+ $lp_chap = $db.TABLE_LEARNPATH_CHAPTER;
+ $parent_chaps = array();
+ $lp_chap_items = array();
+ $ordered_chaps = array();
+ $lp_item = $db.TABLE_LEARNPATH_ITEM;
+ $lp_items = array();
+ $lp_ordered_items = array();
+ $parent_lps = array(); //keeps a track of chapter's learnpath ids
+ $my_new_lp = $db.$new_lp;
+ $my_new_lp_item = $db.$new_lp_item;
+ $my_new_lp_view = $db.$new_lp_view;
+ $my_new_lp_item_view = $db.$new_lp_item_view;
+
+ //migrate learnpaths
+ $sql_test = "SELECT * FROM $my_new_lp";
+ $res_test = mysql_query($sql_test);
+ $sql_lp = "SELECT * FROM $lp_main";
+ if($loglevel>1){error_log("$sql_lp",0);}
+ $res_lp = mysql_query($sql_lp);//using mysql_query to avoid dying on failure
+ if(!$res_lp or !$res_test){
+ if($loglevel>1){
+ error_log("+++Problem querying DB $lp_main+++ skipping (".mysql_error().")",0);
+ if(!$res_test){
+ error_log("This might be due to no existing table in the destination course",0);
+ }
+ }
+ continue;
+ }
+ $dsp_ord = 1;
+ while($row = Database::fetch_array($res_lp))
+ {
+ //echo "Treating lp id : ".$row['learnpath_id']."
\n";
+ $ins_lp_sql = "INSERT INTO $my_new_lp (lp_type,name,description,display_order,content_maker) " .
+ "VALUES (1," .
+ "'".mysql_real_escape_string($row['learnpath_name'])."'," .
+ "'".mysql_real_escape_string($row['learnpath_description'])."',$dsp_ord,'Dokeos')";
+ $ins_lp_res = api_sql_query($ins_lp_sql);
+ $in_id = Database::get_last_insert_id();
+ if(empty($in_id) or $in_id == false) die('Could not insert lp: '.$ins_lp_sql);
+ $lp_ids[$row['learnpath_id']] = $in_id;
+ $dsp_ord++;
+ $max_dsp_lp = $dsp_ord;
+ }
+ //echo "lp_ids:".print_r($lp_ids,true)."
\n";
+
- //MIGRATING LEARNPATH CHAPTERS
+ //MIGRATING LEARNPATH CHAPTERS
$sql_lp_chap = "ALTER TABLE $lp_chap ADD INDEX ( parent_chapter_id, display_order )";
$res_lp_chap = api_sql_query($sql_lp_chap,__FILE__,__LINE__);
- $sql_lp_chap = "SELECT * FROM $lp_chap ORDER BY parent_chapter_id, display_order";
- //echo "$sql_lp_chap
\n";
- $res_lp_chap = api_sql_query($sql_lp_chap,__FILE__,__LINE__);
- while($row = Database::fetch_array($res_lp_chap))
- {
- //echo "Treating chapter id : ".$row['id']."
\n";
-
- //TODO build path for this chapter (although there is no real path for any chapter)
- //TODO find out how to calculate the "next_item_id" with the "ordre" field
- $my_lp_item = $my_new_lp_item;
- $myname = mysql_real_escape_string($row['chapter_name']);
- $mydesc = mysql_real_escape_string($row['chapter_description']);
- $ins_lp_sql = "INSERT INTO $my_new_lp_item (" .
- "lp_id," .
- "item_type," .
- "title," .
- "description," .
- "path, " .
- "display_order, " .
- "next_item_id) " .
- "VALUES (" .
- "'".$lp_ids[$row['learnpath_id']]."'," . //insert new learnpath ID
- "'dokeos_chapter'," .
- "'".$myname."'," .
- "'".$mydesc."'," .
- "''," .
- $row['display_order'].", " .
- "123456" .
- ")";
- //echo $ins_lp_sql."
\n";
- $ins_res = api_sql_query($ins_lp_sql,__FILE__,__LINE__);
- $in_id = Database::get_last_insert_id();
- //echo " Inserted item $in_id
\n";
- if(empty($in_id) OR $in_id == false) die('Could not insert lp: '.$ins_sql);
- $parent_chaps[$row['id']] = $row['parent_chapter_id'];
- $lp_chap_items[$row['id']] = $in_id;
- $parent_lps[$row['id']] = $row['learnpath_id'];
- $ordered_chaps[$row['parent_chapter_id']][$row['display_order']]=$in_id;
- $lp_chaps_list[$row['learnpath_id']][]=$in_id;
- }
- //echo "parent_lps:".print_r($parent_lps,true)."
\n";
- //Now one loop to update the parent_chapter_ids
- foreach($parent_chaps as $old_chap => $old_parent_chap){
- if($old_parent_chap != 0){
- $new_chap = $lp_chap_items[$old_chap];
- $new_parent = $lp_chap_items[$old_parent_chap];
- if(isset($new_chap) && $new_chap != ''
- && isset($new_parent) && $new_parent != '')
- {
- $sql_par_chap = "UPDATE $my_new_lp_item " .
- "SET parent_item_id = $new_parent " .
- "WHERE id = $new_chap";
- $res_par_chap = api_sql_query($sql_par_chap,__FILE__,__LINE__);
- }
- }
- }
- unset($parent_chaps);
- //Now one loop to set the next_item_id and the previous_item_id
- foreach($ordered_chaps as $parent_chap){
- $last = 0;
- foreach($ordered_chaps[$parent_chap] as $order => $new_id){
- $sql_upd_chaps = "UPDATE $my_new_lp_item " .
- "SET previous_item_id = $last " .
- "WHERE id = $new_id";
- $res_upd_chaps = api_sql_query($sql_upd_chaps,__FILE__,__LINE__);
-
- $next = 0;
- if(!empty($ordered_chaps[$parent_chap][$order+1])){
- $next = $ordered_chaps[$parent_chap][$order+1];
- }
- $sql_upd_chaps = "UPDATE $my_new_lp_item " .
- "SET next_item_id = $next " .
- "WHERE id = $new_id";
- $res_upd_chaps = api_sql_query($sql_upd_chaps,__FILE__,__LINE__);
- $last = $new_id;
- }
- }
- unset($ordered_chaps);
-
- //migrate learnpath_items
- //TODO define this array thanks to types defined in the learnpath_building scripts
- //TODO set order correctly
- $type_trans = array(
- 'document' => TOOL_DOCUMENT,
- 'exercise' => TOOL_QUIZ,
- 'forum' => TOOL_FORUM,
- 'Agenda' => TOOL_CALENDAR_EVENT,
- 'Ad_Valvas' => TOOL_ANNOUNCEMENT,
- 'Link' => TOOL_LINK,
- 'Link _blank' => TOOL_LINK,
- 'Exercise' => TOOL_QUIZ,
- 'HotPotatoes'=> 'HotPotatoes',
- 'Forum' => TOOL_FORUM,
- 'Thread' => TOOL_THREAD,
- 'Topic' => TOOL_THREAD,
- 'Post' => TOOL_POST,
- 'Document' => TOOL_DOCUMENT,
- 'Assignments'=> 'Assignments',
- 'Dropbox' => TOOL_DROPBOX,
- 'Introduction_text'=> 'Introduction_text',
- 'Course_description' => TOOL_COURSE_DESCRIPTION,
- 'Groups' => TOOL_GROUP,
- 'Users' => TOOL_USER,
-
- //'chapter' => 'dokeos_chapter', Chapters should all be in learnpath_chapter, no matter the nesting level
-
- );
- //MIGRATING LEARNPATH ITEMS
+ $sql_lp_chap = "SELECT * FROM $lp_chap ORDER BY parent_chapter_id, display_order";
+ //echo "$sql_lp_chap
\n";
+ $res_lp_chap = api_sql_query($sql_lp_chap,__FILE__,__LINE__);
+ while($row = Database::fetch_array($res_lp_chap))
+ {
+ //echo "Treating chapter id : ".$row['id']."
\n";
+
+ //TODO build path for this chapter (although there is no real path for any chapter)
+ //TODO find out how to calculate the "next_item_id" with the "ordre" field
+ $my_lp_item = $my_new_lp_item;
+ $myname = mysql_real_escape_string($row['chapter_name']);
+ $mydesc = mysql_real_escape_string($row['chapter_description']);
+ $ins_lp_sql = "INSERT INTO $my_new_lp_item (" .
+ "lp_id," .
+ "item_type," .
+ "title," .
+ "description," .
+ "path, " .
+ "display_order, " .
+ "next_item_id) " .
+ "VALUES (" .
+ "'".$lp_ids[$row['learnpath_id']]."'," . //insert new learnpath ID
+ "'dokeos_chapter'," .
+ "'".$myname."'," .
+ "'".$mydesc."'," .
+ "''," .
+ $row['display_order'].", " .
+ "123456" .
+ ")";
+ //echo $ins_lp_sql."
\n";
+ $ins_res = api_sql_query($ins_lp_sql,__FILE__,__LINE__);
+ $in_id = Database::get_last_insert_id();
+ //echo " Inserted item $in_id
\n";
+ if(empty($in_id) OR $in_id == false) die('Could not insert lp: '.$ins_sql);
+ $parent_chaps[$row['id']] = $row['parent_chapter_id'];
+ $lp_chap_items[$row['id']] = $in_id;
+ $parent_lps[$row['id']] = $row['learnpath_id'];
+ $ordered_chaps[$row['parent_chapter_id']][$row['display_order']]=$in_id;
+ $lp_chaps_list[$row['learnpath_id']][]=$in_id;
+ }
+ //echo "parent_lps:".print_r($parent_lps,true)."
\n";
+ //Now one loop to update the parent_chapter_ids
+ foreach($parent_chaps as $old_chap => $old_parent_chap){
+ if($old_parent_chap != 0){
+ $new_chap = $lp_chap_items[$old_chap];
+ $new_parent = $lp_chap_items[$old_parent_chap];
+ if(isset($new_chap) && $new_chap != ''
+ && isset($new_parent) && $new_parent != '')
+ {
+ $sql_par_chap = "UPDATE $my_new_lp_item " .
+ "SET parent_item_id = $new_parent " .
+ "WHERE id = $new_chap";
+ $res_par_chap = api_sql_query($sql_par_chap,__FILE__,__LINE__);
+ }
+ }
+ }
+ unset($parent_chaps);
+ //Now one loop to set the next_item_id and the previous_item_id
+ foreach($ordered_chaps as $parent_chap){
+ $last = 0;
+ foreach($ordered_chaps[$parent_chap] as $order => $new_id){
+ $sql_upd_chaps = "UPDATE $my_new_lp_item " .
+ "SET previous_item_id = $last " .
+ "WHERE id = $new_id";
+ $res_upd_chaps = api_sql_query($sql_upd_chaps,__FILE__,__LINE__);
+
+ $next = 0;
+ if(!empty($ordered_chaps[$parent_chap][$order+1])){
+ $next = $ordered_chaps[$parent_chap][$order+1];
+ }
+ $sql_upd_chaps = "UPDATE $my_new_lp_item " .
+ "SET next_item_id = $next " .
+ "WHERE id = $new_id";
+ $res_upd_chaps = api_sql_query($sql_upd_chaps,__FILE__,__LINE__);
+ $last = $new_id;
+ }
+ }
+ unset($ordered_chaps);
+
+ //migrate learnpath_items
+ //TODO define this array thanks to types defined in the learnpath_building scripts
+ //TODO set order correctly
+ $type_trans = array(
+ 'document' => TOOL_DOCUMENT,
+ 'exercise' => TOOL_QUIZ,
+ 'forum' => TOOL_FORUM,
+ 'Agenda' => TOOL_CALENDAR_EVENT,
+ 'Ad_Valvas' => TOOL_ANNOUNCEMENT,
+ 'Link' => TOOL_LINK,
+ 'Link _blank' => TOOL_LINK,
+ 'Exercise' => TOOL_QUIZ,
+ 'HotPotatoes'=> 'HotPotatoes',
+ 'Forum' => TOOL_FORUM,
+ 'Thread' => TOOL_THREAD,
+ 'Topic' => TOOL_THREAD,
+ 'Post' => TOOL_POST,
+ 'Document' => TOOL_DOCUMENT,
+ 'Assignments'=> 'Assignments',
+ 'Dropbox' => TOOL_DROPBOX,
+ 'Introduction_text'=> 'Introduction_text',
+ 'Course_description' => TOOL_COURSE_DESCRIPTION,
+ 'Groups' => TOOL_GROUP,
+ 'Users' => TOOL_USER,
+
+ //'chapter' => 'dokeos_chapter', Chapters should all be in learnpath_chapter, no matter the nesting level
+
+ );
+ //MIGRATING LEARNPATH ITEMS
$sql_lp_item = "ALTER TABLE $lp_item ADD INDEX ( chapter_id, display_order)";
$res_lp_item = api_sql_query($sql_lp_item,__FILE__,__LINE__);
- $sql_lp_item = "SELECT * FROM $lp_item ORDER BY chapter_id, display_order";
- //echo "$sql_lp_item
\n";
- $res_lp_item = api_sql_query($sql_lp_item,__FILE__,__LINE__);
- while($row = Database::fetch_array($res_lp_item))
- {
- //echo "Treating chapter ".$row['chapter_id'].", item ".$row['id']."
\n";
- $type = $type_trans[$row['item_type']];
- $ref = $row['item_id'];
- //TODO build item path
- //TODO calculate "next_item_id" with the "ordre" field
- //prepare prereqs
- //prerequisites in Dokeos 1.6 is only authorised on previous items, so
- //we know that we are gonna talk about an item that has already been passed
- //through here - if none found, print message
- $prereq_id = '';
- if(!empty($row['prereq_id'])){
- switch($row['prereq_type']){
- case 'c':
- //chapter-type prereq
- $prereq_id = $lp_chap_items[$row['prereq_id']];
- if(empty($prereq_id) && $loglevel>1){error_log("Could not find prereq chapter ".$row['prereq_id'],0);}
- break;
- case 'i':
- default:
- //item type prereq
- $prereq_id = $lp_items[$parent_lps[$row['chapter_id']]][$row['prereq_id']];
- if(empty($prereq_id) && $loglevel>1){error_log("Could not find prereq item ".$row['prereq_id'],0);}
- break;
- }
- }
- $my_parent_id = 0;
- if(isset($lp_chap_items[$row['chapter_id']]))
- {
- $my_parent_id = $lp_chap_items[$row['chapter_id']];
- }
- if(isset($lp_ids[$parent_lps[$row['chapter_id']]]))
- { //if there is a parent learnpath
- $ins_lp_sql = "INSERT INTO $my_new_lp_item (" .
- "lp_id," .
- "item_type," .
- "ref, " .
- "title," .
- "description," .
- "path, " .
- "parent_item_id," .
- "prerequisite," .
- "display_order" .
- ") VALUES (" .
- "'".$lp_ids[$parent_lps[$row['chapter_id']]]."'," . //insert new learnpath ID
- "'$type'," .
- "'$ref', " .
- "'".mysql_real_escape_string($row['title'])."'," .
- "'".mysql_real_escape_string($row['description'])."'," .
- "'$ref'," .
- "".$my_parent_id."," .
- "'$prereq_id'," .
- $row['display_order']." " .
- ")";
- $ins_res = api_sql_query($ins_lp_sql,__FILE__,__LINE__);
- $in_id = Database::get_last_insert_id();
- //echo " Inserted item $in_id (".$row['title'].")
\n";
- if(empty($in_id) OR $in_id == false) die('Could not insert lp_item: '.$ins_sql);
- $lp_items[$parent_lps[$row['chapter_id']]][$row['id']] = $in_id;
- $lp_ordered_items[$parent_lps[$row['chapter_id']]][$row['chapter_id']][] = $in_id;
- }
- }
- //echo "lp_items:".print_r($lp_items,true)."
\n";
- // complete next_item_id field by going through the new table and looking at parent_id and display_order
+ $sql_lp_item = "SELECT * FROM $lp_item ORDER BY chapter_id, display_order";
+ //echo "$sql_lp_item
\n";
+ $res_lp_item = api_sql_query($sql_lp_item,__FILE__,__LINE__);
+ while($row = Database::fetch_array($res_lp_item))
+ {
+ //echo "Treating chapter ".$row['chapter_id'].", item ".$row['id']."
\n";
+ $type = $type_trans[$row['item_type']];
+ $ref = $row['item_id'];
+ //TODO build item path
+ //TODO calculate "next_item_id" with the "ordre" field
+ //prepare prereqs
+ //prerequisites in Dokeos 1.6 is only authorised on previous items, so
+ //we know that we are gonna talk about an item that has already been passed
+ //through here - if none found, print message
+ $prereq_id = '';
+ if(!empty($row['prereq_id'])){
+ switch($row['prereq_type']){
+ case 'c':
+ //chapter-type prereq
+ $prereq_id = $lp_chap_items[$row['prereq_id']];
+ if(empty($prereq_id) && $loglevel>1){error_log("Could not find prereq chapter ".$row['prereq_id'],0);}
+ break;
+ case 'i':
+ default:
+ //item type prereq
+ $prereq_id = $lp_items[$parent_lps[$row['chapter_id']]][$row['prereq_id']];
+ if(empty($prereq_id) && $loglevel>1){error_log("Could not find prereq item ".$row['prereq_id'],0);}
+ break;
+ }
+ }
+ $my_parent_id = 0;
+ if(isset($lp_chap_items[$row['chapter_id']]))
+ {
+ $my_parent_id = $lp_chap_items[$row['chapter_id']];
+ }
+ $title = '';
+ if(empty($row['title']) && $type == 'Document' && !empty($row['item_id']))
+ {
+ $my_sql_doctitle = "SELECT title FROM $lp_doc WHERE id = ".$row['item_id'];
+ $my_res_doctitle = api_sql_query($my_sql_doctitle,__FILE__,__LINE__);
+ if($row_doctitle = Database::fetch_array($my_res_doctitle))
+ {
+ $title = $row_doctitle['title'];
+ }
+ else
+ {
+ $title = '-';
+ }
+ }
+ else
+ {
+ $title = $row['title'];
+ }
+ if(isset($lp_ids[$parent_lps[$row['chapter_id']]]))
+ { //if there is a parent learnpath
+ $ins_lp_sql = "INSERT INTO $my_new_lp_item (" .
+ "lp_id," .
+ "item_type," .
+ "ref, " .
+ "title," .
+ "description," .
+ "path, " .
+ "parent_item_id," .
+ "prerequisite," .
+ "display_order" .
+ ") VALUES (" .
+ "'".$lp_ids[$parent_lps[$row['chapter_id']]]."'," . //insert new learnpath ID
+ "'$type'," .
+ "'$ref', " .
+ "'".mysql_real_escape_string($row['title'])."'," .
+ "'".mysql_real_escape_string($row['description'])."'," .
+ "'$ref'," .
+ "".$my_parent_id."," .
+ "'$prereq_id'," .
+ $row['display_order']." " .
+ ")";
+ $ins_res = api_sql_query($ins_lp_sql,__FILE__,__LINE__);
+ $in_id = Database::get_last_insert_id();
+ //echo " Inserted item $in_id (".$row['title'].")
\n";
+ if(empty($in_id) OR $in_id == false) die('Could not insert lp_item: '.$ins_sql);
+ $lp_items[$parent_lps[$row['chapter_id']]][$row['id']] = $in_id;
+ $lp_ordered_items[$parent_lps[$row['chapter_id']]][$row['chapter_id']][] = $in_id;
+ }
+ }
+ //echo "lp_items:".print_r($lp_items,true)."
\n";
+ // complete next_item_id field by going through the new table and looking at parent_id and display_order
$order_sql = "ALTER TABLE $my_new_lp_item ADD INDEX (lp_id, parent_item_id, display_order)";
$order_res = api_sql_query($order_sql,__FILE__,__LINE__);
- $order_sql = "SELECT * FROM $my_new_lp_item ORDER by lp_id ASC, parent_item_id ASC, display_order ASC";
- //echo "$order_sql
\n";
- $order_res = api_sql_query($order_sql,__FILE__,__LINE__);
- $order_item = array(); //this will contain a sequential list of item_id's, thus allowing to give a simple way to get next id...
- $lp_id = 0;
- //echo "";
- while($row = Database::fetch_array($order_res))
- {
- //print_r($row);
- if($row['lp_id'] != $lp_id)
- {
- //apply changes to the database and clean tool arrays
- $last = 0;
- foreach($order_item as $order_id => $item_id){
- $next = 0;
- if(!empty($order_item[$order_id+1])){
- $next = $order_item[$order_id+1];
- }
- $upd = "UPDATE $my_new_lp_item " .
- "SET next_item_id = ".$next."," .
- " previous_item_id = ".$last." " .
- "WHERE id = ".$item_id;
- //echo "$upd
\n";
- api_sql_query($upd,__FILE__,__LINE__);
- $last = $item_id;
- }
- $order_item = array();
- $lp_id = $row['lp_id'];
- $order_item[] = $row['id'];
- }else{
- $order_item[] = $row['id'];
- }
- }
- //process the last LP stack
- $last = 0;
- foreach($order_item as $order_id => $item_id){
- $next = 0;
- if(!empty($order_item[$order_id+1])){
- $next = $order_item[$order_id+1];
- }
- $upd = "UPDATE $my_new_lp_item " .
- "SET next_item_id = ".$next."," .
- " previous_item_id = ".$last." " .
- "WHERE id = ".$item_id;
- //echo "$upd
\n";
- api_sql_query($upd,__FILE__,__LINE__);
- $last = $item_id;
- }
-
- //echo "\n";
-
- //MIGRATING THE learnpath_user TABLE (results)
+ $order_sql = "SELECT * FROM $my_new_lp_item ORDER by lp_id ASC, parent_item_id ASC, display_order ASC";
+ //echo "$order_sql
\n";
+ $order_res = api_sql_query($order_sql,__FILE__,__LINE__);
+ $order_item = array(); //this will contain a sequential list of item_id's, thus allowing to give a simple way to get next id...
+ $lp_id = 0;
+ //echo "";
+ while($row = Database::fetch_array($order_res))
+ {
+ //print_r($row);
+ if($row['lp_id'] != $lp_id)
+ {
+ //apply changes to the database and clean tool arrays
+ $last = 0;
+ foreach($order_item as $order_id => $item_id){
+ $next = 0;
+ if(!empty($order_item[$order_id+1])){
+ $next = $order_item[$order_id+1];
+ }
+ $upd = "UPDATE $my_new_lp_item " .
+ "SET next_item_id = ".$next."," .
+ " previous_item_id = ".$last." " .
+ "WHERE id = ".$item_id;
+ //echo "$upd
\n";
+ api_sql_query($upd,__FILE__,__LINE__);
+ $last = $item_id;
+ }
+ $order_item = array();
+ $lp_id = $row['lp_id'];
+ $order_item[] = $row['id'];
+ }else{
+ $order_item[] = $row['id'];
+ }
+ }
+ //process the last LP stack
+ $last = 0;
+ foreach($order_item as $order_id => $item_id){
+ $next = 0;
+ if(!empty($order_item[$order_id+1])){
+ $next = $order_item[$order_id+1];
+ }
+ $upd = "UPDATE $my_new_lp_item " .
+ "SET next_item_id = ".$next."," .
+ " previous_item_id = ".$last." " .
+ "WHERE id = ".$item_id;
+ //echo "$upd
\n";
+ api_sql_query($upd,__FILE__,__LINE__);
+ $last = $item_id;
+ }
+
+ //echo "\n";
+
+ //MIGRATING THE learnpath_user TABLE (results)
$mysql = "ALTER TABLE $my_new_lp_item_view ADD INDEX (lp_view_id)";
$myres = api_sql_query($mysql,__FILE__,__LINE__);
$sql_lp_user = "ALTER TABLE $lp_user ADD INDEX (user_id, learnpath_id, learnpath_item_id)";
$res_lp_user = api_sql_query($sql_lp_user,__FILE__,__LINE__);
- $sql_lp_user = "SELECT * FROM $lp_user ORDER BY user_id, learnpath_id, learnpath_item_id";
- //echo "$sql_lp_user
\n";
- $res_lp_user = api_sql_query($sql_lp_user,__FILE__,__LINE__);
- $user_id = 0;
- $learnpath_id = 0;
- $lp_view = 0;
- while($row = Database::fetch_array($res_lp_user))
- {
- if($row['user_id']!=$user_id OR $row['learnpath_id']!=$learnpath_id) //the user has changed or this is the first
- {
- //insert a new lp_view
- $last = 0;
- if(!empty($lp_chaps_list[$row['learnpath_id']][0])){
- $last = $lp_chaps_list[$row['learnpath_id']][0];
- }
- if(empty($lp_ids[$row['learnpath_id']])){
- //this can be ignored as it means there was an LP before, this user
- //used it, but now it's been removed
- //echo "Somehow we also miss a lp_ids[".$row['learnpath_id']."] here
\n";
- $incoherences ++;
- }else{
- $mylpid = $lp_ids[$row['learnpath_id']];
- $sql_ins_view = "INSERT INTO $my_new_lp_view(" .
- "lp_id," .
- "user_id," .
- "view_count," .
- "last_item" .
- ")VALUES(" .
- "".$mylpid."," . //new learnpath id
- "".$row['user_id']."," . //user IDs stay the same
- "1," .
- "".$last."" . //use the first chapter from this learnpath
- ")";
- //echo $sql_ins_view;
- $res_ins_view = api_sql_query($sql_ins_view,__FILE__,__LINE__);
- $in_id = Database::get_last_insert_id();
- $user_id = $row['user_id'];
- $learnpath_id = $row['learnpath_id'];
- $lp_view = $in_id;
- }
- }
- //insert the record into lp_item_view
- //TODO fix the whole in here (missing one item at least)
- $my_new_lp_item_id = $lp_items[$learnpath_id][$row['learnpath_item_id']];
- if(empty($my_new_lp_item_id)){
- //this can be ignored safely as it just means a user used a learnpath_item
- //before it was removed from items - maybe fix that in Dokeos?
- //echo "Somehow we miss lp_items[".$learnpath_id."][".$row['learnpath_item_id']."] here...
";
- $incoherences ++;
- }else{
- $start_time = 0;
- $my_time = my_get_time($row['time']);
- if($my_time>0){
- $start_time = time()-$my_time;
- }
- $sql_ins_iv = "INSERT INTO $my_new_lp_item_view(" .
- "lp_item_id," .
- "lp_view_id," .
- "view_count," .
- "start_time," .
- "total_time," .
- "score," .
- "status" .
- ")VALUES(" .
- "".$lp_items[$learnpath_id][$row['learnpath_item_id']]."," .
- "".$lp_view."," .
- "1," .
- "$start_time," .
- "".$my_time."," .
- "".$row['score']."," .
- "'".$row['status']."'" .
- ")";
- //echo $sql_ins_iv;
- $res_ins_iv = api_sql_query($sql_ins_iv,__FILE__,__LINE__);
- }
+ $sql_lp_user = "SELECT * FROM $lp_user ORDER BY user_id, learnpath_id, learnpath_item_id";
+ //echo "$sql_lp_user
\n";
+ $res_lp_user = api_sql_query($sql_lp_user,__FILE__,__LINE__);
+ $user_id = 0;
+ $learnpath_id = 0;
+ $lp_view = 0;
+ while($row = Database::fetch_array($res_lp_user))
+ {
+ if($row['user_id']!=$user_id OR $row['learnpath_id']!=$learnpath_id) //the user has changed or this is the first
+ {
+ //insert a new lp_view
+ $last = 0;
+ if(!empty($lp_chaps_list[$row['learnpath_id']][0])){
+ $last = $lp_chaps_list[$row['learnpath_id']][0];
+ }
+ if(empty($lp_ids[$row['learnpath_id']])){
+ //this can be ignored as it means there was an LP before, this user
+ //used it, but now it's been removed
+ //echo "Somehow we also miss a lp_ids[".$row['learnpath_id']."] here
\n";
+ $incoherences ++;
+ }else{
+ $mylpid = $lp_ids[$row['learnpath_id']];
+ $sql_ins_view = "INSERT INTO $my_new_lp_view(" .
+ "lp_id," .
+ "user_id," .
+ "view_count," .
+ "last_item" .
+ ")VALUES(" .
+ "".$mylpid."," . //new learnpath id
+ "".$row['user_id']."," . //user IDs stay the same
+ "1," .
+ "".$last."" . //use the first chapter from this learnpath
+ ")";
+ //echo $sql_ins_view;
+ $res_ins_view = api_sql_query($sql_ins_view,__FILE__,__LINE__);
+ $in_id = Database::get_last_insert_id();
+ $user_id = $row['user_id'];
+ $learnpath_id = $row['learnpath_id'];
+ $lp_view = $in_id;
+ }
+ }
+ //insert the record into lp_item_view
+ //TODO fix the whole in here (missing one item at least)
+ $my_new_lp_item_id = $lp_items[$learnpath_id][$row['learnpath_item_id']];
+ if(empty($my_new_lp_item_id)){
+ //this can be ignored safely as it just means a user used a learnpath_item
+ //before it was removed from items - maybe fix that in Dokeos?
+ //echo "Somehow we miss lp_items[".$learnpath_id."][".$row['learnpath_item_id']."] here...
";
+ $incoherences ++;
+ }else{
+ $start_time = 0;
+ $my_time = my_get_time($row['time']);
+ if($my_time>0){
+ $start_time = time()-$my_time;
+ }
+ $sql_ins_iv = "INSERT INTO $my_new_lp_item_view(" .
+ "lp_item_id," .
+ "lp_view_id," .
+ "view_count," .
+ "start_time," .
+ "total_time," .
+ "score," .
+ "status" .
+ ")VALUES(" .
+ "".$lp_items[$learnpath_id][$row['learnpath_item_id']]."," .
+ "".$lp_view."," .
+ "1," .
+ "$start_time," .
+ "".$my_time."," .
+ "".$row['score']."," .
+ "'".$row['status']."'" .
+ ")";
+ //echo $sql_ins_iv;
+ $res_ins_iv = api_sql_query($sql_ins_iv,__FILE__,__LINE__);
+ }
//UPDATE THE LP_VIEW progress
$mysql = "SELECT count(distinct(lp_item_id)) FROM $my_new_lp_item_view WHERE lp_view_id = ".$lp_view." AND status IN ('passed','completed','succeeded','browsed','failed')";
$myres = api_sql_query($mysql,__FILE__,__LINE__);
@@ -474,82 +493,114 @@ foreach($courses_id_full_table_prefix_list as $course_code => $db)
$myres = api_sql_query($sql,__FILE__,__LINE__);
$myrow = Database::fetch_array($myres);
$total = $myrow[0];
- $progress = ((float)$completed/(float)$total)*100;
- $progress = number_format($progress,0);
- $sql = "UPDATE $my_new_lp_view SET progress = '$progress' WHERE id = '$lp_view'";
- $myres = api_sql_query($sql,__FILE__,__LINE__);
- }
+ $progress = ((float)$completed/(float)$total)*100;
+ $progress = number_format($progress,0);
+ $sql = "UPDATE $my_new_lp_view SET progress = '$progress' WHERE id = '$lp_view'";
+ $myres = api_sql_query($sql,__FILE__,__LINE__);
+ }
- /**
- * Move prerequisites
- * TODO integrate prerequisites migration into learnpath_item migration
- */
+ /**
+ * Move prerequisites
+ * TODO integrate prerequisites migration into learnpath_item migration
+ */
- $msg = '';
- if($incoherences>0){
- $msg = "(found $incoherences incoherences between views and items - ignored)";
- }
- /**
- * Migrate links on the homepage as well now (look into the TABLE_TOOL_LIST table and
- * update the links to newscorm/lp_controller.php?action=view&lp_id=x)
- * Only normal learnpaths were visible from the homepage so we only need to update here
- */
- //MIGRATING LEARNPATH LINKS ON COURSES HOMEPAGES
- $tbl_tool = $db.TABLE_TOOL_LIST;
- $sql_tool = "SELECT * FROM $tbl_tool WHERE image='scormbuilder.gif' AND link LIKE '%learnpath_handler%'";
- $res_tool = api_sql_query($sql_tool,__FILE__,__LINE__);
- while($row_tool = Database::fetch_array($res_tool)){
- $name = $row_tool['name'];
- $link = $row_tool['link'];
- //get old lp_id from there
- $matches = array();
- if(preg_match('/learnpath_id=(\d+)$/',$link,$matches)){
- $old_lp_id = $matches[1];
- $new_lp_id = $lp_ids[$old_lp_id];
- $sql_tool_upd = "UPDATE $tbl_tool " .
- "SET link='newscorm/lp_controller.php?action=view&lp_id=$new_lp_id' " .
- "WHERE id = ".$row_tool['id'];
- error_log('New LP - Migration - Updating tool table: '.$sql_tool_upd,0);
- //make sure there is a way of retrieving which links were updated (to revert)
- fwrite($fh,$sql_tool_upd." AND link ='$link'");
- fwrite($fh_revert,"UPDATE $tbl_tool SET link='$link' WHERE id=".$row_tool['id']." AND link ='newscorm/lp_controller.php?action=view&lp_id=$new_lp_id';\n");
- //echo $sql_tool_upd." (and link='$link')
\n";
- $res_tool_upd = api_sql_query($sql_tool_upd,__FILE__,__LINE__);
- }
- }
- /**
- * Update course description (intro page) to use new links instead of learnpath/learnpath_handler.php
- */
- $tbl_intro = $db.TABLE_TOOL_INTRO;
- $sql_i = "SELECT * FROM $tbl_intro WHERE id='course_homepage'";
- $res_i = api_sql_query($sql_i,__FILE__,__LINE__);
- //$link_to_course1 = 'scorm/scormdocument.php';
- while($row_i = Database::fetch_array($res_i)){
- $intro = $row_i['intro_text'];
- $update = 0;
- $out = array();
- if(preg_match_all('/learnpath\/showinframes\.php([^\s"\']*)learnpath_id=(\d*)/',$intro,$out,PREG_SET_ORDER)){
- foreach($out as $results){
- //echo "---> replace ".'/learnpath\/showinframes\.php([^\s"\']*)learnpath_id='.$results[2].'/ by newscorm/lp_controller.php'.$results[1].'action=view&lp_id='.$lp_ids[$results[2]];
- $intro = preg_replace('/learnpath\/showinframes\.php([^\s"\']*)learnpath_id='.$results[2].'/','newscorm/lp_controller.php'.$results[1].'action=view&lp_id='.$lp_ids[$results[2]],$intro);
- }
- }
- if($intrp != $row_i['intro_text']){
- //echo "Replacing ".$row_i['intro_text']."\n by \n ".$intro."
\n";
- $sql_upd = "update $tbl_intro set intro_text = '".mysql_real_escape_string($intro)."' WHERE id = 'course_homepage' AND intro_text = '".mysql_real_escape_string($row_i['intro_text'])."'";
- //echo $sql_upd."
\n";
- fwrite($fh,"$sql_upd\n");
- fwrite($fh_revert,"UPDATE $tbl_intro set intro_text = '".$row_i['intro_text']."' WHERE id = 'course_homepage' AND intro_text = '$intro';\n");
- fwrite($fh_res,"$intro\n");
- api_sql_query($sql_upd,__FILE__,__LINE__);
- }
- }
-
-
-
- if($loglevel>0){error_log("Done!".$msg,0);}
- //flush();
- //ob_flush();
+ $msg = '';
+ if($incoherences>0){
+ $msg = "(found $incoherences incoherences between views and items - ignored)";
+ }
+ /**
+ * Migrate links on the homepage as well now (look into the TABLE_TOOL_LIST table and
+ * update the links to newscorm/lp_controller.php?action=view&lp_id=x)
+ * Only normal learnpaths were visible from the homepage so we only need to update here
+ */
+ //MIGRATING LEARNPATH LINKS ON COURSES HOMEPAGES
+ $tbl_tool = $db.TABLE_TOOL_LIST;
+ $sql_tool = "SELECT * FROM $tbl_tool WHERE image='scormbuilder.gif' AND link LIKE '%learnpath_handler%'";
+ $res_tool = api_sql_query($sql_tool,__FILE__,__LINE__);
+ while($row_tool = Database::fetch_array($res_tool)){
+ $name = $row_tool['name'];
+ $link = $row_tool['link'];
+ //get old lp_id from there
+ $matches = array();
+ if(preg_match('/learnpath_id=(\d+)$/',$link,$matches)){
+ $old_lp_id = $matches[1];
+ $new_lp_id = $lp_ids[$old_lp_id];
+ $sql_tool_upd = "UPDATE $tbl_tool " .
+ "SET link='newscorm/lp_controller.php?action=view&lp_id=$new_lp_id' " .
+ "WHERE id = ".$row_tool['id'];
+ error_log('New LP - Migration - Updating tool table: '.$sql_tool_upd,0);
+ //make sure there is a way of retrieving which links were updated (to revert)
+ fwrite($fh,$sql_tool_upd." AND link ='$link'");
+ fwrite($fh_revert,"UPDATE $tbl_tool SET link='$link' WHERE id=".$row_tool['id']." AND link ='newscorm/lp_controller.php?action=view&lp_id=$new_lp_id';\n");
+ //echo $sql_tool_upd." (and link='$link')
\n";
+ $res_tool_upd = api_sql_query($sql_tool_upd,__FILE__,__LINE__);
+ }
+ }
+
+ $tbl_tool = $db.TABLE_TOOL_LIST;
+ $sql_tool = "SELECT * FROM $tbl_tool";
+ $res_tool = api_sql_query($sql_tool,__FILE__,__LINE__);
+ while($row_tool = Database::fetch_array($res_tool)){
+ $link = $row_tool['link'];
+ $matches = array();
+ $pattern = '@scorm/showinframes\.php([^\s"\'&]*)(&|&)file=([^\s"\'&]*)@';
+ if(preg_match($pattern,$link,$matches))
+ {
+ //echo "Found match for scorm link in $tbl_tool: $link
";
+ if(!empty($matches[3]) && (strtolower(substr($matches[3],-15))=='imsmanifest.xml') && !is_file(realpath(urldecode($matches[3]))) )
+ {
+ //echo "Removing link $link from tools
";
+ $sql_tool_upd = "DELETE FROM $tbl_tool WHERE id = ".$row_tool['id'];
+ error_log('New LP - Migration - Updating tool table (dead link): '.$sql_tool_upd,0);
+ //make sure there is a way of retrieving which links were updated (to revert)
+ fwrite($fh,$sql_tool_upd." AND link ='$link'");
+ fwrite($fh_revert,"INSERT INTO $tbl_tool (link) VALUES ('$link');\n");
+ //echo $sql_tool_upd." (and link='$link')
\n";
+ $res_tool_upd = api_sql_query($sql_tool_upd,__FILE__,__LINE__);
+ }
+ }else{
+ //echo "No scorm link found in tool link $link
";
+ }
+ //flush();
+ }
+ /**
+ * Update course description (intro page) to use new links instead of learnpath/learnpath_handler.php
+ */
+ $tbl_intro = $db.TABLE_TOOL_INTRO;
+ $sql_i = "SELECT * FROM $tbl_intro WHERE id='course_homepage'";
+ $res_i = api_sql_query($sql_i,__FILE__,__LINE__);
+ //$link_to_course1 = 'scorm/scormdocument.php';
+ while($row_i = Database::fetch_array($res_i)){
+ $intro = $row_i['intro_text'];
+ $update = 0;
+ $out = array();
+ if(preg_match_all('/claroline\/learnpath\/showinframes\.php([^\s"\']*)learnpath_id=(\d*)/',$intro,$out,PREG_SET_ORDER)){
+ foreach($out as $results){
+ //echo "---> replace ".'/learnpath\/showinframes\.php([^\s"\']*)learnpath_id='.$results[2].'/ by newscorm/lp_controller.php'.$results[1].'action=view&lp_id='.$lp_ids[$results[2]];
+ $intro = preg_replace('/claroline\/learnpath\/showinframes\.php([^\s"\']*)learnpath_id='.$results[2].'/','main/newscorm/lp_controller.php'.$results[1].'action=view&lp_id='.$lp_ids[$results[2]],$intro);
+ }
+ }
+ if(preg_match_all('/claroline\/phpbb\/index.php/',$intro,$out,PREG_SET_ORDER)){
+ foreach($out as $results){
+ $intro = preg_replace('/claroline\/phpbb\/index\.php([^\s"\']*)/','main/forum/index.php'.$results[1],$intro);
+ }
+ }
+ if($intrp != $row_i['intro_text']){
+ //echo "Replacing ".$row_i['intro_text']."\n by \n ".$intro."
\n";
+ $sql_upd = "update $tbl_intro set intro_text = '".mysql_real_escape_string($intro)."' WHERE id = 'course_homepage' AND intro_text = '".mysql_real_escape_string($row_i['intro_text'])."'";
+ //echo $sql_upd."
\n";
+ fwrite($fh,"$sql_upd\n");
+ fwrite($fh_revert,"UPDATE $tbl_intro set intro_text = '".$row_i['intro_text']."' WHERE id = 'course_homepage' AND intro_text = '$intro';\n");
+ fwrite($fh_res,"$intro\n");
+ api_sql_query($sql_upd,__FILE__,__LINE__);
+ }
+ }
+
+
+
+ if($loglevel>0){error_log("Done!".$msg,0);}
+ //flush();
+ //ob_flush();
}
unset($lp_ids);
unset($lp_users);
@@ -573,11 +624,11 @@ if($loglevel>0){error_log("Now starting migration of scorm tables from global SC
$scorm_main = $dbScormForm.'.'.TABLE_SCORM_MAIN;
$scorm_item = $dbScormForm.'.'.TABLE_SCORM_SCO_DATA;
-//$lp_main = Database::get_course_table(TABLE_LEARNPATH_MAIN,$db);
+//$lp_main = Database::get_course_table(TABLE_LEARNPATH_MAIN,$db);
$course_pref = $table_prefix;
-$lp_ids = array();
-$lp_item_ids = array();
-$lp_item_refs = array();
+$lp_ids = array();
+$lp_item_ids = array();
+$lp_item_refs = array();
$lp_course = array();
$lp_course_code = array();
$scorm_lp_paths = array();
@@ -596,121 +647,187 @@ $course_code_swap = '';
$scormdocuments_lps = array();
while($course_row = Database::fetch_array($res_crs)){
- if($loglevel>0){error_log("Now dealing with course ".$course_row['code']."...",0);}
- //check the validity of this new course
- $my_course_code = $course_row['code'];
+ if($loglevel>0){error_log("Now dealing with course ".$course_row['code']."...",0);}
+ //check the validity of this new course
+ $my_course_code = $course_row['code'];
+
+ //reinit the scormdocuments list
+ //$scormdocuments_lps = array();
+ $db_name = $courses_id_full_table_prefix_list[$my_course_code];
+ if(strlen($courses_id_list[$course_code])>40)
+ {
+ error_log('Database '.$courses_id_list[$course_code].' is too long, skipping',0);
+ continue;
+ }
+ //echo "Now processing database $db_name
";
+ $tblscodoc = $db_name.TABLE_SCORMDOC;
+ $sql_scodoc = "SELECT path FROM $tblscodoc WHERE path IS NOT NULL AND path != ''";
+ if($loglevel>1){error_log("$sql_scodoc",0);}
+ $res_scodoc = api_sql_query($sql_scodoc,__FILE__,__LINE__);
+ while($row_scodoc = Database::fetch_array($res_scodoc)){
+
+ //check if there's more than one slash in total
+ if(strpos($row_scodoc['path'],'/',1)===false){
+ $tmp_path = $row_scodoc['path'];
+ if($loglevel>1){error_log("++Now opening $tmp_path",0);}
+
+ //add a prefixing slash if there is none
+ if(substr($tmp_path,0,1)!='/'){
+ $tmp_path = '/'.$tmp_path;
+ }
+
+ //if the path is just a slash, empty it
+ if($tmp_path=='/'){
+ $tmp_path='';
+ }
+
+ //there is only one 'slash' sign at the beginning,
+ //or none at all, so we assume
+ //it is a main directory that should be taken as path
+ $courses_dir = $sys_course_path.''.$courses_dir_list[$my_course_code].'/scorm'.$tmp_path;
+ if(!is_dir($courses_dir)){
+ //echo "Scormdocument path $my_content_id: $tmp_path doesn't exist in ".$sys_course_path.$courses_dir_list[$my_course_code]."/scorm, skipping
\n";
+ continue;
+ //avoid if contentTitle is not the name of an existing directory
+ }elseif(!is_file($courses_dir."/imsmanifest.xml")){
+ //if the imsmanifest file was not found there
+ if($loglevel>2){error_log(" !!imsmanifest.xml not found at scormdocument's $courses_dir/imsmanifest.xml, skipping",0);}
+ //try subdirectories on one level depth
+ if($loglevel>2){error_log(" Trying subdirectories...",0);}
+ $dh = opendir($courses_dir);
+ while($entry = readdir($dh)){
+ if(substr($entry,0,1)!='.'){
+ if(is_dir($courses_dir."/".$entry)){
+ if(is_file($courses_dir."/".$entry."/imsmanifest.xml")){
+ if($loglevel>2){error_log(". .. and found $courses_dir/$entry/imsmanifest.xml!",0);}
+ if(!in_array($tmp_path."/".$entry."/imsmanifest.xml",$scormdocuments_lps)){
+ if($loglevel>2){error_log(" Recording.
",0);}
+ $scormdocuments_lps[] = $tmp_path."/".$entry;
+ }
+ }
+ }
+ }
+ }
+ }else{
+ if($loglevel>2){error_log(" Found scormdocument $tmp_path in ".$sys_course_path.$courses_dir_list[$my_course_code]."/scorm, treating it.",0);}
+ $scormdocuments_lps[] = $tmp_path;
+ }
+ }
+ }
+
- //reinit the scormdocuments list
- //$scormdocuments_lps = array();
- $db_name = $courses_id_full_table_prefix_list[$my_course_code];
- if(strlen($courses_id_list[$course_code])>40)
- {
- error_log('Database '.$courses_id_list[$course_code].' is too long, skipping',0);
- continue;
- }
- $tblscodoc = $db_name.TABLE_SCORMDOC;
- $sql_scodoc = "SELECT path FROM $tblscodoc WHERE path IS NOT NULL AND path != ''";
- if($loglevel>1){error_log("$sql_scodoc",0);}
- $res_scodoc = api_sql_query($sql_scodoc,__FILE__,__LINE__);
- while($row_scodoc = Database::fetch_array($res_scodoc)){
-
- //check if there's more than one slash in total
- if(strpos($row_scodoc['path'],'/',1)===false){
- $tmp_path = $row_scodoc['path'];
- if($loglevel>1){error_log("++Now opening $tmp_path",0);}
-
- //add a prefixing slash if there is none
- if(substr($tmp_path,0,1)!='/'){
- $tmp_path = '/'.$tmp_path;
- }
-
- //if the path is just a slash, empty it
- if($tmp_path=='/'){
- $tmp_path='';
- }
-
- //there is only one 'slash' sign at the beginning,
- //or none at all, so we assume
- //it is a main directory that should be taken as path
- $courses_dir = $sys_course_path.''.$courses_dir_list[$my_course_code].'/scorm'.$tmp_path;
- if(!is_dir($courses_dir)){
- //echo "Scormdocument path $my_content_id: $tmp_path doesn't exist in ".$sys_course_path.$courses_dir_list[$my_course_code]."/scorm, skipping
\n";
- continue;
- //avoid if contentTitle is not the name of an existing directory
- }elseif(!is_file($courses_dir."/imsmanifest.xml")){
- //if the imsmanifest file was not found there
- if($loglevel>2){error_log(" !!imsmanifest.xml not found at scormdocument's $courses_dir/imsmanifest.xml, skipping",0);}
- //try subdirectories on one level depth
- if($loglevel>2){error_log(" Trying subdirectories...",0);}
- $dh = opendir($courses_dir);
- while($entry = readdir($dh)){
- if(substr($entry,0,1)!='.'){
- if(is_dir($courses_dir."/".$entry)){
- if(is_file($courses_dir."/".$entry."/imsmanifest.xml")){
- if($loglevel>2){error_log(". .. and found $courses_dir/$entry/imsmanifest.xml!",0);}
- if(!in_array($tmp_path."/".$entry."/imsmanifest.xml",$scormdocuments_lps)){
- if($loglevel>2){error_log(" Recording.
",0);}
- $scormdocuments_lps[] = $tmp_path."/".$entry;
- }
- }
- }
- }
- }
- }else{
- if($loglevel>2){error_log(" Found scormdocument $tmp_path in ".$sys_course_path.$courses_dir_list[$my_course_code]."/scorm, treating it.",0);}
- $scormdocuments_lps[] = $tmp_path;
- }
- }
- }
-
- //prepare the new course's space in the scorms array
- $scorms[$my_course_code] = array();
+ //Because certain people with no admin skills had fun adding direct links to SCORM
+ // from the courses introductions, we have to check for SCORM packages from there too...
+ $tbl_intro = $db_name.TABLE_TOOL_INTRO;
+ $sql_i = "SELECT * FROM $tbl_intro WHERE id='course_homepage'";
+ //echo $sql_i;
+ $res_i = api_sql_query($sql_i,__FILE__,__LINE__);
+ //$link_to_course1 = 'scorm/scormdocument.php';
+ while($row_scodoc = Database::fetch_array($res_i)){
+ $intro = $row_scodoc['intro_text'];
+ //echo $intro."
\n";
+ $matches = array();
+ $pattern = '@scorm/showinframes\.php([^\s"\']*)file=([^\s"\'&]*)@';
+ if(preg_match_all($pattern,$intro,$matches,PREG_SET_ORDER))
+ {
+ if(count($matches)<1)
+ {
+ //skip
+ }
+ else
+ {
+ //echo "Found matches in $tbl_intro
";
+ foreach($matches as $match)
+ {
+ //echo "Found match ".print_r($match,true)."
";
+ $mymatch = urldecode($match[2]);
+ $mymatch = str_replace($sys_course_path,$upd_course_path,$mymatch);
+ if(!empty($mymatch) && (strtolower(substr($mymatch,-15))=='imsmanifest.xml') && is_file(realpath(urldecode($mymatch))) )
+ {
+
+ //echo $mymatch." seems ok
";
+ //found a new scorm course in the old directory
+ $courses_dir = $upd_course_path.''.$courses_dir_list[$my_course_code].'/scorm';
+ //check if the file is in the current course path, otherwise just forget about it
+ //as it would be too difficult to migrate
+ //echo "Comparing $mymatch with $courses_dir
";
+ if(strpos($mymatch,$courses_dir)!==false)
+ {
+ //remove the course dir up to /scorm from this path
+ $entry = substr($mymatch,strlen($courses_dir));
+ //remove the /imsmanifest.xml from the end of the path
+ $entry = substr($entry,0,-16);
+ //if $entry was /var/www/dokeos/courses/ABC/scorm/tralala/imsmanifest.xml,
+ //$entry is now /tralala
+ //echo "Checking if manifest exists in ".$courses_dir.$entry."/imsmanifest.xml
";
+ if(is_file($courses_dir.$entry."/imsmanifest.xml")){
+ //echo "found $courses_dir/$entry/imsmanifest.xml!
";
+ if($loglevel>2){error_log(". .. and found $courses_dir/$entry/imsmanifest.xml!",0);}
+ if(!in_array($entry."/imsmanifest.xml",$scormdocuments_lps)){
+ if($loglevel>2){error_log(" Recording.
",0);}
+ //echo "Recording $entry
";
+ $scormdocuments_lps[] = $entry;
+ }
+ }
+ else
+ {
+ //echo "Manifest does not exist in ".$courses_dir.$entry."/imsmanifest.xml
";
+ }
+ }
+ }
+ }
+ }
+ }
+ }
+
+ //prepare the new course's space in the scorms array
+ $scorms[$my_course_code] = array();
- $sql_paths = "SELECT * FROM $scorm_main WHERE dokeosCourse = '".$my_course_code."'";
- if($loglevel>0){error_log("$sql_paths",0);}
- $res_paths = api_sql_query($sql_paths,__FILE__,__LINE__);
- $num = Database::num_rows($res_paths);
- while($scorm_row = Database::fetch_array($res_paths)){
- //check if this is a new course
- $my_content_id = $scorm_row['contentId'];
- $my_path = $scorm_row['contentTitle'];
- if(substr($my_path,0,1)!='/'){
- $my_path = '/'.$my_path;
- }
- if($my_path=='/'){
- $my_path='';
- }
- if($loglevel>1){error_log("++++Now opening $my_path",0);}
- if(!is_dir($courses_dir = $sys_course_path.''.$courses_dir_list[$my_course_code].'/scorm'.$my_path)){
- if($loglevel>1){error_log("Path $my_content_id: $my_path doesn't exist in ".$sys_course_path.$courses_dir_list[$my_course_code]."/scorm, skipping",0);}
- continue;
- //avoid if contentTitle is not the name of an existing directory
- }elseif(!is_file($sys_course_path.$courses_dir_list[$my_course_code].'/scorm'.$my_path."/imsmanifest.xml")){
- if($loglevel>1){error_log("!!imsmanifest.xml not found at ".$sys_course_path.$courses_dir_list[$my_course_code].'/scorm'.$my_path."/imsmanifest.xml, skipping",0);}
- continue;
- }else{
- if($loglevel>1){error_log("Found $my_path in ".$sys_course_path.$courses_dir_list[$my_course_code]."/scorm".$mypath."/imsmanifest.xml, keeping it.",0);}
- $scorms[$my_course_code][$my_path] = $my_content_id;
- }
- }
- //check if all the lps from scormdocuments_lps are already in the course array,
- //otherwise add them (and set ID of 0 so no tracking will be available)
- foreach($scormdocuments_lps as $path){
- if(!in_array($path,array_keys($scorms[$my_course_code]))){
- //add it (-1 means no ID)
- if($loglevel>1){error_log("** Scormdocument path $path wasn't recorded yet. Added.",0);}
- $scorms[$my_course_code][$path] = -1;
- }
- }
- $course_code_swap = $my_course_code;
- unset($scormdocuments_lps);
+ $sql_paths = "SELECT * FROM $scorm_main WHERE dokeosCourse = '".$my_course_code."'";
+ if($loglevel>0){error_log("$sql_paths",0);}
+ $res_paths = api_sql_query($sql_paths,__FILE__,__LINE__);
+ $num = Database::num_rows($res_paths);
+ while($scorm_row = Database::fetch_array($res_paths)){
+ //check if this is a new course
+ $my_content_id = $scorm_row['contentId'];
+ $my_path = $scorm_row['contentTitle'];
+ if(substr($my_path,0,1)!='/'){
+ $my_path = '/'.$my_path;
+ }
+ if($my_path=='/'){
+ $my_path='';
+ }
+ if($loglevel>1){error_log("++++Now opening $my_path",0);}
+ if(!is_dir($courses_dir = $sys_course_path.''.$courses_dir_list[$my_course_code].'/scorm'.$my_path)){
+ if($loglevel>1){error_log("Path $my_content_id: $my_path doesn't exist in ".$sys_course_path.$courses_dir_list[$my_course_code]."/scorm, skipping",0);}
+ continue;
+ //avoid if contentTitle is not the name of an existing directory
+ }elseif(!is_file($sys_course_path.$courses_dir_list[$my_course_code].'/scorm'.$my_path."/imsmanifest.xml")){
+ if($loglevel>1){error_log("!!imsmanifest.xml not found at ".$sys_course_path.$courses_dir_list[$my_course_code].'/scorm'.$my_path."/imsmanifest.xml, skipping",0);}
+ continue;
+ }else{
+ if($loglevel>1){error_log("Found $my_path in ".$sys_course_path.$courses_dir_list[$my_course_code]."/scorm".$mypath."/imsmanifest.xml, keeping it.",0);}
+ $scorms[$my_course_code][$my_path] = $my_content_id;
+ }
+ }
+ //check if all the lps from scormdocuments_lps are already in the course array,
+ //otherwise add them (and set ID of 0 so no tracking will be available)
+ foreach($scormdocuments_lps as $path){
+ if(!in_array($path,array_keys($scorms[$my_course_code]))){
+ //add it (-1 means no ID)
+ if($loglevel>1){error_log("** Scormdocument path $path wasn't recorded yet. Added.",0);}
+ $scorms[$my_course_code][$path] = -1;
+ }
+ }
+ $course_code_swap = $my_course_code;
+ unset($scormdocuments_lps);
}
//echo "courses_id_list: ".print_r($courses_id_list,true)."
\n";
$my_count = 0;
foreach($scorms as $mycourse => $my_paths){
- $my_count += count($my_paths);
+ $my_count += count($my_paths);
}
if($loglevel>0){error_log("---- Scorms array now contains ".$mycount." paths to migrate. Starting migration...",0);}
@@ -725,469 +842,475 @@ foreach($scorms as $my_course_code => $paths_list )
$course_lp_done = array();
$db_name = $courses_id_full_table_prefix_list[$my_course_code];
foreach($paths_list as $my_path => $old_id){
- if($loglevel>1){error_log("Migrating lp $my_path from course $my_course_code...",0);}
- $i_count ++;
- //error_log('New LP - Migration script - Content '.$i_count.' on '.$num.' (course '.$scorm['dokeosCourse'].')',0);
- //check if there is no embedded learnpaths into other learnpaths (one root-level and another embedded)
- $embedded = false;
- foreach($course_lp_done as $tmp_lp){
- if(empty($tmp_lp)){
- $tmp_lp = '/'; //allows finding the lp as a subitem, otherwise strstr returns false
- }
- if(strstr($my_path,$tmp_lp)===false){
- //let it be
- }else{
- //this lp is embedded inside another lp who's imsmanifest exists, so prevent from parsing
- if($loglevel>1){error_log("LP $my_path is embedded into $tmp_lp, ignoring...",0);}
- $embedded = true;
- continue;
- }
- }
- if($embedded){
- continue;
- }
- $course_lp_done[] = $my_path;
- //echo "scorm row: ".print_r($scorm,true)."
\n";
- $my_content_id = $old_id;
- $my_path = $my_path;
- $my_name = basename($my_path);
-
- if($loglevel>1){error_log("Try importing LP $my_path from imsmanifest first as it is more reliable",0);}
+ if($loglevel>1){error_log("Migrating lp $my_path from course $my_course_code...",0);}
+ $i_count ++;
+ //error_log('New LP - Migration script - Content '.$i_count.' on '.$num.' (course '.$scorm['dokeosCourse'].')',0);
+ //check if there is no embedded learnpaths into other learnpaths (one root-level and another embedded)
+ $embedded = false;
+ foreach($course_lp_done as $tmp_lp){
+ if(empty($tmp_lp)){
+ $tmp_lp = '/'; //allows finding the lp as a subitem, otherwise strstr returns false
+ }
+ if(strstr($my_path,$tmp_lp)===false){
+ //let it be
+ }else{
+ //this lp is embedded inside another lp who's imsmanifest exists, so prevent from parsing
+ if($loglevel>1){error_log("LP $my_path is embedded into $tmp_lp, ignoring...",0);}
+ $embedded = true;
+ continue;
+ }
+ }
+ if($embedded){
+ continue;
+ }
+ $course_lp_done[] = $my_path;
+ //echo "scorm row: ".print_r($scorm,true)."
\n";
+ $my_content_id = $old_id;
+ $my_path = $my_path;
+ $my_name = basename($my_path);
+
+ if($loglevel>1){error_log("Try importing LP $my_path from imsmanifest first as it is more reliable",0);}
- //Setup the ims path (path to the imsmanifest.xml file)
- //echo "Looking for course with code ".$lp_course_code[$my_content_id]." (using $my_content_id)
\n";
- $courses_dir = $sys_course_path.$courses_dir_list[$my_course_code];
- $sco_path_temp = ($my_path=='/')?'':$my_path;
- $sco_middle_path = (empty($sco_path_temp)?'':(substr($sco_path_temp,0,1)=='/')?substr($sco_path_temp,1).'/':$sco_path_temp.'/'); //same thing as sco_path_temp but with reversed slashes
- $ims = $courses_dir.'/scorm'.$sco_path_temp.'/imsmanifest.xml';
+ //Setup the ims path (path to the imsmanifest.xml file)
+ //echo "Looking for course with code ".$lp_course_code[$my_content_id]." (using $my_content_id)
\n";
+ //$courses_dir = $sys_course_path.$courses_dir_list[$my_course_code];
+ $courses_dir = $upd_course_path.$courses_dir_list[$my_course_code];
+ $sco_path_temp = ($my_path=='/')?'':$my_path;
+ $sco_middle_path = (empty($sco_path_temp)?'':(substr($sco_path_temp,0,1)=='/')?substr($sco_path_temp,1).'/':$sco_path_temp.'/'); //same thing as sco_path_temp but with reversed slashes
+ $ims = $courses_dir.'/scorm'.$sco_path_temp.'/imsmanifest.xml';
- if(is_file($ims)){
- $oScorm = new scorm();
- //check if imsmanifest.xml exists at this location. If not, ignore the imsmanifest.
- //That should have been done before already, now.
- if($loglevel>1){error_log("Found imsmanifest ($ims), importing...",0);}
- if(!empty($sco_middle_path)){$oScorm->subdir = $sco_middle_path;} //this sets the subdir for the scorm package inside the scorm dir
- //parse manifest file
- $manifest = $oScorm->parse_manifest($ims);
- //the title is already escaped in the method
- $oScorm->import_manifest($my_course_code);
- //TODO add code to update the path in that new lp created, as it probably uses / where
- //$sco_path_temp should be used...
- $lp_ids[$my_content_id] = $oScorm->lp_id; //contains the old LP ID => the new LP ID
- if($loglevel>1){error_log(" @@@ Created scorm lp ".$oScorm->lp_id." from imsmanifest [".$ims."] in course $my_course_code",0);}
- $lp_course[$my_content_id] = $courses_id_list[$my_course_code]; //contains the old learnpath ID => the course DB name
- $lp_course_code[$my_content_id] = $my_course_code;
- $max_dsp_lp++;
+ if(is_file($ims)){
+ //echo "Path $ims exists, importing...(line ".__LINE__.")
";
+ $oScorm = new scorm();
+ //check if imsmanifest.xml exists at this location. If not, ignore the imsmanifest.
+ //That should have been done before already, now.
+ if($loglevel>1){error_log("Found imsmanifest ($ims), importing...",0);}
+ if(!empty($sco_middle_path)){$oScorm->subdir = $sco_middle_path;} //this sets the subdir for the scorm package inside the scorm dir
+ //parse manifest file
+ $manifest = $oScorm->parse_manifest($ims);
+ //the title is already escaped in the method
+ $oScorm->import_manifest($my_course_code);
+ //TODO add code to update the path in that new lp created, as it probably uses / where
+ //$sco_path_temp should be used...
+ $lp_ids[$my_content_id] = $oScorm->lp_id; //contains the old LP ID => the new LP ID
+ if($loglevel>1){error_log(" @@@ Created scorm lp ".$oScorm->lp_id." from imsmanifest [".$ims."] in course $my_course_code",0);}
+ $lp_course[$my_content_id] = $courses_id_list[$my_course_code]; //contains the old learnpath ID => the course DB name
+ $lp_course_code[$my_content_id] = $my_course_code;
+ $max_dsp_lp++;
- /*
- * QUERY SCORM ITEMS FROM SCORM_SCO_DATA
- * The danger here is that we might have several users for the same data, and so
- * we have to avoid entering the same elements twice
- */
- $sql_items = "SELECT * FROM $scorm_item WHERE contentId = '".$my_content_id."' ORDER BY scoId";
- //echo "$sql_items
\n";
- $res_items = api_sql_query($sql_items,__FILE__,__LINE__);
- while($scormItem = Database::fetch_array($res_items))
- {
- $my_sco_id = $scormItem['scoId']; //the index for display??? (check that)
- $my_identifier = $scormItem['scoIdentifier']; //the scorm item path/name
- $my_title = mysql_real_escape_string($scormItem['scoTitle']);
- $my_status = $scormItem['status'];
- $my_student = $scormItem['studentId'];
- $my_score = $scormItem['score'];
- $my_time = my_get_time($scormItem['time']);
- $my_type = 'sco';
- //$my_item_path = $scorm_lp_paths[$my_content_id]['path'];
- $my_item_path = '';
-
- //echo " FOUND item belonging to old learnpath num $my_content_id so belongs to course ".$lp_course[$my_content_id]."
\n";
- $my_new_lp_item = $db_name.$new_lp_item;
- $my_new_lp_view = $db_name.$new_lp_view;
- $my_new_lp_item_view = $db_name.$new_lp_item_view;
+ /*
+ * QUERY SCORM ITEMS FROM SCORM_SCO_DATA
+ * The danger here is that we might have several users for the same data, and so
+ * we have to avoid entering the same elements twice
+ */
+ $sql_items = "SELECT * FROM $scorm_item WHERE contentId = '".$my_content_id."' ORDER BY scoId";
+ //echo "$sql_items
\n";
+ $res_items = api_sql_query($sql_items,__FILE__,__LINE__);
+ while($scormItem = Database::fetch_array($res_items))
+ {
+ $my_sco_id = $scormItem['scoId']; //the index for display??? (check that)
+ $my_identifier = $scormItem['scoIdentifier']; //the scorm item path/name
+ $my_title = mysql_real_escape_string($scormItem['scoTitle']);
+ $my_status = $scormItem['status'];
+ $my_student = $scormItem['studentId'];
+ $my_score = $scormItem['score'];
+ $my_time = my_get_time($scormItem['time']);
+ $my_type = 'sco';
+ //$my_item_path = $scorm_lp_paths[$my_content_id]['path'];
+ $my_item_path = '';
+
+ //echo " FOUND item belonging to old learnpath num $my_content_id so belongs to course ".$lp_course[$my_content_id]."
\n";
+ $my_new_lp_item = $db_name.$new_lp_item;
+ $my_new_lp_view = $db_name.$new_lp_view;
+ $my_new_lp_item_view = $db_name.$new_lp_item_view;
- /*
- * Check if a view is needed
- */
- if($my_score != '' and $my_status != 'not attempted'){
- //it is worth creating an lp_view and an lp_item_view - otherwise not
- $sel_sqlb = "SELECT * FROM $my_new_lp_view " .
- "WHERE lp_id = ".$lp_ids[$my_content_id]." AND user_id = $my_student";
- $sel_resb = api_sql_query($sel_sqlb,__FILE__,__LINE__);
- if(Database::num_rows($sel_resb)>0){
- //dont insert
- $rowb = Database::fetch_array($sel_resb);
- $view_insert_id = $rowb['id'];
- }else{
- $ins_sql = "INSERT INTO $my_new_lp_view (" .
- "lp_id," .
- "user_id," .
- "view_count" .
- ") VALUES (" .
- $lp_ids[$my_content_id].", " .
- $my_student.", " .
- "1" .
- ")";
- //echo "$ins_sql
";
- $ins_res = api_sql_query($ins_sql,__FILE__,__LINE__);
- $view_insert_id = Database::get_last_insert_id();
- }
- $sel_sqlc = "SELECT * FROM $my_new_lp_item " .
- "WHERE lp_id = ".$lp_ids[$my_content_id]." AND ref = '$my_identifier'";
- $sel_resc = api_sql_query($sel_sqlc,__FILE__,__LINE__);
- if(Database::num_rows($sel_resc)>0){
- $my_item_id_row = Database::fetch_array($sel_resc);
- $item_insert_id = $my_item_id_row['id'];
- $ins_sql = "INSERT INTO $my_new_lp_item_view (" .
- "lp_item_id, lp_view_id, view_count," .
- "start_time, total_time, score," .
- "status" .
- ") VALUES (" .
- "$item_insert_id, $view_insert_id, 1," .
- "0, $my_time, $my_score," .
- "'$my_status'" .
- ")";
- //echo "$ins_sql
";
- $ins_res = api_sql_query($ins_sql,__FILE__,__LINE__);
- }else{
- //echo " Didn't find corresponding item for $my_identifier in new tables
\n";
- }
- }
- }
+ /*
+ * Check if a view is needed
+ */
+ if($my_score != '' and $my_status != 'not attempted'){
+ //it is worth creating an lp_view and an lp_item_view - otherwise not
+ $sel_sqlb = "SELECT * FROM $my_new_lp_view " .
+ "WHERE lp_id = ".$lp_ids[$my_content_id]." AND user_id = $my_student";
+ $sel_resb = api_sql_query($sel_sqlb,__FILE__,__LINE__);
+ if(Database::num_rows($sel_resb)>0){
+ //dont insert
+ $rowb = Database::fetch_array($sel_resb);
+ $view_insert_id = $rowb['id'];
+ }else{
+ $ins_sql = "INSERT INTO $my_new_lp_view (" .
+ "lp_id," .
+ "user_id," .
+ "view_count" .
+ ") VALUES (" .
+ $lp_ids[$my_content_id].", " .
+ $my_student.", " .
+ "1" .
+ ")";
+ //echo "$ins_sql
";
+ $ins_res = api_sql_query($ins_sql,__FILE__,__LINE__);
+ $view_insert_id = Database::get_last_insert_id();
+ }
+ $sel_sqlc = "SELECT * FROM $my_new_lp_item " .
+ "WHERE lp_id = ".$lp_ids[$my_content_id]." AND ref = '$my_identifier'";
+ $sel_resc = api_sql_query($sel_sqlc,__FILE__,__LINE__);
+ if(Database::num_rows($sel_resc)>0){
+ $my_item_id_row = Database::fetch_array($sel_resc);
+ $item_insert_id = $my_item_id_row['id'];
+ $ins_sql = "INSERT INTO $my_new_lp_item_view (" .
+ "lp_item_id, lp_view_id, view_count," .
+ "start_time, total_time, score," .
+ "status" .
+ ") VALUES (" .
+ "$item_insert_id, $view_insert_id, 1," .
+ "0, $my_time, $my_score," .
+ "'$my_status'" .
+ ")";
+ //echo "$ins_sql
";
+ $ins_res = api_sql_query($ins_sql,__FILE__,__LINE__);
+ }else{
+ //echo " Didn't find corresponding item for $my_identifier in new tables
\n";
+ }
+ }
+ }
- }
- else{
- if($loglevel>1){error_log("This is a normal SCORM path",0);}
- $scorm_lp_paths[$my_content_id]['path'] = $my_path;
- //$scorm_lp_paths[$my_content_id]['ims'] = '';
- $table_name = $db_name.$new_lp;
- $sql_ins = "INSERT INTO $table_name (" .
- "lp_type," .
- "name," .
- "description," .
- "path," .
- "force_commit, " .
- "default_encoding," .
- "display_order," .
- "content_maker," .
- "content_local," .
- "js_lib" .
- ") VALUES (" .
- "2," .
- "'$my_name'," .
- "''," .
- "'$my_path'," .
- "0," .
- "'UTF-8'," .
- "".$max_dsp_lp."," .
- "'Unknown'," .
- "'Unknown'," .
- "'scorm_api.php'" .
- ")";
- if($loglevel>1){error_log("$sql_ins",0);}
- $sql_res = api_sql_query($sql_ins,__FILE__,__LINE__);
- $in_id = Database::get_last_insert_id();
- if(empty($in_id) or $in_id == false) die('Could not insert scorm lp: '.$sql_ins);
- //echo " Inserted item $in_id
\n";
- $lp_ids[$my_content_id] = $in_id; //contains the old LP ID => the new LP ID
- $lp_course[$my_content_id] = $courses_id_list[$my_course_code]; //contains the old learnpath ID => the course DB name
- $lp_course_code[$my_content_id] = $my_course_code;
- $max_dsp_lp++;
-
- //Setup the ims path (path to the imsmanifest.xml file)
- //echo "Looking for course with code ".$lp_course_code[$my_content_id]." (using $my_content_id)
\n";
- $courses_dir = $sys_course_path.$courses_dir_list[$lp_course_code[$my_content_id]];
- //$scorm_lp_paths[$my_content_id]['path'] = str_replace(' ','\\ ',$scorm_lp_paths[$my_content_id]['path']);
- $sco_path_temp = ($scorm_lp_paths[$my_content_id]['path']=='/')?'':$scorm_lp_paths[$my_content_id]['path'];
- $scorm_lp_paths[$my_content_id]['ims'] = $courses_dir.'/scorm'.$sco_path_temp.'/imsmanifest.xml';
-
- //generate an imsmanifest object to get more info about the learnpath from the file
- $oScorm = new scorm();
- //check if imsmanifest.xml exists at this location. If not, ignore the imsmanifest.
- //That should have been done before already, now.
- if(!is_file($scorm_lp_paths[$my_content_id]['ims'])){
- if($loglevel>1){error_log("!!! imsmanifest file not found at ".$scorm_lp_paths[$my_content_id]['ims'].' for old lp '.$my_content_id.' and new '.$lp_ids[$my_content_id],0);}
- $manifest = false;
- }else{
- //echo "Parsing ".$scorm_lp_paths[$my_content_id]['ims']."
\n";
- //parse manifest file
- $manifest = $oScorm->parse_manifest($scorm_lp_paths[$my_content_id]['ims']);
- //the title is already escaped in the method
- //$my_lp_title = mb_convert_encoding($oScorm->get_title(),'ISO-8859-1',$oScorm->manifest_encoding);
- $my_lp_title = mb_convert_encoding($oScorm->get_title(),'ISO-8859-1','UTF-8');
- if(!empty($my_lp_title)){
- $my_new_lp = $db_name.$new_lp;
- $my_sql = "UPDATE $my_new_lp " .
- "SET name = '$my_lp_title', " .
- "default_encoding = '".strtoupper($oScorm->manifest_encoding)."' " .
- "WHERE id = ".$lp_ids[$my_content_id];
- if($loglevel>1){error_log("Updating title and encoding: ".$my_sql,0);}
- $my_res = api_sql_query($my_sql,__FILE__,__LINE__);
- }
- }
-
- /*
- * QUERY SCORM ITEMS FROM SCORM_SCO_DATA
- * The danger here is that we might have several users for the same data, and so
- * we have to avoid entering the same elements twice
- */
- $sql_items = "SELECT * FROM $scorm_item WHERE contentId = '".$my_content_id."' ORDER BY scoId";
- //echo "$sql_items
\n";
- $res_items = api_sql_query($sql_items,__FILE__,__LINE__);
- while($scormItem = Database::fetch_array($res_items))
- {
- $my_sco_id = $scormItem['scoId']; //the index for display??? (check that)
- $my_identifier = $scormItem['scoIdentifier']; //the scorm item path/name
- $my_title = mysql_real_escape_string($scormItem['scoTitle']);
- $my_status = $scormItem['status'];
- $my_student = $scormItem['studentId'];
- $my_score = $scormItem['score'];
- $my_time = my_get_time($scormItem['time']);
- $my_type = 'sco';
- //$my_item_path = $scorm_lp_paths[$my_content_id]['path'];
- $my_item_path = '';
-
- //echo " FOUND item belonging to old learnpath num $my_content_id so belongs to course ".$lp_course[$my_content_id]."
\n";
- $my_new_lp_item = $db_name.$new_lp_item;
- $my_new_lp_view = $db_name.$new_lp_view;
- $my_new_lp_item_view = $db_name.$new_lp_item_view;
-
- /*
- * Query items from the new table to check if it doesn't exist already
- * Otherwise insert it
- */
- $sel_sql = "SELECT * FROM $my_new_lp_item " .
- "WHERE ref = '$my_identifier' " .
- "AND lp_id = ".$lp_ids[$my_content_id]."";
- //echo $sel_sql."
\n";
- $sel_res = api_sql_query($sel_sql,__FILE__,__LINE__);
- if(Database::num_rows($sel_res)>0){
- //this item already exists, reuse
- $row = Database::fetch_array($sel_res);
- $item_insert_id = $row['lp_id'];
- }else{
- $ins_sql = "INSERT INTO $my_new_lp_item (" .
- "lp_id," .
- "item_type," .
- "ref," .
- "title," .
- "path" .
- ") " .
- "VALUES (" .
- "'".$lp_ids[$my_content_id]."'," . //insert new learnpath ID
- "'$my_type'," .
- "'".$my_identifier."'," .
- "'".$my_title."'," .
- "'$my_item_path'" .
- ")";
- $ins_res = api_sql_query($ins_sql,__FILE__,__LINE__);
- $item_insert_id = Database::get_last_insert_id();
- $lp_item_ids[$lp_ids[$my_content_id]][$my_sco_id]=$item_insert_id;
- $lp_item_refs[$lp_ids[$my_content_id]][$my_identifier]=$item_insert_id;
- }
- /*
- * Check if a view is needed
- */
- if($my_score != '' and $my_status != 'not attempted'){
- //it is worth creating an lp_view and an lp_item_view - otherwise not
- $sel_sqlb = "SELECT * FROM $my_new_lp_view " .
- "WHERE lp_id = ".$lp_ids[$my_content_id]." AND user_id = $my_student";
- $sel_resb = api_sql_query($sel_sqlb,__FILE__,__LINE__);
- if(Database::num_rows($sel_resb)>0){
- //dont insert
- $rowb = Database::fetch_array($sel_resb);
- $view_insert_id = $rowb['id'];
- }else{
- $ins_sql = "INSERT INTO $my_new_lp_view (" .
- "lp_id," .
- "user_id," .
- "view_count" .
- ") VALUES (" .
- $lp_ids[$my_content_id].", " .
- $my_student.", " .
- "1" .
- ")";
- $ins_res = api_sql_query($ins_sql,__FILE__,__LINE__);
- $view_insert_id = Database::get_last_insert_id();
- }
- $ins_sql = "INSERT INTO $my_new_lp_item_view (" .
- "lp_item_id, lp_view_id, view_count," .
- "start_time, total_time, score," .
- "status" .
- ") VALUES (" .
- "$item_insert_id, $view_insert_id, 1," .
- "0, $my_time, $my_score," .
- "'$my_status'" .
- ")";
- $ins_res = api_sql_query($ins_sql,__FILE__,__LINE__);
- }
- }
+ }
+ else{
+ //echo "Could not find $ims... Proceeding from database...(line ".__LINE__.")
";
+ if($loglevel>1){error_log("This is a normal SCORM path",0);}
+ $scorm_lp_paths[$my_content_id]['path'] = $my_path;
+ //$scorm_lp_paths[$my_content_id]['ims'] = '';
+ $table_name = $db_name.$new_lp;
+ $sql_ins = "INSERT INTO $table_name (" .
+ "lp_type," .
+ "name," .
+ "description," .
+ "path," .
+ "force_commit, " .
+ "default_encoding," .
+ "display_order," .
+ "content_maker," .
+ "content_local," .
+ "js_lib" .
+ ") VALUES (" .
+ "2," .
+ "'$my_name'," .
+ "''," .
+ "'$my_path'," .
+ "0," .
+ "'UTF-8'," .
+ "".$max_dsp_lp."," .
+ "'Unknown'," .
+ "'Unknown'," .
+ "'scorm_api.php'" .
+ ")";
+ if($loglevel>1){error_log("$sql_ins",0);}
+ $sql_res = api_sql_query($sql_ins,__FILE__,__LINE__);
+ $in_id = Database::get_last_insert_id();
+ if(empty($in_id) or $in_id == false) die('Could not insert scorm lp: '.$sql_ins);
+ //echo " Inserted item $in_id
\n";
+ $lp_ids[$my_content_id] = $in_id; //contains the old LP ID => the new LP ID
+ $lp_course[$my_content_id] = $courses_id_list[$my_course_code]; //contains the old learnpath ID => the course DB name
+ $lp_course_code[$my_content_id] = $my_course_code;
+ $max_dsp_lp++;
+
+ //Setup the ims path (path to the imsmanifest.xml file)
+ //echo "Looking for course with code ".$lp_course_code[$my_content_id]." (using $my_content_id)
\n";
+ $courses_dir = $sys_course_path.$courses_dir_list[$lp_course_code[$my_content_id]];
+ //$scorm_lp_paths[$my_content_id]['path'] = str_replace(' ','\\ ',$scorm_lp_paths[$my_content_id]['path']);
+ $sco_path_temp = ($scorm_lp_paths[$my_content_id]['path']=='/')?'':$scorm_lp_paths[$my_content_id]['path'];
+ $scorm_lp_paths[$my_content_id]['ims'] = $courses_dir.'/scorm'.$sco_path_temp.'/imsmanifest.xml';
+
+ //generate an imsmanifest object to get more info about the learnpath from the file
+ $oScorm = new scorm();
+ //check if imsmanifest.xml exists at this location. If not, ignore the imsmanifest.
+ //That should have been done before already, now.
+ if(!is_file($scorm_lp_paths[$my_content_id]['ims'])){
+ if($loglevel>1){error_log("!!! imsmanifest file not found at ".$scorm_lp_paths[$my_content_id]['ims'].' for old lp '.$my_content_id.' and new '.$lp_ids[$my_content_id],0);}
+ $manifest = false;
+ }else{
+ //echo "Parsing ".$scorm_lp_paths[$my_content_id]['ims']."
\n";
+ //parse manifest file
+ $manifest = $oScorm->parse_manifest($scorm_lp_paths[$my_content_id]['ims']);
+ //the title is already escaped in the method
+ //$my_lp_title = mb_convert_encoding($oScorm->get_title(),'ISO-8859-1',$oScorm->manifest_encoding);
+ $my_lp_title = mb_convert_encoding($oScorm->get_title(),'ISO-8859-1','UTF-8');
+ if(!empty($my_lp_title)){
+ $my_new_lp = $db_name.$new_lp;
+ $my_sql = "UPDATE $my_new_lp " .
+ "SET name = '$my_lp_title', " .
+ "default_encoding = '".strtoupper($oScorm->manifest_encoding)."' " .
+ "WHERE id = ".$lp_ids[$my_content_id];
+ if($loglevel>1){error_log("Updating title and encoding: ".$my_sql,0);}
+ $my_res = api_sql_query($my_sql,__FILE__,__LINE__);
+ }
+ }
+
+ /*
+ * QUERY SCORM ITEMS FROM SCORM_SCO_DATA
+ * The danger here is that we might have several users for the same data, and so
+ * we have to avoid entering the same elements twice
+ */
+ $sql_items = "SELECT * FROM $scorm_item WHERE contentId = '".$my_content_id."' ORDER BY scoId";
+ //echo "$sql_items
\n";
+ $res_items = api_sql_query($sql_items,__FILE__,__LINE__);
+ while($scormItem = Database::fetch_array($res_items))
+ {
+ $my_sco_id = $scormItem['scoId']; //the index for display??? (check that)
+ $my_identifier = $scormItem['scoIdentifier']; //the scorm item path/name
+ $my_title = mysql_real_escape_string($scormItem['scoTitle']);
+ $my_status = $scormItem['status'];
+ $my_student = $scormItem['studentId'];
+ $my_score = $scormItem['score'];
+ $my_time = my_get_time($scormItem['time']);
+ $my_type = 'sco';
+ //$my_item_path = $scorm_lp_paths[$my_content_id]['path'];
+ $my_item_path = '';
+
+ //echo " FOUND item belonging to old learnpath num $my_content_id so belongs to course ".$lp_course[$my_content_id]."
\n";
+ $my_new_lp_item = $db_name.$new_lp_item;
+ $my_new_lp_view = $db_name.$new_lp_view;
+ $my_new_lp_item_view = $db_name.$new_lp_item_view;
+
+ /*
+ * Query items from the new table to check if it doesn't exist already
+ * Otherwise insert it
+ */
+ $sel_sql = "SELECT * FROM $my_new_lp_item " .
+ "WHERE ref = '$my_identifier' " .
+ "AND lp_id = ".$lp_ids[$my_content_id]."";
+ //echo $sel_sql."
\n";
+ $sel_res = api_sql_query($sel_sql,__FILE__,__LINE__);
+ if(Database::num_rows($sel_res)>0){
+ //this item already exists, reuse
+ $row = Database::fetch_array($sel_res);
+ $item_insert_id = $row['lp_id'];
+ }else{
+ $ins_sql = "INSERT INTO $my_new_lp_item (" .
+ "lp_id," .
+ "item_type," .
+ "ref," .
+ "title," .
+ "path" .
+ ") " .
+ "VALUES (" .
+ "'".$lp_ids[$my_content_id]."'," . //insert new learnpath ID
+ "'$my_type'," .
+ "'".$my_identifier."'," .
+ "'".$my_title."'," .
+ "'$my_item_path'" .
+ ")";
+ $ins_res = api_sql_query($ins_sql,__FILE__,__LINE__);
+ $item_insert_id = Database::get_last_insert_id();
+ $lp_item_ids[$lp_ids[$my_content_id]][$my_sco_id]=$item_insert_id;
+ $lp_item_refs[$lp_ids[$my_content_id]][$my_identifier]=$item_insert_id;
+ }
+ /*
+ * Check if a view is needed
+ */
+ if($my_score != '' and $my_status != 'not attempted'){
+ //it is worth creating an lp_view and an lp_item_view - otherwise not
+ $sel_sqlb = "SELECT * FROM $my_new_lp_view " .
+ "WHERE lp_id = ".$lp_ids[$my_content_id]." AND user_id = $my_student";
+ $sel_resb = api_sql_query($sel_sqlb,__FILE__,__LINE__);
+ if(Database::num_rows($sel_resb)>0){
+ //dont insert
+ $rowb = Database::fetch_array($sel_resb);
+ $view_insert_id = $rowb['id'];
+ }else{
+ $ins_sql = "INSERT INTO $my_new_lp_view (" .
+ "lp_id," .
+ "user_id," .
+ "view_count" .
+ ") VALUES (" .
+ $lp_ids[$my_content_id].", " .
+ $my_student.", " .
+ "1" .
+ ")";
+ $ins_res = api_sql_query($ins_sql,__FILE__,__LINE__);
+ $view_insert_id = Database::get_last_insert_id();
+ }
+ $ins_sql = "INSERT INTO $my_new_lp_item_view (" .
+ "lp_item_id, lp_view_id, view_count," .
+ "start_time, total_time, score," .
+ "status" .
+ ") VALUES (" .
+ "$item_insert_id, $view_insert_id, 1," .
+ "0, $my_time, $my_score," .
+ "'$my_status'" .
+ ")";
+ $ins_res = api_sql_query($ins_sql,__FILE__,__LINE__);
+ }
+ }
//UPDATE THE LP_VIEW progress
- $sql = "SELECT count(distinct(lp_item_id)) FROM $my_new_lp_item_view WHERE lp_view_id = ".$view_insert_id." AND status IN ('passed','completed','succeeded','browsed','failed')";
- $myres = api_sql_query($sql,__FILE__,__LINE__);
- $myrow = Database::fetch_array($myres);
- $completed = $myrow[0];
- $mylpid = $lp_ids[$my_content_id];
- $sql = "SELECT count(*) FROM $my_new_lp_item WHERE lp_id = '".$mylpid."'";
- $myres = api_sql_query($sql,__FILE__,__LINE__);
- $myrow = Database::fetch_array($myres);
- $total = $myrow[0];
- $progress = ((float)$completed/(float)$total)*100;
- $progress = number_format($progress,0);
- $sql = "UPDATE $my_new_lp_view SET progress = '$progress' WHERE id = '$view_insert_id'";
- $myres = api_sql_query($sql,__FILE__,__LINE__);
+ if(!empty($view_insert_id))
+ {
+ $sql = "SELECT count(distinct(lp_item_id)) FROM $my_new_lp_item_view WHERE lp_view_id = ".$view_insert_id." AND status IN ('passed','completed','succeeded','browsed','failed')";
+ $myres = api_sql_query($sql,__FILE__,__LINE__);
+ $myrow = Database::fetch_array($myres);
+ $completed = $myrow[0];
+ $mylpid = $lp_ids[$my_content_id];
+ $sql = "SELECT count(*) FROM $my_new_lp_item WHERE lp_id = '".$mylpid."'";
+ $myres = api_sql_query($sql,__FILE__,__LINE__);
+ $myrow = Database::fetch_array($myres);
+ $total = $myrow[0];
+ $progress = ((float)$completed/(float)$total)*100;
+ $progress = number_format($progress,0);
+ $sql = "UPDATE $my_new_lp_view SET progress = '$progress' WHERE id = '$view_insert_id'";
+ $myres = api_sql_query($sql,__FILE__,__LINE__);
+ }
- /*
- * Set all information that might be more correct coming from imsmanifest
- */
-
- //$my_new_lp = $db_name.$new_lp;
- //$my_new_lp_item = $db_name.$new_lp_item;
- //$my_new_lp_view = $db_name.$new_lp_view;
- //$my_new_lp_item_view = $db_name.$new_lp_item_view;
- //$sel_sql = "SELECT * FROM $my_new_lp WHERE id = $in_id";
- //$res = @mysql_query($sel_sql);
- //if(!$res){
- // echo "Error selecting lp: $sel_sql - ".mysql_error()."
\n";
- //}
- $lp_details = array();
- //while($row = Database::fetch_array($res))
- //{
- $ordered_list = array();
- $mylist = array();
- foreach($oScorm->organizations as $org){
- //There should be only one organization (generally)
- //and if there are more, we are not supposed to have been
- //able to manage them before the new tool, so ignore
- if(count($ordered_list)>0){
- break;
- }
- $ordered_list = $org->get_flat_items_list();
- }
- $previous = 0;
- $stock = array(0);
- $level=0;
- $parent_id = 0;
- foreach($ordered_list as $index => $subarray)
- {
- //$subarray is an array representing one item and that contains info like
- //identifier, level, rel_order, prerequisites, title, masteryscore, etc.
- //echo "Lookin for ".$subarray['identifier']." ".print_r($lp_item_refs,true)."
\n";
- if(!empty($lp_item_refs[$in_id][$subarray['identifier']])){
- $new_id = $lp_item_refs[$in_id][$subarray['identifier']];
- $next = 0;
- $dsp = $subarray['rel_order'];
- if($subarray['level']>$level){
- //getting one level deeper, just consult
- $parent_id = $previous;
- array_push($stock,$previous);
- $level = $subarray['level'];
- }elseif($subarray['level']==$level){
- //we are on the same level, going to the next id
- //array_pop($stock);
- //array_push($stock,$new_id);
- }else{
- //getting back from one level deeper
- array_pop($stock);
- $parent_id = array_pop($stock);
- array_push($stock,$parent_id);
- $level = $subarray['level'];
- }
- if(!empty($ordered_list[$index+1]['identifier']) && !empty($lp_item_refs[$in_id][$ordered_list[$index+1]['identifier']])){
- $next = $lp_item_refs[$in_id][$ordered_list[$index+1]['identifier']];
- }
- $path = $oScorm->get_res_path($subarray['identifierref']);
- $update_path = '';
- if(!empty($path)){
- //if new path is not empty, update
- $update_path = "path = '$path', ";
- }
- $type = $oScorm->get_res_type($subarray['identifierref']);
- $update_type = '';
- if(!empty($type)){
- //if type is defined, update
- $update_type = "item_type = '$type', ";
- }
- if(empty($path)){
- //if path is empty, it is a dir anyway
- $update_type = "item_type = 'dir', ";
- }
- $prereq = $subarray['prerequisites'];
- $update_prereq = '';
- if(!empty($prereq)){
- $update_prereq = "prerequisite = '$prereq', ";
- }
-
- //we had previous data about this element, update
- $sql2 = "UPDATE $my_new_lp_item " .
- "SET parent_item_id = $parent_id, " .
- "previous_item_id = $previous, " .
- "next_item_id = $next, " .
- $update_path.
- $update_type.
- $update_prereq.
- "display_order = $dsp " .
- "WHERE lp_id = ".$in_id." AND id = ".$new_id;
- //echo "$sql2
\n";
- $res2 = api_sql_query($sql2,__FILE__,__LINE__);
- $previous = $new_id;
- }
- }
- /**
- * Migrate links on the homepage as well now (look into the TABLE_TOOL_LIST table and
- * update the links to newscorm/lp_controller.php?action=view&lp_id=x)
- * See scorm_migrate_hometools.php
- */
- //}
- //end of case where $my_content_id != -1
+ /*
+ * Set all information that might be more correct coming from imsmanifest
+ */
+
+ //$my_new_lp = $db_name.$new_lp;
+ //$my_new_lp_item = $db_name.$new_lp_item;
+ //$my_new_lp_view = $db_name.$new_lp_view;
+ //$my_new_lp_item_view = $db_name.$new_lp_item_view;
+ //$sel_sql = "SELECT * FROM $my_new_lp WHERE id = $in_id";
+ //$res = @mysql_query($sel_sql);
+ //if(!$res){
+ // echo "Error selecting lp: $sel_sql - ".mysql_error()."
\n";
+ //}
+ $lp_details = array();
+ //while($row = Database::fetch_array($res))
+ //{
+ $ordered_list = array();
+ $mylist = array();
+ foreach($oScorm->organizations as $org){
+ //There should be only one organization (generally)
+ //and if there are more, we are not supposed to have been
+ //able to manage them before the new tool, so ignore
+ if(count($ordered_list)>0){
+ break;
+ }
+ $ordered_list = $org->get_flat_items_list();
+ }
+ $previous = 0;
+ $stock = array(0);
+ $level=0;
+ $parent_id = 0;
+ foreach($ordered_list as $index => $subarray)
+ {
+ //$subarray is an array representing one item and that contains info like
+ //identifier, level, rel_order, prerequisites, title, masteryscore, etc.
+ //echo "Lookin for ".$subarray['identifier']." ".print_r($lp_item_refs,true)."
\n";
+ if(!empty($lp_item_refs[$in_id][$subarray['identifier']])){
+ $new_id = $lp_item_refs[$in_id][$subarray['identifier']];
+ $next = 0;
+ $dsp = $subarray['rel_order'];
+ if($subarray['level']>$level){
+ //getting one level deeper, just consult
+ $parent_id = $previous;
+ array_push($stock,$previous);
+ $level = $subarray['level'];
+ }elseif($subarray['level']==$level){
+ //we are on the same level, going to the next id
+ //array_pop($stock);
+ //array_push($stock,$new_id);
+ }else{
+ //getting back from one level deeper
+ array_pop($stock);
+ $parent_id = array_pop($stock);
+ array_push($stock,$parent_id);
+ $level = $subarray['level'];
+ }
+ if(!empty($ordered_list[$index+1]['identifier']) && !empty($lp_item_refs[$in_id][$ordered_list[$index+1]['identifier']])){
+ $next = $lp_item_refs[$in_id][$ordered_list[$index+1]['identifier']];
+ }
+ $path = $oScorm->get_res_path($subarray['identifierref']);
+ $update_path = '';
+ if(!empty($path)){
+ //if new path is not empty, update
+ $update_path = "path = '$path', ";
+ }
+ $type = $oScorm->get_res_type($subarray['identifierref']);
+ $update_type = '';
+ if(!empty($type)){
+ //if type is defined, update
+ $update_type = "item_type = '$type', ";
+ }
+ if(empty($path)){
+ //if path is empty, it is a dir anyway
+ $update_type = "item_type = 'dir', ";
+ }
+ $prereq = $subarray['prerequisites'];
+ $update_prereq = '';
+ if(!empty($prereq)){
+ $update_prereq = "prerequisite = '$prereq', ";
+ }
+
+ //we had previous data about this element, update
+ $sql2 = "UPDATE $my_new_lp_item " .
+ "SET parent_item_id = $parent_id, " .
+ "previous_item_id = $previous, " .
+ "next_item_id = $next, " .
+ $update_path.
+ $update_type.
+ $update_prereq.
+ "display_order = $dsp " .
+ "WHERE lp_id = ".$in_id." AND id = ".$new_id;
+ //echo "$sql2
\n";
+ $res2 = api_sql_query($sql2,__FILE__,__LINE__);
+ $previous = $new_id;
+ }
+ }
+ /**
+ * Migrate links on the homepage as well now (look into the TABLE_TOOL_LIST table and
+ * update the links to newscorm/lp_controller.php?action=view&lp_id=x)
+ * See scorm_migrate_hometools.php
+ */
+ //}
+ //end of case where $my_content_id != -1
- }
+ }
- /**
- * Update course description (intro page) to use new links instead of learnpath/learnpath_handler.php
- */
- $tbl_intro = $db_name.TABLE_TOOL_INTRO;
- $sql_i = "SELECT * FROM $tbl_intro WHERE id='course_homepage'";
- $res_i = api_sql_query($sql_i,__FILE__,__LINE__);
- //$link_to_course1 = 'scorm/scormdocument.php';
- while($row_i = Database::fetch_array($res_i)){
- $intro = $row_i['intro_text'];
- $out = array();
- $enc_path = str_replace('/','%2F',$my_path);
- $enc_path = str_replace(' ','\+',$enc_path);
- //echo "Looking for path ".$enc_path."
\n";
- $pattern = ';scorm/scormdocument\.php([^\s"\']*)openDir='.$enc_path.'([\\"\'\s&]*);';
- if(preg_match_all($pattern,$intro,$out,PREG_SET_ORDER)){
- foreach($out as $results){
- //echo "---> replace ".'/'.$results[0].'/ by newscorm/lp_controller.php'.$results[1].'action=view&lp_id='.$lp_ids[$my_content_id];
- //$intro = preg_replace('/scorm\/scormdocument\.php([^\s"\']*)openDir='.$enc_path.'([\\"\'\s&])/','newscorm/lp_controller.php'.$results[1].'action=view&lp_id='.$lp_ids[$my_content_id],$intro);
- $intro = preg_replace(';scorm/scormdocument\.php([^\s"\']*)openDir='.$enc_path.'([^\s"\']*);','newscorm/lp_controller.php'.$results[1].'action=view&lp_id='.$lp_ids[$my_content_id],$intro);
- }
- }else{
- //echo "No scorm link found in intro text
";
- }
- $pattern = ';scorm/showinframes\.php([^\s"\']*)file=([^\s"\'&]*)'.$enc_path.';';
- if(preg_match_all($pattern,$intro,$out,PREG_SET_ORDER)){
- foreach($out as $results){
- //echo "---> replace ".'/'.$results[0].'/ by newscorm/lp_controller.php'.$results[1].'action=view&lp_id='.$lp_ids[$my_content_id];
- //$intro = preg_replace('/scorm\/showinframes\.php([^\s"\']*)file=([^\s"\']*)'.$enc_path.'/','newscorm/lp_controller.php'.$results[1].'action=view&lp_id='.$lp_ids[$my_content_id],$intro);
- $intro = preg_replace(';scorm/showinframes\.php([^\s"\']*)file=([^\s"\'&]*)'.$enc_path.'([^\s"\']*);','newscorm/lp_controller.php'.$results[1].'action=view&lp_id='.$lp_ids[$my_content_id],$intro);
- }
- }else{
- //echo "No scorm link found in intro text
";
- }
- if($intro != $row_i['intro_text']){
- //echo "Replacing ".$row_i['intro_text']."\n by \n ".$intro."
\n";
- $sql_upd = "update $tbl_intro set intro_text = '".mysql_real_escape_string($intro)."' WHERE id = 'course_homepage' AND intro_text = '".mysql_real_escape_string($row_i['intro_text'])."'";
- //echo $sql_upd."
\n";
- fwrite($fh,$sql_upd."\n");
- fwrite($fh_revert,"UPDATE $tbl_intro set intro_text = '".$row_i['intro_text']."' WHERE id = 'course_homepage' AND intro_text = '$intro';\n");
- fwrite($fh_res,$intro."\n");
- api_sql_query($sql_upd,__FILE__,__LINE__);
- }
- }
+ /**
+ * Update course description (intro page) to use new links instead of learnpath/learnpath_handler.php
+ */
+ $tbl_intro = $db_name.TABLE_TOOL_INTRO;
+ $sql_i = "SELECT * FROM $tbl_intro WHERE id='course_homepage'";
+ $res_i = api_sql_query($sql_i,__FILE__,__LINE__);
+ //$link_to_course1 = 'scorm/scormdocument.php';
+ while($row_i = Database::fetch_array($res_i)){
+ $intro = $row_i['intro_text'];
+ $out = array();
+ $enc_path = str_replace('/','%2F',$my_path);
+ $enc_path = str_replace(' ','\+',$enc_path);
+ //echo "Looking for path ".$enc_path."
\n";
+ $pattern = '@claroline/scorm/scormdocument\.php([^\s"\']*)openDir='.$enc_path.'([\\"\'\s&]*)@';
+ if(preg_match_all($pattern,$intro,$out,PREG_SET_ORDER)){
+ foreach($out as $results){
+ //echo "---> replace ".'/'.$results[0].'/ by newscorm/lp_controller.php'.$results[1].'action=view&lp_id='.$lp_ids[$my_content_id];
+ //$intro = preg_replace('/scorm\/scormdocument\.php([^\s"\']*)openDir='.$enc_path.'([\\"\'\s&])/','newscorm/lp_controller.php'.$results[1].'action=view&lp_id='.$lp_ids[$my_content_id],$intro);
+ $intro = preg_replace('@claroline/scorm/scormdocument\.php([^\s"\']*)openDir='.$enc_path.'([^\s"\']*)@','main/newscorm/lp_controller.php'.$results[1].'action=view&lp_id='.$lp_ids[$my_content_id],$intro);
+ }
+ }else{
+ //echo "No scorm link found in intro text
";
+ }
+ $pattern = '@claroline/scorm/showinframes\.php([^\s"\']*)file=([^\s"\'&]*)'.$enc_path.'@';
+ if(preg_match_all($pattern,$intro,$out,PREG_SET_ORDER)){
+ foreach($out as $results){
+ //echo "---> replace ".'/'.$results[0].'/ by newscorm/lp_controller.php'.$results[1].'action=view&lp_id='.$lp_ids[$my_content_id];
+ //$intro = preg_replace('/scorm\/showinframes\.php([^\s"\']*)file=([^\s"\']*)'.$enc_path.'/','newscorm/lp_controller.php'.$results[1].'action=view&lp_id='.$lp_ids[$my_content_id],$intro);
+ $intro = preg_replace('@claroline/scorm/showinframes\.php([^\s"\']*)file=([^\s"\'&]*)'.$enc_path.'([^\s"\']*)@','main/newscorm/lp_controller.php'.$results[1].'action=view&lp_id='.$lp_ids[$my_content_id],$intro);
+ }
+ }else{
+ //echo "No scorm link found in intro text
";
+ }
+ if($intro != $row_i['intro_text']){
+ //echo "Replacing ".$row_i['intro_text']."\n by \n ".$intro."
\n";
+ $sql_upd = "update $tbl_intro set intro_text = '".mysql_real_escape_string($intro)."' WHERE id = 'course_homepage' AND intro_text = '".mysql_real_escape_string($row_i['intro_text'])."'";
+ //echo $sql_upd."
\n";
+ fwrite($fh,$sql_upd."\n");
+ fwrite($fh_revert,"UPDATE $tbl_intro set intro_text = '".$row_i['intro_text']."' WHERE id = 'course_homepage' AND intro_text = '$intro';\n");
+ fwrite($fh_res,$intro."\n");
+ api_sql_query($sql_upd,__FILE__,__LINE__);
+ }
+ }
- flush();
+ flush();
}
}
fclose($fh);
@@ -1195,4 +1318,4 @@ fclose($fh_revert);
fclose($fh_res);
if($loglevel>0){error_log("All done!",0);}
//echo "