/backup/bb/restore_bb.php

<?php // $Id: restore_bb.php,v 1.7.16.3 2009/09/16 11:18:56 danmarsden Exp $

// This file facilitates the conversion of a Blackboard course export

// into a Moodle course export.  It assumes an unzipped directory and makes in-place alterations.



defined('MOODLE_INTERNAL') or die('Direct access to this script is forbidden.');



// Ziba Scott <ziba@linuxbox.com> 10-25-04

require_once($CFG->dirroot.'/backup/bb/xsl_emulate_xslt.inc');

  

function get_subdirs($directory){

    $opendirectory = opendir( $directory );

    while(false !== ($filename = readdir($opendirectory))) {

        if (is_dir($directory.$filename) and $filename != ".." and $filename != "."){

            $subdirs[] = $filename;

        }

    }

    closedir($opendirectory);

    return $subdirs;

}





function choose_bb_xsl($manifest){

    $f = fopen($manifest,"r");

    $buffer = fgets($f, 400);

    $buffer = fgets($f, 400);

    fclose($f);

    if (strstr($buffer,"xmlns:bb=\"http://www.blackboard.com/content-packaging/\"")){

        return "bb6_to_moodle.xsl";

    }

    return "bb5.5_to_moodle.xsl";

}





function blackboard_convert($dir){

    global $CFG;





    // Check for a Blackboard manifest file

    if (is_readable($dir.'/imsmanifest.xml') && !is_readable($dir.'/moodle.xml')){



        if (!function_exists('xslt_create')) {  // XSLT MUST be installed for this to work

            notify('You need the XSLT library installed in PHP to open this Blackboard file');

            return false;

        }



        //Select the proper XSL file

        $xslt_file = choose_bb_xsl($dir.'/imsmanifest.xml');





        //TODO: Use the get_string function for this

        echo "<li>Converting Blackboard export</li>";



        // The XSL file must be in the same directory as the Blackboard files when it is processed

        if (!copy($CFG->dirroot."/backup/bb/$xslt_file", "$dir/$xslt_file")) {

            notify('Could not copy the XSLT file to '."$dir/$xslt_file");

            return false;

        }



        // Change to that directory

        $startdir = getcwd();

        chdir($dir);





        // Process the Blackboard XML files with the chosen XSL file.

        // The imsmanifest contains all the XML files and their relationships. 

        // The XSL processor will open them as needed.

        $xsltproc = xslt_create();

        if (!xslt_process($xsltproc, 'imsmanifest.xml', "$dir/$xslt_file", "$dir/moodle.xml")) {

            notify('Failed writing xml file');

            chdir($startdir);

            return false;

        }





        // Copy the Blackboard course files into the moodle course_files structure

        $subdirs = get_subdirs($dir."/");

        mkdir("$dir/course_files", $CFG->directorypermissions);

        foreach ($subdirs as $subdir){

            rename($subdir, "course_files/$subdir");

            rename_hexfiles($subdir);

        }



        chdir($startdir);



        // Blackboard export successfully converted

        return true;

    }

    // This is not a Blackboard export

    return true;



}



/**

 * grabs all files in the directory, checks if the filenames start with a ! or @

 * then checks to see if the name is a hex - if so, it translates/renames correctly.

 *

 * @param string $subdir - the directory to parse.

 * 

 */

function rename_hexfiles($subdir) {

    //this bit of code grabs all files in the directory, and if they start with ! or @, performs the name conversion

    if ($handle = opendir("course_files/$subdir")) {

        while ($file = readdir($handle)) {

            if ($file == '..' or $file == '.') { //don't bother processing these!

                continue;

            }

            if(substr($file,0,1)=="!" || substr($file,0,1)=="@"){

                $outputfilename = "";

                $filebase = substr($file,1,strrpos($file,".")-1);

                if (ctype_xdigit($filebase)) { //check if this name is a hex - if not, don't bother to rename

                    $filenamesplit = str_split($filebase,2);

                    foreach($filenamesplit as $hexvalue){

                        $outputfilename .= chr(hexdec($hexvalue));

                    }

                    $outputfilename .= strrchr($file,".");

                    rename("course_files/$subdir/$file","course_files/$subdir/$outputfilename");

                }

            }

        }

        closedir($handle);

    }

}

?>