1 /*
2  * Copyright 2011 Advanced Micro Devices, Inc.
3  *
4  * Permission is hereby granted, free of charge, to any person obtaining a
5  * copy of this software and associated documentation files (the "Software"),
6  * to deal in the Software without restriction, including without limitation
7  * the rights to use, copy, modify, merge, publish, distribute, sublicense,
8  * and/or sell copies of the Software, and to permit persons to whom the
9  * Software is furnished to do so, subject to the following conditions:
10  *
11  * The above copyright notice and this permission notice shall be included in
12  * all copies or substantial portions of the Software.
13  *
14  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
15  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
16  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
17  * THE COPYRIGHT HOLDER(S) OR AUTHOR(S) BE LIABLE FOR ANY CLAIM, DAMAGES OR
18  * OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
19  * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
20  * OTHER DEALINGS IN THE SOFTWARE.
21  *
22  * Authors: Alex Deucher
23  */
24 
25 #include <linux/firmware.h>
26 
27 #include "radeon.h"
28 #include "cikd.h"
29 #include "ppsmc.h"
30 #include "radeon_ucode.h"
31 #include "ci_dpm.h"
32 
ci_set_smc_sram_address(struct radeon_device * rdev,u32 smc_address,u32 limit)33 static int ci_set_smc_sram_address(struct radeon_device *rdev,
34 				   u32 smc_address, u32 limit)
35 {
36 	if (smc_address & 3)
37 		return -EINVAL;
38 	if ((smc_address + 3) > limit)
39 		return -EINVAL;
40 
41 	WREG32(SMC_IND_INDEX_0, smc_address);
42 	WREG32_P(SMC_IND_ACCESS_CNTL, 0, ~AUTO_INCREMENT_IND_0);
43 
44 	return 0;
45 }
46 
ci_copy_bytes_to_smc(struct radeon_device * rdev,u32 smc_start_address,const u8 * src,u32 byte_count,u32 limit)47 int ci_copy_bytes_to_smc(struct radeon_device *rdev,
48 			 u32 smc_start_address,
49 			 const u8 *src, u32 byte_count, u32 limit)
50 {
51 	unsigned long flags;
52 	u32 data, original_data;
53 	u32 addr;
54 	u32 extra_shift;
55 	int ret = 0;
56 
57 	if (smc_start_address & 3)
58 		return -EINVAL;
59 	if ((smc_start_address + byte_count) > limit)
60 		return -EINVAL;
61 
62 	addr = smc_start_address;
63 
64 	spin_lock_irqsave(&rdev->smc_idx_lock, flags);
65 	while (byte_count >= 4) {
66 		/* SMC address space is BE */
67 		data = (src[0] << 24) | (src[1] << 16) | (src[2] << 8) | src[3];
68 
69 		ret = ci_set_smc_sram_address(rdev, addr, limit);
70 		if (ret)
71 			goto done;
72 
73 		WREG32(SMC_IND_DATA_0, data);
74 
75 		src += 4;
76 		byte_count -= 4;
77 		addr += 4;
78 	}
79 
80 	/* RMW for the final bytes */
81 	if (byte_count > 0) {
82 		data = 0;
83 
84 		ret = ci_set_smc_sram_address(rdev, addr, limit);
85 		if (ret)
86 			goto done;
87 
88 		original_data = RREG32(SMC_IND_DATA_0);
89 
90 		extra_shift = 8 * (4 - byte_count);
91 
92 		while (byte_count > 0) {
93 			data = (data << 8) + *src++;
94 			byte_count--;
95 		}
96 
97 		data <<= extra_shift;
98 
99 		data |= (original_data & ~((~0UL) << extra_shift));
100 
101 		ret = ci_set_smc_sram_address(rdev, addr, limit);
102 		if (ret)
103 			goto done;
104 
105 		WREG32(SMC_IND_DATA_0, data);
106 	}
107 
108 done:
109 	spin_unlock_irqrestore(&rdev->smc_idx_lock, flags);
110 
111 	return ret;
112 }
113 
ci_start_smc(struct radeon_device * rdev)114 void ci_start_smc(struct radeon_device *rdev)
115 {
116 	u32 tmp = RREG32_SMC(SMC_SYSCON_RESET_CNTL);
117 
118 	tmp &= ~RST_REG;
119 	WREG32_SMC(SMC_SYSCON_RESET_CNTL, tmp);
120 }
121 
ci_reset_smc(struct radeon_device * rdev)122 void ci_reset_smc(struct radeon_device *rdev)
123 {
124 	u32 tmp = RREG32_SMC(SMC_SYSCON_RESET_CNTL);
125 
126 	tmp |= RST_REG;
127 	WREG32_SMC(SMC_SYSCON_RESET_CNTL, tmp);
128 }
129 
ci_program_jump_on_start(struct radeon_device * rdev)130 int ci_program_jump_on_start(struct radeon_device *rdev)
131 {
132 	static const u8 data[] = { 0xE0, 0x00, 0x80, 0x40 };
133 
134 	return ci_copy_bytes_to_smc(rdev, 0x0, data, 4, sizeof(data)+1);
135 }
136 
ci_stop_smc_clock(struct radeon_device * rdev)137 void ci_stop_smc_clock(struct radeon_device *rdev)
138 {
139 	u32 tmp = RREG32_SMC(SMC_SYSCON_CLOCK_CNTL_0);
140 
141 	tmp |= CK_DISABLE;
142 
143 	WREG32_SMC(SMC_SYSCON_CLOCK_CNTL_0, tmp);
144 }
145 
ci_start_smc_clock(struct radeon_device * rdev)146 void ci_start_smc_clock(struct radeon_device *rdev)
147 {
148 	u32 tmp = RREG32_SMC(SMC_SYSCON_CLOCK_CNTL_0);
149 
150 	tmp &= ~CK_DISABLE;
151 
152 	WREG32_SMC(SMC_SYSCON_CLOCK_CNTL_0, tmp);
153 }
154 
ci_is_smc_running(struct radeon_device * rdev)155 bool ci_is_smc_running(struct radeon_device *rdev)
156 {
157 	u32 clk = RREG32_SMC(SMC_SYSCON_CLOCK_CNTL_0);
158 	u32 pc_c = RREG32_SMC(SMC_PC_C);
159 
160 	if (!(clk & CK_DISABLE) && (0x20100 <= pc_c))
161 		return true;
162 
163 	return false;
164 }
165 
166 #if 0
167 PPSMC_Result ci_wait_for_smc_inactive(struct radeon_device *rdev)
168 {
169 	u32 tmp;
170 	int i;
171 
172 	if (!ci_is_smc_running(rdev))
173 		return PPSMC_Result_OK;
174 
175 	for (i = 0; i < rdev->usec_timeout; i++) {
176 		tmp = RREG32_SMC(SMC_SYSCON_CLOCK_CNTL_0);
177 		if ((tmp & CKEN) == 0)
178 			break;
179 		udelay(1);
180 	}
181 
182 	return PPSMC_Result_OK;
183 }
184 #endif
185 
ci_load_smc_ucode(struct radeon_device * rdev,u32 limit)186 int ci_load_smc_ucode(struct radeon_device *rdev, u32 limit)
187 {
188 	unsigned long flags;
189 	u32 ucode_start_address;
190 	u32 ucode_size;
191 	const u8 *src;
192 	u32 data;
193 
194 	if (!rdev->smc_fw)
195 		return -EINVAL;
196 
197 	if (rdev->new_fw) {
198 		const struct smc_firmware_header_v1_0 *hdr =
199 			(const struct smc_firmware_header_v1_0 *)rdev->smc_fw->data;
200 
201 		radeon_ucode_print_smc_hdr(&hdr->header);
202 
203 		ucode_start_address = le32_to_cpu(hdr->ucode_start_addr);
204 		ucode_size = le32_to_cpu(hdr->header.ucode_size_bytes);
205 		src = (const u8 *)
206 			(rdev->smc_fw->data + le32_to_cpu(hdr->header.ucode_array_offset_bytes));
207 	} else {
208 		switch (rdev->family) {
209 		case CHIP_BONAIRE:
210 			ucode_start_address = BONAIRE_SMC_UCODE_START;
211 			ucode_size = BONAIRE_SMC_UCODE_SIZE;
212 			break;
213 		case CHIP_HAWAII:
214 			ucode_start_address = HAWAII_SMC_UCODE_START;
215 			ucode_size = HAWAII_SMC_UCODE_SIZE;
216 			break;
217 		default:
218 			DRM_ERROR("unknown asic in smc ucode loader\n");
219 			BUG();
220 		}
221 
222 		src = (const u8 *)rdev->smc_fw->data;
223 	}
224 
225 	if (ucode_size & 3)
226 		return -EINVAL;
227 
228 	spin_lock_irqsave(&rdev->smc_idx_lock, flags);
229 	WREG32(SMC_IND_INDEX_0, ucode_start_address);
230 	WREG32_P(SMC_IND_ACCESS_CNTL, AUTO_INCREMENT_IND_0, ~AUTO_INCREMENT_IND_0);
231 	while (ucode_size >= 4) {
232 		/* SMC address space is BE */
233 		data = (src[0] << 24) | (src[1] << 16) | (src[2] << 8) | src[3];
234 
235 		WREG32(SMC_IND_DATA_0, data);
236 
237 		src += 4;
238 		ucode_size -= 4;
239 	}
240 	WREG32_P(SMC_IND_ACCESS_CNTL, 0, ~AUTO_INCREMENT_IND_0);
241 	spin_unlock_irqrestore(&rdev->smc_idx_lock, flags);
242 
243 	return 0;
244 }
245 
ci_read_smc_sram_dword(struct radeon_device * rdev,u32 smc_address,u32 * value,u32 limit)246 int ci_read_smc_sram_dword(struct radeon_device *rdev,
247 			   u32 smc_address, u32 *value, u32 limit)
248 {
249 	unsigned long flags;
250 	int ret;
251 
252 	spin_lock_irqsave(&rdev->smc_idx_lock, flags);
253 	ret = ci_set_smc_sram_address(rdev, smc_address, limit);
254 	if (ret == 0)
255 		*value = RREG32(SMC_IND_DATA_0);
256 	spin_unlock_irqrestore(&rdev->smc_idx_lock, flags);
257 
258 	return ret;
259 }
260 
ci_write_smc_sram_dword(struct radeon_device * rdev,u32 smc_address,u32 value,u32 limit)261 int ci_write_smc_sram_dword(struct radeon_device *rdev,
262 			    u32 smc_address, u32 value, u32 limit)
263 {
264 	unsigned long flags;
265 	int ret;
266 
267 	spin_lock_irqsave(&rdev->smc_idx_lock, flags);
268 	ret = ci_set_smc_sram_address(rdev, smc_address, limit);
269 	if (ret == 0)
270 		WREG32(SMC_IND_DATA_0, value);
271 	spin_unlock_irqrestore(&rdev->smc_idx_lock, flags);
272 
273 	return ret;
274 }
275