rpl/src/instructions_d5.c - diff

Return to instructions_d5.c CVS log

Up to [local] / rpl / src

Diff for /rpl/src/instructions_d5.c between versions 1.174 and 1.180

version 1.174, 2021/03/13 12:50:42	version 1.180, 2024/01/09 07:33:50
Line 1	Line 1
/*	/*
================================================================================	================================================================================
RPL/2 (R) version 4.1.33	RPL/2 (R) version 4.1.35
Copyright (C) 1989-2021 Dr. BERTRAND Joël	Copyright (C) 1989-2024 Dr. BERTRAND Joël

This file is part of RPL/2.	This file is part of RPL/2.

Line 1823 instruction_detach(struct_processus *s_e	Line 1823 instruction_detach(struct_processus *s_e
{	{
l_element_suivant = (*l_element_courant).suivant;	l_element_suivant = (*l_element_courant).suivant;

	// On ne détruit pas le descripteur sous prétexte
	// d'avoir le fichier ou la socket fermée dans le processus père

	/*
fclose((((struct_descripteur_fichier )	fclose((((struct_descripteur_fichier )
(*l_element_courant).donnee)).descripteur_c);	(*l_element_courant).donnee)).descripteur_c);

Line 1832 instruction_detach(struct_processus *s_e	Line 1836 instruction_detach(struct_processus *s_e
sqlite3_close((((struct_descripteur_fichier )	sqlite3_close((((struct_descripteur_fichier )
(*l_element_courant).donnee)).descripteur_sqlite);	(*l_element_courant).donnee)).descripteur_sqlite);
}	}
	*/

free((((struct_descripteur_fichier ) (*l_element_courant)	free((((struct_descripteur_fichier ) (*l_element_courant)
.donnee)).nom);	.donnee)).nom);
Line 2444 instruction_detach(struct_processus *s_e	Line 2449 instruction_detach(struct_processus *s_e
{	{
l_element_suivant = (*l_element_courant).suivant;	l_element_suivant = (*l_element_courant).suivant;

if ((((struct_socket ) ((l_element_courant).donnee)
.objet)).socket_connectee == d_vrai)
{
shutdown((((struct_socket ) ((l_element_courant).donnee)
.objet)).socket, SHUT_RDWR);
}

close((((struct_socket ) ((l_element_courant).donnee)
.objet)).socket);

if (((((struct_socket ) ((l_element_courant).donnee).objet))	if (((((struct_socket ) ((l_element_courant).donnee).objet))
.pid == getpid()) && (pthread_equal((((struct_socket )	.pid == getpid()) && (pthread_equal((((struct_socket )
((l_element_courant).donnee).objet)).tid, pthread_self())	((l_element_courant).donnee).objet)).tid, pthread_self())
!= 0))	!= 0))
{	{
	if ((((struct_socket ) ((l_element_courant).donnee)
	.objet)).socket_connectee == d_vrai)
	{
	shutdown((((struct_socket ) ((l_element_courant).donnee)
	.objet)).socket, SHUT_RDWR);
	}

	close((((struct_socket ) ((l_element_courant).donnee)
	.objet)).socket);

if ((((struct_socket ) ((l_element_courant).donnee).objet))	if ((((struct_socket ) ((l_element_courant).donnee).objet))
.effacement == 'Y')	.effacement == 'Y')
{	{

CVSweb interface <joel.bertrand@systella.fr>

Removed from v.1.174
changed lines
	Added in v.1.180