92 lines
3.1 KiB
C#
92 lines
3.1 KiB
C#
using Cryville.Common;
|
|
using Cryville.Common.Pdt;
|
|
using System;
|
|
using System.Globalization;
|
|
using System.Text.RegularExpressions;
|
|
using SIdentifier = Cryville.Common.Identifier;
|
|
|
|
namespace Cryville.Crtr {
|
|
public class PdtBinder : EmptyBinder {
|
|
public override object ChangeType(object value, Type type, CultureInfo culture) {
|
|
if (value is PdtExpression) {
|
|
var exp = (PdtExpression)value;
|
|
if (type.Equals(typeof(bool))) {
|
|
bool result = false;
|
|
ChartPlayer.etor.Evaluate(new PropOp.Boolean(r => result = r), exp);
|
|
return result;
|
|
}
|
|
else if (type.Equals(typeof(int))) {
|
|
int result = 0;
|
|
ChartPlayer.etor.Evaluate(new PropOp.Integer(r => result = r), exp);
|
|
return result;
|
|
}
|
|
else if (type.Equals(typeof(float))) {
|
|
float result = 0;
|
|
ChartPlayer.etor.Evaluate(new PropOp.Float(r => result = r), exp);
|
|
return result;
|
|
}
|
|
else if (type.Equals(typeof(string))) {
|
|
string result = default(string);
|
|
ChartPlayer.etor.Evaluate(new PropOp.String(r => result = r), exp);
|
|
return result;
|
|
}
|
|
else if (type.Equals(typeof(Clip))) {
|
|
Clip result = default(Clip);
|
|
ChartPlayer.etor.Evaluate(new PropOp.Clip(r => result = r), exp);
|
|
return result;
|
|
}
|
|
else if (type.Equals(typeof(Identifier))) {
|
|
Identifier result = default(Identifier);
|
|
ChartPlayer.etor.Evaluate(new pop_identstr(r => result = r), exp);
|
|
return result;
|
|
}
|
|
else if (type.Equals(typeof(Identifier[]))) {
|
|
Identifier[] result = null;
|
|
ChartPlayer.etor.Evaluate(new pop_identstrarr(r => result = r), exp);
|
|
return result;
|
|
}
|
|
}
|
|
else if (value is string) {
|
|
var exp = (string)value;
|
|
if (type.Equals(typeof(Identifier))) {
|
|
return (Identifier)exp;
|
|
}
|
|
else if (type == typeof(ScoreOperation)) {
|
|
var m = Regex.Match(exp, @"^(\S+)\s*?(\S+)?$");
|
|
var name = new Identifier(m.Groups[1].Value);
|
|
if (!m.Groups[2].Success) return new ScoreOperation { name = name };
|
|
var op = new Identifier(m.Groups[2].Value);
|
|
return new ScoreOperation { name = name, op = op };
|
|
}
|
|
}
|
|
return base.ChangeType(value, type, culture);
|
|
}
|
|
#pragma warning disable IDE1006
|
|
class pop_identstr : PropOp {
|
|
readonly Action<SIdentifier> _cb;
|
|
public pop_identstr(Action<SIdentifier> cb) { _cb = cb; }
|
|
protected override void Execute() {
|
|
var op = GetOperand(0);
|
|
if (op.Type == PdtInternalType.Undefined) _cb(new SIdentifier(op.AsIdentifier()));
|
|
else if (op.Type == PdtInternalType.String) _cb(new SIdentifier(op.AsString()));
|
|
else throw new InvalidCastException("Not an identifier or string");
|
|
}
|
|
}
|
|
class pop_identstrarr : PdtOperator {
|
|
readonly Action<SIdentifier[]> _cb;
|
|
public pop_identstrarr(Action<SIdentifier[]> cb) : base(16) { _cb = cb; }
|
|
protected override void Execute() {
|
|
var result = new SIdentifier[LoadedOperandCount];
|
|
for (int i = 0; i < LoadedOperandCount; i++) {
|
|
var op = GetOperand(i);
|
|
if (op.Type != PdtInternalType.Undefined)
|
|
throw new InvalidCastException("Not an identifier");
|
|
result[i] = new SIdentifier(op.AsIdentifier());
|
|
}
|
|
_cb(result);
|
|
}
|
|
}
|
|
#pragma warning restore IDE1006
|
|
}
|
|
}
|