chamilo-lms2/main/exercice/hotspot_answers.as.php

<?php
/* For licensing terms, see /license.txt */
/**
 * This file generates the ActionScript variables code used by the
 * HotSpot .swf
 * @package chamilo.exercise
 * @author Toon Keppens, Julio Montoya adding hotspot "medical" support
 */
/**
 * Code
 */
include('exercise.class.php');
include('question.class.php');
include('answer.class.php');
include('../inc/global.inc.php');

// Set vars
$questionId    = intval($_GET['modifyAnswers']);
$exe_id        = intval($_GET['exe_id']);
$from_db 	   = isset($_GET['from_db']) ? $_GET['from_db'] : 0;
$objQuestion   = Question :: read($questionId);
$TBL_ANSWERS   = Database::get_course_table(TABLE_QUIZ_ANSWER);
$documentPath  = api_get_path(SYS_COURSE_PATH).$_course['path'].'/document';

$picturePath   = $documentPath.'/images';
$pictureName   = $objQuestion->selectPicture();
$pictureSize   = getimagesize($picturePath.'/'.$objQuestion->selectPicture());
$pictureWidth  = $pictureSize[0];
$pictureHeight = $pictureSize[1];

$courseLang    = $_course['language'];
$course_code   = Database::escape_string($_course['id']);

$coursePath    = $_course['path'];
$answer_type   = $objQuestion->selectType();

$course_id     = api_get_course_int_id();

if ($answer_type == HOT_SPOT_DELINEATION) {
	// Query db for answers
	$sql = "SELECT iid, answer, hotspot_coordinates, hotspot_type FROM $TBL_ANSWERS
	        WHERE question_id = '".Database::escape_string($questionId)."' AND hotspot_type <> 'noerror'
            ORDER BY iid";
} else {
	$sql = "SELECT iid, answer, hotspot_coordinates, hotspot_type FROM $TBL_ANSWERS
	        WHERE question_id = '".Database::escape_string($questionId)."' ORDER BY iid";
}
$result = Database::query($sql);
// Init
$output = "hotspot_lang=$courseLang&hotspot_image=$pictureName&hotspot_image_width=$pictureWidth&hotspot_image_height=$pictureHeight&courseCode=$coursePath";
$i = 1;

while ($hotspot = Database::fetch_array($result)) {
    $hotspot_id = $i;
    //$hotspot_id = $hotspot['iid'];
	$output .= "&hotspot_".$hotspot_id."=true";
	// Square or rectancle
	if ($hotspot['hotspot_type'] == 'square' ) {
		$output .= "&hotspot_".$hotspot_id."_type=square";
	}

	// Circle or ovale
	if ($hotspot['hotspot_type'] == 'circle') {
		$output .= "&hotspot_".$hotspot_id."_type=circle";
	}

	// Polygon
	if ($hotspot['hotspot_type'] == 'poly') {
		$output .= "&hotspot_".$hotspot_id."_type=poly";
	}

	// Delineation
	if ($hotspot['hotspot_type'] == 'delineation') {
		$output .= "&hotspot_".$hotspot_id."_type=delineation";
	}
	// oar
	if ($hotspot['hotspot_type'] == 'oar') {
		$output .= "&hotspot_".$hotspot_id."_type=delineation";
	}
	$output .= "&hotspot_".$hotspot_id."_coord=".$hotspot['hotspot_coordinates']."";
	$i++;
}

// Generate empty (the maximum number of points is 12 - it is said so in the user interface)
$i++;
for ($i; $i <= 12; $i++) {
	$output .= "&hotspot_".$i."=false";
}


// Get clicks
if(isset($_SESSION['exerciseResultCoordinates']) && $from_db==0) {
	foreach ($_SESSION['exerciseResultCoordinates'][$questionId] as $coordinate) {
		$output2 .= $coordinate."|";
	}
} else {
	// get it from db
	$tbl_track_e_hotspot = Database::get_main_table(TABLE_STATISTIC_TRACK_E_HOTSPOT);
	$sql = "SELECT hotspot_coordinate
            FROM $tbl_track_e_hotspot
            WHERE   hotspot_question_id = $questionId AND
                    c_id = $course_id AND
                    hotspot_exe_id = $exe_id
            ORDER by hotspot_id";
	$rs = @Database::query($sql); // don't output error because we are in Flash execution.
	while($row = Database :: fetch_array($rs)) {
		$output2 .= $row['hotspot_coordinate']."|";
	}
}
$output .= "&p_hotspot_answers=".api_substr($output2,0,-1)."&done=done";
$explode = explode('&', $output);
echo $output;