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
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
|
#include <stdio.h>
#include <dlfcn.h>
#include <stdint.h>
#include <stdlib.h>
int pcm_getcpu()
{
int id = -1;
asm volatile (
"rdtscp\n\t"
"mov %%ecx, %0\n\t":
"=r" (id) :: "%rax", "%rcx", "%rdx");
// processor ID is in ECX: https://www.felixcloutier.com/x86/rdtscp
// Linux encodes the NUMA node starting at bit 12, so remove the NUMA
// bits when returning the CPU integer by masking with 0xFFF.
return id & 0xFFF;
}
struct {
int (*pcm_c_build_core_event)(uint8_t id, const char * argv);
int (*pcm_c_init)();
void (*pcm_c_start)();
void (*pcm_c_stop)();
uint64_t (*pcm_c_get_cycles)(uint32_t core_id);
uint64_t (*pcm_c_get_instr)(uint32_t core_id);
uint64_t (*pcm_c_get_core_event)(uint32_t core_id, uint32_t event_id);
} PCM; // lgtm [cpp/short-global-name]
#ifndef PCM_DYNAMIC_LIB
/* Library functions declaration (instead of .h file) */
int pcm_c_build_core_event(uint8_t, const char *);
int pcm_c_init();
void pcm_c_start();
void pcm_c_stop();
uint64_t pcm_c_get_cycles(uint32_t);
uint64_t pcm_c_get_instr(uint32_t);
uint64_t pcm_c_get_core_event(uint32_t, uint32_t);
#endif
int main(int argc, const char *argv[])
{
int i,a[100],b[100],c[100];
uint32_t total = 0;
int lcore_id;
int numEvents = argc - 1;
/* Seed for predictable rand() results */
srand(0);
for (i=0; i < 100; ++i) {
a[i] = rand();
b[i] = rand();
c[i] = rand();
}
#ifdef PCM_DYNAMIC_LIB
void * handle = dlopen("libpcm.so", RTLD_LAZY);
if(!handle) {
printf("Abort: could not (dynamically) load shared library \n");
return -1;
}
PCM.pcm_c_build_core_event = (int (*)(uint8_t, const char *)) dlsym(handle, "pcm_c_build_core_event");
PCM.pcm_c_init = (int (*)()) dlsym(handle, "pcm_c_init");
PCM.pcm_c_start = (void (*)()) dlsym(handle, "pcm_c_start");
PCM.pcm_c_stop = (void (*)()) dlsym(handle, "pcm_c_stop");
PCM.pcm_c_get_cycles = (uint64_t (*)(uint32_t)) dlsym(handle, "pcm_c_get_cycles");
PCM.pcm_c_get_instr = (uint64_t (*)(uint32_t)) dlsym(handle, "pcm_c_get_instr");
PCM.pcm_c_get_core_event = (uint64_t (*)(uint32_t,uint32_t)) dlsym(handle, "pcm_c_get_core_event");
#else
PCM.pcm_c_build_core_event = pcm_c_build_core_event;
PCM.pcm_c_init = pcm_c_init;
PCM.pcm_c_start = pcm_c_start;
PCM.pcm_c_stop = pcm_c_stop;
PCM.pcm_c_get_cycles = pcm_c_get_cycles;
PCM.pcm_c_get_instr = pcm_c_get_instr;
PCM.pcm_c_get_core_event = pcm_c_get_core_event;
#endif
if(PCM.pcm_c_init == NULL || PCM.pcm_c_start == NULL || PCM.pcm_c_stop == NULL ||
PCM.pcm_c_get_cycles == NULL || PCM.pcm_c_get_instr == NULL ||
PCM.pcm_c_build_core_event == NULL || PCM.pcm_c_get_core_event == NULL)
return -1;
if (numEvents > 4)
{
printf("Number of arguments are too many! exit...\n");
return -2;
}
for (i = 0; i < numEvents; ++i)
{
PCM.pcm_c_build_core_event(i, argv[i+1]);
}
printf("[c_example] Initializing PCM measurements:\n");
PCM.pcm_c_init();
printf("[c_example] Calling PCM start()\n");
PCM.pcm_c_start();
for(i=0;i<10000;i++)
c[i%100] = 4 * a[i%100] + b[i%100];
for(i=0;i<100;i++)
total += c[i];
PCM.pcm_c_stop();
printf("[c_example] PCM measurement stopped, compute result %u\n", total);
lcore_id = pcm_getcpu();
printf("C:%llu I:%llu, IPC:%3.2f\n",
(unsigned long long)PCM.pcm_c_get_cycles(lcore_id),
(unsigned long long)PCM.pcm_c_get_instr(lcore_id),
(double)PCM.pcm_c_get_instr(lcore_id)/PCM.pcm_c_get_cycles(lcore_id));
printf("CPU%d E0: %llu, E1: %llu, E2: %llu, E3: %llu\n",
lcore_id,
(unsigned long long)PCM.pcm_c_get_core_event(lcore_id,0),
(unsigned long long)PCM.pcm_c_get_core_event(lcore_id,1),
(unsigned long long)PCM.pcm_c_get_core_event(lcore_id,2),
(unsigned long long)PCM.pcm_c_get_core_event(lcore_id,3));
return 0;
}
|
