1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28#include <linux/kernel.h>
29#include <linux/smp.h>
30#include <linux/module.h>
31#include <linux/init.h>
32#include <linux/cpufreq.h>
33#include <linux/slab.h>
34#include <linux/string.h>
35#include <linux/cpumask.h>
36#include <linux/sched.h>
37#include <linux/io.h>
38#include <linux/delay.h>
39
40#include <asm/msr.h>
41
42#include <linux/acpi.h>
43#include <linux/mutex.h>
44#include <acpi/processor.h>
45
46#define PFX "powernow-k8: "
47#define VERSION "version 2.20.00"
48#include "powernow-k8.h"
49
50
51static DEFINE_MUTEX(fidvid_mutex);
52
53static DEFINE_PER_CPU(struct powernow_k8_data *, powernow_data);
54
55static int cpu_family = CPU_OPTERON;
56
57#ifndef CONFIG_SMP
58static inline const struct cpumask *cpu_core_mask(int cpu)
59{
60 return cpumask_of(0);
61}
62#endif
63
64
65static u32 find_freq_from_fid(u32 fid)
66{
67 return 800 + (fid * 100);
68}
69
70
71static u32 find_khz_freq_from_fid(u32 fid)
72{
73 return 1000 * find_freq_from_fid(fid);
74}
75
76static u32 find_khz_freq_from_pstate(struct cpufreq_frequency_table *data,
77 u32 pstate)
78{
79 return data[pstate].frequency;
80}
81
82
83
84
85
86
87
88static u32 convert_fid_to_vco_fid(u32 fid)
89{
90 if (fid < HI_FID_TABLE_BOTTOM)
91 return 8 + (2 * fid);
92 else
93 return fid;
94}
95
96
97
98
99
100static int pending_bit_stuck(void)
101{
102 u32 lo, hi;
103
104 if (cpu_family == CPU_HW_PSTATE)
105 return 0;
106
107 rdmsr(MSR_FIDVID_STATUS, lo, hi);
108 return lo & MSR_S_LO_CHANGE_PENDING ? 1 : 0;
109}
110
111
112
113
114
115static int query_current_values_with_pending_wait(struct powernow_k8_data *data)
116{
117 u32 lo, hi;
118 u32 i = 0;
119
120 if (cpu_family == CPU_HW_PSTATE) {
121 rdmsr(MSR_PSTATE_STATUS, lo, hi);
122 i = lo & HW_PSTATE_MASK;
123 data->currpstate = i;
124
125
126
127
128
129 if ((boot_cpu_data.x86 == 0x11) && (i >= data->numps))
130 data->currpstate = HW_PSTATE_0;
131
132 return 0;
133 }
134 do {
135 if (i++ > 10000) {
136 dprintk("detected change pending stuck\n");
137 return 1;
138 }
139 rdmsr(MSR_FIDVID_STATUS, lo, hi);
140 } while (lo & MSR_S_LO_CHANGE_PENDING);
141
142 data->currvid = hi & MSR_S_HI_CURRENT_VID;
143 data->currfid = lo & MSR_S_LO_CURRENT_FID;
144
145 return 0;
146}
147
148
149static void count_off_irt(struct powernow_k8_data *data)
150{
151 udelay((1 << data->irt) * 10);
152 return;
153}
154
155
156static void count_off_vst(struct powernow_k8_data *data)
157{
158 udelay(data->vstable * VST_UNITS_20US);
159 return;
160}
161
162
163static void fidvid_msr_init(void)
164{
165 u32 lo, hi;
166 u8 fid, vid;
167
168 rdmsr(MSR_FIDVID_STATUS, lo, hi);
169 vid = hi & MSR_S_HI_CURRENT_VID;
170 fid = lo & MSR_S_LO_CURRENT_FID;
171 lo = fid | (vid << MSR_C_LO_VID_SHIFT);
172 hi = MSR_C_HI_STP_GNT_BENIGN;
173 dprintk("cpu%d, init lo 0x%x, hi 0x%x\n", smp_processor_id(), lo, hi);
174 wrmsr(MSR_FIDVID_CTL, lo, hi);
175}
176
177
178static int write_new_fid(struct powernow_k8_data *data, u32 fid)
179{
180 u32 lo;
181 u32 savevid = data->currvid;
182 u32 i = 0;
183
184 if ((fid & INVALID_FID_MASK) || (data->currvid & INVALID_VID_MASK)) {
185 printk(KERN_ERR PFX "internal error - overflow on fid write\n");
186 return 1;
187 }
188
189 lo = fid;
190 lo |= (data->currvid << MSR_C_LO_VID_SHIFT);
191 lo |= MSR_C_LO_INIT_FID_VID;
192
193 dprintk("writing fid 0x%x, lo 0x%x, hi 0x%x\n",
194 fid, lo, data->plllock * PLL_LOCK_CONVERSION);
195
196 do {
197 wrmsr(MSR_FIDVID_CTL, lo, data->plllock * PLL_LOCK_CONVERSION);
198 if (i++ > 100) {
199 printk(KERN_ERR PFX
200 "Hardware error - pending bit very stuck - "
201 "no further pstate changes possible\n");
202 return 1;
203 }
204 } while (query_current_values_with_pending_wait(data));
205
206 count_off_irt(data);
207
208 if (savevid != data->currvid) {
209 printk(KERN_ERR PFX
210 "vid change on fid trans, old 0x%x, new 0x%x\n",
211 savevid, data->currvid);
212 return 1;
213 }
214
215 if (fid != data->currfid) {
216 printk(KERN_ERR PFX
217 "fid trans failed, fid 0x%x, curr 0x%x\n", fid,
218 data->currfid);
219 return 1;
220 }
221
222 return 0;
223}
224
225
226static int write_new_vid(struct powernow_k8_data *data, u32 vid)
227{
228 u32 lo;
229 u32 savefid = data->currfid;
230 int i = 0;
231
232 if ((data->currfid & INVALID_FID_MASK) || (vid & INVALID_VID_MASK)) {
233 printk(KERN_ERR PFX "internal error - overflow on vid write\n");
234 return 1;
235 }
236
237 lo = data->currfid;
238 lo |= (vid << MSR_C_LO_VID_SHIFT);
239 lo |= MSR_C_LO_INIT_FID_VID;
240
241 dprintk("writing vid 0x%x, lo 0x%x, hi 0x%x\n",
242 vid, lo, STOP_GRANT_5NS);
243
244 do {
245 wrmsr(MSR_FIDVID_CTL, lo, STOP_GRANT_5NS);
246 if (i++ > 100) {
247 printk(KERN_ERR PFX "internal error - pending bit "
248 "very stuck - no further pstate "
249 "changes possible\n");
250 return 1;
251 }
252 } while (query_current_values_with_pending_wait(data));
253
254 if (savefid != data->currfid) {
255 printk(KERN_ERR PFX "fid changed on vid trans, old "
256 "0x%x new 0x%x\n",
257 savefid, data->currfid);
258 return 1;
259 }
260
261 if (vid != data->currvid) {
262 printk(KERN_ERR PFX "vid trans failed, vid 0x%x, "
263 "curr 0x%x\n",
264 vid, data->currvid);
265 return 1;
266 }
267
268 return 0;
269}
270
271
272
273
274
275
276static int decrease_vid_code_by_step(struct powernow_k8_data *data,
277 u32 reqvid, u32 step)
278{
279 if ((data->currvid - reqvid) > step)
280 reqvid = data->currvid - step;
281
282 if (write_new_vid(data, reqvid))
283 return 1;
284
285 count_off_vst(data);
286
287 return 0;
288}
289
290
291static int transition_pstate(struct powernow_k8_data *data, u32 pstate)
292{
293 wrmsr(MSR_PSTATE_CTRL, pstate, 0);
294 data->currpstate = pstate;
295 return 0;
296}
297
298
299static int transition_fid_vid(struct powernow_k8_data *data,
300 u32 reqfid, u32 reqvid)
301{
302 if (core_voltage_pre_transition(data, reqvid, reqfid))
303 return 1;
304
305 if (core_frequency_transition(data, reqfid))
306 return 1;
307
308 if (core_voltage_post_transition(data, reqvid))
309 return 1;
310
311 if (query_current_values_with_pending_wait(data))
312 return 1;
313
314 if ((reqfid != data->currfid) || (reqvid != data->currvid)) {
315 printk(KERN_ERR PFX "failed (cpu%d): req 0x%x 0x%x, "
316 "curr 0x%x 0x%x\n",
317 smp_processor_id(),
318 reqfid, reqvid, data->currfid, data->currvid);
319 return 1;
320 }
321
322 dprintk("transitioned (cpu%d): new fid 0x%x, vid 0x%x\n",
323 smp_processor_id(), data->currfid, data->currvid);
324
325 return 0;
326}
327
328
329static int core_voltage_pre_transition(struct powernow_k8_data *data,
330 u32 reqvid, u32 reqfid)
331{
332 u32 rvosteps = data->rvo;
333 u32 savefid = data->currfid;
334 u32 maxvid, lo, rvomult = 1;
335
336 dprintk("ph1 (cpu%d): start, currfid 0x%x, currvid 0x%x, "
337 "reqvid 0x%x, rvo 0x%x\n",
338 smp_processor_id(),
339 data->currfid, data->currvid, reqvid, data->rvo);
340
341 if ((savefid < LO_FID_TABLE_TOP) && (reqfid < LO_FID_TABLE_TOP))
342 rvomult = 2;
343 rvosteps *= rvomult;
344 rdmsr(MSR_FIDVID_STATUS, lo, maxvid);
345 maxvid = 0x1f & (maxvid >> 16);
346 dprintk("ph1 maxvid=0x%x\n", maxvid);
347 if (reqvid < maxvid)
348 reqvid = maxvid;
349
350 while (data->currvid > reqvid) {
351 dprintk("ph1: curr 0x%x, req vid 0x%x\n",
352 data->currvid, reqvid);
353 if (decrease_vid_code_by_step(data, reqvid, data->vidmvs))
354 return 1;
355 }
356
357 while ((rvosteps > 0) &&
358 ((rvomult * data->rvo + data->currvid) > reqvid)) {
359 if (data->currvid == maxvid) {
360 rvosteps = 0;
361 } else {
362 dprintk("ph1: changing vid for rvo, req 0x%x\n",
363 data->currvid - 1);
364 if (decrease_vid_code_by_step(data, data->currvid-1, 1))
365 return 1;
366 rvosteps--;
367 }
368 }
369
370 if (query_current_values_with_pending_wait(data))
371 return 1;
372
373 if (savefid != data->currfid) {
374 printk(KERN_ERR PFX "ph1 err, currfid changed 0x%x\n",
375 data->currfid);
376 return 1;
377 }
378
379 dprintk("ph1 complete, currfid 0x%x, currvid 0x%x\n",
380 data->currfid, data->currvid);
381
382 return 0;
383}
384
385
386static int core_frequency_transition(struct powernow_k8_data *data, u32 reqfid)
387{
388 u32 vcoreqfid, vcocurrfid, vcofiddiff;
389 u32 fid_interval, savevid = data->currvid;
390
391 if (data->currfid == reqfid) {
392 printk(KERN_ERR PFX "ph2 null fid transition 0x%x\n",
393 data->currfid);
394 return 0;
395 }
396
397 dprintk("ph2 (cpu%d): starting, currfid 0x%x, currvid 0x%x, "
398 "reqfid 0x%x\n",
399 smp_processor_id(),
400 data->currfid, data->currvid, reqfid);
401
402 vcoreqfid = convert_fid_to_vco_fid(reqfid);
403 vcocurrfid = convert_fid_to_vco_fid(data->currfid);
404 vcofiddiff = vcocurrfid > vcoreqfid ? vcocurrfid - vcoreqfid
405 : vcoreqfid - vcocurrfid;
406
407 if ((reqfid <= LO_FID_TABLE_TOP) && (data->currfid <= LO_FID_TABLE_TOP))
408 vcofiddiff = 0;
409
410 while (vcofiddiff > 2) {
411 (data->currfid & 1) ? (fid_interval = 1) : (fid_interval = 2);
412
413 if (reqfid > data->currfid) {
414 if (data->currfid > LO_FID_TABLE_TOP) {
415 if (write_new_fid(data,
416 data->currfid + fid_interval))
417 return 1;
418 } else {
419 if (write_new_fid
420 (data,
421 2 + convert_fid_to_vco_fid(data->currfid)))
422 return 1;
423 }
424 } else {
425 if (write_new_fid(data, data->currfid - fid_interval))
426 return 1;
427 }
428
429 vcocurrfid = convert_fid_to_vco_fid(data->currfid);
430 vcofiddiff = vcocurrfid > vcoreqfid ? vcocurrfid - vcoreqfid
431 : vcoreqfid - vcocurrfid;
432 }
433
434 if (write_new_fid(data, reqfid))
435 return 1;
436
437 if (query_current_values_with_pending_wait(data))
438 return 1;
439
440 if (data->currfid != reqfid) {
441 printk(KERN_ERR PFX
442 "ph2: mismatch, failed fid transition, "
443 "curr 0x%x, req 0x%x\n",
444 data->currfid, reqfid);
445 return 1;
446 }
447
448 if (savevid != data->currvid) {
449 printk(KERN_ERR PFX "ph2: vid changed, save 0x%x, curr 0x%x\n",
450 savevid, data->currvid);
451 return 1;
452 }
453
454 dprintk("ph2 complete, currfid 0x%x, currvid 0x%x\n",
455 data->currfid, data->currvid);
456
457 return 0;
458}
459
460
461static int core_voltage_post_transition(struct powernow_k8_data *data,
462 u32 reqvid)
463{
464 u32 savefid = data->currfid;
465 u32 savereqvid = reqvid;
466
467 dprintk("ph3 (cpu%d): starting, currfid 0x%x, currvid 0x%x\n",
468 smp_processor_id(),
469 data->currfid, data->currvid);
470
471 if (reqvid != data->currvid) {
472 if (write_new_vid(data, reqvid))
473 return 1;
474
475 if (savefid != data->currfid) {
476 printk(KERN_ERR PFX
477 "ph3: bad fid change, save 0x%x, curr 0x%x\n",
478 savefid, data->currfid);
479 return 1;
480 }
481
482 if (data->currvid != reqvid) {
483 printk(KERN_ERR PFX
484 "ph3: failed vid transition\n, "
485 "req 0x%x, curr 0x%x",
486 reqvid, data->currvid);
487 return 1;
488 }
489 }
490
491 if (query_current_values_with_pending_wait(data))
492 return 1;
493
494 if (savereqvid != data->currvid) {
495 dprintk("ph3 failed, currvid 0x%x\n", data->currvid);
496 return 1;
497 }
498
499 if (savefid != data->currfid) {
500 dprintk("ph3 failed, currfid changed 0x%x\n",
501 data->currfid);
502 return 1;
503 }
504
505 dprintk("ph3 complete, currfid 0x%x, currvid 0x%x\n",
506 data->currfid, data->currvid);
507
508 return 0;
509}
510
511static void check_supported_cpu(void *_rc)
512{
513 u32 eax, ebx, ecx, edx;
514 int *rc = _rc;
515
516 *rc = -ENODEV;
517
518 if (current_cpu_data.x86_vendor != X86_VENDOR_AMD)
519 return;
520
521 eax = cpuid_eax(CPUID_PROCESSOR_SIGNATURE);
522 if (((eax & CPUID_XFAM) != CPUID_XFAM_K8) &&
523 ((eax & CPUID_XFAM) < CPUID_XFAM_10H))
524 return;
525
526 if ((eax & CPUID_XFAM) == CPUID_XFAM_K8) {
527 if (((eax & CPUID_USE_XFAM_XMOD) != CPUID_USE_XFAM_XMOD) ||
528 ((eax & CPUID_XMOD) > CPUID_XMOD_REV_MASK)) {
529 printk(KERN_INFO PFX
530 "Processor cpuid %x not supported\n", eax);
531 return;
532 }
533
534 eax = cpuid_eax(CPUID_GET_MAX_CAPABILITIES);
535 if (eax < CPUID_FREQ_VOLT_CAPABILITIES) {
536 printk(KERN_INFO PFX
537 "No frequency change capabilities detected\n");
538 return;
539 }
540
541 cpuid(CPUID_FREQ_VOLT_CAPABILITIES, &eax, &ebx, &ecx, &edx);
542 if ((edx & P_STATE_TRANSITION_CAPABLE)
543 != P_STATE_TRANSITION_CAPABLE) {
544 printk(KERN_INFO PFX
545 "Power state transitions not supported\n");
546 return;
547 }
548 } else {
549 cpuid(CPUID_FREQ_VOLT_CAPABILITIES, &eax, &ebx, &ecx, &edx);
550 if ((edx & USE_HW_PSTATE) == USE_HW_PSTATE)
551 cpu_family = CPU_HW_PSTATE;
552 else
553 return;
554 }
555
556 *rc = 0;
557}
558
559static int check_pst_table(struct powernow_k8_data *data, struct pst_s *pst,
560 u8 maxvid)
561{
562 unsigned int j;
563 u8 lastfid = 0xff;
564
565 for (j = 0; j < data->numps; j++) {
566 if (pst[j].vid > LEAST_VID) {
567 printk(KERN_ERR FW_BUG PFX "vid %d invalid : 0x%x\n",
568 j, pst[j].vid);
569 return -EINVAL;
570 }
571 if (pst[j].vid < data->rvo) {
572
573 printk(KERN_ERR FW_BUG PFX "0 vid exceeded with pstate"
574 " %d\n", j);
575 return -ENODEV;
576 }
577 if (pst[j].vid < maxvid + data->rvo) {
578
579 printk(KERN_ERR FW_BUG PFX "maxvid exceeded with pstate"
580 " %d\n", j);
581 return -ENODEV;
582 }
583 if (pst[j].fid > MAX_FID) {
584 printk(KERN_ERR FW_BUG PFX "maxfid exceeded with pstate"
585 " %d\n", j);
586 return -ENODEV;
587 }
588 if (j && (pst[j].fid < HI_FID_TABLE_BOTTOM)) {
589
590 printk(KERN_ERR FW_BUG PFX "two low fids - %d : "
591 "0x%x\n", j, pst[j].fid);
592 return -EINVAL;
593 }
594 if (pst[j].fid < lastfid)
595 lastfid = pst[j].fid;
596 }
597 if (lastfid & 1) {
598 printk(KERN_ERR FW_BUG PFX "lastfid invalid\n");
599 return -EINVAL;
600 }
601 if (lastfid > LO_FID_TABLE_TOP)
602 printk(KERN_INFO FW_BUG PFX
603 "first fid not from lo freq table\n");
604
605 return 0;
606}
607
608static void invalidate_entry(struct powernow_k8_data *data, unsigned int entry)
609{
610 data->powernow_table[entry].frequency = CPUFREQ_ENTRY_INVALID;
611}
612
613static void print_basics(struct powernow_k8_data *data)
614{
615 int j;
616 for (j = 0; j < data->numps; j++) {
617 if (data->powernow_table[j].frequency !=
618 CPUFREQ_ENTRY_INVALID) {
619 if (cpu_family == CPU_HW_PSTATE) {
620 printk(KERN_INFO PFX
621 " %d : pstate %d (%d MHz)\n", j,
622 data->powernow_table[j].index,
623 data->powernow_table[j].frequency/1000);
624 } else {
625 printk(KERN_INFO PFX
626 " %d : fid 0x%x (%d MHz), vid 0x%x\n",
627 j,
628 data->powernow_table[j].index & 0xff,
629 data->powernow_table[j].frequency/1000,
630 data->powernow_table[j].index >> 8);
631 }
632 }
633 }
634 if (data->batps)
635 printk(KERN_INFO PFX "Only %d pstates on battery\n",
636 data->batps);
637}
638
639static u32 freq_from_fid_did(u32 fid, u32 did)
640{
641 u32 mhz = 0;
642
643 if (boot_cpu_data.x86 == 0x10)
644 mhz = (100 * (fid + 0x10)) >> did;
645 else if (boot_cpu_data.x86 == 0x11)
646 mhz = (100 * (fid + 8)) >> did;
647 else
648 BUG();
649
650 return mhz * 1000;
651}
652
653static int fill_powernow_table(struct powernow_k8_data *data,
654 struct pst_s *pst, u8 maxvid)
655{
656 struct cpufreq_frequency_table *powernow_table;
657 unsigned int j;
658
659 if (data->batps) {
660
661 printk(KERN_WARNING PFX
662 "Only %d pstates usable (use ACPI driver for full "
663 "range\n", data->batps);
664 data->numps = data->batps;
665 }
666
667 for (j = 1; j < data->numps; j++) {
668 if (pst[j-1].fid >= pst[j].fid) {
669 printk(KERN_ERR PFX "PST out of sequence\n");
670 return -EINVAL;
671 }
672 }
673
674 if (data->numps < 2) {
675 printk(KERN_ERR PFX "no p states to transition\n");
676 return -ENODEV;
677 }
678
679 if (check_pst_table(data, pst, maxvid))
680 return -EINVAL;
681
682 powernow_table = kmalloc((sizeof(struct cpufreq_frequency_table)
683 * (data->numps + 1)), GFP_KERNEL);
684 if (!powernow_table) {
685 printk(KERN_ERR PFX "powernow_table memory alloc failure\n");
686 return -ENOMEM;
687 }
688
689 for (j = 0; j < data->numps; j++) {
690 int freq;
691 powernow_table[j].index = pst[j].fid;
692 powernow_table[j].index |= (pst[j].vid << 8);
693 freq = find_khz_freq_from_fid(pst[j].fid);
694 powernow_table[j].frequency = freq;
695 }
696 powernow_table[data->numps].frequency = CPUFREQ_TABLE_END;
697 powernow_table[data->numps].index = 0;
698
699 if (query_current_values_with_pending_wait(data)) {
700 kfree(powernow_table);
701 return -EIO;
702 }
703
704 dprintk("cfid 0x%x, cvid 0x%x\n", data->currfid, data->currvid);
705 data->powernow_table = powernow_table;
706 if (cpumask_first(cpu_core_mask(data->cpu)) == data->cpu)
707 print_basics(data);
708
709 for (j = 0; j < data->numps; j++)
710 if ((pst[j].fid == data->currfid) &&
711 (pst[j].vid == data->currvid))
712 return 0;
713
714 dprintk("currfid/vid do not match PST, ignoring\n");
715 return 0;
716}
717
718
719static int find_psb_table(struct powernow_k8_data *data)
720{
721 struct psb_s *psb;
722 unsigned int i;
723 u32 mvs;
724 u8 maxvid;
725 u32 cpst = 0;
726 u32 thiscpuid;
727
728 for (i = 0xc0000; i < 0xffff0; i += 0x10) {
729
730
731
732 psb = phys_to_virt(i);
733 if (memcmp(psb, PSB_ID_STRING, PSB_ID_STRING_LEN) != 0)
734 continue;
735
736 dprintk("found PSB header at 0x%p\n", psb);
737
738 dprintk("table vers: 0x%x\n", psb->tableversion);
739 if (psb->tableversion != PSB_VERSION_1_4) {
740 printk(KERN_ERR FW_BUG PFX "PSB table is not v1.4\n");
741 return -ENODEV;
742 }
743
744 dprintk("flags: 0x%x\n", psb->flags1);
745 if (psb->flags1) {
746 printk(KERN_ERR FW_BUG PFX "unknown flags\n");
747 return -ENODEV;
748 }
749
750 data->vstable = psb->vstable;
751 dprintk("voltage stabilization time: %d(*20us)\n",
752 data->vstable);
753
754 dprintk("flags2: 0x%x\n", psb->flags2);
755 data->rvo = psb->flags2 & 3;
756 data->irt = ((psb->flags2) >> 2) & 3;
757 mvs = ((psb->flags2) >> 4) & 3;
758 data->vidmvs = 1 << mvs;
759 data->batps = ((psb->flags2) >> 6) & 3;
760
761 dprintk("ramp voltage offset: %d\n", data->rvo);
762 dprintk("isochronous relief time: %d\n", data->irt);
763 dprintk("maximum voltage step: %d - 0x%x\n", mvs, data->vidmvs);
764
765 dprintk("numpst: 0x%x\n", psb->num_tables);
766 cpst = psb->num_tables;
767 if ((psb->cpuid == 0x00000fc0) ||
768 (psb->cpuid == 0x00000fe0)) {
769 thiscpuid = cpuid_eax(CPUID_PROCESSOR_SIGNATURE);
770 if ((thiscpuid == 0x00000fc0) ||
771 (thiscpuid == 0x00000fe0))
772 cpst = 1;
773 }
774 if (cpst != 1) {
775 printk(KERN_ERR FW_BUG PFX "numpst must be 1\n");
776 return -ENODEV;
777 }
778
779 data->plllock = psb->plllocktime;
780 dprintk("plllocktime: 0x%x (units 1us)\n", psb->plllocktime);
781 dprintk("maxfid: 0x%x\n", psb->maxfid);
782 dprintk("maxvid: 0x%x\n", psb->maxvid);
783 maxvid = psb->maxvid;
784
785 data->numps = psb->numps;
786 dprintk("numpstates: 0x%x\n", data->numps);
787 return fill_powernow_table(data,
788 (struct pst_s *)(psb+1), maxvid);
789 }
790
791
792
793
794
795
796
797
798
799
800
801 printk(KERN_ERR FW_BUG PFX "No PSB or ACPI _PSS objects\n");
802 return -ENODEV;
803}
804
805static void powernow_k8_acpi_pst_values(struct powernow_k8_data *data,
806 unsigned int index)
807{
808 acpi_integer control;
809
810 if (!data->acpi_data.state_count || (cpu_family == CPU_HW_PSTATE))
811 return;
812
813 control = data->acpi_data.states[index].control;
814 data->irt = (control >> IRT_SHIFT) & IRT_MASK;
815 data->rvo = (control >> RVO_SHIFT) & RVO_MASK;
816 data->exttype = (control >> EXT_TYPE_SHIFT) & EXT_TYPE_MASK;
817 data->plllock = (control >> PLL_L_SHIFT) & PLL_L_MASK;
818 data->vidmvs = 1 << ((control >> MVS_SHIFT) & MVS_MASK);
819 data->vstable = (control >> VST_SHIFT) & VST_MASK;
820}
821
822static int powernow_k8_cpu_init_acpi(struct powernow_k8_data *data)
823{
824 struct cpufreq_frequency_table *powernow_table;
825 int ret_val = -ENODEV;
826 acpi_integer control, status;
827
828 if (acpi_processor_register_performance(&data->acpi_data, data->cpu)) {
829 dprintk("register performance failed: bad ACPI data\n");
830 return -EIO;
831 }
832
833
834 if (data->acpi_data.state_count <= 1) {
835 dprintk("No ACPI P-States\n");
836 goto err_out;
837 }
838
839 control = data->acpi_data.control_register.space_id;
840 status = data->acpi_data.status_register.space_id;
841
842 if ((control != ACPI_ADR_SPACE_FIXED_HARDWARE) ||
843 (status != ACPI_ADR_SPACE_FIXED_HARDWARE)) {
844 dprintk("Invalid control/status registers (%x - %x)\n",
845 control, status);
846 goto err_out;
847 }
848
849
850 powernow_table = kmalloc((sizeof(struct cpufreq_frequency_table)
851 * (data->acpi_data.state_count + 1)), GFP_KERNEL);
852 if (!powernow_table) {
853 dprintk("powernow_table memory alloc failure\n");
854 goto err_out;
855 }
856
857 if (cpu_family == CPU_HW_PSTATE)
858 ret_val = fill_powernow_table_pstate(data, powernow_table);
859 else
860 ret_val = fill_powernow_table_fidvid(data, powernow_table);
861 if (ret_val)
862 goto err_out_mem;
863
864 powernow_table[data->acpi_data.state_count].frequency =
865 CPUFREQ_TABLE_END;
866 powernow_table[data->acpi_data.state_count].index = 0;
867 data->powernow_table = powernow_table;
868
869
870 data->numps = data->acpi_data.state_count;
871 if (cpumask_first(cpu_core_mask(data->cpu)) == data->cpu)
872 print_basics(data);
873 powernow_k8_acpi_pst_values(data, 0);
874
875
876 acpi_processor_notify_smm(THIS_MODULE);
877
878 if (!zalloc_cpumask_var(&data->acpi_data.shared_cpu_map, GFP_KERNEL)) {
879 printk(KERN_ERR PFX
880 "unable to alloc powernow_k8_data cpumask\n");
881 ret_val = -ENOMEM;
882 goto err_out_mem;
883 }
884
885 return 0;
886
887err_out_mem:
888 kfree(powernow_table);
889
890err_out:
891 acpi_processor_unregister_performance(&data->acpi_data, data->cpu);
892
893
894
895 data->acpi_data.state_count = 0;
896
897 return ret_val;
898}
899
900static int fill_powernow_table_pstate(struct powernow_k8_data *data,
901 struct cpufreq_frequency_table *powernow_table)
902{
903 int i;
904 u32 hi = 0, lo = 0;
905 rdmsr(MSR_PSTATE_CUR_LIMIT, hi, lo);
906 data->max_hw_pstate = (hi & HW_PSTATE_MAX_MASK) >> HW_PSTATE_MAX_SHIFT;
907
908 for (i = 0; i < data->acpi_data.state_count; i++) {
909 u32 index;
910
911 index = data->acpi_data.states[i].control & HW_PSTATE_MASK;
912 if (index > data->max_hw_pstate) {
913 printk(KERN_ERR PFX "invalid pstate %d - "
914 "bad value %d.\n", i, index);
915 printk(KERN_ERR PFX "Please report to BIOS "
916 "manufacturer\n");
917 invalidate_entry(data, i);
918 continue;
919 }
920 rdmsr(MSR_PSTATE_DEF_BASE + index, lo, hi);
921 if (!(hi & HW_PSTATE_VALID_MASK)) {
922 dprintk("invalid pstate %d, ignoring\n", index);
923 invalidate_entry(data, i);
924 continue;
925 }
926
927 powernow_table[i].index = index;
928
929
930 if (boot_cpu_data.x86 == 0x10 || boot_cpu_data.x86 == 0x11) {
931 powernow_table[i].frequency =
932 freq_from_fid_did(lo & 0x3f, (lo >> 6) & 7);
933 } else
934 powernow_table[i].frequency =
935 data->acpi_data.states[i].core_frequency * 1000;
936 }
937 return 0;
938}
939
940static int fill_powernow_table_fidvid(struct powernow_k8_data *data,
941 struct cpufreq_frequency_table *powernow_table)
942{
943 int i;
944 int cntlofreq = 0;
945
946 for (i = 0; i < data->acpi_data.state_count; i++) {
947 u32 fid;
948 u32 vid;
949 u32 freq, index;
950 acpi_integer status, control;
951
952 if (data->exttype) {
953 status = data->acpi_data.states[i].status;
954 fid = status & EXT_FID_MASK;
955 vid = (status >> VID_SHIFT) & EXT_VID_MASK;
956 } else {
957 control = data->acpi_data.states[i].control;
958 fid = control & FID_MASK;
959 vid = (control >> VID_SHIFT) & VID_MASK;
960 }
961
962 dprintk(" %d : fid 0x%x, vid 0x%x\n", i, fid, vid);
963
964 index = fid | (vid<<8);
965 powernow_table[i].index = index;
966
967 freq = find_khz_freq_from_fid(fid);
968 powernow_table[i].frequency = freq;
969
970
971 if ((freq > (MAX_FREQ * 1000)) || (freq < (MIN_FREQ * 1000))) {
972 dprintk("invalid freq %u kHz, ignoring\n", freq);
973 invalidate_entry(data, i);
974 continue;
975 }
976
977
978
979 if (vid == VID_OFF) {
980 dprintk("invalid vid %u, ignoring\n", vid);
981 invalidate_entry(data, i);
982 continue;
983 }
984
985
986 if (fid < HI_FID_TABLE_BOTTOM) {
987 if (cntlofreq) {
988
989
990 if ((freq != powernow_table[cntlofreq].frequency) ||
991 (index != powernow_table[cntlofreq].index)) {
992 printk(KERN_ERR PFX
993 "Too many lo freq table "
994 "entries\n");
995 return 1;
996 }
997
998 dprintk("double low frequency table entry, "
999 "ignoring it.\n");
1000 invalidate_entry(data, i);
1001 continue;
1002 } else
1003 cntlofreq = i;
1004 }
1005
1006 if (freq != (data->acpi_data.states[i].core_frequency * 1000)) {
1007 printk(KERN_INFO PFX "invalid freq entries "
1008 "%u kHz vs. %u kHz\n", freq,
1009 (unsigned int)
1010 (data->acpi_data.states[i].core_frequency
1011 * 1000));
1012 invalidate_entry(data, i);
1013 continue;
1014 }
1015 }
1016 return 0;
1017}
1018
1019static void powernow_k8_cpu_exit_acpi(struct powernow_k8_data *data)
1020{
1021 if (data->acpi_data.state_count)
1022 acpi_processor_unregister_performance(&data->acpi_data,
1023 data->cpu);
1024 free_cpumask_var(data->acpi_data.shared_cpu_map);
1025}
1026
1027static int get_transition_latency(struct powernow_k8_data *data)
1028{
1029 int max_latency = 0;
1030 int i;
1031 for (i = 0; i < data->acpi_data.state_count; i++) {
1032 int cur_latency = data->acpi_data.states[i].transition_latency
1033 + data->acpi_data.states[i].bus_master_latency;
1034 if (cur_latency > max_latency)
1035 max_latency = cur_latency;
1036 }
1037 if (max_latency == 0) {
1038
1039
1040
1041
1042
1043
1044
1045 if (!boot_cpu_data.x86 == 0x11)
1046 printk(KERN_ERR FW_WARN PFX "Invalid zero transition "
1047 "latency\n");
1048 max_latency = 1;
1049 }
1050
1051 return 1000 * max_latency;
1052}
1053
1054
1055static int transition_frequency_fidvid(struct powernow_k8_data *data,
1056 unsigned int index)
1057{
1058 u32 fid = 0;
1059 u32 vid = 0;
1060 int res, i;
1061 struct cpufreq_freqs freqs;
1062
1063 dprintk("cpu %d transition to index %u\n", smp_processor_id(), index);
1064
1065
1066
1067
1068
1069
1070 fid = data->powernow_table[index].index & 0xFF;
1071 vid = (data->powernow_table[index].index & 0xFF00) >> 8;
1072
1073 dprintk("table matched fid 0x%x, giving vid 0x%x\n", fid, vid);
1074
1075 if (query_current_values_with_pending_wait(data))
1076 return 1;
1077
1078 if ((data->currvid == vid) && (data->currfid == fid)) {
1079 dprintk("target matches current values (fid 0x%x, vid 0x%x)\n",
1080 fid, vid);
1081 return 0;
1082 }
1083
1084 dprintk("cpu %d, changing to fid 0x%x, vid 0x%x\n",
1085 smp_processor_id(), fid, vid);
1086 freqs.old = find_khz_freq_from_fid(data->currfid);
1087 freqs.new = find_khz_freq_from_fid(fid);
1088
1089 for_each_cpu(i, data->available_cores) {
1090 freqs.cpu = i;
1091 cpufreq_notify_transition(&freqs, CPUFREQ_PRECHANGE);
1092 }
1093
1094 res = transition_fid_vid(data, fid, vid);
1095 freqs.new = find_khz_freq_from_fid(data->currfid);
1096
1097 for_each_cpu(i, data->available_cores) {
1098 freqs.cpu = i;
1099 cpufreq_notify_transition(&freqs, CPUFREQ_POSTCHANGE);
1100 }
1101 return res;
1102}
1103
1104
1105static int transition_frequency_pstate(struct powernow_k8_data *data,
1106 unsigned int index)
1107{
1108 u32 pstate = 0;
1109 int res, i;
1110 struct cpufreq_freqs freqs;
1111
1112 dprintk("cpu %d transition to index %u\n", smp_processor_id(), index);
1113
1114
1115 pstate = index & HW_PSTATE_MASK;
1116 if (pstate > data->max_hw_pstate)
1117 return 0;
1118 freqs.old = find_khz_freq_from_pstate(data->powernow_table,
1119 data->currpstate);
1120 freqs.new = find_khz_freq_from_pstate(data->powernow_table, pstate);
1121
1122 for_each_cpu(i, data->available_cores) {
1123 freqs.cpu = i;
1124 cpufreq_notify_transition(&freqs, CPUFREQ_PRECHANGE);
1125 }
1126
1127 res = transition_pstate(data, pstate);
1128 freqs.new = find_khz_freq_from_pstate(data->powernow_table, pstate);
1129
1130 for_each_cpu(i, data->available_cores) {
1131 freqs.cpu = i;
1132 cpufreq_notify_transition(&freqs, CPUFREQ_POSTCHANGE);
1133 }
1134 return res;
1135}
1136
1137
1138static int powernowk8_target(struct cpufreq_policy *pol,
1139 unsigned targfreq, unsigned relation)
1140{
1141 cpumask_t oldmask;
1142 struct powernow_k8_data *data = per_cpu(powernow_data, pol->cpu);
1143 u32 checkfid;
1144 u32 checkvid;
1145 unsigned int newstate;
1146 int ret = -EIO;
1147
1148 if (!data)
1149 return -EINVAL;
1150
1151 checkfid = data->currfid;
1152 checkvid = data->currvid;
1153
1154
1155 oldmask = current->cpus_allowed;
1156 set_cpus_allowed_ptr(current, &cpumask_of_cpu(pol->cpu));
1157
1158 if (smp_processor_id() != pol->cpu) {
1159 printk(KERN_ERR PFX "limiting to cpu %u failed\n", pol->cpu);
1160 goto err_out;
1161 }
1162
1163 if (pending_bit_stuck()) {
1164 printk(KERN_ERR PFX "failing targ, change pending bit set\n");
1165 goto err_out;
1166 }
1167
1168 dprintk("targ: cpu %d, %d kHz, min %d, max %d, relation %d\n",
1169 pol->cpu, targfreq, pol->min, pol->max, relation);
1170
1171 if (query_current_values_with_pending_wait(data))
1172 goto err_out;
1173
1174 if (cpu_family != CPU_HW_PSTATE) {
1175 dprintk("targ: curr fid 0x%x, vid 0x%x\n",
1176 data->currfid, data->currvid);
1177
1178 if ((checkvid != data->currvid) ||
1179 (checkfid != data->currfid)) {
1180 printk(KERN_INFO PFX
1181 "error - out of sync, fix 0x%x 0x%x, "
1182 "vid 0x%x 0x%x\n",
1183 checkfid, data->currfid,
1184 checkvid, data->currvid);
1185 }
1186 }
1187
1188 if (cpufreq_frequency_table_target(pol, data->powernow_table,
1189 targfreq, relation, &newstate))
1190 goto err_out;
1191
1192 mutex_lock(&fidvid_mutex);
1193
1194 powernow_k8_acpi_pst_values(data, newstate);
1195
1196 if (cpu_family == CPU_HW_PSTATE)
1197 ret = transition_frequency_pstate(data, newstate);
1198 else
1199 ret = transition_frequency_fidvid(data, newstate);
1200 if (ret) {
1201 printk(KERN_ERR PFX "transition frequency failed\n");
1202 ret = 1;
1203 mutex_unlock(&fidvid_mutex);
1204 goto err_out;
1205 }
1206 mutex_unlock(&fidvid_mutex);
1207
1208 if (cpu_family == CPU_HW_PSTATE)
1209 pol->cur = find_khz_freq_from_pstate(data->powernow_table,
1210 newstate);
1211 else
1212 pol->cur = find_khz_freq_from_fid(data->currfid);
1213 ret = 0;
1214
1215err_out:
1216 set_cpus_allowed_ptr(current, &oldmask);
1217 return ret;
1218}
1219
1220
1221static int powernowk8_verify(struct cpufreq_policy *pol)
1222{
1223 struct powernow_k8_data *data = per_cpu(powernow_data, pol->cpu);
1224
1225 if (!data)
1226 return -EINVAL;
1227
1228 return cpufreq_frequency_table_verify(pol, data->powernow_table);
1229}
1230
1231struct init_on_cpu {
1232 struct powernow_k8_data *data;
1233 int rc;
1234};
1235
1236static void __cpuinit powernowk8_cpu_init_on_cpu(void *_init_on_cpu)
1237{
1238 struct init_on_cpu *init_on_cpu = _init_on_cpu;
1239
1240 if (pending_bit_stuck()) {
1241 printk(KERN_ERR PFX "failing init, change pending bit set\n");
1242 init_on_cpu->rc = -ENODEV;
1243 return;
1244 }
1245
1246 if (query_current_values_with_pending_wait(init_on_cpu->data)) {
1247 init_on_cpu->rc = -ENODEV;
1248 return;
1249 }
1250
1251 if (cpu_family == CPU_OPTERON)
1252 fidvid_msr_init();
1253
1254 init_on_cpu->rc = 0;
1255}
1256
1257
1258static int __cpuinit powernowk8_cpu_init(struct cpufreq_policy *pol)
1259{
1260 static const char ACPI_PSS_BIOS_BUG_MSG[] =
1261 KERN_ERR FW_BUG PFX "No compatible ACPI _PSS objects found.\n"
1262 FW_BUG PFX "Try again with latest BIOS.\n";
1263 struct powernow_k8_data *data;
1264 struct init_on_cpu init_on_cpu;
1265 int rc;
1266
1267 if (!cpu_online(pol->cpu))
1268 return -ENODEV;
1269
1270 smp_call_function_single(pol->cpu, check_supported_cpu, &rc, 1);
1271 if (rc)
1272 return -ENODEV;
1273
1274 data = kzalloc(sizeof(struct powernow_k8_data), GFP_KERNEL);
1275 if (!data) {
1276 printk(KERN_ERR PFX "unable to alloc powernow_k8_data");
1277 return -ENOMEM;
1278 }
1279
1280 data->cpu = pol->cpu;
1281 data->currpstate = HW_PSTATE_INVALID;
1282
1283 if (powernow_k8_cpu_init_acpi(data)) {
1284
1285
1286
1287
1288 if (num_online_cpus() != 1) {
1289 printk_once(ACPI_PSS_BIOS_BUG_MSG);
1290 goto err_out;
1291 }
1292 if (pol->cpu != 0) {
1293 printk(KERN_ERR FW_BUG PFX "No ACPI _PSS objects for "
1294 "CPU other than CPU0. Complain to your BIOS "
1295 "vendor.\n");
1296 goto err_out;
1297 }
1298 rc = find_psb_table(data);
1299 if (rc)
1300 goto err_out;
1301
1302
1303
1304 pol->cpuinfo.transition_latency = (
1305 ((data->rvo + 8) * data->vstable * VST_UNITS_20US) +
1306 ((1 << data->irt) * 30)) * 1000;
1307 } else
1308 pol->cpuinfo.transition_latency = get_transition_latency(data);
1309
1310
1311 init_on_cpu.data = data;
1312 smp_call_function_single(data->cpu, powernowk8_cpu_init_on_cpu,
1313 &init_on_cpu, 1);
1314 rc = init_on_cpu.rc;
1315 if (rc != 0)
1316 goto err_out_exit_acpi;
1317
1318 if (cpu_family == CPU_HW_PSTATE)
1319 cpumask_copy(pol->cpus, cpumask_of(pol->cpu));
1320 else
1321 cpumask_copy(pol->cpus, cpu_core_mask(pol->cpu));
1322 data->available_cores = pol->cpus;
1323
1324 if (cpu_family == CPU_HW_PSTATE)
1325 pol->cur = find_khz_freq_from_pstate(data->powernow_table,
1326 data->currpstate);
1327 else
1328 pol->cur = find_khz_freq_from_fid(data->currfid);
1329 dprintk("policy current frequency %d kHz\n", pol->cur);
1330
1331
1332 if (cpufreq_frequency_table_cpuinfo(pol, data->powernow_table)) {
1333 printk(KERN_ERR FW_BUG PFX "invalid powernow_table\n");
1334 powernow_k8_cpu_exit_acpi(data);
1335 kfree(data->powernow_table);
1336 kfree(data);
1337 return -EINVAL;
1338 }
1339
1340 cpufreq_frequency_table_get_attr(data->powernow_table, pol->cpu);
1341
1342 if (cpu_family == CPU_HW_PSTATE)
1343 dprintk("cpu_init done, current pstate 0x%x\n",
1344 data->currpstate);
1345 else
1346 dprintk("cpu_init done, current fid 0x%x, vid 0x%x\n",
1347 data->currfid, data->currvid);
1348
1349 per_cpu(powernow_data, pol->cpu) = data;
1350
1351 return 0;
1352
1353err_out_exit_acpi:
1354 powernow_k8_cpu_exit_acpi(data);
1355
1356err_out:
1357 kfree(data);
1358 return -ENODEV;
1359}
1360
1361static int __devexit powernowk8_cpu_exit(struct cpufreq_policy *pol)
1362{
1363 struct powernow_k8_data *data = per_cpu(powernow_data, pol->cpu);
1364
1365 if (!data)
1366 return -EINVAL;
1367
1368 powernow_k8_cpu_exit_acpi(data);
1369
1370 cpufreq_frequency_table_put_attr(pol->cpu);
1371
1372 kfree(data->powernow_table);
1373 kfree(data);
1374
1375 return 0;
1376}
1377
1378static void query_values_on_cpu(void *_err)
1379{
1380 int *err = _err;
1381 struct powernow_k8_data *data = __get_cpu_var(powernow_data);
1382
1383 *err = query_current_values_with_pending_wait(data);
1384}
1385
1386static unsigned int powernowk8_get(unsigned int cpu)
1387{
1388 struct powernow_k8_data *data = per_cpu(powernow_data, cpu);
1389 unsigned int khz = 0;
1390 int err;
1391
1392 if (!data)
1393 return -EINVAL;
1394
1395 smp_call_function_single(cpu, query_values_on_cpu, &err, true);
1396 if (err)
1397 goto out;
1398
1399 if (cpu_family == CPU_HW_PSTATE)
1400 khz = find_khz_freq_from_pstate(data->powernow_table,
1401 data->currpstate);
1402 else
1403 khz = find_khz_freq_from_fid(data->currfid);
1404
1405
1406out:
1407 return khz;
1408}
1409
1410static struct freq_attr *powernow_k8_attr[] = {
1411 &cpufreq_freq_attr_scaling_available_freqs,
1412 NULL,
1413};
1414
1415static struct cpufreq_driver cpufreq_amd64_driver = {
1416 .verify = powernowk8_verify,
1417 .target = powernowk8_target,
1418 .init = powernowk8_cpu_init,
1419 .exit = __devexit_p(powernowk8_cpu_exit),
1420 .get = powernowk8_get,
1421 .name = "powernow-k8",
1422 .owner = THIS_MODULE,
1423 .attr = powernow_k8_attr,
1424};
1425
1426
1427static int __cpuinit powernowk8_init(void)
1428{
1429 unsigned int i, supported_cpus = 0;
1430
1431 for_each_online_cpu(i) {
1432 int rc;
1433 smp_call_function_single(i, check_supported_cpu, &rc, 1);
1434 if (rc == 0)
1435 supported_cpus++;
1436 }
1437
1438 if (supported_cpus == num_online_cpus()) {
1439 printk(KERN_INFO PFX "Found %d %s "
1440 "processors (%d cpu cores) (" VERSION ")\n",
1441 num_online_nodes(),
1442 boot_cpu_data.x86_model_id, supported_cpus);
1443 return cpufreq_register_driver(&cpufreq_amd64_driver);
1444 }
1445
1446 return -ENODEV;
1447}
1448
1449
1450static void __exit powernowk8_exit(void)
1451{
1452 dprintk("exit\n");
1453
1454 cpufreq_unregister_driver(&cpufreq_amd64_driver);
1455}
1456
1457MODULE_AUTHOR("Paul Devriendt <paul.devriendt@amd.com> and "
1458 "Mark Langsdorf <mark.langsdorf@amd.com>");
1459MODULE_DESCRIPTION("AMD Athlon 64 and Opteron processor frequency driver.");
1460MODULE_LICENSE("GPL");
1461
1462late_initcall(powernowk8_init);
1463module_exit(powernowk8_exit);
1464
