123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471 |
- <?php // $Id: index.php 16620 2008-10-25 20:03:54Z yannoo $
- /*
- ==============================================================================
- Dokeos - elearning and course management software
- Copyright (c) 2004-2008 Dokeos SPRL
- Copyright (c) 2003 Ghent University (UGent)
- For a full list of contributors, see "credits.txt".
- The full license can be read in "license.txt".
- This program is free software; you can redistribute it and/or
- modify it under the terms of the GNU General Public License
- as published by the Free Software Foundation; either version 2
- of the License, or (at your option) any later version.
- See the GNU General Public License for more details.
- Contact: Dokeos, rue Notre Dame, 152, B-1140 Evere, Belgium, info@dokeos.com
- ==============================================================================
- */
- /**
- ==============================================================================
- * This file was origially the copy of document.php, but many modifications happened since then ;
- * the direct file view is not any more needed, if the user uploads a scorm zip file, a directory
- * will be automatically created for it, and the files will be uncompressed there for example ;
- *
- * @package dokeos.learnpath
- * @author Yannick Warnier <ywarnier@beeznest.org>
- ==============================================================================
- */
- /**
- * Script
- */
- // name of the language file that needs to be included
- $language_file = "scormdocument";
- //flag to allow for anonymous user - needs to be set before global.inc.php
- $use_anonymous = true;
- require('back_compat.inc.php');
- include('learnpath_functions.inc.php');
- include_once('scorm.lib.php');
- $courseDir = api_get_course_path().'/scorm';
- $baseWordDir = $courseDir;
- require_once('learnpathList.class.php');
- require_once('learnpath.class.php');
- require_once('learnpathItem.class.php');
- // storing the tables names in variables.
- $tbl_document = Database::get_course_table(TABLE_SCORMDOC);
- $tbl_learnpath_main = Database::get_course_table(TABLE_LEARNPATH_MAIN);
- $tbl_tool = Database::get_course_table(TABLE_TOOL_LIST);
- $default_visibility="v";
- $show_description_field=0;
- /**
- * Display initialisation and security checks
- */
- //extra javascript functions for in html head:
- $htmlHeadXtra[] =
- "<script language='javascript' type='text/javascript'>
- function confirmation(name)
- {
- if (confirm(\" ".trim(get_lang('AreYouSureToDelete'))." ?\"))
- {return true;}
- else
- {return false;}
- }
- </script>";
- // Define the 'doc.inc.php' as language file
- //$nameTools = get_lang("Doc");
- // When GET['learnpath_id'] is defined, it means that
- // a learnpath has been chosen, so we redirect to
- // learnpath_handler - we possibly lose the $dialogBox warning here
- if(!empty($_GET['learnpath_id']))
- {
- header('location:../learnpath/learnpath_handler.php?'
- .'learnpath_id='.$_GET['learnpath_id']);
- exit();
- }
- event_access_tool(TOOL_LEARNPATH);
- if (! $is_allowed_in_course) api_not_allowed();
- /**
- * Now checks have been done, prepare the data to be displayed
- */
- if(!empty($openDir))
- {
- //prevent going higher than allowed in the hierarchy
- //if the requested dir is found inside the base course dir, use course dir
- //error_log($courseDir." against ".$openDir,0);
- if((strstr($courseDir,$openDir)===false) and (strstr($openDir,'.')===false) ){
- $curDirPath = $openDir;
- }else{
- $curDirPath = $courseDir;
- }
- }
- else
- {
- $curDirPath= $courseDir;
- }
- if ($curDirPath == "/" || $curDirPath == "\\" || strstr($curDirPath, ".."))
- {
- $curDirPath =""; // manage the root directory problem
- /*
- * The strstr($curDirPath, "..") prevent malicious users to go to the root directory
- */
- }
- $curDirName = basename($curDirPath);
- $parentDir = dirname($curDirPath);
- if ($parentDir == "/" || $parentDir == "\\")
- {
- $parentDir =""; // manage the root directory problem
- }
- /* Search infos in the DB about the current directory the user is in */
- $result = mysql_query ("SELECT * FROM $tbl_document
- WHERE path LIKE '".$curDirPath."/%'
- AND path NOT LIKE '".$curDirPath."/%/%'");
- if ($result) while($row = mysql_fetch_array($result, MYSQL_ASSOC))
- {
- $attribute['path' ][] = $row['path' ];
- $attribute['visibility'][] = $row['visibility'];
- $attribute['comment' ][] = $row['comment' ];
- }
- $fileList = get_scorm_paths_from_dir($baseWorkDir.$curDirPath,$attribute);
- if(!isset($fileList)){
- die("<center>
- <b>Wrong directory !</b>
- <br> Please contact your platform administrator.
- </center>");
- }
- /*
- * Sort alphabetically the File list
- */
- if (is_array($fileList) && count($fileList)>0)
- {
- array_multisort($fileList['type'], $fileList['name'],
- $fileList['size'], $fileList['date'],
- $fileList['comment'],$fileList['visibility']);
- }
- /*----------------------------------------
- CHECK BASE INTEGRITY
- --------------------------------------*/
- /* commented until we know what it's for
- if ( is_array($attribute) && ( count($attribute['path']) > 0 ) )
- {
- $queryClause = ' WHERE path IN ( "'.implode('" , "' , $attribute['path']).'" )';
- api_sql_query("DELETE FROM $tbl_document ".$queryClause,__FILE__,__LINE__);
- api_sql_query("DELETE FROM $tbl_document WHERE comment LIKE '' AND visibility LIKE 'v'",__FILE__,__LINE__);
- // The second query clean the DB 'in case of' empty records (no comment an visibility=v)
- // These kind of records should'nt be there, but we never know...
- } // end if sizeof($attribute['path']) > 0
- */
- unset($attribute);
- /**
- * Display
- */
- Display::display_header($nameTools,"Path");
- $dspCurDirName = htmlentities($curDirName);
- $cmdCurDirPath = rawurlencode($curDirPath);
- $cmdParentDir = rawurlencode($parentDir);
- $ob_string = '';
- api_display_tool_title($nameTools);
- /*
- -----------------------------------------------------------
- Introduction section
- (editable by course admins)
- -----------------------------------------------------------
- */
- if($my_version=='1.8'){
- Display::display_introduction_section(TOOL_LEARNPATH);
- }else{
- api_introductionsection(TOOL_LEARNPATH);
- }
- if(api_is_allowed_to_edit())
- {
- /*--------------------------------------
- UPLOAD SECTION - displays file upload box
- --------------------------------------*/
- echo "<!-- upload -->",
- "<p align=\"right\">",
- "<form action=\"".api_get_self()."?openDir=", rawurlencode($openDir),
- "&subdirs=$subdirs\" method=\"post\" enctype=\"multipart/form-data\">",
- "<input type=\"hidden\" name=\"uploadPath\" value=\"$curDirPath\" />",
- get_lang('DownloadFile')," : ",
- "<input type=\"file\" name=\"userFile\" />",
- "<input type=\"submit\" value=\"".get_lang('Download')."\" /> ",
- "</p></form>";
- /*--------------------------------------
- DIALOG BOX SECTION
- --------------------------------------*/
- if ($dialogBox)
- {
- Display::display_normal_message($dialogBox);
- }
- echo "<table border='0' cellspacing='2' cellpadding='4'>
- <tr>
- <td valign='bottom'>
- <a href='".api_get_self()."?action=add'>",
- "<img src='../img/scormbuilder.gif' border=\"0\" align=\"absmiddle\" alt='scormbuilder' />".get_lang('_add_learnpath')."</a>
- </td>",
- "<td valign='bottom'> <a href='".api_get_self()."?createDir=$cmdCurDirPath'>",
- "<img src=\"../img/dossier.gif\" border=\"0\" align=\"absmiddle\" />",
- "",get_lang("CreateDir"),"</a>
- </td>
- </tr>
- </table>";
- }
- echo "<table width=\"100%\" border=\"0\" cellspacing=\"2\" class='data_table'>";
- api_is_allowed_to_edit() ? $colspan = 9 : $colspan = 3;
- if ($curDirName) /* if the $curDirName is empty, we're in the root point
- and we can't go to a parent dir */
- {
- ?>
- <!-- parent dir -->
- <a href="<?php echo api_get_self().'?'.api_get_cidreq().'&openDir='.$cmdParentDir.'&subdirs=yes'; ?>">
- <img src="../img/folder_up.gif" border="0" align="absbottom" hspace="5" alt="parent" />
- <?php echo get_lang("Up"); ?></a>
- <?php
- }
- if ($curDirPath)
- {
- if(substr($curDirPath,1,1)=='/'){
- $tmpcurDirPath=substr($curDirPath,1,strlen($curDirPath));
- }else{
- $tmpcurDirPath = $curDirPath;
- }
- ?>
- <!-- current dir name -->
- <tr>
- <td colspan="<?php echo $colspan ?>" align="left" bgcolor="#4171B5">
- <img src="../img/opendir.gif" align="absbottom" vspace="2" hspace="3" alt="open_dir" />
- <?php echo $tmpcurDirPath ?>
- </td>
- </tr>
- <?php
- }
- /* CURRENT DIRECTORY */
- echo "<tr bgcolor=\"$color2\" align=\"center\" valign=\"top\">";
- echo "<td width='290'><b>",get_lang("Name"),"</b></td>\n",
- "<td><b>",get_lang("Description"),"</b></td>\n";
- if (api_is_allowed_to_edit())
- {
- echo "<td><b>",get_lang("ExportShort"),"</b></td>\n",
- "<td width='200'><b>",get_lang("Modify"),"</b></td>\n";
- }
- echo "</tr>\n";
- /*--------------------------------------
- DISPLAY SCORM LIST
- --------------------------------------*/
- if ($fileList)
- {
- $counter=0;
- while (list($fileKey, $fileName) = each ($fileList['name']))
- {
- $counter++;
- if (($counter % 2)==0) { $oddclass="row_odd"; } else { $oddclass="row_even"; }
- if ($fileList['type'][$fileKey] == A_FILE) continue; // RH: added
- $dspFileName = htmlentities($fileName);
- $cmdFileName = rawurlencode($curDirPath."/".$fileName);
- if ($fileList['visibility'][$fileKey] == "i")
- {
- if (api_is_allowed_to_edit())
- {
- $style=" class='invisible'";
- }
- else
- {
- continue; // skip the display of this file
- }
- }
- else
- {
- $style="";
- }
- $manifestRoute = $baseWorkDir.$curDirPath."/".$fileName.'/imsmanifest.xml';
- $plantyndir1 = $baseWorkDir.$curDirPath."/".$fileName.'/LMS';
- $plantyndir2 = $baseWorkDir.$curDirPath."/".$fileName.'/REF';
- $plantyndir3 = $baseWorkDir.$curDirPath."/".$fileName.'/SCO';
- $aiccdir = $baseWorkDir.$curDirPath."/".$fileName.'/aicc';
- $indexRoute1 = $indexRoute2 = $indexRouteA = '';
- if ((file_exists($plantyndir1)) and (file_exists($plantyndir2)) and (file_exists($plantyndir3))) {
- $indexRoute1 = $baseWorkDir.$curDirPath."/".$fileName.'/index.htm';
- $indexRoute2 = $baseWorkDir.$curDirPath."/".$fileName.'/index.html';
- }
- if (file_exists($aiccdir)) {
- $indexRouteA = $baseWorkDir.$curDirPath."/".$fileName.'/start.htm';
- }
- if (file_exists($indexRoute1)) {
- $urlFileName = api_get_self().'?'.api_get_cidreq().'&openDir='.$cmdFileName.'&indexRoute=index.htm';
- $image="<img src=\"./../img/scorm_logo.gif\" border=\"0\" align=\"absmiddle\" alt='scorm' />";
- } elseif (file_exists($indexRoute2)) {
- $urlFileName = api_get_self().'?'.api_get_cidreq().'&openDir='.$cmdFileName.'&indexRoute=index.html';
- $image="<img src=\"./../img/scorm_logo.gif\" border=\"0\" align=\"absmiddle\" alt='scorm'>";
- } elseif (file_exists($indexRouteA)) {
- $urlFileName = api_get_self().'?'.api_get_cidreq().'&openDir='.$cmdFileName.'&indexRoute=start.htm';
- $image="<img src=\"./../img/scorm_logo.gif\" border=\"0\" align=\"absmiddle\" alt='scorm'>";
- } elseif (file_exists($manifestRoute)) {
- $urlFileName = api_get_self().'?'.api_get_cidreq().'&openDir='.$cmdFileName;
- $image="<img src=\"./../img/scorm_logo.gif\" border=\"0\" align=\"absmiddle\" alt='scorm'>";
- } else {
- $urlFileName = api_get_self().'?'.api_get_cidreq().'&subdirs=yes&openDir='.$cmdFileName;
- $image="<img src=\"../img/dossier.gif\" border=\"0\" hspace=\"3\" align=\"absmiddle\" alt='scorm'>";
- }
- if ($curDirPath) {
- $sqlpath=$curDirPath."/".$fileList['name'][$fileKey]."";
- } else {
- $sqlpath="/".$fileList['name'][$fileKey]."";
- }
- $sql="SELECT name FROM $tbl_document WHERE ((path='$sqlpath') and (filetype='folder'))";
- $result=api_sql_query($sql,__FILE__,__LINE__);
- $row=mysql_fetch_array($result);
- if ($row['name']) { $name=$row['name']; } else { $name=$dspFileName; }
- echo "<tr align=\"center\"", " class=".$oddclass.">\n",
- "<td align=\"left\" valign='middle'> ",
- "<a href=\"".$urlFileName."\" ".$style.">",
- "",$image,"</a> <a href=\"".$urlFileName."\" ".$style.">",$name,"</a>",
- "</td>\n";
- /* NB : Before tracking implementation the url above was simply
- * "<a href=\"",$urlFileName,"\"",$style,">"
- */
- $desc=$fileList['comment'][$fileKey];
- /* DESCRIPTION */
- echo "<td>$desc",
- "</td>\n";
- if(api_is_allowed_to_edit())
- {
- $fileExtension=explode('.',$dspFileName);
- $fileExtension=strtolower($fileExtension[sizeof($fileExtension)-1]);
- /* export */
- echo "<td align='center'><a href='".api_get_self()."?action=exportscorm&".api_get_cidreq()."&path=".$cmdFileName."'><img src=\"../img/save_zip.gif\" border=\"0\" title=\"".get_lang('Export')."\"></a>";
- /* edit title and description */
- echo "<td align='center'>",
- "<a href='".api_get_self()."?action=editscorm&path=".$cmdFileName."'><img src=\"../img/edit.gif\" border=\"0\" title=\"".get_lang('_edit_learnpath')."\"></a>";
- /* DELETE COMMAND */
- echo
- "<a href=\"".api_get_self()."?delete=",$cmdFileName,"\" ",
- "onClick=\"return confirmation('",addslashes($dspFileName),"');\">",
- "<img src=\"../img/delete.gif\" border=\"0\" title=\"".get_lang('_delete_learnpath')."\" />",
- "</a>";
- /* VISIBILITY COMMAND */
- if ($fileList['visibility'][$fileKey] == "i")
- {
- echo "<a href=\"".api_get_self()."?make_directory_visible=",$cmdFileName,"\">",
- "<img src=\"../img/invisible.gif\" border=\"0\" title=\"".get_lang('_publish')."\" />",
- "</a>";
- }
- else
- {
- echo "<a href=\"".api_get_self()."?make_directory_invisible=",$cmdFileName,"\">",
- "<img src=\"../img/visible.gif\" border=\"0\" title=\"".get_lang('_no_publish')."\" />",
- "</a>";
- }
- } // end if($is_allowedToEdit)
- echo "</tr>\n";
- } // end each ($fileList)
- }// end if ( $fileList)
- //display learning paths
- if (!$curDirPath) {
- echo "<tr><td colspan='4'> </td></tr>";
- $sql="select * from $tbl_learnpath_main";
- $result=api_sql_query($sql,__FILE__,__LINE__);
- $counter=0;
- while ($row=mysql_fetch_array($result)) {
- $counter++;
- if (($counter % 2)==0) { $oddclass="row_odd"; } else { $oddclass="row_even"; }
- $id=$row["learnpath_id"];
- $sql2="SELECT * FROM $tbl_learnpath_main where learnpath_id=$id";
- $result2=api_sql_query($sql2,__FILE__,__LINE__);
- $row2=mysql_fetch_array($result2);
- $name=$row2['learnpath_name'];
- $sql3="SELECT * FROM $tbl_tool where (name=\"$name\" and image='scormbuilder.gif')";
- $result3=api_sql_query($sql3,__FILE__,__LINE__);
- $row3=mysql_fetch_array($result3);
- if ((api_is_allowed_to_edit()) or ((!api_is_allowed_to_edit()) and ($row3["visibility"] == '1'))) {
- $row['learnpath_name']=str_replace(' ',' ',$row['learnpath_name']);
- if ($row3["visibility"] != '1') { $style=' class="invisible"'; } else { $style=''; }
- echo "<tr align=\"center\" class=".$oddclass.">\n",
- "<td align='left'> ",
- "<a href=\"../learnpath/learnpath_handler.php?".api_get_cidreq()."&learnpath_id={$row['learnpath_id']}\" $style>",
- "<img src='../img/scormbuilder.gif' border=\"0\" alt='scormbuilder'></a> ",
- "<a href=\"../learnpath/learnpath_handler.php?".api_get_cidreq()."&learnpath_id={$row['learnpath_id']}\" $style>{$row['learnpath_name']}</a></td>",
- "<td> {$row['learnpath_description']}</td>";
- }
- if(api_is_allowed_to_edit()) {
- //no init of $circle1 here
- echo "<td align='center'><a href='".api_get_self()."?action=exportpath&id=".$row["learnpath_id"]."'><img src=\"../img/save_zip.gif\" border=\"0\" title=\"".get_lang('Export')."\"></a>";
- echo "<td align='center'><a href='".api_get_self()."?action=editpath&id=".$row["learnpath_id"]."'><img src=\"../img/edit.gif\" border=\"0\" title=\"".get_lang('_edit_learnpath')."\"></a>";
- echo "<a href='".api_get_self()."?action=deletepath&id=".$row["learnpath_id"]."'><img src=\"../img/delete.gif\" border=\"0\" title=\"".get_lang('_delete_learnpath')."\" onClick=\"return confirmation('".$row2['learnpath_name']."');\"></a>";
- if (($row3["visibility"])=='1') {
- echo "<a href='".api_get_self()."?action=publishpath&set_visibility=i&id=".$row["learnpath_id"]."'><img src=\"../img/visible.gif\" border=\"0\" alt=\"".get_lang('_no_publish')."\" title=\"".get_lang('_no_publish')."\"></a>";
- } else {
- echo "<a href='".api_get_self()."?action=publishpath&set_visibility=v&id=".$row["learnpath_id"]."'><img src=\"../img/invisible.gif\" border=\"0\" alt=\"".get_lang('_publish')."\" title=\"".get_lang('_publish')."\"></a>";
- }
- echo "</td>";
- }
- echo "</tr>";
- }
- }
- echo "</table>";
- // echo "</div>"; /* *** end of the div opened earlier, if needed then uncomment*/
- echo "<br/><br/>";
- /*
- ==============================================================================
- FOOTER
- ==============================================================================
- */
- Display::display_footer();
- ?>
|