/**
* Test the tag_set_delete function.
* This function was deprecated in 3.1
*/
public function test_tag_set_delete()
{
global $DB;
// Create a course to tag.
$course = $this->getDataGenerator()->create_course();
// Create the tag and tag instance we are going to delete.
tag_set_add('course', $course->id, 'A random tag', 'core', context_course::instance($course->id)->id);
$this->assertDebuggingCalled();
// Call the tag_set_delete function.
tag_set_delete('course', $course->id, 'a random tag', 'core', context_course::instance($course->id)->id);
$this->assertDebuggingCalled();
// Now check that there are no tags or tag instances.
$this->assertEquals(0, $DB->count_records('tag'));
$this->assertEquals(0, $DB->count_records('tag_instance'));
// Add tag again, add and remove related tag.
tag_set_add('course', $course->id, 'A random tag', 'core', context_course::instance($course->id)->id);
$this->assertDebuggingCalled();
$taginstance = $DB->get_record('tag_instance', array('itemtype' => 'course', 'itemid' => $course->id), '*', MUST_EXIST);
$tagid = $taginstance->tagid;
tag_set_add('tag', $tagid, 'Some related tag');
$this->assertDebuggingCalled();
tag_set_delete('tag', $tagid, 'Some related tag');
$this->assertDebuggingCalled();
$relatedtags = tag_get_related_tags($tagid);
$this->assertDebuggingCalled();
$this->assertCount(0, $relatedtags);
}
/**
* Set the tags assigned to a record. This overwrites the current tags.
*
* This function is meant to be fed the string coming up from the user
* interface, which contains all tags assigned to a record.
*
* @param string $record_type the type of record to tag ('post' for blogs,
* 'user' for users, 'tag' for tags, etc.
* @param int $record_id the id of the record to tag
* @param array $tags the array of tags to set on the record. If
* given an empty array, all tags will be removed.
* @return void
*/
function tag_set($record_type, $record_id, $tags)
{
static $in_recursion_semaphore = false;
// this is to prevent loops when tagging a tag
if ($record_type == 'tag' && !$in_recursion_semaphore) {
$current_tagged_tag_name = tag_get_name($record_id);
}
$tags_ids = tag_get_id($tags, TAG_RETURN_ARRAY);
// force an array, even if we only have one tag.
$cleaned_tags = tag_normalize($tags);
//echo 'tags-in-tag_set'; var_dump($tags); var_dump($tags_ids); var_dump($cleaned_tags);
$current_ids = tag_get_tags_ids($record_type, $record_id);
//var_dump($current_ids);
// for data coherence reasons, it's better to remove deleted tags
// before adding new data: ordering could be duplicated.
foreach ($current_ids as $current_id) {
if (!in_array($current_id, $tags_ids)) {
tag_delete_instance($record_type, $record_id, $current_id);
if ($record_type == 'tag' && !$in_recursion_semaphore) {
// if we are removing a tag-on-a-tag (manually related tag),
// we need to remove the opposite relationship as well.
tag_delete_instance('tag', $current_id, $record_id);
}
}
}
foreach ($tags as $ordering => $tag) {
$tag = trim($tag);
if (!$tag) {
continue;
}
$clean_tag = $cleaned_tags[$tag];
$tag_current_id = $tags_ids[$clean_tag];
if (is_null($tag_current_id)) {
// create new tags
//echo "call to add tag $tag\n";
$new_tag = tag_add($tag);
$tag_current_id = $new_tag[$clean_tag];
}
tag_assign($record_type, $record_id, $tag_current_id, $ordering);
// if we are tagging a tag (adding a manually-assigned related tag), we
// need to create the opposite relationship as well.
if ($record_type == 'tag' && !$in_recursion_semaphore) {
$in_recursion_semaphore = true;
tag_set_add('tag', $tag_current_id, $current_tagged_tag_name);
$in_recursion_semaphore = false;
}
}
}
protected function process_wiki_tag($data)
{
global $CFG, $DB;
$data = (object) $data;
$oldid = $data->id;
if (empty($CFG->usetags)) {
// tags disabled in server, nothing to process
return;
}
$tag = $data->rawname;
$itemid = $this->get_new_parentid('wiki_page');
tag_set_add('wiki_pages', $itemid, $tag);
}
if (empty($CFG->usetags)) {
print_error('tagdisabled');
}
if (isguestuser()) {
print_error('noguest');
}
if (!confirm_sesskey()) {
print_error('sesskey');
}
switch ($action) {
case 'addinterest':
if (empty($tag) && $id) {
// for backward-compatibility (people saving bookmarks, mostly..)
$tag = tag_get_name($id);
}
tag_set_add('user', $USER->id, $tag);
redirect($CFG->wwwroot . '/tag/index.php?tag=' . rawurlencode($tag));
break;
case 'removeinterest':
if (empty($tag) && $id) {
// for backward-compatibility (people saving bookmarks, mostly..)
$tag = tag_get_name($id);
}
tag_set_delete('user', $USER->id, $tag);
redirect($CFG->wwwroot . '/tag/index.php?tag=' . rawurlencode($tag));
break;
case 'flaginappropriate':
tag_set_flag(tag_get_id($tag));
redirect($CFG->wwwroot . '/tag/index.php?tag=' . rawurlencode($tag), get_string('responsiblewillbenotified', 'tag'));
break;
default:
/**
* Test the tag_set_delete function.
*/
public function test_tag_set_delete()
{
global $DB;
// Create a course to tag.
$course = $this->getDataGenerator()->create_course();
// Create the tag and tag instance we are going to delete.
tag_set_add('course', $course->id, 'A random tag', 'core', context_course::instance($course->id)->id);
// Call the tag_set_delete function.
tag_set_delete('course', $course->id, 'a random tag', 'core', context_course::instance($course->id)->id);
// Now check that there are no tags or tag instances.
$this->assertEquals(0, $DB->count_records('tag'));
$this->assertEquals(0, $DB->count_records('tag_instance'));
// Recreate the tag and tag instance.
tag_set_add('course', $course->id, 'A random tag', 'core', context_course::instance($course->id)->id);
// Now call the tag_set_delete function without specifying the component or
// contextid and ensure the function debugging is called.
tag_set_delete('course', $course->id, 'A random tag');
$this->assertDebuggingCalled();
}
protected function process_wiki_tag($data)
{
global $CFG, $DB;
$data = (object) $data;
$oldid = $data->id;
if (empty($CFG->usetags)) {
// tags disabled in server, nothing to process
return;
}
$tag = $data->rawname;
$itemid = $this->get_new_parentid('wiki_page');
$wikiid = $this->get_new_parentid('wiki');
$cm = get_coursemodule_from_instance('wiki', $wikiid);
tag_set_add('wiki_pages', $itemid, $tag, 'mod_wiki', context_module::instance($cm->id)->id);
}
protected function process_forumng_forumtaginstance($data)
{
global $CFG;
$data = (object) $data;
$oldid = $data->id;
if (empty($CFG->usetags)) {
// Tags disabled in server, nothing to process.
return;
}
$tag = $data->rawname;
$forumid = $this->get_new_parentid('forumng');
$cm = get_coursemodule_from_instance('forumng', $forumid);
tag_set_add('forumng', $forumid, $tag, 'mod_forumng', context_module::instance($cm->id)->id);
}
print_error('tagdisabled');
}
if (isguestuser()) {
print_error('noguest');
}
if (!confirm_sesskey()) {
print_error('sesskey');
}
$usercontext = context_user::instance($USER->id);
switch ($action) {
case 'addinterest':
if (empty($tag) && $id) {
// for backward-compatibility (people saving bookmarks, mostly..)
$tag = tag_get_name($id);
}
tag_set_add('user', $USER->id, $tag, 'core', $usercontext->id);
redirect($CFG->wwwroot . '/tag/index.php?tag=' . rawurlencode($tag));
break;
case 'removeinterest':
if (empty($tag) && $id) {
// for backward-compatibility (people saving bookmarks, mostly..)
$tag = tag_get_name($id);
}
tag_set_delete('user', $USER->id, $tag, 'core', $usercontext->id);
redirect($CFG->wwwroot . '/tag/index.php?tag=' . rawurlencode($tag));
break;
case 'flaginappropriate':
$tagid = tag_get_id($tag);
tag_set_flag($tagid);
redirect($CFG->wwwroot . '/tag/index.php?tag=' . rawurlencode($tag), get_string('responsiblewillbenotified', 'tag'));
break;
$existingmethod = get_record('classification_value', 'value', $method2);
if (empty($existingmethod)) {
//create new classification if needed.
$newmeth = new stdclass();
$newmeth->type = get_field('classification_type', 'id', 'name', 'Subject');
$newmeth->value = $method2;
insert_record('classification_value', $newmeth);
$existingmethod = get_record('classification_value', 'value', $method2);
}
if (!empty($existingmethod)) {
//this is a valid method.
//now check to see if classification already set for this LP
if (!record_exists('course_classification', 'course', $courseid, 'value', $existingmethod->id)) {
//need to insert a classification and a tag.
insert_record('course_classification', (object) array('course' => $courseid, 'value' => $existingmethod->id));
tag_set_add('courseclassification', $courseid, strtolower($method));
}
}
}
}
}
$coursecontext = get_context_instance(CONTEXT_COURSE, $courseid);
//now do stuff with contributors
if (!empty($lp['contributors'])) {
$useridarray = array();
$contribroleid = get_field('role', 'id', 'shortname', ROLE_LPCONTRIBUTOR);
foreach ($lp['contributors'] as $conid) {
$user = get_record('user', 'username', $conid);
if (!empty($user)) {
role_assign($contribroleid, $user->id, 0, $coursecontext->id);
$useridarray[] = $user->id;
