Talenttic_survey/CATI_Tool
2
0
Fork 0
mirror of https://github.com/ACSPRI/queXS synced 2024-04-02 12:12:16 +00:00
Code Issues Releases Activity

Added CHANGELOG update

Browse Source 
Included sRandomChars in functions.limesurvey
Add an index on the token field of the survey table
This commit is contained in:
Adam Zammit
2013-01-24 15:10:16 +11:00
parent 004494e4ff
commit 9c46b41a4b
3 changed files with 36 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
CHANGELOG
View File

@@ -1,3 +1,12 @@
queXS 1.7.0 - Changes since 1.6.1
New Feature: Replace queXS caseid as token with a random token to allow for safe external access
Database updates:
ALTER TABLE `case` ADD `token` VARCHAR( 36 ) NOT NULL ;
ALTER TABLE `case` ADD UNIQUE (`token`);
queXS 1.6.1 - Changes since 1.6.0 queXS 1.6.1 - Changes since 1.6.0
New Feature: Include paradata/metadata in data output (number call attempts, number of answering machine messages and all sample variables) New Feature: Include paradata/metadata in data output (number call attempts, number of answering machine messages and all sample variables)

22
functions/functions.limesurvey.php
View File

@@ -271,6 +271,28 @@ function getRandomID()
} }
/**
* Creates a random sequence of characters
*
* @param mixed $length Length of resulting string
* @param string $pattern To define which characters should be in the resulting string
*
* From Limesurvey
*/
function sRandomChars($length = 15,$pattern="23456789abcdefghijkmnpqrstuvwxyz")
{
$patternlength = strlen($pattern)-1;
for($i=0;$i<$length;$i++)
{
if(isset($key))
$key .= $pattern{rand(0,$patternlength)};
else
$key = $pattern{rand(0,$patternlength)};
}
return $key;
}
/** /**

5
include/limesurvey/admin/activate_functions.php
View File

@@ -407,6 +407,11 @@ function activateSurvey($postsid,$surveyid, $scriptname='admin.php')
} }
$execresult=$dict->ExecuteSQLArray($sqlarray,1); $execresult=$dict->ExecuteSQLArray($sqlarray,1);
//queXS Addition - add an index on the token
$createtokenindex = $dict->CreateIndexSQL("{$tabname}_idx", $tabname, array('token'));
$dict->ExecuteSQLArray($createtokenindex, false) or safe_die ("Failed to create token index<br />$createtokenindex<br /><br />".$connect->ErrorMsg());
if ($execresult==0 || $execresult==1) if ($execresult==0 || $execresult==1)
{ {
$activateoutput .= "<br />\n<div class='messagebox ui-corner-all'>\n" . $activateoutput .= "<br />\n<div class='messagebox ui-corner-all'>\n" .