QFreefax ne fonctionne plus

sebgui · Nouveau **Hors-ligne**

N'ayant plus la possibilité de développer qFreefax, j'ai décidé de le libérer!

J'ai regroupé tous les sources dans une archive disponible ici : http://dl.Free.fr/vfYknReTS

Libre à qui veux d'en assurer le maintient!

OLIV316 · Habitué **Hors-ligne**

Merci Sebgui

oranggila · Nouveau **Hors-ligne**

Bonjour à tous,

Voici le code en PHP qui permet d'envoyer un fax au format texte à partir du service fax de chez Free.
J'ai mis un certain temps à le mettre au point ...

Fonction principale à appeler :

envoyer_fax ($msg, $login, $password, $destinataire, $email_ack)

Description des paramètres d'appel :
$msg = message texte à envoyer
$login = votre identifiant de votre compte Freebox
$password = votre mot de passe
$destinataire = le numéro de fax à atteindre
$email_ack (1 ou 0) = choix de recevoir un rapport d'envoi sur son email

Attention nombre de fax limité à 10 par heure.

<?php

$timeout = 10;

///////////////////////////////////////////////////////////////////////////////////

function obtenir_id_idt($page, &$id, &$idt)
{

//The document has moved <a href="https://adsl.Free.fr/home.pl?id=xxxxxxxx&idt=yyyyyyyyyy">here</a>.

$chaine_recherchee = "<a href=";
$debut_id = strstr($page,"?id=");
$fin_id = strpos ($debut_id, "&");
$id = substr ($debut_id, 4, $fin_id -4);

$debut_idt = strstr($debut_id,"idt=");
$fin_idt = strpos ($debut_idt, chr(34));
$idt = substr ($debut_idt, 4, $fin_idt -4);

}

///////////////////////////////////////////////////////////////////////////////////

function connecter_fax ( $id, $idt)
{

$fax_url = "https://adsl.Free.fr/tel_fax.pl";

$ch = curl_init(); // création d'une nouvelle ressource CURL
// configuration de l'URL et d'autres options
curl_setopt($ch, CURLOPT_URL, $fax_url);
curl_setopt($ch, CURLOPT_FRESH_CONNECT, true);
curl_setopt($ch, CURLOPT_TIMEOUT, $timeout);
curl_setopt($ch, CURLOPT_CONNECTTIMEOUT, $timeout);

curl_setopt($ch, CURLOPT_RETURNTRANSFER, TRUE);
curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, false);
curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, false);

curl_setopt($ch, CURLOPT_POST, true);
curl_setopt($ch, CURLOPT_POSTFIELDS, array(
'id' => $id,
'idt' => $idt ));

$page = curl_exec($ch); // récupération du contenu de la page
$httpcode = curl_getinfo($ch, CURLINFO_HTTP_CODE);
curl_close($ch); // fermeture de la session curl

$trace_file = __DIR__."/connecter_fax.txt";
$hd = fopen($trace_file,"w+");
fwrite($hd,$page);
fclose($hd);

if (200 != $httpcode)
{
echo " code connecter_fax = $httpcode ";
return false;
}

return true;

}

///////////////////////////////////////////////////////////////////////////////////

function emettre_fax ($fax, $id, $idt, $email_ack, $destinataire)

{

$fax = utf8_decode ($fax);

$fax_file = __DIR__."/fax.txt";
$hd = fopen($fax_file,"w+");
fwrite($hd,$fax);
fclose($hd);

$fax_url = "https://adsl.Free.fr/tel_ulfax.pl";

$ch = curl_init(); // création d'une nouvelle ressource CURL
// configuration de l'URL et d'autres options
curl_setopt($ch, CURLOPT_URL, $fax_url);
curl_setopt($ch, CURLOPT_FRESH_CONNECT, true);
curl_setopt($ch, CURLOPT_TIMEOUT, $timeout);
curl_setopt($ch, CURLOPT_CONNECTTIMEOUT, $timeout);

curl_setopt($ch, CURLOPT_RETURNTRANSFER, TRUE);
curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, false);
curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, false);

$length = strlen($fax);

$postdata = array(
'id' => $id,
'idt' => $idt,
'destinataire' => $destinataire,
'email_ack' => $email_ack,
'masque' => 'N',
'document' => "@".$fax_file
);

$httpheaders = array(
'Content-type' => 'multipart/form-data'
);

curl_setopt($ch, CURLOPT_HTTPHEADER, $httpheaders);

curl_setopt($ch, CURLOPT_POST, true);
curl_setopt($ch, CURLOPT_POSTFIELDS, $postdata);

$page = curl_exec($ch); // récupération du contenu de la page
$httpcode = curl_getinfo($ch, CURLINFO_HTTP_CODE);
curl_close($ch); // fermeture de la session curl

$trace_file = __DIR__."/emettre_fax.txt";
$hd = fopen($trace_file,"w+");
fwrite($hd,$page);
fclose($hd);

if (302 != $httpcode)
{
echo " code emettre_fax = $httpcode ";
return false;
}

return true;

}

///////////////////////////////////////////////////////////////////////////////////

function envoyer_fax ($msg, $login, $password, $destinataire, $email_ack)
{

$free_url = "https://subscribe.Free.fr/login/login.pl";

$ch = curl_init(); // création d'une nouvelle ressource CURL
// configuration de l'URL et d'autres options
curl_setopt($ch, CURLOPT_URL, $free_url);
curl_setopt($ch, CURLOPT_FRESH_CONNECT, true);
curl_setopt($ch, CURLOPT_TIMEOUT, $timeout);
curl_setopt($ch, CURLOPT_CONNECTTIMEOUT, $timeout);

curl_setopt($ch, CURLOPT_RETURNTRANSFER, TRUE);
curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, false);
curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, false);

curl_setopt($ch, CURLOPT_POST, true);
curl_setopt($ch, CURLOPT_POSTFIELDS, array(
'login' => $login,
'pass' => $password ));

$page = curl_exec($ch); // récupération du contenu de la page
$httpcode = curl_getinfo($ch, CURLINFO_HTTP_CODE);
curl_close($ch); // fermeture de la session curl

$trace_file = __DIR__."/trace_login.txt";
$hd = fopen($trace_file,"w+");
fwrite($hd,$page);
fclose($hd);

if (302 != $httpcode)
{
echo " code envoyer_fax = $httpcode ";
return false;
}

$id= "";
$idt= "";

obtenir_id_idt($page, $id, $idt);

//echo " id ====>>> $id ";
//echo " idt ====>>> $idt ";

connecter_fax ($id, $idt);

emettre_fax ($msg, $id, $idt, $email_ack, $destinataire);

}

?>

snc · Nouveau **Hors-ligne**

Merci sebgui pour les sources de qfreefax et merci surtout pour ce petit outil qui nous aura servi pas mal d'années !

equinoxe06 · Intéressé **Hors-ligne**

Apparemment, FAX4FREE ne fonctionne plus non plus...

OLIV316 · Habitué **Hors-ligne**

je confirme envoi du fax impossible
j'ai pourtant mis à jour avec la 4.36

equinoxe06 · Intéressé **Hors-ligne**

C'est le bug de l'an .... 2016...

Merci pour la confirmation Oliv316, et meilleurs voeux...

snc · Nouveau **Hors-ligne**

J'ai toujours un bug en installant la 4.36 64bits, de ce fait, je suis toujours en version 4.27. Mais le test fait à l'instant dit "envoi impossible". Problème temporaire de Free ou changement de la page nécessitant une modification du programme ? Question

J'envoie un mail à l'auteur.

A+

equinoxe06 · Intéressé **Hors-ligne**

Je ne pense pas qu'il s'agisse d'un bug de Free, en passant par l'interface Free, ca marche.

snc · Nouveau **Hors-ligne**

Pas d'un bug mais d'un changement de l'interface de Free. Les programmes se contentent d'envoyer des infos comme on le ferait par le navigateur. Si la séquence d'action est modifiée, le programme peut ne plus fonctionner.
Qfreefax posait le même problème. Au moindre changement de la gestion des fax par Free, il fallait modifier le programme, et comme Sebgui ne poursuivait plus le développement de qfreefax, un jour, il est devenu obsolète. Heureusement, on a découvert FAx4Free et son développeur l'a grandement amélioré. Il est maintenant bien plus complet que ne l'était qfreefax.
Je peux me tromper mais je pense qu'il ne lui manque qu'une mise à jour probablement pour fonctionner à nouveau.

snc · Nouveau **Hors-ligne**

Mais il se trouve que l'auteur est en plein déménagement. Alors un peu de patience ! Smile

equinoxe06 · Intéressé **Hors-ligne**

Ça y est, la version 4.4. est sortie et le fax refonctionne. Very Happy

Merci à Jerry Jacques s'il me lit. Beau boulot !

snc · Nouveau **Hors-ligne**

Mise à jour en version PC pour l'instant. Version MAC à suivre certainement.

C'est sûr qu'on peut le remercier d'avoir pris le temps au milieu de son déménagement !

OLIV316 · Habitué **Hors-ligne**

Merci à Jerry Jacques
vraiment surper outil
mais je ne trouve pas la version 32 bits Sad

OLIV316 · Habitué **Hors-ligne**

Version 32 Bits à jour

Merci Jerry jaques !! Very Happy