xref: /openbmc/u-boot/arch/x86/cpu/ivybridge/cpu.c (revision ddf56bc7)
1 /*
2  * Copyright (c) 2014 Google, Inc
3  * (C) Copyright 2008
4  * Graeme Russ, graeme.russ@gmail.com.
5  *
6  * Some portions from coreboot src/mainboard/google/link/romstage.c
7  * and src/cpu/intel/model_206ax/bootblock.c
8  * Copyright (C) 2007-2010 coresystems GmbH
9  * Copyright (C) 2011 Google Inc.
10  *
11  * SPDX-License-Identifier:	GPL-2.0
12  */
13 
14 #include <common.h>
15 #include <dm.h>
16 #include <errno.h>
17 #include <fdtdec.h>
18 #include <asm/cpu.h>
19 #include <asm/io.h>
20 #include <asm/lapic.h>
21 #include <asm/msr.h>
22 #include <asm/mtrr.h>
23 #include <asm/pci.h>
24 #include <asm/post.h>
25 #include <asm/processor.h>
26 #include <asm/arch/model_206ax.h>
27 #include <asm/arch/microcode.h>
28 #include <asm/arch/pch.h>
29 #include <asm/arch/sandybridge.h>
30 
31 DECLARE_GLOBAL_DATA_PTR;
32 
33 static void enable_port80_on_lpc(struct pci_controller *hose, pci_dev_t dev)
34 {
35 	/* Enable port 80 POST on LPC */
36 	pci_hose_write_config_dword(hose, dev, PCH_RCBA_BASE, DEFAULT_RCBA | 1);
37 	clrbits_le32(RCB_REG(GCS), 4);
38 }
39 
40 /*
41  * Enable Prefetching and Caching.
42  */
43 static void enable_spi_prefetch(struct pci_controller *hose, pci_dev_t dev)
44 {
45 	u8 reg8;
46 
47 	pci_hose_read_config_byte(hose, dev, 0xdc, &reg8);
48 	reg8 &= ~(3 << 2);
49 	reg8 |= (2 << 2); /* Prefetching and Caching Enabled */
50 	pci_hose_write_config_byte(hose, dev, 0xdc, reg8);
51 }
52 
53 static int set_flex_ratio_to_tdp_nominal(void)
54 {
55 	msr_t flex_ratio, msr;
56 	u8 nominal_ratio;
57 
58 	/* Minimum CPU revision for configurable TDP support */
59 	if (cpuid_eax(1) < IVB_CONFIG_TDP_MIN_CPUID)
60 		return -EINVAL;
61 
62 	/* Check for Flex Ratio support */
63 	flex_ratio = msr_read(MSR_FLEX_RATIO);
64 	if (!(flex_ratio.lo & FLEX_RATIO_EN))
65 		return -EINVAL;
66 
67 	/* Check for >0 configurable TDPs */
68 	msr = msr_read(MSR_PLATFORM_INFO);
69 	if (((msr.hi >> 1) & 3) == 0)
70 		return -EINVAL;
71 
72 	/* Use nominal TDP ratio for flex ratio */
73 	msr = msr_read(MSR_CONFIG_TDP_NOMINAL);
74 	nominal_ratio = msr.lo & 0xff;
75 
76 	/* See if flex ratio is already set to nominal TDP ratio */
77 	if (((flex_ratio.lo >> 8) & 0xff) == nominal_ratio)
78 		return 0;
79 
80 	/* Set flex ratio to nominal TDP ratio */
81 	flex_ratio.lo &= ~0xff00;
82 	flex_ratio.lo |= nominal_ratio << 8;
83 	flex_ratio.lo |= FLEX_RATIO_LOCK;
84 	msr_write(MSR_FLEX_RATIO, flex_ratio);
85 
86 	/* Set flex ratio in soft reset data register bits 11:6 */
87 	clrsetbits_le32(RCB_REG(SOFT_RESET_DATA), 0x3f << 6,
88 			(nominal_ratio & 0x3f) << 6);
89 
90 	/* Set soft reset control to use register value */
91 	setbits_le32(RCB_REG(SOFT_RESET_CTRL), 1);
92 
93 	/* Issue warm reset, will be "CPU only" due to soft reset data */
94 	outb(0x0, PORT_RESET);
95 	outb(SYS_RST | RST_CPU, PORT_RESET);
96 	cpu_hlt();
97 
98 	/* Not reached */
99 	return -EINVAL;
100 }
101 
102 static void set_spi_speed(void)
103 {
104 	u32 fdod;
105 
106 	/* Observe SPI Descriptor Component Section 0 */
107 	writel(0x1000, RCB_REG(SPI_DESC_COMP0));
108 
109 	/* Extract the1 Write/Erase SPI Frequency from descriptor */
110 	fdod = readl(RCB_REG(SPI_FREQ_WR_ERA));
111 	fdod >>= 24;
112 	fdod &= 7;
113 
114 	/* Set Software Sequence frequency to match */
115 	clrsetbits_8(RCB_REG(SPI_FREQ_SWSEQ), 7, fdod);
116 }
117 
118 int arch_cpu_init(void)
119 {
120 	post_code(POST_CPU_INIT);
121 	timer_set_base(rdtsc());
122 
123 	return x86_cpu_init_f();
124 }
125 
126 int arch_cpu_init_dm(void)
127 {
128 	const void *blob = gd->fdt_blob;
129 	struct pci_controller *hose;
130 	struct udevice *bus;
131 	int node;
132 	int ret;
133 
134 	post_code(0x70);
135 	ret = uclass_get_device(UCLASS_PCI, 0, &bus);
136 	post_code(0x71);
137 	if (ret)
138 		return ret;
139 	post_code(0x72);
140 	hose = dev_get_uclass_priv(bus);
141 
142 	/* TODO(sjg@chromium.org): Get rid of gd->hose */
143 	gd->hose = hose;
144 
145 	node = fdtdec_next_compatible(blob, 0, COMPAT_INTEL_PCH);
146 	if (node < 0)
147 		return -ENOENT;
148 	ret = lpc_early_init(gd->fdt_blob, node, PCH_LPC_DEV);
149 	if (ret)
150 		return ret;
151 
152 	enable_spi_prefetch(hose, PCH_LPC_DEV);
153 
154 	/* This is already done in start.S, but let's do it in C */
155 	enable_port80_on_lpc(hose, PCH_LPC_DEV);
156 
157 	set_spi_speed();
158 
159 	/*
160 	 * We should do as little as possible before the serial console is
161 	 * up. Perhaps this should move to later. Our next lot of init
162 	 * happens in print_cpuinfo() when we have a console
163 	 */
164 	ret = set_flex_ratio_to_tdp_nominal();
165 	if (ret)
166 		return ret;
167 
168 	return 0;
169 }
170 
171 static int enable_smbus(void)
172 {
173 	pci_dev_t dev;
174 	uint16_t value;
175 
176 	/* Set the SMBus device statically. */
177 	dev = PCI_BDF(0x0, 0x1f, 0x3);
178 
179 	/* Check to make sure we've got the right device. */
180 	value = x86_pci_read_config16(dev, 0x0);
181 	if (value != 0x8086) {
182 		printf("SMBus controller not found\n");
183 		return -ENOSYS;
184 	}
185 
186 	/* Set SMBus I/O base. */
187 	x86_pci_write_config32(dev, SMB_BASE,
188 			       SMBUS_IO_BASE | PCI_BASE_ADDRESS_SPACE_IO);
189 
190 	/* Set SMBus enable. */
191 	x86_pci_write_config8(dev, HOSTC, HST_EN);
192 
193 	/* Set SMBus I/O space enable. */
194 	x86_pci_write_config16(dev, PCI_COMMAND, PCI_COMMAND_IO);
195 
196 	/* Disable interrupt generation. */
197 	outb(0, SMBUS_IO_BASE + SMBHSTCTL);
198 
199 	/* Clear any lingering errors, so transactions can run. */
200 	outb(inb(SMBUS_IO_BASE + SMBHSTSTAT), SMBUS_IO_BASE + SMBHSTSTAT);
201 	debug("SMBus controller enabled\n");
202 
203 	return 0;
204 }
205 
206 #define PCH_EHCI0_TEMP_BAR0 0xe8000000
207 #define PCH_EHCI1_TEMP_BAR0 0xe8000400
208 #define PCH_XHCI_TEMP_BAR0  0xe8001000
209 
210 /*
211  * Setup USB controller MMIO BAR to prevent the reference code from
212  * resetting the controller.
213  *
214  * The BAR will be re-assigned during device enumeration so these are only
215  * temporary.
216  *
217  * This is used to speed up the resume path.
218  */
219 static void enable_usb_bar(void)
220 {
221 	pci_dev_t usb0 = PCH_EHCI1_DEV;
222 	pci_dev_t usb1 = PCH_EHCI2_DEV;
223 	pci_dev_t usb3 = PCH_XHCI_DEV;
224 	u32 cmd;
225 
226 	/* USB Controller 1 */
227 	x86_pci_write_config32(usb0, PCI_BASE_ADDRESS_0,
228 			       PCH_EHCI0_TEMP_BAR0);
229 	cmd = x86_pci_read_config32(usb0, PCI_COMMAND);
230 	cmd |= PCI_COMMAND_MASTER | PCI_COMMAND_MEMORY;
231 	x86_pci_write_config32(usb0, PCI_COMMAND, cmd);
232 
233 	/* USB Controller 1 */
234 	x86_pci_write_config32(usb1, PCI_BASE_ADDRESS_0,
235 			       PCH_EHCI1_TEMP_BAR0);
236 	cmd = x86_pci_read_config32(usb1, PCI_COMMAND);
237 	cmd |= PCI_COMMAND_MASTER | PCI_COMMAND_MEMORY;
238 	x86_pci_write_config32(usb1, PCI_COMMAND, cmd);
239 
240 	/* USB3 Controller */
241 	x86_pci_write_config32(usb3, PCI_BASE_ADDRESS_0,
242 			       PCH_XHCI_TEMP_BAR0);
243 	cmd = x86_pci_read_config32(usb3, PCI_COMMAND);
244 	cmd |= PCI_COMMAND_MASTER | PCI_COMMAND_MEMORY;
245 	x86_pci_write_config32(usb3, PCI_COMMAND, cmd);
246 }
247 
248 static int report_bist_failure(void)
249 {
250 	if (gd->arch.bist != 0) {
251 		post_code(POST_BIST_FAILURE);
252 		printf("BIST failed: %08x\n", gd->arch.bist);
253 		return -EFAULT;
254 	}
255 
256 	return 0;
257 }
258 
259 int print_cpuinfo(void)
260 {
261 	enum pei_boot_mode_t boot_mode = PEI_BOOT_NONE;
262 	char processor_name[CPU_MAX_NAME_LEN];
263 	const char *name;
264 	uint32_t pm1_cnt;
265 	uint16_t pm1_sts;
266 	int ret;
267 
268 	/* Halt if there was a built in self test failure */
269 	ret = report_bist_failure();
270 	if (ret)
271 		return ret;
272 
273 	enable_lapic();
274 
275 	ret = microcode_update_intel();
276 	if (ret)
277 		return ret;
278 
279 	/* Enable upper 128bytes of CMOS */
280 	writel(1 << 2, RCB_REG(RC));
281 
282 	/* TODO: cmos_post_init() */
283 	if (readl(MCHBAR_REG(SSKPD)) == 0xCAFE) {
284 		debug("soft reset detected\n");
285 		boot_mode = PEI_BOOT_SOFT_RESET;
286 
287 		/* System is not happy after keyboard reset... */
288 		debug("Issuing CF9 warm reset\n");
289 		reset_cpu(0);
290 	}
291 
292 	/* Early chipset init required before RAM init can work */
293 	sandybridge_early_init(SANDYBRIDGE_MOBILE);
294 
295 	/* Check PM1_STS[15] to see if we are waking from Sx */
296 	pm1_sts = inw(DEFAULT_PMBASE + PM1_STS);
297 
298 	/* Read PM1_CNT[12:10] to determine which Sx state */
299 	pm1_cnt = inl(DEFAULT_PMBASE + PM1_CNT);
300 
301 	if ((pm1_sts & WAK_STS) && ((pm1_cnt >> 10) & 7) == 5) {
302 #if CONFIG_HAVE_ACPI_RESUME
303 		debug("Resume from S3 detected.\n");
304 		boot_mode = PEI_BOOT_RESUME;
305 		/* Clear SLP_TYPE. This will break stage2 but
306 		 * we care for that when we get there.
307 		 */
308 		outl(pm1_cnt & ~(7 << 10), DEFAULT_PMBASE + PM1_CNT);
309 #else
310 		debug("Resume from S3 detected, but disabled.\n");
311 #endif
312 	} else {
313 		/*
314 		 * TODO: An indication of life might be possible here (e.g.
315 		 * keyboard light)
316 		 */
317 	}
318 	post_code(POST_EARLY_INIT);
319 
320 	/* Enable SPD ROMs and DDR-III DRAM */
321 	ret = enable_smbus();
322 	if (ret)
323 		return ret;
324 
325 	/* Prepare USB controller early in S3 resume */
326 	if (boot_mode == PEI_BOOT_RESUME)
327 		enable_usb_bar();
328 
329 	gd->arch.pei_boot_mode = boot_mode;
330 
331 	/* TODO: Move this to the board or driver */
332 	x86_pci_write_config32(PCH_LPC_DEV, GPIO_BASE, DEFAULT_GPIOBASE | 1);
333 	x86_pci_write_config32(PCH_LPC_DEV, GPIO_CNTL, 0x10);
334 
335 	/* Print processor name */
336 	name = cpu_get_name(processor_name);
337 	printf("CPU:   %s\n", name);
338 
339 	post_code(POST_CPU_INFO);
340 
341 	return 0;
342 }
343 
344 void board_debug_uart_init(void)
345 {
346 	/* This enables the debug UART */
347 	pci_x86_write_config(NULL, PCH_LPC_DEV, LPC_EN, COMA_LPC_EN,
348 			     PCI_SIZE_16);
349 }
350