8 unsigned char mode, state, probe_steady;
9 uint16_t mode_pwm[N_PWMLED_MODES];
10 int16_t err_sums[N_PWMLED_MODES];
13 pwmled_t pwmleds[N_PWMLEDS];
15 #define PWMLED2_TESTING_WITH_350MA_LED
17 #define SENSE_MOHM 33 /* 0.033 Ohm */
19 * Voltage in uV at ADC reading == 1 is 1100/gain/1024
20 * ADC module returns sum of 1 << PWMLED_ADC_SHIFT measurements
21 * Voltage in uV measured is current in mA * sense resistance in mOhm
23 #define MA_GAIN_TO_ADC(ma, gain) ((uint16_t) \
26 * (1 << (PWMLED_ADC_SHIFT)) \
30 static uint16_t adc_max[N_PWMLEDS] = {
32 MA_GAIN_TO_ADC( 400, 20),
33 MA_GAIN_TO_ADC( 30, 20),
34 MA_GAIN_TO_ADC( 800, 1)
36 MA_GAIN_TO_ADC( 900, 20),
37 MA_GAIN_TO_ADC( 30, 20),
38 MA_GAIN_TO_ADC(2500, 1)
42 static uint16_t adc_vals[N_PWMLEDS*N_PWMLED_MODES] = {
45 MA_GAIN_TO_ADC( 50, 20),
46 MA_GAIN_TO_ADC( 100, 20),
47 MA_GAIN_TO_ADC( 200, 20),
48 MA_GAIN_TO_ADC( 300, 20),
50 MA_GAIN_TO_ADC( 5, 20),
51 MA_GAIN_TO_ADC( 10, 20),
52 MA_GAIN_TO_ADC( 15, 20),
53 MA_GAIN_TO_ADC( 20, 20),
55 MA_GAIN_TO_ADC( 50, 1),
56 MA_GAIN_TO_ADC( 100, 1),
57 MA_GAIN_TO_ADC( 150, 1),
58 MA_GAIN_TO_ADC( 200, 1)
61 MA_GAIN_TO_ADC( 100, 20),
62 MA_GAIN_TO_ADC( 300, 20),
63 MA_GAIN_TO_ADC( 700, 20),
64 MA_GAIN_TO_ADC( 800, 20),
66 MA_GAIN_TO_ADC( 5, 20),
67 MA_GAIN_TO_ADC( 10, 20),
68 MA_GAIN_TO_ADC( 18, 20),
69 MA_GAIN_TO_ADC( 23, 20),
71 MA_GAIN_TO_ADC( 200, 1),
72 MA_GAIN_TO_ADC( 400, 1),
73 MA_GAIN_TO_ADC( 800, 1),
74 MA_GAIN_TO_ADC(1500, 1)
82 // The above are constructed so that the following work:
83 #define ST_IS_ON(s) ((s) & 0x02)
84 #define ST_CAN_SET_MODE(s) ((s) & 0x01)
90 for (i = 0; i < N_PWMLEDS; i++) {
91 pwmled_t *led = pwmleds + i;
93 led->target = adc_vals[i*N_PWMLED_MODES];
96 led->state = ST_PROBING;
97 led->probe_steady = 0;
99 for (j = 0; j < N_PWMLED_MODES; j++) {
100 led->mode_pwm[j] = 0;
101 led->err_sums[j] = 0;
106 void pwmled_set_mode(unsigned char n, unsigned char mode)
108 pwmled_t *led = pwmleds + n;
110 if (!ST_CAN_SET_MODE(led->state))
113 if (led->mode) { // save the previous state
114 led->mode_pwm[led->mode - 1] = led->pwm;
115 led->err_sums[led->mode - 1] = led->err_sum;
120 if (mode > 0 && mode <= N_PWMLED_MODES) {
121 led->target = adc_vals[n*N_PWMLED_MODES + mode - 1];
123 led->pwm = led->mode_pwm[mode - 1];
124 led->err_sum = led->err_sums[mode - 1];
125 pwm_set(n, led->pwm);
132 #define PWMLED_PROBE_STEADY_COUNT 10
134 static inline unsigned char pwmled_probed_ok(unsigned char n, uint16_t old_pwm)
136 pwmled_t *led = pwmleds + n;
138 if (led->pwm == old_pwm) {
139 if (led->probe_steady < PWMLED_PROBE_STEADY_COUNT)
142 led->probe_steady = 0;
145 if (led->probe_steady < PWMLED_PROBE_STEADY_COUNT
146 && old_pwm <= led->pwm)
150 led->mode_pwm[led->mode - 1] = led->pwm;
151 led->err_sums[led->mode - 1] = 0;
153 // next mode to probe?
154 if (led->mode < N_PWMLED_MODES) {
155 led->probe_steady = 0;
159 led->target = adc_vals[n*N_PWMLED_MODES+led->mode-1];
172 for (i = 0; i < N_PWMLED_MODES; i++)
173 log_word(led->mode_pwm[i]);
183 static inline void pwmled_err(unsigned char n)
185 pwmleds[n].state = ST_DISABLED;
195 void pwmled_adc(unsigned char n, uint16_t adcval)
197 pwmled_t *led = pwmleds + n;
202 if (!ST_IS_ON(led->state))
205 // FIXME: test for maximum adcval value (adc_max[n])
209 shift = led->state == ST_PROBING ? 3 : 5;
211 sum = ((int32_t)led->pwm << shift)
212 + led->err_sum + led->target - adcval;
217 led->pwm = sum >> shift;
218 sum -= led->pwm << shift;
221 if (led->pwm >= PWM_MAX) {
226 if (led->state == ST_PROBING)
227 if (pwmled_probed_ok(n, old_pwm))
230 if (led->pwm == old_pwm)
233 pwm_set(n, led->pwm);