This is Webservice SDK for mbed. LPCXpresso1769/LPC1768/FRDM-K64F/LPC4088
Fork of libMiMic by
core/NyLPC_stdlib.cpp@2:b96c1e90d120, 2013-03-27 (annotated)
- Committer:
- nyatla
- Date:
- Wed Mar 27 12:07:47 2013 +0000
- Revision:
- 2:b96c1e90d120
- Parent:
- 1:9f6a78395432
- Child:
- 11:c82a7b2899b0
???????????
Who changed what in which revision?
User | Revision | Line number | New contents of line |
---|---|---|---|
nyatla | 0:142ee8b12fef | 1 | /********************************************************************************* |
nyatla | 0:142ee8b12fef | 2 | * PROJECT: MiMic |
nyatla | 0:142ee8b12fef | 3 | * -------------------------------------------------------------------------------- |
nyatla | 0:142ee8b12fef | 4 | * |
nyatla | 0:142ee8b12fef | 5 | * This file is part of MiMic |
nyatla | 0:142ee8b12fef | 6 | * Copyright (C)2011 Ryo Iizuka |
nyatla | 0:142ee8b12fef | 7 | * |
nyatla | 0:142ee8b12fef | 8 | * MiMic is free software: you can redistribute it and/or modify |
nyatla | 0:142ee8b12fef | 9 | * it under the terms of the GNU Lesser General Public License as published |
nyatla | 0:142ee8b12fef | 10 | * by the Free Software Foundation, either version 3 of the License, or |
nyatla | 0:142ee8b12fef | 11 | * (at your option) any later version. |
nyatla | 0:142ee8b12fef | 12 | * |
nyatla | 0:142ee8b12fef | 13 | * This program is distributed in the hope that it will be useful, |
nyatla | 0:142ee8b12fef | 14 | * but WITHOUT ANY WARRANTY; without even the implied warranty of |
nyatla | 0:142ee8b12fef | 15 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
nyatla | 0:142ee8b12fef | 16 | * GNU General Public License for more details. |
nyatla | 0:142ee8b12fef | 17 | * |
nyatla | 0:142ee8b12fef | 18 | * You should have received a copy of the GNU Lesser General Public License |
nyatla | 0:142ee8b12fef | 19 | * along with this program. If not, see <http://www.gnu.org/licenses/>. |
nyatla | 0:142ee8b12fef | 20 | * |
nyatla | 0:142ee8b12fef | 21 | * For further information please contact. |
nyatla | 0:142ee8b12fef | 22 | * http://nyatla.jp/ |
nyatla | 0:142ee8b12fef | 23 | * <airmail(at)ebony.plala.or.jp> or <nyatla(at)nyatla.jp> |
nyatla | 0:142ee8b12fef | 24 | * |
nyatla | 0:142ee8b12fef | 25 | *********************************************************************************/ |
nyatla | 0:142ee8b12fef | 26 | #include "NyLPC_stdlib.h" |
nyatla | 0:142ee8b12fef | 27 | NyLPC_TUInt32 NyLPC_TUInt32_bswap(NyLPC_TUInt32 n) |
nyatla | 0:142ee8b12fef | 28 | { |
nyatla | 0:142ee8b12fef | 29 | return( |
nyatla | 0:142ee8b12fef | 30 | ((((NyLPC_TUInt32)(n))<<24)&0xff000000)| |
nyatla | 0:142ee8b12fef | 31 | ((((NyLPC_TUInt32)(n))<< 8)&0x00ff0000)| |
nyatla | 0:142ee8b12fef | 32 | ((((NyLPC_TUInt32)(n))>> 8)&0x0000ff00)| |
nyatla | 0:142ee8b12fef | 33 | ((((NyLPC_TUInt32)(n))>>24)&0x000000ff)); |
nyatla | 0:142ee8b12fef | 34 | } |
nyatla | 0:142ee8b12fef | 35 | NyLPC_TUInt16 NyLPC_TUInt16_bswap(NyLPC_TUInt16 n) |
nyatla | 0:142ee8b12fef | 36 | { |
nyatla | 0:142ee8b12fef | 37 | return NyLPC_TUInt16_BSWAP(n); |
nyatla | 0:142ee8b12fef | 38 | } |
nyatla | 0:142ee8b12fef | 39 | |
nyatla | 0:142ee8b12fef | 40 | static int _line_log_l; |
nyatla | 0:142ee8b12fef | 41 | static const char* _line_log_m; |
nyatla | 0:142ee8b12fef | 42 | unsigned int NyLPC_assert_counter=0; |
nyatla | 0:142ee8b12fef | 43 | unsigned int NyLPC_abort_counter=0; |
nyatla | 0:142ee8b12fef | 44 | unsigned int NyLPC_debug_counter=0; |
nyatla | 0:142ee8b12fef | 45 | |
nyatla | 0:142ee8b12fef | 46 | void NyLPC_assertHook(const char* m,int l) |
nyatla | 0:142ee8b12fef | 47 | { |
nyatla | 0:142ee8b12fef | 48 | _line_log_l=l; |
nyatla | 0:142ee8b12fef | 49 | _line_log_m=m; |
nyatla | 0:142ee8b12fef | 50 | NyLPC_assert_counter++; |
nyatla | 0:142ee8b12fef | 51 | return; |
nyatla | 0:142ee8b12fef | 52 | } |
nyatla | 0:142ee8b12fef | 53 | void NyLPC_abortHook(const char* m,int l) |
nyatla | 0:142ee8b12fef | 54 | { |
nyatla | 0:142ee8b12fef | 55 | _line_log_l=l; |
nyatla | 0:142ee8b12fef | 56 | _line_log_m=m; |
nyatla | 0:142ee8b12fef | 57 | NyLPC_abort_counter++; |
nyatla | 0:142ee8b12fef | 58 | } |
nyatla | 0:142ee8b12fef | 59 | void NyLPC_debugHook(const char* m,int l) |
nyatla | 0:142ee8b12fef | 60 | { |
nyatla | 0:142ee8b12fef | 61 | _line_log_l=l; |
nyatla | 0:142ee8b12fef | 62 | _line_log_m=m; |
nyatla | 0:142ee8b12fef | 63 | NyLPC_debug_counter++; |
nyatla | 0:142ee8b12fef | 64 | return; |
nyatla | 0:142ee8b12fef | 65 | } |
nyatla | 0:142ee8b12fef | 66 | |
nyatla | 0:142ee8b12fef | 67 | NyLPC_TBool NyLPC_TCharArrayPtr_seek(struct NyLPC_TCharArrayPtr* i_struct,NyLPC_TUInt16 i_seek) |
nyatla | 0:142ee8b12fef | 68 | { |
nyatla | 0:142ee8b12fef | 69 | if(i_struct->len<i_seek){ |
nyatla | 0:142ee8b12fef | 70 | return NyLPC_TBool_FALSE; |
nyatla | 0:142ee8b12fef | 71 | } |
nyatla | 0:142ee8b12fef | 72 | i_struct->ptr+=i_seek; |
nyatla | 0:142ee8b12fef | 73 | i_struct->len-=i_seek; |
nyatla | 0:142ee8b12fef | 74 | return NyLPC_TBool_TRUE; |
nyatla | 0:142ee8b12fef | 75 | } |
nyatla | 0:142ee8b12fef | 76 | |
nyatla | 0:142ee8b12fef | 77 | NyLPC_TBool NyLPC_TUInt32ArrayPtr_seek(struct NyLPC_TUInt32ArrayPtr* i_struct,NyLPC_TUInt16 i_seek) |
nyatla | 0:142ee8b12fef | 78 | { |
nyatla | 0:142ee8b12fef | 79 | if(i_struct->len<i_seek){ |
nyatla | 0:142ee8b12fef | 80 | return NyLPC_TBool_FALSE; |
nyatla | 0:142ee8b12fef | 81 | } |
nyatla | 0:142ee8b12fef | 82 | i_struct->ptr+=i_seek; |
nyatla | 0:142ee8b12fef | 83 | i_struct->len-=i_seek; |
nyatla | 0:142ee8b12fef | 84 | return NyLPC_TBool_TRUE; |
nyatla | 0:142ee8b12fef | 85 | } |
nyatla | 0:142ee8b12fef | 86 | void NyLPC_TUInt32ArrayPtr_setBuf(struct NyLPC_TUInt32ArrayPtr* i_struct,NyLPC_TUInt32* i_ptr,NyLPC_TUInt16 i_len) |
nyatla | 0:142ee8b12fef | 87 | { |
nyatla | 0:142ee8b12fef | 88 | i_struct->ptr=i_ptr; |
nyatla | 0:142ee8b12fef | 89 | i_struct->len=i_len; |
nyatla | 0:142ee8b12fef | 90 | } |
nyatla | 0:142ee8b12fef | 91 | |
nyatla | 2:b96c1e90d120 | 92 | |
nyatla | 2:b96c1e90d120 | 93 | /** ---------- |
nyatla | 2:b96c1e90d120 | 94 | * NyLPC_TTextIdTbl |
nyatla | 2:b96c1e90d120 | 95 | ---------- */ |
nyatla | 2:b96c1e90d120 | 96 | |
nyatla | 2:b96c1e90d120 | 97 | /** |
nyatla | 2:b96c1e90d120 | 98 | * IDテーブル |
nyatla | 2:b96c1e90d120 | 99 | */ |
nyatla | 2:b96c1e90d120 | 100 | |
nyatla | 2:b96c1e90d120 | 101 | NyLPC_TUInt8 NyLPC_TTextIdTbl_getMatchId(const NyLPC_TChar* i_str,const struct NyLPC_TTextIdTbl i_tbl[]) |
nyatla | 2:b96c1e90d120 | 102 | { |
nyatla | 2:b96c1e90d120 | 103 | int i; |
nyatla | 2:b96c1e90d120 | 104 | for(i=0;i_tbl[i].n!=NULL;i++){ |
nyatla | 2:b96c1e90d120 | 105 | if(strcmp(i_str,i_tbl[i].n)==0){ |
nyatla | 2:b96c1e90d120 | 106 | break; |
nyatla | 2:b96c1e90d120 | 107 | } |
nyatla | 2:b96c1e90d120 | 108 | } |
nyatla | 2:b96c1e90d120 | 109 | return i_tbl[i].id; |
nyatla | 2:b96c1e90d120 | 110 | } |
nyatla | 2:b96c1e90d120 | 111 | |
nyatla | 2:b96c1e90d120 | 112 | |
nyatla | 2:b96c1e90d120 | 113 | |
nyatla | 2:b96c1e90d120 | 114 | |
nyatla | 2:b96c1e90d120 | 115 | /** ---------- |
nyatla | 2:b96c1e90d120 | 116 | * |
nyatla | 2:b96c1e90d120 | 117 | ---------- */ |
nyatla | 2:b96c1e90d120 | 118 | |
nyatla | 2:b96c1e90d120 | 119 | |
nyatla | 2:b96c1e90d120 | 120 | |
nyatla | 2:b96c1e90d120 | 121 | |
nyatla | 2:b96c1e90d120 | 122 | |
nyatla | 0:142ee8b12fef | 123 | void NyLPC_itoa(int i_n,char* o_out,int i_digit) |
nyatla | 0:142ee8b12fef | 124 | { |
nyatla | 0:142ee8b12fef | 125 | int i, sign; |
nyatla | 0:142ee8b12fef | 126 | if ((sign = i_n) < 0){ |
nyatla | 0:142ee8b12fef | 127 | i_n = -i_n; |
nyatla | 0:142ee8b12fef | 128 | } |
nyatla | 0:142ee8b12fef | 129 | i = 0; |
nyatla | 0:142ee8b12fef | 130 | do{ |
nyatla | 0:142ee8b12fef | 131 | o_out[i++] = i_n % 10 + '0'; |
nyatla | 0:142ee8b12fef | 132 | }while ((i_n /= 10) > 0); |
nyatla | 0:142ee8b12fef | 133 | if (sign < 0){ |
nyatla | 0:142ee8b12fef | 134 | o_out[i++] = '-'; |
nyatla | 0:142ee8b12fef | 135 | } |
nyatla | 0:142ee8b12fef | 136 | o_out[i] = '\0'; |
nyatla | 0:142ee8b12fef | 137 | NyLPC_reverse(o_out); |
nyatla | 0:142ee8b12fef | 138 | } |
nyatla | 0:142ee8b12fef | 139 | |
nyatla | 0:142ee8b12fef | 140 | void NyLPC_reverse(char* s) |
nyatla | 0:142ee8b12fef | 141 | { |
nyatla | 0:142ee8b12fef | 142 | char *j; |
nyatla | 0:142ee8b12fef | 143 | char c; |
nyatla | 0:142ee8b12fef | 144 | j = s + strlen(s) - 1; |
nyatla | 0:142ee8b12fef | 145 | while(s < j){ |
nyatla | 0:142ee8b12fef | 146 | c = *s; |
nyatla | 0:142ee8b12fef | 147 | *s++ = *j; |
nyatla | 0:142ee8b12fef | 148 | *j-- = c; |
nyatla | 0:142ee8b12fef | 149 | } |
nyatla | 0:142ee8b12fef | 150 | } |