1// SPDX-License-Identifier: GPL-2.0
2#include <string.h>
3#include <stdlib.h>
4#include <stdio.h>
5#include <perf/cpumap.h>
6#include "cpumap.h"
7#include "tests.h"
8#include "session.h"
9#include "evlist.h"
10#include "debug.h"
11#include <linux/err.h>
12
13#define TEMPL "/tmp/perf-test-XXXXXX"
14#define DATA_SIZE	10
15
16static int get_temp(char *path)
17{
18	int fd;
19
20	strcpy(path, TEMPL);
21
22	fd = mkstemp(path);
23	if (fd < 0) {
24		perror("mkstemp failed");
25		return -1;
26	}
27
28	close(fd);
29	return 0;
30}
31
32static int session_write_header(char *path)
33{
34	struct perf_session *session;
35	struct perf_data data = {
36		.path = path,
37		.mode = PERF_DATA_MODE_WRITE,
38	};
39
40	session = perf_session__new(&data, false, NULL);
41	TEST_ASSERT_VAL("can't get session", !IS_ERR(session));
42
43	session->evlist = perf_evlist__new_default();
44	TEST_ASSERT_VAL("can't get evlist", session->evlist);
45
46	perf_header__set_feat(&session->header, HEADER_CPU_TOPOLOGY);
47	perf_header__set_feat(&session->header, HEADER_NRCPUS);
48	perf_header__set_feat(&session->header, HEADER_ARCH);
49
50	session->header.data_size += DATA_SIZE;
51
52	TEST_ASSERT_VAL("failed to write header",
53			!perf_session__write_header(session, session->evlist, data.file.fd, true));
54
55	evlist__delete(session->evlist);
56	perf_session__delete(session);
57
58	return 0;
59}
60
61static int check_cpu_topology(char *path, struct perf_cpu_map *map)
62{
63	struct perf_session *session;
64	struct perf_data data = {
65		.path = path,
66		.mode = PERF_DATA_MODE_READ,
67	};
68	int i;
69
70	session = perf_session__new(&data, false, NULL);
71	TEST_ASSERT_VAL("can't get session", !IS_ERR(session));
72
73	/* On platforms with large numbers of CPUs process_cpu_topology()
74	 * might issue an error while reading the perf.data file section
75	 * HEADER_CPU_TOPOLOGY and the cpu_topology_map pointed to by member
76	 * cpu is a NULL pointer.
77	 * Example: On s390
78	 *   CPU 0 is on core_id 0 and physical_package_id 6
79	 *   CPU 1 is on core_id 1 and physical_package_id 3
80	 *
81	 *   Core_id and physical_package_id are platform and architecture
82	 *   dependend and might have higher numbers than the CPU id.
83	 *   This actually depends on the configuration.
84	 *
85	 *  In this case process_cpu_topology() prints error message:
86	 *  "socket_id number is too big. You may need to upgrade the
87	 *  perf tool."
88	 *
89	 *  This is the reason why this test might be skipped.
90	 */
91	if (!session->header.env.cpu)
92		return TEST_SKIP;
93
94	for (i = 0; i < session->header.env.nr_cpus_avail; i++) {
95		if (!cpu_map__has(map, i))
96			continue;
97		pr_debug("CPU %d, core %d, socket %d\n", i,
98			 session->header.env.cpu[i].core_id,
99			 session->header.env.cpu[i].socket_id);
100	}
101
102	for (i = 0; i < map->nr; i++) {
103		TEST_ASSERT_VAL("Core ID doesn't match",
104			(session->header.env.cpu[map->map[i]].core_id == (cpu_map__get_core(map, i, NULL) & 0xffff)));
105
106		TEST_ASSERT_VAL("Socket ID doesn't match",
107			(session->header.env.cpu[map->map[i]].socket_id == cpu_map__get_socket(map, i, NULL)));
108	}
109
110	perf_session__delete(session);
111
112	return 0;
113}
114
115int test__session_topology(struct test *test __maybe_unused, int subtest __maybe_unused)
116{
117	char path[PATH_MAX];
118	struct perf_cpu_map *map;
119	int ret = TEST_FAIL;
120
121	TEST_ASSERT_VAL("can't get templ file", !get_temp(path));
122
123	pr_debug("templ file: %s\n", path);
124
125	if (session_write_header(path))
126		goto free_path;
127
128	map = perf_cpu_map__new(NULL);
129	if (map == NULL) {
130		pr_debug("failed to get system cpumap\n");
131		goto free_path;
132	}
133
134	ret = check_cpu_topology(path, map);
135	perf_cpu_map__put(map);
136
137free_path:
138	unlink(path);
139	return ret;
140}
141