/*
 * MTL_INIT.C - Media Translation Layer, initialization
 */

#include	<ndis.h>
#include	<ndiswan.h>
#include	<mytypes.h>
#include	<mydefs.h>
#include	<disp.h>
#include	<util.h>
#include	<opcodes.h>
#include	<adapter.h>
#include	<idd.h>
#include    <mtl.h>
#include	<cm.h>

#pragma NDIS_INIT_FUNCTION(mtl_create)

/* create an mtl object */
mtl_create(VOID **mtl_1, NDIS_HANDLE AdapterHandle)
{
	MTL		**ret_mtl = (MTL**)mtl_1;
    MTL		*mtl;
    INT		n;
    NDIS_PHYSICAL_ADDRESS   pa = NDIS_PHYSICAL_ADDRESS_CONST(0xffffffff, 0xffffffff);

    D_LOG(D_ENTRY, ("mtl_create: entry, ret_mtl: 0x%lx\n", ret_mtl));

	//
	// allocate memory for mtl object
	//
    NdisAllocateMemory((PVOID*)&mtl, sizeof(*mtl), 0, pa);
    if ( !mtl )
    {
        D_LOG((DIGIMTL|DIGIINIT), ("mtl_create: memory allocate failed!\n"));
		NdisWriteErrorLogEntry (AdapterHandle,
		                        NDIS_ERROR_CODE_OUT_OF_RESOURCES,
								0);
        return(MTL_E_NOMEM);
    }
    D_LOG((DIGIMTL|DIGIINIT), ("mtl_create: mtl: 0x%lx\n", mtl));
    NdisZeroMemory(mtl, sizeof(MTL));

	//
	// allocate rx table
	//
    NdisAllocateMemory((PVOID*)&mtl->rx_tbl.Data, (MTL_RX_BUFS * MTL_MAC_MTU), 0, pa);
    if ( !mtl->rx_tbl.Data )
    {
        D_LOG((DIGIMTL|DIGIINIT), ("mtl_create: RxData memory allocate failed!\n"));

		NdisWriteErrorLogEntry (AdapterHandle,
		                        NDIS_ERROR_CODE_OUT_OF_RESOURCES,
								0);

		/* free memory */
		NdisFreeMemory(mtl, sizeof(*mtl), 0);

        return(MTL_E_NOMEM);
    }
    D_LOG((DIGIMTL|DIGIINIT), ("mtl_create: RxData: 0x%lx\n", mtl->rx_tbl.Data));
    NdisZeroMemory(mtl->rx_tbl.Data, (MTL_RX_BUFS * MTL_MAC_MTU));

    /* setup some simple fields */
    mtl->idd_mtu = MTL_IDD_MTU;

    /* allocate spinlock for mtl */
    NdisAllocateSpinLock(&mtl->lock);

    /* allocate spinlock for channel table */
    NdisAllocateSpinLock(&mtl->chan_tbl.lock);

	//
	// create assembly descriptor pointers into rx table
	//
	for (n = 0; n < MTL_RX_BUFS; n++)
		mtl->rx_tbl.as_tbl[n].buf = mtl->rx_tbl.Data + (n * MTL_MAC_MTU);

	NdisAllocateSpinLock(&mtl->rx_tbl.lock);

	//
	// spinlock for RxIndicationFifo
	//
    NdisAllocateSpinLock(&mtl->RxIndicationFifo.lock);

	//
	// initialize assembly completion fifo
	//
	NdisAcquireSpinLock(&mtl->RxIndicationFifo.lock);

	InitializeListHead(&mtl->RxIndicationFifo.head);

	NdisReleaseSpinLock(&mtl->RxIndicationFifo.lock);

	//
	// tx packet table lock
	//
    NdisAllocateSpinLock(&mtl->tx_tbl.lock);

	for (n = 0; n < MTL_TX_BUFS; n++)
	{
		MTL_TX_PKT	*MtlTxPacket = &mtl->tx_tbl.TxPacketTbl[n];

		NdisAllocateSpinLock(&MtlTxPacket->lock);
	}

	//
	// initialize MtlTxPacket Queue
	//
	NdisAcquireSpinLock(&mtl->tx_tbl.lock);

	InitializeListHead(&mtl->tx_tbl.head);

	NdisReleaseSpinLock(&mtl->tx_tbl.lock);

	//
	// Tx WanPacket storage
	//
	NdisAllocateSpinLock(&mtl->WanPacketFifo.lock);

	NdisAcquireSpinLock(&mtl->WanPacketFifo.lock);

    InitializeListHead(&mtl->WanPacketFifo.head);

	NdisReleaseSpinLock(&mtl->WanPacketFifo.lock);

	//
	// setup default wan link fields
	//
	mtl->MaxSendFrameSize = MTL_MAC_MTU;
	mtl->MaxRecvFrameSize = MTL_MAC_MTU;
	mtl->PreamblePadding = 14;
	mtl->PostamblePadding = 0;
	mtl->SendFramingBits = RAS_FRAMING |
	                       PPP_FRAMING |
						   MEDIA_NRZ_ENCODING;
	mtl->RecvFramingBits = RAS_FRAMING |
	                       PPP_FRAMING |
						   MEDIA_NRZ_ENCODING;
	mtl->SendCompressionBits = 0;
	mtl->RecvCompressionBits = 0;

	/* init sema */
    sema_init(&mtl->tx_sema);

    /* return success */
    *ret_mtl = mtl;
    D_LOG(D_EXIT, ("mtl_create: exit\n"));
    return(MTL_E_SUCC);
}

/* destroy an mtl object */
mtl_destroy(VOID* mtl_1)
{
	MTL	*mtl = (MTL*)mtl_1;
	INT		n;

    D_LOG(D_ENTRY, ("mtl_destroy: entry, mtl: 0x%lx\n", mtl));

    /* allocate spinlock for mtl */
    NdisFreeSpinLock(&mtl->lock);

    /* allocate spinlock for channel table */
    NdisFreeSpinLock(&mtl->chan_tbl.lock);

    /* allocate spin locks for receive table */
//    for ( n = 0 ; n < MTL_RX_BUFS ; n++ )
//        NdisFreeSpinLock(&mtl->rx_tbl.as_tbl[n].lock);

	NdisFreeSpinLock(&mtl->rx_tbl.lock);

    /* allocate spin lock for trasmit table & fifo */
    NdisFreeSpinLock(&mtl->tx_tbl.lock);

	for (n = 0; n < MTL_TX_BUFS; n++)
	{
		MTL_TX_PKT	*MtlTxPacket = &mtl->tx_tbl.TxPacketTbl[n];

		NdisFreeSpinLock(&MtlTxPacket->lock);
	}

    NdisFreeSpinLock(&mtl->WanPacketFifo.lock);
	NdisFreeSpinLock(&mtl->RxIndicationFifo.lock);

	/* term sema */
    sema_term(&mtl->tx_sema);

    NdisFreeMemory(mtl->rx_tbl.Data, (MTL_RX_BUFS * MTL_MAC_MTU), 0);

    /* free memory */
    NdisFreeMemory(mtl, sizeof(*mtl), 0);

    D_LOG(D_EXIT, ("mtl_destroy: exit\n"));
    return(MTL_E_SUCC);
}