1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130

// ----------------------------------------------
// ESP8266  - Internet-Time
// Daylight - Timestamp 
// Steuern mit WLAN III
// Bezug: http://hjberndt.de/soft/ardesp8266time.html
// ----------------------------------------------
#include <Time.h>
#include <Timezone.h>    
//https://github.com/JChristensen/Timezone
//From WorlClock Example
//Central European Time (Frankfurt, Paris)
TimeChangeRule CEST = {"CEST", Last, Sun, Mar, 2, 120};     
TimeChangeRule CET = {"CET ", Last, Sun, Oct, 3, 60}; 
Timezone CE(CEST, CET);
TimeChangeRule *tcr; 
time_t cet;

#define LED 7  // Relais/Relay
#define RTIME   180000 //TRIGGER ESP every RTIME ms 
#define RRTIME  900000 //RESTART ESP every RRTIME ms 
#define CETIME  (3600000)
char *startup[]={"ATE0","AT+CWMODE=3","AT+CIPMUX=1",
                 "AT+CIPSERVER=1","AT+CIPSTATUS"};

volatile int last_id; //sender id for message
unsigned long t0,t1,tc,tf=30000;//first sync after boot

void time()
{String cmd="AT+CIPCLOSE=4";
 Serial.println(cmd);espReadLine(1000);
 cmd="AT+CIPSTART=4,\"TCP\",\"";
 cmd+="time.nist.gov";cmd+="\",13";
 Serial.println(cmd);
}

void setup()
{pinMode(LED,OUTPUT); Serial.begin(9600); 
 t0=millis();t1=t0;tc=t0; espReset();
}

void loop()
{int id,len,ix;char t[80],s[80],p[80]; 
 strcpy(p,espReadLine(0));
 ix=sscanf(p,"+IPD,%d,%d:%s",&id,&len,s);
 if(3==ix)
 {last_id=id;
  switch (s[0])
  {case '0':digitalWrite(LED,LOW);showLed(id);break;
   case '1':digitalWrite(LED,HIGH);showLed(id);break;
   case '8':espSendLine(id,"show os version");
            Serial.println("AT+GMR");break;
   case 'T'://Settime "T00:00:00D01.01.2000" UTC
            {int y,m,d,hh,mm,ss;
             ix=sscanf(s,"T%2d:%2d:%2dD%2d.%2d.%4d",
                       &hh,&mm,&ss,&d,&m,&y);
             if(ix==6)
             {setTime(hh,mm,ss,d,m,y); 
              espSendLine(id,"UTC Time Set.");
             }
            }
            break;
   case 't':espSendLine(id,"try sync.");time();break;
   case 'z':sprintf(t,"%02d:%02d:%02d",
            hour(cet),minute(cet),second(cet));
            espSendLine(id,t);
            break;
   case 'd':sprintf(t,"T%02d:%02d:%02dD%02d.%02d.%04d",
            hour(cet),minute(cet),second(cet),
            day(cet),month(cet),year(cet));
            espSendLine(id,t);
            break;
   default:showLed(id);
  }
 }
 //Check prompt
 len=strlen(p);
 if(p[0]=='>' && len>5)
 {for(int i;i<len;i++)if(p[i]<32)p[i]=0;
  espSendLine(last_id,p);//reply to last sender
 }
 if(millis()>(t0+RTIME)){espReset();t0=millis();}
 if(millis()>(tc+CETIME))
 {if(timeStatus()<2)time();//ONE SYNC
  else adjustTime(6);      // sec per hour
  tc=millis();             //next hour
 }
 if(tf>0)if(millis()>(t0+tf))
 {tf+=tf; time();}//first sync after tf
 // CLOCK
 // drawClockHands(cet); //not included
}

void showLed(int id)
{ char s[80];
  sprintf(s,"AT+CIPSEND=%d,12",id);// Message to id
  Serial.println(s);espReadLine(0);
  Serial.println(digitalRead(LED)?"LED is ON ":"LED is OFF");
}

void espSendLine(int id, char *t)
{char s[80];
 sprintf(s,"AT+CIPSEND=%d,%d",id,strlen(t)+2);
 Serial.println(s); Serial.println(t);// Message to id
}

char *espReadLine(int ms)
{int k,r5,y,m,d,hh,mm,ss;char t[80],s[80]; //buffer
 if(ms)delay(ms);
 int len=Serial.readBytesUntil('\n',s,sizeof(s)-4); 
 s[len]=0;
 //Check TimeStamp Daylight
 k=sscanf(s,"%5d %2d-%2d-%2d %2d:%2d:%2d %s",
          &r5,&y,&m,&d,&hh,&mm,&ss,t); 
 if(k==8)
 {setTime(hh,mm,ss,d,m,y);
  tc=millis();// automatic sync if needed 
  tf=0;  
 }
 //TimeClock UTC to CET
 cet=CE.toLocal(now(),&tcr)+2;
 return s;
}  

void espReset()
{if(analogRead(A0)==0 || millis()>(t1+RRTIME))
 {Serial.println("AT+RST");delay(2000);
 espReadLine(1000); t1=millis();}
 for(int i=0;i<5;i++)
 {Serial.println(startup[i]);espReadLine(0);}
}