|
|
| version 1.1.2.3, 2011/12/01 00:10:18 | version 1.1.2.15, 2011/12/09 14:01:37 |
|---|---|
| Line 1 | Line 1 |
| #include "global.h" | #include "global.h" |
| #include "mqttd.h" | |
| extern char cliCmd[], *cliStr[]; | |
| static inline struct tagSession * | |
| initSession(int sock, char * __restrict addr) | |
| { | |
| struct tagSession *sess = NULL; | |
| const char *str; | |
| FTRACE(5); | |
| if (!addr) | |
| return NULL; | |
| sess = malloc(sizeof(struct tagSession)); | |
| if (!sess) { | |
| VERB(3) syslog(LOG_ERR, "Error:: in malloc #%d - %s", errno, strerror(errno)); | |
| return NULL; | |
| } else | |
| memset(sess, 0, sizeof(struct tagSession)); | |
| str = cfg_GetAttribute(&cfg, CFG("mqttd"), CFG("retry")); | |
| if (!str) | |
| sess->sess_retry = DEFAULT_RETRY; | |
| else | |
| sess->sess_retry = strtol(str, NULL, 0); | |
| sess->sess_buf = mqtt_msgAlloc(0); | |
| if (!sess->sess_buf) { | |
| VERB(3) syslog(LOG_ERR, "Error:: in msgAlloc #%d - %s", mqtt_GetErrno(), mqtt_GetError()); | |
| free(sess); | |
| return NULL; | |
| } | |
| sess->sess_sock = sock; | |
| strlcpy(sess->sess_addr, addr, sizeof sess->sess_addr); | |
| free(addr); | |
| return sess; | |
| } | |
| static void | |
| finiSession(struct tagSession *sess) | |
| { | |
| register int i; | |
| struct tagStore *store; | |
| FTRACE(5); | |
| if (!sess) | |
| return; | |
| for (i = 0; i < MQTT_QOS_RESERVED; i++) | |
| while ((store = SLIST_FIRST(&sess->sess_store[i]))) { | |
| SLIST_REMOVE_HEAD(&sess->sess_store[i], st_node); | |
| free(store); | |
| } | |
| if (sess->sess_will.msg) | |
| free(sess->sess_will.msg); | |
| if (sess->sess_will.topic) | |
| free(sess->sess_will.topic); | |
| if (sess->sess_sock > STDERR_FILENO) { | |
| shutdown(sess->sess_sock, SHUT_RDWR); | |
| close(sess->sess_sock); | |
| } | |
| mqtt_msgFree(&sess->sess_buf, 42); | |
| if (sess->sess_tid) | |
| pthread_cancel(sess->sess_tid); | |
| free(sess); | |
| } | |
| static void * | |
| thrSession(struct tagSession *sess) | |
| { | |
| FTRACE(2); | |
| TAILQ_REMOVE(&Sessions, sess, sess_node); | |
| pthread_exit(NULL); | |
| return NULL; | |
| } | |
| static void * | |
| startSession(sched_task_t *task) | |
| { | |
| u_char basebuf[USHRT_MAX]; | |
| mqtt_msg_t buf = { basebuf, sizeof basebuf }; | |
| mqtthdr_connflgs_t flg; | |
| mqtthdr_connack_t cack; | |
| struct tagSession *sess = NULL; | |
| FTRACE(4); | |
| sess = initSession(TASK_FD(task), TASK_ARG(task)); | |
| if (!sess) { | |
| if (TASK_ARG(task)) | |
| free(TASK_ARG(task)); | |
| close(TASK_FD(task)); | |
| return NULL; | |
| } | |
| if (recv(sess->sess_sock, buf.msg_base, buf.msg_len, 0) == -1) { | |
| VERB(3) syslog(LOG_ERR, "Error:: recv(%d) #%d - %s", sess->sess_sock, errno, strerror(errno)); | |
| goto end; | |
| } | |
| cack = mqtt_readCONNECT(&buf, &sess->sess_ka, sess->sess_cid, sizeof sess->sess_cid, | |
| sess->sess_user, sizeof sess->sess_user, sess->sess_pass, sizeof sess->sess_pass, | |
| &sess->sess_will.topic, &sess->sess_will.msg); | |
| flg.flags = cack.reserved; | |
| if (flg.reserved) { | |
| VERB(3) syslog(LOG_ERR, "Error:: in MQTT protocol #%d - %s", mqtt_GetErrno(), mqtt_GetError()); | |
| goto end; | |
| } else { | |
| sess->sess_clean = flg.clean_sess; | |
| sess->sess_will.qos = flg.will_qos; | |
| sess->sess_will.retain = flg.will_retain; | |
| sess->sess_will.flag = flg.will_flg; | |
| } | |
| /* check online table for user */ | |
| /* Start session thread OK ... */ | |
| TAILQ_INSERT_TAIL(&Sessions, sess, sess_node); | |
| pthread_create(&sess->sess_tid, NULL, (void*(*)(void*)) thrSession, sess); | |
| pthread_detach(sess->sess_tid); | |
| VERB(1) syslog(LOG_DEBUG, "ConnID=%s(%s) for %s login OK!", | |
| sess->sess_cid, sess->sess_user, sess->sess_addr); | |
| return NULL; | |
| end: /* close client connection */ | |
| VERB(1) syslog(LOG_DEBUG, "Close client %s with socket=%d", | |
| (char*) TASK_ARG(task), (int) TASK_FD(task)); | |
| finiSession(sess); | |
| return NULL; | |
| } | |
| /* ----------------------------------------------------------------------- */ | |
| static void * | |
| thrSched(void *arg __unused) | |
| { | |
| FTRACE(1); | |
| schedRun(root, (intptr_t*) &Kill); | |
| pthread_exit(NULL); | |
| } | |
| int | int |
| Run(int sock) | Run(int sock) |
| { | { |
| io_sockaddr_t sa; | |
| socklen_t sslen = sizeof sa.ss; | |
| int cli; | |
| char *str = NULL, szAddr[STRSIZ] = { 0 }; | |
| pthread_t tid; | |
| FTRACE(1); | FTRACE(1); |
| if (pthread_create(&tid, NULL, thrSched, NULL)) { | |
| syslog(LOG_ERR, "Error:: thread scheduler #%d - %s", errno, strerror(errno)); | |
| return -1; | |
| } else | |
| pthread_detach(tid); | |
| VERB(2) syslog(LOG_DEBUG, "Run scheduler management thread"); | |
| if (listen(sock, SOMAXCONN) == -1) { | if (listen(sock, SOMAXCONN) == -1) { |
| syslog(LOG_ERR, "Error:: listen() #%d - %s\n", errno, strerror(errno)); | syslog(LOG_ERR, "Error:: listen(%d) #%d - %s\n", sock, errno, strerror(errno)); |
| pthread_cancel(tid); | |
| return -1; | return -1; |
| } | |
| while (!Kill) { | |
| if ((cli = accept(sock, &sa.sa, &sslen)) == -1) { | |
| syslog(LOG_ERR, "Error:: accept() #%d - %s", errno, strerror(errno)); | |
| continue; | |
| } else | |
| VERB(1) { | |
| switch (sa.sa.sa_family) { | |
| case AF_INET: | |
| inet_ntop(AF_INET, &sa.sin.sin_addr, szAddr, sslen); | |
| snprintf(szAddr, sizeof szAddr, "%s:%d", | |
| szAddr, ntohs(sa.sin.sin_port)); | |
| break; | |
| case AF_INET6: | |
| inet_ntop(AF_INET6, &sa.sin6.sin6_addr, szAddr, sslen); | |
| snprintf(szAddr, sizeof szAddr, "%s:%d", | |
| szAddr, ntohs(sa.sin6.sin6_port)); | |
| break; | |
| case AF_LOCAL: | |
| strlcpy(szAddr, sa.sun.sun_path, sizeof szAddr); | |
| break; | |
| default: | |
| close(cli); | |
| syslog(LOG_ERR, "Error:: unsupported address type %d", | |
| sa.sa.sa_family); | |
| continue; | |
| } | |
| str = strdup(szAddr); | |
| syslog(LOG_DEBUG, "Connected client with socket=%d from %s", cli, str); | |
| } | |
| if (!schedRead(root, startSession, str, cli)) { | |
| close(cli); | |
| VERB(1) syslog(LOG_DEBUG, "Terminated client with socket=%d", cli); | |
| if (str) | |
| free(str); | |
| } | |
| } | } |
| return 0; | return 0; |