arangodb erlang数据库驱动
您最多选择25个主题 主题必须以字母或数字开头,可以包含连字符 (-),并且长度不得超过35个字符

193 行
5.0 KiB

  1. %% agency 管理进程的名称
  2. -define(agAgencyPoolMgr, agAgencyPoolMgr).
  3. %% beam cache 模块名
  4. -define(agBeamPool, agBeamPool).
  5. -define(agBeamAgency, agBeamAgency).
  6. -define(AgCUndef, 0). %% Wait One Chunk start
  7. -define(AgCHeader, 1). %% Wait One Chunk header
  8. -define(AgCBody, 2). %% Wait One Chunk Body
  9. -define(AgCDone, 3). %% Wait One Chunk Receive Over
  10. -define(AgMDone, 4). %% Wait One Message Over
  11. %% 默认选项定义
  12. -define(AgDefBaseUrl, <<"http://127.0.0.1:8529">>).
  13. -define(AgDefDbName, <<"_system">>).
  14. -define(AgDefUser, <<"root">>).
  15. -define(AgDefPassWord, <<"156736">>).
  16. -define(AgDefBacklogSize, 1024).
  17. -define(AgDefConnTimeout, 5000).
  18. -define(AgDefPoolSize, 16).
  19. -define(AgDefIsReConn, true).
  20. -define(AgDefReConnMin, 500).
  21. -define(AgDefReConnMax, 120000).
  22. -define(AgDefTimeout, infinity).
  23. -define(AgDefPid, self()).
  24. -define(AgDefSocketOpts, [binary, {active, true}, {nodelay, true}, {delay_send, true}, {keepalive, true}, {recbuf, 1048576}, {send_timeout, 5000}, {send_timeout_close, true}]).
  25. -define(AgGetListKV(Key, List), agMiscUtils:getListValue(Key, List, undefined)).
  26. -define(AgGetListKV(Key, List, Default), agMiscUtils:getListValue(Key, List, Default)).
  27. -define(AgWarn(Tag, Format, Data), agMiscUtils:warnMsg(Tag, Format, Data)).
  28. -define(AgMDoNetConn, mDoNetConn).
  29. -record(miRequest, {
  30. method :: method()
  31. , path :: path()
  32. , queryPars :: queryPars()
  33. , headers :: headers()
  34. , body :: body()
  35. , messageId :: pos_integer()
  36. , fromPid :: pid()
  37. , overTime = infinity :: timeout()
  38. , isSystem = false :: boolean()
  39. }).
  40. -record(miRequestRet, {
  41. messageId :: messageId(),
  42. reply :: term()
  43. }).
  44. -record(reConnState, {
  45. min :: non_neg_integer(),
  46. max :: non_neg_integer() | infinity,
  47. current :: non_neg_integer() | undefined
  48. }).
  49. -record(srvState, {
  50. poolName :: poolName(),
  51. serverName :: serverName(),
  52. userPassWord :: binary(),
  53. host :: binary(),
  54. dbName :: binary(),
  55. reconnectState :: undefined | reconnectState(),
  56. socket :: undefined | ssl:sslsocket(),
  57. timerRef :: undefined | reference()
  58. }).
  59. -record(cliState, {
  60. revStatus = ?AgCUndef :: pos_integer(),
  61. backlogNum = 0 :: integer(),
  62. backlogSize = 0 :: integer(),
  63. buffer = <<>> :: binary()
  64. }).
  65. -record(dbOpts, {
  66. host :: host(),
  67. port :: 0..65535,
  68. hostname :: hostName(),
  69. dbName :: binary(),
  70. protocol :: protocol(),
  71. poolSize :: poolSize(),
  72. userPassword :: binary(),
  73. socketOpts :: socketOpts()
  74. }).
  75. -record(agencyOpts, {
  76. reconnect :: boolean(),
  77. backlogSize :: backlogSize(),
  78. reconnectTimeMin :: pos_integer(),
  79. reconnectTimeMax :: pos_integer()
  80. }).
  81. -type miRequest() :: #miRequest{}.
  82. -type miRequestRet() :: #miRequestRet{}.
  83. -type srvState() :: #srvState{}.
  84. -type cliState() :: #cliState{}.
  85. -type reconnectState() :: #reConnState{}.
  86. -type poolName() :: atom().
  87. -type poolNameOrSocket() :: atom() | socket().
  88. -type serverName() :: atom().
  89. -type protocol() :: ssl | tcp.
  90. -type method() :: binary().
  91. -type queryPars() :: map().
  92. -type headers() :: map().
  93. -type body() :: iodata() | undefined.
  94. -type path() :: binary().
  95. -type host() :: binary().
  96. -type hostName() :: string().
  97. -type poolSize() :: pos_integer().
  98. -type backlogSize() :: pos_integer() | infinity.
  99. -type messageId() :: pos_integer().
  100. -type socket() :: inet:socket() | ssl:sslsocket().
  101. -type socketOpts() :: [gen_tcp:connect_option() | ssl:tls_client_option()].
  102. -type error() :: {error, term()}.
  103. -type dbCfg() ::
  104. {baseUrl, binary()} |
  105. {dbName, binary()} |
  106. {user, binary()} |
  107. {password, binary()} |
  108. {poolSize, poolSize()} |
  109. {socketOpts, socketOpts()}.
  110. -type agencyCfg() ::
  111. {reconnect, boolean()} |
  112. {backlogSize, backlogSize()} |
  113. {reconnectTimeMin, pos_integer()} |
  114. {reconnectTimeMax, pos_integer()}.
  115. -type dbCfgs() :: [dbCfg()].
  116. -type dbOpts() :: #dbOpts{}.
  117. -type agencyCfgs() :: [agencyCfg()].
  118. -type agencyOpts() :: #agencyOpts{}.
  119. %% http header 头
  120. %% -type header() ::
  121. %% 'Cache-Control' |
  122. %% 'Connection' |
  123. %% 'Date' |
  124. %% 'Pragma'|
  125. %% 'Transfer-Encoding' |
  126. %% 'Upgrade' |
  127. %% 'Via' |
  128. %% 'Accept' |
  129. %% 'Accept-Charset'|
  130. %% 'Accept-Encoding' |
  131. %% 'Accept-Language' |
  132. %% 'Authorization' |
  133. %% 'From' |
  134. %% 'Host' |
  135. %% 'If-Modified-Since' |
  136. %% 'If-Match' |
  137. %% 'If-None-Match' |
  138. %% 'If-Range'|
  139. %% 'If-Unmodified-Since' |
  140. %% 'Max-Forwards' |
  141. %% 'Proxy-Authorization' |
  142. %% 'Range'|
  143. %% 'Referer' |
  144. %% 'User-Agent' |
  145. %% 'Age' |
  146. %% 'Location' |
  147. %% 'Proxy-Authenticate'|
  148. %% 'Public' |
  149. %% 'Retry-After' |
  150. %% 'Server' |
  151. %% 'Vary' |
  152. %% 'Warning'|
  153. %% 'Www-Authenticate' |
  154. %% 'Allow' |
  155. %% 'Content-Base' |
  156. %% 'Content-Encoding'|
  157. %% 'Content-Language' |
  158. %% 'Content-Length' |
  159. %% 'Content-Location'|
  160. %% 'Content-Md5' |
  161. %% 'Content-Range' |
  162. %% 'Content-Type' |
  163. %% 'Etag'|
  164. %% 'Expires' |
  165. %% 'Last-Modified' |
  166. %% 'Accept-Ranges' |
  167. %% 'Set-Cookie'|
  168. %% 'Set-Cookie2' |
  169. %% 'X-Forwarded-For' |
  170. %% 'Cookie' |
  171. %% 'Keep-Alive' |
  172. %% 'Proxy-Connection' |
  173. %% binary() |
  174. %% string().