1 /*
2 * Copyright (C) 2017 The Android Open Source Project
3 *
4 * Permission is hereby granted, free of charge, to any person
5 * obtaining a copy of this software and associated documentation
6 * files (the "Software"), to deal in the Software without
7 * restriction, including without limitation the rights to use, copy,
8 * modify, merge, publish, distribute, sublicense, and/or sell copies
9 * of the Software, and to permit persons to whom the Software is
10 * furnished to do so, subject to the following conditions:
11 *
12 * The above copyright notice and this permission notice shall be
13 * included in all copies or substantial portions of the Software.
14 *
15 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
16 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
17 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
18 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
19 * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
20 * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
21 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
22 * SOFTWARE.
23 */
24
25 #include <endian.h>
26 #include <stdarg.h>
27 #include <stdio.h>
28 #include <stdlib.h>
29 #include <string.h>
30
31 #include <map>
32
33 #include <base/debug/stack_trace.h>
34
35 #include <libavb/libavb.h>
36
avb_memcmp(const void * src1,const void * src2,size_t n)37 int avb_memcmp(const void* src1, const void* src2, size_t n) {
38 return memcmp(src1, src2, n);
39 }
40
avb_memcpy(void * dest,const void * src,size_t n)41 void* avb_memcpy(void* dest, const void* src, size_t n) {
42 return memcpy(dest, src, n);
43 }
44
avb_memset(void * dest,const int c,size_t n)45 void* avb_memset(void* dest, const int c, size_t n) {
46 return memset(dest, c, n);
47 }
48
avb_strcmp(const char * s1,const char * s2)49 int avb_strcmp(const char* s1, const char* s2) {
50 return strcmp(s1, s2);
51 }
52
avb_strncmp(const char * s1,const char * s2,size_t n)53 int avb_strncmp(const char* s1, const char* s2, size_t n) {
54 return strncmp(s1, s2, n);
55 }
56
avb_strlen(const char * str)57 size_t avb_strlen(const char* str) {
58 return strlen(str);
59 }
60
avb_abort(void)61 void avb_abort(void) {
62 abort();
63 }
64
avb_print(const char * message)65 void avb_print(const char* message) {
66 fprintf(stderr, "%s", message);
67 }
68
avb_printv(const char * message,...)69 void avb_printv(const char* message, ...) {
70 va_list ap;
71 const char* m;
72
73 va_start(ap, message);
74 for (m = message; m != NULL; m = va_arg(ap, const char*)) {
75 fprintf(stderr, "%s", m);
76 }
77 va_end(ap);
78 }
79
avb_printf(const char * fmt,...)80 void avb_printf(const char* fmt, ...) {
81 va_list ap;
82 va_start(ap, fmt);
83 vfprintf(stderr, fmt, ap);
84 va_end(ap);
85 }
86
87 typedef struct {
88 size_t size;
89 base::debug::StackTrace stack_trace;
90 } AvbAllocatedBlock;
91
92 static std::map<void*, AvbAllocatedBlock> allocated_blocks;
93
avb_malloc_(size_t size)94 void* avb_malloc_(size_t size) {
95 void* ptr = malloc(size);
96 avb_assert(ptr != nullptr);
97 AvbAllocatedBlock block;
98 block.size = size;
99 allocated_blocks[ptr] = block;
100 return ptr;
101 }
102
avb_free(void * ptr)103 void avb_free(void* ptr) {
104 auto block_it = allocated_blocks.find(ptr);
105 if (block_it == allocated_blocks.end()) {
106 avb_fatal("Tried to free pointer to non-allocated block.\n");
107 return;
108 }
109 allocated_blocks.erase(block_it);
110 free(ptr);
111 }
112
avb_div_by_10(uint64_t * dividend)113 uint32_t avb_div_by_10(uint64_t* dividend) {
114 uint32_t rem = (uint32_t)(*dividend % 10);
115 *dividend /= 10;
116 return rem;
117 }
118
119 namespace avb {
120
testing_memory_reset()121 void testing_memory_reset() {
122 allocated_blocks.clear();
123 }
124
testing_memory_all_freed()125 bool testing_memory_all_freed() {
126 if (allocated_blocks.size() == 0) {
127 return true;
128 }
129
130 size_t sum = 0;
131 for (const auto& block_it : allocated_blocks) {
132 sum += block_it.second.size;
133 }
134 fprintf(stderr,
135 "%zd bytes still allocated in %zd blocks:\n",
136 sum,
137 allocated_blocks.size());
138 size_t n = 0;
139 for (const auto& block_it : allocated_blocks) {
140 fprintf(stderr,
141 "--\nAllocation %zd/%zd of %zd bytes:\n",
142 1 + n++,
143 allocated_blocks.size(),
144 block_it.second.size);
145 block_it.second.stack_trace.Print();
146 }
147 return false;
148 }
149
150 // Also check leaks at process exit.
ensure_all_memory_freed_at_exit()151 __attribute__((destructor)) static void ensure_all_memory_freed_at_exit() {
152 if (!testing_memory_all_freed()) {
153 avb_fatal("libavb memory leaks at process exit.\n");
154 }
155 }
156
157 } // namespace avb
158