1002 lines
30 KiB
PHP
1002 lines
30 KiB
PHP
<?php
|
|
|
|
namespace api\module;
|
|
use \manager\sessionManager;
|
|
use \database\core\DatabaseDriver;
|
|
use \manager\ManagerError;
|
|
use \api\core\ModuleRequest;
|
|
use \database\core\Repo;
|
|
use \lightdb\core\lightdb;
|
|
|
|
|
|
class input{
|
|
|
|
/* TRAITE LES DONNÉES D'UN FORMULAIRE DE TYPE TÉLÉPHONIQUE
|
|
*
|
|
* @subject<Array> Tableau contenant les données du sujet
|
|
* @contacts<Array> Tableau contenant les données des contacts
|
|
* @mini<Array> Tableau contenant les données des mini fiches relation
|
|
* @fiches<Array> Tableau contenant les données des fiches relation
|
|
*
|
|
* @return subject_id<int> Retourne l'id sujet de l'enquête
|
|
*
|
|
*/
|
|
public static function phone($params){
|
|
extract($params);
|
|
|
|
/* [1] On récupère l'id unique actuel
|
|
=========================================================*/
|
|
$funiq = fopen( __BUILD__.'/lightdb/storage/uniqid', 'r+' );
|
|
flock($funiq, LOCK_EX); // On verrouille le fichier
|
|
$uniqid = fgets( $funiq );
|
|
|
|
if( !is_numeric($uniqid) )
|
|
$uniqid = 0;
|
|
|
|
// Décalage à appliquer à tous les ids
|
|
$offset = intval($uniqid) + 1;
|
|
|
|
// on enregistre l'id du sujet
|
|
$subject_id = intval($subject['subject_id']);
|
|
|
|
// Contiendra la valeur de l'id maximum
|
|
$maxId = $offset;
|
|
|
|
|
|
/* [2] On initialise nos variables (lightdb + autres)
|
|
=========================================================*/
|
|
/* (1) Fichiers de sortie */
|
|
$file = [
|
|
"subject" => "",
|
|
"relations" => []
|
|
];
|
|
|
|
/* (2) Bases de données */
|
|
$subjectdb = new lightdb('subject');
|
|
$contactdb = new lightdb('contact');
|
|
|
|
|
|
/* [3] Données du sujet
|
|
=========================================================*/
|
|
$subject_set = $subjectdb->fetch($subject_id);
|
|
|
|
/* (1) Si le sujet n'existe pas -> ERROR */
|
|
if( $subject_set === false )
|
|
return ['ModuleError'=>ManagerError::UnreachableResource];
|
|
|
|
/* (2) Initialisation des contacts si vide */
|
|
if( !isset($subject_set['contacts']) )
|
|
$subject_set['contacts'] = [];
|
|
|
|
/* (3) Initialisation des relations si vide */
|
|
if( !isset($subject_set['relations']) )
|
|
$subject_set['relations'] = [];
|
|
|
|
/* (4) On récupère les noms des contacts */
|
|
$contactsById = []; // idContact -> nomContact
|
|
|
|
foreach($subject_set['contacts'] as $contactId){
|
|
$contactId = intval($contactId);
|
|
$contactData = $contactdb->fetch( $contactId );
|
|
|
|
$contactsById[$contactId] = $contactData['name'];
|
|
}
|
|
|
|
|
|
/* [4] On saisit les fiches + les contacts des fiches
|
|
=========================================================*/
|
|
$contactsDone = [
|
|
"existing" => [], // Contacts exportés déja enregistrés
|
|
"username" => [] // Nouveaux contacts déja enregistrés
|
|
];
|
|
$finalid = []; // id_contact -> id_final_contact (existant ou nouveau)
|
|
|
|
foreach($fiches as $f=>$ficheData){
|
|
/* (1) On récupère les données du contact associé */
|
|
if( !isset($contacts[$ficheData['contact']]) )
|
|
break;
|
|
|
|
$contact = $contacts[ $ficheData['contact'] ];
|
|
|
|
/* (2) Si le contact a été importé d'une autre enquête */
|
|
if( isset($contact['existing']) && is_numeric($contact['existing']) ){
|
|
|
|
$newId = (int) $contact['existing'];
|
|
$uname = $contactsById[ intval($contact['existing']) ];
|
|
|
|
$existingData = $dbcontact->fetch( intval($contact['existing']) );
|
|
|
|
$finalid[ intval($contact['uid']) ] = $newId;
|
|
|
|
// S'il a déja une fiche ou qu'on a déja fait une fiche, on quitte
|
|
if( is_array($existingData) && isset($existingData['studies2']) || in_array($contact['existing'], $contactsDone['existing']) )
|
|
break;
|
|
|
|
/* (3) Si nouveau contact */
|
|
}else{
|
|
|
|
$newId = (int) ($offset+$contact['uid']);
|
|
$uname = $contact['username'];
|
|
|
|
$finalid[ intval($contact['uid']) ] = $newId;
|
|
|
|
// S'il a déja été saisi, on quitte
|
|
if( in_array($contact['username'], $contactsDone['username']) )
|
|
break;
|
|
}
|
|
|
|
/* (4) Update du @maxId */
|
|
if( $newId > $maxId )
|
|
$maxId = (int) $newId;
|
|
|
|
/* (5) On enregistre les données du contact */
|
|
$contactdb->insert($newId, [
|
|
'id' => $newId,
|
|
'name' => $uname,
|
|
'sexe' => $ficheData['sexe'],
|
|
'age' => $ficheData['age'],
|
|
'studies2' => $ficheData['studies'],
|
|
'reltype' => ($ficheData['reltype']==10) ? $ficheData['reltypeSpecial'] : $ficheData['reltype'], // si 'autre' -> valeur, sinon le code
|
|
'dist' => $ficheData['loc'],
|
|
'job' => $ficheData['job'],
|
|
'famsit' => $ficheData['famsit'],
|
|
'city' => $ficheData['city'],
|
|
'cp' => $ficheData['cp'],
|
|
'quartier' => $ficheData['quartier'],
|
|
'duration' => $ficheData['duration'],
|
|
'context' => $ficheData['context'],
|
|
'contextExtra' => $ficheData['contextSpecial'],
|
|
'freq' => $ficheData['freq'],
|
|
'connect' => $ficheData['connect'],
|
|
'connectExtra' => $ficheData['connectSpecial']
|
|
] );
|
|
|
|
// On ajoute le contact dans la liste des contacts du sujet (si pas déja)
|
|
if( !in_array($newId, $subject_set['contacts']) )
|
|
$subject_set['contacts'][] = $newId;
|
|
|
|
// On enregistre la relation avec EGO
|
|
$subject_set['relations'][] = [
|
|
'idA' => $subject_id,
|
|
'idB' => $newId,
|
|
'type' => ($f<20) ? 4 : 5 // 4->appels 5->sms
|
|
];
|
|
|
|
|
|
/* (x) Si le contact a été importé d'une autre enquête */
|
|
if( isset($contact['existing']) && is_numeric($contact['existing']) )
|
|
$contactsDone['existing'][] = $contact['existing'];
|
|
/* (x+1) Si nouveau contact */
|
|
else
|
|
$contactsDone['username'][] = $contact['username'];
|
|
}
|
|
|
|
|
|
/* [5] On enregistre les mini + les contacts des mini
|
|
=========================================================*/
|
|
foreach($mini as $miniData){
|
|
/* (1) On récupère les données du contact associé */
|
|
if( !isset($contacts[$miniData['contact']]) )
|
|
break;
|
|
|
|
$contact = $contacts[ $miniData['contact'] ];
|
|
|
|
/* (2) Si le contact a été importé d'une autre enquête */
|
|
if( isset($contact['existing']) && is_numeric($contact['existing']) ){
|
|
|
|
$newId = (int) $contact['existing'];
|
|
$uname = $contactsById[ intval($contact['existing']) ];
|
|
|
|
$existingData = $dbcontact->fetch( intval($contact['existing']) );
|
|
|
|
$finalid[ intval($contact['uid']) ] = $newId;
|
|
|
|
// S'il a déja une fiche ou qu'on a déja fait une fiche (ou mini), on quitte
|
|
if( is_array($existingData) && isset($existingData['studies2']) || in_array($contact['existing'], $contactsDone['existing']) )
|
|
break;
|
|
|
|
/* (3) Si nouveau contact */
|
|
}else{
|
|
|
|
$newId = (int) ($offset+$miniData['uid']);
|
|
$uname = $contact['username'];
|
|
|
|
$finalid[ intval($contact['uid']) ] = $newId;
|
|
|
|
// S'il a déja été saisi, on quitte
|
|
if( in_array($contact['username'], $contactsDone['username']) )
|
|
break;
|
|
}
|
|
|
|
/* (4) Update du @maxId */
|
|
if( $newId > $maxId )
|
|
$maxId = (int) $newId;
|
|
|
|
|
|
// On remplit les données qui iront dans le fichier pour ce contact
|
|
$contactdb->insert($newId, [
|
|
'id' => $newId,
|
|
'name' => $uname,
|
|
'sexe' => $miniData['sexe'],
|
|
'age' => $miniData['age'],
|
|
'studies1' => $miniData['studies'],
|
|
'reltype' => ($miniData['reltype']==10) ? $miniData['reltypeSpecial'] : $miniData['reltype'], // si 'autre' -> valeur, sinon le code
|
|
'dist' => $miniData['loc']
|
|
] );
|
|
|
|
// On ajoute le contact dans la liste des contacts du sujet (si pas déja)
|
|
if( !in_array($newId, $subject_set['contacts']) )
|
|
$subject_set['contacts'][] = $newId;
|
|
|
|
// On enregistre la relation avec EGO
|
|
$subject_set['relations'][] = [
|
|
'idA' => $subject_id,
|
|
'idB' => $newId,
|
|
'type' => 2 // relation cellulaire mineure
|
|
];
|
|
|
|
|
|
/* (x) Si le contact a été importé d'une autre enquête */
|
|
if( isset($contact['existing']) && is_numeric($contact['existing']) )
|
|
$contactsDone['existing'][] = $contact['existing'];
|
|
/* (x+1) Si nouveau contact */
|
|
else
|
|
$contactsDone['username'][] = $contact['username'];
|
|
|
|
}
|
|
|
|
|
|
/* [6] On enregistre les relations de la MATRICE
|
|
=========================================================*/
|
|
$clen = count($finalid);
|
|
|
|
/* (1) On récupére les ids des contacts */
|
|
$cIdList = [];
|
|
foreach($finalid as $lastid=>$newid){
|
|
$id = (int) $lastid;
|
|
|
|
if( !in_array($id, $cIdList) )
|
|
$cIdList[$id] = null;
|
|
}
|
|
|
|
ksort($cIdList);
|
|
|
|
/* (2) On remplit les relations */
|
|
foreach($cIdList as $y=>$yNull){
|
|
foreach($cIdList as $x=>$xNull)
|
|
if( $x < $y ){ // On affiche que sous la diagonale
|
|
|
|
// Si relation alter-alter
|
|
$relationXY = isset($matrice[$y]) && in_array($x, $matrice[$y])
|
|
|| ( isset($matrice[$x]) && in_array($y, $matrice[$x]) );
|
|
|
|
$subject_set['relations'][] = [
|
|
'idA' => $finalid[$x],
|
|
'idB' => $finalid[$y],
|
|
'type' => $relationXY ? 1 : 0 // 0->aucune relation 1->relation alter alter
|
|
];
|
|
|
|
}
|
|
}
|
|
|
|
|
|
/* [6] On les données du sujet
|
|
=========================================================*/
|
|
$subjectdb->insert($subject_id, $subject_set);
|
|
|
|
|
|
/* [7] On enregistre les données des contacts
|
|
=========================================================*/
|
|
/* (1) On enregistre chaque contact */
|
|
foreach($file['contacts'] as $c=>$contactData)
|
|
$contactdb->insert($contactData['id'], $contactData);
|
|
|
|
|
|
/* [7] On met à jour le nouvel ID unique
|
|
=========================================================*/
|
|
rewind($funiq); // On revient au début du fichier
|
|
fwrite($funiq, $maxId); // On écrit la nouvelle valeur (forcément plus grande)
|
|
flock($funiq, LOCK_UN); // On débloque le verrou
|
|
fclose($funiq);
|
|
|
|
|
|
|
|
/* [9] Gestion du retour
|
|
=========================================================*/
|
|
return [
|
|
'ModuleError' => ManagerError::Success,
|
|
'subject_id' => $subject_id
|
|
];
|
|
}
|
|
|
|
|
|
|
|
|
|
/* TRAITE LES DONNÉES D'UN FORMULAIRE DE TYPE TÉLÉPHONIQUE
|
|
*
|
|
* @subject<Array> Tableau contenant les données du sujet
|
|
* @contacts<Array> Tableau contenant les données des contacts
|
|
* @mini<Array> Tableau contenant les données des mini fiches relation
|
|
* @fiches<Array> Tableau contenant les données des fiches relation
|
|
*
|
|
* @return subject_id<int> Retourne l'id sujet de l'enquête
|
|
*
|
|
*/
|
|
public static function xphone($params){
|
|
extract($params);
|
|
|
|
/* [0] On récupère l'id unique actuel
|
|
=========================================================*/
|
|
$funiq = fopen( __BUILD__.'/lightdb/storage/uniqid', 'r+' );
|
|
flock($funiq, LOCK_EX); // On verrouille le fichier
|
|
$uniqid = fgets( $funiq );
|
|
|
|
if( !is_numeric($uniqid) )
|
|
$uniqid = 0;
|
|
|
|
// Décalage à appliquer à tous les ids
|
|
$offset = intval($uniqid) + 1;
|
|
|
|
// on enregistre l'id du sujet
|
|
$subject_id = $subject['subject_id'];
|
|
|
|
// Contiendra la valeur de l'id maximum
|
|
$maxId = $offset;
|
|
|
|
|
|
|
|
|
|
// /* [1] On récupère les logs s'ils existent
|
|
// =========================================================*/
|
|
// // Contiendra le contenu du fichier
|
|
$file = [
|
|
"subject" => "",
|
|
"contacts" => [],
|
|
"relations" => []
|
|
];
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/* [2] On enregistre les données du sujet
|
|
=========================================================*/
|
|
/* (1) On crée le sujet */
|
|
$file['subject'] = [ 'id' => $subject_id ];
|
|
|
|
/* (2) On récupère ses contacts facebook */
|
|
// {2.1} On récupère les données du sujet //
|
|
$lfacebook = new lightdb('facebook_db');
|
|
$lfacebook = $lfacebook->fetch($subject_id);
|
|
|
|
// {2.2} si n'existe pas, on a un tableau vide //
|
|
if( $lfacebook === false )
|
|
$lfacebook = [ 'contacts' => [] ];
|
|
|
|
if( !isset($lfacebook['contacts']) )
|
|
$lfacebook['contacts'] = [];
|
|
|
|
|
|
/* (3) On récupère ses contacts lab-surveys */
|
|
// {3.1} On récupère les données du sujet //
|
|
$lsurvey = new lightdb('survey_db');
|
|
$lsurvey = $lsurvey->fetch($subject_id);
|
|
|
|
// {3.2} si n'existe pas, on a un tableau vide //
|
|
if( $lsurvey === false )
|
|
$lsurvey = [ 'contacts' => [] ];
|
|
|
|
if( !isset($lsurvey['contacts']) )
|
|
$lsurvey['contacts'] = [];
|
|
|
|
|
|
/* (4) On récupère uniquement la liste des contacts avec le type de fiche qu'ils ont */
|
|
// {4.1} Contiendra les contacts exportés //
|
|
$exported = [
|
|
'fiche' => [],
|
|
'mini' => []
|
|
];
|
|
|
|
// {4.2} Contiendra les username des contacts exportés //
|
|
$exportedU = [];
|
|
|
|
// {4.3} On récupère les contacts facebook //
|
|
foreach($lfacebook['contacts'] as $c=>$data){
|
|
|
|
if( isset($data['studies2']) ){
|
|
|
|
$exported['fiche'][] = $data['id'];
|
|
$exportedU[$data['id']] = $data['name'];
|
|
|
|
}else
|
|
|
|
// S'il n'est pas déja dans les fiches
|
|
if( !in_array($data['id'], $exported['fiche']) ){
|
|
|
|
$exported['mini'][] = $data['id'];
|
|
$exportedU[$data['id']] = $data['name'];
|
|
}
|
|
|
|
}
|
|
|
|
// {4.4} On récupère les contacts lab-surveys //
|
|
foreach($lsurvey['contacts'] as $c=>$data){
|
|
|
|
if( isset($data['studies2']) )
|
|
|
|
// On ajoute le contact s'il n'y est pas déja
|
|
if( !in_array($data['id'], $exported['fiche']) ){
|
|
|
|
$exported['fiche'][] = $data['id'];
|
|
$exportedU['fiche'][] = $data['username'];
|
|
|
|
}
|
|
|
|
else
|
|
|
|
// On ajoute le contact s'il n'y est pas déja (ni dans mini ni dans fiche)
|
|
if( !in_array($data['id'], $exported['mini']) && !in_array($data['id'], $exported['fiche']) ){
|
|
$exported['mini'][] = $data['id'];
|
|
$exportedU['mini'][] = $data['username'];
|
|
}
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/* [3] On enregistre les contacts des FICHES
|
|
=========================================================*/
|
|
$contactsDone = [
|
|
"existing" => [], // Contacts exportés déja enregistrés
|
|
"username" => [] // Nouveaux contacts déja enregistrés
|
|
];
|
|
|
|
foreach($fiches as $f=>$ficheData){
|
|
/* (1) On récupère les données du contact associé */
|
|
if( !isset($contacts[$ficheData['uid']]) )
|
|
break;
|
|
|
|
$contact = $contacts[ $ficheData['uid'] ];
|
|
|
|
/* (2) Si le contact a été importé d'une autre enquête */
|
|
if( isset($contact['existing']) && is_numeric($contact['existing']) ){
|
|
$newId = (int) $contact['existing'];
|
|
$uname = $exportedU[intval($contact['existing'])];
|
|
// {2.1} S'il a déja une fiche ou qu'on a déja fait une fiche, on quitte //
|
|
if( in_array(intval($contact['existing']), $exported['fiche']) || in_array($contact['existing'], $contactsDone['existing']) )
|
|
break;
|
|
|
|
/* (3) Si nouveau contact */
|
|
}else{
|
|
$newId = (int) ($offset+$ficheData['uid']);
|
|
$uname = $contact['username'];
|
|
// {3.1} S'il a déja été saisi, on quitte //
|
|
if( in_array($contact['username'], $contactsDone['username']) )
|
|
break;
|
|
}
|
|
|
|
/* (4) Update du @maxId */
|
|
if( $newId > $maxId )
|
|
$maxId = (int) $newId;
|
|
|
|
// On remplit les données qui iront dans le fichier pour ce contact
|
|
$file['contacts'][] = [
|
|
'id' => $newId,
|
|
'name' => $uname,
|
|
'sexe' => $ficheData['sexe'],
|
|
'age' => $ficheData['age'],
|
|
'studies2' => $ficheData['studies'],
|
|
'reltype' => ($ficheData['reltype']==10) ? $ficheData['reltypeSpecial'] : $ficheData['reltype'], // si 'autre' -> valeur, sinon le code
|
|
'dist' => $ficheData['loc'],
|
|
'job' => $ficheData['job'],
|
|
'famsit' => $ficheData['famsit'],
|
|
'city' => $ficheData['city'],
|
|
'cp' => $ficheData['cp'],
|
|
'quartier' => $ficheData['quartier'],
|
|
'duration' => $ficheData['duration'],
|
|
'context' => $ficheData['context'],
|
|
'contextExtra' => $ficheData['contextSpecial'],
|
|
'freq' => $ficheData['freq'],
|
|
'connect' => $ficheData['connect'],
|
|
'connectExtra' => $ficheData['connectSpecial']
|
|
];
|
|
|
|
// On enregistre la relation avec EGO
|
|
$file['relations'][] = [
|
|
'idA' => $subject_id,
|
|
'idB' => $newId,
|
|
'type' => ($f<20) ? 4 : 5 // 4->appels 5->sms
|
|
];
|
|
|
|
|
|
/* (x) Si le contact a été importé d'une autre enquête */
|
|
if( isset($contact['existing']) && is_numeric($contact['existing']) )
|
|
$contactsDone['existing'][] = $contact['existing'];
|
|
/* (x+1) Si nouveau contact */
|
|
else
|
|
$contactsDone['username'][] = $contact['username'];
|
|
}
|
|
|
|
|
|
|
|
/* [4] On enregistre les contacts des MINI
|
|
=========================================================*/
|
|
foreach($mini as $miniData){
|
|
/* (1) On récupère les données du contact associé */
|
|
if( !isset($contacts[$miniData['uid']]) )
|
|
break;
|
|
|
|
$contact = $contacts[ $miniData['uid'] ];
|
|
|
|
/* (2) Si le contact a été importé d'une autre enquête */
|
|
if( isset($contact['existing']) && is_numeric($contact['existing']) ){
|
|
$newId = (int) $contact['existing'];
|
|
$uname = $exportedU[intval($contact['existing'])];
|
|
// {2.1} S'il a déja une fiche ou qu'on a déja fait une fiche (ou mini), on quitte //
|
|
if( in_array(intval($contact['existing']), $exported['fiche']) || in_array($contact['existing'], $contactsDone['existing']) )
|
|
break;
|
|
|
|
/* (3) Si nouveau contact */
|
|
}else{
|
|
$newId = (int) ($offset+$miniData['uid']);
|
|
$uname = $contact['username'];
|
|
// {3.1} S'il a déja été saisi, on quitte //
|
|
if( in_array($contact['username'], $contactsDone['username']) )
|
|
break;
|
|
}
|
|
|
|
/* (4) Update du @maxId */
|
|
if( $newId > $maxId )
|
|
$maxId = (int) $newId;
|
|
|
|
|
|
// On remplit les données qui iront dans le fichier pour ce contact
|
|
$file['contacts'][] = [
|
|
'id' => $newId,
|
|
'name' => $uname,
|
|
'sexe' => $miniData['sexe'],
|
|
'age' => $miniData['age'],
|
|
'studies1' => $miniData['studies'],
|
|
'reltype' => ($miniData['reltype']==10) ? $miniData['reltypeSpecial'] : $miniData['reltype'], // si 'autre' -> valeur, sinon le code
|
|
'dist' => $miniData['loc']
|
|
];
|
|
|
|
// On enregistre la relation avec EGO
|
|
$file['relations'][] = [
|
|
'idA' => $subject_id,
|
|
'idB' => $newId,
|
|
'type' => 2 // relation cellulaire mineure
|
|
];
|
|
|
|
|
|
/* (x) Si le contact a été importé d'une autre enquête */
|
|
if( isset($contact['existing']) && is_numeric($contact['existing']) )
|
|
$contactsDone['existing'][] = $contact['existing'];
|
|
/* (x+1) Si nouveau contact */
|
|
else
|
|
$contactsDone['username'][] = $contact['username'];
|
|
|
|
}
|
|
|
|
|
|
|
|
/* [5] On enregistre les relations de la MATRICE
|
|
=========================================================*/
|
|
$clen = count($file['contacts']);
|
|
|
|
/* (1) On récupére les ids des contacts */
|
|
$cIdList = [];
|
|
foreach($file['contacts'] as $c=>$contact){
|
|
$id = (int) $c;
|
|
|
|
if( !in_array($id, $cIdList) )
|
|
$cIdList[$id] = null;
|
|
}
|
|
|
|
ksort($cIdList);
|
|
|
|
|
|
/* (2) On remplit les relations */
|
|
foreach($cIdList as $y=>$yNull){
|
|
foreach($cIdList as $x=>$xNull)
|
|
if( $x < $y ){ // On affiche que sous la diagonale
|
|
|
|
$idY = $file['contacts'][$y]['id'] - $offset;
|
|
$idX = $file['contacts'][$x]['id'] - $offset;
|
|
|
|
// Si relation alter-alter
|
|
$relationXY = isset($matrice[$y]) && in_array($x, $matrice[$y])
|
|
|| ( isset($matrice[$x]) && in_array($y, $matrice[$x]) );
|
|
|
|
array_push($file['relations'], [
|
|
'idA' => $offset + $x,
|
|
'idB' => $offset + $y,
|
|
'type' => $relationXY ? 1 : 0 // 0->aucune relation 1->relation alter alter
|
|
]);
|
|
|
|
}
|
|
}
|
|
|
|
|
|
/* [6] On enregistre tout dans 'lightdb'
|
|
=========================================================*/
|
|
$db = new lightdb('phone_db');
|
|
$db->insert( $subject_id, $file );
|
|
$db->close();
|
|
|
|
/* [7] On met à jour le nouvel ID unique
|
|
=========================================================*/
|
|
// $maxId += $offset;
|
|
rewind($funiq); // On revient au début du fichier
|
|
fwrite($funiq, $maxId); // On écrit la nouvelle valeur (forcément plus grande)
|
|
flock($funiq, LOCK_UN); // On débloque le verrou
|
|
fclose($funiq);
|
|
|
|
// /* [8] On supprime le fichier temporaire si existe
|
|
// =========================================================*/
|
|
// if( file_exists($tmpfile) )
|
|
// unlink($tmpfile);
|
|
|
|
|
|
/* [9] Gestion du retour
|
|
=========================================================*/
|
|
return [
|
|
'ModuleError' => ManagerError::Success,
|
|
'subject_id' => $subject_id
|
|
];
|
|
}
|
|
|
|
|
|
|
|
|
|
/* TRAITE LES DONNÉES D'UN FORMULAIRE DE TYPE FACEBOOK
|
|
*
|
|
* @subject<Array> Tableau contenant les données du sujet
|
|
* @contacts<Array> Tableau contenant les données des contacts
|
|
* @mini<Array> Tableau contenant les données des mini fiches relation
|
|
* @fiches<Array> Tableau contenant les données des fiches relation
|
|
*
|
|
* @return subject_id<int> Retourne l'id sujet de l'enquête
|
|
*
|
|
*/
|
|
public static function xfacebook($params){
|
|
extract($params);
|
|
|
|
/* [0] On récupère l'id unique actuel
|
|
=========================================================*/
|
|
$funiq = fopen( __BUILD__.'/lightdb/storage/uniqid', 'r+' );
|
|
flock($funiq, LOCK_EX); // On verrouille le fichier
|
|
$uniqid = fgets( $funiq );
|
|
|
|
if( !is_numeric($uniqid) )
|
|
$uniqid = 0;
|
|
|
|
// Décalage à appliquer à tous les ids
|
|
$offset = intval($uniqid) + 1;
|
|
|
|
// on enregistre l'id du sujet
|
|
$subject_id = $subject['subject_id'];
|
|
|
|
// Contiendra la valeur de l'id maximum
|
|
$maxId = $offset;
|
|
|
|
|
|
|
|
|
|
// /* [1] On récupère les logs s'ils existent
|
|
// =========================================================*/
|
|
// // Contiendra le contenu du fichier
|
|
$file = [
|
|
"subject" => "",
|
|
"contacts" => [],
|
|
"relations" => []
|
|
];
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/* [2] On enregistre les données du sujet
|
|
=========================================================*/
|
|
/* (1) On crée le sujet */
|
|
$file['subject'] = [ 'id' => $subject_id ];
|
|
|
|
/* (2) On récupère ses contacts phone */
|
|
// {2.1} On récupère les données du sujet //
|
|
$lphone = new lightdb('phone_db');
|
|
$lphone = $lphone->fetch($subject_id);
|
|
|
|
// {2.2} si n'existe pas, on a un tableau vide //
|
|
if( $lphone === false )
|
|
$lphone = [ 'contacts' => [] ];
|
|
|
|
if( !isset($lphone['contacts']) )
|
|
$lphone['contacts'] = [];
|
|
|
|
|
|
/* (3) On récupère ses contacts lab-surveys */
|
|
// {3.1} On récupère les données du sujet //
|
|
$lsurvey = new lightdb('survey_db');
|
|
$lsurvey = $lsurvey->fetch($subject_id);
|
|
|
|
// {3.2} si n'existe pas, on a un tableau vide //
|
|
if( $lsurvey === false )
|
|
$lsurvey = [ 'contacts' => [] ];
|
|
|
|
if( !isset($lsurvey['contacts']) )
|
|
$lsurvey['contacts'] = [];
|
|
|
|
|
|
/* (4) On récupère uniquement la liste des contacts avec le type de fiche qu'ils ont */
|
|
// {4.1} Contiendra les contacts exportés //
|
|
$exported = [
|
|
'fiche' => [],
|
|
'mini' => []
|
|
];
|
|
|
|
// {4.2} Contiendra les username des contacts exportés //
|
|
$exportedU = [];
|
|
|
|
// {4.3} On récupère les contacts facebook //
|
|
foreach($lphone['contacts'] as $c=>$data){
|
|
|
|
if( isset($data['studies2']) ){
|
|
|
|
$exported['fiche'][] = $data['id'];
|
|
$exportedU[$data['id']] = $data['name'];
|
|
|
|
}else
|
|
|
|
// S'il n'est pas déja dans les fiches
|
|
if( !in_array($data['id'], $exported['fiche']) ){
|
|
|
|
$exported['mini'][] = $data['id'];
|
|
$exportedU[$data['id']] = $data['name'];
|
|
}
|
|
|
|
}
|
|
|
|
// {4.4} On récupère les contacts lab-surveys //
|
|
foreach($lsurvey['contacts'] as $c=>$data){
|
|
|
|
if( isset($data['studies2']) )
|
|
|
|
// On ajoute le contact s'il n'y est pas déja
|
|
if( !in_array($data['id'], $exported['fiche']) ){
|
|
|
|
$exported['fiche'][] = $data['id'];
|
|
$exportedU['fiche'][] = $data['username'];
|
|
|
|
}
|
|
|
|
else
|
|
|
|
// On ajoute le contact s'il n'y est pas déja (ni dans mini ni dans fiche)
|
|
if( !in_array($data['id'], $exported['mini']) && !in_array($data['id'], $exported['fiche']) ){
|
|
$exported['mini'][] = $data['id'];
|
|
$exportedU['mini'][] = $data['username'];
|
|
}
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/* [3] On enregistre les contacts des FICHES
|
|
=========================================================*/
|
|
$contactsDone = [
|
|
"existing" => [], // Contacts exportés déja enregistrés
|
|
"username" => [] // Nouveaux contacts déja enregistrés
|
|
];
|
|
|
|
|
|
foreach($fiches as $f=>$ficheData){
|
|
/* (1) On récupère les données du contact associé */
|
|
if( !isset($contacts[$ficheData['uid']]) )
|
|
continue;
|
|
|
|
$contact = $contacts[ $ficheData['uid'] ];
|
|
|
|
/* (2) Si le contact a été importé d'une autre enquête */
|
|
if( isset($contact['existing']) && is_numeric($contact['existing']) ){
|
|
$newId = (int) $contact['existing'];
|
|
$uname = $exportedU[intval($contact['existing'])];
|
|
// {2.1} S'il a déja une fiche ou qu'on a déja fait une fiche, on quitte //
|
|
if( in_array(intval($contact['existing']), $exported['fiche']) || in_array($contact['existing'], $contactsDone['existing']) )
|
|
continue;
|
|
|
|
/* (3) Si nouveau contact */
|
|
}else{
|
|
$newId = (int) ($offset+$ficheData['uid']);
|
|
$uname = $contact['username'];
|
|
// {3.1} S'il a déja été saisi, on quitte //
|
|
if( in_array($contact['username'], $contactsDone['username']) )
|
|
continue;
|
|
}
|
|
|
|
/* (4) Update du @maxId */
|
|
if( $newId > $maxId )
|
|
$maxId = (int) $newId;
|
|
|
|
// On remplit les données qui iront dans le fichier pour ce contact
|
|
$file['contacts'][] = [
|
|
'id' => $newId,
|
|
'name' => $uname,
|
|
'sexe' => $ficheData['sexe'],
|
|
'age' => $ficheData['age'],
|
|
'studies2' => $ficheData['studies'],
|
|
'reltype' => ($ficheData['reltype']==10) ? $ficheData['reltypeSpecial'] : $ficheData['reltype'], // si 'autre' -> valeur, sinon le code
|
|
'dist' => $ficheData['loc'],
|
|
'job' => $ficheData['job'],
|
|
'famsit' => $ficheData['famsit'],
|
|
'city' => $ficheData['city'],
|
|
'cp' => $ficheData['cp'],
|
|
'quartier' => $ficheData['quartier'],
|
|
'duration' => $ficheData['duration'],
|
|
'context' => $ficheData['context'],
|
|
'contextExtra' => $ficheData['contextSpecial'],
|
|
'freq' => $ficheData['freq'],
|
|
'connect' => $ficheData['connect'],
|
|
'connectExtra' => $ficheData['connectSpecial']
|
|
];
|
|
|
|
// On enregistre la relation avec EGO
|
|
$file['relations'][] = [
|
|
'idA' => $subject_id,
|
|
'idB' => $newId,
|
|
'type' => ($f<20) ? 4 : 5 // 4->appels 5->sms
|
|
];
|
|
|
|
|
|
/* (x) Si le contact a été importé d'une autre enquête */
|
|
if( isset($contact['existing']) && is_numeric($contact['existing']) )
|
|
$contactsDone['existing'][] = $contact['existing'];
|
|
/* (x+1) Si nouveau contact */
|
|
else
|
|
$contactsDone['username'][] = $contact['username'];
|
|
}
|
|
|
|
|
|
/* [4] On enregistre les contacts des MINI
|
|
=========================================================*/
|
|
foreach($mini as $miniData){
|
|
/* (1) On récupère les données du contact associé */
|
|
if( !isset($contacts[$miniData['uid']]) )
|
|
continue;
|
|
|
|
$contact = $contacts[ $miniData['uid'] ];
|
|
|
|
/* (2) Si le contact a été importé d'une autre enquête */
|
|
if( isset($contact['existing']) && is_numeric($contact['existing']) ){
|
|
$newId = (int) $contact['existing'];
|
|
$uname = $exportedU[intval($contact['existing'])];
|
|
// {2.1} S'il a déja une fiche ou qu'on a déja fait une fiche (ou mini), on quitte //
|
|
if( in_array(intval($contact['existing']), $exported['fiche']) || in_array($contact['existing'], $contactsDone['existing']) )
|
|
continue;
|
|
|
|
|
|
/* (3) Si nouveau contact */
|
|
}else{
|
|
$newId = (int) ($offset+$miniData['uid']);
|
|
$uname = $contact['username'];
|
|
// {3.1} S'il a déja été saisi, on quitte //
|
|
if( in_array($contact['username'], $contactsDone['username']) )
|
|
continue;
|
|
|
|
}
|
|
|
|
/* (4) Update du @maxId */
|
|
if( $newId > $maxId )
|
|
$maxId = (int) $newId;
|
|
|
|
|
|
// On remplit les données qui iront dans le fichier pour ce contact
|
|
$file['contacts'][] = [
|
|
'id' => $newId,
|
|
'name' => $uname,
|
|
'sexe' => $miniData['sexe'],
|
|
'age' => $miniData['age'],
|
|
'studies1' => $miniData['studies'],
|
|
'reltype' => ($miniData['reltype']==10) ? $miniData['reltypeSpecial'] : $miniData['reltype'], // si 'autre' -> valeur, sinon le code
|
|
'dist' => $miniData['loc']
|
|
];
|
|
|
|
// On enregistre la relation avec EGO
|
|
$file['relations'][] = [
|
|
'idA' => $subject_id,
|
|
'idB' => $newId,
|
|
'type' => 2 // relation cellulaire mineure
|
|
];
|
|
|
|
|
|
/* (x) Si le contact a été importé d'une autre enquête */
|
|
if( isset($contact['existing']) && is_numeric($contact['existing']) )
|
|
$contactsDone['existing'][] = $contact['existing'];
|
|
/* (x+1) Si nouveau contact */
|
|
else
|
|
$contactsDone['username'][] = $contact['username'];
|
|
|
|
}
|
|
|
|
|
|
|
|
/* [5] On enregistre les relations de la MATRICE
|
|
=========================================================*/
|
|
$clen = count($file['contacts']);
|
|
// var_dump($file['contacts']);
|
|
|
|
/* (1) On récupére les ids des contacts */
|
|
$cIdList = [];
|
|
foreach($file['contacts'] as $c=>$contact){
|
|
$id = (int) $c;
|
|
|
|
if( !in_array($id, $cIdList) )
|
|
$cIdList[$id] = null;
|
|
}
|
|
|
|
ksort($cIdList);
|
|
|
|
|
|
/* (2) On remplit les relations */
|
|
foreach($cIdList as $y=>$yNull){
|
|
foreach($cIdList as $x=>$xNull)
|
|
if( $x < $y ){ // On affiche que sous la diagonale
|
|
|
|
$idY = $file['contacts'][$y]['id'] - $offset;
|
|
$idX = $file['contacts'][$x]['id'] - $offset;
|
|
|
|
// Si relation alter-alter
|
|
$relationXY = isset($matrice[$y]) && in_array($x, $matrice[$y])
|
|
|| ( isset($matrice[$x]) && in_array($y, $matrice[$x]) );
|
|
|
|
$file['relations'][] = [
|
|
'idA' => $offset + $x,
|
|
'idB' => $offset + $y,
|
|
'type' => $relationXY ? 1 : 0 // 0->aucune relation 1->relation alter alter
|
|
];
|
|
|
|
}
|
|
}
|
|
|
|
|
|
/* [6] On enregistre tout dans 'lightdb'
|
|
=========================================================*/
|
|
$db = new lightdb('facebook_db');
|
|
$db->insert( $subject_id, $file );
|
|
$db->close();
|
|
|
|
/* [7] On met à jour le nouvel ID unique
|
|
=========================================================*/
|
|
// $maxId += $offset;
|
|
rewind($funiq); // On revient au début du fichier
|
|
fwrite($funiq, $maxId); // On écrit la nouvelle valeur (forcément plus grande)
|
|
flock($funiq, LOCK_UN); // On débloque le verrou
|
|
fclose($funiq);
|
|
|
|
// /* [8] On supprime le fichier temporaire si existe
|
|
// =========================================================*/
|
|
// if( file_exists($tmpfile) )
|
|
// unlink($tmpfile);
|
|
|
|
|
|
/* [9] Gestion du retour
|
|
=========================================================*/
|
|
return [
|
|
'ModuleError' => ManagerError::Success,
|
|
'subject_id' => $subject_id
|
|
];
|
|
}
|
|
|
|
|
|
|
|
}
|
|
|
|
|
|
?>
|