Loading...
1/*
2 * Copyright (c) 2010-2011 Atheros Communications Inc.
3 *
4 * Permission to use, copy, modify, and/or distribute this software for any
5 * purpose with or without fee is hereby granted, provided that the above
6 * copyright notice and this permission notice appear in all copies.
7 *
8 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
9 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
10 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
11 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
12 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
13 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
14 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
15 */
16
17#include "hw.h"
18#include "ar9003_phy.h"
19
20void ar9003_paprd_enable(struct ath_hw *ah, bool val)
21{
22 struct ath_regulatory *regulatory = ath9k_hw_regulatory(ah);
23 struct ath9k_channel *chan = ah->curchan;
24 struct ar9300_eeprom *eep = &ah->eeprom.ar9300_eep;
25
26 /*
27 * 3 bits for modalHeader5G.papdRateMaskHt20
28 * is used for sub-band disabling of PAPRD.
29 * 5G band is divided into 3 sub-bands -- upper,
30 * middle, lower.
31 * if bit 30 of modalHeader5G.papdRateMaskHt20 is set
32 * -- disable PAPRD for upper band 5GHz
33 * if bit 29 of modalHeader5G.papdRateMaskHt20 is set
34 * -- disable PAPRD for middle band 5GHz
35 * if bit 28 of modalHeader5G.papdRateMaskHt20 is set
36 * -- disable PAPRD for lower band 5GHz
37 */
38
39 if (IS_CHAN_5GHZ(chan)) {
40 if (chan->channel >= UPPER_5G_SUB_BAND_START) {
41 if (le32_to_cpu(eep->modalHeader5G.papdRateMaskHt20)
42 & BIT(30))
43 val = false;
44 } else if (chan->channel >= MID_5G_SUB_BAND_START) {
45 if (le32_to_cpu(eep->modalHeader5G.papdRateMaskHt20)
46 & BIT(29))
47 val = false;
48 } else {
49 if (le32_to_cpu(eep->modalHeader5G.papdRateMaskHt20)
50 & BIT(28))
51 val = false;
52 }
53 }
54
55 if (val) {
56 ah->paprd_table_write_done = true;
57
58 ah->eep_ops->set_txpower(ah, chan,
59 ath9k_regd_get_ctl(regulatory, chan),
60 chan->chan->max_antenna_gain * 2,
61 chan->chan->max_power * 2,
62 min((u32) MAX_RATE_POWER,
63 (u32) regulatory->power_limit), false);
64 }
65
66 REG_RMW_FIELD(ah, AR_PHY_PAPRD_CTRL0_B0,
67 AR_PHY_PAPRD_CTRL0_PAPRD_ENABLE, !!val);
68 if (ah->caps.tx_chainmask & BIT(1))
69 REG_RMW_FIELD(ah, AR_PHY_PAPRD_CTRL0_B1,
70 AR_PHY_PAPRD_CTRL0_PAPRD_ENABLE, !!val);
71 if (ah->caps.tx_chainmask & BIT(2))
72 REG_RMW_FIELD(ah, AR_PHY_PAPRD_CTRL0_B2,
73 AR_PHY_PAPRD_CTRL0_PAPRD_ENABLE, !!val);
74}
75EXPORT_SYMBOL(ar9003_paprd_enable);
76
77static int ar9003_get_training_power_2g(struct ath_hw *ah)
78{
79 struct ath9k_channel *chan = ah->curchan;
80 unsigned int power, scale, delta;
81
82 scale = ar9003_get_paprd_scale_factor(ah, chan);
83 power = REG_READ_FIELD(ah, AR_PHY_POWERTX_RATE5,
84 AR_PHY_POWERTX_RATE5_POWERTXHT20_0);
85
86 delta = abs((int) ah->paprd_target_power - (int) power);
87 if (delta > scale)
88 return -1;
89
90 if (delta < 4)
91 power -= 4 - delta;
92
93 return power;
94}
95
96static int ar9003_get_training_power_5g(struct ath_hw *ah)
97{
98 struct ath_common *common = ath9k_hw_common(ah);
99 struct ath9k_channel *chan = ah->curchan;
100 unsigned int power, scale, delta;
101
102 scale = ar9003_get_paprd_scale_factor(ah, chan);
103
104 if (IS_CHAN_HT40(chan))
105 power = REG_READ_FIELD(ah, AR_PHY_POWERTX_RATE8,
106 AR_PHY_POWERTX_RATE8_POWERTXHT40_5);
107 else
108 power = REG_READ_FIELD(ah, AR_PHY_POWERTX_RATE6,
109 AR_PHY_POWERTX_RATE6_POWERTXHT20_5);
110
111 power += scale;
112 delta = abs((int) ah->paprd_target_power - (int) power);
113 if (delta > scale)
114 return -1;
115
116 switch (get_streams(common->tx_chainmask)) {
117 case 1:
118 delta = 6;
119 break;
120 case 2:
121 delta = 4;
122 break;
123 case 3:
124 delta = 2;
125 break;
126 default:
127 delta = 0;
128 ath_dbg(common, ATH_DBG_CALIBRATE,
129 "Invalid tx-chainmask: %u\n", common->tx_chainmask);
130 }
131
132 power += delta;
133 return power;
134}
135
136static int ar9003_paprd_setup_single_table(struct ath_hw *ah)
137{
138 struct ath_common *common = ath9k_hw_common(ah);
139 static const u32 ctrl0[3] = {
140 AR_PHY_PAPRD_CTRL0_B0,
141 AR_PHY_PAPRD_CTRL0_B1,
142 AR_PHY_PAPRD_CTRL0_B2
143 };
144 static const u32 ctrl1[3] = {
145 AR_PHY_PAPRD_CTRL1_B0,
146 AR_PHY_PAPRD_CTRL1_B1,
147 AR_PHY_PAPRD_CTRL1_B2
148 };
149 int training_power;
150 int i;
151
152 if (IS_CHAN_2GHZ(ah->curchan))
153 training_power = ar9003_get_training_power_2g(ah);
154 else
155 training_power = ar9003_get_training_power_5g(ah);
156
157 ath_dbg(common, ATH_DBG_CALIBRATE,
158 "Training power: %d, Target power: %d\n",
159 training_power, ah->paprd_target_power);
160
161 if (training_power < 0) {
162 ath_dbg(common, ATH_DBG_CALIBRATE,
163 "PAPRD target power delta out of range");
164 return -ERANGE;
165 }
166 ah->paprd_training_power = training_power;
167
168 REG_RMW_FIELD(ah, AR_PHY_PAPRD_AM2AM, AR_PHY_PAPRD_AM2AM_MASK,
169 ah->paprd_ratemask);
170 REG_RMW_FIELD(ah, AR_PHY_PAPRD_AM2PM, AR_PHY_PAPRD_AM2PM_MASK,
171 ah->paprd_ratemask);
172 REG_RMW_FIELD(ah, AR_PHY_PAPRD_HT40, AR_PHY_PAPRD_HT40_MASK,
173 ah->paprd_ratemask_ht40);
174
175 for (i = 0; i < ah->caps.max_txchains; i++) {
176 REG_RMW_FIELD(ah, ctrl0[i],
177 AR_PHY_PAPRD_CTRL0_USE_SINGLE_TABLE_MASK, 1);
178 REG_RMW_FIELD(ah, ctrl1[i],
179 AR_PHY_PAPRD_CTRL1_ADAPTIVE_AM2PM_ENABLE, 1);
180 REG_RMW_FIELD(ah, ctrl1[i],
181 AR_PHY_PAPRD_CTRL1_ADAPTIVE_AM2AM_ENABLE, 1);
182 REG_RMW_FIELD(ah, ctrl1[i],
183 AR_PHY_PAPRD_CTRL1_ADAPTIVE_SCALING_ENA, 0);
184 REG_RMW_FIELD(ah, ctrl1[i],
185 AR_PHY_PAPRD_CTRL1_PA_GAIN_SCALE_FACT_MASK, 181);
186 REG_RMW_FIELD(ah, ctrl1[i],
187 AR_PHY_PAPRD_CTRL1_PAPRD_MAG_SCALE_FACT, 361);
188 REG_RMW_FIELD(ah, ctrl1[i],
189 AR_PHY_PAPRD_CTRL1_ADAPTIVE_SCALING_ENA, 0);
190 REG_RMW_FIELD(ah, ctrl0[i],
191 AR_PHY_PAPRD_CTRL0_PAPRD_MAG_THRSH, 3);
192 }
193
194 ar9003_paprd_enable(ah, false);
195
196 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL1,
197 AR_PHY_PAPRD_TRAINER_CNTL1_CF_PAPRD_LB_SKIP, 0x30);
198 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL1,
199 AR_PHY_PAPRD_TRAINER_CNTL1_CF_PAPRD_LB_ENABLE, 1);
200 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL1,
201 AR_PHY_PAPRD_TRAINER_CNTL1_CF_PAPRD_TX_GAIN_FORCE, 1);
202 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL1,
203 AR_PHY_PAPRD_TRAINER_CNTL1_CF_PAPRD_RX_BB_GAIN_FORCE, 0);
204 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL1,
205 AR_PHY_PAPRD_TRAINER_CNTL1_CF_PAPRD_IQCORR_ENABLE, 0);
206 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL1,
207 AR_PHY_PAPRD_TRAINER_CNTL1_CF_PAPRD_AGC2_SETTLING, 28);
208 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL1,
209 AR_PHY_PAPRD_TRAINER_CNTL1_CF_CF_PAPRD_TRAIN_ENABLE, 1);
210 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL2,
211 AR_PHY_PAPRD_TRAINER_CNTL2_CF_PAPRD_INIT_RX_BB_GAIN, 147);
212 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL3,
213 AR_PHY_PAPRD_TRAINER_CNTL3_CF_PAPRD_FINE_CORR_LEN, 4);
214 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL3,
215 AR_PHY_PAPRD_TRAINER_CNTL3_CF_PAPRD_COARSE_CORR_LEN, 4);
216 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL3,
217 AR_PHY_PAPRD_TRAINER_CNTL3_CF_PAPRD_NUM_CORR_STAGES, 7);
218 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL3,
219 AR_PHY_PAPRD_TRAINER_CNTL3_CF_PAPRD_MIN_LOOPBACK_DEL, 1);
220 if (AR_SREV_9485(ah))
221 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL3,
222 AR_PHY_PAPRD_TRAINER_CNTL3_CF_PAPRD_QUICK_DROP,
223 -3);
224 else
225 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL3,
226 AR_PHY_PAPRD_TRAINER_CNTL3_CF_PAPRD_QUICK_DROP,
227 -6);
228 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL3,
229 AR_PHY_PAPRD_TRAINER_CNTL3_CF_PAPRD_ADC_DESIRED_SIZE,
230 -15);
231 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL3,
232 AR_PHY_PAPRD_TRAINER_CNTL3_CF_PAPRD_BBTXMIX_DISABLE, 1);
233 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL4,
234 AR_PHY_PAPRD_TRAINER_CNTL4_CF_PAPRD_SAFETY_DELTA, 0);
235 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL4,
236 AR_PHY_PAPRD_TRAINER_CNTL4_CF_PAPRD_MIN_CORR, 400);
237 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL4,
238 AR_PHY_PAPRD_TRAINER_CNTL4_CF_PAPRD_NUM_TRAIN_SAMPLES,
239 100);
240 REG_RMW_FIELD(ah, AR_PHY_PAPRD_PRE_POST_SCALE_0_B0,
241 AR_PHY_PAPRD_PRE_POST_SCALING, 261376);
242 REG_RMW_FIELD(ah, AR_PHY_PAPRD_PRE_POST_SCALE_1_B0,
243 AR_PHY_PAPRD_PRE_POST_SCALING, 248079);
244 REG_RMW_FIELD(ah, AR_PHY_PAPRD_PRE_POST_SCALE_2_B0,
245 AR_PHY_PAPRD_PRE_POST_SCALING, 233759);
246 REG_RMW_FIELD(ah, AR_PHY_PAPRD_PRE_POST_SCALE_3_B0,
247 AR_PHY_PAPRD_PRE_POST_SCALING, 220464);
248 REG_RMW_FIELD(ah, AR_PHY_PAPRD_PRE_POST_SCALE_4_B0,
249 AR_PHY_PAPRD_PRE_POST_SCALING, 208194);
250 REG_RMW_FIELD(ah, AR_PHY_PAPRD_PRE_POST_SCALE_5_B0,
251 AR_PHY_PAPRD_PRE_POST_SCALING, 196949);
252 REG_RMW_FIELD(ah, AR_PHY_PAPRD_PRE_POST_SCALE_6_B0,
253 AR_PHY_PAPRD_PRE_POST_SCALING, 185706);
254 REG_RMW_FIELD(ah, AR_PHY_PAPRD_PRE_POST_SCALE_7_B0,
255 AR_PHY_PAPRD_PRE_POST_SCALING, 175487);
256 return 0;
257}
258
259static void ar9003_paprd_get_gain_table(struct ath_hw *ah)
260{
261 u32 *entry = ah->paprd_gain_table_entries;
262 u8 *index = ah->paprd_gain_table_index;
263 u32 reg = AR_PHY_TXGAIN_TABLE;
264 int i;
265
266 memset(entry, 0, sizeof(ah->paprd_gain_table_entries));
267 memset(index, 0, sizeof(ah->paprd_gain_table_index));
268
269 for (i = 0; i < PAPRD_GAIN_TABLE_ENTRIES; i++) {
270 entry[i] = REG_READ(ah, reg);
271 index[i] = (entry[i] >> 24) & 0xff;
272 reg += 4;
273 }
274}
275
276static unsigned int ar9003_get_desired_gain(struct ath_hw *ah, int chain,
277 int target_power)
278{
279 int olpc_gain_delta = 0, cl_gain_mod;
280 int alpha_therm, alpha_volt;
281 int therm_cal_value, volt_cal_value;
282 int therm_value, volt_value;
283 int thermal_gain_corr, voltage_gain_corr;
284 int desired_scale, desired_gain = 0;
285 u32 reg_olpc = 0, reg_cl_gain = 0;
286
287 REG_CLR_BIT(ah, AR_PHY_PAPRD_TRAINER_STAT1,
288 AR_PHY_PAPRD_TRAINER_STAT1_PAPRD_TRAIN_DONE);
289 desired_scale = REG_READ_FIELD(ah, AR_PHY_TPC_12,
290 AR_PHY_TPC_12_DESIRED_SCALE_HT40_5);
291 alpha_therm = REG_READ_FIELD(ah, AR_PHY_TPC_19,
292 AR_PHY_TPC_19_ALPHA_THERM);
293 alpha_volt = REG_READ_FIELD(ah, AR_PHY_TPC_19,
294 AR_PHY_TPC_19_ALPHA_VOLT);
295 therm_cal_value = REG_READ_FIELD(ah, AR_PHY_TPC_18,
296 AR_PHY_TPC_18_THERM_CAL_VALUE);
297 volt_cal_value = REG_READ_FIELD(ah, AR_PHY_TPC_18,
298 AR_PHY_TPC_18_VOLT_CAL_VALUE);
299 therm_value = REG_READ_FIELD(ah, AR_PHY_BB_THERM_ADC_4,
300 AR_PHY_BB_THERM_ADC_4_LATEST_THERM_VALUE);
301 volt_value = REG_READ_FIELD(ah, AR_PHY_BB_THERM_ADC_4,
302 AR_PHY_BB_THERM_ADC_4_LATEST_VOLT_VALUE);
303
304 switch (chain) {
305 case 0:
306 reg_olpc = AR_PHY_TPC_11_B0;
307 reg_cl_gain = AR_PHY_CL_TAB_0;
308 break;
309 case 1:
310 reg_olpc = AR_PHY_TPC_11_B1;
311 reg_cl_gain = AR_PHY_CL_TAB_1;
312 break;
313 case 2:
314 reg_olpc = AR_PHY_TPC_11_B2;
315 reg_cl_gain = AR_PHY_CL_TAB_2;
316 break;
317 default:
318 ath_dbg(ath9k_hw_common(ah), ATH_DBG_CALIBRATE,
319 "Invalid chainmask: %d\n", chain);
320 break;
321 }
322
323 olpc_gain_delta = REG_READ_FIELD(ah, reg_olpc,
324 AR_PHY_TPC_11_OLPC_GAIN_DELTA);
325 cl_gain_mod = REG_READ_FIELD(ah, reg_cl_gain,
326 AR_PHY_CL_TAB_CL_GAIN_MOD);
327
328 if (olpc_gain_delta >= 128)
329 olpc_gain_delta = olpc_gain_delta - 256;
330
331 thermal_gain_corr = (alpha_therm * (therm_value - therm_cal_value) +
332 (256 / 2)) / 256;
333 voltage_gain_corr = (alpha_volt * (volt_value - volt_cal_value) +
334 (128 / 2)) / 128;
335 desired_gain = target_power - olpc_gain_delta - thermal_gain_corr -
336 voltage_gain_corr + desired_scale + cl_gain_mod;
337
338 return desired_gain;
339}
340
341static void ar9003_tx_force_gain(struct ath_hw *ah, unsigned int gain_index)
342{
343 int selected_gain_entry, txbb1dbgain, txbb6dbgain, txmxrgain;
344 int padrvgnA, padrvgnB, padrvgnC, padrvgnD;
345 u32 *gain_table_entries = ah->paprd_gain_table_entries;
346
347 selected_gain_entry = gain_table_entries[gain_index];
348 txbb1dbgain = selected_gain_entry & 0x7;
349 txbb6dbgain = (selected_gain_entry >> 3) & 0x3;
350 txmxrgain = (selected_gain_entry >> 5) & 0xf;
351 padrvgnA = (selected_gain_entry >> 9) & 0xf;
352 padrvgnB = (selected_gain_entry >> 13) & 0xf;
353 padrvgnC = (selected_gain_entry >> 17) & 0xf;
354 padrvgnD = (selected_gain_entry >> 21) & 0x3;
355
356 REG_RMW_FIELD(ah, AR_PHY_TX_FORCED_GAIN,
357 AR_PHY_TX_FORCED_GAIN_FORCED_TXBB1DBGAIN, txbb1dbgain);
358 REG_RMW_FIELD(ah, AR_PHY_TX_FORCED_GAIN,
359 AR_PHY_TX_FORCED_GAIN_FORCED_TXBB6DBGAIN, txbb6dbgain);
360 REG_RMW_FIELD(ah, AR_PHY_TX_FORCED_GAIN,
361 AR_PHY_TX_FORCED_GAIN_FORCED_TXMXRGAIN, txmxrgain);
362 REG_RMW_FIELD(ah, AR_PHY_TX_FORCED_GAIN,
363 AR_PHY_TX_FORCED_GAIN_FORCED_PADRVGNA, padrvgnA);
364 REG_RMW_FIELD(ah, AR_PHY_TX_FORCED_GAIN,
365 AR_PHY_TX_FORCED_GAIN_FORCED_PADRVGNB, padrvgnB);
366 REG_RMW_FIELD(ah, AR_PHY_TX_FORCED_GAIN,
367 AR_PHY_TX_FORCED_GAIN_FORCED_PADRVGNC, padrvgnC);
368 REG_RMW_FIELD(ah, AR_PHY_TX_FORCED_GAIN,
369 AR_PHY_TX_FORCED_GAIN_FORCED_PADRVGND, padrvgnD);
370 REG_RMW_FIELD(ah, AR_PHY_TX_FORCED_GAIN,
371 AR_PHY_TX_FORCED_GAIN_FORCED_ENABLE_PAL, 0);
372 REG_RMW_FIELD(ah, AR_PHY_TX_FORCED_GAIN,
373 AR_PHY_TX_FORCED_GAIN_FORCE_TX_GAIN, 0);
374 REG_RMW_FIELD(ah, AR_PHY_TPC_1, AR_PHY_TPC_1_FORCED_DAC_GAIN, 0);
375 REG_RMW_FIELD(ah, AR_PHY_TPC_1, AR_PHY_TPC_1_FORCE_DAC_GAIN, 0);
376}
377
378static inline int find_expn(int num)
379{
380 return fls(num) - 1;
381}
382
383static inline int find_proper_scale(int expn, int N)
384{
385 return (expn > N) ? expn - 10 : 0;
386}
387
388#define NUM_BIN 23
389
390static bool create_pa_curve(u32 *data_L, u32 *data_U, u32 *pa_table, u16 *gain)
391{
392 unsigned int thresh_accum_cnt;
393 int x_est[NUM_BIN + 1], Y[NUM_BIN + 1], theta[NUM_BIN + 1];
394 int PA_in[NUM_BIN + 1];
395 int B1_tmp[NUM_BIN + 1], B2_tmp[NUM_BIN + 1];
396 unsigned int B1_abs_max, B2_abs_max;
397 int max_index, scale_factor;
398 int y_est[NUM_BIN + 1];
399 int x_est_fxp1_nonlin, x_tilde[NUM_BIN + 1];
400 unsigned int x_tilde_abs;
401 int G_fxp, Y_intercept, order_x_by_y, M, I, L, sum_y_sqr, sum_y_quad;
402 int Q_x, Q_B1, Q_B2, beta_raw, alpha_raw, scale_B;
403 int Q_scale_B, Q_beta, Q_alpha, alpha, beta, order_1, order_2;
404 int order1_5x, order2_3x, order1_5x_rem, order2_3x_rem;
405 int y5, y3, tmp;
406 int theta_low_bin = 0;
407 int i;
408
409 /* disregard any bin that contains <= 16 samples */
410 thresh_accum_cnt = 16;
411 scale_factor = 5;
412 max_index = 0;
413 memset(theta, 0, sizeof(theta));
414 memset(x_est, 0, sizeof(x_est));
415 memset(Y, 0, sizeof(Y));
416 memset(y_est, 0, sizeof(y_est));
417 memset(x_tilde, 0, sizeof(x_tilde));
418
419 for (i = 0; i < NUM_BIN; i++) {
420 s32 accum_cnt, accum_tx, accum_rx, accum_ang;
421
422 /* number of samples */
423 accum_cnt = data_L[i] & 0xffff;
424
425 if (accum_cnt <= thresh_accum_cnt)
426 continue;
427
428 /* sum(tx amplitude) */
429 accum_tx = ((data_L[i] >> 16) & 0xffff) |
430 ((data_U[i] & 0x7ff) << 16);
431
432 /* sum(rx amplitude distance to lower bin edge) */
433 accum_rx = ((data_U[i] >> 11) & 0x1f) |
434 ((data_L[i + 23] & 0xffff) << 5);
435
436 /* sum(angles) */
437 accum_ang = ((data_L[i + 23] >> 16) & 0xffff) |
438 ((data_U[i + 23] & 0x7ff) << 16);
439
440 accum_tx <<= scale_factor;
441 accum_rx <<= scale_factor;
442 x_est[i + 1] = (((accum_tx + accum_cnt) / accum_cnt) + 32) >>
443 scale_factor;
444
445 Y[i + 1] = ((((accum_rx + accum_cnt) / accum_cnt) + 32) >>
446 scale_factor) +
447 (1 << scale_factor) * max_index + 16;
448
449 if (accum_ang >= (1 << 26))
450 accum_ang -= 1 << 27;
451
452 theta[i + 1] = ((accum_ang * (1 << scale_factor)) + accum_cnt) /
453 accum_cnt;
454
455 max_index++;
456 }
457
458 /*
459 * Find average theta of first 5 bin and all of those to same value.
460 * Curve is linear at that range.
461 */
462 for (i = 1; i < 6; i++)
463 theta_low_bin += theta[i];
464
465 theta_low_bin = theta_low_bin / 5;
466 for (i = 1; i < 6; i++)
467 theta[i] = theta_low_bin;
468
469 /* Set values at origin */
470 theta[0] = theta_low_bin;
471 for (i = 0; i <= max_index; i++)
472 theta[i] -= theta_low_bin;
473
474 x_est[0] = 0;
475 Y[0] = 0;
476 scale_factor = 8;
477
478 /* low signal gain */
479 if (x_est[6] == x_est[3])
480 return false;
481
482 G_fxp =
483 (((Y[6] - Y[3]) * 1 << scale_factor) +
484 (x_est[6] - x_est[3])) / (x_est[6] - x_est[3]);
485
486 /* prevent division by zero */
487 if (G_fxp == 0)
488 return false;
489
490 Y_intercept =
491 (G_fxp * (x_est[0] - x_est[3]) +
492 (1 << scale_factor)) / (1 << scale_factor) + Y[3];
493
494 for (i = 0; i <= max_index; i++)
495 y_est[i] = Y[i] - Y_intercept;
496
497 for (i = 0; i <= 3; i++) {
498 y_est[i] = i * 32;
499 x_est[i] = ((y_est[i] * 1 << scale_factor) + G_fxp) / G_fxp;
500 }
501
502 if (y_est[max_index] == 0)
503 return false;
504
505 x_est_fxp1_nonlin =
506 x_est[max_index] - ((1 << scale_factor) * y_est[max_index] +
507 G_fxp) / G_fxp;
508
509 order_x_by_y =
510 (x_est_fxp1_nonlin + y_est[max_index]) / y_est[max_index];
511
512 if (order_x_by_y == 0)
513 M = 10;
514 else if (order_x_by_y == 1)
515 M = 9;
516 else
517 M = 8;
518
519 I = (max_index > 15) ? 7 : max_index >> 1;
520 L = max_index - I;
521 scale_factor = 8;
522 sum_y_sqr = 0;
523 sum_y_quad = 0;
524 x_tilde_abs = 0;
525
526 for (i = 0; i <= L; i++) {
527 unsigned int y_sqr;
528 unsigned int y_quad;
529 unsigned int tmp_abs;
530
531 /* prevent division by zero */
532 if (y_est[i + I] == 0)
533 return false;
534
535 x_est_fxp1_nonlin =
536 x_est[i + I] - ((1 << scale_factor) * y_est[i + I] +
537 G_fxp) / G_fxp;
538
539 x_tilde[i] =
540 (x_est_fxp1_nonlin * (1 << M) + y_est[i + I]) / y_est[i +
541 I];
542 x_tilde[i] =
543 (x_tilde[i] * (1 << M) + y_est[i + I]) / y_est[i + I];
544 x_tilde[i] =
545 (x_tilde[i] * (1 << M) + y_est[i + I]) / y_est[i + I];
546 y_sqr =
547 (y_est[i + I] * y_est[i + I] +
548 (scale_factor * scale_factor)) / (scale_factor *
549 scale_factor);
550 tmp_abs = abs(x_tilde[i]);
551 if (tmp_abs > x_tilde_abs)
552 x_tilde_abs = tmp_abs;
553
554 y_quad = y_sqr * y_sqr;
555 sum_y_sqr = sum_y_sqr + y_sqr;
556 sum_y_quad = sum_y_quad + y_quad;
557 B1_tmp[i] = y_sqr * (L + 1);
558 B2_tmp[i] = y_sqr;
559 }
560
561 B1_abs_max = 0;
562 B2_abs_max = 0;
563 for (i = 0; i <= L; i++) {
564 int abs_val;
565
566 B1_tmp[i] -= sum_y_sqr;
567 B2_tmp[i] = sum_y_quad - sum_y_sqr * B2_tmp[i];
568
569 abs_val = abs(B1_tmp[i]);
570 if (abs_val > B1_abs_max)
571 B1_abs_max = abs_val;
572
573 abs_val = abs(B2_tmp[i]);
574 if (abs_val > B2_abs_max)
575 B2_abs_max = abs_val;
576 }
577
578 Q_x = find_proper_scale(find_expn(x_tilde_abs), 10);
579 Q_B1 = find_proper_scale(find_expn(B1_abs_max), 10);
580 Q_B2 = find_proper_scale(find_expn(B2_abs_max), 10);
581
582 beta_raw = 0;
583 alpha_raw = 0;
584 for (i = 0; i <= L; i++) {
585 x_tilde[i] = x_tilde[i] / (1 << Q_x);
586 B1_tmp[i] = B1_tmp[i] / (1 << Q_B1);
587 B2_tmp[i] = B2_tmp[i] / (1 << Q_B2);
588 beta_raw = beta_raw + B1_tmp[i] * x_tilde[i];
589 alpha_raw = alpha_raw + B2_tmp[i] * x_tilde[i];
590 }
591
592 scale_B =
593 ((sum_y_quad / scale_factor) * (L + 1) -
594 (sum_y_sqr / scale_factor) * sum_y_sqr) * scale_factor;
595
596 Q_scale_B = find_proper_scale(find_expn(abs(scale_B)), 10);
597 scale_B = scale_B / (1 << Q_scale_B);
598 if (scale_B == 0)
599 return false;
600 Q_beta = find_proper_scale(find_expn(abs(beta_raw)), 10);
601 Q_alpha = find_proper_scale(find_expn(abs(alpha_raw)), 10);
602 beta_raw = beta_raw / (1 << Q_beta);
603 alpha_raw = alpha_raw / (1 << Q_alpha);
604 alpha = (alpha_raw << 10) / scale_B;
605 beta = (beta_raw << 10) / scale_B;
606 order_1 = 3 * M - Q_x - Q_B1 - Q_beta + 10 + Q_scale_B;
607 order_2 = 3 * M - Q_x - Q_B2 - Q_alpha + 10 + Q_scale_B;
608 order1_5x = order_1 / 5;
609 order2_3x = order_2 / 3;
610 order1_5x_rem = order_1 - 5 * order1_5x;
611 order2_3x_rem = order_2 - 3 * order2_3x;
612
613 for (i = 0; i < PAPRD_TABLE_SZ; i++) {
614 tmp = i * 32;
615 y5 = ((beta * tmp) >> 6) >> order1_5x;
616 y5 = (y5 * tmp) >> order1_5x;
617 y5 = (y5 * tmp) >> order1_5x;
618 y5 = (y5 * tmp) >> order1_5x;
619 y5 = (y5 * tmp) >> order1_5x;
620 y5 = y5 >> order1_5x_rem;
621 y3 = (alpha * tmp) >> order2_3x;
622 y3 = (y3 * tmp) >> order2_3x;
623 y3 = (y3 * tmp) >> order2_3x;
624 y3 = y3 >> order2_3x_rem;
625 PA_in[i] = y5 + y3 + (256 * tmp) / G_fxp;
626
627 if (i >= 2) {
628 tmp = PA_in[i] - PA_in[i - 1];
629 if (tmp < 0)
630 PA_in[i] =
631 PA_in[i - 1] + (PA_in[i - 1] -
632 PA_in[i - 2]);
633 }
634
635 PA_in[i] = (PA_in[i] < 1400) ? PA_in[i] : 1400;
636 }
637
638 beta_raw = 0;
639 alpha_raw = 0;
640
641 for (i = 0; i <= L; i++) {
642 int theta_tilde =
643 ((theta[i + I] << M) + y_est[i + I]) / y_est[i + I];
644 theta_tilde =
645 ((theta_tilde << M) + y_est[i + I]) / y_est[i + I];
646 theta_tilde =
647 ((theta_tilde << M) + y_est[i + I]) / y_est[i + I];
648 beta_raw = beta_raw + B1_tmp[i] * theta_tilde;
649 alpha_raw = alpha_raw + B2_tmp[i] * theta_tilde;
650 }
651
652 Q_beta = find_proper_scale(find_expn(abs(beta_raw)), 10);
653 Q_alpha = find_proper_scale(find_expn(abs(alpha_raw)), 10);
654 beta_raw = beta_raw / (1 << Q_beta);
655 alpha_raw = alpha_raw / (1 << Q_alpha);
656
657 alpha = (alpha_raw << 10) / scale_B;
658 beta = (beta_raw << 10) / scale_B;
659 order_1 = 3 * M - Q_x - Q_B1 - Q_beta + 10 + Q_scale_B + 5;
660 order_2 = 3 * M - Q_x - Q_B2 - Q_alpha + 10 + Q_scale_B + 5;
661 order1_5x = order_1 / 5;
662 order2_3x = order_2 / 3;
663 order1_5x_rem = order_1 - 5 * order1_5x;
664 order2_3x_rem = order_2 - 3 * order2_3x;
665
666 for (i = 0; i < PAPRD_TABLE_SZ; i++) {
667 int PA_angle;
668
669 /* pa_table[4] is calculated from PA_angle for i=5 */
670 if (i == 4)
671 continue;
672
673 tmp = i * 32;
674 if (beta > 0)
675 y5 = (((beta * tmp - 64) >> 6) -
676 (1 << order1_5x)) / (1 << order1_5x);
677 else
678 y5 = ((((beta * tmp - 64) >> 6) +
679 (1 << order1_5x)) / (1 << order1_5x));
680
681 y5 = (y5 * tmp) / (1 << order1_5x);
682 y5 = (y5 * tmp) / (1 << order1_5x);
683 y5 = (y5 * tmp) / (1 << order1_5x);
684 y5 = (y5 * tmp) / (1 << order1_5x);
685 y5 = y5 / (1 << order1_5x_rem);
686
687 if (beta > 0)
688 y3 = (alpha * tmp -
689 (1 << order2_3x)) / (1 << order2_3x);
690 else
691 y3 = (alpha * tmp +
692 (1 << order2_3x)) / (1 << order2_3x);
693 y3 = (y3 * tmp) / (1 << order2_3x);
694 y3 = (y3 * tmp) / (1 << order2_3x);
695 y3 = y3 / (1 << order2_3x_rem);
696
697 if (i < 4) {
698 PA_angle = 0;
699 } else {
700 PA_angle = y5 + y3;
701 if (PA_angle < -150)
702 PA_angle = -150;
703 else if (PA_angle > 150)
704 PA_angle = 150;
705 }
706
707 pa_table[i] = ((PA_in[i] & 0x7ff) << 11) + (PA_angle & 0x7ff);
708 if (i == 5) {
709 PA_angle = (PA_angle + 2) >> 1;
710 pa_table[i - 1] = ((PA_in[i - 1] & 0x7ff) << 11) +
711 (PA_angle & 0x7ff);
712 }
713 }
714
715 *gain = G_fxp;
716 return true;
717}
718
719void ar9003_paprd_populate_single_table(struct ath_hw *ah,
720 struct ath9k_hw_cal_data *caldata,
721 int chain)
722{
723 u32 *paprd_table_val = caldata->pa_table[chain];
724 u32 small_signal_gain = caldata->small_signal_gain[chain];
725 u32 training_power = ah->paprd_training_power;
726 u32 reg = 0;
727 int i;
728
729 if (chain == 0)
730 reg = AR_PHY_PAPRD_MEM_TAB_B0;
731 else if (chain == 1)
732 reg = AR_PHY_PAPRD_MEM_TAB_B1;
733 else if (chain == 2)
734 reg = AR_PHY_PAPRD_MEM_TAB_B2;
735
736 for (i = 0; i < PAPRD_TABLE_SZ; i++) {
737 REG_WRITE(ah, reg, paprd_table_val[i]);
738 reg = reg + 4;
739 }
740
741 if (chain == 0)
742 reg = AR_PHY_PA_GAIN123_B0;
743 else if (chain == 1)
744 reg = AR_PHY_PA_GAIN123_B1;
745 else
746 reg = AR_PHY_PA_GAIN123_B2;
747
748 REG_RMW_FIELD(ah, reg, AR_PHY_PA_GAIN123_PA_GAIN1, small_signal_gain);
749
750 REG_RMW_FIELD(ah, AR_PHY_PAPRD_CTRL1_B0,
751 AR_PHY_PAPRD_CTRL1_PAPRD_POWER_AT_AM2AM_CAL,
752 training_power);
753
754 if (ah->caps.tx_chainmask & BIT(1))
755 REG_RMW_FIELD(ah, AR_PHY_PAPRD_CTRL1_B1,
756 AR_PHY_PAPRD_CTRL1_PAPRD_POWER_AT_AM2AM_CAL,
757 training_power);
758
759 if (ah->caps.tx_chainmask & BIT(2))
760 REG_RMW_FIELD(ah, AR_PHY_PAPRD_CTRL1_B2,
761 AR_PHY_PAPRD_CTRL1_PAPRD_POWER_AT_AM2AM_CAL,
762 training_power);
763}
764EXPORT_SYMBOL(ar9003_paprd_populate_single_table);
765
766int ar9003_paprd_setup_gain_table(struct ath_hw *ah, int chain)
767{
768 unsigned int i, desired_gain, gain_index;
769 unsigned int train_power = ah->paprd_training_power;
770
771 desired_gain = ar9003_get_desired_gain(ah, chain, train_power);
772
773 gain_index = 0;
774 for (i = 0; i < PAPRD_GAIN_TABLE_ENTRIES; i++) {
775 if (ah->paprd_gain_table_index[i] >= desired_gain)
776 break;
777 gain_index++;
778 }
779
780 ar9003_tx_force_gain(ah, gain_index);
781
782 REG_CLR_BIT(ah, AR_PHY_PAPRD_TRAINER_STAT1,
783 AR_PHY_PAPRD_TRAINER_STAT1_PAPRD_TRAIN_DONE);
784
785 return 0;
786}
787EXPORT_SYMBOL(ar9003_paprd_setup_gain_table);
788
789int ar9003_paprd_create_curve(struct ath_hw *ah,
790 struct ath9k_hw_cal_data *caldata, int chain)
791{
792 u16 *small_signal_gain = &caldata->small_signal_gain[chain];
793 u32 *pa_table = caldata->pa_table[chain];
794 u32 *data_L, *data_U;
795 int i, status = 0;
796 u32 *buf;
797 u32 reg;
798
799 memset(caldata->pa_table[chain], 0, sizeof(caldata->pa_table[chain]));
800
801 buf = kmalloc(2 * 48 * sizeof(u32), GFP_ATOMIC);
802 if (!buf)
803 return -ENOMEM;
804
805 data_L = &buf[0];
806 data_U = &buf[48];
807
808 REG_CLR_BIT(ah, AR_PHY_CHAN_INFO_MEMORY,
809 AR_PHY_CHAN_INFO_MEMORY_CHANINFOMEM_S2_READ);
810
811 reg = AR_PHY_CHAN_INFO_TAB_0;
812 for (i = 0; i < 48; i++)
813 data_L[i] = REG_READ(ah, reg + (i << 2));
814
815 REG_SET_BIT(ah, AR_PHY_CHAN_INFO_MEMORY,
816 AR_PHY_CHAN_INFO_MEMORY_CHANINFOMEM_S2_READ);
817
818 for (i = 0; i < 48; i++)
819 data_U[i] = REG_READ(ah, reg + (i << 2));
820
821 if (!create_pa_curve(data_L, data_U, pa_table, small_signal_gain))
822 status = -2;
823
824 REG_CLR_BIT(ah, AR_PHY_PAPRD_TRAINER_STAT1,
825 AR_PHY_PAPRD_TRAINER_STAT1_PAPRD_TRAIN_DONE);
826
827 kfree(buf);
828
829 return status;
830}
831EXPORT_SYMBOL(ar9003_paprd_create_curve);
832
833int ar9003_paprd_init_table(struct ath_hw *ah)
834{
835 int ret;
836
837 ret = ar9003_paprd_setup_single_table(ah);
838 if (ret < 0)
839 return ret;
840
841 ar9003_paprd_get_gain_table(ah);
842 return 0;
843}
844EXPORT_SYMBOL(ar9003_paprd_init_table);
845
846bool ar9003_paprd_is_done(struct ath_hw *ah)
847{
848 int paprd_done, agc2_pwr;
849 paprd_done = REG_READ_FIELD(ah, AR_PHY_PAPRD_TRAINER_STAT1,
850 AR_PHY_PAPRD_TRAINER_STAT1_PAPRD_TRAIN_DONE);
851
852 if (paprd_done == 0x1) {
853 agc2_pwr = REG_READ_FIELD(ah, AR_PHY_PAPRD_TRAINER_STAT1,
854 AR_PHY_PAPRD_TRAINER_STAT1_PAPRD_AGC2_PWR);
855
856 ath_dbg(ath9k_hw_common(ah), ATH_DBG_CALIBRATE,
857 "AGC2_PWR = 0x%x training done = 0x%x\n",
858 agc2_pwr, paprd_done);
859 /*
860 * agc2_pwr range should not be less than 'IDEAL_AGC2_PWR_CHANGE'
861 * when the training is completely done, otherwise retraining is
862 * done to make sure the value is in ideal range
863 */
864 if (agc2_pwr <= PAPRD_IDEAL_AGC2_PWR_RANGE)
865 paprd_done = 0;
866 }
867
868 return !!paprd_done;
869}
870EXPORT_SYMBOL(ar9003_paprd_is_done);
1/*
2 * Copyright (c) 2010-2011 Atheros Communications Inc.
3 *
4 * Permission to use, copy, modify, and/or distribute this software for any
5 * purpose with or without fee is hereby granted, provided that the above
6 * copyright notice and this permission notice appear in all copies.
7 *
8 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
9 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
10 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
11 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
12 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
13 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
14 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
15 */
16
17#include <linux/export.h>
18#include "hw.h"
19#include "ar9003_phy.h"
20
21void ar9003_paprd_enable(struct ath_hw *ah, bool val)
22{
23 struct ath9k_channel *chan = ah->curchan;
24 bool is2ghz = IS_CHAN_2GHZ(chan);
25
26 /*
27 * 3 bits for modalHeader5G.papdRateMaskHt20
28 * is used for sub-band disabling of PAPRD.
29 * 5G band is divided into 3 sub-bands -- upper,
30 * middle, lower.
31 * if bit 30 of modalHeader5G.papdRateMaskHt20 is set
32 * -- disable PAPRD for upper band 5GHz
33 * if bit 29 of modalHeader5G.papdRateMaskHt20 is set
34 * -- disable PAPRD for middle band 5GHz
35 * if bit 28 of modalHeader5G.papdRateMaskHt20 is set
36 * -- disable PAPRD for lower band 5GHz
37 */
38
39 if (!is2ghz) {
40 if (chan->channel >= UPPER_5G_SUB_BAND_START) {
41 if (ar9003_get_paprd_rate_mask_ht20(ah, is2ghz)
42 & BIT(30))
43 val = false;
44 } else if (chan->channel >= MID_5G_SUB_BAND_START) {
45 if (ar9003_get_paprd_rate_mask_ht20(ah, is2ghz)
46 & BIT(29))
47 val = false;
48 } else {
49 if (ar9003_get_paprd_rate_mask_ht20(ah, is2ghz)
50 & BIT(28))
51 val = false;
52 }
53 }
54
55 if (val) {
56 ah->paprd_table_write_done = true;
57 ath9k_hw_apply_txpower(ah, chan, false);
58 }
59
60 REG_RMW_FIELD(ah, AR_PHY_PAPRD_CTRL0_B0,
61 AR_PHY_PAPRD_CTRL0_PAPRD_ENABLE, !!val);
62 if (ah->caps.tx_chainmask & BIT(1))
63 REG_RMW_FIELD(ah, AR_PHY_PAPRD_CTRL0_B1,
64 AR_PHY_PAPRD_CTRL0_PAPRD_ENABLE, !!val);
65 if (ah->caps.tx_chainmask & BIT(2))
66 REG_RMW_FIELD(ah, AR_PHY_PAPRD_CTRL0_B2,
67 AR_PHY_PAPRD_CTRL0_PAPRD_ENABLE, !!val);
68}
69EXPORT_SYMBOL(ar9003_paprd_enable);
70
71static int ar9003_get_training_power_2g(struct ath_hw *ah)
72{
73 struct ath9k_channel *chan = ah->curchan;
74 unsigned int power, scale, delta;
75
76 scale = ar9003_get_paprd_scale_factor(ah, chan);
77
78 if (AR_SREV_9330(ah) || AR_SREV_9340(ah) ||
79 AR_SREV_9462(ah) || AR_SREV_9565(ah)) {
80 power = ah->paprd_target_power + 2;
81 } else if (AR_SREV_9485(ah)) {
82 power = 25;
83 } else {
84 power = REG_READ_FIELD(ah, AR_PHY_POWERTX_RATE5,
85 AR_PHY_POWERTX_RATE5_POWERTXHT20_0);
86
87 delta = abs((int) ah->paprd_target_power - (int) power);
88 if (delta > scale)
89 return -1;
90
91 if (delta < 4)
92 power -= 4 - delta;
93 }
94
95 return power;
96}
97
98static int ar9003_get_training_power_5g(struct ath_hw *ah)
99{
100 struct ath_common *common = ath9k_hw_common(ah);
101 struct ath9k_channel *chan = ah->curchan;
102 unsigned int power, scale, delta;
103
104 scale = ar9003_get_paprd_scale_factor(ah, chan);
105
106 if (IS_CHAN_HT40(chan))
107 power = REG_READ_FIELD(ah, AR_PHY_POWERTX_RATE8,
108 AR_PHY_POWERTX_RATE8_POWERTXHT40_5);
109 else
110 power = REG_READ_FIELD(ah, AR_PHY_POWERTX_RATE6,
111 AR_PHY_POWERTX_RATE6_POWERTXHT20_5);
112
113 power += scale;
114 delta = abs((int) ah->paprd_target_power - (int) power);
115 if (delta > scale)
116 return -1;
117
118 switch (get_streams(ah->txchainmask)) {
119 case 1:
120 delta = 6;
121 break;
122 case 2:
123 delta = 4;
124 break;
125 case 3:
126 delta = 2;
127 break;
128 default:
129 delta = 0;
130 ath_dbg(common, CALIBRATE, "Invalid tx-chainmask: %u\n",
131 ah->txchainmask);
132 }
133
134 power += delta;
135 return power;
136}
137
138static int ar9003_paprd_setup_single_table(struct ath_hw *ah)
139{
140 struct ath_common *common = ath9k_hw_common(ah);
141 static const u32 ctrl0[3] = {
142 AR_PHY_PAPRD_CTRL0_B0,
143 AR_PHY_PAPRD_CTRL0_B1,
144 AR_PHY_PAPRD_CTRL0_B2
145 };
146 static const u32 ctrl1[3] = {
147 AR_PHY_PAPRD_CTRL1_B0,
148 AR_PHY_PAPRD_CTRL1_B1,
149 AR_PHY_PAPRD_CTRL1_B2
150 };
151 int training_power;
152 int i, val;
153 u32 am2pm_mask = ah->paprd_ratemask;
154
155 if (IS_CHAN_2GHZ(ah->curchan))
156 training_power = ar9003_get_training_power_2g(ah);
157 else
158 training_power = ar9003_get_training_power_5g(ah);
159
160 ath_dbg(common, CALIBRATE, "Training power: %d, Target power: %d\n",
161 training_power, ah->paprd_target_power);
162
163 if (training_power < 0) {
164 ath_dbg(common, CALIBRATE,
165 "PAPRD target power delta out of range\n");
166 return -ERANGE;
167 }
168 ah->paprd_training_power = training_power;
169
170 if (AR_SREV_9330(ah))
171 am2pm_mask = 0;
172
173 REG_RMW_FIELD(ah, AR_PHY_PAPRD_AM2AM, AR_PHY_PAPRD_AM2AM_MASK,
174 ah->paprd_ratemask);
175 REG_RMW_FIELD(ah, AR_PHY_PAPRD_AM2PM, AR_PHY_PAPRD_AM2PM_MASK,
176 am2pm_mask);
177 REG_RMW_FIELD(ah, AR_PHY_PAPRD_HT40, AR_PHY_PAPRD_HT40_MASK,
178 ah->paprd_ratemask_ht40);
179
180 ath_dbg(common, CALIBRATE, "PAPRD HT20 mask: 0x%x, HT40 mask: 0x%x\n",
181 ah->paprd_ratemask, ah->paprd_ratemask_ht40);
182
183 for (i = 0; i < ah->caps.max_txchains; i++) {
184 REG_RMW_FIELD(ah, ctrl0[i],
185 AR_PHY_PAPRD_CTRL0_USE_SINGLE_TABLE_MASK, 1);
186 REG_RMW_FIELD(ah, ctrl1[i],
187 AR_PHY_PAPRD_CTRL1_ADAPTIVE_AM2PM_ENABLE, 1);
188 REG_RMW_FIELD(ah, ctrl1[i],
189 AR_PHY_PAPRD_CTRL1_ADAPTIVE_AM2AM_ENABLE, 1);
190 REG_RMW_FIELD(ah, ctrl1[i],
191 AR_PHY_PAPRD_CTRL1_ADAPTIVE_SCALING_ENA, 0);
192 REG_RMW_FIELD(ah, ctrl1[i],
193 AR_PHY_PAPRD_CTRL1_PA_GAIN_SCALE_FACT_MASK, 181);
194 REG_RMW_FIELD(ah, ctrl1[i],
195 AR_PHY_PAPRD_CTRL1_PAPRD_MAG_SCALE_FACT, 361);
196 REG_RMW_FIELD(ah, ctrl1[i],
197 AR_PHY_PAPRD_CTRL1_ADAPTIVE_SCALING_ENA, 0);
198 REG_RMW_FIELD(ah, ctrl0[i],
199 AR_PHY_PAPRD_CTRL0_PAPRD_MAG_THRSH, 3);
200 }
201
202 ar9003_paprd_enable(ah, false);
203
204 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL1(ah),
205 AR_PHY_PAPRD_TRAINER_CNTL1_CF_PAPRD_LB_SKIP, 0x30);
206 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL1(ah),
207 AR_PHY_PAPRD_TRAINER_CNTL1_CF_PAPRD_LB_ENABLE, 1);
208 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL1(ah),
209 AR_PHY_PAPRD_TRAINER_CNTL1_CF_PAPRD_TX_GAIN_FORCE, 1);
210 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL1(ah),
211 AR_PHY_PAPRD_TRAINER_CNTL1_CF_PAPRD_RX_BB_GAIN_FORCE, 0);
212 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL1(ah),
213 AR_PHY_PAPRD_TRAINER_CNTL1_CF_PAPRD_IQCORR_ENABLE, 0);
214 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL1(ah),
215 AR_PHY_PAPRD_TRAINER_CNTL1_CF_PAPRD_AGC2_SETTLING, 28);
216 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL1(ah),
217 AR_PHY_PAPRD_TRAINER_CNTL1_CF_CF_PAPRD_TRAIN_ENABLE, 1);
218
219 if (AR_SREV_9485(ah)) {
220 val = 148;
221 } else {
222 if (IS_CHAN_2GHZ(ah->curchan)) {
223 if (AR_SREV_9462(ah) || AR_SREV_9565(ah))
224 val = 145;
225 else
226 val = 147;
227 } else {
228 val = 137;
229 }
230 }
231
232 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL2(ah),
233 AR_PHY_PAPRD_TRAINER_CNTL2_CF_PAPRD_INIT_RX_BB_GAIN, val);
234 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL3(ah),
235 AR_PHY_PAPRD_TRAINER_CNTL3_CF_PAPRD_FINE_CORR_LEN, 4);
236 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL3(ah),
237 AR_PHY_PAPRD_TRAINER_CNTL3_CF_PAPRD_COARSE_CORR_LEN, 4);
238 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL3(ah),
239 AR_PHY_PAPRD_TRAINER_CNTL3_CF_PAPRD_NUM_CORR_STAGES, 7);
240 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL3(ah),
241 AR_PHY_PAPRD_TRAINER_CNTL3_CF_PAPRD_MIN_LOOPBACK_DEL, 1);
242
243 if (AR_SREV_9485(ah) ||
244 AR_SREV_9462(ah) ||
245 AR_SREV_9565(ah) ||
246 AR_SREV_9550(ah) ||
247 AR_SREV_9330(ah) ||
248 AR_SREV_9340(ah))
249 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL3(ah),
250 AR_PHY_PAPRD_TRAINER_CNTL3_CF_PAPRD_QUICK_DROP, -3);
251 else
252 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL3(ah),
253 AR_PHY_PAPRD_TRAINER_CNTL3_CF_PAPRD_QUICK_DROP, -6);
254
255 val = -10;
256
257 if (IS_CHAN_2GHZ(ah->curchan) && !AR_SREV_9462(ah) && !AR_SREV_9565(ah))
258 val = -15;
259
260 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL3(ah),
261 AR_PHY_PAPRD_TRAINER_CNTL3_CF_PAPRD_ADC_DESIRED_SIZE,
262 val);
263 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL3(ah),
264 AR_PHY_PAPRD_TRAINER_CNTL3_CF_PAPRD_BBTXMIX_DISABLE, 1);
265 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL4(ah),
266 AR_PHY_PAPRD_TRAINER_CNTL4_CF_PAPRD_SAFETY_DELTA, 0);
267 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL4(ah),
268 AR_PHY_PAPRD_TRAINER_CNTL4_CF_PAPRD_MIN_CORR, 400);
269 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL4(ah),
270 AR_PHY_PAPRD_TRAINER_CNTL4_CF_PAPRD_NUM_TRAIN_SAMPLES,
271 100);
272 REG_RMW_FIELD(ah, AR_PHY_PAPRD_PRE_POST_SCALE_0_B0,
273 AR_PHY_PAPRD_PRE_POST_SCALING, 261376);
274 REG_RMW_FIELD(ah, AR_PHY_PAPRD_PRE_POST_SCALE_1_B0,
275 AR_PHY_PAPRD_PRE_POST_SCALING, 248079);
276 REG_RMW_FIELD(ah, AR_PHY_PAPRD_PRE_POST_SCALE_2_B0,
277 AR_PHY_PAPRD_PRE_POST_SCALING, 233759);
278 REG_RMW_FIELD(ah, AR_PHY_PAPRD_PRE_POST_SCALE_3_B0,
279 AR_PHY_PAPRD_PRE_POST_SCALING, 220464);
280 REG_RMW_FIELD(ah, AR_PHY_PAPRD_PRE_POST_SCALE_4_B0,
281 AR_PHY_PAPRD_PRE_POST_SCALING, 208194);
282 REG_RMW_FIELD(ah, AR_PHY_PAPRD_PRE_POST_SCALE_5_B0,
283 AR_PHY_PAPRD_PRE_POST_SCALING, 196949);
284 REG_RMW_FIELD(ah, AR_PHY_PAPRD_PRE_POST_SCALE_6_B0,
285 AR_PHY_PAPRD_PRE_POST_SCALING, 185706);
286 REG_RMW_FIELD(ah, AR_PHY_PAPRD_PRE_POST_SCALE_7_B0,
287 AR_PHY_PAPRD_PRE_POST_SCALING, 175487);
288 return 0;
289}
290
291static void ar9003_paprd_get_gain_table(struct ath_hw *ah)
292{
293 u32 *entry = ah->paprd_gain_table_entries;
294 u8 *index = ah->paprd_gain_table_index;
295 u32 reg = AR_PHY_TXGAIN_TABLE;
296 int i;
297
298 for (i = 0; i < PAPRD_GAIN_TABLE_ENTRIES; i++) {
299 entry[i] = REG_READ(ah, reg);
300 index[i] = (entry[i] >> 24) & 0xff;
301 reg += 4;
302 }
303}
304
305static unsigned int ar9003_get_desired_gain(struct ath_hw *ah, int chain,
306 int target_power)
307{
308 int olpc_gain_delta = 0, cl_gain_mod;
309 int alpha_therm, alpha_volt;
310 int therm_cal_value, volt_cal_value;
311 int therm_value, volt_value;
312 int thermal_gain_corr, voltage_gain_corr;
313 int desired_scale, desired_gain = 0;
314 u32 reg_olpc = 0, reg_cl_gain = 0;
315
316 REG_CLR_BIT(ah, AR_PHY_PAPRD_TRAINER_STAT1(ah),
317 AR_PHY_PAPRD_TRAINER_STAT1_PAPRD_TRAIN_DONE);
318 desired_scale = REG_READ_FIELD(ah, AR_PHY_TPC_12,
319 AR_PHY_TPC_12_DESIRED_SCALE_HT40_5);
320 alpha_therm = REG_READ_FIELD(ah, AR_PHY_TPC_19,
321 AR_PHY_TPC_19_ALPHA_THERM);
322 alpha_volt = REG_READ_FIELD(ah, AR_PHY_TPC_19,
323 AR_PHY_TPC_19_ALPHA_VOLT);
324 therm_cal_value = REG_READ_FIELD(ah, AR_PHY_TPC_18,
325 AR_PHY_TPC_18_THERM_CAL_VALUE);
326 volt_cal_value = REG_READ_FIELD(ah, AR_PHY_TPC_18,
327 AR_PHY_TPC_18_VOLT_CAL_VALUE);
328 therm_value = REG_READ_FIELD(ah, AR_PHY_BB_THERM_ADC_4,
329 AR_PHY_BB_THERM_ADC_4_LATEST_THERM_VALUE);
330 volt_value = REG_READ_FIELD(ah, AR_PHY_BB_THERM_ADC_4,
331 AR_PHY_BB_THERM_ADC_4_LATEST_VOLT_VALUE);
332
333 switch (chain) {
334 case 0:
335 reg_olpc = AR_PHY_TPC_11_B0;
336 reg_cl_gain = AR_PHY_CL_TAB_0;
337 break;
338 case 1:
339 reg_olpc = AR_PHY_TPC_11_B1;
340 reg_cl_gain = AR_PHY_CL_TAB_1;
341 break;
342 case 2:
343 reg_olpc = AR_PHY_TPC_11_B2;
344 reg_cl_gain = AR_PHY_CL_TAB_2;
345 break;
346 default:
347 ath_dbg(ath9k_hw_common(ah), CALIBRATE,
348 "Invalid chainmask: %d\n", chain);
349 break;
350 }
351
352 olpc_gain_delta = REG_READ_FIELD(ah, reg_olpc,
353 AR_PHY_TPC_11_OLPC_GAIN_DELTA);
354 cl_gain_mod = REG_READ_FIELD(ah, reg_cl_gain,
355 AR_PHY_CL_TAB_CL_GAIN_MOD);
356
357 if (olpc_gain_delta >= 128)
358 olpc_gain_delta = olpc_gain_delta - 256;
359
360 thermal_gain_corr = (alpha_therm * (therm_value - therm_cal_value) +
361 (256 / 2)) / 256;
362 voltage_gain_corr = (alpha_volt * (volt_value - volt_cal_value) +
363 (128 / 2)) / 128;
364 desired_gain = target_power - olpc_gain_delta - thermal_gain_corr -
365 voltage_gain_corr + desired_scale + cl_gain_mod;
366
367 return desired_gain;
368}
369
370static void ar9003_tx_force_gain(struct ath_hw *ah, unsigned int gain_index)
371{
372 int selected_gain_entry, txbb1dbgain, txbb6dbgain, txmxrgain;
373 int padrvgnA, padrvgnB, padrvgnC, padrvgnD;
374 u32 *gain_table_entries = ah->paprd_gain_table_entries;
375
376 selected_gain_entry = gain_table_entries[gain_index];
377 txbb1dbgain = selected_gain_entry & 0x7;
378 txbb6dbgain = (selected_gain_entry >> 3) & 0x3;
379 txmxrgain = (selected_gain_entry >> 5) & 0xf;
380 padrvgnA = (selected_gain_entry >> 9) & 0xf;
381 padrvgnB = (selected_gain_entry >> 13) & 0xf;
382 padrvgnC = (selected_gain_entry >> 17) & 0xf;
383 padrvgnD = (selected_gain_entry >> 21) & 0x3;
384
385 REG_RMW_FIELD(ah, AR_PHY_TX_FORCED_GAIN,
386 AR_PHY_TX_FORCED_GAIN_FORCED_TXBB1DBGAIN, txbb1dbgain);
387 REG_RMW_FIELD(ah, AR_PHY_TX_FORCED_GAIN,
388 AR_PHY_TX_FORCED_GAIN_FORCED_TXBB6DBGAIN, txbb6dbgain);
389 REG_RMW_FIELD(ah, AR_PHY_TX_FORCED_GAIN,
390 AR_PHY_TX_FORCED_GAIN_FORCED_TXMXRGAIN, txmxrgain);
391 REG_RMW_FIELD(ah, AR_PHY_TX_FORCED_GAIN,
392 AR_PHY_TX_FORCED_GAIN_FORCED_PADRVGNA, padrvgnA);
393 REG_RMW_FIELD(ah, AR_PHY_TX_FORCED_GAIN,
394 AR_PHY_TX_FORCED_GAIN_FORCED_PADRVGNB, padrvgnB);
395 REG_RMW_FIELD(ah, AR_PHY_TX_FORCED_GAIN,
396 AR_PHY_TX_FORCED_GAIN_FORCED_PADRVGNC, padrvgnC);
397 REG_RMW_FIELD(ah, AR_PHY_TX_FORCED_GAIN,
398 AR_PHY_TX_FORCED_GAIN_FORCED_PADRVGND, padrvgnD);
399 REG_RMW_FIELD(ah, AR_PHY_TX_FORCED_GAIN,
400 AR_PHY_TX_FORCED_GAIN_FORCED_ENABLE_PAL, 0);
401 REG_RMW_FIELD(ah, AR_PHY_TX_FORCED_GAIN,
402 AR_PHY_TX_FORCED_GAIN_FORCE_TX_GAIN, 0);
403 REG_RMW_FIELD(ah, AR_PHY_TPC_1, AR_PHY_TPC_1_FORCED_DAC_GAIN, 0);
404 REG_RMW_FIELD(ah, AR_PHY_TPC_1, AR_PHY_TPC_1_FORCE_DAC_GAIN, 0);
405}
406
407static inline int find_expn(int num)
408{
409 return fls(num) - 1;
410}
411
412static inline int find_proper_scale(int expn, int N)
413{
414 return (expn > N) ? expn - 10 : 0;
415}
416
417#define NUM_BIN 23
418
419static bool create_pa_curve(u32 *data_L, u32 *data_U, u32 *pa_table, u16 *gain)
420{
421 unsigned int thresh_accum_cnt;
422 int x_est[NUM_BIN + 1], Y[NUM_BIN + 1], theta[NUM_BIN + 1];
423 int PA_in[NUM_BIN + 1];
424 int B1_tmp[NUM_BIN + 1], B2_tmp[NUM_BIN + 1];
425 unsigned int B1_abs_max, B2_abs_max;
426 int max_index, scale_factor;
427 int y_est[NUM_BIN + 1];
428 int x_est_fxp1_nonlin, x_tilde[NUM_BIN + 1];
429 unsigned int x_tilde_abs;
430 int G_fxp, Y_intercept, order_x_by_y, M, I, L, sum_y_sqr, sum_y_quad;
431 int Q_x, Q_B1, Q_B2, beta_raw, alpha_raw, scale_B;
432 int Q_scale_B, Q_beta, Q_alpha, alpha, beta, order_1, order_2;
433 int order1_5x, order2_3x, order1_5x_rem, order2_3x_rem;
434 int y5, y3, tmp;
435 int theta_low_bin = 0;
436 int i;
437
438 /* disregard any bin that contains <= 16 samples */
439 thresh_accum_cnt = 16;
440 scale_factor = 5;
441 max_index = 0;
442 memset(theta, 0, sizeof(theta));
443 memset(x_est, 0, sizeof(x_est));
444 memset(Y, 0, sizeof(Y));
445 memset(y_est, 0, sizeof(y_est));
446 memset(x_tilde, 0, sizeof(x_tilde));
447
448 for (i = 0; i < NUM_BIN; i++) {
449 s32 accum_cnt, accum_tx, accum_rx, accum_ang;
450
451 /* number of samples */
452 accum_cnt = data_L[i] & 0xffff;
453
454 if (accum_cnt <= thresh_accum_cnt)
455 continue;
456
457 max_index++;
458
459 /* sum(tx amplitude) */
460 accum_tx = ((data_L[i] >> 16) & 0xffff) |
461 ((data_U[i] & 0x7ff) << 16);
462
463 /* sum(rx amplitude distance to lower bin edge) */
464 accum_rx = ((data_U[i] >> 11) & 0x1f) |
465 ((data_L[i + 23] & 0xffff) << 5);
466
467 /* sum(angles) */
468 accum_ang = ((data_L[i + 23] >> 16) & 0xffff) |
469 ((data_U[i + 23] & 0x7ff) << 16);
470
471 accum_tx <<= scale_factor;
472 accum_rx <<= scale_factor;
473 x_est[max_index] =
474 (((accum_tx + accum_cnt) / accum_cnt) + 32) >>
475 scale_factor;
476
477 Y[max_index] =
478 ((((accum_rx + accum_cnt) / accum_cnt) + 32) >>
479 scale_factor) +
480 (1 << scale_factor) * i + 16;
481
482 if (accum_ang >= (1 << 26))
483 accum_ang -= 1 << 27;
484
485 theta[max_index] =
486 ((accum_ang * (1 << scale_factor)) + accum_cnt) /
487 accum_cnt;
488 }
489
490 /*
491 * Find average theta of first 5 bin and all of those to same value.
492 * Curve is linear at that range.
493 */
494 for (i = 1; i < 6; i++)
495 theta_low_bin += theta[i];
496
497 theta_low_bin = theta_low_bin / 5;
498 for (i = 1; i < 6; i++)
499 theta[i] = theta_low_bin;
500
501 /* Set values at origin */
502 theta[0] = theta_low_bin;
503 for (i = 0; i <= max_index; i++)
504 theta[i] -= theta_low_bin;
505
506 x_est[0] = 0;
507 Y[0] = 0;
508 scale_factor = 8;
509
510 /* low signal gain */
511 if (x_est[6] == x_est[3])
512 return false;
513
514 G_fxp =
515 (((Y[6] - Y[3]) * 1 << scale_factor) +
516 (x_est[6] - x_est[3])) / (x_est[6] - x_est[3]);
517
518 /* prevent division by zero */
519 if (G_fxp == 0)
520 return false;
521
522 Y_intercept =
523 (G_fxp * (x_est[0] - x_est[3]) +
524 (1 << scale_factor)) / (1 << scale_factor) + Y[3];
525
526 for (i = 0; i <= max_index; i++)
527 y_est[i] = Y[i] - Y_intercept;
528
529 for (i = 0; i <= 3; i++) {
530 y_est[i] = i * 32;
531 x_est[i] = ((y_est[i] * 1 << scale_factor) + G_fxp) / G_fxp;
532 }
533
534 if (y_est[max_index] == 0)
535 return false;
536
537 x_est_fxp1_nonlin =
538 x_est[max_index] - ((1 << scale_factor) * y_est[max_index] +
539 G_fxp) / G_fxp;
540
541 order_x_by_y =
542 (x_est_fxp1_nonlin + y_est[max_index]) / y_est[max_index];
543
544 if (order_x_by_y == 0)
545 M = 10;
546 else if (order_x_by_y == 1)
547 M = 9;
548 else
549 M = 8;
550
551 I = (max_index > 15) ? 7 : max_index >> 1;
552 L = max_index - I;
553 scale_factor = 8;
554 sum_y_sqr = 0;
555 sum_y_quad = 0;
556 x_tilde_abs = 0;
557
558 for (i = 0; i <= L; i++) {
559 unsigned int y_sqr;
560 unsigned int y_quad;
561 unsigned int tmp_abs;
562
563 /* prevent division by zero */
564 if (y_est[i + I] == 0)
565 return false;
566
567 x_est_fxp1_nonlin =
568 x_est[i + I] - ((1 << scale_factor) * y_est[i + I] +
569 G_fxp) / G_fxp;
570
571 x_tilde[i] =
572 (x_est_fxp1_nonlin * (1 << M) + y_est[i + I]) / y_est[i +
573 I];
574 x_tilde[i] =
575 (x_tilde[i] * (1 << M) + y_est[i + I]) / y_est[i + I];
576 x_tilde[i] =
577 (x_tilde[i] * (1 << M) + y_est[i + I]) / y_est[i + I];
578 y_sqr =
579 (y_est[i + I] * y_est[i + I] +
580 (scale_factor * scale_factor)) / (scale_factor *
581 scale_factor);
582 tmp_abs = abs(x_tilde[i]);
583 if (tmp_abs > x_tilde_abs)
584 x_tilde_abs = tmp_abs;
585
586 y_quad = y_sqr * y_sqr;
587 sum_y_sqr = sum_y_sqr + y_sqr;
588 sum_y_quad = sum_y_quad + y_quad;
589 B1_tmp[i] = y_sqr * (L + 1);
590 B2_tmp[i] = y_sqr;
591 }
592
593 B1_abs_max = 0;
594 B2_abs_max = 0;
595 for (i = 0; i <= L; i++) {
596 int abs_val;
597
598 B1_tmp[i] -= sum_y_sqr;
599 B2_tmp[i] = sum_y_quad - sum_y_sqr * B2_tmp[i];
600
601 abs_val = abs(B1_tmp[i]);
602 if (abs_val > B1_abs_max)
603 B1_abs_max = abs_val;
604
605 abs_val = abs(B2_tmp[i]);
606 if (abs_val > B2_abs_max)
607 B2_abs_max = abs_val;
608 }
609
610 Q_x = find_proper_scale(find_expn(x_tilde_abs), 10);
611 Q_B1 = find_proper_scale(find_expn(B1_abs_max), 10);
612 Q_B2 = find_proper_scale(find_expn(B2_abs_max), 10);
613
614 beta_raw = 0;
615 alpha_raw = 0;
616 for (i = 0; i <= L; i++) {
617 x_tilde[i] = x_tilde[i] / (1 << Q_x);
618 B1_tmp[i] = B1_tmp[i] / (1 << Q_B1);
619 B2_tmp[i] = B2_tmp[i] / (1 << Q_B2);
620 beta_raw = beta_raw + B1_tmp[i] * x_tilde[i];
621 alpha_raw = alpha_raw + B2_tmp[i] * x_tilde[i];
622 }
623
624 scale_B =
625 ((sum_y_quad / scale_factor) * (L + 1) -
626 (sum_y_sqr / scale_factor) * sum_y_sqr) * scale_factor;
627
628 Q_scale_B = find_proper_scale(find_expn(abs(scale_B)), 10);
629 scale_B = scale_B / (1 << Q_scale_B);
630 if (scale_B == 0)
631 return false;
632 Q_beta = find_proper_scale(find_expn(abs(beta_raw)), 10);
633 Q_alpha = find_proper_scale(find_expn(abs(alpha_raw)), 10);
634 beta_raw = beta_raw / (1 << Q_beta);
635 alpha_raw = alpha_raw / (1 << Q_alpha);
636 alpha = (alpha_raw << 10) / scale_B;
637 beta = (beta_raw << 10) / scale_B;
638 order_1 = 3 * M - Q_x - Q_B1 - Q_beta + 10 + Q_scale_B;
639 order_2 = 3 * M - Q_x - Q_B2 - Q_alpha + 10 + Q_scale_B;
640 order1_5x = order_1 / 5;
641 order2_3x = order_2 / 3;
642 order1_5x_rem = order_1 - 5 * order1_5x;
643 order2_3x_rem = order_2 - 3 * order2_3x;
644
645 for (i = 0; i < PAPRD_TABLE_SZ; i++) {
646 tmp = i * 32;
647 y5 = ((beta * tmp) >> 6) >> order1_5x;
648 y5 = (y5 * tmp) >> order1_5x;
649 y5 = (y5 * tmp) >> order1_5x;
650 y5 = (y5 * tmp) >> order1_5x;
651 y5 = (y5 * tmp) >> order1_5x;
652 y5 = y5 >> order1_5x_rem;
653 y3 = (alpha * tmp) >> order2_3x;
654 y3 = (y3 * tmp) >> order2_3x;
655 y3 = (y3 * tmp) >> order2_3x;
656 y3 = y3 >> order2_3x_rem;
657 PA_in[i] = y5 + y3 + (256 * tmp) / G_fxp;
658
659 if (i >= 2) {
660 tmp = PA_in[i] - PA_in[i - 1];
661 if (tmp < 0)
662 PA_in[i] =
663 PA_in[i - 1] + (PA_in[i - 1] -
664 PA_in[i - 2]);
665 }
666
667 PA_in[i] = (PA_in[i] < 1400) ? PA_in[i] : 1400;
668 }
669
670 beta_raw = 0;
671 alpha_raw = 0;
672
673 for (i = 0; i <= L; i++) {
674 int theta_tilde =
675 ((theta[i + I] << M) + y_est[i + I]) / y_est[i + I];
676 theta_tilde =
677 ((theta_tilde << M) + y_est[i + I]) / y_est[i + I];
678 theta_tilde =
679 ((theta_tilde << M) + y_est[i + I]) / y_est[i + I];
680 beta_raw = beta_raw + B1_tmp[i] * theta_tilde;
681 alpha_raw = alpha_raw + B2_tmp[i] * theta_tilde;
682 }
683
684 Q_beta = find_proper_scale(find_expn(abs(beta_raw)), 10);
685 Q_alpha = find_proper_scale(find_expn(abs(alpha_raw)), 10);
686 beta_raw = beta_raw / (1 << Q_beta);
687 alpha_raw = alpha_raw / (1 << Q_alpha);
688
689 alpha = (alpha_raw << 10) / scale_B;
690 beta = (beta_raw << 10) / scale_B;
691 order_1 = 3 * M - Q_x - Q_B1 - Q_beta + 10 + Q_scale_B + 5;
692 order_2 = 3 * M - Q_x - Q_B2 - Q_alpha + 10 + Q_scale_B + 5;
693 order1_5x = order_1 / 5;
694 order2_3x = order_2 / 3;
695 order1_5x_rem = order_1 - 5 * order1_5x;
696 order2_3x_rem = order_2 - 3 * order2_3x;
697
698 for (i = 0; i < PAPRD_TABLE_SZ; i++) {
699 int PA_angle;
700
701 /* pa_table[4] is calculated from PA_angle for i=5 */
702 if (i == 4)
703 continue;
704
705 tmp = i * 32;
706 if (beta > 0)
707 y5 = (((beta * tmp - 64) >> 6) -
708 (1 << order1_5x)) / (1 << order1_5x);
709 else
710 y5 = ((((beta * tmp - 64) >> 6) +
711 (1 << order1_5x)) / (1 << order1_5x));
712
713 y5 = (y5 * tmp) / (1 << order1_5x);
714 y5 = (y5 * tmp) / (1 << order1_5x);
715 y5 = (y5 * tmp) / (1 << order1_5x);
716 y5 = (y5 * tmp) / (1 << order1_5x);
717 y5 = y5 / (1 << order1_5x_rem);
718
719 if (beta > 0)
720 y3 = (alpha * tmp -
721 (1 << order2_3x)) / (1 << order2_3x);
722 else
723 y3 = (alpha * tmp +
724 (1 << order2_3x)) / (1 << order2_3x);
725 y3 = (y3 * tmp) / (1 << order2_3x);
726 y3 = (y3 * tmp) / (1 << order2_3x);
727 y3 = y3 / (1 << order2_3x_rem);
728
729 if (i < 4) {
730 PA_angle = 0;
731 } else {
732 PA_angle = y5 + y3;
733 if (PA_angle < -150)
734 PA_angle = -150;
735 else if (PA_angle > 150)
736 PA_angle = 150;
737 }
738
739 pa_table[i] = ((PA_in[i] & 0x7ff) << 11) + (PA_angle & 0x7ff);
740 if (i == 5) {
741 PA_angle = (PA_angle + 2) >> 1;
742 pa_table[i - 1] = ((PA_in[i - 1] & 0x7ff) << 11) +
743 (PA_angle & 0x7ff);
744 }
745 }
746
747 *gain = G_fxp;
748 return true;
749}
750
751void ar9003_paprd_populate_single_table(struct ath_hw *ah,
752 struct ath9k_hw_cal_data *caldata,
753 int chain)
754{
755 u32 *paprd_table_val = caldata->pa_table[chain];
756 u32 small_signal_gain = caldata->small_signal_gain[chain];
757 u32 training_power = ah->paprd_training_power;
758 u32 reg = 0;
759 int i;
760
761 if (chain == 0)
762 reg = AR_PHY_PAPRD_MEM_TAB_B0;
763 else if (chain == 1)
764 reg = AR_PHY_PAPRD_MEM_TAB_B1;
765 else if (chain == 2)
766 reg = AR_PHY_PAPRD_MEM_TAB_B2;
767
768 for (i = 0; i < PAPRD_TABLE_SZ; i++) {
769 REG_WRITE(ah, reg, paprd_table_val[i]);
770 reg = reg + 4;
771 }
772
773 if (chain == 0)
774 reg = AR_PHY_PA_GAIN123_B0;
775 else if (chain == 1)
776 reg = AR_PHY_PA_GAIN123_B1;
777 else
778 reg = AR_PHY_PA_GAIN123_B2;
779
780 REG_RMW_FIELD(ah, reg, AR_PHY_PA_GAIN123_PA_GAIN1, small_signal_gain);
781
782 REG_RMW_FIELD(ah, AR_PHY_PAPRD_CTRL1_B0,
783 AR_PHY_PAPRD_CTRL1_PAPRD_POWER_AT_AM2AM_CAL,
784 training_power);
785
786 if (ah->caps.tx_chainmask & BIT(1))
787 REG_RMW_FIELD(ah, AR_PHY_PAPRD_CTRL1_B1,
788 AR_PHY_PAPRD_CTRL1_PAPRD_POWER_AT_AM2AM_CAL,
789 training_power);
790
791 if (ah->caps.tx_chainmask & BIT(2))
792 /* val AR_PHY_PAPRD_CTRL1_PAPRD_POWER_AT_AM2AM_CAL correct? */
793 REG_RMW_FIELD(ah, AR_PHY_PAPRD_CTRL1_B2,
794 AR_PHY_PAPRD_CTRL1_PAPRD_POWER_AT_AM2AM_CAL,
795 training_power);
796}
797EXPORT_SYMBOL(ar9003_paprd_populate_single_table);
798
799void ar9003_paprd_setup_gain_table(struct ath_hw *ah, int chain)
800{
801 unsigned int i, desired_gain, gain_index;
802 unsigned int train_power = ah->paprd_training_power;
803
804 desired_gain = ar9003_get_desired_gain(ah, chain, train_power);
805
806 gain_index = 0;
807 for (i = 0; i < PAPRD_GAIN_TABLE_ENTRIES; i++) {
808 if (ah->paprd_gain_table_index[i] >= desired_gain)
809 break;
810 gain_index++;
811 }
812
813 ar9003_tx_force_gain(ah, gain_index);
814
815 REG_CLR_BIT(ah, AR_PHY_PAPRD_TRAINER_STAT1(ah),
816 AR_PHY_PAPRD_TRAINER_STAT1_PAPRD_TRAIN_DONE);
817}
818EXPORT_SYMBOL(ar9003_paprd_setup_gain_table);
819
820static bool ar9003_paprd_retrain_pa_in(struct ath_hw *ah,
821 struct ath9k_hw_cal_data *caldata,
822 int chain)
823{
824 u32 *pa_in = caldata->pa_table[chain];
825 int capdiv_offset, quick_drop_offset;
826 int capdiv2g, quick_drop;
827 int count = 0;
828 int i;
829
830 if (!AR_SREV_9485(ah) && !AR_SREV_9330(ah))
831 return false;
832
833 capdiv2g = REG_READ_FIELD(ah, AR_PHY_65NM_CH0_TXRF3,
834 AR_PHY_65NM_CH0_TXRF3_CAPDIV2G);
835
836 quick_drop = REG_READ_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL3(ah),
837 AR_PHY_PAPRD_TRAINER_CNTL3_CF_PAPRD_QUICK_DROP);
838
839 if (quick_drop)
840 quick_drop -= 0x40;
841
842 for (i = 0; i < NUM_BIN + 1; i++) {
843 if (pa_in[i] == 1400)
844 count++;
845 }
846
847 if (AR_SREV_9485(ah)) {
848 if (pa_in[23] < 800) {
849 capdiv_offset = (int)((1000 - pa_in[23] + 75) / 150);
850 capdiv2g += capdiv_offset;
851 if (capdiv2g > 7) {
852 capdiv2g = 7;
853 if (pa_in[23] < 600) {
854 quick_drop++;
855 if (quick_drop > 0)
856 quick_drop = 0;
857 }
858 }
859 } else if (pa_in[23] == 1400) {
860 quick_drop_offset = min_t(int, count / 3, 2);
861 quick_drop += quick_drop_offset;
862 capdiv2g += quick_drop_offset / 2;
863
864 if (capdiv2g > 7)
865 capdiv2g = 7;
866
867 if (quick_drop > 0) {
868 quick_drop = 0;
869 capdiv2g -= quick_drop_offset;
870 if (capdiv2g < 0)
871 capdiv2g = 0;
872 }
873 } else {
874 return false;
875 }
876 } else if (AR_SREV_9330(ah)) {
877 if (pa_in[23] < 1000) {
878 capdiv_offset = (1000 - pa_in[23]) / 100;
879 capdiv2g += capdiv_offset;
880 if (capdiv_offset > 3) {
881 capdiv_offset = 1;
882 quick_drop--;
883 }
884
885 capdiv2g += capdiv_offset;
886 if (capdiv2g > 6)
887 capdiv2g = 6;
888 if (quick_drop < -4)
889 quick_drop = -4;
890 } else if (pa_in[23] == 1400) {
891 if (count > 3) {
892 quick_drop++;
893 capdiv2g -= count / 4;
894 if (quick_drop > -2)
895 quick_drop = -2;
896 } else {
897 capdiv2g--;
898 }
899
900 if (capdiv2g < 0)
901 capdiv2g = 0;
902 } else {
903 return false;
904 }
905 }
906
907 REG_RMW_FIELD(ah, AR_PHY_65NM_CH0_TXRF3,
908 AR_PHY_65NM_CH0_TXRF3_CAPDIV2G, capdiv2g);
909 REG_RMW_FIELD(ah, AR_PHY_PAPRD_TRAINER_CNTL3(ah),
910 AR_PHY_PAPRD_TRAINER_CNTL3_CF_PAPRD_QUICK_DROP,
911 quick_drop);
912
913 return true;
914}
915
916int ar9003_paprd_create_curve(struct ath_hw *ah,
917 struct ath9k_hw_cal_data *caldata, int chain)
918{
919 u16 *small_signal_gain = &caldata->small_signal_gain[chain];
920 u32 *pa_table = caldata->pa_table[chain];
921 u32 *data_L, *data_U;
922 int i, status = 0;
923 u32 *buf;
924 u32 reg;
925
926 memset(caldata->pa_table[chain], 0, sizeof(caldata->pa_table[chain]));
927
928 buf = kmalloc_array(2 * 48, sizeof(u32), GFP_KERNEL);
929 if (!buf)
930 return -ENOMEM;
931
932 data_L = &buf[0];
933 data_U = &buf[48];
934
935 REG_CLR_BIT(ah, AR_PHY_CHAN_INFO_MEMORY(ah),
936 AR_PHY_CHAN_INFO_MEMORY_CHANINFOMEM_S2_READ);
937
938 reg = AR_PHY_CHAN_INFO_TAB_0;
939 for (i = 0; i < 48; i++)
940 data_L[i] = REG_READ(ah, reg + (i << 2));
941
942 REG_SET_BIT(ah, AR_PHY_CHAN_INFO_MEMORY(ah),
943 AR_PHY_CHAN_INFO_MEMORY_CHANINFOMEM_S2_READ);
944
945 for (i = 0; i < 48; i++)
946 data_U[i] = REG_READ(ah, reg + (i << 2));
947
948 if (!create_pa_curve(data_L, data_U, pa_table, small_signal_gain))
949 status = -2;
950
951 if (ar9003_paprd_retrain_pa_in(ah, caldata, chain))
952 status = -EINPROGRESS;
953
954 REG_CLR_BIT(ah, AR_PHY_PAPRD_TRAINER_STAT1(ah),
955 AR_PHY_PAPRD_TRAINER_STAT1_PAPRD_TRAIN_DONE);
956
957 kfree(buf);
958
959 return status;
960}
961EXPORT_SYMBOL(ar9003_paprd_create_curve);
962
963int ar9003_paprd_init_table(struct ath_hw *ah)
964{
965 int ret;
966
967 ret = ar9003_paprd_setup_single_table(ah);
968 if (ret < 0)
969 return ret;
970
971 ar9003_paprd_get_gain_table(ah);
972 return 0;
973}
974EXPORT_SYMBOL(ar9003_paprd_init_table);
975
976bool ar9003_paprd_is_done(struct ath_hw *ah)
977{
978 int paprd_done, agc2_pwr;
979
980 paprd_done = REG_READ_FIELD(ah, AR_PHY_PAPRD_TRAINER_STAT1(ah),
981 AR_PHY_PAPRD_TRAINER_STAT1_PAPRD_TRAIN_DONE);
982
983 if (AR_SREV_9485(ah))
984 goto exit;
985
986 if (paprd_done == 0x1) {
987 agc2_pwr = REG_READ_FIELD(ah, AR_PHY_PAPRD_TRAINER_STAT1(ah),
988 AR_PHY_PAPRD_TRAINER_STAT1_PAPRD_AGC2_PWR);
989
990 ath_dbg(ath9k_hw_common(ah), CALIBRATE,
991 "AGC2_PWR = 0x%x training done = 0x%x\n",
992 agc2_pwr, paprd_done);
993 /*
994 * agc2_pwr range should not be less than 'IDEAL_AGC2_PWR_CHANGE'
995 * when the training is completely done, otherwise retraining is
996 * done to make sure the value is in ideal range
997 */
998 if (agc2_pwr <= PAPRD_IDEAL_AGC2_PWR_RANGE)
999 paprd_done = 0;
1000 }
1001exit:
1002 return !!paprd_done;
1003}
1004EXPORT_SYMBOL(ar9003_paprd_is_done);
1005
1006bool ar9003_is_paprd_enabled(struct ath_hw *ah)
1007{
1008 if ((ah->caps.hw_caps & ATH9K_HW_CAP_PAPRD) && ah->config.enable_paprd)
1009 return true;
1010
1011 return false;
1012}
1013EXPORT_SYMBOL(ar9003_is_paprd_enabled);