/*
** test_mem
**
** test functions of ugly/memory.c
*/

#include <stdio.h>

#include "types.h"
#include "memory.h"
#include "string.h"

#define modfit(x,by) ((by)*(((x)+(by-1))/(by)))

void testfit( size_t size, size_t by )
{
    printf( "fit: %4lu,%3lu) ->%4lu\n", size, by, modfit(size,by));
}

int main( void )
{
    STRPTR hugo1, hugo2, hugo3, hugo4;

    atexit( atexit_uglymemory );


    /* dummy usage of all vars to suppress warnings */
    hugo1 = "hugo1";
    hugo2 = "hugo2";
    hugo3 = "hugo3";
    hugo4 = "hugo4";

#if 0
    testfit(  25,8 );
    testfit( 100,8 );
    testfit( 399,8 );
    testfit( 400,8 );
    testfit( 401,8 );
#endif

#if 1
    hugo1 = (STRPTR) umalloc( 100 );
    hugo1[0] = 0;
    hugo1[99] = 0x99;
    hugo1[100] = 0x10;
#endif

#if 1
    hugo2 = umalloc( 200 );
    ufree( hugo2 );
#endif

#if 1
    hugo3 = strclone( "hugo3" );
#endif

#if 1
    hugo4 = (APTR) 0x123;
    umem_report( "hugo after alloc" );
    ufree( hugo1 );
    ufreestr( hugo3 );
    ufree( hugo2 );
    ufree( hugo4 );
    hugo4 = umalloc(401);
#endif

    umem_report( "hugo after free" );

    return( 0 );
}