PageRenderTime 119ms CodeModel.GetById 21ms RepoModel.GetById 1ms app.codeStats 1ms

/application/helpers/common_helper.php

https://bitbucket.org/machaven/limesurvey
PHP | 7809 lines | 5988 code | 657 blank | 1164 comment | 801 complexity | b1dd78b5b367b1d4d436ad4ec9c009dc MD5 | raw file
Possible License(s): GPL-2.0, LGPL-2.1, BSD-3-Clause, GPL-3.0, LGPL-3.0 
    

  1. <?php if ( ! defined('BASEPATH')) exit('No direct script access allowed');
    2. 

  2. /*
    3. 

  3. * LimeSurvey
    4. 

  4. * Copyright (C) 2007-2011 The LimeSurvey Project Team / Carsten Schmitz
    5. 

  5. * All rights reserved.
    6. 

  6. * License: GNU/GPL License v2 or later, see LICENSE.php
    7. 

  7. * LimeSurvey is free software. This version may have been modified pursuant
    8. 

  8. * to the GNU General Public License, and as distributed it includes or
    9. 

  9. * is derivative of works licensed under the GNU General Public License or
    10. 

  10. * other free or open source software licenses.
    11. 

  11. * See COPYRIGHT.php for copyright notices and details.
    12. 

  12. */
    13. 

  13. Yii::import('application.helpers.sanitize_helper', true);
    14. 

  14. 

  15. /**
    16. 

  16. * Simple function to sort the permissions by title
    17. 

  17. *
    18. 

  18. * @param mixed $aPermissionA  Permission A to compare
    19. 

  19. * @param mixed $aPermissionB  Permission B to compare
    20. 

  20. */
    21. 

  21. function comparePermission($aPermissionA,$aPermissionB)
    22. 

  22. {
    23. 

  23.     if($aPermissionA['title'] >$aPermissionB['title']) {
    24. 

  24.         return 1;
    25. 

  25.     }
    26. 

  26.     else {
    27. 

  27.         return -1;
    28. 

  28.     }
    29. 

  29. }
    30. 

  30. 

  31. /**
    32. 

  32. * getQuestionTypeList() Returns list of question types available in LimeSurvey. Edit this if you are adding a new
    33. 

  33. *    question type
    34. 

  34. *
    35. 

  35. * @param string $SelectedCode Value of the Question Type (defaults to "T")
    36. 

  36. * @param string $ReturnType Type of output from this function (defaults to selector)
    37. 

  37. *
    38. 

  38. * @return depending on $ReturnType param, returns a straight "array" of question types, or an <option></option> list
    39. 

  39. *
    40. 

  40. * Explanation of questiontype array:
    41. 

  41. *
    42. 

  42. * description : Question description
    43. 

  43. * subquestions : 0= Does not support subquestions x=Number of subquestion scales
    44. 

  44. * answerscales : 0= Does not need answers x=Number of answer scales (usually 1, but e.g. for dual scale question set to 2)
    45. 

  45. * assessable : 0=Does not support assessment values when editing answerd 1=Support assessment values
    46. 

  46. */
    47. 

  47. function getQuestionTypeList($SelectedCode = "T", $ReturnType = "selector")
    48. 

  48. {
    49. 

  49.     $publicurl = Yii::app()->getConfig('publicurl');
    50. 

  50.     $clang = Yii::app()->lang;
    51. 

  51. 

  52.     $group['Arrays'] = $clang->gT('Arrays');
    53. 

  53.     $group['MaskQuestions'] = $clang->gT("Mask questions");
    54. 

  54.     $group['SinChoiceQues'] = $clang->gT("Single choice questions");
    55. 

  55.     $group['MulChoiceQues'] = $clang->gT("Multiple choice questions");
    56. 

  56.     $group['TextQuestions'] = $clang->gT("Text questions");
    57. 

  57. 

  58. 

  59.     $qtypes = array(
    60. 

  60.     "1" => array('description' => $clang->gT("Array dual scale"),
    61. 

  61.     'group' => $group['Arrays'],
    62. 

  62.     'subquestions' => 1,
    63. 

  63.     'assessable' => 1,
    64. 

  64.     'hasdefaultvalues' => 0,
    65. 

  65.     'answerscales' => 2),
    66. 

  66.     "5" => array('description' => $clang->gT("5 Point Choice"),
    67. 

  67.     'group' => $group['SinChoiceQues'],
    68. 

  68.     'subquestions' => 0,
    69. 

  69.     'hasdefaultvalues' => 0,
    70. 

  70.     'assessable' => 0,
    71. 

  71.     'answerscales' => 0),
    72. 

  72.     "A" => array('description' => $clang->gT("Array (5 Point Choice)"),
    73. 

  73.     'group' => $group['Arrays'],
    74. 

  74.     'subquestions' => 1,
    75. 

  75.     'hasdefaultvalues' => 0,
    76. 

  76.     'assessable' => 1,
    77. 

  77.     'answerscales' => 0),
    78. 

  78.     "B" => array('description' => $clang->gT("Array (10 Point Choice)"),
    79. 

  79.     'group' => $group['Arrays'],
    80. 

  80.     'subquestions' => 1,
    81. 

  81.     'hasdefaultvalues' => 0,
    82. 

  82.     'assessable' => 1,
    83. 

  83.     'answerscales' => 0),
    84. 

  84.     "C" => array('description' => $clang->gT("Array (Yes/No/Uncertain)"),
    85. 

  85.     'group' => $group['Arrays'],
    86. 

  86.     'subquestions' => 1,
    87. 

  87.     'hasdefaultvalues' => 0,
    88. 

  88.     'assessable' => 1,
    89. 

  89.     'answerscales' => 0),
    90. 

  90.     "D" => array('description' => $clang->gT("Date/Time"),
    91. 

  91.     'group' => $group['MaskQuestions'],
    92. 

  92.     'subquestions' => 0,
    93. 

  93.     'hasdefaultvalues' => 1,
    94. 

  94.     'assessable' => 0,
    95. 

  95.     'answerscales' => 0),
    96. 

  96.     "E" => array('description' => $clang->gT("Array (Increase/Same/Decrease)"),
    97. 

  97.     'group' => $group['Arrays'],
    98. 

  98.     'subquestions' => 1,
    99. 

  99.     'hasdefaultvalues' => 0,
    100. 

  100.     'assessable' => 1,
    101. 

  101.     'answerscales' => 0),
    102. 

  102.     "F" => array('description' => $clang->gT("Array"),
    103. 

  103.     'group' => $group['Arrays'],
    104. 

  104.     'subquestions' => 1,
    105. 

  105.     'hasdefaultvalues' => 0,
    106. 

  106.     'assessable' => 1,
    107. 

  107.     'answerscales' => 1),
    108. 

  108.     "G" => array('description' => $clang->gT("Gender"),
    109. 

  109.     'group' => $group['MaskQuestions'],
    110. 

  110.     'subquestions' => 0,
    111. 

  111.     'hasdefaultvalues' => 0,
    112. 

  112.     'assessable' => 0,
    113. 

  113.     'answerscales' => 0),
    114. 

  114.     "H" => array('description' => $clang->gT("Array by column"),
    115. 

  115.     'group' => $group['Arrays'],
    116. 

  116.     'hasdefaultvalues' => 0,
    117. 

  117.     'subquestions' => 1,
    118. 

  118.     'assessable' => 1,
    119. 

  119.     'answerscales' => 1),
    120. 

  120.     "I" => array('description' => $clang->gT("Language Switch"),
    121. 

  121.     'group' => $group['MaskQuestions'],
    122. 

  122.     'hasdefaultvalues' => 0,
    123. 

  123.     'subquestions' => 0,
    124. 

  124.     'assessable' => 0,
    125. 

  125.     'answerscales' => 0),
    126. 

  126.     "K" => array('description' => $clang->gT("Multiple Numerical Input"),
    127. 

  127.     'group' => $group['MaskQuestions'],
    128. 

  128.     'hasdefaultvalues' => 1,
    129. 

  129.     'subquestions' => 1,
    130. 

  130.     'assessable' => 1,
    131. 

  131.     'answerscales' => 0),
    132. 

  132.     "L" => array('description' => $clang->gT("List (Radio)"),
    133. 

  133.     'group' => $group['SinChoiceQues'],
    134. 

  134.     'subquestions' => 0,
    135. 

  135.     'hasdefaultvalues' => 1,
    136. 

  136.     'assessable' => 1,
    137. 

  137.     'answerscales' => 1),
    138. 

  138.     "M" => array('description' => $clang->gT("Multiple choice"),
    139. 

  139.     'group' => $group['MulChoiceQues'],
    140. 

  140.     'subquestions' => 1,
    141. 

  141.     'hasdefaultvalues' => 1,
    142. 

  142.     'assessable' => 1,
    143. 

  143.     'answerscales' => 0),
    144. 

  144.     "N" => array('description' => $clang->gT("Numerical Input"),
    145. 

  145.     'group' => $group['MaskQuestions'],
    146. 

  146.     'subquestions' => 0,
    147. 

  147.     'hasdefaultvalues' => 1,
    148. 

  148.     'assessable' => 0,
    149. 

  149.     'answerscales' => 0),
    150. 

  150.     "O" => array('description' => $clang->gT("List with comment"),
    151. 

  151.     'group' => $group['SinChoiceQues'],
    152. 

  152.     'subquestions' => 0,
    153. 

  153.     'hasdefaultvalues' => 1,
    154. 

  154.     'assessable' => 1,
    155. 

  155.     'answerscales' => 1),
    156. 

  156.     "P" => array('description' => $clang->gT("Multiple choice with comments"),
    157. 

  157.     'group' => $group['MulChoiceQues'],
    158. 

  158.     'subquestions' => 1,
    159. 

  159.     'hasdefaultvalues' => 1,
    160. 

  160.     'assessable' => 1,
    161. 

  161.     'answerscales' => 0),
    162. 

  162.     "Q" => array('description' => $clang->gT("Multiple Short Text"),
    163. 

  163.     'group' => $group['TextQuestions'],
    164. 

  164.     'subquestions' => 1,
    165. 

  165.     'hasdefaultvalues' => 1,
    166. 

  166.     'assessable' => 0,
    167. 

  167.     'answerscales' => 0),
    168. 

  168.     "R" => array('description' => $clang->gT("Ranking"),
    169. 

  169.     'group' => $group['MaskQuestions'],
    170. 

  170.     'subquestions' => 0,
    171. 

  171.     'hasdefaultvalues' => 0,
    172. 

  172.     'assessable' => 1,
    173. 

  173.     'answerscales' => 1),
    174. 

  174.     "S" => array('description' => $clang->gT("Short Free Text"),
    175. 

  175.     'group' => $group['TextQuestions'],
    176. 

  176.     'subquestions' => 0,
    177. 

  177.     'hasdefaultvalues' => 1,
    178. 

  178.     'assessable' => 0,
    179. 

  179.     'answerscales' => 0),
    180. 

  180.     "T" => array('description' => $clang->gT("Long Free Text"),
    181. 

  181.     'group' => $group['TextQuestions'],
    182. 

  182.     'subquestions' => 0,
    183. 

  183.     'hasdefaultvalues' => 1,
    184. 

  184.     'assessable' => 0,
    185. 

  185.     'answerscales' => 0),
    186. 

  186.     "U" => array('description' => $clang->gT("Huge Free Text"),
    187. 

  187.     'group' => $group['TextQuestions'],
    188. 

  188.     'subquestions' => 0,
    189. 

  189.     'hasdefaultvalues' => 1,
    190. 

  190.     'assessable' => 0,
    191. 

  191.     'answerscales' => 0),
    192. 

  192.     "X" => array('description' => $clang->gT("Text display"),
    193. 

  193.     'group' => $group['MaskQuestions'],
    194. 

  194.     'subquestions' => 0,
    195. 

  195.     'hasdefaultvalues' => 0,
    196. 

  196.     'assessable' => 0,
    197. 

  197.     'answerscales' => 0),
    198. 

  198.     "Y" => array('description' => $clang->gT("Yes/No"),
    199. 

  199.     'group' => $group['MaskQuestions'],
    200. 

  200.     'subquestions' => 0,
    201. 

  201.     'hasdefaultvalues' => 0,
    202. 

  202.     'assessable' => 0,
    203. 

  203.     'answerscales' => 0),
    204. 

  204.     "!" => array('description' => $clang->gT("List (Dropdown)"),
    205. 

  205.     'group' => $group['SinChoiceQues'],
    206. 

  206.     'subquestions' => 0,
    207. 

  207.     'hasdefaultvalues' => 1,
    208. 

  208.     'assessable' => 1,
    209. 

  209.     'answerscales' => 1),
    210. 

  210.     ":" => array('description' => $clang->gT("Array (Numbers)"),
    211. 

  211.     'group' => $group['Arrays'],
    212. 

  212.     'subquestions' => 2,
    213. 

  213.     'hasdefaultvalues' => 0,
    214. 

  214.     'assessable' => 1,
    215. 

  215.     'answerscales' => 0),
    216. 

  216.     ";" => array('description' => $clang->gT("Array (Texts)"),
    217. 

  217.     'group' => $group['Arrays'],
    218. 

  218.     'subquestions' => 2,
    219. 

  219.     'hasdefaultvalues' => 0,
    220. 

  220.     'assessable' => 0,
    221. 

  221.     'answerscales' => 0),
    222. 

  222.     "|" => array('description' => $clang->gT("File upload"),
    223. 

  223.     'group' => $group['MaskQuestions'],
    224. 

  224.     'subquestions' => 0,
    225. 

  225.     'hasdefaultvalues' => 0,
    226. 

  226.     'assessable' => 0,
    227. 

  227.     'answerscales' => 0),
    228. 

  228.     "*" => array('description' => $clang->gT("Equation"),
    229. 

  229.     'group' => $group['MaskQuestions'],
    230. 

  230.     'subquestions' => 0,
    231. 

  231.     'hasdefaultvalues' => 0,
    232. 

  232.     'assessable' => 0,
    233. 

  233.     'answerscales' => 0),
    234. 

  234.     );
    235. 

  235.     asort($qtypes);
    236. 

  236. 

  237.     if ($ReturnType == "array")
    238. 

  238.         return $qtypes;
    239. 

  239. 

  240.     if ($ReturnType == "group")
    241. 

  241.     {
    242. 

  242.         foreach ($qtypes as $qkey => $qtype)
    243. 

  243.         {
    244. 

  244.             $newqType[$qtype['group']][$qkey] = $qtype;
    245. 

  245.         }
    246. 

  246. 

  247. 

  248.         $qtypeselecter = "";
    249. 

  249.         foreach ($newqType as $group => $members)
    250. 

  250.         {
    251. 

  251.             $qtypeselecter .= '<optgroup label="' . $group . '">';
    252. 

  252.             foreach ($members as $TypeCode => $TypeProperties)
    253. 

  253.             {
    254. 

  254.                 $qtypeselecter .= "<option value='$TypeCode'";
    255. 

  255.                 if ($SelectedCode == $TypeCode)
    256. 

  256.                 {
    257. 

  257.                     $qtypeselecter .= " selected='selected'";
    258. 

  258.                 }
    259. 

  259.                 $qtypeselecter .= ">{$TypeProperties['description']}</option>\n";
    260. 

  260.             }
    261. 

  261.             $qtypeselecter .= '</optgroup>';
    262. 

  262.         }
    263. 

  263. 

  264.         return $qtypeselecter;
    265. 

  265.     };
    266. 

  266.     $qtypeselecter = "";
    267. 

  267.     foreach ($qtypes as $TypeCode => $TypeProperties)
    268. 

  268.     {
    269. 

  269.         $qtypeselecter .= "<option value='$TypeCode'";
    270. 

  270.         if ($SelectedCode == $TypeCode)
    271. 

  271.         {
    272. 

  272.             $qtypeselecter .= " selected='selected'";
    273. 

  273.         }
    274. 

  274.         $qtypeselecter .= ">{$TypeProperties['description']}</option>\n";
    275. 

  275.     }
    276. 

  276.     return $qtypeselecter;
    277. 

  277. }
    278. 

  278. 

  279. /**
    280. 

  280. * isStandardTemplate returns true if a template is a standard template
    281. 

  281. * This function does not check if a template actually exists
    282. 

  282. *
    283. 

  283. * @param mixed $sTemplateName template name to look for
    284. 

  284. * @return bool True if standard template, otherwise false
    285. 

  285. */
    286. 

  286. function isStandardTemplate($sTemplateName)
    287. 

  287. {
    288. 

  288.     return in_array($sTemplateName,array('basic',
    289. 

  289.     'bluengrey',
    290. 

  290.     'business_grey',
    291. 

  291.     'citronade',
    292. 

  292.     'clear_logo',
    293. 

  293.     'default',
    294. 

  294.     'eirenicon',
    295. 

  295.     'limespired',
    296. 

  296.     'mint_idea',
    297. 

  297.     'sherpa',
    298. 

  298.     'vallendar'));
    299. 

  299. }
    300. 

  300. 

  301. /**
    302. 

  302. * getSurveyList() Queries the database (survey table) for a list of existing surveys
    303. 

  303. *
    304. 

  304. * @param boolean $returnarray if set to true an array instead of an HTML option list is given back
    305. 

  305. * @return string This string is returned containing <option></option> formatted list of existing surveys
    306. 

  306. *
    307. 

  307. */
    308. 

  308. function getSurveyList($returnarray=false, $surveyid=false)
    309. 

  309. {
    310. 

  310.     static $cached = null;
    311. 

  311. 

  312.     $timeadjust = getGlobalSetting('timeadjust');
    313. 

  313.     $clang = new Limesurvey_lang(Yii::app()->session['adminlang']);
    314. 

  314. 

  315.     if(is_null($cached)) {
    316. 

  316.         if (!hasGlobalPermission('USER_RIGHT_SUPERADMIN'))
    317. 

  317.             $surveyidresult = Survey::model()->permission(Yii::app()->user->getId())->with(array('languagesettings'=>array('condition'=>'surveyls_language=language')))->findAll();
    318. 

  318.         else
    319. 

  319.             $surveyidresult = Survey::model()->with(array('languagesettings'=>array('condition'=>'surveyls_language=language')))->findAll();
    320. 

  320. 

  321.         $surveynames = array();
    322. 

  322.         foreach ($surveyidresult as $result)
    323. 

  323.         {
    324. 

  324.             $surveynames[] = array_merge($result->attributes, $result->languagesettings[0]->attributes);
    325. 

  325. 

  326.         }
    327. 

  327. 

  328.         $cached = $surveynames;
    329. 

  329.     } else {
    330. 

  330.         $surveynames = $cached;
    331. 

  331.     }
    332. 

  332.     $surveyselecter = "";
    333. 

  333.     if ($returnarray===true) return $surveynames;
    334. 

  334.     $activesurveys='';
    335. 

  335.     $inactivesurveys='';
    336. 

  336.     $expiredsurveys='';
    337. 

  337.     if ($surveynames)
    338. 

  338.     {
    339. 

  339.         foreach($surveynames as $sv)
    340. 

  340.         {
    341. 

  341. 

  342.             $surveylstitle=flattenText($sv['surveyls_title']);
    343. 

  343.             if (strlen($surveylstitle)>45)
    344. 

  344.             {
    345. 

  345.                 $surveylstitle = htmlspecialchars(mb_strcut(html_entity_decode($surveylstitle,ENT_QUOTES,'UTF-8'), 0, 45, 'UTF-8'))."...";
    346. 

  346.             }
    347. 

  347. 

  348.             if($sv['active']!='Y')
    349. 

  349.             {
    350. 

  350.                 $inactivesurveys .= "<option ";
    351. 

  351.                 if(Yii::app()->user->getId() == $sv['owner_id'])
    352. 

  352.                 {
    353. 

  353.                     $inactivesurveys .= " style=\"font-weight: bold;\"";
    354. 

  354.                 }
    355. 

  355.                 if ($sv['sid'] == $surveyid)
    356. 

  356.                 {
    357. 

  357.                     $inactivesurveys .= " selected='selected'"; $svexist = 1;
    358. 

  358.                 }
    359. 

  359.                 $inactivesurveys .=" value='{$sv['sid']}'>{$surveylstitle}</option>\n";
    360. 

  360.             } elseif($sv['expires']!='' && $sv['expires'] < dateShift(date("Y-m-d H:i:s"), "Y-m-d H:i:s", $timeadjust))
    361. 

  361.             {
    362. 

  362.                 $expiredsurveys .="<option ";
    363. 

  363.                 if (Yii::app()->user->getId() == $sv['owner_id'])
    364. 

  364.                 {
    365. 

  365.                     $expiredsurveys .= " style=\"font-weight: bold;\"";
    366. 

  366.                 }
    367. 

  367.                 if ($sv['sid'] == $surveyid)
    368. 

  368.                 {
    369. 

  369.                     $expiredsurveys .= " selected='selected'"; $svexist = 1;
    370. 

  370.                 }
    371. 

  371.                 $expiredsurveys .=" value='{$sv['sid']}'>{$surveylstitle}</option>\n";
    372. 

  372.             } else
    373. 

  373.             {
    374. 

  374.                 $activesurveys .= "<option ";
    375. 

  375.                 if(Yii::app()->user->getId() == $sv['owner_id'])
    376. 

  376.                 {
    377. 

  377.                     $activesurveys .= " style=\"font-weight: bold;\"";
    378. 

  378.                 }
    379. 

  379.                 if ($sv['sid'] == $surveyid)
    380. 

  380.                 {
    381. 

  381.                     $activesurveys .= " selected='selected'"; $svexist = 1;
    382. 

  382.                 }
    383. 

  383.                 $activesurveys .=" value='{$sv['sid']}'>{$surveylstitle}</option>\n";
    384. 

  384.             }
    385. 

  385.         } // End Foreach
    386. 

  386.     }
    387. 

  387.     
    388. 

  388.     //Only show each activesurvey group if there are some
    389. 

  389.     if ($activesurveys!='')
    390. 

  390.     {
    391. 

  391.         $surveyselecter .= "<optgroup label='".$clang->gT("Active")."' class='activesurveyselect'>\n";
    392. 

  392.         $surveyselecter .= $activesurveys . "</optgroup>";
    393. 

  393.     }
    394. 

  394.     if ($expiredsurveys!='')
    395. 

  395.     {
    396. 

  396.         $surveyselecter .= "<optgroup label='".$clang->gT("Expired")."' class='expiredsurveyselect'>\n";
    397. 

  397.         $surveyselecter .= $expiredsurveys . "</optgroup>";
    398. 

  398.     }
    399. 

  399.     if ($inactivesurveys!='')
    400. 

  400.     {
    401. 

  401.         $surveyselecter .= "<optgroup label='".$clang->gT("Inactive")."' class='inactivesurveyselect'>\n";
    402. 

  402.         $surveyselecter .= $inactivesurveys . "</optgroup>";
    403. 

  403.     }
    404. 

  404.     if (!isset($svexist))
    405. 

  405.     {
    406. 

  406.         $surveyselecter = "<option selected='selected' value=''>".$clang->gT("Please choose...")."</option>\n".$surveyselecter;
    407. 

  407.     } else
    408. 

  408.     {
    409. 

  409.         $surveyselecter = "<option value=''>".$clang->gT("None")."</option>\n".$surveyselecter;
    410. 

  410.     }
    411. 

  411.     return $surveyselecter;
    412. 

  412. }
    413. 

  413. 

  414. /**
    415. 

  415. * Returns true if a user has permissions in the particular survey
    416. 

  416. *
    417. 

  417. * @param $iSID The survey ID
    418. 

  418. * @param $sPermission
    419. 

  419. * @param $sCRUD
    420. 

  420. * @param $iUID User ID - if not given the one of the current user is used
    421. 

  421. * @return bool
    422. 

  422. */
    423. 

  423. function hasSurveyPermission($iSID, $sPermission, $sCRUD, $iUID=null)
    424. 

  424. {
    425. 

  425.     if (!in_array($sCRUD,array('create','read','update','delete','import','export'))) return false;
    426. 

  426.     $sCRUD=$sCRUD.'_p';
    427. 

  427. 

  428.     $thissurvey=getSurveyInfo($iSID);
    429. 

  429.     if (!$thissurvey) return false;
    430. 

  430. 

  431.     $aSurveyPermissionCache = Yii::app()->getConfig("aSurveyPermissionCache");
    432. 

  432.     if (is_null($iUID))
    433. 

  433.     {
    434. 

  434.         if (!Yii::app()->user->getIsGuest()) $iUID = Yii::app()->session['loginID'];
    435. 

  435.         else return false;
    436. 

  436.         // Some user have acces to whole survey settings
    437. 

  437.         if (Yii::app()->session['USER_RIGHT_SUPERADMIN']==1) return true;
    438. 

  438.         if ($thissurvey && $iUID==$thissurvey['owner_id']) return true;
    439. 

  439.     }
    440. 

  440. 

  441.     if (!isset($aSurveyPermissionCache[$iSID][$iUID][$sPermission][$sCRUD]))
    442. 

  442.     {
    443. 

  443.         $query = Survey_permissions::model()->findByAttributes(array("sid"=> $iSID,"uid"=> $iUID,"permission"=>$sPermission));
    444. 

  444.         $bPermission = is_null($query) ? array() : $query->attributes;
    445. 

  445.         if (!isset($bPermission[$sCRUD]) || $bPermission[$sCRUD]==0)
    446. 

  446.         {
    447. 

  447.             $bPermission=false;
    448. 

  448.         }
    449. 

  449.         else
    450. 

  450.         {
    451. 

  451.             $bPermission=true;
    452. 

  452.         }
    453. 

  453.         $aSurveyPermissionCache[$iSID][$iUID][$sPermission][$sCRUD]=$bPermission;
    454. 

  454.     }
    455. 

  455.     Yii::app()->setConfig("aSurveyPermissionCache", $aSurveyPermissionCache);
    456. 

  456.     return $aSurveyPermissionCache[$iSID][$iUID][$sPermission][$sCRUD];
    457. 

  457. }
    458. 

  458. 

  459. /**
    460. 

  460. * Returns true if a user has global permission for a certain action. Available permissions are
    461. 

  461. *
    462. 

  462. * USER_RIGHT_CREATE_SURVEY
    463. 

  463. * USER_RIGHT_CONFIGURATOR
    464. 

  464. * USER_RIGHT_CREATE_USER
    465. 

  465. * USER_RIGHT_DELETE_USER
    466. 

  466. * USER_RIGHT_SUPERADMIN
    467. 

  467. * USER_RIGHT_MANAGE_TEMPLATE
    468. 

  468. * USER_RIGHT_MANAGE_LABEL
    469. 

  469. *
    470. 

  470. * @param $sPermission
    471. 

  471. * @return bool
    472. 

  472. */
    473. 

  473. function hasGlobalPermission($sPermission)
    474. 

  474. {
    475. 

  475.     if (!Yii::app()->user->getIsGuest()) $iUID = !Yii::app()->user->getId();
    476. 

  476.     else return false;
    477. 

  477.     if (Yii::app()->session['USER_RIGHT_SUPERADMIN']==1) return true; //Superadmin has access to all
    478. 

  478.     if (Yii::app()->session[$sPermission]==1)
    479. 

  479.     {
    480. 

  480.         return true;
    481. 

  481.     }
    482. 

  482.     else
    483. 

  483.     {
    484. 

  484.         return false;
    485. 

  485.     }
    486. 

  486. 

  487. }
    488. 

  488. 

  489. function getTemplateList()
    490. 

  490. {
    491. 

  491.     $usertemplaterootdir=Yii::app()->getConfig("usertemplaterootdir");
    492. 

  492.     $standardtemplaterootdir=Yii::app()->getConfig("standardtemplaterootdir");
    493. 

  493. 

  494.     if (!$usertemplaterootdir) {die("getTemplateList() no template directory");}
    495. 

  495.     if ($handle = opendir($standardtemplaterootdir))
    496. 

  496.     {
    497. 

  497.         while (false !== ($file = readdir($handle)))
    498. 

  498.         {
    499. 

  499.             if (!is_file("$standardtemplaterootdir/$file") && $file != "." && $file != ".." && $file!=".svn" && isStandardTemplate($file))
    500. 

  500.             {
    501. 

  501.                 $list_of_files[$file] = $standardtemplaterootdir.DIRECTORY_SEPARATOR.$file;
    502. 

  502.             }
    503. 

  503.         }
    504. 

  504.         closedir($handle);
    505. 

  505.     }
    506. 

  506. 

  507.     if ($handle = opendir($usertemplaterootdir))
    508. 

  508.     {
    509. 

  509.         while (false !== ($file = readdir($handle)))
    510. 

  510.         {
    511. 

  511.             if (!is_file("$usertemplaterootdir/$file") && $file != "." && $file != ".." && $file!=".svn")
    512. 

  512.             {
    513. 

  513.                 $list_of_files[$file] = $usertemplaterootdir.DIRECTORY_SEPARATOR.$file;
    514. 

  514.             }
    515. 

  515.         }
    516. 

  516.         closedir($handle);
    517. 

  517.     }
    518. 

  518.     ksort($list_of_files);
    519. 

  519. 

  520.     return $list_of_files;
    521. 

  521. }
    522. 

  522. 

  523. function getAdminThemeList()
    524. 

  524. {
    525. 

  525.     // $usertemplaterootdir=Yii::app()->getConfig("usertemplaterootdir");
    526. 

  526.     $standardtemplaterootdir=Yii::app()->getConfig("styledir");
    527. 

  527. 

  528.     //    if (!$usertemplaterootdir) {die("getTemplateList() no template directory");}
    529. 

  529.     if ($handle = opendir($standardtemplaterootdir))
    530. 

  530.     {
    531. 

  531.         while (false !== ($file = readdir($handle)))
    532. 

  532.         {
    533. 

  533.             if (!is_file("$standardtemplaterootdir/$file") && $file != "." && $file != ".." && $file!=".svn")
    534. 

  534.             {
    535. 

  535.                 $list_of_files[$file] = $standardtemplaterootdir.DIRECTORY_SEPARATOR.$file;
    536. 

  536.             }
    537. 

  537.         }
    538. 

  538.         closedir($handle);
    539. 

  539.     }
    540. 

  540. 

  541.     /*    if ($handle = opendir($usertemplaterootdir))
    542. 

  542.     {
    543. 

  543.     while (false !== ($file = readdir($handle)))
    544. 

  544.     {
    545. 

  545.     if (!is_file("$usertemplaterootdir/$file") && $file != "." && $file != ".." && $file!=".svn")
    546. 

  546.     {
    547. 

  547.     $list_of_files[$file] = $usertemplaterootdir.DIRECTORY_SEPARATOR.$file;
    548. 

  548.     }
    549. 

  549.     }
    550. 

  550.     closedir($handle);
    551. 

  551.     }         */
    552. 

  552.     ksort($list_of_files);
    553. 

  553. 

  554.     return $list_of_files;
    555. 

  555. }
    556. 

  556. 

  557. 

  558. /**
    559. 

  559. * getQuestions() queries the database for an list of all questions matching the current survey and group id
    560. 

  560. *
    561. 

  561. * @return This string is returned containing <option></option> formatted list of questions in the current survey and group
    562. 

  562. */
    563. 

  563. function getQuestions($surveyid,$gid,$selectedqid)
    564. 

  564. {
    565. 

  565.     $clang = Yii::app()->lang;
    566. 

  566.     $s_lang = Survey::model()->findByPk($surveyid)->language;
    567. 

  567.     $qrows = Questions::model()->findAllByAttributes(array('sid' => $surveyid, 'gid' => $gid, 'language' => $s_lang, 'parent_qid' => 0),array('order'=>'question_order'));
    568. 

  568. 

  569.     if (!isset($sQuestionselecter)) {$sQuestionselecter="";}
    570. 

  570.     foreach ($qrows as $qrow)
    571. 

  571.     {
    572. 

  572.         $qrow = $qrow->attributes;
    573. 

  573.         $qrow['title'] = strip_tags($qrow['title']);
    574. 

  574.         $link = Yii::app()->getController()->createUrl("/admin/survey/sa/view/surveyid/".$surveyid."/gid/".$gid."/qid/".$qrow['qid']);
    575. 

  575.         $sQuestionselecter .= "<option value='{$link}'";
    576. 

  576.         if ($selectedqid == $qrow['qid'])
    577. 

  577.         {
    578. 

  578.             $sQuestionselecter .= " selected='selected'";
    579. 

  579.             $qexists=true;
    580. 

  580.         }
    581. 

  581.         $sQuestionselecter .=">{$qrow['title']}:";
    582. 

  582.         $sQuestionselecter .= " ";
    583. 

  583.         $question=flattenText($qrow['question']);
    584. 

  584.         if (strlen($question)<35)
    585. 

  585.         {
    586. 

  586.             $sQuestionselecter .= $question;
    587. 

  587.         }
    588. 

  588.         else
    589. 

  589.         {
    590. 

  590.             $sQuestionselecter .= htmlspecialchars(mb_strcut(html_entity_decode($question,ENT_QUOTES,'UTF-8'), 0, 35, 'UTF-8'))."...";
    591. 

  591.         }
    592. 

  592.         $sQuestionselecter .= "</option>\n";
    593. 

  593.     }
    594. 

  594. 

  595.     if (!isset($qexists))
    596. 

  596.     {
    597. 

  597.         $sQuestionselecter = "<option selected='selected'>".$clang->gT("Please choose...")."</option>\n".$sQuestionselecter;
    598. 

  598.     }
    599. 

  599.     else
    600. 

  600.     {
    601. 

  601.         $link = Yii::app()->getController()->createUrl("/admin/survey/sa/view/surveyid/".$surveyid."/gid/".$gid);
    602. 

  602.         $sQuestionselecter = "<option value='{$link}'>".$clang->gT("None")."</option>\n".$sQuestionselecter;
    603. 

  603.     }
    604. 

  604.     return $sQuestionselecter;
    605. 

  605. }
    606. 

  606. 

  607. /**
    608. 

  608. * getGidPrevious() returns the Gid of the group prior to the current active group
    609. 

  609. *
    610. 

  610. * @param string $surveyid
    611. 

  611. * @param string $gid
    612. 

  612. *
    613. 

  613. * @return The Gid of the previous group
    614. 

  614. */
    615. 

  615. function getGidPrevious($surveyid, $gid)
    616. 

  616. {
    617. 

  617.     $clang = Yii::app()->lang;
    618. 

  618. 

  619.     if (!$surveyid) {$surveyid=returnGlobal('sid');}
    620. 

  620.     $s_lang = Survey::model()->findByPk($surveyid)->language;
    621. 

  621.     $qresult = Groups::model()->findAllByAttributes(array('sid' => $surveyid, 'language' => $s_lang), array('order'=>'group_order'));
    622. 

  622. 

  623.     $i = 0;
    624. 

  624.     $iPrev = -1;
    625. 

  625.     foreach ($qresult as $qrow)
    626. 

  626.     {
    627. 

  627.         $qrow = $qrow->attributes;
    628. 

  628.         if ($gid == $qrow['gid']) {$iPrev = $i - 1;}
    629. 

  629.         $i += 1;
    630. 

  630.     }
    631. 

  631. 

  632.     if ($iPrev >= 0) {$GidPrev = $qresult[$iPrev]->gid;}
    633. 

  633.     else {$GidPrev = "";}
    634. 

  634.     return $GidPrev;
    635. 

  635. }
    636. 

  636. 

  637. /**
    638. 

  638. * getQidPrevious() returns the Qid of the question prior to the current active question
    639. 

  639. *
    640. 

  640. * @param string $surveyid
    641. 

  641. * @param string $gid
    642. 

  642. * @param string $qid
    643. 

  643. *
    644. 

  644. * @return This Qid of the previous question
    645. 

  645. */
    646. 

  646. function getQidPrevious($surveyid, $gid, $qid)
    647. 

  647. {
    648. 

  648.     $clang = Yii::app()->lang;
    649. 

  649.     $s_lang = Survey::model()->findByPk($surveyid)->language;
    650. 

  650.     $qrows = Questions::model()->findAllByAttributes(array('gid' => $gid, 'sid' => $surveyid, 'language' => $s_lang, 'parent_qid'=>0),array('order'=>'question_order'));
    651. 

  651. 

  652.     $i = 0;
    653. 

  653.     $iPrev = -1;
    654. 

  654.     if (count($qrows) > 0)
    655. 

  655.     {
    656. 

  656. 

  657.         foreach ($qrows as $qrow)
    658. 

  658.         {
    659. 

  659.             $qrow = $qrow->attributes;
    660. 

  660.             if ($qid == $qrow['qid']) {$iPrev = $i - 1;}
    661. 

  661.             $i += 1;
    662. 

  662.         }
    663. 

  663.     }
    664. 

  664.     if ($iPrev >= 0) {$QidPrev = $qrows[$iPrev]->qid;}
    665. 

  665.     else {$QidPrev = "";}
    666. 

  666. 

  667. 

  668.     return $QidPrev;
    669. 

  669. }
    670. 

  670. 

  671. /**
    672. 

  672. * getGidNext() returns the Gid of the group next to the current active group
    673. 

  673. *
    674. 

  674. * @param string $surveyid
    675. 

  675. * @param string $gid
    676. 

  676. *
    677. 

  677. * @return The Gid of the next group
    678. 

  678. */
    679. 

  679. function getGidNext($surveyid, $gid)
    680. 

  680. {
    681. 

  681.     $clang = Yii::app()->lang;
    682. 

  682.     if (!$surveyid) {$surveyid=returnGlobal('sid');}
    683. 

  683.     $s_lang = Survey::model()->findByPk($surveyid)->language;
    684. 

  684. 

  685.     //$gquery = "SELECT gid FROM ".db_table_name('groups')." WHERE sid=$surveyid AND language='{$s_lang}' ORDER BY group_order";
    686. 

  686. 

  687.     $qresult = Groups::model()->findAllByAttributes(array('sid' => $surveyid, 'language' => $s_lang), array('order'=>'group_order'));
    688. 

  688. 

  689.     $GidNext="";
    690. 

  690.     $i = 0;
    691. 

  691.     $iNext = 1;
    692. 

  692. 

  693.     foreach ($qresult as $qrow)
    694. 

  694.     {
    695. 

  695.         $qrow = $qrow->attributes;
    696. 

  696. 

  697.         if ($gid == $qrow['gid']) {$iNext = $i + 1;}
    698. 

  698.         $i += 1;
    699. 

  699.     }
    700. 

  700. 

  701.     if ($iNext < count($qresult)) {$GidNext = $qresult[$iNext]->gid;}
    702. 

  702.     else {$GidNext = "";}
    703. 

  703.     return $GidNext;
    704. 

  704. }
    705. 

  705. 

  706. /**
    707. 

  707. * getQidNext() returns the Qid of the question prior to the current active question
    708. 

  708. *
    709. 

  709. * @param string $surveyid
    710. 

  710. * @param string $gid
    711. 

  711. * @param string $qid
    712. 

  712. *
    713. 

  713. * @return This Qid of the previous question
    714. 

  714. */
    715. 

  715. function getQidNext($surveyid, $gid, $qid)
    716. 

  716. {
    717. 

  717.     $clang = Yii::app()->lang;
    718. 

  718.     $s_lang = Survey::model()->findByPk($surveyid)->language;
    719. 

  719.     $qrows = Questions::model()->findAllByAttributes(array('gid' => $gid, 'sid' => $surveyid, 'language' => $s_lang, 'parent_qid' => 0), array('order'=>'question_order'));
    720. 

  720. 

  721. 

  722.     $i = 0;
    723. 

  723.     $iNext = 1;
    724. 

  724.     if (count($qrows) > 0)
    725. 

  725.     {
    726. 

  726.         foreach ($qrows as $qrow)
    727. 

  727.         {
    728. 

  728.             if ($qid == $qrow->qid) {$iNext = $i + 1;}
    729. 

  729.             $i += 1;
    730. 

  730.         }
    731. 

  731.     }
    732. 

  732.     if ($iNext < count($qrows)) {$QidNext = $qrows[$iNext]->qid;}
    733. 

  733.     else {$QidNext = "";}
    734. 

  734.     return $QidNext;
    735. 

  735. }
    736. 

  736. 

  737. function convertGETtoPOST($url)
    738. 

  738. {
    739. 

  739.     $url = preg_replace('/&amp;/i','&',$url);
    740. 

  740.     $stack = explode('?',$url);
    741. 

  741.     $calledscript = array_shift($stack);
    742. 

  742.     $query = array_shift($stack);
    743. 

  743.     $aqueryitems = explode('&',$query);
    744. 

  744.     $arrayParam = Array();
    745. 

  745.     $arrayVal = Array();
    746. 

  746. 

  747.     foreach ($aqueryitems as $queryitem)
    748. 

  748.     {
    749. 

  749.         $stack =  explode ('=', $queryitem);
    750. 

  750.         $paramname = array_shift($stack);
    751. 

  751.         $value = array_shift($stack);
    752. 

  752.         $arrayParam[] = "'".$paramname."'";
    753. 

  753.         $arrayVal[] = substr($value, 0, 9) != "document." ? "'".$value."'" : $value;
    754. 

  754.     }
    755. 

  755.     //	$Paramlist = "[" . implode(",",$arrayParam) . "]";
    756. 

  756.     //	$Valuelist = "[" . implode(",",$arrayVal) . "]";
    757. 

  757.     $Paramlist = "new Array(" . implode(",",$arrayParam) . ")";
    758. 

  758.     $Valuelist = "new Array(" . implode(",",$arrayVal) . ")";
    759. 

  759.     $callscript = "sendPost('$calledscript','',$Paramlist,$Valuelist);";
    760. 

  760.     return $callscript;
    761. 

  761. }
    762. 

  762. 

  763. 

  764. /**
    765. 

  765. * This function calculates how much space is actually used by all files uploaded
    766. 

  766. * using the File Upload question type
    767. 

  767. *
    768. 

  768. * @returns integer Actual space used in MB
    769. 

  769. */
    770. 

  770. function calculateTotalFileUploadUsage(){
    771. 

  771.     global $uploaddir;
    772. 

  772.     $sQuery='select sid from {{surveys}}';
    773. 

  773.     $oResult = dbExecuteAssoc($sQuery); //checked
    774. 

  774.     $aRows = $oResult->readAll();
    775. 

  775.     $iTotalSize=0.0;
    776. 

  776.     foreach ($aRows as $aRow)
    777. 

  777.     {
    778. 

  778.         $sFilesPath=$uploaddir.'/surveys/'.$aRow['sid'].'/files';
    779. 

  779.         if (file_exists($sFilesPath))
    780. 

  780.         {
    781. 

  781.             $iTotalSize+=(float)getDirectorySize($sFilesPath);
    782. 

  782.         }
    783. 

  783.     }
    784. 

  784.     return (float)$iTotalSize/1024/1024;
    785. 

  785. }
    786. 

  786. 

  787. function getDirectorySize($directory) {
    788. 

  788.     $size = 0;
    789. 

  789.     foreach(new RecursiveIteratorIterator(new RecursiveDirectoryIterator($directory)) as $file){
    790. 

  790.         $size+=$file->getSize();
    791. 

  791.     }
    792. 

  792.     return $size;
    793. 

  793. }
    794. 

  794. 

  795. 

  796. /**
    797. 

  797. * Gets number of groups inside a particular survey
    798. 

  798. *
    799. 

  799. * @param string $surveyid
    800. 

  800. * @param mixed $lang
    801. 

  801. */
    802. 

  802. function getGroupSum($surveyid, $lang)
    803. 

  803. {
    804. 

  804.     //$condn = "WHERE sid=".$surveyid." AND language='".$lang."'"; //Getting a count of questions for this survey
    805. 

  805.     $condn = array('sid'=>$surveyid,'language'=>$lang);
    806. 

  806.     $sumresult3 = count(Groups::model()->findAllByAttributes($condn)); //Checked)
    807. 

  807. 

  808.     return $sumresult3 ;
    809. 

  809. }
    810. 

  810. 

  811. 

  812. /**
    813. 

  813. * getMaxGroupOrder($surveyid) queries the database for the maximum sortorder of a group and returns the next higher one.
    814. 

  814. *
    815. 

  815. * @param mixed $surveyid
    816. 

  816. */
    817. 

  817. function getMaxGroupOrder($surveyid)
    818. 

  818. {
    819. 

  819.     $s_lang = Survey::model()->findByPk($surveyid)->language;
    820. 

  820. 

  821.     //$max_sql = "SELECT max( group_order ) AS max FROM ".db_table_name('groups')." WHERE sid =$surveyid AND language='{$s_lang}'" ;
    822. 

  822.     $query = Groups::model()->find(array('order' => 'group_order desc'));
    823. 

  823.     $current_max = !is_null($query) ? $query->group_order : '';
    824. 

  824. 

  825.     if($current_max!="")
    826. 

  826.     {
    827. 

  827.         return ++$current_max ;
    828. 

  828.     }
    829. 

  829.     else return "0" ;
    830. 

  830. }
    831. 

  831. 

  832. 

  833. /**
    834. 

  834. * getGroupOrder($surveyid,$gid) queries the database for the sortorder of a group.
    835. 

  835. *
    836. 

  836. * @param mixed $surveyid
    837. 

  837. * @param mixed $gid
    838. 

  838. * @return mixed
    839. 

  839. */
    840. 

  840. function getGroupOrder($surveyid,$gid)
    841. 

  841. {
    842. 

  842. 

  843.     $s_lang = Survey::model()->findByPk($surveyid)->language;
    844. 

  844. 

  845.     //$grporder_sql = "SELECT group_order FROM ".db_table_name('groups')." WHERE sid =$surveyid AND language='{$s_lang}' AND gid=$gid" ;
    846. 

  846.     $grporder_result = Groups::model()->findByAttributes(array('sid' => $surveyid, 'gid' => $gid, 'language' => $s_lang)); //Checked
    847. 

  847.     $grporder_row = $grporder_result->attributes ;
    848. 

  848.     $group_order = $grporder_row['group_order'];
    849. 

  849.     if($group_order=="")
    850. 

  850.     {
    851. 

  851.         return "0" ;
    852. 

  852.     }
    853. 

  853.     else return $group_order ;
    854. 

  854. }
    855. 

  855. 

  856. /**
    857. 

  857. * getMaxQuestionOrder($gid) queries the database for the maximum sortorder of a question.
    858. 

  858. *
    859. 

  859. */
    860. 

  860. function getMaxQuestionOrder($gid,$surveyid)
    861. 

  861. {
    862. 

  862.     $gid=sanitize_int($gid);
    863. 

  863.     $s_lang = Survey::model()->findByPk($surveyid)->language;
    864. 

  864.     $max_sql = "SELECT max( question_order ) AS max FROM {{questions}} WHERE gid='$gid' AND language='$s_lang'";
    865. 

  865. 

  866.     $max_result = Yii::app()->db->createCommand($max_sql)->query(); //Checked
    867. 

  867.     $maxrow = $max_result->read() ;
    868. 

  868.     $current_max = $maxrow['max'];
    869. 

  869.     if($current_max=="")
    870. 

  870.     {
    871. 

  871.         return "0" ;
    872. 

  872.     }
    873. 

  873.     else return $current_max ;
    874. 

  874. }
    875. 

  875. 

  876. /**
    877. 

  877. * getQuestionClass() returns a class name for a given question type to allow custom styling for each question type.
    878. 

  878. *
    879. 

  879. * @param string $input containing unique character representing each question type.
    880. 

  880. * @return string containing the class name for a given question type.
    881. 

  881. */
    882. 

  882. function getQuestionClass($input)
    883. 

  883. {
    884. 

  884. 

  885.     switch($input)
    886. 

  886.     {   // I think this is a bad solution to adding classes to question
    887. 

  887.         // DIVs but I can't think of a better solution. (eric_t_cruiser)
    888. 

  888. 

  889.         case 'X': return 'boilerplate';     //  BOILERPLATE QUESTION
    890. 

  890.         case '5': return 'choice-5-pt-radio';   //  5 POINT CHOICE radio-buttons
    891. 

  891.         case 'D': return 'date';        //  DATE
    892. 

  892.         case 'Z': return 'list-radio-flexible'; //  LIST Flexible radio-button
    893. 

  893.         case 'L': return 'list-radio';      //  LIST radio-button
    894. 

  894.         case 'W': return 'list-dropdown-flexible'; //   LIST drop-down (flexible label)
    895. 

  895.         case '!': return 'list-dropdown';   //  List - dropdown
    896. 

  896.         case 'O': return 'list-with-comment';   //  LIST radio-button + textarea
    897. 

  897.         case 'R': return 'ranking';     //  RANKING STYLE
    898. 

  898.         case 'M': return 'multiple-opt';    //  Multiple choice checkbox
    899. 

  899.         case 'I': return 'language';        //  Language Question
    900. 

  900.         case 'P': return 'multiple-opt-comments'; //    Multiple choice with comments checkbox + text
    901. 

  901.         case 'Q': return 'multiple-short-txt';  //  TEXT
    902. 

  902.         case 'K': return 'numeric-multi';   //  MULTIPLE NUMERICAL QUESTION
    903. 

  903.         case 'N': return 'numeric';     //  NUMERICAL QUESTION TYPE
    904. 

  904.         case 'S': return 'text-short';      //  SHORT FREE TEXT
    905. 

  905.         case 'T': return 'text-long';       //  LONG FREE TEXT
    906. 

  906.         case 'U': return 'text-huge';       //  HUGE FREE TEXT
    907. 

  907.         case 'Y': return 'yes-no';      //  YES/NO radio-buttons
    908. 

  908.         case 'G': return 'gender';      //  GENDER drop-down list
    909. 

  909.         case 'A': return 'array-5-pt';      //  ARRAY (5 POINT CHOICE) radio-buttons
    910. 

  910.         case 'B': return 'array-10-pt';     //  ARRAY (10 POINT CHOICE) radio-buttons
    911. 

  911.         case 'C': return 'array-yes-uncertain-no'; //   ARRAY (YES/UNCERTAIN/NO) radio-buttons
    912. 

  912.         case 'E': return 'array-increase-same-decrease'; // ARRAY (Increase/Same/Decrease) radio-buttons
    913. 

  913.         case 'F': return 'array-flexible-row';  //  ARRAY (Flexible) - Row Format
    914. 

  914.         case 'H': return 'array-flexible-column'; //    ARRAY (Flexible) - Column Format
    915. 

  915.             //      case '^': return 'slider';          //  SLIDER CONTROL
    916. 

  916.         case ':': return 'array-multi-flexi';   //  ARRAY (Multi Flexi) 1 to 10
    917. 

  917.         case ";": return 'array-multi-flexi-text';
    918. 

  918.         case "1": return 'array-flexible-duel-scale'; //    Array dual scale
    919. 

  919.         case "*": return 'equation';    // Equation
    920. 

  920.         default:  return 'generic_question';    //  Should have a default fallback
    921. 

  921.     };
    922. 

  922. };
    923. 

  923. 

  924. /**
    925. 

  925. * setupColumns() defines all the html tags to be wrapped around
    926. 

  926. * various list type answers.
    927. 

  927. *
    928. 

  928. * @param integer $columns - the number of columns, usually supplied by $dcols
    929. 

  929. * @param integer $answer_count - the number of answers to a question, usually supplied by $anscount
    930. 

  930. * @param string $wrapperclass - a global class for the wrapper
    931. 

  931. * @param string $itemclass - a class for the item
    932. 

  932. * @return array with all the various opening and closing tags to generate a set of columns.
    933. 

  933. *
    934. 

  934. * It returns an array with the following items:
    935. 

  935. *    $wrapper['whole-start']   = Opening wrapper for the whole list
    936. 

  936. *    $wrapper['whole-end']     = closing wrapper for the whole list
    937. 

  937. *    $wrapper['col-devide']    = normal column devider
    938. 

  938. *    $wrapper['col-devide-last'] = the last column devider (to allow
    939. 

  939. *                                for different styling of the last
    940. 

  940. *                                column
    941. 

  941. *    $wrapper['item-start']    = opening wrapper tag for individual
    942. 

  942. *                                option
    943. 

  943. *    $wrapper['item-start-other'] = opening wrapper tag for other
    944. 

  944. *                                option
    945. 

  945. *    $wrapper['item-start-noanswer'] = opening wrapper tag for no answer
    946. 

  946. *                                option
    947. 

  947. *    $wrapper['item-end']      = closing wrapper tag for individual
    948. 

  948. *                                option
    949. 

  949. *    $wrapper['maxrows']       = maximum number of rows in each
    950. 

  950. *                                column
    951. 

  951. *    $wrapper['cols']          = Number of columns to be inserted
    952. 

  952. *                                (and checked against)
    953. 

  953. *
    954. 

  954. *
    955. 

  955. * - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
    956. 

  956. * Columns are a problem.
    957. 

  957. * Really there is no perfect solution to columns at the moment.
    958. 

  958. *
    959. 

  959. * -  Using Tables is problematic semanticly.
    960. 

  960. * -  Using inline or float to create columns, causes the answers
    961. 

  961. *    flows horizontally, not vertically which is not ideal visually.
    962. 

  962. * -  Using CSS3 columns is also a problem because of browser support
    963. 

  963. *    and also because if you have answeres split across two or more
    964. 

  964. *    lines, and those answeres happen to fall at the bottom of a
    965. 

  965. *    column, the answer might be split across columns as well as
    966. 

  966. *    lines.
    967. 

  967. * -  Using nested unordered list with the first level of <LI>s
    968. 

  968. *    floated is the same as using tables and so is bad semantically
    969. 

  969. *    for the same reason tables are bad.
    970. 

  970. * -  Breaking the unordered lists into consecutive floated unordered
    971. 

  971. *    lists is not great semantically but probably not as bad as
    972. 

  972. *    using tables.
    973. 

  973. *
    974. 

  974. * Because I haven't been able to decide which option is the least
    975. 

  975. * bad, I have handed over that responsibility to the admin who sets
    976. 

  976. * LimeSurvey up on their server.
    977. 

  977. *
    978. 

  978. * There are four options:
    979. 

  979. *    'css'   using one of the various CSS only methods for
    980. 

  980. *            rendering columns.
    981. 

  981. *            (Check the CSS file for your chosen template to see
    982. 

  982. *             how columns are defined.)
    983. 

  983. *    'ul'    using multiple floated unordered lists. (DEFAULT)
    984. 

  984. *    'table' using conventional tables based layout.
    985. 

  985. *     NULL   blocks the use of columns
    986. 

  986. *
    987. 

  987. * 'ul' is the default because it's the best possible compromise
    988. 

  988. * between semantic markup and visual layout.
    989. 

  989. */
    990. 

  990. function setupColumns($columns, $answer_count,$wrapperclass="",$itemclass="")
    991. 

  991. {
    992. 

  992. 

  993.     $column_style = Yii::app()->getConfig('column_style');
    994. 

  994.     if ( !in_array($column_style,array('css','ul','table')) && !is_null($column_style) )
    995. 

  995.     {
    996. 

  996.         $column_style = 'ul';
    997. 

  997.     };
    998. 

  998. 

  999.     if($columns < 2)
    1000. 

  1000.     {
    1001. 

  1001.         $column_style = null;
    1002. 

  1002.         $columns = 1;
    1003. 

  1003.     }
    1004. 

  1004. 

  1005.     if(($columns > $answer_count) && $answer_count>0)
    1006. 

  1006.     {
    1007. 

  1007.         $columns = $answer_count;
    1008. 

  1008.     };
    1009. 

  1009. 

  1010. 

  1011.     $class_first = ' class="'.$wrapperclass.'"';
    1012. 

  1012.     if($columns > 1 && !is_null($column_style))
    1013. 

  1013.     {
    1014. 

  1014.         if($column_style == 'ul')
    1015. 

  1015.         {
    1016. 

  1016.             $ul = '-ul';
    1017. 

  1017.         }
    1018. 

  1018.         else
    1019. 

  1019.         {
    1020. 

  1020.             $ul = '';
    1021. 

  1021.         }
    1022. 

  1022.         $class_first = ' class="'.$wrapperclass.' cols-'.$columns . $ul.' first"';
    1023. 

  1023.         $class = ' class="'.$wrapperclass.' cols-'.$columns . $ul.'"';
    1024. 

  1024.         $class_last_ul = ' class="'.$wrapperclass.' cols-'.$columns . $ul.' last"';
    1025. 

  1025.         $class_last_table = ' class="'.$wrapperclass.' cols-'.$columns.' last"';
    1026. 

  1026.     }
    1027. 

  1027.     else
    1028. 

  1028.     {
    1029. 

  1029.         $class = ' class="'.$wrapperclass.'"';
    1030. 

  1030.         $class_last_ul = ' class="'.$wrapperclass.'"';
    1031. 

  1031.         $class_last_table = ' class="'.$wrapperclass.'"';
    1032. 

  1032.     };
    1033. 

  1033. 

  1034.     $wrapper = array(
    1035. 

  1035.     'whole-start'  => "\n<ul$class_first>\n"
    1036. 

  1036.     ,'whole-end'    => "</ul>\n"
    1037. 

  1037.     ,'col-devide'   => ''
    1038. 

  1038.     ,'col-devide-last' => ''
    1039. 

  1039.     ,'item-start'   => "\t<li class=\"{$itemclass}\">\n"
    1040. 

  1040.     ,'item-start-other' => "\t<li class=\"{$itemclass} other other-item\">\n"
    1041. 

  1041.     ,'item-start-noanswer' => "\t<li class=\"{$itemclass} noanswer-item\">\n"
    1042. 

  1042.     ,'item-end' => "\t</li>\n"
    1043. 

  1043.     ,'maxrows'  => ceil($answer_count/$columns) //Always rounds up to nearest whole number
    1044. 

  1044.     ,'cols'     => $columns
    1045. 

  1045.     );
    1046. 

  1046. 

  1047.     switch($column_style)
    1048. 

  1048.     {
    1049. 

  1049.         case 'ul':  if($columns > 1)
    1050. 

  1050.             {
    1051. 

  1051.                 $wrapper['col-devide']  = "\n</ul>\n\n<ul$class>\n";
    1052. 

  1052.                 $wrapper['col-devide-last'] = "\n</ul>\n\n<ul$class_last_ul>\n";
    1053. 

  1053.             }
    1054. 

  1054.             break;
    1055. 

  1055. 

  1056.         case 'table':   $table_cols = '';
    1057. 

  1057.             for($cols = $columns ; $cols > 0 ; --$cols)
    1058. 

  1058.             {
    1059. 

  1059.                 switch($cols)
    1060. 

  1060.                 {
    1061. 

  1061.                     case $columns:  $table_cols .= "\t<col$class_first />\n";
    1062. 

  1062.                         break;
    1063. 

  1063.                     case 1:     $table_cols .= "\t<col$class_last_table />\n";
    1064. 

  1064.                         break;
    1065. 

  1065.                     default:    $table_cols .= "\t<col$class />\n";
    1066. 

  1066.                 };
    1067. 

  1067.             };
    1068. 

  1068. 

  1069.             if($columns > 1)
    1070. 

  1070.             {
    1071. 

  1071.                 $wrapper['col-devide']  = "\t</ul>\n</td>\n\n<td>\n\t<ul>\n";
    1072. 

  1072.                 $wrapper['col-devide-last'] = "\t</ul>\n</td>\n\n<td class=\"last\">\n\t<ul>\n";
    1073. 

  1073.             };
    1074. 

  1074.             $wrapper['whole-start'] = "\n<table$class>\n$table_cols\n\t<tbody>\n<tr>\n<td>\n\t<ul>\n";
    1075. 

  1075.             $wrapper['whole-end']   = "\t</ul>\n</td>\n</tr>\n\t</tbody>\n</table>\n";
    1076. 

  1076.             $wrapper['item-start']  = "<li class=\"{$itemclass}\">\n";
    1077. 

  1077.             $wrapper['item-end']    = "</li class=\"{$itemclass}\">\n";
    1078. 

  1078.     };
    1079. 

  1079. 

  1080.     return $wrapper;
    1081. 

  1081. };
    1082. 

  1082. 

  1083. function alternation($alternate = '' , $type = 'col')
    1084. 

  1084. {
    1085. 

  1085.     /**
    1086. 

  1086.     * alternation() Returns a class identifyer for alternating between
    1087. 

  1087.     * two options. Used to style alternate elements differently. creates
    1088. 

  1088.     * or alternates between the odd string and the even string used in
    1089. 

  1089.     * as column and row classes for array type questions.
    1090. 

  1090.     *
    1091. 

  1091.     * @param string $alternate = '' (empty) (default) , 'array2' ,  'array1' , 'odd' , 'even'
    1092. 

  1092.     * @param string  $type = 'col' (default) or 'row'
    1093. 

  1093.     *
    1094. 

  1094.     * @return string representing either the first alternation or the opposite alternation to the one supplied..
    1095. 

  1095.     */
    1096. 

  1096.     /*
    1097. 

  1097.     // The following allows type to be left blank for row in subsequent
    1098. 

  1098.     // function calls.
    1099. 

  1099.     // It has been left out because 'row' must be defined the first time
    1100. 

  1100.     // alternation() is called. Since it is only ever written once for each
    1101. 

  1101.     // while statement within a function, 'row' is always defined.
    1102. 

  1102.     if(!empty($alternate) && $type != 'row')
    1103. 

  1103.     {   if($alternate == ('array2' || 'array1'))
    1104. 

  1104.     {
    1105. 

  1105.     $type = 'row';
    1106. 

  1106.     };
    1107. 

  1107.     };
    1108. 

  1108.     // It has been left in case it becomes useful but probably should be
    1109. 

  1109.     // removed.
    1110. 

  1110.     */
    1111. 

  1111.     if($type == 'row')
    1112. 

  1112.     {
    1113. 

  1113.         $odd  = 'array2'; // should be row_odd
    1114. 

  1114.         $even = 'array1'; // should be row_even
    1115. 

  1115.     }
    1116. 

  1116.     else
    1117. 

  1117.     {
    1118. 

  1118.         $odd  = 'odd';  // should be col_odd
    1119. 

  1119.         $even = 'even'; // should be col_even
    1120. 

  1120.     };
    1121. 

  1121.     if($alternate == $odd)
    1122. 

  1122.     {
    1123. 

  1123.         $alternate = $even;
    1124. 

  1124.     }
    1125. 

  1125.     else
    1126. 

  1126.     {
    1127. 

  1127.         $alternate = $odd;
    1128. 

  1128.     };
    1129. 

  1129.     return $alternate;
    1130. 

  1130. }
    1131. 

  1131. 

  1132. 

  1133. /**
    1134. 

  1134. * longestString() returns the length of the longest string past to it.
    1135. 

  1135. * @peram string $new_string
    1136. 

  1136. * @peram integer $longest_length length of the (previously) longest string passed to it.
    1137. 

  1137. * @return integer representing the length of the longest string passed (updated if $new_string was longer than $longest_length)
    1138. 

  1138. *
    1139. 

  1139. * usage should look like this: $longest_length = longestString( $new_string , $longest_length );
    1140. 

  1140. *
    1141. 

  1141. */
    1142. 

  1142. function longestString( $new_string , $longest_length )
    1143. 

  1143. {
    1144. 

  1144.     if($longest_length < strlen(trim(strip_tags($new_string))))
    1145. 

  1145.     {
    1146. 

  1146.         $longest_length = strlen(trim(strip_tags($new_string)));
    1147. 

  1147.     };
    1148. 

  1148.     return $longest_length;
    1149. 

  1149. };
    1150. 

  1150. 

  1151. 

  1152. 

  1153. /**
    1154. 

  1154. * getNotificationList() returns different options for notifications
    1155. 

  1155. *
    1156. 

  1156. * @param string $notificationcode - the currently selected one
    1157. 

  1157. *
    1158. 

  1158. * @return This string is returned containing <option></option> formatted list of notification methods for current survey
    1159. 

  1159. */
    1160. 

  1160. function getNotificationList($notificationcode)
    1161. 

  1161. {
    1162. 

  1162.     $clang = Yii::app()->lang;
    1163. 

  1163.     $ntypes = array(
    1164. 

  1164.     "0"=>$clang->gT("No email notification"),
    1165. 

  1165.     "1"=>$clang->gT("Basic email notification"),
    1166. 

  1166.     "2"=>$clang->gT("Detailed email notification with result codes")
    1167. 

  1167.     );
    1168. 

  1168.     if (!isset($ntypeselector)) {$ntypeselector="";}
    1169. 

  1169.     foreach($ntypes as $ntcode=>$ntdescription)
    1170. 

  1170.     {
    1171. 

  1171.         $ntypeselector .= "<option value='$ntcode'";
    1172. 

  1172.         if ($notificationcode == $ntcode) {$ntypeselector .= " selected='selected'";}
    1173. 

  1173.         $ntypeselector .= ">$ntdescription</option>\n";
    1174. 

  1174.     }
    1175. 

  1175.     return $ntypeselector;
    1176. 

  1176. }
    1177. 

  1177. 

  1178. 

  1179. /**
    1180. 

  1180. * getGroupList() queries the database for a list of all groups matching the current survey sid
    1181. 

  1181. *
    1182. 

  1182. *
    1183. 

  1183. * @param string $gid - the currently selected gid/group
    1184. 

  1184. *
    1185. 

  1185. * @return This string is returned containing <option></option> formatted list of groups to current survey
    1186. 

  1186. */
    1187. 

  1187. function getGroupList($gid,$surveyid)
    1188. 

  1188. {
    1189. 

  1189.     $clang = Yii::app()->lang;
    1190. 

  1190.     $groupselecter="";
    1191. 

  1191.     $gid=sanitize_int($gid);
    1192. 

  1192.     $surveyid=sanitize_int($surveyid);
    1193. 

  1193.     if (!$surveyid) {$surveyid=returnGlobal('sid');}
    1194. 

  1194.     $s_lang = Survey::model()->findByPk($surveyid)->language;
    1195. 

  1195. 

  1196.     $gidquery = "SELECT gid, group_name FROM {{groups}} WHERE sid='{$surveyid}' AND  language='{$s_lang}' ORDER BY group_order";
    1197. 

  1197.     $gidresult = Yii::app()->db->createCommand($gidquery)->query(); //Checked
    1198. 

  1198.     foreach ($gidresult->readAll() as $gv)
    1199. 

  1199.     {
    1200. 

  1200.         $groupselecter .= "<option";
    1201. 

  1201.         if ($gv['gid'] == $gid) {$groupselecter .= " selected='selected'"; $gvexist = 1;}
    1202. 

  1202.         $groupselecter .= " value='".Yii::app()->getConfig('scriptname')."?sid=$surveyid&amp;gid=".$gv['gid']."'>".htmlspecialchars($gv['group_name'])."</option>\n";
    1203. 

  1203.     }
    1204. 

  1204.     if ($groupselecter)
    1205. 

  1205.     {
    1206. 

  1206.         if (!isset($gvexist)) {$groupselecter = "<option selected='selected'>".$clang->gT("Please choose...")."</option>\n".$groupselecter;}
    1207. 

  1207.         else {$groupselecter .= "<option value='".Yii::app()->getConfig('scriptname')."?sid=$surveyid&amp;gid='>".$clang->gT("None")."</option>\n";}
    1208. 

  1208.     }
    1209. 

  1209.     return $groupselecter;
    1210. 

  1210. }
    1211. 

  1211. 

  1212. 

  1213. 

  1214. function getGroupList3($gid,$surveyid)
    1215. 

  1215. {
    1216. 

  1216.     //$clang = Yii::app()->lang;
    1217. 

  1217.     $gid=sanitize_int($gid);
    1218. 

  1218.     $surveyid=sanitize_int($surveyid);
    1219. 

  1219. 

  1220.     if (!$surveyid) {$surveyid=returnGlobal('sid');}
    1221. 

  1221.     $groupselecter = "";
    1222. 

  1222.     $s_lang = Survey::model()->findByPk($surveyid)->language;
    1223. 

  1223. 

  1224. 

  1225.     //$gidquery = "SELECT gid, group_name FROM ".db_table_name('groups')." WHERE sid=$surveyid AND language='{$s_lang}' ORDER BY group_order";
    1226. 

  1226. 

  1227.     $gidresult = Groups::model()->findAllByAttributes(array('sid' => $surveyid, 'language' => $s_lang), array('order'=>'group_order'));
    1228. 

  1228. 

  1229.     foreach ($gidresult as $gv)
    1230. 

  1230.     {
    1231. 

  1231.         $gv = $gv->attributes;
    1232. 

  1232.         $groupselecter .= "<option";
    1233. 

  1233.         if ($gv['gid'] == $gid) {$groupselecter .= " selected='selected'"; }
    1234. 

  1234.         $groupselecter .= " value='".$gv['gid']."'>".htmlspecialchars($gv['group_name'])."</option>\n";
    1235. 

  1235.     }
    1236. 

  1236. 

  1237. 

  1238.     return $groupselecter;
    1239. 

  1239. }
    1240. 

  1240. 

  1241. /**
    1242. 

  1242. * put your comment there...
    1243. 

  1243. *
    1244. 

  1244. * @param mixed $gid
    1245. 

  1245. * @param mixed $language
    1246. 

  1246. */
    1247. 

  1247. function getGroupListLang($gid, $language, $surveyid)
    1248. 

  1248. {
    1249. 

  1249. 

  1250.     $clang = Yii::app()->lang;
    1251. 

  1251. 

  1252.     $groupselecter="";
    1253. 

  1253.     if (!$surveyid) {$surveyid=returnGlobal('sid');}
    1254. 

  1254. 

  1255.     $gidresult = Groups::model()->findAll(array('condition'=>'sid=:surveyid AND language=:language',
    1256. 

  1256.     'order'=>'group_order',
    1257. 

  1257.     'params'=>array(':surveyid'=>$surveyid,':language'=>$language)));   //Checked)
    1258. 

  1258.     foreach ($gidresult as $gv)
    1259. 

  1259.     {
    1260. 

  1260.         $gv = $gv->attributes;
    1261. 

  1261.         $groupselecter .= "<option";
    1262. 

  1262.         if ($gv['gid'] == $gid) {$groupselecter .= " selected='selected'"; $gvexist = 1;}
    1263. 

  1263.         $link = Yii::app()->getController()->createUrl("/admin/survey/sa/view/surveyid/".$surveyid."/gid/".$gv['gid']);
    1264. 

  1264.         $groupselecter .= " value='{$link}'>";
    1265. 

  1265.         if (strip_tags($gv['group_name']))
    1266. 

  1266.         {
    1267. 

  1267.             $groupselecter .= htmlspecialchars(strip_tags($gv['group_name']));
    1268. 

  1268.         } else {
    1269. 

  1269.             $groupselecter .= htmlspecialchars($gv['group_name']);
    1270. 

  1270.         }
    1271. 

  1271.         $groupselecter .= "</option>\n";
    1272. 

  1272.     }
    1273. 

  1273.     if ($groupselecter)
    1274. 

  1274.     {
    1275. 

  1275.         $link = Yii::app()->getController()->createUrl("/admin/survey/sa/view/surveyid/".$surveyid);
    1276. 

  1276.         if (!isset($gvexist)) {$groupselecter = "<option selected='selected'>".$clang->gT("Please choose...")."</option>\n".$groupselecter;}
    1277. 

  1277.         else {$groupselecter .= "<option value='{$link}'>".$clang->gT("None")."</option>\n";}
    1278. 

  1278.     }
    1279. 

  1279.     return $groupselecter;
    1280. 

  1280. }
    1281. 

  1281. 

  1282. 

  1283. function getUserList($outputformat='fullinfoarray')
    1284. 

  1284. {
    1285. 

  1285.     $clang = Yii::app()->lang;
    1286. 

  1286. 

  1287.     if (!empty(Yii::app()->session['loginID']))
    1288. 

  1288.     {
    1289. 

  1289.         $myuid=sanitize_int(Yii::app()->session['loginID']);
    1290. 

  1290.     }
    1291. 

  1291.     $usercontrolSameGroupPolicy = Yii::app()->getConfig('usercontrolSameGroupPolicy');
    1292. 

  1292.     if (Yii::app()->session['USER_RIGHT_SUPERADMIN'] != 1 && isset($usercontrolSameGroupPolicy) &&
    1293. 

  1293.     $usercontrolSameGroupPolicy == true)
    1294. 

  1294.     {
    1295. 

  1295.         if (isset($myuid))
    1296. 

  1296.         {
    1297. 

  1297.             $sDatabaseType = Yii::app()->db->getDriverName();
    1298. 

  1298.             if ($sDatabaseType=='mssql' || $sDatabaseType=="sqlsrv")
    1299. 

  1299.             {
    1300. 

  1300.                 $sSelectFields = 'users_name,uid,email,full_name,parent_id,create_survey,participant_panel,configurator,create_user,delete_user,superadmin,manage_template,manage_label,CAST(password as varchar) as password';
    1301. 

  1301.             }
    1302. 

  1302.             else
    1303. 

  1303.             {
    1304. 

  1304.                 $sSelectFields = 'users_name,uid,email,full_name,parent_id,create_survey,participant_panel,configurator,create_user,delete_user,superadmin,manage_template,manage_label,password';
    1305. 

  1305.             }
    1306. 

  1306. 

  1307.             // List users from same group as me + all my childs
    1308. 

  1308.             // a subselect is used here because MSSQL does not like to group by text
    1309. 

  1309.             // also Postgres does like this one better
    1310. 

  1310.             $uquery = " SELECT {$sSelectFields} from {{users}} where uid in (
    1311. 

  1311.                 SELECT uid from {{user_in_groups}} where ugid in (
    1312. 

  1312.                     SELECT ugid from {{user_in_groups}} where uid={$myuid}
    1313. 

  1313.                     )
    1314. 

  1314.                 )
    1315. 

  1315.             UNION
    1316. 

  1316.             SELECT {$sSelectFields} from {{users}} v where v.parent_id={$myuid}
    1317. 

  1317.             UNION
    1318. 

  1318.             SELECT {$sSelectFields} from {{users}} v where uid={$myuid}";
    1319. 

  1319.             
    1320. 

  1320.         }
    1321. 

  1321.         else
    1322. 

  1322.         {
    1323. 

  1323.             return array(); // Or die maybe
    1324. 

  1324.         }
    1325. 

  1325.                                                         
    1326. 

  1326.     }
    1327. 

  1327.     else
    1328. 

  1328.     {
    1329. 

  1329.         $uquery = "SELECT * FROM {{users}} ORDER BY uid";
    1330. 

  1330.     }
    1331. 

  1331. 

  1332.     $uresult = Yii::app()->db->createCommand($uquery)->query()->readAll(); //Checked
    1333. 

  1333. 

  1334.     if (count($uresult)==0)
    1335. 

  1335.     //user is not in a group and usercontrolSameGroupPolicy is activated - at least show his own userinfo
    1336. 

  1336.     {
    1337. 

  1337.         $uquery = "SELECT u.* FROM {{users}} AS u WHERE u.uid=".$myuid;
    1338. 

  1338.         $uresult = Yii::app()->db->createCommand($uquery)->query()->readAll();//Checked
    1339. 

  1339.     }
    1340. 

  1340. 

  1341.     $userlist = array();
    1342. 

  1342.     $userlist[0] = "Reserved for logged in user";
    1343. 

  1343.     //while ($srow = $uresult->readAll())
    1344. 

  1344.     foreach ($uresult as $srow)
    1345. 

  1345.     {
    1346. 

  1346.         if ($outputformat != 'onlyuidarray')
    1347. 

  1347.         {
    1348. 

  1348.             if ($srow['uid'] != Yii::app()->session['loginID'])
    1349. 

  1349.             {
    1350. 

  1350.                 $userlist[] = array("user"=>$srow['users_name'], "uid"=>$srow['uid'], "email"=>$srow['email'], "password"=>$srow['password'], "full_name"=>$srow['full_name'], "parent_id"=>$srow['parent_id'], "create_survey"=>$srow['create_survey'], "participant_panel"=>$srow['participant_panel'], "configurator"=>$srow['configurator'], "create_user"=>$srow['create_user'], "delete_user"=>$srow['delete_user'], "superadmin"=>$srow['superadmin'], "manage_template"=>$srow['manage_template'], "manage_label"=>$srow['manage_label']);           //added by Dennis modified by Moses
    1351. 

  1351.             }
    1352. 

  1352.             else
    1353. 

  1353.             {
    1354. 

  1354.                 $userlist[0] = array("user"=>$srow['users_name'], "uid"=>$srow['uid'], "email"=>$srow['email'], "password"=>$srow['password'], "full_name"=>$srow['full_name'], "parent_id"=>$srow['parent_id'], "create_survey"=>$srow['create_survey'],"participant_panel"=>$srow['participant_panel'], "configurator"=>$srow['configurator'], "create_user"=>$srow['create_user'], "delete_user"=>$srow['delete_user'], "superadmin"=>$srow['superadmin'], "manage_template"=>$srow['manage_template'], "manage_label"=>$srow['manage_label']);
    1355. 

  1355.             }
    1356. 

  1356.         }
    1357. 

  1357.         else
    1358. 

  1358.         {
    1359. 

  1359.             if ($srow['uid'] != Yii::app()->session['loginID'])
    1360. 

  1360.             {
    1361. 

  1361.                 $userlist[] = $srow['uid'];
    1362. 

  1362.             }
    1363. 

  1363.             else
    1364. 

  1364.             {
    1365. 

  1365.                 $userlist[0] = $srow['uid'];
    1366. 

  1366.             }
    1367. 

  1367.         }
    1368. 

  1368. 

  1369.     }
    1370. 

  1370.     return $userlist;
    1371. 

  1371. }
    1372. 

  1372. 

  1373. 

  1374. /**
    1375. 

  1375. * Gets all survey infos in one big array including the language specific settings
    1376. 

  1376. *
    1377. 

  1377. * @param string $surveyid  The survey ID
    1378. 

  1378. * @param string $languagecode The language code - if not given the base language of the particular survey is used
    1379. 

  1379. * @return array Returns array with survey info or false, if survey does not exist
    1380. 

  1380. */
    1381. 

  1381. function getSurveyInfo($surveyid, $languagecode='')
    1382. 

  1382. {
    1383. 

  1383.     static $staticSurveyInfo = array();// Use some static
    1384. 

  1384.     $surveyid=sanitize_int($surveyid);
    1385. 

  1385.     $languagecode=sanitize_languagecode($languagecode);
    1386. 

  1386.     $thissurvey=false;
    1387. 

  1387.     // Do job only if this survey exist
    1388. 

  1388.     if(!Survey::model()->findByPk($surveyid))
    1389. 

  1389.     {
    1390. 

  1390.         return false;
    1391. 

  1391.     }
    1392. 

  1392.     // if no language code is set then get the base language one
    1393. 

  1393.     if ((!isset($languagecode) || $languagecode==''))
    1394. 

  1394.     {
    1395. 

  1395.         $languagecode=Survey::model()->findByPk($surveyid)->language;
    1396. 

  1396.     }
    1397. 

  1397. 

  1398.     if(isset($staticSurveyInfo[$surveyid][$languagecode]) )
    1399. 

  1399.     {
    1400. 

  1400.         $thissurvey=$staticSurveyInfo[$surveyid][$languagecode];
    1401. 

  1401.     }
    1402. 

  1402.     else
    1403. 

  1403.     {
    1404. 

  1404.         $result = Surveys_languagesettings::model()->with('survey')->findByPk(array('surveyls_survey_id' => $surveyid, 'surveyls_language' => $languagecode));
    1405. 

  1405.         if (is_null($result)) {
    1406. 

  1406.             // When additional language was added, but not saved it does not exists
    1407. 

  1407.             // We should revert to the base language then
    1408. 

  1408.             $languagecode=Survey::model()->findByPk($surveyid)->language;
    1409. 

  1409.             $result = Surveys_languagesettings::model()->with('survey')->findByPk(array('surveyls_survey_id' => $surveyid, 'surveyls_language' => $languagecode));
    1410. 

  1410.         }
    1411. 

  1411.         if($result)
    1412. 

  1412.         {
    1413. 

  1413.             $thissurvey=array_merge($result->survey->attributes,$result->attributes);
    1414. 

  1414.             $thissurvey['name']=$thissurvey['surveyls_title'];
    1415. 

  1415.             $thissurvey['description']=$thissurvey['surveyls_description'];
    1416. 

  1416.             $thissurvey['welcome']=$thissurvey['surveyls_welcometext'];
    1417. 

  1417.             $thissurvey['templatedir']=$thissurvey['template'];
    1418. 

  1418.             $thissurvey['adminname']=$thissurvey['admin'];
    1419. 

  1419.             $thissurvey['tablename']='{{survey_'.$thissurvey['sid'] . '}}';
    1420. 

  1420.             $thissurvey['urldescrip']=$thissurvey['surveyls_urldescription'];
    1421. 

  1421.             $thissurvey['url']=$thissurvey['surveyls_url'];
    1422. 

  1422.             $thissurvey['expiry']=$thissurvey['expires'];
    1423. 

  1423.             $thissurvey['email_invite_subj']=$thissurvey['surveyls_email_invite_subj'];
    1424. 

  1424.             $thissurvey['email_invite']=$thissurvey['surveyls_email_invite'];
    1425. 

  1425.             $thissurvey['email_remind_subj']=$thissurvey['surveyls_email_remind_subj'];
    1426. 

  1426.             $thissurvey['email_remind']=$thissurvey['surveyls_email_remind'];
    1427. 

  1427.             $thissurvey['email_confirm_subj']=$thissurvey['surveyls_email_confirm_subj'];
    1428. 

  1428.             $thissurvey['email_confirm']=$thissurvey['surveyls_email_confirm'];
    1429. 

  1429.             $thissurvey['email_register_subj']=$thissurvey['surveyls_email_register_subj'];
    1430. 

  1430.             $thissurvey['email_register']=$thissurvey['surveyls_email_register'];
    1431. 

  1431.             $thissurvey['attributedescriptions'] = $result->survey->tokenAttributes;
    1432. 

  1432.             $thissurvey['attributecaptions'] = $result->attributeCaptions;
    1433. 

  1433.             if (!isset($thissurvey['adminname'])) {$thissurvey['adminname']=Yii::app()->getConfig('siteadminemail');}
    1434. 

  1434.             if (!isset($thissurvey['adminemail'])) {$thissurvey['adminemail']=Yii::app()->getConfig('siteadminname');}
    1435. 

  1435.             if (!isset($thissurvey['urldescrip']) || $thissurvey['urldescrip'] == '' ) {$thissurvey['urldescrip']=$thissurvey['surveyls_url'];}
    1436. 

  1436.         
    1437. 

  1437.             $staticSurveyInfo[$surveyid][$languagecode]=$thissurvey;
    1438. 

  1438.         }
    1439. 

  1439.         
    1440. 

  1440.     }
    1441. 

  1441. 

  1442.     return $thissurvey;
    1443. 

  1443. }
    1444. 

  1444. 

  1445. /**
    1446. 

  1446. * Returns the default email template texts as array
    1447. 

  1447. *
    1448. 

  1448. * @param mixed $oLanguage Required language translationb object
    1449. 

  1449. * @param string $mode Escape mode for the translation function
    1450. 

  1450. * @return array
    1451. 

  1451. */
    1452. 

  1452. function templateDefaultTexts($oLanguage, $mode='html'){
    1453. 

  1453.     return array(
    1454. 

  1454.     'admin_detailed_notification_subject'=>$oLanguage->gT("Response submission for survey {SURVEYNAME} with results",$mode),
    1455. 

  1455.     'admin_detailed_notification'=>$oLanguage->gT("Hello,\n\nA new response was submitted for your survey '{SURVEYNAME}'.\n\nClick the following link to reload the survey:\n{RELOADURL}\n\nClick the following link to see the individual response:\n{VIEWRESPONSEURL}\n\nClick the following link to edit the individual response:\n{EDITRESPONSEURL}\n\nView statistics by clicking here:\n{STATISTICSURL}\n\n\nThe following answers were given by the participant:\n{ANSWERTABLE}",$mode),
    1456. 

  1456.     'admin_detailed_notification_css'=>'<style type="text/css">
    1457. 

  1457.     .printouttable {
    1458. 

  1458.     margin:1em auto;
    1459. 

  1459.     }
    1460. 

  1460.     .printouttable th {
    1461. 

  1461.     text-align: center;
    1462. 

  1462.     }
    1463. 

  1463.     .printouttable td {
    1464. 

  1464.     border-color: #ddf #ddf #ddf #ddf;
    1465. 

  1465.     border-style: solid;
    1466. 

  1466.     border-width: 1px;
    1467. 

  1467.     padding:0.1em 1em 0.1em 0.5em;
    1468. 

  1468.     }
    1469. 

  1469. 

  1470.     .printouttable td:first-child {
    1471. 

  1471.     font-weight: 700;
    1472. 

  1472.     text-align: right;
    1473. 

  1473.     padding-right: 5px;
    1474. 

  1474.     padding-left: 5px;
    1475. 

  1475. 

  1476.     }
    1477. 

  1477.     .printouttable .printanswersquestion td{
    1478. 

  1478.     background-color:#F7F8FF;
    1479. 

  1479.     }
    1480. 

  1480. 

  1481.     .printouttable .printanswersquestionhead td{
    1482. 

  1482.     text-align: left;
    1483. 

  1483.     background-color:#ddf;
    1484. 

  1484.     }
    1485. 

  1485. 

  1486.     .printouttable .printanswersgroup td{
    1487. 

  1487.     text-align: center;
    1488. 

  1488.     font-weight:bold;
    1489. 

  1489.     padding-top:1em;
    1490. 

  1490.     }
    1491. 

  1491.     </style>',
    1492. 

  1492.     'admin_notification_subject'=>$oLanguage->gT("Response submission for survey {SURVEYNAME}",$mode),
    1493. 

  1493.     'admin_notification'=>$oLanguage->gT("Hello,\n\nA new response was submitted for your survey '{SURVEYNAME}'.\n\nClick the following link to reload the survey:\n{RELOADURL}\n\nClick the following link to see the individual response:\n{VIEWRESPONSEURL}\n\nClick the following link to edit the individual response:\n{EDITRESPONSEURL}\n\nView statistics by clicking here:\n{STATISTICSURL}",$mode),
    1494. 

  1494.     'confirmation_subject'=>$oLanguage->gT("Confirmation of your participation in our survey"),
    1495. 

  1495.     'confirmation'=>$oLanguage->gT("Dear {FIRSTNAME},\n\nthis email is to confirm that you have completed the survey titled {SURVEYNAME} and your response has been saved. Thank you for participating.\n\nIf you have any further questions about this email, please contact {ADMINNAME} on {ADMINEMAIL}.\n\nSincerely,\n\n{ADMINNAME}",$mode),
    1496. 

  1496.     'invitation_subject'=>$oLanguage->gT("Invitation to participate in a survey",$mode),
    1497. 

  1497.     'invitation'=>$oLanguage->gT("Dear {FIRSTNAME},\n\nyou have been invited to participate in a survey.\n\nThe survey is titled:\n\"{SURVEYNAME}\"\n\n\"{SURVEYDESCRIPTION}\"\n\nTo participate, please click on the link below.\n\nSincerely,\n\n{ADMINNAME} ({ADMINEMAIL})\n\n----------------------------------------------\nClick here to do the survey:\n{SURVEYURL}",$mode)."\n\n".$oLanguage->gT("If you do not want to participate in this survey and don't want to receive any more invitations please click the following link:\n{OPTOUTURL}",$mode)."\n\n".$oLanguage->gT("If you are blacklisted but want to participate in this survey and want to receive invitations please click the following link:\n{OPTINURL}",$mode),
    1498. 

  1498.     'reminder_subject'=>$oLanguage->gT("Reminder to participate in a survey",$mode),
    1499. 

  1499.     'reminder'=>$oLanguage->gT("Dear {FIRSTNAME},\n\nRecently we invited you to participate in a survey.\n\nWe note that you have not yet completed the survey, and wish to remind you that the survey is still available should you wish to take part.\n\nThe survey is titled:\n\"{SURVEYNAME}\"\n\n\"{SURVEYDESCRIPTION}\"\n\nTo participate, please click on the link below.\n\nSincerely,\n\n{ADMINNAME} ({ADMINEMAIL})\n\n----------------------------------------------\nClick here to do the survey:\n{SURVEYURL}",$mode)."\n\n".$oLanguage->gT("If you do not want to participate in this survey and don't want to receive any more invitations please click the following link:\n{OPTOUTURL}",$mode),
    1500. 

  1500.     'registration_subject'=>$oLanguage->gT("Survey registration confirmation",$mode),
    1501. 

  1501.     'registration'=>$oLanguage->gT("Dear {FIRSTNAME},\n\nYou, or someone using your email address, have registered to participate in an online survey titled {SURVEYNAME}.\n\nTo complete this survey, click on the following URL:\n\n{SURVEYURL}\n\nIf you have any questions about this survey, or if you did not register to participate and believe this email is in error, please contact {ADMINNAME} at {ADMINEMAIL}.",$mode)
    1502. 

  1502.     );
    1503. 

  1503. }
    1504. 

  1504. 

  1505. /**
    1506. 

  1506. * Compares two elements from an array (passed by the usort function)
    1507. 

  1507. * and returns -1, 0 or 1 depending on the result of the comparison of
    1508. 

  1508. * the sort order of the group_order and question_order field
    1509. 

  1509. *
    1510. 

  1510. * @param mixed $a
    1511. 

  1511. * @param mixed $b
    1512. 

  1512. * @return int
    1513. 

  1513. */
    1514. 

  1514. function groupOrderThenQuestionOrder($a, $b)
    1515. 

  1515. {
    1516. 

  1516.     if (isset($a['group_order']) && isset($b['group_order']))
    1517. 

  1517.     {
    1518. 

  1518.         $GroupResult = strnatcasecmp($a['group_order'], $b['group_order']);
    1519. 

  1519.     }
    1520. 

  1520.     else
    1521. 

  1521.     {
    1522. 

  1522.         $GroupResult = "";
    1523. 

  1523.     }
    1524. 

  1524.     if ($GroupResult == 0)
    1525. 

  1525.     {
    1526. 

  1526.         $TitleResult = strnatcasecmp($a["question_order"], $b["question_order"]);
    1527. 

  1527.         return $TitleResult;
    1528. 

  1528.     }
    1529. 

  1529.     return $GroupResult;
    1530. 

  1530. }
    1531. 

  1531. 

  1532. 

  1533. function fixSortOrderAnswers($qid,$surveyid=null) //Function rewrites the sortorder for a group of answers
    1534. 

  1534. {
    1535. 

  1535.     $qid=sanitize_int($qid);
    1536. 

  1536.     $baselang = Survey::model()->findByPk($surveyid)->language;
    1537. 

  1537. 

  1538.     Answers::model()->updateSortOrder($qid,$baselang);
    1539. 

  1539. }
    1540. 

  1540. 

  1541. /**
    1542. 

  1542. * This function rewrites the sortorder for questions inside the named group
    1543. 

  1543. * REMOVED the 2012-08-08 : replaced by Questions::model()->updateQuestionOrder
    1544. 

  1544. * @param integer $groupid the group id
    1545. 

  1545. * @param integer $surveyid the survey id
    1546. 

  1546. */
    1547. 

  1547. /**
    1548. 

  1548. function fixSortOrderQuestions($groupid, $surveyid) //Function rewrites the sortorder for questions
    1549. 

  1549. {
    1550. 

  1550.     $gid = sanitize_int($groupid);
    1551. 

  1551.     $surveyid = sanitize_int($surveyid);
    1552. 

  1552.     $baselang = Survey::model()->findByPk($surveyid)->language;
    1553. 

    1554. 

  1554.     $questions = Questions::model()->findAllByAttributes(array('gid' => $gid, 'sid' => $surveyid, 'language' => $baselang));
    1555. 

  1555.     $p = 0;
    1556. 

  1556.     foreach ($questions as $question)
    1557. 

  1557.     {
    1558. 

  1558.         $question->question_order = $p;
    1559. 

  1559.         $question->save();
    1560. 

  1560.         $p++;
    1561. 

  1561.     }
    1562. 

  1562. }
    1563. 

  1563. */
    1564. 

  1564. 

  1565. function shiftOrderQuestions($sid,$gid,$shiftvalue) //Function shifts the sortorder for questions
    1566. 

  1566. {
    1567. 

  1567.     $sid=sanitize_int($sid);
    1568. 

  1568.     $gid=sanitize_int($gid);
    1569. 

  1569.     $shiftvalue=sanitize_int($shiftvalue);
    1570. 

  1570. 

  1571.     $baselang = Survey::model()->findByPk($sid)->language;
    1572. 

  1572. 

  1573.     Questions::model()->updateQuestionOrder($gid,$baselang,$shiftvalue);
    1574. 

  1574. }
    1575. 

  1575. 

  1576. function fixSortOrderGroups($surveyid) //Function rewrites the sortorder for groups
    1577. 

  1577. {
    1578. 

  1578.     $baselang = Survey::model()->findByPk($surveyid)->language;
    1579. 

  1579.     Groups::model()->updateGroupOrder($surveyid,$baselang);
    1580. 

  1580. }
    1581. 

  1581. 

  1582. function fixMovedQuestionConditions($qid,$oldgid,$newgid) //Function rewrites the cfieldname for a question after group change
    1583. 

  1583. {
    1584. 

  1584.     $surveyid = Yii::app()->getConfig('sid');
    1585. 

  1585.     $qid=sanitize_int($qid);
    1586. 

  1586.     $oldgid=sanitize_int($oldgid);
    1587. 

  1587.     $newgid=sanitize_int($newgid);
    1588. 

  1588.     Conditions::model()->updateCFieldName($surveyid,$qid,$oldgid,$newgid);
    1589. 

  1589.     // TMSW Conditions->Relevance:  Call LEM->ConvertConditionsToRelevance() when done
    1590. 

  1590. }
    1591. 

  1591. 

  1592. 

  1593. /**
    1594. 

  1594. * This function returns POST/REQUEST vars, for some vars like SID and others they are also sanitized
    1595. 

  1595. *
    1596. 

  1596. * @param mixed $stringname
    1597. 

  1597. * @param mixed $urlParam
    1598. 

  1598. */
    1599. 

  1599. function returnGlobal($stringname)
    1600. 

  1600. {
    1601. 

  1601.     if ($stringname=='sid') // don't read SID from a Cookie
    1602. 

  1602.     {
    1603. 

  1603.         if (isset($_GET[$stringname])) $urlParam = $_GET[$stringname];
    1604. 

  1604.         if (isset($_POST[$stringname])) $urlParam = $_POST[$stringname];
    1605. 

  1605.     }
    1606. 

  1606.     elseif (isset($_REQUEST[$stringname]))
    1607. 

  1607.     {
    1608. 

  1608.         $urlParam = $_REQUEST[$stringname];
    1609. 

  1609.     }
    1610. 

  1610. 

  1611.     if (isset($urlParam))
    1612. 

  1612.     {
    1613. 

  1613.         if ($stringname == 'sid' || $stringname == "gid" || $stringname == "oldqid" ||
    1614. 

  1614.         $stringname == "qid" || $stringname == "tid" ||
    1615. 

  1615.         $stringname == "lid" || $stringname == "ugid"||
    1616. 

  1616.         $stringname == "thisstep" || $stringname == "scenario" ||
    1617. 

  1617.         $stringname == "cqid" || $stringname == "cid" ||
    1618. 

  1618.         $stringname == "qaid" || $stringname == "scid" ||
    1619. 

  1619.         $stringname == "loadsecurity")
    1620. 

  1620.         {
    1621. 

  1621.             return sanitize_int($urlParam);
    1622. 

  1622.         }
    1623. 

  1623.         elseif ($stringname =="lang" || $stringname =="adminlang")
    1624. 

  1624.         {
    1625. 

  1625.             return sanitize_languagecode($urlParam);
    1626. 

  1626.         }
    1627. 

  1627.         elseif ($stringname =="htmleditormode" ||
    1628. 

  1628.         $stringname =="subaction" ||
    1629. 

  1629.         $stringname =="questionselectormode" ||
    1630. 

  1630.         $stringname =="templateeditormode"
    1631. 

  1631.         )
    1632. 

  1632.         {
    1633. 

  1633.             return sanitize_paranoid_string($urlParam);
    1634. 

  1634.         }
    1635. 

  1635.         elseif ( $stringname =="cquestions")
    1636. 

  1636.         {
    1637. 

  1637.             return sanitize_cquestions($urlParam);
    1638. 

  1638.         }
    1639. 

  1639.         return $urlParam;
    1640. 

  1640.     }
    1641. 

  1641.     else
    1642. 

  1642.     {
    1643. 

  1643.         return NULL;
    1644. 

  1644.     }
    1645. 

  1645. 

  1646. }
    1647. 

  1647. 

  1648. 

  1649. function sendCacheHeaders()
    1650. 

  1650. {
    1651. 

  1651.     global $embedded;
    1652. 

  1652.     if ( $embedded ) return;
    1653. 

  1653.     if (!headers_sent())
    1654. 

  1654.     {
    1655. 

  1655.         header('P3P:CP="IDC DSP COR ADM DEVi TAIi PSA PSD IVAi IVDi CONi HIS OUR IND CNT"');  // this line lets IE7 run LimeSurvey in an iframe
    1656. 

  1656.         header("Expires: Mon, 26 Jul 1997 05:00:00 GMT");    // Date in the past
    1657. 

  1657.         header("Last-Modified: " . gmdate("D, d M Y H:i:s") . " GMT");  // always modified
    1658. 

  1658.         header("Cache-Control: no-store, no-cache, must-revalidate");  // HTTP/1.1
    1659. 

  1659.         header("Cache-Control: post-check=0, pre-check=0", false);
    1660. 

  1660.         header("Pragma: no-cache");
    1661. 

  1661.         header('Content-Type: text/html; charset=utf-8');
    1662. 

  1662.     }
    1663. 

  1663. }
    1664. 

  1664. 

  1665. function getSIDGIDQIDAIDType($fieldcode)
    1666. 

  1666. {
    1667. 

  1667.     // use simple parsing to get {sid}, {gid}
    1668. 

  1668.     // and what may be {qid} or {qid}{aid} combination
    1669. 

  1669.     list($fsid, $fgid, $fqid) = explode('X', $fieldcode);
    1670. 

  1670.     $fsid=sanitize_int($fsid);
    1671. 

  1671.     $fgid=sanitize_int($fgid);
    1672. 

  1672.     if (!$fqid) {$fqid=0;}
    1673. 

  1673.     $fqid=sanitize_int($fqid);
    1674. 

  1674.     // try a true parsing of fieldcode (can separate qid from aid)
    1675. 

  1675.     // but fails for type M and type P multiple choice
    1676. 

  1676.     // questions because the SESSION fieldcode is combined
    1677. 

  1677.     // and we want here to pass only the sidXgidXqid for type M and P
    1678. 

  1678.     $fields=arraySearchByKey($fieldcode, createFieldMap($fsid,'full',false,false,getBaseLanguageFromSurveyID($fsid)), "fieldname", 1);
    1679. 

  1679. 

  1680.     if (count($fields) != 0)
    1681. 

  1681.     {
    1682. 

  1682.         $aRef['sid']=$fields['sid'];
    1683. 

  1683.         $aRef['gid']=$fields['gid'];
    1684. 

  1684.         $aRef['qid']=$fields['qid'];
    1685. 

  1685.         $aRef['aid']=$fields['aid'];
    1686. 

  1686.         $aRef['type']=$fields['type'];
    1687. 

  1687.     }
    1688. 

  1688.     else
    1689. 

  1689.     {
    1690. 

  1690.         // either the fielcode doesn't match a question
    1691. 

  1691.         // or it is a type M or P question
    1692. 

  1692.         $aRef['sid']=$fsid;
    1693. 

  1693.         $aRef['gid']=$fgid;
    1694. 

  1694.         $aRef['qid']=sanitize_int($fqid);
    1695. 

  1695. 

  1696.         $s_lang = Survey::model()->findByPk($fsid)->language;
    1697. 

  1697.         $fieldtoselect = array('type');
    1698. 

  1698.         $condition = "qid = ".$fqid." AND language='".$s_lang."'";
    1699. 

  1699. 

  1700.         $result = Questions::model()->findAllByAttributes(array('qid' => $fqid, 'language' => $s_lang));
    1701. 

  1701. 

  1702.         if ( count($result) == 0 )
    1703. 

  1703.         { // question doesn't exist
    1704. 

  1704.             return array();
    1705. 

  1705.         }
    1706. 

  1706.         else
    1707. 

  1707.         {   // certainly is type M or P
    1708. 

  1708.             foreach ($result as $row)
    1709. 

  1709.             {
    1710. 

  1710.                 $aRef['type']=$row['type'];
    1711. 

  1711.             }
    1712. 

  1712.         }
    1713. 

  1713. 

  1714.     }
    1715. 

  1715. 

  1716.     //return array('sid'=>$fsid, "gid"=>$fgid, "qid"=>$fqid);
    1717. 

  1717.     return $aRef;
    1718. 

  1718. }
    1719. 

  1719. 

  1720. /**
    1721. 

  1721. * @param type $iSurveyID The Survey ID
    1722. 

  1722. * @param type $sFieldCode Field code of the particular field
    1723. 

  1723. * @param type $sValue The stored response value
    1724. 

  1724. * @param object $oLanguage Initialized limesurvey_lang object for the resulting response data
    1725. 

  1725. * @return string
    1726. 

  1726. */
    1727. 

  1727. function getExtendedAnswer($iSurveyID, $sFieldCode, $sValue, $oLanguage)
    1728. 

  1728. {
    1729. 

  1729.     if (is_null($sValue) || $sValue=='') return '';
    1730. 

  1730.     $sLanguage = $oLanguage->langcode;
    1731. 

  1731.     //Fieldcode used to determine question, $sValue used to match against answer code
    1732. 

  1732.     //Returns NULL if question type does not suit
    1733. 

  1733.     if (strpos($sFieldCode, "{$iSurveyID}X")===0) //Only check if it looks like a real fieldcode
    1734. 

  1734.     {
    1735. 

  1735.         $fieldmap = createFieldMap($iSurveyID,'short',false,false,$sLanguage);
    1736. 

  1736.         if (isset($fieldmap[$sFieldCode]))
    1737. 

  1737.             $fields = $fieldmap[$sFieldCode];
    1738. 

  1738.         else
    1739. 

  1739.             return false;
    1740. 

  1740.         //Find out the question type
    1741. 

  1741.         $this_type = $fields['type'];
    1742. 

  1742.         switch($this_type)
    1743. 

  1743.         {
    1744. 

  1744.             case 'D':
    1745. 

  1745.                 if (trim($sValue)!='')
    1746. 

  1746.                 {
    1747. 

  1747.                     $qidattributes = getQuestionAttributeValues($fields['qid']);
    1748. 

  1748.                     $dateformatdetails = getDateFormatDataForQID($qidattributes, $iSurveyID);
    1749. 

  1749.                     $sValue=convertDateTimeFormat($sValue,"Y-m-d H:i:s",$dateformatdetails['phpdate']);
    1750. 

  1750.                 }
    1751. 

  1751.                 break;
    1752. 

  1752.             case 'N':
    1753. 

  1753.                 if (trim($sValue)!='')
    1754. 

  1754.                 {
    1755. 

  1755.                     if(strpos($sValue,".")!==false)
    1756. 

  1756.                     {
    1757. 

  1757.                         $sValue=rtrim(rtrim($sValue,"0"),".");
    1758. 

  1758.                     }
    1759. 

  1759.                     $qidattributes = getQuestionAttributeValues($fields['qid']);
    1760. 

  1760.                     if($qidattributes['num_value_int_only'])
    1761. 

  1761.                     {
    1762. 

  1762.                         $sValue=number_format($sValue, 0, '', '');
    1763. 

  1763.                     }
    1764. 

  1764.                 }
    1765. 

  1765.                 break;
    1766. 

  1766.             case "L":
    1767. 

  1767.             case "!":
    1768. 

  1768.             case "O":
    1769. 

  1769.             case "^":
    1770. 

  1770.             case "I":
    1771. 

  1771.             case "R":
    1772. 

  1772.                 $result = Answers::model()->getAnswerFromCode($fields['qid'],$sValue,$sLanguage);
    1773. 

  1773.                 foreach($result as $row)
    1774. 

  1774.                 {
    1775. 

  1775.                     $this_answer=$row['answer'];
    1776. 

  1776.                 } // while
    1777. 

  1777.                 if ($sValue == "-oth-")
    1778. 

  1778.                 {
    1779. 

  1779.                     $this_answer=$oLanguage->gT("Other");
    1780. 

  1780.                 }
    1781. 

  1781.                 break;
    1782. 

  1782.             case "M":
    1783. 

  1783.             case "J":
    1784. 

  1784.             case "P":
    1785. 

  1785.             switch($sValue)
    1786. 

  1786.             {
    1787. 

  1787.                 case "Y": $this_answer=$oLanguage->gT("Yes"); break;
    1788. 

  1788.             }
    1789. 

  1789.             break;
    1790. 

  1790.             case "Y":
    1791. 

  1791.             switch($sValue)
    1792. 

  1792.             {
    1793. 

  1793.                 case "Y": $this_answer=$oLanguage->gT("Yes"); break;
    1794. 

  1794.                 case "N": $this_answer=$oLanguage->gT("No"); break;
    1795. 

  1795.                 default: $this_answer=$oLanguage->gT("No answer");
    1796. 

  1796.             }
    1797. 

  1797.             break;
    1798. 

  1798.             case "G":
    1799. 

  1799.             switch($sValue)
    1800. 

  1800.             {
    1801. 

  1801.                 case "M": $this_answer=$oLanguage->gT("Male"); break;
    1802. 

  1802.                 case "F": $this_answer=$oLanguage->gT("Female"); break;
    1803. 

  1803.                 default: $this_answer=$oLanguage->gT("No answer");
    1804. 

  1804.             }
    1805. 

  1805.             break;
    1806. 

  1806.             case "C":
    1807. 

  1807.             switch($sValue)
    1808. 

  1808.             {
    1809. 

  1809.                 case "Y": $this_answer=$oLanguage->gT("Yes"); break;
    1810. 

  1810.                 case "N": $this_answer=$oLanguage->gT("No"); break;
    1811. 

  1811.                 case "U": $this_answer=$oLanguage->gT("Uncertain"); break;
    1812. 

  1812.             }
    1813. 

  1813.             break;
    1814. 

  1814.             case "E":
    1815. 

  1815.             switch($sValue)
    1816. 

  1816.             {
    1817. 

  1817.                 case "I": $this_answer=$oLanguage->gT("Increase"); break;
    1818. 

  1818.                 case "D": $this_answer=$oLanguage->gT("Decrease"); break;
    1819. 

  1819.                 case "S": $this_answer=$oLanguage->gT("Same"); break;
    1820. 

  1820.             }
    1821. 

  1821.             break;
    1822. 

  1822.             case "F":
    1823. 

  1823.             case "H":
    1824. 

  1824.             case "1":
    1825. 

  1825.                 $aConditions=array('qid' => $fields['qid'], 'code' => $sValue, 'language' => $sLanguage);
    1826. 

  1826.                 if (isset($fields['scale_id']))
    1827. 

  1827.                 {
    1828. 

  1828.                     $iScaleID=$fields['scale_id'];
    1829. 

  1829.                 }
    1830. 

  1830.                 else
    1831. 

  1831.                 {
    1832. 

  1832.                     $iScaleID=0;
    1833. 

  1833.                 }
    1834. 

  1834.                 $result = Answers::model()->getAnswerFromCode($fields['qid'],$sValue,$sLanguage,$iScaleID);
    1835. 

  1835.                 foreach($result as $row)
    1836. 

  1836.                 {
    1837. 

  1837.                     $this_answer=$row['answer'];
    1838. 

  1838.                 } // while
    1839. 

  1839.                 $this_answer=$row['answer'];
    1840. 

  1840.                 if ($sValue == "-oth-")
    1841. 

  1841.                 {
    1842. 

  1842.                     $this_answer=$oLanguage->gT("Other");
    1843. 

  1843.                 }
    1844. 

  1844.                 break;
    1845. 

  1845.             case "|": //File upload
    1846. 

  1846.                 if (substr($sFieldCode, -9) == 'filecount') {
    1847. 

  1847.                     $this_answer = $oLanguage->gT("File count");
    1848. 

  1848.                 } else {
    1849. 

  1849.                     //Show the filename, size, title and comment -- no link!
    1850. 

  1850.                     $files = json_decode($sValue);
    1851. 

  1851.                     $sValue = '';
    1852. 

  1852.                     if (is_array($files)) {
    1853. 

  1853.                         foreach ($files as $file) {
    1854. 

  1854.                             $sValue .= $file->name .
    1855. 

  1855.                             ' (' . $file->size . 'KB) ' .
    1856. 

  1856.                             strip_tags($file->title) .
    1857. 

  1857.                             ' - ' . strip_tags($file->comment) . "<br/>";
    1858. 

  1858.                         }
    1859. 

  1859.                     }
    1860. 

  1860.                 }
    1861. 

  1861.                 break;
    1862. 

  1862.             default:
    1863. 

  1863.                 ;
    1864. 

  1864.         } // switch
    1865. 

  1865.     }
    1866. 

  1866.     switch($sFieldCode)
    1867. 

  1867.     {
    1868. 

  1868.         case 'submitdate':
    1869. 

  1869.             if (trim($sValue)!='')
    1870. 

  1870.             {
    1871. 

  1871.                 $dateformatdetails = getDateFormatDataForQID(array('date_format'=>''), $iSurveyID);
    1872. 

  1872.                 $sValue=convertDateTimeFormat($sValue,"Y-m-d H:i:s",$dateformatdetails['phpdate'].' H:i:s');
    1873. 

  1873.             }
    1874. 

  1874.             break;
    1875. 

  1875.     }
    1876. 

  1876.     if (isset($this_answer))
    1877. 

  1877.     {
    1878. 

  1878.         return $this_answer." [$sValue]";
    1879. 

  1879.     }
    1880. 

  1880.     else
    1881. 

  1881.     {
    1882. 

  1882.         return $sValue;
    1883. 

  1883.     }
    1884. 

  1884. }
    1885. 

  1885. 

  1886. /*function validateEmailAddress($email)
    1887. 

  1887. {
    1888. 

  1888. // Create the syntactical validation regular expression
    1889. 

  1889. // Validate the syntax
    1890. 

    1891. 

  1891. // see http://data.iana.org/TLD/tlds-alpha-by-domain.txt
    1892. 

  1892. $maxrootdomainlength = 6;
    1893. 

  1893. return ( ! preg_match("/^[_a-zA-Z0-9-]+(\.[_a-zA-Z0-9-]+)*@[a-zA-Z0-9-]+(\.[a-zA-Z0-9-]+)*\.(([0-9]{1,3})|([a-zA-Z]{2,".$maxrootdomainlength."}))$/ix", $email)) ? FALSE : TRUE;
    1894. 

  1894. }*/
    1895. 

  1895. 

  1896. function validateEmailAddress($email){
    1897. 

  1897. 

  1898. 

  1899.     $no_ws_ctl    = "[\\x01-\\x08\\x0b\\x0c\\x0e-\\x1f\\x7f]";
    1900. 

  1900.     $alpha        = "[\\x41-\\x5a\\x61-\\x7a]";
    1901. 

  1901.     $digit        = "[\\x30-\\x39]";
    1902. 

  1902.     $cr        = "\\x0d";
    1903. 

  1903.     $lf        = "\\x0a";
    1904. 

  1904.     $crlf        = "(?:$cr$lf)";
    1905. 

  1905. 

  1906. 

  1907.     $obs_char    = "[\\x00-\\x09\\x0b\\x0c\\x0e-\\x7f]";
    1908. 

  1908.     $obs_text    = "(?:$lf*$cr*(?:$obs_char$lf*$cr*)*)";
    1909. 

  1909.     $text        = "(?:[\\x01-\\x09\\x0b\\x0c\\x0e-\\x7f]|$obs_text)";
    1910. 

  1910. 

  1911. 

  1912.     $text        = "(?:$lf*$cr*$obs_char$lf*$cr*)";
    1913. 

  1913.     $obs_qp        = "(?:\\x5c[\\x00-\\x7f])";
    1914. 

  1914.     $quoted_pair    = "(?:\\x5c$text|$obs_qp)";
    1915. 

  1915. 

  1916. 

  1917.     $wsp        = "[\\x20\\x09]";
    1918. 

  1918.     $obs_fws    = "(?:$wsp+(?:$crlf$wsp+)*)";
    1919. 

  1919.     $fws        = "(?:(?:(?:$wsp*$crlf)?$wsp+)|$obs_fws)";
    1920. 

  1920.     $ctext        = "(?:$no_ws_ctl|[\\x21-\\x27\\x2A-\\x5b\\x5d-\\x7e])";
    1921. 

  1921.     $ccontent    = "(?:$ctext|$quoted_pair)";
    1922. 

  1922.     $comment    = "(?:\\x28(?:$fws?$ccontent)*$fws?\\x29)";
    1923. 

  1923.     $cfws        = "(?:(?:$fws?$comment)*(?:$fws?$comment|$fws))";
    1924. 

  1924. 

  1925. 

  1926.     $outer_ccontent_dull    = "(?:$fws?$ctext|$quoted_pair)";
    1927. 

  1927.     $outer_ccontent_nest    = "(?:$fws?$comment)";
    1928. 

  1928.     $outer_comment        = "(?:\\x28$outer_ccontent_dull*(?:$outer_ccontent_nest$outer_ccontent_dull*)+$fws?\\x29)";
    1929. 

  1929. 

  1930. 

  1931. 

  1932.     $atext        = "(?:$alpha|$digit|[\\x21\\x23-\\x27\\x2a\\x2b\\x2d\\x2f\\x3d\\x3f\\x5e\\x5f\\x60\\x7b-\\x7e])";
    1933. 

  1933.     $atext_domain     = "(?:$alpha|$digit|[\\x2b\\x2d\\x5f])";
    1934. 

  1934. 

  1935.     $atom        = "(?:$cfws?(?:$atext)+$cfws?)";
    1936. 

  1936.     $atom_domain       = "(?:$cfws?(?:$atext_domain)+$cfws?)";
    1937. 

  1937. 

  1938. 

  1939.     $qtext        = "(?:$no_ws_ctl|[\\x21\\x23-\\x5b\\x5d-\\x7e])";
    1940. 

  1940.     $qcontent    = "(?:$qtext|$quoted_pair)";
    1941. 

  1941.     $quoted_string    = "(?:$cfws?\\x22(?:$fws?$qcontent)*$fws?\\x22$cfws?)";
    1942. 

  1942. 

  1943. 

  1944.     $quoted_string    = "(?:$cfws?\\x22(?:$fws?$qcontent)+$fws?\\x22$cfws?)";
    1945. 

  1945.     $word        = "(?:$atom|$quoted_string)";
    1946. 

  1946. 

  1947. 

  1948.     $obs_local_part    = "(?:$word(?:\\x2e$word)*)";
    1949. 

  1949. 

  1950. 

  1951.     $obs_domain    = "(?:$atom_domain(?:\\x2e$atom_domain)*)";
    1952. 

  1952. 

  1953.     $dot_atom_text     = "(?:$atext+(?:\\x2e$atext+)*)";
    1954. 

  1954.     $dot_atom_text_domain    = "(?:$atext_domain+(?:\\x2e$atext_domain+)*)";
    1955. 

  1955. 

  1956. 

  1957.     $dot_atom    	   = "(?:$cfws?$dot_atom_text$cfws?)";
    1958. 

  1958.     $dot_atom_domain   = "(?:$cfws?$dot_atom_text_domain$cfws?)";
    1959. 

  1959. 

  1960. 

  1961.     $dtext        = "(?:$no_ws_ctl|[\\x21-\\x5a\\x5e-\\x7e])";
    1962. 

  1962.     $dcontent    = "(?:$dtext|$quoted_pair)";
    1963. 

  1963.     $domain_literal    = "(?:$cfws?\\x5b(?:$fws?$dcontent)*$fws?\\x5d$cfws?)";
    1964. 

  1964. 

  1965. 

  1966.     $local_part    = "(($dot_atom)|($quoted_string)|($obs_local_part))";
    1967. 

  1967.     $domain        = "(($dot_atom_domain)|($domain_literal)|($obs_domain))";
    1968. 

  1968.     $addr_spec    = "$local_part\\x40$domain";
    1969. 

  1969. 

  1970. 

  1971.     if (strlen($email) > 256) return FALSE;
    1972. 

  1972. 

  1973. 

  1974.     $email = stripComments($outer_comment, $email, "(x)");
    1975. 

  1975. 

  1976. 

  1977. 

  1978.     if (!preg_match("!^$addr_spec$!", $email, $m)){
    1979. 

  1979. 

  1980.         return FALSE;
    1981. 

  1981.     }
    1982. 

  1982. 

  1983.     $bits = array(
    1984. 

  1984.     'local'            => isset($m[1]) ? $m[1] : '',
    1985. 

  1985.     'local-atom'        => isset($m[2]) ? $m[2] : '',
    1986. 

  1986.     'local-quoted'        => isset($m[3]) ? $m[3] : '',
    1987. 

  1987.     'local-obs'        => isset($m[4]) ? $m[4] : '',
    1988. 

  1988.     'domain'        => isset($m[5]) ? $m[5] : '',
    1989. 

  1989.     'domain-atom'        => isset($m[6]) ? $m[6] : '',
    1990. 

  1990.     'domain-literal'    => isset($m[7]) ? $m[7] : '',
    1991. 

  1991.     'domain-obs'        => isset($m[8]) ? $m[8] : '',
    1992. 

  1992.     );
    1993. 

  1993. 

  1994. 

  1995. 

  1996.     $bits['local']    = stripComments($comment, $bits['local']);
    1997. 

  1997.     $bits['domain']    = stripComments($comment, $bits['domain']);
    1998. 

  1998. 

  1999. 

  2000. 

  2001. 

  2002.     if (strlen($bits['local']) > 64) return FALSE;
    2003. 

  2003.     if (strlen($bits['domain']) > 255) return FALSE;
    2004. 

  2004. 

  2005. 

  2006. 

  2007.     if (strlen($bits['domain-literal'])){
    2008. 

  2008. 

  2009.         $Snum            = "(\d{1,3})";
    2010. 

  2010.         $IPv4_address_literal    = "$Snum\.$Snum\.$Snum\.$Snum";
    2011. 

  2011. 

  2012.         $IPv6_hex        = "(?:[0-9a-fA-F]{1,4})";
    2013. 

  2013. 

  2014.         $IPv6_full        = "IPv6\:$IPv6_hex(:?\:$IPv6_hex){7}";
    2015. 

  2015. 

  2016.         $IPv6_comp_part        = "(?:$IPv6_hex(?:\:$IPv6_hex){0,5})?";
    2017. 

  2017.         $IPv6_comp        = "IPv6\:($IPv6_comp_part\:\:$IPv6_comp_part)";
    2018. 

  2018. 

  2019.         $IPv6v4_full        = "IPv6\:$IPv6_hex(?:\:$IPv6_hex){5}\:$IPv4_address_literal";
    2020. 

  2020. 

  2021.         $IPv6v4_comp_part    = "$IPv6_hex(?:\:$IPv6_hex){0,3}";
    2022. 

  2022.         $IPv6v4_comp        = "IPv6\:((?:$IPv6v4_comp_part)?\:\:(?:$IPv6v4_comp_part\:)?)$IPv4_address_literal";
    2023. 

  2023. 

  2024. 

  2025. 

  2026.         if (preg_match("!^\[$IPv4_address_literal\]$!", $bits['domain'], $m)){
    2027. 

  2027. 

  2028.             if (intval($m[1]) > 255) return FALSE;
    2029. 

  2029.             if (intval($m[2]) > 255) return FALSE;
    2030. 

  2030.             if (intval($m[3]) > 255) return FALSE;
    2031. 

  2031.             if (intval($m[4]) > 255) return FALSE;
    2032. 

  2032. 

  2033.         }else{
    2034. 

  2034. 

  2035. 

  2036.             while (1){
    2037. 

  2037. 

  2038.                 if (preg_match("!^\[$IPv6_full\]$!", $bits['domain'])){
    2039. 

  2039.                     break;
    2040. 

  2040.                 }
    2041. 

  2041. 

  2042.                 if (preg_match("!^\[$IPv6_comp\]$!", $bits['domain'], $m)){
    2043. 

  2043.                     list($a, $b) = explode('::', $m[1]);
    2044. 

  2044.                     $folded = (strlen($a) && strlen($b)) ? "$a:$b" : "$a$b";
    2045. 

  2045.                     $groups = explode(':', $folded);
    2046. 

  2046.                     if (count($groups) > 6) return FALSE;
    2047. 

  2047.                     break;
    2048. 

  2048.                 }
    2049. 

  2049. 

  2050.                 if (preg_match("!^\[$IPv6v4_full\]$!", $bits['domain'], $m)){
    2051. 

  2051. 

  2052.                     if (intval($m[1]) > 255) return FALSE;
    2053. 

  2053.                     if (intval($m[2]) > 255) return FALSE;
    2054. 

  2054.                     if (intval($m[3]) > 255) return FALSE;
    2055. 

  2055.                     if (intval($m[4]) > 255) return FALSE;
    2056. 

  2056.                     break;
    2057. 

  2057.                 }
    2058. 

  2058. 

  2059.                 if (preg_match("!^\[$IPv6v4_comp\]$!", $bits['domain'], $m)){
    2060. 

  2060.                     list($a, $b) = explode('::', $m[1]);
    2061. 

  2061.                     $b = substr($b, 0, -1); # remove the trailing colon before the IPv4 address
    2062. 

  2062.                     $folded = (strlen($a) && strlen($b)) ? "$a:$b" : "$a$b";
    2063. 

  2063.                     $groups = explode(':', $folded);
    2064. 

  2064.                     if (count($groups) > 4) return FALSE;
    2065. 

  2065.                     break;
    2066. 

  2066.                 }
    2067. 

  2067. 

  2068.                 return FALSE;
    2069. 

  2069.             }
    2070. 

  2070.         }
    2071. 

  2071.     }else{
    2072. 

  2072. 

  2073. 

  2074.         $labels = explode('.', $bits['domain']);
    2075. 

  2075. 

  2076. 

  2077.         if (count($labels) == 1) return FALSE;
    2078. 

  2078. 

  2079. 

  2080.         foreach ($labels as $label){
    2081. 

  2081. 

  2082.             if (strlen($label) > 63) return FALSE;
    2083. 

  2083.             if (substr($label, 0, 1) == '-') return FALSE;
    2084. 

  2084.             if (substr($label, -1) == '-') return FALSE;
    2085. 

  2085.         }
    2086. 

  2086. 

  2087.         if (preg_match('!^[0-9]+$!', array_pop($labels))) return FALSE;
    2088. 

  2088.     }
    2089. 

  2089. 

  2090. 

  2091.     return TRUE;
    2092. 

  2092. }
    2093. 

  2093. 

  2094. ##################################################################################
    2095. 

  2095. 

  2096. function stripComments($comment, $email, $replace=''){
    2097. 

  2097. 

  2098.     while (1){
    2099. 

  2099.         $new = preg_replace("!$comment!", $replace, $email);
    2100. 

  2100.         if (strlen($new) == strlen($email)){
    2101. 

  2101.             return $email;
    2102. 

  2102.         }
    2103. 

  2103.         $email = $new;
    2104. 

  2104.     }
    2105. 

  2105. }
    2106. 

  2106. 

  2107. 

  2108. function validateTemplateDir($sTemplateName)
    2109. 

  2109. {
    2110. 

  2110.     $usertemplaterootdir = Yii::app()->getConfig('usertemplaterootdir');
    2111. 

  2111.     $standardtemplaterootdir = Yii::app()->getConfig('standardtemplaterootdir');
    2112. 

  2112.     $sDefaultTemplate = Yii::app()->getConfig('defaulttemplate');
    2113. 

  2113.     if (is_dir("$usertemplaterootdir/{$sTemplateName}/"))
    2114. 

  2114.     {
    2115. 

  2115.         return $sTemplateName;
    2116. 

  2116.     }
    2117. 

  2117.     elseif (is_dir("$standardtemplaterootdir/{$sTemplateName}/"))
    2118. 

  2118.     {
    2119. 

  2119.         return $sTemplateName;
    2120. 

  2120.     }
    2121. 

  2121.     elseif (is_dir("$standardtemplaterootdir/{$sDefaultTemplate}/"))
    2122. 

  2122.     {
    2123. 

  2123.         return $sDefaultTemplate;
    2124. 

  2124.     }
    2125. 

  2125.     elseif (is_dir("$usertemplaterootdir/{$sDefaultTemplate}/"))
    2126. 

  2126.     {
    2127. 

  2127.         return $sDefaultTemplate;
    2128. 

  2128.     }
    2129. 

  2129.     else
    2130. 

  2130.     {
    2131. 

  2131.         return 'default';
    2132. 

  2132.     }
    2133. 

  2133. }
    2134. 

  2134. 

  2135. 

  2136. 

  2137. /**
    2138. 

  2138.  *This functions generates a a summary containing the SGQA for questions of a survey, enriched with options per question
    2139. 

  2139.  * It can be used for the generation of statistics. Derived from Statistics_userController
    2140. 

  2140.  * @param int $iSurveyID Id of the Survey in question
    2141. 

  2141.  * @param array $aFilters an array which is the result of a query in Questions model
    2142. 

  2142.  * @param string $sLanguage
    2143. 

  2143.  * @return array The summary
    2144. 

  2144.  */
    2145. 

  2145.   function createCompleteSGQA($iSurveyID,$aFilters,$sLanguage) {
    2146. 

  2146. 

  2147.  foreach ($aFilters as $flt)
    2148. 

  2148.  {
    2149. 

  2149.     Yii::app()->loadHelper("surveytranslator");
    2150. 

  2150.     $myfield = "{$iSurveyID}X{$flt['gid']}X{$flt['qid']}";
    2151. 

  2151.     $oSurvey = Survey::model()->findByPk($iSurveyID);
    2152. 

  2152.     $aAdditionalLanguages = array_filter(explode(" ", $oSurvey->additional_languages));
    2153. 

  2153.     if (is_null($sLanguage)|| !in_array($sLanguage,$aAdditionalLanguages))
    2154. 

  2154.         $sLanguage = $oSurvey->language;
    2155. 

  2155. 

  2156.     switch ($flt['type'])
    2157. 

  2157.             {
    2158. 

  2158.                 case "K": // Multiple Numerical
    2159. 

  2159.                 case "Q": // Multiple Short Text
    2160. 

  2160.                     //get answers
    2161. 

  2161.                     $result = Questions::model()->getQuestionsForStatistics('title as code, question as answer', "parent_qid=$flt[qid] AND language = '{$sLanguage}'", 'question_order');
    2162. 

  2162. 

  2163.                     //go through all the (multiple) answers
    2164. 

  2164.                     foreach($result as $row)
    2165. 

  2165.                     {
    2166. 

  2166.                         $myfield2=$flt['type'].$myfield.reset($row);
    2167. 

  2167.                         $allfields[] = $myfield2;
    2168. 

  2168.                     }
    2169. 

  2169.                     break;
    2170. 

  2170.                 case "A": // ARRAY OF 5 POINT CHOICE QUESTIONS
    2171. 

  2171.                 case "B": // ARRAY OF 10 POINT CHOICE QUESTIONS
    2172. 

  2172.                 case "C": // ARRAY OF YES\No\$clang->gT("Uncertain") QUESTIONS
    2173. 

  2173.                 case "E": // ARRAY OF Increase/Same/Decrease QUESTIONS
    2174. 

  2174.                 case "F": // FlEXIBLE ARRAY
    2175. 

  2175.                 case "H": // ARRAY (By Column)
    2176. 

  2176.                     //get answers
    2177. 

  2177.                     $result = Questions::model()->getQuestionsForStatistics('title, question', "parent_qid=$flt[qid] AND language = '{$sLanguage}'", 'question_order');
    2178. 

  2178. 

  2179.                     //go through all the (multiple) answers
    2180. 

  2180.                     foreach($result as $row)
    2181. 

  2181.                     {
    2182. 

  2182.                         $myfield2 = $myfield.reset($row);
    2183. 

  2183.                         $allfields[]=$myfield2;
    2184. 

  2184.                     }
    2185. 

  2185.                     break;
    2186. 

  2186.                 // all "free text" types (T, U, S)  get the same prefix ("T")
    2187. 

  2187.                 case "T": // Long free text
    2188. 

  2188.                 case "U": // Huge free text
    2189. 

  2189.                 case "S": // Short free text
    2190. 

  2190.                     $myfield="T$myfield";
    2191. 

  2191.                     $allfields[] = $myfield;
    2192. 

  2192.                     break;
    2193. 

  2193.                 case ";":  //ARRAY (Multi Flex) (Text)
    2194. 

  2194.                 case ":":  //ARRAY (Multi Flex) (Numbers)
    2195. 

  2195.                     $result = Questions::model()->getQuestionsForStatistics('title, question', "parent_qid=$flt[qid] AND language = '{$sLanguage}' AND scale_id = 0", 'question_order');
    2196. 

  2196.                    
    2197. 

  2197.                     foreach($result as $row)
    2198. 

  2198.                     {
    2199. 

  2199.                         $fresult = Questions::model()->getQuestionsForStatistics('title, question', "parent_qid=$flt[qid] AND language = '{$sLanguage}' AND scale_id = 1", 'question_order');
    2200. 

  2200.                         foreach($fresult as $frow)
    2201. 

  2201.                         {
    2202. 

  2202.                             $myfield2 = $myfield . reset($row) . "_" . $frow['title'];
    2203. 

  2203.                         $allfields[]=$myfield2;
    2204. 

  2204.                     }
    2205. 

  2205.                     }
    2206. 

  2206.                     break;
    2207. 

  2207.                 case "R": //RANKING
    2208. 

  2208.                     //get some answers
    2209. 

  2209.                     $result = Answers::model()->getQuestionsForStatistics('code, answer', "qid=$flt[qid] AND language = '{$sLanguage}'", 'sortorder, answer');
    2210. 

  2210.                     //get number of answers
    2211. 

  2211.                     //loop through all answers. if there are 3 items to rate there will be 3 statistics
    2212. 

  2212.                     $i=0;
    2213. 

  2213.                     foreach($result as $row)
    2214. 

  2214.                     {
    2215. 

  2215.                         $i++;
    2216. 

  2216.                         $myfield2 = "R" . $myfield . $i . "-" . strlen($i);
    2217. 

  2217.                         $allfields[]=$myfield2;
    2218. 

  2218.                     }
    2219. 

  2219. 

  2220.                     break;
    2221. 

  2221.                 //Boilerplate questions are only used to put some text between other questions -> no analysis needed
    2222. 

  2222.                 case "X":  //This is a boilerplate question and it has no business in this script
    2223. 

  2223.                     break;
    2224. 

  2224.                 case "1": // MULTI SCALE
    2225. 

  2225.                     //get answers
    2226. 

  2226.                     $result = Questions::model()->getQuestionsForStatistics('title, question', "parent_qid=$flt[qid] AND language = '{$sLanguage}'", 'question_order');
    2227. 

  2227.                     //loop through answers
    2228. 

  2228.                     foreach($result as $row)
    2229. 

  2229.                     {
    2230. 

  2230.                         //----------------- LABEL 1 ---------------------
    2231. 

  2231.                         $myfield2 = $myfield . reset($row)."#0";
    2232. 

  2232.                         $allfields[]=$myfield2;
    2233. 

  2233.                         //----------------- LABEL 2 ---------------------
    2234. 

  2234.                         $myfield2 = $myfield . reset($row)."#1";
    2235. 

  2235.                         $allfields[]=$myfield2;
    2236. 

  2236.                     }   //end WHILE -> loop through all answers
    2237. 

  2237.                     break;
    2238. 

  2238. 

  2239.                 case "P":  //P - Multiple choice with comments
    2240. 

  2240.                 case "M":  //M - Multiple choice
    2241. 

  2241.                 case "N":  //N - Numerical input
    2242. 

  2242.                 case "D":  //D - Date
    2243. 

  2243.                     $myfield2 = $flt['type'].$myfield;
    2244. 

  2244.                             $allfields[]=$myfield2;
    2245. 

  2245.                     break;
    2246. 

  2246.                 default:   //Default settings
    2247. 

  2247.                     $allfields[] = $myfield;
    2248. 

  2248.                     break;
    2249. 

  2249. 

  2250.         } //end switch
    2251. 

  2251.  }
    2252. 

  2252. 

  2253. return $allfields;
    2254. 

  2254. 

  2255. }
    2256. 

  2256. 

  2257. 

  2258. 

  2259. 

  2260. 

  2261. /**
    2262. 

  2262. * This function generates an array containing the fieldcode, and matching data in the same order as the activate script
    2263. 

  2263. *
    2264. 

  2264. * @param string $surveyid The Survey ID
    2265. 

  2265. * @param mixed $style 'short' (default) or 'full' - full creates extra information like default values
    2266. 

  2266. * @param mixed $force_refresh - Forces to really refresh the array, not just take the session copy
    2267. 

  2267. * @param int $questionid Limit to a certain qid only (for question preview) - default is false
    2268. 

  2268. * @param string $sQuestionLanguage The language to use
    2269. 

  2269. * @return array
    2270. 

  2270. */
    2271. 

  2271. function createFieldMap($surveyid, $style='short', $force_refresh=false, $questionid=false, $sLanguage) {
    2272. 

  2272.     global $aDuplicateQIDs;
    2273. 

  2273. 

  2274.     $sLanguage = sanitize_languagecode($sLanguage);
    2275. 

  2275.     $surveyid = sanitize_int($surveyid);
    2276. 

  2276.     $clang = new Limesurvey_lang($sLanguage);
    2277. 

  2277. 

  2278.     //checks to see if fieldmap has already been built for this page.
    2279. 

  2279.     if (isset(Yii::app()->session['fieldmap-' . $surveyid . $sLanguage]) && !$force_refresh && $questionid == false) {
    2280. 

  2280.         return Yii::app()->session['fieldmap-' . $surveyid . $sLanguage];
    2281. 

  2281.     }
    2282. 

  2282. 

  2283.     $fieldmap["id"]=array("fieldname"=>"id", 'sid'=>$surveyid, 'type'=>"id", "gid"=>"", "qid"=>"", "aid"=>"");
    2284. 

  2284.     if ($style == "full")
    2285. 

  2285.     {
    2286. 

  2286.         $fieldmap["id"]['title']="";
    2287. 

  2287.         $fieldmap["id"]['question']=$clang->gT("Response ID");
    2288. 

  2288.         $fieldmap["id"]['group_name']="";
    2289. 

  2289.     }
    2290. 

  2290. 

  2291.     $fieldmap["submitdate"]=array("fieldname"=>"submitdate", 'type'=>"submitdate", 'sid'=>$surveyid, "gid"=>"", "qid"=>"", "aid"=>"");
    2292. 

  2292.     if ($style == "full")
    2293. 

  2293.     {
    2294. 

  2294.         $fieldmap["submitdate"]['title']="";
    2295. 

  2295.         $fieldmap["submitdate"]['question']=$clang->gT("Date submitted");
    2296. 

  2296.         $fieldmap["submitdate"]['group_name']="";
    2297. 

  2297.     }
    2298. 

  2298. 

  2299.     $fieldmap["lastpage"]=array("fieldname"=>"lastpage", 'sid'=>$surveyid, 'type'=>"lastpage", "gid"=>"", "qid"=>"", "aid"=>"");
    2300. 

  2300.     if ($style == "full")
    2301. 

  2301.     {
    2302. 

  2302.         $fieldmap["lastpage"]['title']="";
    2303. 

  2303.         $fieldmap["lastpage"]['question']=$clang->gT("Last page");
    2304. 

  2304.         $fieldmap["lastpage"]['group_name']="";
    2305. 

  2305.     }
    2306. 

  2306. 

  2307.     $fieldmap["startlanguage"]=array("fieldname"=>"startlanguage", 'sid'=>$surveyid, 'type'=>"startlanguage", "gid"=>"", "qid"=>"", "aid"=>"");
    2308. 

  2308.     if ($style == "full")
    2309. 

  2309.     {
    2310. 

  2310.         $fieldmap["startlanguage"]['title']="";
    2311. 

  2311.         $fieldmap["startlanguage"]['question']=$clang->gT("Start language");
    2312. 

  2312.         $fieldmap["startlanguage"]['group_name']="";
    2313. 

  2313.     }
    2314. 

  2314. 

  2315.     // Select which question IDs have default values
    2316. 

  2316.     $_aDefaultValues = Defaultvalues::model()->with(array('question' => array('condition' => 'question.sid=' . $surveyid)))->findAll();
    2317. 

  2317.     $aDefaultValues = array();
    2318. 

  2318.     foreach ($_aDefaultValues as $k => $v)
    2319. 

  2319.         $aDefaultValues[] = $v->qid;
    2320. 

  2320. 

  2321.     //Check for any additional fields for this survey and create necessary fields (token and datestamp and ipaddr)
    2322. 

  2322.     $prow = Survey::model()->findByPk($surveyid)->getAttributes(); //Checked
    2323. 

  2323. 

  2324.     if ($prow['anonymized'] == "N" && Survey::model()->hasTokens($surveyid)) {
    2325. 

  2325.         $fieldmap["token"]=array("fieldname"=>"token", 'sid'=>$surveyid, 'type'=>"token", "gid"=>"", "qid"=>"", "aid"=>"");
    2326. 

  2326.         if ($style == "full")
    2327. 

  2327.         {
    2328. 

  2328.             $fieldmap["token"]['title']="";
    2329. 

  2329.             $fieldmap["token"]['question']=$clang->gT("Token");
    2330. 

  2330.             $fieldmap["token"]['group_name']="";
    2331. 

  2331.         }
    2332. 

  2332.     }
    2333. 

  2333.     if ($prow['datestamp'] == "Y")
    2334. 

  2334.     {
    2335. 

  2335.         $fieldmap["startdate"]=array("fieldname"=>"startdate",
    2336. 

  2336.         'type'=>"startdate",
    2337. 

  2337.         'sid'=>$surveyid,
    2338. 

  2338.         "gid"=>"",
    2339. 

  2339.         "qid"=>"",
    2340. 

  2340.         "aid"=>"");
    2341. 

  2341.         if ($style == "full")
    2342. 

  2342.         {
    2343. 

  2343.             $fieldmap["startdate"]['title']="";
    2344. 

  2344.             $fieldmap["startdate"]['question']=$clang->gT("Date started");
    2345. 

  2345.             $fieldmap["startdate"]['group_name']="";
    2346. 

  2346.         }
    2347. 

  2347. 

  2348.         $fieldmap["datestamp"]=array("fieldname"=>"datestamp",
    2349. 

  2349.         'type'=>"datestamp",
    2350. 

  2350.         'sid'=>$surveyid,
    2351. 

  2351.         "gid"=>"",
    2352. 

  2352.         "qid"=>"",
    2353. 

  2353.         "aid"=>"");
    2354. 

  2354.         if ($style == "full")
    2355. 

  2355.         {
    2356. 

  2356.             $fieldmap["datestamp"]['title']="";
    2357. 

  2357.             $fieldmap["datestamp"]['question']=$clang->gT("Date last action");
    2358. 

  2358.             $fieldmap["datestamp"]['group_name']="";
    2359. 

  2359.         }
    2360. 

  2360. 

  2361.     }
    2362. 

  2362.     if ($prow['ipaddr'] == "Y")
    2363. 

  2363.     {
    2364. 

  2364.         $fieldmap["ipaddr"]=array("fieldname"=>"ipaddr",
    2365. 

  2365.         'type'=>"ipaddress",
    2366. 

  2366.         'sid'=>$surveyid,
    2367. 

  2367.         "gid"=>"",
    2368. 

  2368.         "qid"=>"",
    2369. 

  2369.         "aid"=>"");
    2370. 

  2370.         if ($style == "full")
    2371. 

  2371.         {
    2372. 

  2372.             $fieldmap["ipaddr"]['title']="";
    2373. 

  2373.             $fieldmap["ipaddr"]['question']=$clang->gT("IP address");
    2374. 

  2374.             $fieldmap["ipaddr"]['group_name']="";
    2375. 

  2375.         }
    2376. 

  2376.     }
    2377. 

  2377.     // Add 'refurl' to fieldmap.
    2378. 

  2378.     if ($prow['refurl'] == "Y")
    2379. 

  2379.     {
    2380. 

  2380.         $fieldmap["refurl"]=array("fieldname"=>"refurl", 'type'=>"url", 'sid'=>$surveyid, "gid"=>"", "qid"=>"", "aid"=>"");
    2381. 

  2381.         if ($style == "full")
    2382. 

  2382.         {
    2383. 

  2383.             $fieldmap["refurl"]['title']="";
    2384. 

  2384.             $fieldmap["refurl"]['question']=$clang->gT("Referrer URL");
    2385. 

  2385.             $fieldmap["refurl"]['group_name']="";
    2386. 

  2386.         }
    2387. 

  2387.     }
    2388. 

  2388. 

  2389.     // Collect all default values once so don't need separate query for each question with defaults
    2390. 

  2390.     // First collect language specific defaults
    2391. 

  2391.     $defaultsQuery = "SELECT a.qid, a.sqid, a.scale_id, a.specialtype, a.defaultvalue"
    2392. 

  2392.     . " FROM {{defaultvalues}} as a, {{questions}} as b"
    2393. 

  2393.     . " WHERE a.qid = b.qid"
    2394. 

  2394.     . " AND a.language = b.language"
    2395. 

  2395.     . " AND a.language = '{$sLanguage}'"
    2396. 

  2396.     . " AND b.same_default=0"
    2397. 

  2397.     . " AND b.sid = ".$surveyid;
    2398. 

  2398.     $defaultResults = Yii::app()->db->createCommand($defaultsQuery)->queryAll();
    2399. 

  2399. 

  2400.     $defaultValues = array();   // indexed by question then subquestion
    2401. 

  2401.     foreach($defaultResults as $dv)
    2402. 

  2402.     {
    2403. 

  2403.         if ($dv['specialtype'] != '') {
    2404. 

  2404.             $sq = $dv['specialtype'];
    2405. 

  2405.         }
    2406. 

  2406.         else {
    2407. 

  2407.             $sq = $dv['sqid'];
    2408. 

  2408.         }
    2409. 

  2409.         $defaultValues[$dv['qid'].'~'.$sq] = $dv['defaultvalue'];
    2410. 

  2410.     }
    2411. 

  2411. 

  2412.     // Now overwrite language-specific defaults (if any) base language values for each question that uses same_defaults=1
    2413. 

  2413.     $baseLanguage = getBaseLanguageFromSurveyID($surveyid);
    2414. 

  2414.     $defaultsQuery = "SELECT a.qid, a.sqid, a.scale_id, a.specialtype, a.defaultvalue"
    2415. 

  2415.     . " FROM {{defaultvalues}} as a, {{questions}} as b"
    2416. 

  2416.     . " WHERE a.qid = b.qid"
    2417. 

  2417.     . " AND a.language = b.language"
    2418. 

  2418.     . " AND a.language = '{$baseLanguage}'"
    2419. 

  2419.     . " AND b.same_default=1"
    2420. 

  2420.     . " AND b.sid = ".$surveyid;
    2421. 

  2421.     $defaultResults = Yii::app()->db->createCommand($defaultsQuery)->queryAll();
    2422. 

  2422. 

  2423.     foreach($defaultResults as $dv)
    2424. 

  2424.     {
    2425. 

  2425.         if ($dv['specialtype'] != '') {
    2426. 

  2426.             $sq = $dv['specialtype'];
    2427. 

  2427.         }
    2428. 

  2428.         else {
    2429. 

  2429.             $sq = $dv['sqid'];
    2430. 

  2430.         }
    2431. 

  2431.         $defaultValues[$dv['qid'].'~'.$sq] = $dv['defaultvalue'];
    2432. 

  2432.     }
    2433. 

  2433.     $qtypes=getQuestionTypeList('','array');
    2434. 

  2434. 

  2435.     $aquery = "SELECT * "
    2436. 

  2436.     ." FROM {{questions}} as questions, {{groups}} as groups"
    2437. 

  2437.     ." WHERE questions.gid=groups.gid AND "
    2438. 

  2438.     ." questions.sid=$surveyid AND "
    2439. 

  2439.     ." questions.language='{$sLanguage}' AND "
    2440. 

  2440.     ." questions.parent_qid=0 AND "
    2441. 

  2441.     ." groups.language='{$sLanguage}' ";
    2442. 

  2442.     if ($questionid!==false)
    2443. 

  2443.     {
    2444. 

  2444.         $aquery.=" and questions.qid={$questionid} ";
    2445. 

  2445.     }
    2446. 

  2446.     $aquery.=" ORDER BY group_order, question_order";
    2447. 

  2447.     $aresult = Yii::app()->db->createCommand($aquery)->queryAll();
    2448. 

  2448.     $questionSeq=-1; // this is incremental question sequence across all groups
    2449. 

  2449.     $groupSeq=-1;
    2450. 

  2450.     $_groupOrder=-1;
    2451. 

  2451. 

  2452.     foreach ($aresult as $arow) //With each question, create the appropriate field(s))
    2453. 

  2453.     {
    2454. 

  2454.         ++$questionSeq;
    2455. 

  2455. 

  2456.         // fix fact taht group_order may have gaps
    2457. 

  2457.         if ($_groupOrder != $arow['group_order']) {
    2458. 

  2458.             $_groupOrder = $arow['group_order'];
    2459. 

  2459.             ++$groupSeq;
    2460. 

  2460.         }
    2461. 

  2461.         // Conditions indicators are obsolete with EM.  However, they are so tightly coupled into LS code that easider to just set values to 'N' for now and refactor later.
    2462. 

  2462.         $conditions = 'N';
    2463. 

  2463.         $usedinconditions = 'N';
    2464. 

  2464. 

  2465.         // Field identifier
    2466. 

  2466.         // GXQXSXA
    2467. 

  2467.         // G=Group  Q=Question S=Subquestion A=Answer Option
    2468. 

  2468.         // If S or A don't exist then set it to 0
    2469. 

  2469.         // Implicit (subqestion intermal to a question type ) or explicit qubquestions/answer count starts at 1
    2470. 

  2470. 

  2471.         // Types "L", "!", "O", "D", "G", "N", "X", "Y", "5", "S", "T", "U"
    2472. 

  2472.         $fieldname="{$arow['sid']}X{$arow['gid']}X{$arow['qid']}";
    2473. 

  2473. 

  2474.         if ($qtypes[$arow['type']]['subquestions']==0  && $arow['type'] != "R" && $arow['type'] != "|")
    2475. 

  2475.         {
    2476. 

  2476.             if (isset($fieldmap[$fieldname])) $aDuplicateQIDs[$arow['qid']]=array('fieldname'=>$fieldname,'question'=>$arow['question'],'gid'=>$arow['gid']);
    2477. 

  2477.             $fieldmap[$fieldname]=array("fieldname"=>$fieldname, 'type'=>"{$arow['type']}", 'sid'=>$surveyid, "gid"=>$arow['gid'], "qid"=>$arow['qid'], "aid"=>"");
    2478. 

  2478.             if ($style == "full")
    2479. 

  2479.             {
    2480. 

  2480.                 $fieldmap[$fieldname]['title']=$arow['title'];
    2481. 

  2481.                 $fieldmap[$fieldname]['question']=$arow['question'];
    2482. 

  2482.                 $fieldmap[$fieldname]['group_name']=$arow['group_name'];
    2483. 

  2483.                 $fieldmap[$fieldname]['mandatory']=$arow['mandatory'];
    2484. 

  2484.                 $fieldmap[$fieldname]['hasconditions']=$conditions;
    2485. 

  2485.                 $fieldmap[$fieldname]['usedinconditions']=$usedinconditions;
    2486. 

  2486.                 $fieldmap[$fieldname]['questionSeq']=$questionSeq;
    2487. 

  2487.                 $fieldmap[$fieldname]['groupSeq']=$groupSeq;
    2488. 

  2488.                 if (isset($defaultValues[$arow['qid'].'~0'])) {
    2489. 

  2489.                     $fieldmap[$fieldname]['defaultvalue'] = $defaultValues[$arow['qid'].'~0'];
    2490. 

  2490.                 }
    2491. 

  2491.             }
    2492. 

  2492.             switch($arow['type'])
    2493. 

  2493.             {
    2494. 

  2494.                 case "L":  //RADIO LIST
    2495. 

  2495.                 case "!":  //DROPDOWN LIST
    2496. 

  2496.                     if ($arow['other'] == "Y")
    2497. 

  2497.                     {
    2498. 

  2498.                         $fieldname="{$arow['sid']}X{$arow['gid']}X{$arow['qid']}other";
    2499. 

  2499.                         if (isset($fieldmap[$fieldname])) $aDuplicateQIDs[$arow['qid']]=array('fieldname'=>$fieldname,'question'=>$arow['question'],'gid'=>$arow['gid']);
    2500. 

  2500. 

  2501.                         $fieldmap[$fieldname]=array("fieldname"=>$fieldname,
    2502. 

  2502.                         'type'=>$arow['type'],
    2503. 

  2503.                         'sid'=>$surveyid,
    2504. 

  2504.                         "gid"=>$arow['gid'],
    2505. 

  2505.                         "qid"=>$arow['qid'],
    2506. 

  2506.                         "aid"=>"other");
    2507. 

  2507.                         // dgk bug fix line above. aid should be set to "other" for export to append to the field name in the header line.
    2508. 

  2508.                         if ($style == "full")
    2509. 

  2509.                         {
    2510. 

  2510.                             $fieldmap[$fieldname]['title']=$arow['title'];
    2511. 

  2511.                             $fieldmap[$fieldname]['question']=$arow['question'];
    2512. 

  2512.                             $fieldmap[$fieldname]['subquestion']=$clang->gT("Other");
    2513. 

  2513.                             $fieldmap[$fieldname]['group_name']=$arow['group_name'];
    2514. 

  2514.                             $fieldmap[$fieldname]['mandatory']=$arow['mandatory'];
    2515. 

  2515.                             $fieldmap[$fieldname]['hasconditions']=$conditions;
    2516. 

  2516.                             $fieldmap[$fieldname]['usedinconditions']=$usedinconditions;
    2517. 

  2517.                             $fieldmap[$fieldname]['questionSeq']=$questionSeq;
    2518. 

  2518.                             $fieldmap[$fieldname]['groupSeq']=$groupSeq;
    2519. 

  2519.                             if (isset($defaultValues[$arow['qid'].'~other'])) {
    2520. 

  2520.                                 $fieldmap[$fieldname]['defaultvalue'] = $defaultValues[$arow['qid'].'~other'];
    2521. 

  2521.                             }
    2522. 

  2522.                         }
    2523. 

  2523.                     }
    2524. 

  2524.                     break;
    2525. 

  2525.                 case "O": //DROPDOWN LIST WITH COMMENT
    2526. 

  2526.                     $fieldname="{$arow['sid']}X{$arow['gid']}X{$arow['qid']}comment";
    2527. 

  2527.                     if (isset($fieldmap[$fieldname])) $aDuplicateQIDs[$arow['qid']]=array('fieldname'=>$fieldname,'question'=>$arow['question'],'gid'=>$arow['gid']);
    2528. 

  2528. 

  2529.                     $fieldmap[$fieldname]=array("fieldname"=>$fieldname,
    2530. 

  2530.                     'type'=>$arow['type'],
    2531. 

  2531.                     'sid'=>$surveyid,
    2532. 

  2532.                     "gid"=>$arow['gid'],
    2533. 

  2533.                     "qid"=>$arow['qid'],
    2534. 

  2534.                     "aid"=>"comment");
    2535. 

  2535.                     // dgk bug fix line below. aid should be set to "comment" for export to append to the field name in the header line. Also needed set the type element correctly.
    2536. 

  2536.                     if ($style == "full")
    2537. 

  2537.                     {
    2538. 

  2538.                         $fieldmap[$fieldname]['title']=$arow['title'];
    2539. 

  2539.                         $fieldmap[$fieldname]['question']=$arow['question'];
    2540. 

  2540.                         $fieldmap[$fieldname]['subquestion']=$clang->gT("Comment");
    2541. 

  2541.                         $fieldmap[$fieldname]['group_name']=$arow['group_name'];
    2542. 

  2542.                         $fieldmap[$fieldname]['mandatory']=$arow['mandatory'];
    2543. 

  2543.                         $fieldmap[$fieldname]['hasconditions']=$conditions;
    2544. 

  2544.                         $fieldmap[$fieldname]['usedinconditions']=$usedinconditions;
    2545. 

  2545.                         $fieldmap[$fieldname]['questionSeq']=$questionSeq;
    2546. 

  2546.                         $fieldmap[$fieldname]['groupSeq']=$groupSeq;
    2547. 

  2547.                     }
    2548. 

  2548.                     break;
    2549. 

  2549.             }
    2550. 

  2550.         }
    2551. 

  2551.         // For Multi flexi question types
    2552. 

  2552.         elseif ($qtypes[$arow['type']]['subquestions']==2 && $qtypes[$arow['type']]['answerscales']==0)
    2553. 

  2553.         {
    2554. 

  2554.             //MULTI FLEXI
    2555. 

  2555.             $abrows = getSubQuestions($surveyid,$arow['qid'],$sLanguage);
    2556. 

  2556.             //Now first process scale=1
    2557. 

  2557.             $answerset=array();
    2558. 

  2558.             $answerList = array();
    2559. 

  2559.             foreach ($abrows as $key=>$abrow)
    2560. 

  2560.             {
    2561. 

  2561.                 if($abrow['scale_id']==1) {
    2562. 

  2562.                     $answerset[]=$abrow;
    2563. 

  2563.                     $answerList[] = array(
    2564. 

  2564.                     'code'=>$abrow['title'],
    2565. 

  2565.                     'answer'=>$abrow['question'],
    2566. 

  2566.                     );
    2567. 

  2567.                     unset($abrows[$key]);
    2568. 

  2568.                 }
    2569. 

  2569.             }
    2570. 

  2570.             reset($abrows);
    2571. 

  2571.             foreach ($abrows as $abrow)
    2572. 

  2572.             {
    2573. 

  2573.                 foreach($answerset as $answer)
    2574. 

  2574.                 {
    2575. 

  2575.                     $fieldname="{$arow['sid']}X{$arow['gid']}X{$arow['qid']}{$abrow['title']}_{$answer['title']}";
    2576. 

  2576.                     if (isset($fieldmap[$fieldname])) $aDuplicateQIDs[$arow['qid']]=array('fieldname'=>$fieldname,'question'=>$arow['question'],'gid'=>$arow['gid']);
    2577. 

  2577.                     $fieldmap[$fieldname]=array("fieldname"=>$fieldname,
    2578. 

  2578.                     'type'=>$arow['type'],
    2579. 

  2579.                     'sid'=>$surveyid,
    2580. 

  2580.                     "gid"=>$arow['gid'],
    2581. 

  2581.                     "qid"=>$arow['qid'],
    2582. 

  2582.                     "aid"=>$abrow['title']."_".$answer['title'],
    2583. 

  2583.                     "sqid"=>$abrow['qid']);
    2584. 

  2584.                     if ($abrow['other']=="Y") {$alsoother="Y";}
    2585. 

  2585.                     if ($style == "full")
    2586. 

  2586.                     {
    2587. 

  2587.                         $fieldmap[$fieldname]['title']=$arow['title'];
    2588. 

  2588.                         $fieldmap[$fieldname]['question']=$arow['question'];
    2589. 

  2589.                         $fieldmap[$fieldname]['subquestion1']=$abrow['question'];
    2590. 

  2590.                         $fieldmap[$fieldname]['subquestion2']=$answer['question'];
    2591. 

  2591.                         $fieldmap[$fieldname]['group_name']=$arow['group_name'];
    2592. 

  2592.                         $fieldmap[$fieldname]['mandatory']=$arow['mandatory'];
    2593. 

  2593.                         $fieldmap[$fieldname]['hasconditions']=$conditions;
    2594. 

  2594.                         $fieldmap[$fieldname]['usedinconditions']=$usedinconditions;
    2595. 

  2595.                         $fieldmap[$fieldname]['questionSeq']=$questionSeq;
    2596. 

  2596.                         $fieldmap[$fieldname]['groupSeq']=$groupSeq;
    2597. 

  2597.                         $fieldmap[$fieldname]['preg']=$arow['preg'];
    2598. 

  2598.                         $fieldmap[$fieldname]['answerList']=$answerList;
    2599. 

  2599.                     }
    2600. 

  2600.                 }
    2601. 

  2601.             }
    2602. 

  2602.             unset($answerset);
    2603. 

  2603.         }
    2604. 

  2604.         elseif ($arow['type'] == "1")
    2605. 

  2605.         {
    2606. 

  2606.             $abrows = getSubQuestions($surveyid,$arow['qid'],$sLanguage);
    2607. 

  2607.             foreach ($abrows as $abrow)
    2608. 

  2608.             {
    2609. 

  2609.                 $fieldname="{$arow['sid']}X{$arow['gid']}X{$arow['qid']}{$abrow['title']}#0";
    2610. 

  2610.                 if (isset($fieldmap[$fieldname])) $aDuplicateQIDs[$arow['qid']]=array('fieldname'=>$fieldname,'question'=>$arow['question'],'gid'=>$arow['gid']);
    2611. 

  2611.                 $fieldmap[$fieldname]=array("fieldname"=>$fieldname, 'type'=>$arow['type'], 'sid'=>$surveyid, "gid"=>$arow['gid'], "qid"=>$arow['qid'], "aid"=>$abrow['title'], "scale_id"=>0);
    2612. 

  2612.                 if ($style == "full")
    2613. 

  2613.                 {
    2614. 

  2614.                     $fieldmap[$fieldname]['title']=$arow['title'];
    2615. 

  2615.                     $fieldmap[$fieldname]['question']=$arow['question'];
    2616. 

  2616.                     $fieldmap[$fieldname]['subquestion']=$abrow['question'];
    2617. 

  2617.                     $fieldmap[$fieldname]['group_name']=$arow['group_name'];
    2618. 

  2618.                     $fieldmap[$fieldname]['scale']=$clang->gT('Scale 1');
    2619. 

  2619.                     $fieldmap[$fieldname]['mandatory']=$arow['mandatory'];
    2620. 

  2620.                     $fieldmap[$fieldname]['hasconditions']=$conditions;
    2621. 

  2621.                     $fieldmap[$fieldname]['usedinconditions']=$usedinconditions;
    2622. 

  2622.                     $fieldmap[$fieldname]['questionSeq']=$questionSeq;
    2623. 

  2623.                     $fieldmap[$fieldname]['groupSeq']=$groupSeq;
    2624. 

  2624.                 }
    2625. 

  2625. 

  2626.                 $fieldname="{$arow['sid']}X{$arow['gid']}X{$arow['qid']}{$abrow['title']}#1";
    2627. 

  2627.                 if (isset($fieldmap[$fieldname])) $aDuplicateQIDs[$arow['qid']]=array('fieldname'=>$fieldname,'question'=>$arow['question'],'gid'=>$arow['gid']);
    2628. 

  2628.                 $fieldmap[$fieldname]=array("fieldname"=>$fieldname, 'type'=>$arow['type'], 'sid'=>$surveyid, "gid"=>$arow['gid'], "qid"=>$arow['qid'], "aid"=>$abrow['title'], "scale_id"=>1);
    2629. 

  2629.                 if ($style == "full")
    2630. 

  2630.                 {
    2631. 

  2631.                     $fieldmap[$fieldname]['title']=$arow['title'];
    2632. 

  2632.                     $fieldmap[$fieldname]['question']=$arow['question'];
    2633. 

  2633.                     $fieldmap[$fieldname]['subquestion']=$abrow['question'];
    2634. 

  2634.                     $fieldmap[$fieldname]['group_name']=$arow['group_name'];
    2635. 

  2635.                     $fieldmap[$fieldname]['scale']=$clang->gT('Scale 2');
    2636. 

  2636.                     $fieldmap[$fieldname]['mandatory']=$arow['mandatory'];
    2637. 

  2637.                     $fieldmap[$fieldname]['hasconditions']=$conditions;
    2638. 

  2638.                     $fieldmap[$fieldname]['usedinconditions']=$usedinconditions;
    2639. 

  2639.                     $fieldmap[$fieldname]['questionSeq']=$questionSeq;
    2640. 

  2640.                     $fieldmap[$fieldname]['groupSeq']=$groupSeq;
    2641. 

  2641.                 }
    2642. 

  2642.             }
    2643. 

  2643.         }
    2644. 

  2644. 

  2645.         elseif ($arow['type'] == "R")
    2646. 

  2646.         {
    2647. 

  2647.             //MULTI ENTRY
    2648. 

  2648.             $data = Answers::model()->findAllByAttributes(array('qid' => $arow['qid'], 'language' => $sLanguage));
    2649. 

  2649.             $data = count($data);
    2650. 

  2650.             $slots=$data;
    2651. 

  2651.             for ($i=1; $i<=$slots; $i++)
    2652. 

  2652.             {
    2653. 

  2653.                 $fieldname="{$arow['sid']}X{$arow['gid']}X{$arow['qid']}$i";
    2654. 

  2654.                 if (isset($fieldmap[$fieldname])) $aDuplicateQIDs[$arow['qid']]=array('fieldname'=>$fieldname,'question'=>$arow['question'],'gid'=>$arow['gid']);
    2655. 

  2655.                 $fieldmap[$fieldname]=array("fieldname"=>$fieldname, 'type'=>$arow['type'], 'sid'=>$surveyid, "gid"=>$arow['gid'], "qid"=>$arow['qid'], "aid"=>$i);
    2656. 

  2656.                 if ($style == "full")
    2657. 

  2657.                 {
    2658. 

  2658.                     $fieldmap[$fieldname]['title']=$arow['title'];
    2659. 

  2659.                     $fieldmap[$fieldname]['question']=$arow['question'];
    2660. 

  2660.                     $fieldmap[$fieldname]['subquestion']=sprintf($clang->gT('Rank %s'),$i);
    2661. 

  2661.                     $fieldmap[$fieldname]['group_name']=$arow['group_name'];
    2662. 

  2662.                     $fieldmap[$fieldname]['mandatory']=$arow['mandatory'];
    2663. 

  2663.                     $fieldmap[$fieldname]['hasconditions']=$conditions;
    2664. 

  2664.                     $fieldmap[$fieldname]['usedinconditions']=$usedinconditions;
    2665. 

  2665.                     $fieldmap[$fieldname]['questionSeq']=$questionSeq;
    2666. 

  2666.                     $fieldmap[$fieldname]['groupSeq']=$groupSeq;
    2667. 

  2667.                 }
    2668. 

  2668.             }
    2669. 

  2669.         }
    2670. 

  2670.         elseif ($arow['type'] == "|")
    2671. 

  2671.         {
    2672. 

  2672.             $qidattributes= getQuestionAttributeValues($arow['qid']);
    2673. 

  2673.                 $fieldname="{$arow['sid']}X{$arow['gid']}X{$arow['qid']}";
    2674. 

  2674.                 $fieldmap[$fieldname]=array("fieldname"=>$fieldname,
    2675. 

  2675.                 'type'=>$arow['type'],
    2676. 

  2676.                 'sid'=>$surveyid,
    2677. 

  2677.                 "gid"=>$arow['gid'],
    2678. 

  2678.                 "qid"=>$arow['qid'],
    2679. 

  2679.                 "aid"=>''
    2680. 

  2680.                 );
    2681. 

  2681.                 if ($style == "full")
    2682. 

  2682.                 {
    2683. 

  2683.                     $fieldmap[$fieldname]['title']=$arow['title'];
    2684. 

  2684.                     $fieldmap[$fieldname]['question']=$arow['question'];
    2685. 

  2685.                     $fieldmap[$fieldname]['max_files']=$qidattributes['max_num_of_files'];
    2686. 

  2686.                     $fieldmap[$fieldname]['group_name']=$arow['group_name'];
    2687. 

  2687.                     $fieldmap[$fieldname]['mandatory']=$arow['mandatory'];
    2688. 

  2688.                     $fieldmap[$fieldname]['hasconditions']=$conditions;
    2689. 

  2689.                     $fieldmap[$fieldname]['usedinconditions']=$usedinconditions;
    2690. 

  2690.                     $fieldmap[$fieldname]['questionSeq']=$questionSeq;
    2691. 

  2691.                     $fieldmap[$fieldname]['groupSeq']=$groupSeq;
    2692. 

  2692.                 }
    2693. 

  2693.                 $fieldname="{$arow['sid']}X{$arow['gid']}X{$arow['qid']}"."_filecount";
    2694. 

  2694.                 $fieldmap[$fieldname]=array("fieldname"=>$fieldname,
    2695. 

  2695.                 'type'=>$arow['type'],
    2696. 

  2696.                 'sid'=>$surveyid,
    2697. 

  2697.                 "gid"=>$arow['gid'],
    2698. 

  2698.                 "qid"=>$arow['qid'],
    2699. 

  2699.                 "aid"=>"filecount"
    2700. 

  2700.                 );
    2701. 

  2701.                 if ($style == "full")
    2702. 

  2702.                 {
    2703. 

  2703.                     $fieldmap[$fieldname]['title']=$arow['title'];
    2704. 

  2704.                     $fieldmap[$fieldname]['question']="filecount - ".$arow['question'];
    2705. 

  2705.                     $fieldmap[$fieldname]['group_name']=$arow['group_name'];
    2706. 

  2706.                     $fieldmap[$fieldname]['mandatory']=$arow['mandatory'];
    2707. 

  2707.                     $fieldmap[$fieldname]['hasconditions']=$conditions;
    2708. 

  2708.                     $fieldmap[$fieldname]['usedinconditions']=$usedinconditions;
    2709. 

  2709.                     $fieldmap[$fieldname]['questionSeq']=$questionSeq;
    2710. 

  2710.                     $fieldmap[$fieldname]['groupSeq']=$groupSeq;
    2711. 

  2711.                 }
    2712. 

  2712.         }
    2713. 

  2713.         else  // Question types with subquestions and one answer per subquestion  (M/A/B/C/E/F/H/P)
    2714. 

  2714.         {
    2715. 

  2715.             //MULTI ENTRY
    2716. 

  2716.             $abrows = getSubQuestions($surveyid,$arow['qid'],$sLanguage);
    2717. 

  2717.             foreach ($abrows as $abrow)
    2718. 

  2718.             {
    2719. 

  2719.                 $fieldname="{$arow['sid']}X{$arow['gid']}X{$arow['qid']}{$abrow['title']}";
    2720. 

  2720.                 if (isset($fieldmap[$fieldname])) $aDuplicateQIDs[$arow['qid']]=array('fieldname'=>$fieldname,'question'=>$arow['question'],'gid'=>$arow['gid']);
    2721. 

  2721.                 $fieldmap[$fieldname]=array("fieldname"=>$fieldname,
    2722. 

  2722.                 'type'=>$arow['type'],
    2723. 

  2723.                 'sid'=>$surveyid,
    2724. 

  2724.                 'gid'=>$arow['gid'],
    2725. 

  2725.                 'qid'=>$arow['qid'],
    2726. 

  2726.                 'aid'=>$abrow['title'],
    2727. 

  2727.                 'sqid'=>$abrow['qid']);
    2728. 

  2728.                 if ($style == "full")
    2729. 

  2729.                 {
    2730. 

  2730.                     $fieldmap[$fieldname]['title']=$arow['title'];
    2731. 

  2731.                     $fieldmap[$fieldname]['question']=$arow['question'];
    2732. 

  2732.                     $fieldmap[$fieldname]['subquestion']=$abrow['question'];
    2733. 

  2733.                     $fieldmap[$fieldname]['group_name']=$arow['group_name'];
    2734. 

  2734.                     $fieldmap[$fieldname]['mandatory']=$arow['mandatory'];
    2735. 

  2735.                     $fieldmap[$fieldname]['hasconditions']=$conditions;
    2736. 

  2736.                     $fieldmap[$fieldname]['usedinconditions']=$usedinconditions;
    2737. 

  2737.                     $fieldmap[$fieldname]['questionSeq']=$questionSeq;
    2738. 

  2738.                     $fieldmap[$fieldname]['groupSeq']=$groupSeq;
    2739. 

  2739.                     $fieldmap[$fieldname]['preg']=$arow['preg'];
    2740. 

  2740.                     if (isset($defaultValues[$arow['qid'].'~'.$abrow['qid']])) {
    2741. 

  2741.                         $fieldmap[$fieldname]['defaultvalue'] = $defaultValues[$arow['qid'].'~'.$abrow['qid']];
    2742. 

  2742.                     }
    2743. 

  2743.                 }
    2744. 

  2744.                 if ($arow['type'] == "P")
    2745. 

  2745.                 {
    2746. 

  2746.                     $fieldname="{$arow['sid']}X{$arow['gid']}X{$arow['qid']}{$abrow['title']}comment";
    2747. 

  2747.                     if (isset($fieldmap[$fieldname])) $aDuplicateQIDs[$arow['qid']]=array('fieldname'=>$fieldname,'question'=>$arow['question'],'gid'=>$arow['gid']);
    2748. 

  2748.                     $fieldmap[$fieldname]=array("fieldname"=>$fieldname, 'type'=>$arow['type'], 'sid'=>$surveyid, "gid"=>$arow['gid'], "qid"=>$arow['qid'], "aid"=>$abrow['title']."comment");
    2749. 

  2749.                     if ($style == "full")
    2750. 

  2750.                     {
    2751. 

  2751.                         $fieldmap[$fieldname]['title']=$arow['title'];
    2752. 

  2752.                         $fieldmap[$fieldname]['question']=$arow['question'];
    2753. 

  2753.                         $fieldmap[$fieldname]['subquestion']=$clang->gT('Comment');
    2754. 

  2754.                         $fieldmap[$fieldname]['group_name']=$arow['group_name'];
    2755. 

  2755.                         $fieldmap[$fieldname]['mandatory']=$arow['mandatory'];
    2756. 

  2756.                         $fieldmap[$fieldname]['hasconditions']=$conditions;
    2757. 

  2757.                         $fieldmap[$fieldname]['usedinconditions']=$usedinconditions;
    2758. 

  2758.                         $fieldmap[$fieldname]['questionSeq']=$questionSeq;
    2759. 

  2759.                         $fieldmap[$fieldname]['groupSeq']=$groupSeq;
    2760. 

  2760.                     }
    2761. 

  2761.                 }
    2762. 

  2762.             }
    2763. 

  2763.             if ($arow['other']=="Y" && ($arow['type']=="M" || $arow['type']=="P"))
    2764. 

  2764.             {
    2765. 

  2765.                 $fieldname="{$arow['sid']}X{$arow['gid']}X{$arow['qid']}other";
    2766. 

  2766.                 if (isset($fieldmap[$fieldname])) $aDuplicateQIDs[$arow['qid']]=array('fieldname'=>$fieldname,'question'=>$arow['question'],'gid'=>$arow['gid']);
    2767. 

  2767.                 $fieldmap[$fieldname]=array("fieldname"=>$fieldname, 'type'=>$arow['type'], 'sid'=>$surveyid, "gid"=>$arow['gid'], "qid"=>$arow['qid'], "aid"=>"other");
    2768. 

  2768.                 if ($style == "full")
    2769. 

  2769.                 {
    2770. 

  2770.                     $fieldmap[$fieldname]['title']=$arow['title'];
    2771. 

  2771.                     $fieldmap[$fieldname]['question']=$arow['question'];
    2772. 

  2772.                     $fieldmap[$fieldname]['subquestion']=$clang->gT('Other');
    2773. 

  2773.                     $fieldmap[$fieldname]['group_name']=$arow['group_name'];
    2774. 

  2774.                     $fieldmap[$fieldname]['mandatory']=$arow['mandatory'];
    2775. 

  2775.                     $fieldmap[$fieldname]['hasconditions']=$conditions;
    2776. 

  2776.                     $fieldmap[$fieldname]['usedinconditions']=$usedinconditions;
    2777. 

  2777.                     $fieldmap[$fieldname]['questionSeq']=$questionSeq;
    2778. 

  2778.                     $fieldmap[$fieldname]['groupSeq']=$groupSeq;
    2779. 

  2779.                     $fieldmap[$fieldname]['other']=$arow['other'];
    2780. 

  2780.                 }
    2781. 

  2781.                 if ($arow['type']=="P")
    2782. 

  2782.                 {
    2783. 

  2783.                     $fieldname="{$arow['sid']}X{$arow['gid']}X{$arow['qid']}othercomment";
    2784. 

  2784.                     if (isset($fieldmap[$fieldname])) $aDuplicateQIDs[$arow['qid']]=array('fieldname'=>$fieldname,'question'=>$arow['question'],'gid'=>$arow['gid']);
    2785. 

  2785.                     $fieldmap[$fieldname]=array("fieldname"=>$fieldname, 'type'=>$arow['type'], 'sid'=>$surveyid, "gid"=>$arow['gid'], "qid"=>$arow['qid'], "aid"=>"othercomment");
    2786. 

  2786.                     if ($style == "full")
    2787. 

  2787.                     {
    2788. 

  2788.                         $fieldmap[$fieldname]['title']=$arow['title'];
    2789. 

  2789.                         $fieldmap[$fieldname]['question']=$arow['question'];
    2790. 

  2790.                         $fieldmap[$fieldname]['subquestion']=$clang->gT('Other comment');
    2791. 

  2791.                         $fieldmap[$fieldname]['group_name']=$arow['group_name'];
    2792. 

  2792.                         $fieldmap[$fieldname]['mandatory']=$arow['mandatory'];
    2793. 

  2793.                         $fieldmap[$fieldname]['hasconditions']=$conditions;
    2794. 

  2794.                         $fieldmap[$fieldname]['usedinconditions']=$usedinconditions;
    2795. 

  2795.                         $fieldmap[$fieldname]['questionSeq']=$questionSeq;
    2796. 

  2796.                         $fieldmap[$fieldname]['groupSeq']=$groupSeq;
    2797. 

  2797.                         $fieldmap[$fieldname]['other']=$arow['other'];
    2798. 

  2798.                     }
    2799. 

  2799.                 }
    2800. 

  2800.             }
    2801. 

  2801.         }
    2802. 

  2802.         if (isset($fieldmap[$fieldname]))
    2803. 

  2803.         {
    2804. 

  2804.             $fieldmap[$fieldname]['relevance']=$arow['relevance'];
    2805. 

  2805.             $fieldmap[$fieldname]['grelevance']=$arow['grelevance'];
    2806. 

  2806.             $fieldmap[$fieldname]['questionSeq']=$questionSeq;
    2807. 

  2807.             $fieldmap[$fieldname]['groupSeq']=$groupSeq;
    2808. 

  2808.             $fieldmap[$fieldname]['preg']=$arow['preg'];
    2809. 

  2809.             $fieldmap[$fieldname]['other']=$arow['other'];
    2810. 

  2810.             $fieldmap[$fieldname]['help']=$arow['help'];
    2811. 

  2811.         }
    2812. 

  2812.         else
    2813. 

  2813.         {
    2814. 

  2814.             --$questionSeq; // didn't generate a valid $fieldmap entry, so decrement the question counter to ensure they are sequential
    2815. 

  2815.         }
    2816. 

  2816.     }
    2817. 

  2817. 

  2818.     if (isset($fieldmap)) {
    2819. 

  2819.         if ($questionid == false)
    2820. 

  2820.         {
    2821. 

  2821.             // If the fieldmap was randomized, the master will contain the proper order.  Copy that fieldmap with the new language settings.
    2822. 

  2822.             if (isset(Yii::app()->session['survey_'.$surveyid]['fieldmap-' . $surveyid . '-randMaster']))
    2823. 

  2823.             {
    2824. 

  2824.                 $masterFieldmap = Yii::app()->session['survey_'.$surveyid]['fieldmap-' . $surveyid . '-randMaster'];
    2825. 

  2825.                 $mfieldmap = Yii::app()->session['survey_'.$surveyid][$masterFieldmap];
    2826. 

  2826. 

  2827.                 foreach ($mfieldmap as $fieldname => $mf)
    2828. 

  2828.                 {
    2829. 

  2829.                     if (isset($fieldmap[$fieldname]))
    2830. 

  2830.                     {
    2831. 

  2831.                         // This array holds the keys of translatable attributes
    2832. 

  2832.                         $translatable = array_flip(array('question', 'subquestion', 'subquestion1', 'subquestion2', 'group_name', 'answerList', 'defaultValue', 'help'));
    2833. 

  2833.                         // We take all translatable attributes from the new fieldmap
    2834. 

  2834.                         $newText = array_intersect_key($fieldmap[$fieldname], $translatable);
    2835. 

  2835.                         // And merge them with the other values from the random fieldmap like questionSeq, groupSeq etc.
    2836. 

  2836.                         $mf = $newText + $mf;
    2837. 

  2837.                     }
    2838. 

  2838.                     $mfieldmap[$fieldname] = $mf;
    2839. 

  2839.                 }
    2840. 

  2840.                 $fieldmap = $mfieldmap;
    2841. 

  2841.             }
    2842. 

  2842.             Yii::app()->session['fieldmap-' . $surveyid . $sLanguage]=$fieldmap;
    2843. 

  2843.         }
    2844. 

  2844.         return $fieldmap;
    2845. 

  2845.     }
    2846. 

  2846. }
    2847. 

  2847. 

  2848. /**
    2849. 

  2849. * Returns true if the given survey has a File Upload Question Type
    2850. 

  2850. * @param $surveyid The survey ID
    2851. 

  2851. * @return bool
    2852. 

  2852. */
    2853. 

  2853. function hasFileUploadQuestion($surveyid) {
    2854. 

  2854.     $fieldmap = createFieldMap($surveyid,'short',false,false,getBaseLanguageFromSurveyID($surveyid));
    2855. 

  2855. 

  2856.     foreach ($fieldmap as $field) {
    2857. 

  2857.         if (isset($field['type']) &&  $field['type'] === '|') return true;
    2858. 

  2858.     }
    2859. 

  2859. }
    2860. 

  2860. 

  2861. /**
    2862. 

  2862. * This function generates an array containing the fieldcode, and matching data in the same order as the activate script
    2863. 

  2863. *
    2864. 

  2864. * @param string $surveyid The Survey ID
    2865. 

  2865. * @param mixed $style 'short' (default) or 'full' - full creates extra information like default values
    2866. 

  2866. * @param mixed $force_refresh - Forces to really refresh the array, not just take the session copy
    2867. 

  2867. * @param int $questionid Limit to a certain qid only (for question preview) - default is false
    2868. 

  2868. * @param string $sQuestionLanguage The language to use
    2869. 

  2869. * @return array
    2870. 

  2870. */
    2871. 

  2871. function createTimingsFieldMap($surveyid, $style='full', $force_refresh=false, $questionid=false, $sQuestionLanguage=null) {
    2872. 

  2872. 

  2873.     global $aDuplicateQIDs;
    2874. 

  2874.     static $timingsFieldMap;
    2875. 

  2875. 

  2876.     $sLanguage = sanitize_languagecode($sQuestionLanguage);
    2877. 

  2877.     $surveyid = sanitize_int($surveyid);
    2878. 

  2878.     $clang = new Limesurvey_lang($sLanguage);
    2879. 

  2879.     
    2880. 

  2880.     //checks to see if fieldmap has already been built for this page.
    2881. 

  2881.     if (isset($timingsFieldMap[$surveyid][$style][$clang->langcode]) && $force_refresh==false) {
    2882. 

  2882.         return $timingsFieldMap[$surveyid][$style][$clang->langcode];
    2883. 

  2883.     }
    2884. 

  2884. 

  2885.     //do something
    2886. 

  2886.     $fields = createFieldMap($surveyid, $style, $force_refresh, $questionid, $sQuestionLanguage);
    2887. 

  2887.     $fieldmap['interviewtime']=array('fieldname'=>'interviewtime','type'=>'interview_time','sid'=>$surveyid, 'gid'=>'', 'qid'=>'', 'aid'=>'', 'question'=>$clang->gT('Total time'), 'title'=>'interviewtime');
    2888. 

  2888.     foreach ($fields as $field) {
    2889. 

  2889.         if (!empty($field['gid'])) {
    2890. 

  2890.             // field for time spent on page
    2891. 

  2891.             $fieldname="{$field['sid']}X{$field['gid']}time";
    2892. 

  2892.             if (!isset($fieldmap[$fieldname]))
    2893. 

  2893.             {
    2894. 

  2894.                 $fieldmap[$fieldname]=array("fieldname"=>$fieldname, 'type'=>"page_time", 'sid'=>$surveyid, "gid"=>$field['gid'], "group_name"=>$field['group_name'], "qid"=>'', 'aid'=>'', 'title'=>'groupTime'.$field['gid'], 'question'=>$clang->gT('Group time').": ".$field['group_name']);
    2895. 

  2895.             }
    2896. 

  2896. 

  2897.             // field for time spent on answering a question
    2898. 

  2898.             $fieldname="{$field['sid']}X{$field['gid']}X{$field['qid']}time";
    2899. 

  2899.             if (!isset($fieldmap[$fieldname]))
    2900. 

  2900.             {
    2901. 

  2901.                 $fieldmap[$fieldname]=array("fieldname"=>$fieldname, 'type'=>"answer_time", 'sid'=>$surveyid, "gid"=>$field['gid'], "group_name"=>$field['group_name'], "qid"=>$field['qid'], 'aid'=>'', "title"=>$field['title'].'Time', "question"=>$clang->gT('Question time').": ".$field['title']);
    2902. 

  2902.             }
    2903. 

  2903.         }
    2904. 

  2904.     }
    2905. 

  2905. 

  2906.     $timingsFieldMap[$surveyid][$style][$clang->langcode] = $fieldmap;
    2907. 

  2907.     return $timingsFieldMap[$surveyid][$style][$clang->langcode];
    2908. 

  2908. }
    2909. 

  2909. 

  2910. /**
    2911. 

  2911. * put your comment there...
    2912. 

  2912. *
    2913. 

  2913. * @param mixed $needle
    2914. 

  2914. * @param mixed $haystack
    2915. 

  2915. * @param mixed $keyname
    2916. 

  2916. * @param mixed $maxanswers
    2917. 

  2917. */
    2918. 

  2918. function arraySearchByKey($needle, $haystack, $keyname, $maxanswers="") {
    2919. 

  2919.     $output=array();
    2920. 

  2920.     foreach($haystack as $hay) {
    2921. 

  2921.         if (array_key_exists($keyname, $hay)) {
    2922. 

  2922.             if ($hay[$keyname] == $needle) {
    2923. 

  2923.                 if ($maxanswers == 1) {
    2924. 

  2924.                     return $hay;
    2925. 

  2925.                 } else {
    2926. 

  2926.                     $output[]=$hay;
    2927. 

  2927.                 }
    2928. 

  2928.             }
    2929. 

  2929.         }
    2930. 

  2930.     }
    2931. 

  2931.     return $output;
    2932. 

  2932. }
    2933. 

  2933. 

  2934. /**
    2935. 

  2935. * set the rights of a user and his children
    2936. 

  2936. *
    2937. 

  2937. * @param int $uid the user id
    2938. 

  2938. * @param mixed $rights rights array
    2939. 

  2939. */
    2940. 

  2940. function setUserRights($uid, $rights)
    2941. 

  2941. {
    2942. 

  2942.     $uid=sanitize_int($uid);
    2943. 

  2943.     $updates = "create_survey=".$rights['create_survey']
    2944. 

  2944.     . ", create_user=".$rights['create_user']
    2945. 

  2945.     . ", participant_panel=".$rights['participant_panel']
    2946. 

  2946.     . ", delete_user=".$rights['delete_user']
    2947. 

  2947.     . ", superadmin=".$rights['superadmin']
    2948. 

  2948.     . ", configurator=".$rights['configurator']
    2949. 

  2949.     . ", manage_template=".$rights['manage_template']
    2950. 

  2950.     . ", manage_label=".$rights['manage_label'];
    2951. 

  2951.     $uquery = "UPDATE {{users}} SET ".$updates." WHERE uid = ".$uid;
    2952. 

  2952.     return dbSelectLimitAssoc($uquery);     //Checked
    2953. 

  2953. }
    2954. 

  2954. 

  2955. /**
    2956. 

  2956. * This function returns a count of the number of saved responses to a survey
    2957. 

  2957. *
    2958. 

  2958. * @param mixed $surveyid Survey ID
    2959. 

  2959. */
    2960. 

  2960. function getSavedCount($surveyid)
    2961. 

  2961. {
    2962. 

  2962.     $surveyid=(int)$surveyid;
    2963. 

  2963. 

  2964.     return Saved_control::model()->getCountOfAll($surveyid);
    2965. 

  2965. }
    2966. 

  2966. 

  2967. /**
    2968. 

  2968. * Returns the base language from a survey id
    2969. 

  2969. *
    2970. 

  2970. * @deprecated Use Survey::model()->findByPk($surveyid)->language
    2971. 

  2971. * @param int $surveyid
    2972. 

  2972. * @return string
    2973. 

  2973. */
    2974. 

  2974. function getBaseLanguageFromSurveyID($surveyid)
    2975. 

  2975. {
    2976. 

  2976.     return Survey::model()->findByPk($surveyid)->language;
    2977. 

  2977. }
    2978. 

  2978. 

  2979. 

  2980. function buildLabelSetCheckSumArray()
    2981. 

  2981. {
    2982. 

  2982.     // BUILD CHECKSUMS FOR ALL EXISTING LABEL SETS
    2983. 

  2983. 

  2984.     /**$query = "SELECT lid
    2985. 

  2985.     FROM ".db_table_name('labelsets')."
    2986. 

  2986.     ORDER BY lid"; */
    2987. 

  2987.     $result = Labelsets::model()->getLID();//($query) or safeDie("safe_died collecting labelset ids<br />$query<br />");  //Checked)
    2988. 

  2988.     $csarray=array();
    2989. 

  2989.     foreach($result as $row)
    2990. 

  2990.     {
    2991. 

  2991.         $thisset="";
    2992. 

  2992.         $query2 = "SELECT code, title, sortorder, language, assessment_value
    2993. 

  2993.         FROM {{labels}}
    2994. 

  2994.         WHERE lid={$row['lid']}
    2995. 

  2995.         ORDER BY language, sortorder, code";
    2996. 

  2996.         $result2 = Yii::app()->db->createCommand($query2)->query();
    2997. 

  2997.         foreach ($result2->readAll() as $row2)
    2998. 

  2998.         {
    2999. 

  2999.             $thisset .= implode('.', $row2);
    3000. 

  3000.         } // while
    3001. 

  3001.         $csarray[$row['lid']]=dechex(crc32($thisset)*1);
    3002. 

  3002.     }
    3003. 

  3003. 

  3004.     return $csarray;
    3005. 

  3005. }
    3006. 

  3006. 

  3007. 

  3008. /**
    3009. 

  3009. * Returns a flat array with all question attributes for the question only (and the qid we gave it)!
    3010. 

  3010. * @param $iQID The question ID
    3011. 

  3011. * @return array$bOrderByNative=>value, attribute=>value} or false if the question ID does not exist (anymore)
    3012. 

  3012. */
    3013. 

  3013. function getQuestionAttributeValues($iQID)
    3014. 

  3014. {
    3015. 

  3015.     static $cache = array();
    3016. 

  3016.     static $availableattributesarr = null;
    3017. 

  3017.     $iQID = sanitize_int($iQID);
    3018. 

  3018. 

  3019.     if (isset($cache[$iQID])) {
    3020. 

  3020.         return $cache[$iQID];
    3021. 

  3021.     }
    3022. 

  3022.     $row = Questions::model()->findByAttributes(array('qid' => $iQID)); //, 'parent_qid' => 0), array('group' => 'type')
    3023. 

  3023.     if (empty($row)) // Question was deleted while running the survey
    3024. 

  3024.     {
    3025. 

  3025.         $cache[$iQID] = false;
    3026. 

  3026.         return false;
    3027. 

  3027.     }
    3028. 

  3028.     else
    3029. 

  3029.     {
    3030. 

  3030.         $row = $row->getAttributes();
    3031. 

  3031.     }
    3032. 

  3032.     $type = $row['type'];
    3033. 

  3033.     $surveyid = $row['sid'];
    3034. 

  3034. 

  3035.     $aLanguages = array_merge((array)Survey::model()->findByPk($surveyid)->language, Survey::model()->findByPk($surveyid)->additionalLanguages);
    3036. 

  3036. 

  3037.     //Now read available attributes, make sure we do this only once per request to save
    3038. 

  3038.     //processing cycles and memory
    3039. 

  3039.     if (is_null($availableattributesarr)) $availableattributesarr = questionAttributes();
    3040. 

  3040.     if (isset($availableattributesarr[$type]))
    3041. 

  3041.     {
    3042. 

  3042.         $aAvailableAttributes = $availableattributesarr[$type];
    3043. 

  3043.     }
    3044. 

  3044.     else
    3045. 

  3045.     {
    3046. 

  3046.         $cache[$iQID] = array();
    3047. 

  3047.         return array();
    3048. 

  3048.     }
    3049. 

  3049. 

  3050.     $aResultAttributes = array();
    3051. 

  3051.     foreach($aAvailableAttributes as $attribute){
    3052. 

  3052.         if ($attribute['i18n'])
    3053. 

  3053.         {
    3054. 

  3054.             foreach ($aLanguages as $sLanguage)
    3055. 

  3055.             {
    3056. 

  3056.                 $aResultAttributes[$attribute['name']][$sLanguage]=$attribute['default'];
    3057. 

  3057.             }
    3058. 

  3058.         }
    3059. 

  3059.         else
    3060. 

  3060.         {
    3061. 

  3061.             $aResultAttributes[$attribute['name']]=$attribute['default'];
    3062. 

  3062.         }
    3063. 

  3063.     }
    3064. 

  3064. 

  3065.     $result = Question_attributes::model()->findAllByAttributes(array('qid' => $iQID));
    3066. 

  3066.     foreach ($result as $row)
    3067. 

  3067.     {
    3068. 

  3068.         $row = $row->attributes;
    3069. 

  3069.         if (!isset($aAvailableAttributes[$row['attribute']]))
    3070. 

  3070.         {
    3071. 

  3071.             continue; // Sort out attributes not belonging to this question
    3072. 

  3072.         }
    3073. 

  3073.         if (!($aAvailableAttributes[$row['attribute']]['i18n']))
    3074. 

  3074.         {
    3075. 

  3075.             $aResultAttributes[$row['attribute']]=$row['value'];
    3076. 

  3076.         }
    3077. 

  3077.         elseif(!empty($row['language']))
    3078. 

  3078.         {
    3079. 

  3079.             $aResultAttributes[$row['attribute']][$row['language']]=$row['value'];
    3080. 

  3080.         }
    3081. 

  3081.     }
    3082. 

  3082.     $cache[$iQID] = $aResultAttributes;
    3083. 

  3083.     return $aResultAttributes;
    3084. 

  3084. }
    3085. 

  3085. 

  3086. /**
    3087. 

  3087. *
    3088. 

  3088. * Returns the questionAttribtue value set or '' if not set
    3089. 

  3089. * @author: lemeur
    3090. 

  3090. * @param $questionAttributeArray
    3091. 

  3091. * @param $attributeName
    3092. 

  3092. * @param $language string Optional: The language if the particualr attributes is localizable
    3093. 

  3093. * @return string
    3094. 

  3094. */
    3095. 

  3095. function getQuestionAttributeValue($questionAttributeArray, $attributeName, $language='')
    3096. 

  3096. {
    3097. 

  3097.     if ($language=='' && isset($questionAttributeArray[$attributeName]))
    3098. 

  3098.     {
    3099. 

  3099.         return $questionAttributeArray[$attributeName];
    3100. 

  3100.     }
    3101. 

  3101.     elseif ($language!='' && isset($questionAttributeArray[$attributeName][$language]))
    3102. 

  3102.     {
    3103. 

  3103.         return $questionAttributeArray[$attributeName][$language];
    3104. 

  3104.     }
    3105. 

  3105.     else
    3106. 

  3106.     {
    3107. 

  3107.         return '';
    3108. 

  3108.     }
    3109. 

  3109. }
    3110. 

  3110. 

  3111. /**
    3112. 

  3112. * Returns array of question type chars with attributes
    3113. 

  3113. *
    3114. 

  3114. * @param mixed $returnByName If set to true the array will be by attribute name
    3115. 

  3115. */
    3116. 

  3116. function questionAttributes($returnByName=false)
    3117. 

  3117. {
    3118. 

  3118.     $clang = Yii::app()->lang;
    3119. 

  3119.     //For each question attribute include a key:
    3120. 

  3120.     // name - the display name
    3121. 

  3121.     // types - a string with one character representing each question typy to which the attribute applies
    3122. 

  3122.     // help - a short explanation
    3123. 

  3123. 

  3124.     // If you insert a new attribute please do it in correct alphabetical order!
    3125. 

  3125. 

  3126.     $qattributes["alphasort"]=array(
    3127. 

  3127.     "types"=>"!LOWZ",
    3128. 

  3128.     'category'=>$clang->gT('Display'),
    3129. 

  3129.     'sortorder'=>100,
    3130. 

  3130.     'inputtype'=>'singleselect',
    3131. 

  3131.     'options'=>array(0=>$clang->gT('No'),
    3132. 

  3132.     1=>$clang->gT('Yes')),
    3133. 

  3133.     'default'=>0,
    3134. 

  3134.     "help"=>$clang->gT("Sort the answer options alphabetically"),
    3135. 

  3135.     "caption"=>$clang->gT('Sort answers alphabetically'));
    3136. 

  3136. 

  3137.     $qattributes["answer_width"]=array(
    3138. 

  3138.     "types"=>"ABCEF1:;",
    3139. 

  3139.     'category'=>$clang->gT('Display'),
    3140. 

  3140.     'sortorder'=>100,
    3141. 

  3141.     'inputtype'=>'integer',
    3142. 

  3142.     'min'=>'1',
    3143. 

  3143.     'max'=>'100',
    3144. 

  3144.     "help"=>$clang->gT('Set the percentage width of the (sub-)question column (1-100)'),
    3145. 

  3145.     "caption"=>$clang->gT('(Sub-)question width'));
    3146. 

  3146. 

  3147.     $qattributes["repeat_headings"]=array(
    3148. 

  3148.     "types"=>"F:1;",
    3149. 

  3149.     'category'=>$clang->gT('Display'),
    3150. 

  3150.     'sortorder'=>100,
    3151. 

  3151.     'inputtype'=>'integer',
    3152. 

  3152.      'default'=>'',
    3153. 

  3153.     "help"=>$clang->gT('Repeat headings every X subquestions (Set to 0 to deactivate heading repeat, deactivate minimum repeat headings from config).'),
    3154. 

  3154.     "caption"=>$clang->gT('Repeat headers'));
    3155. 

  3155. 

  3156.     $qattributes["array_filter"]=array(
    3157. 

  3157.     "types"=>"1ABCEF:;MPLKQR",
    3158. 

  3158.     'category'=>$clang->gT('Logic'),
    3159. 

  3159.     'sortorder'=>100,
    3160. 

  3160.     'inputtype'=>'text',
    3161. 

  3161.     "help"=>$clang->gT("Enter the code(s) of Multiple choice question(s) (separated by semicolons) to only show the matching answer options in this question."),
    3162. 

  3162.     "caption"=>$clang->gT('Array filter'));
    3163. 

  3163. 

  3164.     $qattributes["array_filter_exclude"]=array(
    3165. 

  3165.     "types"=>"1ABCEF:;MPLKQR",
    3166. 

  3166.     'category'=>$clang->gT('Logic'),
    3167. 

  3167.     'sortorder'=>100,
    3168. 

  3168.     'inputtype'=>'text',
    3169. 

  3169.     "help"=>$clang->gT("Enter the code(s) of Multiple choice question(s) (separated by semicolons) to exclude the matching answer options in this question."),
    3170. 

  3170.     "caption"=>$clang->gT('Array filter exclusion'));
    3171. 

  3171. 

  3172.     $qattributes["array_filter_style"]=array(
    3173. 

  3173.     "types"=>"1ABCEF:;MPLKQR",
    3174. 

  3174.     'category'=>$clang->gT('Logic'),
    3175. 

  3175.     'sortorder'=>100,
    3176. 

  3176.     'inputtype'=>'singleselect',
    3177. 

  3177.     'options'=>array(0=>$clang->gT('Hidden'),
    3178. 

  3178.     1=>$clang->gT('Disabled')),
    3179. 

  3179.     'default'=>0,
    3180. 

  3180.     "help"=>$clang->gT("Specify how array-filtered sub-questions should be displayed"),
    3181. 

  3181.     "caption"=>$clang->gT('Array filter style'));
    3182. 

  3182. 

  3183.     $qattributes["assessment_value"]=array(
    3184. 

  3184.     "types"=>"MP",
    3185. 

  3185.     'category'=>$clang->gT('Logic'),
    3186. 

  3186.     'sortorder'=>100,
    3187. 

  3187.     'default'=>'1',
    3188. 

  3188.     'inputtype'=>'integer',
    3189. 

  3189.     "help"=>$clang->gT("If one of the subquestions is marked then for each marked subquestion this value is added as assessment."),
    3190. 

  3190.     "caption"=>$clang->gT('Assessment value'));
    3191. 

  3191. 

  3192.     $qattributes["category_separator"]=array(
    3193. 

  3193.     "types"=>"!",
    3194. 

  3194.     'category'=>$clang->gT('Display'),
    3195. 

  3195.     'sortorder'=>100,
    3196. 

  3196.     'inputtype'=>'text',
    3197. 

  3197.     "help"=>$clang->gT('Category separator'),
    3198. 

  3198.     "caption"=>$clang->gT('Category separator'));
    3199. 

  3199. 

  3200.     $qattributes["code_filter"]=array(
    3201. 

  3201.     "types"=>"WZ",
    3202. 

  3202.     'category'=>$clang->gT('Logic'),
    3203. 

  3203.     'sortorder'=>100,
    3204. 

  3204.     'inputtype'=>'text',
    3205. 

  3205.     "help"=>$clang->gT('Filter the available answers by this value'),
    3206. 

  3206.     "caption"=>$clang->gT('Code filter'));
    3207. 

  3207. 

  3208.     $qattributes["display_columns"]=array(
    3209. 

  3209.     "types"=>"LM",
    3210. 

  3210.     'category'=>$clang->gT('Display'),
    3211. 

  3211.     'sortorder'=>100,
    3212. 

  3212.     'inputtype'=>'integer',
    3213. 

  3213.     'default'=>'1',
    3214. 

  3214.     'min'=>'1',
    3215. 

  3215.     'max'=>'100',
    3216. 

  3216.     "help"=>$clang->gT('The answer options will be distributed across the number of columns set here'),
    3217. 

  3217.     "caption"=>$clang->gT('Display columns'));
    3218. 

  3218. 

  3219.     $qattributes["display_rows"]=array(
    3220. 

  3220.     "types"=>"QSTU",
    3221. 

  3221.     'category'=>$clang->gT('Display'),
    3222. 

  3222.     'sortorder'=>100,
    3223. 

  3223.     'inputtype'=>'text',
    3224. 

  3224.     "help"=>$clang->gT('How many rows to display'),
    3225. 

  3225.     "caption"=>$clang->gT('Display rows'));
    3226. 

  3226. 

  3227.     $qattributes["dropdown_dates"]=array(
    3228. 

  3228.     "types"=>"D",
    3229. 

  3229.     'category'=>$clang->gT('Display'),
    3230. 

  3230.     'sortorder'=>100,
    3231. 

  3231.     'inputtype'=>'singleselect',
    3232. 

  3232.     'options'=>array(0=>$clang->gT('No'),
    3233. 

  3233.     1=>$clang->gT('Yes')),
    3234. 

  3234.     'default'=>0,
    3235. 

  3235.     "help"=>$clang->gT('Use accessible dropdown boxes instead of calendar popup'),
    3236. 

  3236.     "caption"=>$clang->gT('Display dropdown boxes'));
    3237. 

  3237. 

  3238.     $qattributes["dropdown_dates_year_min"]=array(
    3239. 

  3239.     "types"=>"D",
    3240. 

  3240.     'category'=>$clang->gT('Display'),
    3241. 

  3241.     'sortorder'=>110,
    3242. 

  3242.     'inputtype'=>'text',
    3243. 

  3243.     "help"=>$clang->gT('Minimum year value in calendar'),
    3244. 

  3244.     "caption"=>$clang->gT('Minimum year'));
    3245. 

  3245. 

  3246.     $qattributes["dropdown_dates_year_max"]=array(
    3247. 

  3247.     "types"=>"D",
    3248. 

  3248.     'category'=>$clang->gT('Display'),
    3249. 

  3249.     'sortorder'=>111,
    3250. 

  3250.     'inputtype'=>'text',
    3251. 

  3251.     "help"=>$clang->gT('Maximum year value for calendar'),
    3252. 

  3252.     "caption"=>$clang->gT('Maximum year'));
    3253. 

  3253. 

  3254.     $qattributes["dropdown_prepostfix"]=array(
    3255. 

  3255.     "types"=>"1",
    3256. 

  3256.     'category'=>$clang->gT('Display'),
    3257. 

  3257.     'sortorder'=>112,
    3258. 

  3258.     'inputtype'=>'text',
    3259. 

  3259.     'i18n'=>true,
    3260. 

  3260.     "help"=>$clang->gT('Prefix|Suffix for dropdown lists'),
    3261. 

  3261.     "caption"=>$clang->gT('Dropdown prefix/suffix'));
    3262. 

  3262. 

  3263.     $qattributes["dropdown_separators"]=array(
    3264. 

  3264.     "types"=>"1",
    3265. 

  3265.     'category'=>$clang->gT('Display'),
    3266. 

  3266.     'sortorder'=>120,
    3267. 

  3267.     'inputtype'=>'text',
    3268. 

  3268.     "help"=>$clang->gT('Post-Answer-Separator|Inter-Dropdownlist-Separator for dropdown lists'),
    3269. 

  3269.     "caption"=>$clang->gT('Dropdown separator'));
    3270. 

  3270. 

  3271.     $qattributes["dualscale_headerA"]=array(
    3272. 

  3272.     "types"=>"1",
    3273. 

  3273.     'category'=>$clang->gT('Display'),
    3274. 

  3274.     'sortorder'=>110,
    3275. 

  3275.     'inputtype'=>'text',
    3276. 

  3276.     'i18n'=>true,
    3277. 

  3277.     "help"=>$clang->gT('Enter a header text for the first scale'),
    3278. 

  3278.     "caption"=>$clang->gT('Header for first scale'));
    3279. 

  3279. 

  3280.     $qattributes["dualscale_headerB"]=array(
    3281. 

  3281.     "types"=>"1",
    3282. 

  3282.     'category'=>$clang->gT('Display'),
    3283. 

  3283.     'sortorder'=>111,
    3284. 

  3284.     'inputtype'=>'text',
    3285. 

  3285.     'i18n'=>true,
    3286. 

  3286.     "help"=>$clang->gT('Enter a header text for the second scale'),
    3287. 

  3287.     "caption"=>$clang->gT('Header for second scale'));
    3288. 

  3288. 

  3289.     $qattributes["equals_num_value"]=array(
    3290. 

  3290.     "types"=>"K",
    3291. 

  3291.     'category'=>$clang->gT('Input'),
    3292. 

  3292.     'sortorder'=>100,
    3293. 

  3293.     'inputtype'=>'text',
    3294. 

  3294.     "help"=>$clang->gT('Multiple numeric inputs sum must equal this value'),
    3295. 

  3295.     "caption"=>$clang->gT('Equals sum value'));
    3296. 

  3296. 

  3297.     $qattributes["em_validation_q"]=array(
    3298. 

  3298.     "types"=>":;ABCEFKMNPQRSTU",
    3299. 

  3299.     'category'=>$clang->gT('Logic'),
    3300. 

  3300.     'sortorder'=>200,
    3301. 

  3301.     'inputtype'=>'textarea',
    3302. 

  3302.     "help"=>$clang->gT('Enter a boolean equation to validate the whole question.'),
    3303. 

  3303.     "caption"=>$clang->gT('Question validation equation'));
    3304. 

  3304. 

  3305.     $qattributes["em_validation_q_tip"]=array(
    3306. 

  3306.     "types"=>":;ABCEFKMNPQRSTU",
    3307. 

  3307.     'category'=>$clang->gT('Logic'),
    3308. 

  3308.     'sortorder'=>210,
    3309. 

  3309.     'inputtype'=>'textarea',
    3310. 

  3310.     "help"=>$clang->gT('This is a hint text that will be shown to the participant describing the question validation equation.'),
    3311. 

  3311.     "caption"=>$clang->gT('Question validation tip'));
    3312. 

  3312. 

  3313.     $qattributes["em_validation_sq"]=array(
    3314. 

  3314.     "types"=>";:KQSTUN",
    3315. 

  3315.     'category'=>$clang->gT('Logic'),
    3316. 

  3316.     'sortorder'=>220,
    3317. 

  3317.     'inputtype'=>'textarea',
    3318. 

  3318.     "help"=>$clang->gT('Enter a boolean equation to validate each sub-question.'),
    3319. 

  3319.     "caption"=>$clang->gT('Sub-question validation equation'));
    3320. 

  3320. 

  3321.     $qattributes["em_validation_sq_tip"]=array(
    3322. 

  3322.     "types"=>";:KQSTUN",
    3323. 

  3323.     'category'=>$clang->gT('Logic'),
    3324. 

  3324.     'sortorder'=>230,
    3325. 

  3325.     'inputtype'=>'textarea',
    3326. 

  3326.     "help"=>$clang->gT('This is a tip shown to the participant describing the sub-question validation equation.'),
    3327. 

  3327.     "caption"=>$clang->gT('Sub-question validation tip'));
    3328. 

  3328. 

  3329.     $qattributes["exclude_all_others"]=array(
    3330. 

  3330.     "types"=>":ABCEFMPKQ",
    3331. 

  3331.     'category'=>$clang->gT('Logic'),
    3332. 

  3332.     'sortorder'=>130,
    3333. 

  3333.     'inputtype'=>'text',
    3334. 

  3334.     "help"=>$clang->gT('Excludes all other options if a certain answer is selected - just enter the answer code(s) seperated with a semikolon.'),
    3335. 

  3335.     "caption"=>$clang->gT('Exclusive option'));
    3336. 

  3336. 

  3337.     $qattributes["exclude_all_others_auto"]=array(
    3338. 

  3338.     "types"=>"MP",
    3339. 

  3339.     'category'=>$clang->gT('Logic'),
    3340. 

  3340.     'sortorder'=>131,
    3341. 

  3341.     'inputtype'=>'singleselect',
    3342. 

  3342.     'options'=>array(0=>$clang->gT('No'),
    3343. 

  3343.     1=>$clang->gT('Yes')),
    3344. 

  3344.     'default'=>0,
    3345. 

  3345.     "help"=>$clang->gT('If the participant marks all options, uncheck all and check the option set in the "Exclusive option" setting'),
    3346. 

  3346.     "caption"=>$clang->gT('Auto-check exclusive option if all others are checked'));
    3347. 

  3347. 

  3348.     // Map Options
    3349. 

  3349. 

  3350.     $qattributes["location_city"]=array(
    3351. 

  3351.     "types"=>"S",
    3352. 

  3352.     'readonly_when_active'=>true,
    3353. 

  3353.     'category'=>$clang->gT('Location'),
    3354. 

  3354.     'sortorder'=>100,
    3355. 

  3355.     'inputtype'=>'singleselect',
    3356. 

  3356.     'default'=>0,
    3357. 

  3357.     'options'=>array(0=>$clang->gT('Yes'),
    3358. 

  3358.     1=>$clang->gT('No')),
    3359. 

  3359.     "help"=>$clang->gT("Store the city?"),
    3360. 

  3360.     "caption"=>$clang->gT("Save city"));
    3361. 

  3361. 

  3362.     $qattributes["location_state"]=array(
    3363. 

  3363.     "types"=>"S",
    3364. 

  3364.     'readonly_when_active'=>true,
    3365. 

  3365.     'category'=>$clang->gT('Location'),
    3366. 

  3366.     'sortorder'=>100,
    3367. 

  3367.     'default'=>0,
    3368. 

  3368.     'inputtype'=>'singleselect',
    3369. 

  3369.     'options'=>array(0=>$clang->gT('Yes'),
    3370. 

  3370.     1=>$clang->gT('No')),
    3371. 

  3371.     "help"=>$clang->gT("Store the state?"),
    3372. 

  3372.     "caption"=>$clang->gT("Save state"));
    3373. 

  3373. 

  3374.     $qattributes["location_postal"]=array(
    3375. 

  3375.     "types"=>"S",
    3376. 

  3376.     'readonly_when_active'=>true,
    3377. 

  3377.     'category'=>$clang->gT('Location'),
    3378. 

  3378.     'sortorder'=>100,
    3379. 

  3379.     'inputtype'=>'singleselect',
    3380. 

  3380.     'default'=>0,
    3381. 

  3381.     'options'=>array(0=>$clang->gT('Yes'),
    3382. 

  3382.     1=>$clang->gT('No')),
    3383. 

  3383.     "help"=>$clang->gT("Store the postal code?"),
    3384. 

  3384.     "caption"=>$clang->gT("Save postal code"));
    3385. 

  3385. 

  3386.     $qattributes["location_country"]=array(
    3387. 

  3387.     "types"=>"S",
    3388. 

  3388.     'readonly_when_active'=>true,
    3389. 

  3389.     'category'=>$clang->gT('Location'),
    3390. 

  3390.     'sortorder'=>100,
    3391. 

  3391.     'inputtype'=>'singleselect',
    3392. 

  3392.     'default'=>0,
    3393. 

  3393.     'options'=>array(0=>$clang->gT('Yes'),
    3394. 

  3394.     1=>$clang->gT('No')),
    3395. 

  3395.     "help"=>$clang->gT("Store the country?"),
    3396. 

  3396.     "caption"=>$clang->gT("Save country"));
    3397. 

  3397. 

  3398.     $qattributes["statistics_showmap"]=array(
    3399. 

  3399.     "types"=>"S",
    3400. 

  3400.     'category'=>$clang->gT('Statistics'),
    3401. 

  3401.     'inputtype'=>'singleselect',
    3402. 

  3402.     'sortorder'=>100,
    3403. 

  3403.     'options'=>array(1=>$clang->gT('Yes'), 0=>$clang->gT('No')),
    3404. 

  3404.     'help'=>$clang->gT("Show a map in the statistics?"),
    3405. 

  3405.     'caption'=>$clang->gT("Display map"),
    3406. 

  3406.     'default'=>1
    3407. 

  3407.     );
    3408. 

  3408. 

  3409.     $qattributes["statistics_showgraph"]=array(
    3410. 

  3410.     'types'=>'15ABCDEFGHIKLMNOPQRSTUWXYZ!:;|*',
    3411. 

  3411.     'category'=>$clang->gT('Statistics'),
    3412. 

  3412.     'inputtype'=>'singleselect',
    3413. 

  3413.     'sortorder'=>101,
    3414. 

  3414.     'options'=>array(1=>$clang->gT('Yes'), 0=>$clang->gT('No')),
    3415. 

  3415.     'help'=>$clang->gT("Display a chart in the statistics?"),
    3416. 

  3416.     'caption'=>$clang->gT("Display chart"),
    3417. 

  3417.     'default'=>1
    3418. 

  3418.     );
    3419. 

  3419. 

  3420.     $qattributes["statistics_graphtype"]=array(
    3421. 

  3421.     "types"=>'15ABCDEFGHIKLNOQRSTUWXYZ!:;|*',
    3422. 

  3422.     'category'=>$clang->gT('Statistics'),
    3423. 

  3423.     'inputtype'=>'singleselect',
    3424. 

  3424.     'sortorder'=>102,
    3425. 

  3425.     'options'=>array(0=>$clang->gT('Bar chart'), 1=>$clang->gT('Pie chart')),
    3426. 

  3426.     'help'=>$clang->gT("Select the type of chart to be displayed"),
    3427. 

  3427.     'caption'=>$clang->gT("Chart type"),
    3428. 

  3428.     'default'=>0
    3429. 

  3429.     );
    3430. 

  3430. 

  3431.     $qattributes["location_mapservice"]=array(
    3432. 

  3432.     "types"=>"S",
    3433. 

  3433.     'category'=>$clang->gT('Location'),
    3434. 

  3434.     'sortorder'=>90,
    3435. 

  3435.     'inputtype'=>'singleselect',
    3436. 

  3436.     'options'=>array(0=>$clang->gT('Off'),
    3437. 

  3437.     1=>$clang->gT('Google Maps')),
    3438. 

  3438.     'default' => 0,
    3439. 

  3439.     "help"=>$clang->gT("Activate this to show a map above the input field where the user can select a location"),
    3440. 

  3440.     "caption"=>$clang->gT("Use mapping service"));
    3441. 

  3441. 

  3442.     $qattributes["location_mapwidth"]=array(
    3443. 

  3443.     "types"=>"S",
    3444. 

  3444.     'category'=>$clang->gT('Location'),
    3445. 

  3445.     'sortorder'=>102,
    3446. 

  3446.     'inputtype'=>'text',
    3447. 

  3447.     'default'=>'500',
    3448. 

  3448.     "help"=>$clang->gT("Width of the map in pixel"),
    3449. 

  3449.     "caption"=>$clang->gT("Map width"));
    3450. 

  3450. 

  3451.     $qattributes["location_mapheight"]=array(
    3452. 

  3452.     "types"=>"S",
    3453. 

  3453.     'category'=>$clang->gT('Location'),
    3454. 

  3454.     'sortorder'=>103,
    3455. 

  3455.     'inputtype'=>'text',
    3456. 

  3456.     'default'=>'300',
    3457. 

  3457.     "help"=>$clang->gT("Height of the map in pixel"),
    3458. 

  3458.     "caption"=>$clang->gT("Map height"));
    3459. 

  3459. 

  3460.     $qattributes["location_nodefaultfromip"]=array(
    3461. 

  3461.     "types"=>"S",
    3462. 

  3462.     'category'=>$clang->gT('Location'),
    3463. 

  3463.     'sortorder'=>91,
    3464. 

  3464.     'inputtype'=>'singleselect',
    3465. 

  3465.     'options'=>array(0=>$clang->gT('Yes'),
    3466. 

  3466.     1=>$clang->gT('No')),
    3467. 

  3467.     'default' => 0,
    3468. 

  3468.     "help"=>$clang->gT("Get the default location using the user's IP address?"),
    3469. 

  3469.     "caption"=>$clang->gT("IP as default location"));
    3470. 

  3470. 

  3471.     $qattributes["location_defaultcoordinates"]=array(
    3472. 

  3472.     "types"=>"S",
    3473. 

  3473.     'category'=>$clang->gT('Location'),
    3474. 

  3474.     'sortorder'=>101,
    3475. 

  3475.     'inputtype'=>'text',
    3476. 

  3476.     "help"=>$clang->gT('Default coordinates of the map when the page first loads. Format: latitude [space] longtitude'),
    3477. 

  3477.     "caption"=>$clang->gT('Default position'));
    3478. 

  3478. 

  3479.     $qattributes["location_mapzoom"]=array(
    3480. 

  3480.     "types"=>"S",
    3481. 

  3481.     'category'=>$clang->gT('Location'),
    3482. 

  3482.     'sortorder'=>101,
    3483. 

  3483.     'inputtype'=>'text',
    3484. 

  3484.     'default'=>'11',
    3485. 

  3485.     "help"=>$clang->gT("Map zoom level"),
    3486. 

  3486.     "caption"=>$clang->gT("Zoom level"));
    3487. 

  3487. 

  3488.     // End Map Options
    3489. 

  3489. 

  3490.     $qattributes["hide_tip"]=array(
    3491. 

  3491.     "types"=>"15ABCDEFGHIKLMNOPQRSTUXY!:;|",
    3492. 

  3492.     'category'=>$clang->gT('Display'),
    3493. 

  3493.     'sortorder'=>100,
    3494. 

  3494.     'inputtype'=>'singleselect',
    3495. 

  3495.     'options'=>array(0=>$clang->gT('No'),
    3496. 

  3496.     1=>$clang->gT('Yes')),
    3497. 

  3497.     'default'=>0,
    3498. 

  3498.     "help"=>$clang->gT('Hide the tip that is normally shown with a question'),
    3499. 

  3499.     "caption"=>$clang->gT('Hide tip'));
    3500. 

  3500. 

  3501.     $qattributes['hidden']=array(
    3502. 

  3502.     'types'=>'15ABCDEFGHIKLMNOPQRSTUWXYZ!:;|*',
    3503. 

  3503.     'category'=>$clang->gT('Display'),
    3504. 

  3504.     'sortorder'=>101,
    3505. 

  3505.     'inputtype'=>'singleselect',
    3506. 

  3506.     'options'=>array(0=>$clang->gT('No'),
    3507. 

  3507.     1=>$clang->gT('Yes')),
    3508. 

  3508.     'default'=>0,
    3509. 

  3509.     'help'=>$clang->gT('Hide this question at any time. This is useful for including data using answer prefilling.'),
    3510. 

  3510.     'caption'=>$clang->gT('Always hide this question'));
    3511. 

  3511. 

  3512.     $qattributes["max_answers"]=array(
    3513. 

  3513.     "types"=>"MPR1:;ABCEFKQ",
    3514. 

  3514.     'category'=>$clang->gT('Logic'),
    3515. 

  3515.     'sortorder'=>11,
    3516. 

  3516.     'inputtype'=>'integer',
    3517. 

  3517.     "help"=>$clang->gT('Limit the number of possible answers'),
    3518. 

  3518.     "caption"=>$clang->gT('Maximum answers'));
    3519. 

  3519. 

  3520.     $qattributes["max_num_value"]=array(
    3521. 

  3521.     "types"=>"K",
    3522. 

  3522.     'category'=>$clang->gT('Input'),
    3523. 

  3523.     'sortorder'=>100,
    3524. 

  3524.     'inputtype'=>'text',
    3525. 

  3525.     "help"=>$clang->gT('Maximum sum value of multiple numeric input'),
    3526. 

  3526.     "caption"=>$clang->gT('Maximum sum value'));
    3527. 

  3527. 

  3528.     $qattributes["max_num_value_n"]=array(
    3529. 

  3529.     "types"=>"NK",
    3530. 

  3530.     'category'=>$clang->gT('Input'),
    3531. 

  3531.     'sortorder'=>110,
    3532. 

  3532.     'inputtype'=>'integer',
    3533. 

  3533.     "help"=>$clang->gT('Maximum value of the numeric input'),
    3534. 

  3534.     "caption"=>$clang->gT('Maximum value'));
    3535. 

  3535. 

  3536.     //    $qattributes["max_num_value_sgqa"]=array(
    3537. 

  3537.     //    "types"=>"K",
    3538. 

  3538.     //    'category'=>$clang->gT('Logic'),
    3539. 

  3539.     //    'sortorder'=>100,
    3540. 

  3540.     //    'inputtype'=>'text',
    3541. 

  3541.     //    "help"=>$clang->gT('Enter the SGQA identifier to use the total of a previous question as the maximum for this question'),
    3542. 

  3542.     //    "caption"=>$clang->gT('Max value from SGQA'));
    3543. 

  3543. 

  3544.     $qattributes["maximum_chars"]=array(
    3545. 

  3545.     "types"=>"STUNQK:;",
    3546. 

  3546.     'category'=>$clang->gT('Input'),
    3547. 

  3547.     'sortorder'=>100,
    3548. 

  3548.     'inputtype'=>'text',
    3549. 

  3549.     "help"=>$clang->gT('Maximum characters allowed'),
    3550. 

  3550.     "caption"=>$clang->gT('Maximum characters'));
    3551. 

  3551. 

  3552.     $qattributes["min_answers"]=array(
    3553. 

  3553.     "types"=>"MPR1:;ABCEFKQ",
    3554. 

  3554.     'category'=>$clang->gT('Logic'),
    3555. 

  3555.     'sortorder'=>10,
    3556. 

  3556.     'inputtype'=>'integer',
    3557. 

  3557.     "help"=>$clang->gT('Ensure a minimum number of possible answers (0=No limit)'),
    3558. 

  3558.     "caption"=>$clang->gT('Minimum answers'));
    3559. 

  3559. 

  3560.     $qattributes["min_num_value"]=array(
    3561. 

  3561.     "types"=>"K",
    3562. 

  3562.     'category'=>$clang->gT('Input'),
    3563. 

  3563.     'sortorder'=>100,
    3564. 

  3564.     'inputtype'=>'text',
    3565. 

  3565.     "help"=>$clang->gT('The sum of the multiple numeric inputs must be greater than this value'),
    3566. 

  3566.     "caption"=>$clang->gT('Minimum sum value'));
    3567. 

  3567. 

  3568.     $qattributes["min_num_value_n"]=array(
    3569. 

  3569.     "types"=>"NK",
    3570. 

  3570.     'category'=>$clang->gT('Input'),
    3571. 

  3571.     'sortorder'=>100,
    3572. 

  3572.     'inputtype'=>'integer',
    3573. 

  3573.     "help"=>$clang->gT('Minimum value of the numeric input'),
    3574. 

  3574.     "caption"=>$clang->gT('Minimum value'));
    3575. 

  3575. 

  3576.     //    $qattributes["min_num_value_sgqa"]=array(
    3577. 

  3577.     //    "types"=>"K",
    3578. 

  3578.     //    'category'=>$clang->gT('Logic'),
    3579. 

  3579.     //    'sortorder'=>100,
    3580. 

  3580.     //    'inputtype'=>'text',
    3581. 

  3581.     //    "help"=>$clang->gT('Enter the SGQA identifier to use the total of a previous question as the minimum for this question'),
    3582. 

  3582.     //    "caption"=>$clang->gT('Minimum value from SGQA'));
    3583. 

  3583. 

  3584.     $qattributes["multiflexible_max"]=array(
    3585. 

  3585.     "types"=>":",
    3586. 

  3586.     'category'=>$clang->gT('Display'),
    3587. 

  3587.     'sortorder'=>112,
    3588. 

  3588.     'inputtype'=>'text',
    3589. 

  3589.     "help"=>$clang->gT('Maximum value for array(mult-flexible) question type'),
    3590. 

  3590.     "caption"=>$clang->gT('Maximum value'));
    3591. 

  3591. 

  3592.     $qattributes["multiflexible_min"]=array(
    3593. 

  3593.     "types"=>":",
    3594. 

  3594.     'category'=>$clang->gT('Display'),
    3595. 

  3595.     'sortorder'=>110,
    3596. 

  3596.     'inputtype'=>'text',
    3597. 

  3597.     "help"=>$clang->gT('Minimum value for array(multi-flexible) question type'),
    3598. 

  3598.     "caption"=>$clang->gT('Minimum value'));
    3599. 

  3599. 

  3600.     $qattributes["multiflexible_step"]=array(
    3601. 

  3601.     "types"=>":",
    3602. 

  3602.     'category'=>$clang->gT('Display'),
    3603. 

  3603.     'sortorder'=>111,
    3604. 

  3604.     'inputtype'=>'text',
    3605. 

  3605.     "help"=>$clang->gT('Step value'),
    3606. 

  3606.     "caption"=>$clang->gT('Step value'));
    3607. 

  3607. 

  3608.     $qattributes["multiflexible_checkbox"]=array(
    3609. 

  3609.     "types"=>":",
    3610. 

  3610.     'category'=>$clang->gT('Display'),
    3611. 

  3611.     'sortorder'=>100,
    3612. 

  3612.     'inputtype'=>'singleselect',
    3613. 

  3613.     'options'=>array(0=>$clang->gT('No'),
    3614. 

  3614.     1=>$clang->gT('Yes')),
    3615. 

  3615.     'default'=>0,
    3616. 

  3616.     "help"=>$clang->gT('Use checkbox layout'),
    3617. 

  3617.     "caption"=>$clang->gT('Checkbox layout'));
    3618. 

  3618. 

  3619.     $qattributes["reverse"]=array(
    3620. 

  3620.     "types"=>"D:",
    3621. 

  3621.     'category'=>$clang->gT('Display'),
    3622. 

  3622.     'sortorder'=>100,
    3623. 

  3623.     'inputtype'=>'singleselect',
    3624. 

  3624.     'options'=>array(0=>$clang->gT('No'),
    3625. 

  3625.     1=>$clang->gT('Yes')),
    3626. 

  3626.     'default'=>0,
    3627. 

  3627.     "help"=>$clang->gT('Present answer options in reverse order'),
    3628. 

  3628.     "caption"=>$clang->gT('Reverse answer order'));
    3629. 

  3629. 

  3630.     //    $qattributes["num_value_equals_sgqa"]=array(
    3631. 

  3631.     //    "types"=>"K",
    3632. 

  3632.     //    'category'=>$clang->gT('Logic'),
    3633. 

  3633.     //    'sortorder'=>100,
    3634. 

  3634.     //    'inputtype'=>'text',
    3635. 

  3635.     //    "help"=>$clang->gT('SGQA identifier to use total of previous question as total for this question'),
    3636. 

  3636.     //    "caption"=>$clang->gT('Value equals SGQA'));
    3637. 

  3637. 

  3638.     $qattributes["num_value_int_only"]=array(
    3639. 

  3639.     "types"=>"N",
    3640. 

  3640.     'category'=>$clang->gT('Input'),
    3641. 

  3641.     'sortorder'=>100,
    3642. 

  3642.     'inputtype'=>'singleselect',
    3643. 

  3643.     'options'=>array(
    3644. 

  3644.     0=>$clang->gT('No'),
    3645. 

  3645.     1=>$clang->gT('Yes')),
    3646. 

  3646.     'default'=>0,
    3647. 

  3647.     "help"=>$clang->gT('Restrict input to integer values'),
    3648. 

  3648.     "caption"=>$clang->gT('Integer only'));
    3649. 

  3649. 

  3650.     $qattributes["numbers_only"]=array(
    3651. 

  3651.     "types"=>"Q;S*",
    3652. 

  3652.     'category'=>$clang->gT('Other'),
    3653. 

  3653.     'sortorder'=>150,
    3654. 

  3654.     'inputtype'=>'singleselect',
    3655. 

  3655.     'options'=>array(
    3656. 

  3656.     0=>$clang->gT('No'),
    3657. 

  3657.     1=>$clang->gT('Yes')
    3658. 

  3658.     ),
    3659. 

  3659.     'default'=>0,
    3660. 

  3660.     "help"=>$clang->gT('Allow only numerical input'),
    3661. 

  3661.     "caption"=>$clang->gT('Numbers only')
    3662. 

  3662.     );
    3663. 

  3663. 

  3664.     $qattributes['show_totals'] =	array(
    3665. 

  3665.     'types' =>	';',
    3666. 

  3666.     'category' =>	$clang->gT('Other'),
    3667. 

  3667.     'sortorder' =>	151,
    3668. 

  3668.     'inputtype'	=> 'singleselect',
    3669. 

  3669.     'options' =>	array(
    3670. 

  3670.     'X' =>	$clang->gT('Off'),
    3671. 

  3671.     'R' =>	$clang->gT('Rows'),
    3672. 

  3672.     'C' =>	$clang->gT('Columns'),
    3673. 

  3673.     'B' =>	$clang->gT('Both rows and columns')
    3674. 

  3674.     ),
    3675. 

  3675.     'default' =>	'X',
    3676. 

  3676.     'help' =>	$clang->gT('Show totals for either rows, columns or both rows and columns'),
    3677. 

  3677.     'caption' =>	$clang->gT('Show totals for')
    3678. 

  3678.     );
    3679. 

  3679. 

  3680.     $qattributes['show_grand_total'] =	array(
    3681. 

  3681.     'types' =>	';',
    3682. 

  3682.     'category' =>	$clang->gT('Other'),
    3683. 

  3683.     'sortorder' =>	152,
    3684. 

  3684.     'inputtype' =>	'singleselect',
    3685. 

  3685.     'options' =>	array(
    3686. 

  3686.     0 =>	$clang->gT('No'),
    3687. 

  3687.     1 =>	$clang->gT('Yes')
    3688. 

  3688.     ),
    3689. 

  3689.     'default' =>	0,
    3690. 

  3690.     'help' =>	$clang->gT('Show grand total for either columns or rows'),
    3691. 

  3691.     'caption' =>	$clang->gT('Show grand total')
    3692. 

  3692.     );
    3693. 

  3693. 

  3694.     $qattributes["input_boxes"]=array(
    3695. 

  3695.     "types"=>":",
    3696. 

  3696.     'category'=>$clang->gT('Display'),
    3697. 

  3697.     'sortorder'=>100,
    3698. 

  3698.     'inputtype'=>'singleselect',
    3699. 

  3699.     'options'=>array(0=>$clang->gT('No'),
    3700. 

  3700.     1=>$clang->gT('Yes')),
    3701. 

  3701.     'default'=>0,
    3702. 

  3702.     "help"=>$clang->gT("Present as text input boxes instead of dropdown lists"),
    3703. 

  3703.     "caption"=>$clang->gT("Text inputs"));
    3704. 

  3704. 

  3705.     $qattributes["other_comment_mandatory"]=array(
    3706. 

  3706.     "types"=>"PLW!Z",
    3707. 

  3707.     'category'=>$clang->gT('Logic'),
    3708. 

  3708.     'sortorder'=>100,
    3709. 

  3709.     'inputtype'=>'singleselect',
    3710. 

  3710.     'options'=>array(0=>$clang->gT('No'),
    3711. 

  3711.     1=>$clang->gT('Yes')),
    3712. 

  3712.     'default'=>0,
    3713. 

  3713.     "help"=>$clang->gT("Make the 'Other:' comment field mandatory when the 'Other:' option is active"),
    3714. 

  3714.     "caption"=>$clang->gT("'Other:' comment mandatory"));
    3715. 

  3715. 

  3716.     $qattributes["other_numbers_only"]=array(
    3717. 

  3717.     "types"=>"LMP",
    3718. 

  3718.     'category'=>$clang->gT('Logic'),
    3719. 

  3719.     'sortorder'=>100,
    3720. 

  3720.     'inputtype'=>'singleselect',
    3721. 

  3721.     'options'=>array(0=>$clang->gT('No'),
    3722. 

  3722.     1=>$clang->gT('Yes')),
    3723. 

  3723.     'default'=>0,
    3724. 

  3724.     "help"=>$clang->gT("Allow only numerical input for 'Other' text"),
    3725. 

  3725.     "caption"=>$clang->gT("Numbers only for 'Other'"));
    3726. 

  3726. 

  3727.     $qattributes["other_replace_text"]=array(
    3728. 

  3728.     "types"=>"LMPWZ!",
    3729. 

  3729.     'category'=>$clang->gT('Display'),
    3730. 

  3730.     'sortorder'=>100,
    3731. 

  3731.     'inputtype'=>'text',
    3732. 

  3732.     'i18n'=>true,
    3733. 

  3733.     "help"=>$clang->gT("Replaces the label of the 'Other:' answer option with a custom text"),
    3734. 

  3734.     "caption"=>$clang->gT("Label for 'Other:' option"));
    3735. 

  3735. 

  3736.     $qattributes["page_break"]=array(
    3737. 

  3737.     "types"=>"15ABCDEFGHKLMNOPQRSTUWXYZ!:;|*",
    3738. 

  3738.     'category'=>$clang->gT('Other'),
    3739. 

  3739.     'sortorder'=>100,
    3740. 

  3740.     'inputtype'=>'singleselect',
    3741. 

  3741.     'options'=>array(0=>$clang->gT('No'),
    3742. 

  3742.     1=>$clang->gT('Yes')),
    3743. 

  3743.     'default'=>0,
    3744. 

  3744.     "help"=>$clang->gT('Insert a page break before this question in printable view by setting this to Yes.'),
    3745. 

  3745.     "caption"=>$clang->gT('Insert page break in printable view'));
    3746. 

  3746. 

  3747.     $qattributes["prefix"]=array(
    3748. 

  3748.     "types"=>"KNQS",
    3749. 

  3749.     'category'=>$clang->gT('Display'),
    3750. 

  3750.     'sortorder'=>10,
    3751. 

  3751.     'inputtype'=>'text',
    3752. 

  3752.     'i18n'=>true,
    3753. 

  3753.     "help"=>$clang->gT('Add a prefix to the answer field'),
    3754. 

  3754.     "caption"=>$clang->gT('Answer prefix'));
    3755. 

  3755. 

  3756.     $qattributes["printable_help"]=array(
    3757. 

  3757.     "types"=>"15ABCEFGHKLMNOPRWYZ!:*",
    3758. 

  3758.     'category'=>$clang->gT('Display'),
    3759. 

  3759.     'sortorder'=>201,
    3760. 

  3760.     "inputtype"=>"text",
    3761. 

  3761.     'i18n'=>true,
    3762. 

  3762.     'default'=>"",
    3763. 

  3763.     "help"=>$clang->gT('In the printable version replace the relevance equation with this explanation text.'),
    3764. 

  3764.     "caption"=>$clang->gT("Relevance help for printable survey"));    
    3765. 

  3765.     
    3766. 

  3766.     $qattributes["public_statistics"]=array(
    3767. 

  3767.     "types"=>"15ABCEFGHKLMNOPRWYZ!:*",
    3768. 

  3768.     'category'=>$clang->gT('Statistics'),
    3769. 

  3769.     'sortorder'=>80,
    3770. 

  3770.     'inputtype'=>'singleselect',
    3771. 

  3771.     'options'=>array(0=>$clang->gT('No'),
    3772. 

  3772.     1=>$clang->gT('Yes')),
    3773. 

  3773.     'default'=>0,
    3774. 

  3774.     "help"=>$clang->gT('Show statistics of this question in the public statistics page'),
    3775. 

  3775.     "caption"=>$clang->gT('Show in public statistics'));
    3776. 

  3776. 

  3777.     $qattributes["random_order"]=array(
    3778. 

  3778.     "types"=>"!ABCEFHKLMOPQRWZ1:;",
    3779. 

  3779.     'category'=>$clang->gT('Display'),
    3780. 

  3780.     'sortorder'=>100,
    3781. 

  3781.     'inputtype'=>'singleselect',
    3782. 

  3782.     'options'=>array(0=>$clang->gT('Off'),
    3783. 

  3783.     1=>$clang->gT('Randomize on each page load')
    3784. 

  3784.     //,2=>$clang->gT('Randomize once on survey start')  //Mdekker: commented out as code to handle this was removed in refactoring
    3785. 

  3785.     ),
    3786. 

  3786.     'default'=>0,
    3787. 

  3787.     "help"=>$clang->gT('Present answers in random order'),
    3788. 

  3788.     "caption"=>$clang->gT('Random answer order'));
    3789. 

  3789. 

  3790.     /*
    3791. 

  3791.     $qattributes['relevance']=array(
    3792. 

  3792.     'types'=>'15ABCDEFGHIKLMNOPQRSTUWXYZ!:;|*',
    3793. 

  3793.     'category'=>$clang->gT('Display'),
    3794. 

  3794.     'sortorder'=>1,
    3795. 

  3795.     'inputtype'=>'text',
    3796. 

  3796.     'default'=>'1',
    3797. 

  3797.     'help'=>$clang->gT('The relevance equation determines whether a question should be shown (if true) or hiddden and marked as Not Applicable (if false).'
    3798. 

  3798.     . '  The relevance equation can be as complex as you like, using any combination of mathematical operators, nested parentheses,'
    3799. 

  3799.     . ' any variable or token that has already been set, and any of more than 50 functions.  It is parsed by the ExpressionManager.'),
    3800. 

  3800.     'caption'=>$clang->gT('Relevance equation'));
    3801. 

  3801.     */
    3802. 

  3802. 

  3803.     $qattributes["showpopups"]=array(
    3804. 

  3804.     "types"=>"R",
    3805. 

  3805.     'category'=>$clang->gT('Display'),
    3806. 

  3806.     'sortorder'=>110,
    3807. 

  3807.     'inputtype'=>'singleselect',
    3808. 

  3808.     'options'=>array(0=>$clang->gT('No'),
    3809. 

  3809.     1=>$clang->gT('Yes')),
    3810. 

  3810.     'default'=>1,
    3811. 

  3811.     "caption"=>$clang->gT('Show javascript alert'),
    3812. 

  3812.     "help"=>$clang->gT('Show an alert if answers exceeds the number of max answers'));
    3813. 

  3813.     $qattributes["samechoiceheight"]=array(
    3814. 

  3814.     "types"=>"R",
    3815. 

  3815.     'category'=>$clang->gT('Display'),
    3816. 

  3816.     'sortorder'=>120,
    3817. 

  3817.     'inputtype'=>'singleselect',
    3818. 

  3818.     'options'=>array(0=>$clang->gT('No'),
    3819. 

  3819.     1=>$clang->gT('Yes')),
    3820. 

  3820.     'default'=>1,
    3821. 

  3821.     "caption"=>$clang->gT('Same height for all choice'),
    3822. 

  3822.     "help"=>$clang->gT('Force each choice to have the same height'));
    3823. 

  3823.     $qattributes["samelistheight"]=array(
    3824. 

  3824.     "types"=>"R",
    3825. 

  3825.     'category'=>$clang->gT('Display'),
    3826. 

  3826.     'sortorder'=>121,
    3827. 

  3827.     'inputtype'=>'singleselect',
    3828. 

  3828.     'options'=>array(0=>$clang->gT('No'),
    3829. 

  3829.     1=>$clang->gT('Yes')),
    3830. 

  3830.     'default'=>1,
    3831. 

  3831.     "caption"=>$clang->gT('Same height for lists'),
    3832. 

  3832.     "help"=>$clang->gT('Force the choice list and the rank list to have the same height'));
    3833. 

  3833. 

  3834.     $qattributes["parent_order"]=array(
    3835. 

  3835.     "types"=>":",
    3836. 

  3836.     'category'=>$clang->gT('Display'),
    3837. 

  3837.     'sortorder'=>100,
    3838. 

  3838.     'inputtype'=>'text',
    3839. 

  3839.     "caption"=>$clang->gT('Get order from previous question'),
    3840. 

  3840.     "help"=>$clang->gT('Enter question ID to get subquestion order from a previous question'));
    3841. 

  3841. 

  3842.     $qattributes["slider_layout"]=array(
    3843. 

  3843.     "types"=>"K",
    3844. 

  3844.     'category'=>$clang->gT('Slider'),
    3845. 

  3845.     'sortorder'=>1,
    3846. 

  3846.     'inputtype'=>'singleselect',
    3847. 

  3847.     'options'=>array(0=>$clang->gT('No'),
    3848. 

  3848.     1=>$clang->gT('Yes')),
    3849. 

  3849.     'default'=>0,
    3850. 

  3850.     "help"=>$clang->gT('Use slider layout'),
    3851. 

  3851.     "caption"=>$clang->gT('Use slider layout'));
    3852. 

  3852. 

  3853.     $qattributes["slider_min"]=array(
    3854. 

  3854.     "types"=>"K",
    3855. 

  3855.     'category'=>$clang->gT('Slider'),
    3856. 

  3856.     'sortorder'=>100,
    3857. 

  3857.     'inputtype'=>'text',
    3858. 

  3858.     "help"=>$clang->gT('Slider minimum value'),
    3859. 

  3859.     "caption"=>$clang->gT('Slider minimum value'));
    3860. 

  3860. 

  3861.     $qattributes["slider_max"]=array(
    3862. 

  3862.     "types"=>"K",
    3863. 

  3863.     'category'=>$clang->gT('Slider'),
    3864. 

  3864.     'sortorder'=>100,
    3865. 

  3865.     'inputtype'=>'text',
    3866. 

  3866.     "help"=>$clang->gT('Slider maximum value'),
    3867. 

  3867.     "caption"=>$clang->gT('Slider maximum value'));
    3868. 

  3868. 

  3869.     $qattributes["slider_accuracy"]=array(
    3870. 

  3870.     "types"=>"K",
    3871. 

  3871.     'category'=>$clang->gT('Slider'),
    3872. 

  3872.     'sortorder'=>100,
    3873. 

  3873.     'inputtype'=>'text',
    3874. 

  3874.     "help"=>$clang->gT('Slider accuracy'),
    3875. 

  3875.     "caption"=>$clang->gT('Slider accuracy'));
    3876. 

  3876. 

  3877.     $qattributes["slider_default"]=array(
    3878. 

  3878.     "types"=>"K",
    3879. 

  3879.     'category'=>$clang->gT('Slider'),
    3880. 

  3880.     'sortorder'=>100,
    3881. 

  3881.     'inputtype'=>'text',
    3882. 

  3882.     "help"=>$clang->gT('Slider initial value'),
    3883. 

  3883.     "caption"=>$clang->gT('Slider initial value'));
    3884. 

  3884. 

  3885.     $qattributes["slider_middlestart"]=array(
    3886. 

  3886.     "types"=>"K",
    3887. 

  3887.     'category'=>$clang->gT('Slider'),
    3888. 

  3888.     'sortorder'=>10,
    3889. 

  3889.     'inputtype'=>'singleselect',
    3890. 

  3890.     'options'=>array(0=>$clang->gT('No'),
    3891. 

  3891.     1=>$clang->gT('Yes')),
    3892. 

  3892.     'default'=>0,
    3893. 

  3893.     "help"=>$clang->gT('The handle is displayed at the middle of the slider (this will not set the initial value)'),
    3894. 

  3894.     "caption"=>$clang->gT('Slider starts at the middle position'));
    3895. 

  3895. 

  3896.     $qattributes["slider_rating"]=array(
    3897. 

  3897.     "types"=>"5",
    3898. 

  3898.     'category'=>$clang->gT('Display'),
    3899. 

  3899.     'sortorder'=>90,
    3900. 

  3900.     'inputtype'=>'singleselect',
    3901. 

  3901.     'options'=>array(
    3902. 

  3902.     0=>$clang->gT('No'),
    3903. 

  3903.     1=>$clang->gT('Yes - stars'),
    3904. 

  3904.     2=>$clang->gT('Yes - slider with emoticon'),
    3905. 

  3905.     ),
    3906. 

  3906.     'default'=>0,
    3907. 

  3907.     "help"=>$clang->gT('Use slider layout'),
    3908. 

  3908.     "caption"=>$clang->gT('Use slider layout'));
    3909. 

  3909. 

  3910. 

  3911.     $qattributes["slider_showminmax"]=array(
    3912. 

  3912.     "types"=>"K",
    3913. 

  3913.     'category'=>$clang->gT('Slider'),
    3914. 

  3914.     'sortorder'=>100,
    3915. 

  3915.     'inputtype'=>'singleselect',
    3916. 

  3916.     'options'=>array(0=>$clang->gT('No'),
    3917. 

  3917.     1=>$clang->gT('Yes')),
    3918. 

  3918.     'default'=>0,
    3919. 

  3919.     "help"=>$clang->gT('Display min and max value under the slider'),
    3920. 

  3920.     "caption"=>$clang->gT('Display slider min and max value'));
    3921. 

  3921. 

  3922.     $qattributes["slider_separator"]=array(
    3923. 

  3923.     "types"=>"K",
    3924. 

  3924.     'category'=>$clang->gT('Slider'),
    3925. 

  3925.     'sortorder'=>100,
    3926. 

  3926.     'inputtype'=>'text',
    3927. 

  3927.     "help"=>$clang->gT('Answer|Left-slider-text|Right-slider-text separator character'),
    3928. 

  3928.     "caption"=>$clang->gT('Slider left/right text separator'));
    3929. 

  3929. 

  3930.     $qattributes["suffix"]=array(
    3931. 

  3931.     "types"=>"KNQS",
    3932. 

  3932.     'category'=>$clang->gT('Display'),
    3933. 

  3933.     'sortorder'=>11,
    3934. 

  3934.     'inputtype'=>'text',
    3935. 

  3935.     'i18n'=>true,
    3936. 

  3936.     "help"=>$clang->gT('Add a suffix to the answer field'),
    3937. 

  3937.     "caption"=>$clang->gT('Answer suffix'));
    3938. 

  3938. 

  3939.     $qattributes["text_input_width"]=array(
    3940. 

  3940.     "types"=>"KNSTUQ;",
    3941. 

  3941.     'category'=>$clang->gT('Display'),
    3942. 

  3942.     'sortorder'=>100,
    3943. 

  3943.     'inputtype'=>'text',
    3944. 

  3944.     "help"=>$clang->gT('Width of text input box'),
    3945. 

  3945.     "caption"=>$clang->gT('Input box width'));
    3946. 

  3946. 

  3947.     $qattributes["use_dropdown"]=array(
    3948. 

  3948.     "types"=>"1FO",
    3949. 

  3949.     'category'=>$clang->gT('Display'),
    3950. 

  3950.     'sortorder'=>112,
    3951. 

  3951.     'inputtype'=>'singleselect',
    3952. 

  3952.     'options'=>array(0=>$clang->gT('No'),
    3953. 

  3953.     1=>$clang->gT('Yes')),
    3954. 

  3954.     'default'=>0,
    3955. 

  3955.     "help"=>$clang->gT('Present dropdown control(s) instead of list of radio buttons'),
    3956. 

  3956.     "caption"=>$clang->gT('Use dropdown presentation'));
    3957. 

  3957. 

  3958. 

  3959.     $qattributes["dropdown_size"]=array(
    3960. 

  3960.     "types"=>"!",   // TODO add these later?  "1F",
    3961. 

  3961.     'category'=>$clang->gT('Display'),
    3962. 

  3962.     'sortorder'=>200,
    3963. 

  3963.     'inputtype'=>'text',
    3964. 

  3964.     'default'=>0,
    3965. 

  3965.     "help"=>$clang->gT('For list dropdown boxes, show up to this many rows'),
    3966. 

  3966.     "caption"=>$clang->gT('Height of dropdown'));
    3967. 

  3967. 

  3968.     $qattributes["dropdown_prefix"]=array(
    3969. 

  3969.     "types"=>"!",   // TODO add these later?  "1F",
    3970. 

  3970.     'category'=>$clang->gT('Display'),
    3971. 

  3971.     'sortorder'=>201,
    3972. 

  3972.     'inputtype'=>'singleselect',
    3973. 

  3973.     'options'=>array(0=>$clang->gT('None'),
    3974. 

  3974.     1=>$clang->gT('Order - like 3)'),
    3975. 

  3975.     ),
    3976. 

  3976.     'default'=>0,
    3977. 

  3977.     "help"=>$clang->gT('Accelerator keys for list items'),
    3978. 

  3978.     "caption"=>$clang->gT('Prefix for list items'));
    3979. 

  3979. 

  3980.     $qattributes["scale_export"]=array(
    3981. 

  3981.     "types"=>"CEFGHLMOPWYZ1!:*",
    3982. 

  3982.     'category'=>$clang->gT('Other'),
    3983. 

  3983.     'sortorder'=>100,
    3984. 

  3984.     'inputtype'=>'singleselect',
    3985. 

  3985.     'options'=>array(0=>$clang->gT('Default'),
    3986. 

  3986.     1=>$clang->gT('Nominal'),
    3987. 

  3987.     2=>$clang->gT('Ordinal'),
    3988. 

  3988.     3=>$clang->gT('Scale')),
    3989. 

  3989.     'default'=>0,
    3990. 

  3990.     "help"=>$clang->gT("Set a specific SPSS export scale type for this question"),
    3991. 

  3991.     "caption"=>$clang->gT('SPSS export scale type'));
    3992. 

  3992. 

  3993.     $qattributes["choice_title"]=array(
    3994. 

  3994.     "types"=>"R",
    3995. 

  3995.     'category'=>$clang->gT('Other'),
    3996. 

  3996.     'sortorder'=>200,
    3997. 

  3997.     "inputtype"=>"text",
    3998. 

  3998.     'i18n'=>true,
    3999. 

  3999.     'default'=>"",
    4000. 

  4000.     "help"=>sprintf($clang->gT("Replace choice header (default: \"%s\")",'js'),$clang->gT("Your Choices")),
    4001. 

  4001.     "caption"=>$clang->gT("Choice header"));
    4002. 

  4002. 

  4003.     $qattributes["rank_title"]=array(
    4004. 

  4004.     "types"=>"R",
    4005. 

  4005.     'category'=>$clang->gT('Other'),
    4006. 

  4006.     'sortorder'=>201,
    4007. 

  4007.     "inputtype"=>"text",
    4008. 

  4008.     'i18n'=>true,
    4009. 

  4009.     'default'=>"",
    4010. 

  4010.     "help"=>sprintf($clang->gT("Replace rank header (default: \"%s\")",'js'),$clang->gT("Your Ranking")),
    4011. 

  4011.     "caption"=>$clang->gT("Rank header"));
    4012. 

  4012. 

  4013.     //Timer attributes
    4014. 

  4014.     $qattributes["time_limit"]=array(
    4015. 

  4015.     "types"=>"STUXL!",
    4016. 

  4016.     'category'=>$clang->gT('Timer'),
    4017. 

  4017.     'sortorder'=>90,
    4018. 

  4018.     "inputtype"=>"integer",
    4019. 

  4019.     "help"=>$clang->gT("Limit time to answer question (in seconds)"),
    4020. 

  4020.     "caption"=>$clang->gT("Time limit"));
    4021. 

  4021. 

  4022.     $qattributes["time_limit_action"]=array(
    4023. 

  4023.     "types"=>"STUXL!",
    4024. 

  4024.     'category'=>$clang->gT('Timer'),
    4025. 

  4025.     'sortorder'=>92,
    4026. 

  4026.     'inputtype'=>'singleselect',
    4027. 

  4027.     'options'=>array(1=>$clang->gT('Warn and move on'),
    4028. 

  4028.     2=>$clang->gT('Move on without warning'),
    4029. 

  4029.     3=>$clang->gT('Disable only')),
    4030. 

  4030.     "default" => 1,
    4031. 

  4031.     "help"=>$clang->gT("Action to perform when time limit is up"),
    4032. 

  4032.     "caption"=>$clang->gT("Time limit action"));
    4033. 

  4033. 

  4034.     $qattributes["time_limit_disable_next"]=array(
    4035. 

  4035.     "types"=>"STUXL!",
    4036. 

  4036.     'category'=>$clang->gT('Timer'),
    4037. 

  4037.     'sortorder'=>94,
    4038. 

  4038.     "inputtype"=>"singleselect",
    4039. 

  4039.     'default'=>0,
    4040. 

  4040.     'options'=>array(0=>$clang->gT('No'),
    4041. 

  4041.     1=>$clang->gT('Yes')),
    4042. 

  4042.     "help"=>$clang->gT("Disable the next button until time limit expires"),
    4043. 

  4043.     "caption"=>$clang->gT("Time limit disable next"));
    4044. 

  4044. 

  4045.     $qattributes["time_limit_disable_prev"]=array(
    4046. 

  4046.     "types"=>"STUXL!",
    4047. 

  4047.     'category'=>$clang->gT('Timer'),
    4048. 

  4048.     'sortorder'=>96,
    4049. 

  4049.     "inputtype"=>"singleselect",
    4050. 

  4050.     'options'=>array(0=>$clang->gT('No'),
    4051. 

  4051.     1=>$clang->gT('Yes')),
    4052. 

  4052.     'default'=>0,
    4053. 

  4053.     "help"=>$clang->gT("Disable the prev button until the time limit expires"),
    4054. 

  4054.     "caption"=>$clang->gT("Time limit disable prev"));
    4055. 

  4055. 

  4056.     $qattributes["time_limit_countdown_message"]=array(
    4057. 

  4057.     "types"=>"STUXL!",
    4058. 

  4058.     'category'=>$clang->gT('Timer'),
    4059. 

  4059.     'sortorder'=>98,
    4060. 

  4060.     "inputtype"=>"textarea",
    4061. 

  4061.     'i18n'=>true,
    4062. 

  4062.     "help"=>$clang->gT("The text message that displays in the countdown timer during the countdown"),
    4063. 

  4063.     "caption"=>$clang->gT("Time limit countdown message"));
    4064. 

  4064. 

  4065.     $qattributes["time_limit_timer_style"]=array(
    4066. 

  4066.     "types"=>"STUXL!",
    4067. 

  4067.     'category'=>$clang->gT('Timer'),
    4068. 

  4068.     'sortorder'=>100,
    4069. 

  4069.     "inputtype"=>"textarea",
    4070. 

  4070.     "help"=>$clang->gT("CSS Style for the message that displays in the countdown timer during the countdown"),
    4071. 

  4071.     "caption"=>$clang->gT("Time limit timer CSS style"));
    4072. 

  4072. 

  4073.     $qattributes["time_limit_message_delay"]=array(
    4074. 

  4074.     "types"=>"STUXL!",
    4075. 

  4075.     'category'=>$clang->gT('Timer'),
    4076. 

  4076.     'sortorder'=>102,
    4077. 

  4077.     "inputtype"=>"integer",
    4078. 

  4078.     "help"=>$clang->gT("Display the 'time limit expiry message' for this many seconds before performing the 'time limit action' (defaults to 1 second if left blank)"),
    4079. 

  4079.     "caption"=>$clang->gT("Time limit expiry message display time"));
    4080. 

  4080. 

  4081.     $qattributes["time_limit_message"]=array(
    4082. 

  4082.     "types"=>"STUXL!",
    4083. 

  4083.     'category'=>$clang->gT('Timer'),
    4084. 

  4084.     'sortorder'=>104,
    4085. 

  4085.     "inputtype"=>"textarea",
    4086. 

  4086.     'i18n'=>true,
    4087. 

  4087.     "help"=>$clang->gT("The message to display when the time limit has expired (a default message will display if this setting is left blank)"),
    4088. 

  4088.     "caption"=>$clang->gT("Time limit expiry message"));
    4089. 

  4089. 

  4090.     $qattributes["time_limit_message_style"]=array(
    4091. 

  4091.     "types"=>"STUXL!",
    4092. 

  4092.     'category'=>$clang->gT('Timer'),
    4093. 

  4093.     'sortorder'=>106,
    4094. 

  4094.     "inputtype"=>"textarea",
    4095. 

  4095.     "help"=>$clang->gT("CSS style for the 'time limit expiry message'"),
    4096. 

  4096.     "caption"=>$clang->gT("Time limit message CSS style"));
    4097. 

  4097. 

  4098.     $qattributes["time_limit_warning"]=array(
    4099. 

  4099.     "types"=>"STUXL!",
    4100. 

  4100.     'category'=>$clang->gT('Timer'),
    4101. 

  4101.     'sortorder'=>108,
    4102. 

  4102.     "inputtype"=>"integer",
    4103. 

  4103.     "help"=>$clang->gT("Display a 'time limit warning' when there are this many seconds remaining in the countdown (warning will not display if left blank)"),
    4104. 

  4104.     "caption"=>$clang->gT("1st time limit warning message timer"));
    4105. 

  4105. 

  4106.     $qattributes["time_limit_warning_display_time"]=array(
    4107. 

  4107.     "types"=>"STUXL!",
    4108. 

  4108.     'category'=>$clang->gT('Timer'),
    4109. 

  4109.     'sortorder'=>110,
    4110. 

  4110.     "inputtype"=>"integer",
    4111. 

  4111.     "help"=>$clang->gT("The 'time limit warning' will stay visible for this many seconds (will not turn off if this setting is left blank)"),
    4112. 

  4112.     "caption"=>$clang->gT("1st time limit warning message display time"));
    4113. 

  4113. 

  4114.     $qattributes["time_limit_warning_message"]=array(
    4115. 

  4115.     "types"=>"STUXL!",
    4116. 

  4116.     'category'=>$clang->gT('Timer'),
    4117. 

  4117.     'sortorder'=>112,
    4118. 

  4118.     "inputtype"=>"textarea",
    4119. 

  4119.     'i18n'=>true,
    4120. 

  4120.     "help"=>$clang->gT("The message to display as a 'time limit warning' (a default warning will display if this is left blank)"),
    4121. 

  4121.     "caption"=>$clang->gT("1st time limit warning message"));
    4122. 

  4122. 

  4123.     $qattributes["time_limit_warning_style"]=array(
    4124. 

  4124.     "types"=>"STUXL!",
    4125. 

  4125.     'category'=>$clang->gT('Timer'),
    4126. 

  4126.     'sortorder'=>114,
    4127. 

  4127.     "inputtype"=>"textarea",
    4128. 

  4128.     "help"=>$clang->gT("CSS style used when the 'time limit warning' message is displayed"),
    4129. 

  4129.     "caption"=>$clang->gT("1st time limit warning CSS style"));
    4130. 

  4130. 

  4131.     $qattributes["time_limit_warning_2"]=array(
    4132. 

  4132.     "types"=>"STUXL!",
    4133. 

  4133.     'category'=>$clang->gT('Timer'),
    4134. 

  4134.     'sortorder'=>116,
    4135. 

  4135.     "inputtype"=>"integer",
    4136. 

  4136.     "help"=>$clang->gT("Display the 2nd 'time limit warning' when there are this many seconds remaining in the countdown (warning will not display if left blank)"),
    4137. 

  4137.     "caption"=>$clang->gT("2nd time limit warning message timer"));
    4138. 

  4138. 

  4139.     $qattributes["time_limit_warning_2_display_time"]=array(
    4140. 

  4140.     "types"=>"STUXL!",
    4141. 

  4141.     'category'=>$clang->gT('Timer'),
    4142. 

  4142.     'sortorder'=>118,
    4143. 

  4143.     "inputtype"=>"integer",
    4144. 

  4144.     "help"=>$clang->gT("The 2nd 'time limit warning' will stay visible for this many seconds (will not turn off if this setting is left blank)"),
    4145. 

  4145.     "caption"=>$clang->gT("2nd time limit warning message display time"));
    4146. 

  4146. 

  4147.     $qattributes["time_limit_warning_2_message"]=array(
    4148. 

  4148.     "types"=>"STUXL!",
    4149. 

  4149.     'category'=>$clang->gT('Timer'),
    4150. 

  4150.     'sortorder'=>120,
    4151. 

  4151.     "inputtype"=>"textarea",
    4152. 

  4152.     'i18n'=>true,
    4153. 

  4153.     "help"=>$clang->gT("The 2nd message to display as a 'time limit warning' (a default warning will display if this is left blank)"),
    4154. 

  4154.     "caption"=>$clang->gT("2nd time limit warning message"));
    4155. 

  4155. 

  4156.     $qattributes["time_limit_warning_2_style"]=array(
    4157. 

  4157.     "types"=>"STUXL!",
    4158. 

  4158.     'category'=>$clang->gT('Timer'),
    4159. 

  4159.     'sortorder'=>122,
    4160. 

  4160.     "inputtype"=>"textarea",
    4161. 

  4161.     "help"=>$clang->gT("CSS style used when the 2nd 'time limit warning' message is displayed"),
    4162. 

  4162.     "caption"=>$clang->gT("2nd time limit warning CSS style"));
    4163. 

  4163. 

  4164.     $qattributes["date_format"]=array(
    4165. 

  4165.     "types"=>"D",
    4166. 

  4166.     'category'=>$clang->gT('Input'),
    4167. 

  4167.     'sortorder'=>100,
    4168. 

  4168.     "inputtype"=>"text",
    4169. 

  4169.     "help"=>$clang->gT("Specify a custom date/time format (the <i>d/dd m/mm yy/yyyy H/HH M/MM</i> formats and \"-./: \" characters are allowed for day/month/year/hour/minutes without or with leading zero respectively. Defaults to survey's date format"),
    4170. 

  4170.     "caption"=>$clang->gT("Date/Time format"));
    4171. 

  4171. 

  4172.     $qattributes["dropdown_dates_minute_step"]=array(
    4173. 

  4173.     "types"=>"D",
    4174. 

  4174.     'category'=>$clang->gT('Input'),
    4175. 

  4175.     'sortorder'=>100,
    4176. 

  4176.     "inputtype"=>"integer",
    4177. 

  4177.     'default'=>1,
    4178. 

  4178.     "help"=>$clang->gT("Minute step interval when using select boxes"),
    4179. 

  4179.     "caption"=>$clang->gT("Minute step interval"));
    4180. 

  4180. 

  4181.     $qattributes["dropdown_dates_month_style"]=array(
    4182. 

  4182.     "types"=>"D",
    4183. 

  4183.     'category'=>$clang->gT('Display'),
    4184. 

  4184.     'sortorder'=>100,
    4185. 

  4185.     "inputtype"=>"singleselect",
    4186. 

  4186.     'options'=>array(0=>$clang->gT('Short names'),
    4187. 

  4187.     1=>$clang->gT('Full names'),
    4188. 

  4188.     2=>$clang->gT('Numbers')),
    4189. 

  4189.     'default'=>0,
    4190. 

  4190.     "help"=>$clang->gT("Change the display style of the month when using select boxes"),
    4191. 

  4191.     "caption"=>$clang->gT("Month display style"));
    4192. 

  4192. 

  4193.     $qattributes["show_title"]=array(
    4194. 

  4194.     "types"=>"|",
    4195. 

  4195.     'category'=>$clang->gT('File metadata'),
    4196. 

  4196.     'sortorder'=>124,
    4197. 

  4197.     "inputtype"=>"singleselect",
    4198. 

  4198.     'options'=>array(0=>$clang->gT('No'),
    4199. 

  4199.     1=>$clang->gT('Yes')),
    4200. 

  4200.     'default'=>1,
    4201. 

  4201.     "help"=>$clang->gT("Is the participant required to give a title to the uploaded file?"),
    4202. 

  4202.     "caption"=>$clang->gT("Show title"));
    4203. 

  4203. 

  4204.     $qattributes["show_comment"]=array(
    4205. 

  4205.     "types"=>"|",
    4206. 

  4206.     'category'=>$clang->gT('File metadata'),
    4207. 

  4207.     'sortorder'=>126,
    4208. 

  4208.     "inputtype"=>"singleselect",
    4209. 

  4209.     'options'=>array(0=>$clang->gT('No'),
    4210. 

  4210.     1=>$clang->gT('Yes')),
    4211. 

  4211.     'default'=>1,
    4212. 

  4212.     "help"=>$clang->gT("Is the participant required to give a comment to the uploaded file?"),
    4213. 

  4213.     "caption"=>$clang->gT("Show comment"));
    4214. 

  4214. 

  4215. 

  4216.     $qattributes["max_filesize"]=array(
    4217. 

  4217.     "types"=>"|",
    4218. 

  4218.     'category'=>$clang->gT('Other'),
    4219. 

  4219.     'sortorder'=>128,
    4220. 

  4220.     "inputtype"=>"integer",
    4221. 

  4221.     'default'=>10240,
    4222. 

  4222.     "help"=>$clang->gT("The participant cannot upload a single file larger than this size"),
    4223. 

  4223.     "caption"=>$clang->gT("Maximum file size allowed (in KB)"));
    4224. 

  4224. 

  4225.     $qattributes["max_num_of_files"]=array(
    4226. 

  4226.     "types"=>"|",
    4227. 

  4227.     'category'=>$clang->gT('Other'),
    4228. 

  4228.     'sortorder'=>130,
    4229. 

  4229.     "inputtype"=>"text",
    4230. 

  4230.     'default'=>'1',
    4231. 

  4231.     "help"=>$clang->gT("Maximum number of files that the participant can upload for this question"),
    4232. 

  4232.     "caption"=>$clang->gT("Max number of files"));
    4233. 

  4233. 

  4234.     $qattributes["min_num_of_files"]=array(
    4235. 

  4235.     "types"=>"|",
    4236. 

  4236.     'category'=>$clang->gT('Other'),
    4237. 

  4237.     'sortorder'=>132,
    4238. 

  4238.     "inputtype"=>"text",
    4239. 

  4239.     'default'=>'0',
    4240. 

  4240.     "help"=>$clang->gT("Minimum number of files that the participant must upload for this question"),
    4241. 

  4241.     "caption"=>$clang->gT("Min number of files"));
    4242. 

  4242. 

  4243.     $qattributes["allowed_filetypes"]=array(
    4244. 

  4244.     "types"=>"|",
    4245. 

  4245.     'category'=>$clang->gT('Other'),
    4246. 

  4246.     'sortorder'=>134,
    4247. 

  4247.     "inputtype"=>"text",
    4248. 

  4248.     'default'=>"png, gif, doc, odt",
    4249. 

  4249.     "help"=>$clang->gT("Allowed file types in comma separated format. e.g. pdf,doc,odt"),
    4250. 

  4250.     "caption"=>$clang->gT("Allowed file types"));
    4251. 

  4251. 

  4252.     $qattributes["random_group"]=array(
    4253. 

  4253.     "types"=>"15ABCDEFGHIKLMNOPQRSTUWXYZ!:;|",
    4254. 

  4254.     'category'=>$clang->gT('Logic'),
    4255. 

  4255.     'sortorder'=>100,
    4256. 

  4256.     'inputtype'=>'text',
    4257. 

  4257.     "help"=>$clang->gT("Place questions into a specified randomization group, all questions included in the specified group will appear in a random order"),
    4258. 

  4258.     "caption"=>$clang->gT("Randomization group name"));
    4259. 

  4259. 

  4260.     // This is added to support historical behavior.  Early versions of 1.92 used a value of "No", so if there was a min_sum_value or equals_sum_value, the question was not valid
    4261. 

  4261.     // unless those criteria were met.  In later releases of 1.92, the default was changed so that missing values were allowed even if those attributes were set
    4262. 

  4262.     // This attribute lets authors control whether missing values should be allowed in those cases without needing to set min_answers
    4263. 

  4263.     // Existing surveys will use the old behavior, but if the author edits the question, the default will be the new behavior.
    4264. 

  4264.     $qattributes["value_range_allows_missing"]=array(
    4265. 

  4265.     "types"=>"K",
    4266. 

  4266.     'category'=>$clang->gT('Input'),
    4267. 

  4267.     'sortorder'=>100,
    4268. 

  4268.     "inputtype"=>"singleselect",
    4269. 

  4269.     'options'=>array(0=>$clang->gT('No'),
    4270. 

  4270.     1=>$clang->gT('Yes')),
    4271. 

  4271.     'default'=>1,
    4272. 

  4272.     "help"=>$clang->gT("Is no answer (missing) allowed when either 'Equals sum value' or 'Minimum sum value' are set?"),
    4273. 

  4273.     "caption"=>$clang->gT("Value range allows missing"));
    4274. 

  4274. 

  4275.     //This builds a more useful array (don't modify)
    4276. 

  4276.     if ($returnByName==false)
    4277. 

  4277.     {
    4278. 

  4278.         foreach($qattributes as $qname=>$qvalue)
    4279. 

  4279.         {
    4280. 

  4280.             for ($i=0; $i<=strlen($qvalue['types'])-1; $i++)
    4281. 

  4281.             {
    4282. 

  4282.                 $qat[substr($qvalue['types'], $i, 1)][$qname]=array("name"=>$qname,
    4283. 

  4283.                 "inputtype"=>$qvalue['inputtype'],
    4284. 

  4284.                 "category"=>$qvalue['category'],
    4285. 

  4285.                 "sortorder"=>$qvalue['sortorder'],
    4286. 

  4286.                 "i18n"=>isset($qvalue['i18n'])?$qvalue['i18n']:false,
    4287. 

  4287.                 "readonly"=>isset($qvalue['readonly_when_active'])?$qvalue['readonly_when_active']:false,
    4288. 

  4288.                 "options"=>isset($qvalue['options'])?$qvalue['options']:'',
    4289. 

  4289.                 "default"=>isset($qvalue['default'])?$qvalue['default']:'',
    4290. 

  4290.                 "help"=>$qvalue['help'],
    4291. 

  4291.                 "caption"=>$qvalue['caption']);
    4292. 

  4292.             }
    4293. 

  4293.         }
    4294. 

  4294.         return $qat;
    4295. 

  4295.     }
    4296. 

  4296.     else {
    4297. 

  4297.         return $qattributes;
    4298. 

  4298.     }
    4299. 

  4299. }
    4300. 

  4300. 

  4301. function categorySort($a, $b)
    4302. 

  4302. {
    4303. 

  4303.     $result=strnatcasecmp($a['category'], $b['category']);
    4304. 

  4304.     if ($result==0)
    4305. 

  4305.     {
    4306. 

  4306.         $result=$a['sortorder']-$b['sortorder'];
    4307. 

  4307.     }
    4308. 

  4308.     return $result;
    4309. 

  4309. }
    4310. 

  4310. 

  4311. // make sure the given string (which comes from a POST or GET variable)
    4312. 

  4312. // is safe to use in MySQL.  This does nothing if gpc_magic_quotes is on.
    4313. 

  4313. function autoEscape($str) {
    4314. 

  4314.     if (!get_magic_quotes_gpc()) {
    4315. 

  4315.         return addslashes ($str);
    4316. 

  4316.     }
    4317. 

  4317.     return $str;
    4318. 

  4318. }
    4319. 

  4319. 

  4320. // the opposite of the above: takes a POST or GET variable which may or
    4321. 

  4321. // may not have been 'auto-quoted', and return the *unquoted* version.
    4322. 

  4322. // this is useful when the value is destined for a web page (eg) not
    4323. 

  4323. // a SQL query.
    4324. 

  4324. function autoUnescape($str) {
    4325. 

  4325.     if (!isset($str)) {return null;};
    4326. 

  4326.     if (!get_magic_quotes_gpc())
    4327. 

  4327.         return $str;
    4328. 

  4328.     return stripslashes($str);
    4329. 

  4329. }
    4330. 

  4330. 

  4331. // make a string safe to include in an HTML 'value' attribute.
    4332. 

  4332. function HTMLEscape($str) {
    4333. 

  4333.     // escape newline characters, too, in case we put a value from
    4334. 

  4334.     // a TEXTAREA  into an <input type="hidden"> value attribute.
    4335. 

  4335.     return str_replace(array("\x0A","\x0D"),array("&#10;","&#13;"),
    4336. 

  4336.     htmlspecialchars( $str, ENT_QUOTES ));
    4337. 

  4337. }
    4338. 

  4338. 

  4339. /**
    4340. 

  4340. * Escapes a text value for db
    4341. 

  4341. *
    4342. 

  4342. * @param string $value
    4343. 

  4343. * @return string
    4344. 

  4344. */
    4345. 

  4345. function dbQuoteAll($value)
    4346. 

  4346. {
    4347. 

  4347.     return Yii::app()->db->quoteValue($value);
    4348. 

  4348. }
    4349. 

  4349. 

  4350. // make a string safe to include in a JavaScript String parameter.
    4351. 

  4351. function javascriptEscape($str, $strip_tags=false, $htmldecode=false) {
    4352. 

  4352.     $new_str ='';
    4353. 

  4353. 

  4354.     if ($htmldecode==true) {
    4355. 

  4355.         $str=html_entity_decode($str,ENT_QUOTES,'UTF-8');
    4356. 

  4356.     }
    4357. 

  4357.     if ($strip_tags==true)
    4358. 

  4358.     {
    4359. 

  4359.         $str=strip_tags($str);
    4360. 

  4360.     }
    4361. 

  4361.     return str_replace(array('\'','"', "\n", "\r"),
    4362. 

  4362.     array("\\'",'\u0022', "\\n",'\r'),
    4363. 

  4363.     $str);
    4364. 

  4364. }
    4365. 

  4365. 

  4366. /**
    4367. 

  4367. * This function mails a text $body to the recipient $to.
    4368. 

  4368. * You can use more than one recipient when using a semikolon separated string with recipients.
    4369. 

  4369. *
    4370. 

  4370. * @param string $body Body text of the email in plain text or HTML
    4371. 

  4371. * @param mixed $subject Email subject
    4372. 

  4372. * @param mixed $to Array with several email addresses or single string with one email address
    4373. 

  4373. * @param mixed $from
    4374. 

  4374. * @param mixed $sitename
    4375. 

  4375. * @param mixed $ishtml
    4376. 

  4376. * @param mixed $bouncemail
    4377. 

  4377. * @param mixed $attachment
    4378. 

  4378. * @return bool If successful returns true
    4379. 

  4379. */
    4380. 

  4380. function SendEmailMessage($body, $subject, $to, $from, $sitename, $ishtml=false, $bouncemail=null, $attachment=null, $customheaders="")
    4381. 

  4381. {
    4382. 

  4382. 

  4383.     global $maildebug, $maildebugbody;
    4384. 

  4384. 

  4385.     $clang = Yii::app()->lang;
    4386. 

  4386.     $emailmethod = Yii::app()->getConfig('emailmethod');
    4387. 

  4387.     $emailsmtphost = Yii::app()->getConfig("emailsmtphost");
    4388. 

  4388.     $emailsmtpuser = Yii::app()->getConfig("emailsmtpuser");
    4389. 

  4389.     $emailsmtppassword = Yii::app()->getConfig("emailsmtppassword");
    4390. 

  4390.     $emailsmtpdebug = Yii::app()->getConfig("emailsmtpdebug");
    4391. 

  4391.     $emailsmtpssl = Yii::app()->getConfig("emailsmtpssl");
    4392. 

  4392.     $defaultlang = Yii::app()->getConfig("defaultlang");
    4393. 

  4393.     $emailcharset = Yii::app()->getConfig("emailcharset");
    4394. 

  4394. 

  4395.     if ($emailcharset!='utf-8')
    4396. 

  4396.     {
    4397. 

  4397.         $body=mb_convert_encoding($body,$emailcharset,'utf-8');
    4398. 

  4398.         $subject=mb_convert_encoding($subject,$emailcharset,'utf-8');
    4399. 

  4399.         $sitename=mb_convert_encoding($sitename,$emailcharset,'utf-8');
    4400. 

  4400.     }
    4401. 

  4401.     
    4402. 

  4402.     if (!is_array($to)){
    4403. 

  4403.         $to=array($to);
    4404. 

  4404.     }
    4405. 

  4405. 

  4406. 

  4407. 

  4408.     if (!is_array($customheaders) && $customheaders == '')
    4409. 

  4409.     {
    4410. 

  4410.         $customheaders=array();
    4411. 

  4411.     }
    4412. 

  4412.     if (Yii::app()->getConfig('demoMode'))
    4413. 

  4413.     {
    4414. 

  4414.         $maildebug=$clang->gT('Email was not sent because demo-mode is activated.');
    4415. 

  4415.         $maildebugbody='';
    4416. 

  4416.         return false;
    4417. 

  4417.     }
    4418. 

  4418. 

  4419.     if (is_null($bouncemail) )
    4420. 

  4420.     {
    4421. 

  4421.         $sender=$from;
    4422. 

  4422.     }
    4423. 

  4423.     else
    4424. 

  4424.     {
    4425. 

  4425.         $sender=$bouncemail;
    4426. 

  4426.     }
    4427. 

  4427. 

  4428. 

  4429.     require_once(APPPATH.'/third_party/phpmailer/class.phpmailer.php');
    4430. 

  4430.     $mail = new PHPMailer;
    4431. 

  4431.     if (!$mail->SetLanguage($defaultlang,APPPATH.'/third_party/phpmailer/language/'))
    4432. 

  4432.     {
    4433. 

  4433.         $mail->SetLanguage('en',APPPATH.'/third_party/phpmailer/language/');
    4434. 

  4434.     }
    4435. 

  4435.     $mail->CharSet = $emailcharset;
    4436. 

  4436.     if (isset($emailsmtpssl) && trim($emailsmtpssl)!=='' && $emailsmtpssl!==0) {
    4437. 

  4437.         if ($emailsmtpssl===1) {$mail->SMTPSecure = "ssl";}
    4438. 

  4438.         else {$mail->SMTPSecure = $emailsmtpssl;}
    4439. 

  4439.     }
    4440. 

  4440. 

  4441.     $fromname='';
    4442. 

  4442.     $fromemail=$from;
    4443. 

  4443.     if (strpos($from,'<'))
    4444. 

  4444.     {
    4445. 

  4445.         $fromemail=substr($from,strpos($from,'<')+1,strpos($from,'>')-1-strpos($from,'<'));
    4446. 

  4446.         $fromname=trim(substr($from,0, strpos($from,'<')-1));
    4447. 

  4447.     }
    4448. 

  4448. 

  4449.     $sendername='';
    4450. 

  4450.     $senderemail=$sender;
    4451. 

  4451.     if (strpos($sender,'<'))
    4452. 

  4452.     {
    4453. 

  4453.         $senderemail=substr($sender,strpos($sender,'<')+1,strpos($sender,'>')-1-strpos($sender,'<'));
    4454. 

  4454.         $sendername=trim(substr($sender,0, strpos($sender,'<')-1));
    4455. 

  4455.     }
    4456. 

  4456. 

  4457.     switch ($emailmethod) {
    4458. 

  4458.         case "qmail":
    4459. 

  4459.             $mail->IsQmail();
    4460. 

  4460.             break;
    4461. 

  4461.         case "smtp":
    4462. 

  4462.             $mail->IsSMTP();
    4463. 

  4463.             if ($emailsmtpdebug>0)
    4464. 

  4464.             {
    4465. 

  4465.                 $mail->SMTPDebug = $emailsmtpdebug;
    4466. 

  4466.             }
    4467. 

  4467.             if (strpos($emailsmtphost,':')>0)
    4468. 

  4468.             {
    4469. 

  4469.                 $mail->Host = substr($emailsmtphost,0,strpos($emailsmtphost,':'));
    4470. 

  4470.                 $mail->Port = substr($emailsmtphost,strpos($emailsmtphost,':')+1);
    4471. 

  4471.             }
    4472. 

  4472.             else {
    4473. 

  4473.                 $mail->Host = $emailsmtphost;
    4474. 

  4474.             }
    4475. 

  4475.             $mail->Username =$emailsmtpuser;
    4476. 

  4476.             $mail->Password =$emailsmtppassword;
    4477. 

  4477.             if (trim($emailsmtpuser)!="")
    4478. 

  4478.             {
    4479. 

  4479.                 $mail->SMTPAuth = true;
    4480. 

  4480.             }
    4481. 

  4481.             break;
    4482. 

  4482.         case "sendmail":
    4483. 

  4483.             $mail->IsSendmail();
    4484. 

  4484.             break;
    4485. 

  4485.         default:
    4486. 

  4486.             //Set to the default value to rule out incorrect settings.
    4487. 

  4487.             $emailmethod="mail";
    4488. 

  4488.             $mail->IsMail();
    4489. 

  4489.     }
    4490. 

  4490. 

  4491.     $mail->SetFrom($fromemail, $fromname);
    4492. 

  4492.     $mail->Sender = $senderemail; // Sets Return-Path for error notifications
    4493. 

  4493.     foreach ($to as $singletoemail)
    4494. 

  4494.     {
    4495. 

  4495.         if (strpos($singletoemail, '<') )
    4496. 

  4496.         {
    4497. 

  4497.             $toemail=substr($singletoemail,strpos($singletoemail,'<')+1,strpos($singletoemail,'>')-1-strpos($singletoemail,'<'));
    4498. 

  4498.             $toname=trim(substr($singletoemail,0, strpos($singletoemail,'<')-1));
    4499. 

  4499.             $mail->AddAddress($toemail,$toname);
    4500. 

  4500.         }
    4501. 

  4501.         else
    4502. 

  4502.         {
    4503. 

  4503.             $mail->AddAddress($singletoemail);
    4504. 

  4504.         }
    4505. 

  4505.     }
    4506. 

  4506.     if (is_array($customheaders))
    4507. 

  4507.     {
    4508. 

  4508.         foreach ($customheaders as $key=>$val) {
    4509. 

  4509.             $mail->AddCustomHeader($val);
    4510. 

  4510.         }
    4511. 

  4511.     }
    4512. 

  4512.     $mail->AddCustomHeader("X-Surveymailer: $sitename Emailer (LimeSurvey.sourceforge.net)");
    4513. 

  4513.     if (get_magic_quotes_gpc() != "0")	{$body = stripcslashes($body);}
    4514. 

  4514.     if ($ishtml) {
    4515. 

  4515.         $mail->IsHTML(true);
    4516. 

  4516.         $mail->Body = $body;
    4517. 

  4517.         $mail->AltBody = strip_tags(breakToNewline(html_entity_decode($body,ENT_QUOTES,$emailcharset)));
    4518. 

  4518.     } else
    4519. 

  4519.     {
    4520. 

  4520.         $mail->IsHTML(false);
    4521. 

  4521.         $mail->Body = $body;
    4522. 

  4522.     }
    4523. 

  4523. 

  4524.     // add the attachment if there is one
    4525. 

  4525.     if(!is_null($attachment))
    4526. 

  4526.         $mail->AddAttachment($attachment);
    4527. 

  4527. 

  4528.     if (trim($subject)!='') {$mail->Subject = "=?$emailcharset?B?" . base64_encode($subject) . "?=";}
    4529. 

  4529.     if ($emailsmtpdebug>0) {
    4530. 

  4530.         ob_start();
    4531. 

  4531.     }
    4532. 

  4532.     $sent=$mail->Send();
    4533. 

  4533.     $maildebug=$mail->ErrorInfo;
    4534. 

  4534.     if ($emailsmtpdebug>0) {
    4535. 

  4535.         $maildebug .= '<li>'.$clang->gT('SMTP debug output:').'</li><pre>'.strip_tags(ob_get_contents()).'</pre>';
    4536. 

  4536.         ob_end_clean();
    4537. 

  4537.     }
    4538. 

  4538.     $maildebugbody=$mail->Body;
    4539. 

  4539.     //if(!$sent) var_dump($maildebug);
    4540. 

  4540.     return $sent;
    4541. 

  4541. }
    4542. 

  4542. 

  4543. 

  4544. /**
    4545. 

  4545. *  This functions removes all HTML tags, Javascript, CRs, linefeeds and other strange chars from a given text
    4546. 

  4546. *
    4547. 

  4547. * @param string $sTextToFlatten  Text you want to clean
    4548. 

  4548. * @param boolan $keepSpan set to true for keep span, used for expression manager. Default: false
    4549. 

  4549. * @param boolan $bDecodeHTMLEntities If set to true then all HTML entities will be decoded to the specified charset. Default: false
    4550. 

  4550. * @param string $sCharset Charset to decode to if $decodeHTMLEntities is set to true. Default: UTF-8
    4551. 

  4551. * @param string $bStripNewLines strip new lines if true, if false replace all new line by \r\n. Default: true
    4552. 

  4552. *
    4553. 

  4553. * @return string  Cleaned text
    4554. 

  4554. */
    4555. 

  4555. function flattenText($sTextToFlatten, $keepSpan=false, $bDecodeHTMLEntities=false, $sCharset='UTF-8', $bStripNewLines=true)
    4556. 

  4556. {
    4557. 

  4557.     $sNicetext = stripJavaScript($sTextToFlatten);
    4558. 

  4558.     // When stripping tags, add a space before closing tags so that strings with embedded HTML tables don't get concatenated
    4559. 

  4559.     $sNicetext = str_replace(array('</td','</th'),array(' </td',' </th'), $sNicetext);
    4560. 

  4560.     if ($keepSpan) {
    4561. 

  4561.         // Keep <span> so can show EM syntax-highlighting; add space before tags so that word-wrapping not destroyed when remove tags.
    4562. 

  4562.         $sNicetext = strip_tags($sNicetext,'<span><table><tr><td><th>');
    4563. 

  4563.     }
    4564. 

  4564.     else {
    4565. 

  4565.         $sNicetext = strip_tags($sNicetext);
    4566. 

  4566.     }
    4567. 

  4567.     // ~\R~u : see "What \R matches" and "Newline sequences" in http://www.pcre.org/pcre.txt
    4568. 

  4568.     if ($bStripNewLines ){  // strip new lines
    4569. 

  4569.         $sNicetext = preg_replace(array('~\R~u'),array(' '), $sNicetext);
    4570. 

  4570.     }
    4571. 

  4571.     else // unify newlines to \r\n
    4572. 

  4572.     {
    4573. 

  4573.         $sNicetext = preg_replace(array('~\R~u'), array("\r\n"), $sNicetext);
    4574. 

  4574.     }
    4575. 

  4575.     if ($bDecodeHTMLEntities==true)
    4576. 

  4576.     {
    4577. 

  4577.         $sNicetext = str_replace('&nbsp;',' ', $sNicetext); // html_entity_decode does not convert &nbsp; to spaces
    4578. 

  4578.         $sNicetext = html_entity_decode($sNicetext, ENT_QUOTES, $sCharset);
    4579. 

  4579.     }
    4580. 

  4580.     $sNicetext = trim($sNicetext);
    4581. 

  4581.     return  $sNicetext;
    4582. 

  4582. }
    4583. 

  4583. 

  4584. 

  4585. /**
    4586. 

  4586. * getArrayFilterExcludesCascadesForGroup() queries the database and produces a list of array_filter_exclude questions and targets with in the same group
    4587. 

  4587. * @return returns a keyed nested array, keyed by the qid of the question, containing cascade information
    4588. 

  4588. */
    4589. 

  4589. function getArrayFilterExcludesCascadesForGroup($surveyid, $gid="", $output="qid")
    4590. 

  4590. {
    4591. 

  4591.     $surveyid=sanitize_int($surveyid);
    4592. 

  4592.     $gid=sanitize_int($gid);
    4593. 

  4593. 

  4594.     $cascaded=array();
    4595. 

  4595.     $sources=array();
    4596. 

  4596.     $qidtotitle=array();
    4597. 

  4597.     $fieldmap = createFieldMap($surveyid,'full',false,false,getBaseLanguageFromSurveyID($surveyid));
    4598. 

  4598. 

  4599.     if($gid != "") {
    4600. 

  4600.         $qrows = arraySearchByKey($gid, $fieldmap, 'gid');
    4601. 

  4601.     } else {
    4602. 

  4602.         $qrows = $fieldmap;
    4603. 

  4603.     }
    4604. 

  4604.     $grows = array(); //Create an empty array in case query not return any rows
    4605. 

  4605.     // Store each result as an array with in the $grows array
    4606. 

  4606.     foreach ($qrows as $qrow) {
    4607. 

  4607.         if (isset($qrow['gid']) && !empty($qrow['gid'])) {
    4608. 

  4608.             $grows[$qrow['qid']] = array('qid' => $qrow['qid'],'type' => $qrow['type'], 'mandatory' => $qrow['mandatory'], 'title' => $qrow['title'], 'gid' => $qrow['gid']);
    4609. 

  4609.         }
    4610. 

  4610.     }
    4611. 

  4611.     $attrmach = array(); // Stores Matches of filters that have their values as questions within current group
    4612. 

  4612.     foreach ($grows as $qrow) // Cycle through questions to see if any have list_filter attributes
    4613. 

  4613.     {
    4614. 

  4614.         $qidtotitle[$qrow['qid']]=$qrow['title'];
    4615. 

  4615.         $qresult = getQuestionAttributeValues($qrow['qid'],$qrow['type']);
    4616. 

  4616.         if (isset($qresult['array_filter_exclude'])) // We Found a array_filter attribute
    4617. 

  4617.         {
    4618. 

  4618.             $val = $qresult['array_filter_exclude']; // Get the Value of the Attribute ( should be a previous question's title in same group )
    4619. 

  4619.             foreach ($grows as $avalue) // Cycle through all the other questions in this group until we find the source question for this array_filter
    4620. 

  4620.             {
    4621. 

  4621.                 if ($avalue['title'] == $val)
    4622. 

  4622.                 {
    4623. 

  4623.                     /* This question ($avalue) is the question that provides the source information we use
    4624. 

  4624.                     * to determine which answers show up in the question we're looking at, which is $qrow['qid']
    4625. 

  4625.                     * So, in other words, we're currently working on question $qrow['qid'], trying to find out more
    4626. 

  4626.                     * information about question $avalue['qid'], because that's the source */
    4627. 

  4627.                     $sources[$qrow['qid']]=$avalue['qid']; /* This question ($qrow['qid']) relies on answers in $avalue['qid'] */
    4628. 

  4628.                     if(isset($cascades)) {unset($cascades);}
    4629. 

  4629.                     $cascades=array();                     /* Create an empty array */
    4630. 

  4630. 

  4631.                     /* At this stage, we know for sure that this question relies on one other question for the filter */
    4632. 

  4632.                     /* But this function wants to send back information about questions that rely on multiple other questions for the filter */
    4633. 

  4633.                     /* So we don't want to do anything yet */
    4634. 

  4634. 

  4635.                     /* What we need to do now, is check whether the question this one relies on, also relies on another */
    4636. 

  4636. 

  4637.                     /* The question we are now checking is $avalue['qid'] */
    4638. 

  4638.                     $keepgoing=1;
    4639. 

  4639.                     $questiontocheck=$avalue['qid'];
    4640. 

  4640.                     /* If there is a key in the $sources array that is equal to $avalue['qid'] then we want to add that
    4641. 

  4641.                     * to the $cascades array */
    4642. 

  4642.                     while($keepgoing > 0)
    4643. 

  4643.                     {
    4644. 

  4644.                         if(!empty($sources[$questiontocheck]))
    4645. 

  4645.                         {
    4646. 

  4646.                             $cascades[] = $sources[$questiontocheck];
    4647. 

  4647.                             /* Now we need to move down the chain */
    4648. 

  4648.                             /* We want to check the $sources[$questiontocheck] question */
    4649. 

  4649.                             $questiontocheck=$sources[$questiontocheck];
    4650. 

  4650.                         } else {
    4651. 

  4651.                             /* Since it was empty, there must not be any more questions down the cascade */
    4652. 

  4652.                             $keepgoing=0;
    4653. 

  4653.                         }
    4654. 

  4654.                     }
    4655. 

  4655.                     /* Now add all that info */
    4656. 

  4656.                     if(count($cascades) > 0) {
    4657. 

  4657.                         $cascaded[$qrow['qid']]=$cascades;
    4658. 

  4658.                     }
    4659. 

  4659.                 }
    4660. 

  4660.             }
    4661. 

  4661.         }
    4662. 

  4662.     }
    4663. 

  4663.     $cascade2=array();
    4664. 

  4664.     if($output == "title")
    4665. 

  4665.     {
    4666. 

  4666.         foreach($cascaded as $key=>$cascade) {
    4667. 

  4667.             foreach($cascade as $item)
    4668. 

  4668.             {
    4669. 

  4669.                 $cascade2[$key][]=$qidtotitle[$item];
    4670. 

  4670.             }
    4671. 

  4671.         }
    4672. 

  4672.         $cascaded=$cascade2;
    4673. 

  4673.     }
    4674. 

  4674.     return $cascaded;
    4675. 

  4675. }
    4676. 

  4676. 

  4677. 

  4678. 

  4679. /**
    4680. 

  4680. * getArrayFiltersForQuestion($qid) finds out if a question has an array_filter attribute and what codes where selected on target question
    4681. 

  4681. * @return returns an array of codes that were selected else returns false
    4682. 

  4682. */
    4683. 

  4683. function getArrayFiltersForQuestion($qid)
    4684. 

  4684. {
    4685. 

  4685.     static $cache = array();
    4686. 

  4686. 

  4687.     // TODO: Check list_filter values to make sure questions are previous?
    4688. 

  4688.     $qid=sanitize_int($qid);
    4689. 

  4689.     if (isset($cache[$qid])) return $cache[$qid];
    4690. 

  4690. 

  4691.     $attributes = getQuestionAttributeValues($qid);
    4692. 

  4692.     if (isset($attributes['array_filter']) && Yii::app()->session['fieldarray']) {
    4693. 

  4693.         $val = $attributes['array_filter']; // Get the Value of the Attribute ( should be a previous question's title in same group )
    4694. 

  4694.         foreach (Yii::app()->session['fieldarray'] as $fields)
    4695. 

  4695.         {
    4696. 

  4696.             if ($fields[2] == $val)
    4697. 

  4697.             {
    4698. 

  4698.                 // we found the target question, now we need to know what the answers where, we know its a multi!
    4699. 

  4699.                 $fields[0]=sanitize_int($fields[0]);
    4700. 

  4700.                 //$query = "SELECT title FROM ".db_table_name('questions')." where parent_qid='{$fields[0]}' AND language='".Yii::app()->session[$surveyid]['s_lang']."' order by question_order";
    4701. 

  4701.                 $qresult=Questions::model()->findAllByAttributes(array("parent_qid"=> $fields[0], "language"=> Yii::app()->session[$surveyid]['s_lang']), array('order' => "question_order"));
    4702. 

  4702.                 $selected = array();
    4703. 

  4703.                 //while ($code = $qresult->fetchRow())
    4704. 

  4704.                 foreach ($qresult->readAll() as $code)
    4705. 

  4705.                 {
    4706. 

  4706.                     if (Yii::app()->session[$fields[1].$code['title']] == "Y"
    4707. 

  4707.                     || Yii::app()->session[$fields[1]] == $code['title'])			 array_push($selected,$code['title']);
    4708. 

  4708.                 }
    4709. 

  4709. 

  4710.                 //Now we also need to find out if (a) the question had "other" enabled, and (b) if that was selected
    4711. 

  4711.                 //$query = "SELECT other FROM ".db_table_name('questions')." where qid='{$fields[0]}'";
    4712. 

  4712.                 $qresult=Questions::model()->findAllByAttributes(array("qid"=>$fields[0]));
    4713. 

  4713.                 foreach ($qresult->readAll() as $row) {$other=$row['other'];}
    4714. 

  4714.                 if($other == "Y")
    4715. 

  4715.                 {
    4716. 

  4716.                     if(Yii::app()->session[$fields[1].'other'] && Yii::app()->session[$fields[1].'other'] !="") {array_push($selected, "other");}
    4717. 

  4717.                 }
    4718. 

  4718.                 $cache[$qid] = $selected;
    4719. 

  4719.                 return $cache[$qid];
    4720. 

  4720.             }
    4721. 

  4721.         }
    4722. 

  4722.         $cache[$qid] = false;
    4723. 

  4723.         return $cache[$qid];
    4724. 

  4724.     }
    4725. 

  4725.     $cache[$qid] = false;
    4726. 

  4726.     return $cache[$qid];
    4727. 

  4727. }
    4728. 

  4728. 

  4729. /**
    4730. 

  4730. * getGroupsByQuestion($surveyid)
    4731. 

  4731. * @return returns a keyed array of groups to questions ie: array([1]=>[2]) question qid 1, is in group gid 2.
    4732. 

  4732. */
    4733. 

  4733. function getGroupsByQuestion($surveyid) {
    4734. 

  4734.     $output=array();
    4735. 

  4735. 

  4736.     $surveyid=sanitize_int($surveyid);
    4737. 

  4737.     $result=Questions::model()->findAllByAttributes(array("sid"=>$surveyid));
    4738. 

  4738. 

  4739.     foreach ($qresult->readAll() as $val)
    4740. 

  4740.     {
    4741. 

  4741.         $output[$val['qid']]=$val['gid'];
    4742. 

  4742.     }
    4743. 

  4743.     return $output;
    4744. 

  4744. }
    4745. 

  4745. 

  4746. 

  4747. /**
    4748. 

  4748. * getArrayFilterExcludesForQuestion($qid) finds out if a question has an array_filter_exclude attribute and what codes where selected on target question
    4749. 

  4749. * @return returns an array of codes that were selected else returns false
    4750. 

  4750. */
    4751. 

  4751. function getArrayFilterExcludesForQuestion($qid)
    4752. 

  4752. {
    4753. 

  4753.     static $cascadesCache = array();
    4754. 

  4754.     static $cache = array();
    4755. 

  4755. 

  4756.     // TODO: Check list_filter values to make sure questions are previous?
    4757. 

  4757.     //	$surveyid = Yii::app()->getConfig('sid');
    4758. 

  4758.     $surveyid=returnGlobal('sid');
    4759. 

  4759.     $qid=sanitize_int($qid);
    4760. 

  4760. 

  4761.     if (isset($cache[$qid])) return $cache[$qid];
    4762. 

  4762. 

  4763.     $attributes = getQuestionAttributeValues($qid);
    4764. 

  4764.     $excludevals=array();
    4765. 

  4765.     if (isset($attributes['array_filter_exclude'])) // We Found a array_filter_exclude attribute
    4766. 

  4766.     {
    4767. 

  4767.         $selected=array();
    4768. 

  4768.         $excludevals[] = $attributes['array_filter_exclude']; // Get the Value of the Attribute ( should be a previous question's title in same group )
    4769. 

  4769.         /* Find any cascades and place them in the $excludevals array*/
    4770. 

  4770.         if (!isset($cascadesCache[$surveyid])) {
    4771. 

  4771.             $cascadesCache[$surveyid] = getArrayFilterExcludesCascadesForGroup($surveyid, "", "title");
    4772. 

  4772.         }
    4773. 

  4773.         $array_filterXqs_cascades = $cascadesCache[$surveyid];
    4774. 

  4774. 

  4775.         if(isset($array_filterXqs_cascades[$qid]))
    4776. 

  4776.         {
    4777. 

  4777.             foreach($array_filterXqs_cascades[$qid] as $afc)
    4778. 

  4778.             {
    4779. 

  4779.                 $excludevals[]=array("value"=>$afc);
    4780. 

  4780. 

  4781.             }
    4782. 

  4782.         }
    4783. 

  4783.         /* For each $val (question title) that applies to this, check what values exist and add them to the $selected array */
    4784. 

  4784.         foreach ($excludevals as $val)
    4785. 

  4785.         {
    4786. 

  4786.             foreach (Yii::app()->session['fieldarray'] as $fields) //iterate through every question in the survey
    4787. 

  4787.             {
    4788. 

  4788.                 if ($fields[2] == $val)
    4789. 

  4789.                 {
    4790. 

  4790.                     // we found the target question, now we need to know what the answers were!
    4791. 

  4791.                     $fields[0]=sanitize_int($fields[0]);
    4792. 

  4792.                     $query = "SELECT title FROM {{questions}} where parent_qid='{$fields[0]}' AND language='".Yii::app()->session[$surveyid]['s_lang']."' order by question_order";
    4793. 

  4793.                     $qresult = dbExecuteAssoc($query);  //Checked
    4794. 

  4794.                     foreach ($qresult->readAll() as $code)
    4795. 

  4795.                     {
    4796. 

  4796.                         if (isset(Yii::app()->session[$fields[1]]))
    4797. 

  4797.                             if ((isset(Yii::app()->session[$fields[1].$code['title']]) && Yii::app()->session[$fields[1].$code['title']] == "Y")
    4798. 

  4798.                             || Yii::app()->session[$fields[1]] == $code['title'])
    4799. 

  4799.                                 array_push($selected,$code['title']);
    4800. 

  4800.                     }
    4801. 

  4801.                     //Now we also need to find out if (a) the question had "other" enabled, and (b) if that was selected
    4802. 

  4802.                     $query = "SELECT other FROM {{questions}} where qid='{$fields[0]}'";
    4803. 

  4803.                     $qresult = dbExecuteAssoc($query);
    4804. 

  4804.                     foreach ($qresult->readAll() as $row) {$other=$row['other'];}
    4805. 

  4805.                     if($other == "Y")
    4806. 

  4806.                     {
    4807. 

  4807.                         if(Yii::app()->session[$fields[1].'other'] != "") {array_push($selected, "other");}
    4808. 

  4808.                     }
    4809. 

  4809.                 }
    4810. 

  4810.             }
    4811. 

  4811.         }
    4812. 

  4812.         if(count($selected) > 0)
    4813. 

  4813.         {
    4814. 

  4814.             $cache[$qid] = $selected;
    4815. 

  4815.             return $cache[$qid];
    4816. 

  4816.         } else {
    4817. 

  4817.             $cache[$qid] = false;
    4818. 

  4818.             return $cache[$qid];
    4819. 

  4819.         }
    4820. 

  4820.     }
    4821. 

  4821.     $cache[$qid] = false;
    4822. 

  4822.     return $cache[$qid];
    4823. 

  4823. }
    4824. 

  4824. 

  4825. 

  4826. 

  4827. function CSVEscape($str)
    4828. 

  4828. {
    4829. 

  4829.     $str= str_replace('\n','\%n',$str);
    4830. 

  4830.     return '"' . str_replace('"','""', $str) . '"';
    4831. 

  4831. }
    4832. 

  4832. 

  4833. function convertCSVRowToArray($string, $seperator, $quotechar)
    4834. 

  4834. {
    4835. 

  4835.     $fields=preg_split('/' . $seperator . '(?=([^"]*"[^"]*")*(?![^"]*"))/',trim($string));
    4836. 

  4836.     $fields=array_map('CSVUnquote',$fields);
    4837. 

  4837.     return $fields;
    4838. 

  4838. }
    4839. 

  4839. 

  4840. function createPassword()
    4841. 

  4841. {
    4842. 

  4842.     $pwchars = "abcdefhjmnpqrstuvwxyz23456789";
    4843. 

  4843.     $password_length = 12;
    4844. 

  4844.     $passwd = '';
    4845. 

  4845. 

  4846.     for ($i=0; $i<$password_length; $i++)
    4847. 

  4847.     {
    4848. 

  4848.         $passwd .= $pwchars[(int)floor(rand(0,strlen($pwchars)-1))];
    4849. 

  4849.     }
    4850. 

  4850.     return $passwd;
    4851. 

  4851. }
    4852. 

  4852. 

  4853. function languageDropdown($surveyid,$selected)
    4854. 

  4854. {
    4855. 

  4855. 

  4856.     $homeurl = Yii::app()->getConfig('homeurl');
    4857. 

  4857.     $slangs = Survey::model()->findByPk($surveyid)->additionalLanguages;
    4858. 

  4858.     $baselang = Survey::model()->findByPk($surveyid)->language;
    4859. 

  4859.     array_unshift($slangs,$baselang);
    4860. 

  4860.     $html = "<select class='listboxquestions' name='langselect' onchange=\"window.open(this.options[this.selectedIndex].value, '_top')\">\n";
    4861. 

  4861. 

  4862.     foreach ($slangs as $lang)
    4863. 

  4863.     {
    4864. 

  4864.         $link = Yii::app()->homeUrl.("/admin/dataentry/sa/view/surveyid/".$surveyid."/lang/".$lang);
    4865. 

  4865.         if ($lang == $selected) $html .= "\t<option value='{$link}' selected='selected'>".getLanguageNameFromCode($lang,false)."</option>\n";
    4866. 

  4866.         if ($lang != $selected) $html .= "\t<option value='{$link}'>".getLanguageNameFromCode($lang,false)."</option>\n";
    4867. 

  4867.     }
    4868. 

  4868.     $html .= "</select>";
    4869. 

  4869.     return $html;
    4870. 

  4870. }
    4871. 

  4871. 

  4872. function languageDropdownClean($surveyid,$selected)
    4873. 

  4873. {
    4874. 

  4874.     $slangs = Survey::model()->findByPk($surveyid)->additionalLanguages;
    4875. 

  4875.     $baselang = Survey::model()->findByPk($surveyid)->language;
    4876. 

  4876.     array_unshift($slangs,$baselang);
    4877. 

  4877.     $html = "<select class='listboxquestions' id='language' name='language'>\n";
    4878. 

  4878.     foreach ($slangs as $lang)
    4879. 

  4879.     {
    4880. 

  4880.         if ($lang == $selected) $html .= "\t<option value='$lang' selected='selected'>".getLanguageNameFromCode($lang,false)."</option>\n";
    4881. 

  4881.         if ($lang != $selected) $html .= "\t<option value='$lang'>".getLanguageNameFromCode($lang,false)."</option>\n";
    4882. 

  4882.     }
    4883. 

  4883.     $html .= "</select>";
    4884. 

  4884.     return $html;
    4885. 

  4885. }
    4886. 

  4886. 

  4887. /**
    4888. 

  4888. * This function removes a directory recursively
    4889. 

  4889. *
    4890. 

  4890. * @param mixed $dirname
    4891. 

  4891. * @return bool
    4892. 

  4892. */
    4893. 

  4893. function rmdirr($dirname)
    4894. 

  4894. {
    4895. 

  4895.     // Sanity check
    4896. 

  4896.     if (!file_exists($dirname)) {
    4897. 

  4897.         return false;
    4898. 

  4898.     }
    4899. 

  4899. 

  4900.     // Simple delete for a file
    4901. 

  4901.     if (is_file($dirname) || is_link($dirname)) {
    4902. 

  4902.         return @unlink($dirname);
    4903. 

  4903.     }
    4904. 

  4904. 

  4905.     // Loop through the folder
    4906. 

  4906.     $dir = dir($dirname);
    4907. 

  4907.     while (false !== $entry = $dir->read()) {
    4908. 

  4908.         // Skip pointers
    4909. 

  4909.         if ($entry == '.' || $entry == '..') {
    4910. 

  4910.             continue;
    4911. 

  4911.         }
    4912. 

  4912. 

  4913.         // Recurse
    4914. 

  4914.         rmdirr($dirname . DIRECTORY_SEPARATOR . $entry);
    4915. 

  4915.     }
    4916. 

  4916. 

  4917.     // Clean up
    4918. 

  4918.     $dir->close();
    4919. 

  4919.     return @rmdir($dirname);
    4920. 

  4920. }
    4921. 

  4921. 

  4922. /**
    4923. 

  4923. * This function removes surrounding and masking quotes from the CSV field
    4924. 

  4924. *
    4925. 

  4925. * @param mixed $field
    4926. 

  4926. * @return mixed
    4927. 

  4927. */
    4928. 

  4928. function CSVUnquote($field)
    4929. 

  4929. {
    4930. 

  4930.     //print $field.":";
    4931. 

  4931.     $field = preg_replace ("/^\040*\"/", "", $field);
    4932. 

  4932.     $field = preg_replace ("/\"\040*$/", "", $field);
    4933. 

  4933.     $field= str_replace('""','"',$field);
    4934. 

  4934.     //print $field."\n";
    4935. 

  4935.     return $field;
    4936. 

  4936. }
    4937. 

  4937. 

  4938. /**
    4939. 

  4939. * This function return actual completion state
    4940. 

  4940. *
    4941. 

  4941. * @return string (complete|incomplete|all) or false
    4942. 

  4942. */
    4943. 

  4943. function incompleteAnsFilterState()
    4944. 

  4944. {
    4945. 

  4945.     $letsfilter='';
    4946. 

  4946.     $letsfilter = returnGlobal('completionstate'); //read get/post completionstate
    4947. 

  4947. 

  4948.     // first let's initialize the incompleteanswers session variable
    4949. 

  4949.     if ($letsfilter != '')
    4950. 

  4950.     { // use the read value if not empty
    4951. 

  4951.         Yii::app()->session['incompleteanswers'] = $letsfilter;
    4952. 

  4952.     }
    4953. 

  4953.     elseif (empty(Yii::app()->session['incompleteanswers']))
    4954. 

  4954.     { // sets default variable value from config file
    4955. 

  4955.         Yii::app()->session['incompleteanswers'] = Yii::app()->getConfig('filterout_incomplete_answers');
    4956. 

  4956.     }
    4957. 

  4957. 

  4958.     if  (Yii::app()->session['incompleteanswers']=='complete' || Yii::app()->session['incompleteanswers']=='all' || Yii::app()->session['incompleteanswers']=='incomplete') {
    4959. 

  4959.         return Yii::app()->session['incompleteanswers'];
    4960. 

  4960.     }
    4961. 

  4961.     else
    4962. 

  4962.     { // last resort is to prevent filtering
    4963. 

  4963.         return false;
    4964. 

  4964.     }
    4965. 

  4965. }
    4966. 

  4966. 

  4967. 

  4968. /**
    4969. 

  4969. * isCaptchaEnabled($screen, $usecaptchamode)
    4970. 

  4970. * @param string $screen - the screen name for which to test captcha activation
    4971. 

  4971. *
    4972. 

  4972. * @return boolean - returns true if captcha must be enabled
    4973. 

  4973. **/
    4974. 

  4974. function isCaptchaEnabled($screen, $captchamode='')
    4975. 

  4975. {
    4976. 

  4976.     switch($screen)
    4977. 

  4977.     {
    4978. 

  4978.         case 'registrationscreen':
    4979. 

  4979.             if ($captchamode == 'A' ||
    4980. 

  4980.             $captchamode == 'B' ||
    4981. 

  4981.             $captchamode == 'D' ||
    4982. 

  4982.             $captchamode == 'R')
    4983. 

  4983.             {
    4984. 

  4984.                 return true;
    4985. 

  4985.             }
    4986. 

  4986.             else
    4987. 

  4987.             {
    4988. 

  4988.                 return false;
    4989. 

  4989.             }
    4990. 

  4990.             break;
    4991. 

  4991.         case 'surveyaccessscreen':
    4992. 

  4992.             if ($captchamode == 'A' ||
    4993. 

  4993.             $captchamode == 'B' ||
    4994. 

  4994.             $captchamode == 'C' ||
    4995. 

  4995.             $captchamode == 'X')
    4996. 

  4996.             {
    4997. 

  4997.                 return true;
    4998. 

  4998.             }
    4999. 

  4999.             else
    5000. 

  5000.             {
    5001. 

  5001.                 return false;
    5002. 

  5002.             }
    5003. 

  5003.             break;
    5004. 

  5004.         case 'saveandloadscreen':
    5005. 

  5005.             if ($captchamode == 'A' ||
    5006. 

  5006.             $captchamode == 'C' ||
    5007. 

  5007.             $captchamode == 'D' ||
    5008. 

  5008.             $captchamode == 'S')
    5009. 

  5009.             {
    5010. 

  5010.                 return true;
    5011. 

  5011.             }
    5012. 

  5012.             else
    5013. 

  5013.             {
    5014. 

  5014.                 return false;
    5015. 

  5015.             }
    5016. 

  5016.             return true;
    5017. 

  5017.             break;
    5018. 

  5018.         default:
    5019. 

  5019.             return true;
    5020. 

  5020.             break;
    5021. 

  5021.     }
    5022. 

  5022. }
    5023. 

  5023. 

  5024. /**
    5025. 

  5025. * used for import[survey|questions|groups]
    5026. 

  5026. *
    5027. 

  5027. * @param mixed $string
    5028. 

  5028. * @return mixed
    5029. 

  5029. */
    5030. 

  5030. function convertCSVReturnToReturn($string)
    5031. 

  5031. {
    5032. 

  5032.     $string= str_replace('\n', "\n", $string);
    5033. 

  5033.     return str_replace('\%n', '\n', $string);
    5034. 

  5034. }
    5035. 

  5035. 

  5036. /**
    5037. 

  5037. * Check if a table does exist in the database
    5038. 

  5038. *
    5039. 

  5039. * @param string $sTableName Table name to check for (without dbprefix!))
    5040. 

  5040. * @return boolean True or false if table exists or not
    5041. 

  5041. */
    5042. 

  5042. function tableExists($sTableName)
    5043. 

  5043. {
    5044. 

  5044.     $sTableName=Yii::app()->db->tablePrefix.str_replace(array('{','}'),array('',''),$sTableName);
    5045. 

  5045.     return in_array($sTableName,Yii::app()->db->schema->getTableNames());
    5046. 

  5046. }
    5047. 

  5047. 

  5048. // Returns false if the survey is anonymous,
    5049. 

  5049. // and a token table exists: in this case the completed field of a token
    5050. 

  5050. // will contain 'Y' instead of the submitted date to ensure privacy
    5051. 

  5051. // Returns true otherwise
    5052. 

  5052. function isTokenCompletedDatestamped($thesurvey)
    5053. 

  5053. {
    5054. 

  5054.     if ($thesurvey['anonymized'] == 'Y' &&  tableExists('tokens_'.$thesurvey['sid']))
    5055. 

  5055.     {
    5056. 

  5056.         return false;
    5057. 

  5057.     }
    5058. 

  5058.     else
    5059. 

  5059.     {
    5060. 

  5060.         return true;
    5061. 

  5061.     }
    5062. 

  5062. }
    5063. 

  5063. 

  5064. /**
    5065. 

  5065. * example usage
    5066. 

  5066. * $date = "2006-12-31 21:00";
    5067. 

  5067. * $shift "+6 hours"; // could be days, weeks... see function strtotime() for usage
    5068. 

  5068. *
    5069. 

  5069. * echo sql_date_shift($date, "Y-m-d H:i:s", $shift);
    5070. 

  5070. *
    5071. 

  5071. * will output: 2007-01-01 03:00:00
    5072. 

  5072. *
    5073. 

  5073. * @param mixed $date
    5074. 

  5074. * @param mixed $dformat
    5075. 

  5075. * @param mixed $shift
    5076. 

  5076. * @return string
    5077. 

  5077. */
    5078. 

  5078. function dateShift($date, $dformat, $shift)
    5079. 

  5079. {
    5080. 

  5080.     return date($dformat, strtotime($shift, strtotime($date)));
    5081. 

  5081. }
    5082. 

  5082. 

  5083. 

  5084. // getBounceEmail: returns email used to receive error notifications
    5085. 

  5085. function getBounceEmail($surveyid)
    5086. 

  5086. {
    5087. 

  5087.     $surveyInfo=getSurveyInfo($surveyid);
    5088. 

  5088. 

  5089.     if ($surveyInfo['bounce_email'] == '')
    5090. 

  5090.     {
    5091. 

  5091.         return null; // will be converted to from in MailText
    5092. 

  5092.     }
    5093. 

  5093.     else
    5094. 

  5094.     {
    5095. 

  5095.         return $surveyInfo['bounce_email'];
    5096. 

  5096.     }
    5097. 

  5097. }
    5098. 

  5098. 

  5099. // getEmailFormat: returns email format for the survey
    5100. 

  5100. // returns 'text' or 'html'
    5101. 

  5101. function getEmailFormat($surveyid)
    5102. 

  5102. {
    5103. 

  5103.     $surveyInfo=getSurveyInfo($surveyid);
    5104. 

  5104.     if ($surveyInfo['htmlemail'] == 'Y')
    5105. 

  5105.     {
    5106. 

  5106.         return 'html';
    5107. 

  5107.     }
    5108. 

  5108.     else
    5109. 

  5109.     {
    5110. 

  5110.         return 'text';
    5111. 

  5111.     }
    5112. 

  5112. 

  5113. }
    5114. 

  5114. 

  5115. // Check if user has manage rights for a template
    5116. 

  5116. function hasTemplateManageRights($userid, $templatefolder) {
    5117. 

  5117.     $userid=sanitize_int($userid);
    5118. 

  5118.     $templatefolder=sanitize_paranoid_string($templatefolder);
    5119. 

  5119.     $criteria = new CDbCriteria;
    5120. 

  5120.     $criteria->addColumnCondition(array('uid' => $userid));
    5121. 

  5121.     $criteria->addSearchCondition('folder', $templatefolder);
    5122. 

  5122.     $query=Templates_rights::model()->find($criteria);
    5123. 

  5123.     //if ($result->RecordCount() == 0)  return false;
    5124. 

  5124.     if (is_null($query))  return false;
    5125. 

  5125. 

  5126.     $row = $query;
    5127. 

  5127.     //$row = $result->FetchRow();
    5128. 

  5128. 

  5129.     return $row["use"];
    5130. 

  5130. }
    5131. 

  5131. 

  5132. /**
    5133. 

  5133. * This function creates an incrementing answer code based on the previous source-code
    5134. 

  5134. *
    5135. 

  5135. * @param mixed $sourcecode The previous answer code
    5136. 

  5136. */
    5137. 

  5137. function getNextCode($sourcecode)
    5138. 

  5138. {
    5139. 

  5139.     $i=1;
    5140. 

  5140.     $found=true;
    5141. 

  5141.     $foundnumber=-1;
    5142. 

  5142.     while ($i<=strlen($sourcecode) && $found)
    5143. 

  5143.     {
    5144. 

  5144.         $found=is_numeric(substr($sourcecode,-$i));
    5145. 

  5145.         if ($found)
    5146. 

  5146.         {
    5147. 

  5147.             $foundnumber=substr($sourcecode,-$i);
    5148. 

  5148.             $i++;
    5149. 

  5149.         }
    5150. 

  5150.     }
    5151. 

  5151.     if ($foundnumber==-1)
    5152. 

  5152.     {
    5153. 

  5153.         return($sourcecode);
    5154. 

  5154.     }
    5155. 

  5155.     else
    5156. 

  5156.     {
    5157. 

  5157.         $foundnumber++;
    5158. 

  5158.         $result=substr($sourcecode,0,strlen($sourcecode)-strlen($foundnumber)).$foundnumber;
    5159. 

  5159.         return($result);
    5160. 

  5160.     }
    5161. 

  5161. 

  5162. }
    5163. 

  5163. 

  5164. /**
    5165. 

  5165. * Translate links which are in any answer/question/survey/email template/label set to their new counterpart
    5166. 

  5166. *
    5167. 

  5167. * @param mixed $sType 'survey' or 'label'
    5168. 

  5168. * @param mixed $iOldSurveyID
    5169. 

  5169. * @param mixed $iNewSurveyID
    5170. 

  5170. * @param mixed $sString
    5171. 

  5171. * @return string
    5172. 

  5172. */
    5173. 

  5173. function translateLinks($sType, $iOldSurveyID, $iNewSurveyID, $sString)
    5174. 

  5174. {
    5175. 

  5175.     if ($sType == 'survey')
    5176. 

  5176.     {
    5177. 

  5177.         $sPattern = "([^'\"]*)/upload/surveys/{$iOldSurveyID}/";
    5178. 

  5178.         $sReplace = Yii::app()->getConfig("publicurl")."upload/surveys/{$iNewSurveyID}/";
    5179. 

  5179.         return preg_replace('#'.$sPattern.'#', $sReplace, $sString);
    5180. 

  5180.     }
    5181. 

  5181.     elseif ($sType == 'label')
    5182. 

  5182.     {
    5183. 

  5183.         $pattern = "([^'\"]*)/upload/labels/{$iOldSurveyID}/";
    5184. 

  5184.         $replace = Yii::app()->getConfig("publicurl")."upload/labels/{$iNewSurveyID}/";
    5185. 

  5185.         return preg_replace('#'.$pattern.'#', $replace, $sString);
    5186. 

  5186.     }
    5187. 

  5187.     else // unkown type
    5188. 

  5188.     {
    5189. 

  5189.         return $sString;
    5190. 

  5190.     }
    5191. 

  5191. }
    5192. 

  5192. 

  5193. /**
    5194. 

  5194. * This function creates the old fieldnames for survey import
    5195. 

  5195. *
    5196. 

  5196. * @param mixed $iOldSID  The old survey id
    5197. 

  5197. * @param mixed $iNewSID  The new survey id
    5198. 

  5198. * @param array $aGIDReplacements An array with group ids (oldgid=>newgid)
    5199. 

  5199. * @param array $aQIDReplacements An array with question ids (oldqid=>newqid)
    5200. 

  5200. */
    5201. 

  5201. function reverseTranslateFieldNames($iOldSID,$iNewSID,$aGIDReplacements,$aQIDReplacements)
    5202. 

  5202. {
    5203. 

  5203.     $aGIDReplacements=array_flip($aGIDReplacements);
    5204. 

  5204.     $aQIDReplacements=array_flip($aQIDReplacements);
    5205. 

  5205.     if ($iOldSID==$iNewSID) {
    5206. 

  5206.         $forceRefresh=true; // otherwise grabs the cached copy and throws undefined index exceptions
    5207. 

  5207.     }
    5208. 

  5208.     else {
    5209. 

  5209.         $forceRefresh=false;
    5210. 

  5210.     }
    5211. 

  5211.     $aFieldMap = createFieldMap($iNewSID,'short',$forceRefresh,false,getBaseLanguageFromSurveyID($iNewSID));
    5212. 

  5212. 

  5213.     $aFieldMappings=array();
    5214. 

  5214.     foreach ($aFieldMap as $sFieldname=>$aFieldinfo)
    5215. 

  5215.     {
    5216. 

  5216.         if ($aFieldinfo['qid']!=null)
    5217. 

  5217.         {
    5218. 

  5218.             $aFieldMappings[$sFieldname]=$iOldSID.'X'.$aGIDReplacements[$aFieldinfo['gid']].'X'.$aQIDReplacements[$aFieldinfo['qid']].$aFieldinfo['aid'];
    5219. 

  5219.             if ($aFieldinfo['type']=='1')
    5220. 

  5220.             {
    5221. 

  5221.                 $aFieldMappings[$sFieldname]=$aFieldMappings[$sFieldname].'#'.$aFieldinfo['scale_id'];
    5222. 

  5222.             }
    5223. 

  5223.             // now also add a shortened field mapping which is needed for certain kind of condition mappings
    5224. 

  5224.             $aFieldMappings[$iNewSID.'X'.$aFieldinfo['gid'].'X'.$aFieldinfo['qid']]=$iOldSID.'X'.$aGIDReplacements[$aFieldinfo['gid']].'X'.$aQIDReplacements[$aFieldinfo['qid']];
    5225. 

  5225.             // Shortened field mapping for timings table
    5226. 

  5226.             $aFieldMappings[$iNewSID.'X'.$aFieldinfo['gid']]=$iOldSID.'X'.$aGIDReplacements[$aFieldinfo['gid']];
    5227. 

  5227.         }
    5228. 

  5228.     }
    5229. 

  5229.     return array_flip($aFieldMappings);
    5230. 

  5230. }
    5231. 

  5231. 

  5232. /**
    5233. 

  5233. * put your comment there...
    5234. 

  5234. *
    5235. 

  5235. * @param mixed $id
    5236. 

  5236. * @param mixed $type
    5237. 

  5237. */
    5238. 

  5238. function hasResources($id,$type='survey')
    5239. 

  5239. {
    5240. 

  5240.     $dirname = Yii::app()->getConfig("uploaddir");
    5241. 

  5241. 

  5242.     if ($type == 'survey')
    5243. 

  5243.     {
    5244. 

  5244.         $dirname .= "/surveys/$id";
    5245. 

  5245.     }
    5246. 

  5246.     elseif ($type == 'label')
    5247. 

  5247.     {
    5248. 

  5248.         $dirname .= "/labels/$id";
    5249. 

  5249.     }
    5250. 

  5250.     else
    5251. 

  5251.     {
    5252. 

  5252.         return false;
    5253. 

  5253.     }
    5254. 

  5254. 

  5255.     if (is_dir($dirname) && $dh=opendir($dirname))
    5256. 

  5256.     {
    5257. 

  5257.         while(($entry = readdir($dh)) !== false)
    5258. 

  5258.         {
    5259. 

  5259.             if($entry !== '.' && $entry !== '..')
    5260. 

  5260.             {
    5261. 

  5261.                 return true;
    5262. 

  5262.                 break;
    5263. 

  5263.             }
    5264. 

  5264.         }
    5265. 

  5265.         closedir($dh);
    5266. 

  5266.     }
    5267. 

  5267.     else
    5268. 

  5268.     {
    5269. 

  5269.         return false;
    5270. 

  5270.     }
    5271. 

  5271. 

  5272.     return false;
    5273. 

  5273. }
    5274. 

  5274. 

  5275. /**
    5276. 

  5276. * Creates a random sequence of characters
    5277. 

  5277. *
    5278. 

  5278. * @param mixed $length Length of resulting string
    5279. 

  5279. * @param string $pattern To define which characters should be in the resulting string
    5280. 

  5280. */
    5281. 

  5281. function randomChars($length,$pattern="23456789abcdefghijkmnpqrstuvwxyz")
    5282. 

  5282. {
    5283. 

  5283.     $patternlength = strlen($pattern)-1;
    5284. 

  5284.     for($i=0;$i<$length;$i++)
    5285. 

  5285.     {
    5286. 

  5286.         if(isset($key))
    5287. 

  5287.             $key .= $pattern{rand(0,$patternlength)};
    5288. 

  5288.         else
    5289. 

  5289.             $key = $pattern{rand(0,$patternlength)};
    5290. 

  5290.     }
    5291. 

  5291.     return $key;
    5292. 

  5292. }
    5293. 

  5293. 

  5294. /**
    5295. 

  5295. * used to translate simple text to html (replacing \n with <br />
    5296. 

  5296. *
    5297. 

  5297. * @param mixed $mytext
    5298. 

  5298. * @param mixed $ishtml
    5299. 

  5299. * @return mixed
    5300. 

  5300. */
    5301. 

  5301. function conditionalNewlineToBreak($mytext,$ishtml,$encoded='')
    5302. 

  5302. {
    5303. 

  5303.     if ($ishtml === true)
    5304. 

  5304.     {
    5305. 

  5305.         // $mytext has been processed by clang->gT with html mode
    5306. 

  5306.         // and thus \n has already been translated to &#10;
    5307. 

  5307.         if ($encoded == '')
    5308. 

  5308.         {
    5309. 

  5309.             $mytext=str_replace('&#10;', '<br />',$mytext);
    5310. 

  5310.         }
    5311. 

  5311.         return str_replace("\n", '<br />',$mytext);
    5312. 

  5312.     }
    5313. 

  5313.     else
    5314. 

  5314.     {
    5315. 

  5315.         return $mytext;
    5316. 

  5316.     }
    5317. 

  5317. }
    5318. 

  5318. 

  5319. 

  5320. function breakToNewline( $data ) {
    5321. 

  5321.     return preg_replace( '!<br.*>!iU', "\n", $data );
    5322. 

  5322. }
    5323. 

  5323. 

  5324. function safeDie($text)
    5325. 

  5325. {
    5326. 

  5326.     //Only allowed tag: <br />
    5327. 

  5327.     $textarray=explode('<br />',$text);
    5328. 

  5328.     $textarray=array_map('htmlspecialchars',$textarray);
    5329. 

  5329.     die(implode( '<br />',$textarray));
    5330. 

  5330. }
    5331. 

  5331. 

  5332. function fixCKeditorText($str)
    5333. 

  5333. {
    5334. 

  5334.     $str = str_replace('<br type="_moz" />','',$str);
    5335. 

  5335.     if ($str == "<br />" || $str == " " || $str == "&nbsp;")
    5336. 

  5336.     {
    5337. 

  5337.         $str = "";
    5338. 

  5338.     }
    5339. 

  5339.     if (preg_match("/^[\s]+$/",$str))
    5340. 

  5340.     {
    5341. 

  5341.         $str='';
    5342. 

  5342.     }
    5343. 

  5343.     if ($str == "\n")
    5344. 

  5344.     {
    5345. 

  5345.         $str = "";
    5346. 

  5346.     }
    5347. 

  5347.     if (trim($str) == "&nbsp;" || trim($str)=='')
    5348. 

  5348.     { // chrome adds a single &nbsp; element to empty fckeditor fields
    5349. 

  5349.         $str = "";
    5350. 

  5350.     }
    5351. 

  5351. 

  5352.     return $str;
    5353. 

  5353. }
    5354. 

  5354. 

  5355. 

  5356. /**
    5357. 

  5357. * This is a helper function for getAttributeFieldNames
    5358. 

  5358. *
    5359. 

  5359. * @param mixed $fieldname
    5360. 

  5360. */
    5361. 

  5361. function filterForAttributes ($fieldname)
    5362. 

  5362. {
    5363. 

  5363.     if (strpos($fieldname,'attribute_')===false) return false; else return true;
    5364. 

  5364. }
    5365. 

  5365. 

  5366. /**
    5367. 

  5367. * Retrieves the attribute field names from the related token table
    5368. 

  5368. *
    5369. 

  5369. * @param mixed $iSurveyID  The survey ID
    5370. 

  5370. * @return array The fieldnames
    5371. 

  5371. */
    5372. 

  5372. function GetAttributeFieldNames($iSurveyID)
    5373. 

  5373. {
    5374. 

  5374.     if (!tableExists("{{tokens_{$iSurveyID}}}") || !$table = Yii::app()->db->schema->getTable('{{tokens_'.$iSurveyID.'}}'))
    5375. 

  5375.         return Array();
    5376. 

  5376. 

  5377.     return array_filter(array_keys($table->columns), 'filterForAttributes');
    5378. 

  5378. 

  5379. }
    5380. 

  5380. 

  5381. /**
    5382. 

  5382. * Returns the full list of attribute token fields including the properties for each field
    5383. 

  5383. * Use this instead of plain Survey::model()->findByPk($iSurveyID)->tokenAttributes calls because Survey::model()->findByPk($iSurveyID)->tokenAttributes may contain old descriptions where the fields does not physically exist
    5384. 

  5384. * 
    5385. 

  5385. * @param integer $iSurveyID The Survey ID
    5386. 

  5386. */
    5387. 

  5387. function GetParticipantAttributes($iSurveyID)
    5388. 

  5388. {
    5389. 

  5389.     if (!tableExists("{{tokens_{$iSurveyID}}}") || !$table = Yii::app()->db->schema->getTable('{{tokens_'.$iSurveyID.'}}'))
    5390. 

  5390.         return Array();
    5391. 

  5391.     $aFields= array_filter(array_keys($table->columns), 'filterForAttributes');
    5392. 

  5392.     $aTokenAttributes=Survey::model()->findByPk($iSurveyID)->tokenAttributes;
    5393. 

  5393.     if (count($aFields)==0) return  array();
    5394. 

  5394.     return array_intersect_key($aTokenAttributes,array_flip($aFields));
    5395. 

  5395. }
    5396. 

  5396. 

  5397. 

  5398. 

  5399. 

  5400. 

  5401. /**
    5402. 

  5402. * Retrieves the token field names usable for conditions from the related token table
    5403. 

  5403. *
    5404. 

  5404. * @param mixed $surveyid  The survey ID
    5405. 

  5405. * @return array The fieldnames
    5406. 

  5406. */
    5407. 

  5407. function getTokenConditionsFieldNames($surveyid)
    5408. 

  5408. {
    5409. 

  5409.     $extra_attrs=getAttributeFieldNames($surveyid);
    5410. 

  5410.     $basic_attrs=Array('firstname','lastname','email','token','language','sent','remindersent','remindercount');
    5411. 

  5411.     return array_merge($basic_attrs,$extra_attrs);
    5412. 

  5412. }
    5413. 

  5413. 

  5414. /**
    5415. 

  5415. * Retrieves the attribute names from the related token table
    5416. 

  5416. *
    5417. 

  5417. * @param mixed $surveyid  The survey ID
    5418. 

  5418. * @param boolean $bOnlyAttributes Set this to true if you only want the fieldnames of the additional attribue fields - defaults to false
    5419. 

  5419. * @return array The fieldnames as key and names as value in an Array
    5420. 

  5420. */
    5421. 

  5421. function getTokenFieldsAndNames($surveyid, $bOnlyAttributes = false)
    5422. 

  5422. {
    5423. 

  5423.     $clang = Yii::app()->lang;
    5424. 

  5424. 

  5425.     $aBasicTokenFields=array('firstname'=>array(
    5426. 

  5426.         'description'=>$clang->gT('First name'),
    5427. 

  5427.         'mandatory'=>'N',
    5428. 

  5428.         'showregister'=>'Y'
    5429. 

  5429.         ),
    5430. 

  5430.         'lastname'=>array(
    5431. 

  5431.             'description'=>$clang->gT('Last name'),
    5432. 

  5432.             'mandatory'=>'N',
    5433. 

  5433.             'showregister'=>'Y'
    5434. 

  5434.         ),                                                
    5435. 

  5435.         'email'=>array(
    5436. 

  5436.             'description'=>$clang->gT('Email address'),
    5437. 

  5437.             'mandatory'=>'N',
    5438. 

  5438.             'showregister'=>'Y'
    5439. 

  5439.         ),                                                
    5440. 

  5440.         'token'=>array(
    5441. 

  5441.             'description'=>$clang->gT('Token'),
    5442. 

  5442.             'mandatory'=>'N',
    5443. 

  5443.             'showregister'=>'Y'
    5444. 

  5444.         ),                                                
    5445. 

  5445.         'language'=>array(
    5446. 

  5446.             'description'=>$clang->gT('Language code'),
    5447. 

  5447.             'mandatory'=>'N',
    5448. 

  5448.             'showregister'=>'Y'
    5449. 

  5449.         ),                                                
    5450. 

  5450.         'sent'=>array(
    5451. 

  5451.             'description'=>$clang->gT('Invitation sent date'),
    5452. 

  5452.             'mandatory'=>'N',
    5453. 

  5453.             'showregister'=>'Y'
    5454. 

  5454.         ),                                                
    5455. 

  5455.         'remindersent'=>array(
    5456. 

  5456.             'description'=>$clang->gT('Last reminder sent date'),
    5457. 

  5457.             'mandatory'=>'N',
    5458. 

  5458.             'showregister'=>'Y'
    5459. 

  5459.         ),                                                
    5460. 

  5460.         'remindercount'=>array(
    5461. 

  5461.             'description'=>$clang->gT('Total numbers of sent reminders'),
    5462. 

  5462.             'mandatory'=>'N',
    5463. 

  5463.             'showregister'=>'Y'
    5464. 

  5464.         ),                                                
    5465. 

  5465.         'usesleft'=>array(
    5466. 

  5466.             'description'=>$clang->gT('Uses left'),
    5467. 

  5467.             'mandatory'=>'N',
    5468. 

  5468.             'showregister'=>'Y'
    5469. 

  5469.         ),                                                
    5470. 

  5470.     );
    5471. 

  5471. 

  5472.     $aExtraTokenFields=getAttributeFieldNames($surveyid);  
    5473. 

  5473.     $aSavedExtraTokenFields = Survey::model()->findByPk($surveyid)->tokenAttributes;
    5474. 

  5474. 

  5475.     // Drop all fields that are in the saved field description but not in the table definition
    5476. 

  5476.     $aSavedExtraTokenFields=array_intersect_key($aSavedExtraTokenFields,array_flip($aExtraTokenFields));
    5477. 

  5477.     
    5478. 

  5478.     // Now add all fields that are in the table but not in the field description
    5479. 

  5479.     foreach ($aExtraTokenFields as $sField)
    5480. 

  5480.     {
    5481. 

  5481.         if (!isset($aSavedExtraTokenFields[$sField]))
    5482. 

  5482.         {
    5483. 

  5483.             $aSavedExtraTokenFields[$sField]=array(
    5484. 

  5484.             'description'=>$sField,
    5485. 

  5485.             'mandatory'=>'N',
    5486. 

  5486.             'showregister'=>'N'
    5487. 

  5487.             );
    5488. 

  5488.         }
    5489. 

  5489.     }
    5490. 

  5490.     if ($bOnlyAttributes)
    5491. 

  5491.     {
    5492. 

  5492.         return $aSavedExtraTokenFields;
    5493. 

  5493.     }
    5494. 

  5494.     else
    5495. 

  5495.     {
    5496. 

  5496.         return array_merge($aBasicTokenFields,$aSavedExtraTokenFields);
    5497. 

  5497.     }
    5498. 

  5498. }
    5499. 

  5499. 

  5500. /**
    5501. 

  5501. * Retrieves the token attribute value from the related token table
    5502. 

  5502. *
    5503. 

  5503. * @param mixed $surveyid  The survey ID
    5504. 

  5504. * @param mixed $attrName  The token-attribute field name
    5505. 

  5505. * @param mixed $token  The token code
    5506. 

  5506. * @return string The token attribute value (or null on error)
    5507. 

  5507. */
    5508. 

  5508. function getAttributeValue($surveyid,$attrName,$token)
    5509. 

  5509. {
    5510. 

  5510.     $attrName=strtolower($attrName);
    5511. 

  5511.     if (!tableExists('tokens_'.$surveyid) || !in_array($attrName,getTokenConditionsFieldNames($surveyid)))
    5512. 

  5512.     {
    5513. 

  5513.         return null;
    5514. 

  5514.     }
    5515. 

  5515.     $surveyid=sanitize_int($surveyid);
    5516. 

  5516. 

  5517.     Tokens_dynamic::sid($surveyid);
    5518. 

  5518.     $query=Tokens_dynamic::model()->find(array("token"=>$token));
    5519. 

  5519. 

  5520.     $count=$query->count(); // OK  - AR count
    5521. 

  5521.     if ($count != 1)
    5522. 

  5522.     {
    5523. 

  5523.         return null;
    5524. 

  5524.     }
    5525. 

  5525.     else
    5526. 

  5526.     {
    5527. 

  5527.         return $row->$attrName;//[0]
    5528. 

  5528.     }
    5529. 

  5529. }
    5530. 

  5530. 

  5531. /**
    5532. 

  5532. * This function strips any content between and including <javascript> tags
    5533. 

  5533. *
    5534. 

  5534. * @param string $sContent String to clean
    5535. 

  5535. * @return string  Cleaned string
    5536. 

  5536. */
    5537. 

  5537. function stripJavaScript($sContent){
    5538. 

  5538.     $text = preg_replace('@<script[^>]*?>.*?</script>@si', '', $sContent);
    5539. 

  5539.     return $text;
    5540. 

  5540. }
    5541. 

  5541. 

  5542. /**
    5543. 

  5543. * This function converts emebedded Javascript to Text
    5544. 

  5544. *
    5545. 

  5545. * @param string $sContent String to clean
    5546. 

  5546. * @return string  Cleaned string
    5547. 

  5547. */
    5548. 

  5548. function showJavaScript($sContent){
    5549. 

  5549.     $text = preg_replace_callback ('@<script[^>]*?>.*?</script>@si',         create_function(
    5550. 

  5550.             // single quotes are essential here,
    5551. 

  5551.             // or alternative escape all $ as \$
    5552. 

  5552.             '$matches',
    5553. 

  5553.             'return htmlspecialchars($matches[0]);'
    5554. 

  5554.         ), $sContent);
    5555. 

  5555.     return $text;
    5556. 

  5556. }
    5557. 

  5557. 

  5558. /**
    5559. 

  5559. * This function cleans files from the temporary directory being older than 1 day
    5560. 

  5560. * @todo Make the days configurable
    5561. 

  5561. */
    5562. 

  5562. function cleanTempDirectory()
    5563. 

  5563. {
    5564. 

  5564.     $dir =  Yii::app()->getConfig('tempdir').DIRECTORY_SEPARATOR;
    5565. 

  5565.     $dp = opendir($dir) or show_error('Could not open temporary directory');
    5566. 

  5566.     while ($file = readdir($dp)) {
    5567. 

  5567.         if (is_file($dir.$file) && (filemtime($dir.$file)) < (strtotime('-1 days')) && $file!='index.html' && $file!='.gitignore' && $file!='readme.txt') {
    5568. 

  5568.             @unlink($dir.$file);
    5569. 

  5569.         }
    5570. 

  5570.     }
    5571. 

  5571.     $dir=  Yii::app()->getConfig('tempdir').DIRECTORY_SEPARATOR.'upload'.DIRECTORY_SEPARATOR;
    5572. 

  5572.     $dp = opendir($dir) or die ('Could not open temporary upload directory');
    5573. 

  5573.     while ($file = readdir($dp)) {
    5574. 

  5574.         if (is_file($dir.$file) && (filemtime($dir.$file)) < (strtotime('-1 days')) && $file!='index.html' && $file!='.gitignore' && $file!='readme.txt') {
    5575. 

  5575.             @unlink($dir.$file);
    5576. 

  5576.         }
    5577. 

  5577.     }
    5578. 

  5578.     closedir($dp);
    5579. 

  5579. }
    5580. 

  5580. 

  5581. function useFirebug()
    5582. 

  5582. {
    5583. 

  5583.     if(FIREBUG == true)
    5584. 

  5584.     {
    5585. 

  5585.         return '<script type="text/javascript" src="http://getfirebug.com/releases/lite/1.2/firebug-lite-compressed.js"></script>';
    5586. 

  5586.     };
    5587. 

  5587. };
    5588. 

  5588. 

  5589. /**
    5590. 

  5590. * This is a convenience function for the coversion of datetime values
    5591. 

  5591. *
    5592. 

  5592. * @param mixed $value
    5593. 

  5593. * @param mixed $fromdateformat
    5594. 

  5594. * @param mixed $todateformat
    5595. 

  5595. * @return string
    5596. 

  5596. */
    5597. 

  5597. function convertDateTimeFormat($value, $fromdateformat, $todateformat)
    5598. 

  5598. {
    5599. 

  5599.     Yii::import('application.libraries.Date_Time_Converter', true);
    5600. 

  5600.     $date = new Date_Time_Converter($value, $fromdateformat);
    5601. 

  5601.     return $date->convert($todateformat);
    5602. 

  5602. }
    5603. 

  5603. 

  5604. /**
    5605. 

  5605. * This function removes the UTF-8 Byte Order Mark from a string
    5606. 

  5606. *
    5607. 

  5607. * @param string $str
    5608. 

  5608. * @return string
    5609. 

  5609. */
    5610. 

  5610. function removeBOM($str=""){
    5611. 

  5611.     if(substr($str, 0,3) == pack("CCC",0xef,0xbb,0xbf)) {
    5612. 

  5612.         $str=substr($str, 3);
    5613. 

  5613.     }
    5614. 

  5614.     return $str;
    5615. 

  5615. }
    5616. 

  5616. 

  5617. /**
    5618. 

  5618. * This function requests the latest update information from the LimeSurvey.org website
    5619. 

  5619. *
    5620. 

  5620. * @returns array Contains update information or false if the request failed for some reason
    5621. 

  5621. */
    5622. 

  5622. /**********************************************/
    5623. 

  5623. /* This function needs ported still.          */
    5624. 

  5624. /**********************************************/
    5625. 

  5625. function getUpdateInfo()
    5626. 

  5626. {
    5627. 

  5627.     if (getGlobalSetting('SessionName')=='')
    5628. 

  5628.     {
    5629. 

  5629.         setGlobalSetting('SessionName',randomChars(64,'ABCDEFGHIJKLMNOPQRSTUVWXYZ!"$%&/()=?`+*~#",;.:abcdefghijklmnopqrstuvwxyz123456789'));
    5630. 

  5630.     }
    5631. 

  5631.     Yii::import('application.libraries.admin.http.httpRequestIt');
    5632. 

  5632.     $http=new httpRequestIt;
    5633. 

  5633. 

  5634.     $http->timeout=0;
    5635. 

  5635.     $http->data_timeout=0;
    5636. 

  5636.     $http->user_agent="Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)";
    5637. 

  5637.     $http->GetRequestArguments("http://update.limesurvey.org?build=".Yii::app()->getConfig("buildnumber").'&id='.md5(getGlobalSetting('SessionName')),$arguments);
    5638. 

  5638. 

  5639.     $updateinfo=false;
    5640. 

  5640.     $error=$http->Open($arguments);
    5641. 

  5641.     $error=$http->SendRequest($arguments);
    5642. 

  5642. 

  5643.     $http->ReadReplyHeaders($headers);
    5644. 

  5644. 

  5645. 

  5646.     if($error=="") {
    5647. 

  5647.         $body=''; $full_body='';
    5648. 

  5648.         for(;;){
    5649. 

  5649.             $error = $http->ReadReplyBody($body,10000);
    5650. 

  5650.             if($error != "" || strlen($body)==0) break;
    5651. 

  5651.             $full_body .= $body;
    5652. 

  5652.         }
    5653. 

  5653.         $updateinfo=json_decode($full_body,true);
    5654. 

  5654.         if ($http->response_status!='200')
    5655. 

  5655.         {
    5656. 

  5656.             $updateinfo['errorcode']=$http->response_status;
    5657. 

  5657.             $updateinfo['errorhtml']=$full_body;
    5658. 

  5658.         }
    5659. 

  5659.     }
    5660. 

  5660.     else
    5661. 

  5661.     {
    5662. 

  5662.         $updateinfo['errorcode']=$error;
    5663. 

  5663.         $updateinfo['errorhtml']=$error;
    5664. 

  5664.     }
    5665. 

  5665.     unset( $http );
    5666. 

  5666.     return $updateinfo;
    5667. 

  5667. }
    5668. 

  5668. 

  5669. /**
    5670. 

  5670. * This function updates the actual global variables if an update is available after using getUpdateInfo
    5671. 

  5671. * @return Array with update or error information
    5672. 

  5672. */
    5673. 

  5673. function updateCheck()
    5674. 

  5674. {
    5675. 

  5675.     $updateinfo=getUpdateInfo();
    5676. 

  5676.     if (isset($updateinfo['Targetversion']['build']) && (int)$updateinfo['Targetversion']['build']>(int)Yii::app()->getConfig('buildnumber') && trim(Yii::app()->getConfig('buildnumber'))!='')
    5677. 

  5677.     {
    5678. 

  5678.         setGlobalSetting('updateavailable',1);
    5679. 

  5679.         setGlobalSetting('updatebuild',$updateinfo['Targetversion']['build']);
    5680. 

  5680.         setGlobalSetting('updateversion',$updateinfo['Targetversion']['versionnumber']);
    5681. 

  5681.     }
    5682. 

  5682.     else
    5683. 

  5683.     {
    5684. 

  5684.         setGlobalSetting('updateavailable',0);
    5685. 

  5685.     }
    5686. 

  5686.     setGlobalSetting('updatelastcheck',date('Y-m-d H:i:s'));
    5687. 

  5687.     return $updateinfo;
    5688. 

  5688. }
    5689. 

  5689. 

  5690. /**
    5691. 

  5691. * Return the goodchars to be used when filtering input for numbers.
    5692. 

  5692. *
    5693. 

  5693. * @param $lang 	string	language used, for localisation
    5694. 

  5694. * @param $integer	bool	use only integer
    5695. 

  5695. * @param $negative	bool	allow negative values
    5696. 

  5696. */
    5697. 

  5697. function getNumericalFormat($lang = 'en', $integer = false, $negative = true) {
    5698. 

  5698.     $goodchars = "0123456789";
    5699. 

  5699.     if ($integer === false) $goodchars .= ".";    //Todo, add localisation
    5700. 

  5700.     if ($negative === true) $goodchars .= "-";    //Todo, check databases
    5701. 

  5701.     return $goodchars;
    5702. 

  5702. }
    5703. 

  5703. 

  5704. 

  5705. /**
    5706. 

  5706. * Return array with token attribute.
    5707. 

  5707. *
    5708. 

  5708. * @param $surveyid 	int	the surveyid
    5709. 

  5709. * @param $token	string	token code
    5710. 

  5710. *
    5711. 

  5711. * @return Array of token data
    5712. 

  5712. */
    5713. 

  5713. function getTokenData($surveyid, $token) 
    5714. 

  5714. {
    5715. 

  5715.     $thistoken = Tokens_dynamic::model($surveyid)->find('token = :token',array(':token' => $token));
    5716. 

  5716.     $thistokenarray=array(); // so has default value
    5717. 

  5717.     if($thistoken)
    5718. 

  5718.     {
    5719. 

  5719.         $thistokenarray =$thistoken->attributes;
    5720. 

  5720.     }// Did we fill with empty string if not exist ?
    5721. 

  5721. 

  5722.     return $thistokenarray;
    5723. 

  5723. }
    5724. 

  5724. 

  5725. /**
    5726. 

  5726. * This function returns the complete directory path to a given template name
    5727. 

  5727. *
    5728. 

  5728. * @param mixed $sTemplateName
    5729. 

  5729. */
    5730. 

  5730. function getTemplatePath($sTemplateName = false)
    5731. 

  5731. {
    5732. 

  5732.     if (!$sTemplateName)
    5733. 

  5733.     {
    5734. 

  5734.         $sTemplateName=Yii::app()->getConfig('defaulttemplate'); // if $sTemplateName is NULL or false or ""
    5735. 

  5735.     }
    5736. 

  5736.     if (isStandardTemplate($sTemplateName))
    5737. 

  5737.     {
    5738. 

  5738.         return Yii::app()->getConfig("standardtemplaterootdir").DIRECTORY_SEPARATOR.$sTemplateName;
    5739. 

  5739.     }
    5740. 

  5740.     else
    5741. 

  5741.     {
    5742. 

  5742.         if (is_dir(Yii::app()->getConfig("usertemplaterootdir").DIRECTORY_SEPARATOR.$sTemplateName))
    5743. 

  5743.         {
    5744. 

  5744.             return Yii::app()->getConfig("usertemplaterootdir").DIRECTORY_SEPARATOR.$sTemplateName;
    5745. 

  5745.         }
    5746. 

  5746.         elseif (isStandardTemplate(Yii::app()->getConfig('defaulttemplate')))
    5747. 

  5747.         {
    5748. 

  5748.             return Yii::app()->getConfig("standardtemplaterootdir").DIRECTORY_SEPARATOR.$sTemplateName;
    5749. 

  5749.         }
    5750. 

  5750.         elseif (file_exists(Yii::app()->getConfig("usertemplaterootdir").DIRECTORY_SEPARATOR.Yii::app()->getConfig('defaulttemplate')))
    5751. 

  5751.         {
    5752. 

  5752.             return Yii::app()->getConfig("usertemplaterootdir").DIRECTORY_SEPARATOR.Yii::app()->getConfig('defaulttemplate');
    5753. 

  5753.         }
    5754. 

  5754.         else
    5755. 

  5755.         {
    5756. 

  5756.             return Yii::app()->getConfig("standardtemplaterootdir").DIRECTORY_SEPARATOR.'default';
    5757. 

  5757.         }
    5758. 

  5758.     }
    5759. 

  5759. }
    5760. 

  5760. 

  5761. /**
    5762. 

  5762. * This function returns the complete URL path to a given template name
    5763. 

  5763. *
    5764. 

  5764. * @param mixed $sTemplateName
    5765. 

  5765. */
    5766. 

  5766. function getTemplateURL($sTemplateName)
    5767. 

  5767. {
    5768. 

  5768.     if (isStandardTemplate($sTemplateName))
    5769. 

  5769.     {
    5770. 

  5770.         return Yii::app()->getConfig("standardtemplaterooturl").'/'.$sTemplateName;
    5771. 

  5771.     }
    5772. 

  5772.     else
    5773. 

  5773.     {
    5774. 

  5774.         if (file_exists(Yii::app()->getConfig("usertemplaterootdir").'/'.$sTemplateName))
    5775. 

  5775.         {
    5776. 

  5776.             return Yii::app()->getConfig("usertemplaterooturl").'/'.$sTemplateName;
    5777. 

  5777.         }
    5778. 

  5778.         elseif (file_exists(Yii::app()->getConfig("usertemplaterootdir").'/'.Yii::app()->getConfig('defaulttemplate')))
    5779. 

  5779.         {
    5780. 

  5780.             return Yii::app()->getConfig("usertemplaterooturl").'/'.Yii::app()->getConfig('defaulttemplate');
    5781. 

  5781.         }
    5782. 

  5782.         elseif (file_exists(Yii::app()->getConfig("standardtemplaterootdir").'/'.Yii::app()->getConfig('defaulttemplate')))
    5783. 

  5783.         {
    5784. 

  5784.             return Yii::app()->getConfig("standardtemplaterooturl").'/'.Yii::app()->getConfig('defaulttemplate');
    5785. 

  5785.         }
    5786. 

  5786.         else
    5787. 

  5787.         {
    5788. 

  5788.             return Yii::app()->getConfig("standardtemplaterooturl").'/default';
    5789. 

  5789.         }
    5790. 

  5790.     }
    5791. 

  5791. }
    5792. 

  5792. 

  5793. /**
    5794. 

  5794. * Return an array of subquestions for a given sid/qid
    5795. 

  5795. *
    5796. 

  5796. * @param int $sid
    5797. 

  5797. * @param int $qid
    5798. 

  5798. * @param $sLanguage Language of the subquestion text
    5799. 

  5799. */
    5800. 

  5800. function getSubQuestions($sid, $qid, $sLanguage) {
    5801. 

  5801. 

  5802.     static $subquestions;
    5803. 

  5803. 

  5804.     if (!isset($subquestions[$sid]))
    5805. 

  5805.     {
    5806. 

  5806.         $subquestions[$sid]=array();
    5807. 

  5807.     }
    5808. 

  5808.     if (!isset($subquestions[$sid][$sLanguage])) {
    5809. 

  5809. 

  5810.         $query = "SELECT sq.*, q.other FROM {{questions}} as sq, {{questions}} as q"
    5811. 

  5811.         ." WHERE sq.parent_qid=q.qid AND q.sid=".$sid
    5812. 

  5812.         ." AND sq.language='".$sLanguage. "' "
    5813. 

  5813.         ." AND q.language='".$sLanguage. "' "
    5814. 

  5814.         ." ORDER BY sq.parent_qid, q.question_order,sq.scale_id , sq.question_order";
    5815. 

  5815. 

  5816.         $query = Yii::app()->db->createCommand($query)->query();
    5817. 

  5817. 

  5818.         $resultset=array();
    5819. 

  5819.         //while ($row=$result->FetchRow())
    5820. 

  5820.         foreach ($query->readAll() as $row)
    5821. 

  5821.         {
    5822. 

  5822.             $resultset[$row['parent_qid']][] = $row;
    5823. 

  5823.         }
    5824. 

  5824.         $subquestions[$sid][$sLanguage] = $resultset;
    5825. 

  5825.     }
    5826. 

  5826.     if (isset($subquestions[$sid][$sLanguage][$qid])) return $subquestions[$sid][$sLanguage][$qid];
    5827. 

  5827.     return array();
    5828. 

  5828. }
    5829. 

  5829. 

  5830. /**
    5831. 

  5831. * Wrapper function to retrieve an xmlwriter object and do error handling if it is not compiled
    5832. 

  5832. * into PHP
    5833. 

  5833. */
    5834. 

  5834. function getXMLWriter() {
    5835. 

  5835.     if (!extension_loaded('xmlwriter')) {
    5836. 

  5836.         safeDie('XMLWriter class not compiled into PHP, please contact your system administrator');
    5837. 

  5837.     } else {
    5838. 

  5838.         $xmlwriter = new XMLWriter();
    5839. 

  5839.     }
    5840. 

  5840.     return $xmlwriter;
    5841. 

  5841. }
    5842. 

  5842. 

  5843. 

  5844. /**
    5845. 

  5845. * Returns true when a token can not be used (either doesn't exist, has less then one usage left )
    5846. 

  5846. *
    5847. 

  5847. * @param mixed $tid Token
    5848. 

  5848. */
    5849. 

  5849. function usedTokens($token, $surveyid)
    5850. 

  5850. {
    5851. 

  5851.     $utresult = true;
    5852. 

  5852.     $query=Tokens_dynamic::model($surveyid)->findAllByAttributes(array("token"=>$token));
    5853. 

  5853.     if (count($query) > 0) {
    5854. 

  5854.         $row = $query[0];
    5855. 

  5855.         if ($row->usesleft > 0) $utresult = false;
    5856. 

  5856.     }
    5857. 

  5857.     return $utresult;
    5858. 

  5858. }
    5859. 

  5859. 

  5860. /**
    5861. 

  5861. * SSLRedirect() generates a redirect URL for the appropriate SSL mode then applies it.
    5862. 

  5862. * (Was redirect() before CodeIgniter port.)
    5863. 

  5863. *
    5864. 

  5864. * @param $enforceSSLMode string 's' or '' (empty).
    5865. 

  5865. */
    5866. 

  5866. function SSLRedirect($enforceSSLMode)
    5867. 

  5867. {
    5868. 

  5868.     $url = 'http'.$enforceSSLMode.'://'.$_SERVER['HTTP_HOST'].$_SERVER['REQUEST_URI'];
    5869. 

  5869.     if (!headers_sent())
    5870. 

  5870.     {	// If headers not sent yet... then do php redirect
    5871. 

  5871.         //ob_clean();
    5872. 

  5872.         header('Location: '.$url);
    5873. 

  5873.         //ob_flush();
    5874. 

  5874.         exit;
    5875. 

  5875.     };
    5876. 

  5876. };
    5877. 

  5877. 

  5878. /**
    5879. 

  5879. * enforceSSLMode() $force_ssl is on or off, it checks if the current
    5880. 

  5880. * request is to HTTPS (or not). If $force_ssl is on, and the
    5881. 

  5881. * request is not to HTTPS, it redirects the request to the HTTPS
    5882. 

  5882. * version of the URL, if the request is to HTTPS, it rewrites all
    5883. 

  5883. * the URL variables so they also point to HTTPS.
    5884. 

  5884. */
    5885. 

  5885. function enforceSSLMode()
    5886. 

  5886. {
    5887. 

  5887.     $bSSLActive = (!empty($_SERVER['HTTPS']) && $_SERVER['HTTPS'] != "off");
    5888. 

  5888.     if (Yii::app()->getConfig('ssl_emergency_override') !== true )
    5889. 

  5889.     {
    5890. 

  5890.         $force_ssl = strtolower(getGlobalSetting('force_ssl'));
    5891. 

  5891.     }
    5892. 

  5892.     else
    5893. 

  5893.     {
    5894. 

  5894.         $force_ssl = 'off';
    5895. 

  5895.     };
    5896. 

  5896.     if( $force_ssl == 'on' && !$bSSLActive )
    5897. 

  5897.     {
    5898. 

  5898.         SSLRedirect('s');
    5899. 

  5899.     }
    5900. 

  5900.     if( $force_ssl == 'off' && $bSSLActive)
    5901. 

  5901.     {
    5902. 

  5902.         SSLRedirect('');
    5903. 

  5903.     };
    5904. 

  5904. };
    5905. 

  5905. 

  5906. /**
    5907. 

  5907. * Returns the number of answers matching the quota
    5908. 

  5908. *
    5909. 

  5909. * @param int $iSurveyId - Survey identification number
    5910. 

  5910. * @param int $quotaid - quota id for which you want to compute the completed field
    5911. 

  5911. * @return mixed - Integer of matching entries in the result DB or 'N/A'
    5912. 

  5912. */
    5913. 

  5913. function getQuotaCompletedCount($iSurveyId, $quotaid)
    5914. 

  5914. {
    5915. 

  5915.     $result = "N/A";
    5916. 

  5916.     $quota_info = getQuotaInformation($iSurveyId, Survey::model()->findByPk($iSurveyId)->language, $quotaid);
    5917. 

  5917.     $quota = $quota_info[0];
    5918. 

  5918. 

  5919.     if (Yii::app()->db->schema->getTable('{{survey_' . $iSurveyId . '}}') &&
    5920. 

  5920.     count($quota['members']) > 0)
    5921. 

  5921.     {
    5922. 

  5922.         // Keep a list of fields for easy reference
    5923. 

  5923.         $fields_list = array();
    5924. 

  5924. 

  5925.         // Construct an array of value for each $quota['members']['fieldnames']
    5926. 

  5926.         $fields_query = array();
    5927. 

  5927. 

  5928.         foreach ($quota['members'] as $member)
    5929. 

  5929.         {
    5930. 

  5930.             $criteria = new CDbCriteria;
    5931. 

  5931. 

  5932.             foreach ($member['fieldnames'] as $fieldname)
    5933. 

  5933.             {
    5934. 

  5934.                 if (!in_array($fieldname, $fields_list))
    5935. 

  5935.                     $fields_list[] = $fieldname;
    5936. 

  5936. 

  5937.                 $criteria->addColumnCondition(array($fieldname => $member['value']), 'OR');
    5938. 

  5938.             }
    5939. 

  5939. 

  5940.             $fields_query[$fieldname] = $criteria;
    5941. 

  5941.         }
    5942. 

  5942. 

  5943.         $criteria = new CDbCriteria;
    5944. 

  5944. 

  5945.         foreach ($fields_list as $fieldname)
    5946. 

  5946.             $criteria->mergeWith($fields_query[$fieldname]);
    5947. 

  5947. 

  5948.         $result = Survey_dynamic::model($iSurveyId)->count($criteria);
    5949. 

  5949.     }
    5950. 

  5950. 

  5951.     return $result;
    5952. 

  5952. }
    5953. 

  5953. 

  5954. /**
    5955. 

  5955. * Creates an array with details on a particular response for display purposes
    5956. 

  5956. * Used in Print answers, Detailed response view and Detailed admin notification email
    5957. 

  5957. *
    5958. 

  5958. * @param mixed $iSurveyID
    5959. 

  5959. * @param mixed $iResponseID
    5960. 

  5960. * @param mixed $sLanguageCode
    5961. 

  5961. * @param boolean $bHonorConditions Apply conditions
    5962. 

  5962. */
    5963. 

  5963. function getFullResponseTable($iSurveyID, $iResponseID, $sLanguageCode, $bHonorConditions=false)
    5964. 

  5964. {
    5965. 

  5965.     $aFieldMap = createFieldMap($iSurveyID,'full',false,false,$sLanguageCode);
    5966. 

  5966.     $oLanguage = new Limesurvey_lang($sLanguageCode);
    5967. 

  5967. 

  5968.     //Get response data
    5969. 

  5969.     $idrow = Survey_dynamic::model($iSurveyID)->findByAttributes(array('id'=>$iResponseID));
    5970. 

  5970. 

  5971.     // Create array of non-null values - those are the relevant ones
    5972. 

  5972.     $aRelevantFields = array();
    5973. 

  5973. 

  5974.     foreach ($aFieldMap as $sKey=>$fname)
    5975. 

  5975.     {
    5976. 

  5976.         if (LimeExpressionManager::QuestionIsRelevant($fname['qid']))
    5977. 

  5977.         {
    5978. 

  5978.             $aRelevantFields[$sKey]=$fname;
    5979. 

  5979.         }
    5980. 

  5980.     }
    5981. 

  5981. 

  5982.     $aResultTable=array();
    5983. 

  5983.     $oldgid = 0;
    5984. 

  5984.     $oldqid = 0;
    5985. 

  5985.     foreach ($aRelevantFields as $sKey=>$fname)
    5986. 

  5986.     {
    5987. 

  5987.         if (!empty($fname['qid']))
    5988. 

  5988.         {
    5989. 

  5989.             $attributes = getQuestionAttributeValues($fname['qid']);
    5990. 

  5990.             if (getQuestionAttributeValue($attributes, 'hidden') == 1)
    5991. 

  5991.             {
    5992. 

  5992.                 continue;
    5993. 

  5993.             }
    5994. 

  5994.         }
    5995. 

  5995.         $question = $fname['question'];
    5996. 

  5996.         $subquestion='';
    5997. 

  5997.         if (isset($fname['gid']) && !empty($fname['gid'])) {
    5998. 

  5998.             //Check to see if gid is the same as before. if not show group name
    5999. 

  5999.             if ($oldgid !== $fname['gid'])
    6000. 

  6000.             {
    6001. 

  6001.                 $oldgid = $fname['gid'];
    6002. 

  6002.                 if (LimeExpressionManager::GroupIsRelevant($fname['gid'])) {
    6003. 

  6003.                     $aResultTable['gid_'.$fname['gid']]=array($fname['group_name']);
    6004. 

  6004.                 }
    6005. 

  6005.             }
    6006. 

  6006.         }
    6007. 

  6007.         if (!empty($fname['qid']))
    6008. 

  6008.         {
    6009. 

  6009.             if ($oldqid !== $fname['qid'])
    6010. 

  6010.             {
    6011. 

  6011.                 $oldqid = $fname['qid'];
    6012. 

  6012.                 if (isset($fname['subquestion']) || isset($fname['subquestion1']) || isset($fname['subquestion2']))
    6013. 

  6013.                 {
    6014. 

  6014.                     $aResultTable['qid_'.$fname['sid'].'X'.$fname['gid'].'X'.$fname['qid']]=array($fname['question'],'','');
    6015. 

  6015.                 }
    6016. 

  6016.                 else
    6017. 

  6017.                 {
    6018. 

  6018.                     $answer = getExtendedAnswer($iSurveyID,$fname['fieldname'], $idrow[$fname['fieldname']],$oLanguage);
    6019. 

  6019.                     $aResultTable[$fname['fieldname']]=array($question,'',$answer);
    6020. 

  6020.                     continue;
    6021. 

  6021.                 }
    6022. 

  6022.             }
    6023. 

  6023.         }
    6024. 

  6024.         else
    6025. 

  6025.         {
    6026. 

  6026.             $answer=getExtendedAnswer($iSurveyID,$fname['fieldname'], $idrow[$fname['fieldname']],$oLanguage);
    6027. 

  6027.             $aResultTable[$fname['fieldname']]=array($question,'',$answer);
    6028. 

  6028.             continue;
    6029. 

  6029.         }
    6030. 

  6030.         if (isset($fname['subquestion']))
    6031. 

  6031.             $subquestion = "{$fname['subquestion']}";
    6032. 

  6032. 

  6033.         if (isset($fname['subquestion1']))
    6034. 

  6034.             $subquestion = "{$fname['subquestion1']}";
    6035. 

  6035. 

  6036.         if (isset($fname['subquestion2']))
    6037. 

  6037.             $subquestion .= "[{$fname['subquestion2']}]";
    6038. 

  6038. 

  6039.         $answer = getExtendedAnswer($iSurveyID,$fname['fieldname'], $idrow[$fname['fieldname']],$oLanguage);
    6040. 

  6040.         $aResultTable[$fname['fieldname']]=array('',$subquestion,$answer);
    6041. 

  6041.     }
    6042. 

  6042.     return $aResultTable;
    6043. 

  6043. }
    6044. 

  6044. 

  6045. /**
    6046. 

  6046. * Check if $str is an integer, or string representation of an integer
    6047. 

  6047. *
    6048. 

  6048. * @param mixed $mStr
    6049. 

  6049. */
    6050. 

  6050. function isNumericInt($mStr)
    6051. 

  6051. {
    6052. 

  6052.     if(is_int($mStr))
    6053. 

  6053.         return true;
    6054. 

  6054.     elseif(is_string($mStr))
    6055. 

  6055.         return preg_match("/^[0-9]+$/", $mStr);
    6056. 

  6056.     return false;
    6057. 

  6057. }
    6058. 

  6058. 

  6059. 

  6060. /**
    6061. 

  6061. * Include Keypad headers
    6062. 

  6062. */
    6063. 

  6063. function includeKeypad()
    6064. 

  6064. {
    6065. 

  6065.     $clang = Yii::app()->lang;
    6066. 

  6066.     header_includes(Yii::app()->getConfig('generalscripts').'jquery/jquery.keypad.min.js');
    6067. 

  6067.     if ($clang->langcode != 'en')
    6068. 

  6068.     {
    6069. 

  6069.         header_includes(Yii::app()->getConfig('generalscripts').'jquery/locale/jquery.ui.keypad-'.$clang->langcode.'.js');
    6070. 

  6070.     }
    6071. 

  6071.     header_includes('jquery.keypad.alt.css','css');
    6072. 

  6072. }
    6073. 

  6073. 

  6074. /**
    6075. 

  6075. * getQuotaInformation() returns quota information for the current survey
    6076. 

  6076. * @param string $surveyid - Survey identification number
    6077. 

  6077. * @param string $quotaid - Optional quotaid that restricts the result to a given quota
    6078. 

  6078. * @return array - nested array, Quotas->Members->Fields
    6079. 

  6079. */
    6080. 

  6080. function getQuotaInformation($surveyid,$language,$iQuotaID='all')
    6081. 

  6081. {
    6082. 

  6082.     global $clienttoken;
    6083. 

  6083.     $baselang = Survey::model()->findByPk($surveyid)->language;
    6084. 

  6084.     $aAttributes=array('sid' => $surveyid);
    6085. 

  6085.     if ($iQuotaID != 'all')
    6086. 

  6086.     {
    6087. 

  6087.         $aAttributes['id'] = $iQuotaID;
    6088. 

  6088.     }
    6089. 

  6089.     
    6090. 

  6090.     $result = Quota::model()->with(array('languagesettings' => array('condition' => "quotals_language='$language'")))->findAllByAttributes($aAttributes);
    6091. 

  6091.     $quota_info = array();
    6092. 

  6092.     $x=0;
    6093. 

  6093. 

  6094.     $surveyinfo=getSurveyInfo($surveyid);
    6095. 

  6095. 

  6096.     // Check all quotas for the current survey
    6097. 

  6097.     //if ($result->RecordCount() > 0)
    6098. 

  6098.     if (count($result) > 0)
    6099. 

  6099.     {
    6100. 

  6100.         //while ($survey_quotas = $result->FetchRow())
    6101. 

  6101.         foreach ($result as $_survey_quotas)
    6102. 

  6102.         {
    6103. 

  6103.             $survey_quotas = $_survey_quotas->attributes;
    6104. 

  6104.             // !!! Doubting this
    6105. 

  6105.             foreach ($_survey_quotas->languagesettings[0] as $k => $v)
    6106. 

  6106.                 $survey_quotas[$k] = $v;
    6107. 

  6107. 

  6108.             array_push($quota_info,array('Name' => $survey_quotas['name'],
    6109. 

  6109.             'Limit' => $survey_quotas['qlimit'],
    6110. 

  6110.             'Action' => $survey_quotas['action'],
    6111. 

  6111.             'Message' => $survey_quotas['quotals_message'],
    6112. 

  6112.             'Url' => $survey_quotas['quotals_url'],
    6113. 

  6113.             'UrlDescrip' => $survey_quotas['quotals_urldescrip'],
    6114. 

  6114.             'AutoloadUrl' => $survey_quotas['autoload_url']));
    6115. 

  6115. 

  6116.             $result_qe = Quota_members::model()->findAllByAttributes(array('quota_id'=>$survey_quotas['id']));
    6117. 

  6117.             $quota_info[$x]['members'] = array();
    6118. 

  6118.             if (count($result_qe) > 0)
    6119. 

  6119.             {
    6120. 

  6120.                 foreach ($result_qe as $quota_entry)
    6121. 

  6121.                 {
    6122. 

  6122.                     $quota_entry = $quota_entry->attributes;
    6123. 

  6123.                     $result_quest=Questions::model()->findByAttributes(array('qid'=>$quota_entry['qid'], 'language'=>$baselang));
    6124. 

  6124.                     $qtype=$result_quest->attributes;
    6125. 

  6125. 

  6126.                     $fieldnames = "0";
    6127. 

  6127. 

  6128.                     if ($qtype['type'] == "I" || $qtype['type'] == "G" || $qtype['type'] == "Y")
    6129. 

  6129.                     {
    6130. 

  6130.                         $fieldnames=array(0 => $surveyid.'X'.$qtype['gid'].'X'.$quota_entry['qid']);
    6131. 

  6131.                         $value = $quota_entry['code'];
    6132. 

  6132.                     }
    6133. 

  6133. 

  6134.                     if($qtype['type'] == "L" || $qtype['type'] == "O" || $qtype['type'] =="!")
    6135. 

  6135.                     {
    6136. 

  6136.                         $fieldnames=array(0 => $surveyid.'X'.$qtype['gid'].'X'.$quota_entry['qid']);
    6137. 

  6137.                         $value = $quota_entry['code'];
    6138. 

  6138.                     }
    6139. 

  6139. 

  6140.                     if($qtype['type'] == "M")
    6141. 

  6141.                     {
    6142. 

  6142.                         $fieldnames=array(0 => $surveyid.'X'.$qtype['gid'].'X'.$quota_entry['qid'].$quota_entry['code']);
    6143. 

  6143.                         $value = "Y";
    6144. 

  6144.                     }
    6145. 

  6145. 

  6146.                     if($qtype['type'] == "A" || $qtype['type'] == "B")
    6147. 

  6147.                     {
    6148. 

  6148.                         $temp = explode('-',$quota_entry['code']);
    6149. 

  6149.                         $fieldnames=array(0 => $surveyid.'X'.$qtype['gid'].'X'.$quota_entry['qid'].$temp[0]);
    6150. 

  6150.                         $value = $temp[1];
    6151. 

  6151.                     }
    6152. 

  6152. 

  6153.                     array_push($quota_info[$x]['members'],array('Title' => $qtype['title'],
    6154. 

  6154.                     'type' => $qtype['type'],
    6155. 

  6155.                     'code' => $quota_entry['code'],
    6156. 

  6156.                     'value' => $value,
    6157. 

  6157.                     'qid' => $quota_entry['qid'],
    6158. 

  6158.                     'fieldnames' => $fieldnames));
    6159. 

  6159.                 }
    6160. 

  6160.             }
    6161. 

  6161.             $x++;
    6162. 

  6162.         }
    6163. 

  6163.     }
    6164. 

  6164.     return $quota_info;
    6165. 

  6165. }
    6166. 

  6166. 

  6167. /**
    6168. 

  6168. * This function replaces the old insertans tags with new ones across a survey
    6169. 

  6169. *
    6170. 

  6170. * @param string $newsid  Old SID
    6171. 

  6171. * @param string $oldsid  New SID
    6172. 

  6172. * @param mixed $fieldnames Array  array('oldfieldname'=>'newfieldname')
    6173. 

  6173. */
    6174. 

  6174. function translateInsertansTags($newsid,$oldsid,$fieldnames)
    6175. 

  6175. {
    6176. 

  6176.     uksort($fieldnames, create_function('$a,$b', 'return strlen($a) < strlen($b);'));
    6177. 

  6177. 

  6178.     Yii::app()->loadHelper('database');
    6179. 

  6179.     $newsid=sanitize_int($newsid);
    6180. 

  6180.     $oldsid=sanitize_int($oldsid);
    6181. 

  6181. 

  6182.     # translate 'surveyls_urldescription' and 'surveyls_url' INSERTANS tags in surveyls
    6183. 

  6183.     $sql = "SELECT surveyls_survey_id, surveyls_language, surveyls_urldescription, surveyls_url from {{surveys_languagesettings}}
    6184. 

  6184.     WHERE surveyls_survey_id=".$newsid." AND (surveyls_urldescription LIKE '%{$oldsid}X%' OR surveyls_url LIKE '%{$oldsid}X%')";
    6185. 

  6185.     $result = dbExecuteAssoc($sql) or show_error("Can't read groups table in transInsertAns ");     // Checked
    6186. 

  6186. 

  6187.     //while ($qentry = $res->FetchRow())
    6188. 

  6188.     foreach ($result->readAll() as $qentry)
    6189. 

  6189.     {
    6190. 

  6190.         $urldescription = $qentry['surveyls_urldescription'];
    6191. 

  6191.         $endurl  = $qentry['surveyls_url'];
    6192. 

  6192.         $language = $qentry['surveyls_language'];
    6193. 

  6193. 

  6194.         foreach ($fieldnames as $sOldFieldname=>$sNewFieldname)
    6195. 

  6195.         {
    6196. 

  6196.             $pattern = $sOldFieldname;
    6197. 

  6197.             $replacement = $sNewFieldname;
    6198. 

  6198.             $urldescription=preg_replace('/'.$pattern.'/', $replacement, $urldescription);
    6199. 

  6199.             $endurl=preg_replace('/'.$pattern.'/', $replacement, $endurl);
    6200. 

  6200.         }
    6201. 

  6201. 

  6202.         if (strcmp($urldescription,$qentry['surveyls_urldescription']) !=0  ||
    6203. 

  6203.         (strcmp($endurl,$qentry['surveyls_url']) !=0))
    6204. 

  6204.         {
    6205. 

  6205. 

  6206.             // Update Field
    6207. 

  6207. 

  6208.             $data = array(
    6209. 

  6209.             'surveyls_urldescription' => $urldescription,
    6210. 

  6210.             'surveyls_url' => $endurl
    6211. 

  6211.             );
    6212. 

  6212. 

  6213.             $where = array(
    6214. 

  6214.             'surveyls_survey_id' => $newsid,
    6215. 

  6215.             'surveyls_language' => $language
    6216. 

  6216.             );
    6217. 

  6217. 

  6218.             Surveys_languagesettings::model()->updateRecord($data,$where);
    6219. 

  6219. 

  6220.         } // Enf if modified
    6221. 

  6221.     } // end while qentry
    6222. 

  6222. 

  6223.     # translate 'quotals_urldescrip' and 'quotals_url' INSERTANS tags in quota_languagesettings
    6224. 

  6224.     $sql = "SELECT quotals_id, quotals_urldescrip, quotals_url from {{quota_languagesettings}} qls, {{quota}} q
    6225. 

  6225.     WHERE sid=".$newsid." AND q.id=qls.quotals_quota_id AND (quotals_urldescrip LIKE '%{$oldsid}X%' OR quotals_url LIKE '%{$oldsid}X%')";
    6226. 

  6226.     $result = dbExecuteAssoc($sql) or safeDie("Can't read quota table in transInsertAns");     // Checked
    6227. 

  6227. 

  6228.     foreach ($result->readAll() as $qentry)
    6229. 

  6229.     {
    6230. 

  6230.         $urldescription = $qentry['quotals_urldescrip'];
    6231. 

  6231.         $endurl  = $qentry['quotals_url'];
    6232. 

  6232. 

  6233.         foreach ($fieldnames as $sOldFieldname=>$sNewFieldname)
    6234. 

  6234.         {
    6235. 

  6235.             $pattern = $sOldFieldname;
    6236. 

  6236.             $replacement = $sNewFieldname;
    6237. 

  6237.             $urldescription=preg_replace('/'.$pattern.'/', $replacement, $urldescription);
    6238. 

  6238.             $endurl=preg_replace('/'.$pattern.'/', $replacement, $endurl);
    6239. 

  6239.         }
    6240. 

  6240. 

  6241.         if (strcmp($urldescription,$qentry['quotals_urldescrip']) !=0  || (strcmp($endurl,$qentry['quotals_url']) !=0))
    6242. 

  6242.         {
    6243. 

  6243.             // Update Field
    6244. 

  6244.             $sqlupdate = "UPDATE {{quota_languagesettings}} SET quotals_urldescrip='".$urldescription."', quotals_url='".$endurl."' WHERE quotals_id={$qentry['quotals_id']}";
    6245. 

  6245.             $updateres=dbExecuteAssoc($sqlupdate) or safeDie ("Couldn't update INSERTANS in quota_languagesettings<br />$sqlupdate<br />");    //Checked
    6246. 

  6246.         } // Enf if modified
    6247. 

  6247.     } // end while qentry
    6248. 

  6248. 

  6249.     # translate 'description' INSERTANS tags in groups
    6250. 

  6250.     $sql = "SELECT gid, language, group_name, description from {{groups}}
    6251. 

  6251.     WHERE sid=".$newsid." AND description LIKE '%{$oldsid}X%' OR group_name LIKE '%{$oldsid}X%'";
    6252. 

  6252.     $res = dbExecuteAssoc($sql) or show_error("Can't read groups table in transInsertAns");     // Checked
    6253. 

  6253. 

  6254.     //while ($qentry = $res->FetchRow())
    6255. 

  6255.     foreach ($res->readAll() as $qentry)
    6256. 

  6256.     {
    6257. 

  6257.         $gpname = $qentry['group_name'];
    6258. 

  6258.         $description = $qentry['description'];
    6259. 

  6259.         $gid = $qentry['gid'];
    6260. 

  6260.         $language = $qentry['language'];
    6261. 

  6261. 

  6262.         foreach ($fieldnames as $sOldFieldname=>$sNewFieldname)
    6263. 

  6263.         {
    6264. 

  6264.             $pattern = $sOldFieldname;
    6265. 

  6265.             $replacement = $sNewFieldname;
    6266. 

  6266.             $gpname = preg_replace('/'.$pattern.'/', $replacement, $gpname);
    6267. 

  6267.             $description=preg_replace('/'.$pattern.'/', $replacement, $description);
    6268. 

  6268.         }
    6269. 

  6269. 

  6270.         if (strcmp($description,$qentry['description']) !=0  ||
    6271. 

  6271.         strcmp($gpname,$qentry['group_name']) !=0)
    6272. 

  6272.         {
    6273. 

  6273.             // Update Fields
    6274. 

  6274. 

  6275.             $data = array(
    6276. 

  6276.             'description' => $description,
    6277. 

  6277.             'group_name' => $gpname
    6278. 

  6278.             );
    6279. 

  6279. 

  6280.             $where = array(
    6281. 

  6281.             'gid' => $gid,
    6282. 

  6282.             'language' => $language
    6283. 

  6283.             );
    6284. 

  6284. 

  6285.             Groups::model()->update($data,$where);
    6286. 

  6286. 

  6287.         } // Enf if modified
    6288. 

  6288.     } // end while qentry
    6289. 

  6289. 

  6290.     # translate 'question' and 'help' INSERTANS tags in questions
    6291. 

  6291.     $sql = "SELECT qid, language, question, help from {{questions}}
    6292. 

  6292.     WHERE sid=".$newsid." AND (question LIKE '%{$oldsid}X%' OR help LIKE '%{$oldsid}X%')";
    6293. 

  6293.     $result = dbExecuteAssoc($sql) or die("Can't read question table in transInsertAns ");     // Checked
    6294. 

  6294. 

  6295.     //while ($qentry = $res->FetchRow())
    6296. 

  6296.     $aResultData=$result->readAll() ;
    6297. 

  6297.     foreach ($aResultData as $qentry)
    6298. 

  6298.     {
    6299. 

  6299.         $question = $qentry['question'];
    6300. 

  6300.         $help = $qentry['help'];
    6301. 

  6301.         $qid = $qentry['qid'];
    6302. 

  6302.         $language = $qentry['language'];
    6303. 

  6303. 

  6304.         foreach ($fieldnames as $sOldFieldname=>$sNewFieldname)
    6305. 

  6305.         {
    6306. 

  6306.             $pattern = $sOldFieldname;
    6307. 

  6307.             $replacement = $sNewFieldname;
    6308. 

  6308.             $question=preg_replace('/'.$pattern.'/', $replacement, $question);
    6309. 

  6309.             $help=preg_replace('/'.$pattern.'/', $replacement, $help);
    6310. 

  6310.         }
    6311. 

  6311. 

  6312.         if (strcmp($question,$qentry['question']) !=0 ||
    6313. 

  6313.         strcmp($help,$qentry['help']) !=0)
    6314. 

  6314.         {
    6315. 

  6315.             // Update Field
    6316. 

  6316. 

  6317.             $data = array(
    6318. 

  6318.             'question' => $question,
    6319. 

  6319.             'help' => $help
    6320. 

  6320.             );
    6321. 

  6321. 

  6322.             $where = array(
    6323. 

  6323.             'qid' => $qid,
    6324. 

  6324.             'language' => $language
    6325. 

  6325.             );
    6326. 

  6326. 

  6327.             Questions::model()->updateByPk($where,$data);
    6328. 

  6328. 

  6329.         } // Enf if modified
    6330. 

  6330.     } // end while qentry
    6331. 

  6331. 

  6332.     # translate 'answer' INSERTANS tags in answers
    6333. 

  6333.     $result=Answers::model()->oldNewInsertansTags($newsid,$oldsid);
    6334. 

  6334. 

  6335.     //while ($qentry = $res->FetchRow())
    6336. 

  6336.     foreach ($result as $qentry)
    6337. 

  6337.     {
    6338. 

  6338.         $answer = $qentry['answer'];
    6339. 

  6339.         $code = $qentry['code'];
    6340. 

  6340.         $qid = $qentry['qid'];
    6341. 

  6341.         $language = $qentry['language'];
    6342. 

  6342. 

  6343.         foreach ($fieldnames as $sOldFieldname=>$sNewFieldname)
    6344. 

  6344.         {
    6345. 

  6345.             $pattern = $sOldFieldname;
    6346. 

  6346.             $replacement = $sNewFieldname;
    6347. 

  6347.             $answer=preg_replace('/'.$pattern.'/', $replacement, $answer);
    6348. 

  6348.         }
    6349. 

  6349. 

  6350.         if (strcmp($answer,$qentry['answer']) !=0)
    6351. 

  6351.         {
    6352. 

  6352.             // Update Field
    6353. 

  6353. 

  6354.             $data = array(
    6355. 

  6355.             'answer' => $answer,
    6356. 

  6356.             'qid' => $qid
    6357. 

  6357.             );
    6358. 

  6358. 

  6359.             $where = array(
    6360. 

  6360.             'code' => $code,
    6361. 

  6361.             'language' => $language
    6362. 

  6362.             );
    6363. 

  6363. 

  6364.             Answers::model()->update($data,$where);
    6365. 

  6365. 

  6366.         } // Enf if modified
    6367. 

  6367.     } // end while qentry
    6368. 

  6368. }
    6369. 

  6369. 

  6370. /**
    6371. 

  6371. * This function is a replacement of accessDenied.php which return appropriate error message which is then displayed.
    6372. 

  6372. *
    6373. 

  6373. * @params string $action - action for which acces denied error message is to be returned
    6374. 

  6374. * @params string sid - survey id
    6375. 

  6375. * @return $accesssummary - proper access denied error message
    6376. 

  6376. */
    6377. 

  6377. function accessDenied($action,$sid='')
    6378. 

  6378. {
    6379. 

  6379.     $clang = Yii::app()->lang;
    6380. 

  6380.     if (Yii::app()->session['loginID'])
    6381. 

  6381.     {
    6382. 

  6382.         $ugid = Yii::app()->getConfig('ugid');
    6383. 

  6383.         $accesssummary = "<p><strong>".$clang->gT("Access denied!")."</strong><br />\n";
    6384. 

  6384.         $scriptname = Yii::app()->getConfig('scriptname');
    6385. 

  6385.         //$action=returnGlobal('action');
    6386. 

  6386.         if  (  $action == "dumpdb"  )
    6387. 

  6387.         {
    6388. 

  6388.             $accesssummary .= "<p>".$clang->gT("You are not allowed dump the database!")."<br />";
    6389. 

  6389.             $accesssummary .= "<a href='$scriptname'>".$clang->gT("Continue")."</a><br />&nbsp;\n";
    6390. 

  6390.         }
    6391. 

  6391.         elseif($action == "dumplabel")
    6392. 

  6392.         {
    6393. 

  6393.             $accesssummary .= "<p>".$clang->gT("You are not allowed export a label set!")."<br />";
    6394. 

  6394.             $accesssummary .= "<a href='$scriptname'>".$clang->gT("Continue")."</a><br />&nbsp;\n";
    6395. 

  6395.         }
    6396. 

  6396.         elseif($action == "edituser")
    6397. 

  6397.         {
    6398. 

  6398.             $accesssummary .= "<p>".$clang->gT("You are not allowed to change user data!");
    6399. 

  6399.             $accesssummary .= "<br /><br /><a href='$scriptname?action=editusers'>".$clang->gT("Continue")."</a><br />&nbsp;\n";
    6400. 

  6400.         }
    6401. 

  6401.         elseif($action == "newsurvey")
    6402. 

  6402.         {
    6403. 

  6403.             $accesssummary .= "<p>".$clang->gT("You are not allowed to create new surveys!")."<br />";
    6404. 

  6404.             $accesssummary .= "<a href='$scriptname'>".$clang->gT("Continue")."</a><br />&nbsp;\n";
    6405. 

  6405.         }
    6406. 

  6406.         elseif($action == "deletesurvey")
    6407. 

  6407.         {
    6408. 

  6408.             $accesssummary .= "<p>".$clang->gT("You are not allowed to delete this survey!")."<br />";
    6409. 

  6409.             $accesssummary .= "<a href='$scriptname?sid={$sid}'>".$clang->gT("Continue")."</a><br />&nbsp;\n";
    6410. 

  6410.         }
    6411. 

  6411.         elseif($action == "addquestion")
    6412. 

  6412.         {
    6413. 

  6413.             $accesssummary .= "<p>".$clang->gT("You are not allowed to add new questions for this survey!")."<br />";
    6414. 

  6414.             $accesssummary .= "<a href='$scriptname?sid={$sid}'>".$clang->gT("Continue")."</a><br />&nbsp;\n";
    6415. 

  6415.         }
    6416. 

  6416.         elseif($action == "activate")
    6417. 

  6417.         {
    6418. 

  6418.             $accesssummary .= "<p>".$clang->gT("You are not allowed to activate this survey!")."<br />";
    6419. 

  6419.             $accesssummary .= "<a href='$scriptname?sid={$sid}'>".$clang->gT("Continue")."</a><br />&nbsp;\n";
    6420. 

  6420.         }
    6421. 

  6421.         elseif($action == "deactivate")
    6422. 

  6422.         {
    6423. 

  6423.             $accesssummary .= "<p>".$clang->gT("You are not allowed to stop this survey!")."<br />";
    6424. 

  6424.             $accesssummary .= "<a href='$scriptname?sid={$sid}'>".$clang->gT("Continue")."</a><br />&nbsp;\n";
    6425. 

  6425.         }
    6426. 

  6426.         elseif($action == "addgroup")
    6427. 

  6427.         {
    6428. 

  6428.             $accesssummary .= "<p>".$clang->gT("You are not allowed to add a group to this survey!")."<br />";
    6429. 

  6429.             $accesssummary .= "<a href='$scriptname?sid={$sid}'>".$clang->gT("Continue")."</a><br />&nbsp;\n";
    6430. 

  6430.         }
    6431. 

  6431.         elseif($action == "ordergroups")
    6432. 

  6432.         {
    6433. 

  6433.             $link = Yii::app()->getController()->createUrl("/admin/survey/sa/view/surveyid/$sid");
    6434. 

  6434.             $accesssummary .= "<p>".$clang->gT("You are not allowed to order groups in this survey!")."<br />";
    6435. 

  6435.             $accesssummary .= "<a href='$link'>".$clang->gT("Continue")."</a><br />&nbsp;\n";
    6436. 

  6436.         }
    6437. 

  6437.         elseif($action == "editsurvey")
    6438. 

  6438.         {
    6439. 

  6439.             $link = Yii::app()->getController()->createUrl("/admin/survey/sa/view/surveyid/$sid");
    6440. 

  6440.             $accesssummary .= "<p>".$clang->gT("You are not allowed to edit this survey!")."</p>";
    6441. 

  6441.             $accesssummary .= "<a href='$link'>".$clang->gT("Continue")."</a><br />&nbsp;\n";
    6442. 

  6442.         }
    6443. 

  6443.         elseif($action == "editgroup")
    6444. 

  6444.         {
    6445. 

  6445.             $accesssummary .= "<p>".$clang->gT("You are not allowed to edit groups in this survey!")."</p>";
    6446. 

  6446.             $accesssummary .= "<a href='$scriptname?sid={$sid}'>".$clang->gT("Continue")."</a><br />&nbsp;\n";
    6447. 

  6447.         }
    6448. 

  6448.         elseif($action == "browse_response" || $action == "listcolumn" || $action == "vvexport" || $action == "vvimport")
    6449. 

  6449.         {
    6450. 

  6450.             $accesssummary .= "<p>".$clang->gT("You are not allowed to browse responses!")."</p>";
    6451. 

  6451.             $accesssummary .= "<a href='$scriptname?sid={$sid}'>".$clang->gT("Continue")."</a><br />&nbsp;\n";
    6452. 

  6452.         }
    6453. 

  6453.         elseif($action == "assessment")
    6454. 

  6454.         {
    6455. 

  6455.             $accesssummary .= "<p>".$clang->gT("You are not allowed to set assessment rules!")."</p>";
    6456. 

  6456.             $accesssummary .= "<a href='$scriptname?sid={$sid}'>".$clang->gT("Continue")."</a><br />&nbsp;\n";
    6457. 

  6457.         }
    6458. 

  6458.         elseif($action == "delusergroup")
    6459. 

  6459.         {
    6460. 

  6460.             $accesssummary .= "<p>".$clang->gT("You are not allowed to delete this group!")."</p>";
    6461. 

  6461.             $accesssummary .= "<a href='$scriptname?action=editusergroups'>".$clang->gT("Continue")."</a><br />&nbsp;\n";
    6462. 

  6462.         }
    6463. 

  6463.         elseif($action == "importsurvey")
    6464. 

  6464.         {
    6465. 

  6465.             $accesssummary .= "<p>".$clang->gT("You are not allowed to import a survey!")."</p>";
    6466. 

  6466.             $accesssummary .= "<a href='$scriptname?sid={$sid}'>".$clang->gT("Continue")."</a><br />&nbsp;\n";
    6467. 

  6467.         }
    6468. 

  6468. 

  6469.         elseif($action == "importgroup")
    6470. 

  6470.         {
    6471. 

  6471.             $accesssummary .= "<p>".$clang->gT("You are not allowed to import a group!")."</p>";
    6472. 

  6472.             $accesssummary .= "<a href='$scriptname?sid={$sid}'>".$clang->gT("Continue")."</a><br />&nbsp;\n";
    6473. 

  6473.         }
    6474. 

  6474.         elseif($action == "importquestion")
    6475. 

  6475.         {
    6476. 

  6476.             $accesssummary .= "<p>".$clang->gT("You are not allowed to to import a question!")."</p>";
    6477. 

  6477.             $accesssummary .= "<a href='$scriptname?sid={$sid}'>".$clang->gT("Continue")."</a><br />&nbsp;\n";
    6478. 

  6478.         }
    6479. 

  6479.         elseif($action == "CSRFwarn") //won't be used.
    6480. 

  6480.         {
    6481. 

  6481.             $sURLID='';
    6482. 

  6482.             if (isset($sid)) {
    6483. 

  6483.                 $sURLID="?sid={$sid}";
    6484. 

  6484.             }
    6485. 

  6485.             $accesssummary .= "<p><span color='errortitle'>".$clang->gT("Security alert")."</span>: ".$clang->gT("Someone may be trying to use your LimeSurvey session (CSRF attack suspected). If you just clicked on a malicious link, please report this to your system administrator.").'<br>'.$clang->gT('Also this problem can occur when you are working/editing in LimeSurvey in several browser windows/tabs at the same time.')."</p>";
    6486. 

  6486.             $accesssummary .= "<a href='{$scriptname}{$sURLID}'>".$clang->gT("Continue")."</a><br />&nbsp;\n";
    6487. 

  6487.         }
    6488. 

  6488.         elseif($action == "FakeGET")
    6489. 

  6489.         {
    6490. 

  6490.             $accesssummary .= "<p><span class='errortitle'>".$clang->gT("Security alert")."</span>: ".$clang->gT("Someone may be trying to use your LimeSurvey session (CSRF attack suspected). If you just clicked on a malicious link, please report this to your system administrator.").'<br>'.$clang->gT('Also this problem can occur when you are working/editing in LimeSurvey in several browser windows/tabs at the same time.')."</p>";
    6491. 

  6491.             $accesssummary .= "<a href='$scriptname?sid={$sid}'>".$clang->gT("Continue")."</a><br />&nbsp;\n";
    6492. 

  6492.         }
    6493. 

  6493.         else
    6494. 

  6494.         {
    6495. 

  6495.             $accesssummary .= "<br />".$clang->gT("You are not allowed to perform this operation!")."<br />\n";
    6496. 

  6496.             if(!empty($sid))
    6497. 

  6497.             {
    6498. 

  6498.                 $accesssummary .= "<br /><br /><a href='$scriptname?sid=$sid>".$clang->gT("Continue")."</a><br />&nbsp;\n";
    6499. 

  6499.             }
    6500. 

  6500.             elseif(!empty($ugid))
    6501. 

  6501.             {
    6502. 

  6502.                 $accesssummary .= "<br /><br /><a href='$scriptname?action=editusergroups&ugid={$ugid}'>".$clang->gT("Continue")."</a><br />&nbsp;\n";
    6503. 

  6503.             }
    6504. 

  6504.             else
    6505. 

  6505.             {
    6506. 

  6506.                 $accesssummary .= "<br /><br /><a href='$scriptname'>".$clang->gT("Continue")."</a><br />&nbsp;\n";
    6507. 

  6507.             }
    6508. 

  6508.         }
    6509. 

  6509.         return $accesssummary;
    6510. 

  6510.     }
    6511. 

  6511. 

  6512. }
    6513. 

  6513. 

  6514. /**
    6515. 

  6515. * cleanLanguagesFromSurvey() removes any languages from survey tables that are not in the passed list
    6516. 

  6516. * @param string $sid - the currently selected survey
    6517. 

  6517. * @param string $availlangs - space seperated list of additional languages in survey
    6518. 

  6518. * @return bool - always returns true
    6519. 

  6519. */
    6520. 

  6520. function cleanLanguagesFromSurvey($sid, $availlangs)
    6521. 

  6521. {
    6522. 

  6522. 

  6523.     Yii::app()->loadHelper('database');
    6524. 

  6524.     //$clang = Yii::app()->lang;
    6525. 

  6525.     $sid=sanitize_int($sid);
    6526. 

  6526.     $baselang = Survey::model()->findByPk($sid)->language;
    6527. 

  6527. 

  6528.     if (!empty($availlangs) && $availlangs != " ")
    6529. 

  6529.     {
    6530. 

  6530.         $availlangs=sanitize_languagecodeS($availlangs);
    6531. 

  6531.         $langs = explode(" ",$availlangs);
    6532. 

  6532.         if($langs[count($langs)-1] == "") array_pop($langs);
    6533. 

  6533.     }
    6534. 

  6534. 

  6535.     $sqllang = "language <> '".$baselang."' ";
    6536. 

  6536. 

  6537.     if (!empty($availlangs) && $availlangs != " ")
    6538. 

  6538.     {
    6539. 

  6539.         foreach ($langs as $lang)
    6540. 

  6540.         {
    6541. 

  6541.             $sqllang .= "AND language <> '".$lang."' ";
    6542. 

  6542.         }
    6543. 

  6543.     }
    6544. 

  6544. 

  6545.     // Remove From Answers Table
    6546. 

  6546.     $query = "SELECT qid FROM {{questions}} WHERE sid='{$sid}' AND $sqllang";
    6547. 

  6547.     $qidresult = dbExecuteAssoc($query);
    6548. 

  6548. 

  6549.     foreach ($qidresult->readAll() as $qrow)
    6550. 

  6550.     {
    6551. 

  6551. 

  6552.         $myqid = $qrow['qid'];
    6553. 

  6553.         $query = "DELETE FROM {{answers}} WHERE qid='$myqid' AND $sqllang";
    6554. 

  6554.         dbExecuteAssoc($query);
    6555. 

  6555.     }
    6556. 

  6556. 

  6557.     // Remove From Questions Table
    6558. 

  6558.     $query = "DELETE FROM {{questions}} WHERE sid='{$sid}' AND $sqllang";
    6559. 

  6559.     dbExecuteAssoc($query);
    6560. 

  6560. 

  6561.     // Remove From Groups Table
    6562. 

  6562.     $query = "DELETE FROM {{groups}} WHERE sid='{$sid}' AND $sqllang";
    6563. 

  6563.     dbExecuteAssoc($query);
    6564. 

  6564. 

  6565.     return true;
    6566. 

  6566. }
    6567. 

  6567. 

  6568. /**
    6569. 

  6569. * fixLanguageConsistency() fixes missing groups, questions, answers, quotas & assessments for languages on a survey
    6570. 

  6570. * @param string $sid - the currently selected survey
    6571. 

  6571. * @param string $availlangs - space seperated list of additional languages in survey - if empty all additional languages of a survey are checked against the base language
    6572. 

  6572. * @return bool - always returns true
    6573. 

  6573. */
    6574. 

  6574. function fixLanguageConsistency($sid, $availlangs='')
    6575. 

  6575. {
    6576. 

  6576.     $sid=sanitize_int($sid);
    6577. 

  6577.     $clang = Yii::app()->lang;
    6578. 

  6578. 

  6579.     if (trim($availlangs)!='')
    6580. 

  6580.     {
    6581. 

  6581.         $availlangs=sanitize_languagecodeS($availlangs);
    6582. 

  6582.         $langs = explode(" ",$availlangs);
    6583. 

  6583.         if($langs[count($langs)-1] == "") array_pop($langs);
    6584. 

  6584.     } else {
    6585. 

  6585.         $langs=Survey::model()->findByPk($sid)->additionalLanguages;
    6586. 

  6586.     }
    6587. 

  6587. 

  6588.     $baselang = Survey::model()->findByPk($sid)->language;
    6589. 

  6589.     $query = "SELECT * FROM {{groups}} WHERE sid='{$sid}' AND language='{$baselang}'  ORDER BY group_order";
    6590. 

  6590.     $result = Yii::app()->db->createCommand($query)->query();
    6591. 

  6591.     foreach($result->readAll() as $group)
    6592. 

  6592.     {
    6593. 

  6593.         foreach ($langs as $lang)
    6594. 

  6594.         {
    6595. 

  6595. 

  6596.             $query = "SELECT count(gid) FROM {{groups}} WHERE sid='{$sid}' AND gid='{$group['gid']}' AND language='{$lang}'";
    6597. 

  6597.             $gresult = Yii::app()->db->createCommand($query)->queryScalar();
    6598. 

  6598.             if ($gresult < 1)
    6599. 

  6599.             {
    6600. 

  6600.                 $data = array(
    6601. 

  6601.                 'gid' => $group['gid'],
    6602. 

  6602.                 'sid' => $group['sid'],
    6603. 

  6603.                 'group_name' => $group['group_name'],
    6604. 

  6604.                 'group_order' => $group['group_order'],
    6605. 

  6605.                 'description' => $group['description'],
    6606. 

  6606.                 'randomization_group' => $group['randomization_group'],
    6607. 

  6607.                 'grelevance' => $group['grelevance'],
    6608. 

  6608.                 'language' => $lang
    6609. 

  6609. 

  6610.                 );
    6611. 

  6611.                 switchMSSQLIdentityInsert('groups',true);
    6612. 

  6612.                 Yii::app()->db->createCommand()->insert('{{groups}}', $data);
    6613. 

  6613.                 switchMSSQLIdentityInsert('groups',false);
    6614. 

  6614.             }
    6615. 

  6615.         }
    6616. 

  6616.         reset($langs);
    6617. 

  6617.     }
    6618. 

  6618. 

  6619.     $quests = array();
    6620. 

  6620.     $query = "SELECT * FROM {{questions}} WHERE sid='{$sid}' AND language='{$baselang}' ORDER BY question_order";
    6621. 

  6621.     $result = Yii::app()->db->createCommand($query)->query()->readAll();
    6622. 

  6622.     if (count($result) > 0)
    6623. 

  6623.     {
    6624. 

  6624.         foreach($result as $question)
    6625. 

  6625.         {
    6626. 

  6626.             array_push($quests,$question['qid']);
    6627. 

  6627.             foreach ($langs as $lang)
    6628. 

  6628.             {
    6629. 

  6629.                 $query = "SELECT count(qid) FROM {{questions}} WHERE sid='{$sid}' AND qid='{$question['qid']}' AND language='{$lang}' AND scale_id={$question['scale_id']}";
    6630. 

  6630.                 $gresult = Yii::app()->db->createCommand($query)->queryScalar();
    6631. 

  6631.                 if ($gresult < 1)
    6632. 

  6632.                 {
    6633. 

  6633.                     switchMSSQLIdentityInsert('questions',true);
    6634. 

  6634.                     $data = array(
    6635. 

  6635.                     'qid' => $question['qid'],
    6636. 

  6636.                     'sid' => $question['sid'],
    6637. 

  6637.                     'gid' => $question['gid'],
    6638. 

  6638.                     'type' => $question['type'],
    6639. 

  6639.                     'title' => $question['title'],
    6640. 

  6640.                     'question' => $question['question'],
    6641. 

  6641.                     'preg' => $question['preg'],
    6642. 

  6642.                     'help' => $question['help'],
    6643. 

  6643.                     'other' => $question['other'],
    6644. 

  6644.                     'mandatory' => $question['mandatory'],
    6645. 

  6645.                     'question_order' => $question['question_order'],
    6646. 

  6646.                     'language' => $lang,
    6647. 

  6647.                     'scale_id' => $question['scale_id'],
    6648. 

  6648.                     'parent_qid' => $question['parent_qid'],
    6649. 

  6649.                     'relevance' => $question['relevance']
    6650. 

  6650.                     );
    6651. 

  6651.                     Yii::app()->db->createCommand()->insert('{{questions}}', $data);
    6652. 

  6652.                 }
    6653. 

  6653.             }
    6654. 

  6654.             reset($langs);
    6655. 

  6655.         }
    6656. 

  6656. 

  6657.         $sqlans = "";
    6658. 

  6658.         foreach ($quests as $quest)
    6659. 

  6659.         {
    6660. 

  6660.             $sqlans .= " OR qid = '".$quest."' ";
    6661. 

  6661.         }
    6662. 

  6662.         $query = "SELECT * FROM {{answers}} WHERE language='{$baselang}' and (".trim($sqlans,' OR').") ORDER BY qid, code";
    6663. 

  6663.         $result = Yii::app()->db->createCommand($query)->query();
    6664. 

  6664.         foreach($result->readAll() as $answer)
    6665. 

  6665.         {
    6666. 

  6666.             foreach ($langs as $lang)
    6667. 

  6667.             {
    6668. 

  6668.                 $query = "SELECT count(qid) FROM {{answers}} WHERE code='{$answer['code']}' AND qid='{$answer['qid']}' AND language='{$lang}' AND scale_id={$answer['scale_id']}";
    6669. 

  6669.                 $gresult = Yii::app()->db->createCommand($query)->queryScalar();
    6670. 

  6670.                 if ($gresult < 1)
    6671. 

  6671.                 {
    6672. 

  6672.                     $data = array(
    6673. 

  6673.                     'qid' => $answer['qid'],
    6674. 

  6674.                     'code' => $answer['code'],
    6675. 

  6675.                     'answer' => $answer['answer'],
    6676. 

  6676.                     'scale_id' => $answer['scale_id'],
    6677. 

  6677.                     'sortorder' => $answer['sortorder'],
    6678. 

  6678.                     'language' => $lang,
    6679. 

  6679.                     'assessment_value' =>  $answer['assessment_value']
    6680. 

  6680.                     );
    6681. 

  6681.                     Yii::app()->db->createCommand()->insert('{{answers}}', $data);
    6682. 

  6682.                 }
    6683. 

  6683.             }
    6684. 

  6684.             reset($langs);
    6685. 

  6685.         }
    6686. 

  6686.     }
    6687. 

  6687. 

  6688. 

  6689.     $query = "SELECT * FROM {{assessments}} WHERE sid='{$sid}' AND language='{$baselang}'";
    6690. 

  6690.     $result = Yii::app()->db->createCommand($query)->query();
    6691. 

  6691.     foreach($result->readAll() as $assessment)
    6692. 

  6692.     {
    6693. 

  6693.         foreach ($langs as $lang)
    6694. 

  6694.         {
    6695. 

  6695.             $query = "SELECT count(id) FROM {{assessments}} WHERE sid='{$sid}' AND id='{$assessment['id']}' AND language='{$lang}'";
    6696. 

  6696.             $gresult = Yii::app()->db->createCommand($query)->queryScalar();
    6697. 

  6697.             if ($gresult < 1)
    6698. 

  6698.             {
    6699. 

  6699.                 $data = array(
    6700. 

  6700.                 'id' => $assessment['id'],
    6701. 

  6701.                 'sid' => $assessment['sid'],
    6702. 

  6702.                 'scope' => $assessment['scope'],
    6703. 

  6703.                 'gid' => $assessment['gid'],
    6704. 

  6704.                 'name' => $assessment['name'],
    6705. 

  6705.                 'minimum' => $assessment['minimum'],
    6706. 

  6706.                 'maximum' => $assessment['maximum'],
    6707. 

  6707.                 'message' => $assessment['message'],
    6708. 

  6708.                 'language' => $lang
    6709. 

  6709.                 );
    6710. 

  6710.                 Yii::app()->db->createCommand()->insert('{{assessments}}', $data);
    6711. 

  6711.             }
    6712. 

  6712.         }
    6713. 

  6713.         reset($langs);
    6714. 

  6714.     }
    6715. 

  6715. 

  6716. 

  6717.     $query = "SELECT * FROM {{quota_languagesettings}} join {{quota}} q on quotals_quota_id=q.id WHERE q.sid='{$sid}' AND quotals_language='{$baselang}'";
    6718. 

  6718.     $result = Yii::app()->db->createCommand($query)->query();
    6719. 

  6719.     foreach($result->readAll() as $qls)
    6720. 

  6720.     {
    6721. 

  6721.         foreach ($langs as $lang)
    6722. 

  6722.         {
    6723. 

  6723.             $query = "SELECT count(quotals_id) FROM {{quota_languagesettings}} WHERE quotals_quota_id='{$qls['quotals_quota_id']}' AND quotals_language='{$lang}'";
    6724. 

  6724.             $gresult = Yii::app()->db->createCommand($query)->queryScalar();
    6725. 

  6725.             if ($gresult < 1)
    6726. 

  6726.             {
    6727. 

  6727.                 $data = array(
    6728. 

  6728.                 'quotals_quota_id' => $qls['quotals_quota_id'],
    6729. 

  6729.                 'quotals_name' => $qls['quotals_name'],
    6730. 

  6730.                 'quotals_message' => $qls['quotals_message'],
    6731. 

  6731.                 'quotals_url' => $qls['quotals_url'],
    6732. 

  6732.                 'quotals_urldescrip' => $qls['quotals_urldescrip'],
    6733. 

  6733.                 'quotals_language' => $lang
    6734. 

  6734.                 );
    6735. 

  6735.                 Yii::app()->db->createCommand()->insert('{{quota_languagesettings}}', $data);
    6736. 

  6736.             }
    6737. 

  6737.         }
    6738. 

  6738.         reset($langs);
    6739. 

  6739.     }
    6740. 

  6740. 

  6741.     return true;
    6742. 

  6742. }
    6743. 

  6743. 

  6744. /**
    6745. 

  6745. * This function switches identity insert on/off for the MSSQL database
    6746. 

  6746. *
    6747. 

  6747. * @param string $table table name (without prefix)
    6748. 

  6748. * @param mixed $state  Set to true to activate ID insert, or false to deactivate
    6749. 

  6749. */
    6750. 

  6750. function switchMSSQLIdentityInsert($table,$state)
    6751. 

  6751. {
    6752. 

  6752.     if (in_array(Yii::app()->db->getDriverName(), array('mssql', 'sqlsrv')))
    6753. 

  6753.     {
    6754. 

  6754.         if ($state == true)
    6755. 

  6755.         {
    6756. 

  6756.             // This needs to be done directly on the PDO object because when using CdbCommand or similar it won't have any effect
    6757. 

  6757.             Yii::app()->db->pdoInstance->exec('SET IDENTITY_INSERT '.Yii::app()->db->tablePrefix.$table.' ON');  
    6758. 

  6758.         }
    6759. 

  6759.         else
    6760. 

  6760.         {
    6761. 

  6761.             // This needs to be done directly on the PDO object because when using CdbCommand or similar it won't have any effect
    6762. 

  6762.             Yii::app()->db->pdoInstance->exec('SET IDENTITY_INSERT '.Yii::app()->db->tablePrefix.$table.' OFF'); 
    6763. 

  6763.         }
    6764. 

  6764.     }
    6765. 

  6765. }
    6766. 

  6766. 

  6767. /**
    6768. 

  6768. * Retrieves the last Insert ID realiable for cross-DB applications
    6769. 

  6769. * 
    6770. 

  6770. * @param string $sTableName Needed for Postgres and MSSQL
    6771. 

  6771. */
    6772. 

  6772. function getLastInsertID($sTableName)
    6773. 

  6773. {
    6774. 

  6774.     $sDBDriver=Yii::app()->db->getDriverName();
    6775. 

  6775.     if ($sDBDriver=='mysql' || $sDBDriver=='mysqli')
    6776. 

  6776.     {
    6777. 

  6777.         return Yii::app()->db->getLastInsertID();
    6778. 

  6778.     }
    6779. 

  6779.     else
    6780. 

  6780.     {
    6781. 

  6781.         return Yii::app()->db->getCommandBuilder()->getLastInsertID($sTableName);
    6782. 

  6782.     }
    6783. 

  6783. }
    6784. 

  6784. 

  6785. // TMSW Conditions->Relevance:  This function is not needed?  Optionally replace this with call to EM to get similar info
    6786. 

  6786. /**
    6787. 

  6787. * getGroupDepsForConditions() get Dependencies between groups caused by conditions
    6788. 

  6788. * @param string $sid - the currently selected survey
    6789. 

  6789. * @param string $depgid - (optionnal) get only the dependencies applying to the group with gid depgid
    6790. 

  6790. * @param string $targgid - (optionnal) get only the dependencies for groups dependents on group targgid
    6791. 

  6791. * @param string $index-by - (optionnal) "by-depgid" for result indexed with $res[$depgid][$targgid]
    6792. 

  6792. *                   "by-targgid" for result indexed with $res[$targgid][$depgid]
    6793. 

  6793. * @return array - returns an array describing the conditions or NULL if no dependecy is found
    6794. 

  6794. *
    6795. 

  6795. * Example outupt assumin $index-by="by-depgid":
    6796. 

  6796. *Array
    6797. 

  6797. *(
    6798. 

  6798. *    [125] => Array             // Group Id 125 is dependent on
    6799. 

  6799. *        (
    6800. 

  6800. *            [123] => Array         // Group Id 123
    6801. 

  6801. *                (
    6802. 

  6802. *                    [depgpname] => G3      // GID-125 has name G3
    6803. 

  6803. *                    [targetgpname] => G1   // GID-123 has name G1
    6804. 

  6804. *                    [conditions] => Array
    6805. 

  6805. *                        (
    6806. 

  6806. *                            [189] => Array // Because Question Id 189
    6807. 

  6807. *                                (
    6808. 

  6808. *                                    [0] => 9   // Have condition 9 set
    6809. 

  6809. *                                    [1] => 10  // and condition 10 set
    6810. 

  6810. *                                    [2] => 14  // and condition 14 set
    6811. 

  6811. *                                )
    6812. 

  6812. *
    6813. 

  6813. *                        )
    6814. 

  6814. *
    6815. 

  6815. *                )
    6816. 

  6816. *
    6817. 

  6817. *            [124] => Array         // GID 125 is also dependent on GID 124
    6818. 

  6818. *                (
    6819. 

  6819. *                    [depgpname] => G3
    6820. 

  6820. *                    [targetgpname] => G2
    6821. 

  6821. *                    [conditions] => Array
    6822. 

  6822. *                        (
    6823. 

  6823. *                            [189] => Array // Because Question Id 189 have conditions set
    6824. 

  6824. *                                (
    6825. 

  6825. *                                    [0] => 11
    6826. 

  6826. *                                )
    6827. 

  6827. *
    6828. 

  6828. *                            [215] => Array // And because Question Id 215 have conditions set
    6829. 

  6829. *                                (
    6830. 

  6830. *                                    [0] => 12
    6831. 

  6831. *                                )
    6832. 

  6832. *
    6833. 

  6833. *                        )
    6834. 

  6834. *
    6835. 

  6835. *                )
    6836. 

  6836. *
    6837. 

  6837. *        )
    6838. 

  6838. *
    6839. 

  6839. *)
    6840. 

  6840. *
    6841. 

  6841. * Usage example:
    6842. 

  6842. *   * Get all group dependencies for SID $sid indexed by depgid:
    6843. 

  6843. *       $result=getGroupDepsForConditions($sid);
    6844. 

  6844. *   * Get all group dependencies for GID $gid in survey $sid indexed by depgid:
    6845. 

  6845. *       $result=getGroupDepsForConditions($sid,$gid);
    6846. 

  6846. *   * Get all group dependents on group $gid in survey $sid indexed by targgid:
    6847. 

  6847. *       $result=getGroupDepsForConditions($sid,"all",$gid,"by-targgid");
    6848. 

  6848. */
    6849. 

  6849. function getGroupDepsForConditions($sid,$depgid="all",$targgid="all",$indexby="by-depgid")
    6850. 

  6850. {
    6851. 

  6851.     $sid=sanitize_int($sid);
    6852. 

  6852.     $condarray = Array();
    6853. 

  6853.     $sqldepgid="";
    6854. 

  6854.     $sqltarggid="";
    6855. 

  6855.     if ($depgid != "all") { $depgid = sanitize_int($depgid); $sqldepgid="AND tq.gid=$depgid";}
    6856. 

  6856.     if ($targgid != "all") {$targgid = sanitize_int($targgid); $sqltarggid="AND tq2.gid=$targgid";}
    6857. 

  6857. 

  6858.     $baselang = Survey::model()->findByPk($sid)->language;
    6859. 

  6859.     $condquery = "SELECT tg.gid as depgid, tg.group_name as depgpname, "
    6860. 

  6860.     . "tg2.gid as targgid, tg2.group_name as targgpname, tq.qid as depqid, tc.cid FROM "
    6861. 

  6861.     . "{{conditions}} AS tc, "
    6862. 

  6862.     . "{{questions}} AS tq, "
    6863. 

  6863.     . "{{questions}} AS tq2, "
    6864. 

  6864.     . "{{groups}} AS tg ,"
    6865. 

  6865.     . "{{groups}} AS tg2 "
    6866. 

  6866.     . "WHERE tq.language='{$baselang}' AND tq2.language='{$baselang}' AND tg.language='{$baselang}' AND tg2.language='{$baselang}' AND tc.qid = tq.qid AND tq.sid=$sid "
    6867. 

  6867.     . "AND tq.gid = tg.gid AND tg2.gid = tq2.gid "
    6868. 

  6868.     . "AND tq2.qid=tc.cqid AND tq.gid != tg2.gid $sqldepgid $sqltarggid";
    6869. 

  6869.     $condresult = Yii::app()->db->createCommand($condquery)->query()->readAll();
    6870. 

  6870. 

  6871.     if (count($condresult) > 0) {
    6872. 

  6872.         foreach ($condresult as $condrow)
    6873. 

  6873.         {
    6874. 

  6874. 

  6875.             switch ($indexby)
    6876. 

  6876.             {
    6877. 

  6877.                 case "by-depgid":
    6878. 

  6878.                     $depgid=$condrow['depgid'];
    6879. 

  6879.                     $targetgid=$condrow['targgid'];
    6880. 

  6880.                     $depqid=$condrow['depqid'];
    6881. 

  6881.                     $cid=$condrow['cid'];
    6882. 

  6882.                     $condarray[$depgid][$targetgid]['depgpname'] = $condrow['depgpname'];
    6883. 

  6883.                     $condarray[$depgid][$targetgid]['targetgpname'] = $condrow['targgpname'];
    6884. 

  6884.                     $condarray[$depgid][$targetgid]['conditions'][$depqid][]=$cid;
    6885. 

  6885.                     break;
    6886. 

  6886. 

  6887.                 case "by-targgid":
    6888. 

  6888.                     $depgid=$condrow['depgid'];
    6889. 

  6889.                     $targetgid=$condrow['targgid'];
    6890. 

  6890.                     $depqid=$condrow['depqid'];
    6891. 

  6891.                     $cid=$condrow['cid'];
    6892. 

  6892.                     $condarray[$targetgid][$depgid]['depgpname'] = $condrow['depgpname'];
    6893. 

  6893.                     $condarray[$targetgid][$depgid]['targetgpname'] = $condrow['targgpname'];
    6894. 

  6894.                     $condarray[$targetgid][$depgid]['conditions'][$depqid][] = $cid;
    6895. 

  6895.                     break;
    6896. 

  6896.             }
    6897. 

  6897.         }
    6898. 

  6898.         return $condarray;
    6899. 

  6899.     }
    6900. 

  6900.     return null;
    6901. 

  6901. }
    6902. 

  6902. 

  6903. // TMSW Conditions->Relevance:  This function is not needed?  Optionally replace this with call to EM to get similar info
    6904. 

  6904. /**
    6905. 

  6905. * getQuestDepsForConditions() get Dependencies between groups caused by conditions
    6906. 

  6906. * @param string $sid - the currently selected survey
    6907. 

  6907. * @param string $gid - (optionnal) only search dependecies inside the Group Id $gid
    6908. 

  6908. * @param string $depqid - (optionnal) get only the dependencies applying to the question with qid depqid
    6909. 

  6909. * @param string $targqid - (optionnal) get only the dependencies for questions dependents on question Id targqid
    6910. 

  6910. * @param string $index-by - (optionnal) "by-depqid" for result indexed with $res[$depqid][$targqid]
    6911. 

  6911. *                   "by-targqid" for result indexed with $res[$targqid][$depqid]
    6912. 

  6912. * @return array - returns an array describing the conditions or NULL if no dependecy is found
    6913. 

  6913. *
    6914. 

  6914. * Example outupt assumin $index-by="by-depqid":
    6915. 

  6915. *Array
    6916. 

  6916. *(
    6917. 

  6917. *    [184] => Array     // Question Id 184
    6918. 

  6918. *        (
    6919. 

  6919. *            [183] => Array // Depends on Question Id 183
    6920. 

  6920. *                (
    6921. 

  6921. *                    [0] => 5   // Because of condition Id 5
    6922. 

  6922. *                )
    6923. 

  6923. *
    6924. 

  6924. *        )
    6925. 

  6925. *
    6926. 

  6926. *)
    6927. 

  6927. *
    6928. 

  6928. * Usage example:
    6929. 

  6929. *   * Get all questions dependencies for Survey $sid and group $gid indexed by depqid:
    6930. 

  6930. *       $result=getQuestDepsForConditions($sid,$gid);
    6931. 

  6931. *   * Get all questions dependencies for question $qid in survey/group $sid/$gid indexed by depqid:
    6932. 

  6932. *       $result=getGroupDepsForConditions($sid,$gid,$qid);
    6933. 

  6933. *   * Get all questions dependents on question $qid in survey/group $sid/$gid indexed by targqid:
    6934. 

  6934. *       $result=getGroupDepsForConditions($sid,$gid,"all",$qid,"by-targgid");
    6935. 

  6935. */
    6936. 

  6936. function getQuestDepsForConditions($sid,$gid="all",$depqid="all",$targqid="all",$indexby="by-depqid", $searchscope="samegroup")
    6937. 

  6937. {
    6938. 

  6938.     $clang = Yii::app()->lang;
    6939. 

  6939.     $condarray = Array();
    6940. 

  6940. 

  6941.     $baselang = Survey::model()->findByPk($sid)->language;
    6942. 

  6942.     $sqlgid="";
    6943. 

  6943.     $sqldepqid="";
    6944. 

  6944.     $sqltargqid="";
    6945. 

  6945.     $sqlsearchscope="";
    6946. 

  6946.     if ($gid != "all") {$gid = sanitize_int($gid); $sqlgid="AND tq.gid=$gid";}
    6947. 

  6947.     if ($depqid != "all") {$depqid = sanitize_int($depqid); $sqldepqid="AND tq.qid=$depqid";}
    6948. 

  6948.     if ($targqid != "all") {$targqid = sanitize_int($targqid); $sqltargqid="AND tq2.qid=$targqid";}
    6949. 

  6949.     if ($searchscope == "samegroup") {$sqlsearchscope="AND tq2.gid=tq.gid";}
    6950. 

  6950. 

  6951.     $condquery = "SELECT tq.qid as depqid, tq2.qid as targqid, tc.cid
    6952. 

  6952.     FROM {{conditions}} AS tc, {{questions}} AS tq, {{questions}} AS tq2
    6953. 

  6953.     WHERE tq.language='{$baselang}' AND tq2.language='{$baselang}' AND tc.qid = tq.qid AND tq.sid='$sid'
    6954. 

  6954.     AND  tq2.qid=tc.cqid $sqlsearchscope $sqlgid $sqldepqid $sqltargqid";
    6955. 

  6955.     $condresult=Yii::app()->db->createCommand($condquery)->query()->readAll();
    6956. 

  6956.     if (count($condresult) > 0) {
    6957. 

  6957.         foreach ($condresult as $condrow)
    6958. 

  6958.         {
    6959. 

  6959.             $depqid=$condrow['depqid'];
    6960. 

  6960.             $targetqid=$condrow['targqid'];
    6961. 

  6961.             $condid=$condrow['cid'];
    6962. 

  6962.             switch ($indexby)
    6963. 

  6963.             {
    6964. 

  6964.                 case "by-depqid":
    6965. 

  6965.                     $condarray[$depqid][$targetqid][] = $condid;
    6966. 

  6966.                     break;
    6967. 

  6967. 

  6968.                 case "by-targqid":
    6969. 

  6969.                     $condarray[$targetqid][$depqid][] = $condid;
    6970. 

  6970.                     break;
    6971. 

  6971.             }
    6972. 

  6972.         }
    6973. 

  6973.         return $condarray;
    6974. 

  6974.     }
    6975. 

  6975.     return null;
    6976. 

  6976. }
    6977. 

  6977. 

  6978. // TMSW Conditions->Relevance:  This function is not needed - could replace with a message from EM output.
    6979. 

  6979. /**
    6980. 

  6980. * checkMoveQuestionConstraintsForConditions()
    6981. 

  6981. * @param string $sid - the currently selected survey
    6982. 

  6982. * @param string $qid - qid of the question you want to check possible moves
    6983. 

  6983. * @param string $newgid - (optionnal) get only constraints when trying to move to this particular GroupId
    6984. 

  6984. *                                     otherwise, get all moves constraints for this question
    6985. 

  6985. *
    6986. 

  6986. * @return array - returns an array describing the conditions
    6987. 

  6987. *                 Array
    6988. 

  6988. *                 (
    6989. 

  6989. *                   ['notAbove'] = null | Array
    6990. 

  6990. *                       (
    6991. 

  6991. *                         Array ( gid1, group_order1, qid1, cid1 )
    6992. 

  6992. *                       )
    6993. 

  6993. *                   ['notBelow'] = null | Array
    6994. 

  6994. *                       (
    6995. 

  6995. *                         Array ( gid2, group_order2, qid2, cid2 )
    6996. 

  6996. *                       )
    6997. 

  6997. *                 )
    6998. 

  6998. *
    6999. 

  6999. * This should be read as:
    7000. 

  7000. *    - this question can't be move above group gid1 in position group_order1 because of the condition cid1 on question qid1
    7001. 

  7001. *    - this question can't be move below group gid2 in position group_order2 because of the condition cid2 on question qid2
    7002. 

  7002. *
    7003. 

  7003. */
    7004. 

  7004. function checkMoveQuestionConstraintsForConditions($sid,$qid,$newgid="all")
    7005. 

  7005. {
    7006. 

  7006.     $clang = Yii::app()->lang;
    7007. 

  7007.     $resarray=Array();
    7008. 

  7008.     $resarray['notAbove']=null; // defaults to no constraint
    7009. 

  7009.     $resarray['notBelow']=null; // defaults to no constraint
    7010. 

  7010.     $sid=sanitize_int($sid);
    7011. 

  7011.     $qid=sanitize_int($qid);
    7012. 

  7012. 

  7013.     if ($newgid != "all")
    7014. 

  7014.     {
    7015. 

  7015.         $newgid=sanitize_int($newgid);
    7016. 

  7016.         $newgorder=getGroupOrder($sid,$newgid);
    7017. 

  7017.     }
    7018. 

  7018.     else
    7019. 

  7019.     {
    7020. 

  7020.         $neworder=""; // Not used in this case
    7021. 

  7021.     }
    7022. 

  7022. 

  7023.     $baselang = Survey::model()->findByPk($sid)->language;
    7024. 

  7024. 

  7025.     // First look for 'my dependencies': questions on which I have set conditions
    7026. 

  7026.     $condquery = "SELECT tq.qid as depqid, tq.gid as depgid, tg.group_order as depgorder, "
    7027. 

  7027.     . "tq2.qid as targqid, tq2.gid as targgid, tg2.group_order as targgorder, "
    7028. 

  7028.     . "tc.cid FROM "
    7029. 

  7029.     . "{{conditions}} AS tc, "
    7030. 

  7030.     . "{{questions}} AS tq, "
    7031. 

  7031.     . "{{questions}} AS tq2, "
    7032. 

  7032.     . "{{groups}} AS tg, "
    7033. 

  7033.     . "{{groups}} AS tg2 "
    7034. 

  7034.     . "WHERE tq.language='{$baselang}' AND tq2.language='{$baselang}' AND tc.qid = tq.qid AND tq.sid=$sid "
    7035. 

  7035.     . "AND  tq2.qid=tc.cqid AND tg.gid=tq.gid AND tg2.gid=tq2.gid AND tq.qid=$qid ORDER BY tg2.group_order DESC";
    7036. 

  7036. 

  7037.     $condresult=Yii::app()->db->createCommand($condquery)->query();
    7038. 

  7038. 

  7039.     foreach ($condresult->readAll() as $condrow )
    7040. 

  7040.     {
    7041. 

  7041.         // This Question can go up to the minimum GID on the 1st row
    7042. 

  7042.         $depqid=$condrow['depqid'];
    7043. 

  7043.         $depgid=$condrow['depgid'];
    7044. 

  7044.         $depgorder=$condrow['depgorder'];
    7045. 

  7045.         $targetqid=$condrow['targqid'];
    7046. 

  7046.         $targetgid=$condrow['targgid'];
    7047. 

  7047.         $targetgorder=$condrow['targgorder'];
    7048. 

  7048.         $condid=$condrow['cid'];
    7049. 

  7049.         //echo "This question can't go above to GID=$targetgid/order=$targetgorder because of CID=$condid";
    7050. 

  7050.         if ($newgid != "all")
    7051. 

  7051.         { // Get only constraints when trying to move to this group
    7052. 

  7052.             if ($newgorder < $targetgorder)
    7053. 

  7053.             {
    7054. 

  7054.                 $resarray['notAbove'][]=Array($targetgid,$targetgorder,$depqid,$condid);
    7055. 

  7055.             }
    7056. 

  7056.         }
    7057. 

  7057.         else
    7058. 

  7058.         { // get all moves constraints
    7059. 

  7059.             $resarray['notAbove'][]=Array($targetgid,$targetgorder,$depqid,$condid);
    7060. 

  7060.         }
    7061. 

  7061.     }
    7062. 

  7062. 

  7063.     // Secondly look for 'questions dependent on me': questions that have conditions on my answers
    7064. 

  7064.     $condquery = "SELECT tq.qid as depqid, tq.gid as depgid, tg.group_order as depgorder, "
    7065. 

  7065.     . "tq2.qid as targqid, tq2.gid as targgid, tg2.group_order as targgorder, "
    7066. 

  7066.     . "tc.cid FROM {{conditions}} AS tc, "
    7067. 

  7067.     . "{{questions}} AS tq, "
    7068. 

  7068.     . "{{questions}} AS tq2, "
    7069. 

  7069.     . "{{groups}} AS tg, "
    7070. 

  7070.     . "{{groups}} AS tg2 "
    7071. 

  7071.     . "WHERE tq.language='{$baselang}' AND tq2.language='{$baselang}' AND tc.qid = tq.qid AND tq.sid=$sid "
    7072. 

  7072.     . "AND  tq2.qid=tc.cqid AND tg.gid=tq.gid AND tg2.gid=tq2.gid AND tq2.qid=$qid ORDER BY tg.group_order";
    7073. 

  7073. 

  7074.     $condresult=Yii::app()->db->createCommand($condquery)->query();
    7075. 

  7075. 

  7076.     foreach ($condresult->readAll() as $condrow)
    7077. 

  7077.     {
    7078. 

  7078.         // This Question can go down to the maximum GID on the 1st row
    7079. 

  7079.         $depqid=$condrow['depqid'];
    7080. 

  7080.         $depgid=$condrow['depgid'];
    7081. 

  7081.         $depgorder=$condrow['depgorder'];
    7082. 

  7082.         $targetqid=$condrow['targqid'];
    7083. 

  7083.         $targetgid=$condrow['targgid'];
    7084. 

  7084.         $targetgorder=$condrow['targgorder'];
    7085. 

  7085.         $condid=$condrow['cid'];
    7086. 

  7086.         //echo "This question can't go below to GID=$depgid/order=$depgorder because of CID=$condid";
    7087. 

  7087.         if ($newgid != "all")
    7088. 

  7088.         { // Get only constraints when trying to move to this group
    7089. 

  7089.             if ($newgorder > $depgorder)
    7090. 

  7090.             {
    7091. 

  7091.                 $resarray['notBelow'][]=Array($depgid,$depgorder,$depqid,$condid);
    7092. 

  7092.             }
    7093. 

  7093.         }
    7094. 

  7094.         else
    7095. 

  7095.         { // get all moves constraints
    7096. 

  7096.             $resarray['notBelow'][]=Array($depgid,$depgorder,$depqid,$condid);
    7097. 

  7097.         }
    7098. 

  7098.     }
    7099. 

  7099.     return $resarray;
    7100. 

  7100. }
    7101. 

  7101. 

  7102. function getUserGroupList($ugid=NULL,$outputformat='optionlist')
    7103. 

  7103. {
    7104. 

  7104.     $clang = Yii::app()->lang;
    7105. 

  7105.     //$squery = "SELECT ugid, name FROM ".db_table_name('user_groups') ." WHERE owner_id = {Yii::app()->session['loginID']} ORDER BY name";
    7106. 

  7106.     $sQuery = "SELECT distinct a.ugid, a.name, a.owner_id FROM {{user_groups}} AS a LEFT JOIN {{user_in_groups}} AS b ON a.ugid = b.ugid WHERE 1=1 ";
    7107. 

  7107.     if (!hasGlobalPermission('USER_RIGHT_SUPERADMIN'))
    7108. 

  7108.     {
    7109. 

  7109.         $sQuery .="AND uid = ".Yii::app()->session['loginID'];
    7110. 

  7110.     }
    7111. 

  7111.     $sQuery .=  " ORDER BY name";
    7112. 

  7112. 

  7113.     $sresult = Yii::app()->db->createCommand($sQuery)->query(); //Checked
    7114. 

  7114.     if (!$sresult) {return "Database Error";}
    7115. 

  7115.     $selecter = "";
    7116. 

  7116.     foreach ($sresult->readAll() as $row)
    7117. 

  7117.     {
    7118. 

  7118.         $groupnames[] = $row;
    7119. 

  7119.     }
    7120. 

  7120. 

  7121. 

  7122.     //$groupnames = $sresult->GetRows();
    7123. 

  7123.     $simplegidarray=array();
    7124. 

  7124.     if (isset($groupnames))
    7125. 

  7125.     {
    7126. 

  7126.         foreach($groupnames as $gn)
    7127. 

  7127.         {
    7128. 

  7128.             $selecter .= "<option ";
    7129. 

  7129.             if(Yii::app()->session['loginID'] == $gn['owner_id']) {$selecter .= " style=\"font-weight: bold;\"";}
    7130. 

  7130.             //if (isset($_GET['ugid']) && $gn['ugid'] == $_GET['ugid']) {$selecter .= " selected='selected'"; $svexist = 1;}
    7131. 

  7131. 

  7132.             if ($gn['ugid'] == $ugid) {$selecter .= " selected='selected'"; $svexist = 1;}
    7133. 

  7133.             $link = Yii::app()->getController()->createUrl("/admin/usergroups/sa/view/ugid/".$gn['ugid']);
    7134. 

  7134.             $selecter .=" value='{$link}'>{$gn['name']}</option>\n";
    7135. 

  7135.             $simplegidarray[] = $gn['ugid'];
    7136. 

  7136.         }
    7137. 

  7137.     }
    7138. 

  7138. 

  7139.     if (!isset($svexist)) {$selecter = "<option value='-1' selected='selected'>".$clang->gT("Please choose...")."</option>\n".$selecter;}
    7140. 

  7140.     //else {$selecter = "<option value='-1'>".$clang->gT("None")."</option>\n".$selecter;}
    7141. 

  7141. 

  7142.     if ($outputformat == 'simplegidarray')
    7143. 

  7143.     {
    7144. 

  7144.         return $simplegidarray;
    7145. 

  7145.     }
    7146. 

  7146.     else
    7147. 

  7147.     {
    7148. 

  7148.         return $selecter;
    7149. 

  7149.     }
    7150. 

  7150. }
    7151. 

  7151. 

  7152. function getGroupUserList($ugid)
    7153. 

  7153. {
    7154. 

  7154.     Yii::app()->loadHelper('database');
    7155. 

  7155.     $clang = Yii::app()->lang;
    7156. 

  7156. 

  7157.     $ugid=sanitize_int($ugid);
    7158. 

  7158.     $surveyidquery = "SELECT a.uid, a.users_name FROM {{users}} AS a LEFT JOIN (SELECT uid AS id FROM {{user_in_groups}} WHERE ugid = {$ugid}) AS b ON a.uid = b.id WHERE id IS NULL ORDER BY a.users_name";
    7159. 

  7159. 

  7160.     $surveyidresult = dbExecuteAssoc($surveyidquery);  //Checked
    7161. 

  7161.     if (!$surveyidresult) {return "Database Error";}
    7162. 

  7162.     $surveyselecter = "";
    7163. 

  7163.     foreach ($surveyidresult->readAll() as $row)
    7164. 

  7164.     {
    7165. 

  7165.         $surveynames[] = $row;
    7166. 

  7166.     }
    7167. 

  7167.     //$surveynames = $surveyidresult->GetRows();
    7168. 

  7168.     if (isset($surveynames))
    7169. 

  7169.     {
    7170. 

  7170.         foreach($surveynames as $sv)
    7171. 

  7171.         {
    7172. 

  7172.             $surveyselecter .= "<option";
    7173. 

  7173.             $surveyselecter .=" value='{$sv['uid']}'>{$sv['users_name']}</option>\n";
    7174. 

  7174.         }
    7175. 

  7175.     }
    7176. 

  7176.     $surveyselecter = "<option value='-1' selected='selected'>".$clang->gT("Please choose...")."</option>\n".$surveyselecter;
    7177. 

  7177.     return $surveyselecter;
    7178. 

  7178. }
    7179. 

  7179. 

  7180. /**
    7181. 

  7181. * Run an arbitrary sequence of semicolon-delimited SQL commands
    7182. 

  7182. *
    7183. 

  7183. * Assumes that the input text (file or string) consists of
    7184. 

  7184. * a number of SQL statements ENDING WITH SEMICOLONS.  The
    7185. 

  7185. * semicolons MUST be the last character in a line.
    7186. 

  7186. * Lines that are blank or that start with "#" or "--" (postgres) are ignored.
    7187. 

  7187. * Only tested with mysql dump files (mysqldump -p -d limesurvey)
    7188. 

  7188. * Function kindly borrowed by Moodle
    7189. 

  7189. * @param string $sqlfile The path where a file with sql commands can be found on the server.
    7190. 

  7190. * @param string $sqlstring If no path is supplied then a string with semicolon delimited sql
    7191. 

  7191. * commands can be supplied in this argument.
    7192. 

  7192. * @return bool Returns true if database was modified successfully.
    7193. 

  7193. */
    7194. 

  7194. function modifyDatabase($sqlfile='', $sqlstring='')
    7195. 

  7195. {
    7196. 

  7196.     Yii::app()->loadHelper('database');
    7197. 

  7197.     $clang = Yii::app()->lang;
    7198. 

  7198. 

  7199.     global $siteadminemail;
    7200. 

  7200.     global $siteadminname;
    7201. 

  7201.     global $codeString;
    7202. 

  7202.     global $modifyoutput;
    7203. 

  7203. 

  7204.     $success = true;  // Let's be optimistic
    7205. 

  7205.     $modifyoutput='';
    7206. 

  7206. 

  7207.     if (!empty($sqlfile)) {
    7208. 

  7208.         if (!is_readable($sqlfile)) {
    7209. 

  7209.             $success = false;
    7210. 

  7210.             echo '<p>Tried to modify database, but "'. $sqlfile .'" doesn\'t exist!</p>';
    7211. 

  7211.             return $success;
    7212. 

  7212.         } else {
    7213. 

  7213.             $lines = file($sqlfile);
    7214. 

  7214.         }
    7215. 

  7215.     } else {
    7216. 

  7216.         $sqlstring = trim($sqlstring);
    7217. 

  7217.         if ($sqlstring{strlen($sqlstring)-1} != ";") {
    7218. 

  7218.             $sqlstring .= ";"; // add it in if it's not there.
    7219. 

  7219.         }
    7220. 

  7220.         $lines[] = $sqlstring;
    7221. 

  7221.     }
    7222. 

  7222. 

  7223.     $command = '';
    7224. 

  7224. 

  7225.     foreach ($lines as $line) {
    7226. 

  7226.         $line = rtrim($line);
    7227. 

  7227.         $length = strlen($line);
    7228. 

  7228. 

  7229.         if ($length and $line[0] <> '#' and substr($line,0,2) <> '--') {
    7230. 

  7230.             if (substr($line, $length-1, 1) == ';') {
    7231. 

  7231.                 $line = substr($line, 0, $length-1);   // strip ;
    7232. 

  7232.                 $command .= $line;
    7233. 

  7233.                 $command = str_replace('prefix_', Yii::app()->db->tablePrefix, $command); // Table prefixes
    7234. 

  7234.                 $command = str_replace('$defaultuser', Yii::app()->getConfig('defaultuser'), $command);
    7235. 

  7235.                 $command = str_replace('$defaultpass', hash('sha256',Yii::app()->getConfig('defaultpass')), $command);
    7236. 

  7236.                 $command = str_replace('$siteadminname', $siteadminname, $command);
    7237. 

  7237.                 $command = str_replace('$siteadminemail', $siteadminemail, $command);
    7238. 

  7238.                 $command = str_replace('$defaultlang', Yii::app()->getConfig('defaultlang'), $command);
    7239. 

  7239.                 $command = str_replace('$databasetabletype', Yii::app()->db->getDriverName(), $command);
    7240. 

  7240. 

  7241.                 try
    7242. 

  7242.                 {   Yii::app()->db->createCommand($command)->query(); //Checked
    7243. 

  7243.                     $command=htmlspecialchars($command);
    7244. 

  7244.                     $modifyoutput .=". ";
    7245. 

  7245.                 }
    7246. 

  7246.                 catch(CDbException $e)
    7247. 

  7247.                 {
    7248. 

  7248.                     $command=htmlspecialchars($command);
    7249. 

  7249.                     $modifyoutput .="<br />".sprintf($clang->gT("SQL command failed: %s"),"<span style='font-size:10px;'>".$command."</span>","<span style='color:#ee0000;font-size:10px;'></span><br/>");
    7250. 

  7250.                     $success = false;
    7251. 

  7251.                 }
    7252. 

  7252. 

  7253.                 $command = '';
    7254. 

  7254.             } else {
    7255. 

  7255.                 $command .= $line;
    7256. 

  7256.             }
    7257. 

  7257.         }
    7258. 

  7258.     }
    7259. 

  7259. 

  7260.     return $success;
    7261. 

  7261. 

  7262. }
    7263. 

  7263. 

  7264. /**
    7265. 

  7265. * Returns labelsets for given language(s), or for all if null
    7266. 

  7266. *
    7267. 

  7267. * @param string $languages
    7268. 

  7268. * @return array
    7269. 

  7269. */
    7270. 

  7270. function getLabelSets($languages = null)
    7271. 

  7271. {
    7272. 

  7272. 

  7273.     $clang = Yii::app()->lang;
    7274. 

  7274.     $languagesarray = array();
    7275. 

  7275.     if ($languages)
    7276. 

  7276.     {
    7277. 

  7277.         $languages=sanitize_languagecodeS($languages);
    7278. 

  7278.         $languagesarray=explode(' ',trim($languages));
    7279. 

  7279.     }
    7280. 

  7280. 

  7281.     $criteria = new CDbCriteria;
    7282. 

  7282.     foreach ($languagesarray as $k => $item)
    7283. 

  7283.     {
    7284. 

  7284.         $criteria->params[':lang_like1_' . $k] = "% $item %";
    7285. 

  7285.         $criteria->params[':lang_' . $k] = $item;
    7286. 

  7286.         $criteria->params[':lang_like2_' . $k] = "% $item";
    7287. 

  7287.         $criteria->params[':lang_like3_' . $k] = "$item %";
    7288. 

  7288.         $criteria->addCondition("
    7289. 

  7289.         ((languages like :lang_like1_$k) or
    7290. 

  7290.         (languages = :lang_$k) or
    7291. 

  7291.         (languages like :lang_like2_$k) or
    7292. 

  7292.         (languages like :lang_like3_$k))");
    7293. 

  7293.     }
    7294. 

  7294. 

  7295.     $result = Labelsets::model()->findAll($criteria);
    7296. 

  7296.     $labelsets=array();
    7297. 

  7297.     foreach ($result as $row)
    7298. 

  7298.         $labelsets[] = array($row->lid, $row->label_name);
    7299. 

  7299.     return $labelsets;
    7300. 

  7300. }
    7301. 

  7301. 

  7302. function getHeader($meta = false)
    7303. 

  7303. {
    7304. 

  7304.     global $embedded,$surveyid ;
    7305. 

  7305.     Yii::app()->loadHelper('surveytranslator');
    7306. 

  7306. 

  7307.     // Set Langage // TODO remove one of the Yii::app()->session see bug #5901
    7308. 

  7308.     if (Yii::app()->session['s_lang'] )
    7309. 

  7309.     {
    7310. 

  7310.         $languagecode =  Yii::app()->session['s_lang'];
    7311. 

  7311.     }
    7312. 

  7312.     elseif (Yii::app()->session['survey_'.$surveyid]['s_lang'] )
    7313. 

  7313.     {
    7314. 

  7314.         $languagecode =  Yii::app()->session['survey_'.$surveyid]['s_lang'];
    7315. 

  7315.     }
    7316. 

  7316.     elseif (isset($surveyid) && $surveyid  && Survey::model()->findByPk($surveyid))
    7317. 

  7317.     {
    7318. 

  7318.         $languagecode=Survey::model()->findByPk($surveyid)->language;
    7319. 

  7319.     }
    7320. 

  7320.     else
    7321. 

  7321.     {
    7322. 

  7322.         $languagecode = Yii::app()->getConfig('defaultlang');
    7323. 

  7323.     }
    7324. 

  7324. 

  7325.     $header=  "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Transitional//EN\" \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd\">\n"
    7326. 

  7326.     . "<html xmlns=\"http://www.w3.org/1999/xhtml\" xml:lang=\"{$languagecode}\" lang=\"{$languagecode}\"";
    7327. 

  7327.     if (getLanguageRTL($languagecode))
    7328. 

  7328.     {
    7329. 

  7329.         $header.=" dir=\"rtl\" ";
    7330. 

  7330.     }
    7331. 

  7331.     $header.= ">\n\t<head>\n";
    7332. 

  7332. 

  7333.     if ($meta)
    7334. 

  7334.         $header .= $meta;
    7335. 

  7335. 

  7336.     if ( !$embedded )
    7337. 

  7337.     {
    7338. 

  7338.         return $header;
    7339. 

  7339.     }
    7340. 

  7340. 

  7341.     global $embedded_headerfunc;
    7342. 

  7342. 

  7343.     if ( function_exists( $embedded_headerfunc ) )
    7344. 

  7344.         return $embedded_headerfunc($header);
    7345. 

  7345. }
    7346. 

  7346. 

  7347. 

  7348. function doHeader()
    7349. 

  7349. {
    7350. 

  7350.     echo getHeader();
    7351. 

  7351. }
    7352. 

  7352. 

  7353. /**
    7354. 

  7354. * This function returns the header for the printable survey
    7355. 

  7355. * @return String
    7356. 

  7356. *
    7357. 

  7357. */
    7358. 

  7358. function getPrintableHeader()
    7359. 

  7359. {
    7360. 

  7360.     global $rooturl,$homeurl;
    7361. 

  7361.     $headelements = '
    7362. 

  7362.     <meta http-equiv="content-type" content="text/html; charset=UTF-8" />
    7363. 

  7363.     <script type="text/javascript" src="'.Yii::app()->getConfig('generalscripts').'jquery/jquery.js"></script>
    7364. 

  7364.     <script type="text/javascript" src="'.Yii::app()->getConfig('adminscripts').'printablesurvey.js"></script>
    7365. 

  7365.     ';
    7366. 

  7366.     return $headelements;
    7367. 

  7367. }
    7368. 

  7368. 

  7369. // This function returns the Footer as result string
    7370. 

  7370. // If you want to echo the Footer use doFooter() !
    7371. 

  7371. function getFooter()
    7372. 

  7372. {
    7373. 

  7373.     global $embedded;
    7374. 

  7374. 

  7375.     if ( !$embedded )
    7376. 

  7376.     {
    7377. 

  7377.         return "\n\n\t</body>\n</html>\n";
    7378. 

  7378.     }
    7379. 

  7379. 

  7380.     global $embedded_footerfunc;
    7381. 

  7381. 

  7382.     if ( function_exists( $embedded_footerfunc ) )
    7383. 

  7383.         return $embedded_footerfunc();
    7384. 

  7384. }
    7385. 

  7385. 

  7386. function doFooter()
    7387. 

  7387. {
    7388. 

  7388.     echo getFooter();
    7389. 

  7389. }
    7390. 

  7390. 

  7391. function getDBTableUsage($surveyid){
    7392. 

  7392.     Yii::app()->loadHelper('admin/activate');
    7393. 

  7393.     $arrCols = activateSurvey($surveyid,$surveyid,'admin.php',true);
    7394. 

  7394. 

  7395.     $length = 1;
    7396. 

  7396.     foreach ($arrCols['fields'] as $col){
    7397. 

  7397.         switch ($col[0]){
    7398. 

  7398.             case 'C':
    7399. 

  7399.                 $length = $length + ($col[1]*3) + 1;
    7400. 

  7400.                 break;
    7401. 

  7401.             case 'X':
    7402. 

  7402.             case 'B':
    7403. 

  7403.                 $length = $length + 12;
    7404. 

  7404.                 break;
    7405. 

  7405.             case 'D':
    7406. 

  7406.                 $length = $length + 3;
    7407. 

  7407.                 break;
    7408. 

  7408.             case 'T':
    7409. 

  7409.             case 'TS':
    7410. 

  7410.             case 'N':
    7411. 

  7411.                 $length = $length + 8;
    7412. 

  7412.                 break;
    7413. 

  7413.             case 'L':
    7414. 

  7414.                 $legth++;
    7415. 

  7415.                 break;
    7416. 

  7416.             case 'I':
    7417. 

  7417.             case 'I4':
    7418. 

  7418.             case 'F':
    7419. 

  7419.                 $length = $length + 4;
    7420. 

  7420.                 break;
    7421. 

  7421.             case 'I1':
    7422. 

  7422.                 $length = $length + 1;
    7423. 

  7423.                 break;
    7424. 

  7424.             case 'I2':
    7425. 

  7425.                 $length = $length + 2;
    7426. 

  7426.                 break;
    7427. 

  7427.             case 'I8':
    7428. 

  7428.                 $length = $length + 8;
    7429. 

  7429.                 break;
    7430. 

  7430.         }
    7431. 

  7431.     }
    7432. 

  7432.     if ($arrCols['dbtype'] == 'mysql' || $arrCols['dbtype'] == 'mysqli'){
    7433. 

  7433.         if ($arrCols['dbengine']=='myISAM'){
    7434. 

  7434.             $hard_limit = 4096;
    7435. 

  7435.         }
    7436. 

  7436.         elseif ($arrCols['dbengine'] == "InnoDB"){
    7437. 

  7437.             $hard_limit = 1000;
    7438. 

  7438.         }
    7439. 

  7439.         else{
    7440. 

  7440.             return false;
    7441. 

  7441.         }
    7442. 

  7442. 

  7443.         $size_limit = 65535;
    7444. 

  7444.     }
    7445. 

  7445.     elseif ($arrCols['dbtype'] == 'postgre'){
    7446. 

  7446.         $hard_limit = 1600;
    7447. 

  7447.         $size_limit = 0;
    7448. 

  7448.     }
    7449. 

  7449.     elseif ($arrCols['dbtype'] == 'mssql'){
    7450. 

  7450.         $hard_limit = 1024;
    7451. 

  7451.         $size_limit = 0;
    7452. 

  7452.     }
    7453. 

  7453.     else{
    7454. 

  7454.         return false;
    7455. 

  7455.     }
    7456. 

  7456. 

  7457.     $columns_used = count($arrCols['fields']);
    7458. 

  7458. 

  7459. 

  7460. 

  7461.     return (array( 'dbtype'=>$arrCols['dbtype'], 'column'=>array($columns_used,$hard_limit) , 'size' => array($length, $size_limit) ));
    7462. 

  7462. }
    7463. 

  7463. 

  7464. /**
    7465. 

  7465. *  Checks that each object from an array of CSV data [question-rows,answer-rows,labelsets-row] supports at least a given language
    7466. 

  7466. *
    7467. 

  7467. * @param mixed $csvarray array with a line of csv data per row
    7468. 

  7468. * @param mixed $idkeysarray  array of integers giving the csv-row numbers of the object keys
    7469. 

  7469. * @param mixed $langfieldnum  integer giving the csv-row number of the language(s) filed
    7470. 

  7470. *        ==> the language field  can be a single language code or a
    7471. 

  7471. *            space separated language code list
    7472. 

  7472. * @param mixed $langcode  the language code to be tested
    7473. 

  7473. * @param mixed $hasheader  if we should strip off the first line (if it contains headers)
    7474. 

  7474. */
    7475. 

  7475. function  doesImportArraySupportLanguage($csvarray,$idkeysarray,$langfieldnum,$langcode, $hasheader = false)
    7476. 

  7476. {
    7477. 

  7477.     // An array with one row per object id and langsupport status as value
    7478. 

  7478.     $objlangsupportarray=Array();
    7479. 

  7479.     if ($hasheader === true )
    7480. 

  7480.     { // stripping first row to skip headers if any
    7481. 

  7481.         array_shift($csvarray);
    7482. 

  7482.     }
    7483. 

  7483. 

  7484.     foreach ($csvarray as $csvrow)
    7485. 

  7485.     {
    7486. 

  7486.         $rowcontents = convertCSVRowToArray($csvrow,',','"');
    7487. 

  7487.         $rowid = "";
    7488. 

  7488.         foreach ($idkeysarray as $idfieldnum)
    7489. 

  7489.         {
    7490. 

  7490.             $rowid .= $rowcontents[$idfieldnum]."-";
    7491. 

  7491.         }
    7492. 

  7492.         $rowlangarray = explode (" ", @$rowcontents[$langfieldnum]);
    7493. 

  7493.         if (!isset($objlangsupportarray[$rowid]))
    7494. 

  7494.         {
    7495. 

  7495.             if (array_search($langcode,$rowlangarray)!== false)
    7496. 

  7496.             {
    7497. 

  7497.                 $objlangsupportarray[$rowid] = "true";
    7498. 

  7498.             }
    7499. 

  7499.             else
    7500. 

  7500.             {
    7501. 

  7501.                 $objlangsupportarray[$rowid] = "false";
    7502. 

  7502.             }
    7503. 

  7503.         }
    7504. 

  7504.         else
    7505. 

  7505.         {
    7506. 

  7506.             if ($objlangsupportarray[$rowid] == "false" &&
    7507. 

  7507.             array_search($langcode,$rowlangarray) !== false)
    7508. 

  7508.             {
    7509. 

  7509.                 $objlangsupportarray[$rowid] = "true";
    7510. 

  7510.             }
    7511. 

  7511.         }
    7512. 

  7512.     } // end foreach rown
    7513. 

  7513. 

  7514.     // If any of the object doesn't support the given language, return false
    7515. 

  7515.     if (array_search("false",$objlangsupportarray) === false)
    7516. 

  7516.     {
    7517. 

  7517.         return true;
    7518. 

  7518.     }
    7519. 

  7519.     else
    7520. 

  7520.     {
    7521. 

  7521.         return false;
    7522. 

  7522.     }
    7523. 

  7523. }
    7524. 

  7524. 

  7525. 

  7526. /**
    7527. 

  7527. * Retrieve a HTML <OPTION> list of survey admin users
    7528. 

  7528. *
    7529. 

  7529. * @param mixed $bIncludeOwner If the survey owner should be included
    7530. 

  7530. * @param mixed $bIncludeSuperAdmins If Super admins should be included
    7531. 

  7531. * @param int surveyid
    7532. 

  7532. * @return string
    7533. 

  7533. */
    7534. 

  7534. function getSurveyUserList($bIncludeOwner=true, $bIncludeSuperAdmins=true,$surveyid)
    7535. 

  7535. {
    7536. 

  7536.     $clang = Yii::app()->lang;
    7537. 

  7537.     $surveyid=sanitize_int($surveyid);
    7538. 

  7538. 

  7539.     $sSurveyIDQuery = "SELECT a.uid, a.users_name, a.full_name FROM {{users}} AS a
    7540. 

  7540.     LEFT OUTER JOIN (SELECT uid AS id FROM {{survey_permissions}} WHERE sid = {$surveyid}) AS b ON a.uid = b.id
    7541. 

  7541.     WHERE id IS NULL ";
    7542. 

  7542.     if (!$bIncludeSuperAdmins)
    7543. 

  7543.     {
    7544. 

  7544.         $sSurveyIDQuery.='and superadmin=0 ';
    7545. 

  7545.     }
    7546. 

  7546.     $sSurveyIDQuery.= 'ORDER BY a.users_name';
    7547. 

  7547.     $oSurveyIDResult = Yii::app()->db->createCommand($sSurveyIDQuery)->query();  //Checked
    7548. 

  7548.     $aSurveyIDResult = $oSurveyIDResult->readAll();
    7549. 

  7549.     
    7550. 

  7550.     $surveyselecter = "";
    7551. 

  7551. 

  7552.     if (Yii::app()->getConfig('usercontrolSameGroupPolicy') == true)
    7553. 

  7553.     {
    7554. 

  7554. 

  7555.         $authorizedUsersList = getUserList('onlyuidarray');
    7556. 

  7556.     }
    7557. 

  7557. 

  7558.         foreach($aSurveyIDResult as $sv)
    7559. 

  7559.         {
    7560. 

  7560.             if (Yii::app()->getConfig('usercontrolSameGroupPolicy') == false ||
    7561. 

  7561.             in_array($sv['uid'],$authorizedUsersList))
    7562. 

  7562.             {
    7563. 

  7563.                 $surveyselecter .= "<option";
    7564. 

  7564.                 $surveyselecter .=" value='{$sv['uid']}'>{$sv['users_name']} {$sv['full_name']}</option>\n";
    7565. 

  7565.             }
    7566. 

  7566.         }
    7567. 

  7567.     if (!isset($svexist)) {$surveyselecter = "<option value='-1' selected='selected'>".$clang->gT("Please choose...")."</option>\n".$surveyselecter;}
    7568. 

  7568.     else {$surveyselecter = "<option value='-1'>".$clang->gT("None")."</option>\n".$surveyselecter;}
    7569. 

  7569. 

  7570.     return $surveyselecter;
    7571. 

  7571. }
    7572. 

  7572. 

  7573. function getSurveyUserGroupList($outputformat='htmloptions',$surveyid)
    7574. 

  7574. {
    7575. 

  7575.     $clang = Yii::app()->lang;
    7576. 

  7576.     $surveyid=sanitize_int($surveyid);
    7577. 

  7577. 

  7578.     $surveyidquery = "SELECT a.ugid, a.name, MAX(d.ugid) AS da
    7579. 

  7579.     FROM {{user_groups}} AS a
    7580. 

  7580.     LEFT JOIN (
    7581. 

  7581.     SELECT b.ugid
    7582. 

  7582.     FROM {{user_in_groups}} AS b
    7583. 

  7583.     LEFT JOIN (SELECT * FROM {{survey_permissions}}
    7584. 

  7584.     WHERE sid = {$surveyid}) AS c ON b.uid = c.uid WHERE c.uid IS NULL
    7585. 

  7585.     ) AS d ON a.ugid = d.ugid GROUP BY a.ugid, a.name HAVING MAX(d.ugid) IS NOT NULL";
    7586. 

  7586.     $surveyidresult = Yii::app()->db->createCommand($surveyidquery)->query();  //Checked
    7587. 

  7587.     $aResult=$surveyidresult->readAll();
    7588. 

  7588. 

  7589.     $surveyselecter = "";
    7590. 

  7590. 

  7591.     if (Yii::app()->getConfig('usercontrolSameGroupPolicy') == true)
    7592. 

  7592.     {
    7593. 

  7593.         $authorizedGroupsList=getUserGroupList(NULL, 'simplegidarray');
    7594. 

  7594.     }
    7595. 

  7595. 

  7596.     foreach($aResult as $sv)
    7597. 

  7597.     {
    7598. 

  7598.         if (Yii::app()->getConfig('usercontrolSameGroupPolicy') == false ||
    7599. 

  7599.         in_array($sv['ugid'],$authorizedGroupsList))
    7600. 

  7600.         {
    7601. 

  7601.             $surveyselecter .= "<option";
    7602. 

  7602.             $surveyselecter .=" value='{$sv['ugid']}'>{$sv['name']}</option>\n";
    7603. 

  7603.             $simpleugidarray[] = $sv['ugid'];
    7604. 

  7604.         }
    7605. 

  7605.     }
    7606. 

  7606. 

  7607.     if (!isset($svexist)) {$surveyselecter = "<option value='-1' selected='selected'>".$clang->gT("Please choose...")."</option>\n".$surveyselecter;}
    7608. 

  7608.     else {$surveyselecter = "<option value='-1'>".$clang->gT("None")."</option>\n".$surveyselecter;}
    7609. 

  7609. 

  7610.     if ($outputformat == 'simpleugidarray')
    7611. 

  7611.     {
    7612. 

  7612.         return $simpleugidarray;
    7613. 

  7613.     }
    7614. 

  7614.     else
    7615. 

  7615.     {
    7616. 

  7616.         return $surveyselecter;
    7617. 

  7617.     }
    7618. 

  7618. }
    7619. 

  7619. 

  7620. /*
    7621. 

  7621. * Emit the standard (last) onsubmit handler for the survey.
    7622. 

  7622. *
    7623. 

  7623. * This code in injected in the three questionnaire modes right after the <form> element,
    7624. 

  7624. * before the individual questions emit their own onsubmit replacement code.
    7625. 

  7625. */
    7626. 

  7626. function sDefaultSubmitHandler()
    7627. 

  7627. {
    7628. 

  7628.     return <<<EOS
    7629. 

  7629.     <script type='text/javascript'>
    7630. 

  7630.     <!--
    7631. 

  7631.         // register the standard (last) onsubmit handler *first*
    7632. 

  7632.         document.limesurvey.onsubmit = std_onsubmit_handler;
    7633. 

  7633.     -->
    7634. 

  7634.     </script>
    7635. 

  7635. EOS;
    7636. 

  7636. }
    7637. 

  7637. 

  7638. /**
    7639. 

  7639. * This function fixes the group ID and type on all subquestions
    7640. 

  7640. *
    7641. 

  7641. */
    7642. 

  7642. function fixSubquestions()
    7643. 

  7643. {
    7644. 

  7644.     $surveyidresult=Yii::app()->db->createCommand("select sq.qid, sq.parent_qid, sq.gid as sqgid, q.gid, sq.type as sqtype, q.type
    7645. 

  7645.     from {{questions}} sq JOIN {{questions}} q on sq.parent_qid=q.qid
    7646. 

  7646.     where sq.parent_qid>0 and  (sq.gid!=q.gid or sq.type!=q.type)")->query();
    7647. 

  7647.     foreach($surveyidresult->readAll() as $sv)
    7648. 

  7648.     {
    7649. 

  7649.         Yii::app()->db->createCommand("update {{questions}} set type='{$sv['type']}', gid={$sv['gid']} where qid={$sv['qid']}")->query();
    7650. 

  7650.     }
    7651. 

  7651. 

  7652. }
    7653. 

  7653. 

  7654. /**
    7655. 

  7655. * Must use ls_json_encode to json_encode content, otherwise LimeExpressionManager will think that the associative arrays are expressions and try to parse them.
    7656. 

  7656. */
    7657. 

  7657. function ls_json_encode($content)
    7658. 

  7658. {
    7659. 

  7659.     $ans = json_encode($content);
    7660. 

  7660.     $ans = str_replace(array('{','}'),array('{ ',' }'), $ans);
    7661. 

  7661.     return $ans;
    7662. 

  7662. }
    7663. 

  7663. 

  7664. /**
    7665. 

  7665.  * Decode a json string, sometimes needs stripslashes
    7666. 

  7666.  *
    7667. 

  7667.  * @param type $jsonString
    7668. 

  7668.  * @return type
    7669. 

  7669.  */
    7670. 

  7670. function json_decode_ls($jsonString)
    7671. 

  7671. {
    7672. 

  7672.     $decoded = json_decode($jsonString, true);
    7673. 

  7673. 

  7674.     if (is_null($decoded) && !empty($jsonString))
    7675. 

  7675.     {
    7676. 

  7676.         // probably we need stipslahes
    7677. 

  7677.         $decoded = json_decode(stripslashes($jsonString), true);
    7678. 

  7678.     }
    7679. 

  7679. 

  7680.     return $decoded;
    7681. 

  7681. }
    7682. 

  7682. 

  7683. /**
    7684. 

  7684. * Swaps two positions in an array
    7685. 

  7685. *
    7686. 

  7686. * @param mixed $key1
    7687. 

  7687. * @param mixed $key2
    7688. 

  7688. * @param mixed $array
    7689. 

  7689. */
    7690. 

  7690. function arraySwapAssoc($key1, $key2, $array) {
    7691. 

  7691.     $newArray = array ();
    7692. 

  7692.     foreach ($array as $key => $value) {
    7693. 

  7693.         if ($key == $key1) {
    7694. 

  7694.             $newArray[$key2] = $array[$key2];
    7695. 

  7695.         } elseif ($key == $key2) {
    7696. 

  7696.             $newArray[$key1] = $array[$key1];
    7697. 

  7697.         } else {
    7698. 

  7698.             $newArray[$key] = $value;
    7699. 

  7699.         }
    7700. 

  7700.     }
    7701. 

  7701.     return $newArray;
    7702. 

  7702. }
    7703. 

  7703. 

  7704. 

  7705. /**
    7706. 

  7706. * Ellipsize String
    7707. 

  7707. *
    7708. 

  7708. * This public static function will strip tags from a string, split it at its max_length and ellipsize
    7709. 

  7709. *
    7710. 

  7710. * @param	string		string to ellipsize
    7711. 

  7711. * @param	integer		max length of string
    7712. 

  7712. * @param	mixed		int (1|0) or float, .5, .2, etc for position to split
    7713. 

  7713. * @param	string		ellipsis ; Default '...'
    7714. 

  7714. * @return	string		ellipsized string
    7715. 

  7715. */
    7716. 

  7716. function ellipsize($str, $max_length, $position = 1, $ellipsis = '&hellip;')
    7717. 

  7717. {
    7718. 

  7718.     // Strip tags
    7719. 

  7719.     $str = trim(strip_tags($str));
    7720. 

  7720. 

  7721.     // Is the string long enough to ellipsize?
    7722. 

  7722.     if (strlen($str) <= $max_length+3)
    7723. 

  7723.     {
    7724. 

  7724.         return $str;
    7725. 

  7725.     }
    7726. 

  7726. 

  7727.     $beg = substr($str, 0, floor($max_length * $position));
    7728. 

  7728.     $position = ($position > 1) ? 1 : $position;
    7729. 

  7729. 

  7730.     if ($position === 1)
    7731. 

  7731.     {
    7732. 

  7732.         $end = substr($str, 0, -($max_length - strlen($beg)));
    7733. 

  7733.     }
    7734. 

  7734.     else
    7735. 

  7735.     {
    7736. 

  7736.         $end = substr($str, -($max_length - strlen($beg)));
    7737. 

  7737.     }
    7738. 

  7738. 

  7739.     return $beg.$ellipsis.$end;
    7740. 

  7740. }
    7741. 

  7741. 

  7742. /**
    7743. 

  7743. * This function returns the real IP address under all configurations
    7744. 

  7744. *
    7745. 

  7745. */
    7746. 

  7746. function getIPAddress()
    7747. 

  7747. {
    7748. 

  7748.     if (!empty($_SERVER['HTTP_CLIENT_IP']))   //check ip from share internet
    7749. 

  7749.     {
    7750. 

  7750.         return $_SERVER['HTTP_CLIENT_IP'];
    7751. 

  7751.     }
    7752. 

  7752.     elseif (!empty($_SERVER['HTTP_X_FORWARDED_FOR']))   //to check ip is pass from proxy
    7753. 

  7753.     {
    7754. 

  7754.         return $_SERVER['HTTP_X_FORWARDED_FOR'];
    7755. 

  7755.     }
    7756. 

  7756.     elseif (!empty($_SERVER['REMOTE_ADDR']))
    7757. 

  7757.     {
    7758. 

  7758.         return $_SERVER['REMOTE_ADDR'];
    7759. 

  7759.     }
    7760. 

  7760.     else
    7761. 

  7761.     {
    7762. 

  7762.         return '127.0.0.1';
    7763. 

  7763.     }
    7764. 

  7764. }
    7765. 

  7765. 

  7766. 

  7767. /**
    7768. 

  7768. * This function tries to find out a valid language code for the language of the browser used
    7769. 

  7769. * If it cannot find it it will return the default language from global settings
    7770. 

  7770. *
    7771. 

  7771. */
    7772. 

  7772. function getBrowserLanguage()
    7773. 

  7773. {
    7774. 

  7774.     $sLanguage=Yii::app()->getRequest()->getPreferredLanguage();
    7775. 

  7775.     Yii::app()->loadHelper("surveytranslator");
    7776. 

  7776.     $aLanguages=getLanguageData();
    7777. 

  7777.     if (!isset($aLanguages[$sLanguage]))
    7778. 

  7778.     {
    7779. 

  7779.         $sLanguage=str_replace('_','-',$sLanguage);
    7780. 

  7780.         if (!isset($aLanguages[$sLanguage]))
    7781. 

  7781.         {
    7782. 

  7782.             $sLanguage=substr($sLanguage,0,strpos($sLanguage,'-'));
    7783. 

  7783.             if (!isset($aLanguages[$sLanguage]))
    7784. 

  7784.             {
    7785. 

  7785.                 $sLanguage=Yii::app()->getConfig('defaultlang');
    7786. 

  7786.             }
    7787. 

  7787.         }
    7788. 

  7788.     }
    7789. 

  7789.     return $sLanguage;
    7790. 

  7790. }
    7791. 

  7791. 

  7792. /**
    7793. 

  7793. * This function add string to css or js header for public surevy
    7794. 

  7794. * @param	string		string to ellipsize
    7795. 

  7795. * @param	string		max length of string
    7796. 

  7796. * @return	array		array of string for js or css to be included
    7797. 

  7797. *
    7798. 

  7798. */
    7799. 

  7799. 

  7800. function header_includes($includes = false, $method = "js" )
    7801. 

  7801. {
    7802. 

  7802.     $header_includes = (array) Yii::app()->getConfig("{$method}_header_includes");
    7803. 

  7803.     $header_includes[] = $includes;
    7804. 

  7804.     $header_includes = array_filter($header_includes);
    7805. 

  7805.     $header_includes = array_unique($header_includes);
    7806. 

  7806.     Yii::app()->setConfig("{$method}_header_includes", $header_includes);
    7807. 

  7807.     return $header_includes;
    7808. 

  7808. }
    7809. 

  7809. // Closing PHP tag intentionally omitted - yes, it is okay
    7810. 

  7810.