private function _displaySettings()
{
Yii::app()->loadHelper('surveytranslator');
// Save refurl from where global settings screen is called!
$refurl = Yii::app()->getRequest()->getUrlReferrer(Yii::app()->createUrl('admin'), array('globalsettings'));
// Some URLs are not to be allowed to refered back to.
// These exceptions can be added to the $aReplacements array
$aReplacements = array('admin/update/sa/step4b' => 'admin/sa/index', 'admin/user/sa/adduser' => 'admin/user/sa/index', 'admin/user/sa/setusertemplates' => 'admin/user/sa/index');
$data['title'] = "hi";
$data['message'] = "message";
foreach ($this->_checkSettings() as $key => $row) {
$data[$key] = $row;
}
Yii::app()->loadLibrary('Date_Time_Converter');
$dateformatdetails = getDateFormatData(Yii::app()->session['dateformat']);
$datetimeobj = new date_time_converter(dateShift(getGlobalSetting("updatelastcheck"), 'Y-m-d H:i:s', getGlobalSetting('timeadjust')), 'Y-m-d H:i:s');
$data['updatelastcheck'] = $datetimeobj->convert($dateformatdetails['phpdate'] . " H:i:s");
$data['updateavailable'] = getGlobalSetting("updateavailable") && Yii::app()->getConfig("updatable");
$data['updatable'] = Yii::app()->getConfig("updatable");
$data['updateinfo'] = getGlobalSetting("updateinfo");
$data['updatebuild'] = getGlobalSetting("updatebuild");
$data['updateversion'] = getGlobalSetting("updateversion");
$data['aUpdateVersions'] = json_decode(getGlobalSetting("updateversions"), true);
$data['allLanguages'] = getLanguageData(false, Yii::app()->session['adminlang']);
if (trim(Yii::app()->getConfig('restrictToLanguages')) == '') {
$data['restrictToLanguages'] = array_keys($data['allLanguages']);
$data['excludedLanguages'] = array();
} else {
$data['restrictToLanguages'] = explode(' ', trim(Yii::app()->getConfig('restrictToLanguages')));
$data['excludedLanguages'] = array_diff(array_keys($data['allLanguages']), $data['restrictToLanguages']);
}
$data['fullpagebar']['savebutton']['form'] = 'frmglobalsettings';
$data['fullpagebar']['saveandclosebutton']['form'] = 'frmglobalsettings';
$data['fullpagebar']['closebutton']['url'] = 'admin/';
// Close button
// List of available encodings
$data['aEncodings'] = aEncodingsArray();
// Get current setting from DB
$data['thischaracterset'] = getGlobalSetting('characterset');
$data['sideMenuBehaviour'] = getGlobalSetting('sideMenuBehaviour');
$data['aListOfThemeObjects'] = AdminTheme::getAdminThemeList();
$this->_renderWrappedTemplate('', 'globalSettings_view', $data);
}
private function _displaySettings()
{
Yii::app()->loadHelper('surveytranslator');
// Save refurl from where global settings screen is called!
// Unless it's called from global settings...
$refurl = Yii::app()->getRequest()->getUrlReferrer();
// Some URLs are not to be allowed to refered back to.
// These exceptions can be added to the $aReplacements array
$aReplacements = array('admin/update/sa/step4b' => 'admin/sa/index', 'admin/user/sa/adduser' => 'admin/user/sa/index', 'admin/user/sa/setusertemplates' => 'admin/user/sa/index');
$refurl = str_replace(array_keys($aReplacements), array_values($aReplacements), $refurl);
// Don't update session variable if refurl is empty (happens when user clicks Save)
if ($refurl !== "") {
Yii::app()->session['refurl'] = htmlspecialchars($refurl);
//just to be safe!
}
$data['title'] = "hi";
$data['message'] = "message";
foreach ($this->_checkSettings() as $key => $row) {
$data[$key] = $row;
}
Yii::app()->loadLibrary('Date_Time_Converter');
$dateformatdetails = getDateFormatData(Yii::app()->session['dateformat']);
$datetimeobj = new date_time_converter(dateShift(getGlobalSetting("updatelastcheck"), 'Y-m-d H:i:s', getGlobalSetting('timeadjust')), 'Y-m-d H:i:s');
$data['updatelastcheck'] = $datetimeobj->convert($dateformatdetails['phpdate'] . " H:i:s");
$data['updateavailable'] = getGlobalSetting("updateavailable") && Yii::app()->getConfig("updatable");
$data['updatable'] = Yii::app()->getConfig("updatable");
$data['updateinfo'] = getGlobalSetting("updateinfo");
$data['updatebuild'] = getGlobalSetting("updatebuild");
$data['updateversion'] = getGlobalSetting("updateversion");
$data['aUpdateVersions'] = json_decode(getGlobalSetting("updateversions"), true);
$data['allLanguages'] = getLanguageData(false, Yii::app()->session['adminlang']);
if (trim(Yii::app()->getConfig('restrictToLanguages')) == '') {
$data['restrictToLanguages'] = array_keys($data['allLanguages']);
$data['excludedLanguages'] = array();
} else {
$data['restrictToLanguages'] = explode(' ', trim(Yii::app()->getConfig('restrictToLanguages')));
$data['excludedLanguages'] = array_diff(array_keys($data['allLanguages']), $data['restrictToLanguages']);
}
$data['fullpagebar']['savebutton']['form'] = 'frmglobalsettings';
$data['fullpagebar']['saveandclosebutton']['form'] = 'frmglobalsettings';
$data['fullpagebar']['closebutton']['url'] = 'admin/';
$this->_renderWrappedTemplate('', 'globalSettings_view', $data);
}
private function _displaySettings()
{
Yii::app()->loadHelper('surveytranslator');
//save refurl from where global settings screen is called!
$refurl = Yii::app()->getRequest()->getUrlReferrer();
// Some URLs are not to be allowed to refered back to.
// These exceptions can be added to the $aReplacements array
$aReplacements = array('admin/user/adduser' => 'admin/user/index', 'admin/user/sa/adduser' => 'admin/user/sa/index', 'admin/user/sa/setusertemplates' => 'admin/user/sa/index', 'admin/user/setusertemplates' => 'admin/user/sa/index');
$refurl = str_replace(array_keys($aReplacements), array_values($aReplacements), $refurl);
Yii::app()->session['refurl'] = htmlspecialchars($refurl);
//just to be safe!
$data['clang'] = $this->getController()->lang;
$data['title'] = "hi";
$data['message'] = "message";
foreach ($this->_checkSettings() as $key => $row) {
$data[$key] = $row;
}
$data['thisupdatecheckperiod'] = getGlobalSetting('updatecheckperiod');
Yii::app()->loadLibrary('Date_Time_Converter');
$dateformatdetails = getDateFormatData(Yii::app()->session['dateformat']);
$datetimeobj = new date_time_converter(getGlobalSetting("updatelastcheck"), 'Y-m-d H:i:s');
$data['updatelastcheck'] = $datetimeobj->convert($dateformatdetails['phpdate'] . " H:i:s");
$data['updateavailable'] = getGlobalSetting("updateavailable") && Yii::app()->getConfig("updatable");
$data['updatable'] = Yii::app()->getConfig("updatable");
$data['updateinfo'] = getGlobalSetting("updateinfo");
$data['updatebuild'] = getGlobalSetting("updatebuild");
$data['updateversion'] = getGlobalSetting("updateversion");
$data['allLanguages'] = getLanguageData(false, Yii::app()->session['adminlang']);
if (trim(Yii::app()->getConfig('restrictToLanguages')) == '') {
$data['restrictToLanguages'] = array_keys($data['allLanguages']);
$data['excludedLanguages'] = array();
} else {
$data['restrictToLanguages'] = explode(' ', trim(Yii::app()->getConfig('restrictToLanguages')));
$data['excludedLanguages'] = array_diff(array_keys($data['allLanguages']), $data['restrictToLanguages']);
}
$this->_renderWrappedTemplate('', 'globalSettings_view', $data);
}
/**
* This function replaces keywords in a text and is mainly intended for templates
* If you use this functions put your replacement strings into the $replacements variable
* instead of using global variables
* NOTE - Don't do any embedded replacements in this function. Create the array of replacement values and
* they will be done in batch at the end
*
* @param string $line Text to search in
* @param array $replacements Array of replacements: Array( <stringtosearch>=><stringtoreplacewith>, where <stringtosearch> is NOT surrounded with curly braces
* @param boolean $anonymized Determines if token data is being used or just replaced with blanks
* @return string Text with replaced strings
*/
function templatereplace($line, $replacements=array(), $anonymized=false)
{
global $surveylist, $sitename, $clienttoken, $rooturl;
global $thissurvey, $imageurl, $defaulttemplate;
global $percentcomplete, $move;
global $groupname, $groupdescription;
global $question;
global $showXquestions, $showgroupinfo, $showqnumcode;
global $answer, $navigator;
global $help, $surveyformat;
global $completed, $register_errormsg;
global $privacy, $surveyid;
global $publicurl, $templatedir, $token;
global $assessments, $s_lang;
global $errormsg, $clang;
global $saved_id;
global $totalBoilerplatequestions, $relativeurl;
global $languagechanger;
global $captchapath, $loadname;
// lets sanitize the survey template
if (isset($thissurvey['templatedir']))
{
$_templatename = $thissurvey['templatedir'];
}
else
{
$_templatename = $defaulttemplate;
}
$_templatename = validate_templatedir($_templatename);
// create absolute template URL and template dir vars
$_templateurl = sGetTemplateURL($_templatename) . '/';
$templatedir = sgetTemplatePath($_templatename);
if (stripos($line, "</head>"))
{
$line = str_ireplace("</head>",
"<script type=\"text/javascript\" src=\"$rooturl/scripts/survey_runtime.js\"></script>\n"
. use_firebug()
. "\t</head>", $line);
}
// Get some vars : move elsewhere ?
// surveyformat
if (isset($thissurvey['format']))
{
$surveyformat = str_replace(array("A", "S", "G"), array("allinone", "questionbyquestion", "groupbygroup"), $thissurvey['format']);
}
else
{
$surveyformat = "";
}
// real survey contact
if (isset($surveylist['contact']))
{
$_surveycontact = $surveylist['contact'];
}
elseif (isset($thissurvey['admin']) && $thissurvey['admin'] != "")
{
$_surveycontact = sprintf($clang->gT("Please contact %s ( %s ) for further assistance."), $thissurvey['admin'], $thissurvey['adminemail']);
}
else
{
$_surveycontact = "";
}
// If there are non-bracketed replacements to be made do so above this line.
// Only continue in this routine if there are bracketed items to replace {}
if (strpos($line, "{") === false)
{
return $line;
}
if (
$showgroupinfo == 'both' ||
$showgroupinfo == 'name' ||
($showgroupinfo == 'choose' && !isset($thissurvey['showgroupinfo'])) ||
($showgroupinfo == 'choose' && $thissurvey['showgroupinfo'] == 'B') ||
($showgroupinfo == 'choose' && $thissurvey['showgroupinfo'] == 'N')
)
{
$_groupname = $groupname;
}
else
{
$_groupname = '';
};
if (
$showgroupinfo == 'both' ||
$showgroupinfo == 'description' ||
($showgroupinfo == 'choose' && !isset($thissurvey['showgroupinfo'])) ||
($showgroupinfo == 'choose' && $thissurvey['showgroupinfo'] == 'B') ||
($showgroupinfo == 'choose' && $thissurvey['showgroupinfo'] == 'D')
)
{
$_groupdescription = $groupdescription;
}
else
{
$_groupdescription = '';
};
if (is_array($question))
{
$_question = $question['all'];
$_question_text = $question['text'];
$_question_help = $question['help'];
$_question_mandatory = $question['mandatory'];
$_question_man_message = $question['man_message'];
$_question_valid_message = $question['valid_message'];
$_question_file_valid_message = $question['file_valid_message'];
$_question_sgq = (isset($question['sgq']) ? $question['sgq'] : '');
$_question_essentials = $question['essentials'];
$_question_class = $question['class'];
$_question_man_class = $question['man_class'];
$_question_input_error_class = $question['input_error_class'];
}
else
{
$_question = $question;
$_question_text = '';
$_question_help = '';
$_question_mandatory = '';
$_question_man_message = '';
$_question_valid_message = '';
$_question_file_valid_message = '';
$_question_sgq = '';
$_question_essentials = '';
$_question_class = '';
$_question_man_class = '';
$_question_input_error_class = '';
};
if (
$showqnumcode == 'both' ||
$showqnumcode == 'number' ||
($showqnumcode == 'choose' && !isset($thissurvey['showqnumcode'])) ||
($showqnumcode == 'choose' && $thissurvey['showqnumcode'] == 'B') ||
($showqnumcode == 'choose' && $thissurvey['showqnumcode'] == 'N')
)
{
$_question_number = $question['number'];
}
else
{
$_question_number = '';
};
if (
$showqnumcode == 'both' ||
$showqnumcode == 'code' ||
($showqnumcode == 'choose' && !isset($thissurvey['showqnumcode'])) ||
($showqnumcode == 'choose' && $thissurvey['showqnumcode'] == 'B') ||
($showqnumcode == 'choose' && $thissurvey['showqnumcode'] == 'C')
)
{
$_question_code = $question['code'];
}
else
{
$_question_code = '';
}
if (isset($_SESSION['therearexquestions']))
{
$_totalquestionsAsked = $_SESSION['therearexquestions'] - $totalBoilerplatequestions;
}
else {
$_totalquestionsAsked = 0;
}
if (
$showXquestions == 'show' ||
($showXquestions == 'choose' && !isset($thissurvey['showXquestions'])) ||
($showXquestions == 'choose' && $thissurvey['showXquestions'] == 'Y')
)
{
if ($_totalquestionsAsked < 1)
{
$_therearexquestions = $clang->gT("There are no questions in this survey"); // Singular
}
elseif ($_totalquestionsAsked == 1)
{
$_therearexquestions = $clang->gT("There is 1 question in this survey"); //Singular
}
else
{
$_therearexquestions = $clang->gT("There are {NUMBEROFQUESTIONS} questions in this survey."); //Note this line MUST be before {NUMBEROFQUESTIONS}
};
}
else
{
$_therearexquestions = '';
};
if (isset($token))
{
$_token = $token;
}
elseif (isset($clienttoken))
{
$_token = htmlentities($clienttoken, ENT_QUOTES, 'UTF-8');
}
else
{
$_token = '';
}
if (isset($thissurvey['surveyls_dateformat']))
{
$dateformatdetails = getDateFormatData($thissurvey['surveyls_dateformat']);
}
else {
$dateformatdetails = getDateFormatData();
}
if (isset($thissurvey['expiry']))
{
$_datetimeobj = new Date_Time_Converter($thissurvey['expiry'], "Y-m-d");
$_dateoutput = $_datetimeobj->convert($dateformatdetails['phpdate']);
}
else
{
$_dateoutput = '-';
}
$_submitbutton = "<input class='submit' type='submit' value=' " . $clang->gT("Submit") . " ' name='move2' onclick=\"javascript:document.limesurvey.move.value = 'movesubmit';\" />";
if (isset($thissurvey['surveyls_url']) and $thissurvey['surveyls_url'] != "")
{
if (trim($thissurvey['surveyls_urldescription']) != '')
{
$_linkreplace = "<a href='{$thissurvey['surveyls_url']}'>{$thissurvey['surveyls_urldescription']}</a>";
}
else
{
$_linkreplace = "<a href='{$thissurvey['surveyls_url']}'>{$thissurvey['surveyls_url']}</a>";
}
}
else
{
$_linkreplace='';
}
if (isset($clienttoken))
{
$token = $clienttoken;
}
else
{
$token = '';
}
if (!isset($_SESSION['s_lang']))
{
$_s_lang = 'en';
}
else
{
$_s_lang = $_SESSION['s_lang'];
}
$_clearall = "<input type='button' name='clearallbtn' value='" . $clang->gT("Exit and Clear Survey") . "' class='clearall' "
. "onclick=\"if (confirm('" . $clang->gT("Are you sure you want to clear all your responses?", 'js') . "')) {window.open('{$publicurl}/index.php?sid=$surveyid&move=clearall&lang=" . $_s_lang;
if (returnglobal('token'))
{
$_clearall .= "&token=" . urlencode(trim(sanitize_xss_string(strip_tags(returnglobal('token')))));
}
$_clearall .= "', '_self')}\" />";
if (isset($_SESSION['datestamp']))
{
$_datestamp = $_SESSION['datestamp'];
}
else
{
$_datestamp = '-';
}
//Set up save/load feature
if (isset($thissurvey['allowsave']) and $thissurvey['allowsave'] == "Y")
{
// Find out if the user has any saved data
if ($thissurvey['format'] == 'A')
{
if ($thissurvey['tokenanswerspersistence'] != 'Y')
{
$_saveall = "\t\t\t<input type='submit' name='loadall' value='" . $clang->gT("Load Unfinished Survey") . "' class='saveall' " . (($thissurvey['active'] != "Y") ? "disabled='disabled'" : "") . "/>"
. "\n\t\t\t<input type='button' name='saveallbtn' value='" . $clang->gT("Resume Later") . "' class='saveall' onclick=\"javascript:document.limesurvey.move.value = this.value;addHiddenField(document.getElementById('limesurvey'),'saveall',this.value);document.getElementById('limesurvey').submit();\" " . (($thissurvey['active'] != "Y") ? "disabled='disabled'" : "") . "/>"; // Show Save So Far button
}
else
{
$_saveall = "\t\t\t<input type='button' name='saveallbtn' value='" . $clang->gT("Resume Later") . "' class='saveall' onclick=\"javascript:document.limesurvey.move.value = this.value;addHiddenField(document.getElementById('limesurvey'),'saveall',this.value);document.getElementById('limesurvey').submit();\" " . (($thissurvey['active'] != "Y") ? "disabled='disabled'" : "") . "/>"; // Show Save So Far button
};
}
elseif (!isset($_SESSION['step']) || !$_SESSION['step'])
{ //First page, show LOAD
if ($thissurvey['tokenanswerspersistence'] != 'Y')
{
$_saveall = "\t\t\t<input type='submit' name='loadall' value='" . $clang->gT("Load Unfinished Survey") . "' class='saveall' " . (($thissurvey['active'] != "Y") ? "disabled='disabled'" : "") . "/>";
}
else
{
$_saveall = '';
};
}
elseif (isset($_SESSION['scid']) && (isset($move) && $move == "movelast"))
{ //Already saved and on Submit Page, dont show Save So Far button
$_saveall = '';
}
else
{
$_saveall = "<input type='button' name='saveallbtn' value='" . $clang->gT("Resume Later") . "' class='saveall' onclick=\"javascript:document.limesurvey.move.value = this.value;addHiddenField(document.getElementById('limesurvey'),'saveall',this.value);document.getElementById('limesurvey').submit();\" " . (($thissurvey['active'] != "Y") ? "disabled='disabled'" : "") . "/>"; // Show Save So Far button
}
}
else
{
$_saveall = "";
}
$_templatecss = "<link rel='stylesheet' type='text/css' href='{$_templateurl}template.css' />\n";
if (getLanguageRTL($clang->langcode))
{
$_templatecss.="<link rel='stylesheet' type='text/css' href='{$_templateurl}template-rtl.css' />\n";
}
if (FlattenText($help, true) != '')
{
If (!isset($helpicon))
{
if (file_exists($templatedir . '/help.gif'))
{
$helpicon = $_templateurl . 'help.gif';
}
elseif (file_exists($templatedir . '/help.png'))
{
$helpicon = $_templateurl . 'help.png';
}
else
{
$helpicon = $imageurl . "/help.gif";
}
}
$_questionhelp = "<img src='{$helpicon}' alt='Help' align='left' />".$help;
}
else
{
$_questionhelp = $help;
}
if (isset($thissurvey['allowprev']) && $thissurvey['allowprev'] == "N")
{
$_strreview = "";
}
else
{
$_strreview = $clang->gT("If you want to check any of the answers you have made, and/or change them, you can do that now by clicking on the [<< prev] button and browsing through your responses.");
}
if (isset($thissurvey['active']) and $thissurvey['active'] == "N")
{
$_restart = "<a href='{$publicurl}/index.php?sid=$surveyid&newtest=Y";
if (isset($s_lang) && $s_lang != '') {
$_restart.="&lang=" . $s_lang;
}
$_restart.="'>" . $clang->gT("Restart this Survey") . "</a>";
} else
{
$restart_extra = "";
$restart_token = returnglobal('token');
if (!empty($restart_token))
$restart_extra .= "&token=" . urlencode($restart_token);
else
$restart_extra = "&newtest=Y";
if (!empty($_GET['lang']))
$restart_extra .= "&lang=" . returnglobal('lang');
$_restart = "<a href='{$publicurl}/index.php?sid=$surveyid" . $restart_extra . "'>" . $clang->gT("Restart this Survey") . "</a>";
}
if (isset($thissurvey['anonymized']) && $thissurvey['anonymized'] == 'Y')
{
$_savealert = $clang->gT("To remain anonymous please use a pseudonym as your username, also an email address is not required.");
}
else
{
$_savealert = "";
}
$_return_to_survey = "<a href='$relativeurl/index.php?sid=$surveyid";
if (returnglobal('token'))
{
$_return_to_survey.= "&token=" . urlencode(trim(sanitize_xss_string(strip_tags(returnglobal('token')))));
}
$_return_to_survey .= "'>" . $clang->gT("Return To Survey") . "</a>";
$_saveform = "<table><tr><td align='right'>" . $clang->gT("Name") . ":</td><td><input type='text' name='savename' value='";
if (isset($_POST['savename']))
{
$_saveform .= html_escape(auto_unescape($_POST['savename']));
}
$_saveform .= "' /></td></tr>\n"
. "<tr><td align='right'>" . $clang->gT("Password") . ":</td><td><input type='password' name='savepass' value='";
if (isset($_POST['savepass']))
{
$_saveform .= html_escape(auto_unescape($_POST['savepass']));
}
$_saveform .= "' /></td></tr>\n"
. "<tr><td align='right'>" . $clang->gT("Repeat Password") . ":</td><td><input type='password' name='savepass2' value='";
if (isset($_POST['savepass2']))
{
$_saveform .= html_escape(auto_unescape($_POST['savepass2']));
}
$_saveform .= "' /></td></tr>\n"
. "<tr><td align='right'>" . $clang->gT("Your Email") . ":</td><td><input type='text' name='saveemail' value='";
if (isset($_POST['saveemail']))
{
$_saveform .= html_escape(auto_unescape($_POST['saveemail']));
}
$_saveform .= "' /></td></tr>\n";
if (isset($thissurvey['usecaptcha']) && function_exists("ImageCreate") && captcha_enabled('saveandloadscreen', $thissurvey['usecaptcha']))
{
$_saveform .="<tr><td align='right'>" . $clang->gT("Security Question") . ":</td><td><table><tr><td valign='middle'><img src='{$captchapath}verification.php?sid=$surveyid' alt='' /></td><td valign='middle' style='text-align:left'><input type='text' size='5' maxlength='3' name='loadsecurity' value='' /></td></tr></table></td></tr>\n";
}
$_saveform .= "<tr><td align='right'></td><td></td></tr>\n"
. "<tr><td></td><td><input type='submit' id='savebutton' name='savesubmit' value='" . $clang->gT("Save Now") . "' /></td></tr>\n"
. "</table>";
$_loadform = "<table><tr><td align='right'>" . $clang->gT("Saved name") . ":</td><td><input type='text' name='loadname' value='";
if ($loadname)
{
$_loadform .= html_escape(auto_unescape($loadname));
}
$_loadform .= "' /></td></tr>\n"
. "<tr><td align='right'>" . $clang->gT("Password") . ":</td><td><input type='password' name='loadpass' value='";
if (isset($loadpass))
{
$_loadform .= html_escape(auto_unescape($loadpass));
}
$_loadform .= "' /></td></tr>\n";
if (isset($thissurvey['usecaptcha']) && function_exists("ImageCreate") && captcha_enabled('saveandloadscreen', $thissurvey['usecaptcha']))
{
$_loadform .="<tr><td align='right'>" . $clang->gT("Security Question") . ":</td><td><table><tr><td valign='middle'><img src='{$captchapath}verification.php?sid=$surveyid' alt='' /></td><td valign='middle'><input type='text' size='5' maxlength='3' name='loadsecurity' value='' alt=''/></td></tr></table></td></tr>\n";
}
$_loadform .="<tr><td align='right'></td><td></td></tr>\n"
. "<tr><td></td><td><input type='submit' id='loadbutton' value='" . $clang->gT("Load Now") . "' /></td></tr></table>\n";
$_registerform = "<form method='post' action='{$publicurl}/register.php'>\n";
if (!isset($_REQUEST['lang']))
{
$_reglang = GetBaseLanguageFromSurveyID($surveyid);
}
else
{
$_reglang = returnglobal('lang');
}
$_registerform .= "<input type='hidden' name='lang' value='" . $_reglang . "' />\n";
$_registerform .= "<input type='hidden' name='sid' value='$surveyid' id='sid' />\n";
$_registerform.="<table class='register' summary='Registrationform'>\n"
. "<tr><td align='right'>"
. $clang->gT("First name") . ":</td>"
. "<td align='left'><input class='text' type='text' name='register_firstname'";
if (isset($_POST['register_firstname']))
{
$_registerform .= " value='" . htmlentities(returnglobal('register_firstname'), ENT_QUOTES, 'UTF-8') . "'";
}
$_registerform .= " /></td></tr>"
. "<tr><td align='right'>" . $clang->gT("Last name") . ":</td>\n"
. "<td align='left'><input class='text' type='text' name='register_lastname'";
if (isset($_POST['register_lastname']))
{
$_registerform .= " value='" . htmlentities(returnglobal('register_lastname'), ENT_QUOTES, 'UTF-8') . "'";
}
$_registerform .= " /></td></tr>\n"
. "<tr><td align='right'>" . $clang->gT("Email address") . ":</td>\n"
. "<td align='left'><input class='text' type='text' name='register_email'";
if (isset($_POST['register_email']))
{
$_registerform .= " value='" . htmlentities(returnglobal('register_email'), ENT_QUOTES, 'UTF-8') . "'";
}
$_registerform .= " /></td></tr>\n";
if (isset($thissurvey['usecaptcha']) && function_exists("ImageCreate") && captcha_enabled('registrationscreen', $thissurvey['usecaptcha']))
{
$_registerform .="<tr><td align='right'>" . $clang->gT("Security Question") . ":</td><td><table><tr><td valign='middle'><img src='{$captchapath}verification.php?sid=$surveyid' alt='' /></td><td valign='middle'><input type='text' size='5' maxlength='3' name='loadsecurity' value='' /></td></tr></table></td></tr>\n";
}
/* if(isset($thissurvey['attribute1']) && $thissurvey['attribute1'])
{
$_registerform .= "<tr><td align='right'>".$thissurvey['attribute1'].":</td>\n"
."<td align='left'><input class='text' type='text' name='register_attribute1'";
if (isset($_POST['register_attribute1']))
{
$_registerform .= " value='".htmlentities(returnglobal('register_attribute1'),ENT_QUOTES,'UTF-8')."'";
}
$_registerform .= " /></td></tr>\n";
}
if(isset($thissurvey['attribute2']) && $thissurvey['attribute2'])
{
$_registerform .= "<tr><td align='right'>".$thissurvey['attribute2'].":</td>\n"
."<td align='left'><input class='text' type='text' name='register_attribute2'";
if (isset($_POST['register_attribute2']))
{
$_registerform .= " value='".htmlentities(returnglobal('register_attribute2'),ENT_QUOTES,'UTF-8')."'";
}
$_registerform .= " /></td></tr>\n";
} */
$_registerform .= "<tr><td></td><td><input id='registercontinue' class='submit' type='submit' value='" . $clang->gT("Continue") . "' />"
. "</td></tr>\n"
. "</table>\n"
. "</form>\n";
if (!is_null($surveyid) && function_exists('doAssessment'))
{
$assessmentdata = doAssessment($surveyid, true);
$_assessment_current_total = $assessmentdata['total'];
}
else
{
$_assessment_current_total = '';
}
// Set the array of replacement variables here - don't include curly braces
$corecoreReplacements = array();
$coreReplacements['ANSWER'] = $answer; // global
$coreReplacements['ANSWERSCLEARED'] = $clang->gT("Answers Cleared");
$coreReplacements['ASSESSMENTS'] = $assessments; // global
$coreReplacements['ASSESSMENT_CURRENT_TOTAL'] = $_assessment_current_total;
$coreReplacements['ASSESSMENT_HEADING'] = $clang->gT("Your Assessment");
$coreReplacements['CHECKJAVASCRIPT'] = "<noscript><span class='warningjs'>".$clang->gT("Caution: JavaScript execution is disabled in your browser. You may not be able to answer all questions in this survey. Please, verify your browser parameters.")."</span></noscript>";
$coreReplacements['CLEARALL'] = $_clearall;
$coreReplacements['CLOSEWINDOW'] = "<a href='javascript:%20self.close()'>".$clang->gT("Close this window")."</a>";
$coreReplacements['COMPLETED'] = $completed; // global
$coreReplacements['DATESTAMP'] = $_datestamp;
$coreReplacements['EXPIRY'] = $_dateoutput;
$coreReplacements['GROUPDESCRIPTION'] = $_groupdescription;
$coreReplacements['GROUPNAME'] = $_groupname;
$coreReplacements['LANG'] = $clang->getlangcode();
$coreReplacements['LANGUAGECHANGER'] = $languagechanger; // global
$coreReplacements['LOADERROR'] = $errormsg; // global
$coreReplacements['LOADFORM'] = $_loadform;
$coreReplacements['LOADHEADING'] = $clang->gT("Load A Previously Saved Survey");
$coreReplacements['LOADMESSAGE'] = $clang->gT("You can load a survey that you have previously saved from this screen.")."<br />".$clang->gT("Type in the 'name' you used to save the survey, and the password.")."<br />";
$coreReplacements['NAVIGATOR'] = $navigator; // global
$coreReplacements['NOSURVEYID'] = $surveylist['nosid']; // global
$coreReplacements['NUMBEROFQUESTIONS'] = $_totalquestionsAsked;
$coreReplacements['PERCENTCOMPLETE'] = $percentcomplete; // global
$coreReplacements['PRIVACY'] = $privacy; // global
$coreReplacements['PRIVACYMESSAGE'] = "<span style='font-weight:bold; font-style: italic;'>".$clang->gT("A Note On Privacy")."</span><br />".$clang->gT("This survey is anonymous.")."<br />".$clang->gT("The record kept of your survey responses does not contain any identifying information about you unless a specific question in the survey has asked for this. If you have responded to a survey that used an identifying token to allow you to access the survey, you can rest assured that the identifying token is not kept with your responses. It is managed in a separate database, and will only be updated to indicate that you have (or haven't) completed this survey. There is no way of matching identification tokens with survey responses in this survey.");
$coreReplacements['QUESTION'] = $_question;
$coreReplacements['QUESTIONHELP'] = $_questionhelp;
$coreReplacements['QUESTIONHELPPLAINTEXT'] = strip_tags(addslashes($help)); // global
$coreReplacements['QUESTION_CLASS'] = $_question_class;
$coreReplacements['QUESTION_CODE'] = $_question_code;
$coreReplacements['QUESTION_ESSENTIALS'] = $_question_essentials;
$coreReplacements['QUESTION_FILE_VALID_MESSAGE'] = $_question_file_valid_message;
$coreReplacements['QUESTION_HELP'] = $_question_help;
$coreReplacements['QUESTION_INPUT_ERROR_CLASS'] = $_question_input_error_class;
$coreReplacements['QUESTION_MANDATORY'] = $_question_mandatory;
$coreReplacements['QUESTION_MAN_CLASS'] = $_question_man_class;
$coreReplacements['QUESTION_MAN_MESSAGE'] = $_question_man_message;
$coreReplacements['QUESTION_NUMBER'] = $_question_number;
$coreReplacements['QUESTION_TEXT'] = $_question_text;
$coreReplacements['QUESTION_VALID_MESSAGE'] = $_question_valid_message;
$coreReplacements['REGISTERERROR'] = $register_errormsg; // global
$coreReplacements['REGISTERFORM'] = $_registerform;
$coreReplacements['REGISTERMESSAGE1'] = $clang->gT("You must be registered to complete this survey");
$coreReplacements['REGISTERMESSAGE2'] = $clang->gT("You may register for this survey if you wish to take part.")."<br />\n".$clang->gT("Enter your details below, and an email containing the link to participate in this survey will be sent immediately.");
$coreReplacements['RESTART'] = $_restart;
$coreReplacements['RETURNTOSURVEY'] = $_return_to_survey;
$coreReplacements['SAVE'] = $_saveall;
$coreReplacements['SAVEALERT'] = $_savealert;
$coreReplacements['SAVEDID'] = $saved_id; // global
$coreReplacements['SAVEERROR'] = $errormsg; // global - same as LOADERROR
$coreReplacements['SAVEFORM'] = $_saveform;
$coreReplacements['SAVEHEADING'] = $clang->gT("Save Your Unfinished Survey");
$coreReplacements['SAVEMESSAGE'] = $clang->gT("Enter a name and password for this survey and click save below.")."<br />\n".$clang->gT("Your survey will be saved using that name and password, and can be completed later by logging in with the same name and password.")."<br /><br />\n".$clang->gT("If you give an email address, an email containing the details will be sent to you.")."<br /><br />\n".$clang->gT("After having clicked the save button you can either close this browser window or continue filling out the survey.");
$coreReplacements['SGQ'] = $_question_sgq;
$coreReplacements['SID'] = $surveyid; // global
$coreReplacements['SITENAME'] = $sitename; // global
$coreReplacements['SUBMITBUTTON'] = $_submitbutton;
$coreReplacements['SUBMITCOMPLETE'] = "<strong>".$clang->gT("Thank you!")."<br /><br />".$clang->gT("You have completed answering the questions in this survey.")."</strong><br /><br />".$clang->gT("Click on 'Submit' now to complete the process and save your answers.");
$coreReplacements['SUBMITREVIEW'] = $_strreview;
$coreReplacements['SURVEYCONTACT'] = $_surveycontact;
$coreReplacements['SURVEYDESCRIPTION'] = (isset($thissurvey['description']) ? $thissurvey['description'] : '');
$coreReplacements['SURVEYFORMAT'] = $surveyformat; // global
$coreReplacements['SURVEYLANGAGE'] = $clang->langcode;
$coreReplacements['SURVEYLIST'] = $surveylist['list']; // global
$coreReplacements['SURVEYLISTHEADING'] = $surveylist['listheading']; // global
$coreReplacements['SURVEYNAME'] = $thissurvey['name']; // global
$coreReplacements['TEMPLATECSS'] = $_templatecss;
$coreReplacements['TEMPLATEURL'] = $_templateurl;
$coreReplacements['THEREAREXQUESTIONS'] = $_therearexquestions;
if (!$anonymized) $coreReplacements['TOKEN'] = $_token;
$coreReplacements['URL'] = $_linkreplace;
$coreReplacements['WELCOME'] = (isset($thissurvey['welcome']) ? $thissurvey['welcome'] : '');
$tokenAndAnswerMap = getAnswerAndTokenMappings(false,$anonymized);
$doTheseReplacements = array_merge($coreReplacements, $tokenAndAnswerMap, $replacements); // so $replacements overrides core values
$line = doReplacements($line,$doTheseReplacements);
// Do replacements twice since some reference others
$line = doReplacements($line,$doTheseReplacements);
return $line;
}
/**
* Load preview of a question screen.
*
* @access public
* @param int $surveyid
* @param int $qid
* @param string $lang
* @return void
*/
public function preview($surveyid, $qid, $lang = null)
{
$surveyid = sanitize_int($surveyid);
$qid = sanitize_int($qid);
$LEMdebugLevel = 0;
Yii::app()->loadHelper("qanda");
Yii::app()->loadHelper("surveytranslator");
if (empty($surveyid)) {
$this->getController()->error('No Survey ID provided');
}
if (empty($qid)) {
$this->getController()->error('No Question ID provided');
}
if (empty($lang)) {
$language = Survey::model()->findByPk($surveyid)->language;
} else {
$language = $lang;
}
if (!isset(Yii::app()->session['step'])) {
Yii::app()->session['step'] = 0;
}
if (!isset(Yii::app()->session['prevstep'])) {
Yii::app()->session['prevstep'] = 0;
}
if (!isset(Yii::app()->session['maxstep'])) {
Yii::app()->session['maxstep'] = 0;
}
// Use $_SESSION instead of $this->session for frontend features.
$_SESSION['survey_' . $surveyid]['s_lang'] = $language;
$_SESSION['survey_' . $surveyid]['fieldmap'] = createFieldMap($surveyid, 'full', true, $qid, $language);
// Prefill question/answer from defaultvalues
foreach ($_SESSION['survey_' . $surveyid]['fieldmap'] as $field) {
if (isset($field['defaultvalue'])) {
$_SESSION['survey_' . $surveyid][$field['fieldname']] = $field['defaultvalue'];
}
}
$clang = new limesurvey_lang($language);
$thissurvey = getSurveyInfo($surveyid);
setNoAnswerMode($thissurvey);
Yii::app()->session['dateformats'] = getDateFormatData($thissurvey['surveyls_dateformat']);
$qrows = Questions::model()->findByAttributes(array('sid' => $surveyid, 'qid' => $qid, 'language' => $language))->getAttributes();
$ia = array(0 => $qid, 1 => $surveyid . 'X' . $qrows['gid'] . 'X' . $qid, 2 => $qrows['title'], 3 => $qrows['question'], 4 => $qrows['type'], 5 => $qrows['gid'], 6 => $qrows['mandatory'], 7 => 'N', 8 => 'N');
$radix = getRadixPointData($thissurvey['surveyls_numberformat']);
$radix = $radix['seperator'];
$surveyOptions = array('radix' => $radix, 'tempdir' => Yii::app()->getConfig('tempdir'));
LimeExpressionManager::StartSurvey($surveyid, 'question', $surveyOptions, false, $LEMdebugLevel);
$qseq = LimeExpressionManager::GetQuestionSeq($qid);
$moveResult = LimeExpressionManager::JumpTo($qseq + 1, true, false, true);
$answers = retrieveAnswers($ia, $surveyid);
if (!$thissurvey['template']) {
$thistpl = getTemplatePath(Yii::app()->getConfig('defaulttemplate'));
} else {
$thistpl = getTemplatePath(validateTemplateDir($thissurvey['template']));
}
doHeader();
$showQuestion = "\$('#question{$qid}').show();";
$dummy_js = <<<EOD
<script type='text/javascript'>
<!--
LEMradix='{$radix}';
var numRegex = new RegExp('[^-' + LEMradix + '0-9]','g');
var intRegex = new RegExp('[^-0-9]','g');
function fixnum_checkconditions(value, name, type, evt_type, intonly)
{
newval = new String(value);
if (typeof intonly !=='undefined' && intonly==1) {
newval = newval.replace(intRegex,'');
}
else {
newval = newval.replace(numRegex,'');
}
if (LEMradix === ',') {
newval = newval.split(',').join('.');
}
if (newval != '-' && newval != '.' && newval != '-.' && newval != parseFloat(newval)) {
newval = '';
}
displayVal = newval;
if (LEMradix === ',') {
displayVal = displayVal.split('.').join(',');
}
if (name.match(/other\$/)) {
\$('#answer'+name+'text').val(displayVal);
}
\$('#answer'+name).val(displayVal);
if (typeof evt_type === 'undefined')
{
evt_type = 'onchange';
}
checkconditions(newval, name, type, evt_type);
}
function checkconditions(value, name, type, evt_type)
{
if (typeof evt_type === 'undefined')
{
evt_type = 'onchange';
}
if (type == 'radio' || type == 'select-one')
{
var hiddenformname='java'+name;
document.getElementById(hiddenformname).value=value;
}
else if (type == 'checkbox')
{
if (document.getElementById('answer'+name).checked)
{
\$('#java'+name).val('Y');
} else
{
\$('#java'+name).val('');
}
}
else if (type == 'text' && name.match(/other\$/) && typeof document.getElementById('java'+name) !== 'undefined' && document.getElementById('java'+name) != null)
{
\$('#java'+name).val(value);
}
ExprMgr_process_relevance_and_tailoring(evt_type,name,type);
{$showQuestion}
}
\$(document).ready(function() {
{$showQuestion}
});
\$(document).change(function() {
{$showQuestion}
});
\$(document).bind('keydown',function(e) {
if (e.keyCode == 9) {
{$showQuestion}
return true;
}
return true;
});
// -->
</script>
EOD;
$answer = $answers[0][1];
// $help = $answers[0][2];
$qinfo = LimeExpressionManager::GetQuestionStatus($qid);
$help = $qinfo['info']['help'];
$question = $answers[0][0];
$question['code'] = $answers[0][5];
$question['class'] = getQuestionClass($qrows['type']);
$question['essentials'] = 'id="question' . $qrows['qid'] . '"';
$question['sgq'] = $ia[1];
$question['aid'] = 'unknown';
$question['sqid'] = 'unknown';
if ($qrows['mandatory'] == 'Y') {
$question['man_class'] = ' mandatory';
} else {
$question['man_class'] = '';
}
$redata = compact(array_keys(get_defined_vars()));
$content = templatereplace(file_get_contents("{$thistpl}/startpage.pstpl"), array(), $redata);
$content .= CHtml::form('index.php', 'post', array('id' => "limesurvey", 'name' => "limesurvey", 'autocomplete' => 'off'));
$content .= templatereplace(file_get_contents("{$thistpl}/startgroup.pstpl"), array(), $redata);
$question_template = file_get_contents("{$thistpl}/question.pstpl");
// the following has been added for backwards compatiblity.
if (substr_count($question_template, '{QUESTION_ESSENTIALS}') > 0) {
// LS 1.87 and newer templates
$content .= "\n" . templatereplace($question_template, array(), $redata, 'Unspecified', false, $qid) . "\n";
} else {
// LS 1.86 and older templates
$content .= '<div ' . $question['essentials'] . ' class="' . $question['class'] . $question['man_class'] . '">';
$content .= "\n" . templatereplace($question_template, array(), $redata, 'Unspecified', false, $qid) . "\n";
$content .= "\n\t</div>\n";
}
$content .= templatereplace(file_get_contents("{$thistpl}/endgroup.pstpl"), array(), $redata) . $dummy_js;
LimeExpressionManager::FinishProcessingGroup();
$content .= LimeExpressionManager::GetRelevanceAndTailoringJavaScript();
$content .= '<p> </form>';
$content .= templatereplace(file_get_contents("{$thistpl}/endpage.pstpl"), array(), $redata);
LimeExpressionManager::FinishProcessingPage();
echo $content;
if ($LEMdebugLevel >= 1) {
echo LimeExpressionManager::GetDebugTimingMessage();
}
if ($LEMdebugLevel >= 2) {
echo "<table><tr><td align='left'><b>Group/Question Validation Results:</b>" . $moveResult['message'] . "</td></tr></table>\n";
}
echo "</html>\n";
exit;
}
function getAdminHeader($meta = false)
{
global $sitename, $admintheme, $rooturl, $defaultlang, $css_admin_includes, $homeurl;
if (!isset($_SESSION['adminlang']) || $_SESSION['adminlang'] == '') {
$_SESSION['adminlang'] = $defaultlang;
}
$strAdminHeader = "<?xml version=\"1.0\"?><!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Transitional//EN\" \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd\">\n" . "<html ";
if (getLanguageRTL($_SESSION['adminlang'])) {
$strAdminHeader .= " dir=\"rtl\" ";
}
$strAdminHeader .= ">\n<head>\n";
if ($meta) {
$strAdminHeader .= $meta;
}
$strAdminHeader .= "<meta http-equiv=\"content-type\" content=\"text/html; charset=UTF-8\" />\n";
$strAdminHeader .= "<script type=\"text/javascript\" src=\"{$homeurl}/scripts/tabpane/js/tabpane.js\"></script>\n" . "<script type=\"text/javascript\" src=\"{$rooturl}/scripts/jquery/jquery.js\"></script>\n" . "<script type=\"text/javascript\" src=\"{$rooturl}/scripts/jquery/jquery-ui.js\"></script>\n" . "<script type=\"text/javascript\" src=\"{$rooturl}/scripts/jquery/jquery.qtip.js\"></script>\n" . "<script type=\"text/javascript\" src=\"{$rooturl}/scripts/jquery/jquery.notify.js\"></script>\n" . "<script type=\"text/javascript\" src=\"{$homeurl}/scripts/admin_core.js\"></script>\n";
if ($_SESSION['adminlang'] != 'en') {
$strAdminHeader .= "<script type=\"text/javascript\" src=\"{$rooturl}/scripts/jquery/locale/jquery.ui.datepicker-{$_SESSION['adminlang']}.js\"></script>\n";
}
$strAdminHeader .= "<title>{$sitename}</title>\n";
$strAdminHeader .= "<link rel=\"stylesheet\" type=\"text/css\" media=\"all\" href=\"{$homeurl}//styles/{$admintheme}/tab.webfx.css \" />\n" . "<link rel=\"stylesheet\" type=\"text/css\" media=\"all\" href=\"{$rooturl}/scripts/jquery/css/start/jquery-ui.css\" />\n" . "<link rel=\"stylesheet\" type=\"text/css\" href=\"{$homeurl}/styles/{$admintheme}/printablestyle.css\" media=\"print\" />\n" . "<link rel=\"stylesheet\" type=\"text/css\" href=\"{$homeurl}/styles/{$admintheme}/adminstyle.css\" />\n" . "<link rel=\"shortcut icon\" href=\"{$homeurl}/favicon.ico\" type=\"image/x-icon\" />\n" . "<link rel=\"icon\" href=\"{$homeurl}/favicon.ico\" type=\"image/x-icon\" />\n";
if (getLanguageRTL($_SESSION['adminlang'])) {
$strAdminHeader .= "<link rel=\"stylesheet\" type=\"text/css\" href=\"styles/{$admintheme}/adminstyle-rtl.css\" />\n";
}
$css_admin_includes = array_unique($css_admin_includes);
foreach ($css_admin_includes as $cssinclude) {
$strAdminHeader .= "<link rel=\"stylesheet\" type=\"text/css\" media=\"all\" href=\"{$cssinclude}\" />\n";
}
$strAdminHeader .= use_firebug() . "</head>\n<body>\n";
if (isset($_SESSION['dateformat'])) {
$formatdata = getDateFormatData($_SESSION['dateformat']);
$strAdminHeader .= "<script type='text/javascript'>\n var userdateformat='" . $formatdata['jsdate'] . "';\n var userlanguage='" . $_SESSION['adminlang'] . "';\n </script>";
}
// Prepare flashmessage
if (isset($_SESSION['flashmessage']) && $_SESSION['flashmessage'] != '') {
$strAdminHeader .= '<div id="flashmessage" style="display:none;">
<div id="themeroller" class="ui-state-highlight ui-corner-all">
<!-- close link -->
<a class="ui-notify-close" href="#">
<span class="ui-icon ui-icon-close" style="float:right"></span>
</a>
<!-- alert icon -->
<span style="float:left; margin:2px 5px 0 0;" class="ui-icon ui-icon-info"></span>
<h1></h1>
<p>' . $_SESSION['flashmessage'] . '</p>
</div>
<!-- other templates here, maybe.. -->
</div>';
unset($_SESSION['flashmessage']);
}
// Standard header
$strAdminHeader .= "<div class='maintitle'>{$sitename}</div>\n";
return $strAdminHeader;
}
/**
* This function replaces keywords in a text and is mainly intended for templates
* If you use this functions put your replacement strings into the $replacements variable
* instead of using global variables
* NOTE - Don't do any embedded replacements in this function. Create the array of replacement values and
* they will be done in batch at the end
*
* @param mixed $line Text to search in
* @param mixed $replacements Array of replacements: Array( <stringtosearch>=><stringtoreplacewith>
* @param boolean $anonymized Determines if token data is being used or just replaced with blanks
* @param questionNum - needed to support dynamic JavaScript-based tailoring within questions
* @return string Text with replaced strings
*/
function templatereplace($line, $replacements = array(), &$redata = array(), $debugSrc = 'Unspecified', $anonymized = false, $questionNum = NULL, $registerdata = array())
{
/*
global $clienttoken,$token,$sitename,$move,$showxquestions,$showqnumcode,$questioncode,$register_errormsg;
global $s_lang,$errormsg,$saved_id, $relativeurl, $languagechanger,$captchapath,$loadname;
*/
/*
$allowedvars = array('surveylist', 'sitename', 'clienttoken', 'rooturl', 'thissurvey', 'imageurl', 'defaulttemplate',
'percentcomplete', 'move', 'groupname', 'groupdescription', 'question', 'showxquestions',
'showgroupinfo', 'showqnumcode', 'questioncode', 'answer', 'navigator', 'help', 'totalquestions',
'surveyformat', 'completed', 'register_errormsg', 'notanswered', 'privacy', 'surveyid', 'publicurl',
'templatedir', 'token', 'assessments', 's_lang', 'errormsg', 'clang', 'saved_id', 'usertemplaterootdir',
'relativeurl', 'languagechanger', 'printoutput', 'captchapath', 'loadname');
*/
$allowedvars = array('answer', 'assessments', 'captchapath', 'clienttoken', 'completed', 'errormsg', 'groupdescription', 'groupname', 'help', 'imageurl', 'languagechanger', 'loadname', 'move', 'navigator', 'percentcomplete', 'privacy', 'question', 'register_errormsg', 'relativeurl', 's_lang', 'saved_id', 'showgroupinfo', 'showqnumcode', 'showxquestions', 'sitename', 'surveylist', 'templatedir', 'thissurvey', 'token', 'totalBoilerplatequestions', 'totalquestions');
$varsPassed = array();
foreach ($allowedvars as $var) {
if (isset($redata[$var])) {
${$var} = $redata[$var];
$varsPassed[] = $var;
}
}
// if (count($varsPassed) > 0) {
// log_message('debug', 'templatereplace() called from ' . $debugSrc . ' contains: ' . implode(', ', $varsPassed));
// }
// if (isset($redata['question'])) {
// LimeExpressionManager::ShowStackTrace('has QID and/or SGA',$allowedvars);
// }
// extract($redata); // creates variables for each of the keys in the array
// Local over-rides in case not set above
if (!isset($showgroupinfo)) {
$showgroupinfo = Yii::app()->getConfig('showgroupinfo');
}
if (!isset($showqnumcode)) {
$showqnumcode = Yii::app()->getConfig('showqnumcode');
}
$_surveyid = Yii::app()->getConfig('surveyID');
if (!isset($showxquestions)) {
$showxquestions = Yii::app()->getConfig('showxquestions');
}
if (!isset($s_lang)) {
$s_lang = isset(Yii::app()->session['survey_' . $_surveyid]['s_lang']) ? Yii::app()->session['survey_' . $_surveyid]['s_lang'] : 'en';
}
if (!isset($captchapath)) {
$captchapath = '';
}
$clang = Yii::app()->lang;
Yii::app()->loadHelper('surveytranslator');
$questiondetails = array('sid' => 0, 'gid' => 0, 'qid' => 0, 'aid' => 0);
if (isset($question) && isset($question['sgq'])) {
$questiondetails = getSIDGIDQIDAIDType($question['sgq']);
}
//Gets an array containing SID, GID, QID, AID and Question Type)
if (isset($thissurvey['sid'])) {
$surveyid = $thissurvey['sid'];
}
// lets sanitize the survey template
if (isset($thissurvey['templatedir'])) {
$templatename = $thissurvey['templatedir'];
} else {
$templatename = Yii::app()->getConfig('defaulttemplate');
}
if (!isset($templatedir)) {
$templatedir = getTemplatePath($templatename);
}
if (!isset($templateurl)) {
$templateurl = getTemplateURL($templatename) . "/";
}
// TEMPLATECSS and TEMPLATEJS
$_templatecss = "";
$_templatejs = "";
if (stripos($line, "{TEMPLATECSS}")) {
$css_header_includes = Yii::app()->getConfig("css_header_includes");
if (file_exists($templatedir . DIRECTORY_SEPARATOR . 'jquery-ui-custom.css')) {
$template_jqueryui_css = "<link rel='stylesheet' type='text/css' media='all' href='{$templateurl}jquery-ui-custom.css' />\n";
} elseif (file_exists($templatedir . DIRECTORY_SEPARATOR . 'jquery-ui.css')) {
$template_jqueryui_css = "<link rel='stylesheet' type='text/css' media='all' href='{$templateurl}jquery-ui.css' />\n";
} else {
$_templatecss .= "<link rel='stylesheet' type='text/css' media='all' href='" . Yii::app()->getConfig('publicstyleurl') . "jquery-ui.css' />\n";
// Remove it after corrected slider
$template_jqueryui_css = "";
}
if ($css_header_includes) {
foreach ($css_header_includes as $cssinclude) {
if (substr($cssinclude, 0, 4) == 'http' || substr($cssinclude, 0, strlen(Yii::app()->getConfig('publicurl'))) == Yii::app()->getConfig('publicurl')) {
$_templatecss .= "<link rel='stylesheet' type='text/css' media='all' href='" . $cssinclude . "' />\n";
} else {
if (file_exists($templatedir . DIRECTORY_SEPARATOR . $cssinclude)) {
$_templatecss .= "<link rel='stylesheet' type='text/css' media='all' href='{$templateurl}{$cssinclude}' />\n";
} else {
$_templatecss .= "<link rel='stylesheet' type='text/css' media='all' href='" . Yii::app()->getConfig('publicstyleurl') . $cssinclude . "' />\n";
}
}
}
}
$_templatecss .= $template_jqueryui_css;
// Template jquery ui after default css
$_templatecss .= "<link rel='stylesheet' type='text/css' media='all' href='{$templateurl}template.css' />\n";
if (getLanguageRTL($clang->langcode)) {
$_templatecss .= "<link rel='stylesheet' type='text/css' media='all' href='{$templateurl}template-rtl.css' />\n";
}
}
if (stripos($line, "{TEMPLATEJS}")) {
$js_header_includes = header_includes(false, 'js');
$_jqueryuijsurl = Yii::app()->getConfig('generalscripts') . "jquery/jquery-ui.js";
$_templatejs .= "<script type='text/javascript' src='" . Yii::app()->getConfig('generalscripts') . "jquery/jquery.js'></script>\n";
$_templatejs .= "<script type='text/javascript' src='{$_jqueryuijsurl}'></script>\n";
$_templatejs .= "<script type='text/javascript' src='" . Yii::app()->getConfig('generalscripts') . "jquery/jquery.ui.touch-punch.min.js'></script>\n";
if ($js_header_includes) {
foreach ($js_header_includes as $jsinclude) {
if (substr($jsinclude, 0, 4) == 'http' || substr($jsinclude, 0, strlen(Yii::app()->getConfig('publicurl'))) == Yii::app()->getConfig('publicurl')) {
$_templatejs .= "<script type='text/javascript' src='{$jsinclude}'></script>\n";
} else {
$_templatejs .= "<script type='text/javascript' src='" . Yii::app()->getConfig('generalscripts') . $jsinclude . "'></script>\n";
}
}
}
$_templatejs .= "<script type='text/javascript' src='" . Yii::app()->getConfig('generalscripts') . "survey_runtime.js'></script>\n";
$_templatejs .= "<script type='text/javascript' src='{$templateurl}template.js'></script>\n";
$_templatejs .= useFirebug();
}
// surveyformat
if (isset($thissurvey['format'])) {
$surveyformat = str_replace(array("A", "S", "G"), array("allinone", "questionbyquestion", "groupbygroup"), $thissurvey['format']);
} else {
$surveyformat = "";
}
if (isset(Yii::app()->session['step']) && Yii::app()->session['step'] % 2 && $surveyformat != "allinone") {
$surveyformat .= " page-odd";
}
if (isset($thissurvey['allowjumps']) && $thissurvey['allowjumps'] == "Y" && $surveyformat != "allinone" && (isset(Yii::app()->session['step']) && Yii::app()->session['step'] > 0)) {
$surveyformat .= " withindex";
}
if (isset($thissurvey['showprogress']) && $thissurvey['showprogress'] == "Y") {
$surveyformat .= " showprogress";
}
if (isset($thissurvey['showqnumcode'])) {
$surveyformat .= " showqnumcode-" . $thissurvey['showqnumcode'];
}
// real survey contact
if (isset($surveylist) && isset($surveylist['contact'])) {
$surveycontact = $surveylist['contact'];
} elseif (isset($surveylist) && isset($thissurvey['admin']) && $thissurvey['admin'] != "") {
$surveycontact = sprintf($clang->gT("Please contact %s ( %s ) for further assistance."), $thissurvey['admin'], $thissurvey['adminemail']);
} else {
$surveycontact = "";
}
// If there are non-bracketed replacements to be made do so above this line.
// Only continue in this routine if there are bracketed items to replace {}
if (strpos($line, "{") === false) {
// process string anyway so that it can be pretty-printed
return LimeExpressionManager::ProcessString($line, $questionNum, NULL, false, 1, 1, true);
}
if ($showgroupinfo == 'both' || $showgroupinfo == 'name' || $showgroupinfo == 'choose' && !isset($thissurvey['showgroupinfo']) || $showgroupinfo == 'choose' && $thissurvey['showgroupinfo'] == 'B' || $showgroupinfo == 'choose' && $thissurvey['showgroupinfo'] == 'N') {
$_groupname = isset($groupname) ? $groupname : '';
} else {
$_groupname = '';
}
if ($showgroupinfo == 'both' || $showgroupinfo == 'description' || $showgroupinfo == 'choose' && !isset($thissurvey['showgroupinfo']) || $showgroupinfo == 'choose' && $thissurvey['showgroupinfo'] == 'B' || $showgroupinfo == 'choose' && $thissurvey['showgroupinfo'] == 'D') {
$_groupdescription = isset($groupdescription) ? $groupdescription : '';
} else {
$_groupdescription = '';
}
if (isset($question) && is_array($question)) {
$_question = $question['all'];
$_question_text = $question['text'];
$_question_help = $question['help'];
$_question_mandatory = $question['mandatory'];
$_question_man_message = $question['man_message'];
$_question_valid_message = $question['valid_message'];
$_question_file_valid_message = $question['file_valid_message'];
$_question_sgq = isset($question['sgq']) ? $question['sgq'] : '';
$_question_essentials = $question['essentials'];
$_getQuestionClass = $question['class'];
$_question_man_class = $question['man_class'];
$_question_input_error_class = $question['input_error_class'];
$_question_number = $question['number'];
$_question_code = $question['code'];
$_question_type = $question['type'];
} else {
$_question = isset($question) ? $question : '';
$_question_text = '';
$_question_help = '';
$_question_mandatory = '';
$_question_man_message = '';
$_question_valid_message = '';
$_question_file_valid_message = '';
$_question_sgq = '';
$_question_essentials = '';
$_getQuestionClass = '';
$_question_man_class = '';
$_question_input_error_class = '';
$_question_number = '';
$_question_code = '';
$_question_type = '';
}
if ($_question_type == '*') {
$_question_text = '<div class="em_equation">' . $_question_text . '</div>';
}
if (!($showqnumcode == 'both' || $showqnumcode == 'number' || $showqnumcode == 'choose' && !isset($thissurvey['showqnumcode']) || $showqnumcode == 'choose' && $thissurvey['showqnumcode'] == 'B' || $showqnumcode == 'choose' && $thissurvey['showqnumcode'] == 'N')) {
$_question_number = '';
}
if (!($showqnumcode == 'both' || $showqnumcode == 'code' || $showqnumcode == 'choose' && !isset($thissurvey['showqnumcode']) || $showqnumcode == 'choose' && $thissurvey['showqnumcode'] == 'B' || $showqnumcode == 'choose' && $thissurvey['showqnumcode'] == 'C')) {
$_question_code = '';
}
if (!isset($totalquestions)) {
$totalquestions = 0;
}
$_totalquestionsAsked = $totalquestions;
if ($showxquestions == 'show' || $showxquestions == 'choose' && !isset($thissurvey['showxquestions']) || $showxquestions == 'choose' && $thissurvey['showxquestions'] == 'Y') {
if ($_totalquestionsAsked < 1) {
$_therearexquestions = $clang->gT("There are no questions in this survey");
// Singular
} elseif ($_totalquestionsAsked == 1) {
$_therearexquestions = $clang->gT("There is 1 question in this survey");
//Singular
} else {
$_therearexquestions = $clang->gT("There are {NUMBEROFQUESTIONS} questions in this survey.");
//Note this line MUST be before {NUMBEROFQUESTIONS}
}
} else {
$_therearexquestions = '';
}
if (isset($token)) {
$_token = $token;
} elseif (isset($clienttoken)) {
$_token = htmlentities($clienttoken, ENT_QUOTES, 'UTF-8');
// or should it be URL-encoded?
} else {
$_token = '';
}
// Expiry
if (isset($thissurvey['expiry'])) {
$dateformatdetails = getDateFormatData($thissurvey['surveyls_dateformat']);
Yii::import('application.libraries.Date_Time_Converter', true);
$datetimeobj = new Date_Time_Converter($thissurvey['expiry'], "Y-m-d");
$_dateoutput = $datetimeobj->convert($dateformatdetails['phpdate']);
} else {
$_dateoutput = '-';
}
$_submitbutton = "<input class='submit' type='submit' value=' " . $clang->gT("Submit") . " ' name='move2' onclick=\"javascript:document.limesurvey.move.value = 'movesubmit';\" />";
if (isset($thissurvey['surveyls_url']) and $thissurvey['surveyls_url'] != "") {
if (trim($thissurvey['surveyls_urldescription']) != '') {
$_linkreplace = "<a href='{$thissurvey['surveyls_url']}'>{$thissurvey['surveyls_urldescription']}</a>";
} else {
$_linkreplace = "<a href='{$thissurvey['surveyls_url']}'>{$thissurvey['surveyls_url']}</a>";
}
} else {
$_linkreplace = '';
}
if (isset($thissurvey['sid']) && isset($_SESSION['survey_' . $thissurvey['sid']]['srid']) && $thissurvey['active'] == 'Y') {
$iscompleted = Survey_dynamic::model($surveyid)->isCompleted($_SESSION['survey_' . $thissurvey['sid']]['srid']);
} else {
$iscompleted = false;
}
if (isset($surveyid) && !$iscompleted) {
$_clearall = "<input type='button' name='clearallbtn' value='" . $clang->gT("Exit and clear survey") . "' class='clearall' " . "onclick=\"if (confirm('" . $clang->gT("Are you sure you want to clear all your responses?", 'js') . "')) {\nwindow.open('" . Yii::app()->getController()->createUrl("survey/index/sid/{$surveyid}", array('move' => 'clearall', 'lang' => $s_lang), '&');
if (returnGlobal('token')) {
$_clearall .= "&token=" . urlencode(trim(sanitize_token(strip_tags(returnGlobal('token')))));
}
$_clearall .= "', '_self')}\" />";
} else {
$_clearall = "";
}
if (isset(Yii::app()->session['datestamp'])) {
$_datestamp = Yii::app()->session['datestamp'];
} else {
$_datestamp = '-';
}
if (isset($thissurvey['allowsave']) and $thissurvey['allowsave'] == "Y") {
// Find out if the user has any saved data
if ($thissurvey['format'] == 'A') {
if ($thissurvey['tokenanswerspersistence'] != 'Y' || !isset($surveyid) || !tableExists('tokens_' . $surveyid)) {
$_saveall = "\t\t\t<input type='button' name='loadall' value='" . $clang->gT("Load unfinished survey") . "' class='saveall' onclick=\"javascript:addHiddenField(document.getElementById('limesurvey'),'loadall',this.value);document.getElementById('limesurvey').submit();\" " . ($thissurvey['active'] != "Y" ? "disabled='disabled'" : "") . "/>" . "\n\t\t\t<input type='button' name='saveallbtn' value='" . $clang->gT("Resume later") . "' class='saveall' onclick=\"javascript:document.limesurvey.move.value = this.value;addHiddenField(document.getElementById('limesurvey'),'saveall',this.value);document.getElementById('limesurvey').submit();\" " . ($thissurvey['active'] != "Y" ? "disabled='disabled'" : "") . "/>";
// Show Save So Far button
} else {
$_saveall = "\t\t\t<input type='button' name='saveallbtn' value='" . $clang->gT("Resume later") . "' class='saveall' onclick=\"javascript:document.limesurvey.move.value = this.value;addHiddenField(document.getElementById('limesurvey'),'saveall',this.value);document.getElementById('limesurvey').submit();\" " . ($thissurvey['active'] != "Y" ? "disabled='disabled'" : "") . "/>";
// Show Save So Far button
}
} elseif (isset($surveyid) && (!isset($_SESSION['survey_' . $surveyid]['step']) || !$_SESSION['survey_' . $surveyid]['step'])) {
//First page, show LOAD
if ($thissurvey['tokenanswerspersistence'] != 'Y' || !isset($surveyid) || !tableExists('tokens_' . $surveyid)) {
$_saveall = "\t\t\t<input type='button' name='loadall' value='" . $clang->gT("Load unfinished survey") . "' class='saveall' onclick=\"javascript:addHiddenField(document.getElementById('limesurvey'),'loadall',this.value);document.getElementById('limesurvey').submit();\" " . ($thissurvey['active'] != "Y" ? "disabled='disabled'" : "") . "/>";
} else {
$_saveall = '';
}
} elseif (isset(Yii::app()->session['scid']) && (isset($move) && $move == "movelast")) {
//Already saved and on Submit Page, dont show Save So Far button
$_saveall = '';
} else {
$_saveall = "<input type='button' name='saveallbtn' value='" . $clang->gT("Resume later") . "' class='saveall' onclick=\"javascript:document.limesurvey.move.value = this.value;addHiddenField(document.getElementById('limesurvey'),'saveall',this.value);document.getElementById('limesurvey').submit();\" " . ($thissurvey['active'] != "Y" ? "disabled='disabled'" : "") . "/>";
// Show Save So Far button
}
} else {
$_saveall = "";
}
if (!isset($help)) {
$help = "";
}
if (flattenText($help, true, true) != '') {
if (!isset($helpicon)) {
if (file_exists($templatedir . '/help.gif')) {
$helpicon = $templateurl . 'help.gif';
} elseif (file_exists($templatedir . '/help.png')) {
$helpicon = $templateurl . 'help.png';
} else {
$helpicon = Yii::app()->getConfig('imageurl') . "/help.gif";
}
}
$_questionhelp = "<img src='{$helpicon}' alt='Help' align='left' />" . $help;
} else {
$_questionhelp = $help;
}
if (isset($thissurvey['allowprev']) && $thissurvey['allowprev'] == "N") {
$_strreview = "";
} else {
$_strreview = $clang->gT("If you want to check any of the answers you have made, and/or change them, you can do that now by clicking on the [<< prev] button and browsing through your responses.");
}
if (isset($thissurvey['active']) and $thissurvey['active'] == "N") {
$_restart = "<a href='" . Yii::app()->getController()->createUrl("survey/index/sid/{$surveyid}/newtest/Y");
if (isset($s_lang) && $s_lang != '') {
$_restart .= "/lang/" . $s_lang;
}
$_restart .= "'>" . $clang->gT("Restart this survey") . "</a>";
} else {
if (isset($surveyid)) {
$restart_extra = "";
$restart_token = returnGlobal('token');
if (!empty($restart_token)) {
$restart_extra .= "/token/" . urlencode($restart_token);
} else {
$restart_extra = "/newtest/Y";
}
if (!empty($_GET['lang'])) {
$restart_extra .= "/lang/" . returnGlobal('lang');
}
$_restart = "<a href='" . Yii::app()->getController()->createUrl("survey/index/sid/{$surveyid}{$restart_extra}") . "'>" . $clang->gT("Restart this Survey") . "</a>";
} else {
$_restart = "";
}
}
if (isset($thissurvey['anonymized']) && $thissurvey['anonymized'] == 'Y') {
$_savealert = $clang->gT("To remain anonymous please use a pseudonym as your username, also an email address is not required.");
} else {
$_savealert = "";
}
if (isset($surveyid)) {
$_return_to_survey = "<a href=" . Yii::app()->getController()->createUrl("survey/index/sid/{$surveyid}");
if (returnGlobal('token')) {
$_return_to_survey .= "?amp;token=" . urlencode(trim(sanitize_xss_string(strip_tags(returnGlobal('token')))));
}
$_return_to_survey .= "'>" . $clang->gT("Return to survey") . "</a>";
} else {
$_return_to_survey = "";
}
// Save Form
$_saveform = "<table><tr><td align='right'>" . $clang->gT("Name") . ":</td><td><input type='text' name='savename' value='";
if (isset($_POST['savename'])) {
$_saveform .= HTMLEscape(autoUnescape($_POST['savename']));
}
$_saveform .= "' /></td></tr>\n" . "<tr><td align='right'>" . $clang->gT("Password") . ":</td><td><input type='password' name='savepass' value='";
if (isset($_POST['savepass'])) {
$_saveform .= HTMLEscape(autoUnescape($_POST['savepass']));
}
$_saveform .= "' /></td></tr>\n" . "<tr><td align='right'>" . $clang->gT("Repeat password") . ":</td><td><input type='password' name='savepass2' value='";
if (isset($_POST['savepass2'])) {
$_saveform .= HTMLEscape(autoUnescape($_POST['savepass2']));
}
$_saveform .= "' /></td></tr>\n" . "<tr><td align='right'>" . $clang->gT("Your email address") . ":</td><td><input type='text' name='saveemail' value='";
if (isset($_POST['saveemail'])) {
$_saveform .= HTMLEscape(autoUnescape($_POST['saveemail']));
}
$_saveform .= "' /></td></tr>\n";
if (isset($thissurvey['usecaptcha']) && function_exists("ImageCreate") && isCaptchaEnabled('saveandloadscreen', $thissurvey['usecaptcha'])) {
$_saveform .= "<tr><td align='right'>" . $clang->gT("Security question") . ":</td><td><table><tr><td valign='middle'><img src='" . Yii::app()->getController()->createUrl('/verification/image/sid/' . (isset($surveyid) ? $surveyid : '')) . "' alt6='' /></td><td valign='middle' style='text-align:left'><input type='text' size='5' maxlength='3' name='loadsecurity' value='' /></td></tr></table></td></tr>\n";
}
$_saveform .= "<tr><td align='right'></td><td></td></tr>\n" . "<tr><td></td><td><input type='submit' id='savebutton' name='savesubmit' value='" . $clang->gT("Save Now") . "' /></td></tr>\n" . "</table>";
// Load Form
$_loadform = "<table><tr><td align='right'>" . $clang->gT("Saved name") . ":</td><td><input type='text' name='loadname' value='";
if (isset($loadname)) {
$_loadform .= HTMLEscape(autoUnescape($loadname));
}
$_loadform .= "' /></td></tr>\n" . "<tr><td align='right'>" . $clang->gT("Password") . ":</td><td><input type='password' name='loadpass' value='";
if (isset($loadpass)) {
$_loadform .= HTMLEscape(autoUnescape($loadpass));
}
$_loadform .= "' /></td></tr>\n";
if (isset($thissurvey['usecaptcha']) && function_exists("ImageCreate") && isCaptchaEnabled('saveandloadscreen', $thissurvey['usecaptcha'])) {
$_loadform .= "<tr><td align='right'>" . $clang->gT("Security question") . ":</td><td><table><tr><td valign='middle'><img src='" . Yii::app()->getController()->createUrl('/verification/image/sid/' . $surveyid) . "' alt='' /></td><td valign='middle'><input type='text' size='5' maxlength='3' name='loadsecurity' value='' alt=''/></td></tr></table></td></tr>\n";
}
$_loadform .= "<tr><td align='right'></td><td></td></tr>\n" . "<tr><td></td><td><input type='submit' id='loadbutton' value='" . $clang->gT("Load now") . "' /></td></tr></table>\n";
// Registration Form
if (isset($surveyid) || isset($registerdata) && $debugSrc == 'register.php') {
if (isset($surveyid)) {
$tokensid = $surveyid;
} else {
$tokensid = $registerdata['sid'];
}
$_registerform = "<form method='post' action='" . Yii::app()->getController()->createUrl('/register/index/surveyid/' . $tokensid) . "'>\n";
if (!isset($_REQUEST['lang'])) {
$_reglang = Survey::model()->findByPk($tokensid)->language;
} else {
$_reglang = returnGlobal('lang');
}
$_registerform .= "<input type='hidden' name='lang' value='" . $_reglang . "' />\n";
$_registerform .= "<input type='hidden' name='sid' value='{$tokensid}' id='sid' />\n";
$_registerform .= "<table class='register' summary='Registrationform'>\n" . "<tr><td align='right'>" . $clang->gT("First name") . ":</td>" . "<td align='left'><input class='text' type='text' name='register_firstname'";
if (isset($_POST['register_firstname'])) {
$_registerform .= " value='" . htmlentities(returnGlobal('register_firstname'), ENT_QUOTES, 'UTF-8') . "'";
}
$_registerform .= " /></td></tr>" . "<tr><td align='right'>" . $clang->gT("Last name") . ":</td>\n" . "<td align='left'><input class='text' type='text' name='register_lastname'";
if (isset($_POST['register_lastname'])) {
$_registerform .= " value='" . htmlentities(returnGlobal('register_lastname'), ENT_QUOTES, 'UTF-8') . "'";
}
$_registerform .= " /></td></tr>\n" . "<tr><td align='right'>" . $clang->gT("Email address") . ":</td>\n" . "<td align='left'><input class='text' type='text' name='register_email'";
if (isset($_POST['register_email'])) {
$_registerform .= " value='" . htmlentities(returnGlobal('register_email'), ENT_QUOTES, 'UTF-8') . "'";
}
$_registerform .= " /></td></tr>\n";
foreach ($thissurvey['attributedescriptions'] as $field => $attribute) {
if (empty($attribute['show_register']) || $attribute['show_register'] != 'Y') {
continue;
}
$_registerform .= '
<tr>
<td align="right">' . $thissurvey['attributecaptions'][$field] . ($attribute['mandatory'] == 'Y' ? '*' : '') . ':</td>
<td align="left"><input class="text" type="text" name="register_' . $field . '" /></td>
</tr>';
}
if ((count($registerdata) > 1 || isset($thissurvey['usecaptcha'])) && function_exists("ImageCreate") && isCaptchaEnabled('registrationscreen', $thissurvey['usecaptcha'])) {
$_registerform .= "<tr><td align='right'>" . $clang->gT("Security Question") . ":</td><td><table><tr><td valign='middle'><img src='" . Yii::app()->getController()->createUrl('/verification/image/sid/' . $surveyid) . "' alt='' /></td><td valign='middle'><input type='text' size='5' maxlength='3' name='loadsecurity' value='' /></td></tr></table></td></tr>\n";
}
$_registerform .= "<tr><td></td><td><input id='registercontinue' class='submit' type='submit' value='" . $clang->gT("Continue") . "' />" . "</td></tr>\n" . "</table>\n";
if (count($registerdata) > 1 && $registerdata['sid'] != NULL && $debugSrc == 'register.php') {
$_registerform .= "<input name='startdate' type ='hidden' value='" . $registerdata['startdate'] . "' />";
$_registerform .= "<input name='enddate' type ='hidden' value='" . $registerdata['enddate'] . "' />";
}
$_registerform .= "</form>\n";
} else {
$_registerform = "";
}
// Assessments
$assessmenthtml = "";
if (isset($surveyid) && !is_null($surveyid) && function_exists('doAssessment')) {
$assessmentdata = doAssessment($surveyid, true);
$_assessment_current_total = $assessmentdata['total'];
if (stripos($line, "{ASSESSMENTS}")) {
$assessmenthtml = doAssessment($surveyid, false);
}
} else {
$_assessment_current_total = '';
}
if (isset($thissurvey['googleanalyticsapikey']) && trim($thissurvey['googleanalyticsapikey']) != '') {
$_googleAnalyticsAPIKey = trim($thissurvey['googleanalyticsapikey']);
} else {
$_googleAnalyticsAPIKey = trim(getGlobalSetting('googleanalyticsapikey'));
}
$_googleAnalyticsStyle = isset($thissurvey['googleanalyticsstyle']) ? $thissurvey['googleanalyticsstyle'] : '0';
$_googleAnalyticsJavaScript = '';
if ($_googleAnalyticsStyle != '' && $_googleAnalyticsStyle != 0 && $_googleAnalyticsAPIKey != '') {
switch ($_googleAnalyticsStyle) {
case '1':
// Default Google Tracking
$_googleAnalyticsJavaScript = <<<EOD
<script type="text/javascript">
var _gaq = _gaq || [];
_gaq.push(['_setAccount', '{$_googleAnalyticsAPIKey}']);
_gaq.push(['_trackPageview']);
(function() {
var ga = document.createElement('script'); ga.type = 'text/javascript'; ga.async = true;
ga.src = ('https:' == document.location.protocol ? 'https://ssl' : 'http://www') + '.google-analytics.com/ga.js';
var s = document.getElementsByTagName('script')[0]; s.parentNode.insertBefore(ga, s);
})();
</script>
EOD;
break;
case '2':
// SurveyName-[SID]/[GSEQ]-GroupName - create custom GSEQ based upon page step
$moveInfo = LimeExpressionManager::GetLastMoveResult();
if (is_null($moveInfo)) {
$gseq = 'welcome';
} else {
if ($moveInfo['finished']) {
$gseq = 'finished';
} else {
if (isset($moveInfo['at_start']) && $moveInfo['at_start']) {
$gseq = 'welcome';
} else {
if (is_null($_groupname)) {
$gseq = 'printanswers';
} else {
$gseq = $moveInfo['gseq'] + 1;
}
}
}
}
$_trackURL = htmlspecialchars($thissurvey['name'] . '-[' . $surveyid . ']/[' . $gseq . ']-' . $_groupname);
$_googleAnalyticsJavaScript = <<<EOD
<script type="text/javascript">
var _gaq = _gaq || [];
_gaq.push(['_setAccount', '{$_googleAnalyticsAPIKey}']);
_gaq.push(['_trackPageview','{$_trackURL}']);
(function() {
var ga = document.createElement('script'); ga.type = 'text/javascript'; ga.async = true;
ga.src = ('https:' == document.location.protocol ? 'https://ssl' : 'http://www') + '.google-analytics.com/ga.js';
var s = document.getElementsByTagName('script')[0]; s.parentNode.insertBefore(ga, s);
})();
</script>
EOD;
break;
}
}
$_endtext = '';
if (isset($thissurvey['surveyls_endtext']) && trim($thissurvey['surveyls_endtext']) != '') {
$_endtext = $thissurvey['surveyls_endtext'];
}
// Set the array of replacement variables here - don't include curly braces
$coreReplacements = array();
$coreReplacements['ACTIVE'] = isset($thissurvey['active']) && !($thissurvey['active'] != "Y");
$coreReplacements['AID'] = isset($questiondetails['aid']) ? $questiondetails['aid'] : '';
$coreReplacements['ANSWER'] = isset($answer) ? $answer : '';
// global
$coreReplacements['ANSWERSCLEARED'] = $clang->gT("Answers cleared");
$coreReplacements['ASSESSMENTS'] = $assessmenthtml;
$coreReplacements['ASSESSMENT_CURRENT_TOTAL'] = $_assessment_current_total;
$coreReplacements['ASSESSMENT_HEADING'] = $clang->gT("Your assessment");
$coreReplacements['CHECKJAVASCRIPT'] = "<noscript><span class='warningjs'>" . $clang->gT("Caution: JavaScript execution is disabled in your browser. You may not be able to answer all questions in this survey. Please, verify your browser parameters.") . "</span></noscript>";
$coreReplacements['CLEARALL'] = $_clearall;
$coreReplacements['CLOSEWINDOW'] = "<a href='javascript:%20self.close()'>" . $clang->gT("Close this window") . "</a>";
$coreReplacements['COMPLETED'] = isset($redata['completed']) ? $redata['completed'] : '';
// global
$coreReplacements['DATESTAMP'] = $_datestamp;
$coreReplacements['ENDTEXT'] = $_endtext;
$coreReplacements['EXPIRY'] = $_dateoutput;
$coreReplacements['GID'] = isset($questiondetails['gid']) ? $questiondetails['gid'] : '';
$coreReplacements['GOOGLE_ANALYTICS_API_KEY'] = $_googleAnalyticsAPIKey;
$coreReplacements['GOOGLE_ANALYTICS_JAVASCRIPT'] = $_googleAnalyticsJavaScript;
$coreReplacements['GROUPDESCRIPTION'] = $_groupdescription;
$coreReplacements['GROUPNAME'] = $_groupname;
$coreReplacements['LANG'] = $clang->getlangcode();
$coreReplacements['LANGUAGECHANGER'] = isset($languagechanger) ? $languagechanger : '';
// global
$coreReplacements['LOADERROR'] = isset($errormsg) ? $errormsg : '';
// global
$coreReplacements['LOADFORM'] = $_loadform;
$coreReplacements['LOADHEADING'] = $clang->gT("Load a previously saved survey");
$coreReplacements['LOADMESSAGE'] = $clang->gT("You can load a survey that you have previously saved from this screen.") . "<br />" . $clang->gT("Type in the 'name' you used to save the survey, and the password.") . "<br />";
$coreReplacements['NAVIGATOR'] = isset($navigator) ? $navigator : '';
// global
$coreReplacements['NOSURVEYID'] = isset($surveylist) ? $surveylist['nosid'] : '';
$coreReplacements['NUMBEROFQUESTIONS'] = $_totalquestionsAsked;
$coreReplacements['PERCENTCOMPLETE'] = isset($percentcomplete) ? $percentcomplete : '';
// global
$coreReplacements['PRIVACY'] = isset($privacy) ? $privacy : '';
// global
$coreReplacements['PRIVACYMESSAGE'] = "<span style='font-weight:bold; font-style: italic;'>" . $clang->gT("A Note On Privacy") . "</span><br />" . $clang->gT("This survey is anonymous.") . "<br />" . $clang->gT("The record kept of your survey responses does not contain any identifying information about you unless a specific question in the survey has asked for this. If you have responded to a survey that used an identifying token to allow you to access the survey, you can rest assured that the identifying token is not kept with your responses. It is managed in a separate database, and will only be updated to indicate that you have (or haven't) completed this survey. There is no way of matching identification tokens with survey responses in this survey.");
$coreReplacements['QID'] = isset($questiondetails['qid']) ? $questiondetails['qid'] : '';
$coreReplacements['QUESTION'] = $_question;
$coreReplacements['QUESTIONHELP'] = $_questionhelp;
$coreReplacements['QUESTIONHELPPLAINTEXT'] = strip_tags(addslashes($help));
// global
$coreReplacements['QUESTION_CLASS'] = $_getQuestionClass;
$coreReplacements['QUESTION_CODE'] = $_question_code;
$coreReplacements['QUESTION_ESSENTIALS'] = $_question_essentials;
$coreReplacements['QUESTION_FILE_VALID_MESSAGE'] = $_question_file_valid_message;
$coreReplacements['QUESTION_HELP'] = $_question_help;
$coreReplacements['QUESTION_INPUT_ERROR_CLASS'] = $_question_input_error_class;
$coreReplacements['QUESTION_MANDATORY'] = $_question_mandatory;
$coreReplacements['QUESTION_MAN_CLASS'] = $_question_man_class;
$coreReplacements['QUESTION_MAN_MESSAGE'] = $_question_man_message;
$coreReplacements['QUESTION_NUMBER'] = $_question_number;
$coreReplacements['QUESTION_TEXT'] = $_question_text;
$coreReplacements['QUESTION_VALID_MESSAGE'] = $_question_valid_message;
$coreReplacements['REGISTERERROR'] = isset($register_errormsg) ? $register_errormsg : '';
// global
$coreReplacements['REGISTERFORM'] = $_registerform;
$coreReplacements['REGISTERMESSAGE1'] = $clang->gT("You must be registered to complete this survey");
$coreReplacements['REGISTERMESSAGE2'] = $clang->gT("You may register for this survey if you wish to take part.") . "<br />\n" . $clang->gT("Enter your details below, and an email containing the link to participate in this survey will be sent immediately.");
$coreReplacements['RESTART'] = $_restart;
$coreReplacements['RETURNTOSURVEY'] = $_return_to_survey;
$coreReplacements['SAVE'] = $_saveall;
$coreReplacements['SAVEALERT'] = $_savealert;
$coreReplacements['SAVEDID'] = isset($saved_id) ? $saved_id : '';
// global
$coreReplacements['SAVEERROR'] = isset($errormsg) ? $errormsg : '';
// global - same as LOADERROR
$coreReplacements['SAVEFORM'] = $_saveform;
$coreReplacements['SAVEHEADING'] = $clang->gT("Save your unfinished survey");
$coreReplacements['SAVEMESSAGE'] = $clang->gT("Enter a name and password for this survey and click save below.") . "<br />\n" . $clang->gT("Your survey will be saved using that name and password, and can be completed later by logging in with the same name and password.") . "<br /><br />\n" . $clang->gT("If you give an email address, an email containing the details will be sent to you.") . "<br /><br />\n" . $clang->gT("After having clicked the save button you can either close this browser window or continue filling out the survey.");
$coreReplacements['SGQ'] = $_question_sgq;
$coreReplacements['SID'] = isset($surveyid) ? $surveyid : (isset($questiondetails['sid']) ? $questiondetails['sid'] : '');
$coreReplacements['SITENAME'] = isset($sitename) ? $sitename : '';
// global
$coreReplacements['SUBMITBUTTON'] = $_submitbutton;
$coreReplacements['SUBMITCOMPLETE'] = "<strong>" . $clang->gT("Thank you!") . "<br /><br />" . $clang->gT("You have completed answering the questions in this survey.") . "</strong><br /><br />" . $clang->gT("Click on 'Submit' now to complete the process and save your answers.");
$coreReplacements['SUBMITREVIEW'] = $_strreview;
$coreReplacements['SURVEYCONTACT'] = $surveycontact;
$coreReplacements['SURVEYDESCRIPTION'] = isset($thissurvey['description']) ? $thissurvey['description'] : '';
$coreReplacements['SURVEYFORMAT'] = isset($surveyformat) ? $surveyformat : '';
// global
$coreReplacements['SURVEYLANGAGE'] = $clang->langcode;
$coreReplacements['SURVEYLANGUAGE'] = $clang->langcode;
$coreReplacements['SURVEYLIST'] = isset($surveylist) ? $surveylist['list'] : '';
$coreReplacements['SURVEYLISTHEADING'] = isset($surveylist) ? $surveylist['listheading'] : '';
$coreReplacements['SURVEYNAME'] = isset($thissurvey['name']) ? $thissurvey['name'] : '';
$coreReplacements['TEMPLATECSS'] = $_templatecss;
$coreReplacements['TEMPLATEJS'] = $_templatejs;
$coreReplacements['TEMPLATEURL'] = $templateurl;
$coreReplacements['THEREAREXQUESTIONS'] = $_therearexquestions;
if (!$anonymized) {
$coreReplacements['TOKEN'] = $_token;
}
$coreReplacements['URL'] = $_linkreplace;
$coreReplacements['WELCOME'] = isset($thissurvey['welcome']) ? $thissurvey['welcome'] : '';
if (!is_null($replacements) && is_array($replacements)) {
$doTheseReplacements = array_merge($coreReplacements, $replacements);
// so $replacements overrides core values
} else {
$doTheseReplacements = $coreReplacements;
}
// Now do all of the replacements - In rare cases, need to do 3 deep recursion, that that is default
$line = LimeExpressionManager::ProcessString($line, $questionNum, $doTheseReplacements, false, 3, 1);
return $line;
}
/**
* This is a convenience function to convert any date, in any date format, to the global setting date format
*
* @param string $sDate
* @return string
*/
function convertToGlobalSettingFormat($sDate)
{
try {
// Workaround for bug in older PHP version (confirmed for 5.5.9)
// The bug is causing invalid dates to create an internal server error which cannot not be caught by try.. catch
if (@strtotime($sDate) === false) {
throw new Exception("Failed to parse date string ({$sDate})");
}
$oDate = new DateTime($sDate);
// We generate the Date object (PHP will deal with the format of the string)
$sDateformatdata = getDateFormatData(Yii::app()->session['dateformat']);
// We get the Global Setting date format
$sDate = $oDate->format($sDateformatdata['phpdate']);
// We apply it to the Date object to generate a string date
return $sDate;
// We return the string date
} catch (Exception $e) {
$oDate = new DateTime('1/1/1980');
// We generate the Date object (PHP will deal with the format of the string)
$sDateformatdata = getDateFormatData(Yii::app()->session['dateformat']);
// We get the Global Setting date format
$sDate = $oDate->format($sDateformatdata['phpdate']);
// We apply it to the Date object to generate a string date
return $sDate;
// We return the string date
}
}
//echo '<pre>'.print_r($desrow,true).'</pre>';
$template = $desrow['template'];
$welcome = $desrow['surveyls_welcometext'];
$end = $desrow['surveyls_endtext'];
$surveyname = $desrow['surveyls_title'];
$surveydesc = $desrow['surveyls_description'];
$surveyactive = $desrow['active'];
$surveytable = db_table_name("survey_" . $desrow['sid']);
$surveyexpirydate = $desrow['expires'];
$surveystartdate = $desrow['startdate'];
$surveyfaxto = $desrow['faxto'];
$dateformattype = $desrow['surveyls_dateformat'];
if (isset($_POST['printableexport'])) {
$pdf->titleintopdf($surveyname, $surveydesc);
}
$dformat = getDateFormatData($dateformattype);
$dformat = $dformat['phpdate'];
$expirytimestamp = strtotime($surveyexpirydate);
$expirytimeofday_h = date('H', $expirytimestamp);
$expirytimeofday_m = date('i', $expirytimestamp);
$surveyexpirydate = date($dformat, $expirytimestamp);
if (!empty($expirytimeofday_h) || !empty($expirytimeofday_m)) {
$surveyexpirydate .= ' – ' . $expirytimeofday_h . ':' . $expirytimeofday_m;
}
//define('PRINT_TEMPLATE' , '/templates/print/' , true);
if (is_file($usertemplaterootdir . '/' . $template . '/print_survey.pstpl')) {
define('PRINT_TEMPLATE_DIR', $usertemplaterootdir . '/' . $template . '/', true);
define('PRINT_TEMPLATE_URL', $usertemplaterooturl . '/' . $template . '/', true);
} else {
define('PRINT_TEMPLATE_DIR', $standardtemplaterootdir . '/default/', true);
define('PRINT_TEMPLATE_URL', $standardtemplaterooturl . '/default/', true);
/**
* Initialize a survey so can use EM to manage navigation
* @param int $surveyid
* @param string $surveyMode
* @param array $aSurveyOptions
* @param bool $forceRefresh
* @param int $debugLevel
*/
static function StartSurvey($surveyid, $surveyMode = 'group', $aSurveyOptions = NULL, $forceRefresh = false, $debugLevel = 0)
{
$LEM =& LimeExpressionManager::singleton();
$LEM->sid = sanitize_int($surveyid);
$LEM->sessid = 'survey_' . $LEM->sid;
$LEM->em->StartProcessingGroup($surveyid);
if (is_null($aSurveyOptions)) {
$aSurveyOptions = array();
}
$LEM->surveyOptions['active'] = isset($aSurveyOptions['active']) ? $aSurveyOptions['active'] : false;
$LEM->surveyOptions['allowsave'] = isset($aSurveyOptions['allowsave']) ? $aSurveyOptions['allowsave'] : false;
$LEM->surveyOptions['anonymized'] = isset($aSurveyOptions['anonymized']) ? $aSurveyOptions['anonymized'] : false;
$LEM->surveyOptions['assessments'] = isset($aSurveyOptions['assessments']) ? $aSurveyOptions['assessments'] : false;
$LEM->surveyOptions['datestamp'] = isset($aSurveyOptions['datestamp']) ? $aSurveyOptions['datestamp'] : false;
$LEM->surveyOptions['deletenonvalues'] = isset($aSurveyOptions['deletenonvalues']) ? $aSurveyOptions['deletenonvalues'] == '1' : true;
$LEM->surveyOptions['hyperlinkSyntaxHighlighting'] = isset($aSurveyOptions['hyperlinkSyntaxHighlighting']) ? $aSurveyOptions['hyperlinkSyntaxHighlighting'] : false;
$LEM->surveyOptions['ipaddr'] = isset($aSurveyOptions['ipaddr']) ? $aSurveyOptions['ipaddr'] : false;
$LEM->surveyOptions['radix'] = isset($aSurveyOptions['radix']) ? $aSurveyOptions['radix'] : '.';
$LEM->surveyOptions['refurl'] = isset($aSurveyOptions['refurl']) ? $aSurveyOptions['refurl'] : NULL;
$LEM->surveyOptions['savetimings'] = isset($aSurveyOptions['savetimings']) ? $aSurveyOptions['savetimings'] : '';
$LEM->sgqaNaming = isset($aSurveyOptions['sgqaNaming']) ? $aSurveyOptions['sgqaNaming'] == "Y" : true;
// TODO default should eventually be false
$LEM->surveyOptions['startlanguage'] = isset($aSurveyOptions['startlanguage']) ? $aSurveyOptions['startlanguage'] : 'en';
$LEM->surveyOptions['surveyls_dateformat'] = isset($aSurveyOptions['surveyls_dateformat']) ? $aSurveyOptions['surveyls_dateformat'] : 1;
$LEM->surveyOptions['tablename'] = isset($aSurveyOptions['tablename']) ? $aSurveyOptions['tablename'] : '{{survey_' . $LEM->sid . '}}';
$LEM->surveyOptions['tablename_timings'] = isset($aSurveyOptions['savetimings']) && $aSurveyOptions['savetimings'] == 'Y' ? '{{survey_' . $LEM->sid . '_timings}}' : '';
$LEM->surveyOptions['target'] = isset($aSurveyOptions['target']) ? $aSurveyOptions['target'] : '/temp/files/';
$LEM->surveyOptions['timeadjust'] = isset($aSurveyOptions['timeadjust']) ? $aSurveyOptions['timeadjust'] : 0;
$LEM->surveyOptions['tempdir'] = isset($aSurveyOptions['tempdir']) ? $aSurveyOptions['tempdir'] : '/temp/';
$LEM->surveyOptions['token'] = isset($aSurveyOptions['token']) ? $aSurveyOptions['token'] : NULL;
$LEM->debugLevel = $debugLevel;
$_SESSION[$LEM->sessid]['LEMdebugLevel'] = $debugLevel;
// need acces to SESSSION to decide whether to cache serialized instance of $LEM
switch ($surveyMode) {
case 'survey':
$LEM->allOnOnePage = true;
$LEM->surveyMode = 'survey';
break;
case 'question':
$LEM->allOnOnePage = false;
$LEM->surveyMode = 'question';
break;
default:
case 'group':
$LEM->allOnOnePage = false;
$LEM->surveyMode = 'group';
break;
}
$LEM->setVariableAndTokenMappingsForExpressionManager($surveyid, $forceRefresh, $LEM->surveyOptions['anonymized'], $LEM->allOnOnePage);
$LEM->currentGroupSeq = -1;
$LEM->currentQuestionSeq = -1;
// for question-by-question mode
$LEM->indexGseq = array();
$LEM->indexQseq = array();
$LEM->qrootVarName2arrayFilter = array();
templatereplace("{}");
// Needed for coreReplacements in relevance equation (in all mode)
if (isset($_SESSION[$LEM->sessid]['startingValues']) && is_array($_SESSION[$LEM->sessid]['startingValues']) && count($_SESSION[$LEM->sessid]['startingValues']) > 0) {
$startingValues = array();
foreach ($_SESSION[$LEM->sessid]['startingValues'] as $k => $value) {
if (isset($LEM->knownVars[$k])) {
$knownVar = $LEM->knownVars[$k];
} else {
if (isset($LEM->qcode2sgqa[$k])) {
$knownVar = $LEM->knownVars[$LEM->qcode2sgqa[$k]];
} else {
if (isset($LEM->tempVars[$k])) {
$knownVar = $LEM->tempVar[$k];
} else {
continue;
}
}
}
if (!isset($knownVar['jsName'])) {
continue;
}
switch ($knownVar['type']) {
case 'D':
//DATE
if (trim($value) == "") {
$value = NULL;
} else {
// We don't really validate date here, anyone can send anything : forced too
$dateformatdatat = getDateFormatData($LEM->surveyOptions['surveyls_dateformat']);
$datetimeobj = new Date_Time_Converter($value, $dateformatdatat['phpdate']);
$value = $datetimeobj->convert("Y-m-d H:i");
}
break;
case 'N':
//NUMERICAL QUESTION TYPE
//NUMERICAL QUESTION TYPE
case 'K':
//MULTIPLE NUMERICAL QUESTION
if (trim($value) == "") {
$value = NULL;
} else {
$value = sanitize_float($value);
}
break;
case '|':
//File Upload
$value = NULL;
// can't upload a file via GET
break;
}
$_SESSION[$LEM->sessid][$knownVar['sgqa']] = $value;
$LEM->updatedValues[$knownVar['sgqa']] = array('type' => $knownVar['type'], 'value' => $value);
}
$LEM->_UpdateValuesInDatabase(NULL);
}
return array('hasNext' => true, 'hasPrevious' => false);
}
if (!isset($gtokenid)) {$gtokenid=returnglobal('gtid');}
if (!isset($gtokenids)) {$gtokenids=returnglobal('gtids');}
if (!isset($starttokenid)) {$starttokenid=sanitize_int(returnglobal('last_tid'));}
if(isset($tokenids)) {
$tokenidsarray=explode("|", substr($tokenids, 1)); //Make the tokenids string into an array, and exclude the first character
unset($tokenids);
foreach($tokenidsarray as $tokenitem) {
if($tokenitem != "") $tokenids[]=sanitize_int($tokenitem);
}
}
include_once("login_check.php");
include_once("database.php");
$js_admin_includes[]='scripts/tokens.js';
$dateformatdetails=getDateFormatData($_SESSION['dateformat']);
$thissurvey=getSurveyInfo($surveyid);
if ($subaction == "import" || $subaction == "upload" ) // THis array only needs to be defined for these two functions
{
$js_admin_includes[]='scripts/tokens.js';
$encodingsarray = array("armscii8"=>$clang->gT("ARMSCII-8 Armenian")
,"ascii"=>$clang->gT("US ASCII")
,"auto"=>$clang->gT("Automatic")
,"big5"=>$clang->gT("Big5 Traditional Chinese")
,"binary"=>$clang->gT("Binary pseudo charset")
,"cp1250"=>$clang->gT("Windows Central European")
,"cp1251"=>$clang->gT("Windows Cyrillic")
,"cp1256"=>$clang->gT("Windows Arabic")
,"cp1257"=>$clang->gT("Windows Baltic")
/**
* Database::index()
*
* @param mixed $sa
* @return
*/
function index($sa = null)
{
$sAction = Yii::app()->request->getPost('action');
$iSurveyID = isset($_POST['sid']) ? $_POST['sid'] : returnGlobal('sid');
$iQuestionGroupID = returnGlobal('gid');
$iQuestionID = returnGlobal('qid');
// TODO: This variable seems to be never set or used in any function call?
$sDBOutput = '';
$oFixCKeditor = new LSYii_Validators();
$oFixCKeditor->fixCKeditor = true;
$oFixCKeditor->xssfilter = false;
if ($sAction == "updatedefaultvalues" && Permission::model()->hasSurveyPermission($iSurveyID, 'surveycontent', 'update')) {
$aSurveyLanguages = Survey::model()->findByPk($iSurveyID)->additionalLanguages;
$sBaseLanguage = Survey::model()->findByPk($iSurveyID)->language;
array_unshift($aSurveyLanguages, $sBaseLanguage);
Question::model()->updateAll(array('same_default' => Yii::app()->request->getPost('samedefault') ? 1 : 0), 'sid=:sid ANd qid=:qid', array(':sid' => $iSurveyID, ':qid' => $iQuestionID));
$arQuestion = Question::model()->findByAttributes(array('qid' => $iQuestionID));
$sQuestionType = $arQuestion['type'];
$aQuestionTypeList = getQuestionTypeList('', 'array');
if ($aQuestionTypeList[$sQuestionType]['answerscales'] > 0 && $aQuestionTypeList[$sQuestionType]['subquestions'] == 0) {
for ($iScaleID = 0; $iScaleID < $aQuestionTypeList[$sQuestionType]['answerscales']; $iScaleID++) {
foreach ($aSurveyLanguages as $sLanguage) {
if (!is_null(Yii::app()->request->getPost('defaultanswerscale_' . $iScaleID . '_' . $sLanguage))) {
$this->_updateDefaultValues($iQuestionID, 0, $iScaleID, '', $sLanguage, Yii::app()->request->getPost('defaultanswerscale_' . $iScaleID . '_' . $sLanguage), true);
}
if (!is_null(Yii::app()->request->getPost('other_' . $iScaleID . '_' . $sLanguage))) {
$this->_updateDefaultValues($iQuestionID, 0, $iScaleID, 'other', $sLanguage, Yii::app()->request->getPost('other_' . $iScaleID . '_' . $sLanguage), true);
}
}
}
}
if ($aQuestionTypeList[$sQuestionType]['subquestions'] > 0) {
foreach ($aSurveyLanguages as $sLanguage) {
$arQuestions = Question::model()->findAllByAttributes(array('sid' => $iSurveyID, 'gid' => $iQuestionGroupID, 'parent_qid' => $iQuestionID, 'language' => $sLanguage, 'scale_id' => 0));
for ($iScaleID = 0; $iScaleID < $aQuestionTypeList[$sQuestionType]['subquestions']; $iScaleID++) {
foreach ($arQuestions as $aSubquestionrow) {
if (!is_null(Yii::app()->request->getPost('defaultanswerscale_' . $iScaleID . '_' . $sLanguage . '_' . $aSubquestionrow['qid']))) {
$this->_updateDefaultValues($iQuestionID, $aSubquestionrow['qid'], $iScaleID, '', $sLanguage, Yii::app()->request->getPost('defaultanswerscale_' . $iScaleID . '_' . $sLanguage . '_' . $aSubquestionrow['qid']), true);
}
}
}
}
}
if ($aQuestionTypeList[$sQuestionType]['answerscales'] == 0 && $aQuestionTypeList[$sQuestionType]['subquestions'] == 0) {
foreach ($aSurveyLanguages as $sLanguage) {
// Qick and dirty insert for yes/no defaul value
// write the the selectbox option, or if "EM" is slected, this value to table
if ($sQuestionType == 'Y') {
/// value for all langs
if (Yii::app()->request->getPost('samedefault') == 1) {
$sLanguage = $aSurveyLanguages[0];
// turn
} else {
$sCurrentLang = $sLanguage;
// edit the next lines
}
if (Yii::app()->request->getPost('defaultanswerscale_0_' . $sLanguage) == 'EM') {
// Case EM, write expression to database
$this->_updateDefaultValues($iQuestionID, 0, 0, '', $sLanguage, Yii::app()->request->getPost('defaultanswerscale_0_' . $sLanguage . '_EM'), true);
} else {
// Case "other", write list value to database
$this->_updateDefaultValues($iQuestionID, 0, 0, '', $sLanguage, Yii::app()->request->getPost('defaultanswerscale_0_' . $sLanguage), true);
}
///// end yes/no
} else {
if (!is_null(Yii::app()->request->getPost('defaultanswerscale_0_' . $sLanguage . '_0'))) {
$this->_updateDefaultValues($iQuestionID, 0, 0, '', $sLanguage, Yii::app()->request->getPost('defaultanswerscale_0_' . $sLanguage . '_0'), true);
}
}
}
}
Yii::app()->session['flashmessage'] = gT("Default value settings were successfully saved.");
LimeExpressionManager::SetDirtyFlag();
if ($sDBOutput != '') {
echo $sDBOutput;
} else {
if (Yii::app()->request->getPost('close-after-save') === 'true') {
$this->getController()->redirect(array('admin/questions/sa/view/surveyid/' . $iSurveyID . '/gid/' . $iQuestionGroupID . '/qid/' . $iQuestionID));
}
$this->getController()->redirect(array('admin/questions/sa/editdefaultvalues/surveyid/' . $iSurveyID . '/gid/' . $iQuestionGroupID . '/qid/' . $iQuestionID));
}
}
if ($sAction == "updateansweroptions" && Permission::model()->hasSurveyPermission($iSurveyID, 'surveycontent', 'update')) {
Yii::app()->loadHelper('database');
$aSurveyLanguages = Survey::model()->findByPk($iSurveyID)->additionalLanguages;
$sBaseLanguage = Survey::model()->findByPk($iSurveyID)->language;
array_unshift($aSurveyLanguages, $sBaseLanguage);
$arQuestion = Question::model()->findByAttributes(array('qid' => $iQuestionID));
$sQuestionType = $arQuestion['type'];
// Checked)
$aQuestionTypeList = getQuestionTypeList('', 'array');
$iScaleCount = $aQuestionTypeList[$sQuestionType]['answerscales'];
//First delete all answers
Answer::model()->deleteAllByAttributes(array('qid' => $iQuestionID));
LimeExpressionManager::RevertUpgradeConditionsToRelevance($iSurveyID);
for ($iScaleID = 0; $iScaleID < $iScaleCount; $iScaleID++) {
$iMaxCount = (int) Yii::app()->request->getPost('answercount_' . $iScaleID);
for ($iSortOrderID = 1; $iSortOrderID < $iMaxCount; $iSortOrderID++) {
$sCode = sanitize_paranoid_string(Yii::app()->request->getPost('code_' . $iSortOrderID . '_' . $iScaleID));
$iAssessmentValue = (int) Yii::app()->request->getPost('assessment_' . $iSortOrderID . '_' . $iScaleID);
foreach ($aSurveyLanguages as $sLanguage) {
$sAnswerText = Yii::app()->request->getPost('answer_' . $sLanguage . '_' . $iSortOrderID . '_' . $iScaleID);
// Fix bug with FCKEditor saving strange BR types
$sAnswerText = $oFixCKeditor->fixCKeditor($sAnswerText);
// Now we insert the answers
$iInsertCount = Answer::model()->insertRecords(array('code' => $sCode, 'answer' => $sAnswerText, 'qid' => $iQuestionID, 'sortorder' => $iSortOrderID, 'language' => $sLanguage, 'assessment_value' => $iAssessmentValue, 'scale_id' => $iScaleID));
if (!$iInsertCount) {
Yii::app()->setFlashMessage(gT("Failed to update answers"), 'error');
}
}
// Updating code (oldcode!==null) => update condition with the new code
$sOldCode = Yii::app()->request->getPost('oldcode_' . $iSortOrderID . '_' . $iScaleID);
if (isset($sOldCode) && $sCode !== $sOldCode) {
Condition::model()->updateAll(array('value' => $sCode), 'cqid=:cqid AND value=:value', array(':cqid' => $iQuestionID, ':value' => $sOldCode));
}
}
// for ($sortorderid=0;$sortorderid<$maxcount;$sortorderid++)
}
// for ($scale_id=0;
LimeExpressionManager::UpgradeConditionsToRelevance($iSurveyID);
if (!Yii::app()->request->getPost('bFullPOST')) {
Yii::app()->setFlashMessage(gT("Not all answer options were saved. This usually happens due to server limitations ( PHP setting max_input_vars) - please contact your system administrator."));
} else {
Yii::app()->session['flashmessage'] = gT("Answer options were successfully saved.");
}
LimeExpressionManager::SetDirtyFlag();
if ($sDBOutput != '') {
echo $sDBOutput;
} else {
if (Yii::app()->request->getPost('close-after-save') === 'true') {
$this->getController()->redirect(array('admin/questions/sa/view/surveyid/' . $iSurveyID . '/gid/' . $iQuestionGroupID . '/qid/' . $iQuestionID));
}
$this->getController()->redirect(array('/admin/questions/sa/answeroptions/surveyid/' . $iSurveyID . '/gid/' . $iQuestionGroupID . '/qid/' . $iQuestionID));
}
}
if ($sAction == "updatesubquestions" && Permission::model()->hasSurveyPermission($iSurveyID, 'surveycontent', 'update')) {
Yii::app()->loadHelper('database');
$aSurveyLanguages = Survey::model()->findByPk($iSurveyID)->additionalLanguages;
$sBaseLanguage = Survey::model()->findByPk($iSurveyID)->language;
array_unshift($aSurveyLanguages, $sBaseLanguage);
$arQuestion = Question::model()->findByAttributes(array('qid' => $iQuestionID));
$sQuestionType = $arQuestion['type'];
// Checked
$aQuestionTypeList = getQuestionTypeList('', 'array');
$iScaleCount = $aQuestionTypeList[$sQuestionType]['subquestions'];
// First delete any deleted ids
$aDeletedQIDs = explode(' ', trim(Yii::app()->request->getPost('deletedqids')));
LimeExpressionManager::RevertUpgradeConditionsToRelevance($iSurveyID);
$aDeletedQIDs = array_unique($aDeletedQIDs, SORT_NUMERIC);
foreach ($aDeletedQIDs as $iDeletedQID) {
$iDeletedQID = (int) $iDeletedQID;
if ($iDeletedQID > 0) {
// don't remove undefined
$iInsertCount = Question::model()->deleteAllByAttributes(array('qid' => $iDeletedQID));
if (!$iInsertCount) {
Yii::app()->setFlashMessage(gT("Failed to delete answer"), 'error');
}
}
}
//Determine ids by evaluating the hidden field
$aRows = array();
$aCodes = array();
$aOldCodes = array();
$aRelevance = array();
foreach ($_POST as $sPOSTKey => $sPOSTValue) {
$sPOSTKey = explode('_', $sPOSTKey);
if ($sPOSTKey[0] == 'answer') {
$aRows[$sPOSTKey[3]][$sPOSTKey[1]][$sPOSTKey[2]] = $sPOSTValue;
}
if ($sPOSTKey[0] == 'code') {
$aCodes[$sPOSTKey[2]][] = $sPOSTValue;
}
if ($sPOSTKey[0] == 'oldcode') {
$aOldCodes[$sPOSTKey[2]][] = $sPOSTValue;
}
if ($sPOSTKey[0] == 'relevance') {
$aRelevance[$sPOSTKey[2]][] = $sPOSTValue;
}
}
$aInsertQID = array();
for ($iScaleID = 0; $iScaleID < $iScaleCount; $iScaleID++) {
foreach ($aSurveyLanguages as $sLanguage) {
$iPosition = 0;
foreach ($aRows[$iScaleID][$sLanguage] as $subquestionkey => $subquestionvalue) {
if (substr($subquestionkey, 0, 3) != 'new') {
$oSubQuestion = Question::model()->find("qid=:qid AND language=:language", array(":qid" => $subquestionkey, ':language' => $sLanguage));
if (!is_object($oSubQuestion)) {
throw new CHttpException(502, "could not find subquestion {$subquestionkey} !");
}
$oSubQuestion->question_order = $iPosition + 1;
$oSubQuestion->title = $aCodes[$iScaleID][$iPosition];
$oSubQuestion->question = $subquestionvalue;
$oSubQuestion->scale_id = $iScaleID;
$oSubQuestion->relevance = isset($aRelevance[$iScaleID][$iPosition]) ? $aRelevance[$iScaleID][$iPosition] : "";
} else {
if (!isset($aInsertQID[$iScaleID][$iPosition])) {
$oSubQuestion = new Question();
$oSubQuestion->sid = $iSurveyID;
$oSubQuestion->gid = $iQuestionGroupID;
$oSubQuestion->question_order = $iPosition + 1;
$oSubQuestion->title = $aCodes[$iScaleID][$iPosition];
$oSubQuestion->question = $subquestionvalue;
$oSubQuestion->parent_qid = $iQuestionID;
$oSubQuestion->language = $sLanguage;
$oSubQuestion->scale_id = $iScaleID;
$oSubQuestion->relevance = isset($aRelevance[$iScaleID][$iPosition]) ? $aRelevance[$iScaleID][$iPosition] : "";
} else {
$oSubQuestion = Question::model()->find("qid=:qid AND language=:language", array(":qid" => $aInsertQID[$iScaleID][$iPosition], ':language' => $sLanguage));
if (!$oSubQuestion) {
$oSubQuestion = new Question();
}
$oSubQuestion->sid = $iSurveyID;
$oSubQuestion->qid = $aInsertQID[$iScaleID][$iPosition];
$oSubQuestion->gid = $iQuestionGroupID;
$oSubQuestion->question_order = $iPosition + 1;
$oSubQuestion->title = $aCodes[$iScaleID][$iPosition];
$oSubQuestion->question = $subquestionvalue;
$oSubQuestion->parent_qid = $iQuestionID;
$oSubQuestion->language = $sLanguage;
$oSubQuestion->scale_id = $iScaleID;
$oSubQuestion->relevance = isset($aRelevance[$iScaleID][$iPosition]) ? $aRelevance[$iScaleID][$iPosition] : "";
}
}
if ($oSubQuestion->qid) {
switchMSSQLIdentityInsert('questions', true);
$bSubQuestionResult = $oSubQuestion->save();
switchMSSQLIdentityInsert('questions', false);
} else {
$bSubQuestionResult = $oSubQuestion->save();
}
if ($bSubQuestionResult) {
if (substr($subquestionkey, 0, 3) != 'new' && isset($aOldCodes[$iScaleID][$iPosition]) && $aCodes[$iScaleID][$iPosition] !== $aOldCodes[$iScaleID][$iPosition]) {
Condition::model()->updateAll(array('cfieldname' => '+' . $iSurveyID . 'X' . $iQuestionGroupID . 'X' . $iQuestionID . $aCodes[$iScaleID][$iPosition], 'value' => $aCodes[$iScaleID][$iPosition]), 'cqid=:cqid AND cfieldname=:cfieldname AND value=:value', array(':cqid' => $iQuestionID, ':cfieldname' => $iSurveyID . 'X' . $iQuestionGroupID . 'X' . $iQuestionID, ':value' => $aOldCodes[$iScaleID][$iPosition]));
}
if (!isset($aInsertQID[$iScaleID][$iPosition])) {
$aInsertQID[$iScaleID][$iPosition] = $oSubQuestion->qid;
}
} else {
$aErrors = $oSubQuestion->getErrors();
if (count($aErrors)) {
//$sErrorMessage=gT("Question could not be updated with this errors:");
foreach ($aErrors as $sAttribute => $aStringErrors) {
foreach ($aStringErrors as $sStringErrors) {
Yii::app()->setFlashMessage(sprintf(gT("Error on %s for subquestion %s: %s"), $sAttribute, $aCodes[$iScaleID][$iPosition], $sStringErrors), 'error');
}
}
} else {
Yii::app()->setFlashMessage(sprintf(gT("Subquestions %s could not be updated."), $aCodes[$iScaleID][$iPosition]), 'error');
}
}
$iPosition++;
}
}
}
LimeExpressionManager::UpgradeConditionsToRelevance($iSurveyID);
// Do it only if there are no error ?
if (!isset($aErrors) || !count($aErrors)) {
if (!Yii::app()->request->getPost('bFullPOST')) {
Yii::app()->session['flashmessage'] = gT("Not all subquestions were saved. This usually happens due to server limitations ( PHP setting max_input_vars) - please contact your system administrator.");
} else {
Yii::app()->session['flashmessage'] = gT("Subquestions were successfully saved.");
}
}
//$action='editsubquestions';
LimeExpressionManager::SetDirtyFlag();
if ($sDBOutput != '') {
echo 'Problem in database controller: ' . $sDBOutput;
} else {
if (Yii::app()->request->getPost('close-after-save') === 'true') {
$this->getController()->redirect(array('/admin/questions/sa/view/surveyid/' . $iSurveyID . '/gid/' . $iQuestionGroupID . '/qid/' . $iQuestionID));
}
$this->getController()->redirect(array('/admin/questions/sa/subquestions/surveyid/' . $iSurveyID . '/gid/' . $iQuestionGroupID . '/qid/' . $iQuestionID));
}
}
/**
* Insert / Copy question
*/
if (in_array($sAction, array('insertquestion', 'copyquestion')) && Permission::model()->hasSurveyPermission($iSurveyID, 'surveycontent', 'create')) {
$survey = Survey::model()->findByPk($iSurveyID);
$sBaseLanguage = $survey->language;
// Abort if survey is active
if ($survey->active !== 'N') {
Yii::app()->setFlashMessage(gT("You can't insert a new question when the survey is active."), 'error');
$this->getController()->redirect(array("/admin/survey/sa/view/surveyid/" . $survey->sid), "refresh");
}
if (strlen(Yii::app()->request->getPost('title')) < 1) {
Yii::app()->setFlashMessage(gT("The question could not be added. You must enter at least a question code."), 'error');
} else {
// For Bootstrap Version usin YiiWheels switch :
$_POST['mandatory'] = Yii::app()->request->getPost('mandatory') == '1' ? 'Y' : 'N';
$_POST['other'] = Yii::app()->request->getPost('other') == '1' ? 'Y' : 'N';
if (Yii::app()->request->getPost('questionposition', "") != "") {
$iQuestionOrder = intval(Yii::app()->request->getPost('questionposition'));
//Need to renumber all questions on or after this
$sQuery = "UPDATE {{questions}} SET question_order=question_order+1 WHERE gid=:gid AND question_order >= :order";
Yii::app()->db->createCommand($sQuery)->bindValues(array(':gid' => $iQuestionGroupID, ':order' => $iQuestionOrder))->query();
} else {
$iQuestionOrder = getMaxQuestionOrder($iQuestionGroupID, $iSurveyID);
$iQuestionOrder++;
}
$sQuestionText = Yii::app()->request->getPost('question_' . $sBaseLanguage, '');
$sQuestionHelp = Yii::app()->request->getPost('help_' . $sBaseLanguage, '');
// Fix bug with FCKEditor saving strange BR types : in rules ?
$sQuestionText = $oFixCKeditor->fixCKeditor($sQuestionText);
$sQuestionHelp = $oFixCKeditor->fixCKeditor($sQuestionHelp);
$iQuestionID = 0;
$oQuestion = new Question();
$oQuestion->sid = $iSurveyID;
$oQuestion->gid = $iQuestionGroupID;
$oQuestion->type = Yii::app()->request->getPost('type');
$oQuestion->title = Yii::app()->request->getPost('title');
$oQuestion->question = $sQuestionText;
$oQuestion->preg = Yii::app()->request->getPost('preg');
$oQuestion->help = $sQuestionHelp;
$oQuestion->other = Yii::app()->request->getPost('other');
// For Bootstrap Version usin YiiWheels switch :
$oQuestion->mandatory = Yii::app()->request->getPost('mandatory');
$oQuestion->other = Yii::app()->request->getPost('other');
$oQuestion->relevance = Yii::app()->request->getPost('relevance');
$oQuestion->question_order = $iQuestionOrder;
$oQuestion->language = $sBaseLanguage;
$oQuestion->save();
if ($oQuestion) {
$iQuestionID = $oQuestion->qid;
}
$aErrors = $oQuestion->getErrors();
if (count($aErrors)) {
foreach ($aErrors as $sAttribute => $aStringErrors) {
foreach ($aStringErrors as $sStringErrors) {
Yii::app()->setFlashMessage(sprintf(gT("Question could not be created with error on %s: %s"), $sAttribute, $sStringErrors), 'error');
}
}
}
// Add other languages
if ($iQuestionID) {
$addlangs = Survey::model()->findByPk($iSurveyID)->additionalLanguages;
foreach ($addlangs as $alang) {
if ($alang != "") {
$langqid = 0;
$oQuestion = new Question();
$oQuestion->qid = $iQuestionID;
$oQuestion->sid = $iSurveyID;
$oQuestion->gid = $iQuestionGroupID;
$oQuestion->type = Yii::app()->request->getPost('type');
$oQuestion->title = Yii::app()->request->getPost('title');
$oQuestion->question = Yii::app()->request->getPost('question_' . $alang);
$oQuestion->preg = Yii::app()->request->getPost('preg');
$oQuestion->help = Yii::app()->request->getPost('help_' . $alang);
$oQuestion->other = Yii::app()->request->getPost('other');
$oQuestion->mandatory = Yii::app()->request->getPost('mandatory');
$oQuestion->relevance = Yii::app()->request->getPost('relevance');
$oQuestion->question_order = $iQuestionOrder;
$oQuestion->language = $alang;
switchMSSQLIdentityInsert('questions', true);
// Not sure for this one ?
$oQuestion->save();
switchMSSQLIdentityInsert('questions', false);
if ($oQuestion) {
$langqid = $oQuestion->qid;
}
$aErrors = $oQuestion->getErrors();
if (count($aErrors)) {
foreach ($aErrors as $sAttribute => $aStringErrors) {
foreach ($aStringErrors as $sStringErrors) {
Yii::app()->setFlashMessage(sprintf(gT("Question in language %s could not be created with error on %s: %s"), $alang, $sAttribute, $sStringErrors), 'error');
}
}
}
# if (!$langqid)
# {
# Yii::app()->setFlashMessage(gT("Question in language %s could not be created."),'error');
# }
}
}
}
if (!$iQuestionID) {
Yii::app()->setFlashMessage(gT("Question could not be created."), 'error');
} else {
/**
*
* Copy Question
*
*/
if ($sAction == 'copyquestion') {
if (returnGlobal('copysubquestions') == "Y") {
$aSQIDMappings = array();
$r1 = Question::model()->getSubQuestions(returnGlobal('oldqid'));
$aSubQuestions = $r1->readAll();
foreach ($aSubQuestions as $qr1) {
$qr1['parent_qid'] = $iQuestionID;
if (isset($aSQIDMappings[$qr1['qid']])) {
$qr1['qid'] = $aSQIDMappings[$qr1['qid']];
} else {
$oldqid = $qr1['qid'];
unset($qr1['qid']);
}
$qr1['gid'] = $iQuestionGroupID;
$iInsertID = Question::model()->insertRecords($qr1);
if (!isset($qr1['qid'])) {
$aSQIDMappings[$oldqid] = $iInsertID;
}
}
}
if (returnGlobal('copyanswers') == "Y") {
$r1 = Answer::model()->getAnswers(returnGlobal('oldqid'));
$aAnswerOptions = $r1->readAll();
foreach ($aAnswerOptions as $qr1) {
Answer::model()->insertRecords(array('qid' => $iQuestionID, 'code' => $qr1['code'], 'answer' => $qr1['answer'], 'assessment_value' => $qr1['assessment_value'], 'sortorder' => $qr1['sortorder'], 'language' => $qr1['language'], 'scale_id' => $qr1['scale_id']));
}
}
/**
* Copy attribute
*/
if (returnGlobal('copyattributes') == "Y") {
$oOldAttributes = QuestionAttribute::model()->findAll("qid=:qid", array("qid" => returnGlobal('oldqid')));
foreach ($oOldAttributes as $oOldAttribute) {
$attribute = new QuestionAttribute();
$attribute->qid = $iQuestionID;
$attribute->value = $oOldAttribute->value;
$attribute->attribute = $oOldAttribute->attribute;
$attribute->language = $oOldAttribute->language;
$attribute->save();
}
}
// Since 2.5, user can edit attribute while copying
$qattributes = questionAttributes();
$validAttributes = $qattributes[Yii::app()->request->getPost('type')];
$aLanguages = array_merge(array(Survey::model()->findByPk($iSurveyID)->language), Survey::model()->findByPk($iSurveyID)->additionalLanguages);
foreach ($validAttributes as $validAttribute) {
if ($validAttribute['i18n']) {
foreach ($aLanguages as $sLanguage) {
$value = Yii::app()->request->getPost($validAttribute['name'] . '_' . $sLanguage);
$iInsertCount = QuestionAttribute::model()->findAllByAttributes(array('attribute' => $validAttribute['name'], 'qid' => $iQuestionID, 'language' => $sLanguage));
if (count($iInsertCount) > 0) {
if ($value != '') {
QuestionAttribute::model()->updateAll(array('value' => $value), 'attribute=:attribute AND qid=:qid AND language=:language', array(':attribute' => $validAttribute['name'], ':qid' => $iQuestionID, ':language' => $sLanguage));
} else {
QuestionAttribute::model()->deleteAll('attribute=:attribute AND qid=:qid AND language=:language', array(':attribute' => $validAttribute['name'], ':qid' => $iQuestionID, ':language' => $sLanguage));
}
} elseif ($value != '') {
$attribute = new QuestionAttribute();
$attribute->qid = $iQuestionID;
$attribute->value = $value;
$attribute->attribute = $validAttribute['name'];
$attribute->language = $sLanguage;
$attribute->save();
}
}
} else {
$value = Yii::app()->request->getPost($validAttribute['name']);
if ($validAttribute['name'] == 'multiflexible_step' && trim($value) != '') {
$value = floatval($value);
if ($value == 0) {
$value = 1;
}
}
$iInsertCount = QuestionAttribute::model()->findAllByAttributes(array('attribute' => $validAttribute['name'], 'qid' => $iQuestionID));
if (count($iInsertCount) > 0) {
if ($value != $validAttribute['default'] && trim($value) != "") {
QuestionAttribute::model()->updateAll(array('value' => $value), 'attribute=:attribute AND qid=:qid', array(':attribute' => $validAttribute['name'], ':qid' => $iQuestionID));
} else {
QuestionAttribute::model()->deleteAll('attribute=:attribute AND qid=:qid', array(':attribute' => $validAttribute['name'], ':qid' => $iQuestionID));
}
} elseif ($value != $validAttribute['default'] && trim($value) != "") {
$attribute = new QuestionAttribute();
$attribute->qid = $iQuestionID;
$attribute->value = $value;
$attribute->attribute = $validAttribute['name'];
$attribute->save();
}
}
}
} else {
$qattributes = questionAttributes();
$validAttributes = $qattributes[Yii::app()->request->getPost('type')];
$aLanguages = array_merge(array(Survey::model()->findByPk($iSurveyID)->language), Survey::model()->findByPk($iSurveyID)->additionalLanguages);
foreach ($validAttributes as $validAttribute) {
if ($validAttribute['i18n']) {
foreach ($aLanguages as $sLanguage) {
$value = Yii::app()->request->getPost($validAttribute['name'] . '_' . $sLanguage);
$iInsertCount = QuestionAttribute::model()->findAllByAttributes(array('attribute' => $validAttribute['name'], 'qid' => $iQuestionID, 'language' => $sLanguage));
if (count($iInsertCount) > 0) {
if ($value != '') {
QuestionAttribute::model()->updateAll(array('value' => $value), 'attribute=:attribute AND qid=:qid AND language=:language', array(':attribute' => $validAttribute['name'], ':qid' => $iQuestionID, ':language' => $sLanguage));
} else {
QuestionAttribute::model()->deleteAll('attribute=:attribute AND qid=:qid AND language=:language', array(':attribute' => $validAttribute['name'], ':qid' => $iQuestionID, ':language' => $sLanguage));
}
} elseif ($value != '') {
$attribute = new QuestionAttribute();
$attribute->qid = $iQuestionID;
$attribute->value = $value;
$attribute->attribute = $validAttribute['name'];
$attribute->language = $sLanguage;
$attribute->save();
}
}
} else {
$value = Yii::app()->request->getPost($validAttribute['name']);
if ($validAttribute['name'] == 'multiflexible_step' && trim($value) != '') {
$value = floatval($value);
if ($value == 0) {
$value = 1;
}
}
$iInsertCount = QuestionAttribute::model()->findAllByAttributes(array('attribute' => $validAttribute['name'], 'qid' => $iQuestionID));
if (count($iInsertCount) > 0) {
if ($value != $validAttribute['default'] && trim($value) != "") {
QuestionAttribute::model()->updateAll(array('value' => $value), 'attribute=:attribute AND qid=:qid', array(':attribute' => $validAttribute['name'], ':qid' => $iQuestionID));
} else {
QuestionAttribute::model()->deleteAll('attribute=:attribute AND qid=:qid', array(':attribute' => $validAttribute['name'], ':qid' => $iQuestionID));
}
} elseif ($value != $validAttribute['default'] && trim($value) != "") {
$attribute = new QuestionAttribute();
$attribute->qid = $iQuestionID;
$attribute->value = $value;
$attribute->attribute = $validAttribute['name'];
$attribute->save();
}
}
}
}
Question::model()->updateQuestionOrder($iQuestionGroupID, $iSurveyID);
Yii::app()->session['flashmessage'] = gT("Question was successfully added.");
}
}
LimeExpressionManager::SetDirtyFlag();
// so refreshes syntax highlighting
if ($sDBOutput != '') {
echo $sDBOutput;
} else {
//admin/survey/sa/view/surveyid/
$this->getController()->redirect(array('admin/questions/sa/view/surveyid/' . $iSurveyID . '/gid/' . $iQuestionGroupID . '/qid/' . $iQuestionID));
}
}
/**
* Update question
*/
if ($sAction == "updatequestion" && Permission::model()->hasSurveyPermission($iSurveyID, 'surveycontent', 'update')) {
LimeExpressionManager::RevertUpgradeConditionsToRelevance($iSurveyID);
$cqr = Question::model()->findByAttributes(array('qid' => $iQuestionID));
$oldtype = $cqr['type'];
$oldgid = $cqr['gid'];
$survey = Survey::model()->findByPk($iSurveyID);
// If the survey is activate the question type may not be changed
if ($survey->active !== 'N') {
$sQuestionType = $oldtype;
} else {
$sQuestionType = Yii::app()->request->getPost('type');
}
// Remove invalid question attributes on saving
$qattributes = questionAttributes();
$criteria = new CDbCriteria();
$criteria->compare('qid', $iQuestionID);
if (isset($qattributes[$sQuestionType])) {
$validAttributes = $qattributes[$sQuestionType];
foreach ($validAttributes as $validAttribute) {
$criteria->compare('attribute', '<>' . $validAttribute['name']);
}
}
QuestionAttribute::model()->deleteAll($criteria);
$aLanguages = array_merge(array(Survey::model()->findByPk($iSurveyID)->language), Survey::model()->findByPk($iSurveyID)->additionalLanguages);
//now save all valid attributes
$validAttributes = $qattributes[$sQuestionType];
foreach ($validAttributes as $validAttribute) {
if ($validAttribute['i18n']) {
foreach ($aLanguages as $sLanguage) {
// TODO sanitise XSS
$value = Yii::app()->request->getPost($validAttribute['name'] . '_' . $sLanguage);
$iInsertCount = QuestionAttribute::model()->findAllByAttributes(array('attribute' => $validAttribute['name'], 'qid' => $iQuestionID, 'language' => $sLanguage));
if (count($iInsertCount) > 0) {
if ($value != '') {
QuestionAttribute::model()->updateAll(array('value' => $value), 'attribute=:attribute AND qid=:qid AND language=:language', array(':attribute' => $validAttribute['name'], ':qid' => $iQuestionID, ':language' => $sLanguage));
} else {
QuestionAttribute::model()->deleteAll('attribute=:attribute AND qid=:qid AND language=:language', array(':attribute' => $validAttribute['name'], ':qid' => $iQuestionID, ':language' => $sLanguage));
}
} elseif ($value != '') {
$attribute = new QuestionAttribute();
$attribute->qid = $iQuestionID;
$attribute->value = $value;
$attribute->attribute = $validAttribute['name'];
$attribute->language = $sLanguage;
$attribute->save();
}
}
} else {
$value = Yii::app()->request->getPost($validAttribute['name']);
if ($validAttribute['name'] == 'multiflexible_step' && trim($value) != '') {
$value = floatval($value);
if ($value == 0) {
$value = 1;
}
}
$iInsertCount = QuestionAttribute::model()->findAllByAttributes(array('attribute' => $validAttribute['name'], 'qid' => $iQuestionID));
if (count($iInsertCount) > 0) {
if ($value != $validAttribute['default'] && trim($value) != "") {
QuestionAttribute::model()->updateAll(array('value' => $value), 'attribute=:attribute AND qid=:qid', array(':attribute' => $validAttribute['name'], ':qid' => $iQuestionID));
} else {
QuestionAttribute::model()->deleteAll('attribute=:attribute AND qid=:qid', array(':attribute' => $validAttribute['name'], ':qid' => $iQuestionID));
}
} elseif ($value != $validAttribute['default'] && trim($value) != "") {
$attribute = new QuestionAttribute();
$attribute->qid = $iQuestionID;
$attribute->value = $value;
$attribute->attribute = $validAttribute['name'];
$attribute->save();
}
}
}
$aQuestionTypeList = getQuestionTypeList('', 'array');
// These are the questions types that have no answers and therefore we delete the answer in that case
$iAnswerScales = $aQuestionTypeList[$sQuestionType]['answerscales'];
$iSubquestionScales = $aQuestionTypeList[$sQuestionType]['subquestions'];
// These are the questions types that have the other option therefore we set everything else to 'No Other'
if ($sQuestionType != "L" && $sQuestionType != "!" && $sQuestionType != "P" && $sQuestionType != "M") {
$_POST['other'] = 'N';
}
// These are the questions types that have no validation - so zap it accordingly
if ($sQuestionType == "!" || $sQuestionType == "L" || $sQuestionType == "M" || $sQuestionType == "P" || $sQuestionType == "F" || $sQuestionType == "H" || $sQuestionType == "X" || $sQuestionType == "") {
$_POST['preg'] = '';
}
// For Bootstrap Version usin YiiWheels switch :
$_POST['mandatory'] = Yii::app()->request->getPost('mandatory') == '1' ? 'Y' : 'N';
$_POST['other'] = Yii::app()->request->getPost('other') == '1' ? 'Y' : 'N';
// These are the questions types that have no mandatory property - so zap it accordingly
if ($sQuestionType == "X" || $sQuestionType == "|") {
$_POST['mandatory'] = 'N';
}
if ($oldtype != $sQuestionType) {
// TMSW Condition->Relevance: Do similar check via EM, but do allow such a change since will be easier to modify relevance
//Make sure there are no conditions based on this question, since we are changing the type
$ccresult = Condition::model()->findAllByAttributes(array('cqid' => $iQuestionID));
$cccount = count($ccresult);
foreach ($ccresult as $ccr) {
$qidarray[] = $ccr['qid'];
}
if (isset($qidarray) && $qidarray) {
$qidlist = implode(", ", $qidarray);
}
}
if (isset($cccount) && $cccount) {
Yii::app()->setFlashMessage(gT("Question could not be updated. There are conditions for other questions that rely on the answers to this question and changing the type will cause problems. You must delete these conditions before you can change the type of this question."), 'error');
} else {
if (isset($iQuestionGroupID) && $iQuestionGroupID != "") {
// $array_result=checkMoveQuestionConstraintsForConditions(sanitize_int($surveyid),sanitize_int($qid), sanitize_int($gid));
// // If there is no blocking conditions that could prevent this move
//
// if (is_null($array_result['notAbove']) && is_null($array_result['notBelow']))
// {
$aSurveyLanguages = Survey::model()->findByPk($iSurveyID)->additionalLanguages;
$sBaseLanguage = Survey::model()->findByPk($iSurveyID)->language;
array_push($aSurveyLanguages, $sBaseLanguage);
foreach ($aSurveyLanguages as $qlang) {
if (isset($qlang) && $qlang != "") {
// é to é and & to & : really needed ? Why not for answers ? (130307)
$sQuestionText = Yii::app()->request->getPost('question_' . $qlang, '');
$sQuestionHelp = Yii::app()->request->getPost('help_' . $qlang, '');
// Fix bug with FCKEditor saving strange BR types : in rules ?
$sQuestionText = $oFixCKeditor->fixCKeditor($sQuestionText);
$sQuestionHelp = $oFixCKeditor->fixCKeditor($sQuestionHelp);
$udata = array('type' => $sQuestionType, 'title' => Yii::app()->request->getPost('title'), 'question' => $sQuestionText, 'preg' => Yii::app()->request->getPost('preg'), 'help' => $sQuestionHelp, 'gid' => $iQuestionGroupID, 'other' => Yii::app()->request->getPost('other'), 'mandatory' => Yii::app()->request->getPost('mandatory'), 'relevance' => Yii::app()->request->getPost('relevance'));
// Update question module
if (Yii::app()->request->getPost('module_name') != '') {
// The question module is not empty. So it's an external question module.
$udata['modulename'] = Yii::app()->request->getPost('module_name');
} else {
// If it was a module before, we must
$udata['modulename'] = '';
}
if ($oldgid != $iQuestionGroupID) {
if (getGroupOrder($iSurveyID, $oldgid) > getGroupOrder($iSurveyID, $iQuestionGroupID)) {
// TMSW Condition->Relevance: What is needed here?
// Moving question to a 'upper' group
// insert question at the end of the destination group
// this prevent breaking conditions if the target qid is in the dest group
$insertorder = getMaxQuestionOrder($iQuestionGroupID, $iSurveyID) + 1;
$udata = array_merge($udata, array('question_order' => $insertorder));
} else {
// Moving question to a 'lower' group
// insert question at the beginning of the destination group
shiftOrderQuestions($iSurveyID, $iQuestionGroupID, 1);
// makes 1 spare room for new question at top of dest group
$udata = array_merge($udata, array('question_order' => 0));
}
}
//$condn = array('sid' => $surveyid, 'qid' => $qid, 'language' => $qlang);
$oQuestion = Question::model()->findByPk(array("qid" => $iQuestionID, 'language' => $qlang));
foreach ($udata as $k => $v) {
$oQuestion->{$k} = $v;
}
$uqresult = $oQuestion->save();
//($uqquery); // or safeDie ("Error Update Question: ".$uqquery."<br />"); // Checked)
if (!$uqresult) {
$bOnError = true;
$aErrors = $oQuestion->getErrors();
if (count($aErrors)) {
foreach ($aErrors as $sAttribute => $aStringErrors) {
foreach ($aStringErrors as $sStringErrors) {
Yii::app()->setFlashMessage(sprintf(gT("Question could not be updated with error on %s: %s"), $sAttribute, $sStringErrors), 'error');
}
}
} else {
Yii::app()->setFlashMessage(gT("Question could not be updated."), 'error');
}
}
}
}
// Update the group ID on subquestions, too
if ($oldgid != $iQuestionGroupID) {
Question::model()->updateAll(array('gid' => $iQuestionGroupID), 'qid=:qid and parent_qid>0', array(':qid' => $iQuestionID));
// if the group has changed then fix the sortorder of old and new group
Question::model()->updateQuestionOrder($oldgid, $iSurveyID);
Question::model()->updateQuestionOrder($iQuestionGroupID, $iSurveyID);
// If some questions have conditions set on this question's answers
// then change the cfieldname accordingly
fixMovedQuestionConditions($iQuestionID, $oldgid, $iQuestionGroupID);
}
// Update subquestions
if ($oldtype != $sQuestionType) {
Question::model()->updateAll(array('type' => $sQuestionType), 'parent_qid=:qid', array(':qid' => $iQuestionID));
}
// Update subquestions if question module
if (Yii::app()->request->getPost('module_name') != '') {
// The question module is not empty. So it's an external question module.
Question::model()->updateAll(array('modulename' => Yii::app()->request->getPost('module_name')), 'parent_qid=:qid', array(':qid' => $iQuestionID));
} else {
// If it was a module before, we must
Question::model()->updateAll(array('modulename' => ''), 'parent_qid=:qid', array(':qid' => $iQuestionID));
}
Answer::model()->deleteAllByAttributes(array('qid' => $iQuestionID), 'scale_id >= :scale_id', array(':scale_id' => $iAnswerScales));
// Remove old subquestion scales
Question::model()->deleteAllByAttributes(array('parent_qid' => $iQuestionID), 'scale_id >= :scale_id', array(':scale_id' => $iSubquestionScales));
if (!isset($bOnError) || !$bOnError) {
// This really a quick hack and need a better system
Yii::app()->setFlashMessage(gT("Question was successfully saved."));
}
// }
// else
// {
//
// // There are conditions constraints: alert the user
// $errormsg="";
// if (!is_null($array_result['notAbove']))
// {
// $errormsg.=gT("This question relies on other question's answers and can't be moved above groupId:","js")
// . " " . $array_result['notAbove'][0][0] . " " . gT("in position","js")." ".$array_result['notAbove'][0][1]."\\n"
// . gT("See conditions:")."\\n";
//
// foreach ($array_result['notAbove'] as $notAboveCond)
// {
// $errormsg.="- cid:". $notAboveCond[3]."\\n";
// }
//
// }
// if (!is_null($array_result['notBelow']))
// {
// $errormsg.=gT("Some questions rely on this question's answers. You can't move this question below groupId:","js")
// . " " . $array_result['notBelow'][0][0] . " " . gT("in position","js")." ".$array_result['notBelow'][0][1]."\\n"
// . gT("See conditions:")."\\n";
//
// foreach ($array_result['notBelow'] as $notBelowCond)
// {
// $errormsg.="- cid:". $notBelowCond[3]."\\n";
// }
// }
//
// $databaseoutput .= "<script type=\"text/javascript\">\n<!--\n alert(\"$errormsg\")\n //-->\n</script>\n";
// $gid= $oldgid; // group move impossible ==> keep display on oldgid
// }
} else {
Yii::app()->setFlashMessage(gT("Question could not be updated"), 'error');
}
}
LimeExpressionManager::UpgradeConditionsToRelevance($iSurveyID);
if ($sDBOutput != '') {
echo $sDBOutput;
} else {
$closeAfterSave = Yii::app()->request->getPost('close-after-save') === 'true';
if ($closeAfterSave) {
// Redirect to summary
$this->getController()->redirect(array('admin/questions/sa/view/surveyid/' . $iSurveyID . '/gid/' . $iQuestionGroupID . '/qid/' . $iQuestionID));
} else {
// Redirect to edit
$this->getController()->redirect(array('admin/questions/sa/editquestion/surveyid/' . $iSurveyID . '/gid/' . $iQuestionGroupID . '/qid/' . $iQuestionID));
// This works too: $this->getController()->redirect(Yii::app()->request->urlReferrer);
}
}
}
/**
* updatesurveylocalesettings
*/
if ($sAction == "updatesurveylocalesettings" && Permission::model()->hasSurveyPermission($iSurveyID, 'surveylocale', 'update')) {
$languagelist = Survey::model()->findByPk($iSurveyID)->additionalLanguages;
$languagelist[] = Survey::model()->findByPk($iSurveyID)->language;
Yii::app()->loadHelper('database');
foreach ($languagelist as $langname) {
if ($langname) {
$url = Yii::app()->request->getPost('url_' . $langname);
if ($url == 'http://') {
$url = "";
}
$sURLDescription = html_entity_decode(Yii::app()->request->getPost('urldescrip_' . $langname), ENT_QUOTES, "UTF-8");
$sURL = html_entity_decode(Yii::app()->request->getPost('url_' . $langname), ENT_QUOTES, "UTF-8");
// Fix bug with FCKEditor saving strange BR types
$short_title = Yii::app()->request->getPost('short_title_' . $langname);
$description = Yii::app()->request->getPost('description_' . $langname);
$welcome = Yii::app()->request->getPost('welcome_' . $langname);
$endtext = Yii::app()->request->getPost('endtext_' . $langname);
$short_title = $oFixCKeditor->fixCKeditor($short_title);
$description = $oFixCKeditor->fixCKeditor($description);
$welcome = $oFixCKeditor->fixCKeditor($welcome);
$endtext = $oFixCKeditor->fixCKeditor($endtext);
$data = array('surveyls_title' => $short_title, 'surveyls_description' => $description, 'surveyls_welcometext' => $welcome, 'surveyls_endtext' => $endtext, 'surveyls_url' => $sURL, 'surveyls_urldescription' => $sURLDescription, 'surveyls_dateformat' => Yii::app()->request->getPost('dateformat_' . $langname), 'surveyls_numberformat' => Yii::app()->request->getPost('numberformat_' . $langname));
$SurveyLanguageSetting = SurveyLanguageSetting::model()->findByPk(array('surveyls_survey_id' => $iSurveyID, 'surveyls_language' => $langname));
$SurveyLanguageSetting->attributes = $data;
$SurveyLanguageSetting->save();
// save the change to database
}
}
//Yii::app()->session['flashmessage'] = gT("Survey text elements successfully saved.");
////////////////////////////////////////////////////////////////////////////////////
// General settings (copy / paste from surveyadmin::update)
// Preload survey
$oSurvey = Survey::model()->findByPk($iSurveyID);
// Save plugin settings.
$pluginSettings = App()->request->getPost('plugin', array());
foreach ($pluginSettings as $plugin => $settings) {
$settingsEvent = new PluginEvent('newSurveySettings');
$settingsEvent->set('settings', $settings);
$settingsEvent->set('survey', $iSurveyID);
App()->getPluginManager()->dispatchEvent($settingsEvent, $plugin);
}
/* Start to fix some param before save (TODO : use models directly ?) */
/* Date management */
Yii::app()->loadHelper('surveytranslator');
$formatdata = getDateFormatData(Yii::app()->session['dateformat']);
Yii::app()->loadLibrary('Date_Time_Converter');
$startdate = App()->request->getPost('startdate');
if (trim($startdate) == "") {
$startdate = null;
} else {
Yii::app()->loadLibrary('Date_Time_Converter');
$datetimeobj = new date_time_converter($startdate, $formatdata['phpdate'] . ' H:i');
//new Date_Time_Converter($startdate,$formatdata['phpdate'].' H:i');
$startdate = $datetimeobj->convert("Y-m-d H:i:s");
}
$expires = App()->request->getPost('expires');
if (trim($expires) == "") {
$expires = null;
} else {
$datetimeobj = new date_time_converter($expires, $formatdata['phpdate'] . ' H:i');
//new Date_Time_Converter($expires, $formatdata['phpdate'].' H:i');
$expires = $datetimeobj->convert("Y-m-d H:i:s");
}
// We have $oSurvey : update and save it
$oSurvey->owner_id = Yii::app()->request->getPost('owner_id');
$oSurvey->admin = Yii::app()->request->getPost('admin');
$oSurvey->expires = $expires;
$oSurvey->startdate = $startdate;
$oSurvey->faxto = App()->request->getPost('faxto');
$oSurvey->format = App()->request->getPost('format');
$oSurvey->template = Yii::app()->request->getPost('template');
$oSurvey->assessments = App()->request->getPost('assessments');
$oSurvey->additional_languages = Yii::app()->request->getPost('languageids');
if ($oSurvey->active != 'Y') {
$oSurvey->anonymized = App()->request->getPost('anonymized');
$oSurvey->savetimings = App()->request->getPost('savetimings');
$oSurvey->datestamp = App()->request->getPost('datestamp');
$oSurvey->ipaddr = App()->request->getPost('ipaddr');
$oSurvey->refurl = App()->request->getPost('refurl');
}
$oSurvey->publicgraphs = App()->request->getPost('publicgraphs');
$oSurvey->usecookie = App()->request->getPost('usecookie');
$oSurvey->allowregister = App()->request->getPost('allowregister');
$oSurvey->allowsave = App()->request->getPost('allowsave');
$oSurvey->navigationdelay = App()->request->getPost('navigationdelay');
$oSurvey->printanswers = App()->request->getPost('printanswers');
$oSurvey->publicstatistics = App()->request->getPost('publicstatistics');
$oSurvey->autoredirect = App()->request->getPost('autoredirect');
$oSurvey->showxquestions = App()->request->getPost('showxquestions');
$oSurvey->showgroupinfo = App()->request->getPost('showgroupinfo');
$oSurvey->showqnumcode = App()->request->getPost('showqnumcode');
$oSurvey->shownoanswer = App()->request->getPost('shownoanswer');
$oSurvey->showwelcome = App()->request->getPost('showwelcome');
$oSurvey->allowprev = App()->request->getPost('allowprev');
$oSurvey->questionindex = App()->request->getPost('questionindex');
$oSurvey->nokeyboard = App()->request->getPost('nokeyboard');
$oSurvey->showprogress = App()->request->getPost('showprogress');
$oSurvey->listpublic = App()->request->getPost('public');
$oSurvey->htmlemail = App()->request->getPost('htmlemail');
$oSurvey->sendconfirmation = App()->request->getPost('sendconfirmation');
$oSurvey->tokenanswerspersistence = App()->request->getPost('tokenanswerspersistence');
$oSurvey->alloweditaftercompletion = App()->request->getPost('alloweditaftercompletion');
$oSurvey->usecaptcha = Survey::transcribeCaptchaOptions();
$oSurvey->emailresponseto = App()->request->getPost('emailresponseto');
$oSurvey->emailnotificationto = App()->request->getPost('emailnotificationto');
$oSurvey->googleanalyticsapikey = App()->request->getPost('googleanalyticsapikey');
$oSurvey->googleanalyticsstyle = App()->request->getPost('googleanalyticsstyle');
$oSurvey->tokenlength = App()->request->getPost('tokenlength');
$oSurvey->adminemail = App()->request->getPost('adminemail');
$oSurvey->bounce_email = App()->request->getPost('bounce_email');
if ($oSurvey->save()) {
Yii::app()->setFlashMessage(gT("Survey settings were successfully saved."));
} else {
Yii::app()->setFlashMessage(gT("Survey could not be updated."), "error");
tracevar($oSurvey->getErrors());
}
/* Reload $oSurvey (language are fixed : need it ?) */
$oSurvey = Survey::model()->findByPk($iSurveyID);
/* Delete removed language cleanLanguagesFromSurvey do it already why redo it (cleanLanguagesFromSurvey must be moved to model) ?*/
$aAvailableLanguage = $oSurvey->getAllLanguages();
$oCriteria = new CDbCriteria();
$oCriteria->compare('surveyls_survey_id', $iSurveyID);
$oCriteria->addNotInCondition('surveyls_language', $aAvailableLanguage);
SurveyLanguageSetting::model()->deleteAll($oCriteria);
/* Add new language fixLanguageConsistency do it ?*/
foreach ($oSurvey->additionalLanguages as $sLang) {
if ($sLang) {
$oLanguageSettings = SurveyLanguageSetting::model()->find('surveyls_survey_id=:surveyid AND surveyls_language=:langname', array(':surveyid' => $iSurveyID, ':langname' => $sLang));
if (!$oLanguageSettings) {
$oLanguageSettings = new SurveyLanguageSetting();
$languagedetails = getLanguageDetails($sLang);
$oLanguageSettings->surveyls_survey_id = $iSurveyID;
$oLanguageSettings->surveyls_language = $sLang;
$oLanguageSettings->surveyls_title = '';
// Not in default model ?
$oLanguageSettings->surveyls_dateformat = $languagedetails['dateformat'];
if (!$oLanguageSettings->save()) {
Yii::app()->setFlashMessage(gT("Survey language could not be created."), "error");
tracevar($oLanguageSettings->getErrors());
}
}
}
}
/* Language fix : remove and add question/group */
cleanLanguagesFromSurvey($iSurveyID, implode(" ", $oSurvey->additionalLanguages));
fixLanguageConsistency($iSurveyID, implode(" ", $oSurvey->additionalLanguages));
// Url params in json
$aURLParams = json_decode(Yii::app()->request->getPost('allurlparams'), true);
SurveyURLParameter::model()->deleteAllByAttributes(array('sid' => $iSurveyID));
if (isset($aURLParams)) {
foreach ($aURLParams as $aURLParam) {
$aURLParam['parameter'] = trim($aURLParam['parameter']);
if ($aURLParam['parameter'] == '' || !preg_match('/^[a-zA-Z_][a-zA-Z0-9_]*$/', $aURLParam['parameter']) || $aURLParam['parameter'] == 'sid' || $aURLParam['parameter'] == 'newtest' || $aURLParam['parameter'] == 'token' || $aURLParam['parameter'] == 'lang') {
continue;
// this parameter name seems to be invalid - just ignore it
}
unset($aURLParam['act']);
unset($aURLParam['title']);
unset($aURLParam['id']);
if ($aURLParam['targetqid'] == '') {
$aURLParam['targetqid'] = NULL;
}
if ($aURLParam['targetsqid'] == '') {
$aURLParam['targetsqid'] = NULL;
}
$aURLParam['sid'] = $iSurveyID;
$param = new SurveyURLParameter();
foreach ($aURLParam as $k => $v) {
$param->{$k} = $v;
}
$param->save();
}
}
////////////////////////////////////////
if ($sDBOutput != '') {
echo $sDBOutput;
} else {
if (Yii::app()->request->getPost('close-after-save') === 'true') {
$this->getController()->redirect(array('admin/survey/sa/view/surveyid/' . $iSurveyID));
}
$this->getController()->redirect(array('/admin/survey/sa/editlocalsettings/surveyid/' . $iSurveyID));
}
}
$this->getController()->redirect(array("/admin"), "refresh");
}
/**
* Prints Admin Header
*
* @access protected
* @param bool $meta
* @param bool $return
* @return mixed
*/
public function _getAdminHeader($meta = false, $return = false)
{
if (empty(Yii::app()->session['adminlang'])) {
Yii::app()->session["adminlang"] = Yii::app()->getConfig("defaultlang");
}
$data = array();
$data['adminlang'] = Yii::app()->session['adminlang'];
//$data['admin'] = getLanguageRTL;
$data['test'] = "t";
$data['languageRTL'] = "";
$data['styleRTL'] = "";
Yii::app()->loadHelper("surveytranslator");
if (getLanguageRTL(Yii::app()->session["adminlang"])) {
$data['languageRTL'] = " dir=\"rtl\" ";
$data['bIsRTL'] = true;
} else {
$data['bIsRTL'] = false;
}
$data['meta'] = "";
if ($meta) {
$data['meta'] = $meta;
}
$data['baseurl'] = Yii::app()->baseUrl . '/';
$data['datepickerlang'] = "";
if (Yii::app()->session["adminlang"] != 'en') {
$data['datepickerlang'] = "<script type=\"text/javascript\" src=\"" . Yii::app()->getConfig('generalscripts') . "jquery/locale/jquery.ui.datepicker-" . Yii::app()->session["adminlang"] . ".js\"></script>\n";
}
$data['sitename'] = Yii::app()->getConfig("sitename");
$data['admintheme'] = Yii::app()->getConfig("admintheme");
$data['firebug'] = useFirebug();
if (!empty(Yii::app()->session['dateformat'])) {
$data['formatdata'] = getDateFormatData(Yii::app()->session['dateformat']);
}
// Prepare flashmessage
if (!empty(Yii::app()->session['flashmessage']) && Yii::app()->session['flashmessage'] != '') {
$data['flashmessage'] = Yii::app()->session['flashmessage'];
unset(Yii::app()->session['flashmessage']);
}
$data['css_admin_includes'] = $this->_css_admin_includes(array(), true);
return $this->renderPartial("/admin/super/header", $data, $return);
}
/**
* Show survey summary
* @param int Survey id
* @param string Action to be performed
*/
function _surveysummary($aData)
{
$iSurveyID = $aData['surveyid'];
$aSurveyInfo = getSurveyInfo($iSurveyID);
$oSurvey = $aData['oSurvey'];
$baselang = $aSurveyInfo['language'];
$activated = $aSurveyInfo['active'];
$condition = array('sid' => $iSurveyID, 'parent_qid' => 0, 'language' => $baselang);
$sumresult3 = Question::model()->findAllByAttributes($condition);
//Checked
$sumcount3 = count($sumresult3);
$condition = array('sid' => $iSurveyID, 'language' => $baselang);
$sumresult2 = QuestionGroup::model()->findAllByAttributes($condition);
//Checked
$sumcount2 = count($sumresult2);
//SURVEY SUMMARY
$aAdditionalLanguages = $oSurvey->additionalLanguages;
$surveysummary2 = "";
if ($aSurveyInfo['anonymized'] != "N") {
$surveysummary2 .= gT("Responses to this survey are anonymized.") . "<br />";
} else {
$surveysummary2 .= gT("Responses to this survey are NOT anonymized.") . "<br />";
}
if ($aSurveyInfo['format'] == "S") {
$surveysummary2 .= gT("It is presented question by question.") . "<br />";
} elseif ($aSurveyInfo['format'] == "G") {
$surveysummary2 .= gT("It is presented group by group.") . "<br />";
} else {
$surveysummary2 .= gT("It is presented on one single page.") . "<br />";
}
if ($aSurveyInfo['questionindex'] > 0) {
if ($aSurveyInfo['format'] == 'A') {
$surveysummary2 .= gT("No question index will be shown with this format.") . "<br />";
} elseif ($aSurveyInfo['questionindex'] == 1) {
$surveysummary2 .= gT("A question index will be shown; participants will be able to jump between viewed questions.") . "<br />";
} elseif ($aSurveyInfo['questionindex'] == 2) {
$surveysummary2 .= gT("A full question index will be shown; participants will be able to jump between relevant questions.") . "<br />";
}
}
if ($aSurveyInfo['datestamp'] == "Y") {
$surveysummary2 .= gT("Responses will be date stamped.") . "<br />";
}
if ($aSurveyInfo['ipaddr'] == "Y") {
$surveysummary2 .= gT("IP Addresses will be logged") . "<br />";
}
if ($aSurveyInfo['refurl'] == "Y") {
$surveysummary2 .= gT("Referrer URL will be saved.") . "<br />";
}
if ($aSurveyInfo['usecookie'] == "Y") {
$surveysummary2 .= gT("It uses cookies for access control.") . "<br />";
}
if ($aSurveyInfo['allowregister'] == "Y") {
$surveysummary2 .= gT("If tokens are used, the public may register for this survey") . "<br />";
}
if ($aSurveyInfo['allowsave'] == "Y" && $aSurveyInfo['tokenanswerspersistence'] == 'N') {
$surveysummary2 .= gT("Participants can save partially finished surveys") . "<br />\n";
}
if ($aSurveyInfo['emailnotificationto'] != '') {
$surveysummary2 .= gT("Basic email notification is sent to:") . ' ' . htmlspecialchars($aSurveyInfo['emailnotificationto']) . "<br />\n";
}
if ($aSurveyInfo['emailresponseto'] != '') {
$surveysummary2 .= gT("Detailed email notification with response data is sent to:") . ' ' . htmlspecialchars($aSurveyInfo['emailresponseto']) . "<br />\n";
}
$dateformatdetails = getDateFormatData(Yii::app()->session['dateformat']);
if (trim($aSurveyInfo['startdate']) != '') {
Yii::import('application.libraries.Date_Time_Converter');
$datetimeobj = new Date_Time_Converter($aSurveyInfo['startdate'], 'Y-m-d H:i:s');
$aData['startdate'] = $datetimeobj->convert($dateformatdetails['phpdate'] . ' H:i');
} else {
$aData['startdate'] = "-";
}
if (trim($aSurveyInfo['expires']) != '') {
//$constructoritems = array($surveyinfo['expires'] , "Y-m-d H:i:s");
Yii::import('application.libraries.Date_Time_Converter');
$datetimeobj = new Date_Time_Converter($aSurveyInfo['expires'], 'Y-m-d H:i:s');
//$datetimeobj = new Date_Time_Converter($surveyinfo['expires'] , "Y-m-d H:i:s");
$aData['expdate'] = $datetimeobj->convert($dateformatdetails['phpdate'] . ' H:i');
} else {
$aData['expdate'] = "-";
}
if (!$aSurveyInfo['language']) {
$aData['language'] = getLanguageNameFromCode($currentadminlang, false);
} else {
$aData['language'] = getLanguageNameFromCode($aSurveyInfo['language'], false);
}
// get the rowspan of the Additionnal languages row
// is at least 1 even if no additionnal language is present
$additionnalLanguagesCount = count($aAdditionalLanguages);
$first = true;
if ($aSurveyInfo['surveyls_urldescription'] == "") {
$aSurveyInfo['surveyls_urldescription'] = htmlspecialchars($aSurveyInfo['surveyls_url']);
}
if ($aSurveyInfo['surveyls_url'] != "") {
$aData['endurl'] = " <a target='_blank' href=\"" . htmlspecialchars($aSurveyInfo['surveyls_url']) . "\" title=\"" . htmlspecialchars($aSurveyInfo['surveyls_url']) . "\">" . flattenText($aSurveyInfo['surveyls_urldescription']) . "</a>";
} else {
$aData['endurl'] = "-";
}
$aData['sumcount3'] = $sumcount3;
$aData['sumcount2'] = $sumcount2;
if ($activated == "N") {
$aData['activatedlang'] = gT("No");
} else {
$aData['activatedlang'] = gT("Yes");
}
$aData['activated'] = $activated;
if ($activated == "Y") {
$aData['surveydb'] = Yii::app()->db->tablePrefix . "survey_" . $iSurveyID;
}
$aData['warnings'] = "";
if ($activated == "N" && $sumcount3 == 0) {
$aData['warnings'] = gT("Survey cannot be activated yet.") . "<br />\n";
if ($sumcount2 == 0 && Permission::model()->hasSurveyPermission($iSurveyID, 'surveycontent', 'create')) {
$aData['warnings'] .= "<span class='statusentryhighlight'>[" . gT("You need to add question groups") . "]</span><br />";
}
if ($sumcount3 == 0 && Permission::model()->hasSurveyPermission($iSurveyID, 'surveycontent', 'create')) {
$aData['warnings'] .= "<span class='statusentryhighlight'>[" . gT("You need to add questions") . "]</span><br />";
}
}
$aData['hints'] = $surveysummary2;
//return (array('column'=>array($columns_used,$hard_limit) , 'size' => array($length, $size_limit) ));
// $aData['tableusage'] = getDBTableUsage($iSurveyID);
// ToDo: Table usage is calculated on every menu display which is too slow with bug surveys.
// Needs to be moved to a database field and only updated if there are question/subquestions added/removed (it's currently also not functional due to the port)
//
$aData['tableusage'] = false;
$aData['aAdditionalLanguages'] = $aAdditionalLanguages;
$aData['surveyinfo'] = $aSurveyInfo;
$aData['groups_count'] = $sumcount2;
$this->getController()->renderPartial("/admin/survey/surveySummary_view", $aData);
}
/**
* Loop through columns and add filter if any value is given for this column
* Used in responses grid
* @param CdbCriteria $criteria
* @return void
*/
protected function filterColumns(CDbCriteria $criteria)
{
$dateformatdetails = getDateFormatData(Yii::app()->session['dateformat']);
// Filters for responses
foreach ($this->metaData->columns as $column) {
$isNotDefaultColumn = !in_array($column->name, $this->defaultColumns);
if ($isNotDefaultColumn) {
$c1 = (string) $column->name;
$columnHasValue = !empty($this->{$c1});
if ($columnHasValue) {
$isDatetime = strpos($column->dbType, 'timestamp') !== false || strpos($column->dbType, 'datetime') !== false;
if ($column->dbType == 'decimal') {
$this->{$c1} = (double) $this->{$c1};
$criteria->compare(Yii::app()->db->quoteColumnName($c1), $this->{$c1}, false);
} else {
if ($isDatetime) {
$s = DateTime::createFromFormat($dateformatdetails['phpdate'], $this->{$c1});
if ($s === false) {
// This happens when date is in wrong format
continue;
}
$s2 = $s->format('Y-m-d');
$criteria->addCondition('cast(' . Yii::app()->db->quoteColumnName($c1) . ' as date) = \'' . $s2 . '\'');
} else {
$criteria->compare(Yii::app()->db->quoteColumnName($c1), $this->{$c1}, true);
}
}
}
}
}
}
/**
* Prints Admin Header
*
* @access protected
* @param bool $meta
* @param bool $return
* @return mixed
*/
public function _getAdminHeader($meta = false, $return = false)
{
if (empty(Yii::app()->session['adminlang'])) {
Yii::app()->session["adminlang"] = Yii::app()->getConfig("defaultlang");
}
$aData = array();
$aData['adminlang'] = Yii::app()->session['adminlang'];
//$data['admin'] = getLanguageRTL;
$aData['test'] = "t";
$aData['languageRTL'] = "";
$aData['styleRTL'] = "";
Yii::app()->loadHelper("surveytranslator");
if (getLanguageRTL(Yii::app()->session["adminlang"])) {
$aData['languageRTL'] = " dir=\"rtl\" ";
$aData['bIsRTL'] = true;
} else {
$aData['bIsRTL'] = false;
}
$aData['meta'] = "";
if ($meta) {
$aData['meta'] = $meta;
}
$aData['baseurl'] = Yii::app()->baseUrl . '/';
$aData['datepickerlang'] = "";
if (Yii::app()->session["adminlang"] != 'en') {
Yii::app()->getClientScript()->registerScriptFile(App()->baseUrl . "/third_party/jqueryui/development-bundle/ui/i18n/jquery.ui.datepicker-" . Yii::app()->session['adminlang'] . ".js");
}
$aData['sitename'] = Yii::app()->getConfig("sitename");
$aData['admintheme'] = Yii::app()->getConfig("admintheme");
$aData['firebug'] = useFirebug();
if (!empty(Yii::app()->session['dateformat'])) {
$aData['formatdata'] = getDateFormatData(Yii::app()->session['dateformat']);
}
//ajax popup call
$cs = Yii::app()->clientScript;
$cs->coreScriptPosition = CClientScript::POS_HEAD;
$cs->scriptMap = array();
$cs->registerCoreScript('jquery');
$cs->registerCoreScript('jquery.ui');
//$baseU = Yii::app()->getModule('gii')->assetsUrl; //the assets of existing module
$cs->registerScriptFile(Yii::app()->request->baseUrl . '/scripts/fancybox/jquery.fancybox-1.3.1.pack.js');
$cs->registerCssFile(Yii::app()->request->baseUrl . '/scripts/fancybox/jquery.fancybox-1.3.1.css');
$cs->registerScriptFile(Yii::app()->request->baseUrl . '/scripts/popup.js');
//end ajax popup call
$sOutput = $this->renderPartial("/admin/super/header", $aData, true);
if ($return) {
return $sOutput;
} else {
echo $sOutput;
}
}
/**
* Marks a tokens as completed and sends a confirmation email to the participiant.
* If $quotaexit is set to true then the user exited the survey due to a quota
* restriction and the according token is only marked as 'Q'
*
* @param mixed $quotaexit
*/
function submittokens($quotaexit = false)
{
$surveyid = Yii::app()->getConfig('surveyID');
if (isset($_SESSION['survey_' . $surveyid]['s_lang'])) {
$thissurvey = getSurveyInfo($surveyid, $_SESSION['survey_' . $surveyid]['s_lang']);
} else {
$thissurvey = getSurveyInfo($surveyid);
}
$clienttoken = $_SESSION['survey_' . $surveyid]['token'];
$sitename = Yii::app()->getConfig("sitename");
$emailcharset = Yii::app()->getConfig("emailcharset");
// Shift the date due to global timeadjust setting
$today = dateShift(date("Y-m-d H:i:s"), "Y-m-d H:i", Yii::app()->getConfig("timeadjust"));
// check how many uses the token has left
$token = Token::model($surveyid)->findByAttributes(array('token' => $clienttoken));
if ($quotaexit == true) {
$token->completed = 'Q';
$token->usesleft--;
} else {
if ($token->usesleft <= 1) {
// Finish the token
if (isTokenCompletedDatestamped($thissurvey)) {
$token->completed = $today;
} else {
$token->completed = 'Y';
}
if (isset($token->participant_id)) {
$slquery = SurveyLink::model()->find('participant_id = :pid AND survey_id = :sid AND token_id = :tid', array(':pid' => $token->participant_id, ':sid' => $surveyid, ':tid' => $token->tid));
if ($slquery) {
if (isTokenCompletedDatestamped($thissurvey)) {
$slquery->date_completed = $today;
} else {
// Update the survey_links table if necessary, to protect anonymity, use the date_created field date
$slquery->date_completed = $slquery->date_created;
}
$slquery->save();
}
}
}
$token->usesleft--;
}
$token->save();
if ($quotaexit == false) {
if ($token && trim(strip_tags($thissurvey['email_confirm'])) != "" && $thissurvey['sendconfirmation'] == "Y") {
// if($token->completed == "Y" || $token->completed == $today)
// {
$from = "{$thissurvey['adminname']} <{$thissurvey['adminemail']}>";
$subject = $thissurvey['email_confirm_subj'];
$aReplacementVars = array();
$aReplacementVars["ADMINNAME"] = $thissurvey['admin'];
$aReplacementVars["ADMINEMAIL"] = $thissurvey['adminemail'];
$aReplacementVars['ADMINEMAIL'] = $thissurvey['adminemail'];
//Fill with token info, because user can have his information with anonimity control
$aReplacementVars["FIRSTNAME"] = $token->firstname;
$aReplacementVars["LASTNAME"] = $token->lastname;
$aReplacementVars["TOKEN"] = $token->token;
// added survey url in replacement vars
$surveylink = Yii::app()->createAbsoluteUrl("/survey/index/sid/{$surveyid}", array('lang' => $_SESSION['survey_' . $surveyid]['s_lang'], 'token' => $token->token));
$aReplacementVars['SURVEYURL'] = $surveylink;
$attrfieldnames = getAttributeFieldNames($surveyid);
foreach ($attrfieldnames as $attr_name) {
$aReplacementVars[strtoupper($attr_name)] = $token->{$attr_name};
}
$dateformatdatat = getDateFormatData($thissurvey['surveyls_dateformat']);
$numberformatdatat = getRadixPointData($thissurvey['surveyls_numberformat']);
$redata = array('thissurvey' => $thissurvey);
$subject = templatereplace($subject, $aReplacementVars, $redata, '', false, null, array(), true);
$subject = html_entity_decode($subject, ENT_QUOTES, $emailcharset);
if (getEmailFormat($surveyid) == 'html') {
$ishtml = true;
} else {
$ishtml = false;
}
$message = $thissurvey['email_confirm'];
//$message=ReplaceFields($message, $fieldsarray, true);
$message = templatereplace($message, $aReplacementVars, $redata, '', false, null, array(), true);
if (!$ishtml) {
$message = strip_tags(breakToNewline(html_entity_decode($message, ENT_QUOTES, $emailcharset)));
} else {
$message = html_entity_decode($message, ENT_QUOTES, $emailcharset);
}
//Only send confirmation email if there is a valid email address
$sToAddress = validateEmailAddresses($token->email);
if ($sToAddress) {
$aAttachments = unserialize($thissurvey['attachments']);
$aRelevantAttachments = array();
/*
* Iterate through attachments and check them for relevance.
*/
if (isset($aAttachments['confirmation'])) {
foreach ($aAttachments['confirmation'] as $aAttachment) {
$relevance = $aAttachment['relevance'];
// If the attachment is relevant it will be added to the mail.
if (LimeExpressionManager::ProcessRelevance($relevance) && file_exists($aAttachment['url'])) {
$aRelevantAttachments[] = $aAttachment['url'];
}
}
}
SendEmailMessage($message, $subject, $sToAddress, $from, $sitename, $ishtml, null, $aRelevantAttachments);
}
// } else {
// Leave it to send optional confirmation at closed token
// }
}
}
}
/**
* Show printable survey
*/
function index($surveyid, $lang = null)
{
$surveyid = sanitize_int($surveyid);
if (!Permission::model()->hasSurveyPermission($surveyid, 'surveycontent', 'read')) {
$aData['surveyid'] = $surveyid;
App()->getClientScript()->registerPackage('jquery-superfish');
$message['title'] = gT('Access denied!');
$message['message'] = gT('You do not have sufficient rights to access this page.');
$message['class'] = "error";
$this->_renderWrappedTemplate('survey', array("message" => $message), $aData);
} else {
$aSurveyInfo = getSurveyInfo($surveyid, $lang);
if (!$aSurveyInfo) {
$this->getController()->error('Invalid survey ID');
}
SetSurveyLanguage($surveyid, $lang);
$sLanguageCode = App()->language;
$templatename = $aSurveyInfo['template'];
$welcome = $aSurveyInfo['surveyls_welcometext'];
$end = $aSurveyInfo['surveyls_endtext'];
$surveyname = $aSurveyInfo['surveyls_title'];
$surveydesc = $aSurveyInfo['surveyls_description'];
$surveyactive = $aSurveyInfo['active'];
$surveytable = "{{survey_" . $aSurveyInfo['sid'] . "}}";
$surveyexpirydate = $aSurveyInfo['expires'];
$surveyfaxto = $aSurveyInfo['faxto'];
$dateformattype = $aSurveyInfo['surveyls_dateformat'];
Yii::app()->loadHelper('surveytranslator');
if (!is_null($surveyexpirydate)) {
$dformat = getDateFormatData($dateformattype);
$dformat = $dformat['phpdate'];
$expirytimestamp = strtotime($surveyexpirydate);
$expirytimeofday_h = date('H', $expirytimestamp);
$expirytimeofday_m = date('i', $expirytimestamp);
$surveyexpirydate = date($dformat, $expirytimestamp);
if (!empty($expirytimeofday_h) || !empty($expirytimeofday_m)) {
$surveyexpirydate .= ' – ' . $expirytimeofday_h . ':' . $expirytimeofday_m;
}
sprintf(gT("Please submit by %s"), $surveyexpirydate);
} else {
$surveyexpirydate = '';
}
//Fix $templatename : control if print_survey.pstpl exist
if (is_file(getTemplatePath($templatename) . DIRECTORY_SEPARATOR . 'print_survey.pstpl')) {
$templatename = $templatename;
// Change nothing
} elseif (is_file(getTemplatePath(Yii::app()->getConfig("defaulttemplate")) . DIRECTORY_SEPARATOR . 'print_survey.pstpl')) {
$templatename = Yii::app()->getConfig("defaulttemplate");
} else {
$templatename = "default";
}
$sFullTemplatePath = getTemplatePath($templatename) . DIRECTORY_SEPARATOR;
$sFullTemplateUrl = getTemplateURL($templatename) . "/";
define('PRINT_TEMPLATE_DIR', $sFullTemplatePath, true);
define('PRINT_TEMPLATE_URL', $sFullTemplateUrl, true);
LimeExpressionManager::StartSurvey($surveyid, 'survey', NULL, false, LEM_PRETTY_PRINT_ALL_SYNTAX);
$moveResult = LimeExpressionManager::NavigateForwards();
$condition = "sid = '{$surveyid}' AND language = '{$sLanguageCode}'";
$degresult = QuestionGroup::model()->getAllGroups($condition, array('group_order'));
//xiao,
if (!isset($surveyfaxto) || !$surveyfaxto and isset($surveyfaxnumber)) {
$surveyfaxto = $surveyfaxnumber;
//Use system fax number if none is set in survey.
}
$headelements = getPrintableHeader();
//if $showsgqacode is enabled at config.php show table name for reference
$showsgqacode = Yii::app()->getConfig("showsgqacode");
if (isset($showsgqacode) && $showsgqacode == true) {
$surveyname = $surveyname . "<br />[" . gT('Database') . " " . gT('table') . ": {$surveytable}]";
} else {
$surveyname = $surveyname;
}
$survey_output = array('SITENAME' => Yii::app()->getConfig("sitename"), 'SURVEYNAME' => $surveyname, 'SURVEYDESCRIPTION' => $surveydesc, 'WELCOME' => $welcome, 'END' => $end, 'THEREAREXQUESTIONS' => 0, 'SUBMIT_TEXT' => gT("Submit Your Survey."), 'SUBMIT_BY' => $surveyexpirydate, 'THANKS' => gT("Thank you for completing this survey."), 'HEADELEMENTS' => $headelements, 'TEMPLATEURL' => PRINT_TEMPLATE_URL, 'FAXTO' => $surveyfaxto, 'PRIVACY' => '', 'GROUPS' => '');
$survey_output['FAX_TO'] = '';
if (!empty($surveyfaxto) && $surveyfaxto != '000-00000000') {
$survey_output['FAX_TO'] = gT("Please fax your completed survey to:") . " {$surveyfaxto}";
}
$total_questions = 0;
$mapquestionsNumbers = array();
$answertext = '';
// otherwise can throw an error on line 1617
$fieldmap = createFieldMap($surveyid, 'full', false, false, $sLanguageCode);
// =========================================================
// START doin the business:
foreach ($degresult->readAll() as $degrow) {
// ---------------------------------------------------
// START doing groups
$deqresult = Question::model()->getQuestions($surveyid, $degrow['gid'], $sLanguageCode, 0, '"I"');
$deqrows = array();
//Create an empty array in case FetchRow does not return any rows
foreach ($deqresult->readAll() as $deqrow) {
$deqrows[] = $deqrow;
}
// Get table output into array
// Perform a case insensitive natural sort on group name then question title of a multidimensional array
usort($deqrows, 'groupOrderThenQuestionOrder');
if ($degrow['description']) {
$group_desc = $degrow['description'];
} else {
$group_desc = '';
}
$group = array('GROUPNAME' => $degrow['group_name'], 'GROUPDESCRIPTION' => $group_desc, 'QUESTIONS' => '');
// A group can have only hidden questions. In that case you don't want to see the group's header/description either.
$bGroupHasVisibleQuestions = false;
$gid = $degrow['gid'];
//Alternate bgcolor for different groups
if (!isset($group['ODD_EVEN']) || $group['ODD_EVEN'] == ' g-row-even') {
$group['ODD_EVEN'] = ' g-row-odd';
} else {
$group['ODD_EVEN'] = ' g-row-even';
}
//Loop through questions
foreach ($deqrows as $deqrow) {
// - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
// START doing questions
$qidattributes = getQuestionAttributeValues($deqrow['qid'], $deqrow['type']);
if ($qidattributes['hidden'] == 1 && $deqrow['type'] != '*') {
continue;
}
$bGroupHasVisibleQuestions = true;
//GET ANY CONDITIONS THAT APPLY TO THIS QUESTION
$printablesurveyoutput = '';
$sExplanation = '';
//reset conditions explanation
$s = 0;
// TMSW Condition->Relevance: show relevance instead of this whole section to create $explanation
$scenarioresult = Condition::model()->getScenarios($deqrow['qid']);
$scenarioresult = $scenarioresult->readAll();
//Loop through distinct scenarios, thus grouping them together.
foreach ($scenarioresult as $scenariorow) {
if ($s == 0 && count($scenarioresult) > 1) {
$sExplanation .= '<p class="scenario">' . " -------- Scenario {$scenariorow['scenario']} --------</p>\n\n";
}
if ($s > 0) {
$sExplanation .= '<p class="scenario">' . ' -------- ' . gT("or") . " Scenario {$scenariorow['scenario']} --------</p>\n\n";
}
$x = 0;
$conditions1 = "qid={$deqrow['qid']} AND scenario={$scenariorow['scenario']}";
$distinctresult = Condition::model()->getSomeConditions(array('cqid', 'method', 'cfieldname'), $conditions1, array('cqid'), array('cqid', 'method', 'cfieldname'));
//Loop through each condition for a particular scenario.
foreach ($distinctresult->readAll() as $distinctrow) {
$condition = "qid = '{$distinctrow['cqid']}' AND parent_qid = 0 AND language = '{$sLanguageCode}'";
$subresult = Question::model()->find($condition);
if ($x > 0) {
$sExplanation .= ' <em class="scenario-and-separator">' . gT('and') . '</em> ';
}
if (trim($distinctrow['method']) == '') {
$distinctrow['method'] = '==';
}
if ($distinctrow['cqid']) {
// cqid != 0 ==> previous answer match
if ($distinctrow['method'] == '==') {
$sExplanation .= gT("Answer was") . " ";
} elseif ($distinctrow['method'] == '!=') {
$sExplanation .= gT("Answer was NOT") . " ";
} elseif ($distinctrow['method'] == '<') {
$sExplanation .= gT("Answer was less than") . " ";
} elseif ($distinctrow['method'] == '<=') {
$sExplanation .= gT("Answer was less than or equal to") . " ";
} elseif ($distinctrow['method'] == '>=') {
$sExplanation .= gT("Answer was greater than or equal to") . " ";
} elseif ($distinctrow['method'] == '>') {
$sExplanation .= gT("Answer was greater than") . " ";
} elseif ($distinctrow['method'] == 'RX') {
$sExplanation .= gT("Answer matched (regexp)") . " ";
} else {
$sExplanation .= gT("Answer was") . " ";
}
}
if (!$distinctrow['cqid']) {
// cqid == 0 ==> token attribute match
$tokenData = getTokenFieldsAndNames($surveyid);
preg_match('/^{TOKEN:([^}]*)}$/', $distinctrow['cfieldname'], $extractedTokenAttr);
$sExplanation .= "Your " . $tokenData[strtolower($extractedTokenAttr[1])]['description'] . " ";
if ($distinctrow['method'] == '==') {
$sExplanation .= gT("is") . " ";
} elseif ($distinctrow['method'] == '!=') {
$sExplanation .= gT("is NOT") . " ";
} elseif ($distinctrow['method'] == '<') {
$sExplanation .= gT("is less than") . " ";
} elseif ($distinctrow['method'] == '<=') {
$sExplanation .= gT("is less than or equal to") . " ";
} elseif ($distinctrow['method'] == '>=') {
$sExplanation .= gT("is greater than or equal to") . " ";
} elseif ($distinctrow['method'] == '>') {
$sExplanation .= gT("is greater than") . " ";
} elseif ($distinctrow['method'] == 'RX') {
$sExplanation .= gT("is matched (regexp)") . " ";
} else {
$sExplanation .= gT("is") . " ";
}
$answer_section = ' ' . $distinctrow['value'] . ' ';
}
$conresult = Condition::model()->getConditionsQuestions($distinctrow['cqid'], $deqrow['qid'], $scenariorow['scenario'], $sLanguageCode);
$conditions = array();
foreach ($conresult->readAll() as $conrow) {
$postans = "";
$value = $conrow['value'];
switch ($conrow['type']) {
case "Y":
switch ($conrow['value']) {
case "Y":
$conditions[] = gT("Yes");
break;
case "N":
$conditions[] = gT("No");
break;
}
break;
case "G":
switch ($conrow['value']) {
case "M":
$conditions[] = gT("Male");
break;
case "F":
$conditions[] = gT("Female");
break;
}
// switch
break;
case "A":
case "B":
case ":":
case ";":
case "5":
$conditions[] = $conrow['value'];
break;
case "C":
switch ($conrow['value']) {
case "Y":
$conditions[] = gT("Yes");
break;
case "U":
$conditions[] = gT("Uncertain");
break;
case "N":
$conditions[] = gT("No");
break;
}
// switch
break;
case "E":
switch ($conrow['value']) {
case "I":
$conditions[] = gT("Increase");
break;
case "D":
$conditions[] = gT("Decrease");
break;
case "S":
$conditions[] = gT("Same");
break;
}
case "1":
$labelIndex = preg_match("/^[^#]+#([01]{1})\$/", $conrow['cfieldname']);
if ($labelIndex == 0) {
// TIBO
$condition = "qid='{$conrow['cqid']}' AND code='{$conrow['value']}' AND scale_id=0 AND language='{$sLanguageCode}'";
$fresult = Answer::model()->getAllRecords($condition);
foreach ($fresult->readAll() as $frow) {
$postans = $frow['answer'];
$conditions[] = $frow['answer'];
}
// while
} elseif ($labelIndex == 1) {
$condition = "qid='{$conrow['cqid']}' AND code='{$conrow['value']}' AND scale_id=1 AND language='{$sLanguageCode}'";
$fresult = Answer::model()->getAllRecords($condition);
foreach ($fresult->readAll() as $frow) {
$postans = $frow['answer'];
$conditions[] = $frow['answer'];
}
// while
}
break;
case "L":
case "!":
case "O":
case "R":
$condition = "qid='{$conrow['cqid']}' AND code='{$conrow['value']}' AND language='{$sLanguageCode}'";
$ansresult = Answer::model()->findAll($condition);
foreach ($ansresult as $ansrow) {
$conditions[] = $ansrow['answer'];
}
if ($conrow['value'] == "-oth-") {
$conditions[] = gT("Other");
}
$conditions = array_unique($conditions);
break;
case "M":
case "P":
$condition = " parent_qid='{$conrow['cqid']}' AND title='{$conrow['value']}' AND language='{$sLanguageCode}'";
$ansresult = Question::model()->findAll($condition);
foreach ($ansresult as $ansrow) {
$conditions[] = $ansrow['question'];
}
$conditions = array_unique($conditions);
break;
case "N":
case "K":
$conditions[] = $value;
break;
case "F":
case "H":
default:
$value = substr($conrow['cfieldname'], strpos($conrow['cfieldname'], "X" . $conrow['cqid']) + strlen("X" . $conrow['cqid']), strlen($conrow['cfieldname']));
$condition = " qid='{$conrow['cqid']}' AND code='{$conrow['value']}' AND language='{$sLanguageCode}'";
$fresult = Answer::model()->getAllRecords($condition);
foreach ($fresult->readAll() as $frow) {
$postans = $frow['answer'];
$conditions[] = $frow['answer'];
}
// while
break;
}
// switch
// Now let's complete the answer text with the answer_section
$answer_section = "";
switch ($conrow['type']) {
case "A":
case "B":
case "C":
case "E":
case "F":
case "H":
case "K":
$thiscquestion = $fieldmap[$conrow['cfieldname']];
$condition = "parent_qid='{$conrow['cqid']}' AND title='{$thiscquestion['aid']}' AND language='{$sLanguageCode}'";
$ansresult = Question::model()->findAll($condition);
foreach ($ansresult as $ansrow) {
$answer_section = " (" . $ansrow['question'] . ")";
}
break;
case "1":
// dual: (Label 1), (Label 2)
$labelIndex = substr($conrow['cfieldname'], -1);
$thiscquestion = $fieldmap[$conrow['cfieldname']];
$condition = "parent_qid='{$conrow['cqid']}' AND title='{$thiscquestion['aid']}' AND language='{$sLanguageCode}'";
$ansresult = Question::model()->findAll($condition);
$cqidattributes = getQuestionAttributeValues($conrow['cqid']);
if ($labelIndex == 0) {
if (trim($cqidattributes['dualscale_headerA'][$sLanguageCode]) != '') {
$header = gT($cqidattributes['dualscale_headerA'][$sLanguageCode]);
} else {
$header = '1';
}
} elseif ($labelIndex == 1) {
if (trim($cqidattributes['dualscale_headerB'][$sLanguageCode]) != '') {
$header = gT($cqidattributes['dualscale_headerB'][$sLanguageCode]);
} else {
$header = '2';
}
}
foreach ($ansresult as $ansrow) {
$answer_section = " (" . $ansrow->question . " " . sprintf(gT("Label %s"), $header) . ")";
}
break;
case ":":
case ";":
//multi flexi: ( answer [label] )
$thiscquestion = $fieldmap[$conrow['cfieldname']];
$condition = "parent_qid='{$conrow['cqid']}' AND title='{$thiscquestion['aid']}' AND language='{$sLanguageCode}'";
$ansresult = Question::model()->findAll($condition);
foreach ($ansresult as $ansrow) {
$condition = "qid = '{$conrow['cqid']}' AND code = '{$conrow['value']}' AND language= '{$sLanguageCode}'";
$fresult = Answer::model()->findAll($condition);
foreach ($fresult as $frow) {
//$conditions[]=$frow['title'];
$answer_section = " (" . $ansrow->question . "[" . $frow['answer'] . "])";
}
// while
}
break;
case "R":
// (Rank 1), (Rank 2)... TIBO
$thiscquestion = $fieldmap[$conrow['cfieldname']];
$rankid = $thiscquestion['aid'];
$answer_section = " (" . gT("RANK") . " {$rankid})";
break;
default:
// nothing to add
break;
}
}
if (count($conditions) > 1) {
$sExplanation .= "'" . implode("' <em class='scenario-or-separator'>" . gT("or") . "</em> '", $conditions) . "'";
} elseif (count($conditions) == 1) {
$sExplanation .= "'" . $conditions[0] . "'";
}
unset($conditions);
// Following line commented out because answer_section was lost, but is required for some question types
//$explanation .= " ".gT("to question")." '".$mapquestionsNumbers[$distinctrow['cqid']]."' $answer_section ";
if ($distinctrow['cqid']) {
$sExplanation .= " <span class='scenario-at-separator'>" . gT("at question") . "</span> '" . $mapquestionsNumbers[$distinctrow['cqid']] . " [" . $subresult['title'] . "]' (" . strip_tags($subresult['question']) . "{$answer_section})";
} else {
$sExplanation .= " " . $distinctrow['value'];
}
//$distinctrow
$x++;
}
$s++;
}
$qinfo = LimeExpressionManager::GetQuestionStatus($deqrow['qid']);
$relevance = trim($qinfo['info']['relevance']);
$sEquation = $qinfo['relEqn'];
if (trim($relevance) != '' && trim($relevance) != '1') {
if (isset($qidattributes['printable_help'][$sLanguageCode]) && $qidattributes['printable_help'][$sLanguageCode] != '') {
$sExplanation = $qidattributes['printable_help'][$sLanguageCode];
} elseif ($sExplanation == '') {
$sExplanation = $sEquation;
$sEquation = ' ';
// No need to show it twice
}
$sExplanation = "<b>" . gT('Only answer this question if the following conditions are met:') . "</b><br/> " . $sExplanation;
if (Yii::app()->getConfig('showrelevance')) {
$sExplanation .= "<span class='printable_equation'><br>" . $sEquation . "</span>";
}
} else {
$sExplanation = '';
}
++$total_questions;
//TIBO map question qid to their q number
$mapquestionsNumbers[$deqrow['qid']] = $total_questions;
//END OF GETTING CONDITIONS
$qid = $deqrow['qid'];
$fieldname = "{$surveyid}" . "X" . "{$gid}" . "X" . "{$qid}";
if (isset($showsgqacode) && $showsgqacode == true) {
$deqrow['question'] = $deqrow['question'] . "<br />" . gT("ID:") . " {$fieldname} <br />" . gT("Question code:") . " " . $deqrow['title'];
}
$question = array('QUESTION_NUMBER' => $total_questions, 'QUESTION_CODE' => $deqrow['title'], 'QUESTION_TEXT' => preg_replace('/(?:<br ?\\/?>|<\\/(?:p|h[1-6])>)$/is', '', $deqrow['question']), 'QUESTION_SCENARIO' => $sExplanation, 'QUESTION_MANDATORY' => '', 'QUESTION_ID' => $deqrow['qid'], 'QUESTION_CLASS' => getQuestionClass($deqrow['type']), 'QUESTION_TYPE_HELP' => $qinfo['validTip'], 'QUESTION_MAN_MESSAGE' => '', 'QUESTION_VALID_MESSAGE' => '', 'QUESTION_FILE_VALID_MESSAGE' => '', 'QUESTIONHELP' => '', 'ANSWER' => '');
$showqnumcode = Yii::app()->getConfig('showqnumcode');
if ($showqnumcode == 'choose' && ($aSurveyInfo['showqnumcode'] == 'N' || $aSurveyInfo['showqnumcode'] == 'X') || $showqnumcode == 'number' || $showqnumcode == 'none') {
$question['QUESTION_CODE'] = '';
}
if ($showqnumcode == 'choose' && ($aSurveyInfo['showqnumcode'] == 'C' || $aSurveyInfo['showqnumcode'] == 'X') || $showqnumcode == 'code' || $showqnumcode == 'none') {
$question['QUESTION_NUMBER'] = '';
}
if ($question['QUESTION_TYPE_HELP'] != "") {
$question['QUESTION_TYPE_HELP'] .= "<br />\n";
}
if ($deqrow['mandatory'] == 'Y') {
$question['QUESTION_MANDATORY'] = gT('*');
$question['QUESTION_CLASS'] .= ' mandatory';
}
//DIFFERENT TYPES OF DATA FIELD HERE
if ($deqrow['help']) {
$question['QUESTIONHELP'] = $deqrow['help'];
}
if (!empty($qidattributes['page_break'])) {
$question['QUESTION_CLASS'] .= ' breakbefore ';
}
if (isset($qidattributes['maximum_chars']) && $qidattributes['maximum_chars'] != '') {
$question['QUESTION_CLASS'] = "max-chars-{$qidattributes['maximum_chars']} " . $question['QUESTION_CLASS'];
}
switch ($deqrow['type']) {
// ==================================================================
case "5":
//5 POINT CHOICE
$question['QUESTION_TYPE_HELP'] .= gT('Please choose *only one* of the following:');
$question['ANSWER'] .= "\n\t<ul>\n";
for ($i = 1; $i <= 5; $i++) {
$question['ANSWER'] .= "\t\t<li>\n\t\t\t" . self::_input_type_image('radio', $i) . "\n\t\t\t{$i} " . self::_addsgqacode("({$i})") . "\n\t\t</li>\n";
}
$question['ANSWER'] .= "\t</ul>\n";
break;
// ==================================================================
// ==================================================================
case "D":
//DATE
$question['QUESTION_TYPE_HELP'] .= gT('Please enter a date:');
$question['ANSWER'] .= "\t" . self::_input_type_image('text', $question['QUESTION_TYPE_HELP'], 30, 1);
break;
// ==================================================================
// ==================================================================
case "G":
//GENDER
$question['QUESTION_TYPE_HELP'] .= gT("Please choose *only one* of the following:");
$question['ANSWER'] .= "\n\t<ul>\n";
$question['ANSWER'] .= "\t\t<li>\n\t\t\t" . self::_input_type_image('radio', gT("Female")) . "\n\t\t\t" . gT("Female") . " " . self::_addsgqacode("(F)") . "\n\t\t</li>\n";
$question['ANSWER'] .= "\t\t<li>\n\t\t\t" . self::_input_type_image('radio', gT("Male")) . "\n\t\t\t" . gT("Male") . " " . self::_addsgqacode("(M)") . "\n\t\t</li>\n";
$question['ANSWER'] .= "\t</ul>\n";
break;
// ==================================================================
// ==================================================================
case "L":
//LIST drop-down/radio-button list
// ==================================================================
//LIST drop-down/radio-button list
// ==================================================================
case "!":
//List - dropdown
if (isset($qidattributes['display_columns']) && trim($qidattributes['display_columns']) != '') {
$dcols = $qidattributes['display_columns'];
} else {
$dcols = 0;
}
if (isset($qidattributes['category_separator']) && trim($qidattributes['category_separator']) != '') {
$optCategorySeparator = $qidattributes['category_separator'];
} else {
unset($optCategorySeparator);
}
$question['QUESTION_TYPE_HELP'] .= gT("Please choose *only one* of the following:");
$question['QUESTION_TYPE_HELP'] .= self::_array_filter_help($qidattributes, $sLanguageCode, $surveyid);
$dearesult = Answer::model()->getAllRecords(" qid='{$deqrow['qid']}' AND language='{$sLanguageCode}' ", array('sortorder', 'answer'));
$dearesult = $dearesult->readAll();
$deacount = count($dearesult);
if ($deqrow['other'] == "Y") {
$deacount++;
}
$wrapper = setupColumns(0, $deacount);
$question['ANSWER'] = $wrapper['whole-start'];
$rowcounter = 0;
$colcounter = 1;
foreach ($dearesult as $dearow) {
if (isset($optCategorySeparator)) {
list($category, $answer) = explode($optCategorySeparator, $dearow['answer']);
if ($category != '') {
$dearow['answer'] = "({$category}) {$answer} " . self::_addsgqacode("(" . $dearow['code'] . ")");
} else {
$dearow['answer'] = $answer . self::_addsgqacode(" (" . $dearow['code'] . ")");
}
$question['ANSWER'] .= "\t" . $wrapper['item-start'] . "\t\t" . self::_input_type_image('radio', $dearow['answer']) . "\n\t\t\t" . $dearow['answer'] . "\n" . $wrapper['item-end'];
} else {
$question['ANSWER'] .= "\t" . $wrapper['item-start'] . "\t\t" . self::_input_type_image('radio', $dearow['answer']) . "\n\t\t\t" . $dearow['answer'] . self::_addsgqacode(" (" . $dearow['code'] . ")") . "\n" . $wrapper['item-end'];
}
++$rowcounter;
if ($rowcounter == $wrapper['maxrows'] && $colcounter < $wrapper['cols']) {
if ($colcounter == $wrapper['cols'] - 1) {
$question['ANSWER'] .= $wrapper['col-devide-last'];
} else {
$question['ANSWER'] .= $wrapper['col-devide'];
}
$rowcounter = 0;
++$colcounter;
}
}
if ($deqrow['other'] == 'Y') {
if (trim($qidattributes["other_replace_text"][$sLanguageCode]) == '') {
$qidattributes["other_replace_text"][$sLanguageCode] = gT("Other");
}
// $printablesurveyoutput .="\t".$wrapper['item-start']."\t\t".self::_input_type_image('radio' , gT("Other"))."\n\t\t\t".gT("Other")."\n\t\t\t<input type='text' size='30' readonly='readonly' />\n".$wrapper['item-end'];
$question['ANSWER'] .= $wrapper['item-start-other'] . self::_input_type_image('radio', gT($qidattributes["other_replace_text"][$sLanguageCode])) . ' ' . gT($qidattributes["other_replace_text"][$sLanguageCode]) . self::_addsgqacode(" (-oth-)") . "\n\t\t\t" . self::_input_type_image('other') . self::_addsgqacode(" (" . $deqrow['sid'] . "X" . $deqrow['gid'] . "X" . $deqrow['qid'] . "other)") . "\n" . $wrapper['item-end'];
}
$question['ANSWER'] .= $wrapper['whole-end'];
//Let's break the presentation into columns.
break;
// ==================================================================
// ==================================================================
case "O":
//LIST WITH COMMENT
$question['QUESTION_TYPE_HELP'] .= gT("Please choose *only one* of the following:");
$dearesult = Answer::model()->getAllRecords(" qid='{$deqrow['qid']}' AND language='{$sLanguageCode}'", array('sortorder', 'answer'));
$question['ANSWER'] = "\t<ul>\n";
foreach ($dearesult->readAll() as $dearow) {
$question['ANSWER'] .= "\t\t<li>\n\t\t\t" . self::_input_type_image('radio', $dearow['answer']) . "\n\t\t\t" . $dearow['answer'] . self::_addsgqacode(" (" . $dearow['code'] . ")") . "\n\t\t</li>\n";
}
$question['ANSWER'] .= "\t</ul>\n";
$question['ANSWER'] .= "\t<p class=\"comment\">\n\t\t" . gT("Make a comment on your choice here:") . "\n";
$question['ANSWER'] .= "\t\t" . self::_input_type_image('textarea', gT("Make a comment on your choice here:"), 50, 8) . self::_addsgqacode(" (" . $deqrow['sid'] . "X" . $deqrow['gid'] . "X" . $deqrow['qid'] . "comment)") . "\n\t</p>\n";
break;
// ==================================================================
// ==================================================================
case "R":
//RANKING Type Question
$rearesult = Answer::model()->getAllRecords(" qid='{$deqrow['qid']}' AND language='{$sLanguageCode}'", array('sortorder', 'answer'));
$rearesult = $rearesult->readAll();
$reacount = count($rearesult);
$question['QUESTION_TYPE_HELP'] .= gT("Please number each box in order of preference from 1 to") . " {$reacount}";
$question['QUESTION_TYPE_HELP'] .= self::_min_max_answers_help($qidattributes, $sLanguageCode, $surveyid);
$question['ANSWER'] = "\n<ul>\n";
foreach ($rearesult as $rearow) {
$question['ANSWER'] .= "\t<li>\n\t" . self::_input_type_image('rank', '', 4, 1) . "\n\t\t " . $rearow['answer'] . self::_addsgqacode(" (" . $fieldname . $rearow['code'] . ")") . "\n\t</li>\n";
}
$question['ANSWER'] .= "\n</ul>\n";
break;
// ==================================================================
// ==================================================================
case "M":
//Multiple choice (Quite tricky really!)
if (trim($qidattributes['display_columns']) != '') {
$dcols = $qidattributes['display_columns'];
} else {
$dcols = 0;
}
$question['QUESTION_TYPE_HELP'] .= gT("Please choose *all* that apply:");
$question['QUESTION_TYPE_HELP'] .= self::_array_filter_help($qidattributes, $sLanguageCode, $surveyid);
$mearesult = Question::model()->getAllRecords(" parent_qid='{$deqrow['qid']}' AND language='{$sLanguageCode}' ", array('question_order'));
$mearesult = $mearesult->readAll();
$meacount = count($mearesult);
if ($deqrow['other'] == 'Y') {
$meacount++;
}
$wrapper = setupColumns($dcols, $meacount);
$question['ANSWER'] = $wrapper['whole-start'];
$rowcounter = 0;
$colcounter = 1;
foreach ($mearesult as $mearow) {
$question['ANSWER'] .= $wrapper['item-start'] . self::_input_type_image('checkbox', $mearow['question']) . "\n\t\t" . $mearow['question'] . self::_addsgqacode(" (" . $fieldname . $mearow['title'] . ") ") . $wrapper['item-end'];
++$rowcounter;
if ($rowcounter == $wrapper['maxrows'] && $colcounter < $wrapper['cols']) {
if ($colcounter == $wrapper['cols'] - 1) {
$question['ANSWER'] .= $wrapper['col-devide-last'];
} else {
$question['ANSWER'] .= $wrapper['col-devide'];
}
$rowcounter = 0;
++$colcounter;
}
}
if ($deqrow['other'] == "Y") {
if (trim($qidattributes['other_replace_text'][$sLanguageCode]) == '') {
$qidattributes["other_replace_text"][$sLanguageCode] = "Other";
}
if (!isset($mearow['answer'])) {
$mearow['answer'] = "";
}
$question['ANSWER'] .= $wrapper['item-start-other'] . self::_input_type_image('checkbox', $mearow['answer']) . gT($qidattributes["other_replace_text"][$sLanguageCode]) . ":\n\t\t" . self::_input_type_image('other') . self::_addsgqacode(" (" . $fieldname . "other) ") . $wrapper['item-end'];
}
$question['ANSWER'] .= $wrapper['whole-end'];
// }
break;
// ==================================================================
// ==================================================================
case "P":
//Multiple choice with comments
$question['QUESTION_TYPE_HELP'] .= gT("Please choose all that apply and provide a comment:");
$question['QUESTION_TYPE_HELP'] .= self::_array_filter_help($qidattributes, $sLanguageCode, $surveyid);
$mearesult = Question::model()->getAllRecords("parent_qid='{$deqrow['qid']}' AND language='{$sLanguageCode}'", array('question_order'));
// $printablesurveyoutput .="\t\t\t<u>".gT("Please choose all that apply and provide a comment:")."</u><br />\n";
$j = 0;
$longest_string = 0;
foreach ($mearesult->readAll() as $mearow) {
$longest_string = longestString($mearow['question'], $longest_string);
$question['ANSWER'] .= "\t<li><span>\n\t\t" . self::_input_type_image('checkbox', $mearow['question']) . $mearow['question'] . self::_addsgqacode(" (" . $fieldname . $mearow['title'] . ") ") . "</span>\n\t\t" . self::_input_type_image('text', 'comment box', 60) . self::_addsgqacode(" (" . $fieldname . $mearow['title'] . "comment) ") . "\n\t</li>\n";
$j++;
}
if ($deqrow['other'] == "Y") {
$question['ANSWER'] .= "\t<li class=\"other\">\n\t\t<div class=\"other-replacetext\">" . gT('Other:') . self::_input_type_image('other', '', 1) . "</div>" . self::_input_type_image('othercomment', 'comment box', 50) . self::_addsgqacode(" (" . $fieldname . "other) ") . "\n\t</li>\n";
$j++;
}
$question['ANSWER'] = "\n<ul>\n" . $question['ANSWER'] . "</ul>\n";
break;
// ==================================================================
// ==================================================================
case "Q":
//MULTIPLE SHORT TEXT
$width = 60;
// ==================================================================
// ==================================================================
case "K":
//MULTIPLE NUMERICAL
$question['QUESTION_TYPE_HELP'] = "";
$width = isset($width) ? $width : 16;
// if (!empty($qidattributes['equals_num_value']))
// {
// $question['QUESTION_TYPE_HELP'] .= "* ".sprintf(gT('Total of all entries must equal %d'),$qidattributes['equals_num_value'])."<br />\n";
// }
// if (!empty($qidattributes['max_num_value']))
// {
// $question['QUESTION_TYPE_HELP'] .= sprintf(gT('Total of all entries must not exceed %d'), $qidattributes['max_num_value'])."<br />\n";
// }
// if (!empty($qidattributes['min_num_value']))
// {
// $question['QUESTION_TYPE_HELP'] .= sprintf(gT('Total of all entries must be at least %s'),$qidattributes['min_num_value'])."<br />\n";
// }
$question['QUESTION_TYPE_HELP'] .= gT("Please write your answer(s) here:");
$longest_string = 0;
$mearesult = Question::model()->getAllRecords("parent_qid='{$deqrow['qid']}' AND language='{$sLanguageCode}'", array('question_order'));
foreach ($mearesult->readAll() as $mearow) {
$longest_string = longestString($mearow['question'], $longest_string);
if (isset($qidattributes['slider_layout']) && $qidattributes['slider_layout'] == 1) {
$mearow['question'] = explode(':', $mearow['question']);
$mearow['question'] = $mearow['question'][0];
}
$question['ANSWER'] .= "\t<li>\n\t\t<span>" . $mearow['question'] . "</span>\n\t\t" . self::_input_type_image('text', $mearow['question'], $width) . self::_addsgqacode(" (" . $fieldname . $mearow['title'] . ") ") . "\n\t</li>\n";
}
$question['ANSWER'] = "\n<ul>\n" . $question['ANSWER'] . "</ul>\n";
break;
// ==================================================================
// ==================================================================
case "S":
//SHORT TEXT
$question['QUESTION_TYPE_HELP'] .= gT("Please write your answer here:");
$question['ANSWER'] = self::_input_type_image('text', $question['QUESTION_TYPE_HELP'], 50);
break;
// ==================================================================
// ==================================================================
case "T":
//LONG TEXT
$question['QUESTION_TYPE_HELP'] .= gT("Please write your answer here:");
$question['ANSWER'] = self::_input_type_image('textarea', $question['QUESTION_TYPE_HELP'], '100%', 8);
break;
// ==================================================================
// ==================================================================
case "U":
//HUGE TEXT
$question['QUESTION_TYPE_HELP'] .= gT("Please write your answer here:");
$question['ANSWER'] = self::_input_type_image('textarea', $question['QUESTION_TYPE_HELP'], '100%', 30);
break;
// ==================================================================
// ==================================================================
case "N":
//NUMERICAL
$prefix = "";
$suffix = "";
if ($qidattributes['prefix'][$sLanguageCode] != "") {
$prefix = $qidattributes['prefix'][$sLanguageCode];
}
if ($qidattributes['suffix'][$sLanguageCode] != "") {
$suffix = $qidattributes['suffix'][$sLanguageCode];
}
$question['QUESTION_TYPE_HELP'] .= gT("Please write your answer here:");
$question['ANSWER'] = "<ul>\n\t<li>\n\t\t<span>{$prefix}</span>\n\t\t" . self::_input_type_image('text', $question['QUESTION_TYPE_HELP'], 20) . "\n\t\t<span>{$suffix}</span>\n\t\t</li>\n\t</ul>";
break;
// ==================================================================
// ==================================================================
case "Y":
//YES/NO
$question['QUESTION_TYPE_HELP'] .= gT("Please choose *only one* of the following:");
$question['ANSWER'] = "\n<ul>\n\t<li>\n\t\t" . self::_input_type_image('radio', gT('Yes')) . "\n\t\t" . gT('Yes') . self::_addsgqacode(" (Y)") . "\n\t</li>\n";
$question['ANSWER'] .= "\n\t<li>\n\t\t" . self::_input_type_image('radio', gT('No')) . "\n\t\t" . gT('No') . self::_addsgqacode(" (N)") . "\n\t</li>\n</ul>\n";
break;
// ==================================================================
// ==================================================================
case "A":
//ARRAY (5 POINT CHOICE)
$condition = "parent_qid = '{$deqrow['qid']}' AND language= '{$sLanguageCode}'";
$question['QUESTION_TYPE_HELP'] .= gT("Please choose the appropriate response for each item:");
$question['QUESTION_TYPE_HELP'] .= self::_array_filter_help($qidattributes, $sLanguageCode, $surveyid);
$question['ANSWER'] = "\n <table>\n <thead>\n <tr>\n <td> </td>\n <th style='font-family:Arial,helvetica,sans-serif;font-weight:normal;'>1 " . self::_addsgqacode(" (1)") . "</th>\n <th style='font-family:Arial,helvetica,sans-serif;font-weight:normal;'>2 " . self::_addsgqacode(" (2)") . "</th>\n <th style='font-family:Arial,helvetica,sans-serif;font-weight:normal;'>3 " . self::_addsgqacode(" (3)") . "</th>\n <th style='font-family:Arial,helvetica,sans-serif;font-weight:normal;'>4 " . self::_addsgqacode(" (4)") . "</th>\n <th style='font-family:Arial,helvetica,sans-serif;font-weight:normal;'>5" . self::_addsgqacode(" (5)") . "</th>\n </tr>\n </thead>\n <tbody>";
$j = 0;
$rowclass = 'array1';
$mearesult = Question::model()->getAllRecords($condition, array('question_order'));
foreach ($mearesult->readAll() as $mearow) {
$question['ANSWER'] .= "\t\t<tr class=\"{$rowclass}\">\n";
$rowclass = alternation($rowclass, 'row');
//semantic differential question type?
if (strpos($mearow['question'], '|')) {
$answertext = substr($mearow['question'], 0, strpos($mearow['question'], '|')) . self::_addsgqacode(" (" . $fieldname . $mearow['title'] . ")") . " ";
} else {
$answertext = $mearow['question'] . self::_addsgqacode(" (" . $fieldname . $mearow['title'] . ")");
}
$question['ANSWER'] .= "\t\t\t<th class=\"answertext\">{$answertext}</th>\n";
for ($i = 1; $i <= 5; $i++) {
$question['ANSWER'] .= "\t\t\t<td>" . self::_input_type_image('radio', $i) . "</td>\n";
}
$answertext .= $mearow['question'];
//semantic differential question type?
if (strpos($mearow['question'], '|')) {
$answertext2 = substr($mearow['question'], strpos($mearow['question'], '|') + 1);
$question['ANSWER'] .= "\t\t\t<th class=\"answertextright\">{$answertext2}</td>\n";
}
$question['ANSWER'] .= "\t\t</tr>\n";
$j++;
}
$question['ANSWER'] .= "\t</tbody>\n</table>\n";
break;
// ==================================================================
// ==================================================================
case "B":
//ARRAY (10 POINT CHOICE)
$question['QUESTION_TYPE_HELP'] .= gT("Please choose the appropriate response for each item:");
$question['QUESTION_TYPE_HELP'] .= self::_array_filter_help($qidattributes, $sLanguageCode, $surveyid);
$question['ANSWER'] .= "\n<table>\n\t<thead>\n\t\t<tr>\n\t\t\t<td> </td>\n";
for ($i = 1; $i <= 10; $i++) {
$question['ANSWER'] .= "\t\t\t<th>{$i}" . self::_addsgqacode(" ({$i})") . "</th>\n";
}
$question['ANSWER'] .= "\t</thead>\n\n\t<tbody>\n";
$j = 0;
$rowclass = 'array1';
$mearesult = Question::model()->getAllRecords(" parent_qid='{$deqrow['qid']}' AND language='{$sLanguageCode}' ", array('question_order'));
foreach ($mearesult->readAll() as $mearow) {
$question['ANSWER'] .= "\t\t<tr class=\"{$rowclass}\">\n\t\t\t<th class=\"answertext\">{$mearow['question']}" . self::_addsgqacode(" (" . $fieldname . $mearow['title'] . ")") . "</th>\n";
$rowclass = alternation($rowclass, 'row');
for ($i = 1; $i <= 10; $i++) {
$question['ANSWER'] .= "\t\t\t<td>" . self::_input_type_image('radio', $i) . "</td>\n";
}
$question['ANSWER'] .= "\t\t</tr>\n";
$j++;
}
$question['ANSWER'] .= "\t</tbody>\n</table>\n";
break;
// ==================================================================
// ==================================================================
case "C":
//ARRAY (YES/UNCERTAIN/NO)
$question['QUESTION_TYPE_HELP'] .= gT("Please choose the appropriate response for each item:");
$question['QUESTION_TYPE_HELP'] .= self::_array_filter_help($qidattributes, $sLanguageCode, $surveyid);
$question['ANSWER'] = '
<table>
<thead>
<tr>
<td> </td>
<th>' . gT("Yes") . self::_addsgqacode(" (Y)") . '</th>
<th>' . gT("Uncertain") . self::_addsgqacode(" (U)") . '</th>
<th>' . gT("No") . self::_addsgqacode(" (N)") . '</th>
</tr>
</thead>
<tbody>
';
$j = 0;
$rowclass = 'array1';
$mearesult = Question::model()->getAllRecords(" parent_qid='{$deqrow['qid']}' AND language='{$sLanguageCode}' ", array('question_order'));
foreach ($mearesult->readAll() as $mearow) {
$question['ANSWER'] .= "\t\t<tr class=\"{$rowclass}\">\n";
$question['ANSWER'] .= "\t\t\t<th class=\"answertext\">{$mearow['question']}" . self::_addsgqacode(" (" . $fieldname . $mearow['title'] . ")") . "</th>\n";
$question['ANSWER'] .= "\t\t\t<td>" . self::_input_type_image('radio', gT("Yes")) . "</td>\n";
$question['ANSWER'] .= "\t\t\t<td>" . self::_input_type_image('radio', gT("Uncertain")) . "</td>\n";
$question['ANSWER'] .= "\t\t\t<td>" . self::_input_type_image('radio', gT("No")) . "</td>\n";
$question['ANSWER'] .= "\t\t</tr>\n";
$j++;
$rowclass = alternation($rowclass, 'row');
}
$question['ANSWER'] .= "\t</tbody>\n</table>\n";
break;
case "E":
//ARRAY (Increase/Same/Decrease)
$question['QUESTION_TYPE_HELP'] .= gT("Please choose the appropriate response for each item:");
$question['QUESTION_TYPE_HELP'] .= self::_array_filter_help($qidattributes, $sLanguageCode, $surveyid);
$question['ANSWER'] = '
<table>
<thead>
<tr>
<td> </td>
<th>' . gT("Increase") . self::_addsgqacode(" (I)") . '</th>
<th>' . gT("Same") . self::_addsgqacode(" (S)") . '</th>
<th>' . gT("Decrease") . self::_addsgqacode(" (D)") . '</th>
</tr>
</thead>
<tbody>
';
$j = 0;
$rowclass = 'array1';
$mearesult = Question::model()->getAllRecords(" parent_qid='{$deqrow['qid']}' AND language='{$sLanguageCode}' ", array('question_order'));
foreach ($mearesult->readAll() as $mearow) {
$question['ANSWER'] .= "\t\t<tr class=\"{$rowclass}\">\n";
$question['ANSWER'] .= "\t\t\t<th class=\"answertext\">{$mearow['question']}" . self::_addsgqacode(" (" . $fieldname . $mearow['title'] . ")") . "</th>\n";
$question['ANSWER'] .= "\t\t\t<td>" . self::_input_type_image('radio', gT("Increase")) . "</td>\n";
$question['ANSWER'] .= "\t\t\t<td>" . self::_input_type_image('radio', gT("Same")) . "</td>\n";
$question['ANSWER'] .= "\t\t\t<td>" . self::_input_type_image('radio', gT("Decrease")) . "</td>\n";
$question['ANSWER'] .= "\t\t</tr>\n";
$j++;
$rowclass = alternation($rowclass, 'row');
}
$question['ANSWER'] .= "\t</tbody>\n</table>\n";
break;
// ==================================================================
// ==================================================================
case ":":
//ARRAY (Multi Flexible) (Numbers)
$headstyle = "style='padding-left: 20px; padding-right: 7px'";
if (trim($qidattributes['multiflexible_max']) != '' && trim($qidattributes['multiflexible_min']) == '') {
$maxvalue = $qidattributes['multiflexible_max'];
$minvalue = 1;
}
if (trim($qidattributes['multiflexible_min']) != '' && trim($qidattributes['multiflexible_max']) == '') {
$minvalue = $qidattributes['multiflexible_min'];
$maxvalue = $qidattributes['multiflexible_min'] + 10;
}
if (trim($qidattributes['multiflexible_min']) == '' && trim($qidattributes['multiflexible_max']) == '') {
$minvalue = 1;
$maxvalue = 10;
}
if (trim($qidattributes['multiflexible_min']) != '' && trim($qidattributes['multiflexible_max']) != '') {
if ($qidattributes['multiflexible_min'] < $qidattributes['multiflexible_max']) {
$minvalue = $qidattributes['multiflexible_min'];
$maxvalue = $qidattributes['multiflexible_max'];
}
}
if (trim($qidattributes['multiflexible_step']) != '') {
$stepvalue = $qidattributes['multiflexible_step'];
} else {
$stepvalue = 1;
}
if ($qidattributes['multiflexible_checkbox'] != 0) {
$checkboxlayout = true;
} else {
$checkboxlayout = false;
}
$question['QUESTION_TYPE_HELP'] .= self::_array_filter_help($qidattributes, $sLanguageCode, $surveyid);
$question['ANSWER'] .= "\n<table>\n\t<thead>\n\t\t<tr>\n\t\t\t<td> </td>\n";
$fresult = Question::model()->getAllRecords(" parent_qid='{$deqrow['qid']}' and scale_id=1 AND language='{$sLanguageCode}' ", array('question_order'));
$fresult = $fresult->readAll();
$fcount = count($fresult);
$fwidth = "120";
$i = 0;
//array to temporary store X axis question codes
$xaxisarray = array();
foreach ($fresult as $frow) {
$question['ANSWER'] .= "\t\t\t<th>{$frow['question']}</th>\n";
$i++;
//add current question code
$xaxisarray[$i] = $frow['title'];
}
$question['ANSWER'] .= "\t\t</tr>\n\t</thead>\n\n\t<tbody>\n";
$a = 1;
//Counter for pdfoutput
$rowclass = 'array1';
$mearesult = Question::model()->getAllRecords(" parent_qid='{$deqrow['qid']}' and scale_id=0 AND language='{$sLanguageCode}' ", array('question_order'));
$result = $mearesult->readAll();
foreach ($result as $frow) {
$question['ANSWER'] .= "\t<tr class=\"{$rowclass}\">\n";
$rowclass = alternation($rowclass, 'row');
$answertext = $frow['question'];
if (strpos($answertext, '|')) {
$answertext = substr($answertext, 0, strpos($answertext, '|'));
}
$question['ANSWER'] .= "\t\t\t\t\t<th class=\"answertext\">{$answertext}</th>\n";
//$printablesurveyoutput .="\t\t\t\t\t<td>";
for ($i = 1; $i <= $fcount; $i++) {
$question['ANSWER'] .= "\t\t\t<td>\n";
if ($checkboxlayout === false) {
$question['ANSWER'] .= "\t\t\t\t" . self::_input_type_image('text', '', 4) . self::_addsgqacode(" (" . $fieldname . $frow['title'] . "_" . $xaxisarray[$i] . ") ") . "\n";
} else {
$question['ANSWER'] .= "\t\t\t\t" . self::_input_type_image('checkbox') . self::_addsgqacode(" (" . $fieldname . $frow['title'] . "_" . $xaxisarray[$i] . ") ") . "\n";
}
$question['ANSWER'] .= "\t\t\t</td>\n";
}
$answertext = $frow['question'];
if (strpos($answertext, '|')) {
$answertext = substr($answertext, strpos($answertext, '|') + 1);
$question['ANSWER'] .= "\t\t\t<th class=\"answertextright\">{$answertext}</th>\n";
}
$question['ANSWER'] .= "\t\t</tr>\n";
$a++;
}
$question['ANSWER'] .= "\t</tbody>\n</table>\n";
break;
// ==================================================================
// ==================================================================
case ";":
//ARRAY (Multi Flexible) (text)
$headstyle = "style='padding-left: 20px; padding-right: 7px'";
$mearesult = Question::model()->getAllRecords(" parent_qid='{$deqrow['qid']}' AND scale_id=0 AND language='{$sLanguageCode}' ", array('question_order'));
$mearesult = $mearesult->readAll();
$question['QUESTION_TYPE_HELP'] .= self::_array_filter_help($qidattributes, $sLanguageCode, $surveyid);
$question['ANSWER'] .= "\n<table>\n\t<thead>\n\t\t<tr>\n\t\t\t<td> </td>\n";
$fresult = Question::model()->getAllRecords(" parent_qid='{$deqrow['qid']}' AND scale_id=1 AND language='{$sLanguageCode}' ", array('question_order'));
$fresult = $fresult->readAll();
$fcount = count($fresult);
$fwidth = "120";
$i = 0;
//array to temporary store X axis question codes
$xaxisarray = array();
foreach ($fresult as $frow) {
$question['ANSWER'] .= "\t\t\t<th>{$frow['question']}</th>\n";
$i++;
//add current question code
$xaxisarray[$i] = $frow['title'];
}
$question['ANSWER'] .= "\t\t</tr>\n\t</thead>\n\n<tbody>\n";
$a = 1;
$rowclass = 'array1';
foreach ($mearesult as $mearow) {
$question['ANSWER'] .= "\t\t<tr class=\"{$rowclass}\">\n";
$rowclass = alternation($rowclass, 'row');
$answertext = $mearow['question'];
if (strpos($answertext, '|')) {
$answertext = substr($answertext, 0, strpos($answertext, '|'));
}
$question['ANSWER'] .= "\t\t\t<th class=\"answertext\">{$answertext}</th>\n";
for ($i = 1; $i <= $fcount; $i++) {
$question['ANSWER'] .= "\t\t\t<td>\n";
$question['ANSWER'] .= "\t\t\t\t" . self::_input_type_image('text', '', 23) . self::_addsgqacode(" (" . $fieldname . $mearow['title'] . "_" . $xaxisarray[$i] . ") ") . "\n";
$question['ANSWER'] .= "\t\t\t</td>\n";
}
$answertext = $mearow['question'];
if (strpos($answertext, '|')) {
$answertext = substr($answertext, strpos($answertext, '|') + 1);
$question['ANSWER'] .= "\t\t\t\t<th class=\"answertextright\">{$answertext}</th>\n";
}
$question['ANSWER'] .= "\t\t</tr>\n";
$a++;
}
$question['ANSWER'] .= "\t</tbody>\n</table>\n";
break;
// ==================================================================
// ==================================================================
case "F":
//ARRAY (Flexible Labels)
$question['QUESTION_TYPE_HELP'] .= gT("Please choose the appropriate response for each item:");
$question['QUESTION_TYPE_HELP'] .= self::_array_filter_help($qidattributes, $sLanguageCode, $surveyid);
$fresult = Answer::model()->getAllRecords(" scale_id=0 AND qid='{$deqrow['qid']}' AND language='{$sLanguageCode}'", array('sortorder', 'code'));
$fresult = $fresult->readAll();
$fcount = count($fresult);
$fwidth = "120";
$i = 1;
$column_headings = array();
foreach ($fresult as $frow) {
$column_headings[] = $frow['answer'] . self::_addsgqacode(" (" . $frow['code'] . ")");
}
if (trim($qidattributes['answer_width']) != '') {
$iAnswerWidth = 100 - $qidattributes['answer_width'];
} else {
$iAnswerWidth = 80;
}
if (count($column_headings) > 0) {
$col_width = round($iAnswerWidth / count($column_headings));
} else {
$heading = '';
}
$question['ANSWER'] .= "\n<table>\n\t<thead>\n\t\t<tr>\n";
$question['ANSWER'] .= "\t\t\t<td> </td>\n";
foreach ($column_headings as $heading) {
$question['ANSWER'] .= "\t\t\t<th style=\"width:{$col_width}%;\">{$heading}</th>\n";
}
$i++;
$question['ANSWER'] .= "\t\t</tr>\n\t</thead>\n\n\t<tbody>\n";
$counter = 1;
$rowclass = 'array1';
$mearesult = Question::model()->getAllRecords(" parent_qid='{$deqrow['qid']}' AND language='{$sLanguageCode}' ", array('question_order'));
foreach ($mearesult->readAll() as $mearow) {
$question['ANSWER'] .= "\t\t<tr class=\"{$rowclass}\">\n";
$rowclass = alternation($rowclass, 'row');
if (trim($answertext) == '') {
$answertext = ' ';
}
//semantic differential question type?
if (strpos($mearow['question'], '|')) {
$answertext = substr($mearow['question'], 0, strpos($mearow['question'], '|')) . self::_addsgqacode(" (" . $fieldname . $mearow['title'] . ")") . " ";
} else {
$answertext = $mearow['question'] . self::_addsgqacode(" (" . $fieldname . $mearow['title'] . ")");
}
if (trim($qidattributes['answer_width']) != '') {
$sInsertStyle = ' style="width:' . $qidattributes['answer_width'] . '%" ';
} else {
$sInsertStyle = '';
}
$question['ANSWER'] .= "\t\t\t<th {$sInsertStyle} class=\"answertext\">{$answertext}</th>\n";
for ($i = 1; $i <= $fcount; $i++) {
$question['ANSWER'] .= "\t\t\t<td>" . self::_input_type_image('radio') . "</td>\n";
}
$counter++;
$answertext = $mearow['question'];
//semantic differential question type?
if (strpos($mearow['question'], '|')) {
$answertext2 = substr($mearow['question'], strpos($mearow['question'], '|') + 1);
$question['ANSWER'] .= "\t\t\t<th class=\"answertextright\">{$answertext2}</th>\n";
}
$question['ANSWER'] .= "\t\t</tr>\n";
}
$question['ANSWER'] .= "\t</tbody>\n</table>\n";
break;
// ==================================================================
// ==================================================================
case "1":
//ARRAY (Flexible Labels) multi scale
$leftheader = $qidattributes['dualscale_headerA'][$sLanguageCode];
$rightheader = $qidattributes['dualscale_headerB'][$sLanguageCode];
$headstyle = 'style="padding-left: 20px; padding-right: 7px"';
$question['QUESTION_TYPE_HELP'] .= gT("Please choose the appropriate response for each item:");
$question['QUESTION_TYPE_HELP'] .= self::_array_filter_help($qidattributes, $sLanguageCode, $surveyid);
$question['ANSWER'] .= "\n<table>\n\t<thead>\n";
$condition = "qid= '{$deqrow['qid']}' AND language= '{$sLanguageCode}' AND scale_id=0";
$fresult = Answer::model()->getAllRecords($condition, array('sortorder', 'code'));
$fresult = $fresult->readAll();
$fcount = count($fresult);
$fwidth = "120";
$l1 = 0;
$printablesurveyoutput2 = "\t\t\t<td> </td>\n";
$myheader2 = '';
foreach ($fresult as $frow) {
$printablesurveyoutput2 .= "\t\t\t<th>{$frow['answer']}" . self::_addsgqacode(" (" . $frow['code'] . ")") . "</th>\n";
$myheader2 .= "<td></td>";
$l1++;
}
// second scale
$printablesurveyoutput2 .= "\t\t\t<td> </td>\n";
//$fquery1 = "SELECT * FROM {{answers}} WHERE qid='{$deqrow['qid']}' AND language='{$sLanguageCode}' AND scale_id=1 ORDER BY sortorder, code";
// $fresult1 = Yii::app()->db->createCommand($fquery1)->query();
$fresult1 = Answer::model()->getAllRecords(" qid='{$deqrow['qid']}' AND language='{$sLanguageCode}' AND scale_id=1 ", array('sortorder', 'code'));
$fresult1 = $fresult1->readAll();
$fcount1 = count($fresult1);
$fwidth = "120";
$l2 = 0;
//array to temporary store second scale question codes
$scale2array = array();
foreach ($fresult1 as $frow1) {
$printablesurveyoutput2 .= "\t\t\t<th>{$frow1['answer']}" . self::_addsgqacode(" (" . $frow1['code'] . ")") . "</th>\n";
//add current question code
$scale2array[$l2] = $frow1['code'];
$l2++;
}
// build header if needed
if ($leftheader != '' || $rightheader != '') {
$myheader = "\t\t\t<td> </td>";
$myheader .= "\t\t\t<th colspan=\"" . $l1 . "\">{$leftheader}</th>\n";
if ($rightheader != '') {
// $myheader .= "\t\t\t\t\t" .$myheader2;
$myheader .= "\t\t\t<td> </td>";
$myheader .= "\t\t\t<th colspan=\"" . $l2 . "\">{$rightheader}</td>\n";
}
$myheader .= "\t\t\t\t</tr>\n";
} else {
$myheader = '';
}
$question['ANSWER'] .= $myheader . "\t\t</tr>\n\n\t\t<tr>\n";
$question['ANSWER'] .= $printablesurveyoutput2;
$question['ANSWER'] .= "\t\t</tr>\n\t</thead>\n\n\t<tbody>\n";
$rowclass = 'array1';
//counter for each subquestion
$sqcounter = 0;
$mearesult = Question::model()->getAllRecords(" parent_qid={$deqrow['qid']} AND language='{$sLanguageCode}' ", array('question_order'));
foreach ($mearesult->readAll() as $mearow) {
$question['ANSWER'] .= "\t\t<tr class=\"{$rowclass}\">\n";
$rowclass = alternation($rowclass, 'row');
$answertext = $mearow['question'] . self::_addsgqacode(" (" . $fieldname . $mearow['title'] . "#0) / (" . $fieldname . $mearow['title'] . "#1)");
if (strpos($answertext, '|')) {
$answertext = substr($answertext, 0, strpos($answertext, '|'));
}
$question['ANSWER'] .= "\t\t\t<th class=\"answertext\">{$answertext}</th>\n";
for ($i = 1; $i <= $fcount; $i++) {
$question['ANSWER'] .= "\t\t\t<td>" . self::_input_type_image('radio') . "</td>\n";
}
$question['ANSWER'] .= "\t\t\t<td> </td>\n";
for ($i = 1; $i <= $fcount1; $i++) {
$question['ANSWER'] .= "\t\t\t<td>" . self::_input_type_image('radio') . "</td>\n";
}
$answertext = $mearow['question'];
if (strpos($answertext, '|')) {
$answertext = substr($answertext, strpos($answertext, '|') + 1);
$question['ANSWER'] .= "\t\t\t<th class=\"answertextright\">{$answertext}</th>\n";
}
$question['ANSWER'] .= "\t\t</tr>\n";
//increase subquestion counter
$sqcounter++;
}
$question['ANSWER'] .= "\t</tbody>\n</table>\n";
break;
// ==================================================================
// ==================================================================
case "H":
//ARRAY (Flexible Labels) by Column
//$headstyle="style='border-left-style: solid; border-left-width: 1px; border-left-color: #AAAAAA'";
$headstyle = "style='padding-left: 20px; padding-right: 7px'";
$condition = "parent_qid= '{$deqrow['qid']}' AND language= '{$sLanguageCode}'";
$fresult = Question::model()->getAllRecords($condition, array('question_order', 'title'));
$fresult = $fresult->readAll();
$question['QUESTION_TYPE_HELP'] .= gT("Please choose the appropriate response for each item:");
$question['ANSWER'] .= "\n<table>\n\t<thead>\n\t\t<tr>\n\t\t\t<td> </td>\n";
$fcount = count($fresult);
$fwidth = "120";
$i = 0;
foreach ($fresult as $frow) {
$question['ANSWER'] .= "\t\t\t<th>{$frow['question']}" . self::_addsgqacode(" (" . $fieldname . $frow['title'] . ")") . "</th>\n";
$i++;
}
$question['ANSWER'] .= "\t\t</tr>\n\t</thead>\n\n\t<tbody>\n";
$a = 1;
$rowclass = 'array1';
$mearesult = Answer::model()->getAllRecords(" qid='{$deqrow['qid']}' AND scale_id=0 AND language='{$sLanguageCode}' ", array('sortorder', 'code'));
foreach ($mearesult->readAll() as $mearow) {
//$_POST['type']=$type;
$question['ANSWER'] .= "\t\t<tr class=\"{$rowclass}\">\n";
$rowclass = alternation($rowclass, 'row');
$question['ANSWER'] .= "\t\t\t<th class=\"answertext\">{$mearow['answer']}" . self::_addsgqacode(" (" . $mearow['code'] . ")") . "</th>\n";
//$printablesurveyoutput .="\t\t\t\t\t<td>";
for ($i = 1; $i <= $fcount; $i++) {
$question['ANSWER'] .= "\t\t\t<td>" . self::_input_type_image('radio') . "</td>\n";
}
//$printablesurveyoutput .="\t\t\t\t\t</tr></table></td>\n";
$question['ANSWER'] .= "\t\t</tr>\n";
$a++;
}
$question['ANSWER'] .= "\t</tbody>\n</table>\n";
break;
case "|":
// File Upload
$question['QUESTION_TYPE_HELP'] .= "Kindly attach the aforementioned documents along with the survey";
break;
// === END SWITCH ===================================================
}
$question['QUESTION_TYPE_HELP'] = self::_star_replace($question['QUESTION_TYPE_HELP']);
$group['QUESTIONS'] .= self::_populate_template('question', $question);
}
if ($bGroupHasVisibleQuestions) {
$survey_output['GROUPS'] .= self::_populate_template('group', $group);
}
}
$survey_output['THEREAREXQUESTIONS'] = str_replace('{NUMBEROFQUESTIONS}', $total_questions, gT('There are {NUMBEROFQUESTIONS} questions in this survey'));
// START recursive tag stripping.
// PHP 5.1.0 introduced the count parameter for preg_replace() and thus allows this procedure to run with only one regular expression.
// Previous version of PHP needs two regular expressions to do the same thing and thus will run a bit slower.
$server_is_newer = version_compare(PHP_VERSION, '5.1.0', '>');
$rounds = 0;
while ($rounds < 1) {
$replace_count = 0;
if ($server_is_newer) {
$survey_output['GROUPS'] = preg_replace(array('/<td>(?: | | )?<\\/td>/isU', '/<th[^>]*>(?: | | )?<\\/th>/isU', '/<([^ >]+)[^>]*>(?: | |\\r\\n|\\n\\r|\\n|\\r|\\t| )*<\\/\\1>/isU'), array('[[EMPTY-TABLE-CELL]]', '[[EMPTY-TABLE-CELL-HEADER]]', ''), $survey_output['GROUPS'], -1, $replace_count);
} else {
$survey_output['GROUPS'] = preg_replace(array('/<td>(?: | | )?<\\/td>/isU', '/<th[^>]*>(?: | | )?<\\/th>/isU', '/<([^ >]+)[^>]*>(?: | |\\r\\n|\\n\\r|\\n|\\r|\\t| )*<\\/\\1>/isU'), array('[[EMPTY-TABLE-CELL]]', '[[EMPTY-TABLE-CELL-HEADER]]', ''), $survey_output['GROUPS']);
$replace_count = preg_match('/<([^ >]+)[^>]*>(?: | |\\r\\n|\\n\\r|\\n|\\r|\\t| )*<\\/\\1>/isU', $survey_output['GROUPS']);
}
if ($replace_count == 0) {
++$rounds;
$survey_output['GROUPS'] = preg_replace(array('/\\[\\[EMPTY-TABLE-CELL\\]\\]/', '/\\[\\[EMPTY-TABLE-CELL-HEADER\\]\\]/', '/\\n(?:\\t*\\n)+/'), array('<td> </td>', '<th> </th>', "\n"), $survey_output['GROUPS']);
}
}
$survey_output['GROUPS'] = preg_replace('/(<div[^>]*>){NOTEMPTY}(<\\/div>)/', '\\1 \\2', $survey_output['GROUPS']);
// END recursive empty tag stripping.
echo self::_populate_template('survey', $survey_output);
}
// End print
}
$clang->eT("Full template editor (default)");
?>
</option>
<option value='none'
<?php
if ($thisdefaulttemplateeditormode == 'none') {
echo "selected='selected'";
}
?>
><?php
$clang->eT("Simple template editor");
?>
</option>
</select></li>
<?php
$dateformatdata = getDateFormatData(Yii::app()->session['dateformat']);
?>
<li><label for='timeadjust'><?php
$clang->eT("Time difference (in hours):");
?>
</label>
<span><input type='text' size='10' id='timeadjust' name='timeadjust' value="<?php
echo htmlspecialchars(str_replace(array('+', ' hours'), array('', ''), getGlobalSetting('timeadjust')));
?>
" />
<?php
echo $clang->gT("Server time:") . ' ' . convertDateTimeFormat(date('Y-m-d H:i:s'), 'Y-m-d H:i:s', $dateformatdata['phpdate'] . ' H:i') . " - " . $clang->gT("Corrected time :") . ' ' . convertDateTimeFormat(dateShift(date("Y-m-d H:i:s"), 'Y-m-d H:i:s', getGlobalSetting('timeadjust')), 'Y-m-d H:i:s', $dateformatdata['phpdate'] . ' H:i');
?>
</span></li>
<li><label for='iSessionExpirationTime'><?php
/**
* Show survey summary
* @param int Survey id
* @param string Action to be performed
*/
function _surveysummary($iSurveyID, $action = null, $gid = null)
{
$clang = $this->getController()->lang;
$baselang = Survey::model()->findByPk($iSurveyID)->language;
$condition = array('sid' => $iSurveyID, 'language' => $baselang);
$sumresult1 = Survey::model()->with(array('languagesettings' => array('condition' => 'surveyls_language=language')))->findByPk($iSurveyID);
//$sumquery1, 1) ; //Checked
if (is_null($sumresult1)) {
Yii::app()->session['flashmessage'] = $clang->gT("Invalid survey ID");
$this->getController()->redirect($this->getController()->createUrl("admin/index"));
}
// if surveyid is invalid then die to prevent errors at a later time
$surveyinfo = $sumresult1->attributes;
$surveyinfo = array_merge($surveyinfo, $sumresult1->languagesettings[0]->attributes);
$surveyinfo = array_map('flattenText', $surveyinfo);
//$surveyinfo = array_map('htmlspecialchars', $surveyinfo);
$activated = $surveyinfo['active'];
$condition = array('sid' => $iSurveyID, 'parent_qid' => 0, 'language' => $baselang);
$sumresult3 = Questions::model()->findAllByAttributes($condition);
//Checked
$sumcount3 = count($sumresult3);
$condition = array('sid' => $iSurveyID, 'language' => $baselang);
//$sumquery2 = "SELECT * FROM ".db_table_name('groups')." WHERE sid={$iSurveyID} AND language='".$baselang."'"; //Getting a count of groups for this survey
$sumresult2 = Groups::model()->findAllByAttributes($condition);
//Checked
$sumcount2 = count($sumresult2);
//SURVEY SUMMARY
$aAdditionalLanguages = Survey::model()->findByPk($iSurveyID)->additionalLanguages;
$surveysummary2 = "";
if ($surveyinfo['anonymized'] != "N") {
$surveysummary2 .= $clang->gT("Responses to this survey are anonymized.") . "<br />";
} else {
$surveysummary2 .= $clang->gT("Responses to this survey are NOT anonymized.") . "<br />";
}
if ($surveyinfo['format'] == "S") {
$surveysummary2 .= $clang->gT("It is presented question by question.") . "<br />";
} elseif ($surveyinfo['format'] == "G") {
$surveysummary2 .= $clang->gT("It is presented group by group.") . "<br />";
} else {
$surveysummary2 .= $clang->gT("It is presented on one single page.") . "<br />";
}
if ($surveyinfo['allowjumps'] == "Y") {
if ($surveyinfo['format'] == 'A') {
$surveysummary2 .= $clang->gT("No question index will be shown with this format.") . "<br />";
} else {
$surveysummary2 .= $clang->gT("A question index will be shown; participants will be able to jump between viewed questions.") . "<br />";
}
}
if ($surveyinfo['datestamp'] == "Y") {
$surveysummary2 .= $clang->gT("Responses will be date stamped.") . "<br />";
}
if ($surveyinfo['ipaddr'] == "Y") {
$surveysummary2 .= $clang->gT("IP Addresses will be logged") . "<br />";
}
if ($surveyinfo['refurl'] == "Y") {
$surveysummary2 .= $clang->gT("Referrer URL will be saved.") . "<br />";
}
if ($surveyinfo['usecookie'] == "Y") {
$surveysummary2 .= $clang->gT("It uses cookies for access control.") . "<br />";
}
if ($surveyinfo['allowregister'] == "Y") {
$surveysummary2 .= $clang->gT("If tokens are used, the public may register for this survey") . "<br />";
}
if ($surveyinfo['allowsave'] == "Y" && $surveyinfo['tokenanswerspersistence'] == 'N') {
$surveysummary2 .= $clang->gT("Participants can save partially finished surveys") . "<br />\n";
}
if ($surveyinfo['emailnotificationto'] != '') {
$surveysummary2 .= $clang->gT("Basic email notification is sent to:") . " {$surveyinfo['emailnotificationto']}<br />\n";
}
if ($surveyinfo['emailresponseto'] != '') {
$surveysummary2 .= $clang->gT("Detailed email notification with response data is sent to:") . " {$surveyinfo['emailresponseto']}<br />\n";
}
$dateformatdetails = getDateFormatData(Yii::app()->session['dateformat']);
if (trim($surveyinfo['startdate']) != '') {
Yii::import('application.libraries.Date_Time_Converter');
$datetimeobj = new Date_Time_Converter($surveyinfo['startdate'], 'Y-m-d H:i:s');
$aData['startdate'] = $datetimeobj->convert($dateformatdetails['phpdate'] . ' H:i');
} else {
$aData['startdate'] = "-";
}
if (trim($surveyinfo['expires']) != '') {
//$constructoritems = array($surveyinfo['expires'] , "Y-m-d H:i:s");
Yii::import('application.libraries.Date_Time_Converter');
$datetimeobj = new Date_Time_Converter($surveyinfo['expires'], 'Y-m-d H:i:s');
//$datetimeobj = new Date_Time_Converter($surveyinfo['expires'] , "Y-m-d H:i:s");
$aData['expdate'] = $datetimeobj->convert($dateformatdetails['phpdate'] . ' H:i');
} else {
$aData['expdate'] = "-";
}
if (!$surveyinfo['language']) {
$aData['language'] = getLanguageNameFromCode($currentadminlang, false);
} else {
$aData['language'] = getLanguageNameFromCode($surveyinfo['language'], false);
}
// get the rowspan of the Additionnal languages row
// is at least 1 even if no additionnal language is present
$additionnalLanguagesCount = count($aAdditionalLanguages);
$first = true;
$aData['additionnalLanguages'] = "";
if ($additionnalLanguagesCount == 0) {
$aData['additionnalLanguages'] .= "<td>-</td>\n";
} else {
foreach ($aAdditionalLanguages as $langname) {
if ($langname) {
if (!$first) {
$aData['additionnalLanguages'] .= "<tr><td> </td>";
}
$first = false;
$aData['additionnalLanguages'] .= "<td>" . getLanguageNameFromCode($langname, false) . "</td></tr>\n";
}
}
}
if ($first) {
$aData['additionnalLanguages'] .= "</tr>";
}
if ($surveyinfo['surveyls_urldescription'] == "") {
$surveyinfo['surveyls_urldescription'] = htmlspecialchars($surveyinfo['surveyls_url']);
}
if ($surveyinfo['surveyls_url'] != "") {
$aData['endurl'] = " <a target='_blank' href=\"" . htmlspecialchars($surveyinfo['surveyls_url']) . "\" title=\"" . htmlspecialchars($surveyinfo['surveyls_url']) . "\">{$surveyinfo['surveyls_urldescription']}</a>";
} else {
$aData['endurl'] = "-";
}
$aData['sumcount3'] = $sumcount3;
$aData['sumcount2'] = $sumcount2;
if ($activated == "N") {
$aData['activatedlang'] = $clang->gT("No");
} else {
$aData['activatedlang'] = $clang->gT("Yes");
}
$aData['activated'] = $activated;
if ($activated == "Y") {
$aData['surveydb'] = Yii::app()->db->tablePrefix . "survey_" . $iSurveyID;
}
$aData['warnings'] = "";
if ($activated == "N" && $sumcount3 == 0) {
$aData['warnings'] = $clang->gT("Survey cannot be activated yet.") . "<br />\n";
if ($sumcount2 == 0 && hasSurveyPermission($iSurveyID, 'surveycontent', 'create')) {
$aData['warnings'] .= "<span class='statusentryhighlight'>[" . $clang->gT("You need to add question groups") . "]</span><br />";
}
if ($sumcount3 == 0 && hasSurveyPermission($iSurveyID, 'surveycontent', 'create')) {
$aData['warnings'] .= "<span class='statusentryhighlight'>[" . $clang->gT("You need to add questions") . "]</span><br />";
}
}
$aData['hints'] = $surveysummary2;
//return (array('column'=>array($columns_used,$hard_limit) , 'size' => array($length, $size_limit) ));
// $aData['tableusage'] = getDBTableUsage($iSurveyID);
// ToDo: Table usage is calculated on every menu display which is too slow with bug surveys.
// Needs to be moved to a database field and only updated if there are question/subquestions added/removed (it's currently also not functional due to the port)
//
$aData['tableusage'] = false;
if ($gid || $action !== true && in_array($action, array('deactivate', 'activate', 'surveysecurity', 'editdefaultvalues', 'editemailtemplates', 'surveyrights', 'addsurveysecurity', 'addusergroupsurveysecurity', 'setsurveysecurity', 'setusergroupsurveysecurity', 'delsurveysecurity', 'editsurveysettings', 'editsurveylocalesettings', 'updatesurveysettingsandeditlocalesettings', 'addgroup', 'importgroup', 'ordergroups', 'deletesurvey', 'resetsurveylogic', 'importsurveyresources', 'translate', 'emailtemplates', 'exportstructure', 'quotas', 'copysurvey', 'viewgroup', 'viewquestion'))) {
$showstyle = "style='display: none'";
} else {
$showstyle = "";
}
$aData['showstyle'] = $showstyle;
$aData['aAdditionalLanguages'] = $aAdditionalLanguages;
$aData['clang'] = $clang;
$aData['surveyinfo'] = $surveyinfo;
$this->getController()->render("/admin/survey/surveySummary_view", $aData);
}
/**
* Generates statistics
*
* @param int $surveyid The survey id
* @param mixed $allfields
* @param mixed $q2show
* @param mixed $usegraph
* @param string $outputType Optional - Can be xls, html or pdf - Defaults to pdf
* @param string $pdfOutput Sets the target for the PDF output: DD=File download , F=Save file to local disk
* @param string $statlangcode Lamguage for statistics
* @param mixed $browse Show browse buttons
* @return buffer
*/
function generate_statistics($surveyid, $allfields, $q2show='all', $usegraph=0, $outputType='pdf', $pdfOutput='I',$statlangcode=null, $browse = true)
{
//$allfields ="";
global $connect, $dbprefix, $clang,
$rooturl, $rootdir, $homedir, $homeurl, $tempdir, $tempurl, $scriptname, $imagedir,
$chartfontfile, $chartfontsize, $admintheme, $pdfdefaultfont, $pdffontsize;
$fieldmap=createFieldMap($surveyid, "full");
if (is_null($statlangcode))
{
$statlang=$clang;
}
else
{
$statlang = new limesurvey_lang($statlangcode);
}
/*
* this variable is used in the function shortencode() which cuts off a question/answer title
* after $maxchars and shows the rest as tooltip (in html mode)
*/
$maxchars = 13;
//we collect all the html-output within this variable
$statisticsoutput ='';
/**
* $outputType: html || pdf ||
*/
/**
* get/set Survey Details
*/
//no survey ID? -> come and get one
if (!isset($surveyid)) {$surveyid=returnglobal('sid');}
//Get an array of codes of all available languages in this survey
$surveylanguagecodes = GetAdditionalLanguagesFromSurveyID($surveyid);
$surveylanguagecodes[] = GetBaseLanguageFromSurveyID($surveyid);
// Set language for questions and answers to base language of this survey
$language=$statlangcode;
if ($usegraph==1)
{
//for creating graphs we need some more scripts which are included here
require_once(dirname(__FILE__).'/../classes/pchart/pchart/pChart.class');
require_once(dirname(__FILE__).'/../classes/pchart/pchart/pData.class');
require_once(dirname(__FILE__).'/../classes/pchart/pchart/pCache.class');
$MyCache = new pCache($tempdir.'/');
//pick the best font file if font setting is 'auto'
if ($chartfontfile=='auto')
{
$chartfontfile='vera.ttf';
if ( $language=='ar')
{
$chartfontfile='KacstOffice.ttf';
}
elseif ($language=='fa' )
{
$chartfontfile='KacstFarsi.ttf';
}
}
}
if($q2show=='all' )
{
$summarySql=" SELECT gid, parent_qid, qid, type "
." FROM {$dbprefix}questions WHERE parent_qid=0"
." AND sid=$surveyid ";
$summaryRs = db_execute_assoc($summarySql);
foreach($summaryRs as $field)
{
$myField = $surveyid."X".$field['gid']."X".$field['qid'];
// Multiple choice get special treatment
if ($field['type'] == "M") {$myField = "M$myField";}
if ($field['type'] == "P") {$myField = "P$myField";}
//numerical input will get special treatment (arihtmetic mean, standard derivation, ...)
if ($field['type'] == "N") {$myField = "N$myField";}
if ($field['type'] == "|") {$myField = "|$myField";}
if ($field['type'] == "Q") {$myField = "Q$myField";}
// textfields get special treatment
if ($field['type'] == "S" || $field['type'] == "T" || $field['type'] == "U"){$myField = "T$myField";}
//statistics for Date questions are not implemented yet.
if ($field['type'] == "D") {$myField = "D$myField";}
if ($field['type'] == "F" || $field['type'] == "H")
{
//Get answers. We always use the answer code because the label might be too long elsewise
$query = "SELECT code, answer FROM ".db_table_name("answers")." WHERE qid='".$field['qid']."' AND scale_id=0 AND language='{$language}' ORDER BY sortorder, answer";
$result = db_execute_num($query) or safe_die ("Couldn't get answers!<br />$query<br />".$connect->ErrorMsg());
$counter2=0;
//check all the answers
while ($row=$result->FetchRow())
{
$myField = "$myField{$row[0]}";
}
//$myField = "{$surveyid}X{$flt[1]}X{$flt[0]}{$row[0]}[]";
}
if($q2show=='all')
$summary[]=$myField;
//$allfields[]=$myField;
}
}
else
{
// This gets all the 'to be shown questions' from the POST and puts these into an array
if (!is_array($q2show))
$summary=returnglobal('summary');
else
$summary = $q2show;
//print_r($_POST);
//if $summary isn't an array we create one
if (isset($summary) && !is_array($summary))
{
$summary = explode("+", $summary);
}
}
/* Some variable depend on output type, actually : only line feed */
switch($outputType)
{
case 'xls':
$linefeed = "\n";
break;
case 'pdf':
$linefeed = "\n";
break;
case 'html':
$linefeed = "<br />\n";
break;
default:
break;
}
/**
* pdf Config
*/
if($outputType=='pdf')
{
require_once('classes/tcpdf/config/lang/eng.php');
global $l;
$l['w_page'] = $statlang->gT("Page",'unescaped');
require_once('classes/tcpdf/mypdf.php');
// create new PDF document
$pdf = new MyPDF();
$pdf->SetFont($pdfdefaultfont,'',$pdffontsize);
$surveyInfo = getSurveyInfo($surveyid,$language);
// set document information
$pdf->SetCreator(PDF_CREATOR);
$pdf->SetAuthor('LimeSurvey');
$pdf->SetTitle('Statistic survey '.$surveyid);
$pdf->SetSubject($surveyInfo['surveyls_title']);
$pdf->SetKeywords('LimeSurvey, Statistics, Survey '.$surveyid.'');
$pdf->SetDisplayMode('fullpage', 'two');
// set header and footer fonts
$pdf->setHeaderFont(Array($pdfdefaultfont, '', PDF_FONT_SIZE_MAIN));
$pdf->setFooterFont(Array($pdfdefaultfont, '', PDF_FONT_SIZE_DATA));
// set default header data
// the path looks awkward - did not find a better solution to set the image path?
$pdf->SetHeaderData("statistics.png", 10, $statlang->gT("Quick statistics",'unescaped') , $statlang->gT("Survey")." ".$surveyid." '".FlattenText($surveyInfo['surveyls_title'],true,'UTF-8')."'");
// set default monospaced font
$pdf->SetDefaultMonospacedFont(PDF_FONT_MONOSPACED);
//set margins
$pdf->SetMargins(PDF_MARGIN_LEFT, PDF_MARGIN_TOP, PDF_MARGIN_RIGHT);
$pdf->SetHeaderMargin(PDF_MARGIN_HEADER);
$pdf->SetFooterMargin(PDF_MARGIN_FOOTER);
//set auto page breaks
$pdf->SetAutoPageBreak(TRUE, PDF_MARGIN_BOTTOM);
//set image scale factor
$pdf->setImageScale(PDF_IMAGE_SCALE_RATIO);
//set some language-dependent strings
$pdf->setLanguageArray($l);
}
if($outputType=='xls')
{
/**
* Initiate the Spreadsheet_Excel_Writer
*/
include_once(dirname(__FILE__)."/classes/pear/Spreadsheet/Excel/Writer.php");
if($pdfOutput=='F')
$workbook = new Spreadsheet_Excel_Writer($tempdir.'/statistic-survey'.$surveyid.'.xls');
else
$workbook = new Spreadsheet_Excel_Writer();
$workbook->setVersion(8);
// Inform the module that our data will arrive as UTF-8.
// Set the temporary directory to avoid PHP error messages due to open_basedir restrictions and calls to tempnam("", ...)
if (!empty($tempdir)) {
$workbook->setTempDir($tempdir);
}
if ($pdfOutput!='F')
$workbook->send('statistic-survey'.$surveyid.'.xls');
// Creating the first worksheet
$sheet =& $workbook->addWorksheet(utf8_decode('results-survey'.$surveyid));
$sheet->setInputEncoding('utf-8');
$sheet->setColumn(0,20,20);
$separator="~|";
}
/**
* Start generating
*/
// creates array of post variable names
for (reset($_POST); $key=key($_POST); next($_POST)) { $postvars[]=$key;}
$aQuestionMap=array();
foreach ($fieldmap as $field)
{
if(isset($field['qid']) && $field['qid']!='')
$aQuestionMap[]=$field['sid'].'X'.$field['gid'].'X'.$field['qid'];
}
/*
* Iterate through postvars to create "nice" data for SQL later.
*
* Remember there might be some filters applied which have to be put into an SQL statement
*/
if(isset($postvars))
foreach ($postvars as $pv)
{
//Only do this if there is actually a value for the $pv
if (in_array($pv, $allfields) || in_array(substr($pv,1),$aQuestionMap) || in_array($pv,$aQuestionMap) || (($pv[0]=='D' || $pv[0]=='N' || $pv[0]=='K') && in_array(substr($pv,1,strlen($pv)-2),$aQuestionMap)))
{
$firstletter=substr($pv,0,1);
/*
* these question types WON'T be handled here:
* M = Multiple choice
* T - Long Free Text
* Q - Multiple Short Text
* D - Date
* N - Numerical Input
* | - File Upload
* K - Multiple Numerical Input
*/
if ($pv != "sid" && $pv != "display" && $firstletter != "M" && $firstletter != "P" && $firstletter != "T" &&
$firstletter != "Q" && $firstletter != "D" && $firstletter != "N" && $firstletter != "K" && $firstletter != "|" &&
$pv != "summary" && substr($pv, 0, 2) != "id" && substr($pv, 0, 9) != "datestamp") //pull out just the fieldnames
{
//put together some SQL here
$thisquestion = db_quote_id($pv)." IN (";
foreach ($_POST[$pv] as $condition)
{
$thisquestion .= "'$condition', ";
}
$thisquestion = substr($thisquestion, 0, -2)
. ")";
//we collect all the to be selected data in this array
$selects[]=$thisquestion;
}
//M - Multiple choice
//P - Multiple choice with comments
elseif ($firstletter == "M" || $firstletter == "P")
{
$mselects=array();
//create a list out of the $pv array
list($lsid, $lgid, $lqid) = explode("X", $pv);
$aquery="SELECT title FROM ".db_table_name("questions")." WHERE parent_qid=$lqid AND language='{$language}' and scale_id=0 ORDER BY question_order";
$aresult=db_execute_num($aquery) or safe_die ("Couldn't get subquestions<br />$aquery<br />".$connect->ErrorMsg());
// go through every possible answer
while ($arow=$aresult->FetchRow())
{
// only add condition if answer has been chosen
if (in_array($arow[0], $_POST[$pv]))
{
$mselects[]=db_quote_id(substr($pv, 1, strlen($pv)).$arow[0])." = 'Y'";
}
}
if ($mselects)
{
$thismulti=implode(" OR ", $mselects);
$selects[]="($thismulti)";
$mselects = "";
}
}
//N - Numerical Input
//K - Multiple Numerical Input
elseif ($firstletter == "N" || $firstletter == "K")
{
//value greater than
if (substr($pv, strlen($pv)-1, 1) == "G" && $_POST[$pv] != "")
{
$selects[]=db_quote_id(substr($pv, 1, -1))." > ".sanitize_int($_POST[$pv]);
}
//value less than
if (substr($pv, strlen($pv)-1, 1) == "L" && $_POST[$pv] != "")
{
$selects[]=db_quote_id(substr($pv, 1, -1))." < ".sanitize_int($_POST[$pv]);
}
}
//| - File Upload Question Type
else if ($firstletter == "|")
{
// no. of files greater than
if (substr($pv, strlen($pv)-1, 1) == "G" && $_POST[$pv] != "")
$selects[]=db_quote_id(substr($pv, 1, -1)."_filecount")." > ".sanitize_int($_POST[$pv]);
// no. of files less than
if (substr($pv, strlen($pv)-1, 1) == "L" && $_POST[$pv] != "")
$selects[]=db_quote_id(substr($pv, 1, -1)."_filecount")." < ".sanitize_int($_POST[$pv]);
}
//"id" is a built in field, the unique database id key of each response row
elseif (substr($pv, 0, 2) == "id")
{
if (substr($pv, strlen($pv)-1, 1) == "G" && $_POST[$pv] != "")
{
$selects[]=db_quote_id(substr($pv, 0, -1))." > '".$_POST[$pv]."'";
}
if (substr($pv, strlen($pv)-1, 1) == "L" && $_POST[$pv] != "")
{
$selects[]=db_quote_id(substr($pv, 0, -1))." < '".$_POST[$pv]."'";
}
}
//T - Long Free Text
//Q - Multiple Short Text
elseif (($firstletter == "T" || $firstletter == "Q" ) && $_POST[$pv] != "")
{
$selectSubs = array();
//We intepret and * and % as wildcard matches, and use ' OR ' and , as the seperators
$pvParts = explode(",",str_replace('*','%', str_replace(' OR ',',',$_POST[$pv])));
if(is_array($pvParts) AND count($pvParts)){
foreach($pvParts AS $pvPart){
$selectSubs[]=db_quote_id(substr($pv, 1, strlen($pv)))." LIKE '".trim($pvPart)."'";
}
if(count($selectSubs)){
$selects[] = ' ('.implode(' OR ',$selectSubs).') ';
}
}
}
//D - Date
elseif ($firstletter == "D" && $_POST[$pv] != "")
{
//Date equals
if (substr($pv, -1, 1) == "=")
{
$selects[]=db_quote_id(substr($pv, 1, strlen($pv)-2))." = '".$_POST[$pv]."'";
}
else
{
//date less than
if (substr($pv, -1, 1) == "<")
{
$selects[]= db_quote_id(substr($pv, 1, strlen($pv)-2)) . " >= '".$_POST[$pv]."'";
}
//date greater than
if (substr($pv, -1, 1) == ">")
{
$selects[]= db_quote_id(substr($pv, 1, strlen($pv)-2)) . " <= '".$_POST[$pv]."'";
}
}
}
//check for datestamp of given answer
elseif (substr($pv, 0, 9) == "datestamp")
{
//timestamp equals
$formatdata=getDateFormatData($_SESSION['dateformat']);
if (substr($pv, -1, 1) == "E" && !empty($_POST[$pv]))
{
$datetimeobj = new Date_Time_Converter($_POST[$pv], $formatdata['phpdate'].' H:i');
$_POST[$pv]=$datetimeobj->convert("Y-m-d");
$selects[] = db_quote_id('datestamp')." >= '".$_POST[$pv]." 00:00:00' and ".db_quote_id('datestamp')." <= '".$_POST[$pv]." 23:59:59'";
}
else
{
//timestamp less than
if (substr($pv, -1, 1) == "L" && !empty($_POST[$pv]))
{
$datetimeobj = new Date_Time_Converter($_POST[$pv], $formatdata['phpdate'].' H:i');
$_POST[$pv]=$datetimeobj->convert("Y-m-d H:i:s");
$selects[]= db_quote_id('datestamp')." < '".$_POST[$pv]."'";
}
//timestamp greater than
if (substr($pv, -1, 1) == "G" && !empty($_POST[$pv]))
{
$datetimeobj = new Date_Time_Converter($_POST[$pv], $formatdata['phpdate'].' H:i');
$_POST[$pv]=$datetimeobj->convert("Y-m-d H:i:s");
$selects[]= db_quote_id('datestamp')." > '".$_POST[$pv]."'";
}
}
}
}
else
{
$statisticsoutput .= "<!-- $pv DOES NOT EXIST IN ARRAY -->";
}
} //end foreach -> loop through filter options to create SQL
//count number of answers
$query = "SELECT count(*) FROM ".db_table_name("survey_$surveyid");
//if incompleted answers should be filtert submitdate has to be not null
if (incompleteAnsFilterstate() == "inc") {$query .= " WHERE submitdate is null";}
elseif (incompleteAnsFilterstate() == "filter") {$query .= " WHERE submitdate is not null";}
$result = db_execute_num($query) or safe_die ("Couldn't get total<br />$query<br />".$connect->ErrorMsg());
//$total = total number of answers
while ($row=$result->FetchRow()) {$total=$row[0];}
//are there any filters that have to be taken care of?
if (isset($selects) && $selects)
{
//filter incomplete answers?
if (incompleteAnsFilterstate() == "filter" || incompleteAnsFilterstate() == "inc") {$query .= " AND ";}
else {$query .= " WHERE ";}
//add filter criteria to SQL
$query .= implode(" AND ", $selects);
}
//$_POST['sql'] is a post field that is sent from the statistics script to the export script in order
// to export just those results filtered by this statistics script. It can also be passed to the statistics
// script to filter from external scripts.
elseif (!empty($_POST['sql']) && !isset($_POST['id=']))
{
$newsql=substr($_POST['sql'], strpos($_POST['sql'], "WHERE")+5, strlen($_POST['sql']));
//for debugging only
//$query = $_POST['sql'];
//filter incomplete answers?
if (incompleteAnsFilterstate() == "inc") {$query .= " AND ".$newsql;}
elseif (incompleteAnsFilterstate() == "filter") {$query .= " AND ".$newsql;}
else {$query .= " WHERE ".$newsql;}
}
//get me some data Scotty
$result=db_execute_num($query) or safe_die("Couldn't get results<br />$query<br />".$connect->ErrorMsg());
//put all results into $results
while ($row=$result->FetchRow()) {$results=$row[0];}
if ($total)
{
$percent=sprintf("%01.2f", ($results/$total)*100);
}
switch($outputType)
{
case "xls":
$xlsRow = 0;
$sheet->write($xlsRow,0,$statlang->gT("Number of records in this query:"));
$sheet->write($xlsRow,1,$results);
++$xlsRow;
$sheet->write($xlsRow,0,$statlang->gT("Total records in survey:"));
$sheet->write($xlsRow,1,$total);
if($total)
{
++$xlsRow;
$sheet->write($xlsRow,0,$statlang->gT("Percentage of total:"));
$sheet->write($xlsRow,1,$percent."%");
}
break;
case 'pdf':
// add summary to pdf
$array = array();
//$array[] = array($statlang->gT("Results"),"");
$array[] = array($statlang->gT("Number of records in this query:"), $results);
$array[] = array($statlang->gT("Total records in survey:"), $total);
if($total)
$array[] = array($statlang->gT("Percentage of total:"), $percent."%");
$pdf->addPage('P','A4');
$pdf->Bookmark($pdf->delete_html($statlang->gT("Results")), 0, 0);
$pdf->titleintopdf($statlang->gT("Results"),$statlang->gT("Survey")." ".$surveyid);
$pdf->tableintopdf($array);
$pdf->addPage('P','A4');
break;
case 'html':
$statisticsoutput .= "<br />\n<table class='statisticssummary' >\n"
."\t<thead><tr><th colspan='2'>".$statlang->gT("Results")."</th></tr></thead>\n"
."\t<tr><th >".$statlang->gT("Number of records in this query:").'</th>'
."<td>$results</td></tr>\n"
."\t<tr><th>".$statlang->gT("Total records in survey:").'</th>'
."<td>$total</td></tr>\n";
//only calculate percentage if $total is set
if ($total)
{
$percent=sprintf("%01.2f", ($results/$total)*100);
$statisticsoutput .= "\t<tr><th align='right'>".$statlang->gT("Percentage of total:").'</th>'
."<td>$percent%</td></tr>\n";
}
$statisticsoutput .="</table>\n";
break;
default:
break;
}
//put everything from $selects array into a string connected by AND
if (isset ($selects) && $selects) {$sql=implode(" AND ", $selects);}
elseif (!empty($newsql)) {$sql = $newsql;}
if (!isset($sql) || !$sql) {$sql="NULL";}
//only continue if we have something to output
if ($results > 0)
{
if($outputType=='html' && $browse === true)
{
//add a buttons to browse results
$statisticsoutput .= "<form action='$scriptname?action=browse' method='post' target='_blank'>\n"
."\t\t<p>"
."\t\t\t<input type='submit' value='".$statlang->gT("Browse")."' />\n"
."\t\t\t<input type='hidden' name='sid' value='$surveyid' />\n"
."\t\t\t<input type='hidden' name='sql' value=\"$sql\" />\n"
."\t\t\t<input type='hidden' name='subaction' value='all' />\n"
."\t\t</p>"
."\t\t</form>\n";
}
} //end if (results > 0)
//Show Summary results
if (isset($summary) && $summary)
{
//let's run through the survey
$runthrough=$summary;
//START Chop up fieldname and find matching questions
//GET LIST OF LEGIT QIDs FOR TESTING LATER
$lq = "SELECT DISTINCT qid FROM ".db_table_name("questions")." WHERE sid=$surveyid and parent_qid=0";
$lr = db_execute_assoc($lq);
//loop through the IDs
while ($lw = $lr->FetchRow())
{
//this creates an array of question id's'
$legitqids[] = $lw['qid'];
}
//loop through all selected questions
foreach ($runthrough as $rt)
{
$firstletter = substr($rt, 0, 1);
// 1. Get answers for question ##############################################################
//M - Multiple choice, therefore multiple fields
if ($firstletter == "M" || $firstletter == "P")
{
//get SGQ data
list($qsid, $qgid, $qqid) = explode("X", substr($rt, 1, strlen($rt)), 3);
//select details for this question
$nquery = "SELECT title, type, question, parent_qid, other FROM ".db_table_name("questions")." WHERE language='{$language}' AND parent_qid=0 AND qid='$qqid'";
$nresult = db_execute_num($nquery) or safe_die ("Couldn't get question<br />$nquery<br />".$connect->ErrorMsg());
//loop through question data
while ($nrow=$nresult->FetchRow())
{
$qtitle=$nrow[0];
$qtype=$nrow[1];
$qquestion=FlattenText($nrow[2]);
$qlid=$nrow[3];
$qother=$nrow[4];
}
//1. Get list of answers
$query="SELECT title, question FROM ".db_table_name("questions")." WHERE parent_qid='$qqid' AND language='{$language}' and scale_id=0 ORDER BY question_order";
$result=db_execute_num($query) or safe_die("Couldn't get list of subquestions for multitype<br />$query<br />".$connect->ErrorMsg());
//loop through multiple answers
while ($row=$result->FetchRow())
{
$mfield=substr($rt, 1, strlen($rt))."$row[0]";
//create an array containing answer code, answer and fieldname(??)
$alist[]=array("$row[0]", FlattenText($row[1]), $mfield);
}
//check "other" field. is it set?
if ($qother == "Y")
{
$mfield=substr($rt, 1, strlen($rt))."other";
//create an array containing answer code, answer and fieldname(??)
$alist[]=array($statlang->gT("Other"), $statlang->gT("Other"), $mfield);
}
}
//S - Short Free Text
//T - Long Free Text
elseif ($firstletter == "T" || $firstletter == "S") //Short and long text
{
//search for key
$fld = substr($rt, 1, strlen($rt));
$fielddata=$fieldmap[$fld];
//get SGQA IDs
$qsid=$fielddata['sid'];
$qgid=$fielddata['gid'];
$qqid=$fielddata['qid'];
list($qanswer, $qlid)=!empty($fielddata['aid']) ? explode("_", $fielddata['aid']) : array("", "");
//get SGQ data
//list($qsid, $qgid, $qqid) = explode("X", substr($rt, 1, strlen($rt)), 3);
//get question data
$nquery = "SELECT title, type, question, other, parent_qid FROM ".db_table_name("questions")." WHERE parent_qid=0 AND qid='$qqid' AND language='{$language}'";
$nresult = db_execute_num($nquery) or safe_die("Couldn't get text question<br />$nquery<br />".$connect->ErrorMsg());
//loop through question data
while ($nrow=$nresult->FetchRow())
{
$qtitle=FlattenText($nrow[0]);
$qtype=$nrow[1];
$qquestion=FlattenText($nrow[2]);
$nlid=$nrow[4];
}
$mfield=substr($rt, 1, strlen($rt));
//Text questions either have an answer, or they don't. There's no other way of quantising the results.
// So, instead of building an array of predefined answers like we do with lists & other types,
// we instead create two "types" of possible answer - either there is a response.. or there isn't.
// This question type then can provide a % of the question answered in the summary.
$alist[]=array("Answers", $statlang->gT("Answer"), $mfield);
$alist[]=array("NoAnswer", $statlang->gT("No answer"), $mfield);
}
//Multiple short text
elseif ($firstletter == "Q")
{
//get SGQ data
list($qsid, $qgid, $qqid) = explode("X", substr($rt, 1, strlen($rt)), 3);
//separating another ID
$tmpqid=substr($qqid, 0, strlen($qqid)-1);
//check if we have legid QIDs. if not create them by substringing
while (!in_array ($tmpqid,$legitqids)) $tmpqid=substr($tmpqid, 0, strlen($tmpqid)-1);
//length of QID
$qidlength=strlen($tmpqid);
//we somehow get the answer code (see SQL later) from the $qqid
$qaid=substr($qqid, $qidlength, strlen($qqid)-$qidlength);
//get some question data
$nquery = "SELECT title, type, question, other FROM ".db_table_name("questions")." WHERE qid='".substr($qqid, 0, $qidlength)."' AND parent_qid=0 AND language='{$language}'";
$nresult = db_execute_num($nquery) or safe_die("Couldn't get text question<br />$nquery<br />".$connect->ErrorMsg());
//more substrings
$count = substr($qqid, strlen($qqid)-1);
//loop through question data
while ($nrow=$nresult->FetchRow())
{
$qtitle=FlattenText($nrow[0]).'-'.$count;
$qtype=$nrow[1];
$qquestion=FlattenText($nrow[2]);
}
//get answers
$qquery = "SELECT title as code, question as answer FROM ".db_table_name("questions")." WHERE parent_qid='".substr($qqid, 0, $qidlength)."' AND title='$qaid' AND language='{$language}' ORDER BY question_order";
$qresult=db_execute_num($qquery) or safe_die ("Couldn't get answer details (Array 5p Q)<br />$qquery<br />".$connect->ErrorMsg());
//loop through answer data
while ($qrow=$qresult->FetchRow())
{
//store each answer here
$atext=FlattenText($qrow[1]);
}
//add this to the question title
$qtitle .= " [$atext]";
//even more substrings...
$mfield=substr($rt, 1, strlen($rt));
//Text questions either have an answer, or they don't. There's no other way of quantising the results.
// So, instead of building an array of predefined answers like we do with lists & other types,
// we instead create two "types" of possible answer - either there is a response.. or there isn't.
// This question type then can provide a % of the question answered in the summary.
$alist[]=array("Answers", $statlang->gT("Answer"), $mfield);
$alist[]=array("NoAnswer", $statlang->gT("No answer"), $mfield);
}
//RANKING OPTION THEREFORE CONFUSING
elseif ($firstletter == "R")
{
//getting the needed IDs somehow
$lengthofnumeral=substr($rt, strpos($rt, "-")+1, 1);
list($qsid, $qgid, $qqid) = explode("X", substr($rt, 1, strpos($rt, "-")-($lengthofnumeral+1)), 3);
//get question data
$nquery = "SELECT title, type, question FROM ".db_table_name("questions")." WHERE parent_qid=0 AND qid='$qqid' AND language='{$language}'";
$nresult = db_execute_num($nquery) or safe_die ("Couldn't get question<br />$nquery<br />".$connect->ErrorMsg());
//loop through question data
while ($nrow=$nresult->FetchRow())
{
$qtitle=FlattenText($nrow[0]). " [".substr($rt, strpos($rt, "-")-($lengthofnumeral), $lengthofnumeral)."]";
$qtype=$nrow[1];
$qquestion=FlattenText($nrow[2]). "[".$statlang->gT("Ranking")." ".substr($rt, strpos($rt, "-")-($lengthofnumeral), $lengthofnumeral)."]";
}
//get answers
$query="SELECT code, answer FROM ".db_table_name("answers")." WHERE qid='$qqid' AND scale_id=0 AND language='{$language}' ORDER BY sortorder, answer";
$result=db_execute_num($query) or safe_die("Couldn't get list of answers for multitype<br />$query<br />".$connect->ErrorMsg());
//loop through answers
while ($row=$result->FetchRow())
{
//create an array containing answer code, answer and fieldname(??)
$mfield=substr($rt, 1, strpos($rt, "-")-1);
$alist[]=array("$row[0]", FlattenText($row[1]), $mfield);
}
}
else if ($firstletter == "|") // File UPload
{
//get SGQ data
list($qsid, $qgid, $qqid) = explode("X", substr($rt, 1, strlen($rt)), 3);
//select details for this question
$nquery = "SELECT title, type, question, parent_qid, other FROM ".db_table_name("questions")." WHERE language='{$language}' AND parent_qid=0 AND qid='$qqid'";
$nresult = db_execute_num($nquery) or safe_die ("Couldn't get question<br />$nquery<br />".$connect->ErrorMsg());
//loop through question data
while ($nrow=$nresult->FetchRow())
{
$qtitle=$nrow[0];
$qtype=$nrow[1];
$qquestion=FlattenText($nrow[2]);
$qlid=$nrow[3];
$qother=$nrow[4];
}
/*
4) Average size of file per respondent
5) Average no. of files
5) Summary/count of file types (ie: 37 jpg, 65 gif, 12 png)
6) Total size of all files (useful if you're about to download them all)
7) You could also add things like smallest file size, largest file size, median file size
8) no. of files corresponding to each extension
9) max file size
10) min file size
*/
// 1) Total number of files uploaded
// 2) Number of respondents who uploaded at least one file (with the inverse being the number of respondents who didn’t upload any)
$fieldname=substr($rt, 1, strlen($rt));
$query = "SELECT SUM(".db_quote_id($fieldname.'_filecount').") as sum, AVG(".db_quote_id($fieldname.'_filecount').") as avg FROM ".db_table_name("survey_$surveyid");
$result=db_execute_assoc($query) or safe_die("Couldn't fetch the records<br />$query<br />".$connect->ErrorMsg());
$showem = array();
while ($row = $result->FetchRow())
{
$showem[]=array($statlang->gT("Total number of files"), $row['sum']);
$showem[]=array($statlang->gT("Average no. of files per respondent"), $row['avg']);
}
$query = "SELECT ". $fieldname ." as json FROM ".db_table_name("survey_$surveyid");
$result=db_execute_assoc($query) or safe_die("Couldn't fetch the records<br />$query<br />".$connect->ErrorMsg());
$responsecount = 0;
$filecount = 0;
$size = 0;
while ($row = $result->FetchRow())
{
$json = $row['json'];
$phparray = json_decode($json);
foreach ($phparray as $metadata)
{
$size += (int) $metadata->size;
$filecount++;
}
$responsecount++;
}
$showem[] = array($statlang->gT("Total size of files"), $size." KB");
$showem[] = array($statlang->gT("Average file size"), $size/$filecount . " KB");
$showem[] = array($statlang->gT("Average size per respondent"), $size/$responsecount . " KB");
/* $query="SELECT title, question FROM ".db_table_name("questions")." WHERE parent_qid='$qqid' AND language='{$language}' ORDER BY question_order";
$result=db_execute_num($query) or safe_die("Couldn't get list of subquestions for multitype<br />$query<br />".$connect->ErrorMsg());
//loop through multiple answers
while ($row=$result->FetchRow())
{
$mfield=substr($rt, 1, strlen($rt))."$row[0]";
//create an array containing answer code, answer and fieldname(??)
$alist[]=array("$row[0]", FlattenText($row[1]), $mfield);
}
*/
//outputting
switch($outputType)
{
case 'xls':
$headXLS = array();
$tableXLS = array();
$footXLS = array();
$xlsTitle = sprintf($statlang->gT("Field summary for %s"),html_entity_decode($qtitle,ENT_QUOTES,'UTF-8'));
$xlsDesc = html_entity_decode($qquestion,ENT_QUOTES,'UTF-8');
++$xlsRow;
++$xlsRow;
++$xlsRow;
$sheet->setCellValueByColumnAndRow(0,$xlsRow,$xlsTitle);
++$xlsRow;
$sheet->setCellValueByColumnAndRow(0,$xlsRow,$xlsDesc);
$headXLS[] = array($statlang->gT("Calculation"),$statlang->gT("Result"));
++$xlsRow;
$sheet->setCellValueByColumnAndRow(0, $xlsRow,$statlang->gT("Calculation"));
$sheet->setCellValueByColumnAndRow(1, $xlsRow,$statlang->gT("Result"));
break;
case 'pdf':
$headPDF = array();
$tablePDF = array();
$footPDF = array();
$pdfTitle = sprintf($statlang->gT("Field summary for %s"),html_entity_decode($qtitle,ENT_QUOTES,'UTF-8'));
$titleDesc = html_entity_decode($qquestion,ENT_QUOTES,'UTF-8');
$headPDF[] = array($statlang->gT("Calculation"),$statlang->gT("Result"));
break;
case 'html':
$statisticsoutput .= "\n<table class='statisticstable' >\n"
."\t<thead><tr><th colspan='2' align='center'><strong>".sprintf($statlang->gT("Field summary for %s"),$qtitle).":</strong>"
."</th></tr>\n"
."\t<tr><th colspan='2' align='center'><strong>$qquestion</strong></th></tr>\n"
."\t<tr>\n\t\t<th width='50%' align='center' ><strong>"
.$statlang->gT("Calculation")."</strong></th>\n"
."\t\t<th width='50%' align='center' ><strong>"
.$statlang->gT("Result")."</strong></th>\n"
."\t</tr></thead>\n";
foreach ($showem as $res)
$statisticsoutput .= "<tr><td>".$res[0]."</td><td>".$res[1]."</td></tr>";
break;
default:
break;
}
}
//N = numerical input
//K = multiple numerical input
elseif ($firstletter == "N" || $firstletter == "K") //NUMERICAL TYPE
{
//Zero handling
if (!isset($excludezeros)) //If this hasn't been set, set it to on as default:
{
$excludezeros=1;
}
//check last character, greater/less/equals don't need special treatment
if (substr($rt, -1) == "G" || substr($rt, -1) == "L" || substr($rt, -1) == "=")
{
//DO NOTHING
}
else
{
//create SGQ identifier
list($qsid, $qgid, $qqid) = explode("X", $rt, 3);
//multiple numerical input
if($firstletter == "K")
{
// This is a multiple numerical question so we need to strip of the answer id to find the question title
$tmpqid=substr($qqid, 0, strlen($qqid)-1);
//did we get a valid ID?
while (!in_array ($tmpqid,$legitqids))
$tmpqid=substr($tmpqid, 0, strlen($tmpqid)-1);
//check lenght of ID
$qidlength=strlen($tmpqid);
//get answer ID from qid
$qaid=substr($qqid, $qidlength, strlen($qqid)-$qidlength);
//get question details from DB
$nquery = "SELECT title, type, question, qid, parent_qid
FROM ".db_table_name("questions")."
WHERE parent_qid=0 AND qid='".substr($qqid, 0, $qidlength)."'
AND language='{$language}'";
$nresult = db_execute_num($nquery) or safe_die("Couldn't get text question<br />$nquery<br />".$connect->ErrorMsg());
}
//probably question type "N" = numerical input
else
{
//we can use the qqid without any editing
$nquery = "SELECT title, type, question, qid, parent_qid FROM ".db_table_name("questions")." WHERE parent_qid=0 AND qid='$qqid' AND language='{$language}'";
$nresult = db_execute_num($nquery) or safe_die ("Couldn't get question<br />$nquery<br />".$connect->ErrorMsg());
}
//loop through results
while ($nrow=$nresult->FetchRow())
{
$qtitle=FlattenText($nrow[0]); //clean up title
$qtype=$nrow[1];
$qquestion=FlattenText($nrow[2]);
$qiqid=$nrow[3];
$qlid=$nrow[4];
}
//Get answer texts for multiple numerical
if(substr($rt, 0, 1) == "K")
{
//get answer data
$atext=$connect->GetOne("SELECT question FROM ".db_table_name("questions")." WHERE parent_qid='{$qiqid}' AND scale_id=0 AND title='{$qaid}' AND language='{$language}'");
//put single items in brackets at output
$qtitle .= " [$atext]";
}
//outputting
switch($outputType)
{
case 'xls':
$headXLS = array();
$tableXLS = array();
$footXLS = array();
$xlsTitle = sprintf($statlang->gT("Field summary for %s"),html_entity_decode($qtitle,ENT_QUOTES,'UTF-8'));
$xlsDesc = html_entity_decode($qquestion,ENT_QUOTES,'UTF-8');
++$xlsRow;
++$xlsRow;
++$xlsRow;
$sheet->write($xlsRow, 0,$xlsTitle);
++$xlsRow;
$sheet->write($xlsRow, 0,$xlsDesc);
$headXLS[] = array($statlang->gT("Calculation"),$statlang->gT("Result"));
++$xlsRow;
$sheet->write($xlsRow, 0,$statlang->gT("Calculation"));
$sheet->write($xlsRow, 1,$statlang->gT("Result"));
break;
case 'pdf':
$headPDF = array();
$tablePDF = array();
$footPDF = array();
$pdfTitle = sprintf($statlang->gT("Field summary for %s"),html_entity_decode($qtitle,ENT_QUOTES,'UTF-8'));
$titleDesc = html_entity_decode($qquestion,ENT_QUOTES,'UTF-8');
$headPDF[] = array($statlang->gT("Calculation"),$statlang->gT("Result"));
break;
case 'html':
$statisticsoutput .= "\n<table class='statisticstable' >\n"
."\t<thead><tr><th colspan='2' align='center'><strong>".sprintf($statlang->gT("Field summary for %s"),$qtitle).":</strong>"
."</th></tr>\n"
."\t<tr><th colspan='2' align='center'><strong>$qquestion</strong></th></tr>\n"
."\t<tr>\n\t\t<th width='50%' align='center' ><strong>"
.$statlang->gT("Calculation")."</strong></th>\n"
."\t\t<th width='50%' align='center' ><strong>"
.$statlang->gT("Result")."</strong></th>\n"
."\t</tr></thead>\n";
break;
default:
break;
}
//this field is queried using mathematical functions
$fieldname=substr($rt, 1, strlen($rt));
//special treatment for MS SQL databases
if ($connect->databaseType == 'odbc_mssql' || $connect->databaseType == 'odbtp' || $connect->databaseType == 'mssql_n' || $connect->databaseType == 'mssqlnative')
{
//standard deviation
$query = "SELECT STDEVP(".db_quote_id($fieldname)."*1) as stdev";
}
//other databases (MySQL, Postgres)
else
{
//standard deviation
$query = "SELECT STDDEV(".db_quote_id($fieldname).") as stdev";
}
//sum
$query .= ", SUM(".db_quote_id($fieldname)."*1) as sum";
//average
$query .= ", AVG(".db_quote_id($fieldname)."*1) as average";
//min
$query .= ", MIN(".db_quote_id($fieldname)."*1) as minimum";
//max
$query .= ", MAX(".db_quote_id($fieldname)."*1) as maximum";
//Only select responses where there is an actual number response, ignore nulls and empties (if these are included, they are treated as zeroes, and distort the deviation/mean calculations)
//special treatment for MS SQL databases
if ($connect->databaseType == 'odbc_mssql' || $connect->databaseType == 'odbtp' || $connect->databaseType == 'mssql_n' || $connect->databaseType == 'mssqlnative')
{
//no NULL/empty values please
$query .= " FROM ".db_table_name("survey_$surveyid")." WHERE ".db_quote_id($fieldname)." IS NOT NULL";
if(!$excludezeros)
{
//NO ZERO VALUES
$query .= " AND (".db_quote_id($fieldname)." <> 0)";
}
}
//other databases (MySQL, Postgres)
else
{
//no NULL/empty values please
$query .= " FROM ".db_table_name("survey_$surveyid")." WHERE ".db_quote_id($fieldname)." IS NOT NULL";
if(!$excludezeros)
{
//NO ZERO VALUES
$query .= " AND (".db_quote_id($fieldname)." != 0)";
}
}
//filter incomplete answers if set
if (incompleteAnsFilterstate() == "inc") {$query .= " AND submitdate is null";}
elseif (incompleteAnsFilterstate() == "filter") {$query .= " AND submitdate is not null";}
//$sql was set somewhere before
if ($sql != "NULL") {$query .= " AND $sql";}
//execute query
$result=db_execute_assoc($query) or safe_die("Couldn't do maths testing<br />$query<br />".$connect->ErrorMsg());
//get calculated data
while ($row=$result->FetchRow())
{
//put translation of mean and calculated data into $showem array
$showem[]=array($statlang->gT("Sum"), $row['sum']);
$showem[]=array($statlang->gT("Standard deviation"), round($row['stdev'],2));
$showem[]=array($statlang->gT("Average"), round($row['average'],2));
$showem[]=array($statlang->gT("Minimum"), $row['minimum']);
//Display the maximum and minimum figures after the quartiles for neatness
$maximum=$row['maximum'];
$minimum=$row['minimum'];
}
//CALCULATE QUARTILES
//get data
$query ="SELECT ".db_quote_id($fieldname)." FROM ".db_table_name("survey_$surveyid")." WHERE ".db_quote_id($fieldname)." IS NOT null";
//NO ZEROES
if(!$excludezeros)
{
$query .= " AND ".db_quote_id($fieldname)." != 0";
}
//filtering enabled?
if (incompleteAnsFilterstate() == "inc") {$query .= " AND submitdate is null";}
elseif (incompleteAnsFilterstate() == "filter") {$query .= " AND submitdate is not null";}
//if $sql values have been passed to the statistics script from another script, incorporate them
if ($sql != "NULL") {$query .= " AND $sql";}
//execute query
$result=$connect->Execute($query) or safe_die("Disaster during median calculation<br />$query<br />".$connect->ErrorMsg());
$querystarter="SELECT ".db_quote_id($fieldname)." FROM ".db_table_name("survey_$surveyid")." WHERE ".db_quote_id($fieldname)." IS NOT null";
//No Zeroes
if(!$excludezeros)
{
$querystart .= " AND ".db_quote_id($fieldname)." != 0";
}
//filtering enabled?
if (incompleteAnsFilterstate() == "inc") {$querystarter .= " AND submitdate is null";}
elseif (incompleteAnsFilterstate() == "filter") {$querystarter .= " AND submitdate is not null";}
//if $sql values have been passed to the statistics script from another script, incorporate them
if ($sql != "NULL") {$querystarter .= " AND $sql";}
//we just count the number of records returned
$medcount=$result->RecordCount();
//put the total number of records at the beginning of this array
array_unshift($showem, array($statlang->gT("Count"), $medcount));
//no more comment from Mazi regarding the calculation
// Calculating only makes sense with more than one result
if ($medcount>1)
{
//1ST QUARTILE (Q1)
$q1=(1/4)*($medcount+1);
$q1b=(int)((1/4)*($medcount+1));
$q1c=$q1b-1;
$q1diff=$q1-$q1b;
$total=0;
// fix if there are too few values to evaluate.
if ($q1c<0) {$q1c=0;}
if ($q1 != $q1b)
{
//ODD NUMBER
$query = $querystarter . " ORDER BY ".db_quote_id($fieldname)."*1 ";
$result=db_select_limit_assoc($query, 2, $q1c) or safe_die("1st Quartile query failed<br />".$connect->ErrorMsg());
while ($row=$result->FetchRow())
{
if ($total == 0) {$total=$total-$row[$fieldname];}
else {$total=$total+$row[$fieldname];}
$lastnumber=$row[$fieldname];
}
$q1total=$lastnumber-((1-$q1diff)*$total);
if ($q1total < $minimum) {$q1total=$minimum;}
$showem[]=array($statlang->gT("1st quartile (Q1)"), $q1total);
}
else
{
//EVEN NUMBER
$query = $querystarter . " ORDER BY ".db_quote_id($fieldname)."*1 ";
$result=db_select_limit_assoc($query,1, $q1c) or safe_die ("1st Quartile query failed<br />".$connect->ErrorMsg());
while ($row=$result->FetchRow())
{
$showem[]=array($statlang->gT("1st quartile (Q1)"), $row[$fieldname]);
}
}
$total=0;
//MEDIAN (Q2)
$median=(1/2)*($medcount+1);
$medianb=(int)((1/2)*($medcount+1));
$medianc=$medianb-1;
$mediandiff=$median-$medianb;
if ($median != $medianb)
{
//remainder
$query = $querystarter . " ORDER BY ".db_quote_id($fieldname)."*1 ";
$result=db_select_limit_assoc($query,2, $medianc) or safe_die("What a complete mess with the remainder<br />$query<br />".$connect->ErrorMsg());
while
(
$row=$result->FetchRow()) {$total=$total+$row[$fieldname];
}
$showem[]=array($statlang->gT("2nd quartile (Median)"), $total/2);
}
else
{
//EVEN NUMBER
$query = $querystarter . " ORDER BY ".db_quote_id($fieldname)."*1 ";
$result=db_select_limit_assoc($query,1, $medianc-1) or safe_die("What a complete mess<br />$query<br />".$connect->ErrorMsg());
while ($row=$result->FetchRow())
{
$showem[]=array($statlang->gT("Median value"), $row[$fieldname]);
}
}
$total=0;
//3RD QUARTILE (Q3)
$q3=(3/4)*($medcount+1);
$q3b=(int)((3/4)*($medcount+1));
$q3c=$q3b-1;
$q3diff=$q3-$q3b;
if ($q3 != $q3b)
{
$query = $querystarter . " ORDER BY ".db_quote_id($fieldname)."*1 ";
$result = db_select_limit_assoc($query,2,$q3c) or safe_die("3rd Quartile query failed<br />".$connect->ErrorMsg());
while ($row=$result->FetchRow())
{
if ($total == 0) {$total=$total-$row[$fieldname];}
else {$total=$total+$row[$fieldname];}
$lastnumber=$row[$fieldname];
}
$q3total=$lastnumber-((1-$q3diff)*$total);
if ($q3total < $maximum) {$q1total=$maximum;}
$showem[]=array($statlang->gT("3rd quartile (Q3)"), $q3total);
}
else
{
$query = $querystarter . " ORDER BY ".db_quote_id($fieldname)."*1";
$result = db_select_limit_assoc($query,1, $q3c) or safe_die("3rd Quartile even query failed<br />".$connect->ErrorMsg());
while ($row=$result->FetchRow())
{
$showem[]=array($statlang->gT("3rd quartile (Q3)"), $row[$fieldname]);
}
}
$total=0;
$showem[]=array($statlang->gT("Maximum"), $maximum);
//output results
foreach ($showem as $shw)
{
switch($outputType)
{
case 'xls':
++$xlsRow;
$sheet->write($xlsRow, 0,html_entity_decode($shw[0],ENT_QUOTES,'UTF-8'));
$sheet->write($xlsRow, 1,html_entity_decode($shw[1],ENT_QUOTES,'UTF-8'));
$tableXLS[] = array($shw[0],$shw[1]);
break;
case 'pdf':
$tablePDF[] = array(html_entity_decode($shw[0],ENT_QUOTES,'UTF-8'),html_entity_decode($shw[1],ENT_QUOTES,'UTF-8'));
break;
case 'html':
$statisticsoutput .= "\t<tr>\n"
."\t\t<td align='center' >$shw[0]</td>\n"
."\t\t<td align='center' >$shw[1]</td>\n"
."\t</tr>\n";
break;
default:
break;
}
}
switch($outputType)
{
case 'xls':
++$xlsRow;
$sheet->write($xlsRow, 0,$statlang->gT("Null values are ignored in calculations"));
++$xlsRow;
$sheet->write($xlsRow, 0,sprintf($statlang->gT("Q1 and Q3 calculated using %s"), $statlang->gT("minitab method")));
$footXLS[] = array($statlang->gT("Null values are ignored in calculations"));
$footXLS[] = array(sprintf($statlang->gT("Q1 and Q3 calculated using %s"), $statlang->gT("minitab method")));
break;
case 'pdf':
$footPDF[] = array($statlang->gT("Null values are ignored in calculations"));
$footPDF[] = array(sprintf($statlang->gT("Q1 and Q3 calculated using %s"), "<a href='http://mathforum.org/library/drmath/view/60969.html' target='_blank'>".$statlang->gT("minitab method")."</a>"));
$pdf->addPage('P','A4');
$pdf->Bookmark($pdf->delete_html($qquestion), 1, 0);
$pdf->titleintopdf($pdfTitle,$titleDesc);
$pdf->headTable($headPDF, $tablePDF);
$pdf->tablehead($footPDF);
break;
case 'html':
//footer of question type "N"
$statisticsoutput .= "\t<tr>\n"
."\t\t<td colspan='4' align='center' bgcolor='#EEEEEE'>\n"
."\t\t\t<font size='1'>".$statlang->gT("Null values are ignored in calculations")."<br />\n"
."\t\t\t".sprintf($statlang->gT("Q1 and Q3 calculated using %s"), "<a href='http://mathforum.org/library/drmath/view/60969.html' target='_blank'>".$statlang->gT("minitab method")."</a>")
."</font>\n"
."\t\t</td>\n"
."\t</tr>\n</table>\n";
break;
default:
break;
}
//clean up
unset($showem);
} //end if (enough results?)
//not enough (<1) results for calculation
else
{
switch($outputType)
{
case 'xls':
$tableXLS = array();
$tableXLS[] = array($statlang->gT("Not enough values for calculation"));
++$xlsRow;
$sheet->write($xlsRow, 0, $statlang->gT("Not enough values for calculation"));
break;
case 'pdf':
$tablePDF = array();
$tablePDF[] = array($statlang->gT("Not enough values for calculation"));
$pdf->addPage('P','A4');
$pdf->Bookmark($pdf->delete_html($qquestion), 1, 0);
$pdf->titleintopdf($pdfTitle,$titleDesc);
$pdf->equalTable($tablePDF);
break;
case 'html':
//output
$statisticsoutput .= "\t<tr>\n"
."\t\t<td align='center' colspan='4'>".$statlang->gT("Not enough values for calculation")."</td>\n"
."\t</tr>\n</table><br />\n";
break;
default:
break;
}
unset($showem);
}
} //end else -> check last character, greater/less/equals don't need special treatment
} //end else-if -> multiple numerical types
//is there some "id", "datestamp" or "D" within the type?
elseif (substr($rt, 0, 2) == "id" || substr($rt, 0, 9) == "datestamp" || ($firstletter == "D"))
{
/*
* DON'T show anything for date questions
* because there aren't any statistics implemented yet!
*
* See bug report #2539 and
* feature request #2620
*/
}
// NICE SIMPLE SINGLE OPTION ANSWERS
else
{
//search for key
$fielddata=$fieldmap[$rt];
//print_r($fielddata);
//get SGQA IDs
$qsid=$fielddata['sid'];
$qgid=$fielddata['gid'];
$qqid=$fielddata['qid'];
$qanswer=$fielddata['aid'];
//question type
$qtype=$fielddata['type'];
//question string
$qastring=$fielddata['question'];
//question ID
$rqid=$qqid;
//get question data
$nquery = "SELECT title, type, question, qid, parent_qid, other FROM ".db_table_name("questions")." WHERE qid='{$rqid}' AND parent_qid=0 and language='{$language}'";
$nresult = db_execute_num($nquery) or safe_die ("Couldn't get question<br />$nquery<br />".$connect->ErrorMsg());
//loop though question data
while ($nrow=$nresult->FetchRow())
{
$qtitle=FlattenText($nrow[0]);
$qtype=$nrow[1];
$qquestion=FlattenText($nrow[2]);
$qiqid=$nrow[3];
$qparentqid=$nrow[4];
$qother=$nrow[5];
}
//check question types
switch($qtype)
{
//Array of 5 point choices (several items to rank!)
case "A":
//get data
$qquery = "SELECT title, question FROM ".db_table_name("questions")." WHERE parent_qid='$qiqid' AND title='$qanswer' AND language='{$language}' ORDER BY question_order";
$qresult=db_execute_num($qquery) or safe_die ("Couldn't get answer details (Array 5p Q)<br />$qquery<br />".$connect->ErrorMsg());
//loop through results
while ($qrow=$qresult->FetchRow())
{
//5-point array
for ($i=1; $i<=5; $i++)
{
//add data
$alist[]=array("$i", "$i");
}
//add counter
$atext=FlattenText($qrow[1]);
}
//list IDs and answer codes in brackets
$qquestion .= $linefeed."[".$atext."]";
$qtitle .= "($qanswer)";
break;
//Array of 10 point choices
//same as above just with 10 items
case "B":
$qquery = "SELECT title, question FROM ".db_table_name("questions")." WHERE parent_qid='$qiqid' AND title='$qanswer' AND language='{$language}' ORDER BY question_order";
$qresult=db_execute_num($qquery) or safe_die ("Couldn't get answer details (Array 10p Q)<br />$qquery<br />".$connect->ErrorMsg());
while ($qrow=$qresult->FetchRow())
{
for ($i=1; $i<=10; $i++)
{
$alist[]=array("$i", "$i");
}
$atext=FlattenText($qrow[1]);
}
$qquestion .= $linefeed."[".$atext."]";
$qtitle .= "($qanswer)";
break;
//Array of Yes/No/$statlang->gT("Uncertain")
case "C":
$qquery = "SELECT title, question FROM ".db_table_name("questions")." WHERE parent_qid='$qiqid' AND title='$qanswer' AND language='{$language}' ORDER BY question_order";
$qresult=db_execute_num($qquery) or safe_die ("Couldn't get answer details<br />$qquery<br />".$connect->ErrorMsg());
//loop thorugh results
while ($qrow=$qresult->FetchRow())
{
//add results
$alist[]=array("Y", $statlang->gT("Yes"));
$alist[]=array("N", $statlang->gT("No"));
$alist[]=array("U", $statlang->gT("Uncertain"));
$atext=FlattenText($qrow[1]);
}
//output
$qquestion .= $linefeed."[".$atext."]";
$qtitle .= "($qanswer)";
break;
//Array of Yes/No/$statlang->gT("Uncertain")
//same as above
case "E":
$qquery = "SELECT title, question FROM ".db_table_name("questions")." WHERE parent_qid='$qiqid' AND title='$qanswer' AND language='{$language}' ORDER BY question_order";
$qresult=db_execute_num($qquery) or safe_die ("Couldn't get answer details<br />$qquery<br />".$connect->ErrorMsg());
while ($qrow=$qresult->FetchRow())
{
$alist[]=array("I", $statlang->gT("Increase"));
$alist[]=array("S", $statlang->gT("Same"));
$alist[]=array("D", $statlang->gT("Decrease"));
$atext=FlattenText($qrow[1]);
}
$qquestion .= $linefeed."[".$atext."]";
$qtitle .= "($qanswer)";
break;
case ";": //Array (Multi Flexi) (Text)
list($qacode, $licode)=explode("_", $qanswer);
$qquery = "SELECT title, question FROM ".db_table_name("questions")." WHERE parent_qid='$qiqid' AND title='$qacode' AND language='{$language}' ORDER BY question_order";
$qresult=db_execute_num($qquery) or die ("Couldn't get answer details<br />$qquery<br />".$connect->ErrorMsg());
while ($qrow=$qresult->FetchRow())
{
$fquery = "SELECT * FROM ".db_table_name("answers")." WHERE qid='{$qiqid}' AND scale_id=0 AND code = '{$licode}' AND language='{$language}'ORDER BY sortorder, code";
$fresult = db_execute_assoc($fquery);
while ($frow=$fresult->FetchRow())
{
$alist[]=array($frow['code'], $frow['answer']);
$ltext=$frow['answer'];
}
$atext=FlattenText($qrow[1]);
}
$qquestion .= $linefeed."[".$atext."] [".$ltext."]";
$qtitle .= "($qanswer)";
break;
case ":": //Array (Multiple Flexi) (Numbers)
$qidattributes=getQuestionAttributes($qiqid);
if (trim($qidattributes['multiflexible_max'])!='') {
$maxvalue=$qidattributes['multiflexible_max'];
}
else {
$maxvalue=10;
}
if (trim($qidattributes['multiflexible_min'])!='')
{
$minvalue=$qidattributes['multiflexible_min'];
}
else {
$minvalue=1;
}
if (trim($qidattributes['multiflexible_step'])!='')
{
$stepvalue=$qidattributes['multiflexible_step'];
}
else {
$stepvalue=1;
}
if ($qidattributes['multiflexible_checkbox']!=0) {
$minvalue=0;
$maxvalue=1;
$stepvalue=1;
}
for($i=$minvalue; $i<=$maxvalue; $i+=$stepvalue)
{
$alist[]=array($i, $i);
}
$qquestion .= $linefeed."[".$fielddata['subquestion1']."] [".$fielddata['subquestion2']."]";
list($myans, $mylabel)=explode("_", $qanswer);
$qtitle .= "[$myans][$mylabel]";
break;
case "F": //Array of Flexible
case "H": //Array of Flexible by Column
$qquery = "SELECT title, question FROM ".db_table_name("questions")." WHERE parent_qid='$qiqid' AND title='$qanswer' AND language='{$language}' ORDER BY question_order";
$qresult=db_execute_num($qquery) or safe_die ("Couldn't get answer details<br />$qquery<br />".$connect->ErrorMsg());
//loop through answers
while ($qrow=$qresult->FetchRow())
{
//this question type uses its own labels
$fquery = "SELECT * FROM ".db_table_name("answers")." WHERE qid='{$qiqid}' AND scale_id=0 AND language='{$language}'ORDER BY sortorder, code";
$fresult = db_execute_assoc($fquery);
//add code and title to results for outputting them later
while ($frow=$fresult->FetchRow())
{
$alist[]=array($frow['code'], FlattenText($frow['answer']));
}
//counter
$atext=FlattenText($qrow[1]);
}
//output
$qquestion .= $linefeed."[".$atext."]";
$qtitle .= "($qanswer)";
break;
case "G": //Gender
$alist[]=array("F", $statlang->gT("Female"));
$alist[]=array("M", $statlang->gT("Male"));
break;
case "Y": //Yes\No
$alist[]=array("Y", $statlang->gT("Yes"));
$alist[]=array("N", $statlang->gT("No"));
break;
case "I": //Language
// Using previously defined $surveylanguagecodes array of language codes
foreach ($surveylanguagecodes as $availlang)
{
$alist[]=array($availlang, getLanguageNameFromCode($availlang,false));
}
break;
case "5": //5 Point (just 1 item to rank!)
for ($i=1; $i<=5; $i++)
{
$alist[]=array("$i", "$i");
}
break;
case "1": //array (dual scale)
$sSubquestionQuery = "SELECT question FROM ".db_table_name("questions")." WHERE parent_qid='$qiqid' AND title='$qanswer' AND language='{$language}' ORDER BY question_order";
$sSubquestion=FlattenText($connect->GetOne($sSubquestionQuery));
//get question attributes
$qidattributes=getQuestionAttributes($qqid);
//check last character -> label 1
if (substr($rt,-1,1) == 0)
{
//get label 1
$fquery = "SELECT * FROM ".db_table_name("answers")." WHERE qid='{$qqid}' AND scale_id=0 AND language='{$language}' ORDER BY sortorder, code";
//header available?
if (trim($qidattributes['dualscale_headerA'])!='') {
//output
$labelheader= "[".$qidattributes['dualscale_headerA']."]";
}
//no header
else
{
$labelheader ='';
}
//output
$labelno = sprintf($clang->gT('Label %s'),'1');
}
//label 2
else
{
//get label 2
$fquery = "SELECT * FROM ".db_table_name("answers")." WHERE qid='{$qqid}' AND scale_id=1 AND language='{$language}' ORDER BY sortorder, code";
//header available?
if (trim($qidattributes['dualscale_headerB'])!='') {
//output
$labelheader= "[".$qidattributes['dualscale_headerB']."]";
}
//no header
else
{
$labelheader ='';
}
//output
$labelno = sprintf($clang->gT('Label %s'),'2');
}
//get data
$fresult = db_execute_assoc($fquery);
//put label code and label title into array
while ($frow=$fresult->FetchRow())
{
$alist[]=array($frow['code'], FlattenText($frow['answer']));
}
//adapt title and question
$qtitle = $qtitle." [".$sSubquestion."][".$labelno."]";
$qquestion = $qastring .$labelheader;
break;
default: //default handling
//get answer code and title
$qquery = "SELECT code, answer FROM ".db_table_name("answers")." WHERE qid='$qqid' AND scale_id=0 AND language='{$language}' ORDER BY sortorder, answer";
$qresult = db_execute_num($qquery) or safe_die ("Couldn't get answers list<br />$qquery<br />".$connect->ErrorMsg());
//put answer code and title into array
while ($qrow=$qresult->FetchRow())
{
$alist[]=array("$qrow[0]", FlattenText($qrow[1]));
}
//handling for "other" field for list radio or list drowpdown
if ((($qtype == "L" || $qtype == "!") && $qother == "Y"))
{
//add "other"
$alist[]=array($statlang->gT("Other"),$statlang->gT("Other"),$fielddata['fieldname'].'other');
}
if ( $qtype == "O")
{
//add "comment"
$alist[]=array($statlang->gT("Comments"),$statlang->gT("Comments"),$fielddata['fieldname'].'comment');
}
} //end switch question type
//moved because it's better to have "no answer" at the end of the list instead of the beginning
//put data into array
$alist[]=array("", $statlang->gT("No answer"));
} //end else -> single option answers
//foreach ($alist as $al) {$statisticsoutput .= "$al[0] - $al[1]<br />";} //debugging line
//foreach ($fvalues as $fv) {$statisticsoutput .= "$fv | ";} //debugging line
//2. Collect and Display results #######################################################################
if (isset($alist) && $alist) //Make sure there really is an answerlist, and if so:
{
// this will count the answers considered completed
$TotalCompleted = 0;
switch($outputType)
{
case 'xls':
$xlsTitle = sprintf($statlang->gT("Field summary for %s"),html_entity_decode($qtitle,ENT_QUOTES,'UTF-8'));
$xlsDesc = html_entity_decode($qquestion,ENT_QUOTES,'UTF-8');
++$xlsRow;
++$xlsRow;
++$xlsRow;
$sheet->write($xlsRow, 0,$xlsTitle);
++$xlsRow;
$sheet->write($xlsRow, 0,$xlsDesc);
$tableXLS = array();
$footXLS = array();
break;
case 'pdf':
$sPDFQuestion=FlattenText($qquestion,true);
$pdfTitle = $pdf->delete_html(sprintf($statlang->gT("Field summary for %s"),html_entity_decode($qtitle,ENT_QUOTES,'UTF-8')));
$titleDesc = $sPDFQuestion;
$pdf->addPage('P','A4');
$pdf->Bookmark($sPDFQuestion, 1, 0);
$pdf->titleintopdf($pdfTitle,$sPDFQuestion);
$tablePDF = array();
$footPDF = array();
break;
case 'html':
//output
$statisticsoutput .= "<table class='statisticstable'>\n"
."\t<thead><tr><th colspan='4' align='center'><strong>"
//headline
.sprintf($statlang->gT("Field summary for %s"),$qtitle)."</strong>"
."</th></tr>\n"
."\t<tr><th colspan='4' align='center'><strong>"
//question title
.$qquestion."</strong></th></tr>\n"
."\t<tr>\n\t\t<th width='50%' align='center' >";
break;
default:
break;
}
echo '';
//loop thorugh the array which contains all answer data
foreach ($alist as $al)
{
//picks out alist that come from the multiple list above
if (isset($al[2]) && $al[2])
{
//handling for "other" option
if ($al[0] == $statlang->gT("Other"))
{
if($qtype=='!' || $qtype=='L')
{
// It is better for single choice question types to filter on the number of '-oth-' entries, than to
// just count the number of 'other' values - that way with failing Javascript the statistics don't get messed up
$query = "SELECT count(*) FROM ".db_table_name("survey_$surveyid")." WHERE ".db_quote_id(substr($al[2],0,strlen($al[2])-5))."='-oth-'";
}
else
{
//get data
$query = "SELECT count(*) FROM ".db_table_name("survey_$surveyid")." WHERE ";
$query .= ($connect->databaseType == "mysql")? db_quote_id($al[2])." != ''" : "NOT (".db_quote_id($al[2])." LIKE '')";
}
}
/*
* text questions:
*
* U = huge free text
* T = long free text
* S = short free text
* Q = multiple short text
*/
elseif ($qtype == "U" || $qtype == "T" || $qtype == "S" || $qtype == "Q" || $qtype == ";")
{
//free text answers
if($al[0]=="Answers")
{
$query = "SELECT count(*) FROM ".db_table_name("survey_$surveyid")." WHERE ";
$query .= ($connect->databaseType == "mysql")? db_quote_id($al[2])." != ''" : "NOT (".db_quote_id($al[2])." LIKE '')";
}
//"no answer" handling
elseif($al[0]=="NoAnswer")
{
$query = "SELECT count(*) FROM ".db_table_name("survey_$surveyid")." WHERE ( ";
$query .= ($connect->databaseType == "mysql")? db_quote_id($al[2])." = '')" : " (".db_quote_id($al[2])." LIKE ''))";
}
}
elseif ($qtype == "O")
{
$query = "SELECT count(*) FROM ".db_table_name("survey_$surveyid")." WHERE ( ";
$query .= ($connect->databaseType == "mysql")? db_quote_id($al[2])." <> '')" : " (".db_quote_id($al[2])." NOT LIKE ''))";
// all other question types
}
else
{
$query = "SELECT count(*) FROM ".db_table_name("survey_$surveyid")." WHERE ".db_quote_id($al[2])." =";
//ranking question?
if (substr($rt, 0, 1) == "R")
{
$query .= " '$al[0]'";
}
else
{
$query .= " 'Y'";
}
}
} //end if -> alist set
else
{
if ($al[0] != "")
{
//get more data
if ($connect->databaseType == 'odbc_mssql' || $connect->databaseType == 'odbtp' || $connect->databaseType == 'mssql_n' || $connect->databaseType == 'mssqlnative')
{
// mssql cannot compare text blobs so we have to cast here
$query = "SELECT count(*) FROM ".db_table_name("survey_$surveyid")." WHERE cast(".db_quote_id($rt)." as varchar)= '$al[0]'";
}
else
$query = "SELECT count(*) FROM ".db_table_name("survey_$surveyid")." WHERE ".db_quote_id($rt)." = '$al[0]'";
}
else
{ // This is for the 'NoAnswer' case
// We need to take into account several possibilities
// * NoAnswer cause the participant clicked the NoAnswer radio
// ==> in this case value is '' or ' '
// * NoAnswer in text field
// ==> value is ''
// * NoAnswer due to conditions, or a page not displayed
// ==> value is NULL
if ($connect->databaseType == 'odbc_mssql' || $connect->databaseType == 'odbtp' || $connect->databaseType == 'mssql_n' || $connect->databaseType == 'mssqlnative')
{
// mssql cannot compare text blobs so we have to cast here
//$query = "SELECT count(*) FROM ".db_table_name("survey_$surveyid")." WHERE (".db_quote_id($rt)." IS NULL "
$query = "SELECT count(*) FROM ".db_table_name("survey_$surveyid")." WHERE ( "
// . "OR cast(".db_quote_id($rt)." as varchar) = '' "
. "cast(".db_quote_id($rt)." as varchar) = '' "
. "OR cast(".db_quote_id($rt)." as varchar) = ' ' )";
}
else
// $query = "SELECT count(*) FROM ".db_table_name("survey_$surveyid")." WHERE (".db_quote_id($rt)." IS NULL "
$query = "SELECT count(*) FROM ".db_table_name("survey_$surveyid")." WHERE ( "
// . "OR ".db_quote_id($rt)." = '' "
. " ".db_quote_id($rt)." = '' "
. "OR ".db_quote_id($rt)." = ' ') ";
}
}
//check filter option
if (incompleteAnsFilterstate() == "inc") {$query .= " AND submitdate is null";}
elseif (incompleteAnsFilterstate() == "filter") {$query .= " AND submitdate is not null";}
//check for any "sql" that has been passed from another script
if ($sql != "NULL") {$query .= " AND $sql";}
//get data
$result=db_execute_num($query) or safe_die ("Couldn't do count of values<br />$query<br />".$connect->ErrorMsg());
// $statisticsoutput .= "\n<!-- ($sql): $query -->\n\n";
// this just extracts the data, after we present
while ($row=$result->FetchRow())
{
//increase counter
$TotalCompleted += $row[0];
//"no answer" handling
if ($al[0] === "")
{$fname=$statlang->gT("No answer");}
//"other" handling
//"Answers" means that we show an option to list answer to "other" text field
elseif ($al[0] === $statlang->gT("Other") || $al[0] === "Answers" || ($qtype === "O" && $al[0] === $statlang->gT("Comments")) || $qtype === "P")
{
if ($qtype == "P" ) $ColumnName_RM = $al[2]."comment";
else $ColumnName_RM = $al[2];
if ($qtype=='O') {
$TotalCompleted -=$row[0];
}
$fname="$al[1]";
if ($browse===true) $fname .= " <input type='button' value='".$statlang->gT("Browse")."' onclick=\"window.open('admin.php?action=listcolumn&sid=$surveyid&column=$ColumnName_RM&sql=".urlencode($sql)."', 'results', 'width=460, height=500, left=50, top=50, resizable=yes, scrollbars=yes, menubar=no, status=no, location=no, toolbar=no')\" />";
}
/*
* text questions:
*
* U = huge free text
* T = long free text
* S = short free text
* Q = multiple short text
*/
elseif ($qtype == "S" || $qtype == "U" || $qtype == "T" || $qtype == "Q")
{
$headPDF = array();
$headPDF[] = array($statlang->gT("Answer"),$statlang->gT("Count"),$statlang->gT("Percentage"));
//show free text answers
if ($al[0] == "Answers")
{
$fname= "$al[1]";
if ($browse===true) $fname .= " <input type='submit' value='"
. $statlang->gT("Browse")."' onclick=\"window.open('admin.php?action=listcolumn&sid=$surveyid&column=$al[2]&sql="
. urlencode($sql)."', 'results', 'width=460, height=500, left=50, top=50, resizable=yes, scrollbars=yes, menubar=no, status=no, location=no, toolbar=no')\" />";
}
elseif ($al[0] == "NoAnswer")
{
$fname= "$al[1]";
}
$statisticsoutput .= "</th>\n"
."\t\t<th width='25%' align='center' >"
."<strong>".$statlang->gT("Count")."</strong></th>\n"
."\t\t<th width='25%' align='center' >"
."<strong>".$statlang->gT("Percentage")."</strong></th>\n"
."\t</tr></thead>\n";
}
//check if aggregated results should be shown
elseif (isset($showaggregateddata) && $showaggregateddata == 1)
{
if(!isset($showheadline) || $showheadline != false)
{
if($qtype == "5" || $qtype == "A")
{
switch($outputType)
{
case 'xls':
$headXLS = array();
$headXLS[] = array($statlang->gT("Answer"),$statlang->gT("Count"),$statlang->gT("Percentage"),$statlang->gT("Sum"));
++$xlsRow;
$sheet->write($xlsRow,0,$statlang->gT("Answer"));
$sheet->write($xlsRow,1,$statlang->gT("Count"));
$sheet->write($xlsRow,2,$statlang->gT("Percentage"));
$sheet->write($xlsRow,3,$statlang->gT("Sum"));
break;
case 'pdf':
$headPDF = array();
$headPDF[] = array($statlang->gT("Answer"),$statlang->gT("Count"),$statlang->gT("Percentage"),$statlang->gT("Sum"));
break;
case 'html':
//four columns
$statisticsoutput .= "<strong>".$statlang->gT("Answer")."</strong></th>\n"
."\t\t<th width='15%' align='center' >"
."<strong>".$statlang->gT("Count")."</strong></th>\n"
."\t\t<th width='20%' align='center' >"
."<strong>".$statlang->gT("Percentage")."</strong></th>\n"
."\t\t<th width='15%' align='center' >"
."<strong>".$statlang->gT("Sum")."</strong></th>\n"
."\t</tr></thead>\n";
break;
default:
break;
}
$showheadline = false;
}
else
{
switch($outputType)
{
case 'xls':
$headXLS = array();
$headXLS[] = array($statlang->gT("Answer"),$statlang->gT("Count"),$statlang->gT("Percentage"));
++$xlsRow;
$sheet->write($xlsRow,0,$statlang->gT("Answer"));
$sheet->write($xlsRow,1,$statlang->gT("Count"));
$sheet->write($xlsRow,2,$statlang->gT("Percentage"));
break;
case 'pdf':
$headPDF = array();
$headPDF[] = array($statlang->gT("Answer"),$statlang->gT("Count"),$statlang->gT("Percentage"));
break;
case 'html':
//three columns
$statisticsoutput .= "<strong>".$statlang->gT("Answer")."</strong></td>\n"
."\t\t<th width='25%' align='center' >"
."<strong>".$statlang->gT("Count")."</strong></th>\n"
."\t\t<th width='25%' align='center' >"
."<strong>".$statlang->gT("Percentage")."</strong></th>\n"
."\t</tr></thead>\n";
break;
default:
break;
}
$showheadline = false;
}
}
//text for answer column is always needed
$fname="$al[1] ($al[0])";
//these question types get special treatment by $showaggregateddata
if($qtype == "5" || $qtype == "A")
{
//put non-edited data in here because $row will be edited later
$grawdata[]=$row[0];
$showaggregated_indice=count($grawdata) - 1;
$showaggregated_indice_table[$showaggregated_indice]="aggregated";
$showaggregated_indice=-1;
//keep in mind that we already added data (will be checked later)
$justadded = true;
//we need a counter because we want to sum up certain values
//reset counter if 5 items have passed
if(!isset($testcounter) || $testcounter >= 4)
{
$testcounter = 0;
}
else
{
$testcounter++;
}
//beside the known percentage value a new aggregated value should be shown
//therefore this item is marked in a certain way
if($testcounter == 0 ) //add 300 to original value
{
//HACK: add three times the total number of results to the value
//This way we get a 300 + X percentage which can be checked later
$row[0] += (3*$results);
}
//the third value should be shown twice later -> mark it
if($testcounter == 2) //add 400 to original value
{
//HACK: add four times the total number of results to the value
//This way there should be a 400 + X percentage which can be checked later
$row[0] += (4*$results);
}
//the last value aggregates the data of item 4 + item 5 later
if($testcounter == 4 ) //add 200 to original value
{
//HACK: add two times the total number of results to the value
//This way there should be a 200 + X percentage which can be checked later
$row[0] += (2*$results);
}
} //end if -> question type = "5"/"A"
} //end if -> show aggregated data
//handling what's left
else
{
if(!isset($showheadline) || $showheadline != false)
{
switch($outputType)
{
case 'xls':
$headXLS = array();
$headXLS[] = array($statlang->gT("Answer"),$statlang->gT("Count"),$statlang->gT("Percentage"));
++$xlsRow;
$sheet->write($xlsRow,0,$statlang->gT("Answer"));
$sheet->write($xlsRow,1,$statlang->gT("Count"));
$sheet->write($xlsRow,2,$statlang->gT("Percentage"));
break;
case 'pdf':
$headPDF = array();
$headPDF[] = array($statlang->gT("Answer"),$statlang->gT("Count"),$statlang->gT("Percentage"));
break;
case 'html':
//three columns
$statisticsoutput .= "<strong>".$statlang->gT("Answer")."</strong></th>\n"
."\t\t<th width='25%' align='center' >"
."<strong>".$statlang->gT("Count")."</strong></th>\n"
."\t\t<th width='25%' align='center' >"
."<strong>".$statlang->gT("Percentage")."</strong></th>\n"
."\t</tr></thead>\n";
break;
default:
break;
}
$showheadline = false;
}
//answer text
$fname="$al[1] ($al[0])";
}
//are there some results to play with?
if ($results > 0)
{
//calculate percentage
$gdata[] = ($row[0]/$results)*100;
}
//no results
else
{
//no data!
$gdata[] = "N/A";
}
//only add this if we don't handle question type "5"/"A"
if(!isset($justadded))
{
//put absolute data into array
$grawdata[]=$row[0];
}
else
{
//unset to handle "no answer" data correctly
unset($justadded);
}
//put question title and code into array
$label[]=$fname;
//put only the code into the array
$justcode[]=$al[0];
//edit labels and put them into antoher array
$lbl[] = wordwrap(FlattenText("$al[1] ($row[0])"), 25, "\n"); // NMO 2009-03-24
$lblrtl[] = utf8_strrev(wordwrap(FlattenText("$al[1] )$row[0]("), 25, "\n")); // NMO 2009-03-24
} //end while -> loop through results
} //end foreach -> loop through answer data
//no filtering of incomplete answers and NO multiple option questions
//if ((incompleteAnsFilterstate() != "filter") and ($qtype != "M") and ($qtype != "P"))
//error_log("TIBO ".print_r($showaggregated_indice_table,true));
if (($qtype != "M") and ($qtype != "P"))
{
//is the checkbox "Don't consider NON completed responses (only works when Filter incomplete answers is Disable)" checked?
//if (isset($_POST["noncompleted"]) and ($_POST["noncompleted"] == "on") && (isset($showaggregateddata) && $showaggregateddata == 0))
// TIBO: TODO WE MUST SKIP THE FOLLOWING SECTION FOR TYPE A and 5 when
// showaggreagated data is set and set to 1
if (isset($_POST["noncompleted"]) and ($_POST["noncompleted"] == "on") )
{
//counter
$i=0;
while (isset($gdata[$i]))
{
if (isset($showaggregated_indice_table[$i]) && $showaggregated_indice_table[$i]=="aggregated")
{ // do nothing, we don't rewrite aggregated results
// or at least I don't know how !!! (lemeur)
}
else
{
//we want to have some "real" data here
if ($gdata[$i] != "N/A")
{
//calculate percentage
$gdata[$i] = ($grawdata[$i]/$TotalCompleted)*100;
}
}
//increase counter
$i++;
} //end while (data available)
} //end if -> noncompleted checked
//noncompleted is NOT checked
else
{
//calculate total number of incompleted records
$TotalIncomplete = $results - $TotalCompleted;
//output
if ((incompleteAnsFilterstate() != "filter"))
{
$fname=$statlang->gT("Not completed or Not displayed");
}
else
{
$fname=$statlang->gT("Not displayed");
}
//we need some data
if ($results > 0)
{
//calculate percentage
$gdata[] = ($TotalIncomplete/$results)*100;
}
//no data :(
else
{
$gdata[] = "N/A";
}
//put data of incompleted records into array
$grawdata[]=$TotalIncomplete;
//put question title ("Not completed") into array
$label[]= $fname;
//put the code ("Not completed") into the array
$justcode[]=$fname;
//edit labels and put them into antoher array
if ((incompleteAnsFilterstate() != "filter"))
{
$lbl[] = wordwrap(FlattenText($statlang->gT("Not completed or Not displayed")." ($TotalIncomplete)"), 20, "\n"); // NMO 2009-03-24
}
else
{
$lbl[] = wordwrap(FlattenText($statlang->gT("Not displayed")." ($TotalIncomplete)"), 20, "\n"); // NMO 2009-03-24
}
} //end else -> noncompleted NOT checked
} //end if -> no filtering of incomplete answers and no multiple option questions
//counter
$i=0;
//we need to know which item we are editing
$itemcounter = 1;
//array to store items 1 - 5 of question types "5" and "A"
$stddevarray = array();
//loop through all available answers
while (isset($gdata[$i]))
{
//repeat header (answer, count, ...) for each new question
unset($showheadline);
/*
* there are 3 colums:
*
* 1 (50%) = answer (title and code in brackets)
* 2 (25%) = count (absolute)
* 3 (25%) = percentage
*/
$statisticsoutput .= "\t<tr>\n\t\t<td align='center' >" . $label[$i] ."\n"
."\t\t</td>\n"
//output absolute number of records
."\t\t<td align='center' >" . $grawdata[$i] . "\n</td>";
//no data
if ($gdata[$i] == "N/A")
{
switch($outputType)
{
case 'xls':
$label[$i]=FlattenText($label[$i]);
$tableXLS[] = array($label[$i],$grawdata[$i],sprintf("%01.2f", $gdata[$i]). "%");
++$xlsRow;
$sheet->write($xlsRow,0,$label[$i]);
$sheet->write($xlsRow,1,$grawdata[$i]);
$sheet->write($xlsRow,2,sprintf("%01.2f", $gdata[$i]). "%");
break;
case 'pdf':
$tablePDF[] = array(FlattenText($label[$i]),$grawdata[$i],sprintf("%01.2f", $gdata[$i]). "%", "");
break;
case 'html':
//output when having no data
$statisticsoutput .= "\t\t<td align='center' >";
//percentage = 0
$statisticsoutput .= sprintf("%01.2f", $gdata[$i]) . "%";
$gdata[$i] = 0;
//check if we have to adjust ouput due to $showaggregateddata setting
if(isset($showaggregateddata) && $showaggregateddata == 1 && ($qtype == "5" || $qtype == "A"))
{
$statisticsoutput .= "\t\t</td>";
}
elseif ($qtype == "S" || $qtype == "U" || $qtype == "T" || $qtype == "Q")
{
$statisticsoutput .= "</td>\n\t</tr>\n";
}
break;
default:
break;
}
}
//data available
else
{
//check if data should be aggregated
if(isset($showaggregateddata) && $showaggregateddata == 1 && ($qtype == "5" || $qtype == "A"))
{
//mark that we have done soemthing special here
$aggregated = true;
//just calculate everything once. the data is there in the array
if($itemcounter == 1)
{
//there are always 5 answers
for($x = 0; $x < 5; $x++)
{
//put 5 items into array for further calculations
array_push($stddevarray, $grawdata[$x]);
}
}
//"no answer" & items 2 / 4 - nothing special to do here, just adjust output
if($gdata[$i] <= 100)
{
if($itemcounter == 2 && $label[$i+4] == $statlang->gT("No answer"))
{
//prevent division by zero
if(($results - $grawdata[$i+4]) > 0)
{
//re-calculate percentage
$percentage = ($grawdata[$i] / ($results - $grawdata[$i+4])) * 100;
}
else
{
$percentage = 0;
}
}
elseif($itemcounter == 4 && $label[$i+2] == $statlang->gT("No answer"))
{
//prevent division by zero
if(($results - $grawdata[$i+2]) > 0)
{
//re-calculate percentage
$percentage = ($grawdata[$i] / ($results - $grawdata[$i+2])) * 100;
}
else
{
$percentage = 0;
}
}
else
{
$percentage = $gdata[$i];
}
switch($outputType)
{
case 'xls':
$label[$i]=FlattenText($label[$i]);
$tableXLS[]= array($label[$i],$grawdata[$i],sprintf("%01.2f", $percentage)."%");
++$xlsRow;
$sheet->write($xlsRow,0,$label[$i]);
$sheet->write($xlsRow,1,$grawdata[$i]);
$sheet->write($xlsRow,2,sprintf("%01.2f", $percentage)."%");
break;
case 'pdf':
$label[$i]=FlattenText($label[$i]);
$tablePDF[] = array($label[$i],$grawdata[$i],sprintf("%01.2f", $percentage)."%", "");
break;
case 'html':
//output
$statisticsoutput .= "\t\t<td align='center'>";
//output percentage
$statisticsoutput .= sprintf("%01.2f", $percentage) . "%";
//adjust output
$statisticsoutput .= "\t\t</td>";
break;
default:
break;
}
}
//item 3 - just show results twice
//old: if($gdata[$i] >= 400)
//trying to fix bug #2583:
if($gdata[$i] >= 400 && $i != 0)
{
//remove "400" which was added before
$gdata[$i] -= 400;
if($itemcounter == 3 && $label[$i+3] == $statlang->gT("No answer"))
{
//prevent division by zero
if(($results - $grawdata[$i+3]) > 0)
{
//re-calculate percentage
$percentage = ($grawdata[$i] / ($results - $grawdata[$i+3])) * 100;
}
else
{
$percentage = 0;
}
}
else
{
//get the original percentage
$percentage = $gdata[$i];
}
switch($outputType)
{
case 'xls':
$label[$i]=FlattenText($label[$i]);
$tableXLS[] = array($label[$i],$grawdata[$i],sprintf("%01.2f", $percentage)."%",sprintf("%01.2f", $percentage)."%");
++$xlsRow;
$sheet->write($xlsRow,0,$label[$i]);
$sheet->write($xlsRow,1,$grawdata[$i]);
$sheet->write($xlsRow,2,sprintf("%01.2f", $percentage)."%");
$sheet->write($xlsRow,3,sprintf("%01.2f", $percentage)."%");
break;
case 'pdf':
$label[$i]=FlattenText($label[$i]);
$tablePDF[] = array($label[$i],$grawdata[$i],sprintf("%01.2f", $percentage)."%",sprintf("%01.2f", $percentage)."%");
break;
case 'html':
//output percentage
$statisticsoutput .= "\t\t<td align='center' >";
$statisticsoutput .= sprintf("%01.2f", $percentage) . "%</td>";
//output again (no real aggregation here)
$statisticsoutput .= "\t\t<td align='center' >";
$statisticsoutput .= sprintf("%01.2f", $percentage)."%";
$statisticsoutput .= "</td>\t\t";
break;
default:
break;
}
}
//FIRST value -> add percentage of item 1 + item 2
//old: if($gdata[$i] >= 300 && $gdata[$i] < 400)
//trying to fix bug #2583:
if(($gdata[$i] >= 300 && $gdata[$i] < 400) || ($i == 0 && $gdata[$i] <= 400))
{
//remove "300" which was added before
$gdata[$i] -= 300;
if($itemcounter == 1 && $label[$i+5] == $statlang->gT("No answer"))
{
//prevent division by zero
if(($results - $grawdata[$i+5]) > 0)
{
//re-calculate percentage
$percentage = ($grawdata[$i] / ($results - $grawdata[$i+5])) * 100;
$percentage2 = ($grawdata[$i + 1] / ($results - $grawdata[$i+5])) * 100;
}
else
{
$percentage = 0;
$percentage2 = 0;
}
}
else
{
$percentage = $gdata[$i];
$percentage2 = $gdata[$i+1];
}
//percentage of item 1 + item 2
$aggregatedgdata = $percentage + $percentage2;
switch($outputType)
{
case 'xls':
$label[$i]=FlattenText($label[$i]);
$tableXLS[] = array($label[$i],$grawdata[$i],sprintf("%01.2f", $percentage)."%",sprintf("%01.2f", $aggregatedgdata)."%");
++$xlsRow;
$sheet->write($xlsRow,0,$label[$i]);
$sheet->write($xlsRow,1,$grawdata[$i]);
$sheet->write($xlsRow,2,sprintf("%01.2f", $percentage)."%");
$sheet->write($xlsRow,3,sprintf("%01.2f", $aggregatedgdata)."%");
break;
case 'pdf':
$label[$i]=FlattenText($label[$i]);
$tablePDF[] = array($label[$i],$grawdata[$i],sprintf("%01.2f", $percentage)."%",sprintf("%01.2f", $aggregatedgdata)."%");
break;
case 'html':
//output percentage
$statisticsoutput .= "\t\t<td align='center' >";
$statisticsoutput .= sprintf("%01.2f", $percentage) . "%</td>";
//output aggregated data
$statisticsoutput .= "\t\t<td align='center' >";
$statisticsoutput .= sprintf("%01.2f", $aggregatedgdata)."%";
$statisticsoutput .= "</td>\t\t";
break;
default:
break;
}
}
//LAST value -> add item 4 + item 5
if($gdata[$i] > 100 && $gdata[$i] < 300)
{
//remove "200" which was added before
$gdata[$i] -= 200;
if($itemcounter == 5 && $label[$i+1] == $statlang->gT("No answer"))
{
//prevent division by zero
if(($results - $grawdata[$i+1]) > 0)
{
//re-calculate percentage
$percentage = ($grawdata[$i] / ($results - $grawdata[$i+1])) * 100;
$percentage2 = ($grawdata[$i - 1] / ($results - $grawdata[$i+1])) * 100;
}
else
{
$percentage = 0;
$percentage2 = 0;
}
}
else
{
$percentage = $gdata[$i];
$percentage2 = $gdata[$i-1];
}
//item 4 + item 5
$aggregatedgdata = $percentage + $percentage2;
switch($outputType)
{
case 'xls':
$label[$i]=FlattenText($label[$i]);
$tableXLS[] = array($label[$i],$grawdata[$i],sprintf("%01.2f", $percentage)."%",sprintf("%01.2f", $aggregatedgdata)."%");
++$xlsRow;
$sheet->write($xlsRow,0,$label[$i]);
$sheet->write($xlsRow,1,$grawdata[$i]);
$sheet->write($xlsRow,2,sprintf("%01.2f", $percentage)."%");
$sheet->write($xlsRow,3,sprintf("%01.2f", $aggregatedgdata)."%");
break;
case 'pdf':
$label[$i]=FlattenText($label[$i]);
$tablePDF[] = array($label[$i],$grawdata[$i],sprintf("%01.2f", $percentage)."%",sprintf("%01.2f", $aggregatedgdata)."%");
break;
case 'html':
//output percentage
$statisticsoutput .= "\t\t<td align='center' >";
$statisticsoutput .= sprintf("%01.2f", $percentage) . "%</td>";
//output aggregated data
$statisticsoutput .= "\t\t<td align='center' >";
$statisticsoutput .= sprintf("%01.2f", $aggregatedgdata)."%";
$statisticsoutput .= "</td>\t\t";
break;
default:
break;
}
// create new row "sum"
//calculate sum of items 1-5
$sumitems = $grawdata[$i]
+ $grawdata[$i-1]
+ $grawdata[$i-2]
+ $grawdata[$i-3]
+ $grawdata[$i-4];
//special treatment for zero values
if($sumitems > 0)
{
$sumpercentage = "100.00";
}
else
{
$sumpercentage = "0";
}
//special treatment for zero values
if($TotalCompleted > 0)
{
$casepercentage = "100.00";
}
else
{
$casepercentage = "0";
}
switch($outputType)
{
case 'xls':
$footXLS[] = array($statlang->gT("Sum")." (".$statlang->gT("Answers").")",$sumitems,$sumpercentage."%",$sumpercentage."%");
$footXLS[] = array($statlang->gT("Number of cases"),$TotalCompleted,$casepercentage."%","");
++$xlsRow;
$sheet->write($xlsRow,0,$statlang->gT("Sum")." (".$statlang->gT("Answers").")");
$sheet->write($xlsRow,1,$sumitems);
$sheet->write($xlsRow,2,$sumpercentage."%");
$sheet->write($xlsRow,3,$sumpercentage."%");
++$xlsRow;
$sheet->write($xlsRow,0,$statlang->gT("Number of cases"));
$sheet->write($xlsRow,1,$TotalCompleted);
$sheet->write($xlsRow,2,$casepercentage."%");
break;
case 'pdf':
$footPDF[] = array($statlang->gT("Sum")." (".$statlang->gT("Answers").")",$sumitems,$sumpercentage."%",$sumpercentage."%");
$footPDF[] = array($statlang->gT("Number of cases"),$TotalCompleted,$casepercentage."%","");
break;
case 'html':
$statisticsoutput .= "\t\t \n\t</tr>\n";
$statisticsoutput .= "<tr><td align='center'><strong>".$statlang->gT("Sum")." (".$statlang->gT("Answers").")</strong></td>";
$statisticsoutput .= "<td align='center' ><strong>".$sumitems."</strong></td>";
$statisticsoutput .= "<td align='center' ><strong>$sumpercentage%</strong></td>";
$statisticsoutput .= "<td align='center' ><strong>$sumpercentage%</strong></td>";
$statisticsoutput .= "\t\t \n\t</tr>\n";
$statisticsoutput .= "<tr><td align='center'>".$statlang->gT("Number of cases")."</td>"; //German: "Fallzahl"
$statisticsoutput .= "<td align='center' >".$TotalCompleted."</td>";
$statisticsoutput .= "<td align='center' >$casepercentage%</td>";
//there has to be a whitespace within the table cell to display correctly
$statisticsoutput .= "<td align='center' > </td></tr>";
break;
default:
break;
}
}
} //end if -> show aggregated data
//don't show aggregated data
else
{
switch($outputType)
{
case 'xls':
$label[$i]=FlattenText($label[$i]);
$tableXLS[] = array($label[$i],$grawdata[$i],sprintf("%01.2f", $gdata[$i])."%", "");
++$xlsRow;
$sheet->write($xlsRow,0,$label[$i]);
$sheet->write($xlsRow,1,$grawdata[$i]);
$sheet->write($xlsRow,2,sprintf("%01.2f", $gdata[$i])."%");
//$sheet->write($xlsRow,3,$sumpercentage."%");
break;
case 'pdf':
$label[$i]=FlattenText($label[$i]);
$tablePDF[] = array($label[$i],$grawdata[$i],sprintf("%01.2f", $gdata[$i])."%", "");
break;
case 'html':
//output percentage
$statisticsoutput .= "\t\t<td align='center' >";
$statisticsoutput .= sprintf("%01.2f", $gdata[$i]) . "%";
$statisticsoutput .= "\t\t";
//end output per line. there has to be a whitespace within the table cell to display correctly
$statisticsoutput .= "\t\t </td>\n\t</tr>\n";
break;
default:
break;
}
}
} //end else -> $gdata[$i] != "N/A"
//increase counter
$i++;
$itemcounter++;
} //end while
//only show additional values when this setting is enabled
if(isset($showaggregateddata) && $showaggregateddata == 1 )
{
//it's only useful to calculate standard deviation and arithmetic means for question types
//5 = 5 Point Scale
//A = Array (5 Point Choice)
if($qtype == "5" || $qtype == "A")
{
$stddev = 0;
$am = 0;
//calculate arithmetic mean
if(isset($sumitems) && $sumitems > 0)
{
//calculate and round results
//there are always 5 items
for($x = 0; $x < 5; $x++)
{
//create product of item * value
$am += (($x+1) * $stddevarray[$x]);
}
//prevent division by zero
if(isset($stddevarray) && array_sum($stddevarray) > 0)
{
$am = round($am / array_sum($stddevarray),2);
}
else
{
$am = 0;
}
//calculate standard deviation -> loop through all data
/*
* four steps to calculate the standard deviation
* 1 = calculate difference between item and arithmetic mean and multiply with the number of elements
* 2 = create sqaure value of difference
* 3 = sum up square values
* 4 = multiply result with 1 / (number of items)
* 5 = get root
*/
for($j = 0; $j < 5; $j++)
{
//1 = calculate difference between item and arithmetic mean
$diff = (($j+1) - $am);
//2 = create square value of difference
$squarevalue = square($diff);
//3 = sum up square values and multiply them with the occurence
//prevent divison by zero
if($squarevalue != 0 && $stddevarray[$j] != 0)
{
$stddev += $squarevalue * $stddevarray[$j];
}
}
//4 = multiply result with 1 / (number of items (=5))
//There are two different formulas to calculate standard derivation
//$stddev = $stddev / array_sum($stddevarray); //formula source: http://de.wikipedia.org/wiki/Standardabweichung
//prevent division by zero
if((array_sum($stddevarray)-1) != 0 && $stddev != 0)
{
$stddev = $stddev / (array_sum($stddevarray)-1); //formula source: http://de.wikipedia.org/wiki/Empirische_Varianz
}
else
{
$stddev = 0;
}
//5 = get root
$stddev = sqrt($stddev);
$stddev = round($stddev,2);
}
switch($outputType)
{
case 'xls':
$tableXLS[] = array($statlang->gT("Arithmetic mean"),$am,'','');
$tableXLS[] = array($statlang->gT("Standard deviation"),$stddev,'','');
++$xlsRow;
$sheet->write($xlsRow,0,$statlang->gT("Arithmetic mean"));
$sheet->write($xlsRow,1,$am);
++$xlsRow;
$sheet->write($xlsRow,0,$statlang->gT("Standard deviation"));
$sheet->write($xlsRow,1,$stddev);
break;
case 'pdf':
$tablePDF[] = array($statlang->gT("Arithmetic mean"),$am,'','');
$tablePDF[] = array($statlang->gT("Standard deviation"),$stddev,'','');
break;
case 'html':
//calculate standard deviation
$statisticsoutput .= "<tr><td align='center'>".$statlang->gT("Arithmetic mean")."</td>"; //German: "Fallzahl"
$statisticsoutput .= "<td> </td><td align='center'> $am</td><td> </td></tr>";
$statisticsoutput .= "<tr><td align='center'>".$statlang->gT("Standard deviation")."</td>"; //German: "Fallzahl"
$statisticsoutput .= "<td> </td><td align='center'>$stddev</td><td> </td></tr>";
break;
default:
break;
}
}
}
if($outputType=='pdf') //XXX TODO PDF
{
//$tablePDF = array();
$tablePDF = array_merge_recursive($tablePDF, $footPDF);
$pdf->headTable($headPDF,$tablePDF);
//$pdf->tableintopdf($tablePDF);
// if(isset($footPDF))
// foreach($footPDF as $foot)
// {
// $footA = array($foot);
// $pdf->tablehead($footA);
// }
}
//-------------------------- PCHART OUTPUT ----------------------------
//PCHART has to be enabled and we need some data
if ($usegraph==1 && array_sum($gdata)>0)
{
$graph = "";
$p1 = "";
// $statisticsoutput .= "<pre>";
// $statisticsoutput .= "GDATA:\n";
// print_r($gdata);
// $statisticsoutput .= "GRAWDATA\n";
// print_r($grawdata);
// $statisticsoutput .= "LABEL\n";
// print_r($label);
// $statisticsoutput .= "JUSTCODE\n";
// print_r($justcode);
// $statisticsoutput .= "LBL\n";
// print_r($lbl);
// $statisticsoutput .= "</pre>";
//First, lets delete any earlier graphs from the tmp directory
//$gdata and $lbl are arrays built at the end of the last section
//that contain the values, and labels for the data we are about
//to send to pchart.
$i = 0;
foreach ($gdata as $data)
{
if ($data != 0){$i++;}
}
$totallines=$i;
if ($totallines>15)
{
$gheight=320+(6.7*($totallines-15));
$fontsize=7;
$legendtop=0.01;
$setcentrey=0.5/(($gheight/320));
}
else
{
$gheight=320;
$fontsize=8;
$legendtop=0.07;
$setcentrey=0.5;
}
// Create bar chart for Multiple choice
if ($qtype == "M" || $qtype == "P")
{
//new bar chart using data from array $grawdata which contains percentage
$DataSet = new pData;
$counter=0;
$maxyvalue=0;
foreach ($grawdata as $datapoint)
{
$DataSet->AddPoint(array($datapoint),"Serie$counter");
$DataSet->AddSerie("Serie$counter");
$counter++;
if ($datapoint>$maxyvalue) $maxyvalue=$datapoint;
}
if ($maxyvalue<10) {++$maxyvalue;}
$counter=0;
foreach ($lbl as $label)
{
$DataSet->SetSerieName($label,"Serie$counter");
$counter++;
}
if ($MyCache->IsInCache("graph".$surveyid,$DataSet->GetData()))
{
$cachefilename=basename($MyCache->GetFileFromCache("graph".$surveyid,$DataSet->GetData()));
}
else
{
$graph = new pChart(1,1);
$graph->setFontProperties($rootdir."/fonts/".$chartfontfile, $chartfontsize);
$legendsize=$graph->getLegendBoxSize($DataSet->GetDataDescription());
if ($legendsize[1]<320) $gheight=420; else $gheight=$legendsize[1]+100;
$graph = new pChart(690+$legendsize[0],$gheight);
$graph->loadColorPalette($homedir.'/styles/'.$admintheme.'/limesurvey.pal');
$graph->setFontProperties($rootdir."/fonts/".$chartfontfile,$chartfontsize);
$graph->setGraphArea(50,30,500,$gheight-60);
$graph->drawFilledRoundedRectangle(7,7,523+$legendsize[0],$gheight-7,5,254,255,254);
$graph->drawRoundedRectangle(5,5,525+$legendsize[0],$gheight-5,5,230,230,230);
$graph->drawGraphArea(255,255,255,TRUE);
$graph->drawScale($DataSet->GetData(),$DataSet->GetDataDescription(),SCALE_START0,150,150,150,TRUE,90,0,TRUE,5,false);
$graph->drawGrid(4,TRUE,230,230,230,50);
// Draw the 0 line
$graph->setFontProperties($rootdir."/fonts/".$chartfontfile,$chartfontsize);
$graph->drawTreshold(0,143,55,72,TRUE,TRUE);
// Draw the bar graph
$graph->drawBarGraph($DataSet->GetData(),$DataSet->GetDataDescription(),FALSE);
//$Test->setLabel($DataSet->GetData(),$DataSet->GetDataDescription(),"Serie4","1","Important point!");
// Finish the graph
$graph->setFontProperties($rootdir."/fonts/".$chartfontfile, $chartfontsize);
$graph->drawLegend(510,30,$DataSet->GetDataDescription(),255,255,255);
$MyCache->WriteToCache("graph".$surveyid,$DataSet->GetData(),$graph);
$cachefilename=basename($MyCache->GetFileFromCache("graph".$surveyid,$DataSet->GetData()));
unset($graph);
}
} //end if (bar chart)
//Pie Chart
else
{
// this block is to remove the items with value == 0
$i = 0;
while (isset ($gdata[$i]))
{
if ($gdata[$i] == 0)
{
array_splice ($gdata, $i, 1);
array_splice ($lbl, $i, 1);
}
else
{$i++;}
}
$lblout=array();
if ($language=='ar')
{
$lblout=$lbl; //reset text order to original
include_once($rootdir.'/classes/core/Arabic.php');
$Arabic = new Arabic('ArGlyphs');
foreach($lblout as $kkey => $kval){
if (preg_match("^[A-Za-z]^", $kval)) { //auto detect if english
//eng
//no reversing
}
else{
$kval = $Arabic->utf8Glyphs($kval,50,false);
$lblout[$kkey] = $kval;
}
}
}
elseif (getLanguageRTL($language))
{
$lblout=$lblrtl;
}
else
{
$lblout=$lbl;
}
//create new 3D pie chart
if ($usegraph==1)
{
$DataSet = new pData;
$DataSet->AddPoint($gdata,"Serie1");
$DataSet->AddPoint($lblout,"Serie2");
$DataSet->AddAllSeries();
$DataSet->SetAbsciseLabelSerie("Serie2");
if ($MyCache->IsInCache("graph".$surveyid,$DataSet->GetData()))
{
$cachefilename=basename($MyCache->GetFileFromCache("graph".$surveyid,$DataSet->GetData()));
}
else
{
$gheight=ceil($gheight);
$graph = new pChart(690,$gheight);
$graph->loadColorPalette($homedir.'/styles/'.$admintheme.'/limesurvey.pal');
$graph->drawFilledRoundedRectangle(7,7,687,$gheight-3,5,254,255,254);
$graph->drawRoundedRectangle(5,5,689,$gheight-1,5,230,230,230);
// Draw the pie chart
$graph->setFontProperties($rootdir."/fonts/".$chartfontfile, $chartfontsize);
$graph->drawPieGraph($DataSet->GetData(),$DataSet->GetDataDescription(),225,round($gheight/2),170,PIE_PERCENTAGE,TRUE,50,20,5);
$graph->setFontProperties($rootdir."/fonts/".$chartfontfile,$chartfontsize);
$graph->drawPieLegend(430,12,$DataSet->GetData(),$DataSet->GetDataDescription(),250,250,250);
$MyCache->WriteToCache("graph".$surveyid,$DataSet->GetData(),$graph);
$cachefilename=basename($MyCache->GetFileFromCache("graph".$surveyid,$DataSet->GetData()));
unset($graph);
}
//print_r($DataSet->GetData()); echo "<br/><br/>";
}
} //end else -> pie charts
//introduce new counter
if (!isset($ci)) {$ci=0;}
//increase counter, start value -> 1
$ci++;
switch($outputType)
{
case 'xls':
/**
* No Image for Excel...
*/
break;
case 'pdf':
$pdf->AddPage('P','A4');
$pdf->titleintopdf($pdfTitle,$titleDesc);
$pdf->Image($tempdir."/".$cachefilename, 0, 70, 180, 0, '', $homeurl."/admin.php?sid=$surveyid", 'B', true, 150,'C',false,false,0,true);
break;
case 'html':
$statisticsoutput .= "<tr><td colspan='4' style=\"text-align:center\"><img src=\"$tempurl/".$cachefilename."\" border='1' /></td></tr>";
break;
default:
break;
}
}
//close table/output
if($outputType=='html')
$statisticsoutput .= "</table><br /> \n";
} //end if -> collect and display results
//delete data
unset($gdata);
unset($grawdata);
unset($label);
unset($lbl);
unset($lblrtl);
unset($lblout);
unset($justcode);
unset ($alist);
} // end foreach -> loop through all questions
//output
if($outputType=='html')
$statisticsoutput .= "<br /> \n";
} //end if -> show summary results
switch($outputType)
{
case 'xls':
//$workbook->
$workbook->close();
if($pdfOutput=='F')
{
return $sFileName;
}
else
{
return;
}
break;
case 'pdf':
$pdf->lastPage();
if($pdfOutput=='F')
{ // This is only used by lsrc to send an E-Mail attachment, so it gives back the filename to send and delete afterwards
$pdf->Output($tempdir."/".$statlang->gT('Survey').'_'.$surveyid."_".$surveyInfo['surveyls_title'].'.pdf', $pdfOutput);
return $tempdir."/".$statlang->gT('Survey').'_'.$surveyid."_".$surveyInfo['surveyls_title'].'.pdf';
}
else
return $pdf->Output($statlang->gT('Survey').'_'.$surveyid."_".$surveyInfo['surveyls_title'].'.pdf', $pdfOutput);
break;
case 'html':
return $statisticsoutput;
break;
default:
return $statisticsoutput;
break;
}
}
/** Builds the list of addon SQL select statements
* that builds the query result set
*
* @param $allfields An array containing the names of the fields/answers we want to display in the statistics summary
* @param $fieldmap The fieldmap for the survey
* @param $language The language to use
*
* @return array $selects array of individual select statements that can be added/appended to
* the 'where' portion of a SQL statement to restrict the result set
* ie: array("`FIELDNAME`='Y'", "`FIELDNAME2`='Hello'");
*
*/
function buildSelects($allfields, $surveyid, $language)
{
//Create required variables
$selects = array();
$aQuestionMap = array();
$fieldmap = createFieldMap($surveyid, "full", false, false, $language);
foreach ($fieldmap as $field) {
if (isset($field['qid']) && $field['qid'] != '') {
$aQuestionMap[] = $field['sid'] . 'X' . $field['gid'] . 'X' . $field['qid'];
}
}
// creates array of post variable names
for (reset($_POST); $key = key($_POST); next($_POST)) {
$postvars[] = $key;
}
/*
* Iterate through postvars to create "nice" data for SQL later.
*
* Remember there might be some filters applied which have to be put into an SQL statement
*
* This foreach iterates through the name ($key) of each post value and builds a SELECT
* statement out of it. It returns an array called $selects[] which will have a select query
* for each filter chosen. ie: $select[0]="`74X71X428EXP` ='Y'";
*
* This array is used later to build the overall query used to limit the number of responses
*
*/
if (isset($postvars)) {
foreach ($postvars as $pv) {
//Only do this if there is actually a value for the $pv
if (in_array($pv, $allfields) || in_array(substr($pv, 1), $aQuestionMap) || in_array($pv, $aQuestionMap) || ($pv[0] == 'D' || $pv[0] == 'N' || $pv[0] == 'K') && (in_array(substr($pv, 1, strlen($pv) - 2), $aQuestionMap) || in_array(substr($pv, 1, strlen($pv) - 3), $aQuestionMap) || in_array(substr($pv, 1, strlen($pv) - 5), $aQuestionMap))) {
$firstletter = substr($pv, 0, 1);
/*
* these question types WON'T be handled here:
* M = Multiple choice
* T - Long Free Text
* Q - Multiple Short Text
* D - Date
* N - Numerical Input
* | - File Upload
* K - Multiple Numerical Input
*/
if ($pv != "sid" && $pv != "display" && $firstletter != "M" && $firstletter != "P" && $firstletter != "T" && $firstletter != "Q" && $firstletter != "D" && $firstletter != "N" && $firstletter != "K" && $firstletter != "|" && $pv != "summary" && substr($pv, 0, 2) != "id" && substr($pv, 0, 9) != "datestamp") {
//put together some SQL here
$thisquestion = Yii::app()->db->quoteColumnName($pv) . " IN (";
foreach ($_POST[$pv] as $condition) {
$thisquestion .= "'{$condition}', ";
}
$thisquestion = substr($thisquestion, 0, -2) . ")";
//we collect all the to be selected data in this array
$selects[] = $thisquestion;
} elseif ($firstletter == "M" || $firstletter == "P") {
$mselects = array();
//create a list out of the $pv array
list($lsid, $lgid, $lqid) = explode("X", $pv);
$aresult = Question::model()->findAll(array('order' => 'question_order', 'condition' => 'parent_qid=:parent_qid AND scale_id=0', 'params' => array(":parent_qid" => $lqid)));
foreach ($aresult as $arow) {
// only add condition if answer has been chosen
if (in_array($arow['title'], $_POST[$pv])) {
$mselects[] = Yii::app()->db->quoteColumnName(substr($pv, 1, strlen($pv)) . $arow['title']) . " = 'Y'";
}
}
/* If there are mutliple conditions generated from this multiple choice question, join them using the boolean "OR" */
if ($mselects) {
$thismulti = implode(" OR ", $mselects);
$selects[] = "({$thismulti})";
unset($mselects);
}
} elseif ($firstletter == "N" || $firstletter == "K") {
//value greater than
if (substr($pv, strlen($pv) - 1, 1) == "G" && $_POST[$pv] != "") {
$selects[] = Yii::app()->db->quoteColumnName(substr($pv, 1, -1)) . " > " . sanitize_int($_POST[$pv]);
}
//value less than
if (substr($pv, strlen($pv) - 1, 1) == "L" && $_POST[$pv] != "") {
$selects[] = Yii::app()->db->quoteColumnName(substr($pv, 1, -1)) . " < " . sanitize_int($_POST[$pv]);
}
} else {
if ($firstletter == "|") {
// no. of files greater than
if (substr($pv, strlen($pv) - 1, 1) == "G" && $_POST[$pv] != "") {
$selects[] = Yii::app()->db->quoteColumnName(substr($pv, 1, -1) . "_filecount") . " > " . sanitize_int($_POST[$pv]);
}
// no. of files less than
if (substr($pv, strlen($pv) - 1, 1) == "L" && $_POST[$pv] != "") {
$selects[] = Yii::app()->db->quoteColumnName(substr($pv, 1, -1) . "_filecount") . " < " . sanitize_int($_POST[$pv]);
}
} elseif (substr($pv, 0, 2) == "id") {
if (substr($pv, strlen($pv) - 1, 1) == "G" && $_POST[$pv] != "") {
$selects[] = Yii::app()->db->quoteColumnName(substr($pv, 0, -1)) . " > " . sanitize_int($_POST[$pv]);
}
if (substr($pv, strlen($pv) - 1, 1) == "L" && $_POST[$pv] != "") {
$selects[] = Yii::app()->db->quoteColumnName(substr($pv, 0, -1)) . " < " . sanitize_int($_POST[$pv]);
}
} elseif (($firstletter == "T" || $firstletter == "Q") && $_POST[$pv] != "") {
$selectSubs = array();
//We intepret and * and % as wildcard matches, and use ' OR ' and , as the separators
$pvParts = explode(",", str_replace('*', '%', str_replace(' OR ', ',', $_POST[$pv])));
if (is_array($pvParts) and count($pvParts)) {
foreach ($pvParts as $pvPart) {
$selectSubs[] = Yii::app()->db->quoteColumnName(substr($pv, 1, strlen($pv))) . " LIKE '" . trim($pvPart) . "'";
}
if (count($selectSubs)) {
$selects[] = ' (' . implode(' OR ', $selectSubs) . ') ';
}
}
} elseif ($firstletter == "D" && $_POST[$pv] != "") {
//Date equals
if (substr($pv, -2) == "eq") {
$selects[] = Yii::app()->db->quoteColumnName(substr($pv, 1, strlen($pv) - 3)) . " = " . dbQuoteAll($_POST[$pv]);
} else {
//date less than
if (substr($pv, -4) == "less") {
$selects[] = Yii::app()->db->quoteColumnName(substr($pv, 1, strlen($pv) - 5)) . " >= " . dbQuoteAll($_POST[$pv]);
}
//date greater than
if (substr($pv, -4) == "more") {
$selects[] = Yii::app()->db->quoteColumnName(substr($pv, 1, strlen($pv) - 5)) . " <= " . dbQuoteAll($_POST[$pv]);
}
}
} elseif (substr($pv, 0, 9) == "datestamp") {
//timestamp equals
$formatdata = getDateFormatData(Yii::app()->session['dateformat']);
if (substr($pv, -1, 1) == "E" && !empty($_POST[$pv])) {
$datetimeobj = new Date_Time_Converter($_POST[$pv], $formatdata['phpdate'] . ' H:i');
$sDateValue = $datetimeobj->convert("Y-m-d");
$selects[] = Yii::app()->db->quoteColumnName('datestamp') . " >= " . dbQuoteAll($sDateValue . " 00:00:00") . " and " . Yii::app()->db->quoteColumnName('datestamp') . " <= " . dbQuoteAll($sDateValue . " 23:59:59");
} else {
//timestamp less than
if (substr($pv, -1, 1) == "L" && !empty($_POST[$pv])) {
$datetimeobj = new Date_Time_Converter($_POST[$pv], $formatdata['phpdate'] . ' H:i');
$sDateValue = $datetimeobj->convert("Y-m-d H:i:s");
$selects[] = Yii::app()->db->quoteColumnName('datestamp') . " < " . dbQuoteAll($sDateValue);
}
//timestamp greater than
if (substr($pv, -1, 1) == "G" && !empty($_POST[$pv])) {
$datetimeobj = new Date_Time_Converter($_POST[$pv], $formatdata['phpdate'] . ' H:i');
$sDateValue = $datetimeobj->convert("Y-m-d H:i:s");
$selects[] = Yii::app()->db->quoteColumnName('datestamp') . " > " . dbQuoteAll($sDateValue);
}
}
}
}
}
}
}
//end foreach -> loop through filter options to create SQL
return $selects;
}
/**
* Saves the new survey after the creation screen is submitted
*
* @param $iSurveyID The survey id to be used for the new survey. If already taken a new random one will be used.
*/
function insert($iSurveyID = null)
{
if (Permission::model()->hasGlobalPermission('surveys', 'create')) {
// Check if survey title was set
if (!$_POST['surveyls_title']) {
Yii::app()->session['flashmessage'] = gT("Survey could not be created because it did not have a title");
redirect($this->getController()->createUrl('admin'));
return;
}
Yii::app()->loadHelper("surveytranslator");
// If start date supplied convert it to the right format
$aDateFormatData = getDateFormatData(Yii::app()->session['dateformat']);
$sStartDate = $_POST['startdate'];
if (trim($sStartDate) != '') {
Yii::import('application.libraries.Date_Time_Converter');
$converter = new Date_Time_Converter($sStartDate, $aDateFormatData['phpdate'] . ' H:i:s');
$sStartDate = $converter->convert("Y-m-d H:i:s");
}
// If expiry date supplied convert it to the right format
$sExpiryDate = $_POST['expires'];
if (trim($sExpiryDate) != '') {
Yii::import('application.libraries.Date_Time_Converter');
$converter = new Date_Time_Converter($sExpiryDate, $aDateFormatData['phpdate'] . ' H:i:s');
$sExpiryDate = $converter->convert("Y-m-d H:i:s");
}
$iTokenLength = $_POST['tokenlength'];
//token length has to be at least 5, otherwise set it to default (15)
if ($iTokenLength < 5) {
$iTokenLength = 15;
}
if ($iTokenLength > 36) {
$iTokenLength = 36;
}
// Insert base settings into surveys table
$aInsertData = array('expires' => $sExpiryDate, 'startdate' => $sStartDate, 'template' => App()->request->getPost('template'), 'owner_id' => Yii::app()->session['loginID'], 'admin' => App()->request->getPost('admin'), 'active' => 'N', 'anonymized' => App()->request->getPost('anonymized'), 'faxto' => App()->request->getPost('faxto'), 'format' => App()->request->getPost('format'), 'savetimings' => App()->request->getPost('savetimings'), 'language' => App()->request->getPost('language'), 'datestamp' => App()->request->getPost('datestamp'), 'ipaddr' => App()->request->getPost('ipaddr'), 'refurl' => App()->request->getPost('refurl'), 'usecookie' => App()->request->getPost('usecookie'), 'emailnotificationto' => App()->request->getPost('emailnotificationto'), 'allowregister' => App()->request->getPost('allowregister'), 'allowsave' => App()->request->getPost('allowsave'), 'navigationdelay' => App()->request->getPost('navigationdelay'), 'autoredirect' => App()->request->getPost('autoredirect'), 'showxquestions' => App()->request->getPost('showxquestions'), 'showgroupinfo' => App()->request->getPost('showgroupinfo'), 'showqnumcode' => App()->request->getPost('showqnumcode'), 'shownoanswer' => App()->request->getPost('shownoanswer'), 'showwelcome' => App()->request->getPost('showwelcome'), 'allowprev' => App()->request->getPost('allowprev'), 'questionindex' => App()->request->getPost('questionindex'), 'nokeyboard' => App()->request->getPost('nokeyboard'), 'showprogress' => App()->request->getPost('showprogress'), 'printanswers' => App()->request->getPost('printanswers'), 'listpublic' => App()->request->getPost('public'), 'htmlemail' => App()->request->getPost('htmlemail'), 'sendconfirmation' => App()->request->getPost('sendconfirmation'), 'tokenanswerspersistence' => App()->request->getPost('tokenanswerspersistence'), 'alloweditaftercompletion' => App()->request->getPost('alloweditaftercompletion'), 'usecaptcha' => App()->request->getPost('usecaptcha'), 'publicstatistics' => App()->request->getPost('publicstatistics'), 'publicgraphs' => App()->request->getPost('publicgraphs'), 'assessments' => App()->request->getPost('assessments'), 'emailresponseto' => App()->request->getPost('emailresponseto'), 'tokenlength' => $iTokenLength);
$warning = '';
// make sure we only update emails if they are valid
if (Yii::app()->request->getPost('adminemail', '') == '' || validateEmailAddress(Yii::app()->request->getPost('adminemail'))) {
$aInsertData['adminemail'] = Yii::app()->request->getPost('adminemail');
} else {
$aInsertData['adminemail'] = '';
$warning .= gT("Warning! Notification email was not updated because it was not valid.") . '<br/>';
}
if (Yii::app()->request->getPost('bounce_email', '') == '' || validateEmailAddress(Yii::app()->request->getPost('bounce_email'))) {
$aInsertData['bounce_email'] = Yii::app()->request->getPost('bounce_email');
} else {
$aInsertData['bounce_email'] = '';
$warning .= gT("Warning! Bounce email was not updated because it was not valid.") . '<br/>';
}
if (!is_null($iSurveyID)) {
$aInsertData['wishSID'] = $iSurveyID;
}
$iNewSurveyid = Survey::model()->insertNewSurvey($aInsertData);
if (!$iNewSurveyid) {
die('Survey could not be created.');
}
// Prepare locale data for surveys_language_settings table
$sTitle = $_POST['surveyls_title'];
$sDescription = $_POST['description'];
$sWelcome = $_POST['welcome'];
$sURLDescription = $_POST['urldescrip'];
$sTitle = html_entity_decode($sTitle, ENT_QUOTES, "UTF-8");
$sDescription = html_entity_decode($sDescription, ENT_QUOTES, "UTF-8");
$sWelcome = html_entity_decode($sWelcome, ENT_QUOTES, "UTF-8");
$sURLDescription = html_entity_decode($sURLDescription, ENT_QUOTES, "UTF-8");
// Fix bug with FCKEditor saving strange BR types
$sTitle = fixCKeditorText($sTitle);
$sDescription = fixCKeditorText($sDescription);
$sWelcome = fixCKeditorText($sWelcome);
// Insert base language into surveys_language_settings table
$aInsertData = array('surveyls_survey_id' => $iNewSurveyid, 'surveyls_title' => $sTitle, 'surveyls_description' => $sDescription, 'surveyls_welcometext' => $sWelcome, 'surveyls_language' => $_POST['language'], 'surveyls_urldescription' => $_POST['urldescrip'], 'surveyls_endtext' => $_POST['endtext'], 'surveyls_url' => $_POST['url'], 'surveyls_dateformat' => (int) $_POST['dateformat'], 'surveyls_numberformat' => (int) $_POST['numberformat']);
$langsettings = new SurveyLanguageSetting();
$langsettings->insertNewSurvey($aInsertData);
Yii::app()->session['flashmessage'] = $warning . gT("Survey was successfully added.");
// Update survey permissions
Permission::model()->giveAllSurveyPermissions(Yii::app()->session['loginID'], $iNewSurveyid);
$this->getController()->redirect(array('admin/survey/sa/view/surveyid/' . $iNewSurveyid));
}
}
function createinsertquery()
{
global $thissurvey, $timeadjust, $move, $thisstep;
global $deletenonvalues, $thistpl;
global $surveyid, $connect, $clang, $postedfieldnames, $bFinalizeThisAnswer;
require_once "classes/inputfilter/class.inputfilter_clean.php";
$myFilter = new InputFilter('', '', 1, 1, 1);
$fieldmap = createFieldMap($surveyid);
//Creates a list of the legitimate questions for this survey
if (isset($_SESSION['insertarray']) && is_array($_SESSION['insertarray'])) {
$inserts = array_unique($_SESSION['insertarray']);
$colnames_hidden = array();
foreach ($inserts as $value) {
//Work out if the field actually exists in this survey
$fieldexists = '';
if (isset($fieldmap[$value])) {
$fieldexists = $fieldmap[$value];
}
//Iterate through possible responses
if (isset($_SESSION[$value]) && !empty($fieldexists)) {
//Only create column name and data entry if there is actually data!
$colnames[] = $value;
//If deletenonvalues is ON, delete any values that shouldn't exist
if ($deletenonvalues == 1 && !checkconfield($value)) {
$values[] = 'NULL';
$colnames_hidden[] = $value;
} elseif ($_SESSION[$value] == '' && $fieldexists['type'] == 'D' || $_SESSION[$value] == '' && $fieldexists['type'] == 'K' || $_SESSION[$value] == '' && $fieldexists['type'] == 'N') {
// most databases do not allow to insert an empty value into a datefield,
// therefore if no date was chosen in a date question the insert value has to be NULL
$values[] = 'NULL';
} else {
// Empty the 'Other' field if a value other than '-oth-' was set for the main field (prevent invalid other values being saved - for example if Javascript fails to hide the 'Other' input field)
if ($fieldexists['type'] == '!' && $fieldmap[$value]['aid'] == 'other' && isset($_POST[substr($value, 0, strlen($value) - 5)]) && $_POST[substr($value, 0, strlen($value) - 5)] != '-oth-') {
$_SESSION[$value] = '';
} elseif ($fieldexists['type'] == 'N') {
$_SESSION[$value] = sanitize_float($_SESSION[$value]);
} elseif ($fieldexists['type'] == 'D' && is_array($postedfieldnames) && in_array($value, $postedfieldnames)) {
// convert the date to the right DB Format but only if it was posted
$dateformatdatat = getDateFormatData($thissurvey['surveyls_dateformat']);
$datetimeobj = new Date_Time_Converter($_SESSION[$value], $dateformatdatat['phpdate']);
$_SESSION[$value] = $datetimeobj->convert("Y-m-d");
$_SESSION[$value] = $connect->BindDate($_SESSION[$value]);
}
$values[] = $connect->qstr($_SESSION[$value], get_magic_quotes_gpc());
}
}
}
if ($thissurvey['datestamp'] == "Y") {
$_SESSION['datestamp'] = date_shift(date("Y-m-d H:i:s"), "Y-m-d H:i:s", $timeadjust);
}
// First compute the submitdate
if ($thissurvey['private'] == "Y" && $thissurvey['datestamp'] == "N") {
// In case of anonymous answers survey with no datestamp
// then the the answer submutdate gets a conventional timestamp
// 1st Jan 1980
$mysubmitdate = date("Y-m-d H:i:s", mktime(0, 0, 0, 1, 1, 1980));
} else {
$mysubmitdate = date_shift(date("Y-m-d H:i:s"), "Y-m-d H:i:s", $timeadjust);
}
// CHECK TO SEE IF ROW ALREADY EXISTS
// srid (=Survey Record ID ) is set when the there were already answers saved for that survey
if (!isset($_SESSION['srid'])) {
//Prepare row insertion
if (!isset($colnames) || !is_array($colnames)) {
echo submitfailed();
exit;
}
// INSERT NEW ROW
$query = "INSERT INTO " . db_quote_id($thissurvey['tablename']) . "\n" . "(" . implode(', ', array_map('db_quote_id', $colnames));
$query .= "," . db_quote_id('lastpage');
if ($thissurvey['datestamp'] == "Y") {
$query .= "," . db_quote_id('datestamp');
$query .= "," . db_quote_id('startdate');
}
if ($thissurvey['ipaddr'] == "Y") {
$query .= "," . db_quote_id('ipaddr');
}
$query .= "," . db_quote_id('startlanguage');
if ($thissurvey['refurl'] == "Y") {
$query .= "," . db_quote_id('refurl');
}
if ($bFinalizeThisAnswer === true && $thissurvey['format'] != "A") {
$query .= "," . db_quote_id('submitdate');
}
$query .= ") ";
$query .= "VALUES (" . implode(", ", $values);
$query .= "," . ($thisstep + 1);
if ($thissurvey['datestamp'] == "Y") {
$query .= ", '" . $_SESSION['datestamp'] . "'";
$query .= ", '" . $_SESSION['datestamp'] . "'";
}
if ($thissurvey['ipaddr'] == "Y") {
$query .= ", '" . $_SERVER['REMOTE_ADDR'] . "'";
}
$query .= ", '" . $_SESSION['s_lang'] . "'";
if ($thissurvey['refurl'] == "Y") {
$query .= ", '" . $_SESSION['refurl'] . "'";
}
if ($bFinalizeThisAnswer === true && $thissurvey['format'] != "A") {
// is if a ALL-IN-ONE survey, we don't set the submit date before the data is validated
$query .= ", " . $connect->DBDate($mysubmitdate);
}
$query .= ")";
} else {
// UPDATE EXISTING ROW
// Updates only the MODIFIED fields posted on current page.
if (isset($postedfieldnames) && $postedfieldnames) {
$query = "UPDATE {$thissurvey['tablename']} SET ";
$query .= " lastpage = '" . $thisstep . "',";
if ($thissurvey['datestamp'] == "Y") {
$query .= " datestamp = '" . $_SESSION['datestamp'] . "',";
}
if ($thissurvey['ipaddr'] == "Y") {
$query .= " ipaddr = '" . $_SERVER['REMOTE_ADDR'] . "',";
}
// is if a ALL-IN-ONE survey, we don't set the submit date before the data is validated
if ($bFinalizeThisAnswer === true && $thissurvey['format'] != "A") {
$query .= " submitdate = " . $connect->DBDate($mysubmitdate) . ", ";
}
// Resets fields hidden due to conditions
if ($deletenonvalues == 1) {
$hiddenfields = array_unique(array_values($colnames_hidden));
foreach ($hiddenfields as $hiddenfield) {
//$fieldinfo = arraySearchByKey($hiddenfield, $fieldmap, "fieldname", 1);
//if ($fieldinfo['type']=='D' || $fieldinfo['type']=='N' || $fieldinfo['type']=='K')
//{
$query .= db_quote_id($hiddenfield) . " = NULL,";
//}
//else
//{
// $query .= db_quote_id($hiddenfield)." = '',";
//}
}
} else {
$hiddenfields = array();
}
$fields = $postedfieldnames;
$fields = array_unique($fields);
$fields = array_diff($fields, $hiddenfields);
// Do not take fields that are hidden
foreach ($fields as $field) {
if (!empty($field)) {
$fieldinfo = $fieldmap[$field];
if (!isset($_POST[$field])) {
$_POST[$field] = '';
}
//fixed numerical question fields. They have to be NULL instead of '' to avoid database errors
if ($_POST[$field] == '' && $fieldinfo['type'] == 'D' || $_POST[$field] == '' && $fieldinfo['type'] == 'N' || $_POST[$field] == '' && $fieldinfo['type'] == 'K') {
$query .= db_quote_id($field) . " = NULL,";
} else {
// Empty the 'Other' field if a value other than '-oth-' was set for the main field (prevent invalid other values being saved - for example if Javascript fails to hide the 'Other' input field)
if ($fieldinfo['type'] == '!' && $fieldmap[$field]['aid'] == 'other' && $_POST[substr($field, 0, strlen($field) - 5)] != '-oth-') {
$qfield = "''";
} elseif ($fieldinfo['type'] == 'N') {
$qfield = db_quoteall(sanitize_float($_POST[$field]));
} elseif ($fieldinfo['type'] == 'D') {
$dateformatdatat = getDateFormatData($thissurvey['surveyls_dateformat']);
$datetimeobj = new Date_Time_Converter($_POST[$field], $dateformatdatat['phpdate']);
$qfield = db_quoteall($connect->BindDate($datetimeobj->convert("Y-m-d")));
} else {
$qfield = db_quoteall($_POST[$field], true);
}
$query .= db_quote_id($field) . " = " . $qfield . ",";
}
}
}
$query .= "WHERE id=" . $_SESSION['srid'];
$query = str_replace(",WHERE", " WHERE", $query);
// remove comma before WHERE clause
} else {
$query = "";
if ($bFinalizeThisAnswer === true) {
$query = "UPDATE {$thissurvey['tablename']} SET ";
$query .= " submitdate = " . $connect->DBDate($mysubmitdate);
$query .= " WHERE id=" . $_SESSION['srid'];
}
}
}
//DEBUG START
//echo $query;
//DEBUG END
return $query;
} else {
sendcacheheaders();
doHeader();
foreach (file("{$thistpl}/startpage.pstpl") as $op) {
echo templatereplace($op);
}
echo "<br /><center><font face='verdana' size='2'><font color='red'><strong>" . $clang->gT("Error") . "</strong></font><br /><br />\n";
echo $clang->gT("Cannot submit results - there are none to submit.") . "<br /><br />\n";
echo "<font size='1'>" . $clang->gT("This error can occur if you have already submitted your responses and pressed 'refresh' on your browser. In this case, your responses have already been saved.") . "<br /><br />" . $clang->gT("If you receive this message in the middle of completing a survey, you should choose '<- BACK' on your browser and then refresh/reload the previous page. While you will lose answers from the last page all your others will still exist. This problem can occur if the webserver is suffering from overload or excessive use. We apologise for this problem.") . "<br />\n";
echo "</font></center><br /><br />";
exit;
}
}
/**
* Handle token form for addnew/edit actions
*/
function _handletokenform($iSurveyId, $subaction, $iTokenId = "")
{
// CHECK TO SEE IF A TOKEN TABLE EXISTS FOR THIS SURVEY
$bTokenExists = tableExists('{{tokens_' . $iSurveyId . '}}');
if (!$bTokenExists) {
self::_newtokentable($iSurveyId);
}
$clang = $this->getController()->lang;
Yii::app()->loadHelper("surveytranslator");
if ($subaction == "edit") {
$aData['tokenid'] = $iTokenId;
$aData['tokendata'] = Token::model($iSurveyId)->findByPk($iTokenId);
}
$thissurvey = getSurveyInfo($iSurveyId);
$aAdditionalAttributeFields = $thissurvey['attributedescriptions'];
$aTokenFieldNames = Yii::app()->db->getSchema()->getTable("{{tokens_{$iSurveyId}}}", true);
$aTokenFieldNames = array_keys($aTokenFieldNames->columns);
$aData['attrfieldnames'] = array();
foreach ($aAdditionalAttributeFields as $sField => $aAttrData) {
if (in_array($sField, $aTokenFieldNames)) {
if ($aAttrData['description'] == '') {
$aAttrData['description'] = $sField;
}
$aData['attrfieldnames'][(string) $sField] = $aAttrData;
}
}
foreach ($aTokenFieldNames as $sTokenFieldName) {
if (strpos($sTokenFieldName, 'attribute_') === 0 && (!isset($aData['attrfieldnames']) || !isset($aData['attrfieldnames'][$sTokenFieldName]))) {
$aData['attrfieldnames'][$sTokenFieldName] = array('description' => $sTokenFieldName, 'mandatory' => 'N');
}
}
$aData['thissurvey'] = $thissurvey;
$aData['surveyid'] = $iSurveyId;
$aData['subaction'] = $subaction;
$aData['dateformatdetails'] = getDateFormatData(Yii::app()->session['dateformat']);
$this->_renderWrappedTemplate('token', array('tokenbar', 'tokenform'), $aData);
}
$editsurvey .= "<form id='addnewsurvey' class='form30' name='addnewsurvey' action='{$scriptname}' method='post'>\n" . '<div id="tabs">';
$i = 0;
foreach ($grplangs as $grouplang) {
// this one is created to get the right default texts fo each language
$bplang = new limesurvey_lang($grouplang);
$esquery = "SELECT * FROM " . db_table_name("surveys_languagesettings") . " WHERE surveyls_survey_id={$surveyid} and surveyls_language='{$grouplang}'";
$esresult = db_execute_assoc($esquery);
//Checked
$esrow = $esresult->FetchRow();
$tab_title[$i] = getLanguageNameFromCode($esrow['surveyls_language'], false);
if ($esrow['surveyls_language'] == GetBaseLanguageFromSurveyID($surveyid)) {
$tab_title[$i] .= '(' . $clang->gT("Base language") . ')';
}
$esrow = array_map('htmlspecialchars', $esrow);
$tab_content[$i] = "<ul>\n" . "<li><label for=''>" . $clang->gT("Survey title") . ":</label>\n" . "<input type='text' size='80' name='short_title_" . $esrow['surveyls_language'] . "' value=\"{$esrow['surveyls_title']}\" /></li>\n" . "<li><label for=''>" . $clang->gT("Description:") . "</label>\n" . "<textarea cols='80' rows='15' name='description_" . $esrow['surveyls_language'] . "'>{$esrow['surveyls_description']}</textarea>\n" . getEditor("survey-desc", "description_" . $esrow['surveyls_language'], "[" . $clang->gT("Description:", "js") . "](" . $esrow['surveyls_language'] . ")", $surveyid, '', '', $action) . "</li>\n" . "<li><label for=''>" . $clang->gT("Welcome message:") . "</label>\n" . "<textarea cols='80' rows='15' name='welcome_" . $esrow['surveyls_language'] . "'>{$esrow['surveyls_welcometext']}</textarea>\n" . getEditor("survey-welc", "welcome_" . $esrow['surveyls_language'], "[" . $clang->gT("Welcome:", "js") . "](" . $esrow['surveyls_language'] . ")", $surveyid, '', '', $action) . "</li>\n" . "<li><label for=''>" . $clang->gT("End message:") . "</label>\n" . "<textarea cols='80' rows='15' name='endtext_" . $esrow['surveyls_language'] . "'>{$esrow['surveyls_endtext']}</textarea>\n" . getEditor("survey-endtext", "endtext_" . $esrow['surveyls_language'], "[" . $clang->gT("End message:", "js") . "](" . $esrow['surveyls_language'] . ")", $surveyid, '', '', $action) . "</li>\n" . "<li><label for=''>" . $clang->gT("End URL:") . "</label>\n" . "<input type='text' size='80' name='url_" . $esrow['surveyls_language'] . "' value=\"{$esrow['surveyls_url']}\" />\n" . "</li>" . "<li><label for=''>" . $clang->gT("URL description:") . "</label>\n" . "<input type='text' size='80' name='urldescrip_" . $esrow['surveyls_language'] . "' value=\"{$esrow['surveyls_urldescription']}\" />\n" . "</li>" . "<li><label for=''>" . $clang->gT("Date format:") . "</label>\n" . "<select size='1' name='dateformat_" . $esrow['surveyls_language'] . "'>\n";
foreach (getDateFormatData() as $index => $dateformatdata) {
$tab_content[$i] .= "<option value='{$index}'";
if ($esrow['surveyls_dateformat'] == $index) {
$tab_content[$i] .= " selected='selected'";
}
$tab_content[$i] .= ">" . $dateformatdata['dateformat'] . '</option>';
}
$tab_content[$i] .= "</select></li>" . "<li><label for=''>" . $clang->gT("Decimal separator:") . "</label>\n";
$tab_content[$i] .= "<select size='1' name='numberformat_" . $esrow['surveyls_language'] . "'>\n";
foreach (getRadixPointData() as $index => $radixptdata) {
$tab_content[$i] .= "<option value='{$index}'";
if ($esrow['surveyls_numberformat'] == $index) {
$tab_content[$i] .= " selected='selected'";
}
$tab_content[$i] .= ">" . $radixptdata['desc'] . '</option>';
}
/**
* This function replaces keywords in a text and is mainly intended for templates
* If you use this functions put your replacement strings into the $replacements variable
* instead of using global variables
* NOTE - Don't do any embedded replacements in this function. Create the array of replacement values and
* they will be done in batch at the end
*
* @param mixed $line Text to search in
* @param mixed $replacements Array of replacements: Array( <stringtosearch>=><stringtoreplacewith>
* @param boolean $anonymized Determines if token data is being used or just replaced with blanks
* @param questionNum - needed to support dynamic JavaScript-based tailoring within questions
* @param bStaticReplacement - Default off, forces non-dynamic replacements without <SPAN> tags (e.g. for the Completed page)
* @return string Text with replaced strings
*/
function templatereplace($line, $replacements = array(), &$redata = array(), $debugSrc = 'Unspecified', $anonymized = false, $questionNum = NULL, $registerdata = array(), $bStaticReplacement = false, $oTemplate = '')
{
/*
global $clienttoken,$token,$sitename,$move,$showxquestions,$showqnumcode,$questioncode;
global $s_lang,$errormsg,$saved_id, $languagechanger,$captchapath,$loadname;
*/
/*
$allowedvars = array('surveylist', 'sitename', 'clienttoken', 'rooturl', 'thissurvey', 'imageurl', 'defaulttemplate',
'percentcomplete', 'move', 'groupname', 'groupdescription', 'question', 'showxquestions',
'showgroupinfo', 'showqnumcode', 'questioncode', 'answer', 'navigator', 'help', 'totalquestions',
'surveyformat', 'completed', 'notanswered', 'privacy', 'surveyid', 'publicurl',
'templatedir', 'token', 'assessments', 's_lang', 'errormsg', 'saved_id', 'usertemplaterootdir',
'languagechanger', 'printoutput', 'captchapath', 'loadname');
*/
$allowedvars = array('assessments', 'captchapath', 'clienttoken', 'completed', 'errormsg', 'groupdescription', 'groupname', 'imageurl', 'languagechanger', 'loadname', 'move', 'navigator', 'moveprevbutton', 'movenextbutton', 'percentcomplete', 'privacy', 's_lang', 'saved_id', 'showgroupinfo', 'showqnumcode', 'showxquestions', 'sitename', 'sitelogo', 'surveylist', 'templatedir', 'thissurvey', 'token', 'totalBoilerplatequestions', 'totalquestions', 'questionindex', 'questionindexmenu');
$varsPassed = array();
foreach ($allowedvars as $var) {
if (isset($redata[$var])) {
${$var} = $redata[$var];
$varsPassed[] = $var;
}
}
// if (count($varsPassed) > 0) {
// log_message('debug', 'templatereplace() called from ' . $debugSrc . ' contains: ' . implode(', ', $varsPassed));
// }
// if (isset($redata['question'])) {
// LimeExpressionManager::ShowStackTrace('has QID and/or SGA',$allowedvars);
// }
// extract($redata); // creates variables for each of the keys in the array
// Local over-rides in case not set above
if (!isset($showgroupinfo)) {
$showgroupinfo = Yii::app()->getConfig('showgroupinfo');
}
if (!isset($showqnumcode)) {
$showqnumcode = Yii::app()->getConfig('showqnumcode');
}
$_surveyid = Yii::app()->getConfig('surveyID');
if (!isset($showxquestions)) {
$showxquestions = Yii::app()->getConfig('showxquestions');
}
if (!isset($s_lang)) {
$s_lang = isset(Yii::app()->session['survey_' . $_surveyid]['s_lang']) ? Yii::app()->session['survey_' . $_surveyid]['s_lang'] : 'en';
}
if ($_surveyid && !isset($thissurvey)) {
$thissurvey = getSurveyInfo($_surveyid, $s_lang);
}
if (!isset($captchapath)) {
$captchapath = '';
}
if (!isset($sitename)) {
$sitename = Yii::app()->getConfig('sitename');
}
if (!isset($saved_id) && isset(Yii::app()->session['survey_' . $_surveyid]['srid'])) {
$saved_id = Yii::app()->session['survey_' . $_surveyid]['srid'];
}
Yii::app()->loadHelper('surveytranslator');
if (isset($thissurvey['sid'])) {
$surveyid = $thissurvey['sid'];
}
// lets sanitize the survey template
if (isset($thissurvey['templatedir'])) {
$templatename = $thissurvey['templatedir'];
} else {
$templatename = Yii::app()->getConfig('defaulttemplate');
}
if (!isset($templatedir)) {
$templatedir = getTemplatePath($templatename);
}
if (!isset($templateurl)) {
$templateurl = getTemplateURL($templatename) . "/";
}
if (!$anonymized && isset($thissurvey['anonymized'])) {
$anonymized = $thissurvey['anonymized'] == "Y";
}
// TEMPLATECSS
$_templatecss = "";
$_templatejs = "";
/**
* Template css/js files from the template config files are loaded.
* It use the asset manager (so user never need to empty the cache, even if template is updated)
* If debug mode is on, no asset manager is used.
*
* oTemplate is defined in controller/survey/index
*
* If templatereplace is called from the template editor, a $oTemplate is provided.
*/
$oTemplate = Template::model()->getInstance($templatename);
$aCssFiles = $oTemplate->config->files->css->filename;
$aJsFiles = $oTemplate->config->files->js->filename;
$aOtherFiles = $oTemplate->otherFiles;
//var_dump($aOtherFiles); die();
if (stripos($line, "{TEMPLATECSS}")) {
// If the template has files for css, we can't publish the files one by one, but we must publish them as a whole directory
// TODO : extend asset manager so it check for file modification even in directory mode
if (!YII_DEBUG || count($aOtherFiles) < 0) {
foreach ($aCssFiles as $sCssFile) {
if (file_exists($oTemplate->path . DIRECTORY_SEPARATOR . $sCssFile)) {
Yii::app()->getClientScript()->registerCssFile(App()->getAssetManager()->publish($oTemplate->path . DIRECTORY_SEPARATOR . $sCssFile), $sCssFile['media']);
}
}
} else {
foreach ($aCssFiles as $sCssFile) {
if (file_exists($oTemplate->path . DIRECTORY_SEPARATOR . $sCssFile)) {
Yii::app()->getClientScript()->registerCssFile("{$templateurl}{$sCssFile}", $sCssFile['media']);
}
}
}
/* RTL CSS */
if (getLanguageRTL(App()->language)) {
$aCssFiles = (array) $oTemplate->config->files->rtl->css->filename;
if (!YII_DEBUG) {
foreach ($aCssFiles as $sCssFile) {
if (file_exists($oTemplate->path . DIRECTORY_SEPARATOR . $sCssFile)) {
Yii::app()->getClientScript()->registerCssFile(App()->getAssetManager()->publish($oTemplate->path . DIRECTORY_SEPARATOR . $sCssFile), $sCssFile['media']);
}
}
} else {
foreach ($aCssFiles as $sCssFile) {
if (file_exists($oTemplate->path . DIRECTORY_SEPARATOR . $sCssFile)) {
Yii::app()->getClientScript()->registerCssFile("{$templateurl}{$sCssFile}", $sCssFile['media']);
}
}
}
}
}
if (stripos($line, "{TEMPLATEJS}")) {
if (!YII_DEBUG) {
foreach ($aJsFiles as $sJsFile) {
if (file_exists($oTemplate->path . DIRECTORY_SEPARATOR . $sJsFile)) {
App()->getClientScript()->registerScriptFile(App()->getAssetManager()->publish($oTemplate->path . DIRECTORY_SEPARATOR . $sJsFile));
}
}
} else {
foreach ($aJsFiles as $sJsFile) {
if (file_exists($oTemplate->path . DIRECTORY_SEPARATOR . $sJsFile)) {
Yii::app()->getClientScript()->registerScriptFile("{$templateurl}{$sJsFile}");
}
}
}
/* RTL JS */
if (getLanguageRTL(App()->language)) {
$aJsFiles = (array) $oTemplate->config->files->rtl->js->filename;
if (!YII_DEBUG) {
foreach ($aJsFiles as $aJsFile) {
if (file_exists($oTemplate->path . DIRECTORY_SEPARATOR . $aJsFile)) {
App()->getClientScript()->registerScriptFile(App()->getAssetManager()->publish($oTemplate->path . DIRECTORY_SEPARATOR . $aJsFile));
}
}
} else {
foreach ($aJsFiles as $sJsFile) {
if (file_exists($oTemplate->path . DIRECTORY_SEPARATOR . $sJsFile)) {
Yii::app()->getClientScript()->registerScriptFile("{$templateurl}{$sJsFile}");
}
}
}
}
}
// surveyformat
if (isset($thissurvey['format'])) {
$surveyformat = str_replace(array("A", "S", "G"), array("allinone", "questionbyquestion", "groupbygroup"), $thissurvey['format']);
} else {
$surveyformat = "";
}
if ($oTemplate->config->engine->cssframework) {
$surveyformat .= " " . $oTemplate->config->engine->cssframework . "-engine ";
}
if (isset(Yii::app()->session['step']) && Yii::app()->session['step'] % 2 && $surveyformat != "allinone") {
$surveyformat .= " page-odd";
}
if (isset($thissurvey['questionindex']) && $thissurvey['questionindex'] > 0 && $surveyformat != "allinone" && (isset(Yii::app()->session['step']) && Yii::app()->session['step'] > 0)) {
$surveyformat .= " withindex";
}
if (isset($thissurvey['showprogress']) && $thissurvey['showprogress'] == "Y") {
$surveyformat .= " showprogress";
}
if (isset($thissurvey['showqnumcode'])) {
$surveyformat .= " showqnumcode-" . $thissurvey['showqnumcode'];
}
// real survey contact
if (isset($surveylist) && isset($surveylist['contact'])) {
$surveycontact = $surveylist['contact'];
} elseif (isset($surveylist) && isset($thissurvey['admin']) && $thissurvey['admin'] != "") {
$surveycontact = sprintf(gT("Please contact %s ( %s ) for further assistance."), $thissurvey['admin'], $thissurvey['adminemail']);
} else {
$surveycontact = "";
}
// If there are non-bracketed replacements to be made do so above this line.
// Only continue in this routine if there are bracketed items to replace {}
if (strpos($line, "{") === false) {
// process string anyway so that it can be pretty-printed
return LimeExpressionManager::ProcessString($line, $questionNum, NULL, false, 1, 1, true);
}
if ($showgroupinfo == 'both' || $showgroupinfo == 'name' || $showgroupinfo == 'choose' && !isset($thissurvey['showgroupinfo']) || $showgroupinfo == 'choose' && $thissurvey['showgroupinfo'] == 'B' || $showgroupinfo == 'choose' && $thissurvey['showgroupinfo'] == 'N') {
$_groupname = isset($groupname) ? $groupname : '';
} else {
$_groupname = '';
}
if ($showgroupinfo == 'both' || $showgroupinfo == 'description' || $showgroupinfo == 'choose' && !isset($thissurvey['showgroupinfo']) || $showgroupinfo == 'choose' && $thissurvey['showgroupinfo'] == 'B' || $showgroupinfo == 'choose' && $thissurvey['showgroupinfo'] == 'D') {
$_groupdescription = isset($groupdescription) ? $groupdescription : '';
} else {
$_groupdescription = '';
}
if (!isset($totalquestions)) {
$totalquestions = 0;
}
$_totalquestionsAsked = $totalquestions;
if ($showxquestions == 'show' || $showxquestions == 'choose' && !isset($thissurvey['showxquestions']) || $showxquestions == 'choose' && $thissurvey['showxquestions'] == 'Y') {
if ($_totalquestionsAsked < 1) {
$_therearexquestions = gT("There are no questions in this survey");
// Singular
} elseif ($_totalquestionsAsked == 1) {
$_therearexquestions = gT("There is 1 question in this survey");
//Singular
} else {
$_therearexquestions = gT("There are {NUMBEROFQUESTIONS} questions in this survey.");
//Note this line MUST be before {NUMBEROFQUESTIONS}
}
} else {
$_therearexquestions = '';
}
if (isset($token)) {
$_token = $token;
} elseif (isset($clienttoken)) {
$_token = htmlentities($clienttoken, ENT_QUOTES, 'UTF-8');
// or should it be URL-encoded?
} else {
$_token = '';
}
// Expiry
if (isset($thissurvey['expiry'])) {
$dateformatdetails = getDateFormatData($thissurvey['surveyls_dateformat']);
Yii::import('application.libraries.Date_Time_Converter', true);
$datetimeobj = new Date_Time_Converter($thissurvey['expiry'], "Y-m-d");
$_dateoutput = $datetimeobj->convert($dateformatdetails['phpdate']);
} else {
$_dateoutput = '-';
}
$_submitbutton = "<input class='submit btn btn-default' type='submit' value=' " . gT("Submit") . " ' name='move2' onclick=\"javascript:document.limesurvey.move.value = 'movesubmit';\" />";
if (isset($thissurvey['surveyls_url']) and $thissurvey['surveyls_url'] != "") {
if (trim($thissurvey['surveyls_urldescription']) != '') {
$_linkreplace = "<a href='{$thissurvey['surveyls_url']}'>{$thissurvey['surveyls_urldescription']}</a>";
} else {
$_linkreplace = "<a href='{$thissurvey['surveyls_url']}'>{$thissurvey['surveyls_url']}</a>";
}
} else {
$_linkreplace = '';
}
if (isset($thissurvey['sid']) && isset($_SESSION['survey_' . $thissurvey['sid']]['srid']) && $thissurvey['active'] == 'Y') {
$iscompleted = SurveyDynamic::model($surveyid)->isCompleted($_SESSION['survey_' . $thissurvey['sid']]['srid']);
} else {
$iscompleted = false;
}
if (isset($surveyid) && !$iscompleted) {
$_clearall = CHtml::htmlButton(gT("Exit and clear survey"), array('type' => 'submit', 'id' => "clearall", 'value' => 'clearall', 'name' => 'clearall', 'class' => 'clearall button btn btn-default btn-lg col-xs-4 hidden', 'data-confirmedby' => 'confirm-clearall', 'title' => gT("This action need confirmation.")));
$_clearall .= CHtml::checkBox("confirm-clearall", false, array('id' => 'confirm-clearall', 'value' => 'confirm', 'class' => 'hide jshide btn btn-default btn-lg col-xs-4'));
$_clearall .= CHtml::label(gT("Are you sure you want to clear all your responses?"), 'confirm-clearall', array('class' => 'hide jshide btn btn-default btn-lg col-xs-4'));
$_clearalllinks = '<li><a href="#" id="clearallbtnlink">' . gT("Exit and clear survey") . '</a></li>';
} else {
$_clearall = "";
$_clearalllinks = '';
}
if (isset(Yii::app()->session['datestamp'])) {
$_datestamp = Yii::app()->session['datestamp'];
} else {
$_datestamp = '-';
}
if (isset($thissurvey['allowsave']) and $thissurvey['allowsave'] == "Y") {
$_saveall = doHtmlSaveAll(isset($move) ? $move : NULL);
$_savelinks = doHtmlSaveLinks(isset($move) ? $move : NULL);
} else {
$_saveall = "";
$_savelinks = "";
}
if (isset($thissurvey['allowprev']) && $thissurvey['allowprev'] == "N") {
$_strreview = "";
} else {
$_strreview = gT("If you want to check any of the answers you have made, and/or change them, you can do that now by clicking on the [<< prev] button and browsing through your responses.");
}
if (isset($surveyid)) {
$restartparam = array();
if ($_token) {
$restartparam['token'] = sanitize_token($_token);
}
// urlencode with needed with sanitize_token
if (Yii::app()->request->getQuery('lang')) {
$restartparam['lang'] = sanitize_languagecode(Yii::app()->request->getQuery('lang'));
} elseif ($s_lang) {
$restartparam['lang'] = $s_lang;
}
$restartparam['newtest'] = "Y";
$restarturl = Yii::app()->getController()->createUrl("survey/index/sid/{$surveyid}", $restartparam);
$_restart = "<a href='{$restarturl}'>" . gT("Restart this Survey") . "</a>";
} else {
$_restart = "";
}
if (isset($thissurvey['anonymized']) && $thissurvey['anonymized'] == 'Y') {
$_savealert = gT("To remain anonymous please use a pseudonym as your username, also an email address is not required.");
} else {
$_savealert = "";
}
if (isset($surveyid)) {
if ($_token) {
$returnlink = Yii::app()->getController()->createUrl("survey/index/sid/{$surveyid}", array('token' => Token::sanitizeToken($_token)));
} else {
$returnlink = Yii::app()->getController()->createUrl("survey/index/sid/{$surveyid}");
}
$_return_to_survey = "<a href='{$returnlink}'>" . gT("Return to survey") . "</a>";
} else {
$_return_to_survey = "";
}
// Save Form
$_saveform = "<table class='save-survey-form'><tr class='save-survey-row save-survey-name'><td class='save-survey-label label-cell' align='right'><label for='savename'>" . gT("Name") . "</label>:</td><td class='save-survey-input input-cell'><input type='text' name='savename' id='savename' value='";
if (isset($_POST['savename'])) {
$_saveform .= HTMLEscape(autoUnescape($_POST['savename']));
}
$_saveform .= "' /></td></tr>\n" . "<tr class='save-survey-row save-survey-password-1'><td class='save-survey-label label-cell' align='right'><label for='savepass'>" . gT("Password") . "</label>:</td><td class='save-survey-input input-cell'><input type='password' id='savepass' name='savepass' value='";
if (isset($_POST['savepass'])) {
$_saveform .= HTMLEscape(autoUnescape($_POST['savepass']));
}
$_saveform .= "' /></td></tr>\n" . "<tr class='save-survey-row save-survey-password-2'><td class='save-survey-label label-cell' align='right'><label for='savepass2'>" . gT("Repeat password") . "</label>:</td><td class='save-survey-input input-cell'><input type='password' id='savepass2' name='savepass2' value='";
if (isset($_POST['savepass2'])) {
$_saveform .= HTMLEscape(autoUnescape($_POST['savepass2']));
}
$_saveform .= "' /></td></tr>\n" . "<tr class='save-survey-row save-survey-email'><td class='save-survey-label label-cell' align='right'><label for='saveemail'>" . gT("Your email address") . "</label>:</td><td class='save-survey-input input-cell'><input type='text' id='saveemail' name='saveemail' value='";
if (isset($_POST['saveemail'])) {
$_saveform .= HTMLEscape(autoUnescape($_POST['saveemail']));
}
$_saveform .= "' /></td></tr>\n";
if (isset($thissurvey['usecaptcha']) && function_exists("ImageCreate") && isCaptchaEnabled('saveandloadscreen', $thissurvey['usecaptcha'])) {
$_saveform .= "<tr class='save-survey-row save-survey-captcha'><td class='save-survey-label label-cell' align='right'><label for='loadsecurity'>" . gT("Security question") . "</label>:</td><td class='save-survey-input input-cell'><table class='captcha-table'><tr><td class='captcha-image' valign='middle'><img alt='' src='" . Yii::app()->getController()->createUrl('/verification/image/sid/' . (isset($surveyid) ? $surveyid : '')) . "' /></td><td class='captcha-input' valign='middle' style='text-align:left'><input type='text' size='5' maxlength='3' id='loadsecurity' name='loadsecurity' value='' /></td></tr></table></td></tr>\n";
}
$_saveform .= "<tr><td align='right'></td><td></td></tr>\n" . "<tr class='save-survey-row save-survey-submit'><td class='save-survey-label label-cell'><label class='hide jshide' for='savebutton'>" . gT("Save Now") . "</label></td><td class='save-survey-input input-cell'><input type='submit' id='savebutton' name='savesubmit' class='button' value='" . gT("Save Now") . "' /></td></tr>\n" . "</table>";
// Load Form
$_loadform = "<table class='load-survey-form'><tr class='load-survey-row load-survey-name'><td class='load-survey-label label-cell' align='right'><label for='loadname'>" . gT("Saved name") . "</label>:</td><td class='load-survey-input input-cell'><input type='text' id='loadname' name='loadname' value='";
if (isset($loadname)) {
$_loadform .= HTMLEscape(autoUnescape($loadname));
}
$_loadform .= "' /></td></tr>\n" . "<tr class='load-survey-row load-survey-password'><td class='load-survey-label label-cell' align='right'><label for='loadpass'>" . gT("Password") . "</label>:</td><td class='load-survey-input input-cell'><input type='password' id='loadpass' name='loadpass' value='";
if (isset($loadpass)) {
$_loadform .= HTMLEscape(autoUnescape($loadpass));
}
$_loadform .= "' /></td></tr>\n";
if (isset($thissurvey['usecaptcha']) && function_exists("ImageCreate") && isCaptchaEnabled('saveandloadscreen', $thissurvey['usecaptcha'])) {
$_loadform .= "<tr class='load-survey-row load-survey-captcha'><td class='load-survey-label label-cell' align='right'><label for='loadsecurity'>" . gT("Security question") . "</label>:</td><td class='load-survey-input input-cell'><table class='captcha-table'><tr><td class='captcha-image' valign='middle'><img src='" . Yii::app()->getController()->createUrl('/verification/image/sid/' . (isset($surveyid) ? $surveyid : '')) . "' alt='' /></td><td class='captcha-input' valign='middle'><input type='text' size='5' maxlength='3' id='loadsecurity' name='loadsecurity' value='' alt=''/></td></tr></table></td></tr>\n";
}
$_loadform .= "<tr class='load-survey-row load-survey-submit'><td class='load-survey-label label-cell'><label class='hide jshide' for='loadbutton'>" . gT("Load now") . "</label></td><td class='load-survey-input input-cell'><input type='submit' id='loadbutton' class='button' value='" . gT("Load now") . "' /></td></tr></table>\n";
// Assessments
$assessmenthtml = "";
if (isset($surveyid) && !is_null($surveyid) && function_exists('doAssessment')) {
$assessmentdata = doAssessment($surveyid, true);
$_assessment_current_total = $assessmentdata['total'];
if (stripos($line, "{ASSESSMENTS}")) {
$assessmenthtml = doAssessment($surveyid, false);
}
} else {
$_assessment_current_total = '';
}
if (isset($thissurvey['googleanalyticsapikey']) && trim($thissurvey['googleanalyticsapikey']) != '') {
$_googleAnalyticsAPIKey = trim($thissurvey['googleanalyticsapikey']);
} else {
$_googleAnalyticsAPIKey = trim(getGlobalSetting('googleanalyticsapikey'));
}
$_googleAnalyticsStyle = isset($thissurvey['googleanalyticsstyle']) ? $thissurvey['googleanalyticsstyle'] : '0';
$_googleAnalyticsJavaScript = '';
if ($_googleAnalyticsStyle != '' && $_googleAnalyticsStyle != 0 && $_googleAnalyticsAPIKey != '') {
switch ($_googleAnalyticsStyle) {
case '1':
// Default Google Tracking
$_googleAnalyticsJavaScript = <<<EOD
<script>
(function(i,s,o,g,r,a,m){ i['GoogleAnalyticsObject']=r;i[r]=i[r]||function(){
(i[r].q=i[r].q||[]).push(arguments) },i[r].l=1*new Date();a=s.createElement(o),
m=s.getElementsByTagName(o)[0];a.async=1;a.src=g;m.parentNode.insertBefore(a,m)
})(window,document,'script','//www.google-analytics.com/analytics.js','ga');
ga('create', '{$_googleAnalyticsAPIKey}', 'auto'); // Replace with your property ID.
ga('send', 'pageview');
</script>
EOD;
break;
case '2':
// SurveyName-[SID]/[GSEQ]-GroupName - create custom GSEQ based upon page step
$moveInfo = LimeExpressionManager::GetLastMoveResult();
if (is_null($moveInfo)) {
$gseq = 'welcome';
} else {
if ($moveInfo['finished']) {
$gseq = 'finished';
} else {
if (isset($moveInfo['at_start']) && $moveInfo['at_start']) {
$gseq = 'welcome';
} else {
if (is_null($_groupname)) {
$gseq = 'printanswers';
} else {
$gseq = $moveInfo['gseq'] + 1;
}
}
}
}
$_trackURL = htmlspecialchars($thissurvey['name'] . '-[' . $surveyid . ']/[' . $gseq . ']-' . $_groupname);
$_googleAnalyticsJavaScript = <<<EOD
<script>
(function(i,s,o,g,r,a,m){i['GoogleAnalyticsObject']=r;i[r]=i[r]||function(){
(i[r].q=i[r].q||[]).push(arguments)},i[r].l=1*new Date();a=s.createElement(o),
m=s.getElementsByTagName(o)[0];a.async=1;a.src=g;m.parentNode.insertBefore(a,m)
})(window,document,'script','//www.google-analytics.com/analytics.js','ga');
ga('create', '{$_googleAnalyticsAPIKey}', 'auto'); // Replace with your property ID.
ga('send', 'pageview');
ga('send', 'pageview', '{$_trackURL}');
</script>
EOD;
break;
}
}
$_endtext = '';
if (isset($thissurvey['surveyls_endtext']) && trim($thissurvey['surveyls_endtext']) != '') {
$_endtext = $thissurvey['surveyls_endtext'];
}
$sitelogo = !empty($oTemplate->siteLogo) ? '<img src="' . App()->getAssetManager()->publish($oTemplate->path . '/' . $oTemplate->siteLogo) . '"/>' : '';
// Set the array of replacement variables here - don't include curly braces
$coreReplacements = array();
$coreReplacements['ACTIVE'] = isset($thissurvey['active']) && !($thissurvey['active'] != "Y");
$coreReplacements['ANSWERSCLEARED'] = gT("Answers cleared");
$coreReplacements['ASSESSMENTS'] = $assessmenthtml;
$coreReplacements['ASSESSMENT_CURRENT_TOTAL'] = $_assessment_current_total;
$coreReplacements['ASSESSMENT_HEADING'] = gT("Your assessment");
$coreReplacements['CHECKJAVASCRIPT'] = "<noscript><span class='warningjs'>" . gT("Caution: JavaScript execution is disabled in your browser. You may not be able to answer all questions in this survey. Please, verify your browser parameters.") . "</span></noscript>";
$coreReplacements['CLEARALL'] = $_clearall;
$coreReplacements['CLEARALL_LINKS'] = $_clearalllinks;
$coreReplacements['CLOSEWINDOW'] = '';
// Obsolete tag - keep this line for compatibility reaons
$coreReplacements['COMPLETED'] = isset($redata['completed']) ? $redata['completed'] : '';
// global
$coreReplacements['DATESTAMP'] = $_datestamp;
$coreReplacements['ENDTEXT'] = $_endtext;
$coreReplacements['EXPIRY'] = $_dateoutput;
$coreReplacements['ADMINNAME'] = isset($thissurvey['admin']) ? $thissurvey['admin'] : '';
$coreReplacements['ADMINEMAIL'] = isset($thissurvey['adminemail']) ? $thissurvey['adminemail'] : '';
$coreReplacements['GID'] = Yii::app()->getConfig('gid', '');
// Use the gid of the question, except if we are not in question (Randomization group name)
$coreReplacements['GOOGLE_ANALYTICS_API_KEY'] = $_googleAnalyticsAPIKey;
$coreReplacements['GOOGLE_ANALYTICS_JAVASCRIPT'] = $_googleAnalyticsJavaScript;
$coreReplacements['GROUPDESCRIPTION'] = $_groupdescription;
$coreReplacements['GROUPNAME'] = $_groupname;
$coreReplacements['LANG'] = App()->language;
$coreReplacements['LANGUAGECHANGER'] = isset($languagechanger) ? $languagechanger : '';
// global
$coreReplacements['LOADERROR'] = isset($errormsg) ? $errormsg : '';
// global
$coreReplacements['LOADFORM'] = $_loadform;
$coreReplacements['LOADHEADING'] = gT("Load a previously saved survey");
$coreReplacements['LOADMESSAGE'] = gT("You can load a survey that you have previously saved from this screen.") . "<br />" . gT("Type in the 'name' you used to save the survey, and the password.") . "<br />";
$coreReplacements['NAVIGATOR'] = isset($navigator) ? $navigator : '';
// global
$coreReplacements['MOVEPREVBUTTON'] = isset($moveprevbutton) ? $moveprevbutton : '';
// global
$coreReplacements['MOVENEXTBUTTON'] = isset($movenextbutton) ? $movenextbutton : '';
// global
$coreReplacements['NOSURVEYID'] = isset($surveylist) ? $surveylist['nosid'] : '';
$coreReplacements['NUMBEROFQUESTIONS'] = $_totalquestionsAsked;
$coreReplacements['PERCENTCOMPLETE'] = isset($percentcomplete) ? $percentcomplete : '';
// global
$coreReplacements['PRIVACY'] = isset($privacy) ? $privacy : '';
// global
$coreReplacements['PRIVACYMESSAGE'] = "<span style='font-weight:bold; font-style: italic;'>" . gT("A Note On Privacy") . "</span><br />" . gT("This survey is anonymous.") . "<br />" . gT("The record of your survey responses does not contain any identifying information about you, unless a specific survey question explicitly asked for it.") . ' ' . gT("If you used an identifying token to access this survey, please rest assured that this token will not be stored together with your responses. It is managed in a separate database and will only be updated to indicate whether you did (or did not) complete this survey. There is no way of matching identification tokens with survey responses.");
$coreReplacements['QUESTION_INDEX'] = isset($questionindex) ? $questionindex : '';
$coreReplacements['QUESTION_INDEX_MENU'] = isset($questionindexmenu) ? $questionindexmenu : '';
$coreReplacements['RESTART'] = $_restart;
$coreReplacements['RETURNTOSURVEY'] = $_return_to_survey;
$coreReplacements['SAVE_LINKS'] = $_savelinks;
$coreReplacements['SAVE'] = $_saveall;
$coreReplacements['SAVEALERT'] = $_savealert;
$coreReplacements['SAVEDID'] = isset($saved_id) ? $saved_id : '';
// global
$coreReplacements['SAVEERROR'] = isset($errormsg) ? $errormsg : '';
// global - same as LOADERROR
$coreReplacements['SAVEFORM'] = $_saveform;
$coreReplacements['SAVEHEADING'] = gT("Save your unfinished survey");
$coreReplacements['SAVEMESSAGE'] = gT("Enter a name and password for this survey and click save below.") . "<br />\n" . gT("Your survey will be saved using that name and password, and can be completed later by logging in with the same name and password.") . "<br /><br />\n<span class='emailoptional'>" . gT("If you give an email address, an email containing the details will be sent to you.") . "</span><br /><br />\n" . gT("After having clicked the save button you can either close this browser window or continue filling out the survey.");
$coreReplacements['SID'] = Yii::app()->getConfig('surveyID', '');
// Allways use surveyID from config
$coreReplacements['SITENAME'] = isset($sitename) ? $sitename : '';
// global
$coreReplacements['SITELOGO'] = $sitelogo;
$coreReplacements['SUBMITBUTTON'] = $_submitbutton;
$coreReplacements['SUBMITCOMPLETE'] = "<strong>" . gT("Thank you!") . "<br /><br />" . gT("You have completed answering the questions in this survey.") . "</strong><br /><br />" . gT("Click on 'Submit' now to complete the process and save your answers.");
$coreReplacements['SUBMITREVIEW'] = $_strreview;
$coreReplacements['SURVEYCONTACT'] = $surveycontact;
$coreReplacements['SURVEYDESCRIPTION'] = isset($thissurvey['description']) ? $thissurvey['description'] : '';
$coreReplacements['SURVEYFORMAT'] = isset($surveyformat) ? $surveyformat : '';
// global
$coreReplacements['SURVEYLANGUAGE'] = App()->language;
$coreReplacements['SURVEYLIST'] = isset($surveylist) ? $surveylist['list'] : '';
$coreReplacements['SURVEYLISTHEADING'] = isset($surveylist) ? $surveylist['listheading'] : '';
$coreReplacements['SURVEYNAME'] = isset($thissurvey['name']) ? $thissurvey['name'] : '';
$coreReplacements['SURVEYRESOURCESURL'] = isset($thissurvey['sid']) ? Yii::app()->getConfig("uploadurl") . '/surveys/' . $thissurvey['sid'] . '/' : '';
$coreReplacements['TEMPLATECSS'] = $_templatecss;
$coreReplacements['TEMPLATEJS'] = $_templatejs;
$coreReplacements['TEMPLATEURL'] = $templateurl;
$coreReplacements['THEREAREXQUESTIONS'] = $_therearexquestions;
$coreReplacements['TOKEN'] = !$anonymized ? $_token : '';
// Silently replace TOKEN by empty string
$coreReplacements['URL'] = $_linkreplace;
$coreReplacements['WELCOME'] = isset($thissurvey['welcome']) ? $thissurvey['welcome'] : '';
if (!isset($replacements['QID'])) {
Yii::import('application.helpers.SurveyRuntimeHelper');
$coreReplacements = array_merge($coreReplacements, SurveyRuntimeHelper::getQuestionReplacement(null));
// so $replacements overrides core values
}
if (!is_null($replacements) && is_array($replacements)) {
$doTheseReplacements = array_merge($coreReplacements, $replacements);
// so $replacements overrides core values
} else {
$doTheseReplacements = $coreReplacements;
}
// Now do all of the replacements - In rare cases, need to do 3 deep recursion, that that is default
$line = LimeExpressionManager::ProcessString($line, $questionNum, $doTheseReplacements, false, 3, 1, false, true, $bStaticReplacement);
return $line;
}
<li><label for='dateformat_<?php
echo $esrow['surveyls_language'];
?>
'><?php
$clang->eT("Date format:");
?>
</label>
<select size='1' id='dateformat_<?php
echo $esrow['surveyls_language'];
?>
' name='dateformat_<?php
echo $esrow['surveyls_language'];
?>
'>
<?php
foreach (getDateFormatData(0, Yii::app()->session['adminlang']) as $index => $dateformatdata) {
?>
<option value='<?php
echo $index;
?>
'
<?php
if ($esrow['surveyls_dateformat'] == $index) {
?>
selected='selected'
<?php
}
?>
><?php
echo $dateformatdata['dateformat'];
?>
function SetSurveyLanguage($surveyid, $language)
{
$surveyid = sanitize_int($surveyid);
$default_language = Yii::app()->getConfig('defaultlang');
if (isset($surveyid) && $surveyid > 0) {
$default_survey_language = Survey::model()->findByPk($surveyid)->language;
$additional_survey_languages = Survey::model()->findByPk($surveyid)->getAdditionalLanguages();
if (!isset($language) || $language == '' || !(in_array($language, $additional_survey_languages) || $language == $default_survey_language)) {
// Language not supported, fall back to survey's default language
$_SESSION['survey_' . $surveyid]['s_lang'] = $default_survey_language;
} else {
$_SESSION['survey_' . $surveyid]['s_lang'] = $language;
}
Yii::import('application.libraries.Limesurvey_lang', true);
$clang = new limesurvey_lang($_SESSION['survey_' . $surveyid]['s_lang']);
$thissurvey = getSurveyInfo($surveyid, @$_SESSION['survey_' . $surveyid]['s_lang']);
Yii::app()->loadHelper('surveytranslator');
$_SESSION['dateformats'] = getDateFormatData($thissurvey['surveyls_dateformat']);
LimeExpressionManager::SetEMLanguage($_SESSION['survey_' . $surveyid]['s_lang']);
} else {
if (!$language) {
$language = $default_language;
}
$_SESSION['survey_' . $surveyid]['s_lang'] = $language;
Yii::import('application.libraries.Limesurvey_lang', true);
$clang = new Limesurvey_lang($language);
}
$oApplication = Yii::app();
$oApplication->lang = $clang;
return $clang;
}
/**
* Date type
*/
public function renderDate($name, array $metaData, $form = null)
{
$dateformatdetails = getDateFormatData(Yii::app()->session['dateformat']);
$value = isset($metaData['current']) ? $metaData['current'] : '';
$html = Yii::app()->getController()->widget('yiiwheels.widgets.datetimepicker.WhDateTimePicker', array('name' => $name, 'id' => $name, 'value' => $value, 'pluginOptions' => array('format' => $dateformatdetails['jsdate'] . " HH:mm", 'allowInputToggle' => true, 'showClear' => true, 'tooltips' => array('clear' => gT('Clear selection'), 'prevMonth' => gT('Previous month'), 'nextMonth' => gT('Next month'), 'selectYear' => gT('Select year'), 'prevYear' => gT('Previous year'), 'nextYear' => gT('Next year'), 'selectDecade' => gT('Select decade'), 'prevDecade' => gT('Previous decade'), 'nextDecade' => gT('Next decade'), 'prevCentury' => gT('Previous century'), 'nextCentury' => gT('Next century'), 'selectTime' => gT('Select time')), 'locale' => convertLStoDateTimePickerLocale(Yii::app()->session['adminlang']))), true);
return $html;
}
