Andrew Boyson / web

Important changes to repositories hosted on mbed.com

Mbed hosted mercurial repositories are deprecated and are due to be permanently deleted in July 2026.

To keep a copy of this software download the repository Zip archive or clone locally using Mercurial.

It is also possible to export all your personal repositories from the account settings page.

Dependents:   oldheating gps motorhome heating

clock/http-clock-html.c@73:4e769dbbf9f2, 2019-03-19 (annotated)

Committer:
andrewboyson
Date:
Tue Mar 19 12:11:39 2019 +0000
Revision:
73:4e769dbbf9f2
Parent:
62:74036bb0d1dc
Child:
77:4689596a2f3f
Included delay after submitting login page to make brute force attacks more difficult.

Who changed what in which revision?

UserRevisionLine numberNew contents of line
andrewboyson 14:c3c43c8faf0e 1 #include <time.h>
andrewboyson 14:c3c43c8faf0e 2
andrewboyson 30:6a08abbe6301 3 #include "http.h"
andrewboyson 30:6a08abbe6301 4 #include "page.h"
andrewboyson 30:6a08abbe6301 5 #include "page-derived.h"
andrewboyson 30:6a08abbe6301 6 #include "http-server.h"
andrewboyson 30:6a08abbe6301 7 #include "clk.h"
andrewboyson 30:6a08abbe6301 8 #include "rtc.h"
andrewboyson 30:6a08abbe6301 9 #include "clkutc.h"
andrewboyson 30:6a08abbe6301 10 #include "clkgov.h"
andrewboyson 30:6a08abbe6301 11 #include "scan.h"
andrewboyson 62:74036bb0d1dc 12 #include "ntpclient.h"
andrewboyson 14:c3c43c8faf0e 13
andrewboyson 14:c3c43c8faf0e 14 void HttpClockHtml()
andrewboyson 14:c3c43c8faf0e 15 {
andrewboyson 14:c3c43c8faf0e 16 HttpOk("text/html; charset=UTF-8", "no-cache", NULL, NULL);
andrewboyson 30:6a08abbe6301 17 PageAddHeader(PageSite, "Clock", "settings.css", "clock.js");
andrewboyson 30:6a08abbe6301 18 PageAddNav(CLOCK_PAGE);
andrewboyson 30:6a08abbe6301 19 PageAddH1(PageSite, "Clock");
andrewboyson 14:c3c43c8faf0e 20
andrewboyson 24:0ed9f1faea96 21 PageAddH2("Status");
andrewboyson 58:e5ab14ef6ea6 22 PageAddAjaxLed(10.0, "RTC is set" , "ajax-rtc-set" );
andrewboyson 58:e5ab14ef6ea6 23 PageAddAjaxLed(10.0, "Clock is set" , "ajax-clock-set" );
andrewboyson 58:e5ab14ef6ea6 24 PageAddAjaxLed(10.0, "External source is ok", "ajax-source-ok" );
andrewboyson 73:4e769dbbf9f2 25 PageAddAjaxLed(10.0, "Time synchronised" , "ajax-time-locked");
andrewboyson 58:e5ab14ef6ea6 26 PageAddAjaxLed(10.0, "Rate synchronised" , "ajax-rate-locked");
andrewboyson 73:4e769dbbf9f2 27
andrewboyson 15:2cea2bbd5046 28 PageAddH2("Server UTC time");
andrewboyson 15:2cea2bbd5046 29 HttpAddText("<div id='date-utc'></div>\r\n");
andrewboyson 14:c3c43c8faf0e 30
andrewboyson 14:c3c43c8faf0e 31 PageAddH2("Server local time");
andrewboyson 14:c3c43c8faf0e 32 HttpAddText("<div id='date-pc'></div>\r\n");
andrewboyson 14:c3c43c8faf0e 33
andrewboyson 24:0ed9f1faea96 34 PageAddH2("Server - PC (ms)");
andrewboyson 14:c3c43c8faf0e 35 HttpAddText("<div id='date-diff'></div>\r\n");
andrewboyson 14:c3c43c8faf0e 36
andrewboyson 24:0ed9f1faea96 37 PageAddH2("UTC");
andrewboyson 58:e5ab14ef6ea6 38 PageAddAjaxInputToggle(16, "Enable epoch change" , "ajax-leap-enable" , "chg-clock-leap-enable" );
andrewboyson 58:e5ab14ef6ea6 39 PageAddAjaxInputToggle(16, "Direction of next epoch" , "ajax-leap-forward" , "chg-clock-leap-forward");
andrewboyson 58:e5ab14ef6ea6 40 PageAddAjaxInput (12, "Year next epoch starts" , 5.2 , "ajax-leap-year" , "set-clock-leap-year" );
andrewboyson 58:e5ab14ef6ea6 41 PageAddAjaxInput (12, "Month next epoch starts" , 5.2 , "ajax-leap-month" , "set-clock-leap-month" );
andrewboyson 58:e5ab14ef6ea6 42 PageAddAjaxInput (12, "Current era offset" , 5.2 , "ajax-leap-count" , "set-clock-leap-count" );
andrewboyson 14:c3c43c8faf0e 43
andrewboyson 22:f45bbb468439 44 HttpAddText("<div><button type='button' onclick='DisplayLeap()'>Display Leap</button></div>\r\n");
andrewboyson 21:048b7dbdf0aa 45
andrewboyson 22:f45bbb468439 46 HttpAddText("<div>The leap seconds list is available from <a href='https://www.ietf.org/timezones/data/leap-seconds.list' target='_blank'>ietf</a></div>\r\n");
andrewboyson 14:c3c43c8faf0e 47
andrewboyson 24:0ed9f1faea96 48 PageAddH2("Governer");
andrewboyson 58:e5ab14ef6ea6 49 PageAddInputInt (12, "Ppb", 5, ClkGovGetPpb() , "/clock", "ppb" );
andrewboyson 58:e5ab14ef6ea6 50 PageAddInputInt (12, "Ppb divisor", 5, ClkGovFreqDivisor , "/clock", "ppbdivisor" );
andrewboyson 58:e5ab14ef6ea6 51 PageAddInputInt (12, "Ppb max change", 5, ClkGovFreqChangeMaxPpb , "/clock", "ppbmaxchange" );
andrewboyson 58:e5ab14ef6ea6 52 PageAddInputInt (12, "Ppb synced limit", 5, ClkGovFreqSyncedLimPpb , "/clock", "syncedlimitppb");
andrewboyson 58:e5ab14ef6ea6 53 PageAddInputInt (12, "Ppb synced hysteresis", 5, ClkGovFreqSyncedHysPpb , "/clock", "syncedhysppb" );
andrewboyson 15:2cea2bbd5046 54
andrewboyson 58:e5ab14ef6ea6 55 PageAddInputInt (12, "Offset divisor", 5, ClkGovSlewDivisor , "/clock", "slewdivisor" );
andrewboyson 58:e5ab14ef6ea6 56 PageAddInputInt (12, "Offset max (ms)", 5, ClkGovSlewChangeMaxMs , "/clock", "slewmax" );
andrewboyson 58:e5ab14ef6ea6 57 PageAddInputInt (12, "Offset synced limit (ms)", 5, ClkGovSlewSyncedLimNs / 1000000 , "/clock", "syncedlimitns" );
andrewboyson 58:e5ab14ef6ea6 58 PageAddInputInt (12, "Offset synced hys (ms)", 5, ClkGovSlewSyncedHysNs / 1000000 , "/clock", "syncedhysns" );
andrewboyson 58:e5ab14ef6ea6 59 PageAddInputInt (12, "Offset reset limit (s)", 5, ClkGovSlewOffsetMaxSecs , "/clock", "maxoffsetsecs" );
andrewboyson 20:007fb5796d20 60
andrewboyson 58:e5ab14ef6ea6 61 if (ClkGovTrace) PageAddInputButton(10, "Trace gov is on", "turn off", "/clock", "clockgovtrace");
andrewboyson 58:e5ab14ef6ea6 62 else PageAddInputButton(10, "Trace gov is off", "turn on" , "/clock", "clockgovtrace");
andrewboyson 15:2cea2bbd5046 63
andrewboyson 62:74036bb0d1dc 64 PageAddH2("NTP");
andrewboyson 62:74036bb0d1dc 65 PageAddInputText(12, "Server url", 5, NtpClientQueryServerName, "/clock", "ntpserver" );
andrewboyson 62:74036bb0d1dc 66 PageAddInputInt (12, "Initial interval (s)", 5, NtpClientQueryInitialInterval, "/clock", "clockinitial" );
andrewboyson 62:74036bb0d1dc 67 PageAddInputInt (12, "Normal interval (m)", 5, NtpClientQueryNormalInterval / 60, "/clock", "clocknormal" );
andrewboyson 62:74036bb0d1dc 68 PageAddInputInt (12, "Retry interval (s)", 5, NtpClientQueryRetryInterval, "/clock", "clockretry" );
andrewboyson 62:74036bb0d1dc 69 PageAddInputInt (12, "Offset (ms)", 5, NtpClientReplyOffsetMs, "/clock", "clockoffset" );
andrewboyson 62:74036bb0d1dc 70 PageAddInputInt (12, "Max delay (ms)", 5, NtpClientReplyMaxDelayMs, "/clock", "clockmaxdelay");
andrewboyson 62:74036bb0d1dc 71
andrewboyson 14:c3c43c8faf0e 72 PageAddH2("Scan times");
andrewboyson 59:309e78f243dd 73 PageAddLabelledInt(17, "Program cycles avg", ScanAverage);
andrewboyson 59:309e78f243dd 74 PageAddLabelledInt(17, "Program cycles max", ScanMaximum);
andrewboyson 59:309e78f243dd 75 PageAddLabelledInt(17, "Program cycles min", ScanMinimum);
andrewboyson 14:c3c43c8faf0e 76
andrewboyson 15:2cea2bbd5046 77 PageAddH2("Ajax");
andrewboyson 15:2cea2bbd5046 78 HttpAddText("<code id='ajax-headers'></code>\r\n");
andrewboyson 15:2cea2bbd5046 79 HttpAddText("<code id='ajax-response'></code>\r\n");
andrewboyson 15:2cea2bbd5046 80
andrewboyson 14:c3c43c8faf0e 81 PageAddEnd();
andrewboyson 14:c3c43c8faf0e 82 }