internal static DkmClrValue GetNullableValue(this DkmClrValue value, Type nullableTypeArg, DkmInspectionContext inspectionContext) { var valueType = value.Type.GetLmrType(); if (valueType.Equals(nullableTypeArg)) { return(value); } return(value.GetNullableValue(inspectionContext)); }
private string GetUnderlyingStringImpl( DkmClrValue value, DkmInspectionContext inspectionContext ) { Debug.Assert(!value.IsError()); if (value.IsNull) { return(null); } var lmrType = value.Type.GetLmrType(); if (lmrType.IsEnum || lmrType.IsArray || lmrType.IsPointer) { return(null); } if (lmrType.IsNullable()) { var nullableValue = value.GetNullableValue(inspectionContext); return(nullableValue != null ? GetUnderlyingStringImpl(nullableValue, inspectionContext) : null); } if (lmrType.IsString()) { return((string)value.HostObjectValue); } else if (!IsPredefinedType(lmrType)) { // Check for special cased non-primitives that have underlying strings if (lmrType.IsType("System.Data.SqlTypes", "SqlString")) { var fieldValue = value.GetFieldValue( InternalWellKnownMemberNames.SqlStringValue, inspectionContext ); return(fieldValue.HostObjectValue as string); } else if (lmrType.IsOrInheritsFrom("System.Xml.Linq", "XNode")) { return(value.EvaluateToString(inspectionContext)); } } return(null); }
private string GetUnderlyingStringImpl(DkmClrValue value) { if (value.IsNull) { return(null); } var lmrType = value.Type.GetLmrType(); if (lmrType.IsEnum || lmrType.IsArray || lmrType.IsPointer) { return(null); } if (lmrType.IsNullable()) { var nullableValue = value.GetNullableValue(); return(nullableValue != null?GetUnderlyingStringImpl(nullableValue) : null); } if (lmrType.IsString()) { return((string)value.HostObjectValue); } else if (!IsPredefinedType(lmrType)) { // Check for special cased non-primitives that have underlying strings if (string.Equals(lmrType.FullName, "System.Data.SqlTypes.SqlString", StringComparison.Ordinal)) { var fieldValue = value.GetFieldValue(InternalWellKnownMemberNames.SqlStringValue); return(fieldValue.HostObjectValue as string); } do { if (string.Equals(lmrType.FullName, "System.Xml.Linq.XNode", StringComparison.Ordinal)) { return(value.EvaluateToString()); } lmrType = lmrType.BaseType; }while (lmrType != null); } return(null); }
internal string GetValueString(DkmClrValue value, ObjectDisplayOptions options, GetValueFlags flags) { if (value.IsError()) { return((string)value.HostObjectValue); } if (UsesHexadecimalNumbers(value)) { options |= ObjectDisplayOptions.UseHexadecimalNumbers; } var lmrType = value.Type.GetLmrType(); if (IsPredefinedType(lmrType) && !lmrType.IsObject()) { if (lmrType.IsString()) { var stringValue = (string)value.HostObjectValue; if (stringValue == null) { return(_nullString); } return(IncludeObjectId( value, FormatString(stringValue, options), flags)); } else if (lmrType.IsCharacter()) { return(IncludeObjectId( value, FormatLiteral((char)value.HostObjectValue, options | ObjectDisplayOptions.IncludeCodePoints), flags)); } else { return(IncludeObjectId( value, FormatPrimitive(value, options & ~ObjectDisplayOptions.UseQuotes), flags)); } } else if (value.IsNull && !lmrType.IsPointer) { return(_nullString); } else if (lmrType.IsEnum) { return(IncludeObjectId( value, GetEnumDisplayString(lmrType, value, options, (flags & GetValueFlags.IncludeTypeName) != 0), flags)); } else if (lmrType.IsArray) { return(IncludeObjectId( value, GetArrayDisplayString(lmrType, value.ArrayDimensions, value.ArrayLowerBounds, options), flags)); } else if (lmrType.IsPointer) { // NOTE: the HostObjectValue will have a size corresponding to the process bitness // and FormatPrimitive will adjust accordingly. var tmp = FormatPrimitive(value, ObjectDisplayOptions.UseHexadecimalNumbers); // Always in hex. Debug.Assert(tmp != null); return(tmp); } else if (lmrType.IsNullable()) { var nullableValue = value.GetNullableValue(); // It should be impossible to nest nullables, so this recursion should introduce only a single extra stack frame. return(nullableValue == null ? _nullString : GetValueString(nullableValue, ObjectDisplayOptions.None, GetValueFlags.IncludeTypeName)); } // "value.EvaluateToString()" will check "Call string-conversion function on objects in variables windows" // (Tools > Options setting) and call "value.ToString()" if appropriate. return(IncludeObjectId( value, string.Format(_defaultFormat, value.EvaluateToString() ?? value.InspectionContext.GetTypeName(value.Type)), flags)); }
internal EvalResultDataItem CreateDataItem( DkmInspectionContext inspectionContext, string name, Type typeDeclaringMember, Type declaredType, DkmClrValue value, EvalResultDataItem parent, ExpansionFlags expansionFlags, bool childShouldParenthesize, string fullName, ReadOnlyCollection <string> formatSpecifiers, DkmEvaluationResultCategory category, DkmEvaluationResultFlags flags, DkmEvaluationFlags evalFlags) { if ((evalFlags & DkmEvaluationFlags.ShowValueRaw) != 0) { formatSpecifiers = Formatter.AddFormatSpecifier(formatSpecifiers, "raw"); } Expansion expansion; // If the declared type is Nullable<T>, the value should // have no expansion if null, or be expanded as a T. var lmrNullableTypeArg = declaredType.GetNullableTypeArgument(); if (lmrNullableTypeArg != null && !value.HasExceptionThrown(parent)) { Debug.Assert(value.Type.GetProxyType() == null); var nullableValue = value.GetNullableValue(inspectionContext); if (nullableValue == null) { Debug.Assert(declaredType.Equals(value.Type.GetLmrType())); // No expansion of "null". expansion = null; } else { value = nullableValue; Debug.Assert(lmrNullableTypeArg.Equals(value.Type.GetLmrType())); // If this is not the case, add a test for includeRuntimeTypeIfNecessary. expansion = this.GetTypeExpansion(inspectionContext, lmrNullableTypeArg, value, ExpansionFlags.IncludeResultsView); } } else if (value.IsError() || (inspectionContext.EvaluationFlags & DkmEvaluationFlags.NoExpansion) != 0) { expansion = null; } else { expansion = DebuggerTypeProxyExpansion.CreateExpansion( this, inspectionContext, name, typeDeclaringMember, declaredType, value, childShouldParenthesize, fullName, flags.Includes(DkmEvaluationResultFlags.ExceptionThrown) ? null : fullName, formatSpecifiers, flags, this.Formatter.GetEditableValue(value, inspectionContext)); if (expansion == null) { var expansionType = value.HasExceptionThrown(parent) ? value.Type.GetLmrType() : declaredType; expansion = this.GetTypeExpansion(inspectionContext, expansionType, value, expansionFlags); } } return(new EvalResultDataItem( ExpansionKind.Default, name, typeDeclaringMember, declaredType, parent: parent, value: value, displayValue: null, expansion: expansion, childShouldParenthesize: childShouldParenthesize, fullName: fullName, childFullNamePrefixOpt: flags.Includes(DkmEvaluationResultFlags.ExceptionThrown) ? null : fullName, formatSpecifiers: formatSpecifiers, category: category, flags: flags, editableValue: this.Formatter.GetEditableValue(value, inspectionContext), inspectionContext: inspectionContext)); }
private string GetValueString( DkmClrValue value, DkmInspectionContext inspectionContext, ObjectDisplayOptions options, GetValueFlags flags ) { if (value.IsError()) { return((string)value.HostObjectValue); } if (UsesHexadecimalNumbers(inspectionContext)) { options |= ObjectDisplayOptions.UseHexadecimalNumbers; } var lmrType = value.Type.GetLmrType(); if (IsPredefinedType(lmrType) && !lmrType.IsObject()) { if (lmrType.IsString()) { var stringValue = (string)value.HostObjectValue; if (stringValue == null) { return(_nullString); } return(IncludeObjectId(value, FormatString(stringValue, options), flags)); } else if (lmrType.IsCharacter()) { // check if HostObjectValue is null, since any of these types might actually be a synthetic value as well. if (value.HostObjectValue == null) { return(_hostValueNotFoundString); } return(IncludeObjectId( value, FormatLiteral( (char)value.HostObjectValue, options | ObjectDisplayOptions.IncludeCodePoints ), flags )); } else { return(IncludeObjectId( value, FormatPrimitive( value, options & ~( ObjectDisplayOptions.UseQuotes | ObjectDisplayOptions.EscapeNonPrintableCharacters ), inspectionContext ), flags )); } } else if (value.IsNull && !lmrType.IsPointer) { return(_nullString); } else if (lmrType.IsEnum) { return(IncludeObjectId( value, GetEnumDisplayString( lmrType, value, options, (flags & GetValueFlags.IncludeTypeName) != 0, inspectionContext ), flags )); } else if (lmrType.IsArray) { return(IncludeObjectId( value, GetArrayDisplayString( value.Type.AppDomain, lmrType, value.ArrayDimensions, value.ArrayLowerBounds, options ), flags )); } else if (lmrType.IsPointer) { // NOTE: the HostObjectValue will have a size corresponding to the process bitness // and FormatPrimitive will adjust accordingly. var tmp = FormatPrimitive( value, ObjectDisplayOptions.UseHexadecimalNumbers, inspectionContext ); // Always in hex. Debug.Assert(tmp != null); return(tmp); } else if (lmrType.IsNullable()) { var nullableValue = value.GetNullableValue(inspectionContext); // It should be impossible to nest nullables, so this recursion should introduce only a single extra stack frame. return(nullableValue == null ? _nullString : GetValueString( nullableValue, inspectionContext, ObjectDisplayOptions.None, GetValueFlags.IncludeTypeName )); } else if (lmrType.IsIntPtr()) { // check if HostObjectValue is null, since any of these types might actually be a synthetic value as well. if (value.HostObjectValue == null) { return(_hostValueNotFoundString); } if (IntPtr.Size == 8) { var intPtr = ((IntPtr)value.HostObjectValue).ToInt64(); return(FormatPrimitiveObject( intPtr, ObjectDisplayOptions.UseHexadecimalNumbers )); } else { var intPtr = ((IntPtr)value.HostObjectValue).ToInt32(); return(FormatPrimitiveObject( intPtr, ObjectDisplayOptions.UseHexadecimalNumbers )); } } else if (lmrType.IsUIntPtr()) { // check if HostObjectValue is null, since any of these types might actually be a synthetic value as well. if (value.HostObjectValue == null) { return(_hostValueNotFoundString); } if (UIntPtr.Size == 8) { var uIntPtr = ((UIntPtr)value.HostObjectValue).ToUInt64(); return(FormatPrimitiveObject( uIntPtr, ObjectDisplayOptions.UseHexadecimalNumbers )); } else { var uIntPtr = ((UIntPtr)value.HostObjectValue).ToUInt32(); return(FormatPrimitiveObject( uIntPtr, ObjectDisplayOptions.UseHexadecimalNumbers )); } } else { int cardinality; if (lmrType.IsTupleCompatible(out cardinality) && (cardinality > 1)) { var values = ArrayBuilder <string> .GetInstance(); if (value.TryGetTupleFieldValues(cardinality, values, inspectionContext)) { return(IncludeObjectId( value, GetTupleExpression(values.ToArrayAndFree()), flags )); } values.Free(); } } // "value.EvaluateToString()" will check "Call string-conversion function on objects in variables windows" // (Tools > Options setting) and call "value.ToString()" if appropriate. return(IncludeObjectId( value, string.Format( _defaultFormat, value.EvaluateToString(inspectionContext) ?? inspectionContext.GetTypeName( value.Type, CustomTypeInfo: null, FormatSpecifiers: NoFormatSpecifiers ) ), flags )); }
internal EvalResult CreateDataItem( DkmInspectionContext inspectionContext, string name, TypeAndCustomInfo typeDeclaringMemberAndInfo, TypeAndCustomInfo declaredTypeAndInfo, DkmClrValue value, bool useDebuggerDisplay, ExpansionFlags expansionFlags, bool childShouldParenthesize, string fullName, ReadOnlyCollection <string> formatSpecifiers, DkmEvaluationResultCategory category, DkmEvaluationResultFlags flags, DkmEvaluationFlags evalFlags) { if ((evalFlags & DkmEvaluationFlags.ShowValueRaw) != 0) { formatSpecifiers = Formatter.AddFormatSpecifier(formatSpecifiers, "raw"); } Expansion expansion; // If the declared type is Nullable<T>, the value should // have no expansion if null, or be expanded as a T. var declaredType = declaredTypeAndInfo.Type; var lmrNullableTypeArg = declaredType.GetNullableTypeArgument(); if (lmrNullableTypeArg != null && !value.HasExceptionThrown()) { Debug.Assert(value.Type.GetProxyType() == null); DkmClrValue nullableValue; if (value.IsError()) { expansion = null; } else if ((nullableValue = value.GetNullableValue(lmrNullableTypeArg, inspectionContext)) == null) { Debug.Assert(declaredType.Equals(value.Type.GetLmrType())); // No expansion of "null". expansion = null; } else { value = nullableValue; Debug.Assert(lmrNullableTypeArg.Equals(value.Type.GetLmrType())); // If this is not the case, add a test for includeRuntimeTypeIfNecessary. // CONSIDER: The DynamicAttribute for the type argument should just be Skip(1) of the original flag array. expansion = this.GetTypeExpansion(inspectionContext, new TypeAndCustomInfo(DkmClrType.Create(declaredTypeAndInfo.ClrType.AppDomain, lmrNullableTypeArg)), value, ExpansionFlags.IncludeResultsView); } } else if (value.IsError() || (inspectionContext.EvaluationFlags & DkmEvaluationFlags.NoExpansion) != 0) { expansion = null; } else { expansion = DebuggerTypeProxyExpansion.CreateExpansion( this, inspectionContext, name, typeDeclaringMemberAndInfo, declaredTypeAndInfo, value, childShouldParenthesize, fullName, flags.Includes(DkmEvaluationResultFlags.ExceptionThrown) ? null : fullName, formatSpecifiers, flags, Formatter2.GetEditableValueString(value, inspectionContext, declaredTypeAndInfo.Info)); if (expansion == null) { expansion = value.HasExceptionThrown() ? this.GetTypeExpansion(inspectionContext, new TypeAndCustomInfo(value.Type), value, expansionFlags) : this.GetTypeExpansion(inspectionContext, declaredTypeAndInfo, value, expansionFlags); } } return(new EvalResult( ExpansionKind.Default, name, typeDeclaringMemberAndInfo, declaredTypeAndInfo, useDebuggerDisplay: useDebuggerDisplay, value: value, displayValue: null, expansion: expansion, childShouldParenthesize: childShouldParenthesize, fullName: fullName, childFullNamePrefixOpt: flags.Includes(DkmEvaluationResultFlags.ExceptionThrown) ? null : fullName, formatSpecifiers: formatSpecifiers, category: category, flags: flags, editableValue: Formatter2.GetEditableValueString(value, inspectionContext, declaredTypeAndInfo.Info), inspectionContext: inspectionContext)); }