Marcelo Rebonatto / Mbed 2 deprecated Protegemed_limpo

Versão limpa em 04/09/2014. Telnet funcionando.

Dependencies:   EthernetInterface mbed-rtos mbed NTPClient

main.cpp@41:a413c26109c2, 2016-01-14 (annotated)

Committer:
rebonatto
Date:
Thu Jan 14 17:28:38 2016 +0000
Revision:
41:a413c26109c2
Parent:
38:132e83a591d0 
Vers?o est?vel com DMA e FFT.

Who changed what in which revision?

UserRevisionLine numberNew contents of line
rebonatto 0:66d8bd1f9d4c 1 /*
rebonatto 0:66d8bd1f9d4c 2 Novo projeto MBED_Limpo
rebonatto 0:66d8bd1f9d4c 3 Criado para: Tentar reduzir o consumo de memória.
rebonatto 0:66d8bd1f9d4c 4 - Tirei do Seetings
rebonatto 0:66d8bd1f9d4c 5 - m_MaxChannels --> tem constante (NUMBER_OF_CHANNELS). Se mudar tem de recompilar
rebonatto 0:66d8bd1f9d4c 6 - m_MaxOutlets --> tem constante (NUMBER_OF_OUTLETS). Se mudar tem de recompilar
rebonatto 0:66d8bd1f9d4c 7 - m_Samples --> tem constante (NUMBER_OF_SAMPLES). Se mudar tem de recompilar
rebonatto 0:66d8bd1f9d4c 8 - m_FreqBase --> Adicionei constante (FREQBASE). Se mudar tem de recompilar.
rebonatto 0:66d8bd1f9d4c 9 - m_NumNeighbors --> Não utilizado, sem acompanhamento
rebonatto 0:66d8bd1f9d4c 10 - m_Neighbor[] --> Não Utilizado, sem acompanhamento
rebonatto 0:66d8bd1f9d4c 11 - m_PortTCP --> Não Utilizado, sem acompanhamento
rebonatto 0:66d8bd1f9d4c 12 - m_ServerSocket --> Não Utilizado, sem acompanhamento
rebonatto 0:66d8bd1f9d4c 13 - m_Socket[] --> Não Utilizado, sem acompanhamento
rebonatto 0:66d8bd1f9d4c 14 - m_MaxTries --> Adicionei constante (MAXTRIES). Se mudar tem de recompilar.
rebonatto 0:66d8bd1f9d4c 15 */
rebonatto 0:66d8bd1f9d4c 16 #include <stdio.h>
rebonatto 0:66d8bd1f9d4c 17
rebonatto 0:66d8bd1f9d4c 18 #include "mbed.h"
rebonatto 0:66d8bd1f9d4c 19 #include "rtos.h"
rebonatto 0:66d8bd1f9d4c 20 #include "cmsis_os.h"
rebonatto 0:66d8bd1f9d4c 21 //#include "EthernetIf.h"
rebonatto 0:66d8bd1f9d4c 22 #include "EthernetInterface.h"
rebonatto 0:66d8bd1f9d4c 23 #include "Settings.h"
rebonatto 0:66d8bd1f9d4c 24 #include "Capture.h"
rebonatto 0:66d8bd1f9d4c 25 #include "Http_post.h"
rebonatto 0:66d8bd1f9d4c 26 //#include "CommTCP.h"
rebonatto 0:66d8bd1f9d4c 27 #include "SignalProcessor.h"
rebonatto 0:66d8bd1f9d4c 28 #include "EventDetector.h"
rebonatto 0:66d8bd1f9d4c 29 #include "limites.h"
rebonatto 0:66d8bd1f9d4c 30
rebonatto 0:66d8bd1f9d4c 31 #include "TelnetServer.h"
rebonatto 0:66d8bd1f9d4c 32
mlucas82 3:52419e510163 33 #include "tftpsrv.h"
mlucas82 3:52419e510163 34 #include "ntpc.h"
mlucas82 3:52419e510163 35
mlucas82 14:f756167f791f 36 #include "PmedLog.h"
mlucas82 14:f756167f791f 37
mlucas82 26:7e215fc0c118 38 #include "NTPClient.h"
mlucas82 26:7e215fc0c118 39
rebonatto 38:132e83a591d0 40 #include "whatchdog.h"
rebonatto 38:132e83a591d0 41
rebonatto 38:132e83a591d0 42
rebonatto 38:132e83a591d0 43
rebonatto 0:66d8bd1f9d4c 44 //__attribute((section("AHBSRAM0"),aligned)) char LargeBuffer[1024];
rebonatto 0:66d8bd1f9d4c 45 EthernetInterface eth;
rebonatto 38:132e83a591d0 46 Watchdog wdt;
rebonatto 0:66d8bd1f9d4c 47
rebonatto 0:66d8bd1f9d4c 48 void thread1(void const *args)
rebonatto 0:66d8bd1f9d4c 49 {
rebonatto 0:66d8bd1f9d4c 50 }
rebonatto 0:66d8bd1f9d4c 51
rebonatto 0:66d8bd1f9d4c 52 /*
rebonatto 0:66d8bd1f9d4c 53 void InitializeEthernetLink()
rebonatto 0:66d8bd1f9d4c 54 {
rebonatto 0:66d8bd1f9d4c 55 if(Settings::get_Dhcp())
rebonatto 0:66d8bd1f9d4c 56 eth.init(); //Use DHCP
rebonatto 0:66d8bd1f9d4c 57 else
rebonatto 0:66d8bd1f9d4c 58 eth.init(Settings::get_IpAddress(),Settings::get_Netmask(),Settings::get_Gateway());
rebonatto 0:66d8bd1f9d4c 59
rebonatto 0:66d8bd1f9d4c 60 eth.connect();
rebonatto 0:66d8bd1f9d4c 61 printf("IP Address is %s\n", eth.getIPAddress());
rebonatto 0:66d8bd1f9d4c 62 }
rebonatto 0:66d8bd1f9d4c 63 */
rebonatto 0:66d8bd1f9d4c 64 void InitializeEthernetLink()
rebonatto 0:66d8bd1f9d4c 65 {
rebonatto 0:66d8bd1f9d4c 66 if(Settings::get_Dhcp())
rebonatto 0:66d8bd1f9d4c 67 //EthernetIf::Initialize(); //Use DHCP
rebonatto 0:66d8bd1f9d4c 68 eth.init(); //Use DHCP
rebonatto 0:66d8bd1f9d4c 69 else
rebonatto 0:66d8bd1f9d4c 70 //EthernetIf::Initialize(Settings::get_IpAddress(),Settings::get_Netmask(),Settings::get_Gateway());
rebonatto 0:66d8bd1f9d4c 71 eth.init(Settings::get_IpAddress(),Settings::get_Netmask(),Settings::get_Gateway());
rebonatto 0:66d8bd1f9d4c 72
rebonatto 0:66d8bd1f9d4c 73 //EthernetIf::Connect();
rebonatto 0:66d8bd1f9d4c 74 eth.connect();
rebonatto 0:66d8bd1f9d4c 75 //printf("IP Address is %s\n", EthernetIf::get_IpAddress());
rebonatto 0:66d8bd1f9d4c 76 printf("IP Address is NEW %s\n", eth.getIPAddress());
rebonatto 0:66d8bd1f9d4c 77 }
rebonatto 0:66d8bd1f9d4c 78
rebonatto 0:66d8bd1f9d4c 79 int main() {
rebonatto 38:132e83a591d0 80 //DigitalOut myled3(LED3); //The pushbutton or power on caused a reset
rebonatto 38:132e83a591d0 81 //DigitalOut myled4(LED4); //The watchdog timer caused a reset
rebonatto 38:132e83a591d0 82
rebonatto 41:a413c26109c2 83 printf("Versao estável com aquisição por DMA e FFT\n");
rebonatto 41:a413c26109c2 84
rebonatto 38:132e83a591d0 85 if ((LPC_WDT->WDMOD >> 2) & 1){
rebonatto 38:132e83a591d0 86 //myled4 = 1;
rebonatto 38:132e83a591d0 87 PmedLog::WriteEntry(PMEDLOG_INITIALIZINGWDT);
rebonatto 38:132e83a591d0 88 }
rebonatto 38:132e83a591d0 89 else{
rebonatto 38:132e83a591d0 90 //myled3 = 1;
rebonatto 38:132e83a591d0 91 PmedLog::WriteEntry(PMEDLOG_INITIALIZING);
rebonatto 38:132e83a591d0 92 }
mlucas82 18:3e9ad4c03f85 93
rebonatto 38:132e83a591d0 94 printf("\r\nNova versao 70 ( 20151028.1 )... Com WhatchDog\r\n");
rebonatto 0:66d8bd1f9d4c 95 FILE *f;
rebonatto 0:66d8bd1f9d4c 96 //Set Highest Priority
rebonatto 0:66d8bd1f9d4c 97 //osThreadSetPriority(osThreadGetId(),osPriorityHigh);
rebonatto 0:66d8bd1f9d4c 98
rebonatto 0:66d8bd1f9d4c 99 Settings::ReadFile();
rebonatto 0:66d8bd1f9d4c 100 //printf("Passou Settings, carregou arquivo\n");
rebonatto 0:66d8bd1f9d4c 101 //Settings::ShowValues();
rebonatto 0:66d8bd1f9d4c 102
rebonatto 0:66d8bd1f9d4c 103 InitializeEthernetLink();
rebonatto 32:8b108d8089e8 104 printf("Inicializou link Ethernet\n");
rebonatto 0:66d8bd1f9d4c 105
rebonatto 0:66d8bd1f9d4c 106 //Start HTTP POST service
rebonatto 0:66d8bd1f9d4c 107 Thread http_post(HttpPost::HttpPost_Thread);
rebonatto 0:66d8bd1f9d4c 108
rebonatto 0:66d8bd1f9d4c 109 //Start TCP daemon service
rebonatto 0:66d8bd1f9d4c 110 //Thread TcpService(CommTCP::CommTCP_Thread);
rebonatto 0:66d8bd1f9d4c 111
rebonatto 0:66d8bd1f9d4c 112 //Start Telnet Service
rebonatto 0:66d8bd1f9d4c 113 Thread telnetserver(TelnetServer::TelnetServer_Thread);
rebonatto 0:66d8bd1f9d4c 114
rebonatto 5:6860bed2d096 115 //Start TFTP Service
rebonatto 5:6860bed2d096 116 Thread tftpsrv(tftpsrv::tftpsrv_Thread);
rebonatto 0:66d8bd1f9d4c 117
rebonatto 5:6860bed2d096 118 //Start NTP Client for refresh time
rebonatto 5:6860bed2d096 119 //Thread ntpc(ntpc::ntpc_Thread);
mlucas82 22:a06c7bb05008 120 time_t tempo = time(NULL);
mlucas82 22:a06c7bb05008 121 if ((tempo+60) < 1420077600) set_time(1420077600);
rebonatto 0:66d8bd1f9d4c 122
rebonatto 29:fcfcb31a6362 123 // ntpClient.setTime("192.168.103.101");
mlucas82 26:7e215fc0c118 124
rebonatto 0:66d8bd1f9d4c 125 DisplayRAMBanks();
rebonatto 0:66d8bd1f9d4c 126
rebonatto 0:66d8bd1f9d4c 127 /*
rebonatto 0:66d8bd1f9d4c 128 unsigned short vet[256] = {2105,2105,2113,2127,2127,2125,2112,2113,2130,2130,2123,2112,2112,2128,2128,2123,2112,2113,2136,2136,2374,2551,2671,2869,2887,3036,2964,2964,2964,3145,3145,3206,3209,3298,3298,3264,3261,3208,3239,3239,3197,3197,3113,3032,3065,3065,3000,2901,2943,2943,2900,2852,2844,2863,2863,2838,2764,2791,2724,2724,2668,2710,2636,2658,2658,2606,2527,2443,2434,2434,2258,2066,2061,2080,2080,2063,2055,2055,2070,2070,2064,2051,2054,2069,2069,2062,2054,2058,2066,2309,2062,2052,2054,2067,2067,2063,2051,2049,2068,2068,2060,2053,2050,2067,2066,2069,2051,2053,2070,2070,2064,2050,2053,2070,2070,2062,2052,2055,2068,2068,2065,2052,2057,2072,2072,2064,2054,2054,2072,2072,2064,2053,2052,2069,2069,2064,2052,2053,2064,2064,2062,2049,2051,2067,2067,2059,2051,2050,2068,2068,2058,2046,2050,2068,2068,2061,2052,2058,2068,2068,2059,2052,2053,2067,2067,1744,1526,1471,1289,1289,1137,1142,1055,1120,1120,997,967,894,941,941,928,887,1001,949,949,1028,1105,1079,1191,1191,1223,1211,1223,1267,1267,1325,1267,1356,1327,1327,1369,1439,1381,1498,1498,1503,1503,1527,1545,1545,1635,1650,1778,1792,1792,1971,2108,2109,2126,2126,2124,2117,2118,2131,2131,2126,2118,2118,2138,2138,2134,2124,2114,2135,2135,2129,2121,2120,2136,2136,2128,2122,2122,2143,2120,2130,2120,2121,2139,2139,2130,2119,2121,2136,2136,2129};
rebonatto 0:66d8bd1f9d4c 129 float sen[12],cos[12],vm;
rebonatto 0:66d8bd1f9d4c 130 SignalProcessor::CalculateFFT(vet,sen,cos,&vm,1);
rebonatto 0:66d8bd1f9d4c 131
rebonatto 0:66d8bd1f9d4c 132 printf("VM = %f\n",vm);
rebonatto 0:66d8bd1f9d4c 133 for(int i=0;i<12;i++)
rebonatto 0:66d8bd1f9d4c 134 {
rebonatto 0:66d8bd1f9d4c 135 printf("SEN%d = %f, COS%d = %f\n",i,sen[i],i,cos[i]);
rebonatto 0:66d8bd1f9d4c 136 }
rebonatto 0:66d8bd1f9d4c 137 */
rebonatto 38:132e83a591d0 138 printf(PMEDLOG_INITIALIZINGWDT);
rebonatto 38:132e83a591d0 139 printf("\n\n");
rebonatto 0:66d8bd1f9d4c 140
rebonatto 0:66d8bd1f9d4c 141 //printf("0x%lx\n", LargeBuffer);
rebonatto 0:66d8bd1f9d4c 142
mlucas82 18:3e9ad4c03f85 143 PmedLog::WriteEntry(PMEDLOG_STARTED);
mlucas82 18:3e9ad4c03f85 144
rebonatto 38:132e83a591d0 145 /* Teste com WhatchDog
rebonatto 0:66d8bd1f9d4c 146 //Jump to the capture routine(will run on this thread)
rebonatto 0:66d8bd1f9d4c 147 thread1(NULL);
rebonatto 38:132e83a591d0 148 */
rebonatto 38:132e83a591d0 149
rebonatto 38:132e83a591d0 150 /* start test WahtchDog */
rebonatto 38:132e83a591d0 151 DigitalOut led1(LED1);
rebonatto 38:132e83a591d0 152 int n = 0;
rebonatto 38:132e83a591d0 153 //int tatual, tnovo;
rebonatto 38:132e83a591d0 154 float rms[NUMBER_OF_CHANNELS], mv2[NUMBER_OF_CHANNELS];
rebonatto 38:132e83a591d0 155 int under[NUMBER_OF_CHANNELS], over[NUMBER_OF_CHANNELS];
rebonatto 38:132e83a591d0 156
rebonatto 38:132e83a591d0 157 wdt.kick(10.0);
rebonatto 38:132e83a591d0 158
rebonatto 38:132e83a591d0 159 Capture::Initialize();
rebonatto 38:132e83a591d0 160
rebonatto 38:132e83a591d0 161 while(1)
rebonatto 38:132e83a591d0 162 {
rebonatto 38:132e83a591d0 163 Capture::Wait();
rebonatto 38:132e83a591d0 164
rebonatto 38:132e83a591d0 165 // Calcula o RMS dos 6 canais
rebonatto 38:132e83a591d0 166 SignalProcessor::CalculateRMSBulk(rms, mv2, under, over);
rebonatto 38:132e83a591d0 167
rebonatto 38:132e83a591d0 168 for(int i=0;i<6;i++){
rebonatto 38:132e83a591d0 169 EventDetector::get_Detector(i).ProcessEvent(rms[i], mv2[i], under[i], over[i]);
rebonatto 38:132e83a591d0 170 }
rebonatto 38:132e83a591d0 171
rebonatto 38:132e83a591d0 172 n++;
rebonatto 38:132e83a591d0 173 if(n==60)
rebonatto 38:132e83a591d0 174 {
rebonatto 38:132e83a591d0 175 printf("%.2f %.0f %.2f %.0f\t%.2f %.0f %.2f %.0f\t%.2f %.0f %.2f %.0f\n",rms[0], mv2[0],rms[1],mv2[1],rms[2],mv2[2],rms[3],mv2[3],rms[4],mv2[4],rms[5],mv2[5]);
rebonatto 38:132e83a591d0 176 led1 = !led1;
rebonatto 38:132e83a591d0 177 n=0;
rebonatto 38:132e83a591d0 178
rebonatto 38:132e83a591d0 179 PmedLog::Mark();
rebonatto 38:132e83a591d0 180 }
rebonatto 38:132e83a591d0 181
rebonatto 38:132e83a591d0 182 // End of main loop so "kick" to reset watchdog timer and avoid a reset
rebonatto 38:132e83a591d0 183 wdt.kick();
rebonatto 38:132e83a591d0 184
rebonatto 38:132e83a591d0 185 }
rebonatto 38:132e83a591d0 186 /* end test WahtchDog */
rebonatto 38:132e83a591d0 187
rebonatto 0:66d8bd1f9d4c 188 while(1){//never reaches here
mlucas82 18:3e9ad4c03f85 189 PmedLog::WriteEntry(PMEDLOG_WRONGCODE);
rebonatto 0:66d8bd1f9d4c 190 printf("Reset\n");
rebonatto 0:66d8bd1f9d4c 191 f = fopen(FILENAMERESET, "a");
rebonatto 0:66d8bd1f9d4c 192 if (f == NULL)
rebonatto 0:66d8bd1f9d4c 193 f = fopen(FILENAMERESET, "w");
rebonatto 0:66d8bd1f9d4c 194 fprintf(f, "Laco Errado\n");
rebonatto 0:66d8bd1f9d4c 195 fclose(f);
rebonatto 0:66d8bd1f9d4c 196 Thread::yield();
rebonatto 0:66d8bd1f9d4c 197 }
rebonatto 0:66d8bd1f9d4c 198 }
mlucas82 19:682cb884ec00 199