1: #include "global.h"
2: #include "rtlm.h"
3: #include "utils.h"
4: #include "mqttd.h"
5: #include "mqttd_calls.h"
6:
7:
8: static inline struct tagSession *
9: initSession(int sock, ait_val_t * __restrict v)
10: {
11: struct tagSession *sess = NULL;
12: const char *str;
13:
14: ioTRACE(5);
15:
16: if (!v)
17: return NULL;
18:
19: sess = malloc(sizeof(struct tagSession));
20: if (!sess) {
21: ioSYSERR(0);
22: return NULL;
23: } else
24: memset(sess, 0, sizeof(struct tagSession));
25:
26: SLIST_INIT(&sess->sess_subscr);
27:
28: str = cfg_getAttribute(&cfg, "mqttd", "retry");
29: if (!str)
30: sess->sess_retry = DEFAULT_RETRY;
31: else
32: sess->sess_retry = strtol(str, NULL, 0);
33:
34: sess->sess_buf = mqtt_msgAlloc(USHRT_MAX);
35: if (!sess->sess_buf) {
36: ioLIBERR(mqtt);
37: free(sess);
38: return NULL;
39: }
40:
41: /* init server actor */
42: sess->sess_srv = mqtt_srv_Init(sock, sess->sess_buf);
43: if (!sess->sess_srv) {
44: ioDEBUG(3, "Error:: in srv_Init #%d - %s", mqtt_GetErrno(), mqtt_GetError());
45: mqtt_msgFree(&sess->sess_buf, 42);
46: free(sess);
47: return NULL;
48: } else {
49: mqtt_srv_setCmd(sess->sess_srv, MQTT_TYPE_CONNECT, cmdCONNECT);
50: mqtt_srv_setCmd(sess->sess_srv, MQTT_TYPE_PUBLISH, cmdPUBLISH);
51: mqtt_srv_setCmd(sess->sess_srv, MQTT_TYPE_PUBREL, cmdPUBREL);
52: mqtt_srv_setCmd(sess->sess_srv, MQTT_TYPE_SUBSCRIBE, cmdSUBSCRIBE);
53: mqtt_srv_setCmd(sess->sess_srv, MQTT_TYPE_UNSUBSCRIBE, cmdUNSUBSCRIBE);
54: mqtt_srv_setCmd(sess->sess_srv, MQTT_TYPE_PINGREQ, cmdPINGREQ);
55: mqtt_srv_setCmd(sess->sess_srv, MQTT_TYPE_DISCONNECT, cmdDISCONNECT);
56: }
57:
58: sess->sess_sock = sock;
59: strlcpy(sess->sess_addr, (char*) AIT_GET_STR(v), sizeof sess->sess_addr);
60: return sess;
61: }
62:
63: static void
64: finiSession(struct tagSession *sess)
65: {
66: struct tagStore *store;
67:
68: ioTRACE(5);
69:
70: if (!sess)
71: return;
72:
73: if (call.FiniSessPUB)
74: call.FiniSessPUB(&cfg, pub, sess->sess_cid, sess->sess_user, "%");
75:
76: while ((store = SLIST_FIRST(&sess->sess_subscr))) {
77: SLIST_REMOVE_HEAD(&sess->sess_subscr, st_node);
78:
79: if (store->st_subscr.sub_topic.msg_base)
80: free(store->st_subscr.sub_topic.msg_base);
81: if (store->st_subscr.sub_value.msg_base)
82: free(store->st_subscr.sub_value.msg_base);
83:
84: free(store);
85: }
86:
87: if (sess->sess_will.msg)
88: free(sess->sess_will.msg);
89: if (sess->sess_will.topic)
90: free(sess->sess_will.topic);
91:
92: if (sess->sess_sock > STDERR_FILENO)
93: srv_Close(sess->sess_sock);
94:
95: mqtt_srv_Fini(&sess->sess_srv);
96: mqtt_msgFree(&sess->sess_buf, 42);
97:
98: free(sess);
99: }
100:
101: static void *
102: leaveClient(sched_task_t *task)
103: {
104: struct tagSession *sess;
105: int ret;
106:
107: ioTRACE(4);
108:
109: assert(task);
110:
111: sess = TASK_ARG(task);
112: assert(sess);
113:
114: TAILQ_REMOVE(&Sessions, sess, sess_node);
115:
116: ret = mqtt_msgDISCONNECT(sess->sess_buf);
117: send(TASK_FD(task), sess->sess_buf->msg_base, ret, MSG_NOSIGNAL);
118:
119: ioDEBUG(1, "Close socket=%d", TASK_FD(task));
120: call.LOG(logg, "Session %s stopped from %s for user %s.\n", sess->sess_cid,
121: sess->sess_addr, sess->sess_user);
122:
123: finiSession(sess);
124: return NULL;
125: }
126:
127: static void *
128: dispatchSession(sched_task_t *task)
129: {
130: int ret, len = 0;
131: struct tagSession *sess;
132:
133: ioTRACE(2);
134:
135: assert(task);
136:
137: sess = TASK_ARG(task);
138: assert(sess);
139:
140: /* receive & decode packet */
141: if ((ret = recv(TASK_FD(task), sess->sess_buf->msg_base, sess->sess_buf->msg_len, 0)) == -1) {
142: ioDEBUG(3, "Error:: recv(%d) #%d - %s", sess->sess_sock, errno, strerror(errno));
143: finiSession(sess);
144: return NULL;
145: } else if (!ret) {
146: ioDEBUG(4, "Session %s EOF received.", sess->sess_cid);
147: finiSession(sess);
148: return NULL;
149: }
150:
151: do {
152: /* dispatch message type */
153: if ((len = mqtt_srv_Dispatch(sess->sess_srv, ret, sess)) < 0) {
154: if (len == -1)
155: ioLIBERR(mqtt);
156: finiSession(sess);
157: } else
158: ret -= len;
159: } while (len > 0 && ret > 0);
160:
161: if (len >= 0 && !schedRead(root, dispatchSession, TASK_ARG(task), TASK_FD(task), NULL, 0)) {
162: ioLIBERR(sched);
163: finiSession(sess);
164: }
165: return NULL;
166: }
167:
168: void *
169: startSession(sched_task_t *task)
170: {
171: u_char basebuf[USHRT_MAX];
172: mqtt_msg_t buf = { basebuf, sizeof basebuf };
173: mqtthdr_connflgs_t flg;
174: mqtthdr_connack_t cack;
175: struct tagSession *s, *sess = NULL;
176: int ret, wlen;
177:
178: ioTRACE(4);
179:
180: assert(task);
181:
182: if (!TASK_DATA(task)) {
183: /* flow from accept new clients */
184: sess = initSession(TASK_FD(task), TASK_ARG(task));
185: io_freeVar(TASK_ARG(task));
186: if (!sess) {
187: close(TASK_FD(task));
188: return NULL;
189: }
190:
191: /* receive & decode packet */
192: if (recv(sess->sess_sock, buf.msg_base, buf.msg_len, 0) == -1) {
193: ioDEBUG(3, "Error:: recv(%d) #%d - %s", sess->sess_sock, errno, strerror(errno));
194: finiSession(sess);
195: return NULL;
196: }
197: } else {
198: sess = TASK_DATA(task);
199: assert(sess);
200:
201: buf.msg_len = TASK_DATLEN(task) > sizeof basebuf ? sizeof basebuf : TASK_DATLEN(task);
202: memcpy(buf.msg_base, sess->sess_buf->msg_base, buf.msg_len);
203: }
204:
205: cack = mqtt_readCONNECT(&buf, &sess->sess_ka, sess->sess_cid, sizeof sess->sess_cid,
206: sess->sess_user, sizeof sess->sess_user, sess->sess_pass, sizeof sess->sess_pass,
207: &sess->sess_will.topic, &sess->sess_will.msg);
208: ret = cack.retcode;
209: flg.flags = cack.reserved;
210: if (flg.reserved) {
211: ioDEBUG(3, "Error:: in MQTT protocol #%d - %s", mqtt_GetErrno(), mqtt_GetError());
212: goto end;
213: } else {
214: sess->sess_clean = flg.clean_sess;
215: sess->sess_will.qos = flg.will_qos;
216: sess->sess_will.retain = flg.will_retain;
217: sess->sess_will.flag = flg.will_flg;
218: }
219:
220: /* check online table for user */
221: if (call.LoginACC(&cfg, acc, sess->sess_user, sess->sess_pass) < 1) {
222: ioDEBUG(0, "Login:: DENIED for username %s and password %s",
223: sess->sess_user, sess->sess_pass);
224: ret = MQTT_RETCODE_DENIED;
225: goto end;
226: } else {
227: ioDEBUG(1, "Login:: ALLOWED for username %s ...", sess->sess_user);
228: ret = MQTT_RETCODE_ACCEPTED;
229: }
230:
231: if (call.FiniSessPUB(&cfg, pub, sess->sess_cid, sess->sess_user, "%") > 0) {
232: ioDEBUG(2, "Old session %s should be disconnect!", sess->sess_cid);
233: TAILQ_FOREACH(s, &Sessions, sess_node)
234: if (!strcmp(s->sess_cid, sess->sess_cid)) {
235: /* found stale session & disconnect it! */
236: schedWrite(root, leaveClient, sess, TASK_FD(task), NULL, 0);
237: break;
238: }
239: }
240:
241: if (call.InitSessPUB(&cfg, pub, sess->sess_cid, sess->sess_user, sess->sess_addr,
242: sess->sess_will.flag, sess->sess_will.topic, sess->sess_will.msg,
243: sess->sess_will.qos, sess->sess_will.retain) == -1) {
244: ioDEBUG(0, "Session %s DENIED for username %s", sess->sess_cid, sess->sess_user);
245: ret = MQTT_RETCODE_DENIED;
246: goto end;
247: } else {
248: ioDEBUG(0, "Session %s from %s and username %s is started",
249: sess->sess_cid, sess->sess_addr, sess->sess_user);
250: ret = MQTT_RETCODE_ACCEPTED;
251: }
252:
253: /* Start session task OK ... */
254: TAILQ_INSERT_TAIL(&Sessions, sess, sess_node);
255:
256: if (!schedRead(root, dispatchSession, sess, TASK_FD(task), NULL, 0)) {
257: ioLIBERR(sched);
258: ret = MQTT_RETCODE_DENIED;
259: }
260:
261: call.LOG(logg, "Session %s started from %s for user %s (timeout=%d) OK!\n", sess->sess_cid,
262: sess->sess_addr, sess->sess_user, sess->sess_ka);
263: end: /* close client connection */
264: wlen = mqtt_msgCONNACK(sess->sess_buf, ret);
265: if ((wlen = send(TASK_FD(task), sess->sess_buf->msg_base, wlen, 0)) == -1) {
266: ioDEBUG(3, "Error:: send(%d) #%d - %s", TASK_FD(task), errno, strerror(errno));
267: } else
268: ioDEBUG(5, "Sended %d bytes", wlen);
269:
270: if (ret != MQTT_RETCODE_ACCEPTED) {
271: ioDEBUG(1, "Close client %s with socket=%d", sess->sess_addr, TASK_FD(task));
272: finiSession(sess);
273: }
274: return NULL;
275: }
276:
277: static void *
278: acceptClient(sched_task_t *task)
279: {
280: int cli;
281: io_sockaddr_t sa;
282: socklen_t sslen = sizeof sa.ss;
283: ait_val_t *v;
284: char str[STRSIZ];
285:
286: ioTRACE(4);
287:
288: assert(task);
289:
290: if ((cli = accept(TASK_FD(task), &sa.sa, &sslen)) == -1)
291: goto end;
292: else
293: fcntl(cli, F_SETFL, fcntl(cli, F_GETFL, 0) | O_NONBLOCK);
294:
295: v = io_allocVar();
296: if (!v) {
297: ioLIBERR(io);
298: close(cli);
299: goto end;
300: } else {
301: memset(str, 0, sizeof str);
302: snprintf(str, sizeof str, "%s:%hu", io_n2addr(&sa, v), io_n2port(&sa));
303: AIT_FREE_VAL(v);
304: AIT_SET_STR(v, str);
305: }
306: ioDEBUG(1, "Connected client with socket=%d from %s", cli, AIT_GET_STR(v));
307:
308: if (!schedRead(root, startSession, v, cli, NULL, 0)) {
309: io_freeVar(v);
310: close(cli);
311: ioDEBUG(1, "Terminated client with socket=%d", cli);
312: }
313: end:
314: if (!schedRead(root, acceptClient, NULL, TASK_FD(task), NULL, 0))
315: ioLIBERR(sched);
316: return NULL;
317: }
318:
319: /* ----------------------------------------------------------------------- */
320:
321: int
322: Run(int sock)
323: {
324: struct tagPub *pub;
325: struct tagSession *sess;
326: struct timespec pl = { 0, 100000000 };
327:
328: ioTRACE(1);
329:
330: if (listen(sock, SOMAXCONN) == -1) {
331: ioSYSERR(0);
332: return -1;
333: } else
334: fcntl(sock, F_SETFL, fcntl(sock, F_GETFL, 0) | O_NONBLOCK);
335:
336: /* state machine - accept new connections */
337: if (!schedRead(root, acceptClient, NULL, sock, NULL, 0)) {
338: ioLIBERR(sched);
339: return -1;
340: }
341:
342: schedPolling(root, &pl, NULL);
343: schedRun(root, &Kill);
344:
345: /* free all undeleted elements into lists */
346: TAILQ_FOREACH(pub, &Pubs, pub_node) {
347: TAILQ_REMOVE(&Pubs, pub, pub_node);
348:
349: AIT_FREE_VAL(&pub->pub_name);
350: if (pub->pub_packet.msg_base)
351: free(pub->pub_packet.msg_base);
352: }
353: TAILQ_FOREACH(sess, &Sessions, sess_node) {
354: TAILQ_REMOVE(&Sessions, sess, sess_node);
355: finiSession(sess);
356: }
357: return 0;
358: }
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>