[platal.git] / include / webservices / manageurs.server.inc.php

<?php

require_once('webservices/manageurs.inc.php');

$error_mat = "You didn't provide me with a valid matricule number...";
$error_key = "You didn't provide me with a valid cipher key...";

// The first parameter has to be the identification number (matricule).
// The second parameter facultative has to be the number of the desired address:
// -1 => we do not want any address;
// 0  => we want all the addresses;
// n  => we want the address number n.
//
// DO NOT CHANGE THE NAMES OF THE ADDRESSES' FIELDS.
// IF YOU HAVE TO MAKE SOME MODIFICATION, FIRST CONTACT:
// admin@manageurs.com
function get_annuaire_infos($method, $params) {
    global $error_mat, $error_key, $globals;

    // Password verification.
    if(!isset($params[0]) || ($params[0] != $globals->manageurs->manageurs_pass)) {
        return false;
    }
    // If address == -1, we do not retrieve any address.
    if(isset($params[2]) && ($params[2] == -1)) {
        unset($params[2]);
    }

    // We check we actually have an identification number.
    if(!empty($params[1])) {
        // We only retrieve addresses when required.
        if(!isset($params[2])) {
            $res = XDB::iterRow("SELECT  pp.display_tel AS cell, p.birthdate AS age
                                   FROM  profiles       AS p
                              LEFT JOIN  profile_phones AS pp ON (pp.pid = p.pid AND pp.link_type = 'user'
                                                                  AND pp.tel_type = 'mobile')
                                  WHERE  p.xorg_id = {?} LIMIT 1",
                                $params[1]);
            $array = $res->next();
        } else {
            $res = XDB::iterRow("SELECT  p.birthdate, pa.text, GROUP_CONCAT(pace3.short_name), GROUP_CONCAT(pace2.short_name),
                                         GROUP_CONCAT(pace1.short_name), p.pid, pa.id
                                   FROM  profiles                          AS p
                              LEFT JOIN  profile_addresses                 AS pa    ON (pa.pid = p.pid)
                              LEFT JOIN  profile_addresses_components      AS pc    ON (pa.pid = pc.pid AND pa.jobid = pc.jobid AND pa.groupid = pc.groupid
                                                                                        AND pa.type = pc.type AND pa.id = pc.id)
                              LEFT JOIN  profile_addresses_components_enum AS pace1 ON (FIND_IN_SET(\'country\', pace1.types) AND pace1.id = pc.component_id)
                              LEFT JOIN  profile_addresses_components_enum AS pace2 ON (FIND_IN_SET(\'locality\', pace2.types) AND pace2.id = pc.component_id)
                              LEFT JOIN  profile_addresses_components_enum AS pace3 ON (FIND_IN_SET(\'postal_code\', pace3.types) AND pace3.id = pc.component_id)
                                  WHERE  p.xorg_id = {?} AND NOT FIND_IN_SET('job', pa.flags)
                               ORDER BY  NOT FIND_IN_SET('current', pa.flags),
                                         FIND_IN_SET('secondary', pa.flags),
                                         NOT FIND_IN_SET('mail', pa.flags)
                               GROUP BY  pa.pid, pa.jobid, pa.groupid, pa.id, pa.type",
                                $params[1]);
            // Process the addresses we got.
            if(list($age, $text, $adr['cp'], $adr['ville'],
                    $adr['pays'], $pid, $adr['adrid']) = $res->next()) {
                list($adr['adr1'], $adr['adr2'], $adr['adr3']) =
                    explode("\n", Geocoder::getFirstLines($text, $adr['cp'], 3));
                $sql = XDB::query("SELECT  display_tel
                                     FROM  profile_phones
                                    WHERE  pid = {?} AND link_type = 'user' AND tel_type = 'mobile'
                                    LIMIT  1", $pid);
                if ($sql->numRows() > 0) {
                    $array['cell'] = $sql->fetchOneCell();
                } else {
                    $array['cell'] ='';
                }
                $array['age']       = $age;
                $array['adresse'][] = $adr;


                // We limit the address number by the number of available addresses.
                $adresse = min((int) $params[2], $res->total());

                if ($adresse != 1) { // We don't want the first address.
                    $i = 2;
                    while(list($age, $text, $adr['cp'], $adr['ville'],
                                $adr['pays'], , $adr['adrid']) = $res->next()) {
                        list($adr['adr1'], $adr['adr2'], $adr['adr3']) =
                            explode("\n", Geocoder::getFirstLines($text, $adr['cp'], 3));
                        if ($adresse == $i) {
                            // If we want this particular address.
                            $array['adresse'][0] = $adr;
                            //$res->free();
                            break;
                        } elseif ($adresse == 0) {
                            // If we want every address.
                            $array['adresse'][] = $adr;
                        }
                        $i++;
                    }
                }

                // We add the phone numbers.
                $adrid_index = array();
                foreach ($array['adresse'] as $i => $a) {
                    $adrid_index[$a['adrid']] = $i;
                }
                $restel = XDB::iterator("SELECT  pp.display_tel AS tel, pp..tel_type, pp.link_id as adrid
                                           FROM  profile_phones    AS pp
                                     INNER JOIN  profile_addresses AS pa ON (pp.link_id = pa.id AND pp.pid = pa.pid)
                                          WHERE  pp.pid = {?} AND pp.link_type = 'address'
                                                 AND NOT FIND_IN_SET('pro', pa.statut)",
                                        $pid);
                while ($tel = $restel->next()) {
                    $array['adresse'][$adrid_index[$tel['adrid']]]['tels'][] = $tel;
                }
                foreach ($array['adresse'] as $i => $adr) {
                    unset($lasttel);
                    foreach ($adr['tels'] as $j => $t) {
                        if (!isset($array['adresse'][$i]['tel']) && (strpos($t['tel_type'], 'Tél') === 0)) {
                            $array['adresse'][$i]['tel'] = $t['tel'];
                        } elseif (!isset($array['adresse'][$i]['fax'])
                                  && (strpos($t['tel_type'], 'Fax') === 0)) {
                            $array['adresse'][$i]['fax'] = $t['tel'];
                        } else {
                            $lasttel = $t['tel'];
                        }
                        if (isset($array['adresse'][$i]['tel']) && isset($array['adresse'][$i]['fax'])) {
                            break;
                        }
                    }
                    if (!isset($array['adresse'][$i]['tel']) && isset($lasttel)) {
                        $array['adresse'][$i]['tel'] = $lasttel;
                    } elseif (!isset($array['adresse'][$i]['fax']) && isset($lasttel)) {
                        $array['adresse'][$i]['fax'] = $lasttel;
                    }
                    unset($array['adresse'][$i]['adrid']);
                    unset($array['adresse'][$i]['tels']);
                }
            } else {
                $array = false;
            }
        }

        if ($array) { // We did get a result: the identification number was rigth.

            // We only send the age to manageurs.com; the format is YYYY-MM-DD 0123-56-89.
            $year  = (int) substr($array['age'], 0, 4);
            $month = (int) substr($array['age'], 5, 2);
            $day   = (int) substr($array['age'], 8, 2);
            $age   = (int) date('Y') - $year - 1;
            if(( $month < (int)date('m')) ||
                    (($month == (int)date('m')) && ($day >= (int)date('d')))) {
                $age += 1;
            }
            $array['age'] = $age;

            // We start the encryption of the data.
            if (manageurs_encrypt_init($params[1]) == 1) {
                // We did not find the key to encryptthe data.
                $args  = array("erreur" => 3, "erreurstring" => $error_key);
                $reply = xmlrpc_encode_request(NULL,$args);
            } else {
                $reply = manageurs_encrypt_array($array);
                manageurs_encrypt_close();
            }
        } else {
            // The identification number was not valid.
            $args  = array("erreur" => 2, "erreurstring" => $erreur_mat);
            $reply = xmlrpc_encode_request(NULL,$args);
        }
    } else {
        // The identification number was not in argument.
        $args  = array("erreur" => 1, "erreurstring" => $error_mat);
        $reply = xmlrpc_encode_request(NULL, $args);
    }

    return $reply;
}

function get_nouveau_infos($method, $params) {
    global $error_mat, $error_key, $globals;
    // Password verification.
    if(!isset($params[0]) || ($params[0] != $globals->manageurs->manageurs_pass)) {
        return false;
    }
    // We check we actually have an identification number.
    if(!empty($params[1])) {
        $res = XDB::query("SELECT  ppn.lastname_initial AS nom, ppn.lastname_ordinary AS nom_usage, ppn.firstname_initial AS prenom,
                                   p.sex = 'female' AS femme, p.deathdate IS NOT NULL AS decede,
                                   p.birthdate, pd.promo, CONCAT(e.email, '@', d.name) AS mail
                             FROM  profiles         AS p
                       INNER JOIN  account_profiles AS ap ON (p.pid = ap.pid AND FIND_IN_SET('owner', perms)
                       INNER JOIN  email_source_account AS s ON (s.uid = ap.uid AND FIND_IN_SET('bestalias', s.flags))
                       INNER JOIN  email_virtual_domains AS d ON (s.domain = s.id)
                       INNER JOIN  profile_display  AS pd PN (p.pid = pd.pid)
                       INNER JOIN  profile_public_names AS ppn ON (ppn.pid = p.pid)
                            WHERE  a.flags = 'bestalias' AND p.xorg_id = {?}",
                          $params[1]);
        // $data['mail'] .= '@polytechnique.org';


        // We start the encryption of the data.
        if (manageurs_encrypt_init($params[1]) == 1) {
            // We did not find the key to encryptthe data.
            $args  = array("erreur" => 3, "erreurstring" => $error_key);
            $reply = xmlrpc_encode_request(NULL, $args);
        } else {
            $reply = manageurs_encrypt_array($data);
            manageurs_encrypt_close();
        }

    } else {
        $reply = false;
    }
    return $reply;
}

// vim:set et sw=4 sts=4 sws=4 foldmethod=marker fenc=utf-8:
?>
Commit	Line	Data
0337d704	1	<?php
	2
	3	require_once('webservices/manageurs.inc.php');
	4
	5	$error_mat = "You didn't provide me with a valid matricule number...";
	6	$error_key = "You didn't provide me with a valid cipher key...";
8f60459a SJ	7
	8	// The first parameter has to be the identification number (matricule).
	9	// The second parameter facultative has to be the number of the desired address:
	10	// -1 => we do not want any address;
	11	// 0 => we want all the addresses;
	12	// n => we want the address number n.
	13	//
	14	// DO NOT CHANGE THE NAMES OF THE ADDRESSES' FIELDS.
	15	// IF YOU HAVE TO MAKE SOME MODIFICATION, FIRST CONTACT:
	16	// admin@manageurs.com
0337d704	17	function get_annuaire_infos($method, $params) {
	18	global $error_mat, $error_key, $globals;
	19
8f60459a SJ	20	// Password verification.
	21	if(!isset($params[0]) \|\| ($params[0] != $globals->manageurs->manageurs_pass)) {
	22	return false;
	23	}
	24	// If address == -1, we do not retrieve any address.
	25	if(isset($params[2]) && ($params[2] == -1)) {
	26	unset($params[2]);
	27	}
0337d704	28
8f60459a SJ	29	// We check we actually have an identification number.
	30	if(!empty($params[1])) {
	31	// We only retrieve addresses when required.
	32	if(!isset($params[2])) {
9e319def SJ	33	$res = XDB::iterRow("SELECT pp.display_tel AS cell, p.birthdate AS age
	34	FROM profiles AS p
	35	LEFT JOIN profile_phones AS pp ON (pp.pid = p.pid AND pp.link_type = 'user'
	36	AND pp.tel_type = 'mobile')
	37	WHERE p.xorg_id = {?} LIMIT 1",
	38	$params[1]);
79a5acea	39	$array = $res->next();
8f60459a	40	} else {
07b0a566 SJ	41	$res = XDB::iterRow("SELECT p.birthdate, pa.text, GROUP_CONCAT(pace3.short_name), GROUP_CONCAT(pace2.short_name),
07b0a566 SJ	42	GROUP_CONCAT(pace1.short_name), p.pid, pa.id
c9a1b3ff SJ	43	FROM profiles AS p
c9a1b3ff SJ	44	LEFT JOIN profile_addresses AS pa ON (pa.pid = p.pid)
07b0a566 SJ	45	LEFT JOIN profile_addresses_components AS pc ON (pa.pid = pc.pid AND pa.jobid = pc.jobid AND pa.groupid = pc.groupid
	46	AND pa.type = pc.type AND pa.id = pc.id)
	47	LEFT JOIN profile_addresses_components_enum AS pace1 ON (FIND_IN_SET(\'country\', pace1.types) AND pace1.id = pc.component_id)
	48	LEFT JOIN profile_addresses_components_enum AS pace2 ON (FIND_IN_SET(\'locality\', pace2.types) AND pace2.id = pc.component_id)
	49	LEFT JOIN profile_addresses_components_enum AS pace3 ON (FIND_IN_SET(\'postal_code\', pace3.types) AND pace3.id = pc.component_id)
9e319def SJ	50	WHERE p.xorg_id = {?} AND NOT FIND_IN_SET('job', pa.flags)
	51	ORDER BY NOT FIND_IN_SET('current', pa.flags),
	52	FIND_IN_SET('secondary', pa.flags),
c9a1b3ff SJ	53	NOT FIND_IN_SET('mail', pa.flags)
c9a1b3ff SJ	54	GROUP BY pa.pid, pa.jobid, pa.groupid, pa.id, pa.type",
9e319def	55	$params[1]);
8f60459a SJ	56	// Process the addresses we got.
8f60459a SJ	57	if(list($age, $text, $adr['cp'], $adr['ville'],
9e319def	58	$adr['pays'], $pid, $adr['adrid']) = $res->next()) {
8f60459a SJ	59	list($adr['adr1'], $adr['adr2'], $adr['adr3']) =
	60	explode("\n", Geocoder::getFirstLines($text, $adr['cp'], 3));
	61	$sql = XDB::query("SELECT display_tel
	62	FROM profile_phones
ce0b2c6f	63	WHERE pid = {?} AND link_type = 'user' AND tel_type = 'mobile'
9e319def	64	LIMIT 1", $pid);
8f60459a	65	if ($sql->numRows() > 0) {
b235d980 GB	66	$array['cell'] = $sql->fetchOneCell();
	67	} else {
	68	$array['cell'] ='';
	69	}
0337d704	70	$array['age'] = $age;
	71	$array['adresse'][] = $adr;
	72
79a5acea	73
8f60459a	74	// We limit the address number by the number of available addresses.
0337d704	75	$adresse = min((int) $params[2], $res->total());
0337d704	76
8f60459a	77	if ($adresse != 1) { // We don't want the first address.
0337d704	78	$i = 2;
8f60459a SJ	79	while(list($age, $text, $adr['cp'], $adr['ville'],
	80	$adr['pays'], , $adr['adrid']) = $res->next()) {
	81	list($adr['adr1'], $adr['adr2'], $adr['adr3']) =
	82	explode("\n", Geocoder::getFirstLines($text, $adr['cp'], 3));
	83	if ($adresse == $i) {
	84	// If we want this particular address.
0337d704	85	$array['adresse'][0] = $adr;
	86	//$res->free();
	87	break;
8f60459a SJ	88	} elseif ($adresse == 0) {
8f60459a SJ	89	// If we want every address.
0337d704	90	$array['adresse'][] = $adr;
	91	}
	92	$i++;
	93	}
	94	}
eaf30d86	95
8f60459a	96	// We add the phone numbers.
79a5acea	97	$adrid_index = array();
8f60459a SJ	98	foreach ($array['adresse'] as $i => $a) {
	99	$adrid_index[$a['adrid']] = $i;
	100	}
9e319def SJ	101	$restel = XDB::iterator("SELECT pp.display_tel AS tel, pp..tel_type, pp.link_id as adrid
	102	FROM profile_phones AS pp
	103	INNER JOIN profile_addresses AS pa ON (pp.link_id = pa.id AND pp.pid = pa.pid)
	104	WHERE pp.pid = {?} AND pp.link_type = 'address'
	105	AND NOT FIND_IN_SET('pro', pa.statut)",
	106	$pid);
8f60459a SJ	107	while ($tel = $restel->next()) {
	108	$array['adresse'][$adrid_index[$tel['adrid']]]['tels'][] = $tel;
	109	}
79a5acea	110	foreach ($array['adresse'] as $i => $adr) {
79a5acea	111	unset($lasttel);
8f60459a SJ	112	foreach ($adr['tels'] as $j => $t) {
	113	if (!isset($array['adresse'][$i]['tel']) && (strpos($t['tel_type'], 'Tél') === 0)) {
	114	$array['adresse'][$i]['tel'] = $t['tel'];
	115	} elseif (!isset($array['adresse'][$i]['fax'])
	116	&& (strpos($t['tel_type'], 'Fax') === 0)) {
	117	$array['adresse'][$i]['fax'] = $t['tel'];
	118	} else {
	119	$lasttel = $t['tel'];
	120	}
	121	if (isset($array['adresse'][$i]['tel']) && isset($array['adresse'][$i]['fax'])) {
	122	break;
	123	}
79a5acea	124	}
8f60459a	125	if (!isset($array['adresse'][$i]['tel']) && isset($lasttel)) {
79a5acea	126	$array['adresse'][$i]['tel'] = $lasttel;
8f60459a	127	} elseif (!isset($array['adresse'][$i]['fax']) && isset($lasttel)) {
79a5acea	128	$array['adresse'][$i]['fax'] = $lasttel;
8f60459a	129	}
79a5acea	130	unset($array['adresse'][$i]['adrid']);
	131	unset($array['adresse'][$i]['tels']);
	132	}
8f60459a	133	} else {
0337d704	134	$array = false;
	135	}
	136	}
0337d704	137
8f60459a	138	if ($array) { // We did get a result: the identification number was rigth.
0337d704	139
8f60459a SJ	140	// We only send the age to manageurs.com; the format is YYYY-MM-DD 0123-56-89.
	141	$year = (int) substr($array['age'], 0, 4);
	142	$month = (int) substr($array['age'], 5, 2);
	143	$day = (int) substr($array['age'], 8, 2);
0337d704	144	$age = (int) date('Y') - $year - 1;
0337d704	145	if(( $month < (int)date('m')) \|\|
8f60459a	146	(($month == (int)date('m')) && ($day >= (int)date('d')))) {
0337d704	147	$age += 1;
	148	}
	149	$array['age'] = $age;
	150
8f60459a SJ	151	// We start the encryption of the data.
	152	if (manageurs_encrypt_init($params[1]) == 1) {
	153	// We did not find the key to encryptthe data.
0337d704	154	$args = array("erreur" => 3, "erreurstring" => $error_key);
	155	$reply = xmlrpc_encode_request(NULL,$args);
	156	} else {
	157	$reply = manageurs_encrypt_array($array);
	158	manageurs_encrypt_close();
	159	}
8f60459a SJ	160	} else {
8f60459a SJ	161	// The identification number was not valid.
0337d704	162	$args = array("erreur" => 2, "erreurstring" => $erreur_mat);
	163	$reply = xmlrpc_encode_request(NULL,$args);
	164	}
8f60459a SJ	165	} else {
8f60459a SJ	166	// The identification number was not in argument.
0337d704	167	$args = array("erreur" => 1, "erreurstring" => $error_mat);
8f60459a	168	$reply = xmlrpc_encode_request(NULL, $args);
436e5ff3	169	}
eaf30d86 PH	170
	171	return $reply;
	172	}
0337d704	173
436e5ff3	174	function get_nouveau_infos($method, $params) {
436e5ff3	175	global $error_mat, $error_key, $globals;
8f60459a SJ	176	// Password verification.
	177	if(!isset($params[0]) \|\| ($params[0] != $globals->manageurs->manageurs_pass)) {
	178	return false;
	179	}
	180	// We check we actually have an identification number.
	181	if(!empty($params[1])) {
0e1dfbad	182	$res = XDB::query("SELECT ppn.lastname_initial AS nom, ppn.lastname_ordinary AS nom_usage, ppn.firstname_initial AS prenom,
9e319def	183	p.sex = 'female' AS femme, p.deathdate IS NOT NULL AS decede,
c0436d0b	184	p.birthdate, pd.promo, CONCAT(e.email, '@', d.name) AS mail
9e319def SJ	185	FROM profiles AS p
9e319def SJ	186	INNER JOIN account_profiles AS ap ON (p.pid = ap.pid AND FIND_IN_SET('owner', perms)
c0436d0b SJ	187	INNER JOIN email_source_account AS s ON (s.uid = ap.uid AND FIND_IN_SET('bestalias', s.flags))
c0436d0b SJ	188	INNER JOIN email_virtual_domains AS d ON (s.domain = s.id)
9e319def	189	INNER JOIN profile_display AS pd PN (p.pid = pd.pid)
0e1dfbad	190	INNER JOIN profile_public_names AS ppn ON (ppn.pid = p.pid)
9e319def	191	WHERE a.flags = 'bestalias' AND p.xorg_id = {?}",
0e1dfbad	192	$params[1]);
9e319def	193	// $data['mail'] .= '@polytechnique.org';
436e5ff3	194
eaf30d86	195
8f60459a SJ	196	// We start the encryption of the data.
	197	if (manageurs_encrypt_init($params[1]) == 1) {
	198	// We did not find the key to encryptthe data.
436e5ff3	199	$args = array("erreur" => 3, "erreurstring" => $error_key);
8f60459a	200	$reply = xmlrpc_encode_request(NULL, $args);
436e5ff3	201	} else {
	202	$reply = manageurs_encrypt_array($data);
	203	manageurs_encrypt_close();
	204	}
	205
8f60459a SJ	206	} else {
8f60459a SJ	207	$reply = false;
436e5ff3	208	}
8f60459a	209	return $reply;
436e5ff3	210	}
436e5ff3	211
448c8cdc	212	// vim:set et sw=4 sts=4 sws=4 foldmethod=marker fenc=utf-8:
0337d704	213	?>