1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
|
/*
* Oracle Linux DTrace.
* Copyright (c) 2005, 2019, Oracle and/or its affiliates. All rights reserved.
* Licensed under the Universal Permissive License v 1.0 as shown at
* http://oss.oracle.com/licenses/upl.
*/
#ifndef _DT_AS_H
#define _DT_AS_H
#include <sys/types.h>
#include <sys/dtrace_types.h>
#include <linux/bpf.h>
#ifdef __cplusplus
extern "C" {
#endif
typedef struct dt_irnode {
uint_t di_label; /* label number or DT_LBL_NONE */
struct bpf_insn di_instr; /* instruction opcode */
void *di_extern; /* opcode-specific external reference */
struct dt_irnode *di_next; /* next instruction */
} dt_irnode_t;
#define DT_LBL_NONE 0 /* no label on this instruction */
typedef struct dt_irlist {
dt_irnode_t *dl_list; /* pointer to first node in list */
dt_irnode_t *dl_last; /* pointer to last node in list */
uint_t dl_len; /* number of valid instructions */
uint_t dl_label; /* next label number to assign */
} dt_irlist_t;
extern void dt_irlist_create(dt_irlist_t *);
extern void dt_irlist_destroy(dt_irlist_t *);
extern void dt_irlist_append(dt_irlist_t *, dt_irnode_t *);
extern uint_t dt_irlist_label(dt_irlist_t *);
#define emitle(dlp, lbl, instr, idp) \
({ \
dt_irnode_t *dip = dt_cg_node_alloc((lbl), (instr)); \
dt_irlist_append((dlp), dip); \
if (idp != NULL) \
dip->di_extern = (idp); \
dip; \
})
#define emite(dlp, instr, idp) emitle((dlp), DT_LBL_NONE, (instr), (idp))
#define emitl(dlp, lbl, instr) emitle((dlp), (lbl), (instr), NULL)
#define emit(dlp, instr) emitle((dlp), DT_LBL_NONE, (instr), NULL)
#ifdef __cplusplus
}
#endif
#endif /* _DT_AS_H */
|
