1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122
|
/* ****************************************************************************
*
* Copyright (c) Microsoft Corporation.
*
* This source code is subject to terms and conditions of the Microsoft Public License. A
* copy of the license can be found in the License.html file at the root of this distribution. If
* you cannot locate the Microsoft Public License, please send an email to
* ironruby@microsoft.com. By using this source code in any fashion, you are agreeing to be bound
* by the terms of the Microsoft Public License.
*
* You must not remove this notice, or any other, from this software.
*
*
* ***************************************************************************/
using IronRuby.Builtins;
using IronRuby.Compiler.Generation;
using IronRuby.Runtime;
using Microsoft.Scripting.Runtime;
using System.Diagnostics;
using System;
using System.Collections.Generic;
using Microsoft.Scripting.Utils;
using System.Reflection;
using System.Runtime.InteropServices;
namespace IronRuby.Builtins {
[RubyModule("IronRuby", Extends = typeof(Ruby), Restrictions = ModuleRestrictions.None)]
public static class IronRubyOps {
[RubyMethod("configuration", RubyMethodAttributes.PublicSingleton)]
public static DlrConfiguration/*!*/ GetConfiguration(RubyContext/*!*/ context, RubyModule/*!*/ self) {
return context.DomainManager.Configuration;
}
[RubyMethod("globals", RubyMethodAttributes.PublicSingleton)]
public static Scope/*!*/ GetGlobalScope(RubyContext/*!*/ context, RubyModule/*!*/ self) {
return context.DomainManager.Globals;
}
[RubyMethod("loaded_assemblies", RubyMethodAttributes.PublicSingleton)]
public static RubyArray/*!*/ GetLoadedAssemblies(RubyContext/*!*/ context, RubyModule/*!*/ self) {
return new RubyArray(context.DomainManager.GetLoadedAssemblyList());
}
/// <summary>
/// Gets a live read-only and thread-safe dictionary that maps full paths of the loaded scripts to their scopes.
/// </summary>
[RubyMethod("loaded_scripts", RubyMethodAttributes.PublicSingleton)]
public static IDictionary<string, Scope>/*!*/ GetLoadedScripts(RubyContext/*!*/ context, RubyModule/*!*/ self) {
return new ReadOnlyDictionary<string, Scope>(context.Loader.LoadedScripts);
}
/// <summary>
/// The same as Kernel#require except for that it returns the loaded Assembly or Scope (even if already loaded).
/// </summary>
[RubyMethod("require", RubyMethodAttributes.PublicSingleton)]
public static object/*!*/ Require(RubyScope/*!*/ scope, RubyModule/*!*/ self, MutableString/*!*/ libraryName) {
object loaded;
scope.RubyContext.Loader.LoadFile(
null, self, libraryName, LoadFlags.LoadOnce | LoadFlags.AppendExtensions | LoadFlags.ResolveLoaded, out loaded
);
Debug.Assert(loaded != null);
return loaded;
}
/// <summary>
/// The same as Kernel#require except for that it returns the loaded Assembly or Scope.
/// </summary>
[RubyMethod("load", RubyMethodAttributes.PublicSingleton)]
public static object/*!*/ Load(RubyScope/*!*/ scope, RubyModule/*!*/ self, MutableString/*!*/ libraryName) {
object loaded;
scope.RubyContext.Loader.LoadFile(null, self, libraryName, LoadFlags.ResolveLoaded, out loaded);
Debug.Assert(loaded != null);
return loaded;
}
[RubyModule("Clr", Restrictions = ModuleRestrictions.None)]
public static class ClrOps {
[RubyMethod("profile", RubyMethodAttributes.PublicSingleton)]
public static Hash/*!*/ GetProfile(RubyContext/*!*/ context, object self) {
if (!((RubyOptions)context.Options).Profile) {
throw RubyExceptions.CreateSystemCallError("You must enable profiling to use Clr.profile");
}
Hash result = new Hash(context);
foreach (var entry in Profiler.Instance.GetProfile()) {
result[entry.Key] = Protocols.Normalize(Utils.DateTimeTicksFromStopwatch(entry.Value));
}
return result;
}
[RubyMethod("profile", RubyMethodAttributes.PublicSingleton)]
public static object GetProfile(RubyContext/*!*/ context, BlockParam/*!*/ block, object self) {
if (!((RubyOptions)context.Options).Profile) {
throw RubyExceptions.CreateSystemCallError("You must enable profiling to use Clr.profile");
}
var start = Profiler.Instance.GetProfile();
object blockResult;
if (block.Yield(out blockResult)) {
return blockResult;
}
Hash result = new Hash(context);
foreach (var entry in Profiler.Instance.GetProfile()) {
long startTime;
if (!start.TryGetValue(entry.Key, out startTime)) {
startTime = 0;
}
long elapsed = entry.Value - startTime;
if (elapsed > 0) {
result[entry.Key] = Protocols.Normalize(Utils.DateTimeTicksFromStopwatch(elapsed));
}
}
return result;
}
}
}
}
|