Kevin Braun / Mbed 2 deprecated TFTdisp-104

A general demonstration color etch-a-sketch program using the QVGA TFT with HX8347D controller, Orange Board. Saves touchscreen calibaration data saved in tft.ini. Creates /local/tft.ini if missing. Also included is an Ethernet NTP client to update the RTC. Assumes all other Orange Board devices attached: Text LCD, SDHC Flash, Ethernet.

Dependencies:   EthernetNetIf TextLCD mbed

mbedADC/adc.cpp@0:e065ca40f28a, 2011-08-01 (annotated)

Committer:
loopsva
Date:
Mon Aug 01 16:29:58 2011 +0000
Revision:
0:e065ca40f28a
Inititial Release

Who changed what in which revision?

UserRevisionLine numberNew contents of line
loopsva 0:e065ca40f28a 1 /* mbed Library - ADC
loopsva 0:e065ca40f28a 2 * Copyright (c) 2010, sblandford
loopsva 0:e065ca40f28a 3 * released under MIT license http://mbed.org/licence/mit
loopsva 0:e065ca40f28a 4 */
loopsva 0:e065ca40f28a 5 #include "mbed.h"
loopsva 0:e065ca40f28a 6 #include "adc.h"
loopsva 0:e065ca40f28a 7
loopsva 0:e065ca40f28a 8
loopsva 0:e065ca40f28a 9 ADC *ADC::instance;
loopsva 0:e065ca40f28a 10
loopsva 0:e065ca40f28a 11 ADC::ADC(int sample_rate, int cclk_div)
loopsva 0:e065ca40f28a 12 {
loopsva 0:e065ca40f28a 13
loopsva 0:e065ca40f28a 14 int i, adc_clk_freq, pclk, clock_div, max_div=1;
loopsva 0:e065ca40f28a 15
loopsva 0:e065ca40f28a 16 //Work out CCLK
loopsva 0:e065ca40f28a 17 adc_clk_freq=CLKS_PER_SAMPLE*sample_rate;
loopsva 0:e065ca40f28a 18 int m = (LPC_SC->PLL0CFG & 0xFFFF) + 1;
loopsva 0:e065ca40f28a 19 int n = (LPC_SC->PLL0CFG >> 16) + 1;
loopsva 0:e065ca40f28a 20 int cclkdiv = LPC_SC->CCLKCFG + 1;
loopsva 0:e065ca40f28a 21 int Fcco = (2 * m * XTAL_FREQ) / n;
loopsva 0:e065ca40f28a 22 int cclk = Fcco / cclkdiv;
loopsva 0:e065ca40f28a 23
loopsva 0:e065ca40f28a 24 //Power up the ADC
loopsva 0:e065ca40f28a 25 LPC_SC->PCONP |= (1 << 12);
loopsva 0:e065ca40f28a 26 //Set clock at cclk / 1.
loopsva 0:e065ca40f28a 27 LPC_SC->PCLKSEL0 &= ~(0x3 << 24);
loopsva 0:e065ca40f28a 28 switch (cclk_div) {
loopsva 0:e065ca40f28a 29 case 1:
loopsva 0:e065ca40f28a 30 LPC_SC->PCLKSEL0 |= 0x1 << 24;
loopsva 0:e065ca40f28a 31 break;
loopsva 0:e065ca40f28a 32 case 2:
loopsva 0:e065ca40f28a 33 LPC_SC->PCLKSEL0 |= 0x2 << 24;
loopsva 0:e065ca40f28a 34 break;
loopsva 0:e065ca40f28a 35 case 4:
loopsva 0:e065ca40f28a 36 LPC_SC->PCLKSEL0 |= 0x0 << 24;
loopsva 0:e065ca40f28a 37 break;
loopsva 0:e065ca40f28a 38 case 8:
loopsva 0:e065ca40f28a 39 LPC_SC->PCLKSEL0 |= 0x3 << 24;
loopsva 0:e065ca40f28a 40 break;
loopsva 0:e065ca40f28a 41 default:
loopsva 0:e065ca40f28a 42 fprintf(stderr, "Warning: ADC CCLK clock divider must be 1, 2, 4 or 8. %u supplied.\n",
loopsva 0:e065ca40f28a 43 cclk_div);
loopsva 0:e065ca40f28a 44 fprintf(stderr, "Defaulting to 1.\n");
loopsva 0:e065ca40f28a 45 LPC_SC->PCLKSEL0 |= 0x1 << 24;
loopsva 0:e065ca40f28a 46 break;
loopsva 0:e065ca40f28a 47 }
loopsva 0:e065ca40f28a 48 pclk = cclk / cclk_div;
loopsva 0:e065ca40f28a 49 clock_div=pclk / adc_clk_freq;
loopsva 0:e065ca40f28a 50
loopsva 0:e065ca40f28a 51 if (clock_div > 0xFF) {
loopsva 0:e065ca40f28a 52 fprintf(stderr, "Warning: Clock division is %u which is above 255 limit. Re-Setting at limit.\n",
loopsva 0:e065ca40f28a 53 clock_div);
loopsva 0:e065ca40f28a 54 clock_div=0xFF;
loopsva 0:e065ca40f28a 55 }
loopsva 0:e065ca40f28a 56 if (clock_div == 0) {
loopsva 0:e065ca40f28a 57 fprintf(stderr, "Warning: Clock division is 0. Re-Setting to 1.\n");
loopsva 0:e065ca40f28a 58 clock_div=1;
loopsva 0:e065ca40f28a 59 }
loopsva 0:e065ca40f28a 60
loopsva 0:e065ca40f28a 61 _adc_clk_freq=pclk / clock_div;
loopsva 0:e065ca40f28a 62 if (_adc_clk_freq > MAX_ADC_CLOCK) {
loopsva 0:e065ca40f28a 63 fprintf(stderr, "Warning: Actual ADC sample rate of %u which is above %u limit\n",
loopsva 0:e065ca40f28a 64 _adc_clk_freq / CLKS_PER_SAMPLE, MAX_ADC_CLOCK / CLKS_PER_SAMPLE);
loopsva 0:e065ca40f28a 65 while ((pclk / max_div) > MAX_ADC_CLOCK) max_div++;
loopsva 0:e065ca40f28a 66 fprintf(stderr, "Maximum recommended sample rate is %u\n", (pclk / max_div) / CLKS_PER_SAMPLE);
loopsva 0:e065ca40f28a 67 }
loopsva 0:e065ca40f28a 68
loopsva 0:e065ca40f28a 69 LPC_ADC->ADCR =
loopsva 0:e065ca40f28a 70 ((clock_div - 1 ) << 8 ) | //Clkdiv
loopsva 0:e065ca40f28a 71 ( 1 << 21 ); //A/D operational
loopsva 0:e065ca40f28a 72
loopsva 0:e065ca40f28a 73 //Default no channels enabled
loopsva 0:e065ca40f28a 74 LPC_ADC->ADCR &= ~0xFF;
loopsva 0:e065ca40f28a 75 //Default NULL global custom isr
loopsva 0:e065ca40f28a 76 _adc_g_isr = NULL;
loopsva 0:e065ca40f28a 77 //Initialize arrays
loopsva 0:e065ca40f28a 78 for (i=7; i>=0; i--) {
loopsva 0:e065ca40f28a 79 _adc_data[i] = 0;
loopsva 0:e065ca40f28a 80 _adc_isr[i] = NULL;
loopsva 0:e065ca40f28a 81 }
loopsva 0:e065ca40f28a 82
loopsva 0:e065ca40f28a 83
loopsva 0:e065ca40f28a 84 //* Attach IRQ
loopsva 0:e065ca40f28a 85 instance = this;
loopsva 0:e065ca40f28a 86 NVIC_SetVector(ADC_IRQn, (uint32_t)&_adcisr);
loopsva 0:e065ca40f28a 87
loopsva 0:e065ca40f28a 88 //Disable global interrupt
loopsva 0:e065ca40f28a 89 LPC_ADC->ADINTEN &= ~0x100;
loopsva 0:e065ca40f28a 90
loopsva 0:e065ca40f28a 91 };
loopsva 0:e065ca40f28a 92
loopsva 0:e065ca40f28a 93 void ADC::_adcisr(void)
loopsva 0:e065ca40f28a 94 {
loopsva 0:e065ca40f28a 95 instance->adcisr();
loopsva 0:e065ca40f28a 96 }
loopsva 0:e065ca40f28a 97
loopsva 0:e065ca40f28a 98
loopsva 0:e065ca40f28a 99 void ADC::adcisr(void)
loopsva 0:e065ca40f28a 100 {
loopsva 0:e065ca40f28a 101 uint32_t stat;
loopsva 0:e065ca40f28a 102 int chan;
loopsva 0:e065ca40f28a 103
loopsva 0:e065ca40f28a 104 // Read status
loopsva 0:e065ca40f28a 105 stat = LPC_ADC->ADSTAT;
loopsva 0:e065ca40f28a 106 //Scan channels for over-run or done and update array
loopsva 0:e065ca40f28a 107 if (stat & 0x0101) _adc_data[0] = LPC_ADC->ADDR0;
loopsva 0:e065ca40f28a 108 if (stat & 0x0202) _adc_data[1] = LPC_ADC->ADDR1;
loopsva 0:e065ca40f28a 109 if (stat & 0x0404) _adc_data[2] = LPC_ADC->ADDR2;
loopsva 0:e065ca40f28a 110 if (stat & 0x0808) _adc_data[3] = LPC_ADC->ADDR3;
loopsva 0:e065ca40f28a 111 if (stat & 0x1010) _adc_data[4] = LPC_ADC->ADDR4;
loopsva 0:e065ca40f28a 112 if (stat & 0x2020) _adc_data[5] = LPC_ADC->ADDR5;
loopsva 0:e065ca40f28a 113 if (stat & 0x4040) _adc_data[6] = LPC_ADC->ADDR6;
loopsva 0:e065ca40f28a 114 if (stat & 0x8080) _adc_data[7] = LPC_ADC->ADDR7;
loopsva 0:e065ca40f28a 115
loopsva 0:e065ca40f28a 116 // Channel that triggered interrupt
loopsva 0:e065ca40f28a 117 chan = (LPC_ADC->ADGDR >> 24) & 0x07;
loopsva 0:e065ca40f28a 118 //User defined interrupt handlers
loopsva 0:e065ca40f28a 119 if (_adc_isr[chan] != NULL)
loopsva 0:e065ca40f28a 120 _adc_isr[chan](_adc_data[chan]);
loopsva 0:e065ca40f28a 121 if (_adc_g_isr != NULL)
loopsva 0:e065ca40f28a 122 _adc_g_isr(chan, _adc_data[chan]);
loopsva 0:e065ca40f28a 123 return;
loopsva 0:e065ca40f28a 124 }
loopsva 0:e065ca40f28a 125
loopsva 0:e065ca40f28a 126 int ADC::_pin_to_channel(PinName pin) {
loopsva 0:e065ca40f28a 127 int chan;
loopsva 0:e065ca40f28a 128 switch (pin) {
loopsva 0:e065ca40f28a 129 case p15://=p0.23 of LPC1768
loopsva 0:e065ca40f28a 130 default:
loopsva 0:e065ca40f28a 131 chan=0;
loopsva 0:e065ca40f28a 132 break;
loopsva 0:e065ca40f28a 133 case p16://=p0.24 of LPC1768
loopsva 0:e065ca40f28a 134 chan=1;
loopsva 0:e065ca40f28a 135 break;
loopsva 0:e065ca40f28a 136 case p17://=p0.25 of LPC1768
loopsva 0:e065ca40f28a 137 chan=2;
loopsva 0:e065ca40f28a 138 break;
loopsva 0:e065ca40f28a 139 case p18://=p0.26 of LPC1768
loopsva 0:e065ca40f28a 140 chan=3;
loopsva 0:e065ca40f28a 141 break;
loopsva 0:e065ca40f28a 142 case p19://=p1.30 of LPC1768
loopsva 0:e065ca40f28a 143 chan=4;
loopsva 0:e065ca40f28a 144 break;
loopsva 0:e065ca40f28a 145 case p20://=p1.31 of LPC1768
loopsva 0:e065ca40f28a 146 chan=5;
loopsva 0:e065ca40f28a 147 break;
loopsva 0:e065ca40f28a 148 }
loopsva 0:e065ca40f28a 149 return(chan);
loopsva 0:e065ca40f28a 150 }
loopsva 0:e065ca40f28a 151
loopsva 0:e065ca40f28a 152 PinName ADC::channel_to_pin(int chan) {
loopsva 0:e065ca40f28a 153 const PinName pin[8]={p15, p16, p17, p18, p19, p20, p15, p15};
loopsva 0:e065ca40f28a 154
loopsva 0:e065ca40f28a 155 if ((chan < 0) || (chan > 5))
loopsva 0:e065ca40f28a 156 fprintf(stderr, "ADC channel %u is outside range available to MBED pins.\n", chan);
loopsva 0:e065ca40f28a 157 return(pin[chan & 0x07]);
loopsva 0:e065ca40f28a 158 }
loopsva 0:e065ca40f28a 159
loopsva 0:e065ca40f28a 160
loopsva 0:e065ca40f28a 161 int ADC::channel_to_pin_number(int chan) {
loopsva 0:e065ca40f28a 162 const int pin[8]={15, 16, 17, 18, 19, 20, 0, 0};
loopsva 0:e065ca40f28a 163
loopsva 0:e065ca40f28a 164 if ((chan < 0) || (chan > 5))
loopsva 0:e065ca40f28a 165 fprintf(stderr, "ADC channel %u is outside range available to MBED pins.\n", chan);
loopsva 0:e065ca40f28a 166 return(pin[chan & 0x07]);
loopsva 0:e065ca40f28a 167 }
loopsva 0:e065ca40f28a 168
loopsva 0:e065ca40f28a 169
loopsva 0:e065ca40f28a 170 uint32_t ADC::_data_of_pin(PinName pin) {
loopsva 0:e065ca40f28a 171 //If in burst mode and at least one interrupt enabled then
loopsva 0:e065ca40f28a 172 //take all values from _adc_data
loopsva 0:e065ca40f28a 173 if (burst() && (LPC_ADC->ADINTEN & 0x3F)) {
loopsva 0:e065ca40f28a 174 return(_adc_data[_pin_to_channel(pin)]);
loopsva 0:e065ca40f28a 175 } else {
loopsva 0:e065ca40f28a 176 //Return current register value or last value from interrupt
loopsva 0:e065ca40f28a 177 switch (pin) {
loopsva 0:e065ca40f28a 178 case p15://=p0.23 of LPC1768
loopsva 0:e065ca40f28a 179 default:
loopsva 0:e065ca40f28a 180 return(LPC_ADC->ADINTEN & 0x01?_adc_data[0]:LPC_ADC->ADDR0);
loopsva 0:e065ca40f28a 181 case p16://=p0.24 of LPC1768
loopsva 0:e065ca40f28a 182 return(LPC_ADC->ADINTEN & 0x02?_adc_data[1]:LPC_ADC->ADDR1);
loopsva 0:e065ca40f28a 183 case p17://=p0.25 of LPC1768
loopsva 0:e065ca40f28a 184 return(LPC_ADC->ADINTEN & 0x04?_adc_data[2]:LPC_ADC->ADDR2);
loopsva 0:e065ca40f28a 185 case p18://=p0.26 of LPC1768:
loopsva 0:e065ca40f28a 186 return(LPC_ADC->ADINTEN & 0x08?_adc_data[3]:LPC_ADC->ADDR3);
loopsva 0:e065ca40f28a 187 case p19://=p1.30 of LPC1768
loopsva 0:e065ca40f28a 188 return(LPC_ADC->ADINTEN & 0x10?_adc_data[4]:LPC_ADC->ADDR4);
loopsva 0:e065ca40f28a 189 case p20://=p1.31 of LPC1768
loopsva 0:e065ca40f28a 190 return(LPC_ADC->ADINTEN & 0x20?_adc_data[5]:LPC_ADC->ADDR5);
loopsva 0:e065ca40f28a 191 }
loopsva 0:e065ca40f28a 192 }
loopsva 0:e065ca40f28a 193 }
loopsva 0:e065ca40f28a 194
loopsva 0:e065ca40f28a 195 //Enable or disable an ADC pin
loopsva 0:e065ca40f28a 196 void ADC::setup(PinName pin, int state) {
loopsva 0:e065ca40f28a 197 int chan;
loopsva 0:e065ca40f28a 198 chan=_pin_to_channel(pin);
loopsva 0:e065ca40f28a 199 if ((state & 1) == 1) {
loopsva 0:e065ca40f28a 200 switch(pin) {
loopsva 0:e065ca40f28a 201 case p15://=p0.23 of LPC1768
loopsva 0:e065ca40f28a 202 default:
loopsva 0:e065ca40f28a 203 LPC_PINCON->PINSEL1 &= ~((unsigned int)0x3 << 14);
loopsva 0:e065ca40f28a 204 LPC_PINCON->PINSEL1 |= (unsigned int)0x1 << 14;
loopsva 0:e065ca40f28a 205 LPC_PINCON->PINMODE1 &= ~((unsigned int)0x3 << 14);
loopsva 0:e065ca40f28a 206 LPC_PINCON->PINMODE1 |= (unsigned int)0x2 << 14;
loopsva 0:e065ca40f28a 207 break;
loopsva 0:e065ca40f28a 208 case p16://=p0.24 of LPC1768
loopsva 0:e065ca40f28a 209 LPC_PINCON->PINSEL1 &= ~((unsigned int)0x3 << 16);
loopsva 0:e065ca40f28a 210 LPC_PINCON->PINSEL1 |= (unsigned int)0x1 << 16;
loopsva 0:e065ca40f28a 211 LPC_PINCON->PINMODE1 &= ~((unsigned int)0x3 << 16);
loopsva 0:e065ca40f28a 212 LPC_PINCON->PINMODE1 |= (unsigned int)0x2 << 16;
loopsva 0:e065ca40f28a 213 break;
loopsva 0:e065ca40f28a 214 case p17://=p0.25 of LPC1768
loopsva 0:e065ca40f28a 215 LPC_PINCON->PINSEL1 &= ~((unsigned int)0x3 << 18);
loopsva 0:e065ca40f28a 216 LPC_PINCON->PINSEL1 |= (unsigned int)0x1 << 18;
loopsva 0:e065ca40f28a 217 LPC_PINCON->PINMODE1 &= ~((unsigned int)0x3 << 18);
loopsva 0:e065ca40f28a 218 LPC_PINCON->PINMODE1 |= (unsigned int)0x2 << 18;
loopsva 0:e065ca40f28a 219 break;
loopsva 0:e065ca40f28a 220 case p18://=p0.26 of LPC1768:
loopsva 0:e065ca40f28a 221 LPC_PINCON->PINSEL1 &= ~((unsigned int)0x3 << 20);
loopsva 0:e065ca40f28a 222 LPC_PINCON->PINSEL1 |= (unsigned int)0x1 << 20;
loopsva 0:e065ca40f28a 223 LPC_PINCON->PINMODE1 &= ~((unsigned int)0x3 << 20);
loopsva 0:e065ca40f28a 224 LPC_PINCON->PINMODE1 |= (unsigned int)0x2 << 20;
loopsva 0:e065ca40f28a 225 break;
loopsva 0:e065ca40f28a 226 case p19://=p1.30 of LPC1768
loopsva 0:e065ca40f28a 227 LPC_PINCON->PINSEL3 &= ~((unsigned int)0x3 << 28);
loopsva 0:e065ca40f28a 228 LPC_PINCON->PINSEL3 |= (unsigned int)0x3 << 28;
loopsva 0:e065ca40f28a 229 LPC_PINCON->PINMODE3 &= ~((unsigned int)0x3 << 28);
loopsva 0:e065ca40f28a 230 LPC_PINCON->PINMODE3 |= (unsigned int)0x2 << 28;
loopsva 0:e065ca40f28a 231 break;
loopsva 0:e065ca40f28a 232 case p20://=p1.31 of LPC1768
loopsva 0:e065ca40f28a 233 LPC_PINCON->PINSEL3 &= ~((unsigned int)0x3 << 30);
loopsva 0:e065ca40f28a 234 LPC_PINCON->PINSEL3 |= (unsigned int)0x3 << 30;
loopsva 0:e065ca40f28a 235 LPC_PINCON->PINMODE3 &= ~((unsigned int)0x3 << 30);
loopsva 0:e065ca40f28a 236 LPC_PINCON->PINMODE3 |= (unsigned int)0x2 << 30;
loopsva 0:e065ca40f28a 237 break;
loopsva 0:e065ca40f28a 238 }
loopsva 0:e065ca40f28a 239 //Only one channel can be selected at a time if not in burst mode
loopsva 0:e065ca40f28a 240 if (!burst()) LPC_ADC->ADCR &= ~0xFF;
loopsva 0:e065ca40f28a 241 //Select channel
loopsva 0:e065ca40f28a 242 LPC_ADC->ADCR |= (1 << chan);
loopsva 0:e065ca40f28a 243 }
loopsva 0:e065ca40f28a 244 else {
loopsva 0:e065ca40f28a 245 switch(pin) {
loopsva 0:e065ca40f28a 246 case p15://=p0.23 of LPC1768
loopsva 0:e065ca40f28a 247 default:
loopsva 0:e065ca40f28a 248 LPC_PINCON->PINSEL1 &= ~((unsigned int)0x3 << 14);
loopsva 0:e065ca40f28a 249 LPC_PINCON->PINMODE1 &= ~((unsigned int)0x3 << 14);
loopsva 0:e065ca40f28a 250 break;
loopsva 0:e065ca40f28a 251 case p16://=p0.24 of LPC1768
loopsva 0:e065ca40f28a 252 LPC_PINCON->PINSEL1 &= ~((unsigned int)0x3 << 16);
loopsva 0:e065ca40f28a 253 LPC_PINCON->PINMODE1 &= ~((unsigned int)0x3 << 16);
loopsva 0:e065ca40f28a 254 break;
loopsva 0:e065ca40f28a 255 case p17://=p0.25 of LPC1768
loopsva 0:e065ca40f28a 256 LPC_PINCON->PINSEL1 &= ~((unsigned int)0x3 << 18);
loopsva 0:e065ca40f28a 257 LPC_PINCON->PINMODE1 &= ~((unsigned int)0x3 << 18);
loopsva 0:e065ca40f28a 258 break;
loopsva 0:e065ca40f28a 259 case p18://=p0.26 of LPC1768:
loopsva 0:e065ca40f28a 260 LPC_PINCON->PINSEL1 &= ~((unsigned int)0x3 << 20);
loopsva 0:e065ca40f28a 261 LPC_PINCON->PINMODE1 &= ~((unsigned int)0x3 << 20);
loopsva 0:e065ca40f28a 262 break;
loopsva 0:e065ca40f28a 263 case p19://=p1.30 of LPC1768
loopsva 0:e065ca40f28a 264 LPC_PINCON->PINSEL3 &= ~((unsigned int)0x3 << 28);
loopsva 0:e065ca40f28a 265 LPC_PINCON->PINMODE3 &= ~((unsigned int)0x3 << 28);
loopsva 0:e065ca40f28a 266 break;
loopsva 0:e065ca40f28a 267 case p20://=p1.31 of LPC1768
loopsva 0:e065ca40f28a 268 LPC_PINCON->PINSEL3 &= ~((unsigned int)0x3 << 30);
loopsva 0:e065ca40f28a 269 LPC_PINCON->PINMODE3 &= ~((unsigned int)0x3 << 30);
loopsva 0:e065ca40f28a 270 break;
loopsva 0:e065ca40f28a 271 }
loopsva 0:e065ca40f28a 272 LPC_ADC->ADCR &= ~(1 << chan);
loopsva 0:e065ca40f28a 273 }
loopsva 0:e065ca40f28a 274 }
loopsva 0:e065ca40f28a 275 //Return channel enabled/disabled state
loopsva 0:e065ca40f28a 276 int ADC::setup(PinName pin) {
loopsva 0:e065ca40f28a 277 int chan;
loopsva 0:e065ca40f28a 278
loopsva 0:e065ca40f28a 279 chan = _pin_to_channel(pin);
loopsva 0:e065ca40f28a 280 return((LPC_ADC->ADCR & (1 << chan)) >> chan);
loopsva 0:e065ca40f28a 281 }
loopsva 0:e065ca40f28a 282
loopsva 0:e065ca40f28a 283 //Select channel already setup
loopsva 0:e065ca40f28a 284 void ADC::select(PinName pin) {
loopsva 0:e065ca40f28a 285 int chan;
loopsva 0:e065ca40f28a 286
loopsva 0:e065ca40f28a 287 //Only one channel can be selected at a time if not in burst mode
loopsva 0:e065ca40f28a 288 if (!burst()) LPC_ADC->ADCR &= ~0xFF;
loopsva 0:e065ca40f28a 289 //Select channel
loopsva 0:e065ca40f28a 290 chan = _pin_to_channel(pin);
loopsva 0:e065ca40f28a 291 LPC_ADC->ADCR |= (1 << chan);
loopsva 0:e065ca40f28a 292 }
loopsva 0:e065ca40f28a 293
loopsva 0:e065ca40f28a 294 //Enable or disable burst mode
loopsva 0:e065ca40f28a 295 void ADC::burst(int state) {
loopsva 0:e065ca40f28a 296 if ((state & 1) == 1) {
loopsva 0:e065ca40f28a 297 if (startmode(0) != 0)
loopsva 0:e065ca40f28a 298 fprintf(stderr, "Warning. startmode is %u. Must be 0 for burst mode.\n", startmode(0));
loopsva 0:e065ca40f28a 299 LPC_ADC->ADCR |= (1 << 16);
loopsva 0:e065ca40f28a 300 }
loopsva 0:e065ca40f28a 301 else
loopsva 0:e065ca40f28a 302 LPC_ADC->ADCR &= ~(1 << 16);
loopsva 0:e065ca40f28a 303 }
loopsva 0:e065ca40f28a 304 //Return burst mode state
loopsva 0:e065ca40f28a 305 int ADC::burst(void) {
loopsva 0:e065ca40f28a 306 return((LPC_ADC->ADCR & (1 << 16)) >> 16);
loopsva 0:e065ca40f28a 307 }
loopsva 0:e065ca40f28a 308
loopsva 0:e065ca40f28a 309 //Set startmode and edge
loopsva 0:e065ca40f28a 310 void ADC::startmode(int mode, int edge) {
loopsva 0:e065ca40f28a 311 int lpc_adc_temp;
loopsva 0:e065ca40f28a 312
loopsva 0:e065ca40f28a 313 //Reset start mode and edge bit,
loopsva 0:e065ca40f28a 314 lpc_adc_temp = LPC_ADC->ADCR & ~(0x0F << 24);
loopsva 0:e065ca40f28a 315 //Write with new values
loopsva 0:e065ca40f28a 316 lpc_adc_temp |= ((mode & 7) << 24) | ((edge & 1) << 27);
loopsva 0:e065ca40f28a 317 LPC_ADC->ADCR = lpc_adc_temp;
loopsva 0:e065ca40f28a 318 }
loopsva 0:e065ca40f28a 319
loopsva 0:e065ca40f28a 320 //Return startmode state according to mode_edge=0: mode and mode_edge=1: edge
loopsva 0:e065ca40f28a 321 int ADC::startmode(int mode_edge){
loopsva 0:e065ca40f28a 322 switch (mode_edge) {
loopsva 0:e065ca40f28a 323 case 0:
loopsva 0:e065ca40f28a 324 default:
loopsva 0:e065ca40f28a 325 return((LPC_ADC->ADCR >> 24) & 0x07);
loopsva 0:e065ca40f28a 326 case 1:
loopsva 0:e065ca40f28a 327 return((LPC_ADC->ADCR >> 27) & 0x01);
loopsva 0:e065ca40f28a 328 }
loopsva 0:e065ca40f28a 329 }
loopsva 0:e065ca40f28a 330
loopsva 0:e065ca40f28a 331 //Start ADC conversion
loopsva 0:e065ca40f28a 332 void ADC::start(void) {
loopsva 0:e065ca40f28a 333 startmode(1,0);
loopsva 0:e065ca40f28a 334 }
loopsva 0:e065ca40f28a 335
loopsva 0:e065ca40f28a 336
loopsva 0:e065ca40f28a 337 //Set interrupt enable/disable for pin to state
loopsva 0:e065ca40f28a 338 void ADC::interrupt_state(PinName pin, int state) {
loopsva 0:e065ca40f28a 339 int chan;
loopsva 0:e065ca40f28a 340
loopsva 0:e065ca40f28a 341 chan = _pin_to_channel(pin);
loopsva 0:e065ca40f28a 342 if (state == 1) {
loopsva 0:e065ca40f28a 343 LPC_ADC->ADINTEN &= ~0x100;
loopsva 0:e065ca40f28a 344 LPC_ADC->ADINTEN |= 1 << chan;
loopsva 0:e065ca40f28a 345 /* Enable the ADC Interrupt */
loopsva 0:e065ca40f28a 346 NVIC_EnableIRQ(ADC_IRQn);
loopsva 0:e065ca40f28a 347 } else {
loopsva 0:e065ca40f28a 348 LPC_ADC->ADINTEN &= ~( 1 << chan );
loopsva 0:e065ca40f28a 349 //Disable interrrupt if no active pins left
loopsva 0:e065ca40f28a 350 if ((LPC_ADC->ADINTEN & 0xFF) == 0)
loopsva 0:e065ca40f28a 351 NVIC_DisableIRQ(ADC_IRQn);
loopsva 0:e065ca40f28a 352 }
loopsva 0:e065ca40f28a 353 }
loopsva 0:e065ca40f28a 354
loopsva 0:e065ca40f28a 355 //Return enable/disable state of interrupt for pin
loopsva 0:e065ca40f28a 356 int ADC::interrupt_state(PinName pin) {
loopsva 0:e065ca40f28a 357 int chan;
loopsva 0:e065ca40f28a 358
loopsva 0:e065ca40f28a 359 chan = _pin_to_channel(pin);
loopsva 0:e065ca40f28a 360 return((LPC_ADC->ADINTEN >> chan) & 0x01);
loopsva 0:e065ca40f28a 361 }
loopsva 0:e065ca40f28a 362
loopsva 0:e065ca40f28a 363
loopsva 0:e065ca40f28a 364 //Attach custom interrupt handler replacing default
loopsva 0:e065ca40f28a 365 void ADC::attach(void(*fptr)(void)) {
loopsva 0:e065ca40f28a 366 //* Attach IRQ
loopsva 0:e065ca40f28a 367 NVIC_SetVector(ADC_IRQn, (uint32_t)fptr);
loopsva 0:e065ca40f28a 368 }
loopsva 0:e065ca40f28a 369
loopsva 0:e065ca40f28a 370 //Restore default interrupt handler
loopsva 0:e065ca40f28a 371 void ADC::detach(void) {
loopsva 0:e065ca40f28a 372 //* Attach IRQ
loopsva 0:e065ca40f28a 373 instance = this;
loopsva 0:e065ca40f28a 374 NVIC_SetVector(ADC_IRQn, (uint32_t)&_adcisr);
loopsva 0:e065ca40f28a 375 }
loopsva 0:e065ca40f28a 376
loopsva 0:e065ca40f28a 377
loopsva 0:e065ca40f28a 378 //Append interrupt handler for pin to function isr
loopsva 0:e065ca40f28a 379 void ADC::append(PinName pin, void(*fptr)(uint32_t value)) {
loopsva 0:e065ca40f28a 380 int chan;
loopsva 0:e065ca40f28a 381
loopsva 0:e065ca40f28a 382 chan = _pin_to_channel(pin);
loopsva 0:e065ca40f28a 383 _adc_isr[chan] = fptr;
loopsva 0:e065ca40f28a 384 }
loopsva 0:e065ca40f28a 385
loopsva 0:e065ca40f28a 386 //Append interrupt handler for pin to function isr
loopsva 0:e065ca40f28a 387 void ADC::unappend(PinName pin) {
loopsva 0:e065ca40f28a 388 int chan;
loopsva 0:e065ca40f28a 389
loopsva 0:e065ca40f28a 390 chan = _pin_to_channel(pin);
loopsva 0:e065ca40f28a 391 _adc_isr[chan] = NULL;
loopsva 0:e065ca40f28a 392 }
loopsva 0:e065ca40f28a 393
loopsva 0:e065ca40f28a 394 //Unappend global interrupt handler to function isr
loopsva 0:e065ca40f28a 395 void ADC::append(void(*fptr)(int chan, uint32_t value)) {
loopsva 0:e065ca40f28a 396 _adc_g_isr = fptr;
loopsva 0:e065ca40f28a 397 }
loopsva 0:e065ca40f28a 398
loopsva 0:e065ca40f28a 399 //Detach global interrupt handler to function isr
loopsva 0:e065ca40f28a 400 void ADC::unappend() {
loopsva 0:e065ca40f28a 401 _adc_g_isr = NULL;
loopsva 0:e065ca40f28a 402 }
loopsva 0:e065ca40f28a 403
loopsva 0:e065ca40f28a 404 //Set ADC offset
loopsva 0:e065ca40f28a 405 void offset(int offset) {
loopsva 0:e065ca40f28a 406 LPC_ADC->ADTRM &= ~(0x07 << 4);
loopsva 0:e065ca40f28a 407 LPC_ADC->ADTRM |= (offset & 0x07) << 4;
loopsva 0:e065ca40f28a 408 }
loopsva 0:e065ca40f28a 409
loopsva 0:e065ca40f28a 410 //Return current ADC offset
loopsva 0:e065ca40f28a 411 int offset(void) {
loopsva 0:e065ca40f28a 412 return((LPC_ADC->ADTRM >> 4) & 0x07);
loopsva 0:e065ca40f28a 413 }
loopsva 0:e065ca40f28a 414
loopsva 0:e065ca40f28a 415 //Return value of ADC on pin
loopsva 0:e065ca40f28a 416 int ADC::read(PinName pin) {
loopsva 0:e065ca40f28a 417 //Reset DONE and OVERRUN flags of interrupt handled ADC data
loopsva 0:e065ca40f28a 418 _adc_data[_pin_to_channel(pin)] &= ~(((uint32_t)0x01 << 31) | ((uint32_t)0x01 << 30));
loopsva 0:e065ca40f28a 419 //Return value
loopsva 0:e065ca40f28a 420 return((_data_of_pin(pin) >> 4) & 0xFFF);
loopsva 0:e065ca40f28a 421 }
loopsva 0:e065ca40f28a 422
loopsva 0:e065ca40f28a 423 //Return DONE flag of ADC on pin
loopsva 0:e065ca40f28a 424 int ADC::done(PinName pin) {
loopsva 0:e065ca40f28a 425 return((_data_of_pin(pin) >> 31) & 0x01);
loopsva 0:e065ca40f28a 426 }
loopsva 0:e065ca40f28a 427
loopsva 0:e065ca40f28a 428 //Return OVERRUN flag of ADC on pin
loopsva 0:e065ca40f28a 429 int ADC::overrun(PinName pin) {
loopsva 0:e065ca40f28a 430 return((_data_of_pin(pin) >> 30) & 0x01);
loopsva 0:e065ca40f28a 431 }
loopsva 0:e065ca40f28a 432
loopsva 0:e065ca40f28a 433 int ADC::actual_adc_clock(void) {
loopsva 0:e065ca40f28a 434 return(_adc_clk_freq);
loopsva 0:e065ca40f28a 435 }
loopsva 0:e065ca40f28a 436
loopsva 0:e065ca40f28a 437 int ADC::actual_sample_rate(void) {
loopsva 0:e065ca40f28a 438 return(_adc_clk_freq / CLKS_PER_SAMPLE);
loopsva 0:e065ca40f28a 439 }