public new static DefinicjaFunkcji Parsuj(ITokenizer tokenizer)
{
DefinicjaFunkcji funkcja = new DefinicjaFunkcji();
if (tokenizer.Next() == HCPSToken.Word)
{
funkcja.Nazwa = tokenizer.Value;
// odczytanie nazw argumentów
if (tokenizer.Next() == HCPSToken.ParenthesisOpen)
{
List <ZmiennaParametr> argumenty = new List <ZmiennaParametr>();
HCPSToken token = HCPSToken.Unknown;
while ((token = tokenizer.Next()) == HCPSToken.Variable)
{
argumenty.Add(new ZmiennaParametr()
{
Nazwa = tokenizer.Value
});
if (tokenizer.Next() != HCPSToken.CommaSeparator)
{
tokenizer.Back();
}
}
funkcja.argumenty = argumenty.ToArray();
if (token != HCPSToken.ParenthesisClose)
{
throw new Exception(string.Format(UI.Language.Instance.GetString(UI.UIStrings.IncorrectFunctionDefinition), tokenizer.GetPosition(tokenizer.Position)));
}
}
else
{
throw new Exception(string.Format(UI.Language.Instance.GetString(UI.UIStrings.IncorrectFunctionDefinition), tokenizer.GetPosition(tokenizer.Position)));
}
if (tokenizer.Next() == HCPSToken.BlockBegin)
{
List <Akcje> akcje = new List <Akcje>();
do
{
Akcje a = Akcje.Parsuj(tokenizer);
if (a != null)
{
akcje.Add(a);
}
}while (tokenizer.LastToken != HCPSToken.BlockEnd);
funkcja.akcje = akcje.ToArray();
funkcja.Check();
return(funkcja);
}
}
throw new Exception(string.Format(UI.Language.Instance.GetString(UI.UIStrings.IncorrectFunctionDefinition), tokenizer.GetPosition(tokenizer.Position)));
}
public FunkcjaInformacje PobierzFunkcje(string nazwa)
{
DefinicjaFunkcji funkcja = _funkcje.Find(delegate(DefinicjaFunkcji f)
{
return(f.Nazwa == nazwa);
});
if (funkcja == null)
{
throw new Exception(string.Format(UI.Language.Instance.GetString(UI.UIStrings.FunctionNotFound), nazwa));
}
return(new FunkcjaInformacje()
{
Funkcja = new FunkcjaDelegate(funkcja.Wykonaj),
Nazwa = funkcja.Nazwa,
IloscParametrow = funkcja.argumenty.Length
});
}
private static void DodajFunkcje(HCPSTokenizer tokenizer, List <DefinicjaFunkcji> funkcje, DefinicjaFunkcji funkcja)
{
DefinicjaFunkcji f = funkcje.Find(delegate(DefinicjaFunkcji o)
{
return(o.Nazwa == funkcja.Nazwa);
});
if (f != null)
{
if (tokenizer == null)
{
throw new ParsingScriptException(string.Format(UI.Language.Instance.GetString(UI.UIStrings.FunctionRedefinition), f.Nazwa));
}
else
{
throw new ParsingScriptException(string.Format(UI.Language.Instance.GetString(UI.UIStrings.FunctionRedefinition2), f.Nazwa, tokenizer.GetPosition(tokenizer.Position)));
}
}
funkcje.Add(funkcja);
}
private static Skrypt[] ParsujHCPS(string nazwaPliku, IProgress progress, List <string> included, Dictionary <string, Skrypt[]> scripts, bool bindObjects)
{
string fileNameLower = nazwaPliku.ToLowerInvariant();
if (included.Contains(fileNameLower))
{
if (scripts.ContainsKey(fileNameLower))
{
return(scripts[fileNameLower]);
}
}
else
{
included.Add(fileNameLower);
}
List <Skrypt> result = new List <Skrypt>();
string info = string.Format(UI.Language.Instance.GetString(UI.UIStrings.LoadingFile), nazwaPliku);
progress.Progress(info, "");
// utworzenie tokenizera
HCPSTokenizer tokenizer = new HCPSTokenizer(nazwaPliku);
HCPSToken token = HCPSToken.Unknown;
while ((token = tokenizer.Next()) != HCPSToken.EOF)
{
while (token == HCPSToken.Comment)
{
token = tokenizer.Next();
}
if (token == HCPSToken.EOF)
{
break;
}
if (token == HCPSToken.Word && tokenizer.Value.ToLowerInvariant() == "script")
{
// chyba mamy skrypt
token = tokenizer.Next();
if (token == HCPSToken.String)
{
// nazwa slryptu
// sprawdzenie czy skrytp o takiej nazwie nie istnieje
Skrypt skrypt = result.Find(delegate(Skrypt o)
{
return(o.Nazwa == tokenizer.Value);
});
if (skrypt != null)
{
throw new ParsingScriptException(string.Format(UI.Language.Instance.GetString(UI.UIStrings.ScriptAlreadyExists), tokenizer.Value));
}
skrypt = new Skrypt();
skrypt.Nazwa = tokenizer.Value;
ZbiorWartosci2 slownik = null;
progress.Progress(info, string.Format(UI.Language.Instance.GetString(UI.UIStrings.LoadingScript), skrypt.Nazwa));
token = tokenizer.Next();
if (token == HCPSToken.BlockBegin)
{
// rozpoczęcie bloku
// odczytywanie po kolei co jest
List <Zmienna> zmienne = new List <Zmienna>();
List <Stala> stale = new List <Stala>();
List <DefinicjaFunkcji> funkcje = new List <DefinicjaFunkcji>();
List <Zdarzenie> zdarzenia = new List <Zdarzenie>();
List <IncludeStatement> includes = new List <IncludeStatement>();
while ((token = tokenizer.Next()) != HCPSToken.BlockEnd)
{
if (token == HCPSToken.Word)
{
if (progress.Cancel)
{
throw new ParsingScriptException(UI.Language.Instance.GetString(UI.UIStrings.LoadingScriptsFileCanceledByUser));
}
switch (tokenizer.Value.ToLowerInvariant())
{
case "variable":
// odczytanie zmiennej
Zmienna zmienna = Zmienna.Parsuj(tokenizer);
DodajZmienna(tokenizer, zmienne, zmienna);
break;
case "const":
// odczytanie stałej
Stala stala = Stala.Parsuj(tokenizer);
DodajStala(tokenizer, stale, stala);
break;
case "initialize":
// funkcja inicjalizująca
if (skrypt.Initialize != null)
{
throw new ParsingScriptException(string.Format(UI.Language.Instance.GetString(UI.UIStrings.SpecialEventRedefinition), tokenizer.GetPosition(tokenizer.Position), "initialize"));
}
if (tokenizer.Next() != HCPSToken.BlockBegin)
{
throw new ParsingScriptException(string.Format(UI.Language.Instance.GetString(UI.UIStrings.IncorrectSpecialEventDefinition), tokenizer.GetPosition(tokenizer.Position), "initialize"));
}
skrypt.Initialize = Akcje.Parsuj(tokenizer);
break;
case "output_started":
if (skrypt.OutputStarted != null)
{
throw new ParsingScriptException(string.Format(UI.Language.Instance.GetString(UI.UIStrings.SpecialEventRedefinition), tokenizer.GetPosition(tokenizer.Position), "output_started"));
}
if (tokenizer.Next() != HCPSToken.BlockBegin)
{
throw new ParsingScriptException(string.Format(UI.Language.Instance.GetString(UI.UIStrings.IncorrectSpecialEventDefinition), tokenizer.GetPosition(tokenizer.Position), "output_started"));
}
skrypt.OutputStarted = Akcje.Parsuj(tokenizer);
break;
case "output_stopped":
if (skrypt.OutputStopped != null)
{
throw new ParsingScriptException(string.Format(UI.Language.Instance.GetString(UI.UIStrings.SpecialEventRedefinition), tokenizer.GetPosition(tokenizer.Position), "output_stopped"));
}
if (tokenizer.Next() != HCPSToken.BlockBegin)
{
throw new ParsingScriptException(string.Format(UI.Language.Instance.GetString(UI.UIStrings.IncorrectSpecialEventDefinition), tokenizer.GetPosition(tokenizer.Position), "output_stopped"));
}
skrypt.OutputStopped = Akcje.Parsuj(tokenizer);
break;
case "input_started":
if (skrypt.InputStarted != null)
{
throw new ParsingScriptException(string.Format(UI.Language.Instance.GetString(UI.UIStrings.SpecialEventRedefinition), tokenizer.GetPosition(tokenizer.Position), "input_started"));
}
if (tokenizer.Next() != HCPSToken.BlockBegin)
{
throw new ParsingScriptException(string.Format(UI.Language.Instance.GetString(UI.UIStrings.IncorrectSpecialEventDefinition), tokenizer.GetPosition(tokenizer.Position), "input_started"));
}
skrypt.InputStarted = Akcje.Parsuj(tokenizer);
break;
case "input_stopped":
if (skrypt.InputStopped != null)
{
throw new ParsingScriptException(string.Format(UI.Language.Instance.GetString(UI.UIStrings.SpecialEventRedefinition), tokenizer.GetPosition(tokenizer.Position), "input_stopped"));
}
if (tokenizer.Next() != HCPSToken.BlockBegin)
{
throw new ParsingScriptException(string.Format(UI.Language.Instance.GetString(UI.UIStrings.IncorrectSpecialEventDefinition), tokenizer.GetPosition(tokenizer.Position), "input_stopped"));
}
skrypt.InputStopped = Akcje.Parsuj(tokenizer);
break;
case "uninitialize":
if (skrypt.Uninitialize != null)
{
throw new ParsingScriptException(string.Format(UI.Language.Instance.GetString(UI.UIStrings.SpecialEventRedefinition), tokenizer.GetPosition(tokenizer.Position), "uninitialize"));
}
if (tokenizer.Next() != HCPSToken.BlockBegin)
{
throw new ParsingScriptException(string.Format(UI.Language.Instance.GetString(UI.UIStrings.IncorrectSpecialEventDefinition), tokenizer.GetPosition(tokenizer.Position), "uninitialize"));
}
skrypt.Uninitialize = Akcje.Parsuj(tokenizer);
break;
case "variable_changed":
// zdarzenie zmiany wartości zmiennej
ZmianaZmiennej zmianaZmiennej = ZmianaZmiennej.Parsuj(tokenizer);
DodajZdarzenieZmiennej(tokenizer, zdarzenia, zmianaZmiennej);
break;
case "variables_changed":
// zdarzenie zmiany wielu zmiennych
ZmianaZmiennych zmianaZmiennych = ZmianaZmiennych.Parsuj(tokenizer);
DodajZdarzenieZmiennych(tokenizer, zdarzenia, zmianaZmiennych);
break;
case "function":
// funkcja
DefinicjaFunkcji funkcja = DefinicjaFunkcji.Parsuj(tokenizer);
DodajFunkcje(tokenizer, funkcje, funkcja);
break;
case "include":
IncludeStatement include = IncludeStatement.Parsuj(tokenizer);
IncludeStatement includeF = includes.Find(delegate(IncludeStatement o)
{
return(o.FilePath.ToLowerInvariant() == include.FilePath.ToLowerInvariant() && o.ScriptName == include.ScriptName);
});
if (includeF != null)
{
throw new Exception();
}
includes.Add(include);
break;
default:
throw new ParsingScriptException(string.Format(UI.Language.Instance.GetString(UI.UIStrings.UnsuportedDefinitionType), tokenizer.Value, tokenizer.GetPosition(tokenizer.Position)));
}
}
else
{
if (token != HCPSToken.Comment)
{
throw new ParsingScriptException(string.Format(UI.Language.Instance.GetString(UI.UIStrings.ScriptSyntaxError), tokenizer.GetPosition(tokenizer.Position)));
}
}
}
// TODO obsługa dyrektyw include
if (includes.Count > 0)
{
foreach (IncludeStatement inc in includes)
{
string includeFileName = inc.FilePath.ToLowerInvariant();
if (included.Contains(includeFileName))
{
continue;
}
if (includeFileName == fileNameLower)
{
throw new ParsingScriptException(string.Format(UI.Language.Instance.GetString(UI.UIStrings.CannotJoinScriptsFromOneFile)));
}
if (!Path.IsPathRooted(inc.FilePath))
{
string dir = nazwaPliku.Substring(0, nazwaPliku.Length - Path.GetFileName(nazwaPliku).Length);
inc.FilePath = Path.Combine(dir, inc.FilePath);
}
Skrypt[] skrypty = ParsujHCPS(inc.FilePath, progress, included, scripts, false);
Skrypt skryptInc = Array.Find <Skrypt>(skrypty, delegate(Skrypt o)
{
return(o.Nazwa.ToLowerInvariant() == inc.ScriptName.ToLowerInvariant());
});
if (skryptInc != null)
{
skrypt.Initialize = PolaczAkcje(skrypt.Initialize, skryptInc.Initialize);
skrypt.OutputStarted = PolaczAkcje(skrypt.OutputStarted, skryptInc.OutputStarted);
skrypt.OutputStopped = PolaczAkcje(skrypt.OutputStopped, skryptInc.OutputStopped);
skrypt.InputStarted = PolaczAkcje(skrypt.InputStarted, skryptInc.InputStarted);
skrypt.InputStopped = PolaczAkcje(skrypt.InputStopped, skryptInc.InputStopped);
for (int i = 0; i < skryptInc.Zmienne.Length; i++)
{
DodajZmienna(null, zmienne, skryptInc.Zmienne[i]);
}
for (int i = 0; i < skryptInc.Stale.Length; i++)
{
DodajStala(null, stale, skryptInc.Stale[i]);
}
for (int i = 0; i < skryptInc.Funkcje.Length; i++)
{
DodajFunkcje(null, funkcje, skryptInc.Funkcje[i]);
}
for (int i = 0; i < skryptInc.Zdarzenia.Length; i++)
{
DodajZdarzenie(null, zdarzenia, skryptInc.Zdarzenia[i]);
}
}
else
{
throw new ParsingScriptException(string.Format(UI.Language.Instance.GetString(UI.UIStrings.ScriptNotFoundInFile), inc.FilePath, inc.ScriptName));
}
}
}
slownik = new ZbiorWartosci2(zmienne, stale, funkcje);
skrypt.Zmienne = zmienne.ToArray();
skrypt.Stale = stale.ToArray();
skrypt.Funkcje = funkcje.ToArray();
skrypt.Zdarzenia = zdarzenia.ToArray();
}
else
{
throw new ParsingScriptException(string.Format(UI.Language.Instance.GetString(UI.UIStrings.ScriptSyntaxError), tokenizer.GetPosition(tokenizer.Position)));
}
// przepisanie referencji zmiennych, stałych i funkcji
if (bindObjects)
{
skrypt.PrzypiszReferencje(slownik);
}
result.Add(skrypt);
}
else
{
throw new ParsingScriptException(string.Format(UI.Language.Instance.GetString(UI.UIStrings.ScriptSyntaxError), tokenizer.GetPosition(tokenizer.Position)));
}
}
else
{
throw new ParsingScriptException(string.Format(UI.Language.Instance.GetString(UI.UIStrings.UnrecognizedString), tokenizer.Value, tokenizer.GetPosition(tokenizer.Position)));
}
}
result.Sort();
return(result.ToArray());
}