static LRESULT processMouseMove( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam )
{
RECT rect;
if( !haveCapture ) {
return( DefWindowProc( hwnd, msg, wparam, lparam ) );
}
// check we aren't on ourselves first
m_pt.x = (short)LOWORD( lparam );
m_pt.y = (short)HIWORD( lparam );
ClientToScreen( hwnd, &m_pt );
GetWindowRect( GetParent( hwnd ), &rect );
if( PtInRect( &rect, m_pt ) ) {
CursorOp( COP_DROPCLR );
mod_wid = NO_WINDOW;
return( 0 );
}
// otherwise, figure out what we're over & change element display
mod_wid = GetOwnedWindow( m_pt );
if( !BAD_ID( mod_wid ) ) {
CursorOp( COP_DROPCLR );
} else {
CursorOp( COP_NODROP );
}
return( 0 );
}
static long processMouseMove( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam )
{
RECT rect;
POINT m_pt;
msg = msg;
wparam = wparam;
if( !haveCapture ) {
return( 0L );
}
// check we aren't on ourselves first
MAKE_POINT( m_pt, lparam );
ClientToScreen( hwnd, &m_pt );
GetWindowRect( GetParent( hwnd ), &rect );
if( PtInRect( &rect, m_pt ) ) {
CursorOp( COP_DROPSS );
mod_hwnd = NO_WINDOW;
return( 0L );
}
// otherwise, figure out what we're over & set cursor based on that
mod_hwnd = GetOwnedWindow( m_pt );
if( mod_hwnd == status_window_id ) {
CursorOp( COP_DROPSS );
} else {
mod_hwnd = NO_WINDOW;
CursorOp( COP_NODROP );
}
return( 0L );
}
static LRESULT processMouseMove( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam )
{
RECT rect;
if( haveCapture == FALSE ) {
return( DefWindowProc( hwnd, msg, wparam, lparam ) );
}
// check we aren't on ourselves first
m_pt.x = (int)(short)LOWORD( lparam );
m_pt.y = (int)(short)HIWORD( lparam );
ClientToScreen( hwnd, &m_pt );
GetWindowRect( GetParent( hwnd ), &rect );
if( PtInRect( &rect, m_pt ) ) {
CursorOp( COP_DROPFT );
mod_hwnd = (HWND)NULLHANDLE;
return( 0 );
}
/* otherwise, figure out what we're over & change element display
*/
mod_hwnd = GetOwnedWindow( m_pt );
if( mod_hwnd != NULL && mod_hwnd != GetToolbarWindow() ) {
CursorOp( COP_DROPFT );
} else {
mod_hwnd = (HWND)NULLHANDLE;
CursorOp( COP_NODROP );
}
return( 0 );
}
static LRESULT gotoNewBlock( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam )
{
HDC hdc;
wparam = wparam;
msg = msg;
hdc = GetDC( hwnd );
drawUnselected( hdc, cursx, cursy );
cursx = (short)( LOWORD( lparam ) / Width );
if( cursx > NUM_ACROSS - 1 )
cursx = NUM_ACROSS - 1;
cursy = (short)( HIWORD( lparam ) / Height );
if( cursy > NUM_DOWN - 1 ) {
cursy = NUM_DOWN - 1;
}
drawSelected( hdc, cursx, cursy );
ReleaseDC( hwnd, hdc );
CursorOp( COP_DROPCLR );
SetCapture( hwnd );
haveCapture = true;
mod_wid = NO_WINDOW;
return( 0 );
}
static long processLButtonDown( HWND hwnd )
{
DrawRectangleUpDown( hwnd, DRAW_DOWN );
CursorOp( COP_DROPSS );
SetCapture( hwnd );
haveCapture = true;
curItemID = GetDlgCtrlID( hwnd );
mod_hwnd = NO_WINDOW;
return( 0L );
}
static LRESULT setupForDrop( HWND hwnd )
{
DrawRectangleUpDown( GetDlgItem( GetParent( hwnd ), FT_RECTANGLE ), DRAW_DOWN );
CursorOp( COP_DROPFT );
SetCapture( hwnd );
haveCapture = TRUE;
mod_hwnd = (HWND)NULLHANDLE;
return( 0 );
}
static LRESULT doDrop( HWND hwnd, WPARAM wparam )
{
DrawRectangleUpDown( GetDlgItem( GetParent( hwnd ), FT_RECTANGLE ), DRAW_UP );
CursorOp( COP_ARROW );
ReleaseCapture();
haveCapture = FALSE;
if( !(wparam & MK_RBUTTON) ) {
RECT r;
sendNewFont();
GetWindowRect( hwnd, &r );
InvalidateRect( hwnd, &r, 0 );
UpdateWindow( hwnd );
}
return( 0 );
}
static long processLButtonUp( HWND hwnd, LPARAM lparam )
{
POINT m_pt;
if( haveCapture ) {
MAKE_POINT( m_pt, lparam );
ClientToScreen( hwnd, &m_pt );
ScreenToClient( status_window_id, &m_pt );
sendNewItem( m_pt.x, curItemID );
CursorOp( COP_ARROW );
DrawRectangleUpDown( hwnd, DRAW_UP );
ReleaseCapture();
haveCapture = false;
curItemID = -1;
}
return( 0L );
}
static LRESULT selectedNewColour( HWND hwnd, NewColourOps op, WPARAM wparam )
{
HDC hdc;
hdc = GetDC( hwnd );
drawUnselected( hdc, cursx, cursy );
ReleaseDC( hwnd, hdc );
CursorOp( COP_ARROW );
ReleaseCapture();
haveCapture = false;
if( !eitherButtonDown( wparam ) ) {
sendNewColour( op );
}
return( 0 );
}
/*
* doInitializeEditor - do just that
*/
static void doInitializeEditor( int argc, char *argv[] )
{
int i, arg, cnt, ocnt, startcnt = 0;
srcline sline;
int k, j;
char tmp[FILENAME_MAX], c[1];
char buff[MAX_STR], file[MAX_STR], **list;
char cmd[MAX_STR * 2];
char *parm;
char *startup[MAX_STARTUP];
char *startup_parms[MAX_STARTUP];
vi_rc rc;
vi_rc rc1;
/*
* Make sure WATCOM is setup and if it is not, make a best guess.
*/
watcom_setup_env();
/*
* If EDPATH is not set, use system default %WATCOM%\EDDAT.
*/
if( getenv( "EDPATH" ) == NULL ) {
char *watcom;
watcom = getenv( "WATCOM" );
if( watcom != NULL ) {
char edpath[FILENAME_MAX];
sprintf( edpath, "%s%c%s", watcom, FILE_SEP, "eddat" );
if( setenv( "EDPATH", edpath, 0 ) != 0 ) {
/*
* Bail out silently on error, as we will get error message later on.
*/
}
}
}
/*
* misc. set up
*/
MaxMemFree = MemSize();
StaticStart();
FTSInit();
BoundDataInit();
EditFlags.Starting = true;
InitCommandLine();
ChkExtendedKbd();
SSInitBeforeConfig();
GetCWD1( &HomeDirectory );
GetCWD1( &CurrentDirectory );
SetCWD( HomeDirectory );
if( cfgFN == NULL ){
cfgFN = DupString( CFG_NAME );
}
checkFlags( &argc, argv, startup, startup_parms, &startcnt );
ScreenInit();
SetWindowSizes();
EditFlags.ClockActive = false;
SetInterrupts();
#ifdef __WIN__
InitClrPick();
InitFtPick();
SubclassGenericInit();
CursorOp( COP_INIT );
#else
InitColors();
#endif
InitSavebufs();
InitKeyMaps();
/*
* initial configuration
*/
EditVars.Majick = MemStrDup( "()~@" );
EditVars.FileEndString = MemStrDup( "[END_OF_FILE]" );
MatchInit();
SetGadgetString( NULL );
WorkLine = MemAlloc( sizeof( line ) + EditVars.MaxLine + 2 );
WorkLine->len = -1;
sline = 0;
if( cfgFN[0] != 0 ) {
c[0] = 0;
rc = Source( cfgFN, c, &sline );
if( rc == ERR_FILE_NOT_FOUND ) {
#ifdef __WIN__
CloseStartupDialog();
MessageBox( (HWND)NULLHANDLE, "Could not locate configuration information; please make sure your EDPATH environment variable is set correctly",
EditorName, MB_OK );
ExitEditor( -1 );
#else
rc = ERR_NO_ERR;
#endif
}
} else {
rc = ERR_NO_ERR;
}
if( wantNoReadEntireFile ) {
EditFlags.ReadEntireFile = false;
}
VerifyTmpDir();
while( LostFileCheck() );
HookScriptCheck();
if( EditFlags.Quiet ) {
EditFlags.Spinning = false;
EditFlags.Clock = false;
}
ExtendedMemoryInit();
/*
* more misc. setup
*/
if( EditVars.WordDefn == NULL ) {
EditVars.WordDefn = DupString( &WordDefnDefault[6] );
InitWordSearch( EditVars.WordDefn );
}
if( EditVars.WordAltDefn == NULL ) {
EditVars.WordAltDefn = DupString( WordDefnDefault );
}
if( EditVars.TagFileName == NULL ) {
EditVars.TagFileName = DupString( "tags" );
}
DotBuffer = MemAlloc( (maxdotbuffer + 2) * sizeof( vi_key ) );
AltDotBuffer = MemAlloc( (maxdotbuffer + 2) * sizeof( vi_key ) );
DotCmd = MemAlloc( (maxdotbuffer + 2) * sizeof( vi_key ) );
SwapBlockInit( EditVars.MaxSwapBlocks );
ReadBuffer = MemAlloc( MAX_IO_BUFFER + 6 );
WriteBuffer = MemAlloc( MAX_IO_BUFFER + 6 );
FindHistInit( EditVars.FindHist.max );
FilterHistInit( EditVars.FilterHist.max );
CLHistInit( EditVars.CLHist.max );
LastFilesHistInit( EditVars.LastFilesHist.max );
GetClockStart();
GetSpinStart();
SelRgnInit();
SSInitAfterConfig();
#if defined( VI_RCS )
ViRCSInit();
#endif
/*
* create windows
*/
StartWindows();
InitMouse();
rc1 = NewMessageWindow();
if( rc1 != ERR_NO_ERR ) {
FatalError( rc1 );
}
DoVersion();
rc1 = InitMenu();
if( rc1 != ERR_NO_ERR ) {
FatalError( rc1 );
}
EditFlags.SpinningOurWheels = true;
EditFlags.ClockActive = true;
EditFlags.DisplayHold = true;
rc1 = NewStatusWindow();
if( rc1 != ERR_NO_ERR ) {
FatalError( rc1 );
}
EditFlags.DisplayHold = false;
MaxMemFreeAfterInit = MemSize();
/*
* look for a tag: if there is one, set it up as the file to start
*/
EditFlags.WatchForBreak = true;
if( cTag != NULL && !EditFlags.NoInitialFileLoad ) {
#if defined( __NT__ ) && !defined( __WIN__ )
{
if( !EditFlags.Quiet ) {
SetConsoleActiveScreenBuffer( OutputHandle );
}
}
#endif
rc1 = LocateTag( cTag, file, buff );
cFN = file;
if( rc1 != ERR_NO_ERR ) {
if( rc1 == ERR_TAG_NOT_FOUND ) {
Error( GetErrorMsg( rc1 ), cTag );
ExitEditor( 0 );
}
FatalError( rc1 );
}
}
/*
* start specified file(s)
*/
cmd[0] = 'e';
cmd[1] = 0;
arg = argc - 1;
k = 1;
while( !EditFlags.NoInitialFileLoad ) {
if( cFN == nullFN && !EditFlags.UseNoName ) {
break;
}
#ifdef __NT__
{
int k2;
int arg2;
char path[_MAX_PATH];
int found;
int fd;
size_t len;
size_t len1;
char *p;
/*
* check for the existence of a file name containing spaces, and open it if
* there is one
*/
len = _MAX_PATH - 1;
found = 0;
p = path;
arg2 = arg;
for( k2 = k; argv[k2] != NULL; ) {
len1 = strlen( argv[k2] );
if( len1 > len )
break;
memcpy( p, argv[k2], len1 );
p += len1;
*p = '\0';
len -= len1;
--arg2;
++k2;
fd = open( path, O_RDONLY );
if( fd != -1 ) {
close( fd );
k = k2;
arg = arg2;
found = 1;
break;
}
*p++ = ' ';
}
if( found ) {
#ifndef __UNIX__
len1 = strlen( path );
if( path[len1 - 1] == '.' )
path[len1 - 1] = '\0';
#endif
rc1 = NewFile( path, false );
if( rc1 != ERR_NO_ERR ) {
FatalError( rc1 );
}
cFN = argv[k];
if( arg < 1 ) {
break;
}
continue;
}
}
#endif
strcat( cmd, SingleBlank );
strcat( cmd, cFN );
ocnt = cnt = ExpandFileNames( cFN, &list );
if( cnt == 0 ) {
cnt = 1;
} else {
cFN = list[0];
}
for( j = 0; j < cnt; j++ ) {
rc1 = NewFile( cFN, false );
if( rc1 != ERR_NO_ERR && rc1 != NEW_FILE ) {
FatalError( rc1 );
}
if( EditFlags.BreakPressed ) {
break;
}
if( cnt > 0 && j < cnt - 1 ) {
cFN = list[j + 1];
}
}
if( ocnt > 0 ) {
MemFreeList( ocnt, list );
}
if( EditFlags.BreakPressed ) {
ClearBreak();
break;
}
k++;
arg--;
if( cTag != NULL || arg < 1 ) {
break;
}
cFN = argv[k];
}
if( EditFlags.StdIOMode ) {
rc1 = NewFile( "stdio", false );
if( rc1 != ERR_NO_ERR ) {
FatalError( rc1 );
}
}
EditFlags.WatchForBreak = false;
EditFlags.Starting = false;
/*
* if there was a tag, do the appropriate search
*/
if( cTag != NULL && !EditFlags.NoInitialFileLoad ) {
if( buff[0] != '/' ) {
i = atoi( buff );
rc1 = GoToLineNoRelCurs( i );
} else {
rc1 = FindTag( buff );
}
if( rc1 > 0 ) {
Error( GetErrorMsg( rc1 ) );
}
}
/*
* try to run startup file
*/
if( EditFlags.RecoverLostFiles ) {
startcnt = 0;
}
for( i = 0; i < startcnt; i++ ) {
GetFromEnv( startup[i], tmp );
ReplaceString( &cfgFN, tmp );
if( cfgFN[0] != 0 ) {
if( startup_parms[i] != NULL ) {
parm = startup_parms[i];
} else {
c[0] = 0;
parm = c;
}
#if defined( __NT__ ) && !defined( __WIN__ )
{
if( !EditFlags.Quiet ) {
SetConsoleActiveScreenBuffer( OutputHandle );
}
}
#endif
sline = 0;
rc = Source( cfgFN, parm, &sline );
}
}
if( rc > ERR_NO_ERR ) {
Error( "%s on line %u of \"%s\"", GetErrorMsg( rc ), sline, cfgFN );
}
if( argc == 1 ) {
LoadHistory( NULL );
} else {
LoadHistory( cmd );
}
if( EditVars.GrepDefault == NULL ) {
EditVars.GrepDefault = DupString( "*.(c|h)" );
}
if( goCmd[0] != 0 ) {
KeyAddString( goCmd );
}
if( keysToPush != NULL ) {
KeyAddString( keysToPush );
}
#ifdef __WIN__
if( lineToGoTo != 0 ) {
SetCurrentLine( lineToGoTo );
NewCursor( CurrentWindow, EditVars.NormalCursorType );
}
#endif
AutoSaveInit();
HalfPageLines = WindowAuxInfo( CurrentWindow, WIND_INFO_TEXT_LINES ) / 2 - 1;
#if defined( _M_X64 )
VarAddGlobalStr( "OSX64", "1" );
#elif defined( _M_IX86 ) && !defined( _M_I86 )
VarAddGlobalStr( "OS386", "1" );
#endif
if( EditVars.StatusString == NULL ) {
EditVars.StatusString = DupString( "L:$6L$nC:$6C" );
}
UpdateStatusWindow();
#ifdef __WIN__
if( CurrentInfo == NULL ) {
// no file loaded - screen is disconcertenly empty - reassure
DisplayFileStatus();
}
#endif
NewCursor( CurrentWindow, EditVars.NormalCursorType );
#if defined( __NT__ ) && !defined( __WIN__ )
{
SetConsoleActiveScreenBuffer( OutputHandle );
}
#endif
} /* doInitializeEditor */
/*
* ExitEditor - do just that
*/
void ExitEditor( int rc )
{
#ifdef __WIN__
WriteProfile();
#endif
#ifdef __IDE__
IDEFini();
#endif
#ifdef __WIN__
DDEFini();
#endif
SaveHistory();
RestoreInterrupts();
SwapFileClose();
WindowSwapFileClose();
SwapBlockFini();
ExtendedMemoryFini();
SelRgnFini();
LangFiniAll();
FiniMouse();
FiniMenu();
FiniSavebufs();
FindCmdFini();
DirFini();
CurrentWindow = NO_WINDOW;
FinishWindows();
ScreenFini();
#ifdef __WIN__
FiniClrPick();
FiniFtPick();
CursorOp( COP_FINI );
SubclassGenericFini();
FiniProfile();
#endif
FiniFileStack();
DeleteResidentScripts();
MatchFini();
FiniKeyMaps();
ErrorFini();
FiniCommandLine();
SSFini();
HistFini();
BoundDataFini();
FTSFini();
StaticFini();
VarFini();
AutoSaveFini();
FiniConfigFileName();
miscGlobalsFini();
ChangeDirectory( HomeDirectory );
#if defined( __NT__ ) && !defined( __WIN__ )
{
SetConsoleActiveScreenBuffer( GetStdHandle( STD_OUTPUT_HANDLE ) );
}
#endif
MemFree( HomeDirectory );
MemFree( CurrentDirectory );
#if defined( VI_RCS )
ViRCSFini();
#endif
FiniMem();
exit( rc );
} /* ExitEditor */
