解析大型.NET ERP系统 分布式应用模式设计与实现

C/S架构的应用程序，将一些复杂的计算逻辑由客户端转移到服务器端可以改善性能，同时也为了其它方面的控制。.NET Remoting在局域网内调用的性能相当不错。ERP系统中基于.NET Remoting和WCF构建一个应用程序服务器(Application Server)。

分布式应用设计目标：

1  客户端的连接，服务器要能控制。服务器根据授权许可文件的内容，控制客户端并发数。

2  服务器崩溃，客户端要得到通知，挂起当前数据输入操作，当服务器可用时，客户端可自动重新连接 。

3  支持数据加密，对敏感的数据可用加密的端口和通道传输。

4  支持数据压缩，改善数据传输效率，因为要做一个压缩与解压缩动作，性能有所降低。

5 安全控制，应用程序服务器阻止未授权的或未签名的应用程序的连接。

6 客户端向服务器传送大文件，传送图片需要时性能优化

7 服务器端发现错误时，支持堆栈传回客户端以诊断原因。

8 开发和部署简单方便。

先设计服务器与客户端通信的接口，一个简单销售合同数据表的访问接口代码如下所示。

 public interface ISalesContractManager
    {
        SalesContractEntity GetSalesContract(Guid sessionId, String ContractNo);
        SalesContractEntity GetSalesContract(Guid sessionId, String ContractNo, IPrefetchPath2 prefetchPath);
        SalesContractEntity GetSalesContract(Guid sessionId, String ContractNo, IPrefetchPath2 prefetchPath, ExcludeIncludeFieldsList fieldList);

        EntityCollection GetSalesContractCollection(Guid sessionId, IRelationPredicateBucket filterBucket);
        EntityCollection GetSalesContractCollection(Guid sessionId, IRelationPredicateBucket filterBucket, ISortExpression sortExpression);
        EntityCollection GetSalesContractCollection(Guid sessionId, IRelationPredicateBucket filterBucket, ISortExpression sortExpression, IPrefetchPath2 prefetchPath);
        EntityCollection GetSalesContractCollection(Guid sessionId, IRelationPredicateBucket filterBucket, ISortExpression sortExpression, IPrefetchPath2 prefetchPath, ExcludeIncludeFieldsList fieldList);

        SalesContractEntity SaveSalesContract(Guid sessionId, SalesContractEntity salesContractEntity);
        SalesContractEntity SaveSalesContract(Guid sessionId, SalesContractEntity salesContractEntity, EntityCollection entitiesToDelete);
        SalesContractEntity SaveSalesContract(Guid sessionId, SalesContractEntity salesContractEntity, EntityCollection entitiesToDelete, string seriesCode);

        void DeleteSalesContract(Guid sessionId, SalesContractEntity salesContractEntity);

        bool IsSalesContractExist(Guid sessionId, String ContractNo);
        bool IsSalesContractExist(Guid sessionId, IRelationPredicateBucket filterBucket);
        int GetSalesContractCount(Guid sessionId, IRelationPredicateBucket filterBucket);

        SalesContractEntity CloneSalesContract(Guid sessionId, String ContractNo);
        void PostSalesContract(Guid sessionId, String ContractNo);
        void PostSalesContract(Guid sessionId, SalesContractEntity salesContractEntity);
    }

再设计服务实现SalesContractManager,实现上面的接口。

 [CommunicationService("SalesContractManager")]
    public class SalesContractManager : ManagerBase, ISalesContractManager
    {
        public SalesContractEntity GetSalesContract(Guid sessionId, String ContractNo)
        {
            return GetSalesContract(sessionId, ContractNo, null);
        }

        public SalesContractEntity GetSalesContract(Guid sessionId, String ContractNo, IPrefetchPath2 prefetchPath)
        {
            return GetSalesContract(sessionId, ContractNo, prefetchPath, null);
        }

注意到上面给上面的实现类添加了CommunicationService特性，也就是声明实现类是一个服务。

先来回顾一下最简单的.NET Remoting 客户端与服务器端代码设计模式。

服务器端的设计：

int port = Convert.ToInt32(ConfigurationManager.AppSettings["Port"]);
BinaryServerFormatterSinkProvider provider = new BinaryServerFormatterSinkProvider();
provider.TypeFilterLevel = TypeFilterLevel.Full;
IDictionary props = new Hashtable();
props["port"] = port;
TcpChannel channel = new TcpChannel(props, null, provider);
ChannelServices.RegisterChannel(channel, false);
RemotingConfiguration.RegisterWellKnownServiceType(typeof(ERP.BusinessLogic.SalesContractManager), "RemotingService", WellKnownObjectMode.SingleCall);

这里是用代码写死服务类，可以用配置文件增加服务类，也可用以反射的方法增加服务类。

客户端调用的代码如下：

ISalesContractManager  salesContractManager =(IPdmServer)Activator.GetObject(typeof(ISalesContractManager),string.Format("{0}RemotingService", ApplicationServerUrl));
if (salesContractManager == null)
        throw new AppException("Sever configuration error");
salesContractManager.SaveSalesContract(guid, salesContract);

改善服务器端代码，让服务器主动搜索系统中打上CommunicationService特性的服务类。当新增加服务类型时，框架可自动识别并加载服务类型：

Assembly assembly = typeof(Manager).Assembly;
Type[] types = assembly.GetTypes();
foreach (Type type in types)
{
           if (type.Namespace == "ERP.BusinessLogic.Managers")
            {
                    string serviceName = string.Empty;
                    object[] attributes = type.GetCustomAttributes(typeof(CommunicationService), true);

                     if (attributes.Length > 0)
                           serviceName = type.Name;

 if (!string.IsNullOrEmpty(serviceName))
                            {
                                if (clientActivatedServices.Contains(serviceName))
                                {
                                    RemotingConfiguration.RegisterActivatedServiceType(type);
                                }
                                else if (singletonServices.Contains(serviceName))
                                {
                                    RemotingConfiguration.RegisterWellKnownServiceType(type, serviceName + ".rem", WellKnownObjectMode.Singleton);
                                }
                                else
                                {
                                   RemotingConfiguration.RegisterWellKnownServiceType(type, serviceName + ".rem", WellKnownObjectMode.SingleCall);
                                }
                            }

这样节省了开发人员的服务发布时间。客户端主要方法如下：

instance = ReflectionHelper.CreateObjectInstance<T>(type);

.NET Remoting可识别当前服务类型是否注册过，如果有则会创建一个远程代理，实现向服务器发送请求。

控制客户端并发数：

.NET Remoting支持单件调用模式，客户端不论调用次数，服务器端都只会是相同的一份对象，这样可实现会话Session控制。ERP系统用户登入时，检查服务器登入会话表(Session,本质上是一个DataTable)，判断是否已经登入。同时也可以实现并发用户控制，当登入的用户数超过授权许可规定的用户数，可阻止登入。

服务器崩溃，客户端要得到通知，挂起当前数据输入操作，当服务器可用时，客户端可自动重新连接：

.NET Remoting支持客户端服务器订阅模式，服务器端可向客户端发送消息。当服务器进程崩溃，或是无法连接到数据库等原因发生时，需要及时向订阅过的客户端发送消息通知，客户端界面收到通知后需要立即挂起ERP主界面，不允许任何操作。这样可避免用户辛苦的输入数据后，点击保存却连接不上服务器，只好关闭重新输入。

安全控制，应用程序服务器阻止未授权的或未签名的应用程序的连接：

服务器控制客户端的连接调用，在客户端登入时，需要传入当前客户端程序集的版本，签名标识Token，还有系统参数等，服务器端会将这些参数整合在一起，用MD5计算出一个哈希值。只有客户端传入的参数值经过MD5运算后，与服务器中这些相同的参数值MD5运算之后的值，完全相同。服务器端才允许客户端继续登入。

服务器端发现错误时，支持堆栈传回客户端以诊断原因：

上面创建服务器端的代码中，有以下两句是为了实现服务器端堆栈回传到客户端的，参考下面的代码：

BinaryServerFormatterSinkProvider provider = new BinaryServerFormatterSinkProvider();
provider.TypeFilterLevel = TypeFilterLevel.Full;

支持数据加密和数据压缩：

使用自定义的GTCP信道(Channel)通信，此通道支持加密传输和数据压缩传输。

开发和部署简单方便:

Code Smith 6.5的模板会帮助生成ISalesContractManager和SalesContractManager两个类型的源代码，通过上面的讲解知道，只需要给SalesContractManager加上CommunicationService特性即实现服务类的部署。

客户端向服务器传送大文件性能：

为了改善性能，对于文件传输类服务，单独开放一个端口用于文件传输。