8 unsigned char mode, state;
10 unsigned char probe_steady, mode_changed;
12 uint16_t mode_pwm[N_PWMLED_MODES];
13 int16_t err_sums[N_PWMLED_MODES];
14 unsigned char modes_not_yet_stable;
17 pwmled_t pwmleds[N_PWMLEDS];
21 * when changing brightness via pwmled_set_brightness() below,
22 * we want to converge to the target value as fast as possible. Also,
23 * we would like to somehow initialize the mode 3, which is used as
24 * "mode 2 + other PWMLED on". So after the brightness is set,
25 * we also set pwmleds[n].modes_not_yet_stable to MODE_STABILIZATION_TIME.
26 * When modes_not_yet_stable is non-zero, we allow only mode 2 to be set
27 * regardless of what is fed to pwmled_set_mode. We will then converge
28 * to the target value of mode 2 only, and after MODE_STABILIZATION_TIME
29 * ADC measurements, we copy the mode_pwm value to all other modes.
30 * Only then it is allowed to set the other modes.
32 #define MODE_STABILIZATION_TIME (2*16) // two seconds worth of measurements
34 #define PWMLED2_TESTING_WITH_350MA_LED
36 #define SENSE_MOHM 33 /* 0.033 Ohm */
38 * Voltage in uV at ADC reading == 1 is 1100/gain/1024
39 * ADC module returns sum of 1 << PWMLED_ADC_SHIFT measurements
40 * Voltage in uV measured is current in mA * sense resistance in mOhm
42 #define MA_GAIN_TO_ADC(ma, gain) ((uint16_t) \
45 * (1 << (PWMLED_ADC_SHIFT)) \
49 static uint16_t adc_max[N_PWMLEDS] = {
51 MA_GAIN_TO_ADC( 400, 20),
52 MA_GAIN_TO_ADC( 30, 20),
53 MA_GAIN_TO_ADC( 800, 1)
55 MA_GAIN_TO_ADC( 900, 20),
56 MA_GAIN_TO_ADC( 30, 20),
57 MA_GAIN_TO_ADC(2500, 1)
61 static uint16_t adc_targets_0[] = {
62 MA_GAIN_TO_ADC( 50, 20),
63 MA_GAIN_TO_ADC( 80, 20),
64 MA_GAIN_TO_ADC( 160, 20),
65 MA_GAIN_TO_ADC( 350, 20),
68 static uint16_t adc_targets_1[] = {
69 MA_GAIN_TO_ADC( 5, 20),
70 MA_GAIN_TO_ADC( 10, 20),
71 MA_GAIN_TO_ADC( 20, 20),
74 static uint16_t adc_targets_2[] = {
76 MA_GAIN_TO_ADC( 120, 1),
77 MA_GAIN_TO_ADC( 160, 1),
78 MA_GAIN_TO_ADC( 240, 1),
79 MA_GAIN_TO_ADC( 320, 1),
80 MA_GAIN_TO_ADC( 460, 1),
82 MA_GAIN_TO_ADC( 150, 1),
83 MA_GAIN_TO_ADC( 300, 1),
84 MA_GAIN_TO_ADC( 500, 1),
85 MA_GAIN_TO_ADC( 700, 1),
86 MA_GAIN_TO_ADC(1500, 1),
87 MA_GAIN_TO_ADC(2500, 1),
91 static uint16_t adc_vals[N_PWMLEDS*N_PWMLED_MODES];
97 // The above are constructed so that the following work:
98 #define ST_IS_ON(s) ((s) & 0x02)
99 #define ST_CAN_SET_MODE(s) ((s) & 0x01)
105 for (i = 0; i < N_PWMLEDS; i++) {
106 pwmled_t *led = pwmleds + i;
108 led->target = adc_vals[i*N_PWMLED_MODES];
110 led->probe_steady = 0;
113 pwm_set(i, led->pwm);
115 for (j = 0; j < N_PWMLED_MODES; j++) {
116 led->mode_pwm[j] = 0;
117 led->err_sums[j] = 0;
121 pwmled_set_brightness(PWMLED_BRIGHTNESS(0, 2, 1, 0, 2));
124 void pwmled_set_mode(unsigned char n, unsigned char mode)
126 pwmled_t *led = pwmleds + n;
128 if (!ST_CAN_SET_MODE(led->state))
131 if (led->mode) { // save the previous state
132 led->mode_pwm[led->mode - 1] = led->pwm;
133 led->err_sums[led->mode - 1] = led->err_sum;
138 if (mode > 0 && mode <= N_PWMLED_MODES) {
139 if (led->modes_not_yet_stable) // only mode 2 when !stable
141 led->target = adc_vals[n*N_PWMLED_MODES + mode - 1];
143 led->pwm = led->mode_pwm[mode - 1];
144 led->err_sum = led->err_sums[mode - 1];
145 led->mode_changed = 1;
146 pwm_set(n, led->pwm);
153 #define CHECK_BRIGHTNESS(var, expr, array) \
156 if ((var) >= sizeof(array)/sizeof(array[0])) \
157 (var) = sizeof(array)/sizeof(array[0]) - 1; \
160 void pwmled_set_brightness(uint16_t brightness)
164 CHECK_BRIGHTNESS(i, brightness & 0x7, adc_targets_0);
165 adc_vals[0] = adc_targets_0[i];
166 CHECK_BRIGHTNESS(i, (brightness >> 3) & 0x7, adc_targets_0);
167 if (adc_vals[1] != adc_targets_0[i]) {
168 adc_vals[1] = adc_targets_0[i];
169 pwmleds[0].modes_not_yet_stable = MODE_STABILIZATION_TIME;
171 adc_vals[2] = adc_vals[1];
173 CHECK_BRIGHTNESS(i, (brightness >> 6) & 0x7, adc_targets_1);
174 // we use only one mode, so no modes_not_yet_stable handling here
175 adc_vals[3] = adc_targets_1[i];
176 adc_vals[4] = adc_vals[3];
177 adc_vals[5] = adc_vals[3];
179 CHECK_BRIGHTNESS(i, (brightness >> 9) & 0x7, adc_targets_2);
180 adc_vals[6] = adc_targets_2[i];
181 CHECK_BRIGHTNESS(i, (brightness >> 12) & 0x7, adc_targets_2);
182 if (adc_vals[7] != adc_targets_2[i]) {
183 adc_vals[7] = adc_targets_2[i];
184 pwmleds[2].modes_not_yet_stable = MODE_STABILIZATION_TIME;
186 adc_vals[8] = adc_vals[7];
188 for (i = 0; i < N_PWMLEDS; i++) {
189 pwmleds[i].err_sum = 0;
190 pwmled_set_mode(i, pwmleds[i].mode);
194 #define PWMLED_PROBE_STEADY_COUNT 10
196 static inline unsigned char pwmled_probed_ok(unsigned char n, uint16_t old_pwm)
198 pwmled_t *led = pwmleds + n;
200 if (led->pwm == old_pwm) {
201 if (led->probe_steady < PWMLED_PROBE_STEADY_COUNT)
204 led->probe_steady = 0;
207 if (led->probe_steady < PWMLED_PROBE_STEADY_COUNT
208 && old_pwm <= led->pwm)
212 led->mode_pwm[led->mode - 1] = led->pwm;
213 led->err_sums[led->mode - 1] = 0;
215 // next mode to probe?
216 if (led->mode < N_PWMLED_MODES) {
217 led->probe_steady = 0;
221 led->target = adc_vals[n*N_PWMLED_MODES+led->mode-1];
234 for (i = 0; i < N_PWMLED_MODES; i++)
235 log_word(led->mode_pwm[i]);
245 static inline void pwmled_err(unsigned char n)
247 pwmleds[n].state = ST_DISABLED;
256 case 0: err_flags.err_pwmled0 = 1; break;
257 case 1: err_flags.err_pwmled1 = 1; break;
258 case 2: err_flags.err_pwmled2 = 1; break;
263 void pwmled_adc(unsigned char n, uint16_t adcval)
265 pwmled_t *led = pwmleds + n;
270 if (!ST_IS_ON(led->state))
273 if (led->state == ST_ON && led->mode_changed) {
277 // FIXME: test for maximum adcval value (adc_max[n])
281 // shift = led->state == ST_PROBING ? 3 : 8;
284 sum = ((int32_t)led->pwm << shift)
285 + led->err_sum + led->target - adcval;
290 led->pwm = sum >> shift;
291 sum -= led->pwm << shift;
294 if (led->pwm >= PWM_MAX
295 || (n == 1 && led->pwm > PWM_MAX/2 && adcval < 0x08)) {
300 if (led->state == ST_PROBING)
301 if (pwmled_probed_ok(n, old_pwm))
304 if (led->modes_not_yet_stable) {
305 if (!--led->modes_not_yet_stable) {
306 // reached stability, copy mode 2 to mode 3 (-1)
307 led->mode_pwm[0] = led->pwm;
308 led->mode_pwm[2] = led->pwm;
309 led->err_sums[0] = 0;
310 led->err_sums[2] = 0;
314 if (led->pwm == old_pwm)
317 pwm_set(n, led->pwm);