123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377 |
- <?php
- // $Id: CourseRecycler.class.php 12117 2007-04-24 22:06:36Z pcool $
- /*
- ==============================================================================
- Dokeos - elearning and course management software
- Copyright (c) 2004 Dokeos S.A.
- Copyright (c) 2003 Ghent University (UGent)
- Copyright (c) 2001 Universite catholique de Louvain (UCL)
- Copyright (c) Bart Mollet (bart.mollet@hogent.be)
- 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 address: Dokeos, 44 rue des palais, B-1030 Brussels, Belgium
- Mail: info@dokeos.com
- ==============================================================================
- */
- require_once 'Course.class.php';
- /**
- * Class to delete items from a Dokeos-course
- * @author Bart Mollet <bart.mollet@hogent.be>
- * @package dokeos.backup
- */
- class CourseRecycler
- {
- /**
- * A course-object with the items to delete
- */
- var $course;
- /**
- * Create a new CourseRecycler
- * @param course $course The course-object which contains the items to
- * delete
- */
- function CourseRecycler($course)
- {
- $this->course = $course;
- }
- /**
- * Delete all items from the course.
- * This deletes all items in the course-object from the current Dokeos-
- * course
- */
- function recycle()
- {
- $table_tool_intro = Database::get_course_table(TABLE_TOOL_INTRO);
- $table_linked_resources = Database :: get_course_table(TABLE_LINKED_RESOURCES);
- $table_item_properties = Database::get_course_table(TABLE_ITEM_PROPERTY);
- foreach ($this->course->resources as $type => $resources)
- {
- foreach ($resources as $id => $resource)
- {
- $sql = "DELETE FROM ".$table_linked_resources." WHERE (source_type = '".$type."' AND source_id = '".$id."') OR (resource_type = '".$type."' AND resource_id = '".$id."') ";
- Database::query($sql,__FILE__,__LINE__);
- if(is_numeric($id))
- {
- $sql = "DELETE FROM ".$table_item_properties." WHERE tool ='".$resource->get_tool()."' AND ref=".$id;
- Database::query($sql, __FILE__, __LINE__);
- }
- elseif ($type == RESOURCE_TOOL_INTRO)
- {
- $sql = "DELETE FROM $table_tool_intro WHERE id='$id'";
- Database::query($sql, __FILE__, __LINE__);
- }
- }
- }
- $this->recycle_links();
- $this->recycle_link_categories();
- $this->recycle_events();
- $this->recycle_announcements();
- $this->recycle_documents();
- $this->recycle_forums();
- $this->recycle_forum_categories();
- $this->recycle_quizzes();
- $this->recycle_surveys();
- $this->recycle_learnpaths();
- $this->recycle_cours_description();
- }
- /**
- * Delete documents
- */
- function recycle_documents()
- {
- if ($this->course->has_resources(RESOURCE_DOCUMENT))
- {
- $table = Database :: get_course_table(TABLE_DOCUMENT);
- foreach ($this->course->resources[RESOURCE_DOCUMENT] as $id => $document)
- {
- rmdirr($this->course->backup_path.'/'.$document->path);
- }
- $ids = implode(',', (array_keys($this->course->resources[RESOURCE_DOCUMENT])));
- $sql = "DELETE FROM ".$table." WHERE id IN(".$ids.")";
- Database::query($sql,__FILE__,__LINE__);
- }
- }
- /**
- * Delete links
- */
- function recycle_links()
- {
- if ($this->course->has_resources(RESOURCE_LINK))
- {
- $table = Database :: get_course_table(TABLE_LINK);
- $ids = implode(',', (array_keys($this->course->resources[RESOURCE_LINK])));
- $sql = "DELETE FROM ".$table." WHERE id IN(".$ids.")";
- Database::query($sql,__FILE__,__LINE__);
- }
- }
- /**
- * Delete forums
- */
- function recycle_forums()
- {
- if ($this->course->has_resources(RESOURCE_FORUM))
- {
- $table_category = Database :: get_course_table(TABLE_FORUM_CATEGORY);
- $table_forum = Database :: get_course_table(TABLE_FORUM);
- $table_thread = Database :: get_course_table(TABLE_FORUM_THREAD);
- $table_post = Database :: get_course_table(TABLE_FORUM_POST);
- $table_attachment = Database::get_course_table(TABLE_FORUM_ATTACHMENT);
- $table_notification = Database::get_course_table(TABLE_FORUM_NOTIFICATION);
- $table_mail_queue = Database::get_course_table(TABLE_FORUM_MAIL_QUEUE);
- $table_thread_qualify = Database::get_course_table(TABLE_FORUM_THREAD_QUALIFY);
- $table_thread_qualify_log = Database::get_course_table(TABLE_FORUM_THREAD_QUALIFY_LOG);
- $forum_ids = implode(',', (array_keys($this->course->resources[RESOURCE_FORUM])));
- $sql = "DELETE FROM ".$table_attachment.
- " USING ".$table_attachment." INNER JOIN ".$table_post.
- " WHERE ".$table_attachment.".post_id = ".$table_post.".post_id".
- " AND ".$table_post.".forum_id IN(".$forum_ids.");";
- Database::query($sql,__FILE__,__LINE__);
- $sql = "DELETE FROM ".$table_mail_queue.
- " USING ".$table_mail_queue." INNER JOIN ".$table_post.
- " WHERE ".$table_mail_queue.".post_id = ".$table_post.".post_id".
- " AND ".$table_post.".forum_id IN(".$forum_ids.");";
- Database::query($sql,__FILE__,__LINE__);
- // Just in case, deleting in the same table using thread_id as record-linker.
- $sql = "DELETE FROM ".$table_mail_queue.
- " USING ".$table_mail_queue." INNER JOIN ".$table_thread.
- " WHERE ".$table_mail_queue.".thread_id = ".$table_thread.".thread_id".
- " AND ".$table_thread.".forum_id IN(".$forum_ids.");";
- Database::query($sql,__FILE__,__LINE__);
- $sql = "DELETE FROM ".$table_thread_qualify.
- " USING ".$table_thread_qualify." INNER JOIN ".$table_thread.
- " WHERE ".$table_thread_qualify.".thread_id = ".$table_thread.".thread_id".
- " AND ".$table_thread.".forum_id IN(".$forum_ids.");";
- Database::query($sql,__FILE__,__LINE__);
- $sql = "DELETE FROM ".$table_thread_qualify_log.
- " USING ".$table_thread_qualify_log." INNER JOIN ".$table_thread.
- " WHERE ".$table_thread_qualify_log.".thread_id = ".$table_thread.".thread_id".
- " AND ".$table_thread.".forum_id IN(".$forum_ids.");";
- Database::query($sql,__FILE__,__LINE__);
- $sql = "DELETE FROM ".$table_notification." WHERE forum_id IN(".$forum_ids.")";
- Database::query($sql,__FILE__,__LINE__);
- $sql = "DELETE FROM ".$table_post." WHERE forum_id IN(".$forum_ids.")";
- Database::query($sql,__FILE__,__LINE__);
- $sql = "DELETE FROM ".$table_thread." WHERE forum_id IN(".$forum_ids.")";
- Database::query($sql,__FILE__,__LINE__);
- $sql = "DELETE FROM ".$table_forum." WHERE forum_id IN(".$forum_ids.")";
- Database::query($sql,__FILE__,__LINE__);
- }
- }
- /**
- * Delete forum-categories
- * Deletes all forum-categories from current course without forums
- */
- function recycle_forum_categories()
- {
- $table_forum = Database :: get_course_table(TABLE_FORUM);
- $table_forumcat = Database :: get_course_table(TABLE_FORUM_CATEGORY);
- $sql = "SELECT fc.cat_id FROM ".$table_forumcat." fc LEFT JOIN ".$table_forum." f ON fc.cat_id=f.forum_category WHERE f.forum_id IS NULL";
- $res = Database::query($sql,__FILE__,__LINE__);
- while ($obj = Database::fetch_object($res))
- {
- $sql = "DELETE FROM ".$table_forumcat." WHERE cat_id = ".$obj->cat_id;
- Database::query($sql,__FILE__,__LINE__);
- }
- }
- /**
- * Delete link-categories
- * Deletes all empty link-categories (=without links) from current course
- */
- function recycle_link_categories()
- {
- $link_cat_table = Database :: get_course_table(TABLE_LINK_CATEGORY);
- $link_table = Database :: get_course_table(TABLE_LINK);
- $sql = "SELECT lc.id FROM ".$link_cat_table." lc LEFT JOIN ".$link_table." l ON lc.id=l.category_id WHERE l.id IS NULL";
- $res = Database::query($sql,__FILE__,__LINE__);
- while ($obj = Database::fetch_object($res))
- {
- $sql = "DELETE FROM ".$link_cat_table." WHERE id = ".$obj->id;
- Database::query($sql,__FILE__,__LINE__);
- }
- }
- /**
- * Delete events
- */
- function recycle_events()
- {
- if ($this->course->has_resources(RESOURCE_EVENT))
- {
- $table = Database :: get_course_table(TABLE_AGENDA);
- $ids = implode(',', (array_keys($this->course->resources[RESOURCE_EVENT])));
- $sql = "DELETE FROM ".$table." WHERE id IN(".$ids.")";
- Database::query($sql,__FILE__,__LINE__);
- }
- }
- /**
- * Delete announcements
- */
- function recycle_announcements()
- {
- if ($this->course->has_resources(RESOURCE_ANNOUNCEMENT))
- {
- $table = Database :: get_course_table(TABLE_ANNOUNCEMENT);
- $ids = implode(',', (array_keys($this->course->resources[RESOURCE_ANNOUNCEMENT])));
- $sql = "DELETE FROM ".$table." WHERE id IN(".$ids.")";
- Database::query($sql,__FILE__,__LINE__);
- }
- }
- /**
- * Recycle quizzes - doesn't remove the questions and their answers, as they might still be used later
- */
- function recycle_quizzes()
- {
- if ($this->course->has_resources(RESOURCE_QUIZ))
- {
- $table_qui_que = Database :: get_course_table(TABLE_QUIZ_QUESTION);
- $table_qui_ans = Database :: get_course_table(TABLE_QUIZ_ANSWER);
- $table_qui = Database :: get_course_table(TABLE_QUIZ_TEST);
- $table_rel = Database :: get_course_table(TABLE_QUIZ_TEST_QUESTION);
- $ids = array_keys($this->course->resources[RESOURCE_QUIZ]);
- $delete_orphan_questions = in_array(-1, $ids);
- $ids = implode(',', $ids);
- // Deletion of the normal tests, questions in them are not deleted, they become orphan at this moment.
- $sql = "DELETE FROM ".$table_qui." WHERE id <> -1 AND id IN(".$ids.")";
- Database::query($sql,__FILE__,__LINE__);
- $sql = "DELETE FROM ".$table_rel." WHERE exercice_id <> -1 AND exercice_id IN(".$ids.")";
- Database::query($sql,__FILE__,__LINE__);
- // Identifying again and deletion of the orphan questions, if it was desired.
- if ($delete_orphan_questions)
- {
- $sql = 'SELECT questions.id FROM '.$table_qui_que.
- ' as questions LEFT JOIN '.$table_rel.' as quizz_questions ON questions.id=quizz_questions.question_id LEFT JOIN '.$table_qui.
- ' as exercices ON exercice_id=exercices.id WHERE quizz_questions.exercice_id IS NULL OR exercices.active = -1'; // active = -1 means "deleted" test.
- $db_result = Database::query($sql, __FILE__, __LINE__);
- if (Database::num_rows($db_result) > 0)
- {
- $orphan_ids = array();
- while ($obj = Database::fetch_object($db_result))
- {
- $orphan_ids[] = $obj->id;
- }
- $orphan_ids = implode(',', $orphan_ids);
- $sql = "DELETE FROM ".$table_rel." WHERE question_id IN(".$orphan_ids.")";
- Database::query($sql,__FILE__,__LINE__);
- $sql = "DELETE FROM ".$table_qui_ans." WHERE question_id IN(".$orphan_ids.")";
- Database::query($sql,__FILE__,__LINE__);
- $sql = "DELETE FROM ".$table_qui_que." WHERE id IN(".$orphan_ids.")";
- Database::query($sql,__FILE__,__LINE__);
- }
- }
- }
- // Purge "deleted" tests (active = -1).
- $sql = "DELETE FROM ".$table_qui." WHERE active = -1";
- Database::query($sql,__FILE__,__LINE__);
- }
- /**
- * Recycle surveys - removes everything
- */
- function recycle_surveys()
- {
- if ($this->course->has_resources(RESOURCE_SURVEY))
- {
- $table_survey = Database :: get_course_table(TABLE_SURVEY);
- $table_survey_q = Database :: get_course_table(TABLE_SURVEY_QUESTION);
- $table_survey_q_o = Database :: get_course_table(TABLE_SURVEY_QUESTION_OPTION);
- $table_survey_a = Database :: get_course_Table(TABLE_SURVEY_ANSWER);
- $table_survey_i = Database :: get_course_table(TABLE_SURVEY_INVITATION);
- $ids = implode(',', (array_keys($this->course->resources[RESOURCE_SURVEY])));
- $sql = "DELETE FROM ".$table_survey_i." ";
- Database::query($sql,__FILE__,__LINE__);
- $sql = "DELETE FROM ".$table_survey_a." WHERE survey_id IN(".$ids.")";
- Database::query($sql,__FILE__,__LINE__);
- $sql = "DELETE FROM ".$table_survey_q_o." WHERE survey_id IN(".$ids.")";
- Database::query($sql,__FILE__,__LINE__);
- $sql = "DELETE FROM ".$table_survey_q." WHERE survey_id IN(".$ids.")";
- Database::query($sql,__FILE__,__LINE__);
- $sql = "DELETE FROM ".$table_survey." WHERE survey_id IN(".$ids.")";
- Database::query($sql,__FILE__,__LINE__);
- }
- }
- /**
- * Recycle learnpaths
- */
- function recycle_learnpaths()
- {
- if ($this->course->has_resources(RESOURCE_LEARNPATH))
- {
- $table_main = Database :: get_course_table(TABLE_LP_MAIN);
- $table_item = Database :: get_course_table(TABLE_LP_ITEM);
- $table_view = Database :: get_course_table(TABLE_LP_VIEW);
- $table_iv = Database :: get_course_table(TABLE_LP_ITEM_VIEW);
- $table_iv_int = Database :: get_course_table(TABLE_LP_IV_INTERACTION);
- $table_tool = Database::get_course_table(TABLE_TOOL_LIST);
- foreach($this->course->resources[RESOURCE_LEARNPATH] as $id => $learnpath)
- {
- //remove links from course homepage
- $sql = "DELETE FROM $table_tool WHERE link LIKE '%lp_controller.php%lp_id=$id%' AND image='scormbuilder.gif'";
- Database::query($sql,__FILE__,__LINE__);
- //remove elements from lp_* tables (from bottom-up) by removing interactions, then item_view, then views and items, then paths
- $sql_items = "SELECT id FROM $table_item WHERE lp_id=$id";
- $res_items = Database::query($sql_items,__FILE__,__LINE__);
- while ($row_item = Database::fetch_array($res_items))
- {
- //get item views
- $sql_iv = "SELECT id FROM $table_iv WHERE lp_item_id=".$row_item['id'];
- $res_iv = Database::query($sql_iv,__FILE__,__LINE__);
- while ($row_iv = Database::fetch_array($res_iv))
- {
- //delete interactions
- $sql_iv_int_del = "DELETE FROM $table_iv_int WHERE lp_iv_id = ".$row_iv['id'];
- $res_iv_int_del = Database::query($sql_iv_int_del,__FILE__,__LINE__);
- }
- //delete item views
- $sql_iv_del = "DELETE FROM $table_iv WHERE lp_item_id=".$row_item['id'];
- $res_iv_del = Database::query($sql_iv_del,__FILE__,__LINE__);
- }
- //delete items
- $sql_items_del = "DELETE FROM $table_item WHERE lp_id=$id";
- $res_items_del = Database::query($sql_items_del,__FILE__,__LINE__);
- //delete views
- $sql_views_del = "DELETE FROM $table_view WHERE lp_id=$id";
- $res_views_del = Database::query($sql_views_del,__FILE__,__LINE__);
- //delete lps
- $sql_del = "DELETE FROM $table_main WHERE id = $id";
- $res_del = Database::query($sql_del,__FILE__,__LINE__);
- }
- }
- }
- /**
- * Delete course description
- */
- function recycle_cours_description()
- {
- if ($this->course->has_resources(RESOURCE_COURSEDESCRIPTION))
- {
- $table = Database :: get_course_table(TABLE_COURSE_DESCRIPTION);
- $ids = implode(',', (array_keys($this->course->resources[RESOURCE_COURSEDESCRIPTION])));
- $sql = "DELETE FROM ".$table." WHERE id IN(".$ids.")";
- Database::query($sql,__FILE__,__LINE__);
- }
- }
- }
|