metalsvm/kernel/main.c

/* 
 * Copyright 2010 Stefan Lankes, Chair for Operating Systems,
 *                               RWTH Aachen University
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 *     http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software
 * distributed under the License is distributed on an "AS IS" BASIS,
 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 * See the License for the specific language governing permissions and
 * limitations under the License.
 *
 * This file is part of MetalSVM. 
 */

#include <metalsvm/stddef.h>
#include <metalsvm/stdio.h>
#include <metalsvm/string.h>
#include <metalsvm/time.h>
#include <metalsvm/mmu.h>
#include <metalsvm/tasks.h>
#include <metalsvm/processor.h>
#include <metalsvm/fs.h>
#include <metalsvm/errno.h>
#include <asm/irq.h>
#include <asm/irqflags.h>
#include <asm/kb.h>
#ifdef CONFIG_PCI
#include <asm/pci.h>
#endif
#ifdef CONFIG_LWIP
#include <lwip/init.h>
#include <lwip/sys.h>
#include <lwip/stats.h>
#include <lwip/udp.h>
#include <lwip/tcp.h>
#include <lwip/dhcp.h>
#include <lwip/netif.h>
#include <netif/etharp.h>
#endif
#include <net/rtl8139.h>

extern int test_init(void);

/* 
 * Note that linker symbols are not variables, they have no memory allocated for
 * maintaining a value, rather their address is their value.
 */
extern const void kernel_start;
extern const void kernel_end;
extern char __BUILD_DATE;
extern char __BUILD_TIME;
extern char __BUILD_VERSION;

static void list_fs(vfs_node_t* node, uint32_t depth)
{
	int j, i = 0;
	dirent_t* dirent = NULL;

	while ((dirent = readdir_fs(node, i)) != 0) {
		for(j=0; j<depth; j++)
			kputs("  ");
		kprintf("%s\n", dirent->name);

		if (strcmp(dirent->name, ".") && strcmp(dirent->name, "..")) {
			vfs_node_t *new_node = finddir_fs(node, dirent->name);
			if (new_node) {
				if (new_node->type == FS_FILE) {
					char buff[16] = {[0 ... 15] = 0x00};

					read_fs(new_node, (uint8_t*)buff, 8, 0);
					for(j=0; j<depth+1; j++)
						kputs("  ");
					kprintf("content: %s\n", buff);
				} else list_fs(new_node, depth+1);
			}
		}

		i++;
	}
}

static void list_root(void) {
	kprintf("List of the file system:\n/\n");
	list_fs(fs_root, 1);
}

#if defined(CONFIG_LWIP) && defined(CONFIG_PCI)
void echo_init(void);
void ping_init(void);

int STDCALL rtl8139if_task(void* arg)
{
	struct netif 	netif;
	struct ip_addr	ipaddr;
	struct ip_addr	netmask;
	struct ip_addr	gw;
	uint32_t mscnt = 0;

	kputs("Network task is started\n");

	/* Set network address variables */
	//IP4_ADDR(&gw, 192,168,1,254);
	//IP4_ADDR(&ipaddr, 192,168,1,100);
	//IP4_ADDR(&netmask, 255,255,255,0);
	/* Clear network address because we use DHCP to get an ip address */
	IP4_ADDR(&gw, 0,0,0,0);
	IP4_ADDR(&ipaddr, 0,0,0,0);
	IP4_ADDR(&netmask, 0,0,0,0);

	/* Clear the IP address, Subnet Mask, and Gateway */
	ipaddr.addr = 0;
	netmask.addr = 0;
	gw.addr = 0;

	/* Bring up the network interface */
	if (!netif_add(&netif, &ipaddr, &netmask, &gw, NULL, rtl8139if_init, ethernet_input)) {
		kputs("Unable to add network interface\n");
		return -ENXIO;
	}

	netif_set_default(&netif);

	if (netif_is_up(&netif)) {
		kputs("Network interface is not up\n");
		return -EIO;
	}

	kprintf("Starting DHCPCD...\n");
	dhcp_start(&netif);

	// start echo server
	echo_init();
	ping_init();

	while(1) {
		rtl8139if_poll(&netif);
	}

	dhcp_release(&netif);
	dhcp_stop(&netif);

	return 0;
}
#endif

int main(void)
{
#if defined(CONFIG_LWIP) && defined(CONFIG_PCI)
	tid_t rtl8139_id;
#endif

	kprintf("This is MetalSVM %s Build %u, %u, %u\n", METALSVM_VERSION, &__BUILD_VERSION, &__BUILD_DATE, &__BUILD_TIME);

	system_init();
	irq_init();
	timer_init();
#ifdef CONFIG_KEYBOARD
	keyboard_init();
#endif
	mmu_init();
	multitasking_init();
	koutput_init();
   	initrd_init();

	irq_enable();

	kprintf("Kernel starts at %p and ends at %p\n", &kernel_start, &kernel_end);
		
	system_calibration();
#ifdef CONFIG_LWIP
	lwip_init();
#endif

	kprintf("Processor frequency: %u MHz\n", get_cpu_frequency());
	kprintf("Total memory: %u MBytes\n", atomic_int32_read(&total_pages)/((1024*1024)/PAGE_SIZE));
	kprintf("Current allocated memory: %u KBytes\n", atomic_int32_read(&total_allocated_pages)*(PAGE_SIZE/1024));
	kprintf("Current available memory: %u MBytes\n", atomic_int32_read(&total_available_pages)/((1024*1024)/PAGE_SIZE));

	sleep(5);
	list_root();
	//test_init();

#if defined(CONFIG_LWIP) && defined(CONFIG_PCI)
	create_kernel_task(&rtl8139_id, rtl8139if_task, NULL);
#endif

	per_core(current_task)->status = TASK_IDLE;
	reschedule();

	while(1) { 
		NOP8;
	}

	return 0;
}