1 /* 2 * (C) 2001 Dave Jones, Arjan van de ven. 3 * (C) 2002 - 2003 Dominik Brodowski <linux@brodo.de> 4 * 5 * Licensed under the terms of the GNU GPL License version 2. 6 * Based upon reverse engineered information, and on Intel documentation 7 * for chipsets ICH2-M and ICH3-M. 8 * 9 * Many thanks to Ducrot Bruno for finding and fixing the last 10 * "missing link" for ICH2-M/ICH3-M support, and to Thomas Winkler 11 * for extensive testing. 12 * 13 * BIG FAT DISCLAIMER: Work in progress code. Possibly *dangerous* 14 */ 15 16 17 /********************************************************************* 18 * SPEEDSTEP - DEFINITIONS * 19 *********************************************************************/ 20 21 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt 22 23 #include <linux/kernel.h> 24 #include <linux/module.h> 25 #include <linux/init.h> 26 #include <linux/cpufreq.h> 27 #include <linux/pci.h> 28 #include <linux/sched.h> 29 30 #include <asm/cpu_device_id.h> 31 32 #include "speedstep-lib.h" 33 34 35 /* speedstep_chipset: 36 * It is necessary to know which chipset is used. As accesses to 37 * this device occur at various places in this module, we need a 38 * static struct pci_dev * pointing to that device. 39 */ 40 static struct pci_dev *speedstep_chipset_dev; 41 42 43 /* speedstep_processor 44 */ 45 static enum speedstep_processor speedstep_processor; 46 47 static u32 pmbase; 48 49 /* 50 * There are only two frequency states for each processor. Values 51 * are in kHz for the time being. 52 */ 53 static struct cpufreq_frequency_table speedstep_freqs[] = { 54 {0, SPEEDSTEP_HIGH, 0}, 55 {0, SPEEDSTEP_LOW, 0}, 56 {0, 0, CPUFREQ_TABLE_END}, 57 }; 58 59 60 /** 61 * speedstep_find_register - read the PMBASE address 62 * 63 * Returns: -ENODEV if no register could be found 64 */ 65 static int speedstep_find_register(void) 66 { 67 if (!speedstep_chipset_dev) 68 return -ENODEV; 69 70 /* get PMBASE */ 71 pci_read_config_dword(speedstep_chipset_dev, 0x40, &pmbase); 72 if (!(pmbase & 0x01)) { 73 pr_err("could not find speedstep register\n"); 74 return -ENODEV; 75 } 76 77 pmbase &= 0xFFFFFFFE; 78 if (!pmbase) { 79 pr_err("could not find speedstep register\n"); 80 return -ENODEV; 81 } 82 83 pr_debug("pmbase is 0x%x\n", pmbase); 84 return 0; 85 } 86 87 /** 88 * speedstep_set_state - set the SpeedStep state 89 * @state: new processor frequency state (SPEEDSTEP_LOW or SPEEDSTEP_HIGH) 90 * 91 * Tries to change the SpeedStep state. Can be called from 92 * smp_call_function_single. 93 */ 94 static void speedstep_set_state(unsigned int state) 95 { 96 u8 pm2_blk; 97 u8 value; 98 unsigned long flags; 99 100 if (state > 0x1) 101 return; 102 103 /* Disable IRQs */ 104 local_irq_save(flags); 105 106 /* read state */ 107 value = inb(pmbase + 0x50); 108 109 pr_debug("read at pmbase 0x%x + 0x50 returned 0x%x\n", pmbase, value); 110 111 /* write new state */ 112 value &= 0xFE; 113 value |= state; 114 115 pr_debug("writing 0x%x to pmbase 0x%x + 0x50\n", value, pmbase); 116 117 /* Disable bus master arbitration */ 118 pm2_blk = inb(pmbase + 0x20); 119 pm2_blk |= 0x01; 120 outb(pm2_blk, (pmbase + 0x20)); 121 122 /* Actual transition */ 123 outb(value, (pmbase + 0x50)); 124 125 /* Restore bus master arbitration */ 126 pm2_blk &= 0xfe; 127 outb(pm2_blk, (pmbase + 0x20)); 128 129 /* check if transition was successful */ 130 value = inb(pmbase + 0x50); 131 132 /* Enable IRQs */ 133 local_irq_restore(flags); 134 135 pr_debug("read at pmbase 0x%x + 0x50 returned 0x%x\n", pmbase, value); 136 137 if (state == (value & 0x1)) 138 pr_debug("change to %u MHz succeeded\n", 139 speedstep_get_frequency(speedstep_processor) / 1000); 140 else 141 pr_err("change failed - I/O error\n"); 142 143 return; 144 } 145 146 /* Wrapper for smp_call_function_single. */ 147 static void _speedstep_set_state(void *_state) 148 { 149 speedstep_set_state(*(unsigned int *)_state); 150 } 151 152 /** 153 * speedstep_activate - activate SpeedStep control in the chipset 154 * 155 * Tries to activate the SpeedStep status and control registers. 156 * Returns -EINVAL on an unsupported chipset, and zero on success. 157 */ 158 static int speedstep_activate(void) 159 { 160 u16 value = 0; 161 162 if (!speedstep_chipset_dev) 163 return -EINVAL; 164 165 pci_read_config_word(speedstep_chipset_dev, 0x00A0, &value); 166 if (!(value & 0x08)) { 167 value |= 0x08; 168 pr_debug("activating SpeedStep (TM) registers\n"); 169 pci_write_config_word(speedstep_chipset_dev, 0x00A0, value); 170 } 171 172 return 0; 173 } 174 175 176 /** 177 * speedstep_detect_chipset - detect the Southbridge which contains SpeedStep logic 178 * 179 * Detects ICH2-M, ICH3-M and ICH4-M so far. The pci_dev points to 180 * the LPC bridge / PM module which contains all power-management 181 * functions. Returns the SPEEDSTEP_CHIPSET_-number for the detected 182 * chipset, or zero on failure. 183 */ 184 static unsigned int speedstep_detect_chipset(void) 185 { 186 speedstep_chipset_dev = pci_get_subsys(PCI_VENDOR_ID_INTEL, 187 PCI_DEVICE_ID_INTEL_82801DB_12, 188 PCI_ANY_ID, PCI_ANY_ID, 189 NULL); 190 if (speedstep_chipset_dev) 191 return 4; /* 4-M */ 192 193 speedstep_chipset_dev = pci_get_subsys(PCI_VENDOR_ID_INTEL, 194 PCI_DEVICE_ID_INTEL_82801CA_12, 195 PCI_ANY_ID, PCI_ANY_ID, 196 NULL); 197 if (speedstep_chipset_dev) 198 return 3; /* 3-M */ 199 200 201 speedstep_chipset_dev = pci_get_subsys(PCI_VENDOR_ID_INTEL, 202 PCI_DEVICE_ID_INTEL_82801BA_10, 203 PCI_ANY_ID, PCI_ANY_ID, 204 NULL); 205 if (speedstep_chipset_dev) { 206 /* speedstep.c causes lockups on Dell Inspirons 8000 and 207 * 8100 which use a pretty old revision of the 82815 208 * host bridge. Abort on these systems. 209 */ 210 struct pci_dev *hostbridge; 211 212 hostbridge = pci_get_subsys(PCI_VENDOR_ID_INTEL, 213 PCI_DEVICE_ID_INTEL_82815_MC, 214 PCI_ANY_ID, PCI_ANY_ID, 215 NULL); 216 217 if (!hostbridge) 218 return 2; /* 2-M */ 219 220 if (hostbridge->revision < 5) { 221 pr_debug("hostbridge does not support speedstep\n"); 222 speedstep_chipset_dev = NULL; 223 pci_dev_put(hostbridge); 224 return 0; 225 } 226 227 pci_dev_put(hostbridge); 228 return 2; /* 2-M */ 229 } 230 231 return 0; 232 } 233 234 static void get_freq_data(void *_speed) 235 { 236 unsigned int *speed = _speed; 237 238 *speed = speedstep_get_frequency(speedstep_processor); 239 } 240 241 static unsigned int speedstep_get(unsigned int cpu) 242 { 243 unsigned int speed; 244 245 /* You're supposed to ensure CPU is online. */ 246 if (smp_call_function_single(cpu, get_freq_data, &speed, 1) != 0) 247 BUG(); 248 249 pr_debug("detected %u kHz as current frequency\n", speed); 250 return speed; 251 } 252 253 /** 254 * speedstep_target - set a new CPUFreq policy 255 * @policy: new policy 256 * @index: index of target frequency 257 * 258 * Sets a new CPUFreq policy. 259 */ 260 static int speedstep_target(struct cpufreq_policy *policy, unsigned int index) 261 { 262 unsigned int policy_cpu; 263 264 policy_cpu = cpumask_any_and(policy->cpus, cpu_online_mask); 265 266 smp_call_function_single(policy_cpu, _speedstep_set_state, &index, 267 true); 268 269 return 0; 270 } 271 272 273 struct get_freqs { 274 struct cpufreq_policy *policy; 275 int ret; 276 }; 277 278 static void get_freqs_on_cpu(void *_get_freqs) 279 { 280 struct get_freqs *get_freqs = _get_freqs; 281 282 get_freqs->ret = 283 speedstep_get_freqs(speedstep_processor, 284 &speedstep_freqs[SPEEDSTEP_LOW].frequency, 285 &speedstep_freqs[SPEEDSTEP_HIGH].frequency, 286 &get_freqs->policy->cpuinfo.transition_latency, 287 &speedstep_set_state); 288 } 289 290 static int speedstep_cpu_init(struct cpufreq_policy *policy) 291 { 292 unsigned int policy_cpu; 293 struct get_freqs gf; 294 295 /* only run on CPU to be set, or on its sibling */ 296 #ifdef CONFIG_SMP 297 cpumask_copy(policy->cpus, topology_sibling_cpumask(policy->cpu)); 298 #endif 299 policy_cpu = cpumask_any_and(policy->cpus, cpu_online_mask); 300 301 /* detect low and high frequency and transition latency */ 302 gf.policy = policy; 303 smp_call_function_single(policy_cpu, get_freqs_on_cpu, &gf, 1); 304 if (gf.ret) 305 return gf.ret; 306 307 policy->freq_table = speedstep_freqs; 308 309 return 0; 310 } 311 312 313 static struct cpufreq_driver speedstep_driver = { 314 .name = "speedstep-ich", 315 .verify = cpufreq_generic_frequency_table_verify, 316 .target_index = speedstep_target, 317 .init = speedstep_cpu_init, 318 .get = speedstep_get, 319 .attr = cpufreq_generic_attr, 320 }; 321 322 static const struct x86_cpu_id ss_smi_ids[] = { 323 { X86_VENDOR_INTEL, 6, 0xb, }, 324 { X86_VENDOR_INTEL, 6, 0x8, }, 325 { X86_VENDOR_INTEL, 15, 2 }, 326 {} 327 }; 328 #if 0 329 /* Autoload or not? Do not for now. */ 330 MODULE_DEVICE_TABLE(x86cpu, ss_smi_ids); 331 #endif 332 333 /** 334 * speedstep_init - initializes the SpeedStep CPUFreq driver 335 * 336 * Initializes the SpeedStep support. Returns -ENODEV on unsupported 337 * devices, -EINVAL on problems during initiatization, and zero on 338 * success. 339 */ 340 static int __init speedstep_init(void) 341 { 342 if (!x86_match_cpu(ss_smi_ids)) 343 return -ENODEV; 344 345 /* detect processor */ 346 speedstep_processor = speedstep_detect_processor(); 347 if (!speedstep_processor) { 348 pr_debug("Intel(R) SpeedStep(TM) capable processor " 349 "not found\n"); 350 return -ENODEV; 351 } 352 353 /* detect chipset */ 354 if (!speedstep_detect_chipset()) { 355 pr_debug("Intel(R) SpeedStep(TM) for this chipset not " 356 "(yet) available.\n"); 357 return -ENODEV; 358 } 359 360 /* activate speedstep support */ 361 if (speedstep_activate()) { 362 pci_dev_put(speedstep_chipset_dev); 363 return -EINVAL; 364 } 365 366 if (speedstep_find_register()) 367 return -ENODEV; 368 369 return cpufreq_register_driver(&speedstep_driver); 370 } 371 372 373 /** 374 * speedstep_exit - unregisters SpeedStep support 375 * 376 * Unregisters SpeedStep support. 377 */ 378 static void __exit speedstep_exit(void) 379 { 380 pci_dev_put(speedstep_chipset_dev); 381 cpufreq_unregister_driver(&speedstep_driver); 382 } 383 384 385 MODULE_AUTHOR("Dave Jones, Dominik Brodowski <linux@brodo.de>"); 386 MODULE_DESCRIPTION("Speedstep driver for Intel mobile processors on chipsets " 387 "with ICH-M southbridges."); 388 MODULE_LICENSE("GPL"); 389 390 module_init(speedstep_init); 391 module_exit(speedstep_exit); 392