///////////////////////////////////////////////////////////////////////
public static IOption FromString(
Interpreter interpreter,
string text,
AppDomain appDomain,
ValueFlags valueFlags,
CultureInfo cultureInfo,
ref Result error
)
{
StringList list = null;
if (Parser.SplitList(
interpreter, text, 0, Length.Invalid, true,
ref list, ref error) != ReturnCode.Ok)
{
return(null);
}
if (list.Count < MinimumElementCount)
{
error = String.Format(
"cannot create option, only {0} of {1} " +
"required elements were specified", list.Count,
MinimumElementCount);
return(null);
}
bool allowInteger;
bool strict;
bool verbose;
bool noCase;
_Public.Value.ExtractTypeValueFlags(
valueFlags, out allowInteger, out strict,
out verbose, out noCase);
object enumValue = EnumOps.TryParseFlagsEnum(
interpreter, typeof(OptionFlags), null,
list[0], cultureInfo, allowInteger, strict,
noCase, ref error);
if (!(enumValue is OptionFlags))
{
return(null);
}
OptionFlags optionFlags = (OptionFlags)enumValue;
string name = list[1];
if (name == null)
{
error = "invalid option name";
return(null);
}
int nextIndex = MinimumElementCount;
Type type = null;
if (FlagOps.HasFlags(
optionFlags, OptionFlags.MustBeEnumMask, false))
{
if (nextIndex >= list.Count)
{
error = String.Format(
"option with {0} or {1} flags must have type name",
FormatOps.WrapOrNull(OptionFlags.MustBeEnum),
FormatOps.WrapOrNull(OptionFlags.MustBeEnumList));
return(null);
}
ResultList errors = null;
if (_Public.Value.GetType(
interpreter, list[nextIndex], null, appDomain,
_Public.Value.GetTypeValueFlags(optionFlags),
cultureInfo, ref type, ref errors) != ReturnCode.Ok)
{
error = errors;
return(null);
}
nextIndex++;
}
Variant value = null;
if (ScriptOps.GetOptionValue(
interpreter, list, type, optionFlags, false, allowInteger,
strict, noCase, cultureInfo, ref value, ref nextIndex,
ref error) != ReturnCode.Ok)
{
return(null);
}
int groupIndex = _Constants.Index.Invalid;
if (nextIndex < list.Count)
{
if (_Public.Value.GetInteger2(
list[nextIndex], ValueFlags.AnyInteger, cultureInfo,
ref groupIndex, ref error) != ReturnCode.Ok)
{
return(null);
}
nextIndex++;
}
return(new Option(
type, optionFlags, groupIndex, _Constants.Index.Invalid,
name, value));
}
///////////////////////////////////////////////////////////////////////
public static IOption FromString( /* COMPAT: Eagle beta. */
Interpreter interpreter,
string text,
AppDomain appDomain,
bool allowInteger,
bool strict,
bool verbose,
bool noCase,
CultureInfo cultureInfo,
ref Result error
)
{
StringList list = null;
if (Parser.SplitList(
interpreter, text, 0, Length.Invalid, true,
ref list, ref error) != ReturnCode.Ok)
{
return(null);
}
if (list.Count < StandardElementCount)
{
error = String.Format(
"cannot create option, only {0} of {1} " +
"required elements were specified", list.Count,
StandardElementCount);
return(null);
}
Type type = null;
ResultList errors = null;
if (_Public.Value.GetType(
interpreter, list[0], null, appDomain,
_Public.Value.GetTypeValueFlags(
allowInteger, strict, verbose,
noCase), cultureInfo, ref type,
ref errors) != ReturnCode.Ok)
{
error = errors;
return(null);
}
object enumValue = EnumOps.TryParseFlagsEnum(
interpreter, typeof(OptionFlags), null,
list[1], cultureInfo, allowInteger, strict,
noCase, ref error);
if (!(enumValue is OptionFlags))
{
return(null);
}
OptionFlags optionFlags = (OptionFlags)enumValue;
int groupIndex = 0;
if (_Public.Value.GetInteger2(
list[2], ValueFlags.AnyInteger, cultureInfo,
ref groupIndex, ref error) != ReturnCode.Ok)
{
return(null);
}
int index = 0;
if (_Public.Value.GetInteger2(
list[3], ValueFlags.AnyInteger, cultureInfo,
ref index, ref error) != ReturnCode.Ok)
{
return(null);
}
string name = list[4];
if (name == null)
{
error = "invalid option name";
return(null);
}
int nextIndex = StandardElementCount;
Variant value = null;
if (ScriptOps.GetOptionValue(
interpreter, list, type, optionFlags, true, allowInteger,
strict, noCase, cultureInfo, ref value, ref nextIndex,
ref error) != ReturnCode.Ok)
{
return(null);
}
return(new Option(
type, optionFlags, groupIndex, index, name, value));
}
