mirror of
https://github.com/RobTillaart/Arduino.git
synced 2024-10-03 18:09:02 -04:00
0.1.04 - new interface incl PrintTo - Thanks to Whandall
This commit is contained in:
rob tillaart
parent
dae8e63956
commit
469281d9d3
@ -1,14 +1,17 @@
|
||||
//
|
||||
// FILE: avrheap.cpp
|
||||
// AUTHOR: Rob Tillaart
|
||||
// VERSION: 0.1.03
|
||||
// VERSION: 0.1.04
|
||||
// PURPOSE: library for avrheap Arduino
|
||||
// URL: http://forum.arduino.cc/index.php?topic=355660
|
||||
|
||||
//
|
||||
// REFERENCES
|
||||
// http://forum.arduino.cc/index.php?topic=27536.15
|
||||
//
|
||||
// Released to the public domain
|
||||
// 0.1.04 - new methods incl PrintTo support - Thanks to Whandall
|
||||
// !! breaking interface
|
||||
// 0.1.03 - refactoring
|
||||
// 0.1.02 - added followHeap()
|
||||
// 0.1.01 - refactor, added startAddress()
|
||||
@ -32,7 +35,88 @@ extern uint16_t __data_start;
|
||||
extern uint16_t __data_end;
|
||||
extern uint16_t __bss_start;
|
||||
extern uint16_t __bss_end;
|
||||
extern uint16_t __heap_start;
|
||||
|
||||
|
||||
size_t hNibble(Print& p, byte val)
|
||||
{
|
||||
return p.write(val + (val<10 ? '0' : 'A'-10));
|
||||
}
|
||||
|
||||
size_t hByte(Print& p, byte val)
|
||||
{
|
||||
size_t len = hNibble(p, val >> 4);
|
||||
return len + hNibble(p, val & 0x0F);
|
||||
}
|
||||
|
||||
size_t hWord(Print& p, uint16_t val)
|
||||
{
|
||||
size_t len = hByte(p, (byte)(val >> 8));
|
||||
return len + hByte(p, (byte)(val & 0xFF) );
|
||||
}
|
||||
|
||||
size_t dumpR(Print& p, byte* adr, int len)
|
||||
{
|
||||
size_t glen = 0;
|
||||
byte idx;
|
||||
if (!len)
|
||||
{
|
||||
len = 16;
|
||||
}
|
||||
for (; len > 0; len -= 16, adr += 16)
|
||||
{
|
||||
glen += hWord(p, (uint16_t)adr);
|
||||
glen += p.print(F(": "));
|
||||
for (idx = 0; idx < 16; idx++)
|
||||
{
|
||||
if (idx < len )
|
||||
{
|
||||
glen += hByte(p, adr[idx]);
|
||||
glen += p.write(' ');
|
||||
} else {
|
||||
glen += p.print(F(" "));
|
||||
}
|
||||
}
|
||||
glen += p.write('\'');
|
||||
for (idx = 0; (idx < 16) && (idx < len); idx++)
|
||||
{
|
||||
glen += p.write(adr[idx] < 0x20 ? '.' : adr[idx]);
|
||||
}
|
||||
glen += p.write('\'');
|
||||
glen += p.println();
|
||||
}
|
||||
return glen;
|
||||
}
|
||||
|
||||
size_t dumpAlloced(byte *ptr, bool withDump)
|
||||
{
|
||||
return dumpAlloced(Serial, ptr, withDump);
|
||||
}
|
||||
|
||||
size_t dumpAlloced(Print& p, byte *ptr, bool withDump)
|
||||
{
|
||||
size_t len = hWord(p, (uint16_t)ptr);
|
||||
if (!ptr)
|
||||
{
|
||||
len += p.println(F(": NULL"));
|
||||
} else {
|
||||
size_t size = *(size_t*)(ptr-sizeof(size_t));
|
||||
if (size < __malloc_margin)
|
||||
{
|
||||
len += p.print(F(": size "));
|
||||
len += p.println(size);
|
||||
} else {
|
||||
len += p.print(F(": invalid size "));
|
||||
len += p.println(size);
|
||||
size = 16;
|
||||
}
|
||||
if (withDump)
|
||||
{
|
||||
len += dumpR(p, ptr, size);
|
||||
len += p.println();
|
||||
}
|
||||
}
|
||||
return len;
|
||||
}
|
||||
|
||||
|
||||
Avrheap::Avrheap()
|
||||
@ -41,7 +125,7 @@ Avrheap::Avrheap()
|
||||
|
||||
bool Avrheap::isFragmented()
|
||||
{
|
||||
return this->freeListCount() > 0;
|
||||
return freeListCount() > 0;
|
||||
};
|
||||
|
||||
uint16_t Avrheap::freeListCount()
|
||||
@ -62,15 +146,35 @@ uint16_t Avrheap::freeListSize()
|
||||
return total;
|
||||
}
|
||||
|
||||
void Avrheap::freeListDump()
|
||||
void Avrheap::freeListWalk(bool withDump)
|
||||
{
|
||||
for (struct __freelist* p = __flp; p; p = p->next)
|
||||
{
|
||||
Serial.print((uint16_t)p);
|
||||
Serial.print("\t");
|
||||
Serial.println((uint16_t)p->size);
|
||||
}
|
||||
int elements = freeListCount();
|
||||
Serial.print(F("\nFreeList: "));
|
||||
Serial.print(isFragmented() ? F("fragmented") : F("clean"));
|
||||
Serial.print(F(", count "));
|
||||
Serial.print(elements);
|
||||
Serial.print(F(", largest "));
|
||||
Serial.print(freeListLargest());
|
||||
Serial.print(F(", total size "));
|
||||
Serial.println(freeListSize());
|
||||
Serial.println();
|
||||
if (elements)
|
||||
{
|
||||
for (struct __freelist* p = __flp; p; p = p->next)
|
||||
{
|
||||
hWord(Serial, (uint16_t)p);
|
||||
Serial.print(F(": size "));
|
||||
Serial.print((uint16_t)p->size);
|
||||
Serial.print(F(" next "));
|
||||
hWord(Serial, (uint16_t)p->next);
|
||||
Serial.println();
|
||||
if (withDump)
|
||||
{
|
||||
dumpR(Serial, ((byte*)p)+2, p->size);
|
||||
Serial.println();
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
uint16_t Avrheap::startAddress()
|
||||
@ -78,50 +182,68 @@ uint16_t Avrheap::startAddress()
|
||||
return (uint16_t) &__heap_start;
|
||||
}
|
||||
|
||||
// WHAT USES
|
||||
void Avrheap::dump()
|
||||
void Avrheap::dumpHeap(uint16_t count)
|
||||
{
|
||||
Serial.println((int)__brkval);
|
||||
Serial.println((int)RAMEND);
|
||||
Serial.println((int)SP);
|
||||
Serial.println((int)__data_start);
|
||||
Serial.println((int)__data_end);
|
||||
Serial.println((int)__bss_start);
|
||||
Serial.println((int)__bss_end);
|
||||
Serial.println((int)__malloc_heap_start);
|
||||
Serial.println((int)__malloc_heap_end);
|
||||
Serial.println((int)__malloc_margin);
|
||||
hWord(Serial, (uint16_t)RAMEND);
|
||||
Serial.println(F(" RAMEND"));
|
||||
hWord(Serial, (uint16_t)SP);
|
||||
Serial.println(F(" SP"));
|
||||
hWord(Serial, (uint16_t)__brkval);
|
||||
Serial.println(F(" __brkval"));
|
||||
hWord(Serial, (uint16_t)__malloc_heap_end);
|
||||
Serial.println(F(" __malloc_heap_end"));
|
||||
hWord(Serial, (uint16_t)__malloc_heap_start);
|
||||
Serial.println(F(" __malloc_heap_start"));
|
||||
hWord(Serial, (uint16_t)&__heap_start);
|
||||
Serial.println(F(" __heap_start"));
|
||||
hWord(Serial, (uint16_t)&__bss_end);
|
||||
Serial.println(F(" __bss_end"));
|
||||
hWord(Serial, (uint16_t)&__bss_start);
|
||||
Serial.println(F(" __bss_start"));
|
||||
hWord(Serial, (uint16_t)&__data_end);
|
||||
Serial.println(F(" __data_end"));
|
||||
hWord(Serial, (uint16_t)&__data_start);
|
||||
Serial.println(F(" __data_start"));
|
||||
hWord(Serial, (uint16_t)__malloc_margin);
|
||||
Serial.println(F(" __malloc_margin"));
|
||||
Serial.println();
|
||||
Serial.println(F("start of heap"));
|
||||
Serial.println();
|
||||
dumpR(Serial, (byte*)startAddress(), count);
|
||||
}
|
||||
|
||||
void Avrheap::followHeap()
|
||||
{
|
||||
size_t n = 0;
|
||||
byte* heapNodePtr = (byte*) &__heap_start;
|
||||
n += Serial.println("addr\tsize\tcontent");
|
||||
while ((int)heapNodePtr < (int)__brkval) // brkval is first free place.
|
||||
{
|
||||
// address of heap-node (- 2)
|
||||
n += Serial.print((uint16_t)heapNodePtr); // p+2 ?
|
||||
n += Serial.print("\t");
|
||||
// size of heap node
|
||||
n += Serial.print(*heapNodePtr, DEC);
|
||||
if (inFreeList((uint16_t)heapNodePtr)) n += Serial.print(":f\t");
|
||||
else n += Serial.print(":\t");
|
||||
// dump content of heap-node
|
||||
for (int i = 0; i < *heapNodePtr; i++)
|
||||
{
|
||||
uint8_t v = (uint8_t) *( heapNodePtr + 2 + i);
|
||||
if (v < 16) n += Serial.print('0');
|
||||
n += Serial.print(v, HEX);
|
||||
n += Serial.print(" ");
|
||||
}
|
||||
n += Serial.println();
|
||||
// goto next heap-node
|
||||
heapNodePtr += (byte) *heapNodePtr + 2;
|
||||
}
|
||||
// return n;
|
||||
size_t Avrheap::heapWalk(bool withDump) {
|
||||
return heapWalk(Serial, withDump);
|
||||
}
|
||||
|
||||
// EXPERIMENTAL
|
||||
size_t Avrheap::heapWalk(Print& pr, bool withDump) const
|
||||
{
|
||||
byte* p = (byte*) &__heap_start;
|
||||
struct __freelist* fp = __flp;
|
||||
|
||||
size_t len = pr.println(F("Heap\n"));
|
||||
while ((int)p < (int)__brkval)
|
||||
{
|
||||
len += hWord(pr, (uint16_t)p); // p+2 ?
|
||||
len += pr.write(' ');
|
||||
len += pr.print(*p, DEC);
|
||||
if ( (fp != NULL) && ((uint16_t)p == (uint16_t)fp))
|
||||
{
|
||||
len += pr.print(F(" (free)"));
|
||||
fp = fp->next;
|
||||
}
|
||||
len += pr.println();
|
||||
if (withDump) {
|
||||
len += dumpR(pr, p, *p+2);
|
||||
len += pr.println();
|
||||
}
|
||||
p += (byte) *p + 2;
|
||||
}
|
||||
return len;
|
||||
}
|
||||
|
||||
|
||||
bool Avrheap::inFreeList(uint16_t addr)
|
||||
{
|
||||
for (struct __freelist* p = __flp; p; p = p->next)
|
||||
@ -141,4 +263,13 @@ uint16_t Avrheap::freeListLargest()
|
||||
return largest;
|
||||
}
|
||||
|
||||
size_t Avrheap::printTo(Print& p) const
|
||||
{
|
||||
size_t len = heapWalk(p, true);
|
||||
return len;
|
||||
}
|
||||
|
||||
|
||||
|
||||
|
||||
// --- END OF FILE ---
|
||||
@ -3,7 +3,7 @@
|
||||
//
|
||||
// FILE: Avrheap.h
|
||||
// AUTHOR: Rob dot Tillaart at gmail dot com
|
||||
// VERSION: 0.1.03
|
||||
// VERSION: 0.1.04
|
||||
// PURPOSE: heap library for Arduino (AVR)
|
||||
// HISTORY: See avrheap.cpp
|
||||
//
|
||||
@ -18,27 +18,35 @@
|
||||
|
||||
#include "Printable.h"
|
||||
|
||||
#define AVRHEAP_LIB_VERSION "0.1.03"
|
||||
#define AVRHEAP_LIB_VERSION "0.1.04"
|
||||
|
||||
class Avrheap
|
||||
class Avrheap : public Printable
|
||||
{
|
||||
public:
|
||||
Avrheap();
|
||||
|
||||
void dump();
|
||||
void followHeap();
|
||||
|
||||
bool isFragmented();
|
||||
uint16_t freeListCount();
|
||||
uint16_t freeListSize();
|
||||
void freeListDump();
|
||||
void freeListWalk(bool withDump = true);
|
||||
uint16_t freeListLargest();
|
||||
|
||||
uint16_t startAddress();
|
||||
|
||||
void dumpHeap(uint16_t count);
|
||||
size_t heapWalk(Print& p, bool withDump = true) const;
|
||||
size_t heapWalk(bool withDump = true);
|
||||
virtual size_t printTo(Print& p) const;
|
||||
|
||||
private:
|
||||
bool inFreeList(uint16_t addr);
|
||||
|
||||
};
|
||||
|
||||
size_t hNibble(Print& p, byte val);
|
||||
size_t hByte(Print& p, byte val);
|
||||
size_t hWord(Print& p, uint16_t val);
|
||||
size_t dumpR(Print& p, byte* adr, int len);
|
||||
size_t dumpAlloced(Print& p, byte *ptr, bool withDump = true);
|
||||
size_t dumpAlloced(byte *ptr, bool withDump = true);
|
||||
|
||||
#endif
|
||||
68
libraries/AvrHeap/examples/heapdemo2/heapdemo2.ino
Normal file
68
libraries/AvrHeap/examples/heapdemo2/heapdemo2.ino
Normal file
@ -0,0 +1,68 @@
|
||||
//
|
||||
// FILE: heapdemo2.ino
|
||||
// AUTHOR: Rob Tillaart (
|
||||
// VERSION: 0.1.00
|
||||
// PURPOSE: demo AvrHeap class
|
||||
// DATE: 2015-10-25
|
||||
// URL: http://forum.arduino.cc/index.php?topic=355660
|
||||
//
|
||||
// Released to the public domain
|
||||
//
|
||||
|
||||
#include "avrheap.h"
|
||||
|
||||
Avrheap myheap;
|
||||
|
||||
int *par[10];
|
||||
|
||||
void setup()
|
||||
{
|
||||
int seed = analogRead(A0) + analogRead(A3) + analogRead(A2);
|
||||
seed ^= (int)micros();
|
||||
randomSeed(seed);
|
||||
Serial.begin(115200);
|
||||
Serial.print(F("Start "));
|
||||
Serial.print(F(__FILE__));
|
||||
Serial.print(F("\nLibVersion "));
|
||||
Serial.println(F(AVRHEAP_LIB_VERSION));
|
||||
|
||||
Serial.println();
|
||||
Serial.print(F("HEAP ADDR: "));
|
||||
hWord(Serial, myheap.startAddress());
|
||||
Serial.println();
|
||||
|
||||
Serial.println(F("\nallocate 10 chunks\n"));
|
||||
for (int i = 0; i < 10; i++)
|
||||
{
|
||||
int mSize = random(1, 40) * sizeof(int);
|
||||
par[i] = (int*) malloc(mSize); // all different sizes
|
||||
*par[i] = 0;
|
||||
dumpAlloced((byte*)par[i], false);
|
||||
}
|
||||
Serial.println();
|
||||
|
||||
myheap.dumpHeap(80);
|
||||
Serial.println();
|
||||
Serial.println(myheap);
|
||||
myheap.freeListWalk();
|
||||
|
||||
Serial.println(F("free 3 pointers"));
|
||||
free(par[3]);
|
||||
free(par[5]);
|
||||
free(par[7]);
|
||||
|
||||
myheap.freeListWalk();
|
||||
|
||||
Serial.println(F("1 malloc"));
|
||||
par[3] = (int*) malloc(10);
|
||||
|
||||
myheap.freeListWalk();
|
||||
myheap.dumpHeap(80);
|
||||
Serial.println();
|
||||
Serial.println(myheap);
|
||||
|
||||
Serial.println(F("done"));
|
||||
}
|
||||
|
||||
void loop()
|
||||
{}
|
||||
8
libraries/AvrHeap/examples/readme.txt
Normal file
8
libraries/AvrHeap/examples/readme.txt
Normal file
@ -0,0 +1,8 @@
|
||||
|
||||
2015-dec-12:
|
||||
With version 0.1.04 AvrHeap() got a new interface.
|
||||
The heapdemo1 is a 0.1.00 - 0.1.03 example for historical reasons.
|
||||
The heapdemo2 is the demo to use for version 0.1.04 (and up).
|
||||
|
||||
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user