DWORD WINAPI PollingThread(LPVOID lpThreadParameter)
{
while (WaitForSingleObject(hExit, 100))
{
psi.AdvControl(&guid_PluginGuid, ACTL_SYNCHRO, 0, NULL);
}
return 0;
}
static void ScrollText(ScrollType st)
{
EditorInfo einfo = {sizeof(EditorInfo)};
EditorSetPosition es = {sizeof(EditorSetPosition)};
Info.EditorControl(-1, ECTL_GETINFO, 0, &einfo);
switch (st) {
case stDn:
es.CurLine = einfo.CurLine+1;
break;
case stUp:
es.CurLine = einfo.CurLine-1;
break;
case stPgDn:
es.CurLine = einfo.CurLine+einfo.WindowSizeY-1;
es.TopScreenLine = einfo.TopScreenLine+einfo.WindowSizeY-1;
break;
case stPgUp:
es.CurLine = einfo.CurLine-einfo.WindowSizeY+1;
es.TopScreenLine = einfo.TopScreenLine-einfo.WindowSizeY+1;
break;
case stEnd:
es.CurLine = /*es.TopScreenLine = */einfo.TotalLines-1;
break;
default:
es.CurLine = /*es.TopScreenLine = */0;
break;
}
bLineChanged = true;
es.CurPos = -1;
es.CurTabPos = es.LeftPos = es.Overtype = -1;
Info.EditorControl(-1, ECTL_SETPOSITION, 0, &es);
//обновим № исходной строки
Info.EditorControl(-1, ECTL_GETINFO, 0, &einfo);
char *Lines = (char*)StackPeek();
OriginalLine = CalcOriginalLine(einfo.CurLine);
HighlightLine(einfo.CurLine);
Info.AdvControl(&PluginId, ACTL_REDRAWALL, 0, NULL);
}
static intptr_t WINAPI MyDlgProc(HANDLE hDlg, intptr_t Msg, intptr_t Param1, void *Param2)
{
FarGetDialogItem DialogItem={sizeof(FarGetDialogItem)};
const INPUT_RECORD* record;
switch (Msg)
{
case DN_CONTROLINPUT:
record=(const INPUT_RECORD *)Param2;
if (record->EventType==KEY_EVENT &&
record->Event.KeyEvent.bKeyDown &&
record->Event.KeyEvent.dwControlKeyState & SHIFT_PRESSED &&
(record->Event.KeyEvent.dwControlKeyState & LEFT_CTRL_PRESSED ||
record->Event.KeyEvent.dwControlKeyState & RIGHT_CTRL_PRESSED))
{
switch (record->Event.KeyEvent.wVirtualKeyCode) {
case VK_DOWN:
ScrollText(stDn);
return TRUE;
case VK_UP:
ScrollText(stUp);
return TRUE;
case VK_NEXT:
ScrollText(stPgDn);
return TRUE;
case VK_PRIOR:
ScrollText(stPgUp);
return TRUE;
case VK_END:
ScrollText(stEnd);
return TRUE;
case VK_HOME:
ScrollText(stHome);
return TRUE;
}
}
break;
case DN_BTNCLICK:
if (Param1==ixCaseSensitive) {
bool bCaseSensitive = Param2!=0;
if (bCaseSensitive!=bPrevCaseSensitive)
UndoAll();
bPrevCaseSensitive = bCaseSensitive;
}
Filter(PrevPattern, bPrevCaseSensitive);
Info.AdvControl(&PluginId, ACTL_REDRAWALL, 0, NULL);
break;
case DN_EDITCHANGE:
DialogItem.Size = (size_t)Info.SendDlgMessage(hDlg, DM_GETDLGITEM, ixSearchString, NULL);
DialogItem.Item = (FarDialogItem*)malloc(DialogItem.Size);
if (DialogItem.Item) {
Info.SendDlgMessage(hDlg, DM_GETDLGITEM, ixSearchString, &DialogItem);
size_t nChars = wcslen(DialogItem.Item->Data);
size_t nPrevChars = Length(PrevPattern);
bool bFilter = true;
if (PrevPattern!=NULL) {
//получается ли новая строка укорачиванием старой на символ
if (bSequentialInput && nChars+1 == nPrevChars &&
wcsncmp(DialogItem.Item->Data, PrevPattern, nChars) == 0)
{
//да - откатываем одну правку
Undo();
bFilter = false;
}
else
{
//получается ли новая строка добавлением символа к старой
if (!(nChars == nPrevChars+1 &&
wcsncmp(DialogItem.Item->Data, PrevPattern, nPrevChars) == 0))
{
//если нет - считаем, что откатывать по одной правке нельзя
bSequentialInput = false;
}
//можно ли искать новую строку среди уже отфильтрованных
if (wcsstr(DialogItem.Item->Data, PrevPattern) == NULL)
{
//нет - откатываем все правки
UndoAll();
}
}
}
//выделить контекст заново при необходимости
if (Length(PrevPattern)<MAX_PATTERN_LEN && nChars>=MAX_PATTERN_LEN) {
SearchFree(ctx);
ctx = SearchHAlloc();
}
else if (Length(PrevPattern)>=MAX_PATTERN_LEN && nChars<MAX_PATTERN_LEN) {
SearchHFree(ctx);
ctx = SearchAlloc();
}
//запомнить значение фильтра
if (nChars!=0) {
SetLength(&PrevPattern, (int)nChars);
wcscpy(PrevPattern, DialogItem.Item->Data);
}
else {
SetLength(&PrevPattern, 0);
bSequentialInput = true;
}
free(DialogItem.Item);
if (bFilter)
Filter(PrevPattern, bPrevCaseSensitive);
Info.AdvControl(&PluginId, ACTL_REDRAWALL, 0, NULL);
}
break;
}
return Info.DefDlgProc(hDlg, Msg, Param1, Param2);
}
HANDLE WINAPI OpenW(const struct OpenInfo *Info)
{
const int CUR_DIR_SIZE = 100000;
char* filename = 0;
switch( Info->OpenFrom )
{
case OPEN_COMMANDLINE:
{
OpenCommandLineInfo* cinfo = (OpenCommandLineInfo*)Info->Data;
const wchar_t* cmdline = cinfo->CommandLine;
if( !cmdline )
return INVALID_HANDLE_VALUE;
while( *cmdline && *cmdline <= ' ' )
cmdline++;
if( *cmdline )
filename = w2a( cmdline );
else
return 0;
break;
}
case OPEN_PLUGINSMENU:
{
FarGetPluginPanelItem pinfo;
PluginPanelItem* pitem = (PluginPanelItem*)malloc(CUR_DIR_SIZE);
ZeroMemory(&pinfo, sizeof(pinfo));
ZeroMemory(pitem, CUR_DIR_SIZE);
pinfo.StructSize = sizeof(pinfo);
pinfo.Size = CUR_DIR_SIZE;
pinfo.Item = pitem;
if(InfoW.PanelControl( PANEL_ACTIVE, FCTL_GETCURRENTPANELITEM, 0, &pinfo ))
{
filename = w2a( pinfo.Item->FileName );
free(pitem);
}
else
{
free(pitem);
return 0;
}
break;
}
default:
return 0;
}
if( !filename )
return 0;
wchar_t comspec[MAX_PATH * 2];
if( !GetEnvironmentVariableW( L"COMSPEC", comspec, sizeofa( comspec ) ) )
lstrcpyW( comspec, L"cmd.exe" );
char pipename[100];
wsprintf( pipename, "\\\\.\\pipe\\FarCall%ul", GetCurrentProcessId() );
char* batchstr = (char*)malloc( 10000 );
wsprintf( batchstr, batch, filename, ModuleName, pipename );
// obtaining temp file name
wchar_t tmp[MAX_PATH * 10];
GetTempPathW( sizeofa( tmp ), tmp );
GetTempFileNameW( tmp, L"", 0, tmp );
DeleteFileW( tmp );
lstrcatW( tmp, L".bat" );
HANDLE file = CreateFileW( tmp, GENERIC_WRITE, FILE_SHARE_READ | FILE_SHARE_WRITE, 0, CREATE_ALWAYS, 0, 0 );
if( !file || file == INVALID_HANDLE_VALUE )
{
DeleteFileW( tmp );
free( filename );
free( batchstr );
return INVALID_HANDLE_VALUE;
}
DWORD written;
WriteFile( file, batchstr, lstrlen( batchstr ), &written, 0 );
CloseHandle( file );
wchar_t cmd[MAX_PATH * 10] = L"\"";
lstrcatW( lstrcatW( lstrcatW( lstrcatW( cmd, comspec ), L"\" /c \"" ), tmp ), L"\"");
STARTUPINFOW sinfo;
ZeroMemory( &sinfo, sizeof( sinfo ) );
sinfo.cb = sizeof( sinfo );
PROCESS_INFORMATION pinfo;
Handle np( CreateNamedPipe( pipename, PIPE_ACCESS_DUPLEX, PIPE_WAIT,
PIPE_UNLIMITED_INSTANCES, 100, 100, 0, 0 ) );
connected = false;
DWORD id;
Handle thread( CreateThread( 0, 0, ListenEnv, np, 0, &id ) );
while( !connected )
Sleep( 100 );
CONSOLE_SCREEN_BUFFER_INFO csbi;
GetConsoleScreenBufferInfo( GetStdHandle( STD_OUTPUT_HANDLE ), &csbi );
#ifndef LIGHTGRAY
#define LIGHTGRAY 7
#endif
wchar_t Blank[1024];
FSFW.sprintf(Blank,L"%*s",csbi.dwSize.X,L"");
FarColor fc = {FCF_NONE, LIGHTGRAY, 0, 0};
for (int Y=0;Y<csbi.dwSize.Y;Y++)
InfoW.Text(0,Y,&fc,Blank);
InfoW.Text(0,0,0,NULL);
COORD C;
C.X=0;
C.Y=csbi.dwCursorPosition.Y;
SetConsoleCursorPosition( GetStdHandle( STD_OUTPUT_HANDLE ), C );
wchar_t* curr_dir = (wchar_t*)malloc(CUR_DIR_SIZE);
FSFW.GetCurrentDirectory(CUR_DIR_SIZE, curr_dir);
if( np && CreateProcessW( NULL, cmd, 0, 0, TRUE, 0, 0, curr_dir[0] ? curr_dir : 0, &sinfo, &pinfo ) )
{
HANDLE ar[] = {pinfo.hProcess, np};
WaitForMultipleObjects( 2, ar, TRUE, INFINITE );
CloseHandle(pinfo.hProcess);
CloseHandle(pinfo.hThread);
SMALL_RECT src;
COORD dest;
CHAR_INFO fill;
src.Left=0;
src.Top=2;
src.Right=csbi.dwSize.X;
src.Bottom=csbi.dwSize.Y;
dest.X=dest.Y=0;
fill.Char.AsciiChar=' ';
fill.Attributes=7;
ScrollConsoleScreenBuffer( GetStdHandle( STD_OUTPUT_HANDLE ), &src, NULL, dest, &fill);
InfoW.AdvControl(0, ACTL_REDRAWALL, 0, 0);
}
else
Handle onp( CreateFile( pipename, GENERIC_WRITE,
FILE_SHARE_READ | FILE_SHARE_WRITE, 0, OPEN_EXISTING, 0, 0 ) );
free( filename );
free( batchstr );
free( curr_dir );
DeleteFileW( tmp );
return 0;
}
