PageRenderTime 53ms CodeModel.GetById 12ms RepoModel.GetById 0ms app.codeStats 1ms

/sondage/admin/remotecontrol/lsrc.helper.php

https://bitbucket.org/bontiv/insomnia
PHP | 2460 lines | 1837 code | 257 blank | 366 comment | 219 complexity | c7a88cb41d6052a07b3daa35dad8658a MD5 | raw file
Possible License(s): Apache-2.0, LGPL-3.0, LGPL-2.1, GPL-3.0, BSD-3-Clause, GPL-2.0

Large files files are truncated, but you can click here to view the full file

    

  1. <?php

    2. 

  2. /*

    3. 

  3.  * LimeSurvey

    4. 

  4.  * Copyright (C) 2007 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.  * $Id: lsrc.helper.php 9656 2011-01-07 20:48:39Z c_schmitz $

    14. 

  14.  *

    15. 

  15.  */

    16. 

  16. /**

    17. 

  17.  * @author Wahrendorff

    18. 

  18.  *

    19. 

  19.  */

    20. 

  20. class LsrcHelper {

    21. 

  21. 

    22. 

  22.     /**

    23. 

  23.      * simple debug function to make life a bit easier

    24. 

  24.      *

    25. 

  25.      * @param string $text

    26. 

  26.      */

    27. 

  27.     function debugLsrc($text)

    28. 

  28.     {

    29. 

  29.         include("lsrc.config.php");

    30. 

  30.         if($lsrcDebug)

    31. 

  31.         {

    32. 

  32.             error_log("\n".date("Y-m-d H:i:s")." ".$text, 3 , $lsrcDebugLog);

    33. 

  33.         }

    34. 

  34.         return;

    35. 

  35.     }

    36. 

  36. 

    37. 

  37.     /**

    38. 

  38.      * function to get the id of the surveyowner

    39. 

  39.      *

    40. 

  40.      * @param unknown_type $iVid

    41. 

  41.      * @return unknown

    42. 

  42.      */

    43. 

  43.     function getSurveyOwner($iVid)

    44. 

  44.     {

    45. 

  45.         global $connect ;

    46. 

  46.         global $dbprefix ;

    47. 

  47.         $ADODB_FETCH_MODE = ADODB_FETCH_ASSOC;

    48. 

  48.         include("lsrc.config.php");

    49. 

  49.         //$this= new LsrcHelper();

    50. 

  50.         if($this->surveyExists($iVid))

    51. 

  51.         {

    52. 

  52.             $query2num = "SELECT owner_id FROM {$dbprefix}surveys WHERE sid=".sanitize_int($iVid)."";

    53. 

  53.             $rs = db_execute_assoc($query2num);

    54. 

  54.             $field=$rs->FetchRow();

    55. 

  55.             return $field['owner_id'];

    56. 

  56. 

    57. 

  57.         }else{return false;}

    58. 

  58.     }

    59. 

  59. 

    60. 

  60.     /**

    61. 

  61.      * This function changes data in LS-DB, its very sensitive, because every table can be changed.

    62. 

  62.      *

    63. 

  63.      * @param unknown_type $table

    64. 

  64.      * @param unknown_type $key

    65. 

  65.      * @param unknown_type $value

    66. 

  66.      * @param unknown_type $where

    67. 

  67.      * @return String

    68. 

  68.      */

    69. 

  69.     function changeTable($table, $key, $value, $where, $mode='0')//XXX

    70. 

  70.     {//be aware that this function may be a security risk

    71. 

  71. 

    72. 

  72.         global $connect ;

    73. 

  73.         global $dbprefix ;

    74. 

  74.         $ADODB_FETCH_MODE = ADODB_FETCH_ASSOC;

    75. 

  75.         include("lsrc.config.php");

    76. 

  76.         if($mode=='' || !isset($mode) || $mode=='0')

    77. 

  77.         {

    78. 

  78.             $where = str_replace("\\","",$where);

    79. 

  79.             $query2num = "SELECT {$key} FROM {$dbprefix}{$table} WHERE {$where}";

    80. 

  80.             $rs = db_execute_assoc($query2num);

    81. 

  81. 

    82. 

  82.             $this->debugLsrc("wir sind in ".__FUNCTION__." Line ".__LINE__.", OK ($query2num)");

    83. 

  83. 

    84. 

  84.             $query2update = "update ".$dbprefix.$table." set ".$key."='".$value."' where ".$where."";

    85. 

  85. 

    86. 

  86.             $this->debugLsrc("wir sind in ".__FUNCTION__." Line ".__LINE__.", OK ($query2update)");

    87. 

  87. 

    88. 

  88.             if($connect->Execute($query2update)){

    89. 

  89.                 return $rs->RecordCount()." Rows changed";

    90. 

  90.             }

    91. 

  91.             else{

    92. 

  92.                 return "nothing changed";

    93. 

  93.             }

    94. 

  94.         }

    95. 

  95.         if($mode==1 || $mode=='1')

    96. 

  96.         {

    97. 

  97.             $query2insert = "INSERT INTO {$dbprefix}{$table} ({$key}) VALUES ({$value});";

    98. 

  98.             $this->debugLsrc("wir sind in Line ".__LINE__.", inserting ($query2insert)");

    99. 

  99.             if($connect->Execute($query2insert))

    100. 

  100.             {

    101. 

  101.                 $this->debugLsrc("wir sind in Line ".__LINE__.", inserting OK");

    102. 

  102.                 return true;

    103. 

  103.                  

    104. 

  104.             }

    105. 

  105.             else

    106. 

  106.             {

    107. 

  107.                 return false;

    108. 

  108.             }

    109. 

  109.         }

    110. 

  110. 

    111. 

  111. 

    112. 

  112.     }

    113. 

  113. 

    114. 

  114.     /**

    115. 

  115.      *

    116. 

  116.      * Enter description here...

    117. 

  117.      * @param $surveyid

    118. 

  118.      * @param $type

    119. 

  119.      * @param $maxLsrcEmails

    120. 

  120.      * @return unknown_type

    121. 

  121.      */

    122. 

  122.     function emailSender($surveyid, $type, $maxLsrcEmails='') //XXX

    123. 

  123.     {

    124. 

  124.         global $publicurl,$maxemails;

    125. 

  125.         global $connect,$sitename ;

    126. 

  126.         global $dbprefix ;

    127. 

  127.         $surveyid = sanitize_int($surveyid);

    128. 

  128.         include("lsrc.config.php");

    129. 

  129. 

    130. 

  130. 

    131. 

  131. 

    132. 

  132.         // wenn maxmails ber den lsrc gegeben wird das nutzen, ansonsten die default werte aus der config.php

    133. 

  133.         if($maxLsrcEmails!='')

    134. 

  134.         $maxemails = $maxLsrcEmails;

    135. 

  135. 

    136. 

  136.         switch ($type){

    137. 

  137.             case "custom":

    138. 

  138. 

    139. 

  139.                 break;

    140. 

  140.             case "invite":

    141. 

  141.                 $this->debugLsrc("wir sind in ".__FUNCTION__." Line ".__LINE__.", START invite ");

    142. 

  142. 

    143. 

  143. 

    144. 

  144. 

    145. 

  145.                 if(isset($surveyid) && getEmailFormat($surveyid) == 'html')

    146. 

  146.                 {

    147. 

  147.                     $ishtml=true;

    148. 

  148.                 }

    149. 

  149.                 else

    150. 

  150.                 {

    151. 

  151.                     $ishtml=false;

    152. 

  152.                 }

    153. 

  153. 

    154. 

  154.                 //$tokenoutput .= ("Sending Invitations");

    155. 

  155.                 //if (isset($tokenid)) {$tokenoutput .= " (".("Sending to Token ID").":&nbsp;{$tokenid})";}

    156. 

  156.                 //$tokenoutput .= "\n";

    157. 

  157.                 $this->debugLsrc("wir sind in ".__FUNCTION__." Line ".__LINE__.", $surveyid, $type");

    158. 

  158.                 // Texte für Mails aus der Datenbank holen und in die POST Dinger schreiben. Nicht schön aber praktikabel

    159. 

  159. 

    160. 

  160.                 $sql = 	"SELECT surveyls_language, surveyls_email_invite_subj, surveyls_email_invite  ".

    161. 

  161. 						"FROM {$dbprefix}surveys_languagesettings ".

    162. 

  162. 						"WHERE surveyls_survey_id = ".$surveyid." ";

    163. 

  163. 

    164. 

  164.                 //GET SURVEY DETAILS

    165. 

  165.                 $thissurvey=getSurveyInfo($surveyid);

    166. 

  166. 

    167. 

  167.                 //				$connect->SetFetchMode(ADODB_FETCH_ASSOC);

    168. 

  168.                 //				$sqlResult=$connect->Execute($sql);

    169. 

  169.                 $sqlResult = db_execute_assoc($sql);

    170. 

  170. 

    171. 

  171.                 $this->debugLsrc("wir sind in ".__FUNCTION__." Line ".__LINE__.", invite ");

    172. 

  172. 

    173. 

  173.                 while($languageRow = $sqlResult->FetchRow())

    174. 

  174.                 {

    175. 

  175.                     $_POST['message_'.$languageRow['surveyls_language']] = $languageRow['surveyls_email_invite'];

    176. 

  176.                     $_POST['subject_'.$languageRow['surveyls_language']] = $languageRow['surveyls_email_invite_subj'];

    177. 

  177.                 }

    178. 

  178. 

    179. 

  179.                 //				if (isset($_POST['bypassbademails']) && $_POST['bypassbademails'] == 'Y')

    180. 

  180.                 //				{

    181. 

  181.                 //					$SQLemailstatuscondition = " AND emailstatus = 'OK'";

    182. 

  182.                 //				}

    183. 

  183.                 //				else

    184. 

  184.                 //				{

    185. 

  185.                 //					$SQLemailstatuscondition = "";

    186. 

  186.                 //				}

    187. 

  187.                 $this->debugLsrc("wir sind in ".__FUNCTION__." Line ".__LINE__.", invite ");

    188. 

  188.                 $ctquery = "SELECT * FROM ".db_table_name("tokens_{$surveyid}")." WHERE ((completed ='N') or (completed='')) AND ((sent ='N') or (sent='')) AND emailstatus = 'OK' ";

    189. 

  189. 

    190. 

  190.                 if (isset($tokenid)) {$ctquery .= " AND tid='{$tokenid}'";}

    191. 

  191.                 //$tokenoutput .= "<!-- ctquery: $ctquery -->\n";

    192. 

  192.                 $ctresult = $connect->Execute($ctquery);

    193. 

  193.                 $ctcount = $ctresult->RecordCount();

    194. 

  194.                 $ctfieldcount = $ctresult->FieldCount();

    195. 

  195. 

    196. 

  196.                 $emquery = "SELECT * ";

    197. 

  197.                 //if ($ctfieldcount > 7) {$emquery .= ", attribute_1, attribute_2";}

    198. 

  198. 

    199. 

  199.                 $this->debugLsrc("wir sind in ".__FUNCTION__." Line ".__LINE__.", invite ");

    200. 

  200. 

    201. 

  201.                 $emquery .= " FROM ".db_table_name("tokens_{$surveyid}")." WHERE ((completed ='N') or (completed='')) AND ((sent ='N') or (sent=''))  AND emailstatus = 'OK' ";

    202. 

  202. 

    203. 

  203.                 if (isset($tokenid)) {$emquery .= " and tid='{$tokenid}'";}

    204. 

  204.                 //$tokenoutput .= "\n\n<!-- emquery: $emquery -->\n\n";

    205. 

  205.                 $emresult = db_select_limit_assoc($emquery,$maxemails);

    206. 

  206.                 $emcount = $emresult->RecordCount();

    207. 

  207. 

    208. 

  208.                 //$tokenoutput .= "<table width='500px' align='center' >\n"

    209. 

  209.                 ////."\t<tr>\n"

    210. 

  210.                 //."\t\t<td><font size='1'>\n";

    211. 

  211. 

    212. 

  212.                 $surveylangs = GetAdditionalLanguagesFromSurveyID($surveyid);

    213. 

  213.                 $baselanguage = GetBaseLanguageFromSurveyID($surveyid);

    214. 

  214.                 array_unshift($surveylangs,$baselanguage);

    215. 

  215. 

    216. 

  216.                 $this->debugLsrc("wir sind in ".__FUNCTION__." Line ".__LINE__.", invite ");

    217. 

  217. 

    218. 

  218.                 foreach ($surveylangs as $language)

    219. 

  219.                 {

    220. 

  220.                     $_POST['message_'.$language]=auto_unescape($_POST['message_'.$language]);

    221. 

  221.                     $_POST['subject_'.$language]=auto_unescape($_POST['subject_'.$language]);

    222. 

  222.                     if ($ishtml) $_POST['message_'.$language] = html_entity_decode($_POST['message_'.$language], ENT_QUOTES, $emailcharset);

    223. 

  223. 

    224. 

  224.                 }

    225. 

  225. 

    226. 

  226.                 $this->debugLsrc("wir sind in ".__FUNCTION__." Line ".__LINE__.", invite ");

    227. 

  227.                 if ($emcount > 0)

    228. 

  228.                 {

    229. 

  229.                     $mailsSend = 0;

    230. 

  230.                     while ($emrow = $emresult->FetchRow())

    231. 

  231.                     {

    232. 

  232.                         $c=1;

    233. 

  233.                         unset($fieldsarray);

    234. 

  234.                         $to = $emrow['email'];

    235. 

  235.                         $fieldsarray["{EMAIL}"]=$emrow['email'];

    236. 

  236.                         $fieldsarray["{FIRSTNAME}"]=$emrow['firstname'];

    237. 

  237.                         $fieldsarray["{LASTNAME}"]=$emrow['lastname'];

    238. 

  238.                         $fieldsarray["{TOKEN}"]=$emrow['token'];

    239. 

  239.                         $fieldsarray["{LANGUAGE}"]=$emrow['language'];

    240. 

  240.                         while(isset($emrow["attribute_$c"]))

    241. 

  241.                         {

    242. 

  242.                             $fieldsarray["{ATTRIBUTE_$c}"]=$emrow["attribute_$c"];

    243. 

  243.                             ++$c;

    244. 

  244.                         }

    245. 

  245.                         $fieldsarray["{ADMINNAME}"]= $thissurvey['adminname'];

    246. 

  246.                         $fieldsarray["{ADMINEMAIL}"]=$thissurvey['adminemail'];

    247. 

  247.                         $fieldsarray["{SURVEYNAME}"]=$thissurvey['name'];

    248. 

  248.                         $fieldsarray["{SURVEYDESCRIPTION}"]=$thissurvey['description'];

    249. 

  249.                         $fieldsarray["{EXPIRY}"]=$thissurvey["expiry"];

    250. 

  250. 

    251. 

  251.                         $emrow['language']=trim($emrow['language']);

    252. 

  252.                         if ($emrow['language']=='') {$emrow['language']=$baselanguage;} //if language is not give use default

    253. 

  253.                         $found = array_search($emrow['language'], $surveylangs);

    254. 

  254.                         if ($found==false) {$emrow['language']=$baselanguage;}

    255. 

  255. 

    256. 

  256.                         $from = $thissurvey['adminemail'];

    257. 

  257. 

    258. 

  258. 

    259. 

  259.                         if ($ishtml === false)

    260. 

  260.                         {

    261. 

  261.                             if ( $modrewrite )

    262. 

  262.                             {

    263. 

  263.                                 $fieldsarray["{SURVEYURL}"]="$publicurl/$surveyid/lang-".trim($emrow['language'])."/tk-{$emrow['token']}";

    264. 

  264.                             }

    265. 

  265.                             else

    266. 

  266.                             {

    267. 

  267.                                 $fieldsarray["{SURVEYURL}"]="$publicurl/index.php?lang=".trim($emrow['language'])."&sid=$surveyid&token={$emrow['token']}";

    268. 

  268.                             }

    269. 

  269.                         }

    270. 

  270.                         else

    271. 

  271.                         {

    272. 

  272.                             if ( $modrewrite )

    273. 

  273.                             {

    274. 

  274.                                 $fieldsarray["{SURVEYURL}"]="<a href='$publicurl/$surveyid/lang-".trim($emrow['language'])."/tk-{$emrow['token']}'>".htmlspecialchars("$publicurl/$surveyid/lang-".trim($emrow['language'])."/tk-{$emrow['token']}")."</a>";

    275. 

  275.                             }

    276. 

  276.                             else

    277. 

  277.                             {

    278. 

  278.                                 $fieldsarray["{SURVEYURL}"]="<a href='$publicurl/index.php?lang=".trim($emrow['language'])."&sid=$surveyid&token={$emrow['token']}'>".htmlspecialchars("$publicurl/index.php?lang=".trim($emrow['language'])."&sid=$surveyid&token={$emrow['token']}")."</a>";

    279. 

  279.                             }

    280. 

  280.                         }

    281. 

  281.                         $this->debugLsrc("wir sind in ".__FUNCTION__." Line ".__LINE__.", invite ");

    282. 

  282.                         $modsubject=Replacefields($_POST['subject_'.$emrow['language']], $fieldsarray);

    283. 

  283.                         $modmessage=Replacefields($_POST['message_'.$emrow['language']], $fieldsarray);

    284. 

  284. 

    285. 

  285.                         if (SendEmailMessage($modmessage, $modsubject, $to , $from, $sitename, $ishtml, getBounceEmail($surveyid)))

    286. 

  286.                         {

    287. 

  287.                             // Put date into sent

    288. 

  288.                             //$timeadjust = 0;

    289. 

  289.                             $today = date("Y-m-d H:i");

    290. 

  290.                             $this->debugLsrc("wir sind in ".__FUNCTION__." Line ".__LINE__.", invite Today:".$today);

    291. 

  291.                             $udequery = "UPDATE ".db_table_name("tokens_{$surveyid}")."\n"

    292. 

  292.                             ."SET sent='$today' WHERE tid={$emrow['tid']}";

    293. 

  293.                             //

    294. 

  294.                             $uderesult = $connect->Execute($udequery);

    295. 

  295.                             $mailsSend++;

    296. 

  296.                             //$tokenoutput .= "[".("Invitation sent to:")."{$emrow['firstname']} {$emrow['lastname']} ($to)]\n";

    297. 

  297.                         }

    298. 

  298.                         else

    299. 

  299.                         {

    300. 

  300.                             //$tokenoutput .= ReplaceFields(("Email to {FIRSTNAME} {LASTNAME} ({EMAIL}) failed. Error Message:")." ".$maildebug."", $fieldsarray);

    301. 

  301.                             if($n==1)

    302. 

  302.                             $failedAddresses .= ",".$to;

    303. 

  303.                             else

    304. 

  304.                             {

    305. 

  305.                                 $failedAddresses = $to;

    306. 

  306.                                 $n=1;

    307. 

  307.                             }

    308. 

  308.                         }

    309. 

  309.                     }

    310. 

  310.                     $this->debugLsrc("wir sind in ".__FUNCTION__." Line ".__LINE__.", invite ");

    311. 

  311.                     if ($ctcount > $emcount)

    312. 

  312.                     {

    313. 

  313.                         $lefttosend = $ctcount-$maxemails;

    314. 

  314. 

    315. 

  315.                     }else{$lefttosend = 0;}

    316. 

  316.                 }

    317. 

  317.                 else

    318. 

  318.                 {

    319. 

  319.                     return "No Mails to send";

    320. 

  320.                 }

    321. 

  321.                  

    322. 

  322.                 if($maxemails>0 && $maxemails!='')

    323. 

  323.                 {

    324. 

  324.                     $returnValue = "".$mailsSend." Mails send. ".$lefttosend." Mails left to send";

    325. 

  325.                     if(isset($failedAddresses))

    326. 

  326.                     $returnValue .= "\nCould not send to: ".$failedAddresses;

    327. 

  327.                     return $returnValue;

    328. 

  328.                 }

    329. 

  329. 

    330. 

  330.                 if(isset($mailsSend))

    331. 

  331.                 {

    332. 

  332.                     $returnValue = "".$mailsSend." Mails send. ";

    333. 

  333.                     if(isset($failedAddresses))

    334. 

  334.                     $returnValue .= "\nCould not send to: ".$failedAddresses;

    335. 

  335.                     return $returnValue;

    336. 

  336.                 }

    337. 

  337. 

    338. 

  338.                  

    339. 

  339. 

    340. 

  340. 

    341. 

  341.                 break;

    342. 

  342.             case "remind":

    343. 

  343.                 // XXX:

    344. 

  344.                 // TODO:

    345. 

  345.                 //				if (!isset($_POST['ok']) || !$_POST['ok'])

    346. 

  346.                 //				{

    347. 

  347. 

    348. 

  348.                 /*

    349. 

  349.                  * look if there were reminders send in the past, and if some tokens got lesser reminders than others

    350. 

  350.                  *

    351. 

  351.                  * - if so: send reminders to the unremindet participants until they got the same remindcount than the others

    352. 

  352.                  * - if not: send reminders normally

    353. 

  353.                  */

    354. 

  354.                  

    355. 

  355.                 $remSQL = "SELECT tid, remindercount "

    356. 

  356.                 . "FROM ".db_table_name("tokens_{$surveyid}")." "

    357. 

  357.                 . "WHERE (completed = 'N' or completed = '') AND sent <> 'N' and sent <>'' AND token <>'' AND EMAIL <>'' "

    358. 

  358.                 . "ORDER BY remindercount desc LIMIT 1";

    359. 

  359. 

    360. 

  360. 		$this->debugLsrc("Executing SQL: ".$remSQL);

    361. 

  361. 

    362. 

  362.                 $remResult = db_execute_assoc($remSQL);

    363. 

  363.                 $remRow = $remResult->FetchRow();

    364. 

  364.                  

    365. 

  365. 		/* Get the reminder count from the row, if we have a row.  If 

    366. 

  366. 		 * we don't have a row then we set reminderCount to 0 to prevent

    367. 

  367. 		 * queries down below from bombing out. */

    368. 

  368. 		$reminderCount = $remRow['remindercount'];

    369. 

  369. 		if(empty($reminderCount)) {

    370. 

  370. 			$this->debugLsrc("There are no reminders to send.");

    371. 

  371. 			$reminderCount = 0;

    372. 

  372. 		}

    373. 

  373.                  

    374. 

  374. 		$this->debugLsrc("wir sind in ".__FUNCTION__." Line ".__LINE__.", remind ".$remRow['tid']."; ".$reminderCount." ");

    375. 

  375. 		

    376. 

  376.                 $sendOnlySQL = "SELECT tid, remindercount "

    377. 

  377.                 . "FROM ".db_table_name("tokens_{$surveyid}")." "

    378. 

  378. 		. "WHERE (completed = 'N' or completed = '') AND sent <> 'N' and sent <>'' AND token <>'' AND EMAIL <>'' AND remindercount < ".$reminderCount." "

    379. 

  379.                 . "ORDER BY tid asc LIMIT 1";

    380. 

  380.                  

    381. 

  381. 		$this->debugLsrc("Executing SQL: ".$sendOnlySQL);

    382. 

  382.                  

    383. 

  383.                 if($sendOnlyResult->RecordCount()>0)

    384. 

  384.                 {

    385. 

  385.                     $sendOnlyRow = $sendOnlyResult->FetchRow();

    386. 

  386.                     $starttokenid = $sendOnlyRow['tid'];

    387. 

  387.                     $this->debugLsrc("wir sind in ".__FUNCTION__." Line ".__LINE__.", remind ".$sendOnlyRow['tid']."; ".$sendOnlyRow['remindercount']." ");

    388. 

  388.                 }

    389. 

  389.                  

    390. 

  390.                 if(isset($surveyid) && getEmailFormat($surveyid) == 'html')

    391. 

  391.                 {

    392. 

  392.                     $ishtml=true;

    393. 

  393.                 }

    394. 

  394.                 else

    395. 

  395.                 {

    396. 

  396.                     $ishtml=false;

    397. 

  397.                 }

    398. 

  398.                  

    399. 

  399.                 //GET SURVEY DETAILS

    400. 

  400.                 $thissurvey=getSurveyInfo($surveyid);

    401. 

  401.                  

    402. 

  402.                 $this->debugLsrc("wir sind in ".__FUNCTION__." Line ".__LINE__.", $surveyid, $type");

    403. 

  403.                 // Texte für Mails aus der Datenbank holen.

    404. 

  404.                  

    405. 

  405.                 $sql = 	"SELECT surveyls_language, surveyls_email_remind_subj, surveyls_email_remind  ".

    406. 

  406. 							"FROM {$dbprefix}surveys_languagesettings ".

    407. 

  407. 							"WHERE surveyls_survey_id = ".$surveyid." ";

    408. 

  408. 

    409. 

  409.                 $this->debugLsrc("wir sind in ".__FUNCTION__." Line ".__LINE__.", invite ");

    410. 

  410.                  

    411. 

  411.                 $sqlResult = db_execute_assoc($sql);

    412. 

  412.                  

    413. 

  413.                 while($languageRow = $sqlResult->FetchRow())

    414. 

  414.                 {

    415. 

  415.                     $_POST['message_'.$languageRow['surveyls_language']] = $languageRow['surveyls_email_remind'];

    416. 

  416.                     $_POST['subject_'.$languageRow['surveyls_language']] = $languageRow['surveyls_email_remind_subj'];

    417. 

  417.                 }

    418. 

  418. 

    419. 

  419.                 //$tokenoutput .= ("Sending Reminders")."\n";

    420. 

  420.                  

    421. 

  421.                 $surveylangs = GetAdditionalLanguagesFromSurveyID($surveyid);

    422. 

  422.                 $baselanguage = GetBaseLanguageFromSurveyID($surveyid);

    423. 

  423.                 array_unshift($surveylangs,$baselanguage);

    424. 

  424.                  

    425. 

  425.                 foreach ($surveylangs as $language)

    426. 

  426.                 {

    427. 

  427.                     $_POST['message_'.$language]=auto_unescape($_POST['message_'.$language]);

    428. 

  428.                     $_POST['subject_'.$language]=auto_unescape($_POST['subject_'.$language]);

    429. 

  429. 

    430. 

  430.                 }

    431. 

  431.                  

    432. 

  432.                 $SQLemailstatuscondition = " AND emailstatus = 'OK'";

    433. 

  433. 

    434. 

  434.                 if (isset($_POST['maxremindercount']) &&

    435. 

  435.                 $_POST['maxremindercount'] != '' &&

    436. 

  436.                 intval($_POST['maxremindercount']) != 0)

    437. 

  437.                 {

    438. 

  438.                     $SQLremindercountcondition = " AND remindercount < ".intval($_POST['maxremindercount']);

    439. 

  439.                 }

    440. 

  440.                 else

    441. 

  441.                 {

    442. 

  442.                     $SQLremindercountcondition = "";

    443. 

  443.                 }

    444. 

  444.                  

    445. 

  445.                 if (isset($_POST['minreminderdelay']) &&

    446. 

  446.                 $_POST['minreminderdelay'] != '' &&

    447. 

  447.                 intval($_POST['minreminderdelay']) != 0)

    448. 

  448.                 {

    449. 

  449.                     // $_POST['minreminderdelay'] in days (86400 seconds per day)

    450. 

  450.                     $compareddate = date_shift(date("Y-m-d H:i:s",time() - 86400 * intval($_POST['minreminderdelay'])),

    451. 

  451. 									"Y-m-d H:i",$timeadjust);

    452. 

  452.                     $SQLreminderdelaycondition = " AND ( "

    453. 

  453.                     . " (remindersent = 'N' AND sent < '".$compareddate."') "

    454. 

  454.                     . " OR "

    455. 

  455.                     . " (remindersent < '".$compareddate."'))";

    456. 

  456.                 }

    457. 

  457.                 else

    458. 

  458.                 {

    459. 

  459.                     $SQLreminderdelaycondition = "";

    460. 

  460.                 }

    461. 

  461.                  

    462. 

  462.                 $ctquery = "SELECT * FROM ".db_table_name("tokens_{$surveyid}")." WHERE (completed ='N' or completed ='') AND sent<>'' AND sent<>'N' AND token <>'' AND email <> '' $SQLemailstatuscondition $SQLremindercountcondition $SQLreminderdelaycondition";

    463. 

  463.                  

    464. 

  464.                 if (isset($starttokenid)) {$ctquery .= " AND tid >= '{$starttokenid}'";}

    465. 

  465.                 //					if (isset($tokenid) && $tokenid) {$ctquery .= " AND tid = '{$tokenid}'";}

    466. 

  466.                 //					//$tokenoutput .= "<!-- ctquery: $ctquery -->\n";

    467. 

  467. 

    468. 

  468.                 $ctresult = $connect->Execute($ctquery) or $this->debugLsrc ("Database error!\n" . $connect->ErrorMsg());

    469. 

  469.                 $ctcount = $ctresult->RecordCount();

    470. 

  470.                 $ctfieldcount = $ctresult->FieldCount();

    471. 

  471.                 $emquery = "SELECT * ";

    472. 

  472.                 //if ($ctfieldcount > 7) {$emquery .= ", attribute_1, attribute_2";}

    473. 

  473.                  

    474. 

  474.                 // TLR change to put date into sent

    475. 

  475.                 $emquery .= " FROM ".db_table_name("tokens_{$surveyid}")." WHERE (completed = 'N' or completed = '') AND sent <> 'N' and sent <>'' AND token <>'' AND EMAIL <>'' $SQLemailstatuscondition $SQLremindercountcondition $SQLreminderdelaycondition";

    476. 

  476.                  

    477. 

  477.                 if (isset($starttokenid)) {$emquery .= " AND tid >= '{$starttokenid}'";}

    478. 

  478.                 if (isset($tokenid) && $tokenid) {$emquery .= " AND tid = '{$tokenid}'";}

    479. 

  479.                 $emquery .= " ORDER BY tid ";

    480. 

  480.                 $emresult = db_select_limit_assoc($emquery, $maxemails);

    481. 

  481.                 //$emresult = db_execute_assoc($emquery);

    482. 

  482.                 $emcount = $emresult->RecordCount();

    483. 

  483.                  

    484. 

  484.                 if ($emcount > 0)

    485. 

  485.                 {

    486. 

  486.                     while ($emrow = $emresult->FetchRow())

    487. 

  487.                     {

    488. 

  488.                         $c=1;

    489. 

  489.                         unset($fieldsarray);

    490. 

  490.                         $to = $emrow['email'];

    491. 

  491.                         $fieldsarray["{EMAIL}"]=$emrow['email'];

    492. 

  492.                         $fieldsarray["{FIRSTNAME}"]=$emrow['firstname'];

    493. 

  493.                         $fieldsarray["{LASTNAME}"]=$emrow['lastname'];

    494. 

  494.                         $fieldsarray["{TOKEN}"]=$emrow['token'];

    495. 

  495.                         $fieldsarray["{LANGUAGE}"]=$emrow['language'];

    496. 

  496.                         while(isset($emrow["attribute_$c"]))

    497. 

  497.                         {

    498. 

  498.                             $fieldsarray["{ATTRIBUTE_$c}"]=$emrow["attribute_$c"];

    499. 

  499.                             ++$c;

    500. 

  500.                         }

    501. 

  501. 

    502. 

  502.                         $fieldsarray["{ADMINNAME}"]= $thissurvey['adminname'];

    503. 

  503.                         $fieldsarray["{ADMINEMAIL}"]=$thissurvey['adminemail'];

    504. 

  504.                         $fieldsarray["{SURVEYNAME}"]=$thissurvey['name'];

    505. 

  505.                         $fieldsarray["{SURVEYDESCRIPTION}"]=$thissurvey['description'];

    506. 

  506.                         $fieldsarray["{EXPIRY}"]=$thissurvey["expiry"];

    507. 

  507. 

    508. 

  508.                         $emrow['language']=trim($emrow['language']);

    509. 

  509.                         if ($emrow['language']=='') {$emrow['language']=$baselanguage;} //if language is not give use default

    510. 

  510.                         if(!in_array($emrow['language'], $surveylangs)) {$emrow['language']=$baselanguage;} // if given language is not available use default

    511. 

  511.                         $found = array_search($emrow['language'], $surveylangs);

    512. 

  512.                         if ($found==false) {$emrow['language']=$baselanguage;}

    513. 

  513.                          

    514. 

  514.                         $from = $thissurvey['adminemail'];

    515. 

  515.                          

    516. 

  516.                         if (getEmailFormat($surveyid) == 'html')

    517. 

  517.                         {

    518. 

  518.                             $ishtml=true;

    519. 

  519.                         }

    520. 

  520.                         else

    521. 

  521.                         {

    522. 

  522.                             $ishtml=false;

    523. 

  523.                         }

    524. 

  524.                          

    525. 

  525.                         if ($ishtml == false)

    526. 

  526.                         {

    527. 

  527.                             if ( $modrewrite )

    528. 

  528.                             {

    529. 

  529.                                 $fieldsarray["{SURVEYURL}"]="$publicurl/$surveyid/lang-".trim($emrow['language'])."/tk-{$emrow['token']}";

    530. 

  530.                             }

    531. 

  531.                             else

    532. 

  532.                             {

    533. 

  533.                                 $fieldsarray["{SURVEYURL}"]="$publicurl/index.php?lang=".trim($emrow['language'])."&sid=$surveyid&token={$emrow['token']}";

    534. 

  534.                             }

    535. 

  535.                         }

    536. 

  536.                         else

    537. 

  537.                         {

    538. 

  538.                             if ( $modrewrite )

    539. 

  539.                             {

    540. 

  540.                                 $fieldsarray["{SURVEYURL}"]="<a href='$publicurl/$surveyid/lang-".trim($emrow['language'])."/tk-{$emrow['token']}'>".htmlspecialchars("$publicurl/$surveyid/lang-".trim($emrow['language'])."/tk-{$emrow['token']}")."</a>";

    541. 

  541.                             }

    542. 

  542.                             else

    543. 

  543.                             {

    544. 

  544.                                 $fieldsarray["{SURVEYURL}"]="<a href='$publicurl/index.php?lang=".trim($emrow['language'])."&sid=$surveyid&token={$emrow['token']}'>".htmlspecialchars("$publicurl/index.php?lang=".trim($emrow['language'])."&sid=$surveyid&token={$emrow['token']}")."</a>";

    545. 

  545.                                 $_POST['message_'.$emrow['language']] = html_entity_decode($_POST['message_'.$emrow['language']], ENT_QUOTES, $emailcharset);

    546. 

  546.                             }

    547. 

  547.                         }

    548. 

  548.                          

    549. 

  549.                         $msgsubject=Replacefields($_POST['subject_'.$emrow['language']], $fieldsarray);

    550. 

  550.                         $sendmessage=Replacefields($_POST['message_'.$emrow['language']], $fieldsarray);

    551. 

  551. 

    552. 

  552.                         if (SendEmailMessage($sendmessage, $msgsubject, $to, $from, $sitename, $ishtml, getBounceEmail($surveyid)))

    553. 

  553.                         {

    554. 

  554. 

    555. 

  555.                             // Put date into remindersent

    556. 

  556.                             $today = date("Y-m-d H:i");

    557. 

  557.                             $udequery = "UPDATE ".db_table_name("tokens_{$surveyid}")."\n"

    558. 

  558.                             ."SET remindersent='$today',remindercount = remindercount+1  WHERE tid={$emrow['tid']}";

    559. 

  559.                             //

    560. 

  560.                             $uderesult = $connect->Execute($udequery) or $this->debugLsrc ("Could not update tokens$udequery".$connect->ErrorMsg());

    561. 

  561.                             //orig: $tokenoutput .= "\t\t\t({$emrow['tid']})[".("Reminder sent to:")." {$emrow['firstname']} {$emrow['lastname']}]\n";

    562. 

  562.                             //$tokenoutput .= "\t\t\t({$emrow['tid']}) [".("Reminder sent to:")." {$emrow['firstname']} {$emrow['lastname']} ($to)]\n";

    563. 

  563.                             $mailsSend++;

    564. 

  564.                         }

    565. 

  565.                         else

    566. 

  566.                         {

    567. 

  567.                             //$tokenoutput .= ReplaceFields(("Email to {FIRSTNAME} {LASTNAME} ({EMAIL}) failed. Error Message:")." ".$maildebug."", $fieldsarray);

    568. 

  568.                             if($n==1)

    569. 

  569.                             $failedAddresses .= ",".$to;

    570. 

  570.                             else

    571. 

  571.                             {

    572. 

  572.                                 $failedAddresses = $to;

    573. 

  573.                                 $n=1;

    574. 

  574.                             }

    575. 

  575. 

    576. 

  576.                         }

    577. 

  577.                         //$lasttid = $emrow['tid'];

    578. 

  578.                          

    579. 

  579.                     }

    580. 

  580.                     if ($ctcount > $emcount)

    581. 

  581.                     {

    582. 

  582.                         $lefttosend = $ctcount-$maxemails;

    583. 

  583.                     }else{$lefttosend = 0;}

    584. 

  584.                 }

    585. 

  585.                 else

    586. 

  586.                 {

    587. 

  587.                     return "No Reminders to send";

    588. 

  588.                 }

    589. 

  589.                  

    590. 

  590.                 if($maxemails>0)

    591. 

  591.                 {

    592. 

  592.                     $returnValue = "".$mailsSend." Reminders send. ".$lefttosend." Reminders left to send";

    593. 

  593.                     if(isset($failedAddresses))

    594. 

  594.                     $returnValue .= "\nCould not send to: ".$failedAddresses;

    595. 

  595.                     return $returnValue;

    596. 

  596.                 }

    597. 

  597.                  

    598. 

  598.                 if(isset($mailsSend))

    599. 

  599.                 {

    600. 

  600.                     $returnValue = "".$mailsSend." Reminders send. ";

    601. 

  601.                     if(isset($failedAddresses))

    602. 

  602.                     $returnValue .= "\nCould not send to: ".$failedAddresses;

    603. 

  603.                     return $returnValue;

    604. 

  604.                 }

    605. 

  605. 

    606. 

  606. 

    607. 

  607.                 break;

    608. 

  608.             default:

    609. 

  609. 

    610. 

  610.                 break;

    611. 

  611.         }

    612. 

  612.     }

    613. 

  613. 

    614. 

  614.     /**

    615. 

  615.      * loginCheck for Lsrc, checks if the user with given password exists in LS Database and

    616. 

  616.      * sets the SESSION rights for this user

    617. 

  617.      * @param String $sUser

    618. 

  618.      * @param String $sPass

    619. 

  619.      * @return boolean

    620. 

  620.      */

    621. 

  621.     function checkUser($sUser, $sPass) // XXX

    622. 

  622.     {

    623. 

  623.         global $connect ;

    624. 

  624.         global $dbprefix ;

    625. 

  625.         $ADODB_FETCH_MODE = ADODB_FETCH_ASSOC;

    626. 

  626.         include("lsrc.config.php");

    627. 

  627.         require(dirname(__FILE__)."/../classes/core/sha256.php");

    628. 

  628. 

    629. 

  629.         $query="SELECT uid, password, lang, superadmin FROM {$dbprefix}users WHERE users_name=".$connect->qstr(sanitize_user($sUser));

    630. 

  630.         // echo $query;

    631. 

  631.         $result = db_execute_assoc($query);

    632. 

  632.         $gv = $result->FetchRow();

    633. 

  633.         if($result->RecordCount() < 1)

    634. 

  634.         {

    635. 

  635.             return false;

    636. 

  636.         }

    637. 

  637.         else

    638. 

  638.         {

    639. 

  639.             if((SHA256::hashing($sPass)==$gv['password']))

    640. 

  640.             {

    641. 

  641.                 $_SESSION['loginID']=$gv['uid'];

    642. 

  642.                 $_SESSION['lang']=$gv['lang'];

    643. 

  643. 

    644. 

  644.                 $squery = "SELECT create_survey, configurator, create_user, delete_user, superadmin, manage_template, manage_label FROM {$dbprefix}users WHERE uid={$gv['uid']}";

    645. 

  645.                 $sresult = db_execute_assoc($squery); //Checked

    646. 

  646.                 if ($sresult->RecordCount()>0)

    647. 

  647.                 {

    648. 

  648.                     $fields = $sresult->FetchRow();

    649. 

  649.                     $_SESSION['USER_RIGHT_CREATE_SURVEY'] = $fields['create_survey'];

    650. 

  650.                     $_SESSION['USER_RIGHT_CONFIGURATOR'] = $fields['configurator'];

    651. 

  651.                     $_SESSION['USER_RIGHT_CREATE_USER'] = $fields['create_user'];

    652. 

  652.                     $_SESSION['USER_RIGHT_DELETE_USER'] = $fields['delete_user'];

    653. 

  653.                     $_SESSION['USER_RIGHT_SUPERADMIN'] = $fields['superadmin'];

    654. 

  654.                     $_SESSION['USER_RIGHT_MANAGE_TEMPLATE'] = $fields['manage_template'];

    655. 

  655.                     $_SESSION['USER_RIGHT_MANAGE_LABEL'] = $fields['manage_label'];

    656. 

  656.                 }

    657. 

  657.                 return true;

    658. 

  658.             }

    659. 

  659.             else

    660. 

  660.             {

    661. 

  661.                 return false;

    662. 

  662.             }

    663. 

  663.         }

    664. 

  664.     }

    665. 

  665. 

    666. 

  666.     /**

    667. 

  667.      * Lsrc checks the existence of Surveys more than one time, so this makes sense to be DRY

    668. 

  668.      *

    669. 

  669.      * @param int $sid

    670. 

  670.      * @return boolean

    671. 

  671.      */

    672. 

  672.     function surveyExists($sid)//XXX

    673. 

  673.     {

    674. 

  674.         global $connect ;

    675. 

  675.         global $dbprefix ;

    676. 

  676.         $ADODB_FETCH_MODE = ADODB_FETCH_ASSOC;

    677. 

  677.         include("lsrc.config.php");

    678. 

  678. 

    679. 

  679.         $query="SELECT * FROM {$dbprefix}surveys WHERE sid = ".$sid;

    680. 

  680.         // echo $query;

    681. 

  681.         $result = db_execute_assoc($query);

    682. 

  682.         if($result->RecordCount() < 1)

    683. 

  683.         {

    684. 

  684.             return false;

    685. 

  685.         }

    686. 

  686.         else

    687. 

  687.         {

    688. 

  688.             return true;

    689. 

  689.         }

    690. 

  690.     }

    691. 

  691. 

    692. 

  692.     /**

    693. 

  693.      * function to import surveys

    694. 

  694.      *

    695. 

  695.      * @param  $iVid - desired survey id

    696. 

  696.      * @param $importFile - name of the file to import in core(survey) dir

    697. 

  697.      * @return boolean

    698. 

  698.      */

    699. 

  699.     function importSurvey($iVid, $importFile)

    700. 

  700.     {

    701. 

  701.         global $connect ;

    702. 

  702.         global $dbprefix ;

    703. 

  703.         global $clang;

    704. 

  704. 

    705. 

  705.         include("lsrc.config.php");

    706. 

  706.         $ADODB_FETCH_MODE = ADODB_FETCH_ASSOC;

    707. 

  707.         $this->debugLsrc("wir sind in ".__FUNCTION__." Line ".__LINE__.", OK ");

    708. 

  708.         // HINT FOR IMPORTERS: go to Line 714 to manipulate the Survey, while it's imported

    709. 

  709. 

    710. 

  710.         $the_full_file_path = $coreDir.$importFile;

    711. 

  711. 

    712. 

  712.         $this->debugLsrc("wir sind in ".__FUNCTION__." Line ".__LINE__.",the_full_file_path ='$the_full_file_path' OK ");

    713. 

  713.         

    714. 

  714.         include("../import_functions.php");

    715. 

  715.         include("../admin_functions.php");

    716. 

  716.         if (!isset($copyfunction))

    717. 

  717.         {

    718. 

  718.             $sFullFilepath=$the_full_file_path;

    719. 

  719.             $aPathInfo = pathinfo($sFullFilepath);

    720. 

  720.             $sExtension = $aPathInfo['extension'];

    721. 

  721.         }

    722. 

  722. 

    723. 

  723.         if (isset($sExtension) && strtolower($sExtension)=='csv')

    724. 

  724.         {

    725. 

  725.             $aImportResults=CSVImportSurvey($sFullFilepath,$iVid);

    726. 

  726.         }

    727. 

  727.         elseif (isset($sExtension) && strtolower($sExtension)=='lss')

    728. 

  728.         {

    729. 

  729.             $aImportResults=XMLImportSurvey($sFullFilepath,NULL,NULL,$iVid);

    730. 

  730.         } elseif (isset($copyfunction))

    731. 

  731.         {

    732. 

  732.             $aImportResults=XMLImportSurvey('',$copysurveydata,$sNewSurveyName,$iVid);

    733. 

  733.         }

    734. 

  734. 

    735. 

  735.         //CANNOT BE USED BY LSRC RIGHT NOW

    736. 

  736.         // Translate INSERTANS codes if chosen

    737. 

  737. //        if (isset($aImportResults['fieldnames']) && $sTransLinks === true)

    738. 

  738. //        {

    739. 

  739. //            transInsertAns($aImportResults['newsid'],$aImportResults['oldsid'],$aImportResults['fieldnames']);

    740. 

  740. //        }

    741. 

  741. 

    742. 

  742.         return $aImportResults['newsid'];

    743. 

  743.     }

    744. 

  744. 

    745. 

  745.     /**

    746. 

  746.      * function to activate surveys based on new activate.php 5771 2008-10-13 02:28:40Z jcleeland $

    747. 

  747.      *

    748. 

  748.      * @param unknown_type $surveyid

    749. 

  749.      * @return boolean

    750. 

  750.      */

    751. 

  751.     function activateSurvey($surveyid)//XXX activateSurvey

    752. 

  752.     {

    753. 

  753.         global $dbprefix, $connect, $clang, $databasetype,$databasetabletype;

    754. 

  754.         $ADODB_FETCH_MODE = ADODB_FETCH_ASSOC;

    755. 

  755.         include("lsrc.config.php");

    756. 

  756.         include('../admin_functions.php');

    757. 

  757.         include('../activate_functions.php');

    758. 

  758.         $this->debugLsrc("wir sind in ".__FILE__." - ".__FUNCTION__." Line ".__LINE__.", OK ");

    759. 

  759.         $returnOutput = activateSurvey($surveyid,$surveyid,'lsrc');

    760. 

  760.         

    761. 

  761.         $this->debugLsrc("wir sind in ".__FILE__." - ".__FUNCTION__." Line ".__LINE__.", $returnOutput ");

    762. 

  762. 

    763. 

  763.         return $returnOutput;

    764. 

  764.     } // end activateSurvey();

    765. 

  765. 

    766. 

  766.     /**

    767. 

  767.      * not used, a test, thought this could maybe enhance security, may be deleted

    768. 

  768.      *

    769. 

  769.      * @return Error 404 fake

    770. 

  770.      */

    771. 

  771.     function fake404()// XXX

    772. 

  772.     {

    773. 

  773.         return '<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"

    774. 

  774. 	  "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">

    775. 

  775. 	<html xmlns="http://www.w3.org/1999/xhtml" lang="de" xml:lang="de">

    776. 

  776. 	<head>

    777. 

  777. 	<title>Objekt nicht gefunden!</title>

    778. 

  778. 	<link rev="made" href="" />

    779. 

  779. 	<style type="text/css"><!--/*--><![CDATA[/*><!--*/ 

    780. 

  780. 	    body { color: #000000; background-color: #FFFFFF; }

    781. 

  781. 	    a:link { color: #0000CC; }

    782. 

  782. 	    p, address {margin-left: 3em;}

    783. 

  783. 	    span {font-size: smaller;}

    784. 

  784. 	/*]]>*/--></style>

    785. 

  785. 	</head>

    786. 

  786. 	

    787. 

  787. 	<body>

    788. 

  788. 	<h1>Objekt nicht gefunden!</h1>

    789. 

  789. 	<p>

    790. 

  790. 	

    791. 

  791. 	

    792. 

  792. 	    Der angeforderte URL konnte auf dem Server nicht gefunden werden.

    793. 

  793. 	

    794. 

  794. 	  

    795. 

  795. 	

    796. 

  796. 	    Sofern Sie den URL manuell eingegeben haben,

    797. 

  797. 	    &uuml;berpr&uuml;fen Sie bitte die Schreibweise und versuchen Sie es erneut.

    798. 

  798. 	

    799. 

  799. 	  

    800. 

  800. 	

    801. 

  801. 	</p>

    802. 

  802. 	<p>

    803. 

  803. 	Sofern Sie dies f&uuml;r eine Fehlfunktion des Servers halten,

    804. 

  804. 	informieren Sie bitte den 

    805. 

  805. 	<a href="mailto:webmaster@'.$_SERVER["SERVER_NAME"].'">Webmaster</a>

    806. 

  806. 	hier&uuml;ber.

    807. 

  807. 	

    808. 

  808. 	</p>

    809. 

  809. 	

    810. 

  810. 	<h2>Error 404</h2>

    811. 

  811. 	<address>

    812. 

  812. 	

    813. 

  813. 	  <a href="/">'.$_SERVER["SERVER_NAME"].'</a>

    814. 

  814. 	  

    815. 

  815. 	  <span>'.date("m/d/Y H:i:s").'

    816. 

  816. 	  Apache/2.2.9 (Win32) DAV/2 mod_ssl/2.2.9 OpenSSL/0.9.8i mod_autoindex_color PHP/5.2.6 mod_jk/1.2.26</span>

    817. 

  817. 	</address>

    818. 

  818. 	</body>

    819. 

  819. 	</html>

    820. 

  820. 	

    821. 

  821. 	';

    822. 

  822.     }

    823. 

  823. 

    824. 

  824.     /**

    825. 

  825.      * importing a group into an existing survey

    826. 

  826.      *

    827. 

  827.      * @param int $iVid SurveyID

    828. 

  828.      * @param string $sMod Group that should be loaded into the Survey

    829. 

  829.      */

    830. 

  830.     function importGroup($surveyid, $sMod) //XXX

    831. 

  831.     {

    832. 

  832.         global $connect ;

    833. 

  833.         global $dbprefix ;

    834. 

  834.         $ADODB_FETCH_MODE = ADODB_FETCH_ASSOC;

    835. 

  835.         include("lsrc.config.php");

    836. 

  836.         $newsid = $surveyid;

    837. 

  837. 

    838. 

  838.         $this->debugLsrc("wir sind in ".__FILE__." - ".__FUNCTION__." Line ".__LINE__.", OK ");

    839. 

  839. 

    840. 

  840.         $the_full_file_path = $modDir.$sMod.".csv";

    841. 

  841. 

    842. 

  842.         $this->debugLsrc("wir sind in ".__FILE__." - ".__FUNCTION__." Line ".__LINE__.", OK $the_full_file_path ");

    843. 

  843. 

    844. 

  844.         $handle = fopen($the_full_file_path, "r");

    845. 

  845.         while (!feof($handle))

    846. 

  846.         {

    847. 

  847.             $buffer = fgets($handle);

    848. 

  848.             $bigarray[] = $buffer;

    849. 

  849.         }

    850. 

  850.         fclose($handle);

    851. 

  851. 

    852. 

  852.         if (substr($bigarray[0], 0, 23) != "# LimeSurvey Group Dump" && substr($bigarray[0], 0, 24) != "# PHPSurveyor Group Dump")

    853. 

  853.         {

    854. 

  854.             //$importgroup .= "<strong><font color='red'>".("Error")."</font></strong>\n";

    855. 

  855.             //$importgroup .= ("This file is not a LimeSurvey group file. Import failed.")."\n";

    856. 

  856.             //$importgroup .= "<input type='submit' value='".("Main Admin Screen")."' onclick=\"window.open('$scriptname', '_top')\">\n";

    857. 

  857.             //$importgroup .= "</td></tr></table>\n";

    858. 

  858.             //unlink($the_full_file_path);

    859. 

  859.             return false;

    860. 

  860.         }

    861. 

  861. 

    862. 

  862.         for ($i=0; $i<9; $i++)

    863. 

  863.         {

    864. 

  864.             unset($bigarray[$i]);

    865. 

  865.         }

    866. 

  866.         $bigarray = array_values($bigarray);

    867. 

  867. 

    868. 

  868.         //GROUPS

    869. 

  869.         if (array_search("# QUESTIONS TABLE\n", $bigarray))

    870. 

  870.         {

    871. 

  871.             $stoppoint = array_search("# QUESTIONS TABLE\n", $bigarray);

    872. 

  872.         }

    873. 

  873.         elseif (array_search("# QUESTIONS TABLE\r\n", $bigarray))

    874. 

  874.         {

    875. 

  875.             $stoppoint = array_search("# QUESTIONS TABLE\r\n", $bigarray);

    876. 

  876.         }

    877. 

  877.         else

    878. 

  878.         {

    879. 

  879.             $stoppoint = count($bigarray)-1;

    880. 

  880.         }

    881. 

  881.         for ($i=0; $i<=$stoppoint+1; $i++)

    882. 

  882.         {

    883. 

  883.             if ($i<$stoppoint-2) {$grouparray[] = $bigarray[$i];}

    884. 

  884.             unset($bigarray[$i]);

    885. 

  885.         }

    886. 

  886.         $bigarray = array_values($bigarray);

    887. 

  887.         $this->debugLsrc("wir sind in ".__FILE__." - ".__FUNCTION__." Line ".__LINE__.", OK ");

    888. 

  888.         //QUESTIONS

    889. 

  889.         if (array_search("# ANSWERS TABLE\n", $bigarray))

    890. 

  890.         {

    891. 

  891.             $stoppoint = array_search("# ANSWERS TABLE\n", $bigarray);

    892. 

  892.         }

    893. 

  893.         elseif (array_search("# ANSWERS TABLE\r\n", $bigarray))

    894. 

  894.         {

    895. 

  895.             $stoppoint = array_search("# ANSWERS TABLE\r\n", $bigarray);

    896. 

  896.         }

    897. 

  897.         else

    898. 

  898.         {

    899. 

  899.             $stoppoint = count($bigarray)-1;

    900. 

  900.         }

    901. 

  901.         for ($i=0; $i<=$stoppoint+1; $i++)

    902. 

  902.         {

    903. 

  903.             if ($i<$stoppoint-2) {$questionarray[] = $bigarray[$i];}

    904. 

  904.             unset($bigarray[$i]);

    905. 

  905.         }

    906. 

  906.         $bigarray = array_values($bigarray);

    907. 

  907.         $this->debugLsrc("wir sind in ".__FILE__." - ".__FUNCTION__." Line ".__LINE__.", OK ");

    908. 

  908.         //ANSWERS

    909. 

  909.         if (array_search("# CONDITIONS TABLE\n", $bigarray))

    910. 

  910.         {

    911. 

  911.             $stoppoint = array_search("# CONDITIONS TABLE\n", $bigarray);

    912. 

  912.         }

    913. 

  913.         elseif (array_search("# CONDITIONS TABLE\r\n", $bigarray))

    914. 

  914.         {

    915. 

  915.             $stoppoint = array_search("# CONDITIONS TABLE\r\n", $bigarray);

    916. 

  916.         }

    917. 

  917.         else

    918. 

  918.         {

    919. 

  919.             $stoppoint = count($bigarray)-1;

    920. 

  920.         }

    921. 

  921.         for ($i=0; $i<=$stoppoint+1; $i++)

    922. 

  922.         {

    923. 

  923.             if ($i<$stoppoint-2) {$answerarray[] = $bigarray[$i];}

    924. 

  924.             unset($bigarray[$i]);

    925. 

  925.         }

    926. 

  926.         $bigarray = array_values($bigarray);

    927. 

  927.         $this->debugLsrc("wir sind in ".__FILE__." - ".__FUNCTION__." Line ".__LINE__.", OK ");

    928. 

  928.         //CONDITIONS

    929. 

  929.         if (array_search("# LABELSETS TABLE\n", $bigarray))

    930. 

  930.         {

    931. 

  931.             $stoppoint = array_search("# LABELSETS TABLE\n", $bigarray);

    932. 

  932.         }

    933. 

  933.         elseif (array_search("# LABELSETS TABLE\r\n", $bigarray))

    934. 

  934.         {

    935. 

  935.             $stoppoint = array_search("# LABELSETS TABLE\r\n", $bigarray);

    936. 

  936.         }

    937. 

  937.         else

    938. 

  938.         {

    939. 

  939.             $stoppoint = count($bigarray);

    940. 

  940.         }

    941. 

  941.         for ($i=0; $i<=$stoppoint+1; $i++)

    942. 

  942.         {

    943. 

  943.             if ($i<$stoppoint-2) {$conditionsarray[] = $bigarray[$i];}

    944. 

  944.             unset($bigarray[$i]);

    945. 

  945.         }

    946. 

  946.         $bigarray = array_values($bigarray);

    947. 

  947.         $this->debugLsrc("wir sind in ".__FILE__." - ".__FUNCTION__." Line ".__LINE__.", OK ");

    948. 

  948.         //LABELSETS

    949. 

  949.         if (array_search("# LABELS TABLE\n", $bigarray))

    950. 

  950.         {

    951. 

  951.             $stoppoint = array_search("# LABELS TABLE\n", $bigarray);

    952. 

  952.         }

    953. 

  953.         elseif (array_search("# LABELS TABLE\r\n", $bigarray))

    954. 

  954.         {

    955. 

  955.             $stoppoint = array_search("# LABELS TABLE\r\n", $bigarray);

    956. 

  956.         }

    957. 

  957.         else

    958. 

  958.         {

    959. 

  959.             $stoppoint = count($bigarray)-1;

    960. 

  960.         }

    961. 

  961.         for ($i=0; $i<=$stoppoint+1; $i++)

    962. 

  962.         {

    963. 

  963.             if ($i<$stoppoint-2) {$labelsetsarray[] = $bigarray[$i];}

    964. 

  964.             unset($bigarray[$i]);

    965. 

  965.         }

    966. 

  966.         $bigarray = array_values($bigarray);

    967. 

  967.         $this->debugLsrc("wir sind in ".__FILE__." - ".__FUNCTION__." Line ".__LINE__.", OK ");

    968. 

  968.         //LABELS

    969. 

  969.         if (array_search("# QUESTION_ATTRIBUTES TABLE\n", $bigarray))

    970. 

  970.         {

    971. 

  971.             $stoppoint = array_search("# QUESTION_ATTRIBUTES TABLE\n", $bigarray);

    972. 

  972.         }

    973. 

  973.         elseif (array_search("# QUESTION_ATTRIBUTES TABLE\r\n", $bigarray))

    974. 

  974.         {

    975. 

  975.             $stoppoint = array_search("# QUESTION_ATTRIBUTES TABLE\r\n", $bigarray);

    976. 

  976.         }

    977. 

  977.         else

    978. 

  978.         {

    979. 

  979.             $stoppoint = count($bigarray)-1;

    980. 

  980.         }

    981. 

  981.         for ($i=0; $i<=$stoppoint+1; $i++)

    982. 

  982.         {

    983. 

  983.             if ($i<$stoppoint-2) {$labelsarray[] = $bigarray[$i];}

    984. 

  984.             unset($bigarray[$i]);

    985. 

  985.         }

    986. 

  986.         $bigarray = array_values($bigarray);

    987. 

  987.         $this->debugLsrc("wir sind in ".__FILE__." - ".__FUNCTION__." Line ".__LINE__.", OK ");

    988. 

  988.         //LAST LOT (now question_attributes)

    989. 

  989.         if (!isset($noconditions) || $noconditions != "Y")

    990. 

  990.         {

    991. 

  991.             // stoppoint is the last line number

    992. 

  992.             // this is an empty line after the QA CSV lines

    993. 

  993.             $stoppoint = count($bigarray)-1;

    994. 

  994.             for ($i=0; $i<=$stoppoint+1; $i++)

    995. 

  995.             {

    996. 

  996.                 if ($i<=$stoppoint-1) {$question_attributesarray[] = $bigarray[$i];}

    997. 

  997.                 unset($bigarray[$i]);

    998. 

  998.             }

    999. 

  999.         }

    1000. 

  1000.         $bigarray = array_values($bigarray);

    1001. 

  1001. 

    1002. 

  1002.         $countgroups=0;

    1003. 

  1003.         if (isset($questionarray))

    1004. 

  1004.         {

    1005. 

  1005.             $questionfieldnames=convertCSVRowToArray($questionarray[0],',','"');

    1006. 

  1006.             unset($questionarray[0]);

    1007. 

  1007.             $countquestions = 0;

    1008. 

  1008.         }

    1009. 

  1009. 

    1010. 

  1010.         if (isset($answerarray))

    1011. 

  1011.         {

    1012. 

  1012.             $answerfieldnames=convertCSVRowToArray($answerarray[0],',','"');

    1013. 

  1013.             unset($answerarray[0]);

    1014. 

  1014.             $countanswers = 0;

    1015. 

  1015.         }

    1016. 

  1016. 

    1017. 

  1017.         $countconditions = 0;

    1018. 

  1018.         $countlabelsets=0;

    1019. 

  1019.         $countlabels=0;

    1020. 

  1020.         $countquestion_attributes = 0;

    1021. 

  1021.         $countanswers = 0;

    1022. 

  1022. 

    1023. 

  1023.         $this->debugLsrc("wir sind in ".__FILE__." - ".__FUNCTION__." Line ".__LINE__.", OK ");

    1024. 

  1024.         // first check that imported group, questions and labels support the

    1025. 

  1025.         // current survey's baselang

    1026. 

  1026.         $langcode = GetBaseLanguageFromSurveyID($newsid);

    1027. 

  1027.         if (isset($grouparray))

    1028. 

  1028.         {

    1029. 

  1029.             $groupfieldnames = convertCSVRowToArray($grouparray[0],',','"');

    1030. 

  1030.             $langfieldnum = array_search("language", $groupfieldnames);

    1031. 

  1031.             $gidfieldnum = array_search("gid", $groupfieldnames);

    1032. 

  1032.             $groupssupportbaselang = bDoesImportarraySupportsLanguage($grouparray,Array($gidfieldnum),$langfieldnum,$langcode,true);

    1033. 

  1033.             if (!$groupssupportbaselang)

    1034. 

  1034.             {

    1035. 

  1035.                 //$importgroup .= "<strong><font color='red'>".("Error")."</font></strong>\n";

    1036. 

  1036.                 //$importgroup .= ("You can't import a group which doesn't support the current survey's base language.")."\n";

    1037. 

  1037.                 //$importgroup .= "<input type='submit' value='".("Main Admin Screen")."' onclick=\"window.open('$scriptname', '_top')\">\n";

    1038. 

  1038.                 //$importgroup .= "</td></tr></table>\n";

    1039. 

  1039.                 //unlink($the_full_file_path);

    1040. 

  1040.                 return "Group does not support Surveys Baselanguage ($langcode)";

    1041. 

  1041.             }

    1042. 

  1042.         }

    1043. 

  1043.         $this->debugLsrc("wir sind in ".__FILE__." - ".__FUNCTION__." Line ".__LINE__.", OK ");

    1044. 

  1044.         if (isset($questionarray))

    1045. 

  1045.         {

    1046. 

  1046.             $langfieldnum = array_search("language", $questionfieldnames);

    1047. 

  1047.             $qidfieldnum = array_search("qid", $questionfieldnames);

    1048. 

  1048.             $questionssupportbaselang = bDoesImportarraySupportsLanguage($questionarray,Array($qidfieldnum), $langfieldnum,$langcode,false);

    1049. 

  1049.             if (!$questionssupportbaselang)

    1050. 

  1050.             {

    1051. 

  1051.                 //$importgroup .= "<strong><font color='red'>".("Error")."</font></strong>\n";

    1052. 

  1052.                 //$importgroup .= ("You can't import a question which doesn't support the current survey's base language.")."\n";

    1053. 

  1053.                 //$importgroup .= "<input type='submit' value='".("Main Admin Screen")."' onclick=\"window.open('$scriptname', '_top')\">\n";

    1054. 

  1054.                 //$importgroup .= "</td></tr></table>\n";

    1055. 

  1055.                 //unlink($the_full_file_path);

    1056. 

  1056.                 return "Group does not support Surveys Baselanguage ($langcode)";

    1057. 

  1057.             }

    1058. 

  1058.         }

    1059. 

  1059. 

    1060. 

  1060.         $this->debugLsrc("wir sind in ".__FILE__." - ".__FUNCTION__." Line ".__LINE__.", OK ");

    1061. 

  1061.         if (isset($labelsetsarray))

    1062. 

  1062.         {

    1063. 

  1063.             $labelsetfieldname = convertCSVRowToArray($labelsetsarray[0],',','"');

    1064. 

  1064.             $langfieldnum = array_search("languages", $labelsetfieldname);

    1065. 

  1065.             $lidfilednum =  array_search("lid", $labelsetfieldname);

    1066. 

  1066.             $labelsetssupportbaselang = bDoesImportarraySupportsLanguage($labelsetsarray,Array($lidfilednum),$langfieldnum,$langcode,true);

    1067. 

  1067.             if (!$labelsetssupportbaselang)

    1068. 

  1068.             {

    1069. 

  1069.                 $importquestion .= "<strong><font color='red'>".("Error")."</font></strong>\n"

    1070. 

  1070.                 .("You can't import label sets which don't support the current survey's base language")."\n"

    1071. 

  1071.                 ."</td></tr></table>\n";

    1072. 

  1072.                 //unlink($the_full_file_path);

    1073. 

  1073.                 return "Group does not support Surveys Baselanguage ($langcode)";

    1074. 

  1074.             }

    1075. 

  1075.         }

    1076. 

  1076. 

    1077. 

  1077.         $newlids = array(); // this array will have the "new lid" for the label sets, the key will be the "old lid"

    1078. 

  1078.         $this->debugLsrc("wir sind in ".__FILE__." - ".__FUNCTION__." Line ".__LINE__.", OK ");

    1079. 

  1079.         //DO ANY LABELSETS FIRST, SO WE CAN KNOW WHAT THEIR NEW LID IS FOR THE QUESTIONS

    1080. 

  1080.         if (isset($labelsetsarray) && $labelsetsarray) {

    1081. 

  1081.             $csarray=buildLabelSetCheckSumArray();   // build checksums over all existing labelsets

    1082. 

  1082.             $count=0;

    1083. 

  1083.             foreach ($labelsetsarray as $lsa) {

    1084. 

  1084.                 $fieldorders  =convertCSVRowToArray($labelsetsarray[0],',','"');

    1085. 

  1085.                 $fieldcontents=convertCSVRowToArray($lsa,',','"');

    1086. 

  1086.                 if ($count==0) {$count++; continue;}

    1087. 

  1087. 

    1088. 

  1088.                 $countlabelsets++;

    1089. 

  1089. 

    1090. 

  1090.                 $labelsetrowdata=array_combine($fieldorders,$fieldcontents);

    1091. 

  1091. 

    1092. 

  1092.                 // Save old labelid

    1093. 

  1093.                 $oldlid=$labelsetrowdata['lid'];

    1094. 

  1094.                 // set the new language

    1095. 

  1095.                 unset($labelsetrowdata['lid']);

    1096. 

  1096.                 $newvalues=array_values($labelsetrowdata);

    1097. 

  1097.                 $newvalues=array_map(array(&$connect, "qstr"),$newvalues); // quote everything accordingly

    1098. 

  1098.                 $lsainsert = "INSERT INTO {$dbprefix}labelsets (".implode(',',array_keys($labelsetrowdata)).") VALUES (".implode(',',$newvalues).")"; //handle db prefix

    1099. 

  1099.                 $lsiresult=$connect->Execute($lsainsert);

    1100. 

  1100. 

    1101. 

  1101.                 // Get the new insert id for the labels inside this labelset

    1102. 

  1102.                 $newlid=$connect->Insert_ID("{$dbprefix}labelsets",'lid');

    1103. 

  1103. 

    1104. 

  1104.                 if ($labelsarray) {

    1105. 

  1105.                     $count=0;

    1106. 

  1106.                     foreach ($labelsarray as $la) {

    1107. 

  1107.                         $lfieldorders  =convertCSVRowToArray($labelsarray[0],',','"');

    1108. 

  1108.                         $lfieldcontents=convertCSVRowToArray($la,',','"');

    1109. 

  1109.                         if ($count==0) {$count++; continue;}

    1110. 

  1110. 

    1111. 

  1111.                         // Combine into one array with keys and values since its easier to handle

    1112. 

  1112.                         $labelrowdata=array_combine($lfieldorders,$lfieldcontents);

    1113. 

  1113.                         $labellid=$labelrowdata['lid'];

    1114. 

  1114.                         if ($labellid == $oldlid) {

    1115. 

  1115.                             $labelrowdata['lid']=$newlid;

    1116. 

  1116. 

    1117. 

  1117.                             // translate internal links

    1118. 

  1118.                             $labelrowdata['title']=translink('label', $oldlid, $newlid, $labelrowdata['title']);

    1119. 

  1119. 

    1120. 

  1120.                             $newvalues=array_values($labelrowdata);

    1121. 

  1121.                             $newvalues=array_map(array(&$connect, "qstr"),$newvalues); // quote everything accordingly

    1122. 

  1122.                             $lainsert = "INSERT INTO {$dbprefix}labels (".implode(',',array_keys($labelrowdata)).") VALUES (".implode(',',$newvalues).")"; //handle db prefix

    1123. 

  1123.                             $liresult=$connect->Execute($lainsert);

    1124. 

  1124.                             $countlabels++;

    1125. 

  1125.                         }

    1126. 

  1126.                     }

    1127. 

  1127.                 }

    1128. 

  1128. 

    1129. 

  1129.                 //CHECK FOR DUPLICATE LABELSETS

    1130. 

  1130.                 $thisset="";

    1131. 

  1131.                 $query2 = "SELECT code, title, sortorder, language

    1132. 

  1132. 		                   FROM {$dbprefix}labels

    1133. 

  1133. 		                   WHERE lid=".$newlid."

    1134. 

  1134. 		                   ORDER BY language, sortorder, code";    

    1135. 

  1135.                 $result2 = db_execute_num($query2) or $this->debugLsrc("Died querying labelset $lid$query2".$connect->ErrorMsg());

    1136. 

  1136.                 while($row2=$result2->FetchRow())

    1137. 

  1137.                 {

    1138. 

  1138.                     $thisset .= implod…
    1139.

Large files files are truncated, but you can click here to view the full file