3 #define K8_SET_FIDVID_DEBUG 0
5 #define K8_SET_FIDVID_ONE_BY_ONE 1
7 #define K8_SET_FIDVID_STORE_AP_APICID_AT_FIRST 1
15 static inline void print_debug_fv(const char *str, unsigned val)
17 #if K8_SET_FIDVID_DEBUG == 1
18 #if CONFIG_USE_PRINTK_IN_CAR
19 printk_debug("%s%x\r\n", str, val);
21 print_debug(str); print_debug_hex32(val); print_debug("\r\n");
26 static inline void print_debug_fv_8(const char *str, unsigned val)
28 #if K8_SET_FIDVID_DEBUG == 1
29 #if CONFIG_USE_PRINTK_IN_CAR
30 printk_debug("%s%02x\r\n", str, val);
32 print_debug(str); print_debug_hex8(val); print_debug("\r\n");
37 static inline void print_debug_fv_64(const char *str, unsigned val, unsigned val2)
39 #if K8_SET_FIDVID_DEBUG == 1
40 #if CONFIG_USE_PRINTK_IN_CAR
41 printk_debug("%s%x%x\r\n", str, val, val2);
43 print_debug(str); print_debug_hex32(val); print_debug_hex32(val2); print_debug("\r\n");
49 static void enable_fid_change(void)
55 nodes = ((pci_read_config32(PCI_DEV(0, 0x18, 0), 0x60) >> 4) & 7) + 1;
57 for (i = 0; i < nodes; i++) {
58 dword = pci_read_config32(PCI_DEV(0, 0x18+i, 3), 0xd8);
60 dword |= (2 << 28) | (0x02710);
61 pci_write_config32(PCI_DEV(0, 0x18+i, 3), 0xd8, dword);
64 pci_write_config32(PCI_DEV(0, 0x18+i, 3), 0xd4, dword);
66 /* disable the DRAM interface at first, it will be enabled
68 dword = pci_read_config32(PCI_DEV(0, 0x18+i, 2), 0x94);
70 pci_write_config32(PCI_DEV(0, 0x18+i, 2), 0x94, dword);
72 dword = 0x23070700; /* enable FID/VID change */
73 // dword = 0x00070000; /* enable FID/VID change */
74 pci_write_config32(PCI_DEV(0, 0x18+i, 3), 0x80, dword);
77 pci_write_config32(PCI_DEV(0, 0x18+i, 3), 0x84, dword);
82 #if K8_SET_FIDVID_ONE_BY_ONE == 0
83 static unsigned set_fidvid_without_init(unsigned fidvid)
89 fid = (fidvid >> 8) & 0x3f;
90 vid = (fidvid >> 16) & 0x3f;
94 msr.lo = (vid<<8) | fid;
95 wrmsr(0xc0010041, msr);
100 static u32 set_fidvid(unsigned apicid, unsigned fidvid, int showmessage)
103 /* CurrentFID--> 4x(00h) 5x(02h) 6x(04h) 7x(06h) ...
104 * --------------------------------------
105 * TargetFID | Next_FID, Next_FID, Next_FID, Next_FID ...
106 * | | Next_FID, Next_FID, Next_FID, Next_FID ...
107 * \|/ | Next_FID, Next_FID, Next_FID, Next_FID ...
109 static const u8 next_fid_200[] = {
110 /* x4 x5 x6 x7 x8 x9 x10 x11 x12 x13 x14 x15 x16 */
111 /* x4 */ 0, -1, -1, -1, 0, 0, 9, 10, 11, 12, 13, 14, 15, /* 800 */
112 /* x5 */ -1, 0, -1, -1, -1, 5, 5, 5, 11, 12, 13, 14, 15, /* 1000 */
113 /* x6 */ -1, -1, 0, -1, -1, -1, -1, 6, 6, 6, 13, 14, 15, /* 1200 */
114 /* x7 */ -1, -1, -1, 0, -1, -1, -1, -1, -1, 7, 7, 7, 15, /* 1400 */
115 /* lower table to upper table boarder (table 70 and 71 in BKDG) */
116 /* x8 */ 8, -1, -1, -1, 0, 8, 9, 10, 11, 12, 13, 14, 15, /* 1600 */
117 /* x9 */ 9, 9, -1, -1, 9, 0, 9, 10, 11, 12, 13, 14, 15, /* 1800 */
118 /*x10 */ 9, 10, -1, -1, 9, 10, 0, 10, 11, 12, 13, 14, 15, /* 2000 */
119 /*x11 */ 9, 11, 11, -1, 9, 10, 11, 0, 11, 12, 13, 14, 15, /* 2200 */
120 /*x12 */ 9, 11, 12, -1, 9, 10, 11, 12, 0, 12, 13, 14, 15, /* 2400 */
121 /*x13 */ 9, 11, 13, 13, 9, 10, 11, 12, 13, 0, 13, 14, 15, /* 2600 */
122 /*x14 */ 9, 11, 13, 14, 9, 10, 11, 12, 13, 14, 0, 14, 15, /* 2800 */
123 /*x15 */ 9, 11, 13, 15, 9, 10, 11, 12, 13, 14, 15, 0, 15, /* 3000 */
124 /*x15 */ 9, 11, 13, 15, 9, 10, 11, 12, 13, 14, 15, 16, 0, /* 3200 */
141 if (apicid != apicidx) {
142 #if CONFIG_USE_PRINTK_IN_CAR
143 printk_err("wrong apicid, we want change %x, but it is %x\r\n", apicid, apicidx);
145 print_err("wrong apicid, we want change "); print_err_hex8(apicid); print_err(" but it is "); print_err_hex8(apicidx); print_err("\r\n");
150 fid_new = (fidvid >> 8) & 0x3f;
151 vid_new = (fidvid >> 16) & 0x3f;
153 msr = rdmsr(0xc0010042);
155 vid_cur = msr.hi & 0x3f;
156 fid_cur = msr.lo & 0x3f;
158 if ((vid_cur == vid_new) && (fid_cur == fid_new))
161 vid_max = (msr.hi >> (48-32)) & 0x3f;
162 fid_max = ((msr.lo >> 16) & 0x3f); /* max fid */
165 if (fid_max >= ((25 - 4) * 2)) { /* FX max fid is 5G */
166 fid_max = ((msr.lo >> 8) & 0x3f) + 5 * 2; /* max FID is min fid + 1G */
167 if (fid_max >= ((25-4) * 2)) {
168 fid_max = (10-4) * 2; /* hard set to 2G */
174 /* TODO - make this more correct. Not a big deal for setting max...
176 * if TargetFID > InitialFID
177 * TargetVID = FinalVID - RVO
179 * if CurrentVID > FinalVID
180 * TargetVID = FinalVID - RVO
182 * TargetVID = CurrentVIDD - RVO
185 msr.lo = (vid_max << 8) | (fid_cur);
187 msr.lo |= (1 << 16); /* init changes */
189 wrmsr(0xc0010041, msr);
195 for (loop=0; loop < 100000; loop++){
196 msr = rdmsr(0xc0010042);
197 if (!(msr.lo & (1 << 31)))
200 vid_cur = msr.hi & 0x3f;
202 /* BKDG figure 12 and 13
203 * if current fid is odd
204 * current fid -1 (next lower and even fid)(odd fid for rev G)
205 * if current fid in high-freq table
206 * while current fid < target fid
207 * transition to next higher fid in table
208 * else if target fid > VCO portal of current fid
209 * transition to highest portal fid in higher fid table
210 * while current fid < target fid
211 * transition to next higher fid in table
213 * transition to target fid
216 printk_debug("Current fid_cur: 0x%x, fid_max: 0x%x\n", fid_cur, fid_max);
217 printk_debug("Requested fid_new: 0x%x\n", fid_new);
219 step_limit = 8; /* max 8 steps just in case... */
220 while ((fid_cur != fid_new) && (step_limit--)) {
224 if (fid_cur < fid_new)
225 /* Force Fid steps even. step == 0 means 100MHz step */
226 step = ((fid_new/2) - (fid_cur/2)) * 2;
228 step = ((fid_cur/2) - (fid_new/2)) * 2;
230 /* If 200Mhz step OR past 3200 max table value */
231 if ((step == 2) || (fid_new >= 0x18 || fid_cur >= 0x18)) {
233 printk_debug("200MHZ step ");
235 /* Step +/- 200MHz at a time */
236 if (fid_cur < fid_new)
237 fid_temp = fid_cur + 2;
239 fid_temp = fid_cur - 2;
242 } else if ( step > 2) { /* If more than a 200Mhz step */
245 /* look it up in the table */
246 printk_debug("FidVid table step ");
248 temp = next_fid_200[((fid_new/2) * 13) + (fid_cur/2)];
251 fid_temp = (temp-4) * 2; /* Table 108 */
255 break; /* table error */
257 } else { /* step < 2 (100MHZ) */
258 printk_debug("100MHZ step ");
260 /* The table adjust in 200MHz increments. If requested,
261 * do the 100MHz increment if the CPU supports it.*/
262 if (cpuid_edx(0x80000007) & (1 << 6)) {
263 fid_temp = fid_cur + 1;
265 /* 100 MHZ not supported. Get out of the loop */
266 printk_debug("is not supported.\n");
271 if(fid_temp > fid_max) {
272 printk_debug("fid_temp 0x%x > fid_max 0x%x\n", fid_temp, fid_max);
276 printk_debug("fidvid: 0x%x\n", fid_temp);
279 msr.hi = 0x190; /* 2 us for AMD NPT Family 0Fh Processors */
280 msr.lo = (vid_cur << 8) | fid_temp;
282 msr.lo |= (1 << 16); /* init changes */
284 wrmsr(0xc0010041, msr);
290 #if K8_SET_FIDVID_DEBUG == 1
292 print_debug_fv_8("set_fidvid APICID = ", apicid);
293 print_debug_fv_64("fidvid ctrl msr ", msr.hi, msr.lo);
297 for (loop = 0; loop < 100000; loop++){
298 msr = rdmsr(0xc0010042);
299 if (!(msr.lo & (1 << 31)))
302 fid_cur = msr.lo & 0x3f;
304 #if K8_SET_FIDVID_DEBUG == 1
306 print_debug_fv_64("fidvid status msr ", msr.hi, msr.lo);
311 /* set vid to final */
312 /* TODO - make this more correct. Not a big deal for setting max...
314 * if TargetFID > InitialFID
315 * TargetVID = FinalVID - RVO
317 * if CurrentVID > FinalVID
318 * TargetVID = FinalVID - RVO
320 * TargetVID = CurrentVIDD - RVO
323 msr.lo = (vid_new << 8) | (fid_cur);
325 msr.lo |= (1 << 16); // init changes
327 wrmsr(0xc0010041, msr);
332 for (loop = 0; loop < 100000; loop++){
333 msr = rdmsr(0xc0010042);
334 if (!(msr.lo & (1 << 31)))
337 vid_cur = msr.hi & 0x3f;
339 fidvid = (vid_cur << 16) | (fid_cur << 8);
342 if (vid_new != vid_cur) {
343 print_err("set vid failed for apicid ="); print_err_hex8(apicidx); print_err("\r\n");
345 if (fid_new != fid_cur) {
346 print_err("set fid failed for apicid ="); print_err_hex8(apicidx); print_err("\r\n");
354 static void init_fidvid_ap(unsigned bsp_apicid, unsigned apicid)
357 uint32_t readback = 0;
358 unsigned timeout = 1;
365 msr = rdmsr(0xc0010042);
366 fid_max = ((msr.lo >> 16) & 0x3f); /* max fid */
368 if (fid_max >= ((25-4) * 2)) { /* FX max fid is 5G */
369 fid_max = ((msr.lo>>8) & 0x3f) + 5*2; /* maxFID = minFID + 1G */
370 if (fid_max >= ((25-4) * 2)) {
371 fid_max = (10-4) * 2; // hard set to 2G
377 send |= ((msr.hi >> (48-32)) & 0x3f) << 16; /* max vid */
378 send |= (apicid << 24); /* ap apicid */
380 #if K8_SET_FIDVID_ONE_BY_ONE == 1
381 vid_cur = msr.hi & 0x3f;
382 fid_cur = msr.lo & 0x3f;
386 msr.lo = (vid_cur << 8) | (fid_cur);
387 wrmsr(0xc0010041, msr);
390 timeout = wait_cpu_state(bsp_apicid, 1);
392 print_initcpu8("fidvid_ap_stage1: time out while reading from BSP on ", apicid);
394 /* send signal to BSP about this AP max fid and vid */
395 /* AP at state 1 that sent our fid and vid */
396 lapic_write(LAPIC_MSG_REG, send | 1);
398 // wait_cpu_state(bsp_apicid, 2); /* don't need we can use apicid directly */
401 /* remote read BSP signal that include vid/fid that need to set */
402 if (lapic_remote_read(bsp_apicid, LAPIC_MSG_REG, &readback)!=0)
404 if (((readback >> 24) & 0xff) == apicid)
405 break; /* it is this cpu turn */
409 #if K8_SET_FIDVID_ONE_BY_ONE == 1
410 readback = set_fidvid(apicid, readback & 0xffff00, 1); // this AP
412 readback = set_fidvid_without_init(readback & 0xffff00); // this AP
414 /* send signal to BSP that this AP fid/vid is set */
415 /* allow to change state2 is together with apicid */
416 /* AP at state that We set the requested fid/vid */
417 send = (apicid<<24) | (readback & 0x00ffff00);
419 print_initcpu8("fidvid_ap_stage2: time out while reading from BSP on ", apicid);
422 lapic_write(LAPIC_MSG_REG, send | 2);
424 timeout = wait_cpu_state(bsp_apicid, 3);
426 print_initcpu8("fidvid_ap_stage3: time out while reading from BSP on ", apicid);
430 static unsigned calc_common_fidvid(unsigned fidvid, unsigned fidvidx)
432 /* FIXME: need to check the change path to verify if it is reachable
433 * when common fid is small than 1.6G */
434 if ((fidvid & 0xff00) <= (fidvidx & 0xff00)) {
443 unsigned common_fidvid;
446 static void init_fidvid_bsp_stage1(unsigned ap_apicid, void *gp )
448 unsigned readback = 0;
449 unsigned timeout = 1;
451 struct fidvid_st *fvp = gp;
454 print_debug_fv("state 1: ap_apicid=", ap_apicid);
458 if (lapic_remote_read(ap_apicid, LAPIC_MSG_REG, &readback)!=0)
460 if ((readback & 0xff) == 1) {
462 break; /* target ap is in stage 1 */
466 print_initcpu8("fidvid_bsp_stage1: time out while reading from ap ", ap_apicid);
470 print_debug_fv("\treadback=", readback);
472 fvp->common_fidvid = calc_common_fidvid(fvp->common_fidvid, readback & 0xffff00);
474 print_debug_fv("\tcommon_fidvid=", fvp->common_fidvid);
477 static void init_fidvid_bsp_stage2(unsigned ap_apicid, void *gp)
479 unsigned readback = 0;
480 unsigned timeout = 1;
482 struct fidvid_st *fvp = gp;
485 print_debug_fv("state 2: ap_apicid=", ap_apicid);
487 /* all set to state2 */
488 lapic_write(LAPIC_MSG_REG, fvp->common_fidvid | (ap_apicid<<24) | 2);
492 if (lapic_remote_read(ap_apicid, LAPIC_MSG_REG, &readback)!=0)
494 if ((readback & 0xff) == 2) {
496 break; /* target ap is stage 2, it's FID has beed set */
501 print_initcpu8("fidvid_bsp_stage2: time out while reading from ap ", ap_apicid);
505 print_debug_fv("\treadback=", readback);
508 #if K8_SET_FIDVID_STORE_AP_APICID_AT_FIRST == 1
509 struct ap_apicid_st {
511 unsigned apicid[16]; /* 8 way dual core need 16 */
512 /* FIXME: 32 node quad core, may need 128 */
515 static void store_ap_apicid(unsigned ap_apicid, void *gp)
517 struct ap_apicid_st *p = gp;
519 p->apicid[p->num++] = ap_apicid;
524 static void init_fidvid_bsp(unsigned bsp_apicid)
531 #if K8_SET_FIDVID_STORE_AP_APICID_AT_FIRST == 1
532 struct ap_apicid_st ap_apicidx;
537 msr = rdmsr(0xc0010042);
538 fid_max = ((msr.lo >> 16) & 0x3f); /* max fid */
540 if (fid_max >= ((25-4) * 2)) { /* FX max fid is 5G */
541 fid_max = ((msr.lo >> 8) & 0x3f) + 5*2; /* maxFID = minFID + 1G */
542 if (fid_max >= ((25-4) * 2)) {
543 fid_max = (10-4) * 2; /* hard set to 2G */
547 vid_max = ((msr.hi>>(48-32)) & 0x3f); //max vid
548 fv.common_fidvid = (fid_max << 8)|(vid_max << 16);
551 /* for all APs (We know the APIC ID of all APs even the APIC ID is lifted)
552 * remote read from AP about max fid/vid */
554 /* let all ap trains to state 1 */
555 lapic_write(LAPIC_MSG_REG, (bsp_apicid << 24) | 1);
557 /* calculate the common max fid/vid that could be used for
559 #if K8_SET_FIDVID_STORE_AP_APICID_AT_FIRST == 1
562 for_each_ap(bsp_apicid, K8_SET_FIDVID_CORE0_ONLY, store_ap_apicid, &ap_apicidx);
564 for (i = 0; i < ap_apicidx.num; i++) {
565 init_fidvid_bsp_stage1(ap_apicidx.apicid[i], &fv);
568 for_each_ap(bsp_apicid, K8_SET_FIDVID_CORE0_ONLY, init_fidvid_bsp_stage1, &fv);
574 /* Can we use max only? So we can only set fid in one around,
575 * otherwise we need to set that to max after raminit */
576 /* set fid vid to DQS training required */
577 fid = (fv.common_fidvid >> 8) & 0x3f;
578 vid = (fv.common_fidvid >> 16) & 0x3f;
580 if (fid > (10-4) * 2) {
581 fid = (10-4) * 2; // x10
585 vid += 4; /* unit is 12.5mV */
587 vid += 2; /* unit is 25mV */
590 fv.common_fidvid = (fid<<8) | (vid<<16);
592 print_debug_fv("common_fidvid=", fv.common_fidvid);
596 #if K8_SET_FIDVID_ONE_BY_ONE == 1
597 /* set BSP fid and vid */
598 print_debug_fv("bsp apicid=", bsp_apicid);
599 fv.common_fidvid = set_fidvid(bsp_apicid, fv.common_fidvid, 1);
600 print_debug_fv("common_fidvid=", fv.common_fidvid);
603 /* For all APs ( We know the APIC ID of all AP even the APIC ID is lifted)
604 * send signal to the AP it could change it's fid/vid */
605 /* remote read singnal from AP that AP is done */
607 fv.common_fidvid &= 0xffff00;
609 /* set state 2 allow is in init_fidvid_bsp_stage2 */
610 #if K8_SET_FIDVID_STORE_AP_APICID_AT_FIRST == 1
611 for (i = 0; i < ap_apicidx.num; i++) {
612 init_fidvid_bsp_stage2(ap_apicidx.apicid[i], &fv);
615 for_each_ap(bsp_apicid, K8_SET_FIDVID_CORE0_ONLY, init_fidvid_bsp_stage2, &fv);
618 #if K8_SET_FIDVID_ONE_BY_ONE == 0
619 /* set BSP fid and vid */
620 print_debug_fv("bsp apicid=", bsp_apicid);
621 fv.common_fidvid = set_fidvid(bsp_apicid, fv.common_fidvid, 1);
622 print_debug_fv("common_fidvid=", fv.common_fidvid);
626 /* clear the state */
627 lapic_write(LAPIC_MSG_REG, fv.common_fidvid | (bsp_apicid << 24) | 3);
629 /* here wait a while, so last ap could read pack, and stop it, don't
630 * call init_timer too early or just don't use init_timer */