public void GetSections(IEnumerable <string> Lines, IALSection Target)
{
var contents = String.Join("\r\n", Lines);
var sections = GetSections(contents);
Target.Sections = sections;
}
public void GetObjectProperties(IEnumerable <string> Lines, IALSection Target)
{
var firstMatch = false;
var pattern = @"\s+(.*?)\s+\=\s+(.*)\;$";
foreach (var line in Lines)
{
if (Regex.IsMatch(line, pattern))
{
if (!firstMatch)
{
firstMatch = true;
}
OnGetObjectProperty(line, Target, pattern);
}
else
{
if (firstMatch)
{
break;
}
}
}
}
public virtual void OnGetObjectProperty(string Line, IALSection Target, string pattern)
{
var match = Regex.Match(Line, pattern);
if (match.Groups.Count > 1)
{
var prop = new ALProperty {
Name = match.Groups[1].Value, Value = match.Groups[2].Value
};
Target.Properties.Add(prop);
}
}
public void GetComments(IEnumerable <string> Lines, IALSection Target)
{
var comments = GetComments(Lines);
Target.Comments = comments;
}
/// <summary>
/// Parse method of AL Object: triggers and procedures as well
/// </summary>
/// <param name="Lines">Array of textlines</param>
/// <param name="Target">Current ALObject instance</param>
public void GetMethods(IEnumerable <string> Lines, IALSection Target)
{
var pattern = @"^\s{0,4}(local procedure|procedure|trigger)\s+(.*?)\((.*?)\)\:?(.*)";
var procedures = Lines
.Where(w => Regex.IsMatch(w, pattern))
.ToList();
if (procedures.Count() == 0)
{
return;
}
Target.Methods = procedures
.Select(s =>
{
var method = new ALMethod();
method.IsLocal = s.Trim().StartsWith("local");
var match = Regex.Match(s, pattern);
switch (match.Groups[1].Value.ToLower())
{
case "procedure":
method.MethodKind = ALMethodKind.Method;
break;
case "trigger":
method.MethodKind = ALMethodKind.Trigger;
break;
}
method.Name = match.Groups[2].Value;
if (match.Groups.Count > 3)
{
var paramTxt = match.Groups[3].Value.Trim();
if (!string.IsNullOrEmpty(paramTxt))
{
method.Parameters = paramTxt.Split(';').Select(s =>
{
var result = new ALParameter();
var parts = s.Split(':');
result.IsVar = parts[0].Trim().StartsWith("var ");
result.Name = parts[0].Replace("var ", "").Trim();
result.TypeDefinition = new ALTypeDefinition {
Name = parts[1]
};
return(result);
}).ToList();
}
}
if (match.Groups.Count > 4)
{
method.ReturnTypeDefinition = new ALReturnTypeDefinition {
Name = match.Groups[4].Value
};
}
// Get Method body from var|begin to end;
var txtLines = Lines.ToList();
var start = txtLines.IndexOf(s) + 1;
var nextLine = txtLines.GetRange(start, txtLines.Count() - start - 1).FirstOrDefault(f => Regex.IsMatch(f, pattern));
var end = txtLines.IndexOf(nextLine);
string beginPattern = @"^\s{0,4}(begin)\s*$";
string beginText = txtLines.GetRange(start, txtLines.Count() - start - 1).FirstOrDefault(f => Regex.IsMatch(f, beginPattern));
if (!string.IsNullOrEmpty(beginText))
{
if (end == -1)
{
end = Lines.Count();
}
var bodyLines = txtLines.GetRange(start, end - start - 1);
var body = string.Join("\r\n", bodyLines);
var comments = GetComments(bodyLines);
method.MethodBody = new ALMethodBody
{
Comments = comments,
Content = body,
ContentLines = bodyLines
};
method.Content = body;
}
else
{
method.IsMethodDeclaration = true;
}
method.Attributes = new List <ALAttribute>();
// Check for Attributes
end = txtLines.IndexOf(s) - 1;
start = txtLines.IndexOf(s) - 1;
var testMethod = Lines.ElementAt(start);
while (testMethod.Trim() != String.Empty &&
!testMethod.ToLower().Contains("end;") &&
!testMethod.ToLower().Contains("{"))
{
if (testMethod.ToLower().Contains("[test"))
{
method.TestMethod = true;
//break;
}
var attrMatch = Regex.Match(testMethod, @"\[(\w+)(.*)\]");
if (attrMatch.Success)
{
var attr = new ALAttribute
{
Name = attrMatch.Groups[1].Value,
Content = testMethod.Trim()
};
attr.IsEvent = attr.Name.ToLower().Contains("event");
method.Attributes.Add(attr);
}
start -= 1;
if (start < 0)
{
break;
}
testMethod = Lines.ElementAt(start);
}
start += 1;
end += 1;
var linesAboveMethod = txtLines
.GetRange(start, end - start)
.Select(s => s.Trim())
.Where(w => !w.StartsWith("["));
//.Where(w => w.StartsWith("//") || w.StartsWith("/*") || w.EndsWith("*/"));
var txtAboveMethod = string.Join("\r\n", linesAboveMethod);
txtAboveMethod = txtAboveMethod
.Replace("///", "")
.Replace("//", "")
.Replace("/*", "")
.Replace("*/", "");
var methodComments = new List <ALComment>();
if (!string.IsNullOrEmpty(txtAboveMethod))
{
methodComments.Add(new ALComment
{
Content = txtAboveMethod.Trim(),
StartPos = start,
EndPos = end
});
}
method.Comments = methodComments;
return(method);
})
.ToList();
}
