API Din'Hosting - Français - v 1.15.00
www.dinhosting.fr
ATTENTION
  • Vous devez posséder un compte sur le panel Din'Hosting pour utiliser l'API
  • L'utilisation de l'API doit être activée sur votre compte
  • Il est préférable d'utiliser la version Connnexion Sécurisée sécurisée de l'API
  • La plus grande majorité des actions se font sans aucune demande de confirmation. Faites des tests sur des données non sensibles.
string login ( string $login, string $pass )

Permet de se loguer à l'API en utilisant vos identifiants de connexion au panel

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
#!/usr/bin/perl

use strict;
use 
warnings;

use 
SOAP::Lite;

my $login "XXX-DIN";
my $pass "xXxXxXx";
my $session;

my $client SOAP::Lite -> uri("https://api.dinhosting.fr/api.wsdl")
                        -> 
proxy("https://api.dinhosting.fr/");
                      
my $result $client -> login($login,$pass);

if (
$result->result)
{
  
$session $result->result;
  print 
"Connexion effectuée avec succès\n";
}


boolean logout ( string $session )

Permet de se déloguer de l'API et de détruire la session

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
#!/usr/bin/perl

use strict;
use 
warnings;

use 
SOAP::Lite;

my $login "XXX-DIN";
my $pass "xXxXxXx";
my $session;

my $client SOAP::Lite -> uri("https://api.dinhosting.fr/api.wsdl")
                        -> 
proxy("https://api.dinhosting.fr/");
                      
my $result $client -> login($login,$pass);

if (
$result->result)
{
  
$session $result->result;
  print 
"Connexion effectuée avec succès\n";
}

my $logout $client -> logout($session);

if (
$logout->result)
{
  print 
"Déconnexion effectuée avec succès\n";
}


boolean dedieDnsAjouter ( string $session, string $compte, string $domaine )

Ajoute un domaine au NS2 Din'Hosting, utilisé par les locataires de serveurs dédiés ou les propriétaires de serveurs en colocation.

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";
$compte "moncompte";
$domaine "mondomaine.tld",

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$dedieDnsAjouter $client->dedieDnsAjouter($session,$compte,$domaine);
  
  if (
$dedieDnsAjouter != false)
  {
    echo 
"Ajout effectué avec succès<br />";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
A venir


array dedieDnsListe ( string $session, string $compte )

Liste les domaines du compte gérés par le NS2 Din'Hosting, utilisé par les locataires de serveurs dédiés ou les propriétaires de serveurs en colocation.

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";
$compte "moncompte";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$dedieDnsListe $client->dedieDnsListe($session,$compte);
  
  if (
$dedieDnsListe !== false)
  {
    echo 
"<pre>";
    
print_r($dedieDnsListe);
    echo 
"</pre>";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
A venir


boolean dedieDnsRetirer ( string $session, string $compte, string $domaine )

Retire un domaine du NS2 Din'Hosting, utilisé par les locataires de serveurs dédiés ou les propriétaires de serveurs en colocation.

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";
$compte "moncompte";
$domaine "mondomaine.tld",

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$dedieDnsRetirer $client->dedieDnsRetirer($session,$compte,$domaine);
  
  if (
$dedieDnsRetirer != false)
  {
    echo 
"Retrait effectué avec succès<br />";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
A venir


array dedieListe ( string $session )

Renvoie la liste des serveurs dédiés et en colocation associés au compte

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$comptes $client->dedieListe($session);
  
  if (
$comptes != false)
  {
    echo 
"<pre>";
    
print_r($comptes);
    echo 
"</pre>";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
#!/usr/bin/perl

use strict;
use 
warnings;

use 
SOAP::Lite;

my $login "XXX-DIN";
my $pass "xXxXxXx";
my $session;

my $client SOAP::Lite -> uri("https://api.dinhosting.fr/api.wsdl")
                        -> 
proxy("https://api.dinhosting.fr/");
                      
my $result $client -> login($login,$pass);

if (
$result->result)
{
  
$session $result->result;
  print 
"Connexion effectuée avec succès\n";
}

my $comptes $client -> dedieListe($session);

if (
$comptes->result)
{
  
my $i = -1;
  while ( 
ref $comptes->result->[++$i] )
  {
    print 
$comptes->result->[$i]{'login'} . "\n";
    print 
" => " $comptes->result->[$i]{'etat'} . "\n";
    print 
" => " $comptes->result->[$i]{'date_expire'} . "\n";
  }
}

my $logout $client -> logout($session);

if (
$logout->result)
{
  print 
"Déconnexion effectuée avec succès\n";
}


array dedieMonitoringEtat ( string $session, string $serveur )

Renvoie l'état des services monitorés sur le serveur

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";
$serveur "serveurXXX";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$etats $client->dedieMonitoringEtat($session$serveur);
  
  if (
$etats != false)
  {
    echo 
"<pre>";
    
print_r($etats);
    echo 
"</pre>";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
A venir


boolean domaineDispo ( string $session, string $domaine )

Renvoie vrai ou faux selon que le domaine est disponible ou ne l'est pas.
La fonction permet d'effectuer une recherche sur les extentions

.com .net .org .fr .be .ch .eu .info .biz .re .yt .pm .wf .tf


Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";
$domaine "domaine.d-h.fr";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$dispo $client->domaineDispo($session$domaine);
  
  if (
$dispo == true)
  {
    echo 
"Domaine $domaine disponible";
  }
  else
  {
    echo 
"Domaine $domaine pas disponible";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
#!/usr/bin/perl

use strict;
use 
warnings;

use 
SOAP::Lite;

my $login "XXX-DIN";
my $pass "xXxXxXx";
my $domaine "domaine.d-h.fr";
my $session;

my $client SOAP::Lite -> uri("https://api.dinhosting.fr/api.wsdl")
                        -> 
proxy("https://api.dinhosting.fr/");
                      
my $result $client -> login($login,$pass);

if (
$result->result)
{
  
$session $result->result;
  print 
"Connexion effectuée avec succès\n";
}

my $dispo $client -> domaineDispo($session$domaine);

if (
$dispo->result)
{
  print 
"Domaine $domaine disponible\n";
}
else
{
  print 
"Domaine $domaine pas disponible\n";
}

my $logout $client -> logout($session);

if (
$logout->result)
{
  print 
"Déconnexion effectuée avec succès\n";
}


boolean domaineDnsAjouter ( string $session, string $domaine, string $name, string $type, string $data[, int $aux, int $ttl ] )

Insère une nouvelle entrée DNS pour le domaine.
$type peut prendre une valeur parmis A, AAAA, ALIAS, CNAME, HINFO, MX, NS, RP, SRV, TXT
$aux correspond à la valeur secondaire, comme la priorité dans le cas des MX.
$ttl doit être supérieur ou égal à 180 secondes. La valeur par défaut est de 38400 secondes.
Si l'entrée existe déjà, l'ajout échouera.

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";
$domaine "mondomaine.tld";
$name "www";
$type "A";
$data "80.248.219.102";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$domaine $client->domaineDnsAjouter($session,
                                        
$domaine,
                                        
$name,
                                        
$type,
                                        
$data);
  
  if (
$domaine !== false)
  {
    echo 
"Entrée DNS ajoutée avec succès.";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
A venir


array domaineDnsListe ( string $session, string $domaine )

Liste toutes les entrées DNS d'un domaine

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";
$domaine "mondomaine.tld";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$listeEntrees $client->domaineDnsListe($session,
                                           
$domaine);
  
  if (
$listeEntrees !== false)
  {
    echo 
"<pre>";
    
print_r($listeEntrees);
    echo 
"</pre>";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
A venir


boolean domaineDnsModifier ( string $session, string $domaine, string $name, string $type, string $data, string $newdata[, int $newaux, int $newttl ] )

Met à jour une entrée DNS pour le domaine.
$type peut prendre une valeur parmis A, AAAA, ALIAS, CNAME, HINFO, MX, NS, RP, SRV, TXT
$aux correspond à la valeur secondaire, comme la priorité dans le cas des MX.
$ttl doit être supérieur ou égal à 180 secondes.


Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";
$domaine "mondomaine.tld";
$name "www";
$type "A";
$data "80.248.219.102";
$newdata "127.0.0.1";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$domaine $client->domaineDnsModifier($session,
                                         
$domaine,
                                         
$name,
                                         
$type,
                                         
$data,
                                         
$newdata);
  
  if (
$domaine !== false)
  {
    echo 
"Entrée DNS modifiée avec succès.";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
A venir


boolean domaineDnsRetirer ( string $session, string $domaine, string $name, string $type, string $data )

Efface une entrée DNS pour le domaine.
$type peut prendre une valeur parmis A, AAAA, ALIAS, CNAME, HINFO, MX, NS, RP, SRV, TXT

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";
$domaine "mondomaine.tld";
$name "www";
$type "A";
$data "80.248.219.103";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$domaine $client->domaineDnsRetirer($session,
                                        
$domaine,
                                        
$name,
                                        
$type,
                                        
$data);
  
  if (
$domaine !== false)
  {
    echo 
"Entrée DNS effacée avec succès.";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
A venir


string ipPays ( string $session, string $ip[, string $mode] )

Renvoie le pays auquel l'adresse IP est attribuée. Par défaut, le retour est le code pays au format ISO 3166-1 alpha-2.
$mode peut prendre la valeur 'iso3', pour un retour au format ISO 3166-1 alpha-3, ou 'pays' pour le nom du pays, en anglais.

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";
$ip "80.248.219.102"

try { 
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl",  
            array(
"trace" => 1"soap_version" => SOAP_1_1)); 

  
$session $client->login($login,$pass);     

  if (
$session != false
  { 
    echo 
"Connexion effectuée avec succès<br />"
  } 
   
  
$retour $client->ipPays($session,$ip); 
   
  if (
$retour != false
  { 
    echo 
$retour
  }   

  
$logout $client->logout($session); 
   
  if (
$logout != false
  { 
    echo 
"Déconnexion effectuée avec succès<br />"
  }   
   
} catch (
SoapFault $fault) { 
  echo 
$fault



?>
A venir


boolean mutualiseCronAjouter ( string $session, string $compte, string $etat, string $url, string $minutes, string $heures, string $joursSemaine, string $joursMois, string $mois[, string $utilisateur, string $motDePasse] )

Crée une nouvelle tâche cron. Le fonctionnement est similaire aux tâches crons sous linux.
$url correspond à l'adresse qui sera chargé à la fréquence donnée. $utilisateur et $motDePasse sont facultatifs et utilisés dans le cas où la page à charger est protégée par un .htaccess.
Pour que la tâche s'exécute à plusieurs fréquences, vous pouvez séparer les chiffres par des virgules.
Exemple : pour exécuter la tâche à xxh00 et xxh30, $minute vaudra 0,30.
Pour exécuter la tâche toutes les 5 minutes (fréquence maximale, il n'est pas possible d'exécuter de tâche plus souvent que toutes les 5 minutes), ou toutes les heures, ou tous les jours, vous pouvez définir les variables à *.

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";
$compte "compte";

// Charge la page $url toutes les 5 minutes, de 1h à 3h du matin tous les jours
// La page est protégée par un login et un mot de passe
$etat "actif"// ou $etat = "stop";
$url "http://www.dinhosting.fr/index.html";
$minutes "*";
$heures "1,2,3";
$joursSemaine "*";
$joursMois "*";
$mois "*";
$utilisateur "login";
$motDePasse "pass";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$cron $client->mutualiseCronAjouter($session,
                                        
$compte,
                                        
$etat,
                                        
$url,
                                        
$minutes,
                                        
$heures,
                                        
$joursSemaine,
                                        
$joursMois,
                                        
$mois,
                                        
$utilisateur,
                                        
$motDePasse);
  
  if (
$cron == true)
  {
    echo 
"Tâche cron créée avec succès";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
A venir


boolean mutualiseCronModifier ( string $session, string $compte, int $tache, string $etat, string $url, string $minutes, string $heures, string $joursSemaine, string $joursMois, string $mois[, string $utilisateur, string $motDePasse] )

Modifie une nouvelle tâche cron. Les arguments sont les mêmes que pour la création d'une nouvelle tâche.

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";
$compte "compte";

// Charge la page $url toutes les 5 minutes, de 1h à 3h du matin tous les jours
// La page est protégée par un login et un mot de passe
$tache 170;
$etat "actif"// ou $etat = "stop";
$url "http://www.dinhosting.fr/index.html";
$minutes "*";
$heures "1,2,3";
$joursSemaine "*";
$joursMois "*";
$mois "*";
$utilisateur "login";
$motDePasse "pass";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$cron $client->mutualiseCronModifier($session,
                                         
$compte,
                                         
$tache,
                                         
$etat,
                                         
$url,
                                         
$minutes,
                                         
$heures,
                                         
$joursSemaine,
                                         
$joursMois,
                                         
$mois,
                                         
$utilisateur,
                                         
$motDePasse);
  
  if (
$cron == true)
  {
    echo 
"Tâche cron modifiée avec succès";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
A venir


array mutualiseCronListe ( string $session, string $compte )

Renvoie la liste des tâches crons actuellement présentes sur le compte.

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";
$compte "compte";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$logs $client->mutualiseCronListe($session,
                                      
$compte);
  
  if (
$logs !== false)
  {
    echo 
"<pre>";
    
print_r($logs);
    echo 
"</pre>";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
A venir


array mutualiseCronLog ( string $session, string $compte, int $tache )

Renvoie les 30 dernières lignes de log de la tâche sélectionnée

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";
$compte "compte";
$tache "123";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$logs $client->mutualiseCronLog($session,
                                    
$compte,
                                    
$tache);
  
  if (
$logs !== false)
  {
    echo 
"<pre>";
    
print_r($logs);
    echo 
"</pre>";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
A venir


boolean mutualiseCronRetirer ( string $session, string $compte, string $tache )

Supprime une tâche cron. Lorsque la tâche est supprimée, les logs d'exécution sont détruits.

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";
$compte "compte";
$tache "123";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$cron $client->mutualiseCronRetirer($session,
                                        
$compte,
                                        
$tache);
  
  if (
$cron !== false)
  {
    echo 
"Tâche cron supprimée avec succès";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
A venir


array mutualiseDetail ( string $session, string $compte )

Renvoie le détail des disponibilités et de l'utilisation d'un compte mutualisé.

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";
$compte "moncompte";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$mutualiseDetail $client->mutualiseDetail($session,$compte);
  
  if (
$mutualiseDetail != false)
  {
    echo 
"<pre>";
    
print_r($mutualiseDetail);
    echo 
"</pre>";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
A venir


array mutualiseDetailMysql ( string $session, string $compte )

Renvoie le détail de l'utilisation de vos bases de données MySQL.
Pour chaque base, le premier argument est le pourcentage en mode textuel, et le second est l'image représentant ce pourcentage, encodé au format base64.

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";
$compte "moncompte";
$base "moncompte1";
// si $image à true, renvoie l'image du pourcentage
$image true;

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    if (
$image != true) { echo "Connexion effectuée avec succès<br />"; }
  }
  
  
$mutualiseDetailMysql $client->mutualiseDetailMysql($session,$compte);
  
  if (
$mutualiseDetailMysql != false)
  {
    if (
$image != true)
    {
      echo 
"Pourcentage : ".$mutualiseDetailMysql[$base][0];
    }
    else
    {
      
header("Content-type: image/png");
      echo 
base64_decode($mutualiseDetailMysql[$base][1]);
    }
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    if (
$image != true) { echo "Déconnexion effectuée avec succès<br />"; }
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
A venir


array mutualiseDomaineListe ( string $session, string $compte )

Renvoie la liste des domaines installés sur l'hébergement mutualisé

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";
$compte "compte";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$domaines $client->mutualiseDomaineListe($session$compte);
  
  if (
$domaines != false)
  {
    echo 
"<pre>";
    
print_r($domaines);
    echo 
"</pre>";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
A venir


array mutualiseListe ( string $session )

Renvoie la liste des hébergements mutualisés associés au compte

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$comptes $client->mutualiseListe($session);
  
  if (
$comptes != false)
  {
    echo 
"<pre>";
    
print_r($comptes);
    echo 
"</pre>";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
#!/usr/bin/perl

use strict;
use 
warnings;

use 
SOAP::Lite;

my $login "XXX-DIN";
my $pass "xXxXxXx";
my $session;

my $client SOAP::Lite -> uri("https://api.dinhosting.fr/api.wsdl")
                        -> 
proxy("https://api.dinhosting.fr/");
                      
my $result $client -> login($login,$pass);

if (
$result->result)
{
  
$session $result->result;
  print 
"Connexion effectuée avec succès\n";
}

my $comptes $client -> mutualiseListe($session);

if (
$comptes->result)
{
  
my $i = -1;
  while ( 
ref $comptes->result->[++$i] )
  {
    print 
$comptes->result->[$i]{'login'} . "\n";
    print 
" => " $comptes->result->[$i]{'etat'} . "\n";
    print 
" => " $comptes->result->[$i]{'date_expire'} . "\n";
  }
}

my $logout $client -> logout($session);

if (
$logout->result)
{
  print 
"Déconnexion effectuée avec succès\n";
}


boolean mutualiseMailCreer ( string $session, string $compte, string $type, string $adresse, string $extra )

Crée une nouvelle adresse mail (POP/IMAP ou alias)

$type peut prendre les valeurs :
popimap pour une adresse de type POP/IMAP
alias pour un alias

$extra contient le mot de passe pour le type popimap ou l'adresse de destination pour un alias

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";

$compte "comptemutualisé";
$adresse "nouvelleadresse@mondomaine.tld";
$type "popimap";
$extra "motdepasse";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$retour $client->mutualiseMailCreer($session,
                                        
$compte,
                                        
$type,
                                        
$adresse,
                                        
$extra);
  
  if (
$retour != false)
  {
    echo 
"L'adresse $adresse a été créée avec succès<br />";
  }
  else
  {
    echo 
"Une erreur est survenue lors de la création
          de l'adresse 
$adresse<br />";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
#!/usr/bin/perl

use strict;
use 
warnings;

use 
SOAP::Lite;

my $login "XXX-DIN";
my $pass "xXxXxXx";
my $session;

my $compte "comptemutualisé";
my $adresse 'nouvelleadresse@mondomaine.tld';
my $type "popimap";
my $extra "motdepasse";

my $client SOAP::Lite -> uri("https://api.dinhosting.fr/api.wsdl")
                        -> 
proxy("https://api.dinhosting.fr/");
                      
my $result $client -> login($login,$pass);

if (
$result->result)
{
  
$session $result->result;
  print 
"Connexion effectuée avec succès\n";
}

my $retour $client -> mutualiseMailCreer($session,
                                           
$compte,
                                           
$type,
                                           
$adresse,
                                           
$extra);

if (
$retour->result)
{
  print 
"L'adresse $adresse a été créée avec succès\n";
}
else
{
  print 
"Une erreur est survenue lors de la création de l'adresse $adresse\n";
}

my $logout $client -> logout($session);

if (
$logout->result)
{
  print 
"Déconnexion effectuée avec succès\n";
}


array mutualiseMailListe ( string $session, string $compte )

Renvoie la liste des adresses mail de l'hébergement mutualisé sous la forme

[0] => Array
  (
    ['adresse'] => adresse@mail.tld
    ['type'] => popimap
    ['espace_disque_utilise'] => 20
    ['espace_disque_total'] => 20
    ['antispam'] => 1
    ['destination'] => null
  )

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";
$compte "compte";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$adresses $client->mutualiseMailListe($session$compte);
  
  if (
$adresses != false)
  {
    echo 
"<pre>";
    
print_r($adresses);
    echo 
"</pre>";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
#!/usr/bin/perl

use strict;
use 
warnings;

use 
SOAP::Lite;

my $login "XXX-DIN";
my $pass "xXxXxXx";
my $compte "compte";
my $session;

my $client SOAP::Lite -> uri("https://api.dinhosting.fr/api.wsdl")
                        -> 
proxy("https://api.dinhosting.fr/");
                      
my $result $client -> login($login,$pass);

if (
$result->result)
{
  
$session $result->result;
  print 
"Connexion effectuée avec succès\n";
}

my $adresses $client -> mutualiseListe($session$compte);

if (
$adresses->result)
{
  
my $i = -1;
  while ( 
ref $adresses->result->[++$i] )
  {
    print 
$adresses->result->[$i]{'adresse'} . "\n";
    print 
" => ";
      if (
defined($adresses->result->[$i]{'type'})) {
        print 
$adresses->result->[$i]{'type'}
      }
      print 
"\n";
    print 
" => ";
      if (
defined($adresses->result->[$i]{'espace_disque_utilise'})) {
        print 
$adresses->result->[$i]{'espace_disque_utilise'}
      }
      print 
"\n";
    print 
" => ";
      if (
defined($adresses->result->[$i]{'espace_disque_total'})) {
        print 
$adresses->result->[$i]{'espace_disque_total'}
      }
      print 
"\n";
    print 
" => ";
      if (
defined($adresses->result->[$i]{'antispam'})) {
        print 
$adresses->result->[$i]{'antispam'}
      }
      print 
"\n";
    print 
" => ";
      if (
defined($adresses->result->[$i]{'destination'})) {
        print 
$adresses->result->[$i]{'destination'}
      }
      print 
"\n";
  }
}

my $logout $client -> logout($session);

if (
$logout->result)
{
  print 
"Déconnexion effectuée avec succès\n";
}


boolean mutualiseMailModifier ( string $session, string $compte, string $adresse, string $nouveaumdp )

Modifie le mot de passe d'une adresse mail POP/IMAP

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";

$compte "comptemutualisé";
$adresse "monadresse@mondomaine.tld";
$nouveaumdp "monnouveaumotdepasse";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$retour $client->mutualiseMailModifier($session,
                                           
$compte,
                                           
$adresse,
                                           
$nouveaumdp);
  
  if (
$retour != false)
  {
    echo 
"Le mot de passe de l'adresse $adresse a été modifié
          avec succès<br />"
;
  }
  else
  {
    echo 
"Une erreur est survenue lors de la modification
          du mot de passe de l'adresse 
$adresse<br />";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
#!/usr/bin/perl

use strict;
use 
warnings;

use 
SOAP::Lite;

my $login "XXX-DIN";
my $pass "xXxXxXx";
my $session;

my $compte "comptemutualisé";
my $adresse 'nouvelleadresse@mondomaine.tld';
my $nouveaumdp "nouveaumotdepasse";

my $client SOAP::Lite -> uri("https://api.dinhosting.fr/api.wsdl")
                        -> 
proxy("https://api.dinhosting.fr/");
                      
my $result $client -> login($login,$pass);

if (
$result->result)
{
  
$session $result->result;
  print 
"Connexion effectuée avec succès\n";
}

my $retour $client -> mutualiseMailModifier($session,
                                              
$compte,
                                              
$adresse,
                                              
$nouveaumdp);

if (
$retour->result)
{
  print 
"Le mot de passe de l'adresse $adresse a été modifié avec succès\n";
}
else
{
  print 
"Une erreur est survenue lors de la modification ";
  print 
"du mot de passe de l'adresse $adresse\n";
}

my $logout $client -> logout($session);

if (
$logout->result)
{
  print 
"Déconnexion effectuée avec succès\n";
}


boolean mutualiseMailRetirer ( string $session, string $compte, string $adresse, string $type )

Supprime une adresse mail. Tous les mails stockés sur la boite de messagerie sont détruits.

$type peut prendre les valeurs :
popimap pour une adresse de type POP/IMAP
alias pour un alias

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";
$compte "compte";
$adresse "monadresse@mondomaine.tld";
$type "popimap";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$mail $client->mutualiseMailRetirer($session,
                                        
$compte,
                                        
$adresse,
                                        
$type);
  
  if (
$mail !== false)
  {
    echo 
"Adresse mail supprimée avec succès";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
A venir


array mutualiseMysqlDump ( string $session, string $compte, string $base )

Renvoie la liste des dumps MySQL disponibles pour la base de données $base.

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";
$compte "compte";
$base="compte1";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$dumps $client->mutualiseMysqlDump($session,
                                       
$compte,
                                       
$base);
  
  if (
$dumps !== false)
  {
    echo 
"<pre>";
    
print_r($dumps);
    echo 
"</pre>";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
A venir


boolean mutualiseSousDomaineAjouter ( string $session, string $compte, string $domaine, string $sousdomaine, string $chemin )

Crée un nouveau sous-domaine pour le domaine indiqué. Le nouveau sous-domaine pointe dans le répertoire $chemin, relatif à la racine du FTP du compte. Ce répertoire doit exister avant la création du sous-domaine.

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";
$compte "compte";
$domaine "mondomaine.tld";
$sousdomaine "sousdom";
$chemin "/www/";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$sousdomaine $client->mutualiseSousDomaineAjouter($session,
                                                      
$compte,
                                                      
$domaine,
                                                      
$sousdomaine,
                                                      
$chemin);
  
  if (
$sousdomaine == true)
  {
    echo 
"Sous-domaine créé avec succès";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
A venir


array mutualiseSousDomaineListe ( string $session, string $compte, string $domaine )

Renvoie la liste des sous-domaines du domaine (qui doit être installé sur l'hébergement mutualisé).
Le sous-domaine 'vide', correspondant à http://domaine.tld est remplacé par un #

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";
$compte "compte";
$domaine "mondomaine.tld";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$sousdomaines $client->mutualiseSousDomaineListe($session,
                                                     
$compte,
                                                     
$domaine);
  
  if (
$sousdomaines != false)
  {
    echo 
"<pre>";
    
print_r($sousdomaines);
    echo 
"</pre>";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
A venir


boolean mutualiseSousDomaineRetirer ( string $session, string $compte, string $domaine, string $sousdomaine )

Détruit un nouveau sous-domaine pour le domaine indiqué. Les fichiers présents dans le dossier de destination du sous-domaine ne sont pas détruits.

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";
$compte "compte";
$domaine "mondomaine.tld";
$sousdomaine "sousdom";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$sousdomaine $client->mutualiseSousDomaineRetirer($session,
                                                      
$compte,
                                                      
$domaine,
                                                      
$sousdomaine);
  
  if (
$sousdomaine == true)
  {
    echo 
"Sous-domaine détruit avec succès";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
A venir


boolean smsCreer ( string $session, string $compte )

Créer un nouveau compte SMS vide.

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";

$compte "compte";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$creation $client->smsCreer($session,$compte);
  
  if (
$creation != false)
  {
    echo 
"Création effectuée avec succès";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
A venir


string smsEnvoi ( string $session, string $compte, string $destinataire, string $message [, int $udh] )

Envoie un SMS. La personnalisation de l'expéditeur se fait sur le panel de gestion.
Le numéro de téléphone doit être au format internationnal : Pour la france +336xxxxxxxx
Liste complète des indicatifs internationaux
Le paramètre $udh (factulatif, à 1 par défaut) permet d'avoir un message unique sur le téléphone du destinataire lorsque le nombre de caractères est supérieur à 160.

Les retours possibles sont :
E07 : Numéro de téléphone invalide
E09 : Compte inexistant
E10 : Compte épuisé, pas de SMS restants
E99 : Erreur inatendue
R01 : Message envoyé avec succès


Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";
$compte "moncompte"
$destinataire "+336XXXXXXXX";
$message utf8_encode("Contenu du SMS");

try { 
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl",  
            array(
"trace" => 1"soap_version" => SOAP_1_1)); 

  
$session $client->login($login,$pass);     

  if (
$session != false
  { 
    echo 
"Connexion effectuée avec succès<br />"
  } 
   
  
$retour $client->smsEnvoi($session,$compte,$destinataire,$message); 
   
  if (
$retour != false
  { 
    echo 
$retour
  }   

  
$logout $client->logout($session); 
   
  if (
$logout != false
  { 
    echo 
"Déconnexion effectuée avec succès<br />"
  }   
   
} catch (
SoapFault $fault) { 
  echo 
$fault



?>
#!/usr/bin/perl

use strict;
use 
warnings;

use 
SOAP::Lite;

my $login "XXX-DIN";
my $pass "xXxXxXx";
my $session;

my $compte "moncompte"
my $destinataire "+336XXXXXXXX";
my $message "Contenu du SMS";

my $client SOAP::Lite -> uri("https://api.dinhosting.fr/api.wsdl")
                        -> 
proxy("https://api.dinhosting.fr/");
                      
my $result $client -> login($login,$pass);

if (
$result->result)
{
  
$session $result->result;
  print 
"Connexion effectuée avec succès\n";
}

my $retour $client->smsEnvoi($session,
                               
$compte,
                               
$destinataire,
                               
$message); 

if (
$retour->result)
{
  print 
$retour->result "\n";
}

my $logout $client -> logout($session);

if (
$logout->result)
{
  print 
"Déconnexion effectuée avec succès\n";
}


int smsInfoCredit ( string $session, string $compte )

Renvoie le crédit de SMS restant sur le compte

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";
$compte "moncompte";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$credit $client->smsInfoCredit($session,$compte);
  
  if (
$credit != false)
  {
    echo (int) 
$credit;
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
#!/usr/bin/perl

use strict;
use 
warnings;

use 
SOAP::Lite;

my $login "XXX-DIN";
my $pass "xXxXxXx";
my $session;

my $compte "moncompte"

my $client SOAP::Lite -> uri("https://api.dinhosting.fr/api.wsdl")
                        -> 
proxy("https://api.dinhosting.fr/");
                      
my $result $client -> login($login,$pass);

if (
$result->result)
{
  
$session $result->result;
  print 
"Connexion effectuée avec succès\n";
}

my $retour $client->smsInfoCredit($session$compte); 

if (
$retour->result)
{
  print 
$retour->result "\n";
}

my $logout $client -> logout($session);

if (
$logout->result)
{
  print 
"Déconnexion effectuée avec succès\n";
}


array smsListe ( string $session )

Renvoie la liste des comptes SMS associés au compte panel

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$comptes $client->smsListe($session);
  
  if (
$comptes != false)
  {
    echo 
"<pre>";
    
print_r($comptes);
    echo 
"</pre>";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
#!/usr/bin/perl

use strict;
use 
warnings;

use 
SOAP::Lite;

my $login "XXX-DIN";
my $pass "xXxXxXx";
my $session;

my $client SOAP::Lite -> uri("https://api.dinhosting.fr/api.wsdl")
                        -> 
proxy("https://api.dinhosting.fr/");
                      
my $result $client -> login($login,$pass);

if (
$result->result)
{
  
$session $result->result;
  print 
"Connexion effectuée avec succès\n";
}

my $comptes $client -> smsListe($session);

if (
$comptes->result)
{
  
my $i = -1;
  while ( 
ref $comptes->result->[++$i] )
  {
    print 
$comptes->result->[$i]{'login'} . "\n";
    print 
" => " $comptes->result->[$i]{'credit'} . "\n";
    print 
" => " $comptes->result->[$i]{'expediteur'} . "\n";
  }
}

my $logout $client -> logout($session);

if (
$logout->result)
{
  print 
"Déconnexion effectuée avec succès\n";
}


array smsListeEnvois ( string $session, string $compte[, int $debut, int $nombre] )

Renvoie la liste des SMS envoyés sur le compte sous la forme
[0] => Array
  (
    ['date'] => 1207045800
    ['destinataire'] => +336xxxxxxxx
    ['taille'] => 1
    ['etat'] => S0x
  )

Les valeurs possibles de 'etat' sont :
S01 : Reçu
S02 : En attente de réception
S03 : Etat inconnu
S04 : Erreur de réception

Si $debut et $fin sont définis, la liste est tronquée aux $nombre SMS à partir de $debut

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";
$compte "moncompte";

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);    

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$smsListeEnvois $client->smsListeEnvois($session,$compte);
  
  if (
$smsListeEnvois != false)
  {
    echo 
"<pre>";
    
print_r($smsListeEnvois);
    echo 
"</pre>";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }  
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
#!/usr/bin/perl

use strict;
use 
warnings;

use 
SOAP::Lite;

my $login "XXX-DIN";
my $pass "xXxXxXx";
my $compte "compte";
my $session;

my $client SOAP::Lite -> uri("https://api.dinhosting.fr/api.wsdl")
                        -> 
proxy("https://api.dinhosting.fr/");
                      
my $result $client -> login($login,$pass);

if (
$result->result)
{
  
$session $result->result;
  print 
"Connexion effectuée avec succès\n";
}

my $smsListeEnvois $client -> smsListeEnvois($session$compte);

if (
$smsListeEnvois->result)
{
  
my $i = -1;
  
  while ( 
ref $smsListeEnvois->result->[++$i] )
  {
    print 
$i "\n";
    print 
" => ";
      if (
defined($smsListeEnvois->result->[$i]{'date'})) {
        print 
$smsListeEnvois->result->[$i]{'date'}
      }
      print 
"\n";
    print 
" => ";
      if (
defined($smsListeEnvois->result->[$i]{'destinataire'})) {
        print 
$smsListeEnvois->result->[$i]{'destinataire'}
      }
      print 
"\n";
    print 
" => ";
      if (
defined($smsListeEnvois->result->[$i]{'taille'})) {
        print 
$smsListeEnvois->result->[$i]{'taille'}
      }
      print 
"\n";
    print 
" => ";
      if (
defined($smsListeEnvois->result->[$i]{'etat'})) {
        print 
$smsListeEnvois->result->[$i]{'etat'}
      }
      print 
"\n";
  }  
}

my $logout $client -> logout($session);

if (
$logout->result)
{
  print 
"Déconnexion effectuée avec succès\n";
}


boolean smsTransfert ( string $session, string $compteorigine, string $comptedestination, int $nombre[, string $force] )

Transfère $nombre SMS du compte $compteorigine vers le compte $comptedestination. Les 2 comptes peuvent être associés à des nic handle différents, mais l'option $force doit alors être à true

Code PHP5 | Code PERL
<?php

$login 
"XXX-DIN";
$pass "xXxXxXx";

$compteorigine "compte1";
$comptedestination "compte2";
$nombre 5;

try {
  
$client = new SoapClient("https://api.dinhosting.fr/api.wsdl"
            array(
"trace" => 1"soap_version" => SOAP_1_1));

  
$session $client->login($login,$pass);

  if (
$session != false)
  {
    echo 
"Connexion effectuée avec succès<br />";
  }
  
  
$transfert $client->smsTransfert($session,
                                   
$compteorigine,
                                   
$comptedestination,
                                   
$nombre);
  
  if (
$transfert != false)
  {
    echo 
"Transfert effectué avec succès";
  }  

  
$logout $client->logout($session);
  
  if (
$logout != false)
  {
    echo 
"Déconnexion effectuée avec succès<br />";
  }
  
} catch (
SoapFault $fault) {
  echo 
$fault;
}

?>
A venir


Remonter