drivers/misc/intel_menlow.c

   1 /*
   2  *  intel_menlow.c - Intel menlow Driver for thermal management extension
   3  *
   4  *  Copyright (C) 2008 Intel Corp
   5  *  Copyright (C) 2008 Sujith Thomas <sujith.thomas@intel.com>
   6  *  Copyright (C) 2008 Zhang Rui <rui.zhang@intel.com>
   7  *  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
   8  *
   9  *  This program is free software; you can redistribute it and/or modify
  10  *  it under the terms of the GNU General Public License as published by
  11  *  the Free Software Foundation; version 2 of the License.
  12  *
  13  *  This program is distributed in the hope that it will be useful, but
  14  *  WITHOUT ANY WARRANTY; without even the implied warranty of
  15  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  16  *  General Public License for more details.
  17  *
  18  *  You should have received a copy of the GNU General Public License along
  19  *  with this program; if not, write to the Free Software Foundation, Inc.,
  20  *  59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
  21  *
  22  * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  23  *
  24  *  This driver creates the sys I/F for programming the sensors.
  25  *  It also implements the driver for intel menlow memory controller (hardware
  26  *  id is INT0002) which makes use of the platform specific ACPI methods
  27  *  to get/set bandwidth.
  28  */
  29
  30 #include <linux/kernel.h>
  31 #include <linux/module.h>
  32 #include <linux/init.h>
  33 #include <linux/types.h>
  34 #include <linux/pci.h>
  35 #include <linux/pm.h>
  36
  37 #include <linux/thermal.h>
  38 #include <acpi/acpi_bus.h>
  39 #include <acpi/acpi_drivers.h>
  40
  41 MODULE_AUTHOR("Thomas Sujith");
  42 MODULE_AUTHOR("Zhang Rui");
  43 MODULE_DESCRIPTION("Intel Menlow platform specific driver");
  44 MODULE_LICENSE("GPL");
  45
  46 /*
  47  * Memory controller device control
  48  */
  49
  50 #define MEMORY_GET_BANDWIDTH "GTHS"
  51 #define MEMORY_SET_BANDWIDTH "STHS"
  52 #define MEMORY_ARG_CUR_BANDWIDTH 1
  53 #define MEMORY_ARG_MAX_BANDWIDTH 0
  54
  55 static int memory_get_int_max_bandwidth(struct thermal_cooling_device *cdev,
  56                                         unsigned long *max_state)
  57 {
  58         struct acpi_device *device = cdev->devdata;
  59         acpi_handle handle = device->handle;
  60         unsigned long long value;
  61         struct acpi_object_list arg_list;
  62         union acpi_object arg;
  63         acpi_status status = AE_OK;
  64
  65         arg_list.count = 1;
  66         arg_list.pointer = &arg;
  67         arg.type = ACPI_TYPE_INTEGER;
  68         arg.integer.value = MEMORY_ARG_MAX_BANDWIDTH;
  69         status = acpi_evaluate_integer(handle, MEMORY_GET_BANDWIDTH,
  70                                        &arg_list, &value);
  71         if (ACPI_FAILURE(status))
  72                 return -EFAULT;
  73
  74         if (!value)
  75                 return -EINVAL;
  76
  77         *max_state = value - 1;
  78         return 0;
  79 }
  80
  81 static int memory_get_max_bandwidth(struct thermal_cooling_device *cdev,
  82                                     char *buf)
  83 {
  84         unsigned long value;
  85         if (memory_get_int_max_bandwidth(cdev, &value))
  86                 return -EINVAL;
  87
  88         return sprintf(buf, "%ld\n", value);
  89 }
  90
  91 static int memory_get_cur_bandwidth(struct thermal_cooling_device *cdev,
  92                                     char *buf)
  93 {
  94         struct acpi_device *device = cdev->devdata;
  95         acpi_handle handle = device->handle;
  96         unsigned long long value;
  97         struct acpi_object_list arg_list;
  98         union acpi_object arg;
  99         acpi_status status = AE_OK;
 100
 101         arg_list.count = 1;
 102         arg_list.pointer = &arg;
 103         arg.type = ACPI_TYPE_INTEGER;
 104         arg.integer.value = MEMORY_ARG_CUR_BANDWIDTH;
 105         status = acpi_evaluate_integer(handle, MEMORY_GET_BANDWIDTH,
 106                                        &arg_list, &value);
 107         if (ACPI_FAILURE(status))
 108                 return -EFAULT;
 109
 110         return sprintf(buf, "%llu\n", value);
 111 }
 112
 113 static int memory_set_cur_bandwidth(struct thermal_cooling_device *cdev,
 114                                     unsigned int state)
 115 {
 116         struct acpi_device *device = cdev->devdata;
 117         acpi_handle handle = device->handle;
 118         struct acpi_object_list arg_list;
 119         union acpi_object arg;
 120         acpi_status status;
 121         unsigned long long temp;
 122         unsigned long max_state;
 123
 124         if (memory_get_int_max_bandwidth(cdev, &max_state))
 125                 return -EFAULT;
 126
 127         if (state > max_state)
 128                 return -EINVAL;
 129
 130         arg_list.count = 1;
 131         arg_list.pointer = &arg;
 132         arg.type = ACPI_TYPE_INTEGER;
 133         arg.integer.value = state;
 134
 135         status =
 136             acpi_evaluate_integer(handle, MEMORY_SET_BANDWIDTH, &arg_list,
 137                                   &temp);
 138
 139         printk(KERN_INFO
 140                "Bandwidth value was %d: status is %d\n", state, status);
 141         if (ACPI_FAILURE(status))
 142                 return -EFAULT;
 143
 144         return 0;
 145 }
 146
 147 static struct thermal_cooling_device_ops memory_cooling_ops = {
 148         .get_max_state = memory_get_max_bandwidth,
 149         .get_cur_state = memory_get_cur_bandwidth,
 150         .set_cur_state = memory_set_cur_bandwidth,
 151 };
 152
 153 /*
 154  * Memory Device Management
 155  */
 156 static int intel_menlow_memory_add(struct acpi_device *device)
 157 {
 158         int result = -ENODEV;
 159         acpi_status status = AE_OK;
 160         acpi_handle dummy;
 161         struct thermal_cooling_device *cdev;
 162
 163         if (!device)
 164                 return -EINVAL;
 165
 166         status = acpi_get_handle(device->handle, MEMORY_GET_BANDWIDTH, &dummy);
 167         if (ACPI_FAILURE(status))
 168                 goto end;
 169
 170         status = acpi_get_handle(device->handle, MEMORY_SET_BANDWIDTH, &dummy);
 171         if (ACPI_FAILURE(status))
 172                 goto end;
 173
 174         cdev = thermal_cooling_device_register("Memory controller", device,
 175                                                &memory_cooling_ops);
 176         if (IS_ERR(cdev)) {
 177                 result = PTR_ERR(cdev);
 178                 goto end;
 179         }
 180
 181         device->driver_data = cdev;
 182         result = sysfs_create_link(&device->dev.kobj,
 183                                 &cdev->device.kobj, "thermal_cooling");
 184         if (result)
 185                 goto unregister;
 186
 187         result = sysfs_create_link(&cdev->device.kobj,
 188                                 &device->dev.kobj, "device");
 189         if (result) {
 190                 sysfs_remove_link(&device->dev.kobj, "thermal_cooling");
 191                 goto unregister;
 192         }
 193
 194  end:
 195         return result;
 196
 197  unregister:
 198         thermal_cooling_device_unregister(cdev);
 199         return result;
 200
 201 }
 202
 203 static int intel_menlow_memory_remove(struct acpi_device *device, int type)
 204 {
 205         struct thermal_cooling_device *cdev = acpi_driver_data(device);
 206
 207         if (!device || !cdev)
 208                 return -EINVAL;
 209
 210         sysfs_remove_link(&device->dev.kobj, "thermal_cooling");
 211         sysfs_remove_link(&cdev->device.kobj, "device");
 212         thermal_cooling_device_unregister(cdev);
 213
 214         return 0;
 215 }
 216
 217 static const struct acpi_device_id intel_menlow_memory_ids[] = {
 218         {"INT0002", 0},
 219         {"", 0},
 220 };
 221
 222 static struct acpi_driver intel_menlow_memory_driver = {
 223         .name = "intel_menlow_thermal_control",
 224         .ids = intel_menlow_memory_ids,
 225         .ops = {
 226                 .add = intel_menlow_memory_add,
 227                 .remove = intel_menlow_memory_remove,
 228                 },
 229 };
 230
 231 /*
 232  * Sensor control on menlow platform
 233  */
 234
 235 #define THERMAL_AUX0 0
 236 #define THERMAL_AUX1 1
 237 #define GET_AUX0 "GAX0"
 238 #define GET_AUX1 "GAX1"
 239 #define SET_AUX0 "SAX0"
 240 #define SET_AUX1 "SAX1"
 241
 242 struct intel_menlow_attribute {
 243         struct device_attribute attr;
 244         struct device *device;
 245         acpi_handle handle;
 246         struct list_head node;
 247 };
 248
 249 static LIST_HEAD(intel_menlow_attr_list);
 250 static DEFINE_MUTEX(intel_menlow_attr_lock);
 251
 252 /*
 253  * sensor_get_auxtrip - get the current auxtrip value from sensor
 254  * @name: Thermalzone name
 255  * @auxtype : AUX0/AUX1
 256  * @buf: syfs buffer
 257  */
 258 static int sensor_get_auxtrip(acpi_handle handle, int index,
 259                                                         unsigned long long *value)
 260 {
 261         acpi_status status;
 262
 263         if ((index != 0 && index != 1) || !value)
 264                 return -EINVAL;
 265
 266         status = acpi_evaluate_integer(handle, index ? GET_AUX1 : GET_AUX0,
 267                                        NULL, value);
 268         if (ACPI_FAILURE(status))
 269                 return -EIO;
 270
 271         return 0;
 272 }
 273
 274 /*
 275  * sensor_set_auxtrip - set the new auxtrip value to sensor
 276  * @name: Thermalzone name
 277  * @auxtype : AUX0/AUX1
 278  * @buf: syfs buffer
 279  */
 280 static int sensor_set_auxtrip(acpi_handle handle, int index, int value)
 281 {
 282         acpi_status status;
 283         union acpi_object arg = {
 284                 ACPI_TYPE_INTEGER
 285         };
 286         struct acpi_object_list args = {
 287                 1, &arg
 288         };
 289         unsigned long long temp;
 290
 291         if (index != 0 && index != 1)
 292                 return -EINVAL;
 293
 294         status = acpi_evaluate_integer(handle, index ? GET_AUX0 : GET_AUX1,
 295                                        NULL, &temp);
 296         if (ACPI_FAILURE(status))
 297                 return -EIO;
 298         if ((index && value < temp) || (!index && value > temp))
 299                 return -EINVAL;
 300
 301         arg.integer.value = value;
 302         status = acpi_evaluate_integer(handle, index ? SET_AUX1 : SET_AUX0,
 303                                        &args, &temp);
 304         if (ACPI_FAILURE(status))
 305                 return -EIO;
 306
 307         /* do we need to check the return value of SAX0/SAX1 ? */
 308
 309         return 0;
 310 }
 311
 312 #define to_intel_menlow_attr(_attr)     \
 313         container_of(_attr, struct intel_menlow_attribute, attr)
 314
 315 static ssize_t aux0_show(struct device *dev,
 316                          struct device_attribute *dev_attr, char *buf)
 317 {
 318         struct intel_menlow_attribute *attr = to_intel_menlow_attr(dev_attr);
 319         unsigned long long value;
 320         int result;
 321
 322         result = sensor_get_auxtrip(attr->handle, 0, &value);
 323
 324         return result ? result : sprintf(buf, "%lu", KELVIN_TO_CELSIUS(value));
 325 }
 326
 327 static ssize_t aux1_show(struct device *dev,
 328                          struct device_attribute *dev_attr, char *buf)
 329 {
 330         struct intel_menlow_attribute *attr = to_intel_menlow_attr(dev_attr);
 331         unsigned long long value;
 332         int result;
 333
 334         result = sensor_get_auxtrip(attr->handle, 1, &value);
 335
 336         return result ? result : sprintf(buf, "%lu", KELVIN_TO_CELSIUS(value));
 337 }
 338
 339 static ssize_t aux0_store(struct device *dev,
 340                           struct device_attribute *dev_attr,
 341                           const char *buf, size_t count)
 342 {
 343         struct intel_menlow_attribute *attr = to_intel_menlow_attr(dev_attr);
 344         int value;
 345         int result;
 346
 347         /*Sanity check; should be a positive integer */
 348         if (!sscanf(buf, "%d", &value))
 349                 return -EINVAL;
 350
 351         if (value < 0)
 352                 return -EINVAL;
 353
 354         result = sensor_set_auxtrip(attr->handle, 0, CELSIUS_TO_KELVIN(value));
 355         return result ? result : count;
 356 }
 357
 358 static ssize_t aux1_store(struct device *dev,
 359                           struct device_attribute *dev_attr,
 360                           const char *buf, size_t count)
 361 {
 362         struct intel_menlow_attribute *attr = to_intel_menlow_attr(dev_attr);
 363         int value;
 364         int result;
 365
 366         /*Sanity check; should be a positive integer */
 367         if (!sscanf(buf, "%d", &value))
 368                 return -EINVAL;
 369
 370         if (value < 0)
 371                 return -EINVAL;
 372
 373         result = sensor_set_auxtrip(attr->handle, 1, CELSIUS_TO_KELVIN(value));
 374         return result ? result : count;
 375 }
 376
 377 /* BIOS can enable/disable the thermal user application in dabney platform */
 378 #define BIOS_ENABLED "\\_TZ.GSTS"
 379 static ssize_t bios_enabled_show(struct device *dev,
 380                                  struct device_attribute *attr, char *buf)
 381 {
 382         acpi_status status;
 383         unsigned long long bios_enabled;
 384
 385         status = acpi_evaluate_integer(NULL, BIOS_ENABLED, NULL, &bios_enabled);
 386         if (ACPI_FAILURE(status))
 387                 return -ENODEV;
 388
 389         return sprintf(buf, "%s\n", bios_enabled ? "enabled" : "disabled");
 390 }
 391
 392 static int intel_menlow_add_one_attribute(char *name, int mode, void *show,
 393                                           void *store, struct device *dev,
 394                                           acpi_handle handle)
 395 {
 396         struct intel_menlow_attribute *attr;
 397         int result;
 398
 399         attr = kzalloc(sizeof(struct intel_menlow_attribute), GFP_KERNEL);
 400         if (!attr)
 401                 return -ENOMEM;
 402
 403         attr->attr.attr.name = name;
 404         attr->attr.attr.mode = mode;
 405         attr->attr.show = show;
 406         attr->attr.store = store;
 407         attr->device = dev;
 408         attr->handle = handle;
 409
 410         result = device_create_file(dev, &attr->attr);
 411         if (result)
 412                 return result;
 413
 414         mutex_lock(&intel_menlow_attr_lock);
 415         list_add_tail(&attr->node, &intel_menlow_attr_list);
 416         mutex_unlock(&intel_menlow_attr_lock);
 417
 418         return 0;
 419 }
 420
 421 static acpi_status intel_menlow_register_sensor(acpi_handle handle, u32 lvl,
 422                                                 void *context, void **rv)
 423 {
 424         acpi_status status;
 425         acpi_handle dummy;
 426         struct thermal_zone_device *thermal;
 427         int result;
 428
 429         result = acpi_bus_get_private_data(handle, (void **)&thermal);
 430         if (result)
 431                 return 0;
 432
 433         /* _TZ must have the AUX0/1 methods */
 434         status = acpi_get_handle(handle, GET_AUX0, &dummy);
 435         if (ACPI_FAILURE(status))
 436                 goto not_found;
 437
 438         status = acpi_get_handle(handle, SET_AUX0, &dummy);
 439         if (ACPI_FAILURE(status))
 440                 goto not_found;
 441
 442         result = intel_menlow_add_one_attribute("aux0", 0644,
 443                                                 aux0_show, aux0_store,
 444                                                 &thermal->device, handle);
 445         if (result)
 446                 return AE_ERROR;
 447
 448         status = acpi_get_handle(handle, GET_AUX1, &dummy);
 449         if (ACPI_FAILURE(status))
 450                 goto not_found;
 451
 452         status = acpi_get_handle(handle, SET_AUX1, &dummy);
 453         if (ACPI_FAILURE(status))
 454                 goto not_found;
 455
 456         result = intel_menlow_add_one_attribute("aux1", 0644,
 457                                                 aux1_show, aux1_store,
 458                                                 &thermal->device, handle);
 459         if (result)
 460                 return AE_ERROR;
 461
 462         /*
 463          * create the "dabney_enabled" attribute which means the user app
 464          * should be loaded or not
 465          */
 466
 467         result = intel_menlow_add_one_attribute("bios_enabled", 0444,
 468                                                 bios_enabled_show, NULL,
 469                                                 &thermal->device, handle);
 470         if (result)
 471                 return AE_ERROR;
 472
 473  not_found:
 474         if (status == AE_NOT_FOUND)
 475                 return AE_OK;
 476         else
 477                 return status;
 478 }
 479
 480 static void intel_menlow_unregister_sensor(void)
 481 {
 482         struct intel_menlow_attribute *pos, *next;
 483
 484         mutex_lock(&intel_menlow_attr_lock);
 485         list_for_each_entry_safe(pos, next, &intel_menlow_attr_list, node) {
 486                 list_del(&pos->node);
 487                 device_remove_file(pos->device, &pos->attr);
 488                 kfree(pos);
 489         }
 490         mutex_unlock(&intel_menlow_attr_lock);
 491
 492         return;
 493 }
 494
 495 static int __init intel_menlow_module_init(void)
 496 {
 497         int result = -ENODEV;
 498         acpi_status status;
 499         unsigned long long enable;
 500
 501         if (acpi_disabled)
 502                 return result;
 503
 504         /* Looking for the \_TZ.GSTS method */
 505         status = acpi_evaluate_integer(NULL, BIOS_ENABLED, NULL, &enable);
 506         if (ACPI_FAILURE(status) || !enable)
 507                 return -ENODEV;
 508
 509         /* Looking for ACPI device MEM0 with hardware id INT0002 */
 510         result = acpi_bus_register_driver(&intel_menlow_memory_driver);
 511         if (result)
 512                 return result;
 513
 514         /* Looking for sensors in each ACPI thermal zone */
 515         status = acpi_walk_namespace(ACPI_TYPE_THERMAL, ACPI_ROOT_OBJECT,
 516                                      ACPI_UINT32_MAX,
 517                                      intel_menlow_register_sensor, NULL, NULL);
 518         if (ACPI_FAILURE(status))
 519                 return -ENODEV;
 520
 521         return 0;
 522 }
 523
 524 static void __exit intel_menlow_module_exit(void)
 525 {
 526         acpi_bus_unregister_driver(&intel_menlow_memory_driver);
 527         intel_menlow_unregister_sensor();
 528 }
 529
 530 module_init(intel_menlow_module_init);
 531 module_exit(intel_menlow_module_exit);