void FarEditor::selectBlock()
{
EditorSelect es;
int X1, X2, Y1, Y2;
enterHandler();
PairMatch *pm = baseEditor->searchGlobalPair(ei.CurLine, ei.CurPos);
if ((pm == nullptr)||(pm->eline == -1)){
baseEditor->releasePairMatch(pm);
return;
}
if (pm->topPosition){
X1 = pm->start->start;
X2 = pm->end->end-1;
Y1 = pm->sline;
Y2 = pm->eline;
}
else{
X2 = pm->start->end-1;
X1 = pm->end->start;
Y2 = pm->sline;
Y1 = pm->eline;
};
es.BlockType = BTYPE_STREAM;
es.BlockStartLine = Y1;
es.BlockStartPos = X1;
es.BlockHeight = Y2 - Y1 + 1;
es.BlockWidth = X2 - X1 + 1;
info->EditorControl(ECTL_SELECT, &es);
baseEditor->releasePairMatch(pm);
}
void FarEditor::matchPair()
{
EditorSetPosition esp;
enterHandler();
PairMatch *pm = baseEditor->searchGlobalPair(ei.CurLine, ei.CurPos);
if ((pm == nullptr)||(pm->eline == -1)){
baseEditor->releasePairMatch(pm);
return;
}
esp.CurTabPos = -1;
esp.LeftPos = -1;
esp.Overtype = -1;
esp.TopScreenLine = -1;
esp.CurLine = pm->eline;
if (!pm->topPosition){
esp.CurPos = pm->end->start;
}
else{
esp.CurPos = pm->end->end-1;
}
if (esp.CurLine < ei.TopScreenLine || esp.CurLine > ei.TopScreenLine+ei.WindowSizeY){
esp.TopScreenLine = pm->eline - ei.WindowSizeY/2;
if (esp.TopScreenLine < 0){
esp.TopScreenLine = 0;
}
};
info->EditorControl(ECTL_SETPOSITION, &esp);
baseEditor->releasePairMatch(pm);
}
void FarEditor::listErrors(){
enterHandler();
baseEditor->validate(-1, false);
leaveHandler();
showOutliner(errorOutliner);
ignoreChange = true;
}
void FarEditor::listFunctions(){
enterHandler();
baseEditor->validate(-1, false);
leaveHandler();
showOutliner(structOutliner);
ignoreChange = true;
}
void FarEditor::selectRegion()
{
EditorSelect es;
EditorGetString egs;
enterHandler();
egs.StringNumber = ei.CurLine;
info->EditorControl(ECTL_GETSTRING, &egs);
if (cursorRegion != nullptr){
int end = cursorRegion->end;
if (end == -1){
end = egs.StringLength;
}
if (end - cursorRegion->start > 0){
es.BlockType = BTYPE_STREAM;
es.BlockStartLine = ei.CurLine;
es.BlockStartPos = cursorRegion->start;
es.BlockHeight = 1;
es.BlockWidth = end - cursorRegion->start;
info->EditorControl(ECTL_SELECT, &es);
};
}
}
void FarEditor::showOutliner(Outliner *outliner)
{
FarMenuItem *menu;
EditorSetPosition esp;
bool moved = false;
int code = 0;
const int FILTER_SIZE = 40;
int breakKeys[] =
{
VK_BACK, VK_RETURN, VK_OEM_1, VK_OEM_MINUS, VK_TAB,
(PKF_CONTROL<<16)+VK_UP, (PKF_CONTROL<<16)+VK_DOWN,
(PKF_CONTROL<<16)+VK_LEFT, (PKF_CONTROL<<16)+VK_RIGHT,
(PKF_CONTROL<<16)+VK_RETURN,(PKF_SHIFT<<16)+VK_OEM_1,
(PKF_SHIFT<<16)+VK_OEM_MINUS,(PKF_SHIFT<<16)+VK_OEM_3,
VK_NUMPAD0,VK_NUMPAD1,VK_NUMPAD2,VK_NUMPAD3,VK_NUMPAD4,
VK_NUMPAD5,VK_NUMPAD6,VK_NUMPAD7,VK_NUMPAD8,VK_NUMPAD9,
'0','1','2','3','4','5','6','7','8','9',
'A','B','C','D','E','F','G','H','I','J',
'K','L','M','N','O','P','Q','R','S','T',
'U','V','W','X','Y','Z',' ', 0
};
int keys_size = sizeof(breakKeys)/sizeof(int)-1;
//we need this?
//int outputEnc = Encodings::getEncodingIndex("cp866");
wchar_t prefix[FILTER_SIZE+1];
wchar_t autofilter[FILTER_SIZE+1];
wchar_t filter[FILTER_SIZE+1];
int flen = 0;
*filter = 0;
int maxLevel = -1;
bool stopMenu = false;
int items_num = outliner->itemCount();
if (items_num == 0){
stopMenu = true;
}
menu = new FarMenuItem[items_num];
while (!stopMenu){
int i;
memset(menu, 0, sizeof(FarMenuItem)*items_num);
// items in FAR's menu;
int menu_size = 0;
int selectedItem = 0;
Vector<int> treeStack;
enterHandler();
for (i = 0; i < items_num; i++){
OutlineItem *item = outliner->getItem(i);
if (item->token->indexOfIgnoreCase(DString(filter)) != -1){
int treeLevel = Outliner::manageTree(treeStack, item->level);
if (maxLevel < treeLevel){
maxLevel = treeLevel;
}
if (treeLevel > visibleLevel){
continue;
}
wchar_t * menuItem = new wchar_t[255];
if (!oldOutline){
int si = swprintf(menuItem, 255, L"%4d ", item->lno+1);
for (int lIdx = 0; lIdx < treeLevel; lIdx++){
menuItem[si++] = ' ';
menuItem[si++] = ' ';
};
const String *region = item->region->getName();
wchar_t cls = Character::toLowerCase((*region)[region->indexOf(':')+1]);
si += swprintf(menuItem+si, 255-si, L"%lc ", cls);
int labelLength = item->token->length();
if (labelLength+si > 110){
labelLength = 110;
}
wcsncpy(menuItem+si, item->token->getWChars(), labelLength);
menuItem[si+labelLength] = 0;
}
else{
String *line = getLine(item->lno);
int labelLength = line->length();
if (labelLength > 110){
labelLength = 110;
}
wcsncpy(menuItem, line->getWChars(), labelLength);
menuItem[labelLength] = 0;
}
*(OutlineItem**)(&menuItem[124]) = item;
// set position on nearest top function
menu[menu_size].Text = menuItem;
if (ei.CurLine >= item->lno){
selectedItem = menu_size;
}
menu_size++;
};
}
if (selectedItem > 0){
menu[selectedItem].Selected = 1;
}
if (menu_size == 0 && flen > 0){
flen--;
filter[flen] = 0;
continue;
}
int aflen = flen;
// Find same function prefix
bool same = true;
int plen = 0;
wcscpy(autofilter, filter);
while (code != 0 && menu_size > 1 && same && plen < FILTER_SIZE){
plen = aflen + 1;
int auto_ptr = DString(menu[0].Text).indexOfIgnoreCase(DString(autofilter));
if (int(wcslen(menu[0].Text)-auto_ptr) < plen){
break;
}
wcsncpy(prefix, menu[0].Text+auto_ptr, plen);
prefix[plen] = 0;
for (int j = 1 ; j < menu_size ; j++){
if (DString(menu[j].Text).indexOfIgnoreCase(DString(prefix)) == -1){
same = false;
break;
}
}
if (same){
aflen++;
wcscpy(autofilter, prefix);
}
}
wchar_t top[128];
const wchar_t *topline = GetMsg(mOutliner);
wchar_t captionfilter[FILTER_SIZE+1];
wcsncpy(captionfilter, filter, flen);
captionfilter[flen] = 0;
if (aflen > flen){
wcscat(captionfilter, L"?");
wcsncat(captionfilter, autofilter+flen, aflen-flen);
captionfilter[aflen+1] = 0;
}
swprintf(top, 128, topline, captionfilter);
int sel = 0;
sel = info->Menu(info->ModuleNumber, -1, -1, 0, FMENU_SHOWAMPERSAND|FMENU_WRAPMODE,
top, GetMsg(mChoose), L"add", breakKeys, &code, menu, menu_size);
// handle mouse selection
if (sel != -1 && code == -1){
code = 1;
}
switch (code){
case -1:
stopMenu = true;
break;
case 0: // VK_BACK
if (flen > 0){
flen--;
}
filter[flen] = 0;
break;
case 1: // VK_RETURN
{
if (menu_size == 0){
break;
}
esp.CurTabPos = esp.LeftPos = esp.Overtype = esp.TopScreenLine = -1;
OutlineItem *item = *(OutlineItem**)(&menu[sel].Text[124]);
esp.CurLine = item->lno;
esp.CurPos = item->pos;
esp.TopScreenLine = esp.CurLine - ei.WindowSizeY/2;
if (esp.TopScreenLine < 0){
esp.TopScreenLine = 0;
}
info->EditorControl(ECTL_SETPOSITION, &esp);
stopMenu = true;
moved = true;
break;
}
case 2: // ;
if (flen == FILTER_SIZE){
break;
}
filter[flen]= ';';
filter[++flen]= 0;
break;
case 3: // -
if (flen == FILTER_SIZE){
break;
}
filter[flen]= '-';
filter[++flen]= 0;
break;
case 4: // VK_TAB
wcscpy(filter, autofilter);
flen = aflen;
break;
case 5: // ctrl-up
{
if (menu_size == 0){
break;
}
if (sel == 0){
sel = menu_size-1;
}
else{
sel--;
}
esp.CurTabPos = esp.LeftPos = esp.Overtype = esp.TopScreenLine = -1;
OutlineItem *item = *(OutlineItem**)(&menu[sel].Text[124]);
esp.CurLine = item->lno;
esp.CurPos = item->pos;
esp.TopScreenLine = esp.CurLine - ei.WindowSizeY/2;
if (esp.TopScreenLine < 0){
esp.TopScreenLine = 0;
}
info->EditorControl(ECTL_SETPOSITION, &esp);
info->EditorControl(ECTL_REDRAW, nullptr);
info->EditorControl(ECTL_GETINFO, &ei);
break;
}
case 6: // ctrl-down
{
if (menu_size == 0){
break;
}
if (sel == menu_size-1){
sel = 0;
}
else{
sel++;
}
esp.CurTabPos = esp.LeftPos = esp.Overtype = esp.TopScreenLine = -1;
OutlineItem *item = *(OutlineItem**)(&menu[sel].Text[124]);
esp.CurLine = item->lno;
esp.CurPos = item->pos;
esp.TopScreenLine = esp.CurLine - ei.WindowSizeY/2;
if (esp.TopScreenLine < 0){
esp.TopScreenLine = 0;
}
info->EditorControl(ECTL_SETPOSITION, &esp);
info->EditorControl(ECTL_REDRAW, nullptr);
info->EditorControl(ECTL_GETINFO, &ei);
break;
}
case 7: // ctrl-left
{
if (visibleLevel > maxLevel){
visibleLevel = maxLevel-1;
}
else{
if (visibleLevel > 0){
visibleLevel--;
}
}
if (visibleLevel < 0){
visibleLevel = 0;
}
break;
}
case 8: // ctrl-right
{
visibleLevel++;
break;
}
case 9: // ctrl-return
{
//read current position
info->EditorControl(ECTL_GETINFO, &ei);
//insert text
OutlineItem *item = *(OutlineItem**)(&menu[sel].Text[124]);
info->EditorControl(ECTL_INSERTTEXT, (void*)item->token->getWChars());
//move the cursor to the end of the inserted string
esp.CurTabPos = esp.LeftPos = esp.Overtype = esp.TopScreenLine = -1;
esp.CurLine =-1;
esp.CurPos = ei.CurPos+item->token->length();
info->EditorControl(ECTL_SETPOSITION, &esp);
stopMenu = true;
moved = true;
break;
}
case 10: // :
if (flen == FILTER_SIZE){
break;
}
filter[flen]= ':';
filter[++flen]= 0;
break;
case 11: // _
if (flen == FILTER_SIZE){
break;
}
filter[flen]= '_';
filter[++flen]= 0;
break;
case 12: // _
if (flen == FILTER_SIZE){
break;
}
filter[flen]= '~';
filter[++flen]= 0;
break;
default:
if (flen == FILTER_SIZE || code > keys_size){
break;
}
if (code<23){
filter[flen] = (wchar_t)Character::toLowerCase('0'+code-13);
}else{
filter[flen] = (wchar_t)Character::toLowerCase(breakKeys[code] );
}
filter[++flen] = 0;
break;
}
}
for (int i = 0; i < items_num; i++){
delete[] menu[i].Text;
}
delete[] menu;
if (!moved){
// restoring position
esp.CurLine = ei.CurLine;
esp.CurPos = ei.CurPos;
esp.CurTabPos = ei.CurTabPos;
esp.TopScreenLine = ei.TopScreenLine;
esp.LeftPos = ei.LeftPos;
esp.Overtype = ei.Overtype;
info->EditorControl(ECTL_SETPOSITION, &esp);
}
if (items_num == 0){
const wchar_t *msg[2] = { GetMsg(mNothingFound), GetMsg(mGotcha) };
info->Message(info->ModuleNumber, 0, nullptr, msg, 2, 1);
}
}
int FarEditor::editorEvent(int event, void *param)
{
// ignore event
if (event != EE_REDRAW || (event == EE_REDRAW && param == EEREDRAW_ALL && inRedraw)){
return 0;
}
enterHandler();
WindowSizeX = ei.WindowSizeX;
WindowSizeY = ei.WindowSizeY;
baseEditor->visibleTextEvent(ei.TopScreenLine, WindowSizeY);
baseEditor->lineCountEvent(ei.TotalLines);
if (param == EEREDRAW_CHANGE){
int ml = (prevLinePosition < ei.CurLine ? prevLinePosition : ei.CurLine)-1;
if (ml < 0){
ml = 0;
}
if (blockTopPosition != -1 && ml > blockTopPosition){
ml = blockTopPosition;
}
baseEditor->modifyEvent(ml);
};
prevLinePosition = ei.CurLine;
blockTopPosition = -1;
if (ei.BlockType != BTYPE_NONE){
blockTopPosition = ei.BlockStartLine;
}
// hack against tabs in FAR's editor
EditorConvertPos ecp {}, ecp_cl {};
ecp.StringNumber = -1;
ecp.SrcPos = ei.CurPos;
info->EditorControl(ECTL_REALTOTAB, &ecp);
delete cursorRegion;
cursorRegion = nullptr;
if (rdBackground == nullptr){
throw Exception(DString("HRD Background region 'def:Text' not found"));
}
for (int lno = ei.TopScreenLine; lno < ei.TopScreenLine + WindowSizeY; lno++){
if (lno >= ei.TotalLines){
break;
}
LineRegion *l1 = nullptr;
if (drawSyntax || drawPairs){
l1 = baseEditor->getLineRegions(lno);
}
//clean line in far editor
addFARColor(lno, -1, 0, color());
EditorGetString egs;
egs.StringNumber = lno;
info->EditorControl(ECTL_GETSTRING, &egs);
int llen = egs.StringLength;
// fills back
if (lno == ei.CurLine && showHorizontalCross){
if (!TrueMod){
addFARColor(lno, 0, ei.LeftPos + ei.WindowSizeX, horzCrossColor);
}
else{
addFARColor(lno, 0, ei.LeftPos + ei.WindowSizeX, convert(nullptr));
}
}
else{
addFARColor(lno, 0, ei.LeftPos + ei.WindowSizeX, convert(nullptr));
}
if (showVerticalCross && !TrueMod){
ecp_cl.StringNumber = lno;
ecp_cl.SrcPos = ecp.DestPos;
info->EditorControl(ECTL_TABTOREAL, &ecp_cl);
vertCrossColor.concolor |= 0x10000;
addFARColor(lno, ecp_cl.DestPos, ecp_cl.DestPos+1, vertCrossColor);
};
bool vertCrossDone = false;
if (drawSyntax){
for (; l1; l1 = l1->next){
if (l1->special){
continue;
}
if (l1->start == l1->end){
continue;
}
if (l1->start > ei.LeftPos+ei.WindowSizeX){
continue;
}
if (l1->end != -1 && l1->end < ei.LeftPos-ei.WindowSizeX){
continue;
}
if ((lno != ei.CurLine || !showHorizontalCross || crossZOrder == 0)){
color col = convert(l1->styled());
//TODO
if (lno == ei.CurLine && showHorizontalCross){
if (!TrueMod){
if (foreDefault(col)){
col.concolor = (col.concolor&0xF0) + (horzCrossColor.concolor&0xF);
}
if (backDefault(col)){
col.concolor = (col.concolor&0xF) + (horzCrossColor.concolor&0xF0);
}
}
};
if (!col.concolor){
continue;
}
//
int lend = l1->end;
if (lend == -1){
lend = fullBackground ? ei.LeftPos+ei.WindowSizeX : llen;
}
addFARColor(lno, l1->start, lend, col);
if (lno == ei.CurLine && (l1->start <= ei.CurPos) && (ei.CurPos <= lend)){
delete cursorRegion;
cursorRegion = new LineRegion(*l1);
};
// column
if (!TrueMod && showVerticalCross && crossZOrder == 0 && l1->start <= ecp_cl.DestPos && ecp_cl.DestPos < lend){
col = convert(l1->styled());
if (foreDefault(col)) col.concolor = (col.concolor&0xF0) + (vertCrossColor.concolor&0xF);
if (backDefault(col)) col.concolor = (col.concolor&0xF) + (vertCrossColor.concolor&0xF0);
ecp_cl.StringNumber = lno;
ecp_cl.SrcPos = ecp.DestPos;
info->EditorControl(ECTL_TABTOREAL, &ecp_cl);
col.concolor|=0x10000;
addFARColor(lno, ecp_cl.DestPos, ecp_cl.DestPos+1, col);
vertCrossDone = true;
};
};
};
};
if (!TrueMod && showVerticalCross && !vertCrossDone){
ecp_cl.StringNumber = lno;
ecp_cl.SrcPos = ecp.DestPos;
info->EditorControl(ECTL_TABTOREAL, &ecp_cl);
vertCrossColor.concolor |= 0x10000;
addFARColor(lno, ecp_cl.DestPos, ecp_cl.DestPos+1, vertCrossColor);
};
};
/// pair brackets
PairMatch *pm = nullptr;
if (drawPairs){
pm = baseEditor->searchLocalPair(ei.CurLine, ei.CurPos);
}
if (pm != nullptr){
color col = convert(pm->start->styled());
// TODO
if (!TrueMod && showHorizontalCross){
if (foreDefault(col)){
col.concolor = (col.concolor&0xF0) + (horzCrossColor.concolor&0xF);
}
if (backDefault(col)){
col.concolor = (col.concolor&0xF) + (horzCrossColor.concolor&0xF0);
}
};
//
addFARColor(ei.CurLine, pm->start->start, pm->start->end, col);
// TODO
if (!TrueMod && showVerticalCross && !showHorizontalCross && pm->start->start <= ei.CurPos && ei.CurPos < pm->start->end){
col = convert(pm->start->styled());
if (foreDefault(col)){
col.concolor = (col.concolor&0xF0) + (vertCrossColor.concolor&0xF);
}
if (backDefault(col)){
col.concolor = (col.concolor&0xF) + (vertCrossColor.concolor&0xF0);
}
col.concolor|=0x10000;
addFARColor(pm->sline, ei.CurPos, ei.CurPos+1, col);
};
//
if (pm->eline != -1){
col = convert(pm->end->styled());
//
if (!TrueMod && showHorizontalCross && pm->eline == ei.CurLine){
if (foreDefault(col)){
col.concolor = (col.concolor&0xF0) + (horzCrossColor.concolor&0xF);
}
if (backDefault(col)){
col.concolor = (col.concolor&0xF) + (horzCrossColor.concolor&0xF0);
}
};
//
addFARColor(pm->eline, pm->end->start, pm->end->end, col);
ecp.StringNumber = pm->eline;
ecp.SrcPos = ecp.DestPos;
info->EditorControl(ECTL_TABTOREAL, &ecp);
//
if (!TrueMod && showVerticalCross && pm->end->start <= ecp.DestPos && ecp.DestPos < pm->end->end){
col = convert(pm->end->styled());
if (foreDefault(col)){
col.concolor = (col.concolor&0xF0) + (vertCrossColor.concolor&0xF);
}
if (backDefault(col)){
col.concolor = (col.concolor&0xF) + (vertCrossColor.concolor&0xF0);
}
col.concolor|=0x10000;
addFARColor(pm->eline, ecp.DestPos, ecp.DestPos+1, col);
};
//
};
baseEditor->releasePairMatch(pm);
};
if (param != EEREDRAW_ALL){
inRedraw = true;
info->EditorControl(ECTL_REDRAW, nullptr);
inRedraw = false;
};
return true;
}
void FarEditor::updateHighlighting()
{
enterHandler();
baseEditor->validate(ei.TopScreenLine, true);
}
void FarEditor::locateFunction()
{
// extract word
enterHandler();
String &curLine = *getLine(ei.CurLine);
int cpos = ei.CurPos;
int sword = cpos;
int eword = cpos;
while (cpos < curLine.length() &&
(Character::isLetterOrDigit(curLine[cpos]) || curLine[cpos] != '_')){
while (Character::isLetterOrDigit(curLine[eword]) || curLine[eword] == '_'){
if (eword == curLine.length()-1){
break;
}
eword++;
}
while (Character::isLetterOrDigit(curLine[sword]) || curLine[sword] == '_'){
if (sword == 0){
break;
}
sword--;
}
SString funcname(curLine, sword+1, eword-sword-1);
CLR_INFO("FC", "Letter %s", funcname.getChars());
baseEditor->validate(-1, false);
EditorSetPosition esp;
OutlineItem *item_found = nullptr;
OutlineItem *item_last = nullptr;
int items_num = structOutliner->itemCount();
if (items_num == 0){
break;
}
//search through the outliner
for (int idx = 0; idx < items_num; idx++){
OutlineItem *item = structOutliner->getItem(idx);
if (item->token->indexOfIgnoreCase(DString(funcname)) != -1){
if (item->lno == ei.CurLine){
item_last = item;
}
else{
item_found = item;
}
}
}
if (!item_found){
item_found = item_last;
}
if (!item_found){
break;
}
esp.CurTabPos = esp.LeftPos = esp.Overtype = esp.TopScreenLine = -1;
esp.CurLine = item_found->lno;
esp.CurPos = item_found->pos;
esp.TopScreenLine = esp.CurLine - ei.WindowSizeY/2;
if (esp.TopScreenLine < 0){
esp.TopScreenLine = 0;
}
info->EditorControl(ECTL_SETPOSITION, &esp);
info->EditorControl(ECTL_REDRAW, nullptr);
info->EditorControl(ECTL_GETINFO, &ei);
return;
};
const wchar_t *msg[2] = { GetMsg(mNothingFound), GetMsg(mGotcha) };
info->Message(info->ModuleNumber, 0, nullptr, msg, 2, 1);
}
int FarEditor::editorEvent(int event, void *param)
{
// ignore event
if (event != EE_REDRAW || inRedraw) return 0;
enterHandler();
if (farEncodingIndex != ei.TableNum - ei.AnsiMode){
static CharTableSet cts;
farEncodingIndex = ei.TableNum - ei.AnsiMode;
if (farEncodingIndex == -1) unicodeEncodingIndex = Encodings::getEncodingIndex("cp866");
else if (farEncodingIndex == -2) unicodeEncodingIndex = Encodings::getEncodingIndex("cp1251");
else{
info->CharTable(farEncodingIndex, (char*)&cts, sizeof(cts));
unicodeEncodingIndex = Encodings::getEncodingIndex(cts.TableName);
};
if (unicodeEncodingIndex == -1) unicodeEncodingIndex = Encodings::getDefaultEncodingIndex();
// Here we have to invalidate full editor content
baseEditor->modifyEvent(0);
};
if (WindowSizeX != ei.WindowSizeX || WindowSizeY != ei.WindowSizeY){
WindowSizeX = ei.WindowSizeX;
WindowSizeY = ei.WindowSizeY;
};
baseEditor->visibleTextEvent(ei.TopScreenLine, WindowSizeY);
baseEditor->lineCountEvent(ei.TotalLines);
// Hack against FAR's bad EEREDRAW_CHANGE events
if (param == EEREDRAW_CHANGE && ignoreChange == true){
param = EEREDRAW_ALL;
ignoreChange = false;
};
if (oldFAR || param == EEREDRAW_CHANGE){
int ml = (prevLinePosition < ei.CurLine ? prevLinePosition : ei.CurLine)-1;
if (ml < 0) ml = 0;
if (blockTopPosition != -1 && ml > blockTopPosition) ml = blockTopPosition;
baseEditor->modifyEvent(ml);
};
prevLinePosition = ei.CurLine;
blockTopPosition = -1;
if (ei.BlockType != BTYPE_NONE) blockTopPosition = ei.BlockStartLine;
// hack against tabs in FAR's editor
EditorConvertPos ecp, ecp_cl;
ecp.StringNumber = -1;
ecp.SrcPos = ei.CurPos;
info->EditorControl(ECTL_REALTOTAB, &ecp);
delete cursorRegion;
cursorRegion = null;
if (rdBackground == null) throw Exception(DString("HRD Background region 'def:Text' not found"));
for(int lno = ei.TopScreenLine; lno < ei.TopScreenLine + WindowSizeY; lno++){
if (lno >= ei.TotalLines) break;
LineRegion *l1 = null;
if (drawSyntax || drawPairs){
l1 = baseEditor->getLineRegions(lno);
}
addFARColor(lno, -1, 0, 0);
EditorGetString egs;
egs.StringNumber = lno;
info->EditorControl(ECTL_GETSTRING, &egs);
int llen = egs.StringLength;
const char *lptr = egs.StringText;
// fills back
if (lno == ei.CurLine && showHorizontalCross)
addFARColor(lno, 0, ei.LeftPos + ei.WindowSizeX, horzCrossColor);
else
addFARColor(lno, 0, ei.LeftPos + ei.WindowSizeX, convert(null));
if (showVerticalCross){
ecp_cl.StringNumber = lno;
ecp_cl.SrcPos = ecp.DestPos;
info->EditorControl(ECTL_TABTOREAL, &ecp_cl);
addFARColor(lno, ecp_cl.DestPos, ecp_cl.DestPos+1, vertCrossColor+0x10000);
};
bool vertCrossDone = false;
int syns = 0;
int syne = 0;
if (drawSyntax)
for(; l1; l1 = l1->next){
if (l1->special) continue;
if (l1->start == l1->end) continue;
if (l1->start > ei.LeftPos+ei.WindowSizeX) continue;
if (l1->end != -1 && l1->end < ei.LeftPos-ei.WindowSizeX) continue;
if ((lno != ei.CurLine || !showHorizontalCross || crossZOrder == 0)){
int color = convert(l1->styled());
if (lno == ei.CurLine && showHorizontalCross){
if (foreDefault(color)) color = (color&0xF0) + (horzCrossColor&0xF);
if (backDefault(color)) color = (color&0xF) + (horzCrossColor&0xF0);
};
if (!color) continue;
int lend = l1->end;
if (lend == -1) lend = fullBackground ? ei.LeftPos+ei.WindowSizeX : llen;
addFARColor(lno, l1->start, lend, color);
if (lno == ei.CurLine && (l1->start <= ei.CurPos) && (ei.CurPos <= lend)){
delete cursorRegion;
cursorRegion = new LineRegion(*l1);
};
// column
if (showVerticalCross && crossZOrder == 0 && l1->start <= ecp_cl.DestPos && ecp_cl.DestPos < lend) {
color = convert(l1->styled());
if (foreDefault(color)) color = (color&0xF0) + (vertCrossColor&0xF);
if (backDefault(color)) color = (color&0xF) + (vertCrossColor&0xF0);
ecp_cl.StringNumber = lno;
ecp_cl.SrcPos = ecp.DestPos;
info->EditorControl(ECTL_TABTOREAL, &ecp_cl);
addFARColor(lno, ecp_cl.DestPos, ecp_cl.DestPos+1, color+0x10000);
vertCrossDone = true;
};
};
};
if (showVerticalCross && !vertCrossDone){
ecp_cl.StringNumber = lno;
ecp_cl.SrcPos = ecp.DestPos;
info->EditorControl(ECTL_TABTOREAL, &ecp_cl);
addFARColor(lno, ecp_cl.DestPos, ecp_cl.DestPos+1, vertCrossColor+0x10000);
};
};
/// pair brackets
PairMatch *pm = null;
if (drawPairs){
pm = baseEditor->searchLocalPair(ei.CurLine, ei.CurPos);
}
if (pm != null){
int color = convert(pm->start->styled());
if (showHorizontalCross){
if (foreDefault(color)) color = (color&0xF0) + (horzCrossColor&0xF);
if (backDefault(color)) color = (color&0xF) + (horzCrossColor&0xF0);
};
addFARColor(ei.CurLine, pm->start->start, pm->start->end, color);
if (showVerticalCross && !showHorizontalCross && pm->start->start <= ei.CurPos && ei.CurPos < pm->start->end){
color = convert(pm->start->styled());
if (foreDefault(color)) color = (color&0xF0) + (vertCrossColor&0xF);
if (backDefault(color)) color = (color&0xF) + (vertCrossColor&0xF0);
addFARColor(pm->sline, ei.CurPos, ei.CurPos+1, color+0x10000);
};
if (pm->eline != -1){
color = convert(pm->end->styled());
if (showHorizontalCross && pm->eline == ei.CurLine){
if (foreDefault(color)) color = (color&0xF0) + (horzCrossColor&0xF);
if (backDefault(color)) color = (color&0xF) + (horzCrossColor&0xF0);
};
addFARColor(pm->eline, pm->end->start, pm->end->end, color);
ecp.StringNumber = pm->eline;
ecp.SrcPos = ecp.DestPos;
info->EditorControl(ECTL_TABTOREAL, &ecp);
if (showVerticalCross && pm->end->start <= ecp.DestPos && ecp.DestPos < pm->end->end) {
color = convert(pm->end->styled());
if (foreDefault(color)) color = (color&0xF0) + (vertCrossColor&0xF);
if (backDefault(color)) color = (color&0xF) + (vertCrossColor&0xF0);
addFARColor(pm->eline, ecp.DestPos, ecp.DestPos+1, color+0x10000);
};
};
baseEditor->releasePairMatch(pm);
};
leaveHandler();
if (param != EEREDRAW_ALL){
inRedraw = true;
info->EditorControl(ECTL_REDRAW, EEREDRAW_ALL);
inRedraw = false;
};
return true;
}
