2
// BaseTypeViewSource.cs
5
// Lluis Sanchez Gual <lluis@novell.com>
7
// Copyright (c) 2009 Novell, Inc (http://www.novell.com)
9
// Permission is hereby granted, free of charge, to any person obtaining a copy
10
// of this software and associated documentation files (the "Software"), to deal
11
// in the Software without restriction, including without limitation the rights
12
// to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
13
// copies of the Software, and to permit persons to whom the Software is
14
// furnished to do so, subject to the following conditions:
16
// The above copyright notice and this permission notice shall be included in
17
// all copies or substantial portions of the Software.
19
// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
20
// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
21
// FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
22
// AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
23
// LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
24
// OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
28
using Mono.Debugging.Backend;
29
using Mono.Debugging.Client;
31
namespace Mono.Debugging.Evaluation
33
public class BaseTypeViewSource: RemoteFrameObject, IObjectValueSource
35
EvaluationContext ctx;
38
IObjectSource objectSource;
40
public BaseTypeViewSource (EvaluationContext ctx, IObjectSource objectSource, object type, object obj)
45
this.objectSource = objectSource;
48
public static ObjectValue CreateBaseTypeView (EvaluationContext ctx, IObjectSource objectSource, object type, object obj)
50
BaseTypeViewSource src = new BaseTypeViewSource (ctx, objectSource, type, obj);
52
string tname = ctx.Adapter.GetDisplayTypeName (ctx, type);
53
return ObjectValue.CreateObject (src, new ObjectPath ("base"), tname, "{" + tname + "}", ObjectValueFlags.Type|ObjectValueFlags.ReadOnly|ObjectValueFlags.NoRefresh, null);
56
#region IObjectValueSource implementation
57
public ObjectValue[] GetChildren (ObjectPath path, int index, int count)
59
return ctx.Adapter.GetObjectValueChildren (ctx, objectSource, type, obj, index, count, false);
63
public string SetValue (ObjectPath path, string value)
65
throw new NotSupportedException();
69
public ObjectValue GetValue (ObjectPath path, EvaluationOptions options)
71
throw new NotSupportedException();