mirror of
https://github.com/Zenithsiz/ftmemsim-valgrind.git
synced 2026-02-03 18:13:01 +00:00
461cc5c003
Sync VEX/LICENSE.GPL with top-level COPYING file. We used 3 different addresses for writing to the FSF to receive a copy of the GPL. Replace all different variants with an URL <http://www.gnu.org/licenses/>. The following files might still have some slightly different (L)GPL copyright notice because they were derived from other programs: - files under coregrind/m_demangle which come from libiberty: cplus-dem.c, d-demangle.c, demangle.h, rust-demangle.c, safe-ctype.c and safe-ctype.h - coregrind/m_demangle/dyn-string.[hc] derived from GCC. - coregrind/m_demangle/ansidecl.h derived from glibc. - VEX files for FMA detived from glibc: host_generic_maddf.h and host_generic_maddf.c - files under coregrin/m_debuginfo derived from LZO: lzoconf.h, lzodefs.h, minilzo-inl.c and minilzo.h - files under coregrind/m_gdbserver detived from GDB: gdb/signals.h, inferiors.c, regcache.c, regcache.h, regdef.h, remote-utils.c, server.c, server.h, signals.c, target.c, target.h and utils.c Plus the following test files: - none/tests/ppc32/testVMX.c derived from testVMX. - ppc tests derived from QEMU: jm-insns.c, ppc64_helpers.h and test_isa_3_0.c - tests derived from bzip2 (with embedded GPL text in code): hackedbz2.c, origin5-bz2.c, varinfo6.c - tests detived from glibc: str_tester.c, pth_atfork1.c - test detived from GCC libgomp: tc17_sembar.c - performance tests derived from bzip2 or tinycc (with embedded GPL text in code): bz2.c, test_input_for_tinycc.c and tinycc.c
122 lines
3.7 KiB
C
122 lines
3.7 KiB
C
|
|
/*--------------------------------------------------------------------*/
|
|
/*--- Definitions for Locks and Threads. ---*/
|
|
/*--- hg_lock_n_thread.c ---*/
|
|
/*--------------------------------------------------------------------*/
|
|
|
|
/*
|
|
This file is part of Helgrind, a Valgrind tool for detecting errors
|
|
in threaded programs.
|
|
|
|
Copyright (C) 2007-2017 OpenWorks Ltd
|
|
info@open-works.co.uk
|
|
|
|
This program is free software; you can redistribute it and/or
|
|
modify it under the terms of the GNU General Public License as
|
|
published by the Free Software Foundation; either version 2 of the
|
|
License, or (at your option) any later version.
|
|
|
|
This program is distributed in the hope that it will be useful, but
|
|
WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program; if not, see <http://www.gnu.org/licenses/>.
|
|
|
|
The GNU General Public License is contained in the file COPYING.
|
|
*/
|
|
|
|
#include "pub_tool_basics.h"
|
|
#include "pub_tool_libcbase.h"
|
|
#include "pub_tool_libcassert.h"
|
|
#include "pub_tool_execontext.h"
|
|
#include "pub_tool_threadstate.h"
|
|
#include "pub_tool_wordfm.h"
|
|
|
|
#include "hg_basics.h"
|
|
#include "hg_wordset.h"
|
|
#include "hg_lock_n_thread.h" /* self */
|
|
|
|
|
|
/*----------------------------------------------------------------*/
|
|
/*--- Sanity checking ---*/
|
|
/*----------------------------------------------------------------*/
|
|
|
|
inline Bool HG_(is_sane_Thread) ( Thread* thr ) {
|
|
return thr != NULL && thr->magic == Thread_MAGIC;
|
|
}
|
|
|
|
static Bool is_sane_Bag_of_Threads ( WordBag* bag )
|
|
{
|
|
Thread* thr;
|
|
UWord count;
|
|
VG_(initIterBag)( bag );
|
|
while (VG_(nextIterBag)( bag, (UWord*)&thr, &count )) {
|
|
if (count < 1) return False;
|
|
if (!HG_(is_sane_Thread)(thr)) return False;
|
|
}
|
|
VG_(doneIterBag)( bag );
|
|
return True;
|
|
}
|
|
|
|
static Bool is_sane_Lock_BASE ( Lock* lock )
|
|
{
|
|
if (lock == NULL
|
|
|| (lock->magic != LockN_MAGIC && lock->magic != LockP_MAGIC))
|
|
return False;
|
|
switch (lock->kind) {
|
|
case LK_mbRec: case LK_nonRec: case LK_rdwr: break;
|
|
default: return False;
|
|
}
|
|
if (lock->heldBy == NULL) {
|
|
if (lock->acquired_at != NULL) return False;
|
|
/* Unheld. We arbitrarily require heldW to be False. */
|
|
return !lock->heldW;
|
|
} else {
|
|
if (lock->acquired_at == NULL) return False;
|
|
}
|
|
|
|
/* If heldBy is non-NULL, we require it to contain at least one
|
|
thread. */
|
|
if (VG_(isEmptyBag)(lock->heldBy))
|
|
return False;
|
|
|
|
/* Lock is either r- or w-held. */
|
|
if (!is_sane_Bag_of_Threads(lock->heldBy))
|
|
return False;
|
|
if (lock->heldW) {
|
|
/* Held in write-mode */
|
|
if ((lock->kind == LK_nonRec || lock->kind == LK_rdwr)
|
|
&& !VG_(isSingletonTotalBag)(lock->heldBy))
|
|
return False;
|
|
} else {
|
|
/* Held in read-mode */
|
|
if (lock->kind != LK_rdwr) return False;
|
|
}
|
|
return True;
|
|
}
|
|
|
|
Bool HG_(is_sane_LockP) ( Lock* lock ) {
|
|
return lock != NULL
|
|
&& lock->magic == LockP_MAGIC
|
|
&& lock->hbso == NULL
|
|
&& is_sane_Lock_BASE(lock);
|
|
}
|
|
|
|
Bool HG_(is_sane_LockN) ( Lock* lock ) {
|
|
return lock != NULL
|
|
&& lock->magic == LockN_MAGIC
|
|
&& lock->hbso != NULL
|
|
&& is_sane_Lock_BASE(lock);
|
|
}
|
|
|
|
Bool HG_(is_sane_LockNorP) ( Lock* lock ) {
|
|
return is_sane_Lock_BASE(lock);
|
|
}
|
|
|
|
|
|
/*--------------------------------------------------------------------*/
|
|
/*--- end hg_lock_n_thread.c ---*/
|
|
/*--------------------------------------------------------------------*/
|