7b56f4d286cb2da16e63ce1123e4c36c068e843e
[citadel.git] / citadel / event_client.h
1 /*
2  *
3  * Copyright (c) 1998-2012 by the citadel.org team
4  *
5  *  This program is open source software; you can redistribute it and/or modify
6  *  it under the terms of the GNU General Public License as published by
7  *  the Free Software Foundation; either version 3 of the License, or
8  *  (at your option) any later version.
9  *
10  *  This program is distributed in the hope that it will be useful,
11  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
12  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13  *  GNU General Public License for more details.
14  *
15  *  You should have received a copy of the GNU General Public License
16  *  along with this program; if not, write to the Free Software
17  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
18  */
19
20 #ifndef __EVENT_CLIENT_H__
21 #define __EVENT_CLIENT_H__
22 #define EV_COMPAT3 0
23 #include "sysconfig.h"
24 #include <ev.h>
25 #include <sys/types.h>
26 #include <sys/socket.h>
27 #include <netdb.h>
28 #include <arpa/nameser.h>
29 #include <ares.h>
30 #include <curl/curl.h>
31
32 typedef struct AsyncIO AsyncIO;
33
34 typedef enum _eNextState {
35         eSendDNSQuery,
36         eReadDNSReply,
37
38         eDBQuery,
39
40         eConnect,
41         eSendReply,
42         eSendMore,
43         eSendFile,
44
45         eReadMessage,
46         eReadMore,
47         eReadPayload,
48         eReadFile,
49
50         eTerminateConnection,
51         eAbort
52 }eNextState;
53
54 typedef eNextState (*IO_CallBack)(AsyncIO *IO);
55 typedef eReadState (*IO_LineReaderCallback)(AsyncIO *IO);
56 typedef void (*ParseDNSAnswerCb)(AsyncIO*, unsigned char*, int);
57 typedef void (*FreeDNSReply)(void *DNSData);
58
59
60 typedef struct __ReadAsyncMsg {
61         StrBuf *MsgBuf;
62         size_t maxlen;          /* maximum message length */
63
64         const char *terminator; /* token signalling EOT */
65         long tlen;
66         int dodot;
67
68         int flushing;
69 /* if we read maxlen, read until nothing more arives and ignore this. */
70
71         int crlf;               /* CRLF newlines instead of LF */
72 } ReadAsyncMsg;
73
74
75 typedef struct _DNSQueryParts {
76         ParseDNSAnswerCb DNS_CB;
77         IO_CallBack PostDNS;
78
79         int DNSStatus;
80         void *VParsedDNSReply;
81         FreeDNSReply DNSReplyFree;
82         void *Data;
83 } DNSQueryParts;
84
85 typedef struct _evcurl_request_data
86 {
87         CURL                    *chnd;
88         struct curl_slist       *headers;
89         char                     errdesc[CURL_ERROR_SIZE];
90
91         int                      attached;
92
93         char                    *PlainPostData;
94         long                     PlainPostDataLen;
95         StrBuf                  *PostData;
96
97         StrBuf                  *ReplyData;
98         long                     httpcode;
99 } evcurl_request_data;
100
101 /* DNS Related */
102 typedef struct __evcares_data {
103         ev_tstamp Start;
104         ev_io recv_event,
105                 send_event;
106         ev_timer timeout;           /* timeout while requesting ips */
107 #ifdef DEBUG_CARES
108         short int SourcePort;
109 #endif
110         struct ares_options Options;
111         ares_channel Channel;
112         DNSQueryParts *Query;
113
114         IO_CallBack Fail;      /* the dns lookup didn't work out. */
115 } evcares_data;
116
117 struct AsyncIO {
118         long ID;
119         ev_tstamp Now;
120         ev_tstamp StartIO;
121         ev_tstamp StartDB;
122         eNextState NextState;
123
124         /* connection related */
125         ParsedURL *ConnectMe;
126
127         /* read/send related... */
128         StrBuf *IOBuf;
129         IOBuffer SendBuf,
130                 RecvBuf;
131
132         FDIOBuffer IOB;
133         /* when sending from / reading into files, this is used. */
134
135         /* our events... */
136         ev_cleanup abort_by_shutdown, /* server wants to go down... */
137                 db_abort_by_shutdown; /* server wants to go down... */
138         ev_timer conn_fail,           /* connection establishing timed out */
139                 rw_timeout;           /* timeout while sending data */
140         ev_idle unwind_stack,         /* get c-ares out of the stack */
141                 db_unwind_stack,      /* wait for next db operation... */
142                 conn_fail_immediate;  /* unwind stack, but fail immediately. */
143         ev_io recv_event,             /* receive data from the client */
144                 send_event,           /* send more data to the client */
145                 conn_event;           /* Connection successfully established */
146
147         StrBuf *ErrMsg; /* if we fail to connect, or lookup, error goes here. */
148
149         /* Citadel application callbacks... */
150         IO_CallBack ReadDone, /* Theres new data to read... */
151                 SendDone,     /* we may send more data */
152                 Terminate,    /* shutting down... */
153                 DBTerminate,  /* shutting down... */
154                 Timeout,      /* Timeout handler;may also be conn. timeout */
155                 ConnFail,     /* What to do when one connection failed? */
156                 ShutdownAbort,/* we're going down. make your piece. */
157                 NextDBOperation; /* Perform Database IO */
158
159         /* if we have linereaders, maybe we want to read more lines before
160          * the real application logic is called? */
161         IO_LineReaderCallback LineReader;
162
163         evcares_data DNS;
164
165         evcurl_request_data HttpReq;
166
167         /* Saving / loading a message async from / to disk */
168         ReadAsyncMsg *ReadMsg;
169         struct CtdlMessage *AsyncMsg;
170         struct recptypes *AsyncRcp;
171
172         /* Context specific data; Hint: put AsyncIO in there */
173         void *Data;        /* application specific data */
174         void *CitContext;  /* Citadel Session context... */
175 };
176
177 typedef struct _IOAddHandler {
178         AsyncIO *IO;
179         IO_CallBack EvAttch;
180 } IOAddHandler;
181
182
183
184 extern int DebugEventLoop;
185 extern int DebugCAres;
186
187 #define EDBGLOG(LEVEL) if ((LEVEL != LOG_DEBUG) || (DebugEventLoop != 0))
188
189 #define CCID ((CitContext*)IO->CitContext)->cs_pid
190
191 #define EVQ_syslog(LEVEL, FORMAT, ...) \
192         EDBGLOG (LEVEL) syslog(LEVEL, "IOQ " FORMAT, __VA_ARGS__)
193
194 #define EVQM_syslog(LEVEL, FORMAT) \
195         EDBGLOG (LEVEL) syslog(LEVEL, "IO " FORMAT)
196
197 #define EV_syslog(LEVEL, FORMAT, ...) \
198         EDBGLOG (LEVEL) syslog(LEVEL, "IO[%ld]CC[%d] " FORMAT, IO->ID, CCID, __VA_ARGS__)
199
200 #define EVM_syslog(LEVEL, FORMAT) \
201         EDBGLOG (LEVEL) syslog(LEVEL, "IO[%ld]CC[%d] " FORMAT, IO->ID, CCID)
202
203 #define EVNC_syslog(LEVEL, FORMAT, ...) \
204         EDBGLOG (LEVEL) syslog(LEVEL, "IO[%ld] " FORMAT, IO->ID, __VA_ARGS__)
205
206 #define EVNCM_syslog(LEVEL, FORMAT) EDBGLOG (LEVEL) syslog(LEVEL, "IO[%ld]" FORMAT, IO->ID)
207
208
209 #define CDBGLOG() if (DebugCAres != 0)
210 #define EV_DNS_LOG_START(a)                                                     \
211         CDBGLOG () {syslog(LOG_DEBUG, "IO[%ld]CC[%d] + Starting " #a " %p FD %d", IO->ID, CCID, &IO->a, IO->a.fd); \
212                     EV_backtrace(IO);}
213
214 #define EV_DNS_LOG_STOP(a)                                                      \
215         CDBGLOG () { syslog(LOG_DEBUG, "IO[%ld]CC[%d] - Stopping " #a " %p FD %d", IO->ID, CCID, &IO->a, IO->a.fd); \
216                      EV_backtrace(IO);}
217
218 #define EV_DNS_LOG_INIT(a)                                                      \
219         CDBGLOG () { syslog(LOG_DEBUG, "IO[%ld]CC[%d] * Init " #a " %p FD %d", IO->ID, CCID, &IO->a, IO->a.fd); \
220                      EV_backtrace(IO);}
221
222 #define EV_DNS_LOGT_START(a)                                                    \
223         CDBGLOG () { syslog(LOG_DEBUG, "IO[%ld]CC[%d] + Starting " #a " %p", IO->ID, CCID, &IO->a); \
224                      EV_backtrace(IO);}
225
226 #define EV_DNS_LOGT_STOP(a)                                                     \
227         CDBGLOG () { syslog(LOG_DEBUG, "IO[%ld]CC[%d] - Stopping " #a " %p", IO->ID, CCID, &IO->a); \
228                      EV_backtrace(IO); }
229
230 #define EV_DNS_LOGT_INIT(a)                                                     \
231         CDBGLOG () { syslog(LOG_DEBUG, "IO[%ld]CC[%d] * Init " #a " %p", IO->ID, CCID, &IO->a); \
232                      EV_backtrace(IO);}
233
234
235 void FreeAsyncIOContents(AsyncIO *IO);
236
237 eNextState NextDBOperation(AsyncIO *IO, IO_CallBack CB);
238 eNextState QueueDBOperation(AsyncIO *IO, IO_CallBack CB);
239 eNextState QueueEventContext(AsyncIO *IO, IO_CallBack CB);
240 eNextState QueueCurlContext(AsyncIO *IO);
241
242 eNextState EvConnectSock(AsyncIO *IO,
243                          double conn_timeout,
244                          double first_rw_timeout,
245                          int ReadFirst);
246 void IO_postdns_callback(struct ev_loop *loop, ev_idle *watcher, int revents);
247
248 int QueueQuery(ns_type Type,
249                const char *name,
250                AsyncIO *IO,
251                DNSQueryParts *QueryParts,
252                IO_CallBack PostDNS);
253
254 void QueueGetHostByName(AsyncIO *IO,
255                         const char *Hostname,
256                         DNSQueryParts *QueryParts,
257                         IO_CallBack PostDNS);
258
259 void QueryCbDone(AsyncIO *IO);
260
261 void StopClient(AsyncIO *IO);
262
263 void StopClientWatchers(AsyncIO *IO);
264
265 void SetNextTimeout(AsyncIO *IO, double timeout);
266
267 #include <curl/curl.h>
268
269 #define OPT(s, v) \
270         do { \
271                 sta = curl_easy_setopt(chnd, (CURLOPT_##s), (v));       \
272                 if (sta)  {                                             \
273                         EVQ_syslog(LOG_ERR,                             \
274                                "error setting option " #s               \
275                                " on curl handle: %s",                   \
276                                curl_easy_strerror(sta));                \
277         } } while (0)
278
279 void InitIOStruct(AsyncIO *IO,
280                   void *Data,
281                   eNextState NextState,
282                   IO_LineReaderCallback LineReader,
283                   IO_CallBack DNS_Fail,
284                   IO_CallBack SendDone,
285                   IO_CallBack ReadDone,
286                   IO_CallBack Terminate,
287                   IO_CallBack DBTerminate,
288                   IO_CallBack ConnFail,
289                   IO_CallBack Timeout,
290                   IO_CallBack ShutdownAbort);
291
292 int InitcURLIOStruct(AsyncIO *IO,
293                      void *Data,
294                      const char* Desc,
295                      IO_CallBack SendDone,
296                      IO_CallBack Terminate,
297                      IO_CallBack DBTerminate,
298                      IO_CallBack ShutdownAbort);
299
300 eNextState ReAttachIO(AsyncIO *IO,
301                       void *pData,
302                       int ReadFirst);
303
304 void EV_backtrace(AsyncIO *IO);
305 ev_tstamp ctdl_ev_now (void);
306
307 #endif /* __EVENT_CLIENT_H__ */