xref: /openbmc/linux/drivers/media/rc/ir-rx51.c (revision 046b212a)
1 // SPDX-License-Identifier: GPL-2.0-or-later
2 /*
3  *  Copyright (C) 2008 Nokia Corporation
4  *
5  *  Based on lirc_serial.c
6  */
7 #include <linux/clk.h>
8 #include <linux/module.h>
9 #include <linux/platform_device.h>
10 #include <linux/wait.h>
11 #include <linux/pwm.h>
12 #include <linux/of.h>
13 #include <linux/hrtimer.h>
14 
15 #include <media/rc-core.h>
16 
17 #define WBUF_LEN 256
18 
19 struct ir_rx51 {
20 	struct rc_dev *rcdev;
21 	struct pwm_device *pwm;
22 	struct pwm_state state;
23 	struct hrtimer timer;
24 	struct device	     *dev;
25 	wait_queue_head_t     wqueue;
26 
27 	unsigned int	freq;		/* carrier frequency */
28 	unsigned int	duty_cycle;	/* carrier duty cycle */
29 	int		wbuf[WBUF_LEN];
30 	int		wbuf_index;
31 	unsigned long	device_is_open;
32 };
33 
34 static inline void ir_rx51_on(struct ir_rx51 *ir_rx51)
35 {
36 	ir_rx51->state.enabled = true;
37 	pwm_apply_state(ir_rx51->pwm, &ir_rx51->state);
38 }
39 
40 static inline void ir_rx51_off(struct ir_rx51 *ir_rx51)
41 {
42 	ir_rx51->state.enabled = false;
43 	pwm_apply_state(ir_rx51->pwm, &ir_rx51->state);
44 }
45 
46 static int init_timing_params(struct ir_rx51 *ir_rx51)
47 {
48 	ir_rx51->state.period = DIV_ROUND_CLOSEST(NSEC_PER_SEC, ir_rx51->freq);
49 	pwm_set_relative_duty_cycle(&ir_rx51->state, ir_rx51->duty_cycle, 100);
50 
51 	return 0;
52 }
53 
54 static enum hrtimer_restart ir_rx51_timer_cb(struct hrtimer *timer)
55 {
56 	struct ir_rx51 *ir_rx51 = container_of(timer, struct ir_rx51, timer);
57 	ktime_t now;
58 
59 	if (ir_rx51->wbuf_index < 0) {
60 		dev_err_ratelimited(ir_rx51->dev,
61 				    "BUG wbuf_index has value of %i\n",
62 				    ir_rx51->wbuf_index);
63 		goto end;
64 	}
65 
66 	/*
67 	 * If we happen to hit an odd latency spike, loop through the
68 	 * pulses until we catch up.
69 	 */
70 	do {
71 		u64 ns;
72 
73 		if (ir_rx51->wbuf_index >= WBUF_LEN)
74 			goto end;
75 		if (ir_rx51->wbuf[ir_rx51->wbuf_index] == -1)
76 			goto end;
77 
78 		if (ir_rx51->wbuf_index % 2)
79 			ir_rx51_off(ir_rx51);
80 		else
81 			ir_rx51_on(ir_rx51);
82 
83 		ns = US_TO_NS(ir_rx51->wbuf[ir_rx51->wbuf_index]);
84 		hrtimer_add_expires_ns(timer, ns);
85 
86 		ir_rx51->wbuf_index++;
87 
88 		now = timer->base->get_time();
89 
90 	} while (hrtimer_get_expires_tv64(timer) < now);
91 
92 	return HRTIMER_RESTART;
93 end:
94 	/* Stop TX here */
95 	ir_rx51_off(ir_rx51);
96 	ir_rx51->wbuf_index = -1;
97 
98 	wake_up_interruptible(&ir_rx51->wqueue);
99 
100 	return HRTIMER_NORESTART;
101 }
102 
103 static int ir_rx51_tx(struct rc_dev *dev, unsigned int *buffer,
104 		      unsigned int count)
105 {
106 	struct ir_rx51 *ir_rx51 = dev->priv;
107 
108 	if (count > WBUF_LEN)
109 		return -EINVAL;
110 
111 	memcpy(ir_rx51->wbuf, buffer, count * sizeof(unsigned int));
112 
113 	/* Wait any pending transfers to finish */
114 	wait_event_interruptible(ir_rx51->wqueue, ir_rx51->wbuf_index < 0);
115 
116 	init_timing_params(ir_rx51);
117 	if (count < WBUF_LEN)
118 		ir_rx51->wbuf[count] = -1; /* Insert termination mark */
119 
120 	/*
121 	 * REVISIT: Adjust latency requirements so the device doesn't go in too
122 	 * deep sleep states with pm_qos_add_request().
123 	 */
124 
125 	ir_rx51_on(ir_rx51);
126 	ir_rx51->wbuf_index = 1;
127 	hrtimer_start(&ir_rx51->timer,
128 		      ns_to_ktime(US_TO_NS(ir_rx51->wbuf[0])),
129 		      HRTIMER_MODE_REL);
130 	/*
131 	 * Don't return back to the userspace until the transfer has
132 	 * finished
133 	 */
134 	wait_event_interruptible(ir_rx51->wqueue, ir_rx51->wbuf_index < 0);
135 
136 	/* REVISIT: Remove pm_qos constraint, we can sleep again */
137 
138 	return count;
139 }
140 
141 static int ir_rx51_open(struct rc_dev *dev)
142 {
143 	struct ir_rx51 *ir_rx51 = dev->priv;
144 
145 	if (test_and_set_bit(1, &ir_rx51->device_is_open))
146 		return -EBUSY;
147 
148 	ir_rx51->pwm = pwm_get(ir_rx51->dev, NULL);
149 	if (IS_ERR(ir_rx51->pwm)) {
150 		int res = PTR_ERR(ir_rx51->pwm);
151 
152 		dev_err(ir_rx51->dev, "pwm_get failed: %d\n", res);
153 		return res;
154 	}
155 
156 	return 0;
157 }
158 
159 static void ir_rx51_release(struct rc_dev *dev)
160 {
161 	struct ir_rx51 *ir_rx51 = dev->priv;
162 
163 	hrtimer_cancel(&ir_rx51->timer);
164 	ir_rx51_off(ir_rx51);
165 	pwm_put(ir_rx51->pwm);
166 
167 	clear_bit(1, &ir_rx51->device_is_open);
168 }
169 
170 static struct ir_rx51 ir_rx51 = {
171 	.duty_cycle	= 50,
172 	.wbuf_index	= -1,
173 };
174 
175 static int ir_rx51_set_duty_cycle(struct rc_dev *dev, u32 duty)
176 {
177 	struct ir_rx51 *ir_rx51 = dev->priv;
178 
179 	ir_rx51->duty_cycle = duty;
180 
181 	return 0;
182 }
183 
184 static int ir_rx51_set_tx_carrier(struct rc_dev *dev, u32 carrier)
185 {
186 	struct ir_rx51 *ir_rx51 = dev->priv;
187 
188 	if (carrier > 500000 || carrier < 20000)
189 		return -EINVAL;
190 
191 	ir_rx51->freq = carrier;
192 
193 	return 0;
194 }
195 
196 #ifdef CONFIG_PM
197 
198 static int ir_rx51_suspend(struct platform_device *dev, pm_message_t state)
199 {
200 	/*
201 	 * In case the device is still open, do not suspend. Normally
202 	 * this should not be a problem as lircd only keeps the device
203 	 * open only for short periods of time. We also don't want to
204 	 * get involved with race conditions that might happen if we
205 	 * were in a middle of a transmit. Thus, we defer any suspend
206 	 * actions until transmit has completed.
207 	 */
208 	if (test_and_set_bit(1, &ir_rx51.device_is_open))
209 		return -EAGAIN;
210 
211 	clear_bit(1, &ir_rx51.device_is_open);
212 
213 	return 0;
214 }
215 
216 static int ir_rx51_resume(struct platform_device *dev)
217 {
218 	return 0;
219 }
220 
221 #else
222 
223 #define ir_rx51_suspend	NULL
224 #define ir_rx51_resume	NULL
225 
226 #endif /* CONFIG_PM */
227 
228 static int ir_rx51_probe(struct platform_device *dev)
229 {
230 	struct pwm_device *pwm;
231 	struct rc_dev *rcdev;
232 
233 	pwm = pwm_get(&dev->dev, NULL);
234 	if (IS_ERR(pwm))
235 		return dev_err_probe(&dev->dev, PTR_ERR(pwm), "pwm_get failed\n");
236 
237 	/* Use default, in case userspace does not set the carrier */
238 	ir_rx51.freq = DIV_ROUND_CLOSEST_ULL(pwm_get_period(pwm), NSEC_PER_SEC);
239 	pwm_init_state(pwm, &ir_rx51.state);
240 	pwm_put(pwm);
241 
242 	hrtimer_init(&ir_rx51.timer, CLOCK_MONOTONIC, HRTIMER_MODE_REL);
243 	ir_rx51.timer.function = ir_rx51_timer_cb;
244 
245 	ir_rx51.dev = &dev->dev;
246 
247 	rcdev = devm_rc_allocate_device(&dev->dev, RC_DRIVER_IR_RAW_TX);
248 	if (!rcdev)
249 		return -ENOMEM;
250 
251 	rcdev->priv = &ir_rx51;
252 	rcdev->open = ir_rx51_open;
253 	rcdev->close = ir_rx51_release;
254 	rcdev->tx_ir = ir_rx51_tx;
255 	rcdev->s_tx_duty_cycle = ir_rx51_set_duty_cycle;
256 	rcdev->s_tx_carrier = ir_rx51_set_tx_carrier;
257 	rcdev->driver_name = KBUILD_MODNAME;
258 
259 	ir_rx51.rcdev = rcdev;
260 
261 	return devm_rc_register_device(&dev->dev, ir_rx51.rcdev);
262 }
263 
264 static const struct of_device_id ir_rx51_match[] = {
265 	{
266 		.compatible = "nokia,n900-ir",
267 	},
268 	{},
269 };
270 MODULE_DEVICE_TABLE(of, ir_rx51_match);
271 
272 static struct platform_driver ir_rx51_platform_driver = {
273 	.probe		= ir_rx51_probe,
274 	.suspend	= ir_rx51_suspend,
275 	.resume		= ir_rx51_resume,
276 	.driver		= {
277 		.name	= KBUILD_MODNAME,
278 		.of_match_table = ir_rx51_match,
279 	},
280 };
281 module_platform_driver(ir_rx51_platform_driver);
282 
283 MODULE_DESCRIPTION("IR TX driver for Nokia RX51");
284 MODULE_AUTHOR("Nokia Corporation");
285 MODULE_LICENSE("GPL");
286