\n" ."\t\n\n"; echo "
\n"; //PRESENT OPTIONS SCREEN if (isset($errormsg) && $errormsg != "") { $errormsg .= "

".$clang->gT("Please try again.")."

"; } foreach(file("$thistpl/save.pstpl") as $op) { echo templatereplace($op); } //END echo "\n"; echo "\n"; echo "\n"; echo "\n"; echo "
"; foreach(file("$thistpl/endpage.pstpl") as $op) { echo templatereplace($op); } echo "\n"; exit; } function savedcontrol() { //This data will be saved to the "saved_control" table with one row per response. // - a unique "saved_id" value (autoincremented) // - the "sid" for this survey // - the "srid" for the survey_x row id // - "saved_thisstep" which is the step the user is up to in this survey // - "saved_ip" which is the ip address of the submitter // - "saved_date" which is the date ofthe saved response // - an "identifier" which is like a username // - a "password" // - "fieldname" which is the fieldname of the saved response // - "value" which is the value of the response //We start by generating the first 5 values which are consistent for all rows. global $connect, $surveyid, $dbprefix, $thissurvey, $errormsg, $publicurl, $sitename, $timeadjust, $clang, $clienttoken, $thisstep; //Check that the required fields have been completed. $errormsg=""; /* queXS Removal if (!isset($_POST['savename']) || !$_POST['savename']) {$errormsg.=$clang->gT("You must supply a name for this saved session.")."
\n";} if (!isset($_POST['savepass']) || !$_POST['savepass']) {$errormsg.=$clang->gT("You must supply a password for this saved session.")."
\n";} if ((isset($_POST['savepass']) && !isset($_POST['savepass2'])) || $_POST['savepass'] != $_POST['savepass2']) {$errormsg.=$clang->gT("Your passwords do not match.")."
\n";} // if security question asnwer is incorrect if (function_exists("ImageCreate") && captcha_enabled('saveandloadscreen',$thissurvey['usecaptcha'])) { if (!isset($_POST['loadsecurity']) || !isset($_SESSION['secanswer']) || $_POST['loadsecurity'] != $_SESSION['secanswer']) { $errormsg .= $clang->gT("The answer to the security question is incorrect.")."
\n"; } } if (trim($_POST['saveemail'])!='' && !validate_email($_POST['saveemail'])) { $errormsg .= $clang->gT("The email address is not valid. Please leave the email field blank or give a valid email address.")."
\n"; } end queXS Removal */ if ($errormsg) { return; } //All the fields are correct. Now make sure there's not already a matching saved item $query = "SELECT COUNT(*) FROM {$dbprefix}saved_control\n" ."WHERE sid=$surveyid\n" ."AND identifier=".db_quoteall($_POST['token'],true); $result = db_execute_num($query) or safe_die("Error checking for duplicates!
$query
".$connect->ErrorMsg()); // Checked list($count) = $result->FetchRow(); if ($count == 1) { //we should update the field with the latest $_SESSION['step'] - stored in saved_thisstep - queXS addition $sql = "UPDATE {$dbprefix}saved_control SET saved_thisstep = '{$_SESSION['step']}' WHERE sid=$surveyid AND identifier='{$_POST['token']}'"; $connect->Execute($sql); } else if ($count > 0) { $errormsg.=$clang->gT("This name has already been used for this survey. You must use a unique save name.")."
\n"; return; } else { //INSERT BLANK RECORD INTO "survey_x" if one doesn't already exist if (!isset($_SESSION['srid'])) { $result = $connect->GetOne("SELECT id FROM ".$thissurvey['tablename']." WHERE token='{$_POST['token']}'"); if (is_null($result)) { $today = date_shift(date("Y-m-d H:i:s"), "Y-m-d H:i:s", $timeadjust); $sdata = array("datestamp"=>$today, "ipaddr"=>getIPAddress(), "startlanguage"=>$_SESSION['s_lang'], "refurl"=>getenv("HTTP_REFERER"), "token" => $_POST['token']); //One of the strengths of ADOdb's AutoExecute() is that only valid field names for $table are updated if ($connect->AutoExecute($thissurvey['tablename'], $sdata,'INSERT')) // Checked { $srid = $connect->Insert_ID($thissurvey['tablename'],"sid"); $_SESSION['srid'] = $srid; } else { safe_die("Unable to insert record into survey table.

".$connect->ErrorMsg()); } } else { $_SESSION['srid'] = $result; } } //CREATE ENTRY INTO "saved_control" $today = date_shift(date("Y-m-d H:i:s"), "Y-m-d H:i:s", $timeadjust); $scdata = array("sid"=>$surveyid, "srid"=>$_SESSION['srid'], "identifier"=>$_POST['token'], // Binding does escape , so no quoting/escaping necessary "access_code"=>md5($_POST['token']), "email"=>$_POST['token'], "ip"=>getIPAddress(), "refurl"=>getenv("HTTP_REFERER"), "saved_thisstep"=>$thisstep, "status"=>"S", "saved_date"=>$today); if ($connect->AutoExecute("{$dbprefix}saved_control", $scdata,'INSERT')) // Checked { $scid = $connect->Insert_ID("{$dbprefix}saved_control",'scid'); $_SESSION['scid'] = $scid; } else { safe_die("Unable to insert record into saved_control table.

".$connect->ErrorMsg()); } $_SESSION['holdname']=$_POST['token']; //Session variable used to load answers every page. Unsafe - so it has to be taken care of on output $_SESSION['holdpass']=$_POST['token']; //Session variable used to load answers every page. Unsafe - so it has to be taken care of on output /* queXS Removal //Email if needed if (isset($_POST['saveemail']) && validate_email($_POST['saveemail'])) { $subject=$clang->gT("Saved Survey Details") . " - " . $thissurvey['name']; $message=$clang->gT("Thank you for saving your survey in progress. The following details can be used to return to this survey and continue where you left off. Please keep this e-mail for your reference - we cannot retrieve the password for you.","unescaped"); $message.="\n\n".$thissurvey['name']."\n\n"; $message.=$clang->gT("Name","unescaped").": ".$_POST['savename']."\n"; $message.=$clang->gT("Password","unescaped").": ".$_POST['savepass']."\n\n"; $message.=$clang->gT("Reload your survey by clicking on the following link (or pasting it into your browser):","unescaped")."\n"; $message.=$publicurl."/index.php?sid=$surveyid&loadall=reload&scid=".$scid."&loadname=".urlencode($_POST['savename'])."&loadpass=".urlencode($_POST['savepass']); if ($clienttoken){$message.="&token=".$clienttoken;} $from="{$thissurvey['adminname']} <{$thissurvey['adminemail']}>"; if (SendEmailMessage(null, $message, $subject, $_POST['saveemail'], $from, $sitename, false, getBounceEmail($surveyid))) { $emailsent="Y"; } else { echo $clang->gT('Error: Email failed, this may indicate a PHP Mail Setup problem on the server. Your survey details have still been saved, however you will not get an email with the details. You should note the "name" and "password" you just used for future reference.'); } } end queXS Removal */ return $clang->gT('Your survey was successfully saved.'); } } /** * This functions saves the answer time for question/group and whole survey. * [ It compares current time with the time in $_POST['start_time'] ] * The times are saved in table: {prefix}{surveytable}_timings * @return void */ function set_answer_time() { global $connect, $thissurvey, $surveyid; if (!isset($_POST['start_time'])) { return; // means haven't passed welcome page yet. } if (isset($_POST['lastanswer'])) { $setField = $_POST['lastanswer']; } else if (isset($_POST['lastgroup'])) { $setField = $_POST['lastgroup']; } $passedTime = round(microtime(true) - $_POST['start_time'],2); $tablename = db_table_name('survey_' . $surveyid . '_timings'); if(!isset($setField)){ //we show the whole survey on one page - we don't have to save time for group/question $query = "UPDATE ".$tablename." SET " ."interviewtime = interviewtime" ." + " .$passedTime ." WHERE id = " .$_SESSION['srid']; $connect->execute($query); return; } else { $setField .= "time"; //saving the times $query = "UPDATE ".$tablename." SET " ."interviewtime = interviewtime" ." + " .$passedTime ."," .db_quote_id($setField) ." = " .db_quote_id($setField) ." + " .$passedTime ." WHERE id = " .$_SESSION['srid']; $connect->execute($query); } } ?>