/*
 * midi usb driver
 * devlist.c
 *
 * Copyright 2006-2011 Haiku Inc.  All rights reserved.
 * Distributed under the terms of the MIT Licence.
 *
 * Authors:
 *		Jérôme Duval
 *		Pete Goodeve, pete.goodeve@computer.org
 *
 *		Some portions of this code were originally derived from
 *		USB Joystick driver for BeOS R5
 *		Copyright 2000 (C) ITO, Takayuki
 *		All rights reserved
 *
 */


#include "usb_midi.h"

#include <stdlib.h>
#include <string.h>


sem_id			usbmidi_port_list_lock = -1;
bool			usbmidi_port_list_changed = true;	/* added or removed */

static usbmidi_port_info*	usbmidi_port_list = NULL;
static int		usbmidi_port_count = 0;


void
add_port_info(usbmidi_port_info* port)
{
	assert(port != NULL);
	acquire_sem(usbmidi_port_list_lock);
	port->next = usbmidi_port_list;
	usbmidi_port_list = port;
	usbmidi_port_count++;
	usbmidi_port_list_changed = true;
	release_sem(usbmidi_port_list_lock);
}


void
remove_port_info(usbmidi_port_info* port)
{
	assert(port != NULL);
	acquire_sem(usbmidi_port_list_lock);
	if (usbmidi_port_list == port) {
		usbmidi_port_list = port->next;
		--usbmidi_port_count;
		usbmidi_port_list_changed = true;
	} else {
		usbmidi_port_info* d;
		for (d = usbmidi_port_list; d != NULL; d = d->next) {
			if (d->next == port) {
				d->next = port->next;
				--usbmidi_port_count;
				usbmidi_port_list_changed = true;
				break;
			}
		}
		assert(d != NULL);
	}
	release_sem(usbmidi_port_list_lock);
}


usbmidi_port_info*
search_port_info(const char* name)
{
	usbmidi_port_info* port;

	acquire_sem(usbmidi_port_list_lock);
	for (port = usbmidi_port_list; port != NULL; port = port->next) {
		if (strcmp(port->name, name) == 0)
			break;
	}
	release_sem(usbmidi_port_list_lock);
	return port;
}


int
find_free_device_number(void)
{
	usbmidi_port_info* port;
	int number = 0;

	acquire_sem(usbmidi_port_list_lock);
	do {
		for (port = usbmidi_port_list; port != NULL; port = port->next) {
			if (port->device->devnum == number) {
				number++;
				break;	/* try next higher */
			}
		}
	} while (port);
	release_sem(usbmidi_port_list_lock);
	return number;
}



/*
	device names
*/

/* dynamically generated */
char** usbmidi_port_names = NULL;


void
alloc_port_names(void)
{
	assert(usbmidi_port_names == NULL);
	usbmidi_port_names = (char**)malloc(sizeof(char*)
		* (usbmidi_port_count + 1));
}


void
free_port_names(void)
{
	if (usbmidi_port_names != NULL) {
		int i;
		for (i = 0; usbmidi_port_names[i] != NULL; i++)
			free(usbmidi_port_names[i]);
		free(usbmidi_port_names);
		usbmidi_port_names = NULL;
	}
}


void
rebuild_port_names(void)
{
	int i;
	usbmidi_port_info* port;

	assert(usbmidi_port_names != NULL);
	acquire_sem(usbmidi_port_list_lock);
	for (i = 0, port = usbmidi_port_list; port != NULL; port = port->next) {
		usbmidi_port_names[i++] = strdup(port->name);
		DPRINTF_INFO((MY_ID "publishing %s\n", port->name));
	}
	usbmidi_port_names[i] = NULL;
	release_sem(usbmidi_port_list_lock);
}