/// <summary>
/// Laad het bestand uit de reader in. Noteer voor functies in welk bestand ze zaten.
/// Let op niet nog een keer hetzelfde bestand te gaan laden. Voor je het weet zit je in een loop.
/// En een loop mag niet.
/// Een includefile mag geen code opleveren. Alleen: lege regels, regels met commentaar, en regels met alleen een enkele '@'
/// </summary>
/// <param name="filename">Naam van de file die we nu doen</param>
/// <param name="reader">De textlezer</param>
/// <param name="loadedfiles">Lijst files die we al gehad hebben, inclusief de 'filename'</param>
/// <param name="functioninfo">Lijst te vullen functies</param>
/// <param name="includefile">Als deze true is gaat het om een includefile</param>
/// <param name="conceptname">Als geen includefile, dan is conceptname gevuld met de naam van het type waarvoor gegenereerd is.
/// De file zelf kan hergebruikt worden in principe meerdere concepten, mits ze gelijke gegevens gebruiken natuurlijk</param>
/// <returns>De programmacode die niet in functies zat, elke regel voorafgegaan door het regelnummer</returns>
private StringCollection LoadSourceFromReader(String filename, TextReader reader, StringCollection loadedfiles, Hashtable functioninfo, bool includefile, string conceptname)
{
StringCollection sc = new StringCollection();
int linenr = 1; //linenr update
string s = reader.ReadLine();
while (s != null)
{
if (s.TrimStart().StartsWith("@"))
{
string sLineTrim = s.TrimStart().Substring(1).TrimStart();
if (sLineTrim.StartsWith("Function "))
{
SourceCodeContext fncontext = new SourceCodeContext(conceptname, filename, linenr++);
FunctionInfo fi = new FunctionInfo(fncontext, s);
s = reader.ReadLine();
while (s != null) // of bij EndFunction eruit gebroken...
{
sLineTrim = s.TrimStart();
if (sLineTrim.StartsWith("@"))
{
sLineTrim = sLineTrim.Substring(1).TrimStart() + " ";
if (sLineTrim.StartsWith("EndFunction "))
{
linenr++;
break;
}
}
fi.Add(linenr++.ToString() + ":" + s);
s = reader.ReadLine();
}
if (s == null)
{
throw new EndFunctionMissingException(fncontext, fi.Name);
}
if (functioninfo.Contains(fi.Name))
{
FunctionInfo otherone = functioninfo[fi.Name] as FunctionInfo;
throw new DuplicateFunctionDefinitionException(fncontext, fi.Name, otherone.DeclaredAt);
}
functioninfo.Add(fi.Name, fi);
s = reader.ReadLine();
continue;
}
if (sLineTrim.StartsWith("Include "))
{
// Verzamel eerst de handel in het aangegeven bestand.
// Merge de resultaten met de functioninfo van 'ons'.(check dat er geen dubbele functies in zitten.
// En ga verder met de rest.
String includefilename = sLineTrim.Substring(8).Trim();
if (loadedfiles.Contains(includefilename))
{
throw new IncludeFileLoopException(new SourceCodeContext(conceptname, filename, linenr), includefilename);
}
String includefilepath = TemplateUtil.Instance().CombineAndCompact(Path.GetDirectoryName(filename), includefilename);
if (!File.Exists(includefilepath))
{
throw new IncludeFileNotFoundException(new SourceCodeContext(conceptname, filename, linenr), includefilepath);
}
TextReader r = new StreamReader(includefilepath);
loadedfiles.Add(includefilename);
StringCollection files = new StringCollection();
foreach (string s1 in loadedfiles)
{
files.Add(s1);
}
Hashtable includedfncs = new Hashtable();
LoadSourceFromReader(includefilename, r, files, includedfncs, true, "");
// Neem nu de gelezen functies over in onze eigen lijst, check op dubbelen.
foreach (FunctionInfo fi in includedfncs.Values)
{
if (functioninfo.ContainsKey(fi.Name))
{
FunctionInfo otherone = functioninfo[fi.Name] as FunctionInfo;
throw new DuplicateFunctionDefinitionException(fi.DeclaredAt, fi.Name, otherone.DeclaredAt);
}
functioninfo.Add(fi.Name, fi);
}
//.. en alweer klaar.
linenr++;
s = reader.ReadLine();
continue;
}
if (sLineTrim.StartsWith("--") || sLineTrim == "")
{
linenr++;
s = reader.ReadLine();
continue;
}
}
if (includefile)
{
if (s.Trim() != "")
{
throw new IncludeFilesCanOnlyContainFunctionsException(new SourceCodeContext(conceptname, filename, linenr));
}
}
sc.Add(linenr.ToString() + ":" + s);
s = reader.ReadLine();
linenr++;
}
reader.Close();
return(sc);
}
/// <summary>
/// Add captions to the attribute list panel
/// </summary>
private void CreateLabels()
{
int adefidx = 0;
foreach (XmlNode a in m_definitions.SelectNodes("element"))
{
string strCaption;
if (a.Attributes["caption"] != null)
{
strCaption = a.Attributes["caption"].InnerText;
}
else
{
strCaption = TemplateUtil.Instance().InventCaptionForName(a.Attributes["name"].InnerText);
}
Label lblName = new Label();
lblName.Text = strCaption;
lblName.Height = m_starttop - 2;
string strToolTip = "";
if (a.Attributes["tooltip"] != null)
{
strToolTip = a.Attributes["tooltip"].Value;
}
strToolTip += "(" + a.Attributes["name"].Value + ")";
m_tt.SetToolTip(lblName, strToolTip);
// Walk all controls created for the attributedefinition
// and find out the leftmost position and rightmost position.
// Position label to leftmost, and let it extend to rightmost.
int leftmost = int.MaxValue;
int rightmost = 0;
if (m_AttributeControls.Count > adefidx)
{
foreach (Control c in (m_AttributeControls[adefidx] as ArrayList))
{
if (leftmost > c.Left)
{
leftmost = c.Left;
}
if (rightmost < c.Left + c.Width)
{
rightmost = c.Left + c.Width;
}
}
}
if (rightmost > 0) // any control found?
{
lblName.Name = "label_" + a.Attributes["name"].InnerText.Trim();
lblName.Left = leftmost;
lblName.Width = rightmost - leftmost;
m_panel.Controls.Add(lblName);
m_LabelControls.Add(lblName);
}
else
{
// make sure that label numbering conforms to definition number.
m_LabelControls.Add(null);
}
adefidx++;
}
}