#include <sys/time.h>
#include <unistd.h>
#include <iostream>

timeval *pTV = NULL;

extern "C" void StartMicro()
{
   if (pTV != NULL)
      delete pTV;

   pTV = new timeval();
   gettimeofday(pTV, NULL);
}

extern "C" unsigned long long EndMicro()
{
   if (pTV)
   {
      timeval TV2;
      gettimeofday(&TV2, NULL);

      unsigned long long retval = TV2.tv_usec - pTV->tv_usec;
      delete pTV;
      pTV = NULL;
      
      return retval;
   }
   else
      return 0ll;
}

Import "microsec.cpp"

Extern
	Function StartMicro()
	Function EndMicro()
End Extern

StartMicro()

Sleep(205)

Print("Elapsed: " + EndMicro() + " us")
End

;in  fs:si - ttimer
;    bx:di - proc
;    pushw - freq >=18
;out es    - destroyed
proc ttimer_init
   xor ax,ax
   mov es,ax
   mov eax,[es:timerirq1 shl 2]
   mov [fs:si+ttimer.oldint],eax

   mov [fs:si+ttimer.start],round
   fldcw [fs:si+ttimer.start]
    pushd tickspersec
   mov bp,sp
   fild [word ptr ss:bp+8]
   fdiv [dword ptr ss:bp]
    pop eax
   fistp [fs:si+ttimer.start]
   mov ax,[fs:si+ttimer.start]
   mov [fs:si+ttimer.count],ax

   mov ax,timerfreq and 0FFFFh
   mov dx,timerfreq shr 16
   div [word ptr ss:bp+8]

    cli
   mov [es:timerirq1 shl 2],di
   mov [es:timerirq1 shl 2+2],bx

   mov bl,al
   mov al,36h ;b67=counter0 b45=0-7,8-15 b123=square b0=binary
   out porttimer+03h,al
   mov al,bl
   out porttimer,al
   mov al,ah
   out porttimer,al
    sti
retcode 2
endp

addhook emiteventhook,hookemit
function hookemit:object(id%,data:object,context:object)
  if (tevent(data).id=event_timertick) then
    print "ok"
  endif
  return data
endfunction