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 #define PWMLED_TESTING 1
32 static uint16_t adc_max[N_PWMLEDS] = {
34 MA_GAIN_TO_ADC( 400, 20),
35 MA_GAIN_TO_ADC( 30, 20),
36 MA_GAIN_TO_ADC( 800, 1)
38 MA_GAIN_TO_ADC( 900, 20),
39 MA_GAIN_TO_ADC( 30, 20),
40 MA_GAIN_TO_ADC(2500, 1)
44 static uint16_t adc_vals[N_PWMLEDS*N_PWMLED_MODES] = {
47 MA_GAIN_TO_ADC( 50, 20),
48 MA_GAIN_TO_ADC( 150, 20),
49 MA_GAIN_TO_ADC( 250, 20),
50 MA_GAIN_TO_ADC( 350, 20),
52 MA_GAIN_TO_ADC( 5, 20),
53 MA_GAIN_TO_ADC( 10, 20),
54 MA_GAIN_TO_ADC( 15, 20),
55 MA_GAIN_TO_ADC( 20, 20),
57 MA_GAIN_TO_ADC( 100, 1),
58 MA_GAIN_TO_ADC( 200, 1),
59 MA_GAIN_TO_ADC( 300, 1),
60 MA_GAIN_TO_ADC( 400, 1)
63 MA_GAIN_TO_ADC( 100, 20),
64 MA_GAIN_TO_ADC( 300, 20),
65 MA_GAIN_TO_ADC( 700, 20),
66 MA_GAIN_TO_ADC( 800, 20),
68 MA_GAIN_TO_ADC( 5, 20),
69 MA_GAIN_TO_ADC( 10, 20),
70 MA_GAIN_TO_ADC( 18, 20),
71 MA_GAIN_TO_ADC( 23, 20),
73 MA_GAIN_TO_ADC( 200, 1),
74 MA_GAIN_TO_ADC( 400, 1),
75 MA_GAIN_TO_ADC( 800, 1),
76 MA_GAIN_TO_ADC(1500, 1)
84 // The above are constructed so that the following work:
85 #define ST_IS_ON(s) ((s) & 0x02)
86 #define ST_CAN_SET_MODE(s) ((s) & 0x01)
92 for (i = 0; i < N_PWMLEDS; i++) {
93 pwmled_t *led = pwmleds + i;
95 led->target = adc_vals[i*N_PWMLED_MODES];
98 led->state = ST_PROBING;
99 led->probe_steady = 0;
101 for (j = 0; j < N_PWMLED_MODES; j++) {
102 led->mode_pwm[j] = 0;
103 led->err_sums[j] = 0;
108 void pwmled_set_mode(unsigned char n, unsigned char mode)
110 pwmled_t *led = pwmleds + n;
112 if (!ST_CAN_SET_MODE(led->state))
115 if (led->mode) { // save the previous state
116 led->mode_pwm[led->mode - 1] = led->pwm;
117 led->err_sums[led->mode - 1] = led->err_sum;
122 if (mode > 0 && mode <= N_PWMLED_MODES) {
123 led->target = adc_vals[n*N_PWMLED_MODES + mode - 1];
125 led->pwm = led->mode_pwm[mode - 1];
126 led->err_sum = led->err_sums[mode - 1];
127 pwm_set(n, led->pwm);
134 #define PWMLED_PROBE_STEADY_COUNT 10
136 static inline unsigned char pwmled_probed_ok(unsigned char n, uint16_t old_pwm)
138 pwmled_t *led = pwmleds + n;
140 if (led->pwm == old_pwm) {
141 if (led->probe_steady < PWMLED_PROBE_STEADY_COUNT)
144 led->probe_steady = 0;
147 if (led->probe_steady < PWMLED_PROBE_STEADY_COUNT
148 && old_pwm <= led->pwm)
152 led->mode_pwm[led->mode - 1] = led->pwm;
153 led->err_sums[led->mode - 1] = 0;
155 // next mode to probe?
156 if (led->mode < N_PWMLED_MODES) {
157 led->probe_steady = 0;
161 led->target = adc_vals[n*N_PWMLED_MODES+led->mode-1];
174 for (i = 0; i < N_PWMLED_MODES; i++)
175 log_word(led->mode_pwm[i]);
185 static inline void pwmled_err(unsigned char n)
187 pwmleds[n].state = ST_DISABLED;
197 void pwmled_adc(unsigned char n, uint16_t adcval)
199 pwmled_t *led = pwmleds + n;
204 if (!ST_IS_ON(led->state))
207 // FIXME: test for maximum adcval value (adc_max[n])
211 shift = led->state == ST_PROBING ? 3 : 5;
213 sum = ((int32_t)led->pwm << shift)
214 + led->err_sum + led->target - adcval;
219 led->pwm = sum >> shift;
220 sum -= led->pwm << shift;
223 if (led->pwm >= PWM_MAX) {
228 if (led->state == ST_PROBING)
229 if (pwmled_probed_ok(n, old_pwm))
232 if (led->pwm == old_pwm)
235 pwm_set(n, led->pwm);