ultimatepp/uppsrc/ide/Builders/ScriptBuilder.cpp
mdelfede 263ff5f895 changed svn layout
git-svn-id: svn://ultimatepp.org/upp/trunk@281 f0d560ea-af0d-0410-9eb7-867de7ffcac7
2008-06-07 22:31:27 +00:00

343 lines
8.3 KiB
C++

#include "Builders.h"
#include <Esc/Esc.h>
EscValue ScriptBuilder::ExecuteIf(const char *fn, Vector<EscValue>& args)
{
CheckParse();
EscValue out;
int f = globals.Find(fn);
if(f < 0)
return out;
try
{
out = ::Execute(globals, NULL, globals[f], args, 50000);
}
catch(Exc e)
{
script_error = true;
PutConsole(e);
}
return out;
}
EscValue ScriptBuilder::ExecuteIf(const char *fn)
{
Vector<EscValue> args;
return ExecuteIf(fn, args);
}
EscValue ScriptBuilder::ExecuteIf(const char *fn, EscValue arg)
{
Vector<EscValue> args;
args.Add(arg);
return ExecuteIf(fn, args);
}
EscValue ScriptBuilder::ExecuteIf(const char *fn, EscValue arg1, EscValue arg2)
{
Vector<EscValue> args;
args.Add(arg1);
args.Add(arg2);
return ExecuteIf(fn, args);
}
EscValue ScriptBuilder::ExecuteIf(const char *fn, EscValue arg1, EscValue arg2, EscValue arg3)
{
Vector<EscValue> args;
args.Add(arg1);
args.Add(arg2);
args.Add(arg3);
return ExecuteIf(fn, args);
}
void ScriptBuilder::ESC_Execute(EscEscape& e)
{
e = Execute(String(e[0])) ? 0 : 1;
}
void ScriptBuilder::ESC_PutConsole(EscEscape& e)
{
PutConsole(String(e[0]));
}
void ScriptBuilder::ESC_PutVerbose(EscEscape& e)
{
PutVerbose(String(e[0]));
}
void ScriptBuilder::CheckParse()
{
if(is_parsed)
return;
script_error = false;
is_parsed = true;
StdLib(globals);
Escape(globals, "Execute(cmdline)", THISBACK(ESC_Execute));
Escape(globals, "PutConsole(text)", THISBACK(ESC_PutConsole));
Escape(globals, "PutVerbose(text)", THISBACK(ESC_PutVerbose));
EscValue inclist;
inclist.SetEmptyArray();
for(int i = 0; i < include.GetCount(); i++)
inclist.ArrayAdd(GetHostPathQ(include[i]));
globals.GetAdd("INCLUDE") = inclist;
EscValue liblist;
liblist.SetEmptyArray();
for(int i = 0; i < libpath.GetCount(); i++)
liblist.ArrayAdd(GetHostPathQ(libpath[i]));
globals.GetAdd("LIBPATH") = liblist;
try
{
String sdata = LoadFile(script);
if(IsNull(sdata))
throw Exc(NFormat("%s: not found or empty", script));
CParser parser(sdata, script, 1);
while(!parser.IsEof()) {
String id = parser.ReadId();
globals.GetAdd(id) = ReadLambda(parser);
}
}
catch(Exc e)
{
script_error = true;
PutConsole(e);
}
}
bool ScriptBuilder::BuildPackage(const String& package, Vector<String>& linkfile, String& linkoptions,
const Vector<String>& all_uses, const Vector<String>& all_libraries, int)
{
int i;
String packagepath = PackagePath(package);
Package pkg;
pkg.Load(packagepath);
String packagedir = GetFileFolder(packagepath);
ChDir(packagedir);
PutVerbose("cd " + packagedir);
Vector<String> obj;
script_error = false;
String gfl = Gather(pkg.option, config.GetKeys());
Vector<String> sfile;
Vector<String> soptions;
bool error = false;
for(i = 0; i < pkg.GetCount(); i++) {
if(!IdeIsBuilding())
return false;
if(!pkg[i].separator) {
String gop = Gather(pkg[i].option, config.GetKeys());
Vector<String> srcfile = CustomStep(SourcePath(package, pkg[i]));
if(srcfile.GetCount() == 0)
error = true;
for(int j = 0; j < srcfile.GetCount(); j++) {
String fn = srcfile[j];
String ext = ToLower(GetFileExt(fn));
if(ext == ".c" || ext == ".cpp" || ext == ".cc" || ext == ".cxx" ||
(ext == ".rc" && HasFlag("WIN32"))) {
sfile.Add(fn);
soptions.Add(gfl + " " + gop);
}
else
if(ext == ".o")
obj.Add(fn);
else
if(ext == ".a" || ext == ".so")
linkfile.Add(fn);
}
}
}
/*
if(HasFlag("BLITZ")) {
Blitz b = BlitzStep(sfile, soptions, obj, ".o");
if(b.build) {
PutConsole("BLITZ:" + b.info);
int time = GetTickCount();
if(Execute(cc + " " + GetHostPathQ(b.path) + " -o " + GetHostPathQ(b.object)) == 0)
PutCompileTime(time, b.count);
else
error = true;
}
}
*/
int time = GetTickCount();
int ccount = 0;
for(i = 0; i < sfile.GetCount() && !script_error; i++) {
if(!IdeIsBuilding())
return false;
String fn = sfile[i];
String ext = ToLower(GetFileExt(fn));
// bool rc = ext == ".rc";
String objfile = ExecuteIf("objectfile", fn);
if(script_error)
return false;
if(IsNull(objfile))
objfile = CatAnyPath(outdir, GetFileTitle(fn) + ".o");
if(HdependFileTime(fn) > GetFileTime(GetHostPath(objfile))) {
PutConsole(GetFileName(fn));
int time = GetTickCount();
if(!ExecuteIf("compile", GetHostPathQ(fn), GetHostPathQ(objfile), soptions[i]).GetNumber()) {
DeleteFile(objfile);
error = true;
}
PutVerbose("compiled in " + GetPrintTime(time));
ccount++;
}
obj.Add(objfile);
}
if(ccount)
PutCompileTime(time, ccount);
if(error || script_error)
return false;
linkoptions << Gather(pkg.link, config.GetKeys());
Vector<String> libs = Split(Gather(pkg.library, config.GetKeys()), ' ');
linkfile.Append(libs);
time = GetTickCount();
if(!HasFlag("MAIN")) {
if(HasFlag("NOLIB")) {
linkfile.Append(obj);
return true;
}
String product = ExecuteIf("libraryfile", package);
if(IsNull(product))
product = CatAnyPath(outdir, GetAnyFileName(package) + ".a");
Time producttime = GetFileTime(product);
linkfile.Add("*" + product); //!! ugly
for(int i = 0; i < obj.GetCount(); i++)
if(GetFileTime(obj[i]) > producttime) {
PutConsole("Creating library...");
DeleteFile(product);
EscValue objlist;
objlist.SetEmptyArray();
for(int i = 0; i < obj.GetCount(); i++)
objlist.ArrayAdd(GetHostPathQ(obj[i]));
if(!ExecuteIf("library", objlist, product).GetNumber()) {
DeleteFile(product);
error = true;
return false;
}
PutConsole(String().Cat() << product << " (" << GetFileInfo(product).length
<< " B) created in " << GetPrintTime(time));
break;
}
return true;
}
obj.Append(linkfile);
linkfile = obj;
return true;
}
bool ScriptBuilder::Link(const Vector<String>& linkfile, const String& linkoptions, bool)
{
int time = GetTickCount();
for(int i = 0; i < linkfile.GetCount(); i++)
if(GetFileTime(linkfile[i]) >= targettime) {
EscValue objlist;
objlist.SetEmptyArray();
EscValue liblist;
liblist.SetEmptyArray();
for(i = 0; i < linkfile.GetCount(); i++)
if(*linkfile[i] == '*')
liblist.ArrayAdd(GetHostPathQ(linkfile[i].Mid(1)));
else
objlist.ArrayAdd(GetHostPathQ(linkfile[i]));
Vector<EscValue> linkargs;
linkargs.Add(objlist);
linkargs.Add(liblist);
linkargs.Add(GetHostPathQ(target));
linkargs.Add(linkoptions);
PutConsole("Linking...");
CustomStep(".pre-link");
if(!ExecuteIf("link", linkargs).GetNumber()) {
DeleteFile(target);
return false;
}
CustomStep(".post-link");
PutConsole(String().Cat() << GetHostPath(target) << " (" << GetFileInfo(target).length
<< " B) linked in " << GetPrintTime(time));
return true;
}
PutConsole(String().Cat() << GetHostPath(target) << " (" << GetFileInfo(target).length
<< " B) is up to date.");
return true;
}
bool ScriptBuilder::Preprocess(const String& package, const String& file, const String& target)
{
return ExecuteIf("preprocess", file, target).GetNumber();
}
Builder *CreateScriptBuilder()
{
return new ScriptBuilder;
}
void RegisterScriptBuilder()
{
RegisterBuilder("SCRIPT", CreateScriptBuilder);
}
/*
EscValue LayoutItem::CreateEsc() const
{
EscValue ctrl;
String tp = type;
String tm;
if(ParseTemplate(tp, tm)) {
CreateMethods(ctrl, tp, true);
ctrl("CtrlPaint") = ctrl("Paint");
CreateMethods(ctrl, tm, false);
}
else
CreateMethods(ctrl, tp, false);
for(int q = 0; q < property.GetCount(); q++) {
EscValue& w = ctrl(property[q].name);
const Value& v = ~property[q];
if(IsType<Font>(v))
w = EscFont(v);
if(IsString(v))
w = (WString)v;
if(IsNumber(v))
w = (double)v;
if(IsType<Color>(v))
w = EscColor(v);
}
ctrl("type") = (WString)type;
ctrl("GetSize") = ReadLambda(Format("() { return Size(%d, %d); }",
csize.cx, csize.cy));
ctrl("GetRect") = ReadLambda(Format("() { return Rect(0, 0, %d, %d); }",
csize.cx, csize.cy));
return ctrl;
}
EscValue LayoutItem::ExecuteMethod(const char *method, Vector<EscValue>& arg) const
{
try {
EscValue self = CreateEsc();
return ::Execute(UscGlobal(), &self, method, arg, 50000);
}
catch(CParser::Error& e) {
PutConsole(e + "\n");
}
return EscValue();
}
EscValue LayoutItem::ExecuteMethod(const char *method) const
{
Vector<EscValue> arg;
return ExecuteMethod(method, arg);
}
Size LayoutItem::GetMinSize()
{
return SizeEsc(ExecuteMethod("GetMinSize"));
}
*/