WebSVN – HelenOS – Diff – /branches/network/uspace/srv/devmap/devmap.c


/*
 * Copyright (c) 2007 Josef Cejka
 * 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.
 */
 
/**
 * @defgroup devmap Device mapper.
 * @brief HelenOS device mapper.
 * @{
 */
 
/** @file
 */
 
#include <ipc/services.h>
#include <ipc/ns.h>
#include <async.h>
#include <stdio.h>
#include <errno.h>
#include <bool.h>
#include <fibril_sync.h>
#include <stdlib.h>
#include <string.h>
#include <ipc/devmap.h>
 
#define NAME          "devmap"
#define NULL_DEVICES  256
 
/** Representation of device driver.
 *
 * Each driver is responsible for a set of devices.
 *
 */
typedef struct {
    /** Pointers to previous and next drivers in linked list */
    link_t drivers;
    /** Pointer to the linked list of devices controlled by this driver */
    link_t devices;
    /** Phone asociated with this driver */
    ipcarg_t phone;
    /** Device driver name */
    char *name;
    /** Fibril mutex for list of devices owned by this driver */
    fibril_mutex_t devices_mutex;
} devmap_driver_t;
 
/** Info about registered device
 *
 */
typedef struct {
    /** Pointer to the previous and next device in the list of all devices */
    link_t devices;
    /** Pointer to the previous and next device in the list of devices
        owned by one driver */
    link_t driver_devices;
    /** Unique device identifier  */
    dev_handle_t handle;
    /** Device name */
    char *name;
    /** Device driver handling this device */
    devmap_driver_t *driver;
} devmap_device_t;
 
LIST_INITIALIZE(devices_list);
LIST_INITIALIZE(drivers_list);
 
/* Locking order:
 *  drivers_list_mutex
 *  devices_list_mutex
 *  (devmap_driver_t *)->devices_mutex
 *  create_handle_mutex
 **/
 
static FIBRIL_MUTEX_INITIALIZE(devices_list_mutex);
static FIBRIL_CONDVAR_INITIALIZE(devices_list_cv);
static FIBRIL_MUTEX_INITIALIZE(drivers_list_mutex);
static FIBRIL_MUTEX_INITIALIZE(create_handle_mutex);
static FIBRIL_MUTEX_INITIALIZE(null_devices_mutex);
 
static dev_handle_t last_handle = 0;
static devmap_device_t *null_devices[NULL_DEVICES];
 
static dev_handle_t devmap_create_handle(void)
{
    /* TODO: allow reusing old handles after their unregistration
     * and implement some version of LRU algorithm, avoid overflow
     */
   
    fibril_mutex_lock(&create_handle_mutex);
    last_handle++;
    fibril_mutex_unlock(&create_handle_mutex);
   
    return last_handle;
}
 
/** Find device with given name.
 *
 */
static devmap_device_t *devmap_device_find_name(const char *name)
{
    link_t *item = devices_list.next;
    devmap_device_t *device = NULL;
   
    while (item != &devices_list) {
        device = list_get_instance(item, devmap_device_t, devices);
        if (str_cmp(device->name, name) == 0)
            break;
        item = item->next;
    }
   
    if (item == &devices_list)
        return NULL;
   
    device = list_get_instance(item, devmap_device_t, devices);
    return device;
}
 
/** Find device with given handle.
 *
 * @todo: use hash table
 *
 */
static devmap_device_t *devmap_device_find_handle(dev_handle_t handle)
{
    fibril_mutex_lock(&devices_list_mutex);
   
    link_t *item = (&devices_list)->next;
    devmap_device_t *device = NULL;
   
    while (item != &devices_list) {
        device = list_get_instance(item, devmap_device_t, devices);
        if (device->handle == handle)
            break;
        item = item->next;
    }
   
    if (item == &devices_list) {
        fibril_mutex_unlock(&devices_list_mutex);
        return NULL;
    }
   
    device = list_get_instance(item, devmap_device_t, devices);
   
    fibril_mutex_unlock(&devices_list_mutex);
   
    return device;
}
 
/**
 * Unregister device and free it. It's assumed that driver's device list is
 * already locked.
 */
static int devmap_device_unregister_core(devmap_device_t *device)
{
    list_remove(&(device->devices));
    list_remove(&(device->driver_devices));
   
    free(device->name);
    free(device);
   
    return EOK;
}
 
/**
 * Read info about new driver and add it into linked list of registered
 * drivers.
 */
static void devmap_driver_register(devmap_driver_t **odriver)
{
    *odriver = NULL;
   
    ipc_call_t icall;
    ipc_callid_t iid = async_get_call(&icall);
   
    if (IPC_GET_METHOD(icall) != DEVMAP_DRIVER_REGISTER) {
        ipc_answer_0(iid, EREFUSED);
        return;
    }
   
    devmap_driver_t *driver = (devmap_driver_t *) malloc(sizeof(devmap_driver_t));
   
    if (driver == NULL) {
        ipc_answer_0(iid, ENOMEM);
        return;
    }
   
    /*
     * Get driver name
     */
    ipc_callid_t callid;
    size_t name_size;
    if (!ipc_data_write_receive(&callid, &name_size)) {
        free(driver);
        ipc_answer_0(callid, EREFUSED);
        ipc_answer_0(iid, EREFUSED);
        return;
    }
   
    if (name_size > DEVMAP_NAME_MAXLEN) {
        free(driver);
        ipc_answer_0(callid, EINVAL);
        ipc_answer_0(iid, EREFUSED);
        return;
    }
   
    /*
     * Allocate buffer for device name.
     */
    driver->name = (char *) malloc(name_size + 1);
    if (driver->name == NULL) {
        free(driver);
        ipc_answer_0(callid, ENOMEM);
        ipc_answer_0(iid, EREFUSED);
        return;
    }
   
    /*
     * Send confirmation to sender and get data into buffer.
     */
    if (ipc_data_write_finalize(callid, driver->name, name_size) != EOK) {
        free(driver->name);
        free(driver);
        ipc_answer_0(iid, EREFUSED);
        return;
    }
   
    driver->name[name_size] = 0;
   
    /* Initialize mutex for list of devices owned by this driver */
    fibril_mutex_initialize(&driver->devices_mutex);
   
    /*
     * Initialize list of asociated devices
     */
    list_initialize(&driver->devices);
   
    /*
     * Create connection to the driver
     */
    ipc_call_t call;
    callid = async_get_call(&call);
   
    if (IPC_GET_METHOD(call) != IPC_M_CONNECT_TO_ME) {
        ipc_answer_0(callid, ENOTSUP);
       
        free(driver->name);
        free(driver);
        ipc_answer_0(iid, ENOTSUP);
        return;
    }
   
    driver->phone = IPC_GET_ARG5(call);
   
    ipc_answer_0(callid, EOK);
   
    list_initialize(&(driver->drivers));
   
    fibril_mutex_lock(&drivers_list_mutex);
   
    /* TODO:
     * check that no driver with name equal to driver->name is registered
     */
   
    /*
     * Insert new driver into list of registered drivers
     */
    list_append(&(driver->drivers), &drivers_list);
    fibril_mutex_unlock(&drivers_list_mutex);
   
    ipc_answer_0(iid, EOK);
   
    *odriver = driver;
}
 
/**
 * Unregister device driver, unregister all its devices and free driver
 * structure.
 *
 */
static int devmap_driver_unregister(devmap_driver_t *driver)
{
    if (driver == NULL)
        return EEXISTS;
   
    fibril_mutex_lock(&drivers_list_mutex);
   
    if (driver->phone != 0)
        ipc_hangup(driver->phone);
   
    /* Remove it from list of drivers */
    list_remove(&(driver->drivers));
   
    /* Unregister all its devices */
    fibril_mutex_lock(&devices_list_mutex);
    fibril_mutex_lock(&driver->devices_mutex);
   
    while (!list_empty(&(driver->devices))) {
        devmap_device_t *device = list_get_instance(driver->devices.next,
            devmap_device_t, driver_devices);
        devmap_device_unregister_core(device);
    }
   
    fibril_mutex_unlock(&driver->devices_mutex);
    fibril_mutex_unlock(&devices_list_mutex);
    fibril_mutex_unlock(&drivers_list_mutex);
   
    /* free name and driver */
    if (driver->name != NULL)
        free(driver->name);
   
    free(driver);
   
    return EOK;
}
 
/** Register instance of device
 *
 */
static void devmap_device_register(ipc_callid_t iid, ipc_call_t *icall,
    devmap_driver_t *driver)
{
    if (driver == NULL) {
        ipc_answer_0(iid, EREFUSED);
        return;
    }
   
    /* Create new device entry */
    devmap_device_t *device = (devmap_device_t *) malloc(sizeof(devmap_device_t));
    if (device == NULL) {
        ipc_answer_0(iid, ENOMEM);
        return;
    }
   
    /* Get device name */
    ipc_callid_t callid;
    size_t size;
    if (!ipc_data_write_receive(&callid, &size)) {
        free(device);
        ipc_answer_0(iid, EREFUSED);
        return;
    }
   
    if (size > DEVMAP_NAME_MAXLEN) {
        free(device);
        ipc_answer_0(callid, EINVAL);
        ipc_answer_0(iid, EREFUSED);
        return;
    }
   
    /* +1 for terminating \0 */
    device->name = (char *) malloc(size + 1);
   
    if (device->name == NULL) {
        free(device);
        ipc_answer_0(callid, ENOMEM);
        ipc_answer_0(iid, EREFUSED);
        return;
    }
   
    ipc_data_write_finalize(callid, device->name, size);
    device->name[size] = 0;
   
    list_initialize(&(device->devices));
    list_initialize(&(device->driver_devices));
   
    fibril_mutex_lock(&devices_list_mutex);
   
    /* Check that device with such name is not already registered */
    if (NULL != devmap_device_find_name(device->name)) {
        printf(NAME ": Device '%s' already registered\n", device->name);
        fibril_mutex_unlock(&devices_list_mutex);
        free(device->name);
        free(device);
        ipc_answer_0(iid, EEXISTS);
        return;
    }
   
    /* Get unique device handle */
    device->handle = devmap_create_handle();
   
    device->driver = driver;
   
    /* Insert device into list of all devices  */
    list_append(&device->devices, &devices_list);
   
    /* Insert device into list of devices that belog to one driver */
    fibril_mutex_lock(&device->driver->devices_mutex);
   
    list_append(&device->driver_devices, &device->driver->devices);
   
    fibril_mutex_unlock(&device->driver->devices_mutex);
    fibril_condvar_broadcast(&devices_list_cv);
    fibril_mutex_unlock(&devices_list_mutex);
   
    ipc_answer_1(iid, EOK, device->handle);
}
 
/**
 *
 */
static int devmap_device_unregister(ipc_callid_t iid, ipc_call_t *icall,
    devmap_driver_t *driver)
{
    /* TODO */
    return EOK;
}
 
/** Connect client to the device.
 *
 * Find device driver owning requested device and forward
 * the message to it.
 *
 */
static void devmap_forward(ipc_callid_t callid, ipc_call_t *call)
{
    /*
     * Get handle from request
     */
    dev_handle_t handle = IPC_GET_ARG2(*call);
    devmap_device_t *dev = devmap_device_find_handle(handle);
   
    if ((dev == NULL) || (dev->driver == NULL) || (dev->driver->phone == 0)) {
        ipc_answer_0(callid, ENOENT);
        return;
    }
   
    ipc_forward_fast(callid, dev->driver->phone, dev->handle,
        IPC_GET_ARG3(*call), 0, IPC_FF_NONE);
}
 
/** Find handle for device instance identified by name.
 *
 * In answer will be send EOK and device handle in arg1 or a error
 * code from errno.h.
 *
 */
static void devmap_get_handle(ipc_callid_t iid, ipc_call_t *icall)
{
    /*
     * Wait for incoming message with device name (but do not
     * read the name itself until the buffer is allocated).
     */
    ipc_callid_t callid;
    size_t size;
    if (!ipc_data_write_receive(&callid, &size)) {
        ipc_answer_0(callid, EREFUSED);
        ipc_answer_0(iid, EREFUSED);
        return;
    }
   
    if ((size < 1) || (size > DEVMAP_NAME_MAXLEN)) {
        ipc_answer_0(callid, EINVAL);
        ipc_answer_0(iid, EREFUSED);
        return;
    }
   
    /*
     * Allocate buffer for device name.
     */
    char *name = (char *) malloc(size + 1);
    if (name == NULL) {
        ipc_answer_0(callid, ENOMEM);
        ipc_answer_0(iid, EREFUSED);
        return;
    }
   
    /*
     * Send confirmation to sender and get data into buffer.
     */
    ipcarg_t retval = ipc_data_write_finalize(callid, name, size);
    if (retval != EOK) {
        ipc_answer_0(iid, EREFUSED);
        free(name);
        return;
    }
    name[size] = '\0';
   
    fibril_mutex_lock(&devices_list_mutex);
    const devmap_device_t *dev;
recheck:
 
    /*
     * Find device name in the list of known devices.
     */
    dev = devmap_device_find_name(name);
   
    /*
     * Device was not found.
     */
    if (dev == NULL) {
        if (IPC_GET_ARG1(*icall) & IPC_FLAG_BLOCKING) {
            /* Blocking lookup */
            fibril_condvar_wait(&devices_list_cv,
                &devices_list_mutex);
            goto recheck;
        }
       
        ipc_answer_0(iid, ENOENT);
        free(name);
        fibril_mutex_unlock(&devices_list_mutex);
        return;
    }
    fibril_mutex_unlock(&devices_list_mutex);
   
    ipc_answer_1(iid, EOK, dev->handle);
    free(name);
}
 
/** Find name of device identified by id and send it to caller.
 *
 */
static void devmap_get_name(ipc_callid_t iid, ipc_call_t *icall)
{
    const devmap_device_t *device = devmap_device_find_handle(IPC_GET_ARG1(*icall));
   
    /*
     * Device not found.
     */
    if (device == NULL) {
        ipc_answer_0(iid, ENOENT);
        return;
    }
   
    ipc_answer_0(iid, EOK);
   
 
 
    /* FIXME:
     * We have no channel from DEVMAP to client, therefore
     * sending must be initiated by client.
     *
     * size_t name_size = str_size(device->name);
     *
     * int rc = ipc_data_write_send(phone, device->name, name_size);
     * if (rc != EOK) {
     *     async_wait_for(req, NULL);
     *     return rc;
     * }
     */
   
    /* TODO: send name in response */
}
 
static void devmap_get_count(ipc_callid_t iid, ipc_call_t *icall)
{
    fibril_mutex_lock(&devices_list_mutex);
    ipc_answer_1(iid, EOK, list_count(&devices_list));
    fibril_mutex_unlock(&devices_list_mutex);
}
 
static void devmap_get_devices(ipc_callid_t iid, ipc_call_t *icall)
{
    fibril_mutex_lock(&devices_list_mutex);
   
    ipc_callid_t callid;
    size_t size;
    if (!ipc_data_read_receive(&callid, &size)) {
        ipc_answer_0(callid, EREFUSED);
        ipc_answer_0(iid, EREFUSED);
        return;
    }
   
    if ((size % sizeof(dev_desc_t)) != 0) {
        ipc_answer_0(callid, EINVAL);
        ipc_answer_0(iid, EREFUSED);
        return;
    }
   
    size_t count = size / sizeof(dev_desc_t);
    dev_desc_t *desc = (dev_desc_t *) malloc(size);
    if (desc == NULL) {
        ipc_answer_0(callid, ENOMEM);
        ipc_answer_0(iid, EREFUSED);
        return;
    }
   
    size_t pos = 0;
    link_t *item = devices_list.next;
   
    while ((item != &devices_list) && (pos < count)) {
        devmap_device_t *device = list_get_instance(item, devmap_device_t, devices);
       
        desc[pos].handle = device->handle;
        str_cpy(desc[pos].name, DEVMAP_NAME_MAXLEN, device->name);
        pos++;
        item = item->next;
    }
   
    ipcarg_t retval = ipc_data_read_finalize(callid, desc, pos * sizeof(dev_desc_t));
    if (retval != EOK) {
        ipc_answer_0(iid, EREFUSED);
        free(desc);
        return;
    }
   
    free(desc);
   
    fibril_mutex_unlock(&devices_list_mutex);
   
    ipc_answer_1(iid, EOK, pos);
}
 
 
 
 
 
static void devmap_null_create(ipc_callid_t iid, ipc_call_t *icall)
{
    fibril_mutex_lock(&null_devices_mutex);
   
    unsigned int i;
    bool fnd = false;
   
    for (i = 0; i < NULL_DEVICES; i++) {
        if (null_devices[i] == NULL) {
            fnd = true;
            break;
        }
    }
   
    if (!fnd) {
        fibril_mutex_unlock(&null_devices_mutex);
        ipc_answer_0(iid, ENOMEM);
        return;
    }
   
    /* Create NULL device entry */
    devmap_device_t *device = (devmap_device_t *) malloc(sizeof(devmap_device_t));
    if (device == NULL) {
        fibril_mutex_unlock(&null_devices_mutex);
        ipc_answer_0(iid, ENOMEM);
        return;
    }
   
    char null[DEVMAP_NAME_MAXLEN];
    snprintf(null, DEVMAP_NAME_MAXLEN, "null%u", i);
   
    device->name = str_dup(null);
    if (device->name == NULL) {
        fibril_mutex_unlock(&null_devices_mutex);
        free(device);
        ipc_answer_0(iid, ENOMEM);
        return;
    }
   
    list_initialize(&(device->devices));
    list_initialize(&(device->driver_devices));
   
    fibril_mutex_lock(&devices_list_mutex);
   
    /* Get unique device handle */
    device->handle = devmap_create_handle();
    device->driver = NULL;
   
    /* Insert device into list of all devices
       and into null devices array */
    list_append(&device->devices, &devices_list);
    null_devices[i] = device;
   
    fibril_mutex_unlock(&devices_list_mutex);
    fibril_mutex_unlock(&null_devices_mutex);
   
    ipc_answer_1(iid, EOK, (ipcarg_t) i);
}
 
static void devmap_null_destroy(ipc_callid_t iid, ipc_call_t *icall)
{
    fibril_mutex_lock(&null_devices_mutex);
   
    ipcarg_t i = IPC_GET_ARG1(*icall);
   
    if (null_devices[i] == NULL) {
        ipc_answer_0(iid, ENOENT);
        return;
    }
   
    devmap_device_unregister_core(null_devices[i]);
    null_devices[i] = NULL;
   
    fibril_mutex_unlock(&null_devices_mutex);
   
    ipc_answer_0(iid, EOK);
}
 
/** Initialize device mapper.
 *
 *
 */
static bool devmap_init(void)
{
    fibril_mutex_lock(&null_devices_mutex);
   
    unsigned int i;
    for (i = 0; i < NULL_DEVICES; i++)
        null_devices[i] = NULL;
   
    fibril_mutex_unlock(&null_devices_mutex);
   
    return true;
}
 
/** Handle connection with device driver.
 *
 */
static void devmap_connection_driver(ipc_callid_t iid, ipc_call_t *icall)
{
    /* Accept connection */
    ipc_answer_0(iid, EOK);
   
    devmap_driver_t *driver = NULL;
    devmap_driver_register(&driver);
   
    if (NULL == driver)
        return;
   
    bool cont = true;
    while (cont) {
        ipc_call_t call;
        ipc_callid_t callid = async_get_call(&call);
       
        switch (IPC_GET_METHOD(call)) {
        case IPC_M_PHONE_HUNGUP:
            cont = false;
            continue;
        case DEVMAP_DRIVER_UNREGISTER:
            if (NULL == driver)
                ipc_answer_0(callid, ENOENT);
            else
                ipc_answer_0(callid, EOK);
            break;
        case DEVMAP_DEVICE_REGISTER:
            /* Register one instance of device */
            devmap_device_register(callid, &call, driver);
            break;
        case DEVMAP_DEVICE_UNREGISTER:
            /* Remove instance of device identified by handler */
            devmap_device_unregister(callid, &call, driver);
            break;
        case DEVMAP_DEVICE_GET_HANDLE:
            devmap_get_handle(callid, &call);
            break;
        case DEVMAP_DEVICE_GET_NAME:
            devmap_get_name(callid, &call);
            break;
        default:
            if (!(callid & IPC_CALLID_NOTIFICATION))
                ipc_answer_0(callid, ENOENT);
        }
    }
   
    if (driver != NULL) {
        /*
         * Unregister the device driver and all its devices.
         */
        devmap_driver_unregister(driver);
        driver = NULL;
    }
}
 
/** Handle connection with device client.
 *
 */
static void devmap_connection_client(ipc_callid_t iid, ipc_call_t *icall)
{
    /* Accept connection */
    ipc_answer_0(iid, EOK);
   
    bool cont = true;
    while (cont) {
        ipc_call_t call;
        ipc_callid_t callid = async_get_call(&call);
       
        switch (IPC_GET_METHOD(call)) {
        case IPC_M_PHONE_HUNGUP:
            cont = false;
            continue;
        case DEVMAP_DEVICE_GET_HANDLE:
            devmap_get_handle(callid, &call);
            break;
        case DEVMAP_DEVICE_GET_NAME:
            devmap_get_name(callid, &call);
            break;
        case DEVMAP_DEVICE_NULL_CREATE:
            devmap_null_create(callid, &call);
            break;
        case DEVMAP_DEVICE_NULL_DESTROY:
            devmap_null_destroy(callid, &call);
            break;
        case DEVMAP_DEVICE_GET_COUNT:
            devmap_get_count(callid, &call);
            break;
        case DEVMAP_DEVICE_GET_DEVICES:
            devmap_get_devices(callid, &call);
            break;
        default:
            if (!(callid & IPC_CALLID_NOTIFICATION))
                ipc_answer_0(callid, ENOENT);
        }
    }
}
 
/** Function for handling connections to devmap
 *
 */
static void devmap_connection(ipc_callid_t iid, ipc_call_t *icall)
{
    /* Select interface */
    switch ((ipcarg_t) (IPC_GET_ARG1(*icall))) {
    case DEVMAP_DRIVER:
        devmap_connection_driver(iid, icall);
        break;
    case DEVMAP_CLIENT:
        devmap_connection_client(iid, icall);
        break;
    case DEVMAP_CONNECT_TO_DEVICE:
        /* Connect client to selected device */
        devmap_forward(iid, icall);
        break;
    default:
        /* No such interface */
        ipc_answer_0(iid, ENOENT);
    }
}
 
/**
 *
 */
int main(int argc, char *argv[])
{
    printf(NAME ": HelenOS Device Mapper\n");
   
    if (!devmap_init()) {
        printf(NAME ": Error while initializing service\n");
        return -1;
    }
   
    /* Set a handler of incomming connections */
    async_set_client_connection(devmap_connection);
   
    /* Register device mapper at naming service */
    ipcarg_t phonead;
    if (ipc_connect_to_me(PHONE_NS, SERVICE_DEVMAP, 0, 0, &phonead) != 0)
        return -1;
   
    printf(NAME ": Accepting connections\n");
    async_manager();
   
    /* Never reached */
    return 0;
}
 
/**
 * @}
 */
 

Rev 4581	Rev 4718
1	/*	1	/*
2	* Copyright (c) 2007 Josef Cejka	2	* Copyright (c) 2007 Josef Cejka
3	* All rights reserved.	3	* All rights reserved.
4	*	4	*
5	* Redistribution and use in source and binary forms, with or without	5	* Redistribution and use in source and binary forms, with or without
6	* modification, are permitted provided that the following conditions	6	* modification, are permitted provided that the following conditions
7	* are met:	7	* are met:
8	*	8	*
9	* - Redistributions of source code must retain the above copyright	9	* - Redistributions of source code must retain the above copyright
10	* notice, this list of conditions and the following disclaimer.	10	* notice, this list of conditions and the following disclaimer.
11	* - Redistributions in binary form must reproduce the above copyright	11	* - Redistributions in binary form must reproduce the above copyright
12	* notice, this list of conditions and the following disclaimer in the	12	* notice, this list of conditions and the following disclaimer in the
13	* documentation and/or other materials provided with the distribution.	13	* documentation and/or other materials provided with the distribution.
14	* - The name of the author may not be used to endorse or promote products	14	* - The name of the author may not be used to endorse or promote products
15	* derived from this software without specific prior written permission.	15	* derived from this software without specific prior written permission.
16	*	16	*
17	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR	17	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES	18	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.	19	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,	20	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT	21	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,	22	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY	23	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT	24	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF	25	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.	26	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27	*/	27	*/
28		28
29	/**	29	/**
30	* @defgroup devmap Device mapper.	30	* @defgroup devmap Device mapper.
31	* @brief HelenOS device mapper.	31	* @brief HelenOS device mapper.
32	* @{	32	* @{
33	*/	33	*/
34		34
35	/** @file	35	/** @file
36	*/	36	*/
37		37
38	#include <ipc/services.h>	38	#include <ipc/services.h>
39	#include <ipc/ns.h>	39	#include <ipc/ns.h>
40	#include <async.h>	40	#include <async.h>
41	#include <stdio.h>	41	#include <stdio.h>
42	#include <errno.h>	42	#include <errno.h>
43	#include <bool.h>	43	#include <bool.h>
44	#include <fibril_sync.h>	44	#include <fibril_sync.h>
45	#include <stdlib.h>	45	#include <stdlib.h>
46	#include <string.h>	46	#include <string.h>
47	#include <ipc/devmap.h>	47	#include <ipc/devmap.h>
48		48
49	#define NAME "devmap"	49	#define NAME "devmap"
-		50	#define NULL_DEVICES 256
50		51
51	/** Representation of device driver.	52	/** Representation of device driver.
52	*	53	*
53	* Each driver is responsible for a set of devices.	54	* Each driver is responsible for a set of devices.
54	*	55	*
55	*/	56	*/
56	typedef struct {	57	typedef struct {
57	/** Pointers to previous and next drivers in linked list */	58	/** Pointers to previous and next drivers in linked list */
58	link_t drivers;	59	link_t drivers;
59	/** Pointer to the linked list of devices controlled by this driver */	60	/** Pointer to the linked list of devices controlled by this driver */
60	link_t devices;	61	link_t devices;
61	/** Phone asociated with this driver */	62	/** Phone asociated with this driver */
62	ipcarg_t phone;	63	ipcarg_t phone;
63	/** Device driver name */	64	/** Device driver name */
64	char *name;	65	char *name;
65	/** Fibril mutex for list of devices owned by this driver */	66	/** Fibril mutex for list of devices owned by this driver */
66	fibril_mutex_t devices_mutex;	67	fibril_mutex_t devices_mutex;
67	} devmap_driver_t;	68	} devmap_driver_t;
68		69
69	/** Info about registered device	70	/** Info about registered device
70	*	71	*
71	*/	72	*/
72	typedef struct {	73	typedef struct {
73	/** Pointer to the previous and next device in the list of all devices */	74	/** Pointer to the previous and next device in the list of all devices */
74	link_t devices;	75	link_t devices;
75	/** Pointer to the previous and next device in the list of devices	76	/** Pointer to the previous and next device in the list of devices
76	owned by one driver */	77	owned by one driver */
77	link_t driver_devices;	78	link_t driver_devices;
78	/** Unique device identifier */	79	/** Unique device identifier */
79	dev_handle_t handle;	80	dev_handle_t handle;
80	/** Device name */	81	/** Device name */
81	char *name;	82	char *name;
82	/** Device driver handling this device */	83	/** Device driver handling this device */
83	devmap_driver_t *driver;	84	devmap_driver_t *driver;
84	} devmap_device_t;	85	} devmap_device_t;
85		86
86	LIST_INITIALIZE(devices_list);	87	LIST_INITIALIZE(devices_list);
87	LIST_INITIALIZE(drivers_list);	88	LIST_INITIALIZE(drivers_list);
88		89
89	/* Locking order:	90	/* Locking order:
90	* drivers_list_mutex	91	* drivers_list_mutex
91	* devices_list_mutex	92	* devices_list_mutex
92	* (devmap_driver_t *)->devices_mutex	93	* (devmap_driver_t *)->devices_mutex
93	* create_handle_mutex	94	* create_handle_mutex
94	**/	95	**/
95		96
96	static FIBRIL_MUTEX_INITIALIZE(devices_list_mutex);	97	static FIBRIL_MUTEX_INITIALIZE(devices_list_mutex);
97	static FIBRIL_CONDVAR_INITIALIZE(devices_list_cv);	98	static FIBRIL_CONDVAR_INITIALIZE(devices_list_cv);
98	static FIBRIL_MUTEX_INITIALIZE(drivers_list_mutex);	99	static FIBRIL_MUTEX_INITIALIZE(drivers_list_mutex);
99	static FIBRIL_MUTEX_INITIALIZE(create_handle_mutex);	100	static FIBRIL_MUTEX_INITIALIZE(create_handle_mutex);
-		101	static FIBRIL_MUTEX_INITIALIZE(null_devices_mutex);
100		102
101	static dev_handle_t last_handle = 0;	103	static dev_handle_t last_handle = 0;
-		104	static devmap_device_t *null_devices[NULL_DEVICES];
102		105
103	static dev_handle_t devmap_create_handle(void)	106	static dev_handle_t devmap_create_handle(void)
104	{	107	{
105	/* TODO: allow reusing old handles after their unregistration	108	/* TODO: allow reusing old handles after their unregistration
106	* and implement some version of LRU algorithm, avoid overflow	109	* and implement some version of LRU algorithm, avoid overflow
107	*/	110	*/
108		111
109	fibril_mutex_lock(&create_handle_mutex);	112	fibril_mutex_lock(&create_handle_mutex);
110	last_handle++;	113	last_handle++;
111	fibril_mutex_unlock(&create_handle_mutex);	114	fibril_mutex_unlock(&create_handle_mutex);
112		115
113	return last_handle;	116	return last_handle;
114	}	117	}
115		118
116	/** Find device with given name.	119	/** Find device with given name.
117	*	120	*
118	*/	121	*/
119	static devmap_device_t devmap_device_find_name(const char name)	122	static devmap_device_t devmap_device_find_name(const char name)
120	{	123	{
121	link_t *item = devices_list.next;	124	link_t *item = devices_list.next;
122	devmap_device_t *device = NULL;	125	devmap_device_t *device = NULL;
123		126
124	while (item != &devices_list) {	127	while (item != &devices_list) {
125	device = list_get_instance(item, devmap_device_t, devices);	128	device = list_get_instance(item, devmap_device_t, devices);
126	if (str_cmp(device->name, name) == 0)	129	if (str_cmp(device->name, name) == 0)
127	break;	130	break;
128	item = item->next;	131	item = item->next;
129	}	132	}
130		133
131	if (item == &devices_list)	134	if (item == &devices_list)
132	return NULL;	135	return NULL;
133		136
134	device = list_get_instance(item, devmap_device_t, devices);	137	device = list_get_instance(item, devmap_device_t, devices);
135	return device;	138	return device;
136	}	139	}
137		140
138	/** Find device with given handle.	141	/** Find device with given handle.
139	*	142	*
140	* @todo: use hash table	143	* @todo: use hash table
141	*	144	*
142	*/	145	*/
143	static devmap_device_t *devmap_device_find_handle(dev_handle_t handle)	146	static devmap_device_t *devmap_device_find_handle(dev_handle_t handle)
144	{	147	{
145	fibril_mutex_lock(&devices_list_mutex);	148	fibril_mutex_lock(&devices_list_mutex);
146		149
147	link_t *item = (&devices_list)->next;	150	link_t *item = (&devices_list)->next;
148	devmap_device_t *device = NULL;	151	devmap_device_t *device = NULL;
149		152
150	while (item != &devices_list) {	153	while (item != &devices_list) {
151	device = list_get_instance(item, devmap_device_t, devices);	154	device = list_get_instance(item, devmap_device_t, devices);
152	if (device->handle == handle)	155	if (device->handle == handle)
153	break;	156	break;
154	item = item->next;	157	item = item->next;
155	}	158	}
156		159
157	if (item == &devices_list) {	160	if (item == &devices_list) {
158	fibril_mutex_unlock(&devices_list_mutex);	161	fibril_mutex_unlock(&devices_list_mutex);
159	return NULL;	162	return NULL;
160	}	163	}
161		164
162	device = list_get_instance(item, devmap_device_t, devices);	165	device = list_get_instance(item, devmap_device_t, devices);
163		166
164	fibril_mutex_unlock(&devices_list_mutex);	167	fibril_mutex_unlock(&devices_list_mutex);
165		168
166	return device;	169	return device;
167	}	170	}
168		171
169	/**	172	/**
170	* Unregister device and free it. It's assumed that driver's device list is	173	* Unregister device and free it. It's assumed that driver's device list is
171	* already locked.	174	* already locked.
172	*/	175	*/
173	static int devmap_device_unregister_core(devmap_device_t *device)	176	static int devmap_device_unregister_core(devmap_device_t *device)
174	{	177	{
175	list_remove(&(device->devices));	178	list_remove(&(device->devices));
176	list_remove(&(device->driver_devices));	179	list_remove(&(device->driver_devices));
177		180
178	free(device->name);	181	free(device->name);
179	free(device);	182	free(device);
180		183
181	return EOK;	184	return EOK;
182	}	185	}
183		186
184	/**	187	/**
185	* Read info about new driver and add it into linked list of registered	188	* Read info about new driver and add it into linked list of registered
186	* drivers.	189	* drivers.
187	*/	190	*/
188	static void devmap_driver_register(devmap_driver_t **odriver)	191	static void devmap_driver_register(devmap_driver_t **odriver)
189	{	192	{
190	*odriver = NULL;	193	*odriver = NULL;
191		194
192	ipc_call_t icall;	195	ipc_call_t icall;
193	ipc_callid_t iid = async_get_call(&icall);	196	ipc_callid_t iid = async_get_call(&icall);
194		197
195	if (IPC_GET_METHOD(icall) != DEVMAP_DRIVER_REGISTER) {	198	if (IPC_GET_METHOD(icall) != DEVMAP_DRIVER_REGISTER) {
196	ipc_answer_0(iid, EREFUSED);	199	ipc_answer_0(iid, EREFUSED);
197	return;	200	return;
198	}	201	}
199		202
200	devmap_driver_t driver = (devmap_driver_t ) malloc(sizeof(devmap_driver_t));	203	devmap_driver_t driver = (devmap_driver_t ) malloc(sizeof(devmap_driver_t));
201		204
202	if (driver == NULL) {	205	if (driver == NULL) {
203	ipc_answer_0(iid, ENOMEM);	206	ipc_answer_0(iid, ENOMEM);
204	return;	207	return;
205	}	208	}
206		209
207	/*	210	/*
208	* Get driver name	211	* Get driver name
209	*/	212	*/
210	ipc_callid_t callid;	213	ipc_callid_t callid;
211	size_t name_size;	214	size_t name_size;
212	if (!ipc_data_write_receive(&callid, &name_size)) {	215	if (!ipc_data_write_receive(&callid, &name_size)) {
213	free(driver);	216	free(driver);
214	ipc_answer_0(callid, EREFUSED);	217	ipc_answer_0(callid, EREFUSED);
215	ipc_answer_0(iid, EREFUSED);	218	ipc_answer_0(iid, EREFUSED);
216	return;	219	return;
217	}	220	}
218		221
219	if (name_size > DEVMAP_NAME_MAXLEN) {	222	if (name_size > DEVMAP_NAME_MAXLEN) {
220	free(driver);	223	free(driver);
221	ipc_answer_0(callid, EINVAL);	224	ipc_answer_0(callid, EINVAL);
222	ipc_answer_0(iid, EREFUSED);	225	ipc_answer_0(iid, EREFUSED);
223	return;	226	return;
224	}	227	}
225		228
226	/*	229	/*
227	* Allocate buffer for device name.	230	* Allocate buffer for device name.
228	*/	231	*/
229	driver->name = (char *) malloc(name_size + 1);	232	driver->name = (char *) malloc(name_size + 1);
230	if (driver->name == NULL) {	233	if (driver->name == NULL) {
231	free(driver);	234	free(driver);
232	ipc_answer_0(callid, ENOMEM);	235	ipc_answer_0(callid, ENOMEM);
233	ipc_answer_0(iid, EREFUSED);	236	ipc_answer_0(iid, EREFUSED);
234	return;	237	return;
235	}	238	}
236		239
237	/*	240	/*
238	* Send confirmation to sender and get data into buffer.	241	* Send confirmation to sender and get data into buffer.
239	*/	242	*/
240	if (ipc_data_write_finalize(callid, driver->name, name_size) != EOK) {	243	if (ipc_data_write_finalize(callid, driver->name, name_size) != EOK) {
241	free(driver->name);	244	free(driver->name);
242	free(driver);	245	free(driver);
243	ipc_answer_0(iid, EREFUSED);	246	ipc_answer_0(iid, EREFUSED);
244	return;	247	return;
245	}	248	}
246		249
247	driver->name[name_size] = 0;	250	driver->name[name_size] = 0;
248		251
249	/* Initialize mutex for list of devices owned by this driver */	252	/* Initialize mutex for list of devices owned by this driver */
250	fibril_mutex_initialize(&driver->devices_mutex);	253	fibril_mutex_initialize(&driver->devices_mutex);
251		254
252	/*	255	/*
253	* Initialize list of asociated devices	256	* Initialize list of asociated devices
254	*/	257	*/
255	list_initialize(&driver->devices);	258	list_initialize(&driver->devices);
256		259
257	/*	260	/*
258	* Create connection to the driver	261	* Create connection to the driver
259	*/	262	*/
260	ipc_call_t call;	263	ipc_call_t call;
261	callid = async_get_call(&call);	264	callid = async_get_call(&call);
262		265
263	if (IPC_GET_METHOD(call) != IPC_M_CONNECT_TO_ME) {	266	if (IPC_GET_METHOD(call) != IPC_M_CONNECT_TO_ME) {
264	ipc_answer_0(callid, ENOTSUP);	267	ipc_answer_0(callid, ENOTSUP);
265		268
266	free(driver->name);	269	free(driver->name);
267	free(driver);	270	free(driver);
268	ipc_answer_0(iid, ENOTSUP);	271	ipc_answer_0(iid, ENOTSUP);
269	return;	272	return;
270	}	273	}
271		274
272	driver->phone = IPC_GET_ARG5(call);	275	driver->phone = IPC_GET_ARG5(call);
273		276
274	ipc_answer_0(callid, EOK);	277	ipc_answer_0(callid, EOK);
275		278
276	list_initialize(&(driver->drivers));	279	list_initialize(&(driver->drivers));
277		280
278	fibril_mutex_lock(&drivers_list_mutex);	281	fibril_mutex_lock(&drivers_list_mutex);
279		282
280	/* TODO:	283	/* TODO:
281	* check that no driver with name equal to driver->name is registered	284	* check that no driver with name equal to driver->name is registered
282	*/	285	*/
283		286
284	/*	287	/*
285	* Insert new driver into list of registered drivers	288	* Insert new driver into list of registered drivers
286	*/	289	*/
287	list_append(&(driver->drivers), &drivers_list);	290	list_append(&(driver->drivers), &drivers_list);
288	fibril_mutex_unlock(&drivers_list_mutex);	291	fibril_mutex_unlock(&drivers_list_mutex);
289		292
290	ipc_answer_0(iid, EOK);	293	ipc_answer_0(iid, EOK);
291		294
292	*odriver = driver;	295	*odriver = driver;
293	}	296	}
294		297
295	/**	298	/**
296	* Unregister device driver, unregister all its devices and free driver	299	* Unregister device driver, unregister all its devices and free driver
297	* structure.	300	* structure.
298	*	301	*
299	*/	302	*/
300	static int devmap_driver_unregister(devmap_driver_t *driver)	303	static int devmap_driver_unregister(devmap_driver_t *driver)
301	{	304	{
302	if (driver == NULL)	305	if (driver == NULL)
303	return EEXISTS;	306	return EEXISTS;
304		307
305	fibril_mutex_lock(&drivers_list_mutex);	308	fibril_mutex_lock(&drivers_list_mutex);
306		309
307	if (driver->phone != 0)	310	if (driver->phone != 0)
308	ipc_hangup(driver->phone);	311	ipc_hangup(driver->phone);
309		312
310	/* Remove it from list of drivers */	313	/* Remove it from list of drivers */
311	list_remove(&(driver->drivers));	314	list_remove(&(driver->drivers));
312		315
313	/* Unregister all its devices */	316	/* Unregister all its devices */
314	fibril_mutex_lock(&devices_list_mutex);	317	fibril_mutex_lock(&devices_list_mutex);
315	fibril_mutex_lock(&driver->devices_mutex);	318	fibril_mutex_lock(&driver->devices_mutex);
316		319
317	while (!list_empty(&(driver->devices))) {	320	while (!list_empty(&(driver->devices))) {
318	devmap_device_t *device = list_get_instance(driver->devices.next,	321	devmap_device_t *device = list_get_instance(driver->devices.next,
319	devmap_device_t, driver_devices);	322	devmap_device_t, driver_devices);
320	devmap_device_unregister_core(device);	323	devmap_device_unregister_core(device);
321	}	324	}
322		325
323	fibril_mutex_unlock(&driver->devices_mutex);	326	fibril_mutex_unlock(&driver->devices_mutex);
324	fibril_mutex_unlock(&devices_list_mutex);	327	fibril_mutex_unlock(&devices_list_mutex);
325	fibril_mutex_unlock(&drivers_list_mutex);	328	fibril_mutex_unlock(&drivers_list_mutex);
326		329
327	/* free name and driver */	330	/* free name and driver */
328	if (driver->name != NULL)	331	if (driver->name != NULL)
329	free(driver->name);	332	free(driver->name);
330		333
331	free(driver);	334	free(driver);
332		335
333	return EOK;	336	return EOK;
334	}	337	}
335		338
336	/** Register instance of device	339	/** Register instance of device
337	*	340	*
338	*/	341	*/
339	static void devmap_device_register(ipc_callid_t iid, ipc_call_t *icall,	342	static void devmap_device_register(ipc_callid_t iid, ipc_call_t *icall,
340	devmap_driver_t *driver)	343	devmap_driver_t *driver)
341	{	344	{
342	if (driver == NULL) {	345	if (driver == NULL) {
343	ipc_answer_0(iid, EREFUSED);	346	ipc_answer_0(iid, EREFUSED);
344	return;	347	return;
345	}	348	}
346		349
347	/* Create new device entry */	350	/* Create new device entry */
348	devmap_device_t device = (devmap_device_t ) malloc(sizeof(devmap_device_t));	351	devmap_device_t device = (devmap_device_t ) malloc(sizeof(devmap_device_t));
349	if (device == NULL) {	352	if (device == NULL) {
350	ipc_answer_0(iid, ENOMEM);	353	ipc_answer_0(iid, ENOMEM);
351	return;	354	return;
352	}	355	}
353		356
354	/* Get device name */	357	/* Get device name */
355	ipc_callid_t callid;	358	ipc_callid_t callid;
356	size_t size;	359	size_t size;
357	if (!ipc_data_write_receive(&callid, &size)) {	360	if (!ipc_data_write_receive(&callid, &size)) {
358	free(device);	361	free(device);
359	ipc_answer_0(iid, EREFUSED);	362	ipc_answer_0(iid, EREFUSED);
360	return;	363	return;
361	}	364	}
362		365
363	if (size > DEVMAP_NAME_MAXLEN) {	366	if (size > DEVMAP_NAME_MAXLEN) {
364	free(device);	367	free(device);
365	ipc_answer_0(callid, EINVAL);	368	ipc_answer_0(callid, EINVAL);
366	ipc_answer_0(iid, EREFUSED);	369	ipc_answer_0(iid, EREFUSED);
367	return;	370	return;
368	}	371	}
369		372
370	/* +1 for terminating \0 */	373	/* +1 for terminating \0 */
371	device->name = (char *) malloc(size + 1);	374	device->name = (char *) malloc(size + 1);
372		375
373	if (device->name == NULL) {	376	if (device->name == NULL) {
374	free(device);	377	free(device);
375	ipc_answer_0(callid, ENOMEM);	378	ipc_answer_0(callid, ENOMEM);
376	ipc_answer_0(iid, EREFUSED);	379	ipc_answer_0(iid, EREFUSED);
377	return;	380	return;
378	}	381	}
379		382
380	ipc_data_write_finalize(callid, device->name, size);	383	ipc_data_write_finalize(callid, device->name, size);
381	device->name[size] = 0;	384	device->name[size] = 0;
382		385
383	list_initialize(&(device->devices));	386	list_initialize(&(device->devices));
384	list_initialize(&(device->driver_devices));	387	list_initialize(&(device->driver_devices));
385		388
386	fibril_mutex_lock(&devices_list_mutex);	389	fibril_mutex_lock(&devices_list_mutex);
387		390
388	/* Check that device with such name is not already registered */	391	/* Check that device with such name is not already registered */
389	if (NULL != devmap_device_find_name(device->name)) {	392	if (NULL != devmap_device_find_name(device->name)) {
390	printf(NAME ": Device '%s' already registered\n", device->name);	393	printf(NAME ": Device '%s' already registered\n", device->name);
391	fibril_mutex_unlock(&devices_list_mutex);	394	fibril_mutex_unlock(&devices_list_mutex);
392	free(device->name);	395	free(device->name);
393	free(device);	396	free(device);
394	ipc_answer_0(iid, EEXISTS);	397	ipc_answer_0(iid, EEXISTS);
395	return;	398	return;
396	}	399	}
397		400
398	/* Get unique device handle */	401	/* Get unique device handle */
399	device->handle = devmap_create_handle();	402	device->handle = devmap_create_handle();
400		403
401	device->driver = driver;	404	device->driver = driver;
402		405
403	/* Insert device into list of all devices */	406	/* Insert device into list of all devices */
404	list_append(&device->devices, &devices_list);	407	list_append(&device->devices, &devices_list);
405		408
406	/* Insert device into list of devices that belog to one driver */	409	/* Insert device into list of devices that belog to one driver */
407	fibril_mutex_lock(&device->driver->devices_mutex);	410	fibril_mutex_lock(&device->driver->devices_mutex);
408		411
409	list_append(&device->driver_devices, &device->driver->devices);	412	list_append(&device->driver_devices, &device->driver->devices);
410		413
411	fibril_mutex_unlock(&device->driver->devices_mutex);	414	fibril_mutex_unlock(&device->driver->devices_mutex);
412	fibril_condvar_broadcast(&devices_list_cv);	415	fibril_condvar_broadcast(&devices_list_cv);
413	fibril_mutex_unlock(&devices_list_mutex);	416	fibril_mutex_unlock(&devices_list_mutex);
414		417
415	ipc_answer_1(iid, EOK, device->handle);	418	ipc_answer_1(iid, EOK, device->handle);
416	}	419	}
417		420
418	/**	421	/**
419	*	422	*
420	*/	423	*/
421	static int devmap_device_unregister(ipc_callid_t iid, ipc_call_t *icall,	424	static int devmap_device_unregister(ipc_callid_t iid, ipc_call_t *icall,
422	devmap_driver_t *driver)	425	devmap_driver_t *driver)
423	{	426	{
424	/* TODO */	427	/* TODO */
425	return EOK;	428	return EOK;
426	}	429	}
427		430
428	/** Connect client to the device.	431	/** Connect client to the device.
429	*	432	*
430	* Find device driver owning requested device and forward	433	* Find device driver owning requested device and forward
431	* the message to it.	434	* the message to it.
432	*	435	*
433	*/	436	*/
434	static void devmap_forward(ipc_callid_t callid, ipc_call_t *call)	437	static void devmap_forward(ipc_callid_t callid, ipc_call_t *call)
435	{	438	{
436	/*	439	/*
437	* Get handle from request	440	* Get handle from request
438	*/	441	*/
439	dev_handle_t handle = IPC_GET_ARG2(*call);	442	dev_handle_t handle = IPC_GET_ARG2(*call);
440	devmap_device_t *dev = devmap_device_find_handle(handle);	443	devmap_device_t *dev = devmap_device_find_handle(handle);
441		444
442	if ((dev == NULL) \|\| (dev->driver == NULL) \|\| (dev->driver->phone == 0)) {	445	if ((dev == NULL) \|\| (dev->driver == NULL) \|\| (dev->driver->phone == 0)) {
443	ipc_answer_0(callid, ENOENT);	446	ipc_answer_0(callid, ENOENT);
444	return;	447	return;
445	}	448	}
446		449
447	ipc_forward_fast(callid, dev->driver->phone, dev->handle,	450	ipc_forward_fast(callid, dev->driver->phone, dev->handle,
448	IPC_GET_ARG3(*call), 0, IPC_FF_NONE);	451	IPC_GET_ARG3(*call), 0, IPC_FF_NONE);
449	}	452	}
450		453
451	/** Find handle for device instance identified by name.	454	/** Find handle for device instance identified by name.
452	*	455	*
453	* In answer will be send EOK and device handle in arg1 or a error	456	* In answer will be send EOK and device handle in arg1 or a error
454	* code from errno.h.	457	* code from errno.h.
455	*	458	*
456	*/	459	*/
457	static void devmap_get_handle(ipc_callid_t iid, ipc_call_t *icall)	460	static void devmap_get_handle(ipc_callid_t iid, ipc_call_t *icall)
458	{	461	{
459	/*	462	/*
460	* Wait for incoming message with device name (but do not	463	* Wait for incoming message with device name (but do not
461	* read the name itself until the buffer is allocated).	464	* read the name itself until the buffer is allocated).
462	*/	465	*/
463	ipc_callid_t callid;	466	ipc_callid_t callid;
464	size_t size;	467	size_t size;
465	if (!ipc_data_write_receive(&callid, &size)) {	468	if (!ipc_data_write_receive(&callid, &size)) {
466	ipc_answer_0(callid, EREFUSED);	469	ipc_answer_0(callid, EREFUSED);
467	ipc_answer_0(iid, EREFUSED);	470	ipc_answer_0(iid, EREFUSED);
468	return;	471	return;
469	}	472	}
470		473
471	if ((size < 1) \|\| (size > DEVMAP_NAME_MAXLEN)) {	474	if ((size < 1) \|\| (size > DEVMAP_NAME_MAXLEN)) {
472	ipc_answer_0(callid, EINVAL);	475	ipc_answer_0(callid, EINVAL);
473	ipc_answer_0(iid, EREFUSED);	476	ipc_answer_0(iid, EREFUSED);
474	return;	477	return;
475	}	478	}
476		479
477	/*	480	/*
478	* Allocate buffer for device name.	481	* Allocate buffer for device name.
479	*/	482	*/
480	char name = (char ) malloc(size + 1);	483	char name = (char ) malloc(size + 1);
481	if (name == NULL) {	484	if (name == NULL) {
482	ipc_answer_0(callid, ENOMEM);	485	ipc_answer_0(callid, ENOMEM);
483	ipc_answer_0(iid, EREFUSED);	486	ipc_answer_0(iid, EREFUSED);
484	return;	487	return;
485	}	488	}
486		489
487	/*	490	/*
488	* Send confirmation to sender and get data into buffer.	491	* Send confirmation to sender and get data into buffer.
489	*/	492	*/
490	ipcarg_t retval = ipc_data_write_finalize(callid, name, size);	493	ipcarg_t retval = ipc_data_write_finalize(callid, name, size);
491	if (retval != EOK) {	494	if (retval != EOK) {
492	ipc_answer_0(iid, EREFUSED);	495	ipc_answer_0(iid, EREFUSED);
493	free(name);	496	free(name);
494	return;	497	return;
495	}	498	}
496	name[size] = '\0';	499	name[size] = '\0';
497		500

Subversion Repositories HelenOS

(root)/branches/network/uspace/srv/devmap/devmap.c – Rev 4581 → 4718