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; |