Add skeleton/WIP dialup network device...

git-svn-id: file:///srv/svn/repos/haiku/haiku/trunk@39576 a95241bf-73f2-0310-859d-f6bbb57e9c96

src/add-ons/kernel/network/devices/Jamfile

@@ -1,5 +1,6 @@
 SubDir HAIKU_TOP src add-ons kernel network devices ;
 
+SubInclude HAIKU_TOP src add-ons kernel network devices dialup ;
 SubInclude HAIKU_TOP src add-ons kernel network devices ethernet ;
 SubInclude HAIKU_TOP src add-ons kernel network devices loopback ;
 

src/add-ons/kernel/network/devices/dialup/Jamfile

@@ -0,0 +1,19 @@
+SubDir HAIKU_TOP src add-ons kernel network devices dialup ;
+
+SetSubDirSupportedPlatformsBeOSCompatible ;
+
+if $(TARGET_PLATFORM) != haiku {
+	UseHeaders [ FStandardOSHeaders ] : true ;
+		# Needed for <support/Errors.h> and maybe other stuff.
+	UseHeaders [ FDirName $(HAIKU_TOP) headers posix ] : true ;
+		# We need the public network headers also when not compiling for Haiku.
+		# Unfortunately we get more than we want, namely all POSIX headers.
+}
+
+UsePrivateKernelHeaders ;
+UsePrivateHeaders net ;
+
+KernelAddon dialup :
+	dialup.cpp
+;
+

src/add-ons/kernel/network/devices/dialup/dialup.cpp

@@ -0,0 +1,287 @@
+/*
+ * Copyright 2010, Haiku, Inc. All Rights Reserved.
+ * Distributed under the terms of the MIT License.
+ *
+ * Authors:
+ *		Philippe Houdoin, <phoudoin %at% haiku-os %dot% org>
+ */
+
+
+#include <net_buffer.h>
+#include <net_device.h>
+#include <net_stack.h>
+
+#include <KernelExport.h>
+
+#include <errno.h>
+#include <net/if.h>
+#include <net/if_dl.h>
+#include <net/if_media.h>
+#include <net/if_types.h>
+#include <new>
+#include <stdlib.h>
+#include <string.h>
+#include <unistd.h>
+#include <termios.h>
+
+#define HDLC_CONTROL_ESCAPE	0x7d
+#define HDLC_FLAG_SEQUENCE	0x7e
+#define HDLC_ALL_STATIONS	0xff
+#define HDLC_UI				0x03
+
+
+enum dialup_state {
+	DOWN,
+	DIALING,
+	UP,
+	HANGINGUP
+};
+
+struct dialup_device : net_device {
+	int				fd;
+	dialup_state 	state;
+	char*			init_string;
+	char*			dial_string;
+	char*			escape_string;
+	bigtime_t		escape_silence;
+	char*			hangup_string;
+};
+
+net_buffer_module_info* gBufferModule;
+static net_stack_module_info* sStackModule;
+
+//	#pragma mark -
+
+
+status_t
+dialup_init(const char* name, net_device** _device)
+{
+	// make sure this is a device in /dev/ports
+	if (strncmp(name, "/dev/ports/", 11))
+		return B_BAD_VALUE;
+
+	status_t status = get_module(NET_BUFFER_MODULE_NAME, (module_info**)&gBufferModule);
+	if (status < B_OK)
+		return status;
+
+	dialup_device* device = new (std::nothrow) dialup_device;
+	if (device == NULL) {
+		put_module(NET_BUFFER_MODULE_NAME);
+		return B_NO_MEMORY;
+	}
+
+	memset(device, 0, sizeof(dialup_device));
+
+	strcpy(device->name, name);
+	device->flags = IFF_POINTOPOINT;
+	device->type = IFT_PPP;
+	device->mtu = 1502;
+	device->media = 0;
+	device->header_length = 8; // HDLC_HEADER_LENGTH;
+	device->fd = -1;
+	device->state = DOWN;
+
+	// default AT strings
+	device->init_string = strdup("ATZ");
+	device->dial_string = strdup("ATDT");
+	device->escape_string = strdup("+++");
+	device->escape_silence  = 1000000;
+	device->hangup_string = strdup("ATH0");
+
+	*_device = device;
+	return B_OK;
+}
+
+
+status_t
+dialup_uninit(net_device* _device)
+{
+	dialup_device* device = (dialup_device*)_device;
+	free(device->init_string);
+	free(device->dial_string);
+	free(device->escape_string);
+	free(device->hangup_string);
+
+	delete device;
+
+	put_module(NET_BUFFER_MODULE_NAME);
+
+	return B_OK;
+}
+
+
+status_t
+dialup_up(net_device* _device)
+{
+	dialup_device* device = (dialup_device*)_device;
+
+	device->fd = open(device->name, O_RDWR);
+	if (device->fd < 0)
+		return errno;
+
+	// init port
+	struct termios options;
+	if (ioctl(device->fd, TCGETA, &options, sizeof(options)) < 0)
+		goto err;
+
+	// adjust options
+	options.c_cflag &= ~CBAUD;
+	options.c_cflag |= B115200;	// TODO: make this configurable too...
+	options.c_cflag |= (CLOCAL | CREAD);
+	options.c_lflag &= ~(ICANON | ECHO | ECHOE | ISIG);
+	options.c_oflag &= ~OPOST;
+	options.c_cc[VMIN] = 0;
+	options.c_cc[VTIME] = 10;
+
+	// set new options
+	if(ioctl(device->fd, TCSETA, &options) < 0)
+		goto err;
+
+	// TODO: init modem & start dialing phase
+	device->state = DIALING;
+	return B_OK;
+
+err:
+	close(device->fd);
+	device->fd = -1;
+	return errno;
+}
+
+
+void
+dialup_down(net_device* _device)
+{
+	dialup_device* device = (dialup_device*)_device;
+
+	// TODO: hangup if needed
+	if (device->flags & IFF_LINK) {
+		snooze(device->escape_silence);
+		if (write(device->fd, device->escape_string,
+			strlen(device->escape_string)) > 0) {
+			snooze(device->escape_silence);
+			// TODO: send hangup string and check for OK ack
+		}
+		device->flags &= ~IFF_LINK;
+	}
+
+	close(device->fd);
+	device->fd = -1;
+}
+
+
+status_t
+dialup_control(net_device* _device, int32 op, void* argument,
+	size_t length)
+{
+	dialup_device* device = (dialup_device*)_device;
+	return ioctl(device->fd, op, argument, length);
+}
+
+
+status_t
+dialup_send_data(net_device* _device, net_buffer* buffer)
+{
+	return B_NOT_SUPPORTED;
+}
+
+
+status_t
+dialup_receive_data(net_device* _device, net_buffer** _buffer)
+{
+	dialup_device* device = (dialup_device*)_device;
+
+	if (device->fd == -1)
+		return B_FILE_ERROR;
+
+	return ENOBUFS;
+}
+
+
+status_t
+dialup_set_mtu(net_device* _device, size_t mtu)
+{
+	dialup_device* device = (dialup_device*)_device;
+
+	device->mtu = mtu;
+	return B_OK;
+}
+
+
+status_t
+dialup_set_promiscuous(net_device* _device, bool promiscuous)
+{
+	return B_NOT_SUPPORTED;
+}
+
+
+status_t
+dialup_set_media(net_device* device, uint32 media)
+{
+	return B_NOT_SUPPORTED;
+}
+
+
+status_t
+dialup_add_multicast(struct net_device* _device, const sockaddr* _address)
+{
+	return B_NOT_SUPPORTED;
+}
+
+
+status_t
+dialup_remove_multicast(struct net_device* _device, const sockaddr* _address)
+{
+	return B_NOT_SUPPORTED;
+}
+
+
+static status_t
+dialup_std_ops(int32 op, ...)
+{
+	switch (op) {
+		case B_MODULE_INIT:
+		{
+			status_t status = get_module(NET_STACK_MODULE_NAME,
+				(module_info**)&sStackModule);
+			if (status < B_OK)
+				return status;
+
+			return B_OK;
+		}
+
+		case B_MODULE_UNINIT:
+		{
+			put_module(NET_STACK_MODULE_NAME);
+			return B_OK;
+		}
+
+		default:
+			return B_ERROR;
+	}
+}
+
+
+net_device_module_info sDialUpModule = {
+	{
+		"network/devices/dialup/v1",
+		0,
+		dialup_std_ops
+	},
+	dialup_init,
+	dialup_uninit,
+	dialup_up,
+	dialup_down,
+	dialup_control,
+	dialup_send_data,
+	dialup_receive_data,
+	dialup_set_mtu,
+	dialup_set_promiscuous,
+	dialup_set_media,
+	dialup_add_multicast,
+	dialup_remove_multicast,
+};
+
+module_info* modules[] = {
+	(module_info*)&sDialUpModule,
+	NULL
+};