mybean.core.intf.pas 7.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295
  1. (*
  2. * Unit owner: D10.天地弦
  3. * blog: http://www.cnblogs.com/dksoft
  4. *
  5. * v0.1.1 (2014-09-03 23:46:16)
  6. * 添加 IApplicationContextEx01接口
  7. * 可以实现手动加载DLL和配置文件
  8. *
  9. * v0.1.0(2014-08-29 13:00)
  10. * 修改加载方式(beanMananger.dll-改造)
  11. *
  12. * v0.0.1(2014-05-17)
  13. * + first release
  14. *
  15. *
  16. 核心框架接口文件
  17. IApplicationContext: 主控台必须要实现的接口
  18. IBeanFactory: 插件宿主必须要实现的接口
  19. *)
  20. unit mybean.core.intf;
  21. interface
  22. type
  23. /// <summary>
  24. /// 接口已经改变需要重新编译所有的DLL和主控台
  25. /// 2014年5月15日 20:55:28
  26. /// D10.天地弦
  27. /// 添加了 checkFinalize
  28. /// 修改了 checkInitialize(pvLoadLib:Boolean);stdcall; 添加了参数
  29. /// </summary>
  30. IApplicationContext = interface(IInterface)
  31. ['{0FE2FD2D-3A21-475B-B51D-154E1728893B}']
  32. /// <summary>
  33. /// 初始化配置(线程不安全),
  34. /// pvLoadLib为true时加载配置文件的同时加载DLL文件(服务端程序推荐)
  35. /// 为flase时只加载配置文件(客户端程序推荐)
  36. /// pvUseLibCache为true时copy,dll文件到Plug-ins-cache文件夹然后进行加载
  37. /// 为false时不进行copy,原来目录进行加载
  38. /// </summary>
  39. procedure checkInitialize; stdcall;
  40. /// <summary>
  41. /// 执行反初始化在程序准备退出的时候使用
  42. /// </summary>
  43. procedure checkFinalize; stdcall;
  44. /// <summary>
  45. /// 获取一个bean接口(线程安全)
  46. /// 如果单实例内部开启互斥
  47. /// </summary>
  48. function getBean(pvBeanID: PAnsiChar): IInterface; stdcall;
  49. /// <summary>
  50. /// 获取beanID对应的工厂接口
  51. /// </summary>
  52. function getBeanFactory(pvBeanID:PAnsiChar):IInterface; stdcall;
  53. end;
  54. IApplicationContextEx01 = interface(IInterface)
  55. ['{10009F97-1949-476D-9CE1-1AF003B47DCB}']
  56. /// <summary>
  57. /// 加载库文件
  58. /// </summary>
  59. /// <returns>
  60. /// 加载成功返回true, 失败返回false, 可以用raiseLastOsError获取异常
  61. /// </returns>
  62. /// <param name="pvLibFile"> (PAnsiChar) </param>
  63. function checkLoadLibraryFile(pvLibFile:PAnsiChar): Boolean; stdcall;
  64. /// <summary>
  65. /// 加载配置文件
  66. /// </summary>
  67. /// <returns>
  68. /// 加载失败返回false<文件可能不存在>
  69. /// </returns>
  70. /// <param name="pvConfigFile"> (PAnsiChar) </param>
  71. function checkLoadBeanConfigFile(pvConfigFile:PAnsiChar): Boolean; stdcall;
  72. end;
  73. /// <summary>
  74. /// 主控台扩展接口
  75. /// 2014-09-22 12:27:56
  76. /// </summary>
  77. IApplicationContextEx2 = interface(IInterface)
  78. ['{401B2E73-3C6B-4738-9DE4-B628EE5E1D44}']
  79. /// <summary>
  80. /// 卸载掉指定的插件宿主文件(dll)
  81. /// 在卸载之前应该释放掉由所创建的对象实例,和分配的内存空间,
  82. /// 否则会在退出EXE的时候,出现内存访问违规错误
  83. /// 卸载如果出现问题, 返回false,请查看日志文件
  84. /// *(谨慎使用)
  85. /// </summary>
  86. function unLoadLibraryFile(pvLibFile: PAnsiChar; pvRaiseException: Boolean =
  87. true): Boolean; stdcall;
  88. /// <summary>
  89. /// 判断BeanID是否存在
  90. /// </summary>
  91. function checkBeanExists(pvBeanID:PAnsiChar):Boolean; stdcall;
  92. end;
  93. /// <summary>
  94. /// 主控台扩展接口
  95. /// 2014-11-14 12:40:17
  96. /// </summary>
  97. IApplicationContextEx3 = interface(IInterface)
  98. ['{4D0387BC-0FF8-4D89-B064-C8C30AA432BE}']
  99. /// <summary>
  100. /// 获取所有Bean信息
  101. /// result: 返回读取到的数据长度
  102. /// pvLength: 尝试读取的长度,传入的pvBeanInfo必须分配有足够的内存
  103. /// pvBeanInfo: 返回读取到的数据
  104. /// utf8 AnsiString
  105. /// [
  106. /// {"id":"beanid", "lib":"libfile"}
  107. /// ...
  108. /// ]
  109. /// </summary>
  110. function GetBeanInfos(pvBeanInfo:PAnsiChar; pvLength:Integer): Integer; stdcall;
  111. end;
  112. /// <summary>
  113. /// 插件工厂接口,由插件宿主(DLL, BPL)库文件提供
  114. /// </summary>
  115. IBeanFactory = interface(IInterface)
  116. ['{480EC845-2FC0-4B45-932A-57711D518E70}']
  117. /// <summary>
  118. /// 获取所有的插件ID
  119. /// 返回获取ID的长度分隔符#10#13
  120. /// </summary>
  121. function getBeanList(pvIDs:PAnsiChar; pvLength:Integer): Integer; stdcall;
  122. /// <summary>
  123. /// 根据beanID获取对应的插件
  124. /// </summary>
  125. function getBean(pvBeanID: PAnsiChar): IInterface; stdcall;
  126. /// <summary>
  127. /// 初始化,加载DLL后执行
  128. /// </summary>
  129. procedure checkInitalize;stdcall;
  130. /// <summary>
  131. /// 卸载DLL之前执行
  132. /// </summary>
  133. procedure checkFinalize;stdcall;
  134. /// <summary>
  135. /// 配置所有bean的相关的配置,会覆盖之前的Bean配置
  136. /// pvConfig是Json格式
  137. /// beanID(mapKey)
  138. /// {
  139. /// id:xxxx,
  140. /// .....
  141. /// }
  142. /// </summary>
  143. function configBeans(pvConfig:PAnsiChar):Integer; stdcall;
  144. /// <summary>
  145. /// 配置bean的相关信息
  146. /// pvConfig是Json格式的参数
  147. /// 会覆盖之前的bean配置
  148. /// {
  149. /// id:xxxx,
  150. /// .....
  151. /// }
  152. /// </summary>
  153. function configBean(pvBeanID, pvConfig: PAnsiChar): Integer; stdcall;
  154. /// <summary>
  155. /// 配置bean配置
  156. /// pluginID,内部的插件ID
  157. /// </summary>
  158. function configBeanPluginID(pvBeanID, pvPluginID: PAnsiChar): Integer; stdcall;
  159. /// <summary>
  160. /// 配置bean配置
  161. /// singleton,单实例,
  162. /// 配置单实例时,请注意要么对象有接口管理生命周期,要么实现IFreeObject接口
  163. /// 不要手动释放释放对象.
  164. /// </summary>
  165. function configBeanSingleton(pvBeanID: PAnsiChar; pvSingleton:Boolean): Integer; stdcall;
  166. end;
  167. /// <summary>
  168. /// 插件工厂注册
  169. /// </summary>
  170. IbeanFactoryRegister = interface(IInterface)
  171. ['{C06270CF-FF16-4AB0-89D7-3D8C3D8D9820}']
  172. /// <summary>
  173. /// 直接注册Bean工厂插件, 单EXE可以直接注册
  174. /// </summary>
  175. function registerBeanFactory(const pvFactory: IBeanFactory; const pvNameSapce:PAnsiChar):Integer;stdcall;
  176. end;
  177. IErrorInfo = interface(IInterface)
  178. ['{A15C511B-AD0A-43F9-AA3B-CAAE00DC372D}']
  179. /// <summary>
  180. /// 获取错误代码,没有错误返回 0
  181. /// </summary>
  182. function getErrorCode: Integer; stdcall;
  183. /// <summary>
  184. /// 获取错误信息数据,返回读取到的错误信息长度,
  185. /// 如果传入的pvErrorDesc为nil指针,返回错误信息的长度
  186. /// </summary>
  187. function getErrorDesc(pvErrorDesc: PAnsiChar; pvLength: Integer): Integer; stdcall;
  188. end;
  189. IFreeObject = interface
  190. ['{863109BC-513B-440C-A455-2AD4F5EDF508}']
  191. procedure FreeObject; stdcall;
  192. end;
  193. IKeyMap = interface(IInterface)
  194. ['{3CF4907D-C1FF-4E93-9E32-06AAD82310B4}']
  195. /// <summary>
  196. /// 判断是否存在接口
  197. /// </summary>
  198. function existsObject(const pvKey:PAnsiChar):Boolean; stdcall;
  199. /// <summary>
  200. /// 根据key值获取接口
  201. /// </summary>
  202. function getObject(const pvKey:PAnsiChar):IInterface; stdcall;
  203. /// <summary>
  204. /// 赋值接口
  205. /// </summary>
  206. procedure setObject(const pvKey:PAnsiChar; const pvIntf: IInterface); stdcall;
  207. /// <summary>
  208. /// 移除接口
  209. /// </summary>
  210. procedure removeObject(const pvKey:PAnsiChar); stdcall;
  211. /// <summary>
  212. /// 清理对象
  213. /// </summary>
  214. procedure cleanupObjects; stdcall;
  215. end;
  216. IBeanConfigSetter = interface(IInterface)
  217. ['{C7DABCDB-9908-4C43-B353-647EDB7F3DCE}']
  218. /// <summary>
  219. /// 设置配置中的Config
  220. /// </summary>
  221. /// <param name="pvBeanConfig">
  222. /// 配置文件中JSon格式的字符串
  223. /// </param>
  224. procedure setBeanConfig(pvBeanConfig: PAnsiChar); stdcall;
  225. end;
  226. var
  227. appPluginContext:IApplicationContext;
  228. applicationKeyMap:IKeyMap;
  229. implementation
  230. initialization
  231. appPluginContext := nil;
  232. applicationKeyMap := nil;
  233. finalization
  234. appPluginContext := nil;
  235. applicationKeyMap := nil;
  236. end.