Informations pratiques
<?php include_once(drupal_get_path('module', 'webform') .'/includes/webform.submissions.inc'); include_once('includes/file.inc'); global $user; if (in_array("authenticated user", $user->roles)) { $sid_adagio = Array(1683, 1643, 1654, 2097, 1557, 1590, 1601, 2387, 1942, 1997, 1271); global $submissions; $submissions = webform_get_submissions(313) + webform_get_submissions(317); global $registrations; $registrations = webform_get_submissions(311) + webform_get_submissions(315); global $dict; $dict = Array(); ksort($submissions); function register_entry($sid, $message_fr, $message_en, $update=1, $lang="") { global $dict; global $registrations; $registration = $registrations[$sid]; $reg = $registration->data; $to = $reg[14]['value'][0]; $subject = "[CHL2014] Practical information"; $header = "From: Semestre Lebesgue 2014 \n"; $header .= "Content-Type: text/plain; charset=utf-8"; $registration = $registrations[$sid]; $nid_registration = $registration->nid; $reg = $registration->data; if ($nid_registration == 311) { if ((isset($reg[22])) and $reg[22]['value'][0] == "Oui") { return; } if ($lang == "") { $lang = "fr"; } } else { if ((isset($reg[21])) and $reg[21]['value'][0] == "Oui") { return; } if ($lang == "") { $lang = "en"; } } if ($lang == "fr") { if ($reg[2]['value'][0] == "M.") { $message = "Cher collègue\n"; } else { $message = "Chère collègue\n"; } $message .= $message_fr; $message .= "\nCordialement,\nLes organisateurs\n"; } else { $message = "Dear Colleague,\n"; $message .= $message_en; $message .= "\nBest wishes,\nThe organizers\n"; } $title = "" . $reg[3]['value'][0] . " ". $reg[4]['value'][0] . "\n\n"; $key = strtoupper($reg[3]['value'][0] . $reg[4]['value'][0]); if ($update == 1 or (! isset($dict[$key]))) { $dict[$key] = Array("to" => $to, "subject" => $subject, "message" => $message, "header" => $header, "title" => $title); } } function echo_mail($to, $subject, $message, $header, $title) { echo "\n";
echo $title . "
";
$head = explode("\n", $header);
foreach ($head as $line) {
$pos = strpos($line, ":");
echo "" . substr($line, 0, $pos+1) . "" . htmlentities(substr($line, $pos+1), ENT_QUOTES, "UTF-8") . "
\n";
}
echo "À: " . htmlentities($to, ENT_QUOTES, "UTF-8") . "
\n";
echo "Sujet: " . htmlentities($subject, ENT_QUOTES, "UTF-8") . "
\n";
echo "
\n";
echo preg_replace("/\n/", "
", htmlentities($message, ENT_QUOTES, "UTF-8"));
echo "
\n"; } else { echo "Erreur dans l'envoi du mail à $to
\n"; } } $messageall_fr = " SE RENDRE À L'ÉCOLE Les cours auront lieu dans l'amphithéâtre N de l'ESIR (bâtiment 41bis) situé sur la partie est du campus de Beaulieu de l'université Rennes 1. Les lignes de bus 4 et 31 desservent le campus. L'arrêt le plus proche de l'ESIR est \"Beaulieu Chimie\". Le département de mathématiques (IRMAR) est situé au nord ouest du campus dans les bâtiments 22 et 23. Nous vous accueillerons le lundi matin à partir de 9h dans le bâtiment de l'ESIR. L'école débutera à 10h par un message d'accueil et une présentation rapide des cours. Le premier cours commencera à 11h. REPAS Les jours de conférence, les repas seront servis au restaurant universitaire du campus. INTERNET Sur le campus, les réseaux EDUROAM et EDUSPOT sont disponibles. Vous pourrez les utiliser pour accéder à Internet si vous êtes enregistrés sur l'un de ces réseaux. Dans le cas contraire, vous pouvez demander a compte invité en répondant simplement au courrier électrique qui vous a été envoyé il y a quelques jours par le DSI (le service informatique de l'université de Rennes 1). "; $messageall_en = " VENUE The lectures will take place in the Amphitheatre N of the ESIR school (Building 41bis), located in the eastern part of the Beaulieu campus of University Rennes 1. Bus routes 4 and 31 go to the campus. The nearest stop to the ESIR is Beaulieu Chimie. The Math Department (IRMAR) is located in the northern part of the campus in the buildings 22-23. We will welcome you on Monday morning in the ESIR building from 9am for registration. The school will begin at 10am by a welcome address and a quick overview of the lectures. The first lecture will start at 11am. LUNCHES Lunches on working days will be served in the university restaurant inside the Beaulieu campus. INTERNET You can get internet access through EDUROAM or EDUSPOT. Otherwise, you can get a guest account by simply replying to the email you got from the IT department of Rennes University (DSI) a few days ago. "; $message_fr = " Voici quelques informations en lien avec votre venue à Rennes pour notre école de printemps sur les théories de Hodge. De plus amples renseignements sont disponibles en ligne à : //www.lebesgue.fr/fr/content/sem2014-theories-hodge-infos LOGEMENT Vous serez logés à l'hôtel Adagio dont les coordonnées sont : 35, rue d'Antrain 35700 Rennes Tél: (+33) 2/23212600 Email: H8398@adagio-city.com Pour vous rendre à l'hôtel depuis la gare, prenez le métro, direction J.F. Kennedy, et descendez à l'arrêt \"St Anne\". Marchez ensuite sur la rue d'Antrain depuis la place St Anne jusqu'à l'hôtel. Si vous venez en avion, le mieux est de prendre un taxi jusqu'à l'hôtel. Les portes de l'hôtel sont ouvertes jusqu'à 22h. Entre 22h et 2h, vous pouvez entrer dans l'hôtel avec le code A0358 et vous trouverez une personne à la réception. Après 2h, vous pouvez accéder à l'hôtel avec le même code et vous pourrez récupérer vos clés dans un coffre avec votre nom (code 2361E). En cas de besoin, vous pouvez contacter Christophe Mourougane au (+33) 7 81 41 25 59. " . $messageall_fr; $message_en = " Here are some practical information related to your venue in Rennes at attend the spring school on Hodge theories. For more information, please check also: //www.lebesgue.fr/content/sem2014-theories-hodge-infos ACCOMODATION You will stay at Hotel Adagio which address is: 35, rue d'Antrain 35700 Rennes France Phone: (+33) 2/23212600 Email: H8398@adagio-city.com To go to the hotel from the train station, take the subway (direction J.F. Kennedy) and stop at station \"St. Anne\", then walk on the street \"rue d'Antrain\" from \"Place Saint-Anne\" to the hotel. For those of you arriving by plane in Rennes, take a taxi to the hotel. You will have free access to the hotel until 22:00. From 22:00 to 02:00, you can access the hotel with the code A0358: and you'll find someone at the reception. After 2:00, you can still access the hotel with the same code and you will find your keys in dedicated locker (code 2361E). In case of need, you can call Christophe Mourougane. His cell phone number is (+33) 7 81 41 25 59. " . $messageall_en; foreach($sid_adagio as $sid) { register_entry($sid, $message_fr, $message_en); } $message_fr = " Voici quelques informations en lien avec votre venue à Rennes pour notre école de printemps sur les théories de Hodge. De plus amples renseignements sont disponibles en ligne à : //www.lebesgue.fr/fr/content/sem2014-theories-hodge-infos LOGEMENT Nous vous avons réservé une chambre universitaire sur le campus de Beaulieu. L'adresse est : Résidence Universitaire Beaulieu Bâtiment D Avenue Charles Foulon 35700 Rennes Tél: (+33) 2 99 87 40 70 Pour vous rendre à la cité universitaire depuis la gare, prenez la sortie nord (à la gare) et empruntez la ligne de bus 1, direction Cesson-Sévigné, jusqu'à l'arrêt \"Mirabeau\". Depuis l'aéroport, le plus simple est de prendre un taxi. La réception de la résidence est ouverte 24h/24. Si possible, il est toutefois préférable d'arriver avant 22h. En cas de besoin, vous pouvez contacter Christophe Mourougane au (+33) 7 81 41 25 59. Les petits déjeuners seront servis sur le campus de Beaulieu, bâtiment 27, à partir de 8h. " . $messageall_fr; $message_en = " Here are some practical information related to your venue in Rennes at attend the spring school on Hodge theories. For more information, please check also: //www.lebesgue.fr/content/sem2014-theories-hodge-infos ACCOMODATION We booked a room for you on the campus. The location is: Résidence Universitaire Beaulieu Building D Avenue Charles Foulon 35700 Rennes Phone: (+33) 2 99 87 40 70 To go to \"Cité Universitaire\" from the train station, take the north exit of the train station and then take Bus n°1 (direction Cesson-Sévigné) in front of the station. Get off at station \"Mirabeau\" and walk down to Building D. For those of you arriving by plane in Rennes, take a taxi. The reception is open 24h/24 in Building D, so you can get your keys even if you arrive in the evening or late at night. In case of need, you can call Christophe Mourougane. His cell phone number is (+33) 7 81 41 25 59. Breakfasts are served on the Beaulieu campus building 27 starting from 8:00 (see the map). " . $messageall_en; foreach($submissions as $sid => $submission) { $arr = $submission->data; $sid_registration = $arr[1]['value'][0]; if ($sid_registration == 1277) { continue; } if ($submission->nid == 313) { $cid = 6; } else { $cid = 5; } if (isset($arr[$cid]) and $arr[$cid]['value'][0] == 'univcity' and isset($registrations[$sid_registration])) { $lang = ""; if ($submission->nid == 317) { $lang = "en"; } register_entry($sid_registration, $message_fr, $message_en, 1, $lang); } } $message1_fr = " Voici quelques informations en lien avec votre venue à Rennes pour notre école de printemps sur les théories de Hodge. Les mêmes renseignements sont disponibles en ligne à : //www.lebesgue.fr/fr/content/sem2014-theories-hodge-infos " . $messageall_fr; $message1_en = " Here are some practical information related to your venue in Rennes at attend the spring school on Hodge theories. For more information, check also: //www.lebesgue.fr/content/sem2014-theories-hodge-infos " . $messageall_en; $message2_fr = " Étant donné que vous n'avez pas payé les frais d'inscription pour la participation à l'école de printemps sur les théories de Hodge, nous avons été contraints d'annuler votre inscription. "; $message2_en = " Since you have not paid registration fees, your registration to our spring school on Hodge theories was cancelled. "; foreach($registrations as $sid => $registration) { $reg = $registration->data; if (isset($reg[19])) { register_entry($sid, $message1_fr, $message1_en, 0); } else { echo $sid . " "; register_entry($sid, $message2_fr, $message2_en); } } ksort($dict); $nb = 0; foreach ($dict as $demand) { echo_mail($demand["to"], $demand["subject"], $demand["message"], $demand["header"], $demand["title"]); $nb++; } echo "
Total: $nb mails
"; } else { echo "Veuillez vous connecter sur le site pour accéder à cette page.
\n"; } ?>