Subversion Repositories HelenOS

/*
 * Copyright (c) 2009 Lukas Mejdrech
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 *
 * - Redistributions of source code must retain the above copyright
 *   notice, this list of conditions and the following disclaimer.
 * - Redistributions in binary form must reproduce the above copyright
 *   notice, this list of conditions and the following disclaimer in the
 *   documentation and/or other materials provided with the distribution.
 * - The name of the author may not be used to endorse or promote products
 *   derived from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */

/** @addtogroup dp8390
 *  @{
 */

/** @file
 */

#include <assert.h>
#include <ddi.h>
#include <errno.h>
#include <malloc.h>
//#include <stdio.h>
#include <ipc/ipc.h>
#include <ipc/services.h>

#include "../../err.h"
#include "../../messages.h"
#include "../../modules.h"

#include "../../structures/packet/packet_client.h"
#include "../../structures/measured_strings.h"

#include "../device.h"
#include "../netif.h"
#include "../netif_interface.h"

#include "dp8390.h"
#include "dp8390_drv.h"
#include "dp8390_module.h"
#include "dp8390_port.h"

#define NAME    "dp8390 network interface"

#define IPC_GET_DEVICE( call )          ( device_id_t ) IPC_GET_METHOD( * call )
#define IPC_GET_ISR( call )             ( int ) IPC_GET_ARG2( * call )

static irq_cmd_t    dp8390_cmds[] = {
    {   .cmd = CMD_PIO_READ_8,
        .addr = NULL,
        .dstarg = 2
    },
    {
        .cmd = CMD_PREDICATE,
        .value = 2,
        .srcarg = 2
    },
    {   .cmd = CMD_PIO_WRITE_8,
        .addr = NULL,
        .srcarg = 2
    },
    {
        .cmd = CMD_ACCEPT
    }
};

static irq_code_t   dp8390_code = {
    sizeof( dp8390_cmds ) / sizeof( irq_cmd_t ),
    dp8390_cmds
};

netif_globals_t netif_globals;

void    netif_print_name( void );

void    irq_handler( ipc_callid_t iid, ipc_call_t * call );
void    change_state( device_ref device, device_state_t state );

int specific_message( ipc_callid_t callid, ipc_call_t * call, ipc_call_t * answer, int * answer_count ){
    return ENOTSUP;
}

int get_device_stats( device_id_t device_id, device_stats_ref stats ){
    ERROR_DECLARE;

    device_ref      device;
    eth_stat_t *    de_stat;

    if( ! stats ) return EBADMEM;
    ERROR_PROPAGATE( find_device( device_id, & device ));
    de_stat = & (( dpeth_t * ) device->specific )->de_stat;
    null_device_stats( stats );
    stats->rx_errors = de_stat->ets_recvErr;
    stats->tx_errors = de_stat->ets_sendErr;
    stats->rx_crc_errors = de_stat->ets_CRCerr;
    stats->rx_frame_errors = de_stat->ets_frameAll;
    stats->rx_missed_errors = de_stat->ets_missedP;
    stats->rx_packets = de_stat->ets_packetR;
    stats->tx_packets = de_stat->ets_packetT;
    stats->collisions = de_stat->ets_collision;
    stats->tx_aborted_errors = de_stat->ets_transAb;
    stats->tx_carrier_errors = de_stat->ets_carrSense;
    stats->tx_heartbeat_errors = de_stat->ets_CDheartbeat;
    stats->tx_window_errors = de_stat->ets_OWC;
    return EOK;
}

void netif_print_name( void ){
    printf( "%s", NAME );
}

int get_addr_message( device_id_t device_id, measured_string_ref address ){
    ERROR_DECLARE;

    device_ref  device;

    if( ! address ) return EBADMEM;
    ERROR_PROPAGATE( find_device( device_id, & device ));
    address->value = ( char * ) ( & (( dpeth_t * ) device->specific )->de_address );
    address->length = CONVERT_SIZE( ether_addr_t, char, 1 );
    return EOK;
}

void irq_handler( ipc_callid_t iid, ipc_call_t * call )
{
//  int irq;
    device_ref  device;
    dpeth_t *   dep;

    printf( "\ndevice %d - irq %x", IPC_GET_DEVICE( call ), IPC_GET_ISR( call ));
    if( find_device( IPC_GET_DEVICE( call ), & device ) != EOK ) return;
    dep = ( dpeth_t * ) device->specific;
    printf( "\ndev %d, irq %x\n", device->device_id, IPC_GET_ISR( call ));
    if ( dep->de_mode != DEM_ENABLED)
//      continue;
        return;
    assert( dep->de_flags & DEF_ENABLED);
//  irq= dep.de_irq;
//  assert(irq >= 0 && irq < NR_IRQ_VECTORS);
//      if ( dep->de_int_pending || 1)
//      {
        dep->de_int_pending= 0;
        dp_check_ints( dep );
//      do_int(dep);
/*      r= sys_irqenable(&dep->de_hook);
        if (r != OK)
        {
            panic("DP8390", 
            "unable enable interrupts", r);
        }
*///    }
}

int probe_auto_message( void ){
    return ENOTSUP;
}

int probe_message( device_id_t device_id, int irq, int io ){
    ERROR_DECLARE;

    device_ref  device;
    dpeth_t *   dep;

    printf( "\n" );
    device = ( device_ref ) malloc( sizeof( device_t ));
    if( ! device ) return ENOMEM;
    dep = ( dpeth_t * ) malloc( sizeof( dpeth_t ));
    if( ! dep ){
        free( device );
        return ENOMEM;
    }
    bzero( device, sizeof( device_t ));
    bzero( dep, sizeof( dpeth_t ));
    device->device_id = device_id;
    device->nil_phone = -1;
    device->specific = ( void * ) dep;
    device->state = NETIF_STOPPED;
    dep->parent = device;
    dep->de_irq = irq;
    dep->de_mode = DEM_DISABLED;
    //TODO address?
    if( ERROR_OCCURRED( pio_enable(( void * ) io, DP8390_IO_SIZE, ( void ** ) & dep->de_base_port ))
    || ERROR_OCCURRED( do_probe( dep ))){
        free( dep );
        free( device );
        return ERROR_CODE;
    }
    if( ERROR_OCCURRED( device_map_add( & netif_globals.device_map, device->device_id, device ))){
        free( dep );
        free( device );
        return ERROR_CODE;
    }
    return EOK;
}

int send_message( device_id_t device_id, packet_t packet ){
    ERROR_DECLARE;

    device_ref  device;
    dpeth_t *   dep;
    packet_t    next;

    ERROR_PROPAGATE( find_device( device_id, & device ));
    dep = ( dpeth_t * ) device->specific;
    // process packet queue
    do{
        next = pq_detach( packet );
        if( do_pwrite( dep, packet, FALSE ) != EBUSY ){
            netif_pq_release( packet_get_id( packet ));
        }
        packet = next;
    }while( packet );
    return EOK;
}

int start_message( device_id_t device_id ){
    ERROR_DECLARE;

    device_ref  device;
    dpeth_t *   dep;

    ERROR_PROPAGATE( find_device( device_id, & device ));
    if( device->state != NETIF_ACTIVE ){
        dep = ( dpeth_t * ) device->specific;
        dp8390_cmds[ 0 ].addr = ( void * ) ( uint32_t ) ( dep->de_dp8390_port + DP_ISR );
        dp8390_cmds[ 2 ].addr = dp8390_cmds[ 0 ].addr;
        ERROR_PROPAGATE( ipc_register_irq( dep->de_irq, device->device_id, device->device_id, & dp8390_code ));
        if( ERROR_OCCURRED( do_init( dep, DL_BROAD_REQ ))){
            ipc_unregister_irq( dep->de_irq, device->device_id );
            return ERROR_CODE;
        }
        change_state( device, NETIF_ACTIVE );
    }
    return EOK;
}

int stop_message( device_id_t device_id ){
    ERROR_DECLARE;

    device_ref  device;
    dpeth_t *   dep;

    ERROR_PROPAGATE( find_device( device_id, & device ));
    if( device->state != NETIF_STOPPED ){
        dep = ( dpeth_t * ) device->specific;
        do_stop( dep );
        ipc_unregister_irq( dep->de_irq, device->device_id );
        change_state( device, NETIF_STOPPED );
    }
    return EOK;
}

void change_state( device_ref device, device_state_t state ){
    device->state = state;
    nil_message( device, NET_NIL_DEVICE_STATE, device->state, NULL );
    printf( "\nState changed to %s", ( state == NETIF_ACTIVE ) ? "ACTIVE" : "STOPPED" );
}

int initialize( void ){
    ipcarg_t    phonehash;

    async_set_interrupt_received( irq_handler );

    return REGISTER_ME( SERVICE_DP8390, & phonehash );
}

int netif_send_packet( dpeth_t * dep, packet_t packet ){
    if( !( dep && dep->parent )) return EINVAL;
    nil_message(( device_ref ) dep->parent, NET_NIL_RECEIVED, packet_get_id( packet ), 0 );
    return EOK;
}

/** @}
 */