|
|
| version 1.2.2.13, 2012/06/20 09:23:28 | version 1.3.2.1, 2012/07/03 12:22:56 |
|---|---|
| Line 1 | Line 1 |
| /************************************************************************* | |
| * (C) 2011 AITNET ltd - Sofia/Bulgaria - <misho@aitbg.com> | |
| * by Michael Pounov <misho@openbsd-bg.org> | |
| * | |
| * $Author$ | |
| * $Id$ | |
| * | |
| ************************************************************************** | |
| The ELWIX and AITNET software is distributed under the following | |
| terms: | |
| All of the documentation and software included in the ELWIX and AITNET | |
| Releases is copyrighted by ELWIX - Sofia/Bulgaria <info@elwix.org> | |
| Copyright 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011, 2012 | |
| by Michael Pounov <misho@elwix.org>. All rights reserved. | |
| Redistribution and use in source and binary forms, with or without | |
| modification, are permitted provided that the following conditions | |
| are met: | |
| 1. Redistributions of source code must retain the above copyright | |
| notice, this list of conditions and the following disclaimer. | |
| 2. Redistributions in binary form must reproduce the above copyright | |
| notice, this list of conditions and the following disclaimer in the | |
| documentation and/or other materials provided with the distribution. | |
| 3. All advertising materials mentioning features or use of this software | |
| must display the following acknowledgement: | |
| This product includes software developed by Michael Pounov <misho@elwix.org> | |
| ELWIX - Embedded LightWeight unIX and its contributors. | |
| 4. Neither the name of AITNET nor the names of its contributors | |
| may be used to endorse or promote products derived from this software | |
| without specific prior written permission. | |
| THIS SOFTWARE IS PROVIDED BY AITNET AND CONTRIBUTORS ``AS IS'' AND | |
| ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE | |
| IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE | |
| ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE | |
| FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL | |
| DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS | |
| OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) | |
| HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT | |
| LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY | |
| OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF | |
| SUCH DAMAGE. | |
| */ | |
| #include "global.h" | #include "global.h" |
| #include "rtlm.h" | #include "rtlm.h" |
| #include "mqtt.h" | #include "mqtt.h" |
| Line 73 Subscribe(int sock, FILE *lf) | Line 118 Subscribe(int sock, FILE *lf) |
| printf("OK\n"); | printf("OK\n"); |
| for (sub = args->subscr, qos = qoses; sub->sub_topic.msg_base; sub++, qos++) | for (sub = args->subscr, qos = qoses; sub->sub_topic.msg_base; sub++, qos++) |
| printf(" + Topic %s with QoS %d subscribed %s\n", (char*) | printf(" + Topic %s with QoS %d subscribe %s\n", (char*) |
| sub->sub_topic.msg_base, sub->sub_ret, *qos ? "done" : "failed"); | sub->sub_topic.msg_base, sub->sub_ret, *qos ? "done" : "failed"); |
| free(qoses); | free(qoses); |
| Line 102 Unsubscribe(int sock) | Line 147 Unsubscribe(int sock) |
| return 0; | return 0; |
| } | } |
| static void | |
| sigz(int sig) | |
| { | |
| int stat; | |
| switch (sig) { | |
| case SIGINT: | |
| case SIGTERM: | |
| Kill++; | |
| break; | |
| case SIGCHLD: | |
| while (waitpid(-1, &stat, WNOHANG) > 0); | |
| break; | |
| } | |
| } | |
| static void * | static void * |
| execProc(sched_task_t *task) | |
| { | |
| FILE *f; | |
| char szLine[MAXPATHLEN + BUFSIZ] = { 0 }; | |
| snprintf(szLine, sizeof szLine, "%s '%s' %hu %u", AIT_GET_STR(&args->Value), | |
| (char*) TASK_ARG(task), (u_short) TASK_VAL(task), (u_int) TASK_DATLEN(task)); | |
| if (TASK_ARG(task)) | |
| io_free(TASK_ARG(task)); | |
| f = popen(szLine, "w"); | |
| if (!f) { | |
| ioSYSERR(0); | |
| return NULL; | |
| } else | |
| fputs(TASK_DATA(task), f); | |
| pclose(f); | |
| return NULL; | |
| } | |
| static void * | |
| pubRX(sched_task_t *task) | pubRX(sched_task_t *task) |
| { | { |
| int siz, rlen; | int siz, rlen; |
| char szTopic[STRSIZ] = { 0 }; | char szTime[STRSIZ] = { 0 }, szTopic[STRSIZ] = { 0 }; |
| void *data = NULL; | void *data = NULL; |
| u_short mid; | u_short mid; |
| time_t tim; | |
| struct mqtthdr *hdr; | |
| rlen = RecvFrom(TASK_FD(task)); | rlen = RecvFrom(TASK_FD(task)); |
| if (rlen == -1) | if (rlen == -1) |
| goto end; | goto end; |
| siz = mqtt_readPUBLISH(args->msg, szTopic, sizeof szTopic, &mid, &data); | if (!rlen) { |
| if (siz == -1) | Kill++; |
| goto end; | return NULL; |
| } | |
| fprintf(TASK_ARG(task), "\nMessage ID: 0x%04hu, Length: %u, Topic: %s\n", | while (rlen > 0) { |
| mid, siz, szTopic); | hdr = (struct mqtthdr*) args->msg->msg_base; |
| if (data) { | switch (hdr->mqtt_msg.type) { |
| fputs((const char*) data, TASK_ARG(task)); | case MQTT_TYPE_PUBLISH: |
| free(data); | siz = mqtt_readPUBLISH(args->msg, szTopic, sizeof szTopic, &mid, &data); |
| } | if (siz == -1) |
| goto end; | |
| else { | |
| siz = mqtt_pktLen(hdr); | |
| rlen -= siz; | |
| ioVERBOSE(4) printf("Remains %d bytes, packet %d bytes\n", | |
| rlen, siz); | |
| } | |
| fprintf(TASK_ARG(task), "\n.\n"); | /* send to output */ |
| fflush(TASK_ARG(task)); | tim = time(NULL); |
| strftime(szTime, sizeof szTime, "%Y-%m-%d %H:%M:%S", localtime(&tim)); | |
| fprintf(TASK_ARG(task), "\n[%s] Message ID: %04hu, QoS: %hhu, " | |
| "Length: %u, Topic: %s\n", szTime, mid, hdr->mqtt_msg.qos, | |
| siz, szTopic); | |
| if (data) { | |
| fputs((const char*) data, TASK_ARG(task)); | |
| free(data); | |
| } | |
| fprintf(TASK_ARG(task), "\n"); | |
| fflush(TASK_ARG(task)); | |
| /* if exists exec script */ | |
| if (!AIT_ISEMPTY(&args->Value)) | |
| schedEvent(root, execProc, io_strdup(szTopic), mid, data, siz); | |
| memmove(args->msg->msg_base, args->msg->msg_base + siz, rlen); | |
| break; | |
| case MQTT_TYPE_PINGREQ: | |
| siz = mqtt_msgPINGRESP(args->msg); | |
| if (siz == -1) | |
| goto end; | |
| else | |
| rlen -= siz; | |
| /* send ping reply */ | |
| if (SendTo(TASK_FD(task), siz) == -1) | |
| goto end; | |
| memmove(args->msg->msg_base, args->msg->msg_base + siz, rlen); | |
| break; | |
| default: | |
| ioVERBOSE(1) printf("Unwanted message type #%d ...\n", hdr->mqtt_msg.type); | |
| goto end; | |
| } | |
| } | |
| end: | end: |
| schedReadSelf(task); | schedReadSelf(task); |
| return NULL; | return NULL; |
| Line 144 main(int argc, char **argv) | Line 273 main(int argc, char **argv) |
| int ret = 0; | int ret = 0; |
| char *str, szStr[STRSIZ], szLogName[MAXPATHLEN] = { 0 }; | char *str, szStr[STRSIZ], szLogName[MAXPATHLEN] = { 0 }; |
| FILE *lf; | FILE *lf; |
| struct sigaction sa; | |
| if (!(args = io_malloc(sizeof(struct tagArgs)))) { | if (!(args = io_malloc(sizeof(struct tagArgs)))) { |
| printf("Error:: in arguments #%d - %s\n", errno, strerror(errno)); | printf("Error:: in arguments #%d - %s\n", errno, strerror(errno)); |
| Line 276 main(int argc, char **argv) | Line 406 main(int argc, char **argv) |
| printf("Connecting to %s:%d ... ", io_n2addr(&args->addr, &val), io_n2port(&args->addr)); | printf("Connecting to %s:%d ... ", io_n2addr(&args->addr, &val), io_n2port(&args->addr)); |
| AIT_FREE_VAL(&val); | AIT_FREE_VAL(&val); |
| sa.sa_handler = sigz; | |
| sigemptyset(&sa.sa_mask); | |
| sigaction(SIGTERM, &sa, NULL); | |
| sigaction(SIGINT, &sa, NULL); | |
| sigaction(SIGCHLD, &sa, NULL); | |
| if (!batch) | |
| switch (fork()) { | |
| case -1: /* error */ | |
| printf("Error:: in fork() #%d - %s\n", errno, strerror(errno)); | |
| ret = 2; | |
| goto end; | |
| case 0: /* child */ | |
| setsid(); | |
| ret = open("/dev/null", O_RDWR); | |
| if (ret != -1) { | |
| dup2(ret, STDIN_FILENO); | |
| dup2(ret, STDOUT_FILENO); | |
| dup2(ret, STDERR_FILENO); | |
| close(ret); | |
| } | |
| break; | |
| default: /* parent */ | |
| printf(">> Service started\n"); | |
| ret = 0; | |
| goto end; | |
| } | |
| if (!(args->cli = mqtt_cli_Open(&args->addr.sa, args->ka))) { | if (!(args->cli = mqtt_cli_Open(&args->addr.sa, args->ka))) { |
| args->free(args); | ret = 2; |
| io_free(args); | goto end; |
| return 2; | |
| } | } |
| switch ((ret = ConnectClient(args->cli->sock))) { | switch ((ret = ConnectClient(args->cli->sock))) { |
| Line 312 main(int argc, char **argv) | Line 470 main(int argc, char **argv) |
| else | else |
| lf = stdout; | lf = stdout; |
| if (lf) { | if (lf) { |
| root = schedBegin(); | |
| ret = Subscribe(args->cli->sock, lf); | ret = Subscribe(args->cli->sock, lf); |
| root = schedBegin(); | |
| schedRead(root, pubRX, lf, args->cli->sock, NULL, 0); | schedRead(root, pubRX, lf, args->cli->sock, NULL, 0); |
| schedRun(root, &Kill); | schedRun(root, &Kill); |
| schedEnd(&root); | |
| if (un) | if (un) |
| Unsubscribe(args->cli->sock); | Unsubscribe(args->cli->sock); |
| fclose(lf); | fclose(lf); |
| schedEnd(&root); | |
| } else | } else |
| printf("Error:: in subscribe file #%d - %s\n", errno, strerror(errno)); | printf("Error:: in output file #%d - %s\n", errno, strerror(errno)); |
| } else | } else |
| ret = 3; | ret = 3; |
| mqtt_cli_Close(&args->cli); | mqtt_cli_Close(&args->cli); |
| end: | |
| args->free(args); | args->free(args); |
| io_free(args); | io_free(args); |
| return ret; | return ret; |