public VariableGridHost() {
InitializeComponent();
_aggregator = VsAppShell.Current.ExportProvider.GetExportedValue<IObjectDetailsViewerAggregator>();
_rSession = VsAppShell.Current.ExportProvider.GetExportedValue<IRInteractiveWorkflowProvider>().GetOrCreate().RSession;
_rSession.Mutated += RSession_Mutated;
}
public VariableGridHost()
{
InitializeComponent();
_aggregator = VsAppShell.Current.GlobalServices.GetService <IObjectDetailsViewerAggregator>();
_rSession = VsAppShell.Current.GlobalServices.GetService <IRInteractiveWorkflowProvider>().GetOrCreate().RSession;
_rSession.Mutated += RSession_Mutated;
}
public ViewersTest(BrokerFixture broker)
{
_sessionProvider = VsAppShell.Current.ExportProvider.GetExportedValue <IRSessionProvider>();
_aggregator = VsAppShell.Current.ExportProvider.GetExportedValue <IObjectDetailsViewerAggregator>();
_workflow = VsAppShell.Current.ExportProvider.GetExportedValue <IRInteractiveWorkflowProvider>().GetOrCreate();
_broker = broker;
}
public VariableGridHost()
{
InitializeComponent();
_aggregator = VsAppShell.Current.ExportProvider.GetExportedValue <IObjectDetailsViewerAggregator>();
_rSession = VsAppShell.Current.ExportProvider.GetExportedValue <IRSessionProvider>().GetInteractiveWindowRSession();
_rSession.Mutated += RSession_Mutated;
}
/// <summary>
/// Create new instance of <see cref="VariableViewModel"/>
/// </summary>
/// <param name="evaluation">R session's evaluation result</param>
/// <param name="truncateChildren">true to truncate children returned by GetChildrenAsync</param>
public VariableViewModel(IREvaluationResultInfo evaluation, IObjectDetailsViewerAggregator aggregator, int index = -1, int? maxChildrenCount = null) :
base(evaluation, maxChildrenCount) {
_aggregator = aggregator;
Index = index;
var result = DebugEvaluation as IRValueInfo;
if (result != null) {
SetViewButtonStatus(result);
}
}
/// <summary>
/// Create new instance of <see cref="VariableViewModel"/>
/// </summary>
/// <param name="evaluation">R session's evaluation result</param>
/// <param name="truncateChildren">true to truncate children returned by GetChildrenAsync</param>
public VariableViewModel(IREvaluationResultInfo evaluation, IServiceContainer services, int index = -1, int?maxChildrenCount = null) :
base(evaluation, services, maxChildrenCount)
{
_aggregator = services.GetService <IObjectDetailsViewerAggregator>();
Index = index;
var result = DebugEvaluation as IRValueInfo;
if (result != null)
{
SetViewButtonStatus(result);
}
}
/// <summary>
/// Create new instance of <see cref="VariableViewModel"/>
/// </summary>
/// <param name="evaluation">R session's evaluation result</param>
/// <param name="truncateChildren">true to truncate children returned by GetChildrenAsync</param>
public VariableViewModel(IREvaluationResultInfo evaluation, IObjectDetailsViewerAggregator aggregator, int index = -1, int?maxChildrenCount = null) :
base(evaluation, maxChildrenCount)
{
_aggregator = aggregator;
Index = index;
var result = DebugEvaluation as IRValueInfo;
if (result != null)
{
SetViewButtonStatus(result);
}
}
public VariableView(IRToolsSettings settings)
{
_settings = settings;
InitializeComponent();
_aggregator = VsAppShell.Current.ExportProvider.GetExportedValue <IObjectDetailsViewerAggregator>();
SetRootNode(VariableViewModel.Ellipsis);
SortDirection = ListSortDirection.Ascending;
RootTreeGrid.Sorting += RootTreeGrid_Sorting;
var sessionProvider = VsAppShell.Current.ExportProvider.GetExportedValue <IRSessionProvider>();
_session = sessionProvider.GetInteractiveWindowRSession();
_environmentProvider = new REnvironmentProvider(_session);
EnvironmentComboBox.DataContext = _environmentProvider;
_environmentProvider.RefreshEnvironmentsAsync().DoNotWait();
}
public VariableView(IRToolsSettings settings, ICoreShell shell)
{
_settings = settings;
_shell = shell;
InitializeComponent();
_aggregator = _shell.ExportProvider.GetExportedValue <IObjectDetailsViewerAggregator>();
SetRootNode(VariableViewModel.Ellipsis);
SortDirection = ListSortDirection.Ascending;
RootTreeGrid.Sorting += RootTreeGrid_Sorting;
var workflow = _shell.ExportProvider.GetExportedValue <IRInteractiveWorkflowProvider>().GetOrCreate();
_session = workflow.RSession;
_environmentProvider = new REnvironmentProvider(_session);
EnvironmentComboBox.DataContext = _environmentProvider;
_environmentProvider.RefreshEnvironmentsAsync().DoNotWait();
}
public VariableView(IRToolsSettings settings, ICoreShell shell)
{
_settings = settings;
_shell = shell;
_shell.UIThemeChanged += OnUIThemeChanged;
InitializeComponent();
SetImageBackground();
_aggregator = _shell.GlobalServices.GetService <IObjectDetailsViewerAggregator>();
SetRootNode(VariableViewModel.Ellipsis);
SortDirection = ListSortDirection.Ascending;
RootTreeGrid.Sorting += RootTreeGrid_Sorting;
var workflow = VsAppShell.Current.GlobalServices.GetService <IRInteractiveWorkflowProvider>().GetOrCreate();
_session = workflow.RSession;
_environmentProvider = new REnvironmentProvider(_session, shell.Services.MainThread);
EnvironmentComboBox.DataContext = _environmentProvider;
_environmentProvider.RefreshEnvironmentsAsync().DoNotWait();
}
public VariableView(IServiceContainer services)
{
_settings = services.GetService <IRSettings>();
_services = services;
_ui = _services.UI();
_ui.UIThemeChanged += OnUIThemeChanged;
InitializeComponent();
SetImageBackground();
_aggregator = _services.GetService <IObjectDetailsViewerAggregator>();
SetRootNode(VariableViewModel.Ellipsis);
SortDirection = ListSortDirection.Ascending;
RootTreeGrid.Sorting += RootTreeGrid_Sorting;
var workflow = _services.GetService <IRInteractiveWorkflowProvider>().GetOrCreate();
_session = workflow.RSession;
_environmentProvider = new REnvironmentProvider(_session, _services.MainThread());
EnvironmentComboBox.DataContext = _environmentProvider;
_environmentProvider.RefreshEnvironmentsAsync().DoNotWait();
}
public VariableView(IRToolsSettings settings, ICoreShell shell) {
_settings = settings;
_shell = shell;
InitializeComponent();
_aggregator = _shell.ExportProvider.GetExportedValue<IObjectDetailsViewerAggregator>();
SetRootNode(VariableViewModel.Ellipsis);
SortDirection = ListSortDirection.Ascending;
RootTreeGrid.Sorting += RootTreeGrid_Sorting;
var theme = shell.ExportProvider.GetExportedValue<IThemeUtilities>();
theme.SetImageBackgroundColor(RootTreeGrid, Brushes.ToolWindowBackgroundColorKey);
theme.SetThemeScrollBars(RootTreeGrid);
var workflow = VsAppShell.Current.ExportProvider.GetExportedValue<IRInteractiveWorkflowProvider>().GetOrCreate();
_session = workflow.RSession;
_environmentProvider = new REnvironmentProvider(_session, shell.Services.MainThread);
EnvironmentComboBox.DataContext = _environmentProvider;
_environmentProvider.RefreshEnvironmentsAsync().DoNotWait();
}
public ObjectDetailsViewerProvider(IObjectDetailsViewerAggregator aggregator, ICoreShell coreShell)
{
_aggregator = aggregator;
_coreShell = coreShell;
}
public ViewersTest()
{
_sessionProvider = VsAppShell.Current.ExportProvider.GetExportedValue <IRSessionProvider>();
_session = _sessionProvider.GetOrCreate(Guid.NewGuid());
_aggregator = VsAppShell.Current.ExportProvider.GetExportedValue <IObjectDetailsViewerAggregator>();
}
public VectorViewer(IObjectDetailsViewerAggregator aggregator, IDataObjectEvaluator evaluator) :
base(aggregator, evaluator) { }
public GridViewerBase(IObjectDetailsViewerAggregator aggregator, IDataObjectEvaluator evaluator) :
base(evaluator)
{
_aggregator = aggregator;
}
public ViewersTest() {
_aggregator = VsAppShell.Current.ExportProvider.GetExportedValue<IObjectDetailsViewerAggregator>();
_workflow = VsAppShell.Current.ExportProvider.GetExportedValue<IRInteractiveWorkflowProvider>().GetOrCreate();
_sessionProvider = _workflow.RSessions;
}
public DebugGridViewProvider(IObjectDetailsViewerAggregator aggregator)
{
_aggregator = aggregator;
}
public static async Task <IObjectDetailsViewer> GetViewer(this IObjectDetailsViewerAggregator aggregator, IRSession session, string environmentExpression, string expression, CancellationToken cancellationToken = default(CancellationToken))
{
var preliminary = await session.TryEvaluateAndDescribeAsync(expression, TypeNameProperty | ClassesProperty | DimProperty | LengthProperty | FlagsProperty, null, cancellationToken) as IRValueInfo;
return(preliminary != null?aggregator.GetViewer(preliminary) : null);
}
public ObjectDetailsViewerProvider(IObjectDetailsViewerAggregator aggregator, ICoreShell coreShell) {
_aggregator = aggregator;
_coreShell = coreShell;
}
public VectorViewer(IObjectDetailsViewerAggregator aggregator, IDataObjectEvaluator evaluator) :
base(aggregator, evaluator)
{
}
public DebugGridViewProvider(IObjectDetailsViewerAggregator aggregator) {
_aggregator = aggregator;
}
public ViewersTest(TestMethodFixture testMethod, IServiceContainer services) : base(services, true)
{
_testMethod = testMethod;
_aggregator = Services.GetService <IObjectDetailsViewerAggregator>();
}
public ObjectDetailsViewerProvider(IObjectDetailsViewerAggregator aggregator)
{
_aggregator = aggregator;
}
public GridViewerBase(IObjectDetailsViewerAggregator aggregator, IDataObjectEvaluator evaluator) :
base(evaluator) {
_aggregator = aggregator;
}
