コード例 #1
0
ファイル: MarcDetailForm.cs プロジェクト: paopaofeng/dp2
        int NewHostObject(
            out MarcDetailHost hostObj,
            out string strError)
        {
            strError = "";
            hostObj = null;

            Type entryClassType = ScriptManager.GetDerivedClassType(
    this.m_autogenDataAssembly,
    "dp2Catalog.MarcDetailHost");
            if (entryClassType == null)
            {
                strError = "dp2Catalog.MarcDetailHost的派生类都没有找到";
                return -1;
            }

            // new一个MarcDetailHost派生对象
            hostObj = (MarcDetailHost)entryClassType.InvokeMember(null,
                BindingFlags.DeclaredOnly |
                BindingFlags.Public | BindingFlags.NonPublic |
                BindingFlags.Instance | BindingFlags.CreateInstance, null, null,
                null);

            if (hostObj == null)
            {
                strError = "new MarcDetailHost的派生类对象时失败";
                return -1;
            }

            // 为DetailHost派生类设置参数
            hostObj.DetailForm = this;
            hostObj.Assembly = this.m_autogenDataAssembly;

            return 0;
        }
コード例 #2
0
ファイル: MarcDetailHost.cs プロジェクト: zszqwe/dp2
        /// <summary>
        /// 为 MARC 编辑器内的记录加拼音
        /// </summary>
        /// <param name="strCfgXml">拼音配置 XML</param>
        /// <param name="bUseCache">是否使用记录中以前缓存的结果?</param>
        /// <param name="style">风格</param>
        /// <param name="strPrefix">前缀字符串。缺省为空 [暂时没有使用本参数]</param>
        /// <param name="strDuoyinStyle">是否自动选择多音字。auto/first 之一或者组合</param>
        /// <returns>-1: 出错。包括中断的情况; 0: 正常</returns>
        public virtual int AddPinyin(string strCfgXml,
                                     bool bUseCache,    //  = true,
                                     PinyinStyle style, // = PinyinStyle.None,
                                     string strPrefix,
                                     string strDuoyinStyle)
        // bool bAutoSel = false)
        {
            string      strError = "";
            XmlDocument cfg_dom  = new XmlDocument();

            try
            {
                cfg_dom.LoadXml(strCfgXml);
            }
            catch (Exception ex)
            {
                strError = "strCfgXml装载到XMLDOM时出错: " + ex.Message;
                goto ERROR1;
            }


            this.DetailForm.MarcEditor.Enabled = false;

            Hashtable old_selected = (bUseCache == true) ? this.DetailForm.GetSelectedPinyin() : new Hashtable();
            Hashtable new_selected = new Hashtable();

            try
            {
                // PinyinStyle style = PinyinStyle.None;	// 在这里修改拼音大小写风格

                for (int i = 0; i < DetailForm.MarcEditor.Record.Fields.Count; i++)
                {
                    Field field = DetailForm.MarcEditor.Record.Fields[i];

                    List <PinyinCfgItem> cfg_items = null;
                    int nRet = GetPinyinCfgLine(
                        cfg_dom,
                        field.Name,
                        field.Indicator,
                        out cfg_items);
                    if (nRet <= 0)
                    {
                        continue;
                    }

                    string strHanzi            = "";
                    string strNextSubfieldName = "";

                    string strField = field.Text;

                    foreach (PinyinCfgItem item in cfg_items)
                    {
                        for (int k = 0; k < item.From.Length; k++)
                        {
                            if (item.From.Length != item.To.Length)
                            {
                                strError = "配置事项 fieldname='" + item.FieldName + "' from='" + item.From + "' to='" + item.To + "' 其中from和to参数值的字符数不等";
                                goto ERROR1;
                            }

                            string from = new string(item.From[k], 1);
                            string to   = new string(item.To[k], 1);
                            for (int j = 0; ; j++)
                            {
                                // return:
                                //		-1	error
                                //		0	not found
                                //		1	found

                                nRet = MarcUtil.GetSubfield(strField,
                                                            ItemType.Field,
                                                            from,
                                                            j,
                                                            out strHanzi,
                                                            out strNextSubfieldName);
                                if (nRet != 1)
                                {
                                    break;
                                }
                                if (strHanzi.Length <= 1)
                                {
                                    break;
                                }

                                strHanzi = strHanzi.Substring(1);

                                // 2013/6/13
                                if (MarcDetailHost.ContainHanzi(strHanzi) == false)
                                {
                                    continue;
                                }

                                string strPinyin = "";

                                strPinyin = (string)old_selected[strHanzi];
                                if (string.IsNullOrEmpty(strPinyin) == true)
                                {
                                    // 把字符串中的汉字和拼音分离
                                    // return:
                                    //      -1  出错
                                    //      0   用户希望中断
                                    //      1   正常
                                    if (string.IsNullOrEmpty(this.DetailForm.MainForm.PinyinServerUrl) == true ||
                                        this.DetailForm.MainForm.ForceUseLocalPinyinFunc == true)
                                    {
                                        nRet = this.DetailForm.MainForm.HanziTextToPinyin(
                                            this.DetailForm,
                                            true,       // 本地,快速
                                            strHanzi,
                                            style,
                                            strDuoyinStyle,
                                            out strPinyin,
                                            out strError);
                                    }
                                    else
                                    {
                                        // 汉字字符串转换为拼音
                                        // 如果函数中已经MessageBox报错,则strError第一字符会为空格
                                        // return:
                                        //      -1  出错
                                        //      0   用户希望中断
                                        //      1   正常
                                        //      2   结果字符串中有没有找到拼音的汉字
                                        nRet = this.DetailForm.MainForm.SmartHanziTextToPinyin(
                                            this.DetailForm,
                                            strHanzi,
                                            style,
                                            strDuoyinStyle,
                                            out strPinyin,
                                            out strError);
                                    }
                                    if (nRet == -1)
                                    {
                                        new_selected = null;
                                        goto ERROR1;
                                    }
                                    if (nRet == 0)
                                    {
                                        new_selected = null;
                                        strError     = "用户中断。拼音子字段内容可能不完整。";
                                        goto ERROR1;
                                    }
                                }

                                if (new_selected != null && nRet != 2)
                                {
                                    new_selected[strHanzi] = strPinyin;
                                }

                                nRet = MarcUtil.DeleteSubfield(
                                    ref strField,
                                    to,
                                    j);
                                nRet = MarcUtil.InsertSubfield(
                                    ref strField,
                                    from,
                                    j,
                                    new string(MarcUtil.SUBFLD, 1) + to + strPinyin,
                                    1);
                                field.Text = strField;
                            }
                        }
                    }
                }

                if (new_selected != null)
                {
                    this.DetailForm.SetSelectedPinyin(new_selected);
                }
            }
            finally
            {
                this.DetailForm.MarcEditor.Enabled = true;
                this.DetailForm.MarcEditor.Focus();
            }
            return(0);

ERROR1:
            if (string.IsNullOrEmpty(strError) == false)
            {
                if (strError[0] != ' ')
                {
                    MessageBox.Show(this.DetailForm, strError);
                }
            }
            return(-1);
        }
コード例 #3
0
ファイル: MarcDetailForm.cs プロジェクト: paopaofeng/dp2
        // 初始化 dp2catalog_marc_autogen.cs 的 Assembly,并new MarcDetailHost对象
        // return:
        //      -2  清除了Assembly
        //      -1  error
        //      0   没有重新初始化Assembly,而是直接用以前Cache的Assembly (可能本来就是空)
        //      1   重新(或者首次)初始化了Assembly
        public int InitialAutogenAssembly(out string strError)
        {
            strError = "";
            int nRet = 0;

            if (m_nDisableInitialAssembly > 0)
                return 0;

            bool bAssemblyReloaded = false;

            string strAutogenDataCfgFilename = "";
            string strAutogenDataCfgRefFilename = "";
            string strProtocol = "";
            dp2SearchForm dp2_searchform = null;

            if (String.IsNullOrEmpty(this.SavePath) == true)
            {
                if (this.CurrentRecord == null)
                {
                    this.m_autogenDataAssembly = null;
                    this.m_detailHostObj = null;
                    strError = "SavePath和CurrentRecord都为空,Assembly被清除";
                    return -2;
                }

                string strCfgFileName = "dp2catalog_marc_autogen.cs";

                string strMarcSyntaxOID = "";

                strMarcSyntaxOID = this.GetCurrentMarcSyntaxOID(out strError);
                if (String.IsNullOrEmpty(strMarcSyntaxOID) == true)
                {
                    strError = "因为: " + strError + ",无法获得配置文件 '" + strCfgFileName + "'";
                    goto ERROR1;
                }

                strAutogenDataCfgFilename = this.MainForm.DataDir + "\\" + strMarcSyntaxOID.Replace(".", "_") + "\\" + strCfgFileName;
                strAutogenDataCfgRefFilename = this.MainForm.DataDir + "\\" + strMarcSyntaxOID.Replace(".", "_") + "\\" + strCfgFileName + ".ref";

                strProtocol = "localfile";
                goto BEGIN;
            }

            string strPath = "";
            nRet = Global.ParsePath(this.SavePath,
                out strProtocol,
                out strPath,
                out strError);
            if (nRet == -1)
                goto ERROR1;

            // dtlp协议的自动创建数据
            if (strProtocol.ToLower() == "dtlp")
            {
                // TODO: 建立数据库名映射到MarcSyntac的机制

                /*
                strError = "暂不支持来自DTLP协议的数据自动创建功能";
                goto ERROR1;
                 * */

                if (this.CurrentRecord == null)
                {
                    this.m_autogenDataAssembly = null;
                    this.m_detailHostObj = null;
                    strError = "CurrentRecord为空,Assembly被清除";
                    return -2;
                }

                string strCfgFileName = "dp2catalog_marc_autogen.cs";

                string strMarcSyntaxOID = "";

                strMarcSyntaxOID = this.GetCurrentMarcSyntaxOID(out strError);
                if (String.IsNullOrEmpty(strMarcSyntaxOID) == true)
                {
                    strError = "因为: " + strError + ",无法获得配置文件 '" + strCfgFileName + "'";
                    goto ERROR1;
                }


                strAutogenDataCfgFilename = this.MainForm.DataDir + "\\" + strMarcSyntaxOID.Replace(".", "_") + "\\" + strCfgFileName;
                strAutogenDataCfgRefFilename = this.MainForm.DataDir + "\\" + strMarcSyntaxOID.Replace(".", "_") + "\\" + strCfgFileName + ".ref";

                strProtocol = "localfile";
                goto BEGIN;
            }
            // dp2library协议的自动创建数据
            else if (strProtocol.ToLower() == "dp2library")
            {
                dp2_searchform = this.GetDp2SearchForm();

                if (dp2_searchform == null)
                {
                    strError = "没有连接的或者打开的dp2检索窗,无法进行数据创建";
                    goto ERROR1;
                }

                string strServerName = "";
                string strLocalPath = "";
                // 解析记录路径。
                // 记录路径为如下形态 "中文图书/1 @服务器"
                dp2SearchForm.ParseRecPath(strPath,
                    out strServerName,
                    out strLocalPath);

                string strCfgFileName = "dp2catalog_marc_autogen.cs";

                if (string.Compare(strServerName, "mem", true) == 0
                || string.Compare(strServerName, "file", true) == 0)
                {
                    string strMarcSyntaxOID = "";

                    strMarcSyntaxOID = this.GetCurrentMarcSyntaxOID(out strError);
                    if (String.IsNullOrEmpty(strMarcSyntaxOID) == true)
                    {
                        strError = "因为: " + strError + ",无法获得配置文件 '" + strCfgFileName + "'";
                        goto ERROR1;
                    }

                    strAutogenDataCfgFilename = this.MainForm.DataDir + "\\" + strMarcSyntaxOID.Replace(".", "_") + "\\" + strCfgFileName;
                    strAutogenDataCfgRefFilename = this.MainForm.DataDir + "\\" + strMarcSyntaxOID.Replace(".", "_") + "\\" + strCfgFileName + ".ref";

                    strProtocol = "localfile";
                    goto BEGIN;
                }

                string strBiblioDbName = dp2SearchForm.GetDbName(strLocalPath);

                strAutogenDataCfgFilename = strBiblioDbName + "/cfgs/" + strCfgFileName + "@" + strServerName;
                strAutogenDataCfgRefFilename = strBiblioDbName + "/cfgs/" + strCfgFileName + ".ref@" + strServerName;
            }
            // amazon 协议的自动创建数据
            else if (strProtocol.ToLower() == "amazon")
            {
                if (this.CurrentRecord == null)
                {
                    this.m_autogenDataAssembly = null;
                    this.m_detailHostObj = null;
                    strError = "CurrentRecord为空,Assembly被清除";
                    return -2;
                }

                string strCfgFileName = "dp2catalog_marc_autogen.cs";

                string strMarcSyntaxOID = "";

                strMarcSyntaxOID = this.GetCurrentMarcSyntaxOID(out strError);
                if (String.IsNullOrEmpty(strMarcSyntaxOID) == true)
                {
                    strError = "因为: " + strError + ",无法获得配置文件 '" + strCfgFileName + "'";
                    goto ERROR1;
                }


                strAutogenDataCfgFilename = this.MainForm.DataDir + "\\" + strMarcSyntaxOID.Replace(".", "_") + "\\" + strCfgFileName;
                strAutogenDataCfgRefFilename = this.MainForm.DataDir + "\\" + strMarcSyntaxOID.Replace(".", "_") + "\\" + strCfgFileName + ".ref";

                strProtocol = "localfile";
                goto BEGIN;
            }
            else
            {
                strError = "暂不支持来自 '"+strProtocol+"'  协议的数据自动创建功能";
                goto ERROR1;
            }

        BEGIN:
            // 如果必要,重新准备Assembly
            if (m_autogenDataAssembly == null
                || m_strAutogenDataCfgFilename != strAutogenDataCfgFilename)
            {
                this.m_autogenDataAssembly = this.MainForm.AssemblyCache.FindObject(strAutogenDataCfgFilename);
                this.m_detailHostObj = null;

                // 如果Cache中没有现成的Assembly
                if (this.m_autogenDataAssembly == null)
                {
                    string strCode = "";
                    string strRef = "";

                    byte[] baCfgOutputTimestamp = null;

                    if (strProtocol.ToLower() == "dp2library")
                    {
                        // return:
                        //      -1  error
                        //      0   not found
                        //      1   found
                        nRet = dp2_searchform.GetCfgFile(strAutogenDataCfgFilename,
                            out strCode,
                            out baCfgOutputTimestamp,
                            out strError);
                        if (nRet == -1 || nRet == 0)
                            goto ERROR1;
                        nRet = dp2_searchform.GetCfgFile(strAutogenDataCfgRefFilename,
out strRef,
out baCfgOutputTimestamp,
out strError);
                        if (nRet == -1)
                            goto ERROR1;
                    }
                    else if (strProtocol.ToLower() == "localfile")
                    {
                        if (File.Exists(strAutogenDataCfgFilename) == false)
                        {
                            /*
                            if (bOnlyFillMenu == true)
                                return;
                             * */
                            strError = "配置文件 '" + strAutogenDataCfgFilename + "' 不存在...";
                            goto ERROR1;
                        }
                        if (File.Exists(strAutogenDataCfgRefFilename) == false)
                        {

                            strError = "配置文件 '" + strAutogenDataCfgRefFilename + "' 不存在(但是其配套的.cs文件已经存在)...";
                            goto ERROR1;
                        }
                        try
                        {
                            Encoding encoding = FileUtil.DetectTextFileEncoding(strAutogenDataCfgFilename);
                            using (StreamReader sr = new StreamReader(strAutogenDataCfgFilename, encoding))
                            {
                                strCode = sr.ReadToEnd();
                            }
                            encoding = FileUtil.DetectTextFileEncoding(strAutogenDataCfgRefFilename);
                            using (StreamReader sr = new StreamReader(strAutogenDataCfgRefFilename, encoding))
                            {
                                strRef = sr.ReadToEnd();
                            }
                        }
                        catch (Exception ex)
                        {
                            strError = ex.Message;
                            goto ERROR1;
                        }
                    }

                    try
                    {
                        // 准备Assembly
                        Assembly assembly = null;
                        nRet = GetCsScriptAssembly(
                            strCode,
                            strRef,
                            out assembly,
                            out strError);
                        if (nRet == -1)
                        {
                            strError = "编译脚本文件 '" + strAutogenDataCfgFilename + "' 时出错:" + strError;
                            goto ERROR1;
                        }
                        // 记忆到缓存
                        this.MainForm.AssemblyCache.SetObject(strAutogenDataCfgFilename, assembly);

                        this.m_autogenDataAssembly = assembly;

                        bAssemblyReloaded = true;
                    }
                    catch (Exception ex)
                    {
                        strError = "准备脚本代码过程中发生异常: \r\n" + ExceptionUtil.GetDebugText(ex);
                        goto ERROR1;
                    }
                }

                bAssemblyReloaded = true;

                m_strAutogenDataCfgFilename = strAutogenDataCfgFilename;

                // 至此,Assembly已经纯备好了
                Debug.Assert(this.m_autogenDataAssembly != null, "");
            }

            Debug.Assert(this.m_autogenDataAssembly != null, "");

            // 准备 host 对象
            if (this.m_detailHostObj == null
                || bAssemblyReloaded == true)
            {
                try
                {
                    MarcDetailHost host = null;
                    nRet = NewHostObject(
                        out host,
                        out strError);
                    if (nRet == -1)
                    {
                        strError = "执行脚本文件 '" + m_strAutogenDataCfgFilename + "' 时出错:" + strError;
                        goto ERROR1;
                    }
                    this.m_detailHostObj = host;

                }
                catch (Exception ex)
                {
                    strError = "准备脚本代码过程中发生异常: \r\n" + ExceptionUtil.GetDebugText(ex);
                    goto ERROR1;
                }
            }

            Debug.Assert(this.m_detailHostObj != null, "");

            if (bAssemblyReloaded == true)
                return 1;
            return 0;
        ERROR1:
            return -1;
        }