]>
git.gir.st - tmk_keyboard.git/blob - tmk_core/tool/mbed/mbed-sdk/libraries/net/https/axTLS/ssl/os_port.c
2 * Copyright (c) 2007, Cameron Rich
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions are met:
9 * * Redistributions of source code must retain the above copyright notice,
10 * this list of conditions and the following disclaimer.
11 * * Redistributions in binary form must reproduce the above copyright notice,
12 * this list of conditions and the following disclaimer in the documentation
13 * and/or other materials provided with the distribution.
14 * * Neither the name of the axTLS project nor the names of its contributors
15 * may be used to endorse or promote products derived from this software
16 * without specific prior written permission.
18 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
19 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
20 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
21 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
22 * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
23 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
24 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
25 * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
26 * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
27 * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
28 * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
34 * OS specific functions.
44 static int memory_buf
[400];
45 static char enable
= 1;
46 static int nb_entries
= 0;
47 static int nb_alloc
= 0;
49 void disable_memory_buf(void)
53 void enable_memory_buf(void)
57 void init_memory_buf(void)
59 for(int i
= 0; i
< 400; i
+= 2)
65 void print_buf_stats(void)
70 for(int i
= 1; i
< 400; i
+= 2)
71 used
+= memory_buf
[i
];
76 void print_all_buf_stats(void)
79 for(int i
= 1; i
< 400; i
+= 2)
80 used
+= memory_buf
[i
];
81 printf("used: %d bytes\n", used
);
83 for(int i
= 0; i
< 400; i
+= 2)
84 if(memory_buf
[i
] != -1)
85 printf("ptr:%X, size:%d\n", memory_buf
[i
], memory_buf
[i
+1]);
88 static void add_entry(void *x
, size_t s
, const char* f
, const int l
)
91 for(int i
= 0; i
< 400; i
+= 2)
93 if(memory_buf
[i
] == -1)
96 printf("new ptr:%X, size:%d at %s:%d\n", x
, s
, f
, l
);
97 memory_buf
[i
] = (int)(x
);
103 printf("No space left in buffer\n");
106 static void remove_entry(void *x
, const char* f
, const int l
)
109 for(int i
= 0; i
< 400; i
+= 2)
111 if(memory_buf
[i
] == (int)(x
))
114 printf("free ptr:%X, size:%d at %s:%d\n", memory_buf
[i
], memory_buf
[i
+1], f
, l
);
121 printf("not found\n");
126 * gettimeofday() not in mbed
128 EXP_FUNC
void STDCALL
gettimeofday(struct timeval
* t
, void* timezone
)
130 t
->tv_sec
= time(NULL
);
131 t
->tv_usec
= 0; /* 1sec precision only */
138 * gettimeofday() not in Win32
140 EXP_FUNC
void STDCALL
gettimeofday(struct timeval
* t
, void* timezone
)
142 #if defined(_WIN32_WCE)
143 t
->tv_sec
= time(NULL
);
144 t
->tv_usec
= 0; /* 1sec precision only */
146 struct _timeb timebuffer
;
148 t
->tv_sec
= (long)timebuffer
.time
;
149 t
->tv_usec
= 1000 * timebuffer
.millitm
; /* 1ms precision */
155 * strcasecmp() not in Win32
157 EXP_FUNC
int STDCALL
strcasecmp(const char *s1
, const char *s2
)
159 while (tolower(*s1
) == tolower(*s2
++))
167 return *(unsigned char *)s1
- *(unsigned char *)(s2
- 1);
171 EXP_FUNC
int STDCALL
getdomainname(char *buf
, int buf_size
)
174 unsigned long datatype
;
175 unsigned long bufferlength
= buf_size
;
177 if (RegOpenKeyEx(HKEY_LOCAL_MACHINE
,
178 TEXT("SYSTEM\\CurrentControlSet\\Services\\Tcpip\\Parameters"),
179 0, KEY_QUERY_VALUE
, &hKey
) != ERROR_SUCCESS
)
182 RegQueryValueEx(hKey
, "Domain", NULL
, &datatype
, buf
, &bufferlength
);
193 static const char * out_of_mem_str
= "out of memory";
194 static const char * file_open_str
= "Could not open file \"%s\"";
197 * Some functions that call display some error trace and then call abort().
198 * This just makes life much easier on embedded systems, since we're
199 * suffering major trauma...
201 EXP_FUNC
void * STDCALL
ax_malloc(size_t s
, const char* f
, const int l
)
208 if ((x
= malloc(s
)) == NULL
)
209 exit_now(out_of_mem_str
);
210 add_entry(x
,s
, f
, l
);
216 EXP_FUNC
void * STDCALL
ax_realloc(void *y
, size_t s
, const char* f
, const int l
)
223 if ((x
= realloc(y
, s
)) == NULL
)
224 exit_now(out_of_mem_str
);
225 remove_entry(y
, f
, l
);
226 add_entry(x
,s
, f
, l
);
231 EXP_FUNC
void * STDCALL
ax_calloc(size_t n
, size_t s
, const char* f
, const int l
)
237 if ((x
= calloc(n
, s
)) == NULL
) {
238 exit_now(out_of_mem_str
);
241 add_entry(x
,n
*s
, f
, l
);
246 EXP_FUNC
void STDCALL
ax_free(void *y
, const char* f
, const int l
)
251 remove_entry(y
, f
, l
);
256 EXP_FUNC int STDCALL ax_open(const char *pathname, int flags)
260 if ((x = open(pathname, flags)) < 0)
261 exit_now(file_open_str, pathname);
268 * This is a call which will deliberately exit an application, but will
269 * display some information before dying.
271 void exit_now(const char *format
, ...)
275 va_start(argp
, format
);
276 vfprintf(stderr
, format
, argp
);