--- rpl/src/instructions_t2.c	2018/05/30 09:27:37	1.70
+++ rpl/src/instructions_t2.c	2018/12/21 10:56:19	1.71
@@ -1921,7 +1921,7 @@ instruction_target(struct_processus *s_e
 							.adresse_distante);
 
 					if (((*((struct_socket *) (*s_objet_argument_1)
-							.objet)).adresse_distante = malloc(22 *
+							.objet)).adresse_distante = malloc(23 *
 							sizeof(unsigned char))) == NULL)
 					{
 						(*s_etat_processus).erreur_systeme =
@@ -1929,9 +1929,6 @@ instruction_target(struct_processus *s_e
 						return;
 					}
 
-					(*((struct_socket *) (*s_objet_argument_1).objet))
-							.adresse_distante[0] = d_code_fin_chaine;
-
 					for(i = 0; i < 4; i++)
 					{
 						if ((((integer8 *) (*((struct_vecteur *)
@@ -1940,14 +1937,6 @@ instruction_target(struct_processus *s_e
 								(*((struct_vecteur *) (*(*l_element_courant)
 								.donnee).objet)).tableau)[i] <= 255))
 						{
-							sprintf((*((struct_socket *) (*s_objet_argument_1)
-									.objet)).adresse_distante,
-									(i == 0) ? "%s%d" : "%s.%d",
-									(*((struct_socket *) (*s_objet_argument_1)
-									.objet)).adresse_distante, (int)
-									((integer8 *) (*((struct_vecteur *)
-									(*(*l_element_courant).donnee).objet))
-									.tableau)[i]);
 						}
 						else
 						{
@@ -1959,6 +1948,21 @@ instruction_target(struct_processus *s_e
 							return;
 						}
 					}
+
+					sprintf((*((struct_socket *) (*s_objet_argument_1)
+							.objet)).adresse_distante, "%d.%d.%d.%d",
+							(int) ((integer8 *) (*((struct_vecteur *)
+							(*(*l_element_courant).donnee).objet))
+							.tableau)[0],
+							(int) ((integer8 *) (*((struct_vecteur *)
+							(*(*l_element_courant).donnee).objet))
+							.tableau)[1],
+							(int) ((integer8 *) (*((struct_vecteur *)
+							(*(*l_element_courant).donnee).objet))
+							.tableau)[2],
+							(int) ((integer8 *) (*((struct_vecteur *)
+							(*(*l_element_courant).donnee).objet))
+							.tableau)[3]);
 				}
 				else if ((*((struct_vecteur *) (*(*l_element_courant).donnee)
 						.objet)).taille == 16)
@@ -1978,7 +1982,7 @@ instruction_target(struct_processus *s_e
 							.adresse_distante);
 
 					if (((*((struct_socket *) (*s_objet_argument_1)
-							.objet)).adresse_distante = malloc(55 *
+							.objet)).adresse_distante = malloc(47 *
 							sizeof(unsigned char))) == NULL)
 					{
 						(*s_etat_processus).erreur_systeme =
@@ -1986,9 +1990,6 @@ instruction_target(struct_processus *s_e
 						return;
 					}
 
-					(*((struct_socket *) (*s_objet_argument_1).objet))
-							.adresse_distante[0] = d_code_fin_chaine;
-
 					for(i = 0; i < 16; i++)
 					{
 						if ((((integer8 *) (*((struct_vecteur *)
@@ -1997,14 +1998,6 @@ instruction_target(struct_processus *s_e
 								(*((struct_vecteur *) (*(*l_element_courant)
 								.donnee).objet)).tableau)[i] <= 255))
 						{
-							sprintf((*((struct_socket *) (*s_objet_argument_1)
-									.objet)).adresse_distante,
-									(i == 0) ? "%s%d" : "%s:%X",
-									(*((struct_socket *) (*s_objet_argument_1)
-									.objet)).adresse_distante, (int)
-									((integer8 *) (*((struct_vecteur *)
-									(*(*l_element_courant).donnee).objet))
-									.tableau)[i]);
 						}
 						else
 						{
@@ -2016,6 +2009,59 @@ instruction_target(struct_processus *s_e
 							return;
 						}
 					}
+
+					sprintf((*((struct_socket *) (*s_objet_argument_1)
+							.objet)).adresse_distante,
+							"%02X%02X:%02X%02X:%02X%02X:%02X%02X:"
+							"%02X%02X:%02X%02X:%02X%02X:%02X%02X",
+							(int) ((integer8 *) (*((struct_vecteur *)
+							(*(*l_element_courant).donnee).objet))
+							.tableau)[0],
+							(int) ((integer8 *) (*((struct_vecteur *)
+							(*(*l_element_courant).donnee).objet))
+							.tableau)[1],
+							(int) ((integer8 *) (*((struct_vecteur *)
+							(*(*l_element_courant).donnee).objet))
+							.tableau)[2],
+							(int) ((integer8 *) (*((struct_vecteur *)
+							(*(*l_element_courant).donnee).objet))
+							.tableau)[3],
+							(int) ((integer8 *) (*((struct_vecteur *)
+							(*(*l_element_courant).donnee).objet))
+							.tableau)[4],
+							(int) ((integer8 *) (*((struct_vecteur *)
+							(*(*l_element_courant).donnee).objet))
+							.tableau)[5],
+							(int) ((integer8 *) (*((struct_vecteur *)
+							(*(*l_element_courant).donnee).objet))
+							.tableau)[6],
+							(int) ((integer8 *) (*((struct_vecteur *)
+							(*(*l_element_courant).donnee).objet))
+							.tableau)[7],
+							(int) ((integer8 *) (*((struct_vecteur *)
+							(*(*l_element_courant).donnee).objet))
+							.tableau)[8],
+							(int) ((integer8 *) (*((struct_vecteur *)
+							(*(*l_element_courant).donnee).objet))
+							.tableau)[9],
+							(int) ((integer8 *) (*((struct_vecteur *)
+							(*(*l_element_courant).donnee).objet))
+							.tableau)[10],
+							(int) ((integer8 *) (*((struct_vecteur *)
+							(*(*l_element_courant).donnee).objet))
+							.tableau)[11],
+							(int) ((integer8 *) (*((struct_vecteur *)
+							(*(*l_element_courant).donnee).objet))
+							.tableau)[12],
+							(int) ((integer8 *) (*((struct_vecteur *)
+							(*(*l_element_courant).donnee).objet))
+							.tableau)[13],
+							(int) ((integer8 *) (*((struct_vecteur *)
+							(*(*l_element_courant).donnee).objet))
+							.tableau)[14],
+							(int) ((integer8 *) (*((struct_vecteur *)
+							(*(*l_element_courant).donnee).objet))
+							.tableau)[15]);
 				}
 				else
 				{
@@ -2078,7 +2124,7 @@ instruction_target(struct_processus *s_e
 							.adresse_distante);
 
 					if (((*((struct_socket *) (*s_objet_argument_1)
-							.objet)).adresse_distante = malloc(22 *
+							.objet)).adresse_distante = malloc(23 *
 							sizeof(unsigned char))) == NULL)
 					{
 						(*s_etat_processus).erreur_systeme =
@@ -2130,7 +2176,7 @@ instruction_target(struct_processus *s_e
 					}
 
 					if (((*((struct_socket *) (*s_objet_argument_1)
-							.objet)).adresse_distante = malloc(55 *
+							.objet)).adresse_distante = malloc(47 *
 							sizeof(unsigned char))) == NULL)
 					{
 						(*s_etat_processus).erreur_systeme =
@@ -2138,20 +2184,42 @@ instruction_target(struct_processus *s_e
 						return;
 					}
 
-					(*((struct_socket *) (*s_objet_argument_1).objet))
-							.adresse_distante[0] = d_code_fin_chaine;
-
-					for(i = 0; i < 16; i++)
-					{
-						sprintf((*((struct_socket *) (*s_objet_argument_1)
-								.objet)).adresse_distante,
-								(i == 0) ? "%s%X" : "%s:%X",
-								(*((struct_socket *) (*s_objet_argument_1)
-								.objet)).adresse_distante,
-								(*((struct sockaddr_in6 *)
-								(*resolution_courante).ai_addr)).sin6_addr
-								.s6_addr[i]);
-					}
+					sprintf((*((struct_socket *) (*s_objet_argument_1)
+							.objet)).adresse_distante,
+							"%02X%02X:%02X%02X:%02X%02X:%02X%02X:"
+							"%02X%02X:%02X%02X:%02X%02X:%02X%02X",
+							(*((struct sockaddr_in6 *) (*resolution_courante)
+							.ai_addr)).sin6_addr.s6_addr[0],
+							(*((struct sockaddr_in6 *) (*resolution_courante)
+							.ai_addr)).sin6_addr.s6_addr[1],
+							(*((struct sockaddr_in6 *) (*resolution_courante)
+							.ai_addr)).sin6_addr.s6_addr[2],
+							(*((struct sockaddr_in6 *) (*resolution_courante)
+							.ai_addr)).sin6_addr.s6_addr[3],
+							(*((struct sockaddr_in6 *) (*resolution_courante)
+							.ai_addr)).sin6_addr.s6_addr[4],
+							(*((struct sockaddr_in6 *) (*resolution_courante)
+							.ai_addr)).sin6_addr.s6_addr[5],
+							(*((struct sockaddr_in6 *) (*resolution_courante)
+							.ai_addr)).sin6_addr.s6_addr[6],
+							(*((struct sockaddr_in6 *) (*resolution_courante)
+							.ai_addr)).sin6_addr.s6_addr[7],
+							(*((struct sockaddr_in6 *) (*resolution_courante)
+							.ai_addr)).sin6_addr.s6_addr[8],
+							(*((struct sockaddr_in6 *) (*resolution_courante)
+							.ai_addr)).sin6_addr.s6_addr[9],
+							(*((struct sockaddr_in6 *) (*resolution_courante)
+							.ai_addr)).sin6_addr.s6_addr[10],
+							(*((struct sockaddr_in6 *) (*resolution_courante)
+							.ai_addr)).sin6_addr.s6_addr[11],
+							(*((struct sockaddr_in6 *) (*resolution_courante)
+							.ai_addr)).sin6_addr.s6_addr[12],
+							(*((struct sockaddr_in6 *) (*resolution_courante)
+							.ai_addr)).sin6_addr.s6_addr[13],
+							(*((struct sockaddr_in6 *) (*resolution_courante)
+							.ai_addr)).sin6_addr.s6_addr[14],
+							(*((struct sockaddr_in6 *) (*resolution_courante)
+							.ai_addr)).sin6_addr.s6_addr[15]);
 #					else
 					if ((*s_etat_processus).langue == 'F')
 					{
@@ -2198,9 +2266,9 @@ instruction_target(struct_processus *s_e
 						.donnee).objet)) <= 65535))
 				{
 					sprintf((*((struct_socket *) (*s_objet_argument_1)
-							.objet)).adresse_distante, "%s(%u)",
-							(*((struct_socket *) (*s_objet_argument_1)
-							.objet)).adresse_distante, (unsigned int)
+							.objet)).adresse_distante +
+							strlen((*((struct_socket *) (*s_objet_argument_1)
+							.objet)).adresse_distante), "(%u)", (unsigned int)
 							(*((integer8 *) (*(*l_element_courant).donnee)
 							.objet)));
 				}