ultimatepp/uppsrc/CtrlCore/CtrlTimer.cpp
cxl 9850da3658 ODBC fixes
git-svn-id: svn://ultimatepp.org/upp/trunk@1065 f0d560ea-af0d-0410-9eb7-867de7ffcac7
2009-04-16 18:37:37 +00:00

147 lines
3.1 KiB
C++

#include "CtrlCore.h"
NAMESPACE_UPP
int MemoryProbeInt;
struct TimeEvent : public Link<TimeEvent> {
dword time;
int delay;
Callback cb;
void *id;
};
static dword sTClick;
static StaticCriticalSection sTimerLock;
struct CtrlTimerOwner__ : public LinkOwner<TimeEvent> {
CtrlTimerOwner__();
~CtrlTimerOwner__();
};
static TimeEvent *tevents() {
static LinkOwner<TimeEvent> t;
return t.GetPtr();
}
static void sTimeCallback(dword time, int delay, Callback cb, void *id) {
TimeEvent *list = tevents();
TimeEvent *e;
for(e = list->GetNext(); e != list && time >= e->time; e = e->GetNext());
TimeEvent *ne = e->InsertPrev();
ne->time = time;
ne->cb = cb;
ne->delay = delay;
ne->id = id;
}
void SetTimeCallback(int delay_ms, Callback cb, void *id) {
CriticalSection::Lock __(sTimerLock);
ASSERT(abs(delay_ms) < 0x40000000);
sTimeCallback(GetTickCount() + abs(delay_ms), delay_ms, cb, id);
}
void KillTimeCallbacks(void *id, void *idlim) {
CriticalSection::Lock __(sTimerLock);
TimeEvent *list = tevents();
for(TimeEvent *e = list->GetNext(); e != list;)
if(e->id >= id && e->id < idlim) {
e = e->GetNext();
delete e->GetPrev();
}
else
e = e->GetNext();
}
EXITBLOCK
{
CriticalSection::Lock __(sTimerLock);
while(tevents()->GetNext() != tevents())
delete tevents()->GetNext();
}
bool ExistsTimeCallback(void *id) {
CriticalSection::Lock __(sTimerLock);
TimeEvent *list = tevents();
for(TimeEvent *e = list->GetNext(); e != list; e = e->GetNext())
if(e->id == id)
return true;
return false;
}
void KillTimeCallback(void *id) {
KillTimeCallbacks(id, (byte *)id + 1);
}
void Ctrl::TimerProc(dword time)
{
if(IsPanicMode())
return;
sTimerLock.Enter();
TimeEvent *list = tevents();
if(sTClick > time)
for(TimeEvent *e = list->GetNext(); e != list; e = e->GetNext())
if(e->time > 0x80000000)
e->time = 0;
sTClick = time;
sTimerLock.Leave();
Ctrl::CheckMouseCtrl();
Ctrl::SyncCaret();
sTimerLock.Enter();
while(list->GetNext() != list && list->GetNext()->time < time) {
TimeEvent *e = list->GetNext();
e->Unlink();
if(e->delay < 0)
sTimeCallback(time - e->delay, e->delay, e->cb, e->id);
sTimerLock.Leave();
e->cb();
sTimerLock.Enter();
delete e;
}
sTimerLock.Leave();
}
void Ctrl::InitTimer()
{
CriticalSection::Lock __(sTimerLock);
tevents();
}
void Ctrl::SetTimeCallback(int delay_ms, Callback cb, int id) {
ASSERT(id >= 0 && (size_t)id < (int)sizeof(Ctrl));
UPP::SetTimeCallback(delay_ms, cb, (byte *)this + id);
}
void Ctrl::KillTimeCallback(int id) {
ASSERT(id >= 0 && (size_t)id < sizeof(Ctrl));
UPP::KillTimeCallback((byte *)this + id);
}
void Ctrl::KillSetTimeCallback(int delay_ms, Callback cb, int id)
{
KillTimeCallback(id);
SetTimeCallback(delay_ms, cb, id);
}
void Ctrl::PostCallback(Callback cb, int id)
{
SetTimeCallback(0, cb, id);
}
void Ctrl::KillPostCallback(Callback cb, int id)
{
KillSetTimeCallback(0, cb, id);
}
bool Ctrl::ExistsTimeCallback(int id) const {
ASSERT(id >= 0 && (size_t)id < sizeof(Ctrl));
return UPP::ExistsTimeCallback((byte *)this + id);
}
dword GetTimeClick()
{
return sTClick;
}
END_UPP_NAMESPACE