4 ini_set('include_path', '.:../include:/usr/share/php');
5 require_once 'connect.db.inc.php';
6 require_once 'marketing.inc.php';
8 $opts = getopt('f:l:m:');
9 if (($opts['f'] && $opts['f'] == '-') ||
empty($opts['f'])) {
10 $file = 'php://stdin';
14 if (empty($opts['l']) ||
empty($opts['m'])) {
17 $matcol = intval($opts['m']);
18 $logcol = intval($opts['l']);
19 $handle = fopen($file, 'r');
21 while ($data = fgetcsv($handle)) {
22 $login = $data[$logcol];
23 $xorgid = preg_replace('/1(\d{2})(\d{3})/', '20${1}0\2', $data[$matcol]);
24 if (!is_numeric($xorgid)) {
25 echo "ERROR The matricule ($xorgid) is not a numerical value.\n";
28 $query = XDB
::query("SELECT a.uid
30 INNER JOIN account_profiles AS ap ON (p.pid = ap.pid AND FIND_IN_SET('owner', perms)
31 INNER JOIN accounts AS a ON (a.uid = ap.uid)
32 WHERE p.xorg_id = {?}",
34 $uid = $query->fetchOneCell();
36 echo "WARNING Can't find uid for matricule $xorgid (login $login)\n";
39 $market = Marketing
::get($uid, "$login@poly.polytechnique.fr");
40 if (!is_null($market)) {
41 echo "WARNING A marketing has already been to $xorgid on $login\n";
44 $market = new Marketing($uid, "$login@poly.polytechnique.fr", 'default', null
, 'staff');
49 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8: