xref: /linux/tools/testing/selftests/ir/ir_loopback.c (revision e907bf3c9820c8480b1d83aca42a5668c5364be9)
1 // SPDX-License-Identifier: GPL-2.0
2 // test ir decoder
3 //
4 // Copyright (C) 2018 Sean Young <sean@mess.org>
5 
6 // When sending LIRC_MODE_SCANCODE, the IR will be encoded. rc-loopback
7 // will send this IR to the receiver side, where we try to read the decoded
8 // IR. Decoding happens in a separate kernel thread, so we will need to
9 // wait until that is scheduled, hence we use poll to check for read
10 // readiness.
11 
12 #include <linux/lirc.h>
13 #include <errno.h>
14 #include <stdio.h>
15 #include <stdlib.h>
16 #include <stdbool.h>
17 #include <string.h>
18 #include <unistd.h>
19 #include <poll.h>
20 #include <time.h>
21 #include <sys/types.h>
22 #include <sys/ioctl.h>
23 #include <dirent.h>
24 #include <sys/stat.h>
25 #include <fcntl.h>
26 #include "../kselftest.h"
27 
28 #define TEST_SCANCODES	10
29 #define ARRAY_SIZE(arr) (sizeof(arr) / sizeof((arr)[0]))
30 
31 static const struct {
32 	enum rc_proto proto;
33 	const char *name;
34 	unsigned int mask;
35 	const char *decoder;
36 } protocols[] = {
37 	{ RC_PROTO_RC5, "rc-5", 0x1f7f, "rc-5" },
38 	{ RC_PROTO_RC5X_20, "rc-5x-20", 0x1f7f3f, "rc-5" },
39 	{ RC_PROTO_RC5_SZ, "rc-5-sz", 0x2fff, "rc-5-sz" },
40 	{ RC_PROTO_JVC, "jvc", 0xffff, "jvc" },
41 	{ RC_PROTO_SONY12, "sony-12", 0x1f007f, "sony" },
42 	{ RC_PROTO_SONY15, "sony-15", 0xff007f, "sony" },
43 	{ RC_PROTO_SONY20, "sony-20", 0x1fff7f, "sony" },
44 	{ RC_PROTO_NEC, "nec", 0xffff, "nec" },
45 	{ RC_PROTO_NECX, "nec-x", 0xffffff, "nec" },
46 	{ RC_PROTO_NEC32, "nec-32", 0xffffffff, "nec" },
47 	{ RC_PROTO_SANYO, "sanyo", 0x1fffff, "sanyo" },
48 	{ RC_PROTO_RC6_0, "rc-6-0", 0xffff, "rc-6" },
49 	{ RC_PROTO_RC6_6A_20, "rc-6-6a-20", 0xfffff, "rc-6" },
50 	{ RC_PROTO_RC6_6A_24, "rc-6-6a-24", 0xffffff, "rc-6" },
51 	{ RC_PROTO_RC6_6A_32, "rc-6-6a-32", 0xffffffff, "rc-6" },
52 	{ RC_PROTO_RC6_MCE, "rc-6-mce", 0x00007fff, "rc-6" },
53 	{ RC_PROTO_SHARP, "sharp", 0x1fff, "sharp" },
54 	{ RC_PROTO_IMON, "imon", 0x7fffffff, "imon" },
55 	{ RC_PROTO_RCMM12, "rcmm-12", 0x00000fff, "rcmm" },
56 	{ RC_PROTO_RCMM24, "rcmm-24", 0x00ffffff, "rcmm" },
57 	{ RC_PROTO_RCMM32, "rcmm-32", 0xffffffff, "rcmm" },
58 };
59 
60 int lirc_open(const char *rc)
61 {
62 	struct dirent *dent;
63 	char buf[100];
64 	DIR *d;
65 	int fd;
66 
67 	snprintf(buf, sizeof(buf), "/sys/class/rc/%s", rc);
68 
69 	d = opendir(buf);
70 	if (!d)
71 		ksft_exit_fail_msg("cannot open %s: %m\n", buf);
72 
73 	while ((dent = readdir(d)) != NULL) {
74 		if (!strncmp(dent->d_name, "lirc", 4)) {
75 			snprintf(buf, sizeof(buf), "/dev/%s", dent->d_name);
76 			break;
77 		}
78 	}
79 
80 	if (!dent)
81 		ksft_exit_fail_msg("cannot find lirc device for %s\n", rc);
82 
83 	closedir(d);
84 
85 	fd = open(buf, O_RDWR | O_NONBLOCK);
86 	if (fd == -1)
87 		ksft_exit_fail_msg("cannot open: %s: %m\n", buf);
88 
89 	return fd;
90 }
91 
92 int main(int argc, char **argv)
93 {
94 	unsigned int mode;
95 	char buf[100];
96 	int rlircfd, wlircfd, protocolfd, i, n;
97 
98 	srand(time(NULL));
99 
100 	if (argc != 3)
101 		ksft_exit_fail_msg("Usage: %s <write rcN> <read rcN>\n",
102 				   argv[0]);
103 
104 	rlircfd = lirc_open(argv[2]);
105 	mode = LIRC_MODE_SCANCODE;
106 	if (ioctl(rlircfd, LIRC_SET_REC_MODE, &mode))
107 		ksft_exit_fail_msg("failed to set scancode rec mode %s: %m\n",
108 				   argv[2]);
109 
110 	wlircfd = lirc_open(argv[1]);
111 	if (ioctl(wlircfd, LIRC_SET_SEND_MODE, &mode))
112 		ksft_exit_fail_msg("failed to set scancode send mode %s: %m\n",
113 				   argv[1]);
114 
115 	snprintf(buf, sizeof(buf), "/sys/class/rc/%s/protocols", argv[2]);
116 	protocolfd = open(buf, O_WRONLY);
117 	if (protocolfd == -1)
118 		ksft_exit_fail_msg("failed to open %s: %m\n", buf);
119 
120 	printf("Sending IR on %s and receiving IR on %s.\n", argv[1], argv[2]);
121 
122 	for (i = 0; i < ARRAY_SIZE(protocols); i++) {
123 		if (write(protocolfd, protocols[i].decoder,
124 			  strlen(protocols[i].decoder)) == -1)
125 			ksft_exit_fail_msg("failed to set write decoder\n");
126 
127 		printf("Testing protocol %s for decoder %s (%d/%d)...\n",
128 		       protocols[i].name, protocols[i].decoder,
129 		       i + 1, (int)ARRAY_SIZE(protocols));
130 
131 		for (n = 0; n < TEST_SCANCODES; n++) {
132 			unsigned int scancode = rand() & protocols[i].mask;
133 			unsigned int rc_proto = protocols[i].proto;
134 
135 			if (rc_proto == RC_PROTO_RC6_MCE)
136 				scancode |= 0x800f0000;
137 
138 			if (rc_proto == RC_PROTO_NECX &&
139 			    (((scancode >> 16) ^ ~(scancode >> 8)) & 0xff) == 0)
140 				continue;
141 
142 			if (rc_proto == RC_PROTO_NEC32 &&
143 			    (((scancode >> 8) ^ ~scancode) & 0xff) == 0)
144 				continue;
145 
146 			if (rc_proto == RC_PROTO_RCMM32 &&
147 			    (scancode & 0x000c0000) != 0x000c0000 &&
148 			    scancode & 0x00008000)
149 				continue;
150 
151 			struct lirc_scancode lsc = {
152 				.rc_proto = rc_proto,
153 				.scancode = scancode
154 			};
155 
156 			printf("Testing scancode:%x\n", scancode);
157 
158 			while (write(wlircfd, &lsc, sizeof(lsc)) < 0) {
159 				if (errno == EINTR)
160 					continue;
161 
162 				ksft_exit_fail_msg("failed to send ir: %m\n");
163 			}
164 
165 			struct pollfd pfd = { .fd = rlircfd, .events = POLLIN };
166 			struct lirc_scancode lsc2;
167 
168 			poll(&pfd, 1, 1000);
169 
170 			bool decoded = true;
171 
172 			while (read(rlircfd, &lsc2, sizeof(lsc2)) < 0) {
173 				if (errno == EINTR)
174 					continue;
175 
176 				ksft_test_result_error("no scancode decoded: %m\n");
177 				decoded = false;
178 				break;
179 			}
180 
181 			if (!decoded)
182 				continue;
183 
184 			if (lsc.rc_proto != lsc2.rc_proto)
185 				ksft_test_result_error("decoded protocol is different: %d\n",
186 						       lsc2.rc_proto);
187 
188 			else if (lsc.scancode != lsc2.scancode)
189 				ksft_test_result_error("decoded scancode is different: %llx\n",
190 						       lsc2.scancode);
191 			else
192 				ksft_inc_pass_cnt();
193 		}
194 
195 		printf("OK\n");
196 	}
197 
198 	close(rlircfd);
199 	close(wlircfd);
200 	close(protocolfd);
201 
202 	if (ksft_get_fail_cnt() > 0)
203 		ksft_exit_fail();
204 	else
205 		ksft_exit_pass();
206 
207 	return 0;
208 }
209