ultimatepp/uppsrc/ide/Browser/Lay.cpp

#include "Browser.h"

#define LTIMING(x) // RTIMING(x)
#define LDUMP(x)   // DUMP(x)

void LaySkipRest(CParser& p)
{
	int lvl = 1;
	while(!p.IsEof()) {
		if(p.Char('('))
			lvl++;
		else
		if(p.Char(')')) {
			if(--lvl == 0)
				break;
		}
		else
			p.SkipTerm();
	}
}

inline void WriteLines(String& r, int count)
{
	for (int i = 0; i < count; ++i)
		r << '\n';
}

String PreprocessLayFile(const char *fn)
{
	LTIMING("Lay file");
	String s = LoadFile(fn);
	CParser p(s);

	String r = "using namespace Upp;";
	try {
		int line = p.GetLine();
		if(p.Char('#') && p.Id("ifdef")) {
			if(!p.Id("LAYOUTFILE"))
				p.Id("LAYOUT");
			WriteLines(r, p.GetLine() - line);
		}
		while(!p.IsEof()) {
			line = p.GetLine();
			p.PassId("LAYOUT");
			p.PassChar('(');
			String id = p.ReadId();
			r << "void SetLayout_" + id + "(); template <class T> struct With" << id << " : public T {"
			  << "\tstatic Size GetLayoutSize();";
			LaySkipRest(p);
			WriteLines(r, p.GetLine() - line);
			for(;;) {
				line = p.GetLine();
				if(p.Id("ITEM")) {
					p.PassChar('(');
					if(p.IsId()) {
						String type = p.ReadIdt();
						int q = type.ReverseFind(':');
						if(q >= 0)
							type = type.Mid(q + 1);
						p.PassChar(',');
						String name = p.ReadId();
						if(!name.StartsWith("dv___")) {
							r << '\t' << type;
							r << ' ' << name << ";";
						}
					}
				}
				else
				if(p.Id("UNTYPED"))
					p.Char('(');
				else
					break;
				LaySkipRest(p);
				WriteLines(r, p.GetLine() - line);
			}
			line = p.GetLine();
			p.PassId("END_LAYOUT");
			if(p.Char('#'))
				p.Id("endif");
			r << "};";
			WriteLines(r, p.GetLine() - line);
		}
	}
	catch(CParser::Error) {}
	LDUMP(r);
	return r;
}