shorten import path from OAuth to 6 hex characters long.
[acontent.git] / docs / home / ims / ims_import.php
1 <?php
2 /************************************************************************/
3 /* AContent                                                             */
4 /************************************************************************/
5 /* Copyright (c) 2010                                                   */
6 /* Inclusive Design Institute                                           */
7 /*                                                                      */
8 /* This program is free software. You can redistribute it and/or        */
9 /* modify it under the terms of the GNU General Public License          */
10 /* as published by the Free Software Foundation.                        */
11 /************************************************************************/
12
13 /** Commented by Cindy Li on Feb 2, 2010
14  * Modified from ATutor mods/_core/imscp/ims_import.php, SVN revision 9126
15  */
16
17 define('TR_INCLUDE_PATH', '../../include/');
18
19 // Validate OAuth token and set $SESSION['user_id']
20 // Must come before require(vitals.inc.php) because vitals redirects to index page 
21 // when $SESSION['user_id'] is not set
22 $oauth_import = false;  // whether the import request is from oauth web service
23
24 // By default, enable the import of associated tests and a4a objects
25
26 if (!isset($_POST['allow_test_import'])) $_POST['allow_test_import'] = 1;
27 if (!isset($_POST['allow_a4a_import'])) $_POST['allow_a4a_import'] = 1;
28
29 // the import request is from oauth web service, find the user id from the given token
30 if (isset($_GET['oauth_token']))
31 {
32         require_once(TR_INCLUDE_PATH.'config.inc.php');
33         require_once(TR_INCLUDE_PATH.'constants.inc.php');
34         
35         if ($_GET['oauth_token'] == '')
36         {
37                 echo "error=".urlencode('Empty OAuth token');
38                 exit;
39         }
40         else
41         {
42                 $oauth_import = true;
43                 require_once(TR_INCLUDE_PATH.'classes/DAO/OAuthServerTokensDAO.class.php');
44                 $oAuthServerTokensDAO = new OAuthServerTokensDAO();
45                 $token_row = $oAuthServerTokensDAO->getByTokenAndType($_GET['oauth_token'], 'access');
46
47                 if (!is_array($token_row))
48                 {
49                         echo "error=".urlencode('Invalid OAuth token');
50                         exit;
51                 }
52                 else if ($oAuthServerTokensDAO->isTokenExpired($_GET['oauth_token']))
53                 {
54                         echo "error=".urlencode('OAuth token expired');
55                         exit;
56                 }
57                 
58                 $_user_id = $token_row[0]['user_id'];
59         }
60 }
61
62 require(TR_INCLUDE_PATH.'vitals.inc.php');
63
64 require_once(TR_INCLUDE_PATH.'classes/Utility.class.php');
65 require_once(TR_INCLUDE_PATH.'../home/classes/ContentUtility.class.php');
66 require_once(TR_INCLUDE_PATH.'classes/DAO/UsersDAO.class.php');
67 require_once(TR_INCLUDE_PATH.'classes/DAO/CoursesDAO.class.php');
68 require_once(TR_INCLUDE_PATH.'classes/DAO/UserCoursesDAO.class.php');
69 require_once(TR_INCLUDE_PATH.'classes/DAO/ContentDAO.class.php');
70 require_once(TR_INCLUDE_PATH.'classes/DAO/TestsQuestionsAssocDAO.class.php');
71 require_once(TR_INCLUDE_PATH.'classes/DAO/ContentTestsAssocDAO.class.php');
72 require_once(TR_INCLUDE_PATH.'classes/FileUtility.class.php'); /* for clr_dir() and preImportCallBack and dirsize() */
73
74 require_once(TR_INCLUDE_PATH.'lib/pclzip.lib.php');
75 require_once(TR_INCLUDE_PATH.'lib/pclzip_callback.lib.php');
76 require_once(TR_INCLUDE_PATH.'lib/qti.inc.php'); 
77 //require(TR_INCLUDE_PATH.'classes/QTI/QTIParser.class.php');   
78 require_once(TR_INCLUDE_PATH.'classes/QTI/QTIImport.class.php');
79 require_once(TR_INCLUDE_PATH.'classes/A4a/A4aImport.class.php');
80 require(TR_INCLUDE_PATH.'../home/ims/ns.inc.php');      //namespace, no longer needs, delete it after it's stable.
81 require_once(TR_INCLUDE_PATH.'classes/Weblinks/WeblinksParser.class.php');
82 require(TR_INCLUDE_PATH.'classes/DiscussionTools/DiscussionToolsParser.class.php');
83 require(TR_INCLUDE_PATH.'classes/DiscussionTools/DiscussionToolsImport.class.php');
84
85 // make sure the user has author privilege
86 Utility::authenticate(TR_PRIV_ISAUTHOR);
87
88 /* to avoid timing out on large files */
89 @set_time_limit(0);
90 $_SESSION['done'] = 1;
91
92 $html_head_tags = array("style", "script", "link");
93
94 $package_base_path = '';
95 $package_real_base_path = '';   //the path to save the contents
96 $all_package_base_path = array();
97 $xml_base_path = '';
98 $element_path = array();
99 $imported_glossary = array();
100 $character_data = '';
101 $test_message = '';
102 $test_title = '';
103 $content_type = '';
104 $skip_ims_validation = false;
105 $added_dt = array();    //the mapping of discussion tools that are added
106 $avail_dt = array();    //list of discussion tools that have not been handled
107
108 function check_available_size($course_id)
109 {
110         global $coursesDAO, $MaxCourseSize, $import_path, $msg, $oauth_import;
111
112         $q_row = $coursesDAO->get($course_id);
113         
114         //$sql  = "SELECT max_quota FROM ".TABLE_PREFIX."courses WHERE course_id=$_SESSION[course_id]";
115         //$result = mysql_query($sql, $db);
116         //$q_row        = mysql_fetch_assoc($result);
117         
118         if ($q_row['max_quota'] == TR_COURSESIZE_UNLIMITED) return;
119         else $zip_size_limit = $MaxCourseSize;
120
121         $totalBytes   = FileUtility::dirsize($import_path);
122         
123         $total_after  = $zip_size_limit - $totalBytes;
124         
125         if (is_dir(TR_CONTENT_DIR . $course_id.'/')) 
126         {
127                 $course_total = FileUtility::dirsize(TR_CONTENT_DIR . $course_id.'/');
128                 $total_after  -= $course_total;
129         }
130         
131         if ($total_after < 0) {
132                 /* remove the content dir, since there's no space for it */
133                 $errors = array('NO_CONTENT_SPACE', number_format(-1*($total_after/TR_KBYTE_SIZE), 2 ) );
134                 $msg->addError($errors);
135                 
136                 // Clean up import path and inserted course row
137                 FileUtility::clr_dir($import_path);
138                 $coursesDAO->Delete($course_id);
139
140                 if (isset($_GET['tile'])) {
141                         header('Location: '.$_base_path.'tools/tile/index.php');
142                 } 
143                 else if ($oauth_import) {
144                         echo "error=".urlencode('No space for the content.');
145                 }
146                 else {
147                         header('Location: '.$_SERVER['HTTP_REFERER']);
148                 }
149                 exit;
150         }
151 }
152
153 /*
154  * return the error messages represented by the given array 
155  * @author      Mike A.
156  * @ref         http://ca3.php.net/manual/en/domdocument.schemavalidate.php
157  */
158 function libxml_display_error($error)
159 {
160     $return = "<br/>\n";
161     switch ($error->level) {
162         case LIBXML_ERR_WARNING:
163             $return .= "<b>Warning $error->code</b>: ";
164             break;
165         case LIBXML_ERR_ERROR:
166             $return .= "<b>Error $error->code</b>: ";
167             break;
168         case LIBXML_ERR_FATAL:
169             $return .= "<b>Fatal Error $error->code</b>: ";
170             break;
171     }
172     $return .= trim($error->message);
173     if ($error->file) {
174         $return .=    " in <b>$error->file</b>";
175     }
176     $return .= " on line <b>$error->line</b>\n";
177
178     return $return;
179 }
180
181 /**
182  * Validate all the XML in the package, including checking XSDs, missing data.
183  * @param       string          the path of the directory that contains all the package files
184  * @return      boolean         true if every file exists in the manifest, false if any is missing.
185  */
186 function checkResources($import_path){
187         global $items, $msg, $skip_ims_validation, $avail_dt;
188
189         if (!is_dir($import_path)){
190                 return;
191         }
192
193         //if the package has access for all content, skip validation for now. 
194         //todo: import the XSD into our validator
195         if ($skip_ims_validation){
196                 return true;
197         }
198
199         //generate a file tree
200         $data = rscandir($import_path);
201
202         //check if every file is presented in the manifest
203         foreach($data as $filepath){
204                 $filepath = substr($filepath, strlen($import_path));
205
206                 //validate xml via its xsd/dtds
207                 if (preg_match('/(.*)\.xml/', $filepath)){
208                         libxml_use_internal_errors(true);
209                         $dom = new DOMDocument();
210                         $dom->load(realpath($import_path.$filepath));
211                         if (!@$dom->schemaValidate('main.xsd')){
212                                 $errors = libxml_get_errors();
213                                 foreach ($errors as $error) {
214                                         //suppress warnings
215                                         if ($error->level==LIBXML_ERR_WARNING){
216                                                 continue;
217                                         }
218                                         $msg->addError(array('IMPORT_CARTRIDGE_FAILED', libxml_display_error($error)));
219                                 }
220                                 libxml_clear_errors();
221                         }
222                         //if this is the manifest file, we do not have to check for its existance.
223 //                      if (preg_match('/(.*)imsmanifest\.xml/', $filepath)){
224 //                              continue;
225 //                      }
226                 }
227         }
228
229         //Create an array that mimics the structure of the data array, based on the xml items
230         $filearray = array();
231         foreach($items as $name=>$fileinfo){
232                 if(isset($fileinfo['file']) && is_array($fileinfo['file']) && !empty($fileinfo['file'])){
233                         foreach($fileinfo['file'] as $fn){
234                                 if (!in_array(realpath($import_path.$fn), $filearray)){
235                                         //if url, skip
236                                         if (preg_match('/^http[s]?\:/', $fn) == 0){
237                                                 $filearray[] = realpath($import_path. $fn);
238                                         }                                       
239                                 }
240                         }
241                 }
242
243                 //validate the xml by its schema
244                 if (preg_match('/imsqti\_(.*)/', $fileinfo['type'])){
245                         $qti = new QTIParser($fileinfo['type']);
246                         $xml_content = @file_get_contents($import_path . $fileinfo['href']);
247                         $qti->parse($xml_content); //will add error to $msg if failed                   
248                 } 
249
250                 //add all dependent discussion tools to a list
251                 if(isset($fileinfo['dependency']) && !empty($fileinfo['dependency'])){
252                         $avail_dt = array_merge($avail_dt, $fileinfo['dependency']);
253                 }
254         }
255
256         //check if all files in the xml is presented in the archieve
257         $result = array_diff($filearray, $data);
258         //using sizeof because array_diff only 
259         //returns an array containing all the entries from array1  that are not present in any of the 
260         //other arrays. 
261         //Using sizeof make sure it's not a subset of array2.
262         //-1 on data because it always contain the imsmanifest.xml file
263         if (!$skip_ims_validation){
264                 if (!empty($result) || sizeof($data)-1>sizeof($filearray)){
265                         $msg->addError(array('IMPORT_CARTRIDGE_FAILED', _AT('ims_missing_references')));
266                 }
267         }
268         return true;
269 }
270
271 /*
272  * @example rscandir(dirname(__FILE__).'/'));
273  * @param string $base
274  * @param array $omit
275  * @param array $data
276  * @return array
277  */
278 function rscandir($base='', &$data=array()) {
279   $array = array_diff(scandir($base), array('.', '..')); # remove ' and .. from the array */
280   foreach($array as $value) : /* loop through the array at the level of the supplied $base */
281  
282     if (is_dir($base.$value)) : /* if this is a directory */
283 //        don't save the directory name
284 //        $data[] = $base.$value.'/'; /* add it to the $data array */
285       $data = rscandir($base.$value.'/', $data); /* then make a recursive call with the
286       current $value as the $base supplying the $data array to carry into the recursion */
287      
288     elseif (is_file($base.$value)) : /* else if the current $value is a file */
289       $data[] = realpath($base.$value); /* just add the current $value to the $data array */
290      
291     endif;
292    
293   endforeach;
294   return $data; // return the $data array
295  
296 }
297
298 /**
299  * Function to restructure the $items.  So that old import will merge the top page into its children, and
300  * create a new folder on top of it
301  */
302 function rehash($items){
303         global $order;
304         $parent_page_maps = array();    //old=>new
305         $temp_popped_items = array();
306         $rehashed_items = array();      //the reconstructed array
307         foreach($items as $id => $content){
308                 $parent_obj = $items[$content['parent_content_id']];
309                 $rehashed_items[$id] = $content;        //copy
310         //first check if this is the top folder of the archieve, we don't want the top folder, remove it.
311 /*        if (isset($content['parent_content_id']) && !isset($parent_obj) && !isset($content['type'])){
312             //if we can get into here, it means the parent_content_id of this is empty
313             //implying this is the first folder.
314             //note: it checks content[type] cause it could be a webcontent. In that case, 
315             //      we do want to keep it.  
316                         debug($content, 'hit');
317             unset($rehashed_items[$id]);
318             continue;
319         }               
320                 //then check if there exists a mapping for this item, if so, simply replace is and next.
321                 else
322 */              if (isset($parent_page_maps[$content['parent_content_id']])){
323                         $rehashed_items [$id]['parent_content_id'] = $parent_page_maps[$content['parent_content_id']];
324                         $rehashed_items [$id]['ordering']++;
325                 } 
326                 //If its parent page is a top page and have an identiferref
327                 elseif (isset($parent_obj) && isset($parent_obj['href'])){                      
328                         if (!isset($parent_obj['href'])){
329                                 //check if this top page is already a folder, if so, next.
330                                 continue;
331                         }
332                         //else, make its parent page to a folder
333                         $new_item['title'] = $parent_obj['title'];
334                         //check if this parent has been modified, if so, chnage it
335                         if (isset($parent_page_maps[$parent_obj['parent_content_id']])){
336                             $new_item['parent_content_id'] = $parent_page_maps[$parent_obj['parent_content_id']];
337                         } else {
338                         $new_item['parent_content_id'] = $parent_obj['parent_content_id'];
339             }
340                         //all ordering needs to be +1 because we are creating a new folder on top of
341                         //everything, except the first page.
342                         $new_item['ordering'] = $parent_obj['ordering'];
343                         if ($new_item['parent_content_id']!='0'){
344                                 $new_item['ordering']++;
345                         } 
346
347                 //assign this new parent folder to the pending items array
348                         $new_item_name = $content['parent_content_id'].'_FOLDER';
349                         //a not so brilliant way to append the folder in its appropriate position
350                         $reordered_hashed_items = array();  //use to store the new rehashed item with the correct item order
351                         foreach($rehashed_items as $rh_id=>$rh_content){
352                             if ($rh_id == $content['parent_content_id']){
353                                 //add the folder in before the parent subpage.
354                                 $reordered_hashed_items[$new_item_name] = $new_item;
355                             }
356                             $reordered_hashed_items[$rh_id] = $rh_content;  //clone
357                         }
358                         $rehashed_items = $reordered_hashed_items;  //replace it back
359                         unset($reordered_hashed_items);
360                         $parent_page_maps[$content['parent_content_id']] = $new_item_name;  //save this page on the hash map
361
362                         //reconstruct the parent
363                         $rehashed_items[$content['parent_content_id']]['parent_content_id'] = $parent_page_maps[$content['parent_content_id']];
364                         $rehashed_items[$content['parent_content_id']]['ordering'] = 0; //always the first one.
365
366                         //reconstruct itself
367                         $rehashed_items[$id]['parent_content_id'] = $parent_page_maps[$content['parent_content_id']];
368                         $rehashed_items[$id]['ordering']++;
369
370                 }
371         }
372         return $rehashed_items;
373 }
374
375 /**
376  * Take out the common path within all $items['new_path'].
377  * This allows import/export repeatedly without duplicating its path
378  * @param   array   contains the breakdown of all resources in the XML
379  */
380 function removeCommonPath($items){
381     $common_path; 
382     $quit = false;  //a flag that is set if it's not the first time being run.
383
384     $filearray = array();
385     //get all files listed in the manifest
386     foreach($items as $name=>$fileinfo){
387                 if(isset($fileinfo['file']) && is_array($fileinfo['file']) && !empty($fileinfo['file'])){
388                         foreach($fileinfo['file'] as $fn){
389                                 if (!in_array($fn, $filearray)){
390                                         if (preg_match('/^http[s]?\:/', $fn) == 0){
391                                                 $filearray[] = $fn;
392                                         }                                       
393                                 }
394                         }
395                 }
396         }
397
398     foreach($filearray as $index=>$path){
399         //hack
400         //check if this is a XML file; if so, skip through, 
401         //cause XML most likely isn't a content resource.
402         $ext = substr($path, (strrpos($path, '.')+1));
403         if($ext=='xml'){
404             continue;
405         }
406         
407         //if common path is empty, assign the first path to it.
408         if ($common_path=='' && $quit==false){
409             $common_path = $path;
410             $quit = true;   //the next time common_path is empty, quit;
411             continue;
412         }
413         //we use '/' here instead of DIRECTORY_SEPARATOR because php would
414         //actually use '\' and return the whole string. 
415         $common_array = explode('/', $common_path);
416         $path_array = explode('/', $path);
417         //convert path_array to absolute path
418         //TODO: array_search is slow, build a faster search
419         $pos=array_search('..', $path_array);
420         while($pos=array_search('..', $path_array)){
421             array_splice($path_array, $pos-1, 2);
422         }
423         $intersect_array = array_intersect($common_array, $path_array);
424         $common_path = implode('/', $intersect_array);       
425     }
426     return $common_path;
427 }
428
429
430 /** 
431  * This function will take the test accessment XML and add these to the database.
432  * @param       string  The path of the XML, without the import_path.
433  * @param       mixed   An item singleton.  Contains the info of this item, namely, the accessment details.
434  *                                      The item must be an object created by the ims class.
435  * @param       string  the import path
436  * @return      mixed   An Array that contains all the question IDs that have been imported.
437  */
438  function addQuestions($xml, $item, $import_path){
439         global $test_title;
440         $qti_import = new QTIImport($import_path);
441         $tests_xml = $import_path.$xml;
442         
443         //Mimic the array for now.
444         $test_attributes['resource']['href'] = $item['href'];
445         $test_attributes['resource']['type'] = preg_match('/imsqti_xmlv1p2/', $item['type'])==1?'imsqti_xmlv1p2':'imsqti_xmlv1p1';
446         $test_attributes['resource']['file'] = $item['file'];
447
448         //Get the XML file out and start importing them into our database.
449         //TODO: See question_import.php 287-289.
450         $qids = $qti_import->importQuestions($test_attributes);
451         $test_title = $qti_import->title;
452
453         return $qids;
454  }
455
456
457         /* called at the start of en element */
458         /* builds the $path array which is the path from the root to the current element */
459         function startElement($parser, $name, $attrs) {
460                 global $items, $path, $package_base_path, $all_package_base_path, $package_real_base_path;
461                 global $element_path, $import_path, $skip_ims_validation;
462                 global $xml_base_path, $test_message, $content_type;
463                 global $current_identifier, $msg, $ns, $ns_cp;
464                 global $course_primary_lang;
465                 
466                 //check if the xml is valid
467 /*
468                 if(isset($attrs['xsi:schemaLocation']) && $name == 'manifest'){
469                         //run the loop and check it thru the ns.inc.php
470                 } elseif ($name == 'manifest' && !isset($attrs['xsi:schemaLocation'])) {
471                         //$msg->addError('MANIFEST_NOT_WELLFORM: NO NAMESPACE');
472                         $msg->addError('IMPORT_CARTRIDGE_FAILED');
473                 } else {
474                         //error
475                 }
476                 //error if the tag names are wrong
477                 if (preg_match('/^xsi\:/', $name) >= 1){
478                         //$msg->addError('MANIFEST_NOT_WELLFORM');
479                         $msg->addError('IMPORT_CARTRIDGE_FAILED');
480                 }
481 */
482
483                 // get language from CONTENT PACKAGE
484                 if (substr($element_path[count($element_path)-1], -6) == ':title' && substr($name, -11) == ':langstring') {
485                         $course_primary_lang = trim($attrs['xml:lang']);
486                 }
487                 
488                 //validate namespaces
489                 if(!$skip_ims_validation && isset($attrs['xsi:schemaLocation']) && $name=='manifest'){
490                         $schema_location = array();
491                         $split_location = preg_split('/[\r\n\s]+/', trim($attrs['xsi:schemaLocation']));
492
493                         //check if the namespace is actually right, have an array or some sort in IMS class
494                         if(sizeof($split_location)%2==1){
495                                 //schema is not in the form of "The first URI reference in each pair is a namespace name,
496                                 //and the second is the location of a schema that describes that namespace."
497                                 //$msg->addError('MANIFEST_NOT_WELLFORM');
498                                 $msg->addError(array('IMPORT_CARTRIDGE_FAILED', _AT('schema_error')));
499                         }
500
501                         //turn the xsi:schemaLocation URI into a schema that describe namespace.
502                         //name = url
503                         //http://msdn.microsoft.com/en-us/library/ms256100(VS.85).aspx
504                         //http://www.w3.org/TR/xmlschema-1/
505                         for($i=0; $i < sizeof($split_location);$i=$i+2){
506                                 /*
507                                 if (isset($ns[$split_location[$i]]) && $ns[$split_location[$i]] != $split_location[$i+1]){
508                                         //$msg->addError('MANIFEST_NOT_WELLFORM: SCHEMA');
509                                         $msg->addError('IMPORT_CARTRIDGE_FAILED');
510                                 }
511                                 */
512                                 //if the key of the namespace is not defined. Throw error.
513                                 if(!isset($ns[$split_location[$i]]) && !isset($ns_cp[$split_location[$i]])){
514                                         $msg->addError(array('IMPORT_CARTRIDGE_FAILED', _AT('schema_error')));
515                                 }
516                         }
517                 } else {
518                         //throw error           
519                 }
520
521                 if ($name == 'manifest' && isset($attrs['xml:base']) && $attrs['xml:base']) {
522                         $xml_base_path = $attrs['xml:base'];
523                 } else if ($name == 'file') {
524                         // check if it misses file references
525                         if(!$skip_ims_validation && (!isset($attrs['href']) || $attrs['href']=='')){
526                                 //$msg->addError('MANIFEST_NOT_WELLFORM');
527                                 $msg->addError(array('IMPORT_CARTRIDGE_FAILED', _AT('ims_missing_references')));
528                         }
529
530                         // special case for webCT content packages that don't specify the `href` attribute 
531                         // with the `<resource>` element.
532                         // we take the `href` from the first `<file>` element.
533                         if (isset($items[$current_identifier]) && ($items[$current_identifier]['href'] == '')) {
534                                 $attrs['href'] = urldecode($attrs['href']);
535                                 $items[$current_identifier]['href'] = $attrs['href'];
536                         }
537
538                         $temp_path = pathinfo($attrs['href']);
539                         $temp_path = explode('/', $temp_path['dirname']);
540                         if (empty($package_base_path)){
541                             $package_base_path = $temp_path;
542             }
543                         if ($all_package_base_path!='' && empty($all_package_base_path)){
544                                 $all_package_base_path = $temp_path;
545                         }
546                         $package_base_path = array_intersect_assoc($package_base_path, $temp_path);
547                         
548                         //calculate the depths of relative paths
549                         if ($all_package_base_path!=''){
550                                 $no_relative_temp_path = $temp_path;
551                                 foreach($no_relative_temp_path as $path_node){
552                                         if ($path_node=='..'){
553                                                 array_pop($no_relative_temp_path);
554                                                 array_pop($no_relative_temp_path); //not a typo, have to pop twice, both itself('..'), and the one before.
555                                         }
556                                 }
557                                 $all_package_base_path = array_intersect_assoc($all_package_base_path, $no_relative_temp_path);
558                                 if (empty($all_package_base_path)){
559                                         $all_package_base_path = '';    //unset it, there is no intersection.
560                                 }
561                         }
562
563                         //save the actual content base path
564                         if (in_array('..', $temp_path)){
565                                 $sizeofrp = array_count_values($temp_path);
566                         }
567
568                         //for IMSCC, assume that all resources lies in the same folder, except styles.css
569                         if ($items[$current_identifier]['type']=='webcontent' || $items[$current_identifier]['type']=='imsdt_xmlv1p0'){
570                                 //find the intersection of each item's related files, then that intersection is the content_path
571                                 if (isset($items[$current_identifier]['file'])){
572                                         foreach ($items[$current_identifier]['file'] as $resource_path){
573                                                 $temp_path = pathinfo($resource_path);
574                                                 $temp_path = explode('/', $temp_path['dirname']);
575                                                 $package_base_path = array_intersect_assoc($package_base_path, $temp_path);                                             
576                                         }
577                                 }
578                         }
579
580                         //real content path
581                         if($sizeofrp['..'] > 0 && !empty($all_package_base_path)){
582                                 for ($i=0; $i<$sizeofrp['..']; $i++){
583                                         array_pop($all_package_base_path);
584                                 }
585                         }
586                         if (count($package_base_path) > 0) {
587                                 $items[$current_identifier]['new_path'] = implode('/', $package_base_path);
588                         }       
589 /* 
590  * @harris, reworked the package_base_path 
591                                 if ($package_base_path=="") {
592                                         $package_base_path = $temp_path;
593                                 } 
594                                 elseif (is_array($package_base_path) && $content_type != 'IMS Common Cartridge') {
595                                         //if this is a content package, we want only intersection
596                                         $package_base_path = array_intersect($package_base_path, $temp_path);
597                                         $temp_path = $package_base_path;
598                                 }
599                                 //added these 2 lines in so that pictures would load.  making the elseif above redundant.
600                                 //if there is a bug for pictures not load, then it's the next 2 lines.
601                                 $package_base_path = array_intersect($package_base_path, $temp_path);
602                                 $temp_path = $package_base_path;
603                         }
604                         $items[$current_identifier]['new_path'] = implode('/', $temp_path);     
605 */
606                         if (isset($_POST['allow_test_import']) && isset($items[$current_identifier]) 
607                                                 && preg_match('/((.*)\/)*tests\_[0-9]+\.xml$/', $attrs['href'])) {
608                                 $items[$current_identifier]['tests'][] = $attrs['href'];
609                         } 
610                         if (isset($_POST['allow_a4a_import']) && isset($items[$current_identifier])) {
611                                 $items[$current_identifier]['a4a_import_enabled'] = true;
612                         }
613                 } else if (($name == 'item') && ($attrs['identifierref'] != '')) {
614                         $path[] = $attrs['identifierref'];
615                 } else if (($name == 'item') && ($attrs['identifier'])) {
616                         $path[] = $attrs['identifier'];
617 //              } else if (($name == 'resource') && is_array($items[$attrs['identifier']]))  {
618                 } else if (($name == 'resource')) {
619                         $current_identifier = $attrs['identifier'];
620                         $items[$current_identifier]['type'] = $attrs['type'];
621                         if ($attrs['href']) {
622                                 $attrs['href'] = urldecode($attrs['href']);
623
624                                 $items[$attrs['identifier']]['href'] = $attrs['href'];
625
626                                 // href points to a remote url
627                                 if (preg_match('/^http.*:\/\//', trim($attrs['href'])))
628                                         $items[$attrs['identifier']]['new_path'] = '';
629                                 else // href points to local file
630                                 {
631                                         $temp_path = pathinfo($attrs['href']);
632                                         $temp_path = explode('/', $temp_path['dirname']);
633 //                                      if (empty($package_base_path)) {
634                                                 $package_base_path = $temp_path;
635 //                                      } 
636 //                                      else {
637 //                                              $package_base_path = array_intersect($package_base_path, $temp_path);
638 //                                      }
639                                         $items[$attrs['identifier']]['new_path'] = implode('/', $temp_path);
640                                 }
641                         }
642
643                         //if test custom message has not been saved
644 //                      if (!isset($items[$current_identifier]['test_message'])){
645 //                              $items[$current_identifier]['test_message'] = $test_message;
646 //                      }
647                 } else if ($name=='dependency' && $attrs['identifierref']!='') {
648                         //if there is a dependency, attach it to the item array['file']
649                         $items[$current_identifier]['dependency'][] = $attrs['identifierref'];
650                 }
651                 if (($name == 'item') && ($attrs['parameters'] != '')) {
652                         $items[$attrs['identifierref']]['test_message'] = $attrs['parameters'];
653                 }
654                 if ($name=='file'){
655                         if(!isset($items[$current_identifier]) && $attrs['href']!=''){
656                                 $items[$current_identifier]['href']      = $attrs['href'];
657                         }
658                         if (substr($attrs['href'], 0, 7) == 'http://' || substr($attrs['href'], 0, 8) == 'https://' || file_exists($import_path.$attrs['href']) || $skip_ims_validation){
659                                 $items[$current_identifier]['file'][] = $attrs['href'];
660                         } else {
661                                 //$msg->addError('');
662                                 $msg->addError(array('IMPORT_CARTRIDGE_FAILED', _AT(array('ims_files_missing', $attrs['href']))));
663                         }
664                 }               
665                 if ($name=='cc:authorizations'){
666                         //don't have authorization setup.
667                         //$msg->addError('');
668                         $msg->addError('IMS_AUTHORIZATION_NOT_SUPPORT');
669                 }
670                 array_push($element_path, $name);
671         }
672
673         /* called when an element ends */
674         /* removed the current element from the $path */
675         function endElement($parser, $name) {
676                 global $path, $element_path, $my_data, $items, $oauth_import;
677                 global $current_identifier, $skip_ims_validation;
678                 global $msg, $content_type;
679                 global $course_title, $course_description, $course_primary_lang;  // added by Cindy Li
680                 static $resource_num = 0;
681                 
682                 if ($name == 'item') {
683                         array_pop($path);
684                 } 
685
686                 // added by Cindy Li on Jan 10, 2010
687                 // Extract course title, description and primary language for a newly-created course
688                 if (substr($element_path[count($element_path)-2], -6) == ':title') {
689                         if (substr($element_path[count($element_path)-1], -7) == ':string' ||
690                             substr($element_path[count($element_path)-1], -11) == ':langstring') {
691                                 $course_title = trim($my_data);
692                         }
693                 }
694                 
695                 if (substr($element_path[count($element_path)-2], -12) == ':description') {
696                         if (substr($element_path[count($element_path)-1], -7) == ':string' ||
697                             substr($element_path[count($element_path)-1], -11) == ':langstring') {
698                                 $course_description = trim($my_data);
699                         }
700                 }
701                 
702                 // get language from COMMON CARTRIDGE
703                 if (substr($element_path[count($element_path)-1], -9) == ':language') {
704                         $course_primary_lang = trim($my_data);
705                 }
706                 // end of added by Cindy Li on Jan 10, 2010
707                 
708                 //check if this is a test import
709                 if ($name == 'schema'){
710                         if (trim($my_data)=='IMS Question and Test Interoperability'){
711                                 if ($oauth_import) {
712                                         echo "error=".urlencode('A test import');
713                                 } else {
714                                         $msg->addError('IMPORT_FAILED');
715                                 }
716                         } 
717                         $content_type = trim($my_data);
718                 }
719
720                 //Handles A4a
721                 if ($current_identifier != ''){
722                         $my_data = trim($my_data);
723                         $last_file_name = $items[$current_identifier]['file'][(sizeof($items[$current_identifier]['file']))-1];
724
725                         if ($name=='originalAccessMode'){                               
726                                 if (in_array('accessModeStatement', $element_path)){
727                                         $items[$current_identifier]['a4a'][$last_file_name][$resource_num]['access_stmt_originalAccessMode'][] = $my_data;
728                                 } elseif (in_array('adaptationStatement', $element_path)){
729                                         $items[$current_identifier]['a4a'][$last_file_name][$resource_num]['adapt_stmt_originalAccessMode'][] = $my_data;
730                                 }                       
731                         } elseif (($name=='language') && in_array('accessModeStatement', $element_path)){
732                                 $items[$current_identifier]['a4a'][$last_file_name][$resource_num]['language'][] = $my_data;
733                         } elseif ($name=='hasAdaptation') {
734                                 $items[$current_identifier]['a4a'][$last_file_name][$resource_num]['hasAdaptation'][] = $my_data;
735                         } elseif ($name=='isAdaptationOf'){
736                                 $items[$current_identifier]['a4a'][$last_file_name][$resource_num]['isAdaptationOf'][] = $my_data;
737                         } elseif ($name=='accessForAllResource'){
738                                 /* the head node of accessForAll Metadata, if this exists in the manifest. Skip XSD validation,
739                                  * because A4a doesn't have a xsd yet.  Our access for all is based on ISO which will not pass 
740                                  * the current IMS validation.  
741                                  * Also, since ATutor is the only one (as of Oct 21, 2009) that exports IMS with access for all
742                                  * content, we can almost assume that any ims access for all content is by us, and is valid. 
743                                  */
744                                 $skip_ims_validation = true;
745                                 $resource_num++;
746                         } elseif($name=='file'){
747                                 $resource_num = 0;      //reset resournce number to 0 when the file tags ends
748                         }
749                 }
750
751                 if ($element_path === array('manifest', 'metadata', 'imsmd:lom', 'imsmd:general', 'imsmd:title', 'imsmd:langstring')) {
752                         global $package_base_name;
753                         $package_base_name = trim($my_data);
754                 }
755
756                 array_pop($element_path);
757                 $my_data = '';
758         }
759
760         /* called when there is character data within elements */
761         /* constructs the $items array using the last entry in $path as the parent element */
762         function characterData($parser, $data){
763                 global $path, $items, $order, $my_data, $element_path;
764                 global $current_identifier;
765
766                 $str_trimmed_data = trim($data);
767                 
768                 if (!empty($str_trimmed_data)) {
769                         $size = count($path);
770                         if ($size > 0) {
771                                 $current_item_id = $path[$size-1];
772                                 if ($size > 1) {
773                                         $parent_item_id = $path[$size-2];
774                                 } else {
775                                         $parent_item_id = 0;
776                                 }
777
778                                 if (isset($items[$current_item_id]['parent_content_id']) && is_array($items[$current_item_id])) {
779
780                                         /* this item already exists, append the title           */
781                                         /* this fixes {\n, \t, `, &} characters in elements */
782
783                                         /* horible kludge to fix the <ns2:objectiveDesc xmlns:ns2="http://www.utoronto.ca/atrc/tile/xsd/tile_objective"> */
784                                         /* from TILE */
785                                         if (in_array('accessForAllResource', $element_path)){
786                                                 //skip this tag
787                                         } elseif ($element_path[count($element_path)-1] != 'ns1:objectiveDesc') {
788                                                 $items[$current_item_id]['title'] .= $data;
789                                         }
790         
791                                 } else {
792                                         $order[$parent_item_id] ++;
793                                         $item_tmpl = array(     'title'                         => $data,
794                                                                                 'parent_content_id' => $parent_item_id,
795                                                                                 'ordering'                      => $order[$parent_item_id]-1);
796                                         //append other array values if it exists
797                                         if (is_array($items[$current_item_id])){
798                                                 $items[$current_item_id] = array_merge($items[$current_item_id], $item_tmpl);
799                                         } else {
800                                                 $items[$current_item_id] = $item_tmpl;
801                                         }
802                                 }
803                         }
804                 }
805
806                 $my_data .= $data;
807         }
808
809         /* glossary parser: */
810         function glossaryStartElement($parser, $name, $attrs) {
811                 global $element_path;
812
813                 array_push($element_path, $name);
814         }
815
816         /* called when an element ends */
817         /* removed the current element from the $path */
818         function glossaryEndElement($parser, $name) {
819                 global $element_path, $my_data, $imported_glossary;
820                 static $current_term;
821
822                 if ($element_path === array('glossary', 'item', 'term') || 
823                         $element_path === array('glossary:glossary', 'item', 'term')) {
824                         $current_term = $my_data;
825
826                 } else if ($element_path === array('glossary', 'item', 'definition') || 
827                                    $element_path === array('glossary:glossary', 'item', 'definition')) {
828                         $imported_glossary[trim($current_term)] = trim($my_data);
829                 }
830
831                 array_pop($element_path);
832                 $my_data = '';
833         }
834
835         function glossaryCharacterData($parser, $data){
836                 global $my_data;
837
838                 $my_data .= $data;
839         }
840
841 if (!isset($_POST['submit']) && !isset($_POST['cancel']) && !isset($_GET['oauth_token'])) {
842         /* just a catch all */
843         $msg->addError('NO_PRIV');
844         header('Location: '.$_SERVER['HTTP_REFERER']);
845         exit;
846 } else if (isset($_POST['cancel'])) {
847         $msg->addFeedback('IMPORT_CANCELLED');
848
849         header('Location: '.$_SERVER['HTTP_REFERER']);
850         exit;
851 }
852
853 $cid = intval($_POST['cid']);
854
855 //If user chooses to ignore validation.
856 if(isset($_POST['ignore_validation']) && $_POST['ignore_validation']==1) {
857         $skip_ims_validation = true;
858 }
859
860 if (isset($_REQUEST['url']) && ($_REQUEST['url'] != 'http://') ) {
861         if ($content = @file_get_contents($_REQUEST['url'])) {
862                 $filename = substr(time(), -6). '.zip';
863                 $full_filename = TR_CONTENT_DIR . $filename;
864
865                 if (!$fp = fopen($full_filename, 'w+b')) {
866                         echo "Cannot open file ($filename)";
867                         exit;
868                 }
869
870                 if (fwrite($fp, $content, strlen($content) ) === FALSE) {
871                         echo "Cannot write to file ($filename)";
872                         exit;
873                 }
874                 fclose($fp);
875         }       
876         $_FILES['file']['name']     = $filename;
877         $_FILES['file']['tmp_name'] = $full_filename;
878         $_FILES['file']['size']     = strlen($content);
879         unset($content);
880 //      $url_parts = pathinfo($_REQUEST['url']);
881 //      $package_base_name_url = $url_parts['basename'];
882     $package_base_name_url = md5(time());
883 }
884 $ext = pathinfo($_FILES['file']['name']);
885 $ext = $ext['extension'];
886
887 if ($ext != 'zip') {
888 //      debug($ext);debug('not zip');exit;
889         $msg->addError('IMPORTDIR_IMS_NOTVALID');
890 } else if ($_FILES['file']['error'] == 1) {
891 //      debug('file error is 1');exit;
892         $errors = array('FILE_MAX_SIZE', ini_get('upload_max_filesize'));
893         $msg->addError($errors);
894 } else if ( !$_FILES['file']['name'] || (!is_uploaded_file($_FILES['file']['tmp_name']) && !$_REQUEST['url'])) {
895 //      debug('file not selected');exit;
896         $msg->addError('FILE_NOT_SELECTED');
897 } else if ($_FILES['file']['size'] == 0) {
898 //      debug('file size 0');exit;
899         $msg->addError('IMPORTFILE_EMPTY');
900
901 $msg->printAll();
902 if ($msg->containsErrors()) {
903         if (isset($_GET['tile'])) {
904                 header('Location: '.$_base_path.'tools/tile/index.php');
905         } else if ($oauth_import) {
906                 echo "error=".urlencode('Invalid imported file');
907         } else {
908                 header('Location: '.$_SERVER['HTTP_REFERER']);
909         }
910         if (file_exists($full_filename)) @unlink($full_filename);
911         exit;
912 }
913
914 /* check if ../content/import/ exists */
915 $import_path = TR_CONTENT_DIR . 'import/';
916 $content_path = TR_CONTENT_DIR;
917
918 if (!is_dir($import_path)) {
919         if (!@mkdir($import_path, 0700)) {
920                 $msg->addError('IMPORTDIR_FAILED');
921         }
922 }
923
924 if (isset($_POST['_course_id'])) $import_path .= $_POST['_course_id'].'/';
925 else $import_path .= Utility::getRandomStr(16).'/';
926
927 if (is_dir($import_path)) {
928         FileUtility::clr_dir($import_path);
929 }
930
931 if (!@mkdir($import_path, 0700)) {
932         $msg->addError('IMPORTDIR_FAILED');
933 }
934
935 if ($msg->containsErrors()) {
936         if (isset($_GET['tile'])) {
937                 header('Location: '.$_base_path.'tools/tile/index.php');
938         } else if ($oauth_import) {
939                 echo "error=".urlencode('Cannot create import directory');
940         } else {
941                 header('Location: '.$_SERVER['HTTP_REFERER']);
942         }
943         if (file_exists($full_filename)) @unlink($full_filename);
944         exit;
945 }
946
947 /* extract the entire archive into TR_COURSE_CONTENT . import/$course using the call back function to filter out php files */
948 error_reporting(0);
949 $archive = new PclZip($_FILES['file']['tmp_name']);
950
951 if ($archive->extract(  PCLZIP_OPT_PATH,        $import_path,
952                                                 PCLZIP_CB_PRE_EXTRACT,  'preImportCallBack') == 0) {
953         if ($oauth_import) {
954                 echo "error=".urlencode('Cannot unzip the package');
955         } else {
956                 $msg->addError('IMPORT_FAILED');
957                 echo 'Error : '.$archive->errorInfo(true);
958         }
959         FileUtility::clr_dir($import_path);
960         header('Location: '.$_SERVER['HTTP_REFERER']);
961         if (file_exists($full_filename)) @unlink($full_filename);
962         exit;
963 }
964 //error_reporting(AT_ERROR_REPORTING);
965
966 /* initialize DAO objects */
967 $coursesDAO = new CoursesDAO();
968 $contentDAO = new ContentDAO();
969 $testsQuestionsAssocDAO = new TestsQuestionsAssocDAO();
970 $contentTestsAssocDAO = new ContentTestsAssocDAO();
971
972 // get the course's max_quota
973 if (isset($_POST['_course_id']))
974 {
975         check_available_size($_POST['_course_id']);
976 }
977
978 $items = array(); /* all the content pages */
979 $order = array(); /* keeps track of the ordering for each content page */
980 $path  = array();  /* the hierarchy path taken in the menu to get to the current item in the manifest */
981 $dependency_files = array(); /* the file path for the dependency files */
982
983 /*
984 $items[content_id/resource_id] = array(
985                                                                         'title'
986                                                                         'real_content_id' // calculated after being inserted
987                                                                         'parent_content_id'
988                                                                         'href'
989                                                                         'ordering'
990                                                                         );
991 */
992 $ims_manifest_xml = @file_get_contents($import_path.'imsmanifest.xml');
993
994 //scan for manifest xml if it's not on the top level.
995 if ($ims_manifest_xml === false){
996         $data = rscandir($import_path);
997         $manifest_array = array();
998         foreach($data as $scanned_file){
999                 $scanned_file = realpath($scanned_file);
1000                 //change the file string to an array
1001                 $this_file_array = explode(DIRECTORY_SEPARATOR, $scanned_file);
1002                 if(empty($manifest_array)){
1003                         $manifest_array = $this_file_array;
1004                 }
1005                 $manifest_array = array_intersect_assoc($this_file_array, $manifest_array);
1006
1007                 if (strpos($scanned_file, 'imsmanifest')!==false){
1008                         $ims_manifest_xml = @file_get_contents($scanned_file);
1009                 }
1010         }
1011         if ($ims_manifest_xml !== false){
1012                 $import_path = implode(DIRECTORY_SEPARATOR, $manifest_array) . DIRECTORY_SEPARATOR;
1013         }
1014 }
1015
1016 //if no imsmanifest.xml found in the entire package, throw error.
1017 if ($ims_manifest_xml === false) {
1018         $msg->addError('NO_IMSMANIFEST');
1019
1020         if (file_exists($import_path . 'atutor_backup_version')) {
1021                 $msg->addError('NO_IMS_BACKUP');
1022         }
1023         FileUtility::clr_dir($import_path);
1024
1025         if (isset($_GET['tile'])) {
1026                 header('Location: '.$_base_path.'tools/tile/index.php');
1027         } else if ($oauth_import) {
1028                 echo "error=".urlencode('IMS manifest file does not appear to be valid');
1029         } else {
1030                 header('Location: '.$_SERVER['HTTP_REFERER']);
1031         }
1032         if (file_exists($full_filename)) @unlink($full_filename);
1033         exit;
1034 }
1035
1036 $xml_parser = xml_parser_create();
1037
1038 xml_parser_set_option($xml_parser, XML_OPTION_CASE_FOLDING, false); /* conform to W3C specs */
1039 xml_set_element_handler($xml_parser, 'startElement', 'endElement');
1040 xml_set_character_data_handler($xml_parser, 'characterData');
1041
1042 if (!xml_parse($xml_parser, $ims_manifest_xml, true)) {
1043         die(sprintf("XML error: %s at line %d",
1044                                 xml_error_string(xml_get_error_code($xml_parser)),
1045                                 xml_get_current_line_number($xml_parser)));
1046 }
1047 xml_parser_free($xml_parser);
1048 /* check if the glossary terms exist */
1049 /* Commented by Cindy Li on Jan 7, 2010. Transformable does not include glossary
1050 $glossary_path = '';
1051 if ($content_type == 'IMS Common Cartridge'){
1052         $glossary_path = 'resources/GlossaryItem/';
1053 //      $package_base_path = '';
1054 }
1055 if (file_exists($import_path . $glossary_path . 'glossary.xml')){
1056         $glossary_xml = @file_get_contents($import_path.$glossary_path.'glossary.xml');
1057         $element_path = array();
1058         $xml_parser = xml_parser_create();
1059
1060         // insert the glossary terms into the database (if they're not in there already)
1061         // parse the glossary.xml file and insert the terms
1062         xml_parser_set_option($xml_parser, XML_OPTION_CASE_FOLDING, false); // conform to W3C specs
1063         xml_set_element_handler($xml_parser, 'glossaryStartElement', 'glossaryEndElement');
1064         xml_set_character_data_handler($xml_parser, 'glossaryCharacterData');
1065
1066         if (!xml_parse($xml_parser, $glossary_xml, true)) {
1067                 die(sprintf("XML error: %s at line %d",
1068                                         xml_error_string(xml_get_error_code($xml_parser)),
1069                                         xml_get_current_line_number($xml_parser)));
1070         }
1071         xml_parser_free($xml_parser);
1072         $contains_glossary_terms = true;
1073         foreach ($imported_glossary as $term => $defn) {
1074                 if (!$glossary[$term]) {
1075                         $sql = "INSERT INTO ".TABLE_PREFIX."glossary VALUES (NULL, $_SESSION[course_id], '$term', '$defn', 0)";
1076                         mysql_query($sql, $db); 
1077                 }
1078         }
1079 }
1080 */
1081 // Check if all the files exists in the manifest, iff it's a IMS CC package.
1082 if ($content_type == 'IMS Common Cartridge') {
1083         checkResources($import_path);
1084 }
1085
1086 // Check if there are any errors during parsing.
1087 if ($msg->containsErrors()) {
1088         if (isset($_GET['tile'])) {
1089                 header('Location: '.$_base_path.'tools/tile/index.php');
1090         } else if ($oauth_import) {
1091                 echo "error=".urlencode('Error at parsing IMS manifest file');
1092         } else {
1093                 header('Location: '.$_SERVER['HTTP_REFERER']);
1094         }
1095         if (file_exists($full_filename)) @unlink($full_filename);
1096         exit;
1097 }
1098
1099 // added by Cindy Li on Jan 10, 2010
1100 // generate a course_id if the import is not into an existing course
1101 if (!isset($_POST['_course_id']))
1102 {
1103         if (isset($_POST['hide_course']))
1104                 $access = 'private';
1105         else
1106                 $access = 'public';
1107         
1108         if (isset($course_primary_lang))
1109         {
1110                 $langcode_and_charset = explode('-', $course_primary_lang);
1111 //              $course_primary_lang = Utility::get3LetterLangCode($langcode_and_charset[0]);
1112                 $course_primary_lang = $langcode_and_charset[0];
1113         }
1114         
1115         $_course_id = $coursesDAO->Create($_SESSION['user_id'], 'top', $access, $course_title, $course_description, 
1116                      '', '', '', '', $course_primary_lang, '', '');
1117         
1118         check_available_size($_course_id);
1119
1120         // insert author role into table "user_courses"
1121         $userCoursesDAO = new UserCoursesDAO();
1122         $userCoursesDAO->Create($_SESSION['user_id'], $_course_id, TR_USERROLE_AUTHOR, 0);
1123 }
1124 else $_course_id = $_POST['_course_id'];
1125
1126 // end of added by Cindy Li on Jan 10, 2010
1127
1128 /* generate a unique new package base path based on the package file name and date as needed. */
1129 /* the package name will be the dir where the content for this package will be put, as a result */
1130 /* the 'content_path' field in the content table will be set to this path. */
1131 /* $package_base_name_url comes from the URL file name (NOT the file name of the actual file we open)*/
1132 if (!$package_base_name && $package_base_name_url) {
1133         $package_base_name = substr($package_base_name_url, -6);
1134 } else if (!$package_base_name) {
1135         $package_base_name = substr($_FILES['file']['name'], 0, -4);
1136 }
1137
1138 $package_base_name = strtolower($package_base_name);
1139 $package_base_name = str_replace(array('\'', '"', ' ', '|', '\\', '/', '<', '>', ':'), '_' , $package_base_name);
1140 $package_base_name = preg_replace("/[^A-Za-z0-9._\-]/", '', $package_base_name);
1141
1142 $course_dir = TR_CONTENT_DIR.$_course_id.'/';
1143
1144 if (is_dir($course_dir.$package_base_name)) {
1145         $package_base_name .= '_'.date('ymdHis');
1146 }
1147
1148 if ($package_base_path) {
1149         $package_base_path = implode('/', $package_base_path);
1150 } elseif (empty($package_base_path)){
1151         $package_base_path = '';
1152 }
1153
1154 if ($xml_base_path) {
1155         $package_base_path = $xml_base_path . $package_base_path;
1156
1157         mkdir($import_path.$xml_base_path);
1158         $package_base_name = $xml_base_path . $package_base_name;
1159 }
1160
1161 /* get the top level content ordering offset */
1162 //$sql  = "SELECT MAX(ordering) AS ordering FROM ".TABLE_PREFIX."content WHERE course_id=$_SESSION[course_id] AND content_parent_id=$cid";
1163 //$result = mysql_query($sql, $db);
1164 //$row  = mysql_fetch_assoc($result);
1165 //$order_offset = intval($row['ordering']); /* it's nice to have a real number to deal with */
1166 $order_offset = $contentDAO->getMaxOrdering($_course_id, 0);
1167 $lti_offset = array();  //since we don't need lti tools, the ordering needs to be subtracted
1168 //reorder the items stack
1169 $common_path = removeCommonPath($items);
1170 $items = rehash($items);
1171 //debug($items);exit;
1172 foreach ($items as $item_id => $content_info) 
1173 {       
1174         //formatting field, default 1
1175         $content_formatting = 1;        //CONTENT_TYPE_CONTENT
1176
1177         //don't want to display glossary as a page
1178         if ($content_info['href']== $glossary_path . 'glossary.xml'){
1179                 continue;
1180         }
1181
1182         //if discussion tools, add it to the list of unhandled dts
1183         if ($content_info['type']=='imsdt_xmlv1p0'){
1184                 //if it will be taken care after (has dependency), then move along.
1185                 if (in_array($item_id, $avail_dt)){
1186                         $lti_offset[$content_info['parent_content_id']]++;
1187                         continue;
1188                 }
1189         }
1190
1191         //handle the special case of cc import, where there is no content association. The resource should
1192         //still be imported.
1193         if(!isset($content_info['parent_content_id'])){
1194                 //if this is a question bank 
1195                 if ($content_info['type']=="imsqti_xmlv1p2/imscc_xmlv1p0/question-bank"){
1196                         addQuestions($content_info['href'], $content_info, $import_path);
1197                 }
1198         }
1199
1200         //if it has no title, most likely it is not a page but just a normal item, skip it
1201         if (!isset($content_info['title'])){
1202                 continue;
1203         }
1204         
1205         //check dependency immediately, then handles it
1206         $head = '';
1207         if (is_array($content_info['dependency']) && !empty($content_info['dependency'])){
1208                 foreach($content_info['dependency'] as $dependency_ref){
1209                         //handle styles 
1210                         /** handled by get_html_head in vitals.inc.php
1211                         if (preg_match('/(.*)\.css$/', $items[$dependency_ref]['href'])){
1212                                 //calculate where this is based on our current base_href. 
1213                                 //assuming the dependency folders are siblings of the item
1214                                 $head = '<link rel="stylesheet" type="text/css" href="../'.$items[$dependency_ref]['href'].'" />';
1215                         }
1216                         */
1217                         //check if this is a discussion tool dependency
1218                         if ($items[$dependency_ref]['type']=='imsdt_xmlv1p0'){
1219                                 $items[$item_id]['forum'][$dependency_ref] = $items[$dependency_ref]['href'];
1220                         }
1221                         //check if this is a QTI dependency
1222                         if (strpos($items[$dependency_ref]['type'], 'imsqti_xmlv1p2/imscc_xmlv1p0') !== false){
1223                                 $items[$item_id]['tests'][$dependency_ref] = $items[$dependency_ref]['href'];
1224                         }
1225                 }
1226         }
1227
1228         //check file array, see if there are css. 
1229         //edited nov 26, harris
1230         //removed cuz i added link to the html_tags
1231         /*
1232         if (is_array($content_info['file']) && !empty($content_info['file'])){
1233                 foreach($content_info['file'] as $dependency_ref){
1234                         //handle styles 
1235                         if (preg_match('/(.*)\.css$/', $dependency_ref)){
1236                                 //calculate where this is based on our current base_href. 
1237                                 //assuming the dependency folders are siblings of the item
1238                                 $head = '<link rel="stylesheet" type="text/css" href="'.$dependency_ref.'" />';
1239                         }
1240                 }
1241         }
1242         */
1243
1244         // remote href
1245         if (preg_match('/^http.*:\/\//', trim($content_info['href'])) )
1246         {
1247                 $content = '<a href="'.$content_info['href'].'" target="_blank">'.$content_info['title'].'</a>';
1248         }
1249         else
1250         {
1251                 if ($content_type == 'IMS Common Cartridge'){
1252                         //to handle import with purely images but nothing else
1253                         //don't need a content base path for it.
1254                         $content_new_path = $content_info['new_path'];
1255                         $content_info['new_path'] = '';
1256                 }
1257                 if (isset($content_info['href'], $xml_base_path)) {
1258                         $content_info['href'] = $xml_base_path . $content_info['href'];
1259                 }
1260                 if (!isset($content_info['href'])) {
1261                         // this item doesn't have an identifierref. so create an empty page.
1262                         // what we called a folder according to v1.2 Content Packaging spec
1263                         // Hop over
1264                         $content = '';
1265                         $ext = '';
1266                         $last_modified = date('Y-m-d H:i:s');
1267                 } else {
1268                         //$file_info = @stat(TR_CONTENT_DIR . 'import/'.$_POST['_course_id'].'/'.$content_info['href']);
1269                         $file_info = @stat($import_path.$content_info['href']);
1270                         if ($file_info === false) {
1271                                 continue;
1272                         }
1273                 
1274                         //$path_parts = pathinfo(TR_CONTENT_DIR . 'import/'.$_POST['_course_id'].'/'.$content_info['href']);
1275                         $path_parts = pathinfo($import_path.$content_info['href']);
1276                         $ext = strtolower($path_parts['extension']);
1277
1278                         $last_modified = date('Y-m-d H:i:s', $file_info['mtime']);
1279                 }
1280                 if (in_array($ext, array('gif', 'jpg', 'bmp', 'png', 'jpeg'))) {
1281                         /* this is an image */
1282                         $content = '<img src="'.$content_info['href'].'" alt="'.$content_info['title'].'" />';
1283                 } else if ($ext == 'swf') {
1284                         /* this is flash */
1285             /* Using default size of 550 x 400 */
1286
1287                         $content = '<object type="application/x-shockwave-flash" data="' . $content_info['href'] . '" width="550" height="400"><param name="movie" value="'. $content_info['href'] .'" /></object>';
1288
1289                 } else if ($ext == 'mov') {
1290                         /* this is a quicktime movie  */
1291             /* Using default size of 550 x 400 */
1292
1293                         $content = '<object classid="clsid:02BF25D5-8C17-4B23-BC80-D3488ABDDC6B" width="550" height="400" codebase="http://www.apple.com/qtactivex/qtplugin.cab"><param name="src" value="'. $content_info['href'] . '" /><param name="autoplay" value="true" /><param name="controller" value="true" /><embed src="' . $content_info['href'] .'" width="550" height="400" controller="true" pluginspage="http://www.apple.com/quicktime/download/"></embed></object>';
1294
1295                 /* Oct 19, 2009
1296                  * commenting this whole chunk out.  It's part of my test import codes, not sure why it's here, 
1297                  * and I don't think it should be here.  Remove this whole comment after further testing and confirmation.
1298                  * @harris
1299                  *
1300                         //Mimic the array for now.
1301                         $test_attributes['resource']['href'] = $test_xml_file;
1302                         $test_attributes['resource']['type'] = isset($items[$item_id]['type'])?'imsqti_xmlv1p2':'imsqti_xmlv1p1';
1303                         $test_attributes['resource']['file'] = $items[$item_id]['file'];
1304 //                      $test_attributes['resource']['file'] = array($test_xml_file);
1305
1306                         //Get the XML file out and start importing them into our database.
1307                         //TODO: See question_import.php 287-289.
1308                         $qids = $qti_import->importQuestions($test_attributes);
1309                 
1310                  */
1311                 } else if ($ext == 'mp3') {
1312                         $content = '<object classid="clsid:02BF25D5-8C17-4B23-BC80-D3488ABDDC6B" width="200" height="15" codebase="http://www.apple.com/qtactivex/qtplugin.cab"><param name="src" value="'. $content_info['href'] . '" /><param name="autoplay" value="false" /><embed src="' . $content_info['href'] .'" width="200" height="15" autoplay="false" pluginspage="http://www.apple.com/quicktime/download/"></embed></object>';
1313                 } else if (in_array($ext, array('wav', 'au'))) {
1314                         $content = '<embed SRC="'.$content_info['href'].'" autostart="false" width="145" height="60"><noembed><bgsound src="'.$content_info['href'].'"></noembed></embed>';
1315
1316                 } else if (in_array($ext, array('txt', 'css', 'html', 'htm', 'csv', 'asc', 'tsv', 'xml', 'xsl'))) {
1317                         if ($content_type == 'IMS Common Cartridge'){
1318                                 $content_info['new_path'] = $content_new_path;
1319                         }
1320
1321                         /* this is a plain text file */
1322                         //$content = file_get_contents(TR_CONTENT_DIR . 'import/'.$_POST['_course_id'].'/'.$content_info['href']);
1323                         $content = file_get_contents($import_path.$content_info['href']);
1324                         if ($content === false) {
1325                                 /* if we can't stat() it then we're unlikely to be able to read it */
1326                                 /* so we'll never get here. */
1327                                 continue;
1328                         }
1329
1330                         // get the contents of the 'head' element
1331                         $head .= ContentUtility::getHtmlHeadByTag($content, $html_head_tags);
1332                         
1333                         // Specifically handle eXe package
1334                         // NOTE: THIS NEEDS WORK! TO FIND A WAY APPLY EXE .CSS FILES ONLY ON COURSE CONTENT PART.
1335                         // NOW USE OUR OWN .CSS CREATED SOLELY FOR EXE
1336                         $isExeContent = false;
1337
1338                         // check xml file in eXe package
1339                         if (preg_match("/<organization[ ]*identifier=\"eXe*>*/", $ims_manifest_xml))
1340                         {
1341                                 $isExeContent = true;
1342                         }
1343
1344                         // use ATutor's eXe style sheet as the ones from eXe conflicts with ATutor's style sheets
1345                         if ($isExeContent)
1346                         {
1347                                 $head = preg_replace ('/(<style.*>)(.*)(<\/style>)/ms', '\\1@import url(/docs/exestyles.css);\\3', $head);
1348                         }
1349
1350                         // end of specifically handle eXe package
1351
1352                         $content = ContentUtility::getHtmlBody($content);
1353                         if ($contains_glossary_terms) 
1354                         {
1355                                 // replace glossary content package links to real glossary mark-up using [?] [/?]
1356                                 // refer to bug 3641, edited by Harris
1357                                 $content = preg_replace('/<a href="([.\w\d\s]+[^"]+)" target="body" class="at-term">([.\w\d\s&;"]+|.*)<\/a>/i', '[?]\\2[/?]', $content);
1358                         }
1359
1360                         /* potential security risk? */
1361                         if ( strpos($content_info['href'], '..') === false && !preg_match('/((.*)\/)*tests\_[0-9]+\.xml$/', $content_info['href'])) {
1362 //                              @unlink(TR_CONTENT_DIR . 'import/'.$_POST['_course_id'].'/'.$content_info['href']);
1363                         }
1364
1365                         // overwrite content if this is discussion tool.
1366                         if ($content_info['type']=='imsdt_xmlv1p0'){
1367                                 $dt_parser = new DiscussionToolsParser();
1368                                 $xml_content = @file_get_contents($import_path . $content_info['href']);
1369                                 $dt_parser->parse($xml_content);
1370                                 $forum_obj = $dt_parser->getDt();
1371                                 $content = $forum_obj->getText();
1372                                 unset($forum_obj);
1373                                 $dt_parser->close();
1374                         }
1375                 } else if ($ext) {
1376                         /* non text file, and can't embed (example: PDF files) */
1377                         $content = '<a href="'.$content_info['href'].'">'.$content_info['title'].'</a>';
1378                 }       
1379         }
1380         $content_parent_id = $cid;
1381         if ($content_info['parent_content_id'] !== 0) {
1382                 $content_parent_id = $items[$content_info['parent_content_id']]['real_content_id'];
1383                 //if it's not there, use $cid
1384                 if (!$content_parent_id){
1385                         $content_parent_id = $cid;
1386                 }
1387         }
1388
1389         $my_offset = 0;
1390         if ($content_parent_id == $cid) {
1391                 $my_offset = $order_offset;
1392         }
1393
1394         /* replace the old path greatest common denomiator with the new package path. */
1395         /* we don't use str_replace, b/c there's no knowing what the paths may be         */
1396         /* we only want to replace the first part of the path.  
1397         */
1398         if(is_array($all_package_base_path)){
1399                 $all_package_base_path = implode('/', $all_package_base_path);
1400         }
1401
1402         if ($common_path != '') {
1403                 $content_info['new_path'] = $package_base_name . substr($content_info['new_path'], strlen($common_path));
1404         } else {
1405                 $content_info['new_path'] = $package_base_name . '/' . $content_info['new_path'];
1406         }
1407
1408         //handles weblinks
1409         if ($content_info['type']=='imswl_xmlv1p0'){
1410                 $weblinks_parser = new WeblinksParser();
1411                 $xml_content = @file_get_contents($import_path . $content_info['href']);
1412                 $weblinks_parser->parse($xml_content);
1413                 $content_info['title'] = $weblinks_parser->getTitle();
1414                 $content = $weblinks_parser->getUrl();
1415                 $content_folder_type = CONTENT_TYPE_WEBLINK;
1416                 $content_formatting = 2;
1417         }
1418 //      $head = addslashes($head);
1419 //      $content_info['title'] = addslashes($content_info['title']);
1420 //      $content_info['test_message'] = addslashes($content_info['test_message']);
1421
1422         //if this file is a test_xml, create a blank page instead, for imscc.
1423         if (preg_match('/((.*)\/)*tests\_[0-9]+\.xml$/', $content_info['href']) 
1424                 || preg_match('/imsqti\_(.*)/', $content_info['type'])) {
1425                 $content = ' ';
1426         } 
1427 //      else {
1428 //              $content = addslashes($content);
1429 //      }
1430
1431         //check for content_type
1432         if ($content_formatting!=CONTENT_TYPE_WEBLINK){
1433                 $content_folder_type = (!isset($content_info['type'])?CONTENT_TYPE_FOLDER:CONTENT_TYPE_CONTENT);
1434         }
1435         
1436         $items[$item_id]['real_content_id'] = $contentDAO->Create($_course_id, intval($content_parent_id), 
1437                             ($content_info['ordering'] + $my_offset - $lti_offset[$content_info['parent_content_id']] + 1),
1438                             0, $content_formatting, "", $content_info['new_path'], $content_info['title'],
1439                             $content, $head, 1, $content_info['test_message'], $content_folder_type);
1440
1441 //      $sql= 'INSERT INTO '.TABLE_PREFIX.'content'
1442 //            . '(course_id, 
1443 //                content_parent_id, 
1444 //                ordering,
1445 //                last_modified, 
1446 //                revision, 
1447 //                formatting, 
1448 //                release_date,
1449 //                head,
1450 //                use_customized_head,
1451 //                keywords, 
1452 //                content_path, 
1453 //                title, 
1454 //                text,
1455 //                        test_message,
1456 //                        content_type) 
1457 //             VALUES 
1458 //                           ('.$_SESSION['course_id'].','                                                                                                                      
1459 //                           .intval($content_parent_id).','            
1460 //                           .($content_info['ordering'] + $my_offset - $lti_offset[$content_info['parent_content_id']] + 1).','
1461 //                           .'"'.$last_modified.'",                                                                                                    
1462 //                            0,'
1463 //                           .$content_formatting.' ,
1464 //                            NOW(),"'
1465 //                           . $head .'",
1466 //                           1,
1467 //                            "",'
1468 //                           .'"'.$content_info['new_path'].'",'
1469 //                           .'"'.$content_info['title'].'",'
1470 //                           .'"'.$content.'",'
1471 //                               .'"'.$content_info['test_message'].'",'
1472 //                               .$content_folder_type.')';
1473 //
1474 //      $result = mysql_query($sql, $db) or die(mysql_error());
1475 //
1476 //      /* get the content id and update $items */
1477 //      $items[$item_id]['real_content_id'] = mysql_insert_id($db);
1478
1479         /* get the tests associated with this content */
1480         if (!empty($items[$item_id]['tests']) || strpos($items[$item_id]['type'], 'imsqti_xmlv1p2/imscc_xmlv1p0') !== false){
1481                 $qti_import = new QTIImport($import_path);
1482                 if (isset($items[$item_id]['tests'])){
1483                         $loop_var = $items[$item_id]['tests'];
1484                 } else {
1485                         $loop_var = $items[$item_id]['file'];
1486                 }
1487
1488                 foreach ($loop_var as $array_id => $test_xml_file){
1489                         //check if this item is the qti item object, or it is the content item obj
1490                         //switch it to qti obj if it's content item obj
1491                         if ($items[$item_id]['type'] == 'webcontent'){
1492                                 $item_qti = $items[$array_id];
1493                         } else {
1494                                 $item_qti = $items[$item_id];
1495                         }
1496                         //call subrountine to add the questions.
1497                         $qids = addQuestions($test_xml_file, $item_qti, $import_path);
1498
1499                         //import test
1500                         if ($test_title==''){
1501                                 $test_title = $content_info['title'];
1502                         }
1503
1504                         $tid = $qti_import->importTest($test_title);
1505
1506                         //associate question and tests
1507                         foreach ($qids as $order=>$qid){
1508                                 if (isset($qti_import->weights[$order])){
1509                                         $weight = round($qti_import->weights[$order]);
1510                                 } else {
1511                                         $weight = 0;
1512                                 }
1513                                 $new_order = $order + 1;
1514                                 $testsQuestionsAssocDAO->Create($tid, $qid, $weight, $new_order);
1515 //                              $sql = "INSERT INTO " . TABLE_PREFIX . "tests_questions_assoc" . 
1516 //                                              "(test_id, question_id, weight, ordering, required) " .
1517 //                                              "VALUES ($tid, $qid, $weight, $new_order, 0)";
1518 //                              $result = mysql_query($sql, $db);
1519                         }
1520
1521                         //associate content and test
1522                         $contentTestsAssocDAO->Create($items[$item_id]['real_content_id'], $tid);
1523 //                      $sql =  'INSERT INTO ' . TABLE_PREFIX . 'content_tests_assoc' . 
1524 //                                      '(content_id, test_id) ' .
1525 //                                      'VALUES (' . $items[$item_id]['real_content_id'] . ", $tid)";
1526 //                      $result = mysql_query($sql, $db);
1527                 
1528 //                      if (!$msg->containsErrors()) {
1529 //                              $msg->addFeedback('IMPORT_SUCCEEDED');
1530 //                      }
1531                 }
1532         }
1533
1534         /* get the a4a related xml */
1535         if (isset($items[$item_id]['a4a_import_enabled']) && isset($items[$item_id]['a4a']) && !empty($items[$item_id]['a4a'])) {
1536                 $a4a_import = new A4aImport($items[$item_id]['real_content_id']);
1537                 $a4a_import->setRelativePath($items[$item_id]['new_path']);
1538                 $a4a_import->importA4a($items[$item_id]['a4a']);
1539         }
1540
1541         // get the discussion tools (dependent to content)
1542         if (isset($items[$item_id]['forum']) && !empty($items[$item_id]['forum'])){
1543                 foreach($items[$item_id]['forum'] as $forum_ref => $forum_link){
1544                         $dt_parser = new DiscussionToolsParser();
1545                         $dt_import = new DiscussionToolsImport();
1546
1547                         //if this forum has not been added, parse it and add it.
1548                         if (!isset($added_dt[$forum_ref])){
1549                                 $xml_content = @file_get_contents($import_path . $forum_link);
1550                                 $dt_parser->parse($xml_content);
1551                                 $forum_obj = $dt_parser->getDt();
1552                                 $dt_import->import($forum_obj, $items[$item_id]['real_content_id'], $_course_id);
1553                                 $added_dt[$forum_ref] = $dt_import->getFid();                           
1554                         }
1555                         //associate the fid and content id
1556 //                      $dt_import->associateForum($items[$item_id]['real_content_id'], $added_dt[$forum_ref]);
1557                 }
1558         } elseif ($items[$item_id]['type']=='imsdt_xmlv1p0'){
1559                 //optimize this, repeated codes as above
1560                 $dt_parser = new DiscussionToolsParser();
1561                 $dt_import = new DiscussionToolsImport();
1562                 $xml_content = @file_get_contents($import_path . $content_info['href']);
1563                 $dt_parser->parse($xml_content);
1564                 $forum_obj = $dt_parser->getDt();
1565                 $dt_import->import($forum_obj, $items[$item_id]['real_content_id'], $_course_id);
1566                 $added_dt[$item_id] = $dt_import->getFid();
1567
1568                 //associate the fid and content id
1569 //              $dt_import->associateForum($items[$item_id]['real_content_id'], $added_dt[$item_id]);
1570         }
1571 }
1572
1573 //exit;//harris
1574 if ($package_base_path == '.') {
1575         $package_base_path = '';
1576 }
1577
1578 // create course directory
1579 if (!is_dir($course_dir)) {
1580         if (!@mkdir($course_dir, 0700)) {
1581                 $msg->addError('IMPORTDIR_FAILED');
1582         }
1583 }
1584
1585 // loop through the files outside the package folder, and copy them to its relative path
1586 /**
1587 if (is_dir($import_path.'resources')) {
1588         $handler = opendir($import_path.'resources');
1589         while ($file = readdir($handler)){
1590                 $filename = $import_path.'resources/'.$file;
1591                 if(is_file($filename)){
1592                         @rename($filename, $course_dir.$package_base_name.'/'.$file);
1593                 }
1594         }
1595         closedir($handler);
1596 }
1597 **/
1598 //--- harris edit for path thing
1599 $file = $import_path.$common_path;
1600 if (is_dir($file)) {
1601     rename($file, TR_CONTENT_DIR.$_course_id.DIRECTORY_SEPARATOR.$package_base_name);
1602 }
1603 //--- end
1604 //takes care of the condition where the whole package doesn't have any contents but question banks
1605 //also is the case of urls
1606 if(is_array($all_package_base_path)){
1607         $all_package_base_path = implode('/', $all_package_base_path);
1608
1609         if(strpos($all_package_base_path, 'http:/')===false){
1610                 if (rename($import_path.$all_package_base_path, $course_dir.$package_base_name) === false) {
1611                 if (!$msg->containsErrors()) {
1612                                 if ($oauth_import) {
1613                                         echo "error=".urlencode('Cannot move lesson directory into content directory');
1614                                 } else {
1615                                         $msg->addError('IMPORT_FAILED');
1616                                 }
1617                 }
1618             }
1619         }
1620 }
1621 //check if there are still resources missing
1622 /*
1623 foreach($items as $idetails){
1624         $temp_path = pathinfo($idetails['href']);
1625         @rename($import_path.$temp_path['dirname'], $course_dir.$package_base_name . '/' . $temp_path['dirname']);
1626 }
1627 */
1628 FileUtility::clr_dir($import_path);
1629
1630 if (file_exists($full_filename)) @unlink($full_filename);
1631
1632 if ($oauth_import) {
1633         echo 'course_id='.$_course_id;
1634 } else {
1635         if (!$msg->containsErrors()) {
1636                 $msg->addFeedback('ACTION_COMPLETED_SUCCESSFULLY');
1637         }
1638         header('Location: ../course/index.php?_course_id='.$_course_id);
1639 }
1640 exit;
1641
1642 //      if ($_POST['s_cid']){
1643 //      if (!$msg->containsErrors()) {
1644 //              $msg->addFeedback('ACTION_COMPLETED_SUCCESSFULLY');
1645 //      }
1646 //      header('Location: ../../editor/edit_content.php?cid='.intval($_POST['cid']));
1647 //      exit;
1648 //} else {
1649 //      if (!$msg->containsErrors()) {
1650 //              $msg->addFeedback('ACTION_COMPLETED_SUCCESSFULLY');
1651 //      }
1652 //      if ($_GET['tile']) {
1653 //              header('Location: '.TR_BASE_HREF.'tools/tile/index.php');
1654 //      } else {
1655 //              header('Location: ../index.php?cid='.intval($_POST['cid']));
1656 //      }
1657 //      exit;
1658 //}
1659
1660 ?>