public static string DebugString(this DotvvmBindableObject control, DotvvmConfiguration?config = null, bool multiline = true)
{
if (control == null)
{
return("null");
}
config = config ?? (control.TryGeyValue(Internal.RequestContextProperty) as IDotvvmRequestContext)?.Configuration;
var type = control.GetType();
var properties = (from kvp in control.Properties
let p = kvp.Key
let rawValue = kvp.Value
where p.DeclaringType != typeof(Internal)
let isAttached = !p.DeclaringType.IsAssignableFrom(type)
orderby !isAttached, p.Name
let name = isAttached ? p.DeclaringType.Name + "." + p.Name : p.Name
let value = rawValue == null ? "<null>" :
rawValue is ITemplate ? "<a template>" :
rawValue is DotvvmBindableObject ? $"<control {rawValue.GetType()}>" :
rawValue is IEnumerable <DotvvmBindableObject> controlCollection ? $"<{controlCollection.Count()} controls>" :
rawValue is IEnumerable <object> collection ? string.Join(", ", collection) :
rawValue.ToString()
let croppedValue = value.Length > 41 ? value.Substring(0, 40) + "…" : value
select new { p, name, croppedValue, value, isAttached }
).ToArray();
var location = (file : control.TryGeyValue(Internal.MarkupFileNameProperty) as string, line : control.TryGeyValue(Internal.MarkupLineNumberProperty) as int? ?? -1);
var reg = config?.Markup.Controls.FirstOrDefault(c => c.Namespace == type.Namespace && Type.GetType(c.Namespace + "." + type.Name + ", " + c.Assembly) == type) ??
config?.Markup.Controls.FirstOrDefault(c => c.Namespace == type.Namespace) ??
config?.Markup.Controls.FirstOrDefault(c => c.Assembly == type.Assembly.GetName().Name);
var ns = reg?.TagPrefix ?? "?";
var tagName = type == typeof(HtmlGenericControl) ? ((HtmlGenericControl)control).TagName : ns + ":" + type.Name;
var dothtmlString = $"<{tagName} ";
var prefixLength = dothtmlString.Length;
foreach (var p in properties)
{
if (multiline && p != properties[0])
{
dothtmlString += "\n" + new string(' ', prefixLength);
}
dothtmlString += $"{p.name}={p.croppedValue}";
}
dothtmlString += "/>";
var from = (location.file)
+ (location.line >= 0 ? ":" + location.line : "");
if (!String.IsNullOrWhiteSpace(from))
{
from = (multiline ? "\n" : " ") + "from " + from.Trim();
}
return(dothtmlString + from);
}
public DotvvmControlException(DotvvmBindableObject control, string message, Exception innerException = null)
: base(message, innerException)
{
ControlType = control.GetType();
LineNumber = (int?)Internal.MarkupLineNumberProperty.GetValue(control);
if (control.Parent != null)
{
control = control.Parent;
}
FileName = (string)Internal.MarkupFileNameProperty.GetValue(control);
}