Junichi Katsu / Mbed 2 deprecated WallbotR4_BTLE

Dependencies:   FatFileSystem HighSpeedAnalogIn TB6612FNG2 mbed

Committer:
jksoft
Date:
Fri May 10 11:48:07 2013 +0000
Revision:
0:373bcb197dc8
?????????

Who changed what in which revision?

UserRevisionLine numberNew contents of line
jksoft 0:373bcb197dc8 1 /*
jksoft 0:373bcb197dc8 2 * Copyright (C) 2009-2012 by Matthias Ringwald
jksoft 0:373bcb197dc8 3 *
jksoft 0:373bcb197dc8 4 * Redistribution and use in source and binary forms, with or without
jksoft 0:373bcb197dc8 5 * modification, are permitted provided that the following conditions
jksoft 0:373bcb197dc8 6 * are met:
jksoft 0:373bcb197dc8 7 *
jksoft 0:373bcb197dc8 8 * 1. Redistributions of source code must retain the above copyright
jksoft 0:373bcb197dc8 9 * notice, this list of conditions and the following disclaimer.
jksoft 0:373bcb197dc8 10 * 2. Redistributions in binary form must reproduce the above copyright
jksoft 0:373bcb197dc8 11 * notice, this list of conditions and the following disclaimer in the
jksoft 0:373bcb197dc8 12 * documentation and/or other materials provided with the distribution.
jksoft 0:373bcb197dc8 13 * 3. Neither the name of the copyright holders nor the names of
jksoft 0:373bcb197dc8 14 * contributors may be used to endorse or promote products derived
jksoft 0:373bcb197dc8 15 * from this software without specific prior written permission.
jksoft 0:373bcb197dc8 16 * 4. Any redistribution, use, or modification is done solely for
jksoft 0:373bcb197dc8 17 * personal benefit and not for any commercial purpose or for
jksoft 0:373bcb197dc8 18 * monetary gain.
jksoft 0:373bcb197dc8 19 *
jksoft 0:373bcb197dc8 20 * THIS SOFTWARE IS PROVIDED BY MATTHIAS RINGWALD AND CONTRIBUTORS
jksoft 0:373bcb197dc8 21 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
jksoft 0:373bcb197dc8 22 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
jksoft 0:373bcb197dc8 23 * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL MATTHIAS
jksoft 0:373bcb197dc8 24 * RINGWALD OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
jksoft 0:373bcb197dc8 25 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
jksoft 0:373bcb197dc8 26 * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
jksoft 0:373bcb197dc8 27 * OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
jksoft 0:373bcb197dc8 28 * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
jksoft 0:373bcb197dc8 29 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF
jksoft 0:373bcb197dc8 30 * THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
jksoft 0:373bcb197dc8 31 * SUCH DAMAGE.
jksoft 0:373bcb197dc8 32 *
jksoft 0:373bcb197dc8 33 * Please inquire about commercial licensing options at btstack@ringwald.ch
jksoft 0:373bcb197dc8 34 *
jksoft 0:373bcb197dc8 35 */
jksoft 0:373bcb197dc8 36
jksoft 0:373bcb197dc8 37 /*
jksoft 0:373bcb197dc8 38 * utils.c
jksoft 0:373bcb197dc8 39 *
jksoft 0:373bcb197dc8 40 * General utility functions
jksoft 0:373bcb197dc8 41 *
jksoft 0:373bcb197dc8 42 * Created by Matthias Ringwald on 7/23/09.
jksoft 0:373bcb197dc8 43 */
jksoft 0:373bcb197dc8 44
jksoft 0:373bcb197dc8 45 #include "config.h"
jksoft 0:373bcb197dc8 46 #include <btstack/utils.h>
jksoft 0:373bcb197dc8 47 #include <stdio.h>
jksoft 0:373bcb197dc8 48 #include "debug.h"
jksoft 0:373bcb197dc8 49
jksoft 0:373bcb197dc8 50 void bt_store_16(uint8_t *buffer, uint16_t pos, uint16_t value){
jksoft 0:373bcb197dc8 51 buffer[pos++] = value;
jksoft 0:373bcb197dc8 52 buffer[pos++] = value >> 8;
jksoft 0:373bcb197dc8 53 }
jksoft 0:373bcb197dc8 54
jksoft 0:373bcb197dc8 55 void bt_store_32(uint8_t *buffer, uint16_t pos, uint32_t value){
jksoft 0:373bcb197dc8 56 buffer[pos++] = value;
jksoft 0:373bcb197dc8 57 buffer[pos++] = value >> 8;
jksoft 0:373bcb197dc8 58 buffer[pos++] = value >> 16;
jksoft 0:373bcb197dc8 59 buffer[pos++] = value >> 24;
jksoft 0:373bcb197dc8 60 }
jksoft 0:373bcb197dc8 61
jksoft 0:373bcb197dc8 62 void net_store_16(uint8_t *buffer, uint16_t pos, uint16_t value){
jksoft 0:373bcb197dc8 63 buffer[pos++] = value >> 8;
jksoft 0:373bcb197dc8 64 buffer[pos++] = value;
jksoft 0:373bcb197dc8 65 }
jksoft 0:373bcb197dc8 66
jksoft 0:373bcb197dc8 67 void net_store_32(uint8_t *buffer, uint16_t pos, uint32_t value){
jksoft 0:373bcb197dc8 68 buffer[pos++] = value >> 24;
jksoft 0:373bcb197dc8 69 buffer[pos++] = value >> 16;
jksoft 0:373bcb197dc8 70 buffer[pos++] = value >> 8;
jksoft 0:373bcb197dc8 71 buffer[pos++] = value;
jksoft 0:373bcb197dc8 72 }
jksoft 0:373bcb197dc8 73
jksoft 0:373bcb197dc8 74 void bt_flip_addr(bd_addr_t dest, bd_addr_t src){
jksoft 0:373bcb197dc8 75 dest[0] = src[5];
jksoft 0:373bcb197dc8 76 dest[1] = src[4];
jksoft 0:373bcb197dc8 77 dest[2] = src[3];
jksoft 0:373bcb197dc8 78 dest[3] = src[2];
jksoft 0:373bcb197dc8 79 dest[4] = src[1];
jksoft 0:373bcb197dc8 80 dest[5] = src[0];
jksoft 0:373bcb197dc8 81 }
jksoft 0:373bcb197dc8 82
jksoft 0:373bcb197dc8 83 void hexdump(void *data, int size){
jksoft 0:373bcb197dc8 84 int i;
jksoft 0:373bcb197dc8 85 for (i=0; i<size;i++){
jksoft 0:373bcb197dc8 86 log_info("%02X ", ((uint8_t *)data)[i]);
jksoft 0:373bcb197dc8 87 }
jksoft 0:373bcb197dc8 88 log_info("\n");
jksoft 0:373bcb197dc8 89 }
jksoft 0:373bcb197dc8 90
jksoft 0:373bcb197dc8 91 void printUUID(uint8_t *uuid) {
jksoft 0:373bcb197dc8 92 log_info("%02x%02x%02x%02x-%02x%02x-%02x%02x-%02x%02x-%02x%02x%02x%02x%02x%02x",
jksoft 0:373bcb197dc8 93 uuid[0], uuid[1], uuid[2], uuid[3], uuid[4], uuid[5], uuid[6], uuid[7],
jksoft 0:373bcb197dc8 94 uuid[8], uuid[9], uuid[10], uuid[11], uuid[12], uuid[13], uuid[14], uuid[15]);
jksoft 0:373bcb197dc8 95 }
jksoft 0:373bcb197dc8 96
jksoft 0:373bcb197dc8 97 static char bd_addr_to_str_buffer[6*3]; // 12:45:78:01:34:67\0
jksoft 0:373bcb197dc8 98 char * bd_addr_to_str(bd_addr_t addr){
jksoft 0:373bcb197dc8 99 sprintf(bd_addr_to_str_buffer, "%02x:%02x:%02x:%02x:%02x:%02x", addr[0], addr[1], addr[2], addr[3], addr[4], addr[5]);
jksoft 0:373bcb197dc8 100 return (char *) bd_addr_to_str_buffer;
jksoft 0:373bcb197dc8 101 }
jksoft 0:373bcb197dc8 102
jksoft 0:373bcb197dc8 103 void print_bd_addr( bd_addr_t addr){
jksoft 0:373bcb197dc8 104 log_info("%s", bd_addr_to_str(addr));
jksoft 0:373bcb197dc8 105 }
jksoft 0:373bcb197dc8 106
jksoft 0:373bcb197dc8 107 #ifndef EMBEDDED
jksoft 0:373bcb197dc8 108 int sscan_bd_addr(uint8_t * addr_string, bd_addr_t addr){
jksoft 0:373bcb197dc8 109 unsigned int bd_addr_buffer[BD_ADDR_LEN]; //for sscanf, integer needed
jksoft 0:373bcb197dc8 110 // reset result buffer
jksoft 0:373bcb197dc8 111 int i;
jksoft 0:373bcb197dc8 112 for (i = 0; i < BD_ADDR_LEN; i++) {
jksoft 0:373bcb197dc8 113 bd_addr_buffer[i] = 0;
jksoft 0:373bcb197dc8 114 }
jksoft 0:373bcb197dc8 115
jksoft 0:373bcb197dc8 116 // parse
jksoft 0:373bcb197dc8 117 int result = sscanf( (char *) addr_string, "%2x:%2x:%2x:%2x:%2x:%2x", &bd_addr_buffer[0], &bd_addr_buffer[1], &bd_addr_buffer[2],
jksoft 0:373bcb197dc8 118 &bd_addr_buffer[3], &bd_addr_buffer[4], &bd_addr_buffer[5]);
jksoft 0:373bcb197dc8 119 // store
jksoft 0:373bcb197dc8 120 if (result == 6){
jksoft 0:373bcb197dc8 121 for (i = 0; i < BD_ADDR_LEN; i++) {
jksoft 0:373bcb197dc8 122 addr[i] = (uint8_t) bd_addr_buffer[i];
jksoft 0:373bcb197dc8 123 }
jksoft 0:373bcb197dc8 124 }
jksoft 0:373bcb197dc8 125 return (result == 6);
jksoft 0:373bcb197dc8 126 }
jksoft 0:373bcb197dc8 127 #endif
jksoft 0:373bcb197dc8 128
jksoft 0:373bcb197dc8 129 /*
jksoft 0:373bcb197dc8 130 * CRC (reversed crc) lookup table as calculated by the table generator in ETSI TS 101 369 V6.3.0.
jksoft 0:373bcb197dc8 131 */
jksoft 0:373bcb197dc8 132 static const uint8_t crc8table[256] = { /* reversed, 8-bit, poly=0x07 */
jksoft 0:373bcb197dc8 133 0x00, 0x91, 0xE3, 0x72, 0x07, 0x96, 0xE4, 0x75, 0x0E, 0x9F, 0xED, 0x7C, 0x09, 0x98, 0xEA, 0x7B,
jksoft 0:373bcb197dc8 134 0x1C, 0x8D, 0xFF, 0x6E, 0x1B, 0x8A, 0xF8, 0x69, 0x12, 0x83, 0xF1, 0x60, 0x15, 0x84, 0xF6, 0x67,
jksoft 0:373bcb197dc8 135 0x38, 0xA9, 0xDB, 0x4A, 0x3F, 0xAE, 0xDC, 0x4D, 0x36, 0xA7, 0xD5, 0x44, 0x31, 0xA0, 0xD2, 0x43,
jksoft 0:373bcb197dc8 136 0x24, 0xB5, 0xC7, 0x56, 0x23, 0xB2, 0xC0, 0x51, 0x2A, 0xBB, 0xC9, 0x58, 0x2D, 0xBC, 0xCE, 0x5F,
jksoft 0:373bcb197dc8 137 0x70, 0xE1, 0x93, 0x02, 0x77, 0xE6, 0x94, 0x05, 0x7E, 0xEF, 0x9D, 0x0C, 0x79, 0xE8, 0x9A, 0x0B,
jksoft 0:373bcb197dc8 138 0x6C, 0xFD, 0x8F, 0x1E, 0x6B, 0xFA, 0x88, 0x19, 0x62, 0xF3, 0x81, 0x10, 0x65, 0xF4, 0x86, 0x17,
jksoft 0:373bcb197dc8 139 0x48, 0xD9, 0xAB, 0x3A, 0x4F, 0xDE, 0xAC, 0x3D, 0x46, 0xD7, 0xA5, 0x34, 0x41, 0xD0, 0xA2, 0x33,
jksoft 0:373bcb197dc8 140 0x54, 0xC5, 0xB7, 0x26, 0x53, 0xC2, 0xB0, 0x21, 0x5A, 0xCB, 0xB9, 0x28, 0x5D, 0xCC, 0xBE, 0x2F,
jksoft 0:373bcb197dc8 141 0xE0, 0x71, 0x03, 0x92, 0xE7, 0x76, 0x04, 0x95, 0xEE, 0x7F, 0x0D, 0x9C, 0xE9, 0x78, 0x0A, 0x9B,
jksoft 0:373bcb197dc8 142 0xFC, 0x6D, 0x1F, 0x8E, 0xFB, 0x6A, 0x18, 0x89, 0xF2, 0x63, 0x11, 0x80, 0xF5, 0x64, 0x16, 0x87,
jksoft 0:373bcb197dc8 143 0xD8, 0x49, 0x3B, 0xAA, 0xDF, 0x4E, 0x3C, 0xAD, 0xD6, 0x47, 0x35, 0xA4, 0xD1, 0x40, 0x32, 0xA3,
jksoft 0:373bcb197dc8 144 0xC4, 0x55, 0x27, 0xB6, 0xC3, 0x52, 0x20, 0xB1, 0xCA, 0x5B, 0x29, 0xB8, 0xCD, 0x5C, 0x2E, 0xBF,
jksoft 0:373bcb197dc8 145 0x90, 0x01, 0x73, 0xE2, 0x97, 0x06, 0x74, 0xE5, 0x9E, 0x0F, 0x7D, 0xEC, 0x99, 0x08, 0x7A, 0xEB,
jksoft 0:373bcb197dc8 146 0x8C, 0x1D, 0x6F, 0xFE, 0x8B, 0x1A, 0x68, 0xF9, 0x82, 0x13, 0x61, 0xF0, 0x85, 0x14, 0x66, 0xF7,
jksoft 0:373bcb197dc8 147 0xA8, 0x39, 0x4B, 0xDA, 0xAF, 0x3E, 0x4C, 0xDD, 0xA6, 0x37, 0x45, 0xD4, 0xA1, 0x30, 0x42, 0xD3,
jksoft 0:373bcb197dc8 148 0xB4, 0x25, 0x57, 0xC6, 0xB3, 0x22, 0x50, 0xC1, 0xBA, 0x2B, 0x59, 0xC8, 0xBD, 0x2C, 0x5E, 0xCF
jksoft 0:373bcb197dc8 149 };
jksoft 0:373bcb197dc8 150
jksoft 0:373bcb197dc8 151 #define CRC8_INIT 0xFF // Initial FCS value
jksoft 0:373bcb197dc8 152 #define CRC8_OK 0xCF // Good final FCS value
jksoft 0:373bcb197dc8 153 /*-----------------------------------------------------------------------------------*/
jksoft 0:373bcb197dc8 154 uint8_t crc8(uint8_t *data, uint16_t len)
jksoft 0:373bcb197dc8 155 {
jksoft 0:373bcb197dc8 156 uint16_t count;
jksoft 0:373bcb197dc8 157 uint8_t crc = CRC8_INIT;
jksoft 0:373bcb197dc8 158 for (count = 0; count < len; count++)
jksoft 0:373bcb197dc8 159 crc = crc8table[crc ^ data[count]];
jksoft 0:373bcb197dc8 160 return crc;
jksoft 0:373bcb197dc8 161 }
jksoft 0:373bcb197dc8 162
jksoft 0:373bcb197dc8 163 /*-----------------------------------------------------------------------------------*/
jksoft 0:373bcb197dc8 164 uint8_t crc8_check(uint8_t *data, uint16_t len, uint8_t check_sum)
jksoft 0:373bcb197dc8 165 {
jksoft 0:373bcb197dc8 166 uint8_t crc;
jksoft 0:373bcb197dc8 167
jksoft 0:373bcb197dc8 168 crc = crc8(data, len);
jksoft 0:373bcb197dc8 169
jksoft 0:373bcb197dc8 170 crc = crc8table[crc ^ check_sum];
jksoft 0:373bcb197dc8 171 if (crc == CRC8_OK)
jksoft 0:373bcb197dc8 172 return 0; /* Valid */
jksoft 0:373bcb197dc8 173 else
jksoft 0:373bcb197dc8 174 return 1; /* Failed */
jksoft 0:373bcb197dc8 175
jksoft 0:373bcb197dc8 176 }
jksoft 0:373bcb197dc8 177
jksoft 0:373bcb197dc8 178 /*-----------------------------------------------------------------------------------*/
jksoft 0:373bcb197dc8 179 uint8_t crc8_calc(uint8_t *data, uint16_t len)
jksoft 0:373bcb197dc8 180 {
jksoft 0:373bcb197dc8 181 /* Ones complement */
jksoft 0:373bcb197dc8 182 return 0xFF - crc8(data, len);
jksoft 0:373bcb197dc8 183 }
jksoft 0:373bcb197dc8 184