1
0

common.lisp 4.9 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192
  1. (in-package :cl-user)
  2. (defpackage chatikbot.common
  3. (:use :cl
  4. :chatikbot.db
  5. :chatikbot.utils
  6. :chatikbot.telegram
  7. :chatikbot.crypto
  8. :chatikbot.secrets
  9. :chatikbot.server
  10. :chatikbot.macros
  11. :chatikbot.bot
  12. :chatikbot.inline
  13. :chatikbot.chat-cron
  14. :chatikbot.poller)
  15. (:export :db-transaction
  16. :db-execute
  17. :db-select
  18. :db-single
  19. :db-init
  20. :load-settings
  21. :set-setting
  22. :lists-set-entry
  23. :lists-get
  24. :*message-id*
  25. :*from-id*
  26. :*chat-id*
  27. :*text*
  28. :*message*
  29. :*cmd*
  30. :*args*
  31. :*query-id*
  32. :*from*
  33. :*raw-data*
  34. :*inline-message-id*
  35. :*source-message*
  36. :*source-chat-id*
  37. :*source-message-id*
  38. :*callback*
  39. :*data*
  40. :*section*
  41. :*code*
  42. :*error*
  43. :*raw-state*
  44. :*state*
  45. :*admins*
  46. :*bot-name*
  47. :*hooks*
  48. :+hour+
  49. :+day+
  50. :*chat-default-timezone*
  51. :run-hooks
  52. :add-hook
  53. :remove-hook
  54. :is-admin
  55. :keyify
  56. :dekeyify
  57. :*settings*
  58. :defsetting
  59. :*backoff-start*
  60. :*backoff-max*
  61. :loop-with-error-backoff
  62. :replace-all
  63. :aget
  64. :agets
  65. :agetter
  66. :preprocess-input
  67. :punctuation-p
  68. :read-from-string-no-punct
  69. :print-with-spaces
  70. :spaced
  71. :text-chunks
  72. :http-request
  73. :xml-request
  74. :get-by-tag
  75. :select-text
  76. :trim-nil
  77. :text-with-cdata
  78. :unspacify
  79. :child-text
  80. :clean-text
  81. :json-request
  82. :plist-hash
  83. :plist-json
  84. :format-ts
  85. :parse-cmd
  86. :parse-float
  87. :smart-f
  88. :format-size
  89. :format-interval
  90. :symbol-append
  91. :get-chat-location
  92. :get-chat-timezone
  93. :same-time-in-chat
  94. :group-by
  95. :pmapcar
  96. :filled
  97. :*telegram-token*
  98. :+telegram-max-callback-data-length+
  99. :telegram-get-updates
  100. :telegram-get-me
  101. :telegram-set-webhook
  102. :telegram-send-message
  103. :telegram-forward-message
  104. :telegram-send-photo
  105. :telegram-send-audio
  106. :telegram-send-document
  107. :telegram-send-sticker
  108. :telegram-send-video
  109. :telegram-send-voice
  110. :telegram-send-video-note
  111. :telegram-send-media-group
  112. :telegram-send-location
  113. :telegram-edit-message-live-location
  114. :telegram-stop-message-live-location
  115. :telegram-send-contact
  116. :telegram-send-chat-action
  117. :telegram-send-get-user-profile-photos
  118. :telegram-send-get-file
  119. :telegram-answer-callback-query
  120. :telegram-edit-message-text
  121. :telegram-edit-message-caption
  122. :telegram-edit-message-reply-markup
  123. :telegram-delete-message
  124. :telegram-answer-inline-query
  125. :telegram-file-contents
  126. :telegram-inline-keyboard-markup
  127. :telegram-reply-keyboard-markup
  128. :telegram-reply-keyboard-hide
  129. :telegram-force-reply
  130. :bot-send-message
  131. :token-hmac
  132. :encode-callback-data
  133. :decode-callback-data
  134. :encode-oauth-state
  135. :decode-oauth-state
  136. :*secret-ring*
  137. :*secret-pass-store*
  138. :*secret-pass-bin*
  139. :secret-get
  140. :secret-set
  141. :secret-del
  142. :secret-wipe
  143. :with-secret
  144. :def-webhook-handler
  145. :get-webhook-url
  146. :get-oauth-url
  147. :def-db-init
  148. :with-parsed-message
  149. :def-message-handler
  150. :def-message-cmd-handler
  151. :def-message-admin-cmd-handler
  152. :with-parsed-callback
  153. :def-callback-handler
  154. :def-callback-section-handler
  155. :def-oauth-handler
  156. :def-oauth-section-handler
  157. :with-random-state
  158. :defcron
  159. :handle-update
  160. :*bot-user-id*
  161. :on-next-message
  162. :get-inline-keyboard
  163. :inline-button
  164. :add-chat-cron
  165. :get-chat-crons
  166. :delete-chat-cron
  167. :def-chat-cron-handler
  168. :*poller-token*
  169. :*poller-module*
  170. :rest-parameters
  171. :poller-request
  172. :poller-validate
  173. :poller-authenticate
  174. :poller-error
  175. :poller-no-secret
  176. :poller-cant-authenticate
  177. :poller-call
  178. :poller-poll-lists))
  179. (in-package :chatikbot.common)