Mercurial

comparison third_party/luajit/src/lj_vmevent.h @ 178:94705b5986b3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[ThirdParty] Added WRK and luajit for load testing.
author MrJuneJune <me@mrjunejune.com>
date Thu, 22 Jan 2026 20:10:30 -0800
parents
children
comparison
equal deleted inserted replaced
177:24fe8ff94056 178:94705b5986b3
1 /*
2 ** VM event handling.
3 ** Copyright (C) 2005-2023 Mike Pall. See Copyright Notice in luajit.h
4 */
5
6 #ifndef _LJ_VMEVENT_H
7 #define _LJ_VMEVENT_H
8
9 #include "lj_obj.h"
10
11 /* Registry key for VM event handler table. */
12 #define LJ_VMEVENTS_REGKEY "_VMEVENTS"
13 #define LJ_VMEVENTS_HSIZE 4
14
15 #define VMEVENT_MASK(ev) ((uint8_t)1 << ((int)(ev) & 7))
16 #define VMEVENT_HASH(ev) ((int)(ev) & ~7)
17 #define VMEVENT_HASHIDX(h) ((int)(h) << 3)
18 #define VMEVENT_NOCACHE 255
19
20 #define VMEVENT_DEF(name, hash) \
21 LJ_VMEVENT_##name##_, \
22 LJ_VMEVENT_##name = ((LJ_VMEVENT_##name##_) & 7)|((hash) << 3)
23
24 /* VM event IDs. */
25 typedef enum {
26 VMEVENT_DEF(BC, 0x00003883),
27 VMEVENT_DEF(TRACE, 0x12d91467),
28 VMEVENT_DEF(RECORD, 0x1284bf4f),
29 VMEVENT_DEF(TEXIT, 0x129df2b0),
30 VMEVENT_DEF(ERRFIN, 0x12d93888),
31 LJ_VMEVENT__MAX
32 } VMEvent;
33
34 #ifdef LUAJIT_DISABLE_VMEVENT
35 #define lj_vmevent_send(L, ev, args) UNUSED(L)
36 #define lj_vmevent_send_(L, ev, args, post) UNUSED(L)
37 #else
38 #define lj_vmevent_send(L, ev, args) \
39 if (G(L)->vmevmask & VMEVENT_MASK(LJ_VMEVENT_##ev)) { \
40 ptrdiff_t argbase = lj_vmevent_prepare(L, LJ_VMEVENT_##ev); \
41 if (argbase) { \
42 args \
43 lj_vmevent_call(L, argbase); \
44 } \
45 }
46 #define lj_vmevent_send_(L, ev, args, post) \
47 if (G(L)->vmevmask & VMEVENT_MASK(LJ_VMEVENT_##ev)) { \
48 ptrdiff_t argbase = lj_vmevent_prepare(L, LJ_VMEVENT_##ev); \
49 if (argbase) { \
50 args \
51 lj_vmevent_call(L, argbase); \
52 post \
53 } \
54 }
55
56 LJ_FUNC ptrdiff_t lj_vmevent_prepare(lua_State *L, VMEvent ev);
57 LJ_FUNC void lj_vmevent_call(lua_State *L, ptrdiff_t argbase);
58 #endif
59
60 #endif