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 #include "drmP.h"
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 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 
ci_send_msg_to_smc(struct radeon_device * rdev,PPSMC_Msg msg)166 PPSMC_Result ci_send_msg_to_smc(struct radeon_device *rdev, PPSMC_Msg msg)
167 {
168 	u32 tmp;
169 	int i;
170 
171 	if (!ci_is_smc_running(rdev))
172 		return PPSMC_Result_Failed;
173 
174 	WREG32(SMC_MESSAGE_0, msg);
175 
176 	for (i = 0; i < rdev->usec_timeout; i++) {
177 		tmp = RREG32(SMC_RESP_0);
178 		if (tmp != 0)
179 			break;
180 		udelay(1);
181 	}
182 	tmp = RREG32(SMC_RESP_0);
183 
184 	return (PPSMC_Result)tmp;
185 }
186 
ci_wait_for_smc_inactive(struct radeon_device * rdev)187 PPSMC_Result ci_wait_for_smc_inactive(struct radeon_device *rdev)
188 {
189 	u32 tmp;
190 	int i;
191 
192 	if (!ci_is_smc_running(rdev))
193 		return PPSMC_Result_OK;
194 
195 	for (i = 0; i < rdev->usec_timeout; i++) {
196                 tmp = RREG32_SMC(SMC_SYSCON_CLOCK_CNTL_0);
197                 if ((tmp & CKEN) == 0)
198 			break;
199                 udelay(1);
200         }
201 
202 	return PPSMC_Result_OK;
203 }
204 
ci_load_smc_ucode(struct radeon_device * rdev,u32 limit)205 int ci_load_smc_ucode(struct radeon_device *rdev, u32 limit)
206 {
207 	unsigned long flags;
208 	u32 ucode_start_address;
209 	u32 ucode_size;
210 	const u8 *src;
211 	u32 data;
212 
213 	if (!rdev->smc_fw)
214 		return -EINVAL;
215 
216 	switch (rdev->family) {
217 	case CHIP_BONAIRE:
218 		ucode_start_address = BONAIRE_SMC_UCODE_START;
219 		ucode_size = BONAIRE_SMC_UCODE_SIZE;
220 		break;
221 	case CHIP_HAWAII:
222 		ucode_start_address = HAWAII_SMC_UCODE_START;
223 		ucode_size = HAWAII_SMC_UCODE_SIZE;
224 		break;
225 	default:
226 		DRM_ERROR("unknown asic in smc ucode loader\n");
227 		BUG();
228 	}
229 
230 	if (ucode_size & 3)
231 		return -EINVAL;
232 
233 	src = (const u8 *)rdev->smc_fw->data;
234 	spin_lock_irqsave(&rdev->smc_idx_lock, flags);
235 	WREG32(SMC_IND_INDEX_0, ucode_start_address);
236 	WREG32_P(SMC_IND_ACCESS_CNTL, AUTO_INCREMENT_IND_0, ~AUTO_INCREMENT_IND_0);
237 	while (ucode_size >= 4) {
238 		/* SMC address space is BE */
239 		data = (src[0] << 24) | (src[1] << 16) | (src[2] << 8) | src[3];
240 
241 		WREG32(SMC_IND_DATA_0, data);
242 
243 		src += 4;
244 		ucode_size -= 4;
245 	}
246 	WREG32_P(SMC_IND_ACCESS_CNTL, 0, ~AUTO_INCREMENT_IND_0);
247 	spin_unlock_irqrestore(&rdev->smc_idx_lock, flags);
248 
249 	return 0;
250 }
251 
ci_read_smc_sram_dword(struct radeon_device * rdev,u32 smc_address,u32 * value,u32 limit)252 int ci_read_smc_sram_dword(struct radeon_device *rdev,
253 			   u32 smc_address, u32 *value, u32 limit)
254 {
255 	unsigned long flags;
256 	int ret;
257 
258 	spin_lock_irqsave(&rdev->smc_idx_lock, flags);
259 	ret = ci_set_smc_sram_address(rdev, smc_address, limit);
260 	if (ret == 0)
261 		*value = RREG32(SMC_IND_DATA_0);
262 	spin_unlock_irqrestore(&rdev->smc_idx_lock, flags);
263 
264 	return ret;
265 }
266 
ci_write_smc_sram_dword(struct radeon_device * rdev,u32 smc_address,u32 value,u32 limit)267 int ci_write_smc_sram_dword(struct radeon_device *rdev,
268 			    u32 smc_address, u32 value, u32 limit)
269 {
270 	unsigned long flags;
271 	int ret;
272 
273 	spin_lock_irqsave(&rdev->smc_idx_lock, flags);
274 	ret = ci_set_smc_sram_address(rdev, smc_address, limit);
275 	if (ret == 0)
276 		WREG32(SMC_IND_DATA_0, value);
277 	spin_unlock_irqrestore(&rdev->smc_idx_lock, flags);
278 
279 	return ret;
280 }
281