/*      This file is part of Juggluco, an Android app to receive and display         */
/*      glucose values from Freestyle Libre 2 and 3 sensors.                         */
/*                                                                                   */
/*      Copyright (C) 2021 Jaap Korthals Altes <jaapkorthalsaltes@gmail.com>         */
/*                                                                                   */
/*      Juggluco is free software: you can redistribute it and/or modify             */
/*      it under the terms of the GNU General Public License as published            */
/*      by the Free Software Foundation, either version 3 of the License, or         */
/*      (at your option) any later version.                                          */
/*                                                                                   */
/*      Juggluco is distributed in the hope that it will be useful, but              */
/*      WITHOUT ANY WARRANTY; without even the implied warranty of                   */
/*      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.                         */
/*      See the GNU General Public License for more details.                         */
/*                                                                                   */
/*      You should have received a copy of the GNU General Public License            */
/*      along with Juggluco. If not, see <https://www.gnu.org/licenses/>.            */
/*                                                                                   */
/*      Fri Jan 27 12:38:28 CET 2023                                                 */


#ifndef WEAROS
#include "settings/settings.hpp"
#include <charconv>
#include <inttypes.h>
#include <system_error>
#include <utility>
#include <alloca.h>
//#include <arpa/inet.h>
       #include <sys/types.h>
       #include <sys/socket.h>
       #include <netdb.h>
#include <arpa/inet.h>
       #include <sys/socket.h>
       #include <sys/types.h>
       #include <sys/wait.h>
       #include <unistd.h>
       #include <netinet/in.h>
       #include <netinet/tcp.h>
#ifndef HAVE_NOPRCTL
#include <sys/prctl.h>
#endif
 
#include <string.h>
#include <stdio.h>
#include <stdlib.h>

#include <errno.h>

#include <netinet/in.h>
#include <sys/wait.h>
       #include <unistd.h>
       #include <sys/syscall.h> 
#include <map>
//#include "myfdsan.h"
#include "../netstuff.hpp"
#include "destruct.hpp"
#include "inout.hpp"

#include "logs.hpp"
#include "watchserver.hpp"

#include "datestring.hpp"

#include "common.hpp"
#include "calibrate/Calibrator.hpp"
#ifndef LOGGER
#define LOGGER(...) fprintf(stderr,__VA_ARGS__)
#endif

#define LOGGERWEB(...) LOGGER("webserver: " __VA_ARGS__)
#define LOGARWEB(...) LOGAR("webserver: " __VA_ARGS__)
typedef std::conditional<sizeof(long long) == sizeof(int64_t), long long, int64_t >::type longlongtype;

#include "curve/jugglucotext.hpp"
//extern jugglucotext engtext;
using namespace std::literals;
constexpr const int maxnighterror=200;
char nighterrorbuf[maxnighterror]="";
#include "mirrorerror.h"
#define nightprint(...) snprintf( nighterrorbuf,maxnighterror,__VA_ARGS__)
#define nighterror(...) savebuferror(nighterrorbuf,maxnighterror,__VA_ARGS__)
static void watchserverloop(int *sockptr,bool secure) ;
static bool startwatchserver(bool secure,int port,int *sockptr) {
   const char *servername=secure?"SSL WATCHSERVER":"WATCHSERVER";
   LOGGERWEB("%s\n",servername);
   constexpr const int maxport=20;
   char watchserverport[maxport];
   snprintf(watchserverport,maxport,"%d",port);

#ifndef HAVE_NOPRCTL
        prctl(PR_SET_NAME, servername, 0, 0, 0);
#endif
   struct addrinfo hints{.ai_flags=AI_PASSIVE,.ai_family=AF_INET6,.ai_socktype=SOCK_STREAM};
   int sock;
   {
   struct addrinfo *servinfo=nullptr;
   destruct serv([&servinfo]{ if(servinfo)freeaddrinfo(servinfo);});
   if(int status= getaddrinfo(nullptr,watchserverport,&hints,&servinfo)) {
      nightprint("getaddrinfo: %s",gai_strerror(status));
      LOGGERWEB("%s\n",nighterrorbuf);
      return false;
      }
   for(struct addrinfo *ips=servinfo;;ips=ips->ai_next) {
      if(!ips) {
         return false;
         }
      sock=socket(AF_INET6,ips->ai_socktype,ips->ai_protocol);
      if(sock==-1) {
         nighterror("socket");
         LOGGERWEB("%s\n",nighterrorbuf);
         continue;
         }
//         exchange_owner_tag(sock,0,reinterpret_cast<uint64_t>(sockptr));
      const int  yes=1;   
      if(setsockopt(sock, SOL_SOCKET, SO_REUSEADDR, &yes, sizeof(int)) == -1) {
         nighterror("setsockopt");
         LOGGERWEB("%s\n",nighterrorbuf);
         close(sock);
        //close_with_tag(sock, reinterpret_cast<uint64_t>(sockptr));
         return false;
         }
      if(bind(sock,ips->ai_addr,ips->ai_addrlen)==-1) {
         nighterror("bind port=%d",port);
         close(sock);
        // close_with_tag(sock, reinterpret_cast<uint64_t>(sockptr));
         LOGGERWEB("%s\n",nighterrorbuf);
         continue;
         }
      break;
      }
   }
   constexpr int const BACKLOG=5;
   if (listen(sock, BACKLOG) == -1) {
      nighterror("listen");
      close(sock);
      //close_with_tag(sock, reinterpret_cast<uint64_t>(sockptr));
      LOGGERWEB("%s\n",nighterrorbuf);
      return false;
      }
   *nighterrorbuf='\0';
   *sockptr=sock;
   watchserverloop(sockptr,secure) ;
   return true;
   }

#include <thread>
#include <algorithm>
#include "sensoren.hpp"

#include "nightnumcategories.hpp"
#include "curve/numiter.hpp"
extern vector<Numdata*> numdatas;
#define _GNU_SOURCE 1
#include <sched.h>

int xdripserversock=-1;
int xdripserversslsock=-1;

bool stopconnection=false;

#ifdef USE_SSL
extern bool sslstopconnection;

void stopsslwatchthread() ;
std::string startsslwatchthread() ;

const std::string initsslserver(void);

//std::string testkeyfiles() ;
std::string startsslwatchthread() {

extern std::string haskeyfiles() ;
   auto error=haskeyfiles();
   if(error.size())
      return error;
      
   extern   std::string  loadsslfunctions() ; 
   static std::string keepworking=loadsslfunctions() ;
   if(keepworking.size()) {
      LOGGERN(keepworking.data(),keepworking.size());
      return keepworking;
      }
   auto working=initsslserver();
   if(working.size()==0) {
      std::thread watchsec(startwatchserver,true,settings->data()->sslport,&xdripserversslsock);
      watchsec.detach();
      sslstopconnection=false;
      }
   else {
   #ifdef JUGGLUCO_APP
      LOGGERN(working.data(),working.size());
   #else
            fprintf(stderr,"**** %s ****\n",working.data());
   #endif
      }
   return working;
   }
void stopsslwatchthread() {
   sslstopconnection=true;
   shutdown(xdripserversslsock,SHUT_RDWR);
   }
#endif

static std::string sha1secret;
extern void makesha1secret();
void makesha1secret() {
   sha1secret=sha1encode(settings->data()->apisecret,settings->data()->apisecretlength);
   }

extern void stopsummarythread();
extern void startsummarythread();
void startwatchthread(int port) {
        startsummarythread();
   if(xdripserversock==-1)  {
       makesha1secret();
      std::thread watch(startwatchserver,false,port,&xdripserversock);
      watch.detach();
   #ifdef USE_SSL
   if(xdripserversslsock==-1)  {
      if(settings->data()->useSSL) {
         const std::string error=startsslwatchthread();
         if(error.size()) {
         #ifdef JUGGLUCO_APP
            LOGGERWEB("%s\n",error.data());
        #else
            fprintf(stderr,"*** %s ***\n",error.data());
        #endif
            }
         }
      }
   #endif
      }
   stopconnection=false;
   }
extern void stopwatchthread() ;
void stopwatchthread() {
        stopsummarythread();
   stopconnection=true;
   shutdown(xdripserversock,SHUT_RDWR);
#ifdef USE_SSL
   stopsslwatchthread();
#endif
   }

//&hosts[hostlen-1]

static void watchserverloop(int *sockptr,bool secure)  {
   int serversock=*sockptr;
   while(true) {  // main accept() loop
       struct sockaddr_in6 their_addr;
//      struct sockaddr_storage their_addr;

      struct sockaddr *addrptr= (struct sockaddr *)&their_addr;
      socklen_t sin_size = sizeof(their_addr) ;
      LOGGERWEB("accept(%d,%p,%d)\n",serversock,addrptr,sin_size);
      int new_fd = accept(serversock, addrptr, &sin_size);
      LOGGERWEB("na accept(serversock)=%d\n",new_fd);
      if (new_fd == -1) {
         int ern=errno;
         flerror("accept %d",ern);
         switch(ern) {
            case EFAULT: 
            case EPROTO:
            case EBADF:
            case EINVAL:
            case ENOTSOCK:
            case EOPNOTSUPP: 
            if(*sockptr==serversock)
               *sockptr=-1;
            close(serversock);
            //close_with_tag(serversock, reinterpret_cast<uint64_t>(sockptr));
            LOGARWEB("exit"); return;
            } 
         continue;
         }
      const namehost name(addrptr);
      const char * namestr=name;
const bool localhostonly=!settings->data()->remotelyxdripserver&&!secure;
      if(localhostonly&&strcmp(namestr,"::ffff:127.0.0.1")&&strcmp(namestr,"127.0.0.1") )  {
         struct sockaddr_in6 own_addr;
         bool sameaddress(const  struct sockaddr *addr, const struct sockaddr_in6  *known);
         bool getownip(struct sockaddr_in6 *outip);
         if(!getownip(&own_addr)) {
            LOGGERWEB("%swatchserver: reject connection from %s getownip failed\n",secure?"secure":"",namestr);
            close(new_fd);
            continue;
            }
         if(!sameaddress(addrptr, &own_addr) ) {
            const namehost myname(&own_addr);
            LOGGERWEB("%swatchserver: reject connection from %s same address %s failed",secure?"secure":"",namestr,(const char *)myname);
            close(new_fd);
            continue;
            }
        }

         LOGGERWEB("%swatchserver: got connection from %s sock=%d\n" ,secure?"secure":"",namestr ,new_fd);
        void wakesender();
         wakesender();
      void handlewatch(int sock) ;
      try {
#ifdef USE_SSL
      if(secure) {
void handlewatchsecure(int sock) ;
         sslstopconnection=false;
         std::thread  handlecon(handlewatchsecure,new_fd);
         handlecon.detach();
         }
      else 
#endif
      {
         stopconnection=false;
         std::thread  handlecon(handlewatch,new_fd);
         handlecon.detach();
         }
      }
      catch (const std::exception& e)     {
         LOGGERWEB("exception %s\n",e.what() );
      }
      catch (...)     {
         LOGARWEB("exception");
      }
      }
   }
static bool   plainwatchcommands(int sock);
extern void sendtimeout(int sock,int secs);
extern void receivetimeout(int sock,int secs) ;

void handlewatch(int sock) {
     const char threadname[]="watchconnect";
     LOGGERWEB("start handlewatch %d\n",sock);
#ifndef HAVE_NOPRCTL
     prctl(PR_SET_NAME, threadname, 0, 0, 0);
#endif
     receivetimeout(sock,60);
     sendtimeout(sock,5*60);
     plainwatchcommands(sock);
     LOGGERWEB("end handlewatch %d\n",sock);
     close(sock);
     }



#include "getitems.hpp"

std::string_view servererrorstr="HTTP/1.0 500 Internal Server Error\r\n\r\n";

void servererror(int sock) {
   send(sock,servererrorstr.data(),servererrorstr.size(),0);
   }



static bool    sgvinterpret(const char *start,int len,bool headonly, bool gmt,std::string_view origin,recdata *data,bool all=true) ;


static bool givetreatments(const char *args,int argslen, std::string_view origin,recdata *data) ;


static bool sendall(int sock ,const char *buf,int buflen) {
        int itlen,left=buflen;
        LOGGERWEB("sock=%d sendall len=%d\n",sock,buflen);
        for(const char *it=buf;(itlen=send(sock,it,left,0))<left;) {
          int waser=errno;
          LOGGERWEB("len=%d\n",itlen);
          if(itlen<0) {
               errno=waser;
               flerror("send(%d,%p,%d)",sock,it,left);
               if(waser==EINTR)
                  continue;
               return false;
               }
          it+=itlen;
          left-=itlen;
          }
        LOGARWEB("success sendall");
        return true;
        }
bool watchcommands(char *rbuf,int len,recdata *outdata,bool secure) ;
static bool plainwatchcommands(int sock) {
   constexpr const int RBUFSIZE=4096;
   char rbuf[RBUFSIZE];
   int len;
   if((len=recvni(sock,rbuf,RBUFSIZE))==-1) {
      LOGARWEB("recvni==-1");
      servererror(sock);
      return false;
      }
   if(len==0) {
      LOGARWEB("shutdown");
      return false;
      }
   struct recdata outdata;

   if(stopconnection) {
      LOGARWEB("stopconnection");
      return false;
      }
   bool res=watchcommands(rbuf, len,&outdata,false); 
   bool res2=sendall( sock ,outdata.data(),outdata.size()) ;
   LOGGERWEB("plainwatchcommands: delete outdata.allbuf=%p\n",outdata.allbuf);
   delete[] outdata.allbuf;
   return res&&res2&&!stopconnection;
   }


static bool alloworigin(std::string_view origin) {
       return settings->data()->remotelyxdripserver||(origin.size()>0&&(origin[0]=='*'||settings->data()->apisecretlength>7));
   }

static bool mkhtml(recdata *outdata,std::string_view origin,std::string_view header,std::string_view bodyhtml,bool dark=false) {
    static constexpr const char startresponse[]="HTTP/1.1 200 OK";
    static constexpr const char allowheader[]="\r\nAccess-Control-Allow-Origin: ";
    static constexpr const char contentlength[]="\r\nContent-Type: text/html; charset=utf-8\r\nContent-Length: ";
    static   constexpr const char seperator[]="\r\n\r\n"; 

    static   constexpr const char prehead[]=R"(<!DOCTYPE html>
    <html>
    <head>
    )";

    static   constexpr const char prebody[]=R"(</head><body>)";
    static   constexpr const char predarkbody[]=R"(</head><body style="background-color:black;color:white">)";
    static   constexpr const char htmlend[]=R"(
    </body>
    </html>
    )";


    const bool allow=alloworigin(origin);
    int weblen=sizeof(prehead)+(dark?sizeof(predarkbody):sizeof(prebody))+sizeof(htmlend)-3+header.size()+bodyhtml.size();
    int totlen=weblen+sizeof(startresponse)+sizeof(seperator)+5+sizeof(contentlength)-1+(allow?(sizeof(allowheader)-1+origin.size()):0);
    char *start=outdata->allbuf=new(std::nothrow) char[totlen];
    if(!start) {
            LOGGER("mkhtml new[%d] failed\n",totlen);
            return false;
            }
    char *endptr=start;
    addar(endptr, startresponse);
    if(allow) {
        addar(endptr,allowheader);
        addstrview(endptr,origin);
        }
    addar(endptr,contentlength);
    endptr+=sprintf(endptr,"%d",weblen);
    addar(endptr,seperator);
    #ifndef NOLOG
    const char *startpage=endptr;
    #endif
    addar(endptr,prehead);
    addstrview(endptr,header);
    if(dark) {
       addar(endptr,predarkbody);
       }
    else {
        addar(endptr,prebody);
        }
    addstrview(endptr,bodyhtml);
    addar(endptr,htmlend);
    outdata->start=start;
    outdata->len=endptr-start;
    LOGGER("mkhtml predict=%d pagelen=%d totlen=%d reallen=%d\n",weblen,endptr-startpage,totlen,outdata->len);
    assert((endptr-startpage)==weblen);
    return true;
}
void mktypeheader(char *outstart,char *outiter,const bool headonly,recdata *outdata,std::string_view type,std::string_view origin) ;
 void mkjsonheader(char *outstart,char *outiter,const bool headonly,recdata *outdata,std::string_view origin) ;
static bool givestatushtml(recdata *outdata) {
static   constexpr const char statusstart[]="HTTP/1.1 200 OK\r\nX-Powered-By: Express\r\nAccess-Control-Allow-Origin: *\r\nAccess-Control-Allow-Methods: GET,PUT,POST,DELETE,OPTIONS\r\nAccess-Control-Allow-Headers: Content-Type, Authorization, Content-Length, X-Requested-With\r\nVary: Accept, Accept-Encoding\r\nContent-Type: text/html; charset=utf-8\r\nContent-Length: 18\r\nDate: ";

static   constexpr const char statusend[]=" GMT\r\nConnection: keep-alive\r\nKeep-Alive: timeout=5\r\n\r\n<h1>STATUS OK</h1>";

   constexpr const int totlen=sizeof(statusstart)+sizeof(statusend)+60;
   char *status=outdata->allbuf=new(std::nothrow) char[totlen];
   constexpr int startlen=sizeof(statusstart)-1;
   memcpy(status,statusstart,startlen);
   char *ptr=status+startlen;
   auto nu=time(nullptr);
   struct tm stmbuf;
   gmtime_r(&nu,&stmbuf);
   ptr+=sprintf(ptr,R"(%s, %02d %s %04d %02d:%02d:%02d)",
engtext.daylabel[stmbuf.tm_wday],stmbuf.tm_mday, engtext.monthlabel[stmbuf.tm_mon],stmbuf.tm_year+1900,
stmbuf.tm_hour,stmbuf.tm_mday,stmbuf.tm_sec);
   const int statusendlen=sizeof(statusend)-1;
   memcpy(ptr,statusend,statusendlen);
   
   outdata->start=status;
   outdata->len=ptr-status+statusendlen;
   return true;
}
static bool outofmemory(recdata *outdata) {

static   constexpr const char status[]="HTTP/1.1 413 Content Too Large\r\nAccess-Control-Allow-Origin: *\r\nContent-Type: text/html; charset=utf-8\r\nContent-Length: 30\r\n\r\n<h1>Server out of memory</h1>\n";
   const int statuslen=sizeof(status)-1;
   outdata->allbuf=nullptr;
   outdata->start=status;
   outdata->len=statuslen;
   return true;
}
static bool toolarge(recdata *outdata) {
static   constexpr const char status[]="HTTP/1.1 413 Content Too Large\r\nAccess-Control-Allow-Origin: *\r\nContent-Type: text/html; charset=utf-8\r\nContent-Length: 36\r\n\r\n<h1>Request will take too long</h1>\n";
   const int statuslen=sizeof(status)-1;
   outdata->allbuf=nullptr;
   outdata->start=status;
   outdata->len=statuslen;
   return true;
}


static bool giveservererror(recdata *outdata) {
   outdata->allbuf=nullptr;
   outdata->len=servererrorstr.size();
   outdata->start=servererrorstr.data();
   return true;
   }
/*
static bool givesite(recdata *outdata) {
static   constexpr const char webpage[]="HTTP/1.1 200 OK\r\nContent-Type: text/html; charset=utf-8\r\nContent-Length: 133\r\n\r\n" 
R"(<!DOCTYPE html>
<html>
<head>
   <meta http-equiv="refresh" content="0; url=https://www.juggluco.nl"/>
</head>
<body>
</body>
</html>
)"; */
/*
typedef std::array<chars,180> auth_t;
auth_t mkauth() {
   static constexpr const char chars[]={'0','1','2','3','4','5','6','7','8','9','A','B','C','D','E','F','G','H','I','J','K','L','M','N','O','P','Q','R','S','T','U','V','W','X','Y','Z','a','b','c','d','e','f','g','h','i','j','k','l','m','n','o','p','q','r','s','t','u','v','w','x','y','z','.','-'};
   constexpr const int maxchars=sizeof(chars);
   auth_t authbuf;
   authbuf.back()='\0';
   constexpr const int len=autbuf.size()-1
   for(int i=0;i<len;i++) {
      authbuf[i]=random()/maxchars;
      }
   return authbuf;
   }
"eyJhbGciOiJIUzI1NiIsInR5cCI6IkpXVCJ9.eyJhY2Nlc3NUb2tlbiI6ImFhcHMtOTQ0Y2YzZGVkYTMxMTkxNCIsImlhdCI6MTcwNTMyNDMzMSwiZXhwIjoxNzA1MzUzMTMxfQ.-Ct6FxKCsNmO-HNqNJO2JUtuO3PZCgIB-zEV2kYDCak"
{"token":"eyJhbGciOiJIUzI1NiIsInR5cCI6IkpXVCJ9.eyJhY2Nlc3NUb2tlbiI6ImFhcHMtOTQ0Y2YzZGVkYTMxMTkxNCIsImlhdCI6MTcwNTMyNDMzMSwiZXhwIjoxNzA1MzUzMTMxfQ.-Ct6FxKCsNmO-HNqNJO2JUtuO3PZCgIB-zEV2kYDCak","sub":"aaps","permissionGroups":[["*"],["*:*:read"]],"iat":1705324331,"exp":1705353131}

static std::unordered_map<auth_t,uint32_t> authority;
*/
#include "net/makerandom.hpp"
typedef std::array<char,179> auth_t;
static bool mkauth(auth_t &authbuf) {
   static constexpr const char chars[]={'0','1','2','3','4','5','6','7','8','9','A','B','C','D','E','F','G','H','I','J','K','L','M','N','O','P','Q','R','S','T','U','V','W','X','Y','Z','a','b','c','d','e','f','g','h','i','j','k','l','m','n','o','p','q','r','s','t','u','v','w','x','y','z','.','-'};
   constexpr const int authlen=tuple_size<auth_t>();
   unsigned char rbuf[(authlen*6+7)/8];
   if(!makerandom(rbuf, sizeof(rbuf))) {
      return false;
      }
   int i=0;
   for(i=0;i<size(rbuf);i++) {
      authbuf[i]=chars[rbuf[i]&0x3F];
      }
      
   for(int rit=0;i<authlen;++i,++rit) {
      authbuf[i]=chars[((rbuf[rit*3]>>2)&0x30)|((rbuf[rit*3+1]>>4)&0x0C)|((rbuf[rit*3+2]>>6)&0x03)];
      }
   return true;
   }
/*
struct Authority_type{
   int iter;
   auth_t auth[100];
   }; */
//Mmap<Authority_type>

constexpr const int expirelater=4*60*60; 
#define SAVEAUTH
#ifdef SAVEAUTH
class {

/*typedef std::array<char,179> auth_t;
struct authpair {
   auth_t auth;
   uint32_t expires;
   }; */

auto &end() {
   return settings->data()->authend;
   }
auto &start() {
   return settings->data()->authstart;
   }
auto end() const {
   return settings->data()->authend;
   }
auto start() const {
   return settings->data()->authstart;
   }
authpair *data() {
   return settings->data()->authdata;
   }

public:
void insert(const auth_t &au,uint32_t expire) {
   data()[end()++%AUTHMAX]={au,expire};
   LOGGER("insert(%.*s) at %d\n",(int)au.size(),au.data(),end()-1);
   };
void   erase_expired(uint32_t expiredtime) {
   const authpair *dat=data();   
   int en=end();
   for(int it=start();it<en;++it) {
      if(dat[it%AUTHMAX].expires>expiredtime) {
         LOGGER("erase_expired oldstart=%d newstart=%d end=%d\n",start(),it,en);
         start()=it;
         return;
         }
      }   
   end()=start()=0;
   LOGGER("erase_expired nothing left  end=%d\n",en);
   };
size_t size() const {
   return end()-start();
   };
bool find(const auth_t *authori)  {
   LOGGER("Authority find: %.*s\n",(int)authori->size(), authori->data());
   authpair *dat=data();   
   int en=end();
   int st=start();
   for(int it=en-1;it>=st;--it) {
      const authpair &au=dat[it%AUTHMAX];
      if(!memcmp(au.auth.data(),authori->data(),authori->size())) {
         if((au.expires+expirelater)<time(nullptr)){
            LOGGER("%d Authority expired: %.*s\n",it, (int)au.auth.size(), au.auth.data());
            start()=it+1;
            return false;
            }
         LOGGER("%d Authority found: %.*s\n",it,(int)au.auth.size(), au.auth.data());
         return true;
         }   
      else {
         LOGGER("%d Authority not: %.*s\n",it,(int)au.auth.size(), au.auth.data());
         }
      }
   LOGAR("Autority no one");
   return false;
   };
   } authority;
#else
class {
   typedef std::map<auth_t,uint32_t>  authmap_t;
   authmap_t authmap;
public:
void insert(const auth_t &au,uint32_t expire) {
   authmap.insert({au,expire});
   };
void   erase_expired(uint32_t expiredtime) {
   std::erase_if(authmap, [expiredtime](const auto& auth){ return auth.second < expiredtime; });
   };
size_t size() const {
   return authmap.size();
   };
auto end() const {
   return authmap.end();
   }
bool find(const auth_t *authori) {
   if(const auto hit=authmap.find(*authori);hit!=authmap.end()) {
      if((hit->second+expirelater)>=time(nullptr)){
         return true;
         }
      LOGGER("expired %u\n",hit->second);
      authmap.erase(hit);
      }
   else {
   #ifndef NOLOG
      LOGGER("Authority not found: %.*s\n",(int)authori->size(), authori->data());
      for(auto [el,_ex]:authmap) {
         LOGGER("not: %.*s\n",(int)el.size(), el.data());
         }
   #endif
      }
   return false;
   };
   } authority;
#endif
static std::mutex authmutex;
/*Disadvantage: more tokens
Advantage: gets new token earlier in case Juggluco restarted. Juggluco doesn't save tokens
*/

static bool authorization(bool hassecret,std::string_view origin,recdata *outdata) {
      outdata->allbuf=new(std::nothrow) char[512+400];
   if(!outdata->allbuf) {
      return outofmemory(outdata);
      }
       char *start=outdata->allbuf+150;
   char *outiter=start;

   uint32_t now=time(nullptr);
   uint32_t expire=now+60*60*4;
   addar(outiter,R"({"token":")");
   auth_t au;
   if(!mkauth(au)) {
         delete[] outdata->allbuf;
         outdata->allbuf=nullptr;
      return giveservererror(outdata);
      }
   if(hassecret) {
      std::lock_guard<std::mutex> lck(authmutex);
      authority.erase_expired(now-expirelater);
      authority.insert(au,expire);
      };
   addstrview(outiter,au);
   addar(outiter,R"(","sub":"Juggluco","permissionGroups":[["*:*:read"],["*:*:read"]],"iat":)");
   outiter+=sprintf(outiter,R"(%u,"exp":%u})",now,expire);
   mkjsonheader(start,outiter,false,outdata,origin); 
   return true;
   }

static bool isauthorized(const auth_t *authori) {
   if(!authori)
      return false;
   std::lock_guard<std::mutex> lck(authmutex);
   if(!authority.size()) {
      LOGAR("Authority empty");
      return false;
      }
   return authority.find(authori);
   }
/*static bool givesite(recdata *outdata,std::string_view hostname,bool secure) {
    if(hostname.data()==nullptr) {
        hostname="localhost";
        }
    static   constexpr const char webpage1[]="HTTP/1.1 200 OK\r\nAccess-Control-Allow-Origin: *\r\nContent-Type: text/html; charset=utf-8\r\nContent-Length: ";
    static   constexpr const char webpage2[]="\r\n\r\n"; 
    static   constexpr const char webpage3[]=R"(<!DOCTYPE html>
    <html>
    <head>
       <meta http-equiv="refresh" content="0; url=https://www.juggluco.nl/Juggluco/webserver.html?urlstart=http)";
    static   constexpr const char webpageend[]=R"("/>
    </head>
    <body>
    </body>
    </html>
    )";
    static   constexpr const char slashes[]=R"(://)";
    int weblen=sizeof(webpage3)+sizeof(webpageend)-3+hostname.size()+sizeof(slashes)+secure;
    int totlen=weblen+sizeof(webpage1)+sizeof(webpage2)+5;

   char *start=outdata->allbuf=new(std::nothrow) char[totlen];
   if(!start)
      return false;
   char *endptr=start;
   memcpy(endptr,webpage1,sizeof(webpage1)-1); endptr+=sizeof(webpage1)-1;
   endptr+=sprintf(endptr,"%d",weblen);
   memcpy(endptr,webpage2,sizeof(webpage2)-1); endptr+=sizeof(webpage2)-1;
   #ifndef NOLOG
   const char *startpage=endptr;
   #endif
   memcpy(endptr,webpage3,sizeof(webpage3)-1); endptr+=sizeof(webpage3)-1;
   if(secure)
      *endptr++='s';
   memcpy(endptr,slashes,sizeof(slashes)-1); endptr+=sizeof(slashes)-1;
   memcpy(endptr,hostname.data(),hostname.size());
   endptr+=hostname.size();
   memcpy(endptr,webpageend,sizeof(webpageend)); endptr+=sizeof(webpageend)-1;
   outdata->start=start;
   outdata->len=endptr-start;
   LOGGER("givesite predict=%d pagelen=%d totlen=%d reallen=%d\n",weblen,endptr-startpage,totlen,outdata->len);
   return true;
} */

//static bool mkhtml(recdata *outdata,std::string_view header,std::string_view bodyhtml) ;
class AddHost {
    static   constexpr const char slashes[]=R"(://)";
    const std::string_view hostname;
    const bool secure;
    public:
    AddHost(std::string_view hostname,bool secure): hostname(hostname),secure(secure) {
        }
    size_t size() const {
        return hostname.size()+secure+sizeof(slashes)-1;
        }
    char *add(char *bufptr) const {
        if(secure)
            *bufptr++='s';
         addar(bufptr,slashes);
         addstrview(bufptr,hostname) ;
        return bufptr; 
        }
    };
static bool givesite(recdata *outdata,std::string_view hostname,bool secure) {
    static constexpr const char refresh[]{ R"(<meta http-equiv="refresh" content="0; url=https://www.juggluco.nl/Juggluco/webserver.html?urlstart=http)"};
    static constexpr const char endrefresh[]{ R"(">)"};
    AddHost addhost(hostname,secure);
    const auto totlen=sizeof(refresh)-1+addhost.size()+sizear(endrefresh);
    char buf[totlen+1],*bufptr=buf;
    addar(bufptr,refresh);
    bufptr=addhost.add(bufptr);
    addar(bufptr,endrefresh);
    assert((bufptr-buf)==totlen);
    return mkhtml(outdata,"*"sv,{buf,totlen},""sv);
   }
//{"settings":{"units":"mmol","thresholds":{"bgHigh":169,"bgLow":70}}}


inline unsigned char viewerhtml[] = {
#embed "viewer.html" prefix('H','T','T','P','/','1','.','1',' ','2','0','0',' ','O','K','\r','\n', 'A','c','c','e','s','s','-','C','o','n','t','r','o','l','-','A','l','l','o','w','-','O','r','i','g','i','n',':',' ','*','\r','\n', 'C','o','n','t','e','n','t','-','T','y','p','e',':',' ','t','e','x','t','/','h','t','m','l',';',' ','c','h','a','r','s','e','t','=','u','t','f','-','8','\r','\n', 'C','o','n','t','e','n','t','-','L','e','n','g','t','h',':',' ', '1','7','4','0','2', '\r','\n', '\r','\n',) 
};
static bool giveviewer(recdata *outdata) {
  outdata->allbuf=nullptr;
  outdata->start=(char *)viewerhtml;
  outdata->len=sizeof(viewerhtml);
  return true;
  }


static bool givedripstatus(std::string_view origin,recdata *outdata) {
   constexpr const char format[]= R"({"settings":{"units":"%s","thresholds":{"bgHigh":%.0f,"bgLow":%.0f}}})";
   constexpr const int len=sizeof(format)+6+2*12;
   outdata->allbuf=new(std::nothrow) char[len+512];
   if(!outdata->allbuf) {
      return outofmemory(outdata);
      }
        char *start=outdata->allbuf+152;
   auto halarm=gconvert(settings->data()->ahighget(),2);
   auto lowalarm=gconvert(settings->data()->alowget(),2);
   int alllen=snprintf(start,len,format, settings->getunitlabel().data(),halarm,lowalarm);
   mkjsonheader(start,start+alllen,false,outdata,origin); 
   return true;
   }

static bool givestatusv3right(recdata *outdata) {
   #include "status3.h"
   constexpr const int len=sizeof(statusv3)+20;
   outdata->allbuf=new(std::nothrow) char[len+512];
   if(!outdata->allbuf) {
      return outofmemory(outdata);
      }
        char *start=outdata->allbuf+152;
   int alllen=snprintf(start,len,statusv3, time(nullptr));
   mkjsonheader(start,start+alllen,false,outdata,"*"); 
   return true;

   }
static bool givestatusv3(recdata *outdata) {
      return givestatusv3right(outdata);
      }
   /*
static bool givestatusv3wrong(recdata *outdata) {
static   constexpr const char status[]="HTTP/1.1 401 Unauthorized\r\nContent-Type: application/json; charset=utf-8\r\nContent-Length: 61\r\n\r\n" R"({"status":401,"message":"Missing or bad access token or JWT"})";
   const int statuslen=sizeof(status)-1;
   outdata->allbuf=nullptr;
   outdata->start=status;
   outdata->len=statuslen;
   return true;
}
static bool givestatusv3(recdata *outdata) {
   static bool given=false;
   if(given)
      return givestatusv3right(outdata);
   given=true;
   return givestatusv3wrong(outdata);
   }
   */
//api/v3/entries?sort%24desc=date&limit=6&fields=sgv%2Cdirection%2CsrvCreated&type%24eq=sgv
//api/v3/entries?sort%24desc=date&limit=1&fields=sgv%2Cdirection%2CsrvCreated&type%24eq=sgv
/*
{"status":200,"result":[{"sgv":123,"direction":"Flat","srvCreated":1701290313000},{"sgv":120,"direction":"Flat","srvCreated":1701290308000},{"sgv":125,"direction":"Flat","srvCreated":1701290253000},{"sgv":121,"direction":"Flat","srvCreated":1701290246000},{"sgv":127,"direction":"Flat","srvCreated":1701290193000},{"sgv":121,"direction":"Flat","srvCreated":1701290186000}]}
*/

static bool givenightstatus(std::string_view origin,recdata *outdata) {
   constexpr static
   #include "status.h"
   auto tim=time(nullptr);
        struct tm tmbuf;
        gmtime_r(&tim, &tmbuf);
   constexpr const int len=sizeof(statusformat)+50;
   outdata->allbuf=new(std::nothrow) char[len+512];
   if(!outdata->allbuf) {
      return outofmemory(outdata);
      }
        char *start=outdata->allbuf+152;
   auto thigh=gconvert(settings->targethigh(),2);
   auto tlow=gconvert(settings->targetlow(),2);
   auto halarm=gconvert(settings->data()->ahighget(),2);

   auto lowalarm=gconvert(settings->data()->alowget(),2);
   const char *unitlabel=settings->getunitlabel().data();
   int alllen=snprintf(start,len,statusformat,tmbuf.tm_year+1900,tmbuf.tm_mon+1,tmbuf.tm_mday, tmbuf.tm_hour, tmbuf.tm_min,tmbuf.tm_sec,0,tim*1000LL,unitlabel,halarm,thigh,tlow,lowalarm);
   mkjsonheader(start,start+alllen,false,outdata,origin); 
   return true;
   }
/*
static bool gzipnightstatus(recdata *outdata) {
   constexpr static
   #include "statusgz.h"
   outdata->allbuf=nullptr;
   outdata->len=sizeof(statusgz);
   outdata->start=(const char *)statusgz;
   return true;
   } */




extern std::string_view getdeltaname(float rate);
char * writebucket(char *outiter,const int index,const ScanData *val,const char *sensorname) {
   const char * changelabel=getdeltaname(val->ch).data();
   auto mgdl=val->getmgdL();
   longlongtype mmsec=val->gettime()*1000LL;
   longlongtype frommsec=mmsec-1000LL*30;
   longlongtype tomsec=mmsec+1000LL*30;
   return outiter+sprintf(outiter,R"({"mean":%d,"last":%d,"mills":%lld,"index":%d,"fromMills":%lld,"toMills":%lld,"sgvs":[{"_id":"%s#%d","mgdl":%d,"mills":%lld,"device":"Juggluco","direction":"%s","type":"sgv","scaled":%d}]},)",mgdl,mgdl,mmsec,index,frommsec,tomsec,sensorname,val->id,mgdl,mmsec,changelabel,mgdl);
}

//https://api/v1/entries/current

extern int Tdatestring(time_t tim,char *buf) ;
extern int TdatestringGMT(time_t tim,char *buf) ;

static int oneTdatestringGMT(time_t tim,char *buf) {
        struct tm tmbuf;
   gmtime_r(&tim, &tmbuf);
        return sprintf(buf,R"(%04d-%02d-%02dT%02d:%02d:%02d.000Z)",tmbuf.tm_year+1900,tmbuf.tm_mon+1,tmbuf.tm_mday, tmbuf.tm_hour, tmbuf.tm_min,tmbuf.tm_sec);
        }

//      return givetreatments(outdata);
bool givenolist(recdata *outdata) {
   LOGARWEB("givenothing");
   const std::string_view nothing="[]";
   outdata->allbuf=new(std::nothrow) char[nothing.size()+512];
   if(!outdata->allbuf) {
      return outofmemory(outdata);
      }
   char *start=outdata->allbuf+152;
   memcpy(start,nothing.data(),nothing.size());
   mkjsonheader(start,start+nothing.size(),false,outdata,"*");
   return true;
}
bool givenothing(recdata *outdata) {
   LOGARWEB("givenothing");
   const std::string_view nothing="{}\n";
   outdata->allbuf=new(std::nothrow) char[nothing.size()+512];
   if(!outdata->allbuf) {
      return outofmemory(outdata);
      }
   char *start=outdata->allbuf+152;
   memcpy(start,nothing.data(),nothing.size());
   mkjsonheader(start,start+nothing.size(),false,outdata,"*");
   return true;
}


char *textitem(char *outiter,const ScanData *value,const char sep=9) {
   auto mgdL=value->getmgdL();
   time_t tim=value->gettime();
   const char * changelabel=getdeltaname(value->ch).data();
//   *outiter++='"';
//   outiter+=Tdatestring(tim,outiter);
        struct tm tmbuf;
   gmtime_r(&tim, &tmbuf);
        outiter+=sprintf(outiter,R"("%d-%02d-%02dT%02d:%02d:%02d.000Z")",tmbuf.tm_year+1900,tmbuf.tm_mon+1,tmbuf.tm_mday, tmbuf.tm_hour, tmbuf.tm_min,tmbuf.tm_sec);
   outiter+=sprintf(outiter,R"(%c%lld%c%d%c"%s"%c"Juggluco")" "\r\n",sep,tim*1000LL,sep,mgdL,sep,changelabel,sep);
   return outiter;
   }

//[{"_id":"%s","device":"%s","uploader":{"battery":%d,"type":"PHONE"},"created_at":"2023-03-05T20:05:53.203Z"},
/*
static bool showdevicestatus(recdata *outdata) { //seems to be used for battery level. Unimportant.
   return givenothing(outdata);
   } */

static bool    currentjson(std::string_view orign,recdata *outdata);
static bool givecurrent(std::string_view origin,recdata *outdata) {
   int sensorid=sensors->last();
   const SensorGlucoseData *sens=getStreamSensor(sensorid);;
   const std::span<const ScanData> gdata=sens->getPolldata();
   const ScanData *first=&gdata.begin()[0];
   const ScanData *iter=&gdata.end()[-1];
   while(!iter->valid()) {
      if(--iter<=first)
         return givenothing(outdata);
      }
   const ScanData *value=iter;;
   outdata->allbuf=new(std::nothrow) char[300+1024];
   if(!outdata->allbuf)
      return outofmemory(outdata);
   auto cali=make_calibrator<ScanData>(sens); 
   if(double   calibrated=cali.calibrateNow(*value);!isnan(calibrated)) {
         ScanData *tmp= (ScanData*)alloca(sizeof(ScanData));
         *tmp=*value;
         tmp->g=(int32_t) round(calibrated);
         value=tmp;
         }
   char *start=outdata->allbuf+152,*outiter=start;
   outiter=textitem(outiter,value)-2;
/*
   long long len=outiter-start;
   char lenstr[20];
   int lenlen=snprintf(lenstr,20,"%lld\r\n\r\n",len);
   char *startheader=start-lenlen-headerlen;
   outdata->start=startheader;
   addar(startheader,header);
   memcpy(startheader,lenstr,lenlen);
   startheader+=lenlen;
   outdata->len=outiter-outdata->start;
   LOGGERN(outdata->start,outdata->len);
 */

   constexpr const std::string_view plain=R"(text/plain; charset=utf-8)";
   mktypeheader(start,outiter,false,outdata,plain,origin) ;
   return true;
   }
int formattime(char *buf, time_t tim) {
     struct tm tmbuf;
   gmtime_r(&tim, &tmbuf);
   auto daylabel=engtext.daylabel;
   auto monthlabel=engtext.monthlabel;
   return sprintf(buf,"%s, %02d %s %d %02d:%02d:%02d GMT", daylabel[tmbuf.tm_wday], tmbuf.tm_mday,monthlabel[tmbuf.tm_mon] ,tmbuf.tm_year+1900, tmbuf.tm_hour, tmbuf.tm_min,tmbuf.tm_sec);
   }
bool givesgvtxt(const char *input,int inlen,std::string_view origin,recdata *outdata,char sep=9);
bool givesgvtxt(int nr,int interval,uint32_t lowerend,uint32_t higherend,std::string_view origin,recdata *outdata,char sep=9) {

   constexpr const int headerlen=200;
    const int bufsize= headerlen+1+100*nr+100;
      outdata->allbuf=new(std::nothrow) char[bufsize];
   if(outdata->allbuf==nullptr) {
      LOGGERWEB("givesgvtxt new failed %d\n",bufsize);
      return outofmemory(outdata);
      }
    char *start=outdata->allbuf+250,*outiter=start;
   if(!getitems(outiter,nr,lowerend,higherend,true,interval,[sep](char *outiter,int datit, const ScanData *iter,const sensorname_t * sensorname ,const time_t starttime) {
      return textitem(outiter,iter,sep);
   })) {
      delete[] outdata->allbuf;
       outdata->allbuf=nullptr;
      return givenothing(outdata);
   };

   constexpr const std::string_view plain=R"(text/plain; charset=utf-8)";
   mktypeheader(start,outiter,false,outdata,plain,origin);
   return true;
}
extern int getdeltaindex(float rate);
extern std::string_view getdeltanamefromindex(int index) ;

//{"status":[{"now":1699975836641}],"bgs":[{"sgv":"107","trend":4,"direction":"Flat","datetime":1699975773940,"bgdelta":9,"battery":"80","iob":"0.06","bwp":"0.13","bwpo":102,"cob":0}],"cals":[]}
//{"sgv":"10.7","trend":4,"direction":"Flat","datetime":1676804318000}
//{"sgv":"6.9","trend":4,"direction":"Flat","datetime":1703072118000}
static char *pebbleitem(bool mmolL,char *outiter,const ScanData *item) {
   int trend=getdeltaindex(item->ch);
   const char start[]=R"({"sgv":")";
   addar(outiter,start);
   if(mmolL) 
      outiter+=sprintf(outiter,"%.1f", item->getmmolL());
   else
      outiter+=sprintf(outiter,"%d", item->getmgdL());
   return outiter+=sprintf(outiter,R"(","trend":%d,"direction":"%s","datetime":%lld},)",trend,getdeltanamefromindex(trend).data(),item->gettime()*1000LL);
   }

char * givebuckets(char *start) {
   char *outiter=start;
   const char startbuckets[]=R"("buckets":[)";
   addar(outiter,startbuckets);
   int interval=settings->data()->nightinterval;

   if(!getitems(outiter,4,0,UINT32_MAX,true,interval,[](char *outiter,int datit, const ScanData *iter,const sensorname_t *sensorname,const time_t starttime) {
      return writebucket(outiter,datit,iter,sensorname->data());
   })) {
      return start;
   };
   const char endbuckets[]=R"(],)";
   addar(--outiter,endbuckets);
   return outiter;
}
/*
char * givebuckets(char *start) {
   char *outiter=start;
   const char startbuckets[]=R"("buckets":[)";
   addar(outiter,startbuckets);
   int interval=4*61;
   if(!getitems(outiter,4,true,interval,[](char *outiter,int datit, const ScanData *iter,const char *sensorname,const time_t starttime) {
      return writebucket(outiter,datit,iter,sensorname);
   })) {
      return start;
   };
   const char endbuckets[]=R"(],)";
   addar(--outiter,endbuckets);
   return outiter;
}
*/

char * givecage(char *outiter) {
   const char cage[]= R"("cage":{"found":false,"age":0,"treatmentDate":null,"checkForAlert":false,"level":-3,"display":"n/a"},)";
   addar(outiter,cage);
    return outiter;
    }
    /*
"%s#%d",
*/
         //  {"delta":{"absolute":-2,"elapsedMins":5,"interpolated":false,"mean5MinsAgo":137,"times":{"recent":1676718516000,"previous":1676718216000},"mgdl":-2,"scaled":-2,"display":"-2","previous":{"mean":137,"last":137,"mills":1676718216000,"sgvs":[{"_id":"63f0b09d4d77ce842e333f3d","mgdl":137,"mills":1676718216000,"device":"loop://iPhone","direction":"Flat","type":"sgv","scaled":137}]}}}

extern uint32_t getnumlasttime() ;
/*
static bool getv2auth(recdata *outdata) {
   static constexpr const char auth[]=R"({"token":"eyJhbGciOiJIUzI1NiIsInR5cCI6IkpXVCJ9.eyJhY2Nlc3NUb2tlbiI6Im93bGV0LTIyYjliMjE3YTIwOGJhNzUiLCJpYXQiOjE3MDQ0NTMzOTUsImV4cCI6MTcwNDQ4MjE5NX0.HQzcZ8N_fFcXiGv7qRuiiUXkZFBsdGTvV1O1nvpRWpQ","sub":"owlet","permissionGroups":[["*:*:read"],["*:*:read"]],"iat":%u,"exp":%u})";
      outdata->allbuf=new(std::nothrow) char[512+sizeof(auth)+2*10];
   if(!outdata->allbuf) {
      return outofmemory(outdata);
      }
       char *start=outdata->allbuf+150;
   uint32_t now=time(nullptr);
   uint32_t expire=now+60*60*8;
   auto alllen=sprintf(start,auth,now,expire);
   mkjsonheader(start,start+alllen,false,outdata); 
   return true;
   } */
static bool getv3modified(std::string_view origin,recdata *outdata) {
   uint32_t now=time(nullptr);
   auto lastentries= sensors->timelastdata();
   auto lastnum=settings->data()->timenumchanged;
   if(!lastnum)
      lastnum=1546297200;

   #include "lastModified.h"
      outdata->allbuf=new(std::nothrow) char[512+sizeof(lastModified)+3*10+1];
   if(!outdata->allbuf) {
      return outofmemory(outdata);
      }
       char *start=outdata->allbuf+150;
//   uint32_t lastprofile=1546297200;
//   auto alllen=sprintf(start,lastModified,now,lastentries,lastprofile,lastnum);
   uint32_t lastdevicestatus=1546297200;
   auto alllen=sprintf(start,lastModified,now,lastdevicestatus,lastentries,lastnum);
   mkjsonheader(start,start+alllen,false,outdata,origin); 
   return true;
   }
static bool nothingV3(recdata *outdata) {
static   constexpr const char status[]="HTTP/1.1 200\r\nAccess-Control-Allow-Origin: *\r\nContent-Type: application/json; charset=utf-8\r\nContent-Length: 26\r\n\r\n" R"({"status":200,"result":[]})";

   const int statuslen=sizeof(status)-1;
   outdata->allbuf=nullptr;
   outdata->start=status;
   outdata->len=statuslen;
   return true;
   }
static bool getv3food(recdata *outdata) {
   return nothingV3(outdata);
   }

extern char *nightexport(char *buffer,uint32_t starttime,uint32_t endtime,int maxcount,uint32_t &last);

char * writev3entry(char *outin,const ScanData *val, const sensorname_t *sensorname,bool server=true);
static bool getv3entries(const char *cmdstart,const char *cmdend,std::string_view origin,recdata *outdata) ;

char *getdeltastr(char *start) {
   char *outiter=start;
   int sensorid=sensors->last();
   const SensorGlucoseData *sens=getStreamSensor(sensorid);;
   const std::span<const ScanData> gdata=sens->getPolldata();
   const ScanData *first=&gdata.begin()[0];
   const ScanData *iter=&gdata.end()[-1];
   while(!iter->valid()) {
      if(--iter<=first)
         return start;
      }
   const char *sensorname= sens->shortsensorname()->data();
   int timedif=4*62;
   auto nu=iter->gettime();

  int nuval;
  auto cali=make_calibrator<ScanData>(sens);
   if(double   calibrated=cali.calibrateNow(*iter);!isnan(calibrated)) {
         nuval=(int)round(calibrated);
            }
   else 
        nuval=iter->getmgdL();
    --iter;
//   auto nuval=(iter--)->getmgdL(); //CALIBRATE
   auto old=nu-timedif;
   while(iter>=first) {
      auto wastime=iter->gettime();
      if(wastime<old) {
         int prevmgdl;
         if(double   calibrated=cali.calibrateNow(*iter);!isnan(calibrated)) {
                prevmgdl=(int)round(calibrated);
               }
         else
             prevmgdl=iter->getmgdL();
         auto diff=nuval-prevmgdl;
         longlongtype nowmmsec=nu*1000LL;
         longlongtype prevmmsec=wastime*1000LL;
         int valueid=iter->getid();
         int elapsedMins=(nu-wastime)/60;
         const char * changelabel=getdeltaname(iter->ch).data();
         constexpr const char deltaformat[]=R"("delta":{"absolute":%d,"elapsedMins":%d,"interpolated":false,"mean5MinsAgo":%d,"times":{"recent":%lld,"previous":%lld},"mgdl":%d,"scaled":%d,"display":"%d","previous":{"mean":%d,"last":%d,"mills":%lld,"sgvs":[{"_id":"%s#%d","mgdl":%d,"mills":%lld,"device":"Juggluco","direction":"%s","type":"sgv","scaled":%d}]}},)";
         return outiter+sprintf(outiter,deltaformat,diff,elapsedMins,prevmgdl,nowmmsec,prevmmsec,diff,diff,diff,prevmgdl,prevmgdl,prevmmsec,sensorname,valueid,prevmgdl,prevmmsec,changelabel,prevmgdl);

         }
      --iter;
      }
   return start;
   }


   

//{"bgnow":{"mean":169,"last":169,"mills":1676751516000,"sgvs":[{"_id":"63f132b14d77ce842e5700eb","mgdl":169,"mills":1676751516000,"device":"share2","direction":"FortyFiveUp","type":"sgv","scaled":169}]}}
static char * givebgnow(char *start) {
   int sensorid=sensors->last();
   const SensorGlucoseData *sens=getStreamSensor(sensorid);;
   const std::span<const ScanData> gdata=sens->getPolldata();
   const ScanData *first=&gdata.begin()[0];
   const ScanData *iter=&gdata.end()[-1];
   while(!iter->valid()) {
      if(--iter<=first)
         return start;
      }
   longlongtype mmsectime=iter->gettime()*1000LL;
  int mgdl;
  auto cali=make_calibrator<ScanData>(sens);
   if(double   calibrated=cali.calibrateNow(*iter);!isnan(calibrated)) {
        mgdl=(int)round(calibrated); 
         }
     else
          mgdl=iter->getmgdL(); 
   int valueid=iter->getid();
   const char * changelabel=getdeltaname(iter->ch).data();
   const char *sensorname= sens->shortsensorname()->data();
   constexpr const char bgformat[]=R"("bgnow":{"mean":%d,"last":%d,"mills":%lld,"sgvs":[{"_id":"%s#%d","mgdl":%d,"mills":%lld,"device":"Juggluco","direction":"%s","type":"sgv","scaled":%d}]},)";
   return start+=sprintf(start,bgformat,mgdl,mgdl,mmsectime,sensorname,valueid,mgdl,mmsectime,changelabel,mgdl);
   }


bool giveproperties(const char *input,int inputlen,std::string_view origin,recdata *outdata) {
   LOGGERWEB("giveproperties(%s,%d,recdata *outdata) \n",input,inputlen);
//   const char *end=input+inputlen;
    if(*input++=='/') {
      outdata->allbuf=new(std::nothrow) char[512*inputlen];
      if(!outdata->allbuf)
         return outofmemory(outdata);


      char *start=outdata->allbuf+152,*outiter=start;
      const char *endinput=input+inputlen;
      *outiter++='{';
      while (true) {
         const std::string_view buckets = "buckets";
         if (!memcmp(input, buckets.data(), buckets.size())) {
            LOGARWEB("givebuckets");
            outiter = givebuckets(outiter);
            input += buckets.size();
         } else {
            const std::string_view cage = "cage";
            if (!memcmp(input, cage.data(), cage.size())) {
               outiter = givecage(outiter);
               input += cage.size();
               }
            else {
               const std::string_view delta = "delta";
               if (!memcmp(input, delta.data(), delta.size())) {
                  outiter = getdeltastr(outiter);
                  input += delta.size();
                  }
               else  {
                  const std::string_view bgnow = "bgnow";
                  if (!memcmp(input, bgnow.data(), bgnow.size())) {
                     outiter = givebgnow(outiter);
                     input += bgnow.size();
                     }
                  }
               }
            }
         if((input = std::find(input, endinput, ',')) == endinput) {
            if (outiter != (start + 1))
               --outiter;
            *outiter++ = '}';
            mkjsonheader(start, outiter, false, outdata,origin);
            return true;
         }
         ++input;
         }
      }
   else {
      outdata->allbuf=new(std::nothrow) char[512*6];
      if(!outdata->allbuf)
             return outofmemory(outdata);
      char *start=outdata->allbuf+152,*outiter=start;
      *outiter++='{';
      outiter = givebgnow(outiter);
      outiter = getdeltastr(outiter);
      outiter = givebuckets(outiter);
//      outiter = givecage(outiter);
      --outiter;
      *outiter++ = '}';
      mkjsonheader(start, outiter, false, outdata,origin);
      return true;
      }
    //return givenothing(outdata);
   }
/*
bool giveproperties(const char *input,int inputlen,recdata *outdata) {
//   constexpr const int len=sizeof(statusformat)+50;
  
   const std::string_view nothing="{}\n";

   outdata->allbuf=new(std::nothrow) char[nothing.size()+512];
    char *start=outdata->allbuf+152;
    memcpy(start,nothing.data(),nothing.size());
    mkjsonheader(start,start+nothing.size(),false,outdata);
    //       char *start=outdata->allbuf+152;

    return true;
   }
bool givestrange(const char *input,int inputlen,recdata *outdata) {
   const std::string_view strange="\n";
   outdata->allbuf=new(std::nothrow) char[strange.size()+512];
    char *start=outdata->allbuf+152;
    memcpy(start,strange.data(),strange.size());
    mkjsonheader(start,start+strange.size(),false,outdata);
    //       char *start=outdata->allbuf+152;
    return true;
    } 
bool givestrange(const char *input,int inputlen,recdata *outdata) {
   const std::string_view strange=R"(96:0{"sid":"mE7M1PSeHBvTxbRlAAAG","upgrades":["websocket"],"pingInterval":25000,"pingTimeout":5000}2:40)";
   outdata->allbuf=new(std::nothrow) char[strange.size()+512];
    char *start=outdata->allbuf+152;
    memcpy(start,strange.data(),strange.size());
    mkjsonheader(start,start+strange.size(),false,outdata);
    //       char *start=outdata->allbuf+152;
    return true;
    } */
 
static void nosecret(std::string_view secret, recdata *outdata) {
   constexpr const char nosecrettxt[]="HTTP/1.1 403 Forbidden\r\nAccess-Control-Allow-Origin: *\r\nContent-Type: text/plain\r\nContent-Length: %d\r\n\r\napi_secret wrong: %.*s\n";
   constexpr const int formatlen=sizeof(nosecrettxt)-1;
   const int buflen=formatlen+secret.size()+20;
   char *nosecret=outdata->allbuf=new char[buflen];
   int textlen=19+secret.size();
   outdata->len= snprintf(nosecret,buflen,nosecrettxt,textlen,(int)secret.size(),secret.data());
   outdata->start=nosecret;
   }

void wrongpath(std::string_view toget, recdata *outdata);
static bool apiv1(const char *input,int leftlen,bool behead,bool json,bool hassecret,std::string_view origin,recdata *outdata) {
      const char *posptr=input;
      std::string_view api="entries";
      if(!memcmp(api.data(),posptr,api.size())) {
         posptr+=api.size();
         leftlen-=api.size();
         std::string_view sgvjson="/sgv.json";
         if(!memcmp(sgvjson.data(),posptr,sgvjson.size())) {
            return sgvinterpret(posptr+sgvjson.size(),leftlen-sgvjson.size(),behead,true,origin,outdata);
            }
         else {
            std::string_view api2=".json";
            if(!memcmp(api2.data(),posptr,api2.size())) {
               return sgvinterpret(posptr+api2.size(),leftlen-api2.size(),behead,true,origin,outdata);
               }
            else {
               const constexpr std::string_view api2="/sgv";
               if(!memcmp(api2.data(),posptr,api2.size())) {
                  posptr+=api2.size();
                  leftlen-=api2.size();

                  {const constexpr std::string_view ext1=".txt";
                  const constexpr std::string_view ext2=".tsv";
                   if(!memcmp(ext1.data(),posptr,ext1.size())||!memcmp(ext2.data(),posptr,ext2.size())) 
                     return givesgvtxt(posptr+ext1.size(),leftlen-ext1.size(),origin,outdata,9);
                   }
                  const constexpr std::string_view ext1=".csv";
                   if(!memcmp(ext1.data(),posptr,ext1.size())) 
                     return givesgvtxt(posptr+ext1.size(),leftlen-ext1.size(),origin,outdata,',');

                  if(*posptr==' '||*posptr=='?') {
                     if(json)
                        return sgvinterpret(posptr,leftlen,false,true,origin,outdata);
                     else
                        return givesgvtxt(posptr,leftlen,origin,outdata,9);
                     }


                  }
               else  {
                 std::string_view current="/current";
                 const auto cursize= current.size();
                 if(!memcmp(current.data(),posptr,cursize)) {
                    posptr+=cursize;
                    std::string_view json2=".json";
                    if(!memcmp(json2.data(),posptr,json2.size())) 
                       return currentjson(origin,outdata);
                    else 
                       return givecurrent(origin,outdata);
                    }
                 else {
                    if(*posptr=='/')
                        ++posptr;
                      if(*posptr==' '||*posptr=='?') {
                         if(json)
                            return sgvinterpret(posptr,leftlen,false,true,origin,outdata);
                         else
                            return givesgvtxt(posptr,leftlen,origin,outdata,9);
                         }
                     else {
                             wrongpath({input-7,static_cast<size_t>(leftlen+7)}, outdata);
                            return true;
                            }
                     }
                  }
               }
            }
         }
   std::string_view status="status";
   if(!memcmp(status.data(),posptr,status.size())) {
      const char *end=posptr+status.size();
      if(!json&&(*end==' '||*end=='/'))
         return givestatushtml(outdata);
      else {
//         if(gzip) return gzipnightstatus(outdata);
         return givenightstatus(origin,outdata);
         }
      }
   std::string_view treatments="treatments";
   const auto treatsize= treatments.size();
      if(!memcmp(treatments.data(),posptr,treatsize)) {
         return givetreatments(posptr+treatsize,leftlen-treatsize,origin,outdata);
         }
/*
   constexpr const std::string_view devicestatus="devicestatus.json";
      if(!memcmp(devicestatus.data(),posptr,devicestatus.size())) {
         return showdevicestatus(outdata);
         }  */

std::string_view properties="properties";
const auto propsize= properties.size();
   if(!memcmp(properties.data(),input,propsize)) {
      return giveproperties(input+propsize,leftlen-propsize,origin,outdata);
      }

std::string_view authv2=R"(authorization/request/)";
const auto authv2size= authv2.size();
   if(!memcmp(authv2.data(),input,authv2size)) {
      return authorization(hassecret,origin,outdata);
      }



   wrongpath({input-7,static_cast<size_t>(leftlen+7)}, outdata);
   return true;
    }

static bool apiv3(const char *input,const char *inpend,std::string_view origin,recdata *outdata) ;

static bool       getv3treatments(const char *input,int inputlen,std::string_view origin,recdata *outdata,uint32_t modifiedafter=0);

static bool treatmenthistoryV3(const char *start,const char *ends,std::string_view origin,recdata *outdata) ;
static bool apiv3(const char *input,const char *inpend,std::string_view origin,recdata *outdata) {
std::string_view statusv3="status";
const auto stav3size= statusv3.size();
   if(!memcmp(statusv3.data(),input,stav3size)) {
      return givestatusv3(outdata);
      }
std::string_view entriesv3="entries";
const auto entries3size= entriesv3.size();
   if(!memcmp(entriesv3.data(),input,entries3size)) {
      const char *start=input+entries3size;
      return getv3entries(start,inpend,origin,outdata);
      }
std::string_view treatmentsv3="treatments";
const auto treatments3size= treatmentsv3.size();

   if(!memcmp(treatmentsv3.data(),input,treatments3size)) {
      const char *start=input+treatmentsv3.size();
      std::string_view history="/history/";
      if(!memcmp(start,history.data(),history.size()))  {
         start+=history.size();
         return treatmenthistoryV3(start,inpend,origin,outdata);
         }
      std::string_view jsonstr=".json";
      if(!memcmp(start,jsonstr.data(),jsonstr.size())) 
         start+=jsonstr.size();
      return getv3treatments( start,inpend-start, origin,outdata,0);
      }
std::string_view foodv3=R"(food)";
const auto food3size= foodv3.size();
   if(!memcmp(foodv3.data(),input,food3size)) {
      return getv3food(outdata);
      }
//https://a.juggluco.nl:3333/api/v3/treatments/history/1704969101?limit=100&fields=_all'

std::string_view devicestatusv3=R"(devicestatus/history)";
const auto devicestatus3size= devicestatusv3.size();
   if(!memcmp(devicestatusv3.data(),input,devicestatus3size)) {
      return nothingV3(outdata);
      }
std::string_view modifiedv3="lastModified";
const auto modified3size= modifiedv3.size();
   if(!memcmp(modifiedv3.data(),input,modified3size)) {
      return getv3modified(origin,outdata);
      }


   wrongpath({input,static_cast<size_t>(inpend-input)}, outdata);
   return false;
   }
static bool setitertrue(const char *&iter,std::string_view cond) {
   if(strncasecmp(iter,cond.data(),cond.size()))
      return false;
   iter+=cond.size();
   return true;
   }

static bool setitervar(const char *&iter,std::string_view cond,bool &var) {
   if(setitertrue(iter,cond)) {
      var=true;
      return true;
      }
   return false;
   }
extern   std::span<char> gethistory(int startpos, int len, uint32_t starttime, uint32_t endtime,bool,int,bool,int,bool);
extern   std::span<char> getstream(int startpos, int len, uint32_t starttime, uint32_t endtime,bool,int,bool,int,bool);
extern   std::span<char> getscans(int startpos, int len, uint32_t starttime, uint32_t endtime,bool,int,bool,int,bool);
extern   std::span<char> getamounts(int startpos, int len, uint32_t starttime, uint32_t endtime,bool,int,bool,int,bool);
extern std::span<char> getmeals(int startpos, int len, uint32_t starttime, uint32_t endtime,bool header,int,bool,int,bool);
extern std::span<char> libreviewweb(int startpos, int startlen, uint32_t starttime, uint32_t endtime,bool header,int unit,bool,int maxcount,bool) ;


static time_t readtime(const char *&input) {
   struct tm tmbuf {.tm_isdst=0,.tm_gmtoff=0};
   if(const char *ptr= (input[10]=='T')?strptime(input, "%Y-%m-%dT%H:%M:%S", &tmbuf):strptime(input, "%Y-%m-%d", &tmbuf))
      input=ptr;
   time_t    tim=timegm(&tmbuf);
   return tim;
   }
static time_t readlocaltime(const char *&input) {
   struct tm tmbuf {.tm_isdst=-1,.tm_gmtoff=0};
   if(const char *ptr= (input[10]=='T')?strptime(input, "%Y-%m-%dT%H:%M:%S", &tmbuf):strptime(input, "%Y-%m-%d", &tmbuf))
      input=ptr;
   time_t    tim=mktime(&tmbuf);
   return tim;
   }

template <typename Num> static const char *readnum(const char *start,const char *ends,Num &num) {
   auto [ptr, ec]=std::from_chars(start, ends, num);
   if(ec==std::errc())
      return ptr;
   switch(ec)  {
      case std::errc::invalid_argument:
         LOGARWEB("That isn't a number. ");
      case  std::errc::result_out_of_range:
         LOGARWEB("This number is larger than an int. ");
      default:
         LOGGERWEB("Error %d\n",std::to_underlying(ec));
         return nullptr;
      }
   }
#include "Getopts.hpp"
Getopts::Getopts(const char *posptr,int size,int defaultduration): unit(settings->data()->unit) {
    int duration=0;
   LOGGER("getopts(%s#%d)\n", posptr, size);
   if(*posptr=='/') {
        ++posptr;
        --size;
        }
   if(*posptr == '?') {
      const char *ends = posptr + size;
      for (const char *iter = posptr + 1; iter < ends; iter = std::find(iter, ends, '&') + 1) {
         std::string_view header = "header"sv;
         if (setitervar(iter, header, headermode))
            continue;
         std::string_view mmol = "mmol/L"sv;
         if (setitertrue(iter, mmol)) {
            unit=1;
            continue;
            }
         std::string_view mgdl = "mg/dL"sv;
         if(setitertrue(iter, mgdl))  {
            unit=2;
            continue;
            }
         std::string_view startsecstr = "starttime="sv;
         if (!memcmp(iter, startsecstr.data(), startsecstr.size())) {
            iter += startsecstr.length();
            int  rel;
            if(*iter=='-') {
                rel=-1;
                ++iter;
                }
            else {
              if(*iter=='+') {
                    rel=1;
                    ++iter;
                    }
              else {
                  rel=0;
                  }
              }

            uint32_t tmpstart;
            if(auto tmp=readnum<uint32_t>(iter, ends, tmpstart)) {
               iter = tmp;
               if(rel) {
                  start=time(nullptr)+rel*tmpstart;
                }
              else {
                   start=tmpstart;
                   }
               }
            continue;
             }
         std::string_view startsstr = "start="sv;
         if (!memcmp(iter, startsstr.data(), startsstr.size())) {
            iter += startsstr.length();
            if((iter+10)>ends)
               continue;
            start=readlocaltime(iter);
            if(!iter)
               break;
            continue;
         }
         std::string_view endsecstr = "endtime="sv;
         if (!memcmp(iter, endsecstr.data(), endsecstr.size())) {
            iter += endsecstr.length();
            int  rel;
            if(*iter=='-') {
                rel=-1;
                ++iter;
                }
            else {
              if(*iter=='+') {
                    rel=1;
                    ++iter;
                    }
              else {
                  rel=0;
                  }
              }


            uint32_t tmpend;
            if(auto tmp=readnum<uint32_t>(iter, ends, tmpend)) {
               iter = tmp;
               if(rel) {
                   end=time(nullptr)+rel*tmpend;
                }
              else {
                   end=tmpend;
                   }
               }
            continue;
            }


         std::string_view endsstr = "end="sv;
         if (!memcmp(iter, endsstr.data(), endsstr.size())) {
            iter += endsstr.length();
            if((iter+10)>ends)
               continue;
            end=readlocaltime(iter);
            if(!iter)
               break;
            continue;
            }
         std::string_view durationsecstr = "duration="sv;
         if (!memcmp(iter, durationsecstr.data(), durationsecstr.size())) {
            iter += durationsecstr.length();
            int secs;
            if(auto tmpiter = readnum<int>(iter, ends, secs)) {
               iter=tmpiter;
               duration+=secs;
               }
            
            continue;
            }
         std::string_view durationdaystr = "days="sv;
         if (!memcmp(iter, durationdaystr.data(), durationdaystr.size())) {
            iter += durationdaystr.length();
            double days;
            int res=sscanf(iter,"%lf",&days);
            if(res<=0) {
               flerror("sscan %s failed",iter);
               continue;
               }
            duration+=(int)round(days*60*60*24);
            iter+=res;
            continue;
            }
         std::string_view count="maxcount="sv;
         if(!memcmp(iter,count.data(),count.size())) {
            iter+=count.length();
            const char *ptr;
            if(!(ptr=readnum<int>(iter,ends,datnr))||datnr<0) {
               LOGGERWEB("wrong argument count=%s\n",iter);
               }
            else
               iter=ptr;
            continue;
            }
         if(setitervar(iter, "stream"sv, streammode))
            continue;
         if(setitervar(iter, "history"sv, historymode))
            continue;
         if(setitervar(iter, "scans"sv, scansmode))
            continue;
         if(setitervar(iter, "meals"sv, mealsmode))
            continue;
         if(setitervar(iter, "darkmode"sv, darkmode))
            continue;
         if(setitervar(iter, "amounts"sv, amountsmode))
            continue;
         if(setitervar(iter, "exclusive"sv, exclusivemode))
            continue;
         if(setitervar(iter, "calibratedstream"sv, calibratedmode))
            continue;
         if(setitervar(iter, "calibratedhistory"sv, calibratedhistorymode))
            continue;
         if(setitervar(iter, "calibratedscans"sv, calibratedscansmode))
            continue;
         if(setitervar(iter, "calibrated"sv, calibratedmode))
            continue;
         if(setitervar(iter, "allvalues"sv, allvaluesmode))
            continue;
         if(setitervar(iter, "pastvalues"sv, pastvaluesmode))
            continue;
                        {
         std::string_view langstr="hl="sv;
         if(!memcmp(iter,langstr.data(), langstr.size())) {
            iter+=langstr.length();
            lang=mklanguagenumlow(iter) ;
            iter+=2;
            continue;
            }
        else {
             std::string_view widthstr = "width="sv;
             if(!memcmp(iter, widthstr.data(), widthstr.size())) {
                iter += widthstr.length();
                int tmpwidth;
                if(auto tmpiter = readnum<int>(iter, ends, tmpwidth)) {
                   iter=tmpiter;
                   width=tmpwidth;
                   }
                continue;
                }
            else {
                 std::string_view heightstr = "height="sv;
                 if(!memcmp(iter, heightstr.data(), heightstr.size())) {
                    iter += heightstr.length();
                    int tmpheight;
                    if(auto tmpiter = readnum<int>(iter, ends, tmpheight)) {
                       iter=tmpiter;
                       height=tmpheight;
                       }
                    continue;
                    }
                 else {
                     std::string_view glowstr = "glow="sv;
                     if(!memcmp(iter, glowstr.data(), glowstr.size())) {
                        iter += glowstr.length();
                        float tmpglow;
                        int res=sscanf(iter,"%f",&tmpglow);
                        if(res<=0) {
                                flerror("sscan glow=%s failed",iter);
                                continue;
                               }
                       iter+=res;
                        glow=tmpglow;
                        continue;
                        }
                     else {
                         std::string_view ghighstr = "ghigh="sv;
                         if(!memcmp(iter, ghighstr.data(), ghighstr.size())) {
                            iter += ghighstr.length();
                            float tmpghigh;
                            int res=sscanf(iter,"%f",&tmpghigh);
                            if(res<=0) {
                                    flerror("sscan ghigh=%s failed",iter);
                                    continue;
                                   }
                            iter+=res;
                            ghigh=tmpghigh;
                            continue;
                            }
                         }
                    }
                }
            }
          }
         }
      }
   if(duration<=0)
      duration=defaultduration;
   if (!end) {
      if(start) {
         end=start+ duration;
         return;
         }
      else  {
            end= time(nullptr);
            }
      }

   if (!start)  {
      start = end -duration; 
      }
   };

typedef      std::span<char> (*getdata_t)(int startpos, int len, uint32_t starttime, uint32_t endtime,bool,int,bool,int,bool calibrated);


template <typename T,int N,typename T1> 
auto strarcmp(const T (&ar)[N],const T1 *ptr) {
    static_assert(sizeof(T)==sizeof(T1));
    return memcmp(ar,ptr,N-1)||isalnum(ptr[N-1]);
    }

extern std::span<char> getStatImageHistory(int startpos,Getopts &opts) ;
extern std::span<char> getStatImageStream(int startpos,Getopts &opts);
//extern std::span<char> getSummaryImage(int startpos,Getopts&opts) ;

extern std::span<char> getCurveImage(int startpos,Getopts&opts) ;

typedef std::span<char> (*MakeImageT)(int startpos,Getopts &opts);

static bool makeimage(Getopts &opts,std::string_view origin,recdata *outdata,MakeImageT func) {
    constexpr const std::string_view imagetype{"image/png"sv};
    constexpr const int startpos=152;
    std::span<char> res=func(startpos,opts);
    char *imagestart=res.data();
    if(!imagestart)
        return false;
    outdata->allbuf=imagestart-startpos;
    char *imageend=imagestart+res.size();
    mktypeheader(imagestart,imageend,false,outdata,imagetype,origin);
    return true;
    }

std::string_view jugglucocommand="x/";
/*
#include "reload.h"
static bool givereloadimage(recdata *outdata) {
    constexpr const std::string_view imagetype{"image/jpeg"sv};
    constexpr const int startpos=152;
    constexpr const int totlen=sizeof(reloadimage)+startpos;
    char *buf=new char[totlen];
    outdata->allbuf=buf;
    char *imagestart=buf+startpos;
    memcpy(imagestart,reloadimage,sizeof(reloadimage));
    char *imageend=buf+totlen;
    mktypeheader(imagestart,imageend,false,outdata,imagetype,"*");
    return true;
    }
    */
bool givestats(Getopts &opts,std::string_view origin,recdata *outdata) {
    const bool history=opts.historymode||opts.calibratedhistorymode;
    return makeimage(opts,origin,outdata,history?getStatImageHistory:getStatImageStream);
    }
extern bool givesummarygraph(Getopts &opts,std::string_view origin,recdata *outdata);

bool givecurve(Getopts &opts,std::string_view origin,recdata *outdata) {
     return makeimage(opts,origin,outdata,getCurveImage);
    }

/*
static int dayssize(int days) {
    return 
    days>=10000?(9+90*2+900*3+9000*4+(days-9999)*5):
    (days>=1000?(9+90*2+900*3+(days-999)*4):
    (days>=100?(9+90*2+(days-99)*3):
    (days>=10?(9+(days-9)*2):days)));
    } */
extern int getminutes(time_t tim);



static bool givereport(Getopts &opts,std::string_view hostname,uint16_t langin,bool secure,std::string_view origin,recdata *outdata) {
    bool hasmode=false;
    if(!opts.historymode){
        if(opts.calibratedhistorymode) {
                    opts.allvaluesmode=true;
                    }
        }
    else
          hasmode=true;

    if(!opts.streammode){
        if(opts.calibratedmode)
                    opts.allvaluesmode=true;
        }
    else
          hasmode=true;
    if(!opts.scansmode){
        if(opts.calibratedscansmode) {
                    opts.allvaluesmode=true;
                    }
        }
    else
          hasmode=true;
    if(!(hasmode|| opts.allvaluesmode)) {
          if(settings->data()->DoCalibrate) {
                    opts.allvaluesmode=true;
                    }
        }

    uint32_t endtime=opts.end-1; //otherwise the whole end day is shown when a startday is specified
    const bool darkmode=opts.darkmode;
    const int days=opts.days();
    if(endtime<1577829600u) {
        return false;
        }
    const bool history=opts.historymode||opts.calibratedhistorymode;
   const uint32_t firsttime=history?sensors->firsthistorytime():sensors->firstpolltime();
   if(endtime<firsttime)
           return false;
    if(opts.start<firsttime) { 
        endtime=firsttime+days*24*60*60;
        }
    LOGGER("mkreport(endtime=%u,days=%d,darkmode=%d,hostname=%s,secure=%d,origin=%d,..)\n",endtime,days,darkmode,hostname.data(),secure,origin.data());
    const AddHost addhost(hostname,secure);

#define mklanguagenum2(a,b) a|b<<8
#define mklanguagenum(lang) mklanguagenum2(lang[0],lang[1])
    decltype(auto) lang=opts.lang;
    if(!lang)
        lang=langin;
    char langstr[3];
    if(lang) {
        langstr[0]=lang&0xFF;
        langstr[1]=0xFF&(lang>>8);
        }
    else {
        extern char localestrbuf[10];
        memcpy(langstr,localestrbuf,2);
        }
    langstr[2]='\0';
    const int unit=opts.unit;
    std::string_view unitstr{unit==0?"":(unit==1?"&mmol/L":"&mg/dL")};

    auto *text=lang?language::gettext(lang):usedtext;
    std::string_view statisticsname=text->statisticsName();
    static constexpr const  char starttext[] {R"(<h2   style="margin-top: -2.5mm;margin-bottom: -1mm;margin-left: 4mm;">)"};
    static constexpr const  char  afterstatistics[] {R"(</h2><img style="vertical-align: text-top;margin-left: 5mm;margin-bottom:-5.5mm;object-fit:contain; width:200mm; height:auto;border:0 none;" id="stats" src="http)"};




    static constexpr const  char stats[] { R"(/x/stats?endtime=)"};
    static constexpr const  char daysstr[] { R"(&days=)"};
    static constexpr const  char darkstr[] { R"(&darkmode)"};
    static constexpr const  char scansstr[] { R"(&scans)"};
    static constexpr const  char amountsstr[] { R"(&amounts)"};
    static constexpr const  char streamstr[] { R"(&stream)"};
    static constexpr const  char calibratedstr[] { R"(&calibratedstream)"};
    static constexpr const  char calibratedhistorystr[] { R"(&calibratedhistory)"};
    static constexpr const  char calibratedscansstr[] { R"(&calibratedscans)"};
    static constexpr const  char allvaluesstr[] { R"(&allvalues)"};
    static constexpr const  char pastvaluesstr[] { R"(&pastvalues)"};
    static constexpr const  char historystr[] { R"(&history)"};
    static constexpr const  char mealsstr[] { R"(&meals)"};



    static constexpr const char startimage[]{R"("><button hidden id="print">PDF</button><h2 style="margin-top: 3mm;margin-bottom: -1.4mm;" id="sumhead" hidden>)"};
    static constexpr const char aftergraphname[]{R"(</h2><img style="border: 0 none; margin-top:2mm; margin-bottom:0mm;" id="summarygraph" src="http)"};
    static constexpr const  char summarygraph[] { R"(/x/summarygraph?endtime=)"};
    static constexpr const  char enddayhtml[] { R"("><br>
    )"};


    constexpr const int timesize=10;
    const uint32_t startday=endtime-getminutes(endtime)*60;
    const uint32_t now=time(nullptr);
    uint32_t endday=startday+daysecs-1;
    if(endday>now)
        endday=now;

    std::string_view logdays=text->logdays;
    constexpr const char afterdaystr[]{R"(</h2>)"};


    constexpr const  char startimg[]{R"(<img loading="lazy" src="http)"};
    constexpr const  char xcurve[]{R"(/x/curve?days=1&starttime=)"};
    constexpr const  char  endsummary[]{R"("><h2 style="margin-top: 0mm;margin-bottom: 0.1mm;">)"};
    constexpr const  char  endels[]{R"(<script>    
const loadImages = () => {
       let down=document.getElementById('print');
       down.addEventListener('click', () => {
            window.print();
            });
       onbeforeprint=function(){
            down.setAttribute("hidden", true);
            };
       onafterprint=function(){
           down.removeAttribute("hidden");
            };
        let sum=document.getElementById('sumhead');
        let img=document.getElementById('summarygraph');
         const summary =() => {
                sum.removeAttribute("hidden");
                down.removeAttribute("hidden");
                };
         if(img.complete)  {
            summary();
            }
         else {
             document.getElementById('stats').addEventListener('click', summary);
             img.addEventListener('load', summary);
             }
        };
loadImages();
</script>    
    )"};
    opts.end=endday;
    opts.start=endday-days*daysecs;
    const int maxcount=opts.datnr;
    LOGGER("givereport opts.start=%u opts.end=%u maxcount=%d\n",opts.start,opts.end,maxcount);
    const int elsize=sizeof(startimg)-1+sizeof(xcurve)-1+sizeof(enddayhtml)-1+addhost.size()+timesize
    +(opts.amountsmode?sizear(amountsstr):0)
    +(opts.scansmode?sizear(scansstr):0)
    +(opts.mealsmode?sizear(mealsstr):0)
    +(opts.historymode?sizear(historystr):0)
    +(opts.streammode?sizear(streamstr):0)+
    +(opts.calibratedmode?sizear(calibratedstr):0)+
    +(opts.calibratedhistorymode?sizear(calibratedhistorystr):0)+
    +(opts.calibratedscansmode?sizear(calibratedscansstr):0)+
    +(opts.allvaluesmode?sizear(allvaluesstr):0)+
    +(opts.pastvaluesmode?sizear(pastvaluesstr):0)+

    6+unitstr.size();
    constexpr const auto places=[](int get) {
            return get<10?1:(get<100?2:(get<1000?3:get<10000?4:5));
            };
    
    const int dayslen=places(days);
    const int showdays=(maxcount<days)?maxcount:(days>100?100:days);
    const int summarysize=6+sizear(startimage) +
sizear(aftergraphname)+text->summarygraph.size()+
    +addhost.size()+sizear(summarygraph)+timesize+sizear(daysstr)+dayslen+
  (darkmode?sizear(darkstr):0)+
  (opts.calibratedmode?sizear(calibratedstr):0)+
  (opts.calibratedhistorymode?sizear(calibratedhistorystr):0)+
  (opts.calibratedscansmode?sizear(calibratedscansstr):0)+
  (opts.historymode?sizear(historystr):0)+
  (opts.streammode?sizear(streamstr):0)+
  (opts.allvaluesmode?sizear(allvaluesstr):0) +
  (opts.pastvaluesmode?sizear(pastvaluesstr):0) +
  +sizear(endsummary)+ unitstr.size();
    const int totsize=
(opts.calibratedmode?sizear(calibratedstr):0)+
(opts.streammode?sizear(streamstr):0)+
(opts.historymode?sizear(historystr):0)+
(opts.calibratedhistorymode?sizear(calibratedhistorystr):0)+
(opts.calibratedscansmode?sizear(calibratedscansstr):0)+
  (opts.allvaluesmode?sizear(allvaluesstr):0)+
  (opts.pastvaluesmode?sizear(pastvaluesstr):0)+

    (darkmode?((showdays+1)*sizear(darkstr)):0)+elsize*showdays+/*dayssize(showdays)+*/(sizear(daysstr)+dayslen)+sizear(starttext)+
sizear(afterstatistics)+
    sizear(stats)+timesize+(addhost.size())+summarysize +sizear(endels)+ statisticsname.size()+6+unitstr.size() +
    sizear(afterdaystr)+logdays.size();

    LOGGER("totsize=%d\n",totsize);
    char buf[totsize+50],*bufptr=buf;
    addar(bufptr,starttext);
    addstrview(bufptr,statisticsname);
    addar(bufptr,afterstatistics);
    bufptr=addhost.add(bufptr);
    addar(bufptr,stats);
    bufptr+=sprintf(bufptr,"%u",endday);
    addar(bufptr,daysstr);
    bufptr+=sprintf(bufptr,"%d",days);
    if(darkmode)
        addar(bufptr,darkstr);
    if(opts.calibratedmode)
        addar(bufptr,calibratedstr);
    if(opts.calibratedhistorymode)
        addar(bufptr,calibratedhistorystr);
    if(opts.calibratedscansmode)
        addar(bufptr,calibratedscansstr);
    if(opts.historymode)
        addar(bufptr,historystr);
    if(opts.streammode)
        addar(bufptr,streamstr);
    if(opts.allvaluesmode)
        addar(bufptr,allvaluesstr);
    if(opts.pastvaluesmode)
        addar(bufptr,pastvaluesstr);
     bufptr+=sprintf(bufptr,"&hl=%.2s",langstr);
    addstrview(bufptr,unitstr);
    addar(bufptr,startimage);
    addstrview(bufptr,text->summarygraph);
    addar(bufptr,aftergraphname);
    bufptr=addhost.add(bufptr);
    addar(bufptr,summarygraph);
    bufptr+=sprintf(bufptr,"%u",endday);
    addar(bufptr,daysstr);
    bufptr+=sprintf(bufptr,"%d",days);
    if(darkmode)
        addar(bufptr,darkstr);
    if(opts.calibratedmode)
        addar(bufptr,calibratedstr);
    if(opts.calibratedhistorymode)
        addar(bufptr,calibratedhistorystr);
    if(opts.calibratedscansmode)
        addar(bufptr,calibratedscansstr);
    if(opts.historymode)
        addar(bufptr,historystr);
    if(opts.streammode)
        addar(bufptr,streamstr);
    if(opts.allvaluesmode)
        addar(bufptr,allvaluesstr);
    if(opts.pastvaluesmode)
        addar(bufptr,pastvaluesstr);
     bufptr+=sprintf(bufptr,"&hl=%.2s",langstr);
    addstrview(bufptr,unitstr);
    addar(bufptr,endsummary);
    addstrview(bufptr,logdays);
    addar(bufptr,afterdaystr);
    for(int day=1;day<=showdays;++day) {
            addar(bufptr,startimg);
            bufptr=addhost.add(bufptr);
            addar(bufptr,xcurve);
            uint32_t time=startday-(showdays-day)*60*60*24;
            bufptr+=sprintf(bufptr,"%u",time);
            if(opts.streammode) addar(bufptr,streamstr);
            if(opts.calibratedmode) addar(bufptr,calibratedstr);
            if(opts.calibratedhistorymode) addar(bufptr,calibratedhistorystr);
            if(opts.calibratedscansmode) addar(bufptr,calibratedscansstr);
            if(opts.allvaluesmode) addar(bufptr,allvaluesstr);
            if(opts.pastvaluesmode) addar(bufptr,pastvaluesstr);
            if(opts.scansmode) addar(bufptr,scansstr);
            if(opts.amountsmode) addar(bufptr,amountsstr);
            if(opts.mealsmode) addar(bufptr,mealsstr);
            if(opts.historymode) addar(bufptr,historystr);
            if(darkmode)
                addar(bufptr,darkstr);
            bufptr+=sprintf(bufptr,"&hl=%.2s",langstr);
           addstrview(bufptr,unitstr);
            addar(bufptr,enddayhtml);
        }
    addar(bufptr,endels);
    const size_t wrotelen=bufptr-buf;
    LOGGER("wrotelen=%d totsize=%d\n",wrotelen,totsize);
    LOGGERN(buf,wrotelen);
    assert(wrotelen==totsize);
    return  mkhtml(outdata, origin,R"(<style type="text/css">
    @media print {
        img {border: 1px dotted #555; object-fit:contain; width:210mm; height:auto; margin-top:0mm; margin-bottom:0.8mm;} 
        body {margin-left: 0.1mm; } 
        }
    img {border: 1px dotted #555; object-fit:contain; width:100%; height:auto; mmargin-top:0mm; margin-bottom:0.8mm;} 
    body { margin-left: 1mm; } 
    </style>
    <title>Juggluco Report</title>)"sv,{buf,wrotelen},darkmode);
    }

extern bool isLargeCurve(Getopts &opts);
static bool jugglucos(const char * const input,int size, std::string_view hostname,uint16_t lang, bool secure,std::string_view origin,recdata *outdata) {
   const char *posptr=input;
    {constexpr const char summary[]="summarygraph";
    if(!strarcmp(summary,input)) {
        constexpr const int sumsize=(sizeof(summary)-1);
        posptr+=sumsize;
        Getopts opts(posptr,size-sumsize,60*60*24*20);
        if(isLargeCurve(opts)) {
            return toolarge(outdata);
            }
        time_t now=time(nullptr);
        if(opts.end>now)
            opts.end=now;
        if(!opts.lang)
            opts.lang=lang;
        return  givesummarygraph(opts,origin,outdata);
//            return givereloadimage(outdata);
//        return true;
        }
      }
    {constexpr const char stats[]="stats";
    if(!strarcmp(stats,input)) {
        constexpr const int sumsize=(sizeof(stats)-1);
        posptr+=sumsize;
        Getopts opts(posptr,size-sumsize,60*60*24*20);
        if(isLargeCurve(opts)) {
            return toolarge(outdata);
            }
        if(!opts.lang)
            opts.lang=lang;
        return givestats(opts,origin,outdata);
        }
      }
    {constexpr const char curve[]="curve";
    if(!strarcmp(curve,input)) {
        constexpr const int sumsize=(sizeof(curve)-1);
        posptr+=sumsize;
        Getopts opts(posptr,size-sumsize);
        if(isLargeCurve(opts)) {
            return toolarge(outdata);
            }
        if(!opts.lang)
            opts.lang=lang;
        return givecurve(opts,origin,outdata);
        }
      }
    {
    constexpr const char report[]="report";
    if(!strarcmp(report,input)) {
        constexpr const int sumsize=(sizeof(report)-1);
        posptr+=sumsize;
        Getopts opts(posptr,size-sumsize,60*60*24*20);
        return givereport(opts,hostname,lang,secure,origin,outdata);
        }
    }

   constexpr const std::string_view types[]={"history"sv,"stream"sv,"scans"sv,"amounts"sv,"meals"sv,"libreview"sv};
    constexpr const getdata_t procs[]={gethistory,getstream,getscans,getamounts,getmeals,libreviewweb};
   constexpr const int perhour[]={12*62,60*81,2*81,5*85,200,700};
   for(int i=0;i<std::size(types);i++) {
      auto type=types[i];
      int typelen=type.size();
      const char *typedata=type.data();
      if(!memcmp(typedata,posptr,typelen)) {
         posptr+=typelen;
         if(isalnum(*posptr)) {
            continue;
            }
         if(*posptr=='/') {
            ++posptr;
            ++typelen;
            }
         Getopts opts(posptr,size-typelen);
         const int startlen=((opts.end-opts.start)/(60*60))*perhour[i];
         constexpr const int startpos=152;
         bool calibrated=opts.calibratedmode||opts.calibratedhistorymode||opts.calibratedscansmode;


         std::span<char> res=procs[i](startpos,startlen,opts.start,opts.end,opts.headermode,opts.unit,!opts.exclusivemode,opts.datnr,calibrated);
          if(!res.data()) {
                return outofmemory(outdata);
                }
          else {
                 if(res.size()==std::numeric_limits<size_t>::max()) {
                    delete[] res.data();
                    return giveservererror(outdata);
                    }
                else {
                    constexpr const std::string_view plain="text/plain; charset=utf-8"sv;
                    constexpr const std::string_view html="text/html; charset=utf-8"sv;
                    outdata->allbuf=res.data();
                    mktypeheader(res.data()+startpos,res.data()+res.size(),false,outdata,i==4?html:plain,origin);
                    return true;
                    }
                }
            break;
            }
       }
   wrongpath({input-jugglucocommand.size(),size+jugglucocommand.size()},outdata);
   return true;
   }


static bool       pebbleinterpret(const char *input,int inputlen,std::string_view origin,recdata *outdata);


static bool showviewer(std::string_view toget,recdata *outdata) {
    std::string_view viewer="viewer.html";
    const auto viewersize= viewer.size();
       if(toget.data()[0]==' '||!memcmp(viewer.data(),toget.data(),viewersize)) {
          giveviewer(outdata);
          return true;
          }
     return false;
     }
bool watchcommands(char *rbuf,int len,recdata *outdata,bool secure) {
   LOGGERWEB("watchcommands len=%d %.*s",len,len,rbuf);
   const char *start=rbuf;
   const char *ends=rbuf+len;
   const char *nl;
   std::string_view foundsecret={nullptr,0};
   bool issha1=false;
   std::string_view toget;
   bool behead=false;
   bool json=false;
//   bool gzip=false;
   const char reget[]= "GET /";
   const int regetlen=sizeof(reget)-1;
   const char rehead[]= "HEAD /";
   const int reheadlen=sizeof(rehead)-1;
   const char api_secret[]= "api_secret: ";
   const int   api_len=sizeof(api_secret)-1;
   std::string_view hostname,origin,referer;
   const auth_t *authori=nullptr;
   uint16_t lang=0;
   while((nl= std::find(start,ends,'\n'))!=ends) {
      if(!memcmp(start,reget,regetlen)) {
         const char *reststart=start+regetlen;
         toget={reststart,(std::string_view::size_type)(nl-reststart)};
         }
      else {
         if(!memcmp(start,rehead,reheadlen)) {
            const char *reststart=start+reheadlen;
            toget={reststart,(std::string_view::size_type)(nl-reststart)};
            behead=true;
            }
         else {
            if(!memcmp(start,api_secret,3)) {
               if(!memcmp(start+4,api_secret+4,api_len-4)) {
                  const char *keystart=start+api_len;
                  auto end=nl-1;
                  if(*end!='\r')
                     ++end;
                  foundsecret={keystart,(size_t )(end-keystart)};
                  if(start[3]=='-') {
                     issha1=true;
                     }
                  else  {
                     if(start[3]!='_') { 
                        foundsecret={nullptr,0};
                        }
                     }
                  }
               }
            else {
               constexpr const char jsonstr[]=R"(Accept: application/json)";
               if(!memcmp(start,jsonstr,sizeof(jsonstr)-1)) {
                  json=true;
                  LOGAR("Accepts json");
                  }
               else {
                   constexpr const char acceptLang[]=R"(Accept-Language: )";
                   constexpr const int acceptLanglen= sizeof(acceptLang)-1;
                  if(!memcmp(start,acceptLang,acceptLanglen)) {
                     const char *name=start+acceptLanglen;
extern std::unordered_map<uint16_t,const jugglucotext*> langmap;
extern uint16_t choose_language( std::string_view accept_language, const std::unordered_map<uint16_t, const jugglucotext*>& langmap);
                     lang=choose_language({name,static_cast<size_t>(nl-name-(nl[-1]==0x0D?1:0))},  langmap); 
                     }
                  else  {
                  constexpr const char originnamestr[]="Origin: ";
                  constexpr const int originnamelen= sizeof(originnamestr)-1;
                  if(!memcmp(start,originnamestr,originnamelen)) {
                     const char *name=start+originnamelen;
                     origin={name,static_cast<size_t>(nl-name-(nl[-1]==0x0D?1:0))};
                     LOGGER("Origin=%.*s\n",origin.size(),origin.data());
                     }
                  else
                      {
                     constexpr const char hostnamestr[]="Host: ";
                     constexpr const int hostnamelen= sizeof(hostnamestr)-1;
                     if(!memcmp(start,hostnamestr,hostnamelen)) {
                        const char *name=start+hostnamelen;
                           
                        hostname={name,static_cast<size_t>(nl-name-(nl[-1]==0x0D?1:0))};
                        }
                     else {
                        std::string_view autho="Authorization: "sv;
                        if(!memcmp(start,autho.data(),autho.size())) {
                           const char *authstart=nl-tuple_size<auth_t>()-(nl[-1]==0x0D?1:0);
                           if(authstart>(start+autho.size())) {
                              authori=reinterpret_cast<const auth_t *>(authstart);
                              LOGGER("authori=%s\n",authori->data());
                              }
                           }
                        else {
                            int seclen=settings->data()->apisecretlength;
                            if(seclen) {
                                std::string_view refererstr="Referer: "sv;
                                if(!memcmp(start,refererstr.data(),refererstr.size())) {
                                    const char *refers=start+refererstr.size();
                                    referer={refers,static_cast<size_t>(nl-refers-(nl[-1]==0x0D?1:0))};
                                    }
                                }
                            }
                         }
                       }
                       }
                  }
               }
            }
         }
      start=nl+1;
      if(*start==0xD||*start=='\n')
         break;
      }
   
   LOGAR("After while");
   if(!toget.data()) {
      givenothing(outdata);
      return false;
      }
   size_t seclen=settings->data()->apisecretlength;
   if(seclen) {

            static constexpr const char token[]="token=";
            static constexpr const int tokenlen=sizeof(token)-1;
      const char *starttoget=toget.data();
      if(memcmp(starttoget,settings->data()->apisecret,seclen)||(starttoget[seclen]!='/'&&starttoget[seclen]!=' ')) {
         if(foundsecret.size()==0) {
            const char *end=starttoget+toget.size();
            const char *hit=std::search(starttoget,end,token,token+tokenlen);
            if(hit!=end) {
               hit+=tokenlen;   
               const auto len=strcspn(hit," &");
               foundsecret={hit,len};
               LOGGERWEB("has token %.*s#%zd\n",(int)len,foundsecret.data(),foundsecret.size());
               }
            }
         const char *realsecret;
         if(issha1) {
            realsecret=sha1secret.data();
            seclen=sha1secret.size();
            }
         else {
            realsecret=settings->data()->apisecret;
            }
         if(seclen!=foundsecret.size()||memcmp(realsecret,foundsecret.data(),seclen)) {
            LOGGERWEB("%s#%d!=%.*s#%zd \n", realsecret,seclen,(int)foundsecret.size(), foundsecret.data(),foundsecret.size());
            std::string_view request="api/v2/authorization/request/"sv;
            if(!memcmp(request.data(),starttoget,request.size())) {
               starttoget+=request.size();
               if(!memcmp(starttoget,settings->data()->apisecret,seclen)) {
                  return authorization(true,origin,outdata);
                  }
               }
            if(!isauthorized(authori)) {
                        std::string_view zoek{settings->data()->apisecret,seclen};
                        auto hit=std::ranges::search(referer,zoek);
                        if(hit.begin()==referer.end()||(memcmp(hit.begin()-tokenlen,token,tokenlen)&&(hit.begin()[-1]!='/'||*hit.end()!='/')))  {
                            if(!foundsecret.size()&&(!toget.size()||*toget.data()==' '||*toget.data()=='?')) {
                                givesite(outdata,hostname,secure);
                                return true;
                                }
                            if(showviewer(toget,outdata))
                                return true;

                            time_t tim=time(nullptr);
                                struct tm stm;
                            localtime_r(&tim, &stm);

                            int it=snprintf( nighterrorbuf,maxnighterror,R"(%02d:%02d %02d:%02d: Wrong secret)",stm.tm_mday,stm.tm_mon+1,stm.tm_hour,stm.tm_min);
                            if(!issha1)
                                snprintf( nighterrorbuf+it,maxnighterror-it,R"( "%.*s")",(int)foundsecret.size(),foundsecret.data());

                            nosecret(foundsecret, outdata) ;

                            return false;
                            }
                    }
            }
         else {
            LOGARWEB("secret matched");
            }
         }
      else {
         int newstart=seclen+1;
         if(newstart>=toget.size()||toget.data()[seclen]==' '||((toget.data()[seclen+1]==' ')&&toget.data()[seclen]=='/')) {
            pathconcat  name(hostname,std::string_view(starttoget,seclen));
            givesite(outdata,name,secure);
            return true;
            }
         toget=toget.substr(newstart);
         }
      }
   if(!toget.size()||*toget.data()==' '||*toget.data()=='?') {
      givesite(outdata,hostname,secure);
      return true;
      }
   LOGGERWEB("toget=%.*s\n",(int)toget.size(),toget.data()); //to set getargs in the beginning and use everywhere
std::string_view sgv="sgv.json";
   if(!memcmp(sgv.data(),toget.data(),sgv.size())) {
      return sgvinterpret(toget.data()+sgv.size(),toget.size()-sgv.size(),behead,false,origin,outdata,false);
      }

   const char *posptr= toget.data();
   std::string_view api="api/v";
   if(!memcmp(api.data(),posptr,api.size())) {
      posptr+=api.size();
      if(posptr[1]=='/') {
         if((*posptr=='1'||*posptr=='2')) {
            posptr+=2;
            return apiv1(posptr,toget.end()-posptr,behead,json,seclen,origin,outdata);
            }
         if(*posptr=='3') {
            posptr+=2;
            return apiv3(posptr,toget.end(),origin,outdata);
            }
         }


      }
if(!memcmp(jugglucocommand.data(),posptr,jugglucocommand.size())) {
   return jugglucos(posptr+jugglucocommand.size(),toget.size()-jugglucocommand.size(),hostname,lang,secure,origin,outdata);
   }

constexpr const std::string_view pebble="pebble";
   if(!memcmp(pebble.data(),toget.data(),pebble.size())) {
      return pebbleinterpret(toget.data()+pebble.size(),toget.size()-pebble.size(),origin,outdata);
      } 
constexpr const std::string_view status="status.json";
   if(!memcmp(status.data(),toget.data(),status.size())) {
      return givedripstatus(origin,outdata);
      } 
std::string_view index="index.html";
const auto indexsize= index.size();
   if(toget.data()[0]==' '||!memcmp(index.data(),toget.data(),indexsize)) {
      return givesite(outdata,hostname,secure);
      }


if(showviewer(toget,outdata))
    return true;


   wrongpath(toget,outdata);
   return true;
   }


void wrongpath(std::string_view toget, recdata *outdata) {
   const char notfoundtxt[]="HTTP/1.1 400 Bad Request\r\nAccess-Control-Allow-Origin: *\r\nContent-Type: text/plain\r\nContent-Length: ";
   constexpr const int startlen=sizeof(notfoundtxt)-1;
   constexpr int maxant=4096;
   char *notfound=outdata->allbuf=new char[maxant];
   memcpy(notfound,notfoundtxt,startlen);
   const char notpath[]="Bad Request: ";
   constexpr const int notpathlen=sizeof(notpath)-1;
   int pathlen=std::find(toget.begin(),toget.end(),' ')-toget.begin();
   constexpr const int maxpath=(maxant-startlen-30);
   if(pathlen>maxpath)
      pathlen=maxpath;
   int reslen=notpathlen+pathlen;
   char *iter= notfound+startlen;
   iter+=sprintf(iter,"%dr\n\r\n",reslen);
   memcpy(iter,notpath,notpathlen);
   iter+=notpathlen;
   memcpy(iter,toget.data(),pathlen);
   iter[pathlen]='\0';
   outdata->len=iter+pathlen-notfound;
   outdata->start=notfound;
   }

//There is another option `all_data=Y` which you can use to get data additionally from the previous sensor session.




void mktypeheader(char *outstart,char *outiter,const bool headonly,recdata *outdata,std::string_view type,std::string_view origin)  {
   static constexpr const char httpok[]="HTTP/1.1 200 OK";
   static constexpr const char allowheader[]="\r\nAccess-Control-Allow-Origin: ";
   static constexpr const char contenttype[]="\r\nContent-Type: ";

   const bool allow=alloworigin(origin);
   const int header1len=allow
      ?  (sizeof(httpok)+sizeof(allowheader)+sizeof(contenttype)+origin.size()-3)
      :  (sizeof(httpok)+sizeof(contenttype)-2);
   constexpr const char content[]="\r\nContent-Length: " ;
   constexpr const int contentlen=sizeof(content)-1;
   const int headerstartlen=header1len+contentlen+type.size();
   int uitlen=outiter-outstart;
   constexpr const int maxlen=20;
   char lenstr[maxlen];
   const int getlen=snprintf(lenstr,maxlen,"%d\r\n\r\n",uitlen);
   const int headerlen=headerstartlen+getlen;
   char * const startheader=outstart-headerlen;
   char *ptr=startheader;
   addar(ptr,httpok);
   if(allow) {
      addar(ptr,allowheader);
      addstrview(ptr,origin) ;
      }
   addar(ptr,contenttype);
   addstrview(ptr,type) ;
   memcpy(ptr,content,contentlen);
   //logwriter(startheader,80);
   memcpy(startheader+headerstartlen,lenstr,getlen);
   int totlen;
   if(headonly) {
      totlen=headerlen;
      startheader[totlen]='\0';
      }
   else
       totlen=outiter-startheader;
   LOGARWEB("START:");
   logwriter(startheader,400);
   outdata->start=startheader;
   outdata->len=totlen;

   }

void mkjsonheader(char *outstart,char *outiter,const bool headonly,recdata *outdata,std::string_view origin)  {
   mktypeheader(outstart,outiter,headonly,outdata, "application/json; charset=utf-8",origin);
   }
class Sgvinterpret {
   bool briefmode=false,sensorinfo=false,alldata=false,noempty=false;
  public:
   Sgvinterpret(bool all=true,bool gmt=true,int datnr=24): alldata(all),gmt(gmt),datnr(datnr) {}

   int interval=settings->data()->nightinterval;
   bool gmt;
   int datnr;
   uint32_t lowerend=0,higherend=INT32_MAX;
   const char *event=nullptr;
   bool carb=false;
   bool insulin=false;
   bool mmol=settings->usemmolL();
   bool getargs(const char *start,int len) ;
   bool getdata(bool headonly,std::string_view origin,recdata *outdata) const;

   char *makedata(recdata *outdata ) const;
private:
   char *dontbrief(char *outiter,const char *name,const ScanData *iter) const ;
   char *firstdata(char *outiter,time_t starttime,uint32_t dattime) const ;
   char *writeitem(char *outiter,int datit, const ScanData *iter,const char *sensorname,const time_t starttime) const;
   //void mkjsonheader(char *outstart,char *outiter,const bool headonly,recdata *outdata) const;
   bool getv1entries(char *&outiter,const int  datnr) const;
}; 

static bool       pebbleinterpret(const char *input,int inputlen,std::string_view origin,recdata *outdata) {
   Sgvinterpret pret;
   pret.datnr=1;
   if(!pret.getargs(input,inputlen))  {
      wrongpath({input,(size_t)inputlen},outdata);
      return false;
      }
   int count=pret.datnr>0?pret.datnr:1;
   bool mmol=pret.mmol;
      outdata->allbuf=new(std::nothrow) char[512+80*+count+200];
   if(!outdata->allbuf) {
      return outofmemory(outdata);
      }
       char *start=outdata->allbuf+150,*outiter=start;
   auto nu=time(nullptr);
   constexpr const char startpebble[]=R"({"status":[{"now":%lld}],"bgs":[)";
   constexpr const char endpebble[]=R"(],"cals":[]})";
   outiter+=sprintf(outiter,startpebble,nu*1000LL);

   if(!getitems(outiter,count,pret.lowerend,pret.higherend,true,pret.interval,[mmol,nu](char *outiter,int datit, const ScanData *iter,const sensorname_t *sensorname,const time_t starttime) {
         
      char *ptr=pebbleitem(mmol,outiter,iter);
      if(!datit) {
          //double delta= isnan(iter->ch)?0:iter->ch*deltatimes;
          double delta= getdelta(iter->ch);

         extern double getiob(uint32_t now);
         double iob=getiob(nu);
         ptr-=2;
         ptr+=sprintf(ptr,R"(,"bgdelta":"%.2f","iob":"%.2f"},)",delta,iob); //TODO remove ""? xDrip has "", Nightscout hasn't, who is right?
         }
      return ptr;
      })) {
      delete[] outdata->allbuf;
      outdata->allbuf=nullptr;
      return givenothing(outdata);
   };
   addar(--outiter,endpebble);
   mkjsonheader(start, outiter, false, outdata,origin);
   return true;
   }
bool givesgvtxt(const char *input,int inlen,std::string_view origin,recdata *outdata,char sep) {
   Sgvinterpret pret;
   pret.datnr=10;
   if(!pret.getargs(input,inlen))  {
      wrongpath({input,(size_t)inlen},outdata);
      return false;
      }
   LOGGERWEB("givesgvtxt datnr=%d\n",pret.datnr);
   return givesgvtxt(pret.datnr,pret.interval,pret.lowerend,pret.higherend,origin,outdata,sep);
   }
char *Sgvinterpret::makedata(recdata *outdata ) const {
   char *output=outdata->allbuf= new(std::nothrow) char[512+datnr*360];
   if(output==nullptr)
      return nullptr;
   return output+152;
   }
char *Sgvinterpret::dontbrief(char *outiter,const char *name,const ScanData *iter) const {
   outiter+=sprintf(outiter,R"("_id":"%s#%d","device":"Juggluco","dateString":")", name,iter->id);
   const char *startdate=outiter;
   int len=(gmt?oneTdatestringGMT:Tdatestring)(iter->t,outiter);
   outiter+=len;
   std::string_view st= R"(","sysTime":")";
   memcpy(outiter,st.data(),st.size());
   outiter+=st.size();
   memcpy(outiter,startdate,len);
   outiter+=len;
   *outiter++='\"';
   *outiter++=',';
   return outiter;
   }

inline int mktmmin(const struct tm *tmptr) {
   return tmptr->tm_min;
   }
/*   
inline int mktmmin(const struct tm *tmptr) {
   if(tmptr-> tm_sec<30)
      return tmptr->tm_min;
   return tmptr->tm_min+1;
   } */
char *Sgvinterpret::firstdata(char *outiter,time_t starttime,uint32_t dattime) const {
   bool mmol=settings->usemmolL();
   string_view hint=mmol?(R"(,"units_hint":"mmol")"):(R"(,"units_hint":"mgdl")");
   LOGGERWEB("mmol=%d %s\n",mmol,hint.data());
   memcpy(outiter,hint.data(),hint.size());
   outiter+=hint.size();
   if(sensorinfo) {
      int backhour=(dattime-starttime)/(60*60);
      int days=backhour/24;
      int hourleft=backhour%24;
      struct tm tmtim;
       localtime_r(&starttime, &tmtim);
       outiter+=sprintf(outiter,R"PRE(,"sensor_status":"%02d-%02d-%02d %02d:%02d (%dd %dh)")PRE",tmtim.tm_mday,tmtim.tm_mon+1,tmtim.tm_year-100,tmtim.tm_hour,mktmmin(&tmtim),days,hourleft);
       }
   return outiter;
   }
char *Sgvinterpret::writeitem(char *outiter,int datit, const ScanData *iter,const char *sensorname,const time_t starttime) const {
   LOGGERWEB("writeitem %d\n",datit);
     if(datit>0) {
      *outiter++=',';
      *outiter++='\n';
      }
     *outiter++='{';
      if(!briefmode) {
      outiter=dontbrief(outiter,sensorname,iter);
      }
    double delta= getdelta(iter->ch);
    std::string_view name=getdeltaname(iter->ch);
    outiter+=sprintf(outiter,R"("date":%d000,"sgv":%d,"delta":%.3f,"direction":"%s","noise":1)",iter->t,iter->getmgdL(),delta,name.data());
       if (!briefmode) {
      longlongtype mgdL1000=iter->getmgdL()*1000;
      outiter+=sprintf(outiter,R"(,"filtered":%lld,"unfiltered":%lld,"rssi":100,"type":"sgv")",mgdL1000,mgdL1000);
      }
      if(datit==0) {
      outiter=firstdata(outiter,starttime,iter->t);
      }
     *outiter++='}';
   return outiter;
   }





bool Sgvinterpret::getv1entries(char *&outiter,const int  datnr) const {

   return  ::getitems(outiter,datnr, lowerend,higherend,alldata, interval,[this](char *outiter,int datit, const ScanData *iter,const sensorname_t *sensorname,const time_t starttime)
            {return writeitem(outiter, datit, iter,sensorname->data(), starttime);});

   }
//{"_id":"6401c40addf76d1473eb7d02","timestamp":1677837282000,"eventType":"<none>","enteredBy":"xdrip pos:6.52","notes":"Swim → Aaps → nog meer","uuid":"6401c40addf76d1473eb7d02","created_at":"2023-03-03T09:54:42.000Z","sysTime":"2023-03-03T10:54:42.000+0100","utcOffset":0,"carbs":null,"insulin":null},
//notes   "AndroidAPS started - realme RMX2202"
   /*
    "_id": "a486879b595f46f7bbc8e20b",
    "timestamp": 1677843182779,
    "eventType": "<none>",
    "enteredBy": "xdrip",
    "uuid": "a486879b-595f-46f7-bbc8-e20b11c1b9d3",
    "carbs": 50,
    "insulinInjections": "[]",
    "created_at": "2023-03-03T11:33:02.000Z",
    "sysTime": "2023-03-03T12:33:02.779+0100",
    "utcOffset": 0,
    "insulin": null*/
extern int mkid(char *outiter,int base,int pos) ;
/*
template <class T>
static void toend(NumIter<T> *numiters,int maxnum) {
   for(int i=0;i<maxnum;i++) {
      numiters[i].iter=numiters[i].end;
      }
   } */

extern char *writetreatment(char *outiter,const int numbase,const int pos,const Num*num,int border,int borderID);


static bool givetreatments(const char *args,int argslen, std::string_view origin,recdata *outdata)  {
   Sgvinterpret pret;
   pret.datnr=100;
   std::string_view json{".json"   };
   
   if(!memcmp(args,   json.data(),json.size())) {
      args+=json.size();
      argslen-=json.size();

      }
   else {
      if(args[0]=='/') {
         ++args;
         --argslen;
         }
      }
   
   if(!pret.getargs(args,argslen)) {

      wrongpath({args,(size_t)argslen},outdata);
      return false;
      }
   
   const int basecount=numdatas.size();
   NumIter<Num> numiters[basecount];
   for(int i=0;i<basecount;i++) {
      auto [low,high]= numdatas[i]->getInRange(pret.lowerend,pret.higherend); 
      numiters[i].begin=low;
      numiters[i].iter=numiters[i].end=high-1;
      numiters[i].bytes=sizeof(Num);
      }

   int count= pret.datnr;
   char *outstart=pret.makedata(outdata ); 
   if(!outstart) {
      LOGARWEB("givetreatments:");
      return outofmemory(outdata);
      }

   char *outiter=outstart;
   *outiter++='[';
   bool carb=pret.carb;
   bool insulin=pret.insulin;
   int i=0;
   if(settings->data()->saytreatments&&!pret.event) {
      for(;i<count;) {
         auto [ind,num]=findnewestwith(numiters,basecount);
         if(!num) {
            LOGGERWEB("no values %d %p\n",ind,num);
            break;
            }
         if(carb) {
            if(carboNightWeight(num->type) ==0.0f) 
               continue;
            }
         if(insulin) {
            const int type=num->type;
             if(longNightWeight(type)==0.0f&&rapidNightWeight(type)==0.0f) 
                continue;
            }
         const int pos=num-numdatas[ind]->begin();
         const int border=numdatas[ind]->getnightSwitch();
         const int borderID=numdatas[ind]->getnightIDstart();
         char *out=writetreatment(outiter,ind,pos,num,border,borderID);
         if(out!=outiter) {
            outiter=out;
            i++;
            }
         }
      if(outiter[-1]==',') --outiter;
      }
    *outiter++=']';
    *outiter++='\n';
       mkjsonheader(outstart,outiter, false,outdata,origin);
       LOGGER("givetreatments nr=%d len=%d %.50s\n",i,outiter-outstart,outstart);
       return true;
   }

bool Sgvinterpret::getdata(bool headonly,std::string_view origin,recdata *outdata) const {
   if(!sensors)   
      return false;
   LOGGERWEB("count=%d\n",datnr);

   char *outstart=makedata(outdata);
   if(!outstart) {
      return outofmemory(outdata);
      }
   char *outiter=outstart;
   *outiter++='[';
   if(!getv1entries(outiter,datnr) )  {
      delete[] outdata->allbuf;
      outdata->allbuf=nullptr;
      return givenothing(outdata);
      }
   if(outiter==(outstart+1)&&noempty) {
      *outstart='\0';
      outiter=outstart;
      }
   else  {
     *outiter++=']';
     *outiter++='\n';
     }
       mkjsonheader(outstart,outiter, headonly,outdata,origin);
   return true;
   }


  
/*[=%5B
]=%5D
$=%24
=%3D */
#define LOGID "watchserver "

#define toshort(str)  (str[0]|(str[1]<<8))
int rewriteperc(char *start,int len) {
   char *ends=start+len;
   char *iter=start;
   char *uititer=start,*next;
   while(true) {
      if((next=std::find(iter,ends,'%'))==ends) {
         if(iter!=uititer) {
            int left=(ends-iter);
            memmove(uititer,iter,left);
            return uititer+left-start;;
            }
         return len;
         }
      int bijlen=(next-iter);
      memmove(uititer,iter,bijlen);
      uititer+=bijlen;
      ++next;
      switch(toshort(next)) {
         case toshort("5B"): *uititer++='[';break;
         case toshort("5D"): *uititer++=']';break;
         case toshort("3D"): *uititer++='=';break;
         case toshort("20"): *uititer++=' ';break;
         case toshort("24"): *uititer++='$';break;
         case toshort("21"): *uititer++='!';break;
         /*
         case toshort("22"): *uititer++='"';break;
         case toshort("23"): *uititer++='#';break;
         case toshort("25"): *uititer++='%';break;
         case toshort("26"): *uititer++='&';break; */
         case toshort("2C"): *uititer++=',';break;
         default: LOGGERWEB(LOGID "strange char %.3s\n",next-1); memmove(uititer,next-1,3);uititer+=3;
         }
      iter=next+2;
      }
   }
  bool Sgvinterpret::getargs(const char *start,int lenin) {
    int    len=rewriteperc(const_cast<char *>(start),lenin);
   LOGGERWEB("after Sgvinterpret::getargs(%.*s#%d)\n",len,start,len);

   const char *ends=start+len;
   start++;
   for(const char *iter=start;iter<ends;iter=std::find(iter,ends,'&')+1) {
      std::string_view count="count=";
      if(!memcmp(iter,count.data(),count.size())) {
         iter+=count.length();
         if(!(iter=readnum<int>(iter,ends,datnr))||datnr<0) {

            return false;
            }
         }
      else {
         std::string_view brief="brief_mode=";
         if(setitervar(iter,brief,briefmode)) 
            continue;
         std::string_view sensor="sensor=";
         if(setitervar(iter,sensor,sensorinfo))    
            continue;
         std::string_view all_data="all_data=";
         if(setitervar(iter,all_data,alldata))
            continue;
         std::string_view no_empty="no_empty=";
         if(setitervar(iter,no_empty,noempty)) 
            continue;
         std::string_view intervalstr="interval=";
         if(!memcmp(iter,intervalstr.data(),intervalstr.size())) {
            iter+=intervalstr.length();
            if(!(iter=readnum<int>(iter,ends,interval))) {
               return false;
               }
            continue;
            }
       std::string_view findstr="find[";
       if(!memcmp(iter,findstr.data(),findstr.size())) {
         iter+=findstr.size();
         std::string_view datestr="date";
         if(!memcmp(iter,datestr.data(),datestr.size())) {
            iter+=datestr.size();
            if(!memcmp(iter,"][$",3)) {
               iter+=3;
               std::string_view greater="gte]=";
               std::string_view greater3="gt]=";
               if(!memcmp(iter,greater.data(),greater.size())||(greater=greater3, !memcmp(iter,greater.data(),greater.size()))) {
                  iter+=greater.length();
                  const char *ptr;
                  longlongtype tmp;
                  if(!(ptr=readnum<longlongtype>(iter,ends,tmp))) {
                     LOGGERWEB("%s readnum failed '%s'\n",greater.data(),iter);
                     return false;
                     }
                  lowerend=tmp/1000;
                  if(greater==greater3) {
                     ++lowerend;
                     }
                  iter=ptr;
                  LOGGERWEB("greater than %d\n",lowerend);
                  }
               else {
                  std::string_view smaller="lte]=";
                  std::string_view smaller2="lt]=";
                  if((!memcmp(iter,smaller.data(),smaller.size()))||(smaller=smaller2,!memcmp(iter,smaller.data(),smaller.size()))) {
                     iter+=smaller.length();
                     longlongtype tmp;   
                     if(!(iter=readnum<longlongtype>(iter,ends,tmp))) {
                        LOGGERWEB("%s= readnum failed\n",smaller.data());
                        return false;
                        }
                     higherend=tmp/1000LL;
                     if(smaller!=smaller2) {
                        ++higherend;
                        }
                     LOGGERWEB("smaller than %d\n",higherend);
                     }
                  }
               }
               else {
               std::string_view strdate="String][$";
               if(!memcmp(iter,strdate.data(),strdate.size())) {

               iter+=strdate.size();
               std::string_view greater="gte]="; //TODO greater or equal
               std::string_view greater2="gt]=";
               if(!memcmp(iter,greater.data(),greater.size())||(greater=greater2, !memcmp(iter,greater.data(),greater.size()))) {
                  iter+=greater.length();
                  lowerend=readtime(iter);
//                                 if(greater==greater2||greater==greater4)
                  if(greater==greater2)
                     lowerend++;
                  LOGGERWEB("greater than %d\n",lowerend);
                  }
               else {
                  std::string_view smaller="lte]="; //TODO smaller or equal
                  std::string_view smaller2="lt]=";
               if((!memcmp(iter,smaller.data(),smaller.size()))||(smaller=smaller2,!memcmp(iter,smaller.data(),smaller.size()))) {
                     iter+=smaller.length();
                     higherend=readtime(iter);
                     if(smaller!=smaller2)
                        higherend++;
                     LOGGERWEB("smaller than %d\n",higherend);
                     }
               }
               }
               }
            continue;
            }
         std::string eventtype="eventType]=";
         if(!memcmp(iter,eventtype.data(),eventtype.size())) {
            iter+=eventtype.size();
            event=iter;
            continue;
            }
         std::string_view created="created_at][$";
         if(!memcmp(iter,created.data(),created.size())) {
            iter+=created.size();
            std::string_view greater="gte]=";
            std::string_view greater2="gt]=";
            if(!memcmp(iter,greater.data(),greater.size())||(greater=greater2, !memcmp(iter,greater.data(),greater.size()))) {
                  iter+=greater.length();
                  lowerend=readtime(iter);
                  if(greater==greater2)
                     lowerend++;
                  LOGGERWEB("greater than %d\n",lowerend);
                  continue;
                  }
            std::string_view smaller="lte]=";
            std::string_view smaller2="lt]=";
            if((!memcmp(iter,smaller.data(),smaller.size()))||(smaller=smaller2,!memcmp(iter,smaller.data(),smaller.size()))) {
                  iter+=smaller.length();
                  higherend=readtime(iter);
                  if(smaller!=smaller2)
                     higherend++;
                  LOGGERWEB("smaller than %d\n",higherend);
                  continue;
                  }
            continue;
            }
         std::string_view carbstr=R"(carbs][$exists])";
         if(!memcmp(iter,carbstr.data(),carbstr.size())) {
            carb=true;
            continue;
            }
         std::string_view insulinstr=R"(insulin][$exists])";
         if(!memcmp(iter,insulinstr.data(),insulinstr.size())) {
            insulin=true;
            continue;
            }
         }
         else {
            std::string_view unitstr="units=";
            if(!memcmp(iter,unitstr.data(),unitstr.size())) {
               iter+=unitstr.length();
               std::string_view mmolstr="mmol";
               if(!memcmp(iter,mmolstr.data(),mmolstr.size())) {
                  mmol=true;
                  iter+=mmolstr.size();
                  }
               else {
                  mmol=false;
                  }
               continue;
               }
            }
         }
      
   }
   if(!datnr) {
      if(lowerend|| higherend!=INT32_MAX) //needed for Cockpit
         datnr=100000;

      }
   if(higherend<=lowerend)
      return false;
   return true;
   };

static bool    currentjson(std::string_view origin,recdata *outdata) {
   Sgvinterpret pret(true,true,1);
   return pret.getdata(false,origin,outdata);
   }
static bool    sgvinterpret(const char *start,int len,bool headonly,bool gmt,std::string_view origin,recdata *outdata,bool all) {
   Sgvinterpret pret(all,gmt);
   if(!pret.getargs(start,len)) {

      wrongpath({start,(size_t)len},outdata);

      return false;
      }
   LOGGERWEB("lowerend=%d higherend=%d\n",pret.lowerend,pret.higherend);
   return pret.getdata(headonly,origin,outdata);
   }



class V3Args {
public:
   int datnr=24;
   uint32_t lowerend=0,higherend=INT32_MAX;
   bool decrease=false;
   bool fields=false;
   bool getargs(const char *start,int len) ;
   char *        treatmentlist(char *outstart,uint32_t,uint32_t *) const;
   }; 
  bool V3Args::getargs(const char *start,int lenin) {
    int    len=rewriteperc(const_cast<char *>(start),lenin);
   LOGGERWEB("after V3Args::getargs(%.*s#%d)\n",len,start,len);

   const char *ends=start+len;
   start++;

   for(const char *iter=start;iter<ends;iter=std::find(iter,ends,'&')+1) {
      std::string_view count="limit=";
      if(!memcmp(iter,count.data(),count.size())) {
         iter+=count.length();
         if(!(iter=readnum<int>(iter,ends,datnr))||datnr<0) {

            return false;
            }
         continue;
         }
      else {
      std::string_view sort="sort";
      if(!memcmp(iter,sort.data(),sort.size())) {
         iter+=sort.length();
         std::string_view desc="$desc=";
         if(!memcmp(iter,desc.data(),desc.size())) {
            iter+=desc.length();
            std::string_view date="date";
            if(!memcmp(iter,date.data(),date.size())) {
               iter+=date.length();
               decrease=true;
               continue;
               }
            }
         std::string_view datestr="=date";
         if(!memcmp(iter,datestr.data(),datestr.size())) {
            iter+=datestr.length();
            continue;
            }
         LOGGERWEB("unknown option %.10s\n",iter);
         continue;
         }
      else {
//      created_at$gt=2023-10-02T13:45:26.653Z
       std::string_view findstr="created_at$";
       std::string_view datestr="date$";
       if((!memcmp(iter,findstr.data(),findstr.size())&&(iter+=findstr.size(),true))||
       (!memcmp(iter,datestr.data(),datestr.size())&&(iter+=datestr.size(),true))) {
         std::string_view gtstr="gt";
         if(!memcmp(iter,gtstr.data(),gtstr.size())) {
            iter+=gtstr.size();
            bool equal;
            if(*iter=='=') {
               equal=false;
               ++iter;   
               }
            else {
               std::string_view eisstr="e=";
               if(!memcmp(iter,eisstr.data(),eisstr.size())) {
                  equal=true;
                  iter+=eisstr.size();
                  }
               else {
                  continue;
                  }
               }
               if(iter[4]=='-') {
               lowerend=readtime(iter);
               }
            else  {
               const char *ptr;
               longlongtype tmp;
               if(!(ptr=readnum<longlongtype>(iter,ends,tmp))) {
                  LOGGERWEB("gt%s readnum failed '%s'\n",equal?"e":"",iter);
                  return false;
                  }
               if(tmp>1602042233000LL)
                  lowerend=tmp/1000LL;
               else
                  lowerend=tmp;
               iter=ptr;
               LOGGERWEB("greater than %d\n",lowerend);
               }
            if(!equal) {
               ++lowerend;
               }
            }
         else {
         std::string_view ltstr="lt";
         if(!memcmp(iter,ltstr.data(),ltstr.size())) {
            iter+=ltstr.size();
            bool equal;
            if(*iter=='=') {
               equal=false;
               ++iter;   
               }
            else {
               std::string_view eisstr="e=";
               if(!memcmp(iter,eisstr.data(),eisstr.size())) {
                  equal=true;
                  iter+=eisstr.size();
                  }
               else {
                  continue;
                  }
               }
              if(iter[4]=='-') {
               higherend=readtime(iter);
               }
            else  {
               const char *ptr;
               longlongtype tmp;
               if(!(ptr=readnum<longlongtype>(iter,ends,tmp))) {
                  LOGGERWEB("lt%s readnum failed '%s'\n",equal?"e":"",iter);
                  return false;
                  }
               if(tmp>1602042233000LL)
                  higherend=tmp/1000LL;
               else
                  higherend=tmp;
               iter=ptr;
               LOGGERWEB("smaller than %d\n",higherend);
               }
            if(equal) {
                  ++higherend;
                  }
              }
            }
         continue;
         }

          std::string_view fieldsstr="fields=sgv,direction,date";
          if(!memcmp(iter,fieldsstr.data(),fieldsstr.size())) {
             iter+=fieldsstr.size();
            fields=true;
            }   
         }
         }
      }
   if(!datnr) {
      return false;
      }
   if(higherend<=lowerend)
      return false;
   return true;
   };

extern int mkidV3(char *outiter,int base,int pos) ;
extern int mkididV3(char *outiter,int base,int pos) ;
char *writetreatmentv3(char *outiter,const int numbase,const int pos,const Num*num,uint32_t modified,bool invalid,int borderID) {
   const int typein=num->type;
   const int type=num->type&Numdata::otherbits;
   if(typein<0||typein>=settings->varcount()||!settings->data()->Nightnums[type].kind||!isnormal(num->value)) {
      if(!invalid||!(typein&Numdata::removedbit))
         return outiter;
      }
   const time_t tim=num->gettime();
        struct tm tmbuf;
        gmtime_r(&tim, &tmbuf);

   addar(outiter,R"({"app":"Juggluco","eventType":"<none>","created_at":")");
   outiter+=sprintf(outiter,R"(%04d-%02d-%02dT%02d:%02d:%02d.000Z","date":%lu000,)",tmbuf.tm_year+1900,tmbuf.tm_mon+1,tmbuf.tm_mday, tmbuf.tm_hour, tmbuf.tm_min,tmbuf.tm_sec,tim);
   LOGAR("before printvar");
   if(type>=0&&type<settings->varcount()&&settings->data()->Nightnums[type].kind) {
      float w=0.0f;
       if((w=longNightWeight(type))!=0.0f) {
         
         addar(outiter,R"("notes":"Long-Acting",)");
         }
      else { if((w=rapidNightWeight(type))!=0.0f) {
         addar(outiter,R"("notes":"Rapid-Acting",)");
         }
         }
      if(w!=0.0f) {
         const char * typestr=settings->getlabel(type).data();;
         auto units=w*num->value;
         outiter+=sprintf(outiter,R"("insulin":%g,"insulinType":"%s",)",units,typestr);

         }
      else {
         if((w=carboNightWeight(type) )!=0.0f) {
            outiter+=sprintf(outiter,R"("carbs":%g,)",w*num->value);
            }
         else {
            std::string_view typestr=settings->getlabel(type);
            if(typestr!=Settings::unknownlabel)
               outiter+=sprintf(outiter,R"("notes":"%s %g",)",typestr.data(),num->value);
            }
         }
      }
   LOGAR("before utcOffset");
   addar(outiter,R"("utcOffset":0,"identifier":")");
   outiter+=(pos>=borderID?mkididV3:mkidV3)(outiter,numbase,pos);
   LOGAR("before srvModified");
   outiter+=sprintf(outiter,R"(","srvModified":%u000,"srvCreated":%lu000)",modified,tim);
   if(invalid) {
      addar(outiter,R"(,"isValid":false},)");
      }
   else
      addar(outiter,R"(},)");
   return outiter;
   }

void wrongpath(std::string_view toget, recdata *outdata);

char *        V3Args::treatmentlist(char *outstart,uint32_t minmodified,uint32_t *lastmodifiedptr) const {
   char *outiter=outstart;
   *outiter++='[';
   const int basecount=numdatas.size();
   NumIter<Num> numiters[basecount];
   for(int i=0;i<basecount;i++) {
      auto [low,high]= numdatas[i]->getInRange(lowerend,higherend); 
      if(decrease) {
         numiters[i].begin=low;
         numiters[i].iter=numiters[i].end=high-1;
         }
      else {
         numiters[i].iter=numiters[i].begin=low;
         numiters[i].end=high-1;
         }
      numiters[i].bytes=sizeof(Num);
      }
   int i=0;
   uint32_t lastmodified=0;
   for(;i<datnr;) {
      auto [ind,num]=decrease?findnewestwith(numiters,basecount):findoldestwith(numiters,basecount);
         if(!num) {
            LOGGERWEB("no values %d %p\n",ind,num);
            break;
            }
         const int pos=num-numdatas[ind]->begin();
         uint32_t chtime=numdatas[ind]->changed(pos);   
         LOGGER("%d changetime(%d)==%u\n",ind,pos,chtime);
         if(chtime>minmodified||(!chtime&&(chtime=num->gettime())>minmodified)) {
            char *out=writetreatmentv3(outiter,ind,pos,num,chtime,(num->type&Numdata::removedbit)&&minmodified,numdatas[ind]->getnightIDstart());
            if(out!=outiter) {
               lastmodified=std::max(lastmodified,chtime);
               outiter=out;
               i++;
               }
            }
         }
   if(minmodified) {
      if(i<datnr) {
         for(int nd=0;nd<basecount;nd++) {
            auto *numdata=numdatas[nd];
            int lastpos=numdata->getlastpos();
            const Num*beg=numdata->begin();
            if(numiters[nd].end==(beg+lastpos-1)) {
               uint32_t chtime;
               for(int cha=lastpos;;cha++) {
                  chtime=numdata->changed(cha);
                  if(!chtime) {
                     LOGGER("%d: %d not changed\n",nd,cha);
                     break;
                     }
                  if(minmodified<chtime) {
                     LOGGER("%d: %d changed\n",nd,cha);
                     char *out=writetreatmentv3(outiter,nd,cha,beg+cha,chtime,true,numdata->getnightIDstart());
                     if(out!=outiter) {
                        lastmodified=std::max(lastmodified,chtime);
                        outiter=out;
                        ++i;
                        if(i>=datnr) {
                           goto OUTLOOP;
                           }
                        }
                     }
                  }
               }   
            else {
               LOGGER("%d not lastpos\n",nd);
               }
            }
         }
      }
   OUTLOOP:
   if(outiter[-1]==',') {
      --outiter;
      *lastmodifiedptr=lastmodified;
      }
    *outiter++=']';
   #ifndef NOLOG
   time_t lowt=lowerend;
   time_t hight=higherend;
   char lowbuf[26];
   char highbuf[26];
   int outlen=outiter-outstart;
       LOGGERWEB("treatmentlist %u %.24s to %u %.24s nr=%d len=%d\n",lowerend,ctime_r(&lowt,lowbuf),higherend,ctime_r(&hight,highbuf),i,outlen);
       logprint(outstart,outlen);
       #endif
       return outiter;
   }

 void mkjsonheader(char *outstart,char *outiter,const bool headonly,recdata *outdata) ;
bool       getv3treatments(const char *input,int inputlen,std::string_view origin,recdata *outdata,uint32_t modifiedafter) {
   V3Args args; 
   if(!args.getargs(input,inputlen)) {
      wrongpath({input,(size_t)inputlen},outdata);
      return false;
      }

   char *buffer=outdata->allbuf= new(std::nothrow) char[512+50+20+args.datnr*300];
   if(!buffer) {
      LOGARWEB("getv3treatments:");
      return outofmemory(outdata);
      }
    char *outiter=buffer+200;
    char *outstart=outiter;
   addar(outiter,R"({"status":200,"result":)");
   uint32_t lastmodified=0;
   outiter=args.treatmentlist(outiter,modifiedafter,&lastmodified);

    *outiter++='}';
    *outiter++='\n';
    constexpr const int buflen=120;
   char buf[buflen];
   char *ptr=buf+snprintf(buf,buflen,"application/json; charset=utf-8\r\netag: W/\"%u000\"\r\nlast-modified: " ,lastmodified);
   ptr+=formattime(ptr,lastmodified);
   mktypeheader(outstart,outiter,false,outdata, {buf,(size_t)(ptr-buf)},origin);
       return true;
   }

bool treatmenthistoryV3(const char *start,const char *ends,std::string_view origin,recdata *outdata) {
   longlongtype modifiedafter;
   if(const char *input=readnum(start,ends,modifiedafter)) {
      if(modifiedafter>10443596400LL)
         modifiedafter/=1000LL;
      LOGGER("history %ld %s\n",modifiedafter,ctime((time_t*)&modifiedafter));
      return     getv3treatments(input,ends-input,origin,outdata,(uint32_t)modifiedafter);
      }
   else  {
      wrongpath({start,(size_t)(ends-start)},outdata);
      return false;
      }
   }
static char * writev3entryfield(char *outin,const ScanData *val,const bool date,const bool sgv,const bool direction) {
   char *outptr=outin;
   *outptr++='{';
   bool wrote=false;
   if(date) {
      addar(outptr,R"("date":)");
      if(auto [ptr,ec]=std::to_chars(outptr,outptr+12,val->gettime());ec == std::errc()) {
         outptr=ptr;
         }
      else {
         LOGGER("tochar failed: %s\n",std::make_error_code(ec).message().c_str());
         }
      addar(outptr,R"(000)");
      wrote=true;
        }
      if(sgv) {
         if(wrote)
         *outptr++=',';
      else
         wrote=true;
      addar(outptr,R"("sgv":)");
      if(auto [ptr,ec]=std::to_chars(outptr,outptr+12,val->getmgdL());ec == std::errc()) {
         outptr=ptr;
         }
      else {
         LOGGER("tochar failed: %s\n",std::make_error_code(ec).message().c_str());
         }
      }
   if(direction) {
         if(wrote)
         *outptr++=',';
      addar(outptr,R"("direction":")");
       std::string_view name=getdeltaname(val->ch);
      addstrview(outptr,name);
      addar(outptr,R"("})");
      }
   else {
      *outptr='}';
      }
   return outptr;
   }
bool getv3entries(const char *cmdstart,const char *cmdend,std::string_view origin,recdata *outdata) {
   std::string_view history="/history/";
   longlongtype lowerend=0;
   if(!memcmp(cmdstart,history.data(),history.size()))  {
      cmdstart+=history.size();
      if(const char *input=readnum(cmdstart,cmdend,lowerend)) {
         if(lowerend>10443596400LL)
            lowerend/=1000LL;
         cmdstart=input;
         }
      }
   std::string_view json=".json";
   if(!memcmp(cmdstart,json.data(),json.size())) { 
      cmdstart+=json.size();
      }

   int inputlen=cmdend-cmdstart;
   V3Args args; 
   if(!args.getargs(cmdstart,inputlen)) {
      wrongpath({cmdstart,(size_t)inputlen},outdata);
      return false;
      }
   int count=args.datnr;
   if(lowerend) args.lowerend=lowerend;
   outdata->allbuf=new(std::nothrow) char[512+50+320*count+200];
   if(!outdata->allbuf) {
      return outofmemory(outdata);
      }
   char *start=outdata->allbuf+200,*outiter=start;
   constexpr const char begin[]=R"({"status":200,"result":[)";
   addar(outiter,begin);
   uint32_t lastmodified;
   if(args.decrease) {
       lastmodified=getitems(outiter,count, args.lowerend,args.higherend,false, 55,[fields=(bool)args.fields](char *outiter,int datit, const ScanData *iter,const sensorname_t *sensorname,const time_t starttime)

            {
            char *out=fields?writev3entryfield(outiter,iter,true,true,true):writev3entry(outiter,iter, sensorname,true);
            *out++=',';
            return out;
            }
            ); 
            /*
      if(!lastmodified) {
         delete[] outdata->allbuf;
         outdata->allbuf=nullptr;
         return givenothing(outdata);
         } */
   
         }
   else {
      outiter=nightexport(outiter,args.lowerend,args.higherend,count,lastmodified);
      }
   if(outiter[-1]==',')
      --outiter;
   *outiter++=']';
   *outiter++='}';   

//      mktypeheader(start,outiter,false,outdata, "application/json; charset=utf-8");

    constexpr const int buflen=120;
   char buf[buflen];
   char *ptr=buf+snprintf(buf,buflen,"application/json; charset=utf-8\r\netag: W/\"%u000\"\r\nlast-modified: " ,lastmodified);
   ptr+=formattime(ptr,lastmodified);
   mktypeheader(start,outiter,false,outdata, {buf,(size_t)(ptr-buf)},origin);
   return true;

   }


#endif

