void
SplashScreen (void (* DoProcessing)(DWORD TimeOut))
{
BYTE xform_buf[1];
STAMP s;
DWORD TimeOut;
BOOLEAN InputState;
xform_buf[0] = FadeAllToBlack;
SleepThreadUntil (XFormColorMap (
(COLORMAPPTR) xform_buf, ONE_SECOND / 120));
LockMutex (GraphicsLock);
SetContext (ScreenContext);
s.origin.x = s.origin.y = 0;
s.frame = CaptureDrawable (LoadGraphic (TITLE_ANIM));
DrawStamp (&s);
DestroyDrawable (ReleaseDrawable (s.frame));
UnlockMutex (GraphicsLock);
xform_buf[0] = FadeAllToColor;
TimeOut = XFormColorMap ((COLORMAPPTR)xform_buf, ONE_SECOND / 2);
if (DoProcessing)
DoProcessing (TimeOut);
if (GLOBAL (CurrentActivity) & CHECK_ABORT)
{
return;
}
/* There was a forcible setting of CHECK_ABORT here. I cannot
* find any purpose for this that DoRestart doesn't handle
* better (forcing all other threads but this one to quit out,
* I believe), and have thus removed it. It was interfering
* with the proper operation of the quit operation.
* --Michael */
TimeOut += ONE_SECOND * 3;
while (!(InputState = AnyButtonPress (FALSE)) &&
(GetTimeCounter () <= TimeOut) &&
!(GLOBAL (CurrentActivity) & CHECK_ABORT))
{
TaskSwitch ();
}
if (GLOBAL (CurrentActivity) & CHECK_ABORT)
{
return;
}
GLOBAL (CurrentActivity) &= ~CHECK_ABORT;
/* You can't try to quit during a fade to black, because if
* you try, the confirmation window will fade to black too.
* Fixing this will require a rewrite of our whole rendering
* engine. -- Michael */
xform_buf[0] = FadeAllToBlack;
SleepThreadUntil (XFormColorMap ((COLORMAPPTR)xform_buf, ONE_SECOND / 2));
}
int
tkNetMain(int pa_argn,char **in_args)
{
struct KeyInfoCache KeyInfoCache;
struct ProcessingList ProcList;
struct BackGroundArgs BkgdArgs;
struct PeerData PeerDataRoot;
struct Iterator ISeedPeer;
struct Sock MainSock;
struct BridgeProc BdgServerProc;
struct BridgeProc BdgClientProc;
char BdgPeerAddrStr[32];
char *pTargetName = NULL;
BOOL ifClientSkipRegister = 1;
int TestPurposeNatType;
struct BridgeClientProcPa *pBCPPa = NULL;
printf("tknet \n build: " TKNET_VER "\n");
tkNetInit();
MutexInit(&g_BkgdMutex);
ISeedPeer = GetIterator(NULL);
PeerDataCons(&PeerDataRoot);
PeerDataRoot.tpnd.RanPriority = 0;
PeerDataRoot.addr.port = 0;
PeerDataRoot.addr.IPv4 = 0;
ProcessingListCons( &ProcList );
RelayModuleInit();
KeyInfoCacheCons(&KeyInfoCache);
if(!KeyInfoReadFile(&KeyInfoCache,"tknet.info"))
{
printf("config file lost.\n");
goto exit;
}
if(!KeyInfoTry(&KeyInfoCache,KEY_INFO_TYPE_CONFIG,&MainSock))
{
printf("bad config format.\n");
goto exit;
}
if( g_TargetName[0] != '\0' )
{
printf("target name: %s \n", g_TargetName);
tkNetConnect(NULL);
}
else
{
printf("target name unset. \n");
}
if(g_ifConfigAsFullCone)
{
g_NATtype = NAT_T_FULL_CONE;
printf("config NAT type as fullcone.\n");
}
else
{
while(!KeyInfoTry(&KeyInfoCache,KEY_INFO_TYPE_STUNSERVER,&MainSock))
{
if(!KeyInfoTry(&KeyInfoCache,KEY_INFO_TYPE_MAILSERVER,&MainSock))
{
printf("No way to get NAT type.\n");
goto exit;
}
}
printf("NAT type got from STUN: %d\n",g_NATtype);
}
if(pa_argn == 2)
{
sscanf(in_args[1],"%d",&TestPurposeNatType);
g_NATtype = (uchar)TestPurposeNatType;
}
printf("final NAT type: %d\n",g_NATtype);
while(!KeyInfoTry(&KeyInfoCache,KEY_INFO_TYPE_BRIDGEPEER,&MainSock))
{
if(!KeyInfoTry(&KeyInfoCache,KEY_INFO_TYPE_MAILSERVER,&MainSock))
{
printf("no avalible Bridge peer.\n");
goto no_bdg_peer;
}
}
GetAddrText(&g_BdgPeerAddr,BdgPeerAddrStr);
printf("using Bridge peer: %s\n",BdgPeerAddrStr);
ifClientSkipRegister = 0;
no_bdg_peer:
pBCPPa = BridgeMakeClientProc(&BdgClientProc,&MainSock,&ProcList,&g_BdgPeerAddr,
g_MyName,g_NATtype,pTargetName,ifClientSkipRegister);
ProcessStart(&BdgClientProc.proc,&ProcList);
if(g_ifBkgdEnable)
printf("back ground enabled.\n");
else
printf("back ground disabled.\n");
BkgdArgs.pPeerDataRoot = &PeerDataRoot;
BkgdArgs.pInfoCache = &KeyInfoCache;
BkgdArgs.pProcList = &ProcList;
BkgdArgs.pBdgClientProc = &BdgClientProc;
BkgdArgs.pMainSock = &MainSock;
tkBeginThread( &BackGround , &BkgdArgs );
ConsAndStartBridgeServer(&BdgServerProc,&PeerDataRoot,&ProcList,&MainSock,&ISeedPeer);
while( g_MainLoopFlag )
{
MutexLock(&g_BkgdMutex);
if(!ifBkgdStunProc())
SockRead(&MainSock);
DoProcessing( &ProcList );
if(!ifBkgdStunProc())
MainSock.RecvLen = 0;
MutexUnlock(&g_BkgdMutex);
if(sta_ifBeginNewConnection && pBCPPa)
{
pBCPPa->pTargetNameID = g_TargetName;
sta_ifBeginNewConnection = 0;
}
tkMsSleep(100);
}
SockClose(&MainSock);
FreeBdgClientProc(&BdgClientProc);
FreeBridgeServer(&BdgServerProc);
exit:
PeerDataDestroy(&PeerDataRoot,&ISeedPeer);
KeyInfoUpdate( &KeyInfoCache );
KeyInfoWriteFile(&KeyInfoCache,"tknet.updateinfo");
KeyInfoFree(&KeyInfoCache);
RelayMuduleDestruction();
MutexDelete(&g_BkgdMutex);
tkNetUninit();
return 0;
}
