MajorDoMo

/*
Modul Virtual RTC
part of Arduino Mega Server project
*/

// Virtual RTC ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|

char timeServer[] = "time.nits.gov"; // -------------------------------------- Установка адреса NTP сервера
unsigned int localPort = 8888; // ------------------------------------------- Локальный порт для чтения UDP пакетов
EthernetUDP Udp; // ---------------------------------------------------------- Экземпляр, указывающий, что пакеты нужно отправлять и получать по UDP
const int timeZone = 5; // --------------------------------------------------- Временная зона
time_t prevDisplay = 0; // --------------------------------------------------- Когда были показаны цифровые часы

// Инициализация RTC ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
void rtcInit() {
Udp.begin(localPort); // --------------------------------------------------- Получение данных с порта UDP
Serialprint("Waiting for NTP sync... \n"); // ------------------------------ Вывод сообщения по Serial
setSyncProvider(getNtpTime);
modulRtc = 1;
}

// Работа RTC ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
void rtcWorks() {
if (timeStatus() != timeNotSet) { // ---------------------------------------
if (now() != prevDisplay) { // ------------------------------------------- Если текущие данные времени на дисплее не соответствует предыдущим
setLifer(); // --------------------------------------------------------- предоставление значения для Лайфера
prevDisplay = now(); // ------------------------------------------------ То предыдущие данные меняются на текущие
//digitalClockDisplay(); // ---------------------------------------------- Вывод для цифрового дисплея
}
}
}

// Вывод времени ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
void printDigits(int digits) {
if(digits < 10) {
Serial.print('0');
}
Serial.print(digits);
}

// Вывод на Serial ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
void serialRTC() {
Serial.print(year());
Serial.print("-");
printDigits(month());
Serial.print("-");
printDigits(day());
Serial.print(" ");
printDigits(hour());
Serial.print(":");
printDigits(minute());
Serial.print(":");
printDigits(second());
}

void timeStamp() {
serialRTC();
Serial.println(" ");
}

void printRTC(){
serialRTC();
Serial.println();
}

// NTP code

const int NTP_PACKET_SIZE = 48; // ------------------------------------------- Время NTP хранится в первых 48 байтах
byte packetBuffer[NTP_PACKET_SIZE]; // --------------------------------------- Буфер для входящих и исходящих пакетов

#ifdef RTC_FEATURE // -------------------------------------------------------- RTC Функции

// Получение времени с сервера ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
time_t getNtpTime() {
while (Udp.parsePacket() > 0) ; // ----------------------------------------- Отменить все ранее принятые пакеты
Serialprint("Transmit NTP request\n");
sendNTPpacket(timeServer);
uint32_t beginWait = millis();
while (millis() - beginWait < 1500) {
int size = Udp.parsePacket();
if (size >= NTP_PACKET_SIZE) {
Serialprint("Receive NTP response\n");
Udp.read(packetBuffer, NTP_PACKET_SIZE); // ---------------------------- чтение пакета в буфере
unsigned long secsSince1900;
// convert four bytes starting at location 40 to a long integer
secsSince1900 = (unsigned long)packetBuffer[40] << 24;
secsSince1900 |= (unsigned long)packetBuffer[41] << 16;
secsSince1900 |= (unsigned long)packetBuffer[42] << 8;
secsSince1900 |= (unsigned long)packetBuffer[43];
return secsSince1900 - 2208988800UL + timeZone * SECS_PER_HOUR;
}
}
Serialprint("No NTP response\n");
return 0; // return 0 if unable to get the time
}

// Оптавка NTP запроса на сервер времени по адресу
void sendNTPpacket(char* address) {
// Установка всех байтов в буфере на 0
memset(packetBuffer, 0, NTP_PACKET_SIZE);
// Инициализация значений, необходимых для формирования NTP запроса
  // (См URL выше для более подробной информации о пакетах)
packetBuffer[0] = 0b11100011; // LI, Version, Mode
packetBuffer[1] = 0; // Stratum, or type of clock
packetBuffer[2] = 6; // Polling Interval
packetBuffer[3] = 0xEC; // Peer Clock Precision
// 8 bytes of zero for Root Delay & Root Dispersion
packetBuffer[12] = 49;
packetBuffer[13] = 0x4E;
packetBuffer[14] = 49;
packetBuffer[15] = 52;
// all NTP fields have been given values, now
// you can send a packet requesting a timestamp:
Udp.beginPacket(address, 123); //NTP requests are to port 123
Udp.write(packetBuffer, NTP_PACKET_SIZE);
Udp.endPacket();
}

#endif

// Продолжительность
void showDuration(time_t duration) {
// prints the duration in days, hours, minutes and seconds
Serialprint(" (duration ");
if(duration >= SECS_PER_DAY){
Serial.print(duration / SECS_PER_DAY);
Serialprint(" day ");
duration = duration % SECS_PER_DAY;
}
if(duration >= SECS_PER_HOUR){
Serial.print(duration / SECS_PER_HOUR);
Serialprint(" hour ");
duration = duration % SECS_PER_HOUR;
}
if(duration >= SECS_PER_MIN){
Serial.print(duration / SECS_PER_MIN);
Serialprint(" min ");
duration = duration % SECS_PER_MIN;
}
Serial.print(duration);
Serialprint(" sec) \n");
}



void checkEvent(time_t* prevEvent) {
time_t duration = 0;
time_t timeNow = now();

if (*prevEvent > 0) {
duration = timeNow - *prevEvent;
}
if (duration > 0) {
showDuration(duration);
}
*prevEvent = timeNow;
}

// Uptime

char uptimeString[14];

/* ----------------------------------------------------------
Function makeUptimeString(char z[], char nop[])
convert system millis() to formstted string days hh.mm.ss
Used globsl variable char uptimeString[14];
Auto reset ~50 days
TODO: save to EEPROM x50 days periods
------------------------------------------------------------- */

void makeUptimeString(char zero[], char nop[]) {
char* zh;
char* zm;
char* zs;

unsigned long totalSeconds = millis() / 1000;
unsigned long days = totalSeconds / 86400;
unsigned long tsHours = totalSeconds - days * 86400;
unsigned long hours = tsHours / 3600;
unsigned long tsMinutes = tsHours - hours * 3600;
unsigned long minutes = tsMinutes / 60;
unsigned long seconds = tsMinutes - minutes * 60;

if (hours < 10) {zh = zero;} else {zh = nop;}
if (minutes < 10) {zm = zero;} else {zm = nop;}
if (seconds < 10) {zs = zero;} else {zs = nop;}

sprintf(uptimeString, "%d %s%d:%s%d:%s%d", (int)days, zh, (int)hours, zm, (int)minutes, zs, (int)seconds);
}

// Lifer

byte lifer;

void setLifer() {
lifer++;
if (lifer > 6) {
lifer = 0;
}
}

MEGA started...
Init SD card... OK
index.htm... found
Waiting for NTP sync...
Transmit NTP request
No NTP response
Connect to MajorDoMo... failed
Init SD card... OK
1970-01-01 00:00:41 ;Open!
1970-01-01 00:00:41 not connected
1970-01-01 00:00:41 +Norm
1970-01-01 00:00:41 not connected
1970-01-01 00:01:00 ;Open!
1970-01-01 00:01:00 not connected
1970-01-01 00:01:00 +Norm
1970-01-01 00:01:00 not connected
1970-01-01 00:01:00 not connected
1970-01-01 00:01:01 not connected
1970-01-01 00:01:21 not connected
1970-01-01 00:01:41 not connected