/**
* Generate a queXML PDF document with provided styles/settings
*
* @access public
* @param int $iSurveyID
* @return void
*/
public function quexml($iSurveyID)
{
$iSurveyID = (int) $iSurveyID;
$queXMLSettings = $this->_quexmlsettings();
$aData = array();
$aData['surveyid'] = $iSurveyID;
$aData['slangs'] = Survey::model()->findByPk($iSurveyID)->additionalLanguages;
$aData['baselang'] = Survey::model()->findByPk($iSurveyID)->language;
array_unshift($aData['slangs'], $aData['baselang']);
Yii::import("application.libraries.admin.quexmlpdf", TRUE);
$defaultquexmlpdf = new quexmlpdf($this->getController());
foreach ($queXMLSettings as $s) {
$aData[$s] = getGlobalSetting($s);
if ($aData[$s] === NULL || trim($aData[$s]) === '') {
$method = str_replace("queXML", "get", $s);
$aData[$s] = $defaultquexmlpdf->{$method}();
}
}
if (empty($_POST['ok'])) {
$this->_renderWrappedTemplate('survey', 'queXMLSurvey_view', $aData);
} else {
$quexmlpdf = new quexmlpdf($this->getController());
//Save settings globally and generate queXML document
foreach ($queXMLSettings as $s) {
if ($s !== 'queXMLStyle') {
setGlobalSetting($s, Yii::app()->request->getPost($s));
}
$method = str_replace("queXML", "set", $s);
$quexmlpdf->{$method}(Yii::app()->request->getPost($s));
}
$lang = Yii::app()->request->getPost('save_language');
$tempdir = Yii::app()->getConfig("tempdir");
// Setting the selected language for printout
App()->setLanguage($lang);
$quexmlpdf->setLanguage($lang);
set_time_limit(120);
Yii::app()->loadHelper('export');
$quexml = quexml_export($iSurveyID, $lang);
$quexmlpdf->create($quexmlpdf->createqueXML($quexml));
//NEED TO GET QID from $quexmlpdf
$qid = intval($quexmlpdf->getQuestionnaireId());
$zipdir = $this->_tempdir($tempdir);
$f1 = "{$zipdir}/quexf_banding_{$qid}_{$lang}.xml";
$f2 = "{$zipdir}/quexmlpdf_{$qid}_{$lang}.pdf";
$f3 = "{$zipdir}/quexml_{$qid}_{$lang}.xml";
$f4 = "{$zipdir}/readme.txt";
$f5 = "{$zipdir}/quexmlpdf_style_{$qid}_{$lang}.xml";
file_put_contents($f5, $quexmlpdf->exportStyleXML());
file_put_contents($f1, $quexmlpdf->getLayout());
file_put_contents($f2, $quexmlpdf->Output("quexml_{$qid}.pdf", 'S'));
file_put_contents($f3, $quexml);
file_put_contents($f4, gT('This archive contains a PDF file of the survey, the queXML file of the survey and a queXF banding XML file which can be used with queXF: http://quexf.sourceforge.net/ for processing scanned surveys.'));
Yii::app()->loadLibrary('admin.pclzip');
$zipfile = "{$tempdir}/quexmlpdf_{$qid}_{$lang}.zip";
$z = new PclZip($zipfile);
$z->create($zipdir, PCLZIP_OPT_REMOVE_PATH, $zipdir);
unlink($f1);
unlink($f2);
unlink($f3);
unlink($f4);
unlink($f5);
rmdir($zipdir);
$fn = "quexmlpdf_{$qid}_{$lang}.zip";
$this->_addHeaders($fn, "application/zip", 0);
header('Content-Transfer-Encoding: binary');
// load the file to send:
readfile($zipfile);
unlink($zipfile);
}
}
private function _surveyexport($action, $iSurveyID)
{
if ($action == "exportstructurexml") {
$fn = "limesurvey_survey_{$iSurveyID}.lss";
$this->_addHeaders($fn, "text/xml", "Mon, 26 Jul 1997 05:00:00 GMT");
echo surveyGetXMLData($iSurveyID);
exit;
} elseif ($action == "exportstructurequexml") {
if (isset($surveyprintlang) && !empty($surveyprintlang)) {
$quexmllang = $surveyprintlang;
} else {
$quexmllang = Survey::model()->findByPk($iSurveyID)->language;
}
if (!(isset($noheader) && $noheader == TRUE)) {
$fn = "survey_{$iSurveyID}_{$quexmllang}.xml";
$this->_addHeaders($fn, "text/xml", "Mon, 26 Jul 1997 05:00:00 GMT");
echo quexml_export($iSurveyID, $quexmllang);
exit;
}
} elseif ($action == 'exportstructuretsv') {
$this->_exporttsv($iSurveyID);
} elseif ($action == "exportarchive") {
$this->_exportarchive($iSurveyID);
}
}
private function _surveyexport($action, $iSurveyID)
{
viewHelper::disableHtmlLogging();
if ($action == "exportstructurexml") {
$fn = "limesurvey_survey_{$iSurveyID}.lss";
$this->_addHeaders($fn, "text/xml", "Mon, 26 Jul 1997 05:00:00 GMT");
echo surveyGetXMLData($iSurveyID);
exit;
} elseif ($action == "exportstructurejson") {
$fn = "limesurvey_survey_{$iSurveyID}.json";
$this->_addHeaders($fn, "application/json", "Mon, 26 Jul 1997 05:00:00 GMT");
$surveyInXmlFormat = surveyGetXMLData($iSurveyID);
// now convert this xml into json format and then return
echo _xmlToJson($surveyInXmlFormat);
exit;
} elseif ($action == "exportstructurequexml") {
if (isset($surveyprintlang) && !empty($surveyprintlang)) {
$quexmllang = $surveyprintlang;
} else {
$quexmllang = Survey::model()->findByPk($iSurveyID)->language;
}
if (!(isset($noheader) && $noheader == TRUE)) {
$fn = "survey_{$iSurveyID}_{$quexmllang}.xml";
$this->_addHeaders($fn, "text/xml", "Mon, 26 Jul 1997 05:00:00 GMT");
echo quexml_export($iSurveyID, $quexmllang);
exit;
}
} elseif ($action == 'exportstructuretsv') {
$this->_exporttsv($iSurveyID);
} elseif ($action == "exportarchive") {
$this->_exportarchive($iSurveyID);
}
}