\n";
switch ($error->level) {
case LIBXML_ERR_WARNING:
$return .= "Warning $error->code: ";
break;
case LIBXML_ERR_ERROR:
$return .= "Error $error->code: ";
break;
case LIBXML_ERR_FATAL:
$return .= "Fatal Error $error->code: ";
break;
}
$return .= trim($error->message);
if ($error->file) {
$return .= " in $error->file";
}
$return .= " on line $error->line\n";
return $return;
}
/**
* Validate all the XML in the package, including checking XSDs, missing data.
* @param string the path of the directory that contains all the package files
* @return boolean true if every file exists in the manifest, false if any is missing.
*/
function checkResources($import_path){
global $items, $msg, $skip_ims_validation, $avail_dt;
if (!is_dir($import_path)){
return;
}
//if the package has access for all content, skip validation for now.
//todo: import the XSD into our validator
if ($skip_ims_validation){
return true;
}
//generate a file tree
$data = rscandir($import_path);
//check if every file is presented in the manifest
foreach($data as $filepath){
$filepath = substr($filepath, strlen($import_path));
//validate xml via its xsd/dtds
if (preg_match('/(.*)\.xml/', $filepath)){
libxml_use_internal_errors(true);
$dom = new DOMDocument();
$dom->load(realpath($import_path.$filepath));
if (!@$dom->schemaValidate('main.xsd')){
$errors = libxml_get_errors();
foreach ($errors as $error) {
//suppress warnings
if ($error->level==LIBXML_ERR_WARNING){
continue;
}
$msg->addError(array('IMPORT_CARTRIDGE_FAILED', libxml_display_error($error)));
}
libxml_clear_errors();
}
//if this is the manifest file, we do not have to check for its existance.
// if (preg_match('/(.*)imsmanifest\.xml/', $filepath)){
// continue;
// }
}
}
//Create an array that mimics the structure of the data array, based on the xml items
$filearray = array();
foreach($items as $name=>$fileinfo){
if(isset($fileinfo['file']) && is_array($fileinfo['file']) && !empty($fileinfo['file'])){
foreach($fileinfo['file'] as $fn){
if (!in_array(realpath($import_path.$fn), $filearray)){
$filearray[] = realpath($import_path. $fn);
}
}
}
//validate the xml by its schema
if (preg_match('/imsqti\_(.*)/', $fileinfo['type'])){
$qti = new QTIParser($fileinfo['type']);
$xml_content = @file_get_contents($import_path . $fileinfo['href']);
$qti->parse($xml_content); //will add error to $msg if failed
}
//add all dependent discussion tools to a list
if(isset($fileinfo['dependency']) && !empty($fileinfo['dependency'])){
$avail_dt = array_merge($avail_dt, $fileinfo['dependency']);
}
}
//check if all files in the xml is presented in the archieve
$result = array_diff($filearray, $data);
//using sizeof because array_diff only
//returns an array containing all the entries from array1 that are not present in any of the
//other arrays.
//Using sizeof make sure it's not a subset of array2.
//-1 on data because it always contain the imsmanifest.xml file
if (!empty($result) || sizeof($data)-1>sizeof($filearray)){
$msg->addError(array('IMPORT_CARTRIDGE_FAILED', _AT('ims_missing_references')));
}
return true;
}
/*
* @example rscandir(dirname(__FILE__).'/'));
* @param string $base
* @param array $omit
* @param array $data
* @return array
*/
function rscandir($base='', &$data=array()) {
$array = array_diff(scandir($base), array('.', '..')); # remove ' and .. from the array */
foreach($array as $value) : /* loop through the array at the level of the supplied $base */
if (is_dir($base.$value)) : /* if this is a directory */
// don't save the directory name
// $data[] = $base.$value.'/'; /* add it to the $data array */
$data = rscandir($base.$value.'/', $data); /* then make a recursive call with the
current $value as the $base supplying the $data array to carry into the recursion */
elseif (is_file($base.$value)) : /* else if the current $value is a file */
$data[] = realpath($base.$value); /* just add the current $value to the $data array */
endif;
endforeach;
return $data; // return the $data array
}
/**
* Function to restructure the $items. So that old import will merge the top page into its children, and
* create a new folder on top of it
*/
function rehash($items){
global $order;
$parent_page_maps = array(); //old=>new
$temp_popped_items = array();
$rehashed_items = array(); //the reconstructed array
foreach($items as $id => $content){
$parent_obj = $items[$content['parent_content_id']];
$rehashed_items[$id] = $content; //copy
//first check if this is the top folder of the archieve, we don't want the top folder, remove it.
/* if (isset($content['parent_content_id']) && !isset($parent_obj) && !isset($content['type'])){
//if we can get into here, it means the parent_content_id of this is empty
//implying this is the first folder.
//note: it checks content[type] cause it could be a webcontent. In that case,
// we do want to keep it.
debug($content, 'hit');
unset($rehashed_items[$id]);
continue;
}
//then check if there exists a mapping for this item, if so, simply replace is and next.
else
*/ if (isset($parent_page_maps[$content['parent_content_id']])){
$rehashed_items [$id]['parent_content_id'] = $parent_page_maps[$content['parent_content_id']];
$rehashed_items [$id]['ordering']++;
}
//If its parent page is a top page and have an identiferref
elseif (isset($parent_obj) && isset($parent_obj['href'])){
if (!isset($parent_obj['href'])){
//check if this top page is already a folder, if so, next.
continue;
}
//else, make its parent page to a folder
$new_item['title'] = $parent_obj['title'];
//check if this parent has been modified, if so, chnage it
if (isset($parent_page_maps[$parent_obj['parent_content_id']])){
$new_item['parent_content_id'] = $parent_page_maps[$parent_obj['parent_content_id']];
} else {
$new_item['parent_content_id'] = $parent_obj['parent_content_id'];
}
//all ordering needs to be +1 because we are creating a new folder on top of
//everything, except the first page.
$new_item['ordering'] = $parent_obj['ordering'];
if ($new_item['parent_content_id']!='0'){
$new_item['ordering']++;
}
//assign this new parent folder to the pending items array
$new_item_name = $content['parent_content_id'].'_FOLDER';
//a not so brilliant way to append the folder in its appropriate position
$reordered_hashed_items = array(); //use to store the new rehashed item with the correct item order
foreach($rehashed_items as $rh_id=>$rh_content){
if ($rh_id == $content['parent_content_id']){
//add the folder in before the parent subpage.
$reordered_hashed_items[$new_item_name] = $new_item;
}
$reordered_hashed_items[$rh_id] = $rh_content; //clone
}
$rehashed_items = $reordered_hashed_items; //replace it back
unset($reordered_hashed_items);
$parent_page_maps[$content['parent_content_id']] = $new_item_name; //save this page on the hash map
//reconstruct the parent
$rehashed_items[$content['parent_content_id']]['parent_content_id'] = $parent_page_maps[$content['parent_content_id']];
$rehashed_items[$content['parent_content_id']]['ordering'] = 0; //always the first one.
//reconstruct itself
$rehashed_items[$id]['parent_content_id'] = $parent_page_maps[$content['parent_content_id']];
$rehashed_items[$id]['ordering']++;
}
}
return $rehashed_items;
}
/**
* This function will take the test accessment XML and add these to the database.
* @param string The path of the XML, without the import_path.
* @param mixed An item singleton. Contains the info of this item, namely, the accessment details.
* The item must be an object created by the ims class.
* @param string the import path
* @return mixed An Array that contains all the question IDs that have been imported.
*/
function addQuestions($xml, $item, $import_path){
global $test_title;
$qti_import = new QTIImport($import_path);
$tests_xml = $import_path.$xml;
//Mimic the array for now.
$test_attributes['resource']['href'] = $item['href'];
$test_attributes['resource']['type'] = preg_match('/imsqti_xmlv1p2/', $item['type'])==1?'imsqti_xmlv1p2':'imsqti_xmlv1p1';
$test_attributes['resource']['file'] = $item['file'];
//Get the XML file out and start importing them into our database.
//TODO: See question_import.php 287-289.
$qids = $qti_import->importQuestions($test_attributes);
$test_title = $qti_import->title;
return $qids;
}
/* called at the start of en element */
/* builds the $path array which is the path from the root to the current element */
function startElement($parser, $name, $attrs) {
global $items, $path, $package_base_path, $all_package_base_path, $package_real_base_path;
global $element_path, $import_path;
global $xml_base_path, $test_message, $content_type;
global $current_identifier, $msg, $ns, $ns_cp;
//check if the xml is valid
/*
if(isset($attrs['xsi:schemaLocation']) && $name == 'manifest'){
//run the loop and check it thru the ns.inc.php
} elseif ($name == 'manifest' && !isset($attrs['xsi:schemaLocation'])) {
//$msg->addError('MANIFEST_NOT_WELLFORM: NO NAMESPACE');
$msg->addError('IMPORT_CARTRIDGE_FAILED');
} else {
//error
}
//error if the tag names are wrong
if (preg_match('/^xsi\:/', $name) >= 1){
//$msg->addError('MANIFEST_NOT_WELLFORM');
$msg->addError('IMPORT_CARTRIDGE_FAILED');
}
*/
//validate namespaces
if(isset($attrs['xsi:schemaLocation']) && $name=='manifest'){
$schema_location = array();
$split_location = preg_split('/[\r\n\s]+/', trim($attrs['xsi:schemaLocation']));
//check if the namespace is actually right, have an array or some sort in IMS class
if(sizeof($split_location)%2==1){
//schema is not in the form of "The first URI reference in each pair is a namespace name,
//and the second is the location of a schema that describes that namespace."
//$msg->addError('MANIFEST_NOT_WELLFORM');
$msg->addError(array('IMPORT_CARTRIDGE_FAILED', _AT('schema_error')));
}
//turn the xsi:schemaLocation URI into a schema that describe namespace.
//name = url
//http://msdn.microsoft.com/en-us/library/ms256100(VS.85).aspx
//http://www.w3.org/TR/xmlschema-1/
for($i=0; $i < sizeof($split_location);$i=$i+2){
/*
if (isset($ns[$split_location[$i]]) && $ns[$split_location[$i]] != $split_location[$i+1]){
//$msg->addError('MANIFEST_NOT_WELLFORM: SCHEMA');
$msg->addError('IMPORT_CARTRIDGE_FAILED');
}
*/
//if the key of the namespace is not defined. Throw error.
if(!isset($ns[$split_location[$i]]) && !isset($ns_cp[$split_location[$i]])){
$msg->addError(array('IMPORT_CARTRIDGE_FAILED', _AT('schema_error')));
}
}
} else {
//throw error
}
if ($name == 'manifest' && isset($attrs['xml:base']) && $attrs['xml:base']) {
$xml_base_path = $attrs['xml:base'];
} else if ($name == 'file') {
// check if it misses file references
if(!isset($attrs['href']) || $attrs['href']==''){
//$msg->addError('MANIFEST_NOT_WELLFORM');
$msg->addError(array('IMPORT_CARTRIDGE_FAILED', _AT('ims_missing_references')));
}
// special case for webCT content packages that don't specify the `href` attribute
// with the `` element.
// we take the `href` from the first `` element.
if (isset($items[$current_identifier]) && ($items[$current_identifier]['href'] == '')) {
$attrs['href'] = urldecode($attrs['href']);
$items[$current_identifier]['href'] = $attrs['href'];
}
$temp_path = pathinfo($attrs['href']);
$temp_path = explode('/', $temp_path['dirname']);
if (empty($package_base_path)){
$package_base_path = $temp_path;
}
if ($all_package_base_path!='' && empty($all_package_base_path)){
$all_package_base_path = $temp_path;
}
$package_base_path = array_intersect_assoc($package_base_path, $temp_path);
//calculate the depths of relative paths
if ($all_package_base_path!=''){
$no_relative_temp_path = $temp_path;
foreach($no_relative_temp_path as $path_node){
if ($path_node=='..'){
array_pop($no_relative_temp_path);
array_pop($no_relative_temp_path); //not a typo, have to pop twice, both itself('..'), and the one before.
}
}
$all_package_base_path = array_intersect_assoc($all_package_base_path, $no_relative_temp_path);
if (empty($all_package_base_path)){
$all_package_base_path = ''; //unset it, there is no intersection.
}
}
//save the actual content base path
if (in_array('..', $temp_path)){
$sizeofrp = array_count_values($temp_path);
}
//for IMSCC, assume that all resources lies in the same folder, except styles.css
if ($items[$current_identifier]['type']=='webcontent' || $items[$current_identifier]['type']=='imsdt_xmlv1p0'){
//find the intersection of each item's related files, then that intersection is the content_path
if (isset($items[$current_identifier]['file'])){
foreach ($items[$current_identifier]['file'] as $resource_path){
$temp_path = pathinfo($resource_path);
$temp_path = explode('/', $temp_path['dirname']);
$package_base_path = array_intersect_assoc($package_base_path, $temp_path);
}
}
}
//real content path
if($sizeofrp['..'] > 0 && !empty($all_package_base_path)){
for ($i=0; $i<$sizeofrp['..']; $i++){
array_pop($all_package_base_path);
}
}
$items[$current_identifier]['new_path'] = implode('/', $package_base_path);
/*
* @harris, reworked the package_base_path
if ($package_base_path=="") {
$package_base_path = $temp_path;
}
elseif (is_array($package_base_path) && $content_type != 'IMS Common Cartridge') {
//if this is a content package, we want only intersection
$package_base_path = array_intersect($package_base_path, $temp_path);
$temp_path = $package_base_path;
}
//added these 2 lines in so that pictures would load. making the elseif above redundant.
//if there is a bug for pictures not load, then it's the next 2 lines.
$package_base_path = array_intersect($package_base_path, $temp_path);
$temp_path = $package_base_path;
}
$items[$current_identifier]['new_path'] = implode('/', $temp_path);
*/
if ( isset($_POST['allow_test_import']) && isset($items[$current_identifier])
&& preg_match('/((.*)\/)*tests\_[0-9]+\.xml$/', $attrs['href'])) {
$items[$current_identifier]['tests'][] = $attrs['href'];
}
if ( isset($_POST['allow_a4a_import']) && isset($items[$current_identifier])) {
$items[$current_identifier]['a4a_import_enabled'] = true;
}
} else if (($name == 'item') && ($attrs['identifierref'] != '')) {
$path[] = $attrs['identifierref'];
} else if (($name == 'item') && ($attrs['identifier'])) {
$path[] = $attrs['identifier'];
// } else if (($name == 'resource') && is_array($items[$attrs['identifier']])) {
} else if (($name == 'resource')) {
$current_identifier = $attrs['identifier'];
$items[$current_identifier]['type'] = $attrs['type'];
if ($attrs['href']) {
$attrs['href'] = urldecode($attrs['href']);
$items[$attrs['identifier']]['href'] = $attrs['href'];
// href points to a remote url
if (preg_match('/^http.*:\/\//', trim($attrs['href'])))
$items[$attrs['identifier']]['new_path'] = '';
else // href points to local file
{
$temp_path = pathinfo($attrs['href']);
$temp_path = explode('/', $temp_path['dirname']);
// if (empty($package_base_path)) {
$package_base_path = $temp_path;
// }
// else {
// $package_base_path = array_intersect($package_base_path, $temp_path);
// }
$items[$attrs['identifier']]['new_path'] = implode('/', $temp_path);
}
}
//if test custom message has not been saved
// if (!isset($items[$current_identifier]['test_message'])){
// $items[$current_identifier]['test_message'] = $test_message;
// }
} else if ($name=='dependency' && $attrs['identifierref']!='') {
//if there is a dependency, attach it to the item array['file']
$items[$current_identifier]['dependency'][] = $attrs['identifierref'];
}
if (($name == 'item') && ($attrs['parameters'] != '')) {
$items[$attrs['identifierref']]['test_message'] = $attrs['parameters'];
}
if ($name=='file'){
if(!isset($items[$current_identifier]) && $attrs['href']!=''){
$items[$current_identifier]['href'] = $attrs['href'];
}
if (file_exists($import_path.$attrs['href'])){
$items[$current_identifier]['file'][] = $attrs['href'];
} else {
//$msg->addError('');
$msg->addError(array('IMPORT_CARTRIDGE_FAILED', _AT(array('ims_files_missing', $attrs['href']))));
}
}
if ($name=='cc:authorizations'){
//don't have authorization setup.
//$msg->addError('');
$msg->addError('IMS_AUTHORIZATION_NOT_SUPPORT');
}
array_push($element_path, $name);
}
/* called when an element ends */
/* removed the current element from the $path */
function endElement($parser, $name) {
global $path, $element_path, $my_data, $items;
global $current_identifier, $skip_ims_validation;
global $msg, $content_type;
static $resource_num = 0;
if ($name == 'item') {
array_pop($path);
}
//check if this is a test import
if ($name == 'schema'){
if (trim($my_data)=='IMS Question and Test Interoperability'){
$msg->addError('IMPORT_FAILED');
}
$content_type = trim($my_data);
}
//Handles A4a
if ($current_identifier != ''){
$my_data = trim($my_data);
$last_file_name = $items[$current_identifier]['file'][(sizeof($items[$current_identifier]['file']))-1];
if ($name=='originalAccessMode'){
if (in_array('accessModeStatement', $element_path)){
$items[$current_identifier]['a4a'][$last_file_name][$resource_num]['access_stmt_originalAccessMode'] = $my_data;
} elseif (in_array('adaptationStatement', $element_path)){
$items[$current_identifier]['a4a'][$last_file_name][$resource_num]['adapt_stmt_originalAccessMode'] = $my_data;
}
} elseif (($name=='language') && in_array('accessModeStatement', $element_path)){
$items[$current_identifier]['a4a'][$last_file_name][$resource_num]['language'][] = $my_data;
} elseif ($name=='hasAdaptation') {
$items[$current_identifier]['a4a'][$last_file_name][$resource_num]['hasAdaptation'][] = $my_data;
} elseif ($name=='isAdaptationOf'){
$items[$current_identifier]['a4a'][$last_file_name][$resource_num]['isAdaptationOf'][] = $my_data;
} elseif ($name=='accessForAllResource'){
/* the head node of accessForAll Metadata, if this exists in the manifest. Skip XSD validation,
* because A4a doesn't have a xsd yet. Our access for all is based on ISO which will not pass
* the current IMS validation.
* Also, since ATutor is the only one (as of Oct 21, 2009) that exports IMS with access for all
* content, we can almost assume that any ims access for all content is by us, and is valid.
*/
$skip_ims_validation = true;
$resource_num++;
} elseif($name=='file'){
$resource_num = 0; //reset resournce number to 0 when the file tags ends
}
}
if ($element_path === array('manifest', 'metadata', 'imsmd:lom', 'imsmd:general', 'imsmd:title', 'imsmd:langstring')) {
global $package_base_name;
$package_base_name = trim($my_data);
}
array_pop($element_path);
$my_data = '';
}
/* called when there is character data within elements */
/* constructs the $items array using the last entry in $path as the parent element */
function characterData($parser, $data){
global $path, $items, $order, $my_data, $element_path;
global $current_identifier;
$str_trimmed_data = trim($data);
if (!empty($str_trimmed_data)) {
$size = count($path);
if ($size > 0) {
$current_item_id = $path[$size-1];
if ($size > 1) {
$parent_item_id = $path[$size-2];
} else {
$parent_item_id = 0;
}
if (isset($items[$current_item_id]['parent_content_id']) && is_array($items[$current_item_id])) {
/* this item already exists, append the title */
/* this fixes {\n, \t, `, &} characters in elements */
/* horible kludge to fix the */
/* from TILE */
if (in_array('accessForAllResource', $element_path)){
//skip this tag
} elseif ($element_path[count($element_path)-1] != 'ns1:objectiveDesc') {
$items[$current_item_id]['title'] .= $data;
}
} else {
$order[$parent_item_id] ++;
$item_tmpl = array( 'title' => $data,
'parent_content_id' => $parent_item_id,
'ordering' => $order[$parent_item_id]-1);
//append other array values if it exists
if (is_array($items[$current_item_id])){
$items[$current_item_id] = array_merge($items[$current_item_id], $item_tmpl);
} else {
$items[$current_item_id] = $item_tmpl;
}
}
}
}
$my_data .= $data;
}
/* glossary parser: */
function glossaryStartElement($parser, $name, $attrs) {
global $element_path;
array_push($element_path, $name);
}
/* called when an element ends */
/* removed the current element from the $path */
function glossaryEndElement($parser, $name) {
global $element_path, $my_data, $imported_glossary;
static $current_term;
if ($element_path === array('glossary', 'item', 'term') ||
$element_path === array('glossary:glossary', 'item', 'term')) {
$current_term = $my_data;
} else if ($element_path === array('glossary', 'item', 'definition') ||
$element_path === array('glossary:glossary', 'item', 'definition')) {
$imported_glossary[trim($current_term)] = trim($my_data);
}
array_pop($element_path);
$my_data = '';
}
function glossaryCharacterData($parser, $data){
global $my_data;
$my_data .= $data;
}
if (!isset($_POST['submit']) && !isset($_POST['cancel'])) {
/* just a catch all */
$errors = array('FILE_MAX_SIZE', ini_get('post_max_size'));
$msg->addError($errors);
header('Location: ./index.php');
exit;
} else if (isset($_POST['cancel'])) {
$msg->addFeedback('IMPORT_CANCELLED');
header('Location: ../content/index.php');
exit;
}
$cid = intval($_POST['cid']);
if (isset($_POST['url']) && ($_POST['url'] != 'http://') ) {
if ($content = @file_get_contents($_POST['url'])) {
// save file to /content/
$filename = substr(time(), -6). '.zip';
$full_filename = AT_CONTENT_DIR . $filename;
if (!$fp = fopen($full_filename, 'w+b')) {
echo "Cannot open file ($filename)";
exit;
}
if (fwrite($fp, $content, strlen($content) ) === FALSE) {
echo "Cannot write to file ($filename)";
exit;
}
fclose($fp);
}
$_FILES['file']['name'] = $filename;
$_FILES['file']['tmp_name'] = $full_filename;
$_FILES['file']['size'] = strlen($content);
unset($content);
$url_parts = pathinfo($_POST['url']);
$package_base_name_url = $url_parts['basename'];
}
$ext = pathinfo($_FILES['file']['name']);
$ext = $ext['extension'];
if ($ext != 'zip') {
$msg->addError('IMPORTDIR_IMS_NOTVALID');
} else if ($_FILES['file']['error'] == 1) {
$errors = array('FILE_MAX_SIZE', ini_get('upload_max_filesize'));
$msg->addError($errors);
} else if ( !$_FILES['file']['name'] || (!is_uploaded_file($_FILES['file']['tmp_name']) && !$_POST['url'])) {
$msg->addError('FILE_NOT_SELECTED');
} else if ($_FILES['file']['size'] == 0) {
$msg->addError('IMPORTFILE_EMPTY');
}
if ($msg->containsErrors()) {
if (isset($_GET['tile'])) {
header('Location: '.$_base_path.'mods/_standard/tile_search/index.php');
} else {
header('Location: index.php');
}
exit;
}
/* check if ../content/import/ exists */
$import_path = AT_CONTENT_DIR . 'import/';
$content_path = AT_CONTENT_DIR;
if (!is_dir($import_path)) {
if (!@mkdir($import_path, 0700)) {
$msg->addError('IMPORTDIR_FAILED');
}
}
$import_path .= $_SESSION['course_id'].'/';
if (is_dir($import_path)) {
clr_dir($import_path);
}
if (!@mkdir($import_path, 0700)) {
$msg->addError('IMPORTDIR_FAILED');
}
if ($msg->containsErrors()) {
if (isset($_GET['tile'])) {
header('Location: '.$_base_path.'mods/_standard/tile_search/index.php');
} else {
header('Location: index.php');
}
exit;
}
/* extract the entire archive into AT_COURSE_CONTENT . import/$course using the call back function to filter out php files */
error_reporting(0);
$archive = new PclZip($_FILES['file']['tmp_name']);
if ($archive->extract( PCLZIP_OPT_PATH, $import_path,
PCLZIP_CB_PRE_EXTRACT, 'preImportCallBack') == 0) {
$msg->addError('IMPORT_FAILED');
echo 'Error : '.$archive->errorInfo(true);
clr_dir($import_path);
header('Location: index.php');
exit;
}
error_reporting(AT_ERROR_REPORTING);
/* get the course's max_quota */
$sql = "SELECT max_quota FROM ".TABLE_PREFIX."courses WHERE course_id=$_SESSION[course_id]";
$result = mysql_query($sql, $db);
$q_row = mysql_fetch_assoc($result);
if ($q_row['max_quota'] != AT_COURSESIZE_UNLIMITED) {
if ($q_row['max_quota'] == AT_COURSESIZE_DEFAULT) {
$q_row['max_quota'] = $MaxCourseSize;
}
$totalBytes = dirsize($import_path);
$course_total = dirsize(AT_CONTENT_DIR . $_SESSION['course_id'].'/');
$total_after = $q_row['max_quota'] - $course_total - $totalBytes + $MaxCourseFloat;
if ($total_after < 0) {
/* remove the content dir, since there's no space for it */
$errors = array('NO_CONTENT_SPACE', number_format(-1*($total_after/AT_KBYTE_SIZE), 2 ) );
$msg->addError($errors);
clr_dir($import_path);
if (isset($_GET['tile'])) {
header('Location: '.$_base_path.'mods/_standard/tile_search/index.php');
} else {
header('Location: index.php');
}
exit;
}
}
$items = array(); /* all the content pages */
$order = array(); /* keeps track of the ordering for each content page */
$path = array(); /* the hierarchy path taken in the menu to get to the current item in the manifest */
$dependency_files = array(); /* the file path for the dependency files */
/*
$items[content_id/resource_id] = array(
'title'
'real_content_id' // calculated after being inserted
'parent_content_id'
'href'
'ordering'
);
*/
$ims_manifest_xml = @file_get_contents($import_path.'imsmanifest.xml');
//scan for manifest xml if it's not on the top level.
if ($ims_manifest_xml === false){
$data = rscandir($import_path);
$manifest_array = array();
foreach($data as $scanned_file){
$scanned_file = realpath($scanned_file);
//change the file string to an array
$this_file_array = explode(DIRECTORY_SEPARATOR, $scanned_file);
if(empty($manifest_array)){
$manifest_array = $this_file_array;
}
$manifest_array = array_intersect_assoc($this_file_array, $manifest_array);
if (strpos($scanned_file, 'imsmanifest')!==false){
$ims_manifest_xml = @file_get_contents($scanned_file);
}
}
if ($ims_manifest_xml !== false){
$import_path = implode(DIRECTORY_SEPARATOR, $manifest_array) . DIRECTORY_SEPARATOR;
}
}
//if no imsmanifest.xml found in the entire package, throw error.
if ($ims_manifest_xml === false) {
$msg->addError('NO_IMSMANIFEST');
if (file_exists($import_path . 'atutor_backup_version')) {
$msg->addError('NO_IMS_BACKUP');
}
clr_dir($import_path);
if (isset($_GET['tile'])) {
header('Location: '.$_base_path.'mods/_standard/tile_search/index.php');
} else {
header('Location: index.php');
}
exit;
}
$xml_parser = xml_parser_create();
xml_parser_set_option($xml_parser, XML_OPTION_CASE_FOLDING, false); /* conform to W3C specs */
xml_set_element_handler($xml_parser, 'startElement', 'endElement');
xml_set_character_data_handler($xml_parser, 'characterData');
if (!xml_parse($xml_parser, $ims_manifest_xml, true)) {
die(sprintf("XML error: %s at line %d",
xml_error_string(xml_get_error_code($xml_parser)),
xml_get_current_line_number($xml_parser)));
}
xml_parser_free($xml_parser);
/* check if the glossary terms exist */
$glossary_path = '';
if ($content_type == 'IMS Common Cartridge'){
$glossary_path = 'resources/GlossaryItem/';
// $package_base_path = '';
}
if (file_exists($import_path . $glossary_path . 'glossary.xml')){
$glossary_xml = @file_get_contents($import_path.$glossary_path.'glossary.xml');
$element_path = array();
$xml_parser = xml_parser_create();
/* insert the glossary terms into the database (if they're not in there already) */
/* parse the glossary.xml file and insert the terms */
xml_parser_set_option($xml_parser, XML_OPTION_CASE_FOLDING, false); /* conform to W3C specs */
xml_set_element_handler($xml_parser, 'glossaryStartElement', 'glossaryEndElement');
xml_set_character_data_handler($xml_parser, 'glossaryCharacterData');
if (!xml_parse($xml_parser, $glossary_xml, true)) {
die(sprintf("XML error: %s at line %d",
xml_error_string(xml_get_error_code($xml_parser)),
xml_get_current_line_number($xml_parser)));
}
xml_parser_free($xml_parser);
$contains_glossary_terms = true;
foreach ($imported_glossary as $term => $defn) {
if (!$glossary[$term]) {
$sql = "INSERT INTO ".TABLE_PREFIX."glossary VALUES (NULL, $_SESSION[course_id], '$term', '$defn', 0)";
mysql_query($sql, $db);
}
}
}
// Check if all the files exists in the manifest, iff it's a IMS CC package.
if ($content_type == 'IMS Common Cartridge') {
checkResources($import_path);
}
// Check if there are any errors during parsing.
if ($msg->containsErrors()) {
if (isset($_GET['tile'])) {
header('Location: '.$_base_path.'mods/_standard/tile_search/index.php');
} else {
header('Location: index.php');
}
exit;
}
/* generate a unique new package base path based on the package file name and date as needed. */
/* the package name will be the dir where the content for this package will be put, as a result */
/* the 'content_path' field in the content table will be set to this path. */
/* $package_base_name_url comes from the URL file name (NOT the file name of the actual file we open)*/
if (!$package_base_name && $package_base_name_url) {
$package_base_name = substr($package_base_name_url, 0, -4);
} else if (!$package_base_name) {
$package_base_name = substr($_FILES['file']['name'], 0, -4);
}
$package_base_name = strtolower($package_base_name);
$package_base_name = str_replace(array('\'', '"', ' ', '|', '\\', '/', '<', '>', ':'), '_' , $package_base_name);
$package_base_name = preg_replace("/[^A-Za-z0-9._\-]/", '', $package_base_name);
if (is_dir(AT_CONTENT_DIR . $_SESSION['course_id'].'/'.$package_base_name)) {
$package_base_name .= '_'.date('ymdHis');
}
if ($package_base_path) {
$package_base_path = implode('/', $package_base_path);
} elseif (empty($package_base_path)){
$package_base_path = '';
}
if ($xml_base_path) {
$package_base_path = $xml_base_path . $package_base_path;
mkdir(AT_CONTENT_DIR .$_SESSION['course_id'].'/'.$xml_base_path);
$package_base_name = $xml_base_path . $package_base_name;
}
/* get the top level content ordering offset */
$sql = "SELECT MAX(ordering) AS ordering FROM ".TABLE_PREFIX."content WHERE course_id=$_SESSION[course_id] AND content_parent_id=$cid";
$result = mysql_query($sql, $db);
$row = mysql_fetch_assoc($result);
$order_offset = intval($row['ordering']); /* it's nice to have a real number to deal with */
$lti_offset = array(); //since we don't need lti tools, the ordering needs to be subtracted
//reorder the items stack
$items = rehash($items);
//debug($items);exit;
foreach ($items as $item_id => $content_info)
{
//formatting field, default 1
$content_formatting = 1; //CONTENT_TYPE_CONTENT
//don't want to display glossary as a page
if ($content_info['href']== $glossary_path . 'glossary.xml'){
continue;
}
//if discussion tools, add it to the list of unhandled dts
if ($content_info['type']=='imsdt_xmlv1p0'){
//if it will be taken care after (has dependency), then move along.
if (in_array($item_id, $avail_dt)){
$lti_offset[$content_info['parent_content_id']]++;
continue;
}
}
//handle the special case of cc import, where there is no content association. The resource should
//still be imported.
if(!isset($content_info['parent_content_id'])){
//if this is a question bank
if ($content_info['type']=="imsqti_xmlv1p2/imscc_xmlv1p0/question-bank"){
addQuestions($content_info['href'], $content_info, $import_path);
}
}
//if it has no title, most likely it is not a page but just a normal item, skip it
if (!isset($content_info['title'])){
continue;
}
//check dependency immediately, then handles it
$head = '';
if (is_array($content_info['dependency']) && !empty($content_info['dependency'])){
foreach($content_info['dependency'] as $dependency_ref){
//handle styles
/** handled by get_html_head in vitals.inc.php
if (preg_match('/(.*)\.css$/', $items[$dependency_ref]['href'])){
//calculate where this is based on our current base_href.
//assuming the dependency folders are siblings of the item
$head = '';
}
*/
//check if this is a discussion tool dependency
if ($items[$dependency_ref]['type']=='imsdt_xmlv1p0'){
$items[$item_id]['forum'][$dependency_ref] = $items[$dependency_ref]['href'];
}
//check if this is a QTI dependency
if (strpos($items[$dependency_ref]['type'], 'imsqti_xmlv1p2/imscc_xmlv1p0') !== false){
$items[$item_id]['tests'][$dependency_ref] = $items[$dependency_ref]['href'];
}
}
}
//check file array, see if there are css.
//edited nov 26, harris
//removed cuz i added link to the html_tags
/*
if (is_array($content_info['file']) && !empty($content_info['file'])){
foreach($content_info['file'] as $dependency_ref){
//handle styles
if (preg_match('/(.*)\.css$/', $dependency_ref)){
//calculate where this is based on our current base_href.
//assuming the dependency folders are siblings of the item
$head = '';
}
}
}
*/
// remote href
if (preg_match('/^http.*:\/\//', trim($content_info['href'])) )
{
$content = ''.$content_info['title'].'';
}
else
{
if ($content_type == 'IMS Common Cartridge'){
//to handle import with purely images but nothing else
//don't need a content base path for it.
$content_new_path = $content_info['new_path'];
$content_info['new_path'] = '';
}
if (isset($content_info['href'], $xml_base_path)) {
$content_info['href'] = $xml_base_path . $content_info['href'];
}
if (!isset($content_info['href'])) {
// this item doesn't have an identifierref. so create an empty page.
// what we called a folder according to v1.2 Content Packaging spec
// Hop over
$content = '';
$ext = '';
$last_modified = date('Y-m-d H:i:s');
} else {
//$file_info = @stat(AT_CONTENT_DIR . 'import/'.$_SESSION['course_id'].'/'.$content_info['href']);
$file_info = @stat($import_path.$content_info['href']);
if ($file_info === false) {
continue;
}
//$path_parts = pathinfo(AT_CONTENT_DIR . 'import/'.$_SESSION['course_id'].'/'.$content_info['href']);
$path_parts = pathinfo($import_path.$content_info['href']);
$ext = strtolower($path_parts['extension']);
$last_modified = date('Y-m-d H:i:s', $file_info['mtime']);
}
if (in_array($ext, array('gif', 'jpg', 'bmp', 'png', 'jpeg'))) {
/* this is an image */
$content = '';
} else if ($ext == 'swf') {
/* this is flash */
/* Using default size of 550 x 400 */
$content = '';
} else if ($ext == 'mov') {
/* this is a quicktime movie */
/* Using default size of 550 x 400 */
$content = '';
/* Oct 19, 2009
* commenting this whole chunk out. It's part of my test import codes, not sure why it's here,
* and I don't think it should be here. Remove this whole comment after further testing and confirmation.
* @harris
*
//Mimic the array for now.
$test_attributes['resource']['href'] = $test_xml_file;
$test_attributes['resource']['type'] = isset($items[$item_id]['type'])?'imsqti_xmlv1p2':'imsqti_xmlv1p1';
$test_attributes['resource']['file'] = $items[$item_id]['file'];
// $test_attributes['resource']['file'] = array($test_xml_file);
//Get the XML file out and start importing them into our database.
//TODO: See question_import.php 287-289.
$qids = $qti_import->importQuestions($test_attributes);
*/
} else if ($ext == 'mp3') {
$content = '';
} else if (in_array($ext, array('wav', 'au'))) {
$content = '';
} else if (in_array($ext, array('txt', 'css', 'html', 'htm', 'csv', 'asc', 'tsv', 'xml', 'xsl'))) {
if ($content_type == 'IMS Common Cartridge'){
$content_info['new_path'] = $content_new_path;
}
/* this is a plain text file */
//$content = file_get_contents(AT_CONTENT_DIR . 'import/'.$_SESSION['course_id'].'/'.$content_info['href']);
$content = file_get_contents($import_path.$content_info['href']);
if ($content === false) {
/* if we can't stat() it then we're unlikely to be able to read it */
/* so we'll never get here. */
continue;
}
// get the contents of the 'head' element
$head .= get_html_head_by_tag($content, $html_head_tags);
// Specifically handle eXe package
// NOTE: THIS NEEDS WORK! TO FIND A WAY APPLY EXE .CSS FILES ONLY ON COURSE CONTENT PART.
// NOW USE OUR OWN .CSS CREATED SOLELY FOR EXE
$isExeContent = false;
// check xml file in eXe package
if (preg_match("/*/", $ims_manifest_xml))
{
$isExeContent = true;
}
// use ATutor's eXe style sheet as the ones from eXe conflicts with ATutor's style sheets
if ($isExeContent)
{
$head = preg_replace ('/()(.*)(<\/style>)/ms', '\\1@import url(/docs/exestyles.css);\\3', $head);
}
// end of specifically handle eXe package
$content = get_html_body($content);
if ($contains_glossary_terms)
{
// replace glossary content package links to real glossary mark-up using [?] [/?]
// refer to bug 3641, edited by Harris
$content = preg_replace('/([.\w\d\s&;"]+|.*)<\/a>/i', '[?]\\2[/?]', $content);
}
/* potential security risk? */
if ( strpos($content_info['href'], '..') === false && !preg_match('/((.*)\/)*tests\_[0-9]+\.xml$/', $content_info['href'])) {
// @unlink(AT_CONTENT_DIR . 'import/'.$_SESSION['course_id'].'/'.$content_info['href']);
}
/* overwrite content if this is discussion tool. */
if ($content_info['type']=='imsdt_xmlv1p0'){
$dt_parser = new DiscussionToolsParser();
$xml_content = @file_get_contents($import_path . $content_info['href']);
$dt_parser->parse($xml_content);
$forum_obj = $dt_parser->getDt();
$content = $forum_obj->getText();
unset($forum_obj);
$dt_parser->close();
}
} else if ($ext) {
/* non text file, and can't embed (example: PDF files) */
$content = ''.$content_info['title'].'';
}
}
$content_parent_id = $cid;
if ($content_info['parent_content_id'] !== 0) {
$content_parent_id = $items[$content_info['parent_content_id']]['real_content_id'];
//if it's not there, use $cid
if (!$content_parent_id){
$content_parent_id = $cid;
}
}
$my_offset = 0;
if ($content_parent_id == $cid) {
$my_offset = $order_offset;
}
/* replace the old path greatest common denomiator with the new package path. */
/* we don't use str_replace, b/c there's no knowing what the paths may be */
/* we only want to replace the first part of the path.
*/
if(is_array($all_package_base_path)){
$all_package_base_path = implode('/', $all_package_base_path);
}
if ($all_package_base_path != '') {
$content_info['new_path'] = $package_base_name . substr($content_info['new_path'], strlen($all_package_base_path));
} else {
$content_info['new_path'] = $package_base_name . '/' . $content_info['new_path'];
}
//handles weblinks
if ($content_info['type']=='imswl_xmlv1p0'){
$weblinks_parser = new WeblinksParser();
$xml_content = @file_get_contents($import_path . $content_info['href']);
$weblinks_parser->parse($xml_content);
$content_info['title'] = $weblinks_parser->getTitle();
$content = $weblinks_parser->getUrl();
$content_folder_type = CONTENT_TYPE_WEBLINK;
$content_formatting = 2;
}
$head = addslashes($head);
$content_info['title'] = addslashes($content_info['title']);
$content_info['test_message'] = addslashes($content_info['test_message']);
//if this file is a test_xml, create a blank page instead, for imscc.
if (preg_match('/((.*)\/)*tests\_[0-9]+\.xml$/', $content_info['href'])
|| preg_match('/imsqti\_(.*)/', $content_info['type'])) {
$content = ' ';
} else {
$content = addslashes($content);
}
//check for content_type
if ($content_formatting!=CONTENT_TYPE_WEBLINK){
$content_folder_type = (!isset($content_info['type'])?CONTENT_TYPE_FOLDER:CONTENT_TYPE_CONTENT);
}
$sql= 'INSERT INTO '.TABLE_PREFIX.'content'
. '(course_id,
content_parent_id,
ordering,
last_modified,
revision,
formatting,
release_date,
head,
use_customized_head,
keywords,
content_path,
title,
text,
test_message,
content_type)
VALUES
('.$_SESSION['course_id'].','
.intval($content_parent_id).','
.($content_info['ordering'] + $my_offset - $lti_offset[$content_info['parent_content_id']] + 1).','
.'"'.$last_modified.'",
0,'
.$content_formatting.' ,
NOW(),"'
. $head .'",
1,
"",'
.'"'.$content_info['new_path'].'",'
.'"'.$content_info['title'].'",'
.'"'.$content.'",'
.'"'.$content_info['test_message'].'",'
.$content_folder_type.')';
$result = mysql_query($sql, $db) or die(mysql_error());
/* get the content id and update $items */
$items[$item_id]['real_content_id'] = mysql_insert_id($db);
/* get the tests associated with this content */
if (!empty($items[$item_id]['tests']) || strpos($items[$item_id]['type'], 'imsqti_xmlv1p2/imscc_xmlv1p0') !== false){
$qti_import = new QTIImport($import_path);
if (isset($items[$item_id]['tests'])){
$loop_var = $items[$item_id]['tests'];
} else {
$loop_var = $items[$item_id]['file'];
}
foreach ($loop_var as $array_id => $test_xml_file){
//check if this item is the qti item object, or it is the content item obj
//switch it to qti obj if it's content item obj
if ($items[$item_id]['type'] == 'webcontent'){
$item_qti = $items[$array_id];
} else {
$item_qti = $items[$item_id];
}
//call subrountine to add the questions.
$qids = addQuestions($test_xml_file, $item_qti, $import_path);
//import test
if ($test_title==''){
$test_title = $content_info['title'];
}
$tid = $qti_import->importTest($test_title);
//associate question and tests
foreach ($qids as $order=>$qid){
if (isset($qti_import->weights[$order])){
$weight = round($qti_import->weights[$order]);
} else {
$weight = 0;
}
$new_order = $order + 1;
$sql = "INSERT INTO " . TABLE_PREFIX . "tests_questions_assoc" .
"(test_id, question_id, weight, ordering, required) " .
"VALUES ($tid, $qid, $weight, $new_order, 0)";
$result = mysql_query($sql, $db);
}
//associate content and test
$sql = 'INSERT INTO ' . TABLE_PREFIX . 'content_tests_assoc' .
'(content_id, test_id) ' .
'VALUES (' . $items[$item_id]['real_content_id'] . ", $tid)";
$result = mysql_query($sql, $db);
// if (!$msg->containsErrors()) {
// $msg->addFeedback('IMPORT_SUCCEEDED');
// }
}
}
/* get the a4a related xml */
if (isset($items[$item_id]['a4a_import_enabled']) && isset($items[$item_id]['a4a']) && !empty($items[$item_id]['a4a'])) {
$a4a_import = new A4aImport($items[$item_id]['real_content_id']);
$a4a_import->setRelativePath($items[$item_id]['new_path']);
$a4a_import->importA4a($items[$item_id]['a4a']);
}
/* get the discussion tools (dependent to content)*/
if (isset($items[$item_id]['forum']) && !empty($items[$item_id]['forum'])){
foreach($items[$item_id]['forum'] as $forum_ref => $forum_link){
$dt_parser = new DiscussionToolsParser();
$dt_import = new DiscussionToolsImport();
//if this forum has not been added, parse it and add it.
if (!isset($added_dt[$forum_ref])){
$xml_content = @file_get_contents($import_path . $forum_link);
$dt_parser->parse($xml_content);
$forum_obj = $dt_parser->getDt();
$dt_import->import($forum_obj, $items[$item_id]['real_content_id']);
$added_dt[$forum_ref] = $dt_import->getFid();
}
//associate the fid and content id
$dt_import->associateForum($items[$item_id]['real_content_id'], $added_dt[$forum_ref]);
}
} elseif ($items[$item_id]['type']=='imsdt_xmlv1p0'){
//optimize this, repeated codes as above
$dt_parser = new DiscussionToolsParser();
$dt_import = new DiscussionToolsImport();
$xml_content = @file_get_contents($import_path . $content_info['href']);
$dt_parser->parse($xml_content);
$forum_obj = $dt_parser->getDt();
$dt_import->import($forum_obj, $items[$item_id]['real_content_id']);
$added_dt[$item_id] = $dt_import->getFid();
//associate the fid and content id
$dt_import->associateForum($items[$item_id]['real_content_id'], $added_dt[$item_id]);
}
}
//exit;//harris
if ($package_base_path == '.') {
$package_base_path = '';
}
// loop through the files outside the package folder, and copy them to its relative path
if (is_dir(AT_CONTENT_DIR . 'import/'.$_SESSION['course_id'].'/resources')) {
$handler = opendir(AT_CONTENT_DIR . 'import/'.$_SESSION['course_id'].'/resources');
while ($file = readdir($handler)){
$filename = AT_CONTENT_DIR . 'import/'.$_SESSION['course_id'].'/resources/'.$file;
if(is_file($filename)){
@rename($filename, AT_CONTENT_DIR .$_SESSION['course_id'].'/'.$package_base_name.'/'.$file);
}
}
closedir($handler);
}
//takes care of the condition where the whole package doesn't have any contents but question banks
if(is_array($all_package_base_path)){
$all_package_base_path = implode('/', $all_package_base_path);
}
if (@rename($import_path.$all_package_base_path, AT_CONTENT_DIR .$_SESSION['course_id'].'/'.$package_base_name) === false) {
if (!$msg->containsErrors()) {
$msg->addError('IMPORT_FAILED');
}
}
//check if there are still resources missing
foreach($items as $idetails){
$temp_path = pathinfo($idetails['href']);
@rename(AT_CONTENT_DIR . 'import/'.$_SESSION['course_id'].'/'.$temp_path['dirname'], AT_CONTENT_DIR .$_SESSION['course_id'].'/'.$package_base_name . '/' . $temp_path['dirname']);
}
clr_dir(AT_CONTENT_DIR . 'import/'.$_SESSION['course_id']);
if (file_exists($full_filename)) {
@unlink($full_filename);
}
if ($_POST['s_cid']){
if (!$msg->containsErrors()) {
$msg->addFeedback('ACTION_COMPLETED_SUCCESSFULLY');
}
header('Location: ../editor/edit_content.php?cid='.intval($_POST['cid']));
exit;
} else {
if (!$msg->containsErrors()) {
$msg->addFeedback('ACTION_COMPLETED_SUCCESSFULLY');
}
if ($_GET['tile']) {
header('Location: '.AT_BASE_HREF.'mods/_standard/tile_search/index.php');
} else {
header('Location: ./index.php?cid='.intval($_POST['cid']));
}
exit;
}
?>