1 /*
2 * intel_quark_dts_thermal.c
3 *
4 * This file is provided under a dual BSD/GPLv2 license. When using or
5 * redistributing this file, you may do so under either license.
6 *
7 * GPL LICENSE SUMMARY
8 *
9 * Copyright(c) 2015 Intel Corporation.
10 *
11 * This program is free software; you can redistribute it and/or modify
12 * it under the terms of version 2 of the GNU General Public License as
13 * published by the Free Software Foundation.
14 *
15 * This program is distributed in the hope that it will be useful, but
16 * WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
18 * General Public License for more details.
19 *
20 * Contact Information:
21 * Ong Boon Leong <boon.leong.ong@intel.com>
22 * Intel Malaysia, Penang
23 *
24 * BSD LICENSE
25 *
26 * Copyright(c) 2015 Intel Corporation.
27 *
28 * Redistribution and use in source and binary forms, with or without
29 * modification, are permitted provided that the following conditions
30 * are met:
31 *
32 * * Redistributions of source code must retain the above copyright
33 * notice, this list of conditions and the following disclaimer.
34 * * Redistributions in binary form must reproduce the above copyright
35 * notice, this list of conditions and the following disclaimer in
36 * the documentation and/or other materials provided with the
37 * distribution.
38 * * Neither the name of Intel Corporation nor the names of its
39 * contributors may be used to endorse or promote products derived
40 * from this software without specific prior written permission.
41 *
42 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
43 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
44 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
45 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
46 * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
47 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
48 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
49 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
50 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
51 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
52 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
53 *
54 * Quark DTS thermal driver is implemented by referencing
55 * intel_soc_dts_thermal.c.
56 */
57
58 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
59
60 #include <linux/module.h>
61 #include <linux/slab.h>
62 #include <linux/interrupt.h>
63 #include <linux/thermal.h>
64 #include <asm/cpu_device_id.h>
65 #include <asm/iosf_mbi.h>
66
67 /* DTS reset is programmed via QRK_MBI_UNIT_SOC */
68 #define QRK_DTS_REG_OFFSET_RESET 0x34
69 #define QRK_DTS_RESET_BIT BIT(0)
70
71 /* DTS enable is programmed via QRK_MBI_UNIT_RMU */
72 #define QRK_DTS_REG_OFFSET_ENABLE 0xB0
73 #define QRK_DTS_ENABLE_BIT BIT(15)
74
75 /* Temperature Register is read via QRK_MBI_UNIT_RMU */
76 #define QRK_DTS_REG_OFFSET_TEMP 0xB1
77 #define QRK_DTS_MASK_TEMP 0xFF
78 #define QRK_DTS_OFFSET_TEMP 0
79 #define QRK_DTS_OFFSET_REL_TEMP 16
80 #define QRK_DTS_TEMP_BASE 50
81
82 /* Programmable Trip Point Register is configured via QRK_MBI_UNIT_RMU */
83 #define QRK_DTS_REG_OFFSET_PTPS 0xB2
84 #define QRK_DTS_MASK_TP_THRES 0xFF
85 #define QRK_DTS_SHIFT_TP 8
86 #define QRK_DTS_ID_TP_CRITICAL 0
87 #define QRK_DTS_ID_TP_HOT 1
88 #define QRK_DTS_SAFE_TP_THRES 105
89
90 /* Thermal Sensor Register Lock */
91 #define QRK_DTS_REG_OFFSET_LOCK 0x71
92 #define QRK_DTS_LOCK_BIT BIT(5)
93
94 /* Quark DTS has 2 trip points: hot & catastrophic */
95 #define QRK_MAX_DTS_TRIPS 2
96
97 #define DEFAULT_POLL_DELAY 2000
98
99 struct soc_sensor_entry {
100 bool locked;
101 u32 store_ptps;
102 u32 store_dts_enable;
103 struct thermal_zone_device *tzone;
104 };
105
106 static struct soc_sensor_entry *soc_dts;
107
108 static int polling_delay = DEFAULT_POLL_DELAY;
109 module_param(polling_delay, int, 0644);
110 MODULE_PARM_DESC(polling_delay,
111 "Polling interval for checking trip points (in milliseconds)");
112
113 static DEFINE_MUTEX(dts_update_mutex);
114
soc_dts_enable(struct thermal_zone_device * tzd)115 static int soc_dts_enable(struct thermal_zone_device *tzd)
116 {
117 u32 out;
118 struct soc_sensor_entry *aux_entry = thermal_zone_device_priv(tzd);
119 int ret;
120
121 ret = iosf_mbi_read(QRK_MBI_UNIT_RMU, MBI_REG_READ,
122 QRK_DTS_REG_OFFSET_ENABLE, &out);
123 if (ret)
124 return ret;
125
126 if (out & QRK_DTS_ENABLE_BIT)
127 return 0;
128
129 if (!aux_entry->locked) {
130 out |= QRK_DTS_ENABLE_BIT;
131 ret = iosf_mbi_write(QRK_MBI_UNIT_RMU, MBI_REG_WRITE,
132 QRK_DTS_REG_OFFSET_ENABLE, out);
133 if (ret)
134 return ret;
135 } else {
136 pr_info("DTS is locked. Cannot enable DTS\n");
137 ret = -EPERM;
138 }
139
140 return ret;
141 }
142
soc_dts_disable(struct thermal_zone_device * tzd)143 static int soc_dts_disable(struct thermal_zone_device *tzd)
144 {
145 u32 out;
146 struct soc_sensor_entry *aux_entry = thermal_zone_device_priv(tzd);
147 int ret;
148
149 ret = iosf_mbi_read(QRK_MBI_UNIT_RMU, MBI_REG_READ,
150 QRK_DTS_REG_OFFSET_ENABLE, &out);
151 if (ret)
152 return ret;
153
154 if (!(out & QRK_DTS_ENABLE_BIT))
155 return 0;
156
157 if (!aux_entry->locked) {
158 out &= ~QRK_DTS_ENABLE_BIT;
159 ret = iosf_mbi_write(QRK_MBI_UNIT_RMU, MBI_REG_WRITE,
160 QRK_DTS_REG_OFFSET_ENABLE, out);
161
162 if (ret)
163 return ret;
164 } else {
165 pr_info("DTS is locked. Cannot disable DTS\n");
166 ret = -EPERM;
167 }
168
169 return ret;
170 }
171
get_trip_temp(int trip)172 static int get_trip_temp(int trip)
173 {
174 int status, temp;
175 u32 out;
176
177 mutex_lock(&dts_update_mutex);
178 status = iosf_mbi_read(QRK_MBI_UNIT_RMU, MBI_REG_READ,
179 QRK_DTS_REG_OFFSET_PTPS, &out);
180 mutex_unlock(&dts_update_mutex);
181
182 if (status)
183 return THERMAL_TEMP_INVALID;
184
185 /*
186 * Thermal Sensor Programmable Trip Point Register has 8-bit
187 * fields for critical (catastrophic) and hot set trip point
188 * thresholds. The threshold value is always offset by its
189 * temperature base (50 degree Celsius).
190 */
191 temp = (out >> (trip * QRK_DTS_SHIFT_TP)) & QRK_DTS_MASK_TP_THRES;
192 temp -= QRK_DTS_TEMP_BASE;
193
194 return temp;
195 }
196
update_trip_temp(struct soc_sensor_entry * aux_entry,int trip_index,int temp)197 static int update_trip_temp(struct soc_sensor_entry *aux_entry,
198 int trip_index, int temp)
199 {
200 u32 out;
201 u32 temp_out;
202 u32 store_ptps;
203 int ret;
204
205 mutex_lock(&dts_update_mutex);
206 if (aux_entry->locked) {
207 ret = -EPERM;
208 goto failed;
209 }
210
211 ret = iosf_mbi_read(QRK_MBI_UNIT_RMU, MBI_REG_READ,
212 QRK_DTS_REG_OFFSET_PTPS, &store_ptps);
213 if (ret)
214 goto failed;
215
216 /*
217 * Protection against unsafe trip point thresdhold value.
218 * As Quark X1000 data-sheet does not provide any recommendation
219 * regarding the safe trip point threshold value to use, we choose
220 * the safe value according to the threshold value set by UEFI BIOS.
221 */
222 if (temp > QRK_DTS_SAFE_TP_THRES)
223 temp = QRK_DTS_SAFE_TP_THRES;
224
225 /*
226 * Thermal Sensor Programmable Trip Point Register has 8-bit
227 * fields for critical (catastrophic) and hot set trip point
228 * thresholds. The threshold value is always offset by its
229 * temperature base (50 degree Celsius).
230 */
231 temp_out = temp + QRK_DTS_TEMP_BASE;
232 out = (store_ptps & ~(QRK_DTS_MASK_TP_THRES <<
233 (trip_index * QRK_DTS_SHIFT_TP)));
234 out |= (temp_out & QRK_DTS_MASK_TP_THRES) <<
235 (trip_index * QRK_DTS_SHIFT_TP);
236
237 ret = iosf_mbi_write(QRK_MBI_UNIT_RMU, MBI_REG_WRITE,
238 QRK_DTS_REG_OFFSET_PTPS, out);
239
240 failed:
241 mutex_unlock(&dts_update_mutex);
242 return ret;
243 }
244
sys_set_trip_temp(struct thermal_zone_device * tzd,const struct thermal_trip * trip,int temp)245 static inline int sys_set_trip_temp(struct thermal_zone_device *tzd,
246 const struct thermal_trip *trip,
247 int temp)
248 {
249 unsigned int trip_index;
250
251 switch (trip->type) {
252 case THERMAL_TRIP_HOT:
253 trip_index = QRK_DTS_ID_TP_HOT;
254 break;
255
256 case THERMAL_TRIP_CRITICAL:
257 trip_index = QRK_DTS_ID_TP_CRITICAL;
258 break;
259
260 default:
261 return -EINVAL;
262 }
263
264 return update_trip_temp(thermal_zone_device_priv(tzd), trip_index, temp);
265 }
266
sys_get_curr_temp(struct thermal_zone_device * tzd,int * temp)267 static int sys_get_curr_temp(struct thermal_zone_device *tzd,
268 int *temp)
269 {
270 u32 out;
271 int ret;
272
273 mutex_lock(&dts_update_mutex);
274 ret = iosf_mbi_read(QRK_MBI_UNIT_RMU, MBI_REG_READ,
275 QRK_DTS_REG_OFFSET_TEMP, &out);
276 mutex_unlock(&dts_update_mutex);
277
278 if (ret)
279 return ret;
280
281 /*
282 * Thermal Sensor Temperature Register has 8-bit field
283 * for temperature value (offset by temperature base
284 * 50 degree Celsius).
285 */
286 out = (out >> QRK_DTS_OFFSET_TEMP) & QRK_DTS_MASK_TEMP;
287 *temp = out - QRK_DTS_TEMP_BASE;
288
289 return 0;
290 }
291
sys_change_mode(struct thermal_zone_device * tzd,enum thermal_device_mode mode)292 static int sys_change_mode(struct thermal_zone_device *tzd,
293 enum thermal_device_mode mode)
294 {
295 int ret;
296
297 mutex_lock(&dts_update_mutex);
298 if (mode == THERMAL_DEVICE_ENABLED)
299 ret = soc_dts_enable(tzd);
300 else
301 ret = soc_dts_disable(tzd);
302 mutex_unlock(&dts_update_mutex);
303
304 return ret;
305 }
306
307 static const struct thermal_zone_device_ops tzone_ops = {
308 .get_temp = sys_get_curr_temp,
309 .set_trip_temp = sys_set_trip_temp,
310 .change_mode = sys_change_mode,
311 };
312
free_soc_dts(struct soc_sensor_entry * aux_entry)313 static void free_soc_dts(struct soc_sensor_entry *aux_entry)
314 {
315 if (aux_entry) {
316 if (!aux_entry->locked) {
317 mutex_lock(&dts_update_mutex);
318 iosf_mbi_write(QRK_MBI_UNIT_RMU, MBI_REG_WRITE,
319 QRK_DTS_REG_OFFSET_ENABLE,
320 aux_entry->store_dts_enable);
321
322 iosf_mbi_write(QRK_MBI_UNIT_RMU, MBI_REG_WRITE,
323 QRK_DTS_REG_OFFSET_PTPS,
324 aux_entry->store_ptps);
325 mutex_unlock(&dts_update_mutex);
326 }
327 thermal_zone_device_unregister(aux_entry->tzone);
328 kfree(aux_entry);
329 }
330 }
331
alloc_soc_dts(void)332 static struct soc_sensor_entry *alloc_soc_dts(void)
333 {
334 struct thermal_trip trips[QRK_MAX_DTS_TRIPS] = { 0 };
335 struct soc_sensor_entry *aux_entry;
336 int err;
337 u32 out;
338
339 aux_entry = kzalloc(sizeof(*aux_entry), GFP_KERNEL);
340 if (!aux_entry) {
341 err = -ENOMEM;
342 return ERR_PTR(-ENOMEM);
343 }
344
345 /* Check if DTS register is locked */
346 err = iosf_mbi_read(QRK_MBI_UNIT_RMU, MBI_REG_READ,
347 QRK_DTS_REG_OFFSET_LOCK, &out);
348 if (err)
349 goto err_ret;
350
351 aux_entry->locked = !!(out & QRK_DTS_LOCK_BIT);
352
353 /* Store DTS default state if DTS registers are not locked */
354 if (!aux_entry->locked) {
355 /* Store DTS default enable for restore on exit */
356 err = iosf_mbi_read(QRK_MBI_UNIT_RMU, MBI_REG_READ,
357 QRK_DTS_REG_OFFSET_ENABLE,
358 &aux_entry->store_dts_enable);
359 if (err)
360 goto err_ret;
361
362 /* Store DTS default PTPS register for restore on exit */
363 err = iosf_mbi_read(QRK_MBI_UNIT_RMU, MBI_REG_READ,
364 QRK_DTS_REG_OFFSET_PTPS,
365 &aux_entry->store_ptps);
366 if (err)
367 goto err_ret;
368
369 trips[QRK_DTS_ID_TP_CRITICAL].flags |= THERMAL_TRIP_FLAG_RW_TEMP;
370 trips[QRK_DTS_ID_TP_HOT].flags |= THERMAL_TRIP_FLAG_RW_TEMP;
371 }
372
373 trips[QRK_DTS_ID_TP_CRITICAL].temperature = get_trip_temp(QRK_DTS_ID_TP_CRITICAL);
374 trips[QRK_DTS_ID_TP_CRITICAL].type = THERMAL_TRIP_CRITICAL;
375
376 trips[QRK_DTS_ID_TP_HOT].temperature = get_trip_temp(QRK_DTS_ID_TP_HOT);
377 trips[QRK_DTS_ID_TP_HOT].type = THERMAL_TRIP_HOT;
378
379 aux_entry->tzone = thermal_zone_device_register_with_trips("quark_dts",
380 trips,
381 QRK_MAX_DTS_TRIPS,
382 aux_entry,
383 &tzone_ops,
384 NULL, 0, polling_delay);
385 if (IS_ERR(aux_entry->tzone)) {
386 err = PTR_ERR(aux_entry->tzone);
387 goto err_ret;
388 }
389
390 err = thermal_zone_device_enable(aux_entry->tzone);
391 if (err)
392 goto err_aux_status;
393
394 return aux_entry;
395
396 err_aux_status:
397 thermal_zone_device_unregister(aux_entry->tzone);
398 err_ret:
399 kfree(aux_entry);
400 return ERR_PTR(err);
401 }
402
403 static const struct x86_cpu_id qrk_thermal_ids[] __initconst = {
404 X86_MATCH_VENDOR_FAM_MODEL(INTEL, 5, INTEL_FAM5_QUARK_X1000, NULL),
405 {}
406 };
407 MODULE_DEVICE_TABLE(x86cpu, qrk_thermal_ids);
408
intel_quark_thermal_init(void)409 static int __init intel_quark_thermal_init(void)
410 {
411 if (!x86_match_cpu(qrk_thermal_ids) || !iosf_mbi_available())
412 return -ENODEV;
413
414 soc_dts = alloc_soc_dts();
415 if (IS_ERR(soc_dts))
416 return PTR_ERR(soc_dts);
417
418 return 0;
419 }
420
intel_quark_thermal_exit(void)421 static void __exit intel_quark_thermal_exit(void)
422 {
423 free_soc_dts(soc_dts);
424 }
425
426 module_init(intel_quark_thermal_init)
427 module_exit(intel_quark_thermal_exit)
428
429 MODULE_DESCRIPTION("Intel Quark DTS Thermal Driver");
430 MODULE_AUTHOR("Ong Boon Leong <boon.leong.ong@intel.com>");
431 MODULE_LICENSE("Dual BSD/GPL");
432