FreeCalypso > hg > freecalypso-tools
view uptools/atcmd/smdump.c @ 407:19e5a3e2f9c0
fcup-settime: moved time() retrieval a little closer to the output
A fundamental problem with all simple time transfer tools is that there is
always some delay between the time retrieval on the source system and that
transmitted time being set on the destination, and the resulting time
on the destination system is off by that delay amount. This delay cannot
be fully eliminated when working in a simple environment like ours,
but we should make our best effort to minimize it. In the present case,
moving the atinterf_init() call before the time() retrieval should make
a teensy-tiny improvement.
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Sat, 11 Aug 2018 21:52:17 +0000 |
parents | b88a37d4f148 |
children | dc2fd8e6f42c |
line wrap: on
line source
/* * This utility retrieves a dump of all stored SMS records in PDU mode. */ #include <sys/types.h> #include <stdio.h> #include <stdlib.h> #include <string.h> #include <strings.h> #include <unistd.h> #include "../../rvinterf/include/exitcodes.h" #include "resp_parse.h" extern char at_response[]; struct delafter { unsigned msgid; struct delafter *next; }; int delete_after_flag; struct delafter *delafter_head, **delafter_tail = &delafter_head; int pdu_state; char *msgtype; u_char pbname_gsm[40]; unsigned pbname_len, header_len; u_char pdu_bin[176]; add_delafter_record(msgid) unsigned msgid; { struct delafter *rec; rec = malloc(sizeof(struct delafter)); if (!rec) return; rec->msgid = msgid; rec->next = 0; *delafter_tail = rec; delafter_tail = &rec->next; } validate_pbname_7bit() { unsigned n; for (n = 0; n < pbname_len; n++) if (pbname_gsm[n] & 0x80) return(-1); return(0); } cmgl_header() { struct resp_field fields[4]; int cc; /* skip empty lines */ if (!at_response[1]) return; /* if not empty, it MUST be +CMGL */ if (strncmp(at_response+1, "+CMGL: ", 7)) { fprintf(stderr, "error: response from target is not +CMGL\n"); exit(ERROR_TARGET); } if (parse_structured_response(at_response+8, fields, 4) != 4) { malformed: fprintf(stderr, "error: malformed +CMGL response\n"); exit(ERROR_TARGET); } if (fields[0].type != RESP_FIELD_NUMBER || fields[1].type != RESP_FIELD_NUMBER || fields[3].type != RESP_FIELD_NUMBER) goto malformed; if (fields[2].type != RESP_FIELD_STRING && fields[2].type != RESP_FIELD_EMPTY) goto malformed; if (delete_after_flag) add_delafter_record(fields[0].num); switch (fields[1].num) { case 0: case 1: msgtype = "Received"; break; case 2: msgtype = "Stored unsent"; break; case 3: msgtype = "Sent"; break; default: fprintf(stderr, "error: invalid message status code in +CMGL response\n"); exit(ERROR_TARGET); } if (fields[2].type == RESP_FIELD_STRING) { cc = decode_hex_line(fields[2].str, pbname_gsm, sizeof pbname_gsm); if (cc >= 1) { pbname_len = cc; if (validate_pbname_7bit() < 0) pbname_len = 0; } else pbname_len = 0; } else pbname_len = 0; header_len = fields[3].num; pdu_state = 1; } emit_pb_name() { u_char decoded_name[81]; gsm7_to_ascii_or_ext(pbname_gsm, pbname_len, decoded_name, 0, 0, 0, 0); printf("Phonebook-Name: %s\n", decoded_name); } cmgl_pdu() { int cc; unsigned sca_len; cc = decode_hex_line(at_response+1, pdu_bin, sizeof pdu_bin); if (cc < 1) { fprintf(stderr, "error: expected PDU not received\n"); exit(ERROR_TARGET); } sca_len = pdu_bin[0]; if (1 + sca_len + header_len != cc) { fprintf(stderr, "error: PDU length mismatch\n"); exit(ERROR_TARGET); } printf("%s message:\n", msgtype); if (pbname_len) emit_pb_name(); puts(at_response+1); putchar('\n'); pdu_state = 0; } cmgl_callback() { if (pdu_state) cmgl_pdu(); else cmgl_header(); } delete_after_process() { struct delafter *rec; char cmgd_cmd[32]; for (rec = delafter_head; rec; rec = rec->next) { sprintf(cmgd_cmd, "AT+CMGD=%u", rec->msgid); atinterf_exec_cmd_needok(cmgd_cmd, 0, 0); } } main(argc, argv) char **argv; { int c; extern int optind; while ((c = getopt(argc, argv, "B:dnp:RX:")) != EOF) { if (atinterf_cmdline_opt(c)) continue; else if (c == 'd') delete_after_flag = 1; else { /* error msg already printed */ exit(ERROR_USAGE); } } if (argc != optind) { fprintf(stderr, "usage: %s [options]\n", argv[0]); exit(ERROR_USAGE); } atinterf_init(); /* enable verbose error messages */ atinterf_exec_cmd_needok("AT+CMEE=2", 0, 0); /* put the 07.05 modem in PDU mode */ atinterf_exec_cmd_needok("AT+CMGF=0", 0, 0); /* HEX charset for phonebook names */ atinterf_exec_cmd_needok("AT+CSCS=\"HEX\"", 0, 0); /* main command */ atinterf_exec_cmd_needok("AT+CMGL=4", 0, cmgl_callback); if (pdu_state) { fprintf(stderr, "error: wrong state at the end of +CMGL\n"); exit(ERROR_TARGET); } if (delete_after_flag) delete_after_process(); /* be nice and restore IRA charset for manual AT command users */ atinterf_exec_cmd_needok("AT+CSCS=\"IRA\"", 0, 0); exit(0); }