Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Support
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
C
cpython
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Issues
0
Issues
0
List
Boards
Labels
Milestones
Merge Requests
0
Merge Requests
0
Analytics
Analytics
Repository
Value Stream
Wiki
Wiki
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Create a new issue
Commits
Issue Boards
Open sidebar
Kirill Smelkov
cpython
Commits
19517e4d
Commit
19517e4d
authored
Sep 18, 2016
by
Benjamin Peterson
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
replace obmalloc's homegrown uptr and uchar types with standard ones
parent
3924f937
Changes
1
Show whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
31 additions
and
42 deletions
+31
-42
Objects/obmalloc.c
Objects/obmalloc.c
+31
-42
No files found.
Objects/obmalloc.c
View file @
19517e4d
...
@@ -9,19 +9,9 @@ extern void _PyMem_DumpTraceback(int fd, const void *ptr);
...
@@ -9,19 +9,9 @@ extern void _PyMem_DumpTraceback(int fd, const void *ptr);
/* Python's malloc wrappers (see pymem.h) */
/* Python's malloc wrappers (see pymem.h) */
/*
* Basic types
* I don't care if these are defined in <sys/types.h> or elsewhere. Axiom.
*/
#undef uchar
#define uchar unsigned char
/* assuming == 8 bits */
#undef uint
#undef uint
#define uint unsigned int
/* assuming >= 16 bits */
#define uint unsigned int
/* assuming >= 16 bits */
#undef uptr
#define uptr uintptr_t
/* Forward declaration */
/* Forward declaration */
static
void
*
_PyMem_DebugRawMalloc
(
void
*
ctx
,
size_t
size
);
static
void
*
_PyMem_DebugRawMalloc
(
void
*
ctx
,
size_t
size
);
static
void
*
_PyMem_DebugRawCalloc
(
void
*
ctx
,
size_t
nelem
,
size_t
elsize
);
static
void
*
_PyMem_DebugRawCalloc
(
void
*
ctx
,
size_t
nelem
,
size_t
elsize
);
...
@@ -746,7 +736,7 @@ static int running_on_valgrind = -1;
...
@@ -746,7 +736,7 @@ static int running_on_valgrind = -1;
#define SIMPLELOCK_UNLOCK(lock)
/* release acquired lock */
#define SIMPLELOCK_UNLOCK(lock)
/* release acquired lock */
/* When you say memory, my mind reasons in terms of (pointers to) blocks */
/* When you say memory, my mind reasons in terms of (pointers to) blocks */
typedef
u
char
block
;
typedef
u
int8_t
block
;
/* Pool for small blocks. */
/* Pool for small blocks. */
struct
pool_header
{
struct
pool_header
{
...
@@ -770,7 +760,7 @@ struct arena_object {
...
@@ -770,7 +760,7 @@ struct arena_object {
* here to mark an arena_object that doesn't correspond to an
* here to mark an arena_object that doesn't correspond to an
* allocated arena.
* allocated arena.
*/
*/
u
ptr
address
;
u
inptr_t
address
;
/* Pool-aligned pointer to the next pool to be carved off. */
/* Pool-aligned pointer to the next pool to be carved off. */
block
*
pool_address
;
block
*
pool_address
;
...
@@ -921,7 +911,7 @@ on that C doesn't insert any padding anywhere in a pool_header at or before
...
@@ -921,7 +911,7 @@ on that C doesn't insert any padding anywhere in a pool_header at or before
the prevpool member.
the prevpool member.
**************************************************************************** */
**************************************************************************** */
#define PTA(x) ((poolp )((u
char
*)&(usedpools[2*(x)]) - 2*sizeof(block *)))
#define PTA(x) ((poolp )((u
int8_t
*)&(usedpools[2*(x)]) - 2*sizeof(block *)))
#define PT(x) PTA(x), PTA(x)
#define PT(x) PTA(x), PTA(x)
static
poolp
usedpools
[
2
*
((
NB_SMALL_SIZE_CLASSES
+
7
)
/
8
)
*
8
]
=
{
static
poolp
usedpools
[
2
*
((
NB_SMALL_SIZE_CLASSES
+
7
)
/
8
)
*
8
]
=
{
...
@@ -1101,7 +1091,7 @@ new_arena(void)
...
@@ -1101,7 +1091,7 @@ new_arena(void)
unused_arena_objects
=
arenaobj
;
unused_arena_objects
=
arenaobj
;
return
NULL
;
return
NULL
;
}
}
arenaobj
->
address
=
(
u
ptr
)
address
;
arenaobj
->
address
=
(
u
inptr_t
)
address
;
++
narenas_currently_allocated
;
++
narenas_currently_allocated
;
++
ntimes_arena_allocated
;
++
ntimes_arena_allocated
;
...
@@ -1208,7 +1198,7 @@ address_in_range(void *p, poolp pool)
...
@@ -1208,7 +1198,7 @@ address_in_range(void *p, poolp pool)
// only once.
// only once.
uint
arenaindex
=
*
((
volatile
uint
*
)
&
pool
->
arenaindex
);
uint
arenaindex
=
*
((
volatile
uint
*
)
&
pool
->
arenaindex
);
return
arenaindex
<
maxarenas
&&
return
arenaindex
<
maxarenas
&&
(
u
ptr
)
p
-
arenas
[
arenaindex
].
address
<
ARENA_SIZE
&&
(
u
inptr_t
)
p
-
arenas
[
arenaindex
].
address
<
ARENA_SIZE
&&
arenas
[
arenaindex
].
address
!=
0
;
arenas
[
arenaindex
].
address
!=
0
;
}
}
...
@@ -1796,7 +1786,7 @@ bumpserialno(void)
...
@@ -1796,7 +1786,7 @@ bumpserialno(void)
static
size_t
static
size_t
read_size_t
(
const
void
*
p
)
read_size_t
(
const
void
*
p
)
{
{
const
u
char
*
q
=
(
const
uchar
*
)
p
;
const
u
int8_t
*
q
=
(
const
uint8_t
*
)
p
;
size_t
result
=
*
q
++
;
size_t
result
=
*
q
++
;
int
i
;
int
i
;
...
@@ -1811,11 +1801,11 @@ read_size_t(const void *p)
...
@@ -1811,11 +1801,11 @@ read_size_t(const void *p)
static
void
static
void
write_size_t
(
void
*
p
,
size_t
n
)
write_size_t
(
void
*
p
,
size_t
n
)
{
{
u
char
*
q
=
(
uchar
*
)
p
+
SST
-
1
;
u
int8_t
*
q
=
(
uint8_t
*
)
p
+
SST
-
1
;
int
i
;
int
i
;
for
(
i
=
SST
;
--
i
>=
0
;
--
q
)
{
for
(
i
=
SST
;
--
i
>=
0
;
--
q
)
{
*
q
=
(
u
char
)(
n
&
0xff
);
*
q
=
(
u
int8_t
)(
n
&
0xff
);
n
>>=
8
;
n
>>=
8
;
}
}
}
}
...
@@ -1850,8 +1840,8 @@ static void *
...
@@ -1850,8 +1840,8 @@ static void *
_PyMem_DebugRawAlloc
(
int
use_calloc
,
void
*
ctx
,
size_t
nbytes
)
_PyMem_DebugRawAlloc
(
int
use_calloc
,
void
*
ctx
,
size_t
nbytes
)
{
{
debug_alloc_api_t
*
api
=
(
debug_alloc_api_t
*
)
ctx
;
debug_alloc_api_t
*
api
=
(
debug_alloc_api_t
*
)
ctx
;
u
char
*
p
;
/* base address of malloc'ed block */
u
int8_t
*
p
;
/* base address of malloc'ed block */
u
char
*
tail
;
/* p + 2*SST + nbytes == pointer to tail pad bytes */
u
int8_t
*
tail
;
/* p + 2*SST + nbytes == pointer to tail pad bytes */
size_t
total
;
/* nbytes + 4*SST */
size_t
total
;
/* nbytes + 4*SST */
bumpserialno
();
bumpserialno
();
...
@@ -1861,15 +1851,15 @@ _PyMem_DebugRawAlloc(int use_calloc, void *ctx, size_t nbytes)
...
@@ -1861,15 +1851,15 @@ _PyMem_DebugRawAlloc(int use_calloc, void *ctx, size_t nbytes)
return
NULL
;
return
NULL
;
if
(
use_calloc
)
if
(
use_calloc
)
p
=
(
u
char
*
)
api
->
alloc
.
calloc
(
api
->
alloc
.
ctx
,
1
,
total
);
p
=
(
u
int8_t
*
)
api
->
alloc
.
calloc
(
api
->
alloc
.
ctx
,
1
,
total
);
else
else
p
=
(
u
char
*
)
api
->
alloc
.
malloc
(
api
->
alloc
.
ctx
,
total
);
p
=
(
u
int8_t
*
)
api
->
alloc
.
malloc
(
api
->
alloc
.
ctx
,
total
);
if
(
p
==
NULL
)
if
(
p
==
NULL
)
return
NULL
;
return
NULL
;
/* at p, write size (SST bytes), id (1 byte), pad (SST-1 bytes) */
/* at p, write size (SST bytes), id (1 byte), pad (SST-1 bytes) */
write_size_t
(
p
,
nbytes
);
write_size_t
(
p
,
nbytes
);
p
[
SST
]
=
(
u
char
)
api
->
api_id
;
p
[
SST
]
=
(
u
int8_t
)
api
->
api_id
;
memset
(
p
+
SST
+
1
,
FORBIDDENBYTE
,
SST
-
1
);
memset
(
p
+
SST
+
1
,
FORBIDDENBYTE
,
SST
-
1
);
if
(
nbytes
>
0
&&
!
use_calloc
)
if
(
nbytes
>
0
&&
!
use_calloc
)
...
@@ -1907,7 +1897,7 @@ static void
...
@@ -1907,7 +1897,7 @@ static void
_PyMem_DebugRawFree
(
void
*
ctx
,
void
*
p
)
_PyMem_DebugRawFree
(
void
*
ctx
,
void
*
p
)
{
{
debug_alloc_api_t
*
api
=
(
debug_alloc_api_t
*
)
ctx
;
debug_alloc_api_t
*
api
=
(
debug_alloc_api_t
*
)
ctx
;
u
char
*
q
=
(
uchar
*
)
p
-
2
*
SST
;
/* address returned from malloc */
u
int8_t
*
q
=
(
uint8_t
*
)
p
-
2
*
SST
;
/* address returned from malloc */
size_t
nbytes
;
size_t
nbytes
;
if
(
p
==
NULL
)
if
(
p
==
NULL
)
...
@@ -1924,8 +1914,8 @@ static void *
...
@@ -1924,8 +1914,8 @@ static void *
_PyMem_DebugRawRealloc
(
void
*
ctx
,
void
*
p
,
size_t
nbytes
)
_PyMem_DebugRawRealloc
(
void
*
ctx
,
void
*
p
,
size_t
nbytes
)
{
{
debug_alloc_api_t
*
api
=
(
debug_alloc_api_t
*
)
ctx
;
debug_alloc_api_t
*
api
=
(
debug_alloc_api_t
*
)
ctx
;
u
char
*
q
=
(
uchar
*
)
p
,
*
oldq
;
u
int8_t
*
q
=
(
uint8_t
*
)
p
,
*
oldq
;
u
char
*
tail
;
u
int8_t
*
tail
;
size_t
total
;
/* nbytes + 4*SST */
size_t
total
;
/* nbytes + 4*SST */
size_t
original_nbytes
;
size_t
original_nbytes
;
int
i
;
int
i
;
...
@@ -1946,7 +1936,7 @@ _PyMem_DebugRawRealloc(void *ctx, void *p, size_t nbytes)
...
@@ -1946,7 +1936,7 @@ _PyMem_DebugRawRealloc(void *ctx, void *p, size_t nbytes)
* but we live with that.
* but we live with that.
*/
*/
oldq
=
q
;
oldq
=
q
;
q
=
(
u
char
*
)
api
->
alloc
.
realloc
(
api
->
alloc
.
ctx
,
q
-
2
*
SST
,
total
);
q
=
(
u
int8_t
*
)
api
->
alloc
.
realloc
(
api
->
alloc
.
ctx
,
q
-
2
*
SST
,
total
);
if
(
q
==
NULL
)
if
(
q
==
NULL
)
return
NULL
;
return
NULL
;
...
@@ -1956,7 +1946,7 @@ _PyMem_DebugRawRealloc(void *ctx, void *p, size_t nbytes)
...
@@ -1956,7 +1946,7 @@ _PyMem_DebugRawRealloc(void *ctx, void *p, size_t nbytes)
}
}
write_size_t
(
q
,
nbytes
);
write_size_t
(
q
,
nbytes
);
assert
(
q
[
SST
]
==
(
u
char
)
api
->
api_id
);
assert
(
q
[
SST
]
==
(
u
int8_t
)
api
->
api_id
);
for
(
i
=
1
;
i
<
SST
;
++
i
)
for
(
i
=
1
;
i
<
SST
;
++
i
)
assert
(
q
[
SST
+
i
]
==
FORBIDDENBYTE
);
assert
(
q
[
SST
+
i
]
==
FORBIDDENBYTE
);
q
+=
2
*
SST
;
q
+=
2
*
SST
;
...
@@ -2020,11 +2010,11 @@ _PyMem_DebugRealloc(void *ctx, void *ptr, size_t nbytes)
...
@@ -2020,11 +2010,11 @@ _PyMem_DebugRealloc(void *ctx, void *ptr, size_t nbytes)
static
void
static
void
_PyMem_DebugCheckAddress
(
char
api
,
const
void
*
p
)
_PyMem_DebugCheckAddress
(
char
api
,
const
void
*
p
)
{
{
const
u
char
*
q
=
(
const
uchar
*
)
p
;
const
u
int8_t
*
q
=
(
const
uint8_t
*
)
p
;
char
msgbuf
[
64
];
char
msgbuf
[
64
];
char
*
msg
;
char
*
msg
;
size_t
nbytes
;
size_t
nbytes
;
const
u
char
*
tail
;
const
u
int8_t
*
tail
;
int
i
;
int
i
;
char
id
;
char
id
;
...
@@ -2073,8 +2063,8 @@ error:
...
@@ -2073,8 +2063,8 @@ error:
static
void
static
void
_PyObject_DebugDumpAddress
(
const
void
*
p
)
_PyObject_DebugDumpAddress
(
const
void
*
p
)
{
{
const
u
char
*
q
=
(
const
uchar
*
)
p
;
const
u
int8_t
*
q
=
(
const
uint8_t
*
)
p
;
const
u
char
*
tail
;
const
u
int8_t
*
tail
;
size_t
nbytes
,
serial
;
size_t
nbytes
,
serial
;
int
i
;
int
i
;
int
ok
;
int
ok
;
...
@@ -2107,7 +2097,7 @@ _PyObject_DebugDumpAddress(const void *p)
...
@@ -2107,7 +2097,7 @@ _PyObject_DebugDumpAddress(const void *p)
fprintf
(
stderr
,
"not all FORBIDDENBYTE (0x%02x):
\n
"
,
fprintf
(
stderr
,
"not all FORBIDDENBYTE (0x%02x):
\n
"
,
FORBIDDENBYTE
);
FORBIDDENBYTE
);
for
(
i
=
SST
-
1
;
i
>=
1
;
--
i
)
{
for
(
i
=
SST
-
1
;
i
>=
1
;
--
i
)
{
const
u
char
byte
=
*
(
q
-
i
);
const
u
int8_t
byte
=
*
(
q
-
i
);
fprintf
(
stderr
,
" at p-%d: 0x%02x"
,
i
,
byte
);
fprintf
(
stderr
,
" at p-%d: 0x%02x"
,
i
,
byte
);
if
(
byte
!=
FORBIDDENBYTE
)
if
(
byte
!=
FORBIDDENBYTE
)
fputs
(
" *** OUCH"
,
stderr
);
fputs
(
" *** OUCH"
,
stderr
);
...
@@ -2135,7 +2125,7 @@ _PyObject_DebugDumpAddress(const void *p)
...
@@ -2135,7 +2125,7 @@ _PyObject_DebugDumpAddress(const void *p)
fprintf
(
stderr
,
"not all FORBIDDENBYTE (0x%02x):
\n
"
,
fprintf
(
stderr
,
"not all FORBIDDENBYTE (0x%02x):
\n
"
,
FORBIDDENBYTE
);
FORBIDDENBYTE
);
for
(
i
=
0
;
i
<
SST
;
++
i
)
{
for
(
i
=
0
;
i
<
SST
;
++
i
)
{
const
u
char
byte
=
tail
[
i
];
const
u
int8_t
byte
=
tail
[
i
];
fprintf
(
stderr
,
" at tail+%d: 0x%02x"
,
fprintf
(
stderr
,
" at tail+%d: 0x%02x"
,
i
,
byte
);
i
,
byte
);
if
(
byte
!=
FORBIDDENBYTE
)
if
(
byte
!=
FORBIDDENBYTE
)
...
@@ -2297,26 +2287,25 @@ _PyObject_DebugMallocStats(FILE *out)
...
@@ -2297,26 +2287,25 @@ _PyObject_DebugMallocStats(FILE *out)
*/
*/
for
(
i
=
0
;
i
<
maxarenas
;
++
i
)
{
for
(
i
=
0
;
i
<
maxarenas
;
++
i
)
{
uint
j
;
uint
j
;
u
ptr
base
=
arenas
[
i
].
address
;
u
inptr_t
base
=
arenas
[
i
].
address
;
/* Skip arenas which are not allocated. */
/* Skip arenas which are not allocated. */
if
(
arenas
[
i
].
address
==
(
u
ptr
)
NULL
)
if
(
arenas
[
i
].
address
==
(
u
inptr_t
)
NULL
)
continue
;
continue
;
narenas
+=
1
;
narenas
+=
1
;
numfreepools
+=
arenas
[
i
].
nfreepools
;
numfreepools
+=
arenas
[
i
].
nfreepools
;
/* round up to pool alignment */
/* round up to pool alignment */
if
(
base
&
(
u
ptr
)
POOL_SIZE_MASK
)
{
if
(
base
&
(
u
inptr_t
)
POOL_SIZE_MASK
)
{
arena_alignment
+=
POOL_SIZE
;
arena_alignment
+=
POOL_SIZE
;
base
&=
~
(
u
ptr
)
POOL_SIZE_MASK
;
base
&=
~
(
u
inptr_t
)
POOL_SIZE_MASK
;
base
+=
POOL_SIZE
;
base
+=
POOL_SIZE
;
}
}
/* visit every pool in the arena */
/* visit every pool in the arena */
assert
(
base
<=
(
uptr
)
arenas
[
i
].
pool_address
);
assert
(
base
<=
(
uinptr_t
)
arenas
[
i
].
pool_address
);
for
(
j
=
0
;
for
(
j
=
0
;
base
<
(
uinptr_t
)
arenas
[
i
].
pool_address
;
base
<
(
uptr
)
arenas
[
i
].
pool_address
;
++
j
,
base
+=
POOL_SIZE
)
{
++
j
,
base
+=
POOL_SIZE
)
{
poolp
p
=
(
poolp
)
base
;
poolp
p
=
(
poolp
)
base
;
const
uint
sz
=
p
->
szidx
;
const
uint
sz
=
p
->
szidx
;
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment