//Démarrage de d une instance de casperjs

var casper = require('casper').create({
ViewportSize:{
width: 2500,
height: 1000},
pageSettings: {
loadImages:  false,
loadPlugins: false},
waitTimeout: 10000}); //Création permettant de simuler la navigation web

//Affichage des arguments de la ligne de commande
casper.echo('Argument 1 : ' + replaceAll(casper.cli.args[0], "_", " "));
casper.echo('Argument 2 : ' + replaceAll(casper.cli.args[1], "_", " "));
casper.echo('Argument 3 : ' + casper.cli.args[2]);

//Paramètres du script
var gare_depart, gare_arrivee, type_etude;
var date_jour, date_depart, date_fin, nb_jours, num_jour;
gare_depart = replaceAll(casper.cli.args[0], "_", " ");
gare_arrivee = replaceAll(casper.cli.args[1], "_", " ");
type_etude = casper.cli.args[2]; //1 = on récupère tout l historique, autre = on ne récupère que les prems (premier jour de mise en vente)
date_jour = new Date();

if (type_etude==11) {
date_depart=new Date(date_jour.getFullYear(),date_jour.getMonth(), date_jour.getDate(), date_jour.getHours() + 1, 0, 0);
date_fin = new Date(date_jour.getFullYear(), date_jour.getMonth() + 1, date_jour.getDate() + 1, 0, 0, 0);
} else if (type_etude==12) {
date_depart = new Date(date_jour.getFullYear(), date_jour.getMonth() + 1, date_jour.getDate() + 1, 0, 0, 0);
date_fin = new Date(date_jour.getFullYear(), date_jour.getMonth() + 2, date_jour.getDate() + 1, 0, 0, 0);
} else if (type_etude==13) {
date_depart = new Date(date_jour.getFullYear(), date_jour.getMonth() + 2, date_jour.getDate() + 1, 0, 0, 0);
date_fin = new Date(date_jour.getFullYear(), date_jour.getMonth() + 3, date_jour.getDate() + 1, 0, 0, 0);
} else {
date_depart = new Date(date_jour.getFullYear(), date_jour.getMonth()+3, date_jour.getDate(), 0, 0, 0);
date_fin = new Date(date_jour.getFullYear(), date_jour.getMonth()+3, date_jour.getDate()+1, 0, 0, 0);
}

nb_jours = diffdate(date_depart,date_fin);
num_jour=0;

//Définition des variables

var fs = require('fs'); //Création d un objet permettant de gérer les entrées / sorties avec le DD
var base_url="https://www.oui.sncf/";
var heure_depart = date_depart.getHours();
var date_ext = new Date();

//Démarrage de la navigation
casper.start(base_url);


//Retraitement du jour et de l heure de départ en fonction de la date et de l heure du jour.
casper.then(function() {
this.waitForSelector('div.vsb-search');
});

casper.then(function(){
Rechercher()
});

casper.run();

function Rechercher() {
//Appel de la fonction de remplissage
casper.then(function(){
RemplissageFormulaireRecherche();
});
casper.then(function(){
ExecutionRecherche(this);
});
}

function RemplissageFormulaireRecherche(){

casper.echo('Nom de la page : ' + casper.getTitle());
casper.echo('Date et heure de depart retenue : ' + DateToStr(date_depart) + ' ' + DateExtractHeureToStr(date_depart));
casper.echo('Date de fin de l etude : ' + DateToStr(date_fin));
casper.echo('Nombre de jours de l etude : ' + nb_jours);
casper.echo('--- Debut remplissage des caracteristiques du trajet ---');

//Gare de départ
casper.then(function() {
casper.echo('Ok debut gare de depart : ' + gare_depart);
casper.click('div#d2d-autocomplete-origin-train div.booking-ico-close');
casper.wait(500);
casper.click('input[id="vsb-origin-train"]');
casper.sendKeys('input[id="vsb-origin-train"]', gare_depart, {keepFocus: true});
casper.waitForSelector('li[id="vsb-origin-0"]');
casper.then(function() {
casper.click('li[id="vsb-origin-0"]');
});
});

casper.echo('Ok fin gare de depart : '  + gare_depart);

//Gare de destination
casper.then(function() {
casper.echo("Ok debut gare d arrivee : " + gare_arrivee);
casper.click('div#d2d-autocomplete-destination-train div.booking-ico-close');
casper.wait(500);
casper.click('input[id="vsb-destination-train"]');
casper.sendKeys('input[id="vsb-destination-train"]', gare_arrivee, {keepFocus: true});
casper.waitForSelector('li[id="vsb-destination-0"]');
casper.then(function() {
casper.click('li[id="vsb-destination-0"]');
});
casper.echo("Ok fin gare d arrivee : " + gare_arrivee);
});

//Date de départ
casper.then(function() {
var strDateDepart=DateToStr(date_depart);
casper.echo('OK debut date du voyage : ' + strDateDepart);
casper.click('input[id="vsb-departure-date-train"]');
var nbMois = date_depart.getMonth()-date_jour.getMonth();
casper.waitForSelector('span[class="button next idp-right"]');
casper.then(function(){
for (i=1;i<=nbMois;i++){
casper.click('span[class="button next idp-right"]');
}

casper.then(function(){
casper.click('td[date="' + strDateDepart+ '"]');
});
});
});

//Heure de départ
casper.then(function() {
casper.echo('OK debut heure du voyage ' + DateExtractHeureToStr(date_depart));
casper.click('select[id="vsb-departure-time-train"]');
casper.sendKeys('select[id="vsb-departure-time-train"]', DateExtractHeureToStr(date_depart), {keepFocus: true});
casper.echo('OK fin heure du voyage ' + DateExtractHeureToStr(date_depart));
});
}

//Exécution de la recherche
function ExecutionRecherche(){

casper.then(function() {
casper.capture('RechSNCF.png');
casper.echo('--- Fin remplissage des caracteristiques du trajet ---');
casper.echo('--- Debut recherche des tarifs ---');
casper.click('button[id="vsb-booking-train-submit"]');
casper.wait(10000);
//this.waitForSelector('button.btn-link.next-btn');
});

casper.then(function check() {
casper.echo('Train trouve');
RecupereDonnees();
});
}

//Extraction des résultats de la recherche et factorisation jusqu à la date de fin
function RecupereDonnees() {
//Récupération des résultats de la recherche et factorisation sur nb_jours
casper.then(function() {
casper.echo('--- Fin recherche des tarifs ---');
casper.echo('--- Debut extraction des resultats ---');
var resultats=[];
var i=0;
for(i=0; i<nb_jours;i++) {
casper.then(function() {
casper.echo('Extraction des liens du jour : ' + num_jour + '/' + nb_jours);
});
casper.then(function(txtBtn) {
AllongeListeTrains();
});
casper.then(function() {
casper.capture('ResultatsRechSNCF.png');
ExtractJournee(resultats);
});
casper.then(function() {
casper.waitForSelector('button[ng-show="$ctrl.displayNextDayButton()"]');
casper.then(function(){
casper.click('button[ng-show="$ctrl.displayNextDayButton()"]');
casper.waitForSelector('button.btn-link.next-btn');
num_jour++;
});
});
}

casper.then(function() {
var nom_fichier = DateToStr(date_ext) + "_" + gare_depart + "_" + gare_arrivee + "_" + DateExtractHeureToStr(date_ext) + '_' + type_etude + ".csv";
nom_fichier = replaceAll(nom_fichier, " ","_");
nom_fichier = replaceAll(nom_fichier,"/","-");
casper.echo('Affichage des resultats');
casper.echo('Taille du tableau resultat : ' + resultats.length);
casper.echo('Nom du fichier : ' + nom_fichier);
stream = fs.open(nom_fichier,'aw');
for (i=0;i<resultats.length;i++) {
casper.echo(resultats[i]);
stream.writeLine(resultats[i]);
//stream.flush();
}
stream.close();
});
});
}

function replaceAll(machaine, chaineARemaplacer, chaineDeRemplacement) {
return machaine.replace(new RegExp(chaineARemaplacer, 'g'),chaineDeRemplacement);
}

function ExtractJournee(resultats){
var s='', dateExtract='', links = [];
casper.echo('Debut evaluation des liens journee en cours');
links = casper.evaluate(getLinks);
casper.echo('fin evaluation des liens journee en cours');
dateExtract = new Date();

for (i=0;i<links.length;i++) {
links[i][11]=DateHeureToStr(dateExtract);
}

k = resultats.length;

for (i=0;i<links.length;i++) {
for (j=0;j<=11;j++) {
s=s+links[i][j];
if (j<11) s=s+" ; ";
}
resultats[k+i] = s;
s="";
}
}

function AllongeListeTrains(){
var txtBtn = casper.evaluate(getTxtBtnSuivant); //Si le texte jour_suivant est masque : L evaluation doit se faire avant le then sinon le texte du bouton est remplacé par du javascript
if (txtBtn) {
casper.echo("Alongement des resultats");
casper.click('button.btn-link.next-btn');
casper.waitForSelector('button.btn-link.next-btn');
casper.then(function(txtBtn) {
AllongeListeTrains(casper);
});
}
}

function getTxtBtnSuivant(){
var btn=document.querySelector('button.btn-link.next-btn.ng-hide');
if (btn.getAttribute("ng-show")=="$ctrl.displayNextDayButton()") {
return true;
} else {
return false;
}
}

//Fonction permettant d extraire toutes les informations à partir d une page résultat d une recherche
function getLinks() {
var links = document.querySelectorAll('div.proposal div.main-row-wrapper.proposalRow');
return Array.prototype.map.call(links, function(e) {
var tab_resume_voyage = [];
var i;
tab_resume_voyage[0] = e.getElementsByClassName('proposalSummary')[0].getElementsByClassName('departure-time')[0].getAttribute("datetime");
tab_resume_voyage[1] = e.getElementsByClassName('proposalSummary')[0].getElementsByClassName('departure-station')[0].innerText;
tab_resume_voyage[2] = e.getElementsByClassName('proposalSummary')[0].getElementsByClassName('arrival-time')[0].getAttribute("datetime");
tab_resume_voyage[3] = e.getElementsByClassName('proposalSummary')[0].getElementsByClassName('arrival-station')[0].innerText;

if (e.getElementsByClassName('proposalSummary')[0].querySelector('ol[class="transporters"]')) {
tab_resume_voyage[4] = e.getElementsByClassName('proposalSummary')[0].querySelector('ol[class="transporters"]').getAttribute("data-transporters");
} else {
tab_resume_voyage[4]="-";
}
if (e.getElementsByClassName('proposalSummary')[0].querySelector('span[class="is-direct"]')) {
tab_resume_voyage[5] = e.getElementsByClassName('proposalSummary')[0].querySelector('span[class="is-direct"]').innerText;
} else {
if (e.getElementsByClassName('proposalSummary')[0].querySelector('span[class="has-corresp"]')) {
tab_resume_voyage[5]= e.getElementsByClassName('proposalSummary')[0].querySelector('span[class="has-corresp"]').innerText;
} else {
tab_resume_voyage[5]="-";
}
}

//Boucle pour récupérer les 4 tarifs
if (e.querySelector('div.price-column.price-proposal')) {
tab_resume_voyage[6]="En vente";
for (i=0;i<=3;i++) {
if (e.querySelectorAll('div.price-column.price-proposal')[i].querySelector('span.integer')) {
tab_resume_voyage[7+i]=e.querySelectorAll('div.price-column.price-proposal')[i].querySelector('span.integer').innerText;
if (e.querySelectorAll('div.price-column.price-proposal')[i].querySelector('span.decimal')) {
tab_resume_voyage[7+i]=tab_resume_voyage[7+i] + e.querySelectorAll('div.price-column.price-proposal')[i].querySelector('span.decimal').innerText;
}
} else {
tab_resume_voyage[7+i]="-";
}
}
} else {
if (e.querySelector('div.proposal.unsellable span.reason')) {
tab_resume_voyage[6]=e.querySelector('div.proposal.unsellable span.reason').innerText;
for (i=0;i<=3;i++) {
tab_resume_voyage[7+i]="-";
}
}
}
return (tab_resume_voyage);
});
}

//Convertion d une date en chaîne de caractères jj/mm/aaaa
function DateToStr(date){
var num_annee = date.getFullYear();
var num_mois = date.getMonth() + 1;
var num_jour = date.getDate();
if(num_mois < 10)
num_mois = "0" + num_mois;
if(num_jour < 10)
num_jour = "0" + num_jour;
return num_jour + "/" + num_mois + "/" + num_annee;
}

function DateHeureToStr(date){

var num_annee = date.getFullYear();
var num_mois = date.getMonth() + 1;
var num_jour = date.getDate();
var num_heure = date.getHours();
var num_minutes = date.getMinutes();
var num_secondes = date.getSeconds();

if(num_mois < 10)
num_mois = "0" + num_mois;
if(num_jour < 10)
num_jour = "0" + num_jour;
if(num_heure < 10)
num_heure = "0" + num_heure;
if(num_minutes < 10)
num_minutes = "0" + num_minutes;
if(num_secondes < 10)
num_secondes = "0" + num_secondes;

return (num_annee + "-" + num_mois + "-" + num_jour + " " + num_heure + ":" + num_minutes + ":" + num_secondes);
}

//Récupération de l'heure d'une date sous la forme : hhh (01h, ..., 23h)
function DateExtractHeureToStr(date){
var num_heure = date.getHours();
if(num_heure < 10)
num_heure = "0" + num_heure;
return num_heure + "h";
}

function diffdate(d1,d2){
var WNbJours = d2.getTime() - d1.getTime();
return Math.ceil(WNbJours/(1000*60*60*24));
}