',$course_path.'/scorm/'.$lp_path.'/',$lp_item_path);
}
*/
$file .= $aicc_append;
}else{
if($this->debug>2){error_log('New LP - In learnpath::get_link() '.__LINE__.' - No starting protocol in '.$lp_item_path,0);}
//prevent getting untranslatable urls
$lp_item_path = preg_replace('/%2F/','/',$lp_item_path);
$lp_item_path = preg_replace('/%3A/',':',$lp_item_path);
//prepare the path - lp_path might be unusable because it includes the "aicc" subdir name
$file = $course_path.'/scorm/'.$lp_path.'/'.$lp_item_path;
//TODO fix this for urls with protocol header
$file = str_replace('//','/',$file);
$file = str_replace(':/','://',$file);
$file .= $aicc_append;
}
}else{
$file = 'lp_content.php?type=dir';
}
break;
case 4:
break;
default:
break;
}
}
if($this->debug>2){error_log('New LP - In learnpath::get_link() - returning "'.$file.'" from get_link',0);}
return $file;
}
/**
* Gets the latest usable view or generate a new one
* @param integer Optional attempt number. If none given, takes the highest from the lp_view table
* @return integer DB lp_view id
*/
function get_view($attempt_num=0)
{
if($this->debug>0){error_log('New LP - In learnpath::get_view()',0);}
$search = '';
//use $attempt_num to enable multi-views management (disabled so far)
if($attempt_num != 0 AND intval(strval($attempt_num)) == $attempt_num)
{
$search = 'AND view_count = '.$attempt_num;
}
//when missing $attempt_num, search for a unique lp_view record for this lp and user
$lp_view_table = Database::get_course_table('lp_view');
$sql = "SELECT id, view_count FROM $lp_view_table " .
"WHERE lp_id = ".$this->get_id()." " .
"AND user_id = ".$this->get_user_id()." " .
$search .
" ORDER BY view_count DESC";
$res = api_sql_query($sql);
if(Database::num_rows($res)>0)
{
$row = Database::fetch_array($res);
$this->lp_view_id = $row['id'];
}else{
//no database record, create one
$sql = "INSERT INTO $lp_view_table(lp_id,user_id,view_count)" .
"VALUES (".$this->get_id().",".$this->get_user_id().",1)";
$res = api_sql_query($sql);
$id = Database::get_last_insert_id();
$this->lp_view_id = $id;
}
}
/**
* Gets the current view id
* @return integer View ID (from lp_view)
*/
function get_view_id()
{
if($this->debug>0){error_log('New LP - In learnpath::get_view_id()',0);}
if(!empty($this->lp_view_id))
{
return $this->lp_view_id;
}else{
return 0;
}
}
/**
* Gets the update queue
* @return array Array containing IDs of items to be updated by JavaScript
*/
function get_update_queue()
{
if($this->debug>0){error_log('New LP - In learnpath::get_update_queue()',0);}
return $this->update_queue;
}
/**
* Gets the user ID
* @return integer User ID
*/
function get_user_id()
{
if($this->debug>0){error_log('New LP - In learnpath::get_user_id()',0);}
if(!empty($this->user_id))
{
return $this->user_id;
}else{
return false;
}
}
/**
* Logs a message into a file
* @param string Message to log
* @return boolean True on success, false on error or if msg empty
*/
function log($msg)
{
if($this->debug>0){error_log('New LP - In learnpath::log()',0);}
//TODO
$this->error .= $msg."\n";
return true;
}
/**
* Moves an item up and down at its level
* @param integer Item to move up and down
* @param string Direction 'up' or 'down'
* @return integer New display order, or false on error
*/
function move_item($id, $direction){
if($this->debug>0){error_log('New LP - In learnpath::move_item('.$id.','.$direction.')',0);}
if(empty($id) or empty($direction)){return false;}
$tbl_lp_item = Database::get_course_table('lp_item');
$sql_sel = "
SELECT *
FROM " . $tbl_lp_item . "
WHERE id = " . $id;
$res_sel = api_sql_query($sql_sel,__FILE__,__LINE__);
//check if elem exists
if(Database::num_rows($res_sel)<1){return false;}
//gather data
$row = Database::fetch_array($res_sel);
$previous = $row['previous_item_id'];
$next = $row['next_item_id'];
$display = $row['display_order'];
$parent = $row['parent_item_id'];
$lp = $row['lp_id'];
//update the item (switch with previous/next one)
switch($direction)
{
case 'up':
if($this->debug>2){error_log('Movement up detected',0);}
if($display <= 1){/*do nothing*/}
else{
$sql_sel2 = "SELECT *
FROM $tbl_lp_item
WHERE id = $previous";
if($this->debug>2){error_log('Selecting previous: '.$sql_sel2,0);}
$res_sel2 = api_sql_query($sql_sel2,__FILE__,__LINE__);
if(Database::num_rows($res_sel2)<1){$previous_previous = 0;}
//gather data
$row2 = Database::fetch_array($res_sel2);
$previous_previous = $row2['previous_item_id'];
//update previous_previous item (switch "next" with current)
if($previous_previous != 0)
{
$sql_upd2 = "UPDATE $tbl_lp_item SET next_item_id = $id WHERE id = $previous_previous";
if($this->debug>2){error_log($sql_upd2,0);}
$res_upd2 = api_sql_query($sql_upd2);
}
//update previous item (switch with current)
if($previous != 0)
{
$sql_upd2 = "UPDATE $tbl_lp_item SET next_item_id = $next, previous_item_id = $id, display_order = display_order +1 WHERE id = $previous";
if($this->debug>2){error_log($sql_upd2,0);}
$res_upd2 = api_sql_query($sql_upd2);
}
//update current item (switch with previous)
if($id != 0){
$sql_upd2 = "UPDATE $tbl_lp_item SET next_item_id = $previous, previous_item_id = $previous_previous, display_order = display_order-1 WHERE id = $id";
if($this->debug>2){error_log($sql_upd2,0);}
$res_upd2 = api_sql_query($sql_upd2);
}
//update next item (new previous item)
if($next != 0){
$sql_upd2 = "UPDATE $tbl_lp_item SET previous_item_id = $previous WHERE id = $next";
if($this->debug>2){error_log($sql_upd2,0);}
$res_upd2 = api_sql_query($sql_upd2);
}
$display = $display-1;
}
break;
case 'down':
if($this->debug>2){error_log('Movement down detected',0);}
if($next == 0){/*do nothing*/}
else{
$sql_sel2 = "SELECT * FROM $tbl_lp_item WHERE id = $next";
if($this->debug>2){error_log('Selecting next: '.$sql_sel2,0);}
$res_sel2 = api_sql_query($sql_sel2,__FILE__,__LINE__);
if(Database::num_rows($res_sel2)<1){$next_next = 0;}
//gather data
$row2 = Database::fetch_array($res_sel2);
$next_next = $row2['next_item_id'];
//update previous item (switch with current)
if($previous != 0)
{
$sql_upd2 = "UPDATE $tbl_lp_item SET next_item_id = $next WHERE id = $previous";
$res_upd2 = api_sql_query($sql_upd2);
}
//update current item (switch with previous)
if($id != 0)
{
$sql_upd2 = "UPDATE $tbl_lp_item SET previous_item_id = $next, next_item_id = $next_next, display_order = display_order+1 WHERE id = $id";
$res_upd2 = api_sql_query($sql_upd2);
}
//update next item (new previous item)
if($next != 0)
{
$sql_upd2 = "UPDATE $tbl_lp_item SET previous_item_id = $previous, next_item_id = $id, display_order = display_order-1 WHERE id = $next";
$res_upd2 = api_sql_query($sql_upd2);
}
//update next_next item (switch "previous" with current)
if($next_next != 0)
{
$sql_upd2 = "UPDATE $tbl_lp_item SET previous_item_id = $id WHERE id = $next_next";
$res_upd2 = api_sql_query($sql_upd2);
}
$display = $display+1;
}
break;
default:
return false;
}
return $display;
}
/**
* Updates learnpath attributes to point to the next element
* The last part is similar to set_current_item but processing the other way around
*/
function next()
{
if($this->debug>0){error_log('New LP - In learnpath::next()',0);}
$this->last = $this->get_current_item_id();
$this->items[$this->last]->save(false);
$this->autocomplete_parents($this->last);
$new_index = $this->get_next_index();
if($this->debug>2){error_log('New LP - New index: '.$new_index,0);}
$this->index = $new_index;
if($this->debug>2){error_log('New LP - Now having orderedlist['.$new_index.'] = '. $this->ordered_items[$new_index],0);}
$this->current = $this->ordered_items[$new_index];
if($this->debug>2){error_log('New LP - new item id is '.$this->current.'-'.$this->get_current_item_id(),0);}
}
/**
* Open a resource = initialise all local variables relative to this resource. Depending on the child
* class, this might be redefined to allow several behaviours depending on the document type.
* @param integer Resource ID
* @return boolean True on success, false otherwise
*/
function open($id)
{
if($this->debug>0){error_log('New LP - In learnpath::open()',0);}
//TODO
//set the current resource attribute to this resource
//switch on element type (redefine in child class?)
//set status for this item to "opened"
//start timer
//initialise score
$this->index = 0; //or = the last item seen (see $this->last)
}
/**
* Check that all prerequisites are fulfilled. Returns true and an empty string on succes, returns false
* and the prerequisite string on error.
* This function is based on the rules for aicc_script language as described in the SCORM 1.2 CAM documentation page 108.
* @param integer Optional item ID. If none given, uses the current open item.
* @return boolean True if prerequisites are matched, false otherwise
* @return string Empty string if true returned, prerequisites string otherwise.
*/
function prerequisites_match($item = null)
{
if($this->debug>0){error_log('New LP - In learnpath::prerequisites_match()',0);}
if(empty($item)){$item = $this->current;}
if(is_object($this->items[$item]))
{
$prereq_string = $this->items[$item]->get_prereq_string();
if(empty($prereq_string)){return true;}
//clean spaces
$prereq_string = str_replace(' ','',$prereq_string);
if($this->debug>0){error_log('Found prereq_string: '.$prereq_string,0);}
//now send to the parse_prereq() function that will check this component's prerequisites
$result = $this->items[$item]->parse_prereq($prereq_string,$this);
if($result === false)
{
$this->set_error_msg($this->items[$item]->prereq_alert);
}
}else{
$result = true;
if($this->debug>1){error_log('New LP - $this->items['.$item.'] was not an object',0);}
}
if($this->debug>1){error_log('New LP - End of prerequisites_match(). Error message is now '.$this->error,0);}
return $result;
}
/**
* Updates learnpath attributes to point to the previous element
* The last part is similar to set_current_item but processing the other way around
*/
function previous()
{
if($this->debug>0){error_log('New LP - In learnpath::previous()',0);}
$this->last = $this->get_current_item_id();
$this->items[$this->last]->save(false);
$this->autocomplete_parents($this->last);
$new_index = $this->get_previous_index();
$this->index = $new_index;
$this->current = $this->ordered_items[$new_index];
}
/**
* Publishes a learnpath. This basically means show or hide the learnpath
* to normal users.
* Can be used as abstract
* @param integer Learnpath ID
* @param string New visibility
*/
function toggle_visibility($lp_id,$set_visibility='v')
{
//if($this->debug>0){error_log('New LP - In learnpath::toggle_visibility()',0);}
$tbl_lp = Database::get_course_table('lp');
$sql="SELECT * FROM $tbl_lp where id=$lp_id";
$result=api_sql_query($sql,__FILE__,__LINE__);
$row=Database::fetch_array($result);
$name=domesticate($row['name']);
if($set_visibility == 'i') {
$s=$name." ".get_lang('_no_published');
$dialogBox=$s;
$v=0;
}
if($set_visibility == 'v')
{
$s=$name." ".get_lang('_published');
$dialogBox=$s;
$v=1;
}
$tbl_tool = Database::get_course_table(TABLE_TOOL_LIST);
$link = 'newscorm/lp_controller.php?action=view&lp_id='.$lp_id;
$sql="SELECT * FROM $tbl_tool where name='$name' and image='scormbuilder.gif' and link LIKE '$link%'";
$result=api_sql_query($sql,__FILE__,__LINE__);
$num=Database::num_rows($result);
$row2=Database::fetch_array($result);
//if($this->debug>2){error_log('New LP - '.$sql.' - '.$num,0);}
if(($set_visibility == 'i') && ($num>0))
{
//it is visible or hidden but once was published
if(($row2['visibility'])==1)
{
$sql ="DELETE FROM $tbl_tool WHERE (name='$name' and image='scormbuilder.gif' and link LIKE '$link%')";
}
else
{
$sql ="UPDATE $tbl_tool set visibility=1 WHERE (name='$name' and image='scormbuilder.gif' and link LIKE '$link%')";
}
}
elseif(($set_visibility == 'v') && ($num==0))
{
$sql ="INSERT INTO $tbl_tool (name, link, image, visibility, admin, address, added_tool) VALUES ('$name','newscorm/lp_controller.php?action=view&lp_id=$lp_id','scormbuilder.gif','$v','0','pastillegris.gif',0)";
}
else
{
//parameter and database incompatible, do nothing
}
$result=api_sql_query($sql,__FILE__,__LINE__);
//if($this->debug>2){error_log('New LP - Leaving learnpath::toggle_visibility: '.$sql,0);}
}
/**
* Restart the whole learnpath. Return the URL of the first element.
* Make sure the results are saved with anoter method. This method should probably be
* redefined in children classes.
* @return string URL to load in the viewer
*/
function restart()
{
if($this->debug>0){error_log('New LP - In learnpath::restart()',0);}
//TODO
//call autosave method to save the current progress
//$this->index = 0;
$lp_view_table = Database::get_course_table('lp_view');
$sql = "INSERT INTO $lp_view_table (lp_id, user_id, view_count) " .
"VALUES (".$this->lp_id.",".$this->get_user_id().",".($this->attempt+1).")";
if($this->debug>2){error_log('New LP - Inserting new lp_view for restart: '.$sql,0);}
$res = api_sql_query($sql);
if($view_id = Database::get_last_insert_id($res))
{
$this->lp_view_id = $view_id;
$this->attempt = $this->attempt+1;
}else{
$this->error = 'Could not insert into item_view table...';
return false;
}
$this->autocomplete_parents($this->current);
foreach($this->items as $index=>$dummy){
$this->items[$index]->restart();
$this->items[$index]->set_lp_view($this->lp_view_id);
}
$this->first();
return true;
}
/**
* Saves the current item
* @return boolean
*/
function save_current(){
if($this->debug>0){error_log('New LP - In learnpath::save_current()',0);}
//TODO do a better check on the index pointing to the right item (it is supposed to be working
// on $ordered_items[] but not sure it's always safe to use with $items[])
if($this->debug>2){error_log('New LP - save_current() saving item '.$this->current,0);}
if($this->debug>2){error_log(''.print_r($this->items,true),0);}
if(is_object($this->items[$this->current])){
$res = $this->items[$this->current]->save(false);
$this->autocomplete_parents($this->current);
$status = $this->items[$this->current]->get_status();
$this->append_message('new_item_status: '.$status);
$this->update_queue[$this->current] = $status;
return $res;
}
return false;
}
/**
* Saves the given item
* @param integer Item ID. Optional (will take from $_REQUEST if null)
* @param boolean Save from url params (true) or from current attributes (false). Optional. Defaults to true
* @return boolean
*/
function save_item($item_id=null,$from_outside=true){
if($this->debug>0){error_log('New LP - In learnpath::save_item('.$item_id.','.$from_outside.')',0);}
//TODO do a better check on the index pointing to the right item (it is supposed to be working
// on $ordered_items[] but not sure it's always safe to use with $items[])
if(empty($item_id)){
$item_id = $this->escape_string($_REQUEST['id']);
}
if(empty($item_id))
{
$item_id = $this->get_current_item_id();
}
if($this->debug>2){error_log('New LP - save_current() saving item '.$item_id,0);}
if(is_object($this->items[$item_id])){
$res = $this->items[$item_id]->save($from_outside);
$this->autocomplete_parents($item_id);
$status = $this->items[$item_id]->get_status();
$this->append_message('new_item_status: '.$status);
$this->update_queue[$item_id] = $status;
return $res;
}
return false;
}
/**
* Saves the last item seen's ID only in case
*/
function save_last(){
if($this->debug>0){error_log('New LP - In learnpath::save_last()',0);}
$table = Database::get_course_table('lp_view');
if(isset($this->current)){
if($this->debug>2){error_log('New LP - Saving current item ('.$this->current.') for later review',0);}
$sql = "UPDATE $table SET last_item = ".$this->get_current_item_id()." " .
"WHERE lp_id = ".$this->get_id()." AND user_id = ".$this->get_user_id();
if($this->debug>2){error_log('New LP - Saving last item seen : '.$sql,0);}
$res = api_sql_query($sql,__FILE__,__LINE__);
}
//save progress
list($progress,$text) = $this->get_progress_bar_text('%');
if($progress>=0 AND $progress<=100){
$progress= (int)$progress;
$sql = "UPDATE $table SET progress = $progress " .
"WHERE lp_id = ".$this->get_id()." AND " .
"user_id = ".$this->get_user_id();
$res = @mysql_query($sql); //ignore errors as some tables might not have the progress field just yet
$this->progress_db = $progress;
}
}
/**
* Sets the current item ID (checks if valid and authorized first)
* @param integer New item ID. If not given or not authorized, defaults to current
*/
function set_current_item($item_id=null)
{
if($this->debug>0){error_log('New LP - In learnpath::set_current_item('.$item_id.')',0);}
if(empty($item_id)){
if($this->debug>2){error_log('New LP - No new current item given, ignore...',0);}
//do nothing
}else{
if($this->debug>2){error_log('New LP - New current item given is '.$item_id.'...',0);}
$item_id = $this->escape_string($item_id);
//TODO check in database here
$this->last = $this->current;
$this->current = $item_id;
//TODO update $this->index as well
foreach($this->ordered_items as $index => $item)
{
if($item == $this->current)
{
$this->index = $index;
break;
}
}
if($this->debug>2){error_log('New LP - set_current_item('.$item_id.') done. Index is now : '.$this->index,0);}
}
}
/**
* Sets the encoding
* @param string New encoding
*/
function set_encoding($enc='ISO-8859-1'){
if($this->debug>0){error_log('New LP - In learnpath::set_encoding()',0);}
$enc = strtoupper($enc);
$encodings = array('UTF-8','ISO-8859-1','ISO-8859-15','SHIFT-JIS');
if(in_array($enc,$encodings)){
$lp = $this->get_id();
if($lp!=0){
$tbl_lp = Database::get_course_table('lp');
$sql = "UPDATE $tbl_lp SET default_encoding = '$enc' WHERE id = ".$lp;
$res = api_sql_query($sql);
return $res;
}
}
return false;
}
/**
* Sets the JS lib setting in the database directly.
* This is the JavaScript library file this lp needs to load on startup
* @param string Proximity setting
*/
function set_jslib($lib=''){
if($this->debug>0){error_log('New LP - In learnpath::set_jslib()',0);}
$lp = $this->get_id();
if($lp!=0){
$tbl_lp = Database::get_course_table('lp');
$sql = "UPDATE $tbl_lp SET js_lib = '$lib' WHERE id = ".$lp;
$res = api_sql_query($sql);
return $res;
}else{
return false;
}
}
/**
* Sets the name of the LP maker (publisher) (and save)
* @param string Optional string giving the new content_maker of this learnpath
*/
function set_maker($name=''){
if($this->debug>0){error_log('New LP - In learnpath::set_maker()',0);}
if(empty($name))return false;
$this->maker = $this->escape_string($name);
$lp_table = Database::get_course_table('lp');
$lp_id = $this->get_id();
$sql = "UPDATE $lp_table SET content_maker = '".$this->maker."' WHERE id = '$lp_id'";
if($this->debug>2){error_log('New LP - lp updated with new content_maker : '.$this->maker,0);}
//$res = Database::query($sql);
$res = api_sql_query($sql);
return true;
}
/**
* Sets the name of the current learnpath (and save)
* @param string Optional string giving the new name of this learnpath
*/
function set_name($name=''){
if($this->debug>0){error_log('New LP - In learnpath::set_name()',0);}
if(empty($name))return false;
$this->name = $this->escape_string($name);
$lp_table = Database::get_course_table('lp');
$lp_id = $this->get_id();
$sql = "UPDATE $lp_table SET name = '".$this->name."' WHERE id = '$lp_id'";
if($this->debug>2){error_log('New LP - lp updated with new name : '.$this->name,0);}
//$res = Database::query($sql);
$res = api_sql_query($sql, __FILE__, __LINE__);
// if the lp is visible on the homepage, change his name there
if(mysql_affected_rows())
{
$table = Database :: get_course_table(TABLE_TOOL_LIST);
$sql = 'UPDATE '.$table.' SET
name = "'.$this->name.'"
WHERE link = "newscorm/lp_controller.php?action=view&lp_id='.$lp_id.'"';
api_sql_query($sql, __FILE__, __LINE__);
}
return true;
}
/**
* Sets the location/proximity of the LP (local/remote) (and save)
* @param string Optional string giving the new location of this learnpath
*/
function set_proximity($name=''){
if($this->debug>0){error_log('New LP - In learnpath::set_proximity()',0);}
if(empty($name))return false;
$this->proximity = $this->escape_string($name);
$lp_table = Database::get_course_table('lp');
$lp_id = $this->get_id();
$sql = "UPDATE $lp_table SET content_local = '".$this->proximity."' WHERE id = '$lp_id'";
if($this->debug>2){error_log('New LP - lp updated with new proximity : '.$this->proximity,0);}
//$res = Database::query($sql);
$res = api_sql_query($sql);
return true;
}
/**
* Sets the previous item ID to a given ID. Generally, this should be set to the previous 'current' item
* @param integer DB ID of the item
*/
function set_previous_item($id)
{
if($this->debug>0){error_log('New LP - In learnpath::set_previous_item()',0);}
$this->last = $id;
}
/**
* Sets the object's error message
* @param string Error message. If empty, reinits the error string
* @return void
*/
function set_error_msg($error='')
{
if($this->debug>0){error_log('New LP - In learnpath::set_error_msg()',0);}
if(empty($error)){
$this->error = '';
}else{
$this->error .= $error;
}
}
/**
* Launches the current item if not 'sco' (starts timer and make sure there is a record ready in the DB)
*
*/
function start_current_item(){
if($this->debug>0){error_log('New LP - In learnpath::start_current_item()',0);}
if($this->current != 0 AND
is_object($this->items[$this->current]))
{
$type = $this->get_type();
if(
($type == 2 && $this->items[$this->current]->get_type()!='sco')
OR
($type == 3 && $this->items[$this->current]->get_type()!='au')
OR
($type==1)
)
{
$this->items[$this->current]->open();
$this->autocomplete_parents($this->current);
$prereq_check = $this->prerequisites_match($this->current);
if($prereq_check === true) //launch the prerequisites check and set error if needed
{
$this->items[$this->current]->save(false);
}
//$this->update_queue[$this->last] = $this->items[$this->last]->get_status();
}else{
//if sco, then it is supposed to have been updated by some other call
}
}
return true;
}
/**
* Stops the processing and counters for the old item (as held in $this->last)
* @param
*/
function stop_previous_item(){
if($this->debug>0){error_log('New LP - In learnpath::stop_previous_item()',0);}
if($this->last != 0 AND $this->last!=$this->current AND is_object($this->items[$this->last]))
{
if($this->debug>2){error_log('New LP - In learnpath::stop_previous_item() - '.$this->last.' is object',0);}
switch($this->get_type()){
case '3':
if($this->items[$this->last]->get_type()!='au')
{
if($this->debug>2){error_log('New LP - In learnpath::stop_previous_item() - '.$this->last.' in lp_type 3 is <> au',0);}
$this->items[$this->last]->close();
//$this->autocomplete_parents($this->last);
//$this->update_queue[$this->last] = $this->items[$this->last]->get_status();
}else{
if($this->debug>2){error_log('New LP - In learnpath::stop_previous_item() - Item is an AU, saving is managed by AICC signals',0);}
}
case '2':
if($this->items[$this->last]->get_type()!='sco')
{
if($this->debug>2){error_log('New LP - In learnpath::stop_previous_item() - '.$this->last.' in lp_type 2 is <> sco',0);}
$this->items[$this->last]->close();
//$this->autocomplete_parents($this->last);
//$this->update_queue[$this->last] = $this->items[$this->last]->get_status();
}else{
if($this->debug>2){error_log('New LP - In learnpath::stop_previous_item() - Item is a SCO, saving is managed by SCO signals',0);}
}
break;
case '1':
default:
if($this->debug>2){error_log('New LP - In learnpath::stop_previous_item() - '.$this->last.' in lp_type 1 is asset',0);}
$this->items[$this->last]->close();
break;
}
}else{
if($this->debug>2){error_log('New LP - In learnpath::stop_previous_item() - No previous element found, ignoring...',0);}
return false;
}
return true;
}
/**
* Updates the default view mode from fullscreen to embedded and inversely
* @return string The current default view mode ('fullscreen' or 'embedded')
*/
function update_default_view_mode()
{
if($this->debug>0){error_log('New LP - In learnpath::update_default_view_mode()',0);}
$lp_table = Database::get_course_table('lp');
$sql = "SELECT * FROM $lp_table WHERE id = ".$this->get_id();
$res = api_sql_query($sql);
if(Database::num_rows($res)>0){
$row = Database::fetch_array($res);
$view_mode = $row['default_view_mod'];
if($view_mode == 'fullscreen'){
$view_mode = 'embedded';
}elseif($view_mode == 'embedded'){
$view_mode = 'fullscreen';
}
$sql = "UPDATE $lp_table SET default_view_mod = '$view_mode' WHERE id = ".$this->get_id();
$res = api_sql_query($sql);
$this->mode = $view_mode;
return $view_mode;
}else{
if($this->debug>2){error_log('New LP - Problem in update_default_view() - could not find LP '.$this->get_id().' in DB',0);}
}
return -1;
}
/**
* Updates the default behaviour about auto-commiting SCORM updates
* @return boolean True if auto-commit has been set to 'on', false otherwise
*/
function update_default_scorm_commit(){
if($this->debug>0){error_log('New LP - In learnpath::update_default_scorm_commit()',0);}
$lp_table = Database::get_course_table('lp');
$sql = "SELECT * FROM $lp_table WHERE id = ".$this->get_id();
$res = api_sql_query($sql);
if(Database::num_rows($res)>0){
$row = Database::fetch_array($res);
$force = $row['force_commit'];
if($force == 1){
$force = 0;
$force_return = false;
}elseif($force == 0){
$force = 1;
$force_return = true;
}
$sql = "UPDATE $lp_table SET force_commit = $force WHERE id = ".$this->get_id();
$res = api_sql_query($sql);
$this->force_commit = $force_return;
return $force_return;
}else{
if($this->debug>2){error_log('New LP - Problem in update_default_scorm_commit() - could not find LP '.$this->get_id().' in DB',0);}
}
return -1;
}
/**
* Updates the "prevent_reinit" value that enables control on reinitialising items on second view
* @return boolean True if prevent_reinit has been set to 'on', false otherwise (or 1 or 0 in this case)
*/
function update_reinit(){
if($this->debug>0){error_log('New LP - In learnpath::update_reinit()',0);}
$lp_table = Database::get_course_table('lp');
$sql = "SELECT * FROM $lp_table WHERE id = ".$this->get_id();
$res = api_sql_query($sql);
if(Database::num_rows($res)>0){
$row = Database::fetch_array($res);
$force = $row['prevent_reinit'];
if($force == 1){
$force = 0;
}elseif($force == 0){
$force = 1;
}
$sql = "UPDATE $lp_table SET prevent_reinit = $force WHERE id = ".$this->get_id();
$res = api_sql_query($sql,__FILE__,__LINE__);
$this->prevent_reinit = $force;
return $force;
}else{
if($this->debug>2){error_log('New LP - Problem in update_reinit() - could not find LP '.$this->get_id().' in DB',0);}
}
return -1;
}
/**
* Updates the "scorm_debug" value that shows or hide the debug window
* @return boolean True if scorm_debug has been set to 'on', false otherwise (or 1 or 0 in this case)
*/
function update_scorm_debug(){
if($this->debug>0){error_log('New LP - In learnpath::update_scorm_debug()',0);}
$lp_table = Database::get_course_table('lp');
$sql = "SELECT * FROM $lp_table WHERE id = ".$this->get_id();
$res = api_sql_query($sql);
if(Database::num_rows($res)>0){
$row = Database::fetch_array($res);
$force = $row['debug'];
if($force == 1){
$force = 0;
}elseif($force == 0){
$force = 1;
}
$sql = "UPDATE $lp_table SET debug = $force WHERE id = ".$this->get_id();
$res = api_sql_query($sql,__FILE__,__LINE__);
$this->scorm_debug = $force;
return $force;
}else{
if($this->debug>2){error_log('New LP - Problem in update_scorm_debug() - could not find LP '.$this->get_id().' in DB',0);}
}
return -1;
}
/**
* Function that makes a call to the function sort_tree_array and create_tree_array
*
* @author Kevin Van Den Haute
*
* @param unknown_type $array
*/
function tree_array($array)
{
$array = $this->sort_tree_array($array);
$this->create_tree_array($array);
}
/**
* Creates an array with the elements of the learning path tree in it
*
* @author Kevin Van Den Haute
*
* @param array $array
* @param int $parent
* @param int $depth
* @param array $tmp
*/
function create_tree_array($array, $parent = 0, $depth = -1, $tmp = array())
{
if(is_array($array))
{
for($i = 0; $i < count($array); $i++)
{
if($array[$i]['parent_item_id'] == $parent)
{
if(!in_array($array[$i]['parent_item_id'], $tmp))
{
$tmp[] = $array[$i]['parent_item_id'];
$depth++;
}
$this->arrMenu[] = array(
'id' => $array[$i]['id'],
'item_type' => $array[$i]['item_type'],
'title' => $array[$i]['title'],
'path' => $array[$i]['path'],
'description' => $array[$i]['description'],
'parent_item_id' => $array[$i]['parent_item_id'],
'previous_item_id' => $array[$i]['previous_item_id'],
'next_item_id' => $array[$i]['next_item_id'],
'min_score' => $array[$i]['min_score'],
'max_score' => $array[$i]['max_score'],
'display_order' => $array[$i]['display_order'],
'prerequisite' => $array[$i]['prerequisite'],
'depth' => $depth
);
$this->create_tree_array($array, $array[$i]['id'], $depth, $tmp);
}
}
}
}
/**
* Sorts a multi dimensional array by parent id and display order
* @author Kevin Van Den Haute
*
* @param array $array (array with al the learning path items in it)
*
* @return array
*/
function sort_tree_array($array)
{
foreach($array as $key => $row)
{
$parent[$key] = $row['parent_item_id'];
$position[$key] = $row['display_order'];
}
if(count($array) > 0)
array_multisort($parent, SORT_ASC, $position, SORT_ASC, $array);
return $array;
}
/**
* Function that creates a table structure with a learning path his modules, chapters and documents.
* Also the actions for the modules, chapters and documents are in this table.
*
* @author Kevin Van Den Haute
*
* @param int $lp_id
*
* @return string
*/
function overview()
{
$return = '';
$tbl_lp_item = Database::get_course_table('lp_item');
$sql = "
SELECT *
FROM " . $tbl_lp_item . "
WHERE
lp_id = " . $this->lp_id;
$result = api_sql_query($sql, __FILE__, __LINE__);
$arrLP = array();
while($row = Database::fetch_array($result))
{
$arrLP[] = array(
'id' => $row['id'],
'item_type' => $row['item_type'],
'title' => $row['title'],
'description' => $row['description'],
'parent_item_id' => $row['parent_item_id'],
'previous_item_id' => $row['previous_item_id'],
'next_item_id' => $row['next_item_id'],
'display_order' => $row['display_order']);
}
$this->tree_array($arrLP);
$arrLP = $this->arrMenu;
unset($this->arrMenu);
if(api_is_allowed_to_edit())
$return .= ''.get_lang("Advanced").'|'.get_lang("BasicOverview").'|'.get_lang("Display").'
';
$return .= '' . "\n";
$return .= "\t" . '' . "\n";
$return .= "\t" . '| '.get_lang("Title").' | ' . "\n";
//$return .= "\t" . ''.get_lang("Description").' | ' . "\n";
$return .= "\t" . ''.get_lang("Move").' | ' . "\n";
$return .= "\t" . ''.get_lang("Actions").' | ' . "\n";
$return .= "\t" . '
' . "\n";
for($i = 0; $i < count($arrLP); $i++)
{
if($arrLP[$i]['description'] == '')
$arrLP[$i]['description'] = ' ';
if (($i % 2)==0) { $oddclass="row_odd"; } else { $oddclass="row_even"; }
$return .= "\t" . '' . "\n";
$return .= "\t\t" . ' ' . stripslashes($arrLP[$i]['title']) . ' | ' . "\n";
//$return .= "\t\t" . '' . stripslashes($arrLP[$i]['description']) . ' | ' . "\n";
if(api_is_allowed_to_edit())
{
$return .= "\t\t" . '' . "\n";
if($arrLP[$i]['previous_item_id'] != 0)
{
$return .= "\t\t\t" . '';
$return .= ' . '.gif) ';
$return .= '' . "\n";
}
else
$return .= "\t\t\t" . ' ' . "\n";
if($arrLP[$i]['next_item_id'] != 0)
{
$return .= "\t\t\t" . '';
$return .= ' . '.gif) ';
$return .= '' . "\n";
}
else
$return .= "\t\t\t" . '' . "\n";
$return .= "\t\t" . ' | ' . "\n";
$return .= "\t\t" . '' . "\n";
if($arrLP[$i]['item_type'] != 'dokeos_chapter' && $arrLP[$i]['item_type'] != 'dokeos_module')
{
$return .= "\t\t\t" . '';
$return .= ' ';
$return .= '' . "\n";
}
else
{
$return .= "\t\t\t" . '';
$return .= '';
$return .= '' . "\n";
}
$return .= "\t\t\t" . '';
$return .= ' ';
$return .= '' . "\n";
$return .= "\t\t" . ' | ' . "\n";
}
$return .= "\t" . '
' . "\n";
}
if(count($arrLP) == 0)
{
$return .= "\t" . '' . "\n";
$return .= "\t\t" . '| '.get_lang("NoItemsInLp").' | ' . "\n";
$return .= "\t" . '
' . "\n";
}
$return .= '
' . "\n";
return $return;
}
/**
* This functions builds the LP tree based on data from the database.
*
* @return string
* @uses dtree.js :: necessary javascript for building this tree
*/
function build_tree()
{
$return = "\n";
return $return;
}
/**
* Create a new document //still needs some finetuning
*
* @param array $_course
* @return string
*/
function create_document($_course)
{
$dir = isset($_GET['dir']) ? $_GET['dir'] : $_POST['dir']; // please do not modify this dirname formatting
if(strstr($dir, '..'))
$dir = '/';
if($dir[0] == '.')
$dir = substr($dir, 1);
if($dir[0] != '/')
$dir = '/'.$dir;
if($dir[strlen($dir) - 1] != '/')
$dir .= '/';
$filepath = api_get_path('SYS_COURSE_PATH') . $_course['path'] . '/document' . $dir;
if(!is_dir($filepath))
{
$filepath = api_get_path('SYS_COURSE_PATH') . $_course['path'] . '/document/';
$dir = '/';
}
$title = replace_dangerous_char($_POST['title']);
$filename = $title;
$content = $_POST['content_lp'];
$tmp_filename = $filename;
while(file_exists($filepath . $tmp_filename . '.html'))
$tmp_filename = $filename . '_' . ++$i;
$filename = $tmp_filename . '.html';
$content = stripslashes(text_filter($content));
$path_to_remove = api_get_path('WEB_COURSE_PATH') . $_course['path'] . '/document' . $dir;
$content = str_replace($path_to_remove, './', $content);
if(!file_exists($filepath . $filename))
{
if($fp = @fopen($filepath . $filename, 'w'))
{
fputs($fp, $content);
fclose($fp);
$file_size = filesize($filepath . $filename);
$save_file_path = $dir . $filename;
$document_id = add_document($_course, $save_file_path, 'file', $file_size, $filename . '.html');
if($document_id)
{
api_item_property_update($_course, TOOL_DOCUMENT, $document_id, 'DocumentAdded', $_user['user_id'], $to_group_id);
//update parent folders
//item_property_update_on_folder($_course, $_GET['dir'], $_user['user_id']);
$new_comment = (isset($_POST['comment'])) ? trim($_POST['comment']) : '';
$new_title = (isset($_POST['title'])) ? trim($_POST['title']) : '';
if($new_comment || $new_title)
{
$tbl_doc = Database::get_course_table(TABLE_DOCUMENT);
$ct = '';
if($new_comment)
$ct .= ", comment='" . $new_comment . "'";
if($new_title)
$ct .= ", title='" . $new_title . ".html '";
$sql_update = "
UPDATE " . $tbl_doc . "
SET " . substr($ct, 1) . "
WHERE id = " . $document_id;
api_sql_query($sql_update, __FILE__, __LINE__);
}
}
return $document_id;
}
}
}
/**
* Enter description here...
*
* @param array $_course
*/
function edit_document($_course)
{
global $_configuration;
$dir = isset($_GET['dir']) ? $_GET['dir'] : $_POST['dir']; // please do not modify this dirname formatting
if(strstr($dir, '..'))
$dir = '/';
if($dir[0] == '.')
$dir = substr($dir, 1);
if($dir[0] != '/')
$dir = '/'.$dir;
if($dir[strlen($dir) - 1] != '/')
$dir .= '/';
$filepath = api_get_path('SYS_COURSE_PATH') . $_course['path'] . '/document'.$dir;
if(!is_dir($filepath))
{
$filepath = api_get_path('SYS_COURSE_PATH') . $_course['path'] . '/document/';
$dir = '/';
}
$table_doc = Database::get_course_table(TABLE_DOCUMENT);
$sql = "
SELECT path
FROM " . $table_doc . "
WHERE id = " . $_POST['path'];
$res = api_sql_query($sql, __FILE__, __LINE__);
$row = Database::fetch_array($res);
$content = stripslashes($_POST['content_lp']);
$file = $filepath . $row['path'];
if($fp = @fopen($file, 'w'))
{
$content = text_filter($content);
$content = str_replace(api_get_path('WEB_COURSE_PATH'), $_configuration['url_append'].'/courses/', $content);
fputs($fp, $content);
fclose($fp);
}
}
/**
* Displays the selected item, with a panel for manipulating the item
*
* @param int $item_id
* @param string $msg
* @return string
*/
function display_item($item_id, $iframe = true, $msg = '')
{
global $_course; //will disappear
$return = '';
if(is_numeric($item_id))
{
$tbl_lp_item = Database::get_course_table('lp_item');
$tbl_doc = Database::get_course_table(TABLE_DOCUMENT);
$sql = "
SELECT
lp.*
FROM " . $tbl_lp_item . " as lp
WHERE
lp.id = " . $item_id;
$result = api_sql_query($sql, __FILE__, __LINE__);
while($row = Database::fetch_array($result))
{
$return .= $this->display_manipulate($item_id, $row['item_type']);
$return .= '';
if($msg != '')
$return .= $msg;
if($this->encoding=='UTF-8')
{
$row['title'] = utf8_decode($row['title']);
}
$return .= '
' . stripslashes($row['title']) . '
';
//$return .= '
' . ((trim($row['description']) == '') ? 'no description' : stripslashes($row['description'])) . '
';
//$return .= '
';
if($row['item_type'] == TOOL_DOCUMENT)
{
$tbl_doc = Database :: get_course_table(TABLE_DOCUMENT);
$sql_doc = "SELECT path FROM " . $tbl_doc . " WHERE id = " . $row['path'];
$result=api_sql_query($sql_doc);
$path_file=mysql_result($result,0,0);
$path_parts = pathinfo($path_file);
if(in_array($path_parts['extension'],array('html','txt','png', 'jpg', 'JPG', 'jpeg', 'JPEG', 'gif', 'swf')))
{
$return .= $this->display_document($row['path'], true, true);
}
}
$return .= '
' . "\n";
$return .= '
'.get_lang("CreateNewStep").'
';
$return .= '
';
$return .= '
'.get_lang("UseAnExistingResource").'
';
/* get all the docs */
$return .= $this->get_documents();
/* get all the exercises */
$return .= $this->get_exercises();
/* get all the links */
$return .= $this->get_links();
/* get al the student publications */
$return .= $this->get_student_publications();
/* get al the forums */
$return .= $this->get_forums();
$return .= '
' . $row_doc['title'] . ($edit_link ? ' [ Edit this document ]' : '') . '
';
//TODO: add a path filter
if($iframe){
$return .= '';
}
else{
$return .= file_get_contents(api_get_path(SYS_COURSE_PATH) . $_course['path'] . '/document' . $row_doc['path']);
}
return $return;
}
/**
* Enter description here...
*
* @param unknown_type $action
* @param unknown_type $id
* @param unknown_type $extra_info
* @return unknown
*/
function display_quiz_form($action = 'add', $id = 0, $extra_info = '')
{
$tbl_lp_item = Database::get_course_table(TABLE_LP_ITEM);
$tbl_quiz = Database::get_course_table(TABLE_QUIZ_TEST);
if($id != 0 && is_array($extra_info))
{
$item_title = stripslashes($extra_info['title']);
$item_description = stripslashes($extra_info['description']);
}
elseif(is_numeric($extra_info))
{
$sql_quiz = "
SELECT
title,
description
FROM " . $tbl_quiz . "
WHERE id = " . $extra_info;
$result = api_sql_query($sql_quiz, __FILE__, __LINE__);
$row = Database::fetch_array($result);
$item_title = $row['title'];
$item_description = $row['description'];
}
else
{
$item_title = '';
$item_description = '';
}
$return = '';
if($id != 0 && is_array($extra_info))
$parent = $extra_info['parent_item_id'];
else
$parent = 0;
$sql = "
SELECT *
FROM " . $tbl_lp_item . "
WHERE
lp_id = " . $this->lp_id;
$result = api_sql_query($sql, __FILE__, __LINE__);
$arrLP = array();
while($row = Database::fetch_array($result))
{
$arrLP[] = array(
'id' => $row['id'],
'item_type' => $row['item_type'],
'title' => $row['title'],
'path' => $row['path'],
'description' => $row['description'],
'parent_item_id' => $row['parent_item_id'],
'previous_item_id' => $row['previous_item_id'],
'next_item_id' => $row['next_item_id'],
'display_order' => $row['display_order'],
'prerequisite' => $row['prerequisite']);
}
$this->tree_array($arrLP);
$arrLP = $this->arrMenu;
unset($this->arrMenu);
if($action == 'add')
$return .= '
'.get_lang("CreateTheExercise").' :
' . "\n";
elseif($action == 'move')
$return .= '
'.get_lang("MoveTheCurrentExercise").' :
' . "\n";
else
$return .= '
'.get_lang("EditCurrentExecice").' :
' . "\n";
if(isset($_GET['edit']) && $_GET['edit'] == 'true')
{
$return .= '
';
$return .= '
'.get_lang("Warning").' !
';
$return .= get_lang("WarningEditingDocument");
$return .= '
';
}
$return .= '
' . "\n";
$return .= '
';
if($id != 0 && is_array($extra_info))
$parent = $extra_info['parent_item_id'];
else
$parent = 0;
$sql = "
SELECT *
FROM " . $tbl_lp_item . "
WHERE
lp_id = " . $this->lp_id;
$result = api_sql_query($sql, __FILE__, __LINE__);
$arrLP = array();
while($row = Database::fetch_array($result))
{
$arrLP[] = array(
'id' => $row['id'],
'item_type' => $row['item_type'],
'title' => $row['title'],
'path' => $row['path'],
'description' => $row['description'],
'parent_item_id' => $row['parent_item_id'],
'previous_item_id' => $row['previous_item_id'],
'next_item_id' => $row['next_item_id'],
'display_order' => $row['display_order'],
'prerequisite' => $row['prerequisite']);
}
$this->tree_array($arrLP);
$arrLP = $this->arrMenu;
unset($this->arrMenu);
if($action == 'add')
$return .= '
'.get_lang("CreateTheExercise").' :
' . "\n";
elseif($action == 'move')
$return .= '
'.get_lang("MoveTheCurrentExercise").' :
' . "\n";
else
$return .= '
'.get_lang("EditCurrentExecice").' :
' . "\n";
if(isset($_GET['edit']) && $_GET['edit'] == 'true')
{
$return .= '
';
$return .= '
'.get_lang("Warning").' !
';
$return .= get_lang("WarningEditingDocument");
$return .= '
';
}
$return .= '
' . "\n";
$return .= '
';
if($id != 0 && is_array($extra_info))
$parent = $extra_info['parent_item_id'];
else
$parent = 0;
$sql = "
SELECT *
FROM " . $tbl_lp_item . "
WHERE
lp_id = " . $this->lp_id;
$result = api_sql_query($sql, __FILE__, __LINE__);
$arrLP = array();
while($row = Database::fetch_array($result))
{
$arrLP[] = array(
'id' => $row['id'],
'item_type' => $row['item_type'],
'title' => $row['title'],
'path' => $row['path'],
'description' => $row['description'],
'parent_item_id' => $row['parent_item_id'],
'previous_item_id' => $row['previous_item_id'],
'next_item_id' => $row['next_item_id'],
'display_order' => $row['display_order'],
'prerequisite' => $row['prerequisite']);
}
$this->tree_array($arrLP);
$arrLP = $this->arrMenu;
unset($this->arrMenu);
if($action == 'add')
$return .= '
'.get_lang("CreateTheForum").' :
' . "\n";
elseif($action == 'move')
$return .= '
'.get_lang("MoveTheCurrentForum").' :
' . "\n";
else
$return .= '
'.get_lang("EditCurrentForum").' :
' . "\n";
$return .= '
' . "\n";
$return .= '
';
if($id != 0 && is_array($extra_info))
$parent = $extra_info['parent_item_id'];
else
$parent = 0;
$sql = "
SELECT *
FROM " . $tbl_lp_item . "
WHERE
lp_id = " . $this->lp_id;
$result = api_sql_query($sql, __FILE__, __LINE__);
$arrLP = array();
while($row = Database::fetch_array($result))
{
$arrLP[] = array(
'id' => $row['id'],
'item_type' => $row['item_type'],
'title' => $row['title'],
'path' => $row['path'],
'description' => $row['description'],
'parent_item_id' => $row['parent_item_id'],
'previous_item_id' => $row['previous_item_id'],
'next_item_id' => $row['next_item_id'],
'display_order' => $row['display_order'],
'prerequisite' => $row['prerequisite']);
}
$this->tree_array($arrLP);
$arrLP = $this->arrMenu;
unset($this->arrMenu);
if($action == 'add')
$return .= '
'.get_lang("CreateTheForum").' :
' . "\n";
elseif($action == 'move')
$return .= '
'.get_lang("MoveTheCurrentForum").' :
' . "\n";
else
$return .= '
'.get_lang("EditCurrentForum").' :
' . "\n";
$return .= '
' . "\n";
$return .= '
';
if($id != 0 && is_array($extra_info))
$parent = $extra_info['parent_item_id'];
else
$parent = 0;
$sql = "
SELECT *
FROM " . $tbl_lp_item . "
WHERE
lp_id = " . $this->lp_id;
if($item_type == 'module')
$sql .= " AND parent_item_id = 0";
$result = api_sql_query($sql, __FILE__, __LINE__);
$arrLP = array();
while($row = Database::fetch_array($result))
{
$arrLP[] = array(
'id' => $row['id'],
'item_type' => $row['item_type'],
'title' => $row['title'],
'path' => $row['path'],
'description' => $row['description'],
'parent_item_id' => $row['parent_item_id'],
'previous_item_id' => $row['previous_item_id'],
'next_item_id' => $row['next_item_id'],
'display_order' => $row['display_order']);
}
$this->tree_array($arrLP);
$arrLP = $this->arrMenu;
unset($this->arrMenu);
$return .= '
' . $title . '
' . "\n";
require_once (api_get_path(LIBRARY_PATH).'formvalidator/FormValidator.class.php');
$form = new FormValidator('form','POST',api_get_self()."?".$_SERVER["QUERY_STRING"]);
$defaults["title"]=html_entity_decode($item_title);
$defaults["description"]=html_entity_decode($item_description);
$form->addElement('html',$return);
//$arrHide = array($id);
$arrHide[0]['value']=$this->name;
$arrHide[0]['padding']=3;
if($item_type != 'module' && $item_type != 'dokeos_module')
{
for($i = 0; $i < count($arrLP); $i++)
{
if($action != 'add'){
if(($arrLP[$i]['item_type'] == 'dokeos_module' || $arrLP[$i]['item_type'] == 'dokeos_chapter' || $arrLP[$i]['item_type'] == 'dir') && !in_array($arrLP[$i]['id'], $arrHide) && !in_array($arrLP[$i]['parent_item_id'], $arrHide)){
$arrHide[$arrLP[$i]['id']]['value']=html_entity_decode(stripslashes($arrLP[$i]['title']));
$arrHide[$arrLP[$i]['id']]['padding']=3+ $arrLP[$i]['depth'] * 10;
if($parent == $arrLP[$i]['id']){
$s_selected_parent=$arrHide[$arrLP[$i]['id']];
}
}
}
else{
if($arrLP[$i]['item_type'] == 'dokeos_module' || $arrLP[$i]['item_type'] == 'dokeos_chapter' || $arrLP[$i]['item_type'] == 'dir'){
$arrHide[$arrLP[$i]['id']]['value']=html_entity_decode(stripslashes($arrLP[$i]['title']));
$arrHide[$arrLP[$i]['id']]['padding']=3+ $arrLP[$i]['depth'] * 10;
if($parent == $arrLP[$i]['id']){
$s_selected_parent=$arrHide[$arrLP[$i]['id']];
}
}
}
}
$parent_select = &$form->addElement('select', 'parent', get_lang("Parent")." :", '', 'style="background:#F8F8F8; border:1px solid #999999; font-family:Arial, Verdana, Helvetica, sans-serif; font-size:12px; width:300px;" onchange="load_cbo(this.value);"');
foreach($arrHide as $key => $value){
$parent_select->addOption($value['value'],$key,'style="padding-left:'.$value['padding'].'px;"');
}
$parent_select -> setSelected($s_selected_parent);
}
reset($arrLP);
$arrHide=array();
//POSITION
for($i = 0; $i < count($arrLP); $i++)
{
if($arrLP[$i]['parent_item_id'] == $parent && $arrLP[$i]['id'] != $id)
{
if($extra_info['previous_item_id'] == $arrLP[$i]['id'])
$s_selected_position=$arrLP[$i]['id'];
elseif($action == 'add')
$s_selected_position=$arrLP[$i]['id'];
$arrHide[$arrLP[$i]['id']]['value']=get_lang("After").' "' . html_entity_decode(stripslashes($arrLP[$i]['title']));
}
}
$position = &$form->addElement('select', 'previous', get_lang("Position")." :", '', 'id="idPosition" style="background:#F8F8F8; border:1px solid #999999; font-family:Arial, Verdana, Helvetica, sans-serif; font-size:12px; width:300px;"');
$position->addOption(get_lang('FirstPosition'),$key,'style="padding-left:'.$value['padding'].'px;"');
foreach($arrHide as $key => $value){
$position->addOption($value['value'],$key,'style="padding-left:'.$value['padding'].'px;"');
}
if(empty($s_selected_position))
$position -> setSelected($s_selected_position);
reset($arrLP);
if($action != 'move'){
$form->addElement('text','title', get_lang('Title').' :','id="idTitle" style="background:#F8F8F8; border:1px solid #999999; font-family:Arial, Verdana, Helvetica, sans-serif; font-size:12px; padding:1px 2px; width:300px;"');
//$form->addElement('textarea','description',get_lang("Description").' :', 'id="idDescription" style="background:#F8F8F8; border:1px solid #999999; font-family:Arial, Verdana, Helvetica, sans-serif; font-size:12px; padding:1px 2px; width:300px;"');
}
else
{
$form->addElement('hidden','title');
}
$form->addElement('submit', 'submit_button', get_lang('Ok'), 'style="background:#F8F8F8; border:1px solid #999999; font-family:Arial, Verdana, Helvetica, sans-serif; font-size:12px; padding:1px 2px; width:75px;"');
if($item_type == 'module' || $item_type == 'dokeos_module')
{
$form->addElement('hidden', 'parent', '0');
}
$form->addElement('hidden', 'type', 'dokeos_'.$item_type);
$form->addElement('hidden', 'post_time', time());
$form->addElement('html','
';
if($id != 0 && is_array($extra_info))
$parent = $extra_info['parent_item_id'];
else
$parent = 0;
$sql = "
SELECT *
FROM " . $tbl_lp_item . "
WHERE
lp_id = " . $this->lp_id;
$result = api_sql_query($sql, __FILE__, __LINE__);
$arrLP = array();
while($row = Database::fetch_array($result))
{
$arrLP[] = array(
'id' => $row['id'],
'item_type' => $row['item_type'],
'title' => $row['title'],
'path' => $row['path'],
'description' => $row['description'],
'parent_item_id' => $row['parent_item_id'],
'previous_item_id' => $row['previous_item_id'],
'next_item_id' => $row['next_item_id'],
'display_order' => $row['display_order'],
'prerequisite' => $row['prerequisite']);
}
$this->tree_array($arrLP);
$arrLP = $this->arrMenu;
unset($this->arrMenu);
if($action == 'add')
$return .= '
'.get_lang("CreateTheDocument").' :
' . "\n";
elseif($action == 'move')
$return .= '
'.get_lang("MoveTheCurrentDocument").' :
' . "\n";
else
$return .= '
'.get_lang("EditTheCurrentDocument").' :
' . "\n";
if(isset($_GET['edit']) && $_GET['edit'] == 'true')
{
$return .= '
';
$return .= '
'.get_lang("Warning").' !
';
$return .= get_lang("WarningEditingDocument");
$return .= '
';
}
/*
if($no_display_add==true){
$return .= '
';
$return .= get_lang("CantEditDocument");
$return .= '
';
return $return;
}
*/
require_once (api_get_path(LIBRARY_PATH).'formvalidator/FormValidator.class.php');
$form = new FormValidator('form','POST',api_get_self()."?".$_SERVER["QUERY_STRING"]);
$defaults["title"]=html_entity_decode($item_title);
$defaults["description"]=html_entity_decode($item_description);
$form->addElement('html',$return);
//$arrHide = array($id);
$arrHide[0]['value']=$this->name;
$arrHide[0]['padding']=3;
for($i = 0; $i < count($arrLP); $i++)
{
if($action != 'add'){
if(($arrLP[$i]['item_type'] == 'dokeos_module' || $arrLP[$i]['item_type'] == 'dokeos_chapter' || $arrLP[$i]['item_type'] == 'dir') && !in_array($arrLP[$i]['id'], $arrHide) && !in_array($arrLP[$i]['parent_item_id'], $arrHide)){
$arrHide[$arrLP[$i]['id']]['value']=html_entity_decode(stripslashes($arrLP[$i]['title']));
$arrHide[$arrLP[$i]['id']]['padding']=3+ $arrLP[$i]['depth'] * 10;
if($parent == $arrLP[$i]['id']){
$s_selected_parent=$arrHide[$arrLP[$i]['id']];
}
}
}
else{
if($arrLP[$i]['item_type'] == 'dokeos_module' || $arrLP[$i]['item_type'] == 'dokeos_chapter' || $arrLP[$i]['item_type'] == 'dir'){
$arrHide[$arrLP[$i]['id']]['value']=html_entity_decode(stripslashes($arrLP[$i]['title']));
$arrHide[$arrLP[$i]['id']]['padding']=3+ $arrLP[$i]['depth'] * 10;
if($parent == $arrLP[$i]['id']){
$s_selected_parent=$arrHide[$arrLP[$i]['id']];
}
}
}
}
$parent_select = &$form->addElement('select', 'parent', get_lang("Parent")." :", '', 'style="background:#F8F8F8; border:1px solid #999999; font-family:Arial, Verdana, Helvetica, sans-serif; font-size:12px; width:300px;" onchange="load_cbo(this.value);"');
foreach($arrHide as $key => $value){
$parent_select->addOption($value['value'],$key,'style="padding-left:'.$value['padding'].'px;"');
}
$parent_select -> setSelected($parent);
reset($arrLP);
$arrHide=array();
//POSITION
for($i = 0; $i < count($arrLP); $i++)
{
if($arrLP[$i]['parent_item_id'] == $parent && $arrLP[$i]['id'] != $id)
{
if($extra_info['previous_item_id'] == $arrLP[$i]['id'])
$s_selected_position=$arrLP[$i]['id'];
elseif($action == 'add')
$s_selected_position=$arrLP[$i]['id'];
$arrHide[$arrLP[$i]['id']]['value']=get_lang("After").' "' . html_entity_decode(stripslashes($arrLP[$i]['title'])).'"';
}
}
$position = &$form->addElement('select', 'previous', get_lang("Position")." :", '', 'id="idPosition" style="background:#F8F8F8; border:1px solid #999999; font-family:Arial, Verdana, Helvetica, sans-serif; font-size:12px; width:300px;"');
$position->addOption(get_lang("FirstPosition"),0,'style="padding-left:3px;"');
foreach($arrHide as $key => $value){
$position->addOption($value['value'],$key,'style="padding-left:'.$value['padding'].'px;"');
}
$position -> setSelected($s_selected_position);
reset($arrLP);
if($action != 'move'){
$form->addElement('text','title', get_lang('Title').' :','id="idTitle" style="background:#F8F8F8; border:1px solid #999999; font-family:Arial, Verdana, Helvetica, sans-serif; font-size:12px; padding:1px 2px; width:300px;"');
//$form->addElement('textarea','description',get_lang("Description").' :', 'id="idDescription" style="background:#F8F8F8; border:1px solid #999999; font-family:Arial, Verdana, Helvetica, sans-serif; font-size:12px; padding:1px 2px; width:300px;"');
$id_prerequisite=0;
foreach($arrLP as $key=>$value){
if($value['id']==$id){
$id_prerequisite=$value['prerequisite'];
break;
}
}
$select_prerequisites=$form->addElement('select', 'prerequisites', get_lang('Prerequisites'), '', 'id="prerequisites" style="background:#F8F8F8; border:1px solid #999999; font-family:Arial, Verdana, Helvetica, sans-serif; font-size:12px; width:300px;"');
$select_prerequisites->addOption(get_lang("NoPrerequisites"),0,'style="padding-left:3px;"');
$arrHide=array();
for($i = 0; $i < count($arrLP); $i++)
{
if($arrLP[$i]['id'] != $id && $arrLP[$i]['item_type'] != 'dokeos_chapter')
{
if($extra_info['previous_item_id'] == $arrLP[$i]['id'])
$s_selected_position=$arrLP[$i]['id'];
elseif($action == 'add')
$s_selected_position=$arrLP[$i]['id'];
$arrHide[$arrLP[$i]['id']]['value']=html_entity_decode(stripslashes($arrLP[$i]['title']));
}
}
foreach($arrHide as $key => $value){
$select_prerequisites->addOption($value['value'],$key,'style="padding-left:'.$value['padding'].'px;"');
if($key==$s_selected_position && $action == 'add'){
$select_prerequisites -> setSelected(0);
}
elseif($key==$id_prerequisite && $action == 'edit'){
$select_prerequisites -> setSelected($id_prerequisite);
}
}
if(!$no_display_add)
{
if(($extra_info == 'new' || $extra_info['item_type'] == TOOL_DOCUMENT || $_GET['edit'] == 'true'))
{
if(isset($_POST['content']))
$content = stripslashes($_POST['content']);
elseif(is_array($extra_info)){
//If it's an html document or a text file
if(!$no_display_edit_textarea){
$content = $this->display_document($extra_info['path'], false, false);
}
}
elseif(is_numeric($extra_info))
$content = $this->display_document($extra_info, false, false);
else
$content = '';
$form->addElement('submit', 'submit_button', get_lang('Ok'), 'style="background:#F8F8F8; border:1px solid #999999; font-family:Arial, Verdana, Helvetica, sans-serif; font-size:12px; padding:1px 2px; width:75px;"');
if(!$no_display_edit_textarea){
$form->addElement('html_editor','content_lp',get_lang("Content")." :");
$defaults["content_lp"]=$content;
}
}
elseif(is_numeric($extra_info))
{
$form->addElement('submit', 'submit_button', get_lang('Ok'), 'style="background:#F8F8F8; border:1px solid #999999; font-family:Arial, Verdana, Helvetica, sans-serif; font-size:12px; padding:1px 2px; width:75px;"');
$return = $this->display_document($extra_info, true, true, true);
$form->addElement('html',$return);
}
}
}
if($action == 'move')
{
$form->addElement('hidden', 'title', $item_title);
$form->addElement('hidden', 'description', $item_description);
}
if(is_numeric($extra_info))
{
$form->addElement('hidden', 'path', $extra_info);
}
elseif(is_array($extra_info))
{
$form->addElement('hidden', 'path', $extra_info['path']);
}
$form->addElement('hidden', 'type', TOOL_DOCUMENT);
$form->addElement('hidden', 'post_time', time());
$form->addElement('html','
';
if($id != 0 && is_array($extra_info))
$parent = $extra_info['parent_item_id'];
else
$parent = 0;
$sql = "
SELECT *
FROM " . $tbl_lp_item . "
WHERE
lp_id = " . $this->lp_id;
$result = api_sql_query($sql, __FILE__, __LINE__);
$arrLP = array();
while($row = Database::fetch_array($result))
{
$arrLP[] = array(
'id' => $row['id'],
'item_type' => $row['item_type'],
'title' => $row['title'],
'path' => $row['path'],
'description' => $row['description'],
'parent_item_id' => $row['parent_item_id'],
'previous_item_id' => $row['previous_item_id'],
'next_item_id' => $row['next_item_id'],
'display_order' => $row['display_order'],
'prerequisite' => $row['prerequisite']);
}
$this->tree_array($arrLP);
$arrLP = $this->arrMenu;
unset($this->arrMenu);
if($action == 'add')
$return .= '
'.get_lang("CreateTheLink").' :
' . "\n";
elseif($action == 'move')
$return .= '
'.get_lang("MoveCurrentLink").' :
' . "\n";
else
$return .= '
'.get_lang("EditCurrentLink").' :
' . "\n";
$return .= '
' . "\n";
$return .= '
';
if($id != 0 && is_array($extra_info))
$parent = $extra_info['parent_item_id'];
else
$parent = 0;
$sql = "
SELECT *
FROM " . $tbl_lp_item . "
WHERE
lp_id = " . $this->lp_id;
$result = api_sql_query($sql, __FILE__, __LINE__);
$arrLP = array();
while($row = Database::fetch_array($result))
{
$arrLP[] = array(
'id' => $row['id'],
'item_type' => $row['item_type'],
'title' => $row['title'],
'path' => $row['path'],
'description' => $row['description'],
'parent_item_id' => $row['parent_item_id'],
'previous_item_id' => $row['previous_item_id'],
'next_item_id' => $row['next_item_id'],
'display_order' => $row['display_order'],
'prerequisite' => $row['prerequisite']);
}
$this->tree_array($arrLP);
$arrLP = $this->arrMenu;
unset($this->arrMenu);
if($action == 'add')
$return .= '
'.get_lang("Student_publication").' :
' . "\n";
elseif($action == 'move')
$return .= '
'.get_lang("MoveCurrentStudentPublication").' :
' . "\n";
else
$return .= '
'.get_lang("EditCurrentStudentPublication").' :
' . "\n";
$return .= '
' . "\n";
$return .= '
';
$return .= '
'.get_lang("AddEditPrerequisites").'
';
$return .= '
';
$return .= '
';
$resources=api_store_result($res_doc);
$resources_sorted = array();
// if you want to debug it, I advise you to do "echo" on the eval statements
foreach($resources as $resource)
{
$resource_paths = explode('/',$resource['path']);
array_shift($resource_paths);
$path_to_eval = $last_path = '';
$is_file = false;
foreach($resource_paths as $key => $resource_path)
{
if(strpos($resource_path,'.')===false && $key != count($resource_paths)-1)
{ // it's a folder
$path_to_eval .= '["'.$resource_path.'"]["files"]';
}
else if(strpos($resource_path,'.')!==false)
$is_file = true;
$last_path = $resource_path;
}
if($is_file)
{
eval('$resources_sorted'.$path_to_eval.'['.$resource['id'].'] = "'.$last_path.'";');
}
else
{
eval('$resources_sorted'.$path_to_eval.'["'.$last_path.'"]["id"]='.$resource['id'].';');
}
}
$return .=$this->write_resources_tree('', $resources_sorted);
$return .='
';
if(Database::num_rows($res_doc) == 0)
$return .= ''.get_lang("NoDocuments").'
';
return $return;
}
function write_resources_tree($return, $resources_sorted, $num=0){
include_once(api_get_path(LIBRARY_PATH).'fileDisplay.lib.php');
foreach($resources_sorted as $key=>$resource)
{
if(is_int($resource['id']))
{ // it's a folder
$return .= '
'.$key.'';
$return = $this->write_resources_tree($return, $resource['files'], $num+1);
$return .= "
';
while ($row_hot = mysql_fetch_array($res_hot))
{
$return .= '
';
//display quizhotpotatoes
$return .= '
';
$return .= '
' . $row_hot['title'] . '';
//$return .= $row_quiz['title'];
$return .= '
';
}
while($row_quiz = Database::fetch_array($res_quiz))
{
$return .= '
';
}
if(Database::num_rows($res_quiz) == 0)
$return .= '
'.get_lang("NoExercisesAvailable").'
';
$return .= '
';
$return .= '
';
while($row_link = Database::fetch_array($res_link))
{
$return .= '
';
}
$return .= '
';
if(Database::num_rows($res_link) == 0)
$return .= '
'.get_lang("NoLinksAvailable").'
';
$return .= '
';
$return .= '
';
$return .= '
';
foreach($a_forums as $forum)
{
$return .= '
';
}
$return .= '
';
return $return;
}
/**
* Exports the learning path as a SCORM package. This is the main function that
* gathers the content, transforms it, writes the imsmanifest.xml file, zips the
* whole thing and returns the zip.
*
* This method needs to be called in PHP5, as it will fail with non-adequate
* XML package (like the ones for PHP4), and it is *not* a static method, so
* you need to call it on a learnpath object.
* @TODO The method might be redefined later on in the scorm class itself to avoid
* creating a SCORM structure if there is one already. However, if the initial SCORM
* path has been modified, it should use the generic method here below.
* @TODO link this function with the export_lp() function in the same class
* @param string Optional name of zip file. If none, title of learnpath is
* domesticated and trailed with ".zip"
* @return string Returns the zip package string, or null if error
*/
function scorm_export()
{
global $_course;
if (!class_exists('DomDocument'))
{
error_log('DOM functions not supported for PHP version below 5.0',0);
$this->error = 'PHP DOM functions not supported for PHP versions below 5.0';
return null;
}
//Create the zip handler (this will remain available throughout the method)
$temp_dir_short = uniqid();
$temp_zip_dir = api_get_path(GARBAGE_PATH)."/".$temp_dir_short;
$temp_zip_file = $temp_zip_dir."/".md5(time()).".zip";
$zip_folder=new PclZip($temp_zip_file);
$current_course_path = api_get_path(SYS_COURSE_PATH).api_get_course_path();
$root_path = $main_path = api_get_path(SYS_PATH);
//place to temporarily stash the zipfiles
//create the temp dir if it doesn't exist
//or do a cleanup befor creating the zipfile
if(!is_dir($temp_zip_dir))
{
mkdir($temp_zip_dir);
}
else
{//cleanup: check the temp dir for old files and delete them
$handle=opendir($temp_zip_dir);
while (false!==($file = readdir($handle)))
{
if ($file != "." && $file != "..")
{
unlink("$temp_zip_dir/$file");
}
}
closedir($handle);
}
$zip_files = $zip_files_abs = $zip_files_dist = array();
if(is_dir($current_course_path.'/scorm/'.$this->path) && is_file($current_course_path.'/scorm/'.$this->path.'/imsmanifest.xml'))
{
// remove the possible . at the end of the path
$dest_path_to_lp = substr($this->path, -1) == '.' ? substr($this->path, 0, -1) : $this->path;
$dest_path_to_scorm_folder = str_replace('//','/',$temp_zip_dir.'/scorm/'.$dest_path_to_lp);
$perm = api_get_setting('permissions_for_new_directories');
$perm = octdec(!empty($perm)?$perm:'0770');
mkdir ($dest_path_to_scorm_folder, $perm, true);
$zip_files_dist = copyr($current_course_path.'/scorm/'.$this->path, $dest_path_to_scorm_folder, array('imsmanifest'), $zip_files);
}
//Build a dummy imsmanifest structure. Do not add to the zip yet (we still need it)
//This structure is developed following regulations for SCORM 1.2 packaging in the SCORM 1.2 Content
//Aggregation Model official document, secion "2.3 Content Packaging"
$xmldoc = new DOMDocument('1.0',$this->encoding);
$root = $xmldoc->createElement('manifest');
$root->setAttribute('identifier','SingleCourseManifest');
$root->setAttribute('version','1.1');
$root->setAttribute('xmlns','http://www.imsproject.org/xsd/imscp_rootv1p1p2');
$root->setAttribute('xmlns:adlcp','http://www.adlnet.org/xsd/adlcp_rootv1p2');
$root->setAttribute('xmlns:xsi','http://www.w3.org/2001/XMLSchema-instance');
$root->setAttribute('xsi:schemaLocation','http://www.omsproject.org/xsd/imscp_rootv1p1p2 imscp_rootv1p1p2.xsd
http://www.imsglobal.org/xsd/imsmd_rootv1p2p1 imsmd_rootv1p2p1.xsd
http://www.adlnet.org/xsd/adlcp_rootv1p2 adlcp_rootv1p2.xsd');
//Build mandatory sub-root container elements
$metadata = $xmldoc->createElement('metadata');
$md_schema = $xmldoc->createElement('schema','ADL SCORM');
$metadata->appendChild($md_schema);
$md_schemaversion = $xmldoc->createElement('schemaversion','1.2');
$metadata->appendChild($md_schemaversion);
$root->appendChild($metadata);
$organizations = $xmldoc->createElement('organizations');
$resources = $xmldoc->createElement('resources');
//Build the only organization we will use in building our learnpaths
$organizations->setAttribute('default','dokeos_scorm_export');
$organization = $xmldoc->createElement('organization');
$organization->setAttribute('identifier','dokeos_scorm_export');
$org_title = $xmldoc->createElement('title',htmlspecialchars($this->get_name(),ENT_QUOTES)); //filter data for XML?
$organization->appendChild($org_title);
//For each element, add it to the imsmanifest structure, then add it to the zip.
//Always call the learnpathItem->scorm_export() method to change it to the SCORM
//format
$link_updates = array();
foreach($this->items as $index => $item){
if(!in_array($item->type , array(TOOL_QUIZ, TOOL_FORUM, TOOL_THREAD, TOOL_LINK, TOOL_STUDENTPUBLICATION)))
{
//get included documents from this item
if($item->type=='sco')
$inc_docs = $item->get_resources_from_source(null,api_get_path(SYS_COURSE_PATH).api_get_course_path().'/'.'scorm/'.$this->path.'/'.$item->get_path());
else
$inc_docs = $item->get_resources_from_source();
//error_log('Dealing with document '.$item->get_file_path().', found included documents: '.print_r($inc_docs,true),0);
//give a child element
- to the element
$my_item = $xmldoc->createElement('item');
$my_item->setAttribute('identifier','ITEM_'.$item->get_id());
$my_item->setAttribute('identifierref','RESOURCE_'.$item->get_id());
$my_item->setAttribute('isvisible','true');
//give a child element to the <item> element
$my_title = $xmldoc->createElement('title',htmlspecialchars($item->get_title(),ENT_QUOTES));
$my_item->appendChild($my_title);
//give a child element <adlcp:prerequisite> to the <item> element
$my_prereqs = $xmldoc->createElement('adlcp:prerequisite',$item->get_prereq_string());
$my_prereqs->setAttribute('type','aicc_script');
$my_item->appendChild($my_prereqs);
//give a child element <adlcp:maxtimeallowed> to the <item> element - not yet supported
//$xmldoc->createElement('adlcp:maxtimeallowed','');
//give a child element <adlcp:timelimitaction> to the <item> element - not yet supported
//$xmldoc->createElement('adlcp:timelimitaction','');
//give a child element <adlcp:datafromlms> to the <item> element - not yet supported
//$xmldoc->createElement('adlcp:datafromlms','');
//give a child element <adlcp:masteryscore> to the <item> element
$my_masteryscore = $xmldoc->createElement('adlcp:masteryscore',$item->masteryscore);
$my_item->appendChild($my_masteryscore);
//attach this item to the organization element or hits parent if there is one
if(!empty($item->parent) && $item->parent!=0)
{
$children = $organization->childNodes;
for($i=0;$i<$children->length;$i++){
$item_temp = $children->item($i);
if ($item_temp -> nodeName == 'item')
{
if($item_temp->getAttribute('identifier') == 'ITEM_'.$item->parent)
{
$item_temp -> appendChild($my_item);
}
}
}
}
else
{
$organization->appendChild($my_item);
}
//get the path of the file(s) from the course directory root
$my_file_path = $item->get_file_path('scorm/'.$this->path.'/');
$my_xml_file_path = htmlentities($my_file_path);
$my_sub_dir = dirname($my_file_path);
$my_xml_sub_dir = htmlentities($my_sub_dir);
//give a <resource> child to the <resources> element
$my_resource = $xmldoc->createElement('resource');
$my_resource->setAttribute('identifier','RESOURCE_'.$item->get_id());
$my_resource->setAttribute('type','webcontent');
$my_resource->setAttribute('href',$my_xml_file_path);
//adlcp:scormtype can be either 'sco' or 'asset'
$my_resource->setAttribute('adlcp:scormtype','asset');
//xml:base is the base directory to find the files declared in this resource
$my_resource->setAttribute('xml:base','');
//give a <file> child to the <resource> element
$my_file = $xmldoc->createElement('file');
$my_file->setAttribute('href',$my_xml_file_path);
$my_resource->appendChild($my_file);
//dependency to other files - not yet supported
$i = 1;
foreach($inc_docs as $doc_info)
{
if(count($doc_info)<1 or empty($doc_info[0])){continue;}
$my_dep = $xmldoc->createElement('resource');
$res_id = 'RESOURCE_'.$item->get_id().'_'.$i;
$my_dep->setAttribute('identifier',$res_id);
$my_dep->setAttribute('type','webcontent');
$my_dep->setAttribute('adlcp:scormtype','asset');
$my_dep_file = $xmldoc->createElement('file');
//check type of URL
//error_log('Now dealing with '.$doc_info[0].' of type '.$doc_info[1].'-'.$doc_info[2],0);
if($doc_info[1] == 'remote')
{ //remote file. Save url as is
$my_dep_file->setAttribute('href',$doc_info[0]);
$my_dep->setAttribute('xml:base','');
}elseif($doc_info[1] == 'local'){
switch($doc_info[2])
{
case 'url': //local URL - save path as url for now, don't zip file
$my_dep_file->setAttribute('href',$doc_info[0]);
$my_dep->setAttribute('xml:base','');
break;
case 'abs': //absolute path from DocumentRoot. Save file and leave path as is in the zip
$my_dep_file->setAttribute('href',$doc_info[0]);
$my_dep->setAttribute('xml:base','');
$current_dir = dirname($current_course_path.'/'.$item->get_file_path()).'/';
$file_path = realpath($doc_info[0]);
if(strstr($file_path,$main_path) !== false)
{//the calculated real path is really inside the dokeos root path
//reduce file path to what's under the DocumentRoot
$file_path = substr($file_path,strlen($root_path));
//echo $file_path;echo '<br><br>';
//error_log('Reduced path: '.$file_path,0);
$zip_files_abs[] = $file_path;
$link_updates[$my_file_path][] = array('orig'=>$doc_info[0],'dest'=>$file_path);
$my_dep_file->setAttribute('href','document/'.$file_path);
$my_dep->setAttribute('xml:base','');
}
else if (empty($file_path))
{
/*$document_root = substr(api_get_path(SYS_PATH), 0, strpos(api_get_path(SYS_PATH),api_get_path(REL_PATH)));
if(strpos($document_root,-1)=='/')
{
$document_root = substr(0, -1, $document_root);
}*/
$file_path = $_SERVER['DOCUMENT_ROOT'].$doc_info[0];
$file_path = str_replace('//','/',$file_path);
if(file_exists($file_path))
{
$file_path = substr($file_path,strlen($current_dir)); // we get the relative path
$zip_files[] = $my_sub_dir.'/'.$file_path;
$link_updates[$my_file_path][] = array('orig'=>$doc_info[0],'dest'=>$file_path);
$my_dep_file->setAttribute('href','document/'.$file_path);
$my_dep->setAttribute('xml:base','');
}
}
break;
case 'rel': //path relative to the current document. Save xml:base as current document's directory and save file in zip as subdir.file_path
if(substr($doc_info[0],0,2)=='..')
{ //relative path going up
$current_dir = dirname($current_course_path.'/'.$item->get_file_path()).'/';
$file_path = realpath($current_dir.$doc_info[0]);
//error_log($file_path.' <-> '.$main_path,0);
if(strstr($file_path,$main_path) !== false)
{//the calculated real path is really inside the dokeos root path
//reduce file path to what's under the DocumentRoot
$file_path = substr($file_path,strlen($root_path));
//error_log('Reduced path: '.$file_path,0);
$zip_files_abs[] = $file_path;
$link_updates[$my_file_path][] = array('orig'=>$doc_info[0],'dest'=>$file_path);
$my_dep_file->setAttribute('href','document/'.$file_path);
$my_dep->setAttribute('xml:base','');
}
}else{
$zip_files[] = $my_sub_dir.'/'.$doc_info[0];
$my_dep_file->setAttribute('href',$doc_info[0]);
$my_dep->setAttribute('xml:base',$my_xml_sub_dir);
}
break;
default:
$my_dep_file->setAttribute('href',$doc_info[0]);
$my_dep->setAttribute('xml:base','');
break;
}
}
$my_dep->appendChild($my_dep_file);
$resources->appendChild($my_dep);
$dependency = $xmldoc->createElement('dependency');
$dependency->setAttribute('identifierref',$res_id);
$my_resource->appendChild($dependency);
$i++;
}
//$my_dependency = $xmldoc->createElement('dependency');
//$my_dependency->setAttribute('identifierref','');
$resources->appendChild($my_resource);
$zip_files[] = $my_file_path;
//error_log('File '.$my_file_path. ' added to $zip_files',0);
}
else
{ // if the item is a quiz or a link or whatever non-exportable, we include a step indicating it
$my_item = $xmldoc->createElement('item');
$my_item->setAttribute('identifier','ITEM_'.$item->get_id());
$my_item->setAttribute('identifierref','RESOURCE_'.$item->get_id());
$my_item->setAttribute('isvisible','true');
//give a child element <title> to the <item> element
$my_title = $xmldoc->createElement('title',htmlspecialchars($item->get_title(),ENT_QUOTES));
$my_item->appendChild($my_title);
//give a child element <adlcp:prerequisite> to the <item> element
$my_prereqs = $xmldoc->createElement('adlcp:prerequisite',$item->get_prereq_string());
$my_prereqs->setAttribute('type','aicc_script');
$my_item->appendChild($my_prereqs);
//give a child element <adlcp:maxtimeallowed> to the <item> element - not yet supported
//$xmldoc->createElement('adlcp:maxtimeallowed','');
//give a child element <adlcp:timelimitaction> to the <item> element - not yet supported
//$xmldoc->createElement('adlcp:timelimitaction','');
//give a child element <adlcp:datafromlms> to the <item> element - not yet supported
//$xmldoc->createElement('adlcp:datafromlms','');
//give a child element <adlcp:masteryscore> to the <item> element
$my_masteryscore = $xmldoc->createElement('adlcp:masteryscore',$item->masteryscore);
$my_item->appendChild($my_masteryscore);
//attach this item to the organization element or hits parent if there is one
if(!empty($item->parent) && $item->parent!=0)
{
$children = $organization->childNodes;
for($i=0;$i<$children->length;$i++){
$item_temp = $children->item($i);
if ($item_temp -> nodeName == 'item')
{
if($item_temp->getAttribute('identifier') == 'ITEM_'.$item->parent)
{
$item_temp -> appendChild($my_item);
}
}
}
}
else
{
$organization->appendChild($my_item);
}
if($item->type == TOOL_LINK)
{
$my_file_path = 'link_'.$item->get_id().'.html';
$sql = 'SELECT url, title FROM '.Database :: get_course_table(TABLE_LINK).' WHERE id='.$item->path;
$rs = api_sql_query($sql, __FILE__, __LINE__);
if($link = Database :: fetch_array($rs))
{
$url = $link['url'];
$title = stripslashes($link['title']);
$links_to_create[$my_file_path] = array('title'=>$title,'url'=>$url);
$my_xml_file_path = htmlentities($my_file_path);
$my_sub_dir = dirname($my_file_path);
$my_xml_sub_dir = htmlentities($my_sub_dir);
//give a <resource> child to the <resources> element
$my_resource = $xmldoc->createElement('resource');
$my_resource->setAttribute('identifier','RESOURCE_'.$item->get_id());
$my_resource->setAttribute('type','webcontent');
$my_resource->setAttribute('href',$my_xml_file_path);
//adlcp:scormtype can be either 'sco' or 'asset'
$my_resource->setAttribute('adlcp:scormtype','asset');
//xml:base is the base directory to find the files declared in this resource
$my_resource->setAttribute('xml:base','');
//give a <file> child to the <resource> element
$my_file = $xmldoc->createElement('file');
$my_file->setAttribute('href',$my_xml_file_path);
$my_resource->appendChild($my_file);
$resources->appendChild($my_resource);
}
}
else
{
//get the path of the file(s) from the course directory root
$my_file_path = 'non_exportable.html';
$my_xml_file_path = htmlentities($my_file_path);
$my_sub_dir = dirname($my_file_path);
$my_xml_sub_dir = htmlentities($my_sub_dir);
//give a <resource> child to the <resources> element
$my_resource = $xmldoc->createElement('resource');
$my_resource->setAttribute('identifier','RESOURCE_'.$item->get_id());
$my_resource->setAttribute('type','webcontent');
$my_resource->setAttribute('href','document/'.$my_xml_file_path);
//adlcp:scormtype can be either 'sco' or 'asset'
$my_resource->setAttribute('adlcp:scormtype','asset');
//xml:base is the base directory to find the files declared in this resource
$my_resource->setAttribute('xml:base','');
//give a <file> child to the <resource> element
$my_file = $xmldoc->createElement('file');
$my_file->setAttribute('href','document/'.$my_xml_file_path);
$my_resource->appendChild($my_file);
$resources->appendChild($my_resource);
}
}
}
$organizations->appendChild($organization);
$root->appendChild($organizations);
$root->appendChild($resources);
$xmldoc->appendChild($root);
//error_log(print_r($zip_files,true),0);
$garbage_path = api_get_path(GARBAGE_PATH);
$sys_course_path = api_get_path(SYS_COURSE_PATH);
foreach($zip_files as $file_path)
{
if(empty($file_path)){continue;}
//error_log('getting document from '.api_get_path('SYS_COURSE_PATH').$_course['path'].'/'.$file_path.' removing '.api_get_path('SYS_COURSE_PATH').$_course['path'].'/',0);
$dest_file = $garbage_path.$temp_dir_short.'/'.$file_path;
$this->create_path($dest_file);
//error_log('copy '.api_get_path('SYS_COURSE_PATH').$_course['path'].'/'.$file_path.' to '.api_get_path('GARBAGE_PATH').$temp_dir_short.'/'.$file_path,0);
//echo $main_path.$file_path.'<br>';
copy($sys_course_path.$_course['path'].'/'.$file_path,$dest_file);
//check if the file needs a link update
if(in_array($file_path,array_keys($link_updates))){
$string = file_get_contents($dest_file);
unlink($dest_file);
foreach($link_updates[$file_path] as $old_new)
{
//error_log('Replacing '.$old_new['orig'].' by '.$old_new['dest'].' in '.$file_path,0);
$string = str_replace($old_new['orig'],$old_new['dest'],$string);
}
file_put_contents($dest_file,$string);
}
}
foreach($zip_files_abs as $file_path)
{
if(empty($file_path)){continue;}
//error_log('getting document from '.api_get_path('SYS_COURSE_PATH').$_course['path'].'/'.$file_path.' removing '.api_get_path('SYS_COURSE_PATH').$_course['path'].'/',0);
$dest_file = $garbage_path.$temp_dir_short.'/document/'.$file_path;
$this->create_path($dest_file);
//error_log('Created path '.api_get_path('GARBAGE_PATH').$temp_dir_short.'/document/'.$file_path,0);
//error_log('copy '.api_get_path('SYS_COURSE_PATH').$_course['path'].'/'.$file_path.' to '.api_get_path('GARBAGE_PATH').$temp_dir_short.'/'.$file_path,0);
//echo $main_path.$file_path.' - '.$dest_file.'<br>';
copy($main_path.$file_path,$dest_file);
//check if the file needs a link update
if(in_array($file_path,array_keys($link_updates))){
$string = file_get_contents($dest_file);
unlink($dest_file);
foreach($link_updates[$file_path] as $old_new)
{
//error_log('Replacing '.$old_new['orig'].' by '.$old_new['dest'].' in '.$file_path,0);
$string = str_replace($old_new['orig'],$old_new['dest'],$string);
}
file_put_contents($dest_file,$string);
}
}
if(is_array($links_to_create))
{
foreach($links_to_create as $file=>$link)
{
$file_content = '<html><body><div style="text-align:center"><a href="'.$link['url'].'">'.$link['title'].'</a></div></body></html>';
file_put_contents($garbage_path.$temp_dir_short.'/'.$file, $file_content);
}
}
// add non exportable message explanation
$lang_not_exportable = get_lang('ThisItemIsNotExportable');
$file_content =
<<<EOD
<html>
<head>
<style>
.error-message {
font-family: arial, verdana, helvetica, sans-serif;
border-width: 1px;
border-style: solid;
left: 50%;
margin: 10px auto;
min-height: 30px;
padding: 5px;
right: 50%;
width: 500px;
background-color: #FFD1D1;
border-color: #FF0000;
color: #000;
}
</style>
<body>
<div class="error-message">
$lang_not_exportable
</div>
</body>
</html>
EOD;
file_put_contents($garbage_path.$temp_dir_short.'/document/non_exportable.html', $file_content);
//Finalize the imsmanifest structure, add to the zip, then return the zip
$xmldoc->save($garbage_path.'/'.$temp_dir_short.'/imsmanifest.xml');
$zip_folder->add($garbage_path.'/'.$temp_dir_short, PCLZIP_OPT_REMOVE_PATH, $garbage_path);
//Send file to client
$name = 'scorm_export_'.$this->lp_id.'.zip';
DocumentManager::file_send_for_download($temp_zip_file,true,$name);
}
/**
* Temp function to be moved in main_api or the best place around for this. Creates a file path
* if it doesn't exist
*/
function create_path($path){
$path_bits = split('/',dirname($path));
$path_built = '/';
foreach($path_bits as $bit){
if(!empty($bit)){
$new_path = $path_built.$bit;
if(is_dir($new_path)){
$path_built = $new_path.'/';
}
else
{
mkdir($new_path);
$path_built = $new_path.'/';
}
}
}
}
}
?>
'."\n" .
' 
'."\n" .
' 
'."\n" .
' 
'."\n" .
//' 
'."\n" .
' 
'."\n" .
' 
'
.'
'
.'
';
if($percentage <= 98){
$output .= '
';
}else{
$output .= '
'.stripslashes($title).'' ;
}
elseif($item['type']=='dokeos_module' || $item['type']=='dokeos_chapter'){
$html .= "
".stripslashes($title);
}
elseif($item['type']=='dir'){
$html .= stripslashes($title);
}
$html .= "
'.get_lang("Move").'';
$return .= '
'.get_lang('Prerequisites').'';
$return .= '
'.get_lang("Document").'
'.get_lang("Exercise").'
';
$return .= '' . $row_quiz['title'] . '';
//$return .= $row_quiz['title'];
$return .= '
';
$return .= '' . get_lang('NewExercise') . '';
$return .= '
'.get_lang("Links").'
';
$return .= '' . $row_link['title'] . '';
$return .= '
';
$return .= '' . get_lang('LinkAdd') . '';
$return .= '
'.get_lang('Assignments').'
';
$return .= '' . get_lang('AddAssignmentPage') . '';
$return .= '
'.get_lang('Forums').'
';
$return .= ''.get_lang('CreateANewForum').'';
$return .= '
'.$resource.".'add.gif)