private void ParseChild_SpecialSwitch_(
Configurationtree_Node cur_Cf,//「S■ｆｎｃ」
Expression_Node_String owner_Ec,// 「E■ｆｎｃ」
MemoryApplication memoryApplication,
Log_TextIndented_ConfigurationtreeToExpression pg_ParsingLog,
Log_Reports log_Reports
)
{
// a-●●要素や、switch要素など。
Log_Method log_Method = new Log_MethodImpl(0, Log_ReportsImpl.BDebugmode_Static);
log_Method.BeginMethod(Info_ConfigurationtreeToExpression.Name_Library, this, "ParseChild_SpecialSwitch_",log_Reports);
//
//
//
//
//
// データ_ソース、データ_ターゲット、＜ｆｎｃ ＞の子要素。
string sName_OwnerNode = owner_Ec.Cur_Configuration.Name;
string sName_OwnerFnc = "";
{
EnumHitcount enumHitcount;
if (NamesNode.S_FNC == sName_OwnerNode
//||
//NamesNode.S_F_TEXT_TEMPLATE2 == sOwnerNodeName
)
{
enumHitcount = EnumHitcount.One;
}
else
{
enumHitcount = EnumHitcount.One_Or_Zero;
}
bool bHit = owner_Ec.TrySelectAttribute(out sName_OwnerFnc, PmNames.S_NAME.Name_Pm, enumHitcount, log_Reports);
}
string sName_MyFnc;
cur_Cf.Dictionary_Attribute.TryGetValue(PmNames.S_NAME, out sName_MyFnc, true, log_Reports);
//
// ＜ｆ－ｓｗｉｔｃｈ＞要素であれば、子Ｓｆ：ｃａｓｅ；要素が何個もある。
//
if (log_Reports.Successful)
{
if (NamesFnc.S_SWITCH == sName_MyFnc)
{
cur_Cf.List_Child.ForEach(delegate(Configurationtree_Node s_Child, ref bool bBreak)
{
Configurationtree_Node err_CfAttr;
if (log_Reports.Successful)
{
string sName;
s_Child.Dictionary_Attribute.TryGetValue(PmNames.S_NAME, out sName, true, log_Reports);
if (
NamesNode.S_FNC == s_Child.Name
&& NamesFnc.S_CASE == sName
)
{
ConfigurationtreeToExpression_F14n16_AbstractImpl_ to = new ConfigurationtreeToExpression_F16_CaseImpl_();
to.Translate(
s_Child,//Ｓｆ：ｃａｓｅ；
owner_Ec,//Ｓｆ：ｓｗｉｔｃｈ；
memoryApplication,
pg_ParsingLog,
log_Reports
);
}
else if (NamesNode.S_ARG == s_Child.Name)
{
// todo:＜ａｒｇ＞。恐らくｓｗｉｔｃｈＶａｌｕｅなど。
ConfigurationtreeToExpression_F14n16 to = new ConfigurationtreeToExpression_F14_FArgImpl();
to.Translate(
s_Child,
owner_Ec,//＜ｆ－ｓｗｉｔｃｈ ＞
memoryApplication,
pg_ParsingLog,
log_Reports
);
}
else
{
err_CfAttr = s_Child;
bBreak = true;
goto gt_Error_NotACase;
}
}
goto gt_EndMethod2;
//
gt_Error_NotACase:
{
Builder_TexttemplateP1p tmpl = new Builder_TexttemplateP1pImpl();
tmpl.SetParameter(1, err_CfAttr.Name, log_Reports);//設定ノード名
tmpl.SetParameter(2, err_CfAttr.GetType().Name, log_Reports);//ノードのクラス名
tmpl.SetParameter(3, Log_RecordReportsImpl.ToText_Configuration(err_CfAttr), log_Reports);//設定位置パンくずリスト
memoryApplication.CreateErrorReport("Er:7006;", tmpl, log_Reports);
}
goto gt_EndMethod2;
//
gt_EndMethod2:
;
});
}
}
goto gt_EndMethod;
gt_EndMethod:
log_Method.EndMethod(log_Reports);
}
//────────────────────────────────────────
public virtual void Translate_Step1(
ConfigurationtreeToFunction_Item parentProcesser,
Configurationtree_Node action_Conf,
Expression_Node_Function cur_Expr_Func,
MemoryApplication owner_MemoryApplication,
Log_TextIndented_ConfigurationtreeToExpression pg_ParsingLog,
Log_Reports log_Reports
)
{
Log_Method log_Method = new Log_MethodImpl(0);
log_Method.BeginMethod(Info_Functions.Name_Library, this, "Translate_Step1",log_Reports);
//
// アクション型引数の引数
//
string err_sName_Attr;
action_Conf.List_Child.ForEach(delegate(Configurationtree_Node s_Arg, ref bool bBreak)
{
string sName_Attr;
s_Arg.Dictionary_Attribute.TryGetValue(PmNames.S_NAME, out sName_Attr, true, log_Reports);
if (cur_Expr_Func.ContainsName_ArgumentDefinition(sName_Attr,log_Reports))
{
//
// 自解析
//
ConfigurationtreeToExpression_F14n16 to = new ConfigurationtreeToExpression_F14_FArgImpl();
to.Translate(
s_Arg,
cur_Expr_Func,
owner_MemoryApplication,
pg_ParsingLog,
log_Reports
);
}
else
{
// エラー
err_sName_Attr = sName_Attr;
goto gt_Error_UndefinedArgName;
}
goto gt_EndMethod2;
//
//
gt_Error_UndefinedArgName:
bBreak = true;
{
Builder_TexttemplateP1p tmpl = new Builder_TexttemplateP1pImpl();
tmpl.SetParameter(1, err_sName_Attr, log_Reports);//引数名
tmpl.SetParameter(2, cur_Expr_Func.ToString_ListNameargumentDefinition_ForReport(), log_Reports);//引数名リスト
owner_MemoryApplication.CreateErrorReport("Er:110001;", tmpl, log_Reports);
}
//
gt_EndMethod2:
;
});
goto gt_EndMethod;
gt_EndMethod:
log_Method.EndMethod(log_Reports);
}
private void ParseChild_SpecialFnc_(
Configurationtree_Node cur_Cf,
Expression_Node_String cur_Ec,//「S■ｆｎｃ」、や「S■ｅｖｅｎｔ」か？
MemoryApplication memoryApplication,
Log_TextIndented_ConfigurationtreeToExpression pg_ParsingLog,
Log_Reports log_Reports
)
{
Log_Method log_Method = new Log_MethodImpl(0, Log_ReportsImpl.BDebugmode_Static);
log_Method.BeginMethod(Info_ConfigurationtreeToExpression.Name_Library, this, "ParseChild_Special_",log_Reports);
//
//
if (!log_Reports.Successful)
{
goto gt_EndMethod;
}
//
//
//
// 子
//
//
//
cur_Cf.List_Child.ForEach(delegate(Configurationtree_Node s_Child, ref bool bBreak)
{
if (log_Reports.Successful)
{
if (NamesNode.S_ARG == s_Child.Name)
{
//━━━━━
// ａｒｇ
//━━━━━
string sName_MyFnc;
cur_Cf.Dictionary_Attribute.TryGetValue(PmNames.S_NAME, out sName_MyFnc, false, log_Reports);
string sName_ChildFnc;
s_Child.Dictionary_Attribute.TryGetValue(PmNames.S_NAME, out sName_ChildFnc, false, log_Reports);
//
bool bNormalize = false;
if(
// 親が「E■ｆｎｃ」
NamesNode.S_FNC == cur_Ec.Cur_Configuration.Name &&
NamesFnc.S_CELL == sName_MyFnc
)
{
if (
// 子が「ｎａｍｅ＝”ｓｅｌｅｃｔ”」
PmNames.S_SELECT.Name_Pm == sName_ChildFnc
)
{
bNormalize = true;
}
}
if (bNormalize)
{
ConfigurationtreeToExpression_F14n16 to = new ConfigurationtreeToExpression_F14_FArgImpl();
to.Translate(
s_Child,
cur_Ec,//「E■ｆｎｃ」とか
memoryApplication,
pg_ParsingLog,
log_Reports
);
}
else
{
string sValue = "";
//
// ｖａｌｕｅ＝”” 属性が指定されていれば、その値をそのまま取得。
//
s_Child.Dictionary_Attribute.ForEach(delegate(string sPmName2, string sAttrValue2, ref bool bBreak2)
{
if (PmNames.S_VALUE.Name_Pm == sPmName2)
{
// value属性が指定されていた場合。
s_Child.Dictionary_Attribute.TryGetValue(PmNames.S_VALUE, out sValue, true, log_Reports);
// 「E■ａｒｇ１」は作らずに、親要素の属性として追加。
Expression_Node_String e_Value = new Expression_Leaf_StringImpl(sValue, cur_Ec, cur_Ec.Cur_Configuration);
cur_Ec.SetAttribute(sName_ChildFnc, e_Value, log_Reports);
}
});
//
// 子要素の有無。
//
if (0 < s_Child.List_Child.Count)
{
// 子要素が指定されている場合。
if ("" != sValue)
{
// value属性が指定されているのに、子要素も指定されているのは、エラーです。
if (log_Method.CanError())
{
log_Method.WriteError_ToConsole( " value属性が指定されているのに、子要素も指定されているのは、エラーです。");
}
}
else
{
Expression_Node_StringImpl ec_Value = new Expression_Node_StringImpl(cur_Ec, s_Child);
ConfigurationtreeToExpression_F14_FncImpl_ to2 = new ConfigurationtreeToExpression_F14_FncImpl_();
to2.ParseChild_SpecialFnc_(
s_Child,
ec_Value,
memoryApplication,
pg_ParsingLog,
log_Reports
);
//
// 「E■ａｒｇ１」は作らずに、親要素の属性として追加。
//
cur_Ec.SetAttribute(sName_ChildFnc, ec_Value, log_Reports);
}
}
else
{
if ("" == sValue)
{
// todo:
throw new Exception(Info_ConfigurationtreeToExpression.Name_Library + ":" + this.GetType().Name + "#ParseChild:（３） 「S■[" + cur_Cf.Name + "]」の子要素「S■[" + s_Child.Name + "]」に、value属性がありませんでした。子要素もありませんでした。");
}
}
}
}
else if (NamesNode.S_F_VAR == s_Child.Name)
{
//━━━━━
// ｆ－ｖａｒ
//━━━━━
//throw new Exception(Info_SToE.LibraryName + ":" + this.GetType().Name + "#ParseChild:（ｂ）ｆ－ｖａｒ 使っていなければ廃止したい。");
// 親要素「S■ｆｎｃ」の子要素として追加します。
ConfigurationtreeToExpression_F14_FvariableImpl_ to = new ConfigurationtreeToExpression_F14_FvariableImpl_();
to.Translate(
s_Child,
cur_Ec,//「E■ｆｎｃ」とか
memoryApplication,
pg_ParsingLog,
log_Reports
);
}
else if (NamesNode.S_F_STR == s_Child.Name)
{
//━━━━━
// ｆ－ｓｔｒ
//━━━━━
//throw new Exception(Info_SToE.LibraryName + ":" + this.GetType().Name + "#ParseChild:（ｃ）ｆ－ｓｔｒ 使っていなければ廃止したい。");
// 親要素「S■ｆｎｃ」の子要素として追加します。
ConfigurationtreeToExpression_F14_FstrImpl_ to = new ConfigurationtreeToExpression_F14_FstrImpl_();
to.Translate(
s_Child,
cur_Ec,//「E■ｆｎｃ」とか
memoryApplication,
pg_ParsingLog,
log_Reports
);
}
else if (NamesNode.S_FNC == s_Child.Name)
{
//━━━━━
// ｆｎｃ
//━━━━━
//throw new Exception(Info_SToE.LibraryName + ":" + this.GetType().Name + "#ParseChild:（ｅ）ｆｎｃ 使っていなければ廃止したい。");
//
// S_FVarImpl （「S■ｆ－ｖａｒ」）など。
// 【追加 2012-05-31】
//
// 親要素「S■ｆｎｃ」の子要素として追加します。
pg_ParsingLog.Increment("（ＳＴｏＥ＿Ｆ＿４ＦＦｎｃＩｍｐｌ②）");
ConfigurationtreeToExpression_F14n16 to = new ConfigurationtreeToExpression_F14_FncImpl_();
to.Translate(
s_Child,// s_Fnc,//※s_Node（「S■ｆ－ｖａｒ」とか）を入れるのではなく、その親を入れます。
cur_Ec,//「E■ｆｎｃ」とかか？
memoryApplication,
pg_ParsingLog,
log_Reports
);
pg_ParsingLog.Decrement();
}
else if (NamesNode.S_F_PARAM == s_Child.Name)
{
//━━━━━
// ｆ－ｐａｒａｍ
//━━━━━
//throw new Exception(Info_SToE.LibraryName + ":" + this.GetType().Name + "#ParseChild:（ｆ）ｆ－ｐａｒａｍ 使っていなければ廃止したい。");
// 【追加 2012-06-05】
ConfigurationtreeToExpression_F14_FparamImpl_ to4 = new ConfigurationtreeToExpression_F14_FparamImpl_();
to4.Translate(
s_Child,
cur_Ec,
memoryApplication,
pg_ParsingLog,
log_Reports
);
}
else
{
// todo:2
goto gt_Error_UndefinedChlid;
throw new Exception(Info_ConfigurationtreeToExpression.Name_Library + ":" + this.GetType().Name + "#ParseChild:（１６） 「S■[" + cur_Cf.Name + "]」に、未定義の子要素「S■[" + s_Child.Name + "]」がありました。");
}
}
goto gt_EndMethod2;
//
gt_Error_UndefinedChlid:
{
Builder_TexttemplateP1p tmpl = new Builder_TexttemplateP1pImpl();
tmpl.SetParameter(1, cur_Cf.Name, log_Reports);//設定ノード名
tmpl.SetParameter(2, s_Child.Name, log_Reports);//子要素名
tmpl.SetParameter(3, cur_Cf.Dictionary_Attribute.Count.ToString(), log_Reports);//string属性の数
//string属性のリスト
StringBuilder s1 = new StringBuilder();
cur_Cf.Dictionary_Attribute.ForEach(delegate(string sKey2, string sValue2, ref bool bBreak2)
{
s1.Append("s属 [" + sKey2 + "]＝[" + sValue2 + "]\n");
});
tmpl.SetParameter(4, s1.ToString(), log_Reports);
tmpl.SetParameter(5, cur_Cf.List_Child.Count.ToString(), log_Reports);//子要素の数
//子要素のリスト
StringBuilder s2 = new StringBuilder();
cur_Cf.List_Child.ForEach(
delegate(Configurationtree_Node cf_Child2, ref bool bBreak5)
{
s2.Append("子「S■" + cf_Child2.Name + "」\n");
});
tmpl.SetParameter(6, s2.ToString(), log_Reports);
tmpl.SetParameter(7, Log_RecordReportsImpl.ToText_Configuration(cur_Cf), log_Reports);//設定位置パンくずリスト
memoryApplication.CreateErrorReport("Er:7005;", tmpl, log_Reports);
}
goto gt_EndMethod2;
gt_EndMethod2:
;
});
goto gt_EndMethod;
//
//
gt_EndMethod:
log_Method.EndMethod(log_Reports);
}