- ', $i, 0); // this is a recursive function that will grab all the bullets and rebuild the list in html
break;
default:
if ($matches[3][$i] != '
') { // odd crap generated... sigh
if (substr($matches[3][$i], 0, 1) == ':') { // check for leading : ... hate MS ...
$page->contents[] = substr($matches[3][$i], 1); // get rid of :
} else {
$page->contents[] = $matches[3][$i];
}
}
break;
}
}
/*if (count($page->contents) == 0) { // didnt find anything, grab everything
// potential to pull in a lot of crap
for($i = 0; $i < count($matches[1]); $i++) {
//if($class = isolate_class($matches[1][$i])) {
//if ($class == 'O') {
if ($matches[3][$i] != '
') { // odd crap generated... sigh
if (substr($matches[3][$i], 0, 1) == ':') { // check for leading : ... hate MS ...
$page->contents[] = substr($matches[3][$i], 1); // get rid of :
} else {
$page->contents[] = $matches[3][$i];
}
}
//}
//}
}
}*/
// add the page to the array;
$extratedpages[] = $page;
} // end $pages foreach loop
return $extratedpages;
}
/**
A recursive function to build a html list
*/
function build_list($list, &$i, $depth) {
global $matches; // not sure why I global this...
while($i < count($matches[1])) {
$class = isolate_class($matches[1][$i]);
if (strstr($class, 'B')) { // make sure we are still working with bullet classes
if ($class == 'B') {
$this_depth = 0; // calling class B depth 0
} else {
// set the depth number. So B1 is depth 1 and B2 is depth 2 and so on
$this_depth = substr($class, 1);
if (!is_numeric($this_depth)) {
print_error('invalidnum');
}
}
if ($this_depth < $depth) {
// we are moving back a level in the nesting
break;
}
if ($this_depth > $depth) {
// we are moving in a lvl in nesting
$list .= '
- '.ppt_clean_text($matches[3][$i]).' '; } $i++; } else { // not a B class, so get out of here... break; } } // end the list and return it $list .= '
- ';
$list = build_list($list, $i, $this_depth);
// once we return back, should go to the start of the while
continue;
}
// no depth changes, so add the match to our list
if ($cleanstring = ppt_clean_text($matches[3][$i])) {
$list .= '
return substr($class, 0, strpos($class, '>'));
}
} else {
// no class defined in the tag
return '';
}
}
/**
This function strips off the random chars that ppt puts infront of bullet lists
*/
function ppt_clean_text($string) {
$chop = 1; // default: just a single char infront of the content
// look for any other crazy things that may be infront of the content
if (strstr($string, '<') and strpos($string, '<') == 0) { // look for the < in the sting and make sure it is in the front
$chop = 4; // increase the $chop
}
// may need to add more later....
$string = substr($string, $chop);
if ($string != '
') {
return $string;
} else {
return false;
}
}
/**
Clean up the temp directory
*/
function clean_temp() {
global $CFG;
// this function is broken, use it to clean up later
// should only clean up what we made as well because someone else could be importing ppt as well
//delDirContents($CFG->dataroot.'/temp/lesson');
}
/**
Creates objects an object with the page and answers that are to be inserted into the database
*/
function lesson_create_objects($pageobjects, $lessonid) {
$branchtables = array();
$branchtable = new stdClass;
// all pages have this info
$page->lessonid = $lessonid;
$page->prevpageid = 0;
$page->nextpageid = 0;
$page->qtype = LESSON_BRANCHTABLE;
$page->qoption = 0;
$page->layout = 1;
$page->display = 1;
$page->timecreated = time();
$page->timemodified = 0;
// all answers are the same
$answer->lessonid = $lessonid;
$answer->jumpto = LESSON_NEXTPAGE;
$answer->grade = 0;
$answer->score = 0;
$answer->flags = 0;
$answer->timecreated = time();
$answer->timemodified = 0;
$answer->answer = "Next";
$answer->response = "";
$answers[] = clone($answer);
$answer->jumpto = LESSON_PREVIOUSPAGE;
$answer->answer = "Previous";
$answers[] = clone($answer);
$branchtable->answers = $answers;
$i = 1;
foreach ($pageobjects as $pageobject) {
$temp = prep_page($pageobject, $i); // makes our title and contents
$page->title = $temp->title;
$page->contents = $temp->contents;
$branchtable->page = clone($page); // add the page
$branchtables[] = clone($branchtable); // add it all to our array
$i++;
}
return $branchtables;
}
/**
Creates objects an chapter object that is to be inserted into the database
*/
function book_create_objects($pageobjects, $bookid) {
global $DB;
$chapters = array();
$chapter = new stdClass;
// same for all chapters
$chapter->bookid = $bookid;
$chapter->pagenum = $DB->count_records('book_chapters', array('bookid'=>$bookid))+1;
$chapter->timecreated = time();
$chapter->timemodified = time();
$chapter->subchapter = 0;
$i = 1;
foreach ($pageobjects as $pageobject) {
$page = prep_page($pageobject, $i); // get title and contents
$chapter->importsrc = $pageobject->source; // add the source
$chapter->title = $page->title;
$chapter->content = $page->contents;
$chapters[] = $chapter;
// increment our page number and our counter
$chapter->pagenum = $chapter->pagenum + 1;
$i++;
}
return $chapters;
}
/**
Builds the title and content strings from an object
*/
function prep_page($pageobject, $count) {
if ($pageobject->title == '') {
$page->title = "Page $count"; // no title set so make a generic one
} else {
$page->title = $pageobject->title;
}
$page->contents = '';
// nab all the images first
foreach ($pageobject->images as $image) {
$image = str_replace("\n", '', $image);
$image = str_replace("\r", '', $image);
$image = str_replace("'", '"', $image); // imgstyle
$page->contents .= $image;
}
// go through the contents array and put
tags around each element and strip out \n which I have found to be uneccessary foreach ($pageobject->contents as $content) { $content = str_replace("\n", '', $content); $content = str_replace("\r", '', $content); $content = str_replace(' ', '', $content); // puts in returns? $content = '
'.$content.'
'; $page->contents .= $content; } return $page; } /** Saves the branchtable objects to the DB */ function lesson_save_objects($branchtables, $lessonid, $after) { global $DB; // first set up the prevpageid and nextpageid if ($after == 0) { // adding it to the top of the lesson $prevpageid = 0; // get the id of the first page. If not found, then no pages in the lesson if (!$nextpageid = $DB->get_field('lesson_pages', 'id', array('prevpageid' => 0, 'lessonid' => $lessonid))) { $nextpageid = 0; } } else { // going after an actual page $prevpageid = $after; $nextpageid = $DB->get_field('lesson_pages', 'nextpageid', array('id' => $after)); } foreach ($branchtables as $branchtable) { // set the doubly linked list $branchtable->page->nextpageid = $nextpageid; $branchtable->page->prevpageid = $prevpageid; // insert the page $id = $DB->insert_record('lesson_pages', $branchtable->page); // update the link of the page previous to the one we just updated if ($prevpageid != 0) { // if not the first page $DB->set_field("lesson_pages", "nextpageid", $id, array("id" => $prevpageid)); } // insert the answers foreach ($branchtable->answers as $answer) { $answer->pageid = $id; $DB->insert_record('lesson_answers', $answer); } $prevpageid = $id; } // all done with inserts. Now check to update our last page (this is when we import between two lesson pages) if ($nextpageid != 0) { // if the next page is not the end of lesson $DB->set_field("lesson_pages", "prevpageid", $id, array("id" => $nextpageid)); } return true; } /** Save the chapter objects to the database */ function book_save_objects($chapters, $bookid, $pageid='0') { global $DB; // nothing fancy, just save them all in order foreach ($chapters as $chapter) { $chapter->id = $DB->insert_record('book_chapters', $chapter); } return true; } ?>