GSlice x GNU Libc malloc benchmark

[Fabrício Barros Cabral <fxcabral yahoo com br>]

Hello all!

Motivated by the incredibles results of GSlice X GNU Libc malloc memory
allocators, I decided do a small benchmark between these memory
allocators. My idea is very simple: I'll running both allocators,
increasing the number of bytes of memory allocated, several times, and
sum the all total time. I'm redireting the results to a plain text file,
and using the gnuplot to plot a chart, for a visual comparing. My
problem is when I'm allocing the segments, they aren't being freeing.
Could you check where is my fault? In attach, I'm sending the benchmark
code and the script which I use to plot the chart in gnuplot. So, you
should:

1) Compile the program (trivial for you);

2) Running, using: fx-gslice-benchmark > mem.list

3) So, in gnuplot prompt> load "slice.gnu"

What result in a slice.png, a nice chart of the performance of GSLice
and Libc Malloc.

Thanks for you attention, and sorry for my poor english! :)

--fx

P.S. Is it the correct list for this or should I use the
performance-list for this stuff?

#include <stdio.h>
#include <stdlib.h>
#include <time.h>
#include <sys/time.h>
#include <sys/resource.h>
#include <glib.h>

#define N_ELEMENTS	100000
#define N_SAMPLES	10
#define MAX_SIZE	1500

static gpointer mem [N_ELEMENTS];

static gdouble
difftimeval (struct timeval *old, struct timeval *new)
{
	return (new->tv_sec - old->tv_sec) * 1000. + (new->tv_usec - old->tv_usec) / 1000;
}


static void
test_gslice (gint 	n_elements,
	     gint	block_size,
	     gdouble	*elapsed_alloc,
	     gdouble	*elapsed_free)
{
	struct rusage old_usage;
	struct rusage new_usage;
	gint i;
	
	getrusage (RUSAGE_SELF, &old_usage);
	
	for (i = 0; i < n_elements; i++)
		mem [i] = g_slice_alloc (block_size);

	getrusage (RUSAGE_SELF, &new_usage);
	
	*elapsed_alloc = difftimeval (&old_usage.ru_utime, &new_usage.ru_utime) +
			 difftimeval (&old_usage.ru_stime, &new_usage.ru_stime);

	getrusage (RUSAGE_SELF, &old_usage);
	
	for (i = 0; i < n_elements; i++)
		g_slice_free1 (block_size, mem [i]);
	
	getrusage (RUSAGE_SELF, &new_usage);
	
	*elapsed_free = difftimeval (&old_usage.ru_utime, &new_usage.ru_utime) +
			difftimeval (&old_usage.ru_stime, &new_usage.ru_stime);
}


static void
test_malloc (gint	n_elements,
	     gint	block_size,
	     gdouble	*elapsed_alloc,
	     gdouble	*elapsed_free)
{
	struct rusage old_usage;
	struct rusage new_usage;
	gint i;
	
	getrusage (RUSAGE_SELF, &old_usage);
	
	for (i = 0; i < n_elements; i++)
		mem [i] = malloc (block_size);

	getrusage (RUSAGE_SELF, &new_usage);
	
	*elapsed_alloc = difftimeval (&old_usage.ru_utime, &new_usage.ru_utime) +
			 difftimeval (&old_usage.ru_stime, &new_usage.ru_stime);
	
	getrusage (RUSAGE_SELF, &old_usage);
	
	for (i = 0; i < n_elements; i++)
		free (mem [i]);
	
	getrusage (RUSAGE_SELF, &new_usage);
	
	*elapsed_free = difftimeval (&old_usage.ru_utime, &new_usage.ru_utime) +
			difftimeval (&old_usage.ru_stime, &new_usage.ru_stime);
}


gint
main (gint argc, gchar **argv)
{
	gint i, j;
	gdouble gslice_alloc, gslice_free, malloc_alloc, malloc_free,
		total_gslice_alloc, total_gslice_free, total_malloc_alloc,
		total_malloc_free;
	
	g_print ("Block Size\tGSlice Alloc\tGSlice Free\tMalloc Alloc\tMalloc Free\n");
	
	for (i = 1; i <= MAX_SIZE; i++) {
		total_gslice_alloc = 0;
		total_gslice_free = 0;
		total_malloc_alloc = 0;
		total_malloc_free = 0;
		
		for (j = 0; j < N_SAMPLES; j++) {
			test_gslice (N_ELEMENTS, i, &gslice_alloc, &gslice_free);
			test_malloc (N_ELEMENTS, i, &malloc_alloc, &malloc_free);
			
			total_gslice_alloc += gslice_alloc;
			total_malloc_alloc += malloc_alloc;
			total_gslice_free += gslice_free;
			total_malloc_free += malloc_free;
		}
		
		g_print ("%d\t\t%g\t\t%g\t\t%g\t\t%g\n",
			 i,
			 (total_gslice_alloc / N_SAMPLES),
			 (total_gslice_free / N_SAMPLES),
			 (total_malloc_alloc / N_SAMPLES),
			 (total_malloc_free / N_SAMPLES));
	}
	
	return 0;
}

#!/usr/bin/gnuplot -persist
#
#    
#    	G N U P L O T
#    	Version 4.0 patchlevel 0
#    	last modified Thu Apr 15 14:44:22 CEST 2004
#    	System: Linux 2.6.15-1-k7
#    
#    	Copyright (C) 1986 - 1993, 1998, 2004
#    	Thomas Williams, Colin Kelley and many others
#    
#    	This is gnuplot version 4.0.  Please refer to the documentation
#    	for command syntax changes.  The old syntax will be accepted
#    	throughout the 4.0 series, but all save files use the new syntax.
#    
#    	Type `help` to access the on-line reference manual.
#    	The gnuplot FAQ is available from
#    		http://www.gnuplot.info/faq/
#    
#    	Send comments and requests for help to
#    		<gnuplot-info lists sourceforge net>
#    	Send bugs, suggestions and mods to
#    		<gnuplot-bugs lists sourceforge net>
#    
set term png enhanced 
set output "slice.png"
unset clip points
set clip one
unset clip two
set bar 1.000000
set border 31 lt -1 lw 1.000
set xdata 
set ydata
set zdata
set x2data
set y2data
set boxwidth
set style fill empty border
set dummy x,y
set angles radians
set grid nopolar
set grid xtics nomxtics ytics nomytics noztics nomztics \
 nox2tics nomx2tics noy2tics nomy2tics nocbtics nomcbtics
set grid layerdefault
set key title ""
set key right top Right noreverse enhanced box linetype -2 linewidth 1.000 samplen 4 spacing 1 width 0 height 0 autotitles
unset label
unset arrow
unset style line
unset style arrow
unset logscale
set offsets 0, 0, 0, 0
set pointsize 1
#set encoding default
set encoding iso_8859_1
unset polar
unset parametric
unset decimalsign
set view 60, 30, 1, 1
set samples 100, 100
set isosamples 10, 10
set surface
unset contour
set clabel '%8.3g'
set mapping cartesian
set datafile separator whitespace
unset hidden3d
set cntrparam order 4
set cntrparam linear
set cntrparam levels auto 5
set cntrparam points 5
set size ratio 0 1,1
set origin 0,0
set style data points
set style function lines
set xzeroaxis lt -2 lw 1.000
set yzeroaxis lt -2 lw 1.000
set x2zeroaxis lt -2 lw 1.000
set y2zeroaxis lt -2 lw 1.000
set tics in
set ticslevel 0.5
set ticscale 1 0.5
set mxtics 6.000000
set mytics default
set mztics default
set mx2tics default
set my2tics default
set mcbtics default
set xtics border mirror norotate autofreq 
set ytics border mirror norotate autofreq 
set ztics border nomirror norotate autofreq 
set nox2tics
set noy2tics
set cbtics border mirror norotate autofreq 
set title "GSlice x Malloc Benchmark" 0.000000,0.000000  font ""
set timestamp "" bottom norotate 0.000000,0.000000  ""
set rrange [ * : * ] noreverse nowriteback  # (currently [0.00000:10.0000] )
set trange [ * : * ] noreverse nowriteback  # (currently ["31/12/1999":"01/01/2000"] )
set urange [ * : * ] noreverse nowriteback  # (currently ["31/12/1999":"01/01/2000"] )
set vrange [ * : * ] noreverse nowriteback  # (currently [-5.00000:5.00000] )
set xlabel "Block Size (in bytes)" 0.000000,0.000000  font ""
set x2label "" 0.000000,0.000000  font ""
set xrange [ * : * ] noreverse nowriteback  # (currently [-10.0000:10.0000] )
set x2range [ * : * ] noreverse nowriteback  # (currently [-10.0000:10.0000] )
set ylabel "CPU Time (in seconds)" 0.000000,0.000000  font ""
set y2label "" 0.000000,0.000000  font ""
set yrange [ * : * ] noreverse nowriteback  # (currently [-10.0000:10.0000] )
set y2range [ * : * ] noreverse nowriteback  # (currently [-10.0000:10.0000] )
set zlabel "" 0.000000,0.000000  font ""
set zrange [ * : * ] noreverse nowriteback  # (currently [-10.0000:10.0000] )
set cblabel "" 0.000000,0.000000  font ""
set cbrange [ * : * ] noreverse nowriteback  # (currently [-10.0000:10.0000] )
set zero 1e-08
set lmargin -1
set bmargin -1
set rmargin -1
set tmargin -1
set locale "C"
set pm3d scansautomatic flush begin noftriangles nohidden3d implicit corners2color mean
unset pm3d
set palette positive nops_allcF maxcolors 0 gamma 1.5 color model RGB 
set palette rgbformulae 7, 5, 15
set colorbox default
set colorbox vertical origin 0.9,0.2 size 0.1,0.63 bdefault
set loadpath 
set fontpath "/usr/share/fonts/truetype/msttcorefonts"
set fit noerrorvariables
plot "mem.list" using 1:2 with lines title "GSlice Alloc", "mem.list" using 1:3 with lines title "GSice Free", "mem.list" using 1:4 with lines title "Malloc Alloc", "mem.list" using 1:5 with lines title "Malloc Free"
#    EOF