bertos/net/keytag.c

   1 /**
   2  * \file
   3  * <!--
   4  * This file is part of BeRTOS.
   5  *
   6  * Bertos is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License as published by
   8  * the Free Software Foundation; either version 2 of the License, or
   9  * (at your option) any later version.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * along with this program; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
  19  *
  20  * As a special exception, you may use this file as part of a free software
  21  * library without restriction.  Specifically, if other files instantiate
  22  * templates or use macros or inline functions from this file, or you compile
  23  * this file and link it with other files to produce an executable, this
  24  * file does not by itself cause the resulting executable to be covered by
  25  * the GNU General Public License.  This exception does not however
  26  * invalidate any other reasons why the executable file might be covered by
  27  * the GNU General Public License.
  28  *
  29  * Copyright 2008 Develer S.r.l. (http://www.develer.com/)
  30  *
  31  * -->
  32  *
  33  * \author Andrea Grandi <andrea@develer.com>
  34  * \author Daniele Basile <asterix@develer.com>
  35  *
  36  * \brief KeyTAG parser.
  37  *
  38  * This module parse TAG message that come from comunication channel,
  39  * and convert the tag value into string.
  40  *
  41  * TAG protocol is decribed in this way:
  42  * <pre>
  43  * ---------------------------------------------------
  44  * |STX (0x02)|data...(10 HEX chars)|CR|LF|ETX (0x03)|
  45  * ---------------------------------------------------
  46  * </pre>
  47  */
  48
  49 #include "keytag.h"
  50
  51 #include <cfg/debug.h>
  52 // Define log settings for cfg/log.h
  53 #define LOG_LEVEL    CONFIG_KEYTAG_LOG_LEVEL
  54 #define LOG_FORMAT   CONFIG_KEYTAG_LOG_FORMAT
  55 #include <cfg/log.h>
  56 #include <cfg/macros.h>
  57
  58 #include <io/kfile.h>
  59
  60 #include <string.h>
  61 /**
  62  * Starting communication char (STX).
  63  */
  64 #define TAG_STX 0x02
  65
  66 /**
  67  * Ending communication char (ETX).
  68  */
  69 #define TAG_ETX 0x03
  70
  71 static void keytag_clearPkt(struct TagPacket *pkt)
  72 {
  73         pkt->sync = false;
  74         pkt->len = 0;
  75 }
  76
  77 /**
  78  * DEPRECATED FUCNTIONS
  79  * To read the tag string from device you shoul use the keytag_recv
  80  * fuction, that return the string if we had received it.
  81  */
  82 void keytag_poll(struct TagPacket *pkt)
  83 {
  84         uint8_t buf[CONFIG_TAG_MAX_LEN];
  85         int len;
  86         if ((len = keytag_recv(pkt, buf, sizeof(buf))) != EOF)
  87                 kfile_write(pkt->host, buf, len);
  88 }
  89
  90 /**
  91  * Receive the tag message from channel, and if
  92  * the tag is good put the converted string into given buffer.
  93  * The fuction return the len of found tag string, otherwise EOF.
  94  */
  95 int keytag_recv(struct TagPacket *pkt, uint8_t *tag, size_t len)
  96 {
  97         int c;
  98
  99         /* Get all chars from buffer */
 100         while ((c = kfile_getc(pkt->tag)) != EOF)
 101         {
 102                 /* Search for STX char in received chars */
 103                 if (c == TAG_STX)
 104                 {
 105                         /* When STX is found a new packet begins */
 106                         if (pkt->sync)
 107                                 LOG_WARN("TAG double sync!\n");
 108                         keytag_clearPkt(pkt);
 109                         pkt->sync = true;
 110                 }
 111                 else if (pkt->sync)
 112                 {
 113                         /* Check for end of packet */
 114                         if (c == TAG_ETX)
 115                         {
 116                                 /* Terminate the tag string */
 117                                 size_t tag_len = MIN(len, pkt->len);
 118
 119                                 /* Save read tag */
 120                                 memcpy(tag, pkt->buf, tag_len);
 121                                 pkt->sync = false;
 122                                 return tag_len;
 123                         }
 124                         else
 125                         {
 126                                 /* Check for buffer overflow */
 127                                 if (pkt->len >= CONFIG_TAG_MAX_LEN)
 128                                 {
 129                                         LOG_ERR("TAG buffer overflow\n");
 130                                         pkt->sync = false;
 131                                 }
 132                                 else
 133                                 {
 134                                         /* Add every char after STX to tag reading buffer */
 135                                         if (pkt->sync)
 136                                         {
 137                                                 pkt->buf[pkt->len] = c;
 138                                                 pkt->len++;
 139                                         }
 140                                 }
 141                         }
 142                 }
 143         }
 144         if (kfile_error(pkt->tag) != 0)
 145         {
 146                 LOG_ERR("Error %04x\n", kfile_error(pkt->tag));
 147                 kfile_clearerr(pkt->tag);
 148         }
 149
 150         return EOF;
 151 }
 152
 153 /**
 154  * Init the keytag module.
 155  */
 156 void keytag_init(struct TagPacket *pkt, struct KFile *comm, struct KFile *tag)
 157 {
 158         keytag_clearPkt(pkt);
 159         pkt->tag = tag;
 160         pkt->host = comm;
 161 }
 162