#include "dhcpd.h"
#include "dhcpd.m"
#include <tlmpdia.h>

static HELP_FILE help_leases ("dhcpd","leases");


<mod>
PUBLIC void LEASES::showalloc()
{
	<glocal>
		LEASES *leases;
	</glocal>
	glocal.leases = this;
	markdup ();
	<call editrecords>(MSG_U(T_SHOWALLOC,"Lease allocations"),""
		,help_leases);
	<f head>
		newf_head (MSG_U(H_SHOWALLOC,"Host\tIp\tMac address\tStarts\tStops"));
		sortable();
		sortpolicy ("aaaaa");
	</f>
	<f load>
		for (int i=0; i<glocal.leases->getnb(); i++){
			LEASE *l = glocal.leases->getitem(i);
			if (!l->isdup){
				new_menuitemf (l->host.get(),"%s\t%s\t%s\t%s",l->ip,l->mac.get()
				,l->starts.get(),l->ends.get());
			}
		}
	</f>
	<f editone>
	</f>
	</call>
}
</mod>