version 1.140, 2018/12/21 13:36:38
|
version 1.154, 2025/04/15 10:17:51
|
Line 1
|
Line 1
|
/* |
/* |
================================================================================ |
================================================================================ |
RPL/2 (R) version 4.1.29 |
RPL/2 (R) version 4.1.36 |
Copyright (C) 1989-2018 Dr. BERTRAND Joël |
Copyright (C) 1989-2025 Dr. BERTRAND Joël |
|
|
This file is part of RPL/2. |
This file is part of RPL/2. |
|
|
Line 635 allocation(struct_processus *s_etat_proc
|
Line 635 allocation(struct_processus *s_etat_proc
|
} |
} |
else |
else |
{ |
{ |
if (((*s_objet).objet = malloc(2 * sizeof(struct_objet *))) |
if (((*s_objet).objet = malloc(sizeof(struct_record))) |
== NULL) |
== NULL) |
{ |
{ |
(*s_etat_processus).erreur_systeme = |
(*s_etat_processus).erreur_systeme = |
Line 3074 copie_etat_processus(struct_processus *s
|
Line 3074 copie_etat_processus(struct_processus *s
|
return(NULL); |
return(NULL); |
} |
} |
|
|
|
|
|
if (pthread_mutex_lock(&((*s_etat_processus).mutex_interruptions)) != 0) |
|
{ |
|
(*s_etat_processus).erreur_systeme = d_es_processus; |
|
return(NULL); |
|
} |
|
|
|
if (pthread_mutex_lock(&((*s_etat_processus).mutex_signaux)) != 0) |
|
{ |
|
(*s_etat_processus).erreur_systeme = d_es_processus; |
|
return(NULL); |
|
} |
|
|
(*s_nouvel_etat_processus) = (*s_etat_processus); |
(*s_nouvel_etat_processus) = (*s_etat_processus); |
|
|
|
if (pthread_mutex_unlock(&((*s_etat_processus).mutex_signaux)) != 0) |
|
{ |
|
(*s_etat_processus).erreur_systeme = d_es_processus; |
|
return(NULL); |
|
} |
|
|
|
if (pthread_mutex_unlock(&((*s_etat_processus).mutex_interruptions)) != 0) |
|
{ |
|
(*s_etat_processus).erreur_systeme = d_es_processus; |
|
return(NULL); |
|
} |
|
|
// On réinitialise les allocateurs. |
// On réinitialise les allocateurs. |
|
|
pthread_mutexattr_init(&attributs_mutex); |
pthread_mutexattr_init(&attributs_mutex); |
Line 3941 debug_memoire_ajout(size_t taille, const
|
Line 3966 debug_memoire_ajout(size_t taille, const
|
sizeof(unsigned char))) == NULL) |
sizeof(unsigned char))) == NULL) |
{ |
{ |
pthread_mutex_unlock(&mutex_allocation); |
pthread_mutex_unlock(&mutex_allocation); |
|
|
|
uprintf("[%d-%llu] ILLEGAL POINTER (malloc) $%016X\n", |
|
getpid(), (unsigned long long) pthread_self(), NULL); |
|
# ifdef __BACKTRACE |
|
BACKTRACE(PROFONDEUR_PILE); |
|
# endif |
|
|
return(NULL); |
return(NULL); |
} |
} |
|
|
Line 4001 debug_memoire_modification(void *pointeu
|
Line 4033 debug_memoire_modification(void *pointeu
|
{ |
{ |
pthread_mutex_unlock(&mutex_allocation); |
pthread_mutex_unlock(&mutex_allocation); |
|
|
uprintf("[%d-%llu] ILLEGAL POINTER (realloc)\n", |
uprintf("[%d-%llu] ILLEGAL POINTER (realloc) $%016X\n", |
getpid(), (unsigned long long) pthread_self()); |
getpid(), (unsigned long long) pthread_self(), |
|
pointeur); |
# ifdef __BACKTRACE |
# ifdef __BACKTRACE |
BACKTRACE(PROFONDEUR_PILE); |
BACKTRACE(PROFONDEUR_PILE); |
# endif |
# endif |
Line 4098 debug_memoire_retrait(void *pointeur)
|
Line 4131 debug_memoire_retrait(void *pointeur)
|
|
|
if (element_courant == NULL) |
if (element_courant == NULL) |
{ |
{ |
uprintf("[%d-%llu] ILLEGAL POINTER (free)\n", |
uprintf("[%d-%llu] ILLEGAL POINTER (free) $%016X\n", |
getpid(), (unsigned long long) pthread_self()); |
getpid(), (unsigned long long) pthread_self(), pointeur); |
# ifdef __BACKTRACE |
# ifdef __BACKTRACE |
BACKTRACE(PROFONDEUR_PILE); |
BACKTRACE(PROFONDEUR_PILE); |
# endif |
# endif |
Line 4216 debug_memoire_verification()
|
Line 4249 debug_memoire_verification()
|
} |
} |
|
|
pid_t |
pid_t |
debug_fork() |
debug_fork(struct_processus *s_etat_processus) |
{ |
{ |
pid_t pid; |
pid_t pid; |
|
|