Source/windows/Morphwizard/SyntaxColorizer.cpp - master - bear/aot

Source/windows/Morphwizard/SyntaxColorizer.cpp
135 строк3 KB
sokirko74
distribute over folders
01 дек 2021, 21:21
01 дек 2021, 21:219bdfb1a
// SyntaxColorizer.cpp: implementation of the CSyntaxColorizer class.
//
// Version:	1.0.0
// Author:	Jeff Schering jeffschering@hotmail.com
// Date:	Jan 2001
// Copyright 2001 by Jeff Schering
//
//////////////////////////////////////////////////////////////////////

#include "stdafx.h"
#include "SyntaxColorizer.h"

#define CLR_PLAIN					RGB(0,0,0)
#define CLR_BKGRD					RGB(255,255,255)
#define CLR_BKGRD_MODIFIED			RGB(210,200,220)
#define CLR_BKGRD_UNKNOWN_ACCENT	RGB(255,230,230)

CSyntaxColorizer::CSyntaxColorizer()
{
	ZeroMemory(&m_cfDefault,sizeof(m_cfDefault));

	m_cfDefault.dwMask = CFM_CHARSET | CFM_FACE | CFM_SIZE | CFM_OFFSET | CFM_COLOR 
		| CFM_BACKCOLOR;
	m_cfDefault.dwEffects = CFE_AUTOBACKCOLOR;

	m_cfDefault.yHeight = 200; //10pts * 20 twips/point = 200 twips
	m_cfDefault.bCharSet = ANSI_CHARSET;
	m_cfDefault.bPitchAndFamily = FIXED_PITCH | FF_MODERN;
	m_cfDefault.yOffset = 0;
	m_cfDefault.crTextColor = CLR_PLAIN;
	_tcscpy(m_cfDefault.szFaceName, _T("Courier New"));
	m_cfDefault.crBackColor = CLR_BKGRD;
	m_cfDefault.cbSize = sizeof(m_cfDefault);

}

void CSyntaxColorizer::InitializeParser(IsKeyWordFunction Func, void* UserData)
{
	IsKeyWord = Func;
	m_UserData = UserData;
}

bool is_alpha_digit(TCHAR c) 
{
	return ::_istalpha(c) || c == '_';
}

void CSyntaxColorizer::Colorize( CRichEditCtrl *pCtrl, int lineIndex, bool bModified ) 
{
	CString SourceText;
	pCtrl->GetWindowText(SourceText);
	int k = SourceText.Replace(_T("\r\n"), _T("\n"));
	
	long nStartChar=0, nEndChar=SourceText.GetLength();
	
	if( lineIndex>=-1 && lineIndex < pCtrl->GetLineCount() ) 
	{
		nStartChar = pCtrl->LineIndex(lineIndex);
		nEndChar = nStartChar + pCtrl->LineLength(lineIndex);
	}

	CHARFORMAT2 cf = m_cfDefault;
	if( bModified ) 
	{
		cf.crBackColor = CLR_BKGRD_MODIFIED;
		cf.dwEffects = 0;
	}

	pCtrl->SetSel(nStartChar,nEndChar);
	pCtrl->SetSelectionCharFormat(cf);

	cf = m_cfDefault;
	cf.dwMask = CFM_BOLD;
	cf.crBackColor = CLR_BKGRD_UNKNOWN_ACCENT;
	cf.dwEffects = CFE_BOLD;

	for( int wordStart=nStartChar; wordStart<nEndChar; )
	{
		int lineEnd = SourceText.Find(_T("\n"), wordStart);
		if( lineEnd==-1 || lineEnd>nEndChar ) lineEnd=nEndChar;
		// пропускаем пробелы в начале строки
		for( ; wordStart<lineEnd && SourceText[wordStart]==' '; ++wordStart );
		if( wordStart<lineEnd ) 
		{
			// ищем ударение
			bool hasAccent=false;
			int i=wordStart;
			for( ; i<lineEnd && SourceText[i]!=' '; ++i )
			{	
				if( SourceText[i]=='\'' ) hasAccent=true;
			}

			if( !hasAccent ) 
				cf.dwMask |= CFM_BACKCOLOR;
			else
				cf.dwMask &= ~CFM_BACKCOLOR;

			pCtrl->SetSel(wordStart, i);
			pCtrl->SetSelectionCharFormat(cf);
		}
		wordStart = lineEnd + 1;
	}

	cf = m_cfDefault;
	cf.dwMask = CFM_BOLD | CFM_COLOR;
	cf.dwEffects = 0;

	const size_t MaxKeyWordLen = 50;
	TCHAR buffer[MaxKeyWordLen+1];
	for (long x = nStartChar; x < nEndChar; x++)
	{
		long end = x;
		for (; ((end - x) < MaxKeyWordLen) && is_alpha_digit(SourceText.GetAt(end)); end++)
			buffer[end - x] = SourceText.GetAt(end);

		if (end == x) 
			continue;

		if ( (end - x) >= MaxKeyWordLen)
		{
			while (is_alpha_digit(SourceText.GetAt(end)))
				end++;
		}
		else
		{
			buffer[end-x] = 0;
			if (IsKeyWord(buffer, cf.crTextColor, m_UserData))
			{
				pCtrl->SetSel(x, end);
				pCtrl->SetSelectionCharFormat(cf);
			};
		};
		x = end;
	}
}