internal override object Evaluate()
{
this.completion.Continue = 0;
this.completion.Exit = 0;
this.completion.value = null;
int num = 0;
int count = this.list.Count;
while (num < count)
{
object obj2;
AST ast = (AST)this.list[num];
try
{
obj2 = ast.Evaluate();
}
catch (JScriptException exception)
{
if (exception.context == null)
{
exception.context = ast.context;
}
throw exception;
}
Completion completion = (Completion)obj2;
if (completion.value != null)
{
this.completion.value = completion.value;
}
if (completion.Continue > 1)
{
this.completion.Continue = completion.Continue - 1;
break;
}
if (completion.Exit > 0)
{
this.completion.Exit = completion.Exit - 1;
break;
}
if (completion.Return)
{
return(completion);
}
num++;
}
return(this.completion);
}
internal override Object Evaluate()
{
this.completion.Continue = 0;
this.completion.Exit = 0;
this.completion.value = null;
for (int i = 0, n = this.list.Count; i < n; i++)
{
AST elem = (AST)(this.list[i]);
Object val;
try
{
val = elem.Evaluate();
}
catch (JScriptException e)
{
if (e.context == null)
{
e.context = elem.context;
}
throw e;
}
Completion c = (Completion)val;
if (c.value != null)
{
this.completion.value = c.value;
}
if (c.Continue > 1)
{
this.completion.Continue = c.Continue - 1;
break;
}
if (c.Exit > 0)
{
this.completion.Exit = c.Exit - 1;
break;
}
if (c.Return)
{
return(c);
}
}
return(this.completion);
}
internal static bool AssignmentCompatible(IReflect lhir, AST rhexpr, IReflect rhir, bool reportError){
if (rhexpr is ConstantWrapper){
Object rhval = rhexpr.Evaluate();
if (rhval is ClassScope){
if (lhir == Typeob.Type || lhir == Typeob.Object || lhir == Typeob.String) return true;
else{
if (reportError) rhexpr.context.HandleError(JSError.TypeMismatch);
return false;
}
}
ClassScope csc = lhir as ClassScope;
if (csc != null){
EnumDeclaration ed = csc.owner as EnumDeclaration;
if (ed != null){
ConstantWrapper cw = rhexpr as ConstantWrapper;
if (cw != null && cw.value is String){
FieldInfo field = csc.GetField((String)cw.value, BindingFlags.Public|BindingFlags.Static);
if (field == null) return false;
ed.PartiallyEvaluate();
cw.value = new EnumWrapper(((JSMemberField)field).value, field.Name, csc);
}
if (rhir == Typeob.String) return true;
lhir = ed.baseType.ToType();
}
}
if (lhir is Type){
try{
Convert.CoerceT(rhval, (Type)lhir);
return true;
}catch(Exception){
if (lhir == Typeob.Single && rhval is Double){
if (((ConstantWrapper)rhexpr).isNumericLiteral) return true;
Double d = (Double)rhval;
Single s = (Single)d;
if (d.ToString().Equals(s.ToString())){
((ConstantWrapper)rhexpr).value = s;
return true;
}
}
if (lhir == Typeob.Decimal){
ConstantWrapper cw = rhexpr as ConstantWrapper;
if (cw != null && cw.isNumericLiteral){
try{
Convert.CoerceT(cw.context.GetCode(), Typeob.Decimal);
return true;
}catch(Exception){}
}
}
if (reportError)
rhexpr.context.HandleError(JSError.TypeMismatch);
}
return false;
}
}else if (rhexpr is ArrayLiteral)
return ((ArrayLiteral)rhexpr).AssignmentCompatible(lhir, reportError);
if (rhir == Typeob.Object) return true; //Too little is known about the expression to complain at compile time
if (rhir == Typeob.Double && Convert.IsPrimitiveNumericType(lhir)) return true; //Arithmetic expressions infer to Double, but might have the right result.
if (lhir is Type && typeof(Delegate).IsAssignableFrom((Type)lhir) && rhir == Typeob.ScriptFunction &&
rhexpr is Binding && ((Binding)rhexpr).IsCompatibleWithDelegate((Type)lhir))
return true;
if (Convert.IsPromotableTo(rhir, lhir))
return true; //rhexpr delivers a value that can be converted to something expected by the assignment target
if (Convert.IsJScriptArray(rhir) && Binding.ArrayAssignmentCompatible(rhexpr, lhir))
return true;
if (lhir == Typeob.String)
return true; // Everything is assignment-compatible to string.
if (rhir == Typeob.String && (lhir == Typeob.Boolean || Convert.IsPrimitiveNumericType(lhir))){
if (reportError) rhexpr.context.HandleError(JSError.PossibleBadConversionFromString);
return true;
}
if ((lhir == Typeob.Char && rhir == Typeob.String) || Convert.IsPromotableTo(lhir, rhir) ||
(Convert.IsPrimitiveNumericType(lhir) && Convert.IsPrimitiveNumericType(rhir))){
if (reportError) rhexpr.context.HandleError(JSError.PossibleBadConversion);
return true;
}
if (reportError)
rhexpr.context.HandleError(JSError.TypeMismatch);
return false;
}
internal override AST PartiallyEvaluate()
{
this.ctor = this.ctor.PartiallyEvaluateAsCallable();
ASTList args = new ASTList(this.args.context);
ASTList list2 = new ASTList(this.args.context);
int num = 0;
int count = this.args.count;
while (num < count)
{
AST ast = this.args[num];
Assign elem = ast as Assign;
if (elem != null)
{
elem.rhside = elem.rhside.PartiallyEvaluate();
list2.Append(elem);
}
else
{
args.Append(ast.PartiallyEvaluate());
}
num++;
}
int num3 = args.count;
IReflect[] argIRs = new IReflect[num3];
for (int i = 0; i < num3; i++)
{
AST ast2 = args[i];
if (ast2 is ConstantWrapper)
{
object argument = ast2.Evaluate();
if ((argIRs[i] = TypeOfArgument(argument)) == null)
{
goto Label_0120;
}
this.positionalArgValues.Add(argument);
continue;
}
if ((ast2 is ArrayLiteral) && ((ArrayLiteral)ast2).IsOkToUseInCustomAttribute())
{
argIRs[i] = Typeob.ArrayObject;
this.positionalArgValues.Add(ast2.Evaluate());
continue;
}
Label_0120:
ast2.context.HandleError(JSError.InvalidCustomAttributeArgument);
return(null);
}
this.type = this.ctor.ResolveCustomAttribute(args, argIRs, this.target);
if (this.type == null)
{
return(null);
}
if (Microsoft.JScript.Convert.IsPromotableTo((IReflect)this.type, Typeob.CodeAccessSecurityAttribute))
{
base.context.HandleError(JSError.CannotUseStaticSecurityAttribute);
return(null);
}
ParameterInfo[] parameters = ((ConstructorInfo)((Binding)this.ctor).member).GetParameters();
int num5 = 0;
int num6 = this.positionalArgValues.Count;
foreach (ParameterInfo info2 in parameters)
{
IReflect reflect = (info2 is ParameterDeclaration) ? ((ParameterDeclaration)info2).ParameterIReflect : info2.ParameterType;
if (num5 < num6)
{
object obj3 = this.positionalArgValues[num5];
this.positionalArgValues[num5] = Microsoft.JScript.Convert.Coerce(obj3, reflect, obj3 is ArrayObject);
num5++;
}
else
{
object defaultParameterValue;
if (TypeReferences.GetDefaultParameterValue(info2) == System.Convert.DBNull)
{
defaultParameterValue = Microsoft.JScript.Convert.Coerce(null, reflect);
}
else
{
defaultParameterValue = TypeReferences.GetDefaultParameterValue(info2);
}
this.positionalArgValues.Add(defaultParameterValue);
}
}
int num7 = 0;
int num8 = list2.count;
while (num7 < num8)
{
Assign assign2 = (Assign)list2[num7];
if ((assign2.lhside is Lookup) && ((assign2.rhside is ConstantWrapper) || ((assign2.rhside is ArrayLiteral) && ((ArrayLiteral)assign2.rhside).IsOkToUseInCustomAttribute())))
{
object obj5 = assign2.rhside.Evaluate();
IReflect reflect2 = null;
if ((obj5 is ArrayObject) || (((reflect2 = TypeOfArgument(obj5)) != null) && (reflect2 != Typeob.Object)))
{
string name = ((Lookup)assign2.lhside).Name;
MemberInfo[] member = ((IReflect)this.type).GetMember(name, BindingFlags.Public | BindingFlags.Instance);
if ((member == null) || (member.Length == 0))
{
assign2.context.HandleError(JSError.NoSuchMember);
return(null);
}
if (member.Length == 1)
{
MemberInfo info3 = member[0];
if (info3 is FieldInfo)
{
FieldInfo info4 = (FieldInfo)info3;
if (info4.IsLiteral || info4.IsInitOnly)
{
goto Label_04B6;
}
try
{
IReflect reflect3 = (info4 is JSVariableField) ? ((JSVariableField)info4).GetInferredType(null) : info4.FieldType;
obj5 = Microsoft.JScript.Convert.Coerce(obj5, reflect3, obj5 is ArrayObject);
this.namedArgFields.Add(info3);
this.namedArgFieldValues.Add(obj5);
goto Label_04C9;
}
catch (JScriptException)
{
assign2.rhside.context.HandleError(JSError.TypeMismatch);
return(null);
}
}
if (info3 is PropertyInfo)
{
PropertyInfo prop = (PropertyInfo)info3;
MethodInfo setMethod = JSProperty.GetSetMethod(prop, false);
if (setMethod != null)
{
ParameterInfo[] infoArray3 = setMethod.GetParameters();
if ((infoArray3 != null) && (infoArray3.Length == 1))
{
try
{
IReflect reflect4 = (infoArray3[0] is ParameterDeclaration) ? ((ParameterDeclaration)infoArray3[0]).ParameterIReflect : infoArray3[0].ParameterType;
obj5 = Microsoft.JScript.Convert.Coerce(obj5, reflect4, obj5 is ArrayObject);
this.namedArgProperties.Add(info3);
this.namedArgPropertyValues.Add(obj5);
goto Label_04C9;
}
catch (JScriptException)
{
assign2.rhside.context.HandleError(JSError.TypeMismatch);
return(null);
}
}
}
}
}
}
}
Label_04B6:
assign2.context.HandleError(JSError.InvalidCustomAttributeArgument);
return(null);
Label_04C9:
num7++;
}
if (!this.CheckIfTargetOK(this.type))
{
return(null);
}
try
{
Type type = this.type as Type;
if ((type != null) && (this.target is AssemblyCustomAttributeList))
{
if (type.FullName == "System.Reflection.AssemblyAlgorithmIdAttribute")
{
if (this.positionalArgValues.Count > 0)
{
base.Engine.Globals.assemblyHashAlgorithm = (AssemblyHashAlgorithm)Microsoft.JScript.Convert.CoerceT(this.positionalArgValues[0], typeof(AssemblyHashAlgorithm));
}
return(null);
}
if (type.FullName == "System.Reflection.AssemblyCultureAttribute")
{
if (this.positionalArgValues.Count > 0)
{
string str2 = Microsoft.JScript.Convert.ToString(this.positionalArgValues[0]);
if ((base.Engine.PEFileKind != PEFileKinds.Dll) && (str2.Length > 0))
{
base.context.HandleError(JSError.ExecutablesCannotBeLocalized);
return(null);
}
base.Engine.Globals.assemblyCulture = new CultureInfo(str2);
}
return(null);
}
if (type.FullName == "System.Reflection.AssemblyDelaySignAttribute")
{
if (this.positionalArgValues.Count > 0)
{
base.Engine.Globals.assemblyDelaySign = Microsoft.JScript.Convert.ToBoolean(this.positionalArgValues[0], false);
}
return(null);
}
if (type.FullName == "System.Reflection.AssemblyFlagsAttribute")
{
if (this.positionalArgValues.Count > 0)
{
base.Engine.Globals.assemblyFlags = (AssemblyFlags)((uint)Microsoft.JScript.Convert.CoerceT(this.positionalArgValues[0], typeof(uint)));
}
return(null);
}
if (type.FullName == "System.Reflection.AssemblyKeyFileAttribute")
{
if (this.positionalArgValues.Count > 0)
{
base.Engine.Globals.assemblyKeyFileName = Microsoft.JScript.Convert.ToString(this.positionalArgValues[0]);
base.Engine.Globals.assemblyKeyFileNameContext = base.context;
if ((base.Engine.Globals.assemblyKeyFileName != null) && (base.Engine.Globals.assemblyKeyFileName.Length == 0))
{
base.Engine.Globals.assemblyKeyFileName = null;
base.Engine.Globals.assemblyKeyFileNameContext = null;
}
}
return(null);
}
if (type.FullName == "System.Reflection.AssemblyKeyNameAttribute")
{
if (this.positionalArgValues.Count > 0)
{
base.Engine.Globals.assemblyKeyName = Microsoft.JScript.Convert.ToString(this.positionalArgValues[0]);
base.Engine.Globals.assemblyKeyNameContext = base.context;
if ((base.Engine.Globals.assemblyKeyName != null) && (base.Engine.Globals.assemblyKeyName.Length == 0))
{
base.Engine.Globals.assemblyKeyName = null;
base.Engine.Globals.assemblyKeyNameContext = null;
}
}
return(null);
}
if (type.FullName == "System.Reflection.AssemblyVersionAttribute")
{
if (this.positionalArgValues.Count > 0)
{
base.Engine.Globals.assemblyVersion = this.ParseVersion(Microsoft.JScript.Convert.ToString(this.positionalArgValues[0]));
}
return(null);
}
if (type.FullName == "System.CLSCompliantAttribute")
{
base.Engine.isCLSCompliant = ((this.args == null) || (this.args.count == 0)) || Microsoft.JScript.Convert.ToBoolean(this.positionalArgValues[0], false);
return(this);
}
}
}
catch (ArgumentException)
{
base.context.HandleError(JSError.InvalidCall);
}
return(this);
}
internal override AST PartiallyEvaluate()
{
this.ctor = this.ctor.PartiallyEvaluateAsCallable();
//first weed out assignment expressions and use them as property initializers
ASTList positionalArgs = new ASTList(this.args.context);
ASTList namedArgs = new ASTList(this.args.context);
for (int i = 0, m = this.args.count; i < m; i++)
{
AST arg = this.args[i];
Assign assign = arg as Assign;
if (assign != null)
{
assign.rhside = assign.rhside.PartiallyEvaluate();
namedArgs.Append(assign);
}
else
{
positionalArgs.Append(arg.PartiallyEvaluate());
}
}
int n = positionalArgs.count;
IReflect[] argIRs = new IReflect[n];
for (int i = 0; i < n; i++)
{
AST arg = positionalArgs[i];
// only accept ConstantWrappers
if (arg is ConstantWrapper)
{
Object argument = arg.Evaluate();
if ((argIRs[i] = CustomAttribute.TypeOfArgument(argument)) != null)
{
this.positionalArgValues.Add(argument);
continue;
}
}
else if (arg is ArrayLiteral && ((ArrayLiteral)arg).IsOkToUseInCustomAttribute())
{
argIRs[i] = Typeob.ArrayObject;
this.positionalArgValues.Add(arg.Evaluate());
continue;
}
arg.context.HandleError(JSError.InvalidCustomAttributeArgument);
return(null); // the custom attribute is not good and it will be ignored
}
//Get the custom attribute and the appropriate constructor (under the covers)
this.type = this.ctor.ResolveCustomAttribute(positionalArgs, argIRs, this.target);
if (this.type == null)
{
return(null);
}
if (Convert.IsPromotableTo((IReflect)this.type, typeof(CodeAccessSecurityAttribute)))
{
this.context.HandleError(JSError.CannotUseStaticSecurityAttribute);
return(null);
}
//Coerce the positional arguments to the right type and supply default values for optional parameters
ConstructorInfo c = (ConstructorInfo)((Binding)this.ctor).member;
ParameterInfo[] parameters = c.GetParameters();
int j = 0;
int len = this.positionalArgValues.Count;
foreach (ParameterInfo p in parameters)
{
IReflect ir = p is ParameterDeclaration ? ((ParameterDeclaration)p).ParameterIReflect : p.ParameterType;
if (j < len)
{
Object value = this.positionalArgValues[j];
this.positionalArgValues[j] = Convert.Coerce(value, ir, value is ArrayObject);
j++;
}
else
{
Object value;
if (p.DefaultValue == System.Convert.DBNull)
{
value = Convert.Coerce(null, ir);
}
else
{
value = p.DefaultValue;
}
this.positionalArgValues.Add(value);
}
}
//Check validity of property/field initializers
for (int i = 0, m = namedArgs.count; i < m; i++)
{
Assign assign = (Assign)namedArgs[i];
if (assign.lhside is Lookup &&
(assign.rhside is ConstantWrapper ||
(assign.rhside is ArrayLiteral && ((ArrayLiteral)assign.rhside).IsOkToUseInCustomAttribute())))
{
Object value = assign.rhside.Evaluate();
IReflect argType = null;
if (value is ArrayObject || ((argType = CustomAttribute.TypeOfArgument(value)) != null && argType != Typeob.Object))
{
String name = ((Lookup)assign.lhside).Name;
MemberInfo [] members = ((IReflect)this.type).GetMember(name, BindingFlags.Public | BindingFlags.Instance);
if (members == null || members.Length == 0)
{
assign.context.HandleError(JSError.NoSuchMember);
return(null);
}
if (members.Length == 1)
{
MemberInfo member = members[0];
if (member is FieldInfo)
{
FieldInfo fieldInfo = (FieldInfo)member;
if (!fieldInfo.IsLiteral && !fieldInfo.IsInitOnly)
{
try{
IReflect ir = fieldInfo is JSVariableField ? ((JSVariableField)fieldInfo).GetInferredType(null) : fieldInfo.FieldType;
value = Convert.Coerce(value, ir, value is ArrayObject);
this.namedArgFields.Add(member);
this.namedArgFieldValues.Add(value);
continue;
}catch (JScriptException) {
assign.rhside.context.HandleError(JSError.TypeMismatch);
return(null); // the custom attribute is not good and it will be ignored
}
}
}
else if (member is PropertyInfo)
{
PropertyInfo propertyInfo = (PropertyInfo)member;
MethodInfo setMethodInfo = JSProperty.GetSetMethod(propertyInfo, false);
if (setMethodInfo != null)
{
ParameterInfo [] paramInfo = setMethodInfo.GetParameters();
if (paramInfo != null && paramInfo.Length == 1)
{
try{
IReflect ir = paramInfo[0] is ParameterDeclaration ? ((ParameterDeclaration)paramInfo[0]).ParameterIReflect : paramInfo[0].ParameterType;
value = Convert.Coerce(value, ir, value is ArrayObject);
this.namedArgProperties.Add(member);
this.namedArgPropertyValues.Add(value);
}catch (JScriptException) {
assign.rhside.context.HandleError(JSError.TypeMismatch);
return(null); // the custom attribute is not good and it will be ignored
}
continue;
}
}
}
}
}
}
assign.context.HandleError(JSError.InvalidCustomAttributeArgument);
return(null);
}
if (!this.CheckIfTargetOK(this.type))
{
return(null); //Ignore attribute
}
//Consume and discard assembly name attributes
try{
Type ty = this.type as Type;
if (ty != null && this.target is AssemblyCustomAttributeList)
{
if (ty.FullName == "System.Reflection.AssemblyAlgorithmIdAttribute")
{
if (this.positionalArgValues.Count > 0)
{
this.Engine.Globals.assemblyHashAlgorithm = (AssemblyHashAlgorithm)Convert.CoerceT(this.positionalArgValues[0], typeof(AssemblyHashAlgorithm));
}
return(null);
}
if (ty.FullName == "System.Reflection.AssemblyCultureAttribute")
{
if (this.positionalArgValues.Count > 0)
{
String cultureId = Convert.ToString(this.positionalArgValues[0]);
if (this.Engine.PEFileKind != PEFileKinds.Dll && cultureId.Length > 0)
{
this.context.HandleError(JSError.ExecutablesCannotBeLocalized);
return(null);
}
this.Engine.Globals.assemblyCulture = new CultureInfo(cultureId);
}
return(null);
}
if (ty.FullName == "System.Reflection.AssemblyDelaySignAttribute")
{
if (this.positionalArgValues.Count > 0)
{
this.Engine.Globals.assemblyDelaySign = Convert.ToBoolean(this.positionalArgValues[0], false);
}
return(null);
}
if (ty.FullName == "System.Reflection.AssemblyFlagsAttribute")
{
if (this.positionalArgValues.Count > 0)
{
this.Engine.Globals.assemblyFlags = (AssemblyFlags)(uint)Convert.CoerceT(this.positionalArgValues[0], typeof(uint));
}
return(null);
}
if (ty.FullName == "System.Reflection.AssemblyKeyFileAttribute")
{
if (this.positionalArgValues.Count > 0)
{
this.Engine.Globals.assemblyKeyFileName = Convert.ToString(this.positionalArgValues[0]);
if (this.Engine.Globals.assemblyKeyFileName != null && this.Engine.Globals.assemblyKeyFileName.Length == 0)
{
this.Engine.Globals.assemblyKeyFileName = null;
}
}
return(null);
}
if (ty.FullName == "System.Reflection.AssemblyKeyNameAttribute")
{
if (this.positionalArgValues.Count > 0)
{
this.Engine.Globals.assemblyKeyName = Convert.ToString(this.positionalArgValues[0]);
if (this.Engine.Globals.assemblyKeyName != null && this.Engine.Globals.assemblyKeyName.Length == 0)
{
this.Engine.Globals.assemblyKeyName = null;
}
}
return(null);
}
if (ty.FullName == "System.Reflection.AssemblyVersionAttribute")
{
if (this.positionalArgValues.Count > 0)
{
this.Engine.Globals.assemblyVersion = this.ParseVersion(Convert.ToString(this.positionalArgValues[0]));
}
return(null);
}
if (ty.FullName == "System.CLSCompliantAttribute")
{
this.Engine.isCLSCompliant = this.args == null || this.args.count == 0 || Convert.ToBoolean(this.positionalArgValues[0], false);
return(this);
}
}
}catch (ArgumentException) {
this.context.HandleError(JSError.InvalidCall);
}
return(this);
}
