summaryrefslogtreecommitdiffstats
path: root/qemu/roms/SLOF/clients
diff options
context:
space:
mode:
Diffstat (limited to 'qemu/roms/SLOF/clients')
-rw-r--r--qemu/roms/SLOF/clients/.gitignore3
-rw-r--r--qemu/roms/SLOF/clients/Makefile29
-rw-r--r--qemu/roms/SLOF/clients/clients.mk13
-rw-r--r--qemu/roms/SLOF/clients/net-snk/Makefile66
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/Makefile51
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/biosemu/Makefile38
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/biosemu/biosemu.c345
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/biosemu/biosemu.h42
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/biosemu/debug.c55
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/biosemu/debug.h74
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/biosemu/device.c324
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/biosemu/device.h157
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/biosemu/interrupt.c606
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/biosemu/interrupt.h21
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/biosemu/io.c382
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/biosemu/io.h30
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/biosemu/mem.c464
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/biosemu/mem.h36
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/biosemu/vbe.c780
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/biosemu/vbe.h18
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/main.c77
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netapps/Makefile28
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netapps/args.c143
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netapps/args.h22
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netapps/netapps.h30
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netapps/netboot.c858
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netapps/ping.c196
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netlib/Makefile42
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netlib/bootp.c255
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netlib/dhcp.c955
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netlib/dhcp.h54
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netlib/dhcpv6.c212
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netlib/dhcpv6.h154
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netlib/dns.c527
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netlib/dns.h28
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netlib/ethernet.c189
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netlib/ethernet.h47
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netlib/icmpv6.c390
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netlib/icmpv6.h135
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netlib/ipv4.c877
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netlib/ipv4.h96
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netlib/ipv6.c747
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netlib/ipv6.h188
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netlib/ndp.c166
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netlib/ndp.h71
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netlib/tcp.c46
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netlib/tcp.h27
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netlib/tftp.c586
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netlib/tftp.h51
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netlib/udp.c153
-rw-r--r--qemu/roms/SLOF/clients/net-snk/app/netlib/udp.h58
-rw-r--r--qemu/roms/SLOF/clients/net-snk/client.lds85
-rw-r--r--qemu/roms/SLOF/clients/net-snk/include/crt0.h20
-rw-r--r--qemu/roms/SLOF/clients/net-snk/include/fcntl.h25
-rw-r--r--qemu/roms/SLOF/clients/net-snk/include/fileio.h31
-rw-r--r--qemu/roms/SLOF/clients/net-snk/include/kernel.h33
-rw-r--r--qemu/roms/SLOF/clients/net-snk/include/of.h70
-rw-r--r--qemu/roms/SLOF/clients/net-snk/include/pci.h20
-rw-r--r--qemu/roms/SLOF/clients/net-snk/include/rtas.h45
-rw-r--r--qemu/roms/SLOF/clients/net-snk/include/sys/socket.h53
-rw-r--r--qemu/roms/SLOF/clients/net-snk/include/time.h36
-rw-r--r--qemu/roms/SLOF/clients/net-snk/kernel/Makefile31
-rw-r--r--qemu/roms/SLOF/clients/net-snk/kernel/crt0.c78
-rw-r--r--qemu/roms/SLOF/clients/net-snk/kernel/entry.S127
-rw-r--r--qemu/roms/SLOF/clients/net-snk/kernel/init.c67
-rw-r--r--qemu/roms/SLOF/clients/net-snk/kernel/systemcall.c176
-rw-r--r--qemu/roms/SLOF/clients/net-snk/kernel/timer.c39
-rw-r--r--qemu/roms/SLOF/clients/net-snk/libc/Makefile45
-rw-r--r--qemu/roms/SLOF/clients/net-snk/libc/sbrk.c39
-rw-r--r--qemu/roms/SLOF/clients/net-snk/libc/time/Makefile34
-rw-r--r--qemu/roms/SLOF/clients/net-snk/libc/time/ftime.c38
-rw-r--r--qemu/roms/SLOF/clients/net-snk/libc/time/timer.c36
-rw-r--r--qemu/roms/SLOF/clients/net-snk/make.rules25
-rw-r--r--qemu/roms/SLOF/clients/net-snk/oflib/Makefile41
-rw-r--r--qemu/roms/SLOF/clients/net-snk/oflib/entry.S38
-rw-r--r--qemu/roms/SLOF/clients/net-snk/oflib/of.c715
-rw-r--r--qemu/roms/SLOF/clients/net-snk/oflib/pci.c60
-rw-r--r--qemu/roms/SLOF/clients/net-snk/oflib/rtas.c226
-rw-r--r--qemu/roms/SLOF/clients/net-snk/sec-client.lds43
-rw-r--r--qemu/roms/SLOF/clients/takeover/Makefile60
-rw-r--r--qemu/roms/SLOF/clients/takeover/client.lds60
-rw-r--r--qemu/roms/SLOF/clients/takeover/entry.S99
-rw-r--r--qemu/roms/SLOF/clients/takeover/main.c163
-rw-r--r--qemu/roms/SLOF/clients/takeover/ppc32wrap.S30
-rw-r--r--qemu/roms/SLOF/clients/takeover/takeover.h23
-rw-r--r--qemu/roms/SLOF/clients/takeover/takeover.ocobin3360 -> 0 bytes
86 files changed, 0 insertions, 13653 deletions
diff --git a/qemu/roms/SLOF/clients/.gitignore b/qemu/roms/SLOF/clients/.gitignore
deleted file mode 100644
index c5c20bfab..000000000
--- a/qemu/roms/SLOF/clients/.gitignore
+++ /dev/null
@@ -1,3 +0,0 @@
-*.client
-*/client
-*/client.unstripped
diff --git a/qemu/roms/SLOF/clients/Makefile b/qemu/roms/SLOF/clients/Makefile
deleted file mode 100644
index d656f08ce..000000000
--- a/qemu/roms/SLOF/clients/Makefile
+++ /dev/null
@@ -1,29 +0,0 @@
-# *****************************************************************************
-# * Copyright (c) 2004, 2008 IBM Corporation
-# * All rights reserved.
-# * This program and the accompanying materials
-# * are made available under the terms of the BSD License
-# * which accompanies this distribution, and is available at
-# * http://www.opensource.org/licenses/bsd-license.php
-# *
-# * Contributors:
-# * IBM Corporation - initial implementation
-# ****************************************************************************/
-
-include clients.mk
-
-all:
- for dir in $(CLIENTS); do \
- if [ -r $$dir/Makefile ]; then \
- $(MAKE) -C $$dir "FLAG=$(FLAG)" || exit 1; \
- cp $$dir/client $$dir.client; \
- fi; \
- done
-
-clean distclean:
- @for dir in $(CLIENTS); do \
- if [ -r $$dir/Makefile ]; then \
- $(MAKE) -C $$dir $@ || exit 1; \
- rm -f $$dir.client; \
- fi; \
- done
diff --git a/qemu/roms/SLOF/clients/clients.mk b/qemu/roms/SLOF/clients/clients.mk
deleted file mode 100644
index ca741e420..000000000
--- a/qemu/roms/SLOF/clients/clients.mk
+++ /dev/null
@@ -1,13 +0,0 @@
-# *****************************************************************************
-# * Copyright (c) 2004, 2008 IBM Corporation
-# * All rights reserved.
-# * This program and the accompanying materials
-# * are made available under the terms of the BSD License
-# * which accompanies this distribution, and is available at
-# * http://www.opensource.org/licenses/bsd-license.php
-# *
-# * Contributors:
-# * IBM Corporation - initial implementation
-# ****************************************************************************/
-
-CLIENTS = net-snk
diff --git a/qemu/roms/SLOF/clients/net-snk/Makefile b/qemu/roms/SLOF/clients/net-snk/Makefile
deleted file mode 100644
index c0bb73a52..000000000
--- a/qemu/roms/SLOF/clients/net-snk/Makefile
+++ /dev/null
@@ -1,66 +0,0 @@
-# *****************************************************************************
-# * Copyright (c) 2004, 2008 IBM Corporation
-# * All rights reserved.
-# * This program and the accompanying materials
-# * are made available under the terms of the BSD License
-# * which accompanies this distribution, and is available at
-# * http://www.opensource.org/licenses/bsd-license.php
-# *
-# * Contributors:
-# * IBM Corporation - initial implementation
-# ****************************************************************************/
-
-TOP=$(shell pwd)
-export TOP
-include $(TOP)/make.rules
-
-OBJS = kernel/kernel.o oflib/oflib.o libc/libc-glue.o app/app.o
-.PHONY : subdirs clean depend mrproper
-
-CLIENTLIBS = $(LIBCMNDIR)/libelf.a $(LIBCMNDIR)/libc.a
-
-all: .depend subdirs
- $(MAKE) client
-
-client : $(OBJS) $(CLIENTLIBS)
- $(LD) $(LDFLAGS) -o $@ -Tclient.lds $(OBJS) $(CLIENTLIBS)
- cp $@ $@.unstripped
- $(STRIP) --strip-unneeded $@
-
-client.dis: client
- $(OBJDUMP) -DSsx client.unstripped > $@
-
-sec-client : subdirs $(OBJS) $(LIBCMNDIR)/libc.a
- $(LD) $(LDFLAGS) -o $@ -Tsec-client.lds $(OBJS) $(LIBCMNDIR)/libc.a
-
-subdirs :
- @for dir in $(dir $(OBJS)); do \
- $(MAKE) -C $$dir || exit 1; \
- done
-
-$(LIBCMNDIR)/%.a:
- $(MAKE) -C $(LIBCMNDIR) $(@:$(LIBCMNDIR)/%.a=%)
-
-clean:
- @for dir in $(dir $(OBJS)); do \
- $(MAKE) -C $$dir clean; \
- done
- rm -f $(OBJS) client diag netboot sec-client net-diag \
- *.dis client.unstripped fpga-client
-
-mrproper : clean
- $(MAKE) -C app mrproper
- $(MAKE) -C libc mrproper
- $(MAKE) -C kernel mrproper
- $(MAKE) -C oflib mrproper
- find -name .*.bak | xargs rm -rf
- $(RM) .depend
-
-distclean: mrproper
-
-depend .depend:
- $(MAKE) -C app depend
- $(MAKE) -C libc depend
- $(MAKE) -C kernel depend
- $(MAKE) -C oflib depend
- touch .depend
diff --git a/qemu/roms/SLOF/clients/net-snk/app/Makefile b/qemu/roms/SLOF/clients/net-snk/app/Makefile
deleted file mode 100644
index 8b0c08f19..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/Makefile
+++ /dev/null
@@ -1,51 +0,0 @@
-# *****************************************************************************
-# * Copyright (c) 2004, 2011 IBM Corporation
-# * All rights reserved.
-# * This program and the accompanying materials
-# * are made available under the terms of the BSD License
-# * which accompanies this distribution, and is available at
-# * http://www.opensource.org/licenses/bsd-license.php
-# *
-# * Contributors:
-# * IBM Corporation - initial implementation
-# ****************************************************************************/
-
-ifndef TOP
-TOP = $(shell while ! test -e make.rules; do cd .. ; done; pwd)
-export TOP
-endif
-include $(TOP)/make.rules
-
-CFLAGS +=$(ADDCFLAGS)
-
-OBJS = main.o
-OBJDIRS = netlib/netlib.o netapps/netboot.o
-OBJDIRS += netapps/ping.o
-OBJDIRS += netapps/args.o
-
-ifeq ($(SNK_BIOSEMU_APPS), 1)
-OBJDIRS += biosemu/biosemu_app.o
-CFLAGS += -DSNK_BIOSEMU_APPS
-endif
-
-SUBDIRS = $(dir $(OBJDIRS))
-
-all: subdirs
- $(MAKE) app.o
-
-subdirs:
- for dir in $(SUBDIRS); do \
- $(MAKE) -C $$dir DIRECTORY=$(DIRECTORY)$$dir || exit 1; \
- done
-
-app.o: $(OBJS) $(OBJDIRS)
- $(LD) $(LDFLAGS) $(OBJDIRS) $(OBJS) -o $@ -r
-
-clean :
- $(RM) -f *.o *.a *.i
- for dir in $(SUBDIRS); do \
- $(CLEAN) ; \
- $(MAKE) -C $$dir DIRECTORY=$(DIRECTORY)$$dir clean; \
- done
-
-include $(TOP)/make.depend
diff --git a/qemu/roms/SLOF/clients/net-snk/app/biosemu/Makefile b/qemu/roms/SLOF/clients/net-snk/app/biosemu/Makefile
deleted file mode 100644
index 3a07ada31..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/biosemu/Makefile
+++ /dev/null
@@ -1,38 +0,0 @@
-# *****************************************************************************
-# * Copyright (c) 2004, 2008 IBM Corporation
-# * All rights reserved.
-# * This program and the accompanying materials
-# * are made available under the terms of the BSD License
-# * which accompanies this distribution, and is available at
-# * http://www.opensource.org/licenses/bsd-license.php
-# *
-# * Contributors:
-# * IBM Corporation - initial implementation
-# ****************************************************************************/
-
-ifndef TOP
- TOP = $(shell while ! test -e make.rules; do cd .. ; done; pwd)
- export TOP
-endif
-include $(TOP)/make.rules
-
-CFLAGS += -I$(ROOTDIR)/other-licence/x86emu -I$(ROOTDIR)/other-licence/x86emu/include
-
-OBJS = biosemu.o debug.o device.o mem.o io.o interrupt.o vbe.o
-LIBX86EMU = $(ROOTDIR)/other-licence/x86emu/libx86emu.a
-
-.PHONY: $(LIBX86EMU)
-
-all: biosemu_app.o
-
-# special rule for libx86emu.a
-$(LIBX86EMU):
- $(MAKE) -C $(dir $@)
-
-biosemu_app.o: $(OBJS) $(LIBX86EMU)
- $(LD) $(LDFLAGS) $^ -o $@ -r
-
-clean:
- $(RM) -f *.o *.a *.i *.s
-
-include $(TOP)/make.depend
diff --git a/qemu/roms/SLOF/clients/net-snk/app/biosemu/biosemu.c b/qemu/roms/SLOF/clients/net-snk/app/biosemu/biosemu.c
deleted file mode 100644
index 82a763acf..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/biosemu/biosemu.c
+++ /dev/null
@@ -1,345 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-
-#include <stdint.h>
-#include <cpu.h>
-
-#include "debug.h"
-
-#include <x86emu/x86emu.h>
-#include <x86emu/regs.h>
-#include <x86emu/prim_ops.h> // for push_word
-
-#include "biosemu.h"
-#include "io.h"
-#include "mem.h"
-#include "interrupt.h"
-#include "device.h"
-
-#include <rtas.h>
-
-
-static X86EMU_memFuncs my_mem_funcs = {
- my_rdb, my_rdw, my_rdl,
- my_wrb, my_wrw, my_wrl
-};
-
-static X86EMU_pioFuncs my_pio_funcs = {
- my_inb, my_inw, my_inl,
- my_outb, my_outw, my_outl
-};
-
-void dump(uint8_t * addr, uint32_t len);
-
-uint32_t
-biosemu(char argc, char **argv)
-{
- uint8_t *rom_image;
- int i = 0;
- uint8_t *biosmem;
- uint32_t biosmem_size;
-#ifdef DEBUG
- //debug_flags = DEBUG_PRINT_INT10 | DEBUG_PNP;// | DEBUG_PMM;// | DEBUG_INTR | DEBUG_CHECK_VMEM_ACCESS | DEBUG_MEM | DEBUG_IO;// | DEBUG_TRACE_X86EMU | DEBUG_JMP;
-#endif
- if (argc < 4) {
- printf("Usage %s <vmem_base> <vmem_size> <device_path> [<debug_flags>]\n", argv[0]);
- for (i = 0; i < argc; i++) {
- printf("argv[%d]: %s\n", i, argv[i]);
- }
- return -1;
- }
- // argv[1] is address of virtual BIOS mem...
- // argv[2] is the size
- biosmem = (uint8_t *) strtoul(argv[1], 0, 16);
- biosmem_size = strtoul(argv[2], 0, 16);
- if (biosmem_size < MIN_REQUIRED_VMEM_SIZE) {
- printf("Error: Not enough virtual memory: %x, required: %x!\n",
- biosmem_size, MIN_REQUIRED_VMEM_SIZE);
- return -1;
- }
- // argv[3] is the device to open and use...
- if (dev_init(argv[3]) != 0) {
- printf("Error initializing device!\n");
- return -1;
- }
- if (dev_check_exprom() != 0) {
- printf("Error: Device Expansion ROM invalid!\n");
- return -1;
- }
- // argv[4] if set, is additional debug_flags
- if (argc >= 5) {
- debug_flags |= strtoul(argv[4], 0, 16);
- printf("debug_flags: %x\n", debug_flags);
- }
- rom_image = (uint8_t *) bios_device.img_addr;
- DEBUG_PRINTF("executing rom_image from %p\n", rom_image);
- DEBUG_PRINTF("biosmem at %p\n", biosmem);
-
- DEBUG_PRINTF("Image Size: %d\n", bios_device.img_size);
-
- // in case we jump somewhere unexpected, or execution is finished,
- // fill the biosmem with hlt instructions (0xf4)
- memset(biosmem, 0xf4, biosmem_size);
-
- M.mem_base = (long) biosmem;
- M.mem_size = biosmem_size;
- DEBUG_PRINTF("membase set: %08x, size: %08x\n", (int) M.mem_base,
- (int) M.mem_size);
-
- // copy expansion ROM image to segment OPTION_ROM_CODE_SEGMENT
- // NOTE: this sometimes fails, some bytes are 0x00... so we compare
- // after copying and do some retries...
- uint8_t *mem_img = biosmem + (OPTION_ROM_CODE_SEGMENT << 4);
- uint8_t copy_count = 0;
- uint8_t cmp_result = 0;
- do {
-#if 0
- set_ci();
- memcpy(mem_img, rom_image, len);
- clr_ci();
-#else
- // memcpy fails... try copy byte-by-byte with set/clr_ci
- uint8_t c;
- for (i = 0; i < bios_device.img_size; i++) {
- set_ci();
- c = *(rom_image + i);
- if (c != *(rom_image + i)) {
- clr_ci();
- printf("Copy failed at: %x/%x\n", i,
- bios_device.img_size);
- printf("rom_image(%x): %x, mem_img(%x): %x\n",
- i, *(rom_image + i), i, *(mem_img + i));
- break;
- }
- clr_ci();
- *(mem_img + i) = c;
- }
-#endif
- copy_count++;
- set_ci();
- cmp_result = memcmp(mem_img, rom_image, bios_device.img_size);
- clr_ci();
- }
- while ((copy_count < 5) && (cmp_result != 0));
- if (cmp_result != 0) {
- printf
- ("\nCopying Expansion ROM Image to Memory failed after %d retries! (%x)\n",
- copy_count, cmp_result);
- dump(rom_image, 0x20);
- dump(mem_img, 0x20);
- return 0;
- }
- // setup default Interrupt Vectors
- // some expansion ROMs seem to check for these addresses..
- // each handler is only an IRET (0xCF) instruction
- // ROM BIOS Int 10 Handler F000:F065
- my_wrl(0x10 * 4, 0xf000f065);
- my_wrb(0x000ff065, 0xcf);
- // ROM BIOS Int 11 Handler F000:F84D
- my_wrl(0x11 * 4, 0xf000f84d);
- my_wrb(0x000ff84d, 0xcf);
- // ROM BIOS Int 12 Handler F000:F841
- my_wrl(0x12 * 4, 0xf000f841);
- my_wrb(0x000ff841, 0xcf);
- // ROM BIOS Int 13 Handler F000:EC59
- my_wrl(0x13 * 4, 0xf000ec59);
- my_wrb(0x000fec59, 0xcf);
- // ROM BIOS Int 14 Handler F000:E739
- my_wrl(0x14 * 4, 0xf000e739);
- my_wrb(0x000fe739, 0xcf);
- // ROM BIOS Int 15 Handler F000:F859
- my_wrl(0x15 * 4, 0xf000f859);
- my_wrb(0x000ff859, 0xcf);
- // ROM BIOS Int 16 Handler F000:E82E
- my_wrl(0x16 * 4, 0xf000e82e);
- my_wrb(0x000fe82e, 0xcf);
- // ROM BIOS Int 17 Handler F000:EFD2
- my_wrl(0x17 * 4, 0xf000efd2);
- my_wrb(0x000fefd2, 0xcf);
- // ROM BIOS Int 1A Handler F000:FE6E
- my_wrl(0x1a * 4, 0xf000fe6e);
- my_wrb(0x000ffe6e, 0xcf);
-
- // setup BIOS Data Area (0000:04xx, or 0040:00xx)
- // we currently 0 this area, meaning "we dont have
- // any hardware" :-) no serial/parallel ports, floppys, ...
- memset(biosmem + 0x400, 0x0, 0x100);
-
- // at offset 13h in BDA is the memory size in kbytes
- my_wrw(0x413, biosmem_size / 1024);
- // at offset 0eh in BDA is the segment of the Extended BIOS Data Area
- // see setup further down
- my_wrw(0x40e, INITIAL_EBDA_SEGMENT);
- // TODO: setup BDA Video Data ( offset 49h-66h)
- // e.g. to store video mode, cursor position, ...
- // in int10 (done) handler and VBE Functions
-
- // TODO: setup BDA Fixed Disk Data
- // 74h: Fixed Disk Last Operation Status
- // 75h: Fixed Disk Number of Disk Drives
-
- // TODO: check BDA for further needed data...
-
- //setup Extended BIOS Data Area
- //we currently 0 this area
- memset(biosmem + (INITIAL_EBDA_SEGMENT << 4), 0, INITIAL_EBDA_SIZE);
- // at offset 0h in EBDA is the size of the EBDA in KB
- my_wrw((INITIAL_EBDA_SEGMENT << 4) + 0x0, INITIAL_EBDA_SIZE / 1024);
- //TODO: check for further needed EBDA data...
-
- // setup original ROM BIOS Area (F000:xxxx)
- char *date = "06/11/99";
- for (i = 0; date[i]; i++)
- my_wrb(0xffff5 + i, date[i]);
- // set up eisa ident string
- char *ident = "PCI_ISA";
- for (i = 0; ident[i]; i++)
- my_wrb(0xfffd9 + i, ident[i]);
-
- // write system model id for IBM-AT
- // according to "Ralf Browns Interrupt List" Int15 AH=C0 Table 515,
- // model FC is the original AT and also used in all DOSEMU Versions.
- my_wrb(0xFFFFE, 0xfc);
-
- //setup interrupt handler
- X86EMU_intrFuncs intrFuncs[256];
- for (i = 0; i < 256; i++)
- intrFuncs[i] = handleInterrupt;
- X86EMU_setupIntrFuncs(intrFuncs);
- X86EMU_setupPioFuncs(&my_pio_funcs);
- X86EMU_setupMemFuncs(&my_mem_funcs);
-
- // setup the CPU
- M.x86.R_AH = bios_device.bus;
- M.x86.R_AL = bios_device.devfn;
- M.x86.R_DX = 0x80;
- M.x86.R_EIP = 3;
- M.x86.R_CS = OPTION_ROM_CODE_SEGMENT;
-
- // Initialize stack and data segment
- M.x86.R_SS = STACK_SEGMENT;
- M.x86.R_SP = STACK_START_OFFSET;
- M.x86.R_DS = DATA_SEGMENT;
-
- // push a HLT instruction and a pointer to it onto the stack
- // any return will pop the pointer and jump to the HLT, thus
- // exiting (more or less) cleanly
- push_word(0xf4f4); //F4=HLT
- push_word(M.x86.R_SS);
- push_word(M.x86.R_SP + 2);
-
- CHECK_DBG(DEBUG_TRACE_X86EMU) {
- X86EMU_trace_on();
- } else {
-#ifdef DEBUG
- M.x86.debug |= DEBUG_SAVE_IP_CS_F;
- M.x86.debug |= DEBUG_DECODE_F;
- M.x86.debug |= DEBUG_DECODE_NOPRINT_F;
-#endif
- }
- CHECK_DBG(DEBUG_JMP) {
- M.x86.debug |= DEBUG_TRACEJMP_F;
- M.x86.debug |= DEBUG_TRACEJMP_REGS_F;
- M.x86.debug |= DEBUG_TRACECALL_F;
- M.x86.debug |= DEBUG_TRACECALL_REGS_F;
- }
-
- DEBUG_PRINTF("Executing Initialization Vector...\n");
- X86EMU_exec();
- DEBUG_PRINTF("done\n");
-
- // according to PNP BIOS Spec, Option ROMs should upon exit, return some boot device status in
- // AX (see PNP BIOS Spec Section 3.3
- DEBUG_PRINTF_CS_IP("Option ROM Exit Status: %04x\n", M.x86.R_AX);
-#ifdef DEBUG
- DEBUG_PRINTF("Exit Status Decode:\n");
- if (M.x86.R_AX & 0x100) { // bit 8
- DEBUG_PRINTF
- (" IPL Device supporting INT 13h Block Device Format:\n");
- switch (((M.x86.R_AX >> 4) & 0x3)) { // bits 5:4
- case 0:
- DEBUG_PRINTF(" No IPL Device attached\n");
- break;
- case 1:
- DEBUG_PRINTF(" IPL Device status unknown\n");
- break;
- case 2:
- DEBUG_PRINTF(" IPL Device attached\n");
- break;
- case 3:
- DEBUG_PRINTF(" IPL Device status RESERVED!!\n");
- break;
- }
- }
- if (M.x86.R_AX & 0x80) { // bit 7
- DEBUG_PRINTF
- (" Output Device supporting INT 10h Character Output:\n");
- switch (((M.x86.R_AX >> 4) & 0x3)) { // bits 5:4
- case 0:
- DEBUG_PRINTF(" No Display Device attached\n");
- break;
- case 1:
- DEBUG_PRINTF(" Display Device status unknown\n");
- break;
- case 2:
- DEBUG_PRINTF(" Display Device attached\n");
- break;
- case 3:
- DEBUG_PRINTF(" Display Device status RESERVED!!\n");
- break;
- }
- }
- if (M.x86.R_AX & 0x40) { // bit 6
- DEBUG_PRINTF
- (" Input Device supporting INT 9h Character Input:\n");
- switch (((M.x86.R_AX >> 4) & 0x3)) { // bits 5:4
- case 0:
- DEBUG_PRINTF(" No Input Device attached\n");
- break;
- case 1:
- DEBUG_PRINTF(" Input Device status unknown\n");
- break;
- case 2:
- DEBUG_PRINTF(" Input Device attached\n");
- break;
- case 3:
- DEBUG_PRINTF(" Input Device status RESERVED!!\n");
- break;
- }
- }
-#endif
- // check wether the stack is "clean" i.e. containing the HLT instruction
- // we pushed before executing, and pointing to the original stack address...
- // indicating that the initialization probably was successful
- if ((pop_word() == 0xf4f4) && (M.x86.R_SS == STACK_SEGMENT)
- && (M.x86.R_SP == STACK_START_OFFSET)) {
- DEBUG_PRINTF("Stack is clean, initialization successful!\n");
- } else {
- DEBUG_PRINTF
- ("Stack unclean, initialization probably NOT COMPLETE!!!\n");
- DEBUG_PRINTF("SS:SP = %04x:%04x, expected: %04x:%04x\n",
- M.x86.R_SS, M.x86.R_SP, STACK_SEGMENT,
- STACK_START_OFFSET);
- }
-
-
- // TODO: according to the BIOS Boot Spec initializations may be ended using INT18h and setting
- // the status.
- // We need to implement INT18 accordingly, pseudo code is in specsbbs101.pdf page 30
- // (also for Int19)
- return 0;
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/app/biosemu/biosemu.h b/qemu/roms/SLOF/clients/net-snk/app/biosemu/biosemu.h
deleted file mode 100644
index 28b7ab881..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/biosemu/biosemu.h
+++ /dev/null
@@ -1,42 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#ifndef _BIOSEMU_BIOSEMU_H_
-#define _BIOSEMU_BIOSEMU_H_
-
-#define MIN_REQUIRED_VMEM_SIZE 0x100000 // 1MB
-
-//define default segments for different components
-#define STACK_SEGMENT 0x1000 //1000:xxxx
-#define STACK_START_OFFSET 0xfffe
-
-#define DATA_SEGMENT 0x2000
-#define VBE_SEGMENT 0x3000
-
-#define PMM_CONV_SEGMENT 0x4000 // 4000:xxxx is PMM conventional memory area, extended memory area
- // will be anything beyound MIN_REQUIRED_MEMORY_SIZE
-#define PNP_DATA_SEGMENT 0x5000
-
-#define OPTION_ROM_CODE_SEGMENT 0xc000
-
-#define BIOS_DATA_SEGMENT 0xF000
-// both EBDA values are _initial_ values, they may (and will be) changed at runtime by option ROMs!!
-#define INITIAL_EBDA_SEGMENT 0xF600 // segment of the Extended BIOS Data Area
-#define INITIAL_EBDA_SIZE 0x400 // size of the EBDA (at least 1KB!! since size is stored in KB!)
-
-#define PMM_INT_NUM 0xFC // we misuse INT FC for PMM functionality, at the PMM Entry Point
- // Address, there will only be a call to this INT and a RETF
-#define PNP_INT_NUM 0xFD
-
-uint32_t biosemu(char argc, char **argv);
-
-#endif
diff --git a/qemu/roms/SLOF/clients/net-snk/app/biosemu/debug.c b/qemu/roms/SLOF/clients/net-snk/app/biosemu/debug.c
deleted file mode 100644
index 2fce24497..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/biosemu/debug.c
+++ /dev/null
@@ -1,55 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#include <cpu.h>
-
-#include "debug.h"
-
-uint32_t debug_flags = 0;
-
-void
-dump(uint8_t * addr, uint32_t len)
-{
- printf("\n\r%s(%p, %x):\n", __FUNCTION__, addr, len);
- while (len) {
- unsigned int tmpCnt = len;
- unsigned char x;
- if (tmpCnt > 8)
- tmpCnt = 8;
- printf("\n\r%p: ", addr);
- // print hex
- while (tmpCnt--) {
- set_ci();
- x = *addr++;
- clr_ci();
- printf("%02x ", x);
- }
- tmpCnt = len;
- if (tmpCnt > 8)
- tmpCnt = 8;
- len -= tmpCnt;
- //reset addr ptr to print ascii
- addr = addr - tmpCnt;
- // print ascii
- while (tmpCnt--) {
- set_ci();
- x = *addr++;
- clr_ci();
- if ((x < 32) || (x >= 127)) {
- //non-printable char
- x = '.';
- }
- printf("%c", x);
- }
- }
- printf("\n");
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/app/biosemu/debug.h b/qemu/roms/SLOF/clients/net-snk/app/biosemu/debug.h
deleted file mode 100644
index 46a026ae6..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/biosemu/debug.h
+++ /dev/null
@@ -1,74 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-#ifndef _BIOSEMU_DEBUG_H_
-#define _BIOSEMU_DEBUG_H_
-
-#include <stdio.h>
-#include <stdint.h>
-
-extern uint32_t debug_flags;
-// from x86emu...needed for debugging
-extern void x86emu_dump_xregs(void);
-
-#define DEBUG_IO 0x1
-#define DEBUG_MEM 0x2
-// set this to print messages for certain virtual memory accesses (Interrupt Vectors, ...)
-#define DEBUG_CHECK_VMEM_ACCESS 0x4
-#define DEBUG_INTR 0x8
-#define DEBUG_PRINT_INT10 0x10 // set to have the INT10 routine print characters
-#define DEBUG_VBE 0x20
-#define DEBUG_PMM 0x40
-#define DEBUG_DISK 0x80
-#define DEBUG_PNP 0x100
-
-#define DEBUG_TRACE_X86EMU 0x1000
-// set to enable tracing of JMPs in x86emu
-#define DEBUG_JMP 0x2000
-
-//#define DEBUG
-#ifdef DEBUG
-
-#define CHECK_DBG(_flag) if (debug_flags & _flag)
-
-#define DEBUG_PRINTF(_x...) printf(_x);
-// prints the CS:IP before the printout, NOTE: actually its CS:IP of the _next_ instruction
-// to be executed, since the x86emu advances CS:IP _before_ actually executing an instruction
-#define DEBUG_PRINTF_CS_IP(_x...) DEBUG_PRINTF("%x:%x ", M.x86.R_CS, M.x86.R_IP); DEBUG_PRINTF(_x);
-
-#define DEBUG_PRINTF_IO(_x...) CHECK_DBG(DEBUG_IO) { DEBUG_PRINTF_CS_IP(_x) }
-#define DEBUG_PRINTF_MEM(_x...) CHECK_DBG(DEBUG_MEM) { DEBUG_PRINTF_CS_IP(_x) }
-#define DEBUG_PRINTF_INTR(_x...) CHECK_DBG(DEBUG_INTR) { DEBUG_PRINTF_CS_IP(_x) }
-#define DEBUG_PRINTF_VBE(_x...) CHECK_DBG(DEBUG_VBE) { DEBUG_PRINTF_CS_IP(_x) }
-#define DEBUG_PRINTF_PMM(_x...) CHECK_DBG(DEBUG_PMM) { DEBUG_PRINTF_CS_IP(_x) }
-#define DEBUG_PRINTF_DISK(_x...) CHECK_DBG(DEBUG_DISK) { DEBUG_PRINTF_CS_IP(_x) }
-#define DEBUG_PRINTF_PNP(_x...) CHECK_DBG(DEBUG_PNP) { DEBUG_PRINTF_CS_IP(_x) }
-
-#else
-
-#define CHECK_DBG(_flag) if (0)
-
-#define DEBUG_PRINTF(_x...)
-#define DEBUG_PRINTF_CS_IP(_x...)
-
-#define DEBUG_PRINTF_IO(_x...)
-#define DEBUG_PRINTF_MEM(_x...)
-#define DEBUG_PRINTF_INTR(_x...)
-#define DEBUG_PRINTF_VBE(_x...)
-#define DEBUG_PRINTF_PMM(_x...)
-#define DEBUG_PRINTF_DISK(_x...)
-#define DEBUG_PRINTF_PNP(_x...)
-
-#endif //DEBUG
-
-void dump(uint8_t * addr, uint32_t len);
-
-#endif
diff --git a/qemu/roms/SLOF/clients/net-snk/app/biosemu/device.c b/qemu/roms/SLOF/clients/net-snk/app/biosemu/device.c
deleted file mode 100644
index 514b87e62..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/biosemu/device.c
+++ /dev/null
@@ -1,324 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-
-#include "device.h"
-#include "rtas.h"
-#include <stdio.h>
-#include <string.h>
-#include <of.h> // use translate_address_dev and get_puid from net-snk
-#include "debug.h"
-
-typedef struct {
- uint8_t info;
- uint8_t bus;
- uint8_t devfn;
- uint8_t cfg_space_offset;
- uint64_t address;
- uint64_t size;
-} __attribute__ ((__packed__)) assigned_address_t;
-
-
-// scan all adresses assigned to the device ("assigned-addresses" and "reg")
-// store in translate_address_array for faster translation using dev_translate_address
-static void
-dev_get_addr_info(void)
-{
- // get bus/dev/fn from assigned-addresses
- int32_t len;
- //max. 6 BARs and 1 Exp.ROM plus CfgSpace and 3 legacy ranges
- assigned_address_t buf[11];
- len =
- of_getprop(bios_device.phandle, "assigned-addresses", buf,
- sizeof(buf));
- bios_device.bus = buf[0].bus;
- bios_device.devfn = buf[0].devfn;
- DEBUG_PRINTF("bus: %x, devfn: %x\n", bios_device.bus,
- bios_device.devfn);
- //store address translations for all assigned-addresses and regs in
- //translate_address_array for faster translation later on...
- int i = 0;
- // index to insert data into translate_address_array
- int taa_index = 0;
- uint64_t address_offset;
- for (i = 0; i < (len / sizeof(assigned_address_t)); i++, taa_index++) {
- //copy all info stored in assigned-addresses
- translate_address_array[taa_index].info = buf[i].info;
- translate_address_array[taa_index].bus = buf[i].bus;
- translate_address_array[taa_index].devfn = buf[i].devfn;
- translate_address_array[taa_index].cfg_space_offset =
- buf[i].cfg_space_offset;
- translate_address_array[taa_index].address = buf[i].address;
- translate_address_array[taa_index].size = buf[i].size;
- // translate first address and store it as address_offset
- address_offset = buf[i].address;
- translate_address_dev(&address_offset, bios_device.phandle);
- translate_address_array[taa_index].address_offset =
- address_offset - buf[i].address;
- }
- //get "reg" property
- len = of_getprop(bios_device.phandle, "reg", buf, sizeof(buf));
- for (i = 0; i < (len / sizeof(assigned_address_t)); i++) {
- if ((buf[i].size == 0) || (buf[i].cfg_space_offset != 0)) {
- // we dont care for ranges with size 0 and
- // BARs and Expansion ROM must be in assigned-addresses... so in reg
- // we only look for those without config space offset set...
- // i.e. the legacy ranges
- continue;
- }
- //copy all info stored in assigned-addresses
- translate_address_array[taa_index].info = buf[i].info;
- translate_address_array[taa_index].bus = buf[i].bus;
- translate_address_array[taa_index].devfn = buf[i].devfn;
- translate_address_array[taa_index].cfg_space_offset =
- buf[i].cfg_space_offset;
- translate_address_array[taa_index].address = buf[i].address;
- translate_address_array[taa_index].size = buf[i].size;
- // translate first address and store it as address_offset
- address_offset = buf[i].address;
- translate_address_dev(&address_offset, bios_device.phandle);
- translate_address_array[taa_index].address_offset =
- address_offset - buf[i].address;
- taa_index++;
- }
- // store last entry index of translate_address_array
- taa_last_entry = taa_index - 1;
-#ifdef DEBUG
- //dump translate_address_array
- printf("translate_address_array: \n");
- translate_address_t ta;
- for (i = 0; i <= taa_last_entry; i++) {
- ta = translate_address_array[i];
- printf
- ("%d: %02x%02x%02x%02x\n\taddr: %016llx\n\toffs: %016llx\n\tsize: %016llx\n",
- i, ta.info, ta.bus, ta.devfn, ta.cfg_space_offset,
- ta.address, ta.address_offset, ta.size);
- }
-#endif
-}
-
-// to simulate accesses to legacy VGA Memory (0xA0000-0xBFFFF)
-// we look for the first prefetchable memory BAR, if no prefetchable BAR found,
-// we use the first memory BAR
-// dev_translate_addr will translate accesses to the legacy VGA Memory into the found vmem BAR
-static void
-dev_find_vmem_addr(void)
-{
- int i = 0;
- translate_address_t ta;
- int8_t tai_np = -1, tai_p = -1; // translate_address_array index for non-prefetchable and prefetchable memory
- //search backwards to find first entry
- for (i = taa_last_entry; i >= 0; i--) {
- ta = translate_address_array[i];
- if ((ta.cfg_space_offset >= 0x10)
- && (ta.cfg_space_offset <= 0x24)) {
- //only BARs
- if ((ta.info & 0x03) >= 0x02) {
- //32/64bit memory
- tai_np = i;
- if ((ta.info & 0x40) != 0) {
- // prefetchable
- tai_p = i;
- }
- }
- }
- }
- if (tai_p != -1) {
- ta = translate_address_array[tai_p];
- bios_device.vmem_addr = ta.address;
- bios_device.vmem_size = ta.size;
- DEBUG_PRINTF
- ("%s: Found prefetchable Virtual Legacy Memory BAR: %llx, size: %llx\n",
- __FUNCTION__, bios_device.vmem_addr,
- bios_device.vmem_size);
- } else if (tai_np != -1) {
- ta = translate_address_array[tai_np];
- bios_device.vmem_addr = ta.address;
- bios_device.vmem_size = ta.size;
- DEBUG_PRINTF
- ("%s: Found non-prefetchable Virtual Legacy Memory BAR: %llx, size: %llx",
- __FUNCTION__, bios_device.vmem_addr,
- bios_device.vmem_size);
- }
- // disable vmem
- //bios_device.vmem_size = 0;
-}
-
-static void
-dev_get_puid(void)
-{
- // get puid
- bios_device.puid = get_puid(bios_device.phandle);
- DEBUG_PRINTF("puid: 0x%llx\n", bios_device.puid);
-}
-
-static void
-dev_get_device_vendor_id(void)
-{
- uint32_t pci_config_0 =
- rtas_pci_config_read(bios_device.puid, 4, bios_device.bus,
- bios_device.devfn, 0x0);
- bios_device.pci_device_id =
- (uint16_t) ((pci_config_0 & 0xFFFF0000) >> 16);
- bios_device.pci_vendor_id = (uint16_t) (pci_config_0 & 0x0000FFFF);
- DEBUG_PRINTF("PCI Device ID: %04x, PCI Vendor ID: %x\n",
- bios_device.pci_device_id, bios_device.pci_vendor_id);
-}
-
-/* check, wether the device has a valid Expansion ROM, also search the PCI Data Structure and
- * any Expansion ROM Header (using dev_scan_exp_header()) for needed information */
-uint8_t
-dev_check_exprom(void)
-{
- int i = 0;
- translate_address_t ta;
- uint64_t rom_base_addr = 0;
- uint16_t pci_ds_offset;
- pci_data_struct_t pci_ds;
- // check for ExpROM Address (Offset 30) in taa
- for (i = 0; i <= taa_last_entry; i++) {
- ta = translate_address_array[i];
- if (ta.cfg_space_offset == 0x30) {
- rom_base_addr = ta.address + ta.address_offset; //translated address
- break;
- }
- }
- // in the ROM there could be multiple Expansion ROM Images... start searching
- // them for a x86 image
- do {
- if (rom_base_addr == 0) {
- printf("Error: no Expansion ROM address found!\n");
- return -1;
- }
- set_ci();
- uint16_t rom_signature = *((uint16_t *) rom_base_addr);
- clr_ci();
- if (rom_signature != 0x55aa) {
- printf
- ("Error: invalid Expansion ROM signature: %02x!\n",
- *((uint16_t *) rom_base_addr));
- return -1;
- }
- set_ci();
- // at offset 0x18 is the (16bit little-endian) pointer to the PCI Data Structure
- pci_ds_offset = in16le((void *) (rom_base_addr + 0x18));
- //copy the PCI Data Structure
- memcpy(&pci_ds, (void *) (rom_base_addr + pci_ds_offset),
- sizeof(pci_ds));
- clr_ci();
-#ifdef DEBUG
- DEBUG_PRINTF("PCI Data Structure @%llx:\n",
- rom_base_addr + pci_ds_offset);
- dump((void *) &pci_ds, sizeof(pci_ds));
-#endif
- if (strncmp((const char *) pci_ds.signature, "PCIR", 4) != 0) {
- printf("Invalid PCI Data Structure found!\n");
- break;
- }
- //little-endian conversion
- pci_ds.vendor_id = in16le(&pci_ds.vendor_id);
- pci_ds.device_id = in16le(&pci_ds.device_id);
- pci_ds.img_length = in16le(&pci_ds.img_length);
- pci_ds.pci_ds_length = in16le(&pci_ds.pci_ds_length);
- if (pci_ds.vendor_id != bios_device.pci_vendor_id) {
- printf
- ("Image has invalid Vendor ID: %04x, expected: %04x\n",
- pci_ds.vendor_id, bios_device.pci_vendor_id);
- break;
- }
- if (pci_ds.device_id != bios_device.pci_device_id) {
- printf
- ("Image has invalid Device ID: %04x, expected: %04x\n",
- pci_ds.device_id, bios_device.pci_device_id);
- break;
- }
- //DEBUG_PRINTF("Image Length: %d\n", pci_ds.img_length * 512);
- //DEBUG_PRINTF("Image Code Type: %d\n", pci_ds.code_type);
- if (pci_ds.code_type == 0) {
- //x86 image
- //store image address and image length in bios_device struct
- bios_device.img_addr = rom_base_addr;
- bios_device.img_size = pci_ds.img_length * 512;
- // we found the image, exit the loop
- break;
- } else {
- // no x86 image, check next image (if any)
- rom_base_addr += pci_ds.img_length * 512;
- }
- if ((pci_ds.indicator & 0x80) == 0x80) {
- //last image found, exit the loop
- DEBUG_PRINTF("Last PCI Expansion ROM Image found.\n");
- break;
- }
- }
- while (bios_device.img_addr == 0);
- // in case we did not find a valid x86 Expansion ROM Image
- if (bios_device.img_addr == 0) {
- printf("Error: no valid x86 Expansion ROM Image found!\n");
- return -1;
- }
- return 0;
-}
-
-uint8_t
-dev_init(char *device_name)
-{
- uint8_t rval = 0;
- //init bios_device struct
- DEBUG_PRINTF("%s(%s)\n", __FUNCTION__, device_name);
- memset(&bios_device, 0, sizeof(bios_device));
- bios_device.ihandle = of_open(device_name);
- if (bios_device.ihandle == 0) {
- DEBUG_PRINTF("%s is no valid device!\n", device_name);
- return -1;
- }
- bios_device.phandle = of_finddevice(device_name);
- dev_get_addr_info();
- dev_find_vmem_addr();
- dev_get_puid();
- dev_get_device_vendor_id();
- return rval;
-}
-
-// translate address function using translate_address_array assembled
-// by dev_get_addr_info... MUCH faster than calling translate_address_dev
-// and accessing client interface for every translation...
-// returns: 0 if addr not found in translate_address_array, 1 if found.
-uint8_t
-dev_translate_address(uint64_t * addr)
-{
- int i = 0;
- translate_address_t ta;
- //check if it is an access to legacy VGA Mem... if it is, map the address
- //to the vmem BAR and then translate it...
- // (translation info provided by Ben Herrenschmidt)
- // NOTE: the translation seems to only work for NVIDIA cards... but it is needed
- // to make some NVIDIA cards work at all...
- if ((bios_device.vmem_size > 0)
- && ((*addr >= 0xA0000) && (*addr < 0xB8000))) {
- *addr = (*addr - 0xA0000) * 4 + 2 + bios_device.vmem_addr;
- }
- if ((bios_device.vmem_size > 0)
- && ((*addr >= 0xB8000) && (*addr < 0xC0000))) {
- uint8_t shift = *addr & 1;
- *addr &= 0xfffffffe;
- *addr = (*addr - 0xB8000) * 4 + shift + bios_device.vmem_addr;
- }
- for (i = 0; i <= taa_last_entry; i++) {
- ta = translate_address_array[i];
- if ((*addr >= ta.address) && (*addr <= (ta.address + ta.size))) {
- *addr += ta.address_offset;
- return 1;
- }
- }
- return 0;
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/app/biosemu/device.h b/qemu/roms/SLOF/clients/net-snk/app/biosemu/device.h
deleted file mode 100644
index 425dd3caf..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/biosemu/device.h
+++ /dev/null
@@ -1,157 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#ifndef DEVICE_LIB_H
-#define DEVICE_LIB_H
-
-#include <stdint.h>
-#include <cpu.h>
-#include "of.h"
-#include <stdio.h>
-
-// a Expansion Header Struct as defined in Plug and Play BIOS Spec 1.0a Chapter 3.2
-typedef struct {
- char signature[4]; // signature
- uint8_t structure_revision;
- uint8_t length; // in 16 byte blocks
- uint16_t next_header_offset; // offset to next Expansion Header as 16bit little-endian value, as offset from the start of the Expansion ROM
- uint8_t reserved;
- uint8_t checksum; // the sum of all bytes of the Expansion Header must be 0
- uint32_t device_id; // PnP Device ID as 32bit little-endian value
- uint16_t p_manufacturer_string; //16bit little-endian offset from start of Expansion ROM
- uint16_t p_product_string; //16bit little-endian offset from start of Expansion ROM
- uint8_t device_base_type;
- uint8_t device_sub_type;
- uint8_t device_if_type;
- uint8_t device_indicators;
- // the following vectors are all 16bit little-endian offsets from start of Expansion ROM
- uint16_t bcv; // Boot Connection Vector
- uint16_t dv; // Disconnect Vector
- uint16_t bev; // Bootstrap Entry Vector
- uint16_t reserved_2;
- uint16_t sriv; // Static Resource Information Vector
-} __attribute__ ((__packed__)) exp_header_struct_t;
-
-// a PCI Data Struct as defined in PCI 2.3 Spec Chapter 6.3.1.2
-typedef struct {
- uint8_t signature[4]; // signature, the String "PCIR"
- uint16_t vendor_id;
- uint16_t device_id;
- uint16_t reserved;
- uint16_t pci_ds_length; // PCI Data Structure Length, 16bit little-endian value
- uint8_t pci_ds_revision;
- uint8_t class_code[3];
- uint16_t img_length; // length of the Exp.ROM Image, 16bit little-endian value in 512 bytes
- uint16_t img_revision;
- uint8_t code_type;
- uint8_t indicator;
- uint16_t reserved_2;
-} __attribute__ ((__packed__)) pci_data_struct_t;
-
-typedef struct {
- uint8_t bus;
- uint8_t devfn;
- uint64_t puid;
- phandle_t phandle;
- ihandle_t ihandle;
- // store the address of the BAR that is used to simulate
- // legacy VGA memory accesses
- uint64_t vmem_addr;
- uint64_t vmem_size;
- // used to buffer I/O Accesses, that do not access the I/O Range of the device...
- // 64k might be overkill, but we can buffer all I/O accesses...
- uint8_t io_buffer[64 * 1024];
- uint16_t pci_vendor_id;
- uint16_t pci_device_id;
- // translated address of the "PC-Compatible" Expansion ROM Image for this device
- uint64_t img_addr;
- uint32_t img_size; // size of the Expansion ROM Image (read from the PCI Data Structure)
-} device_t;
-
-typedef struct {
- uint8_t info;
- uint8_t bus;
- uint8_t devfn;
- uint8_t cfg_space_offset;
- uint64_t address;
- uint64_t address_offset;
- uint64_t size;
-} __attribute__ ((__packed__)) translate_address_t;
-
-// array to store address translations for this
-// device. Needed for faster address translation, so
-// not every I/O or Memory Access needs to call translate_address_dev
-// and access the device tree
-// 6 BARs, 1 Exp. ROM, 1 Cfg.Space, and 3 Legacy
-// translations are supported... this should be enough for
-// most devices... for VGA it is enough anyways...
-translate_address_t translate_address_array[11];
-
-// index of last translate_address_array entry
-// set by get_dev_addr_info function
-uint8_t taa_last_entry;
-
-device_t bios_device;
-
-uint8_t dev_init(char *device_name);
-// NOTE: for dev_check_exprom to work, dev_init MUST be called first!
-uint8_t dev_check_exprom(void);
-
-uint8_t dev_translate_address(uint64_t * addr);
-
-/* endianness swap functions for 16 and 32 bit words
- * copied from axon_pciconfig.c
- */
-static inline void
-out32le(void *addr, uint32_t val)
-{
- asm volatile ("stwbrx %0, 0, %1"::"r" (val), "r"(addr));
-}
-
-static inline uint32_t
-in32le(void *addr)
-{
- uint32_t val;
- const uint32_t *zaddr = addr;
- asm volatile ("lwbrx %0, %y1" : "=r"(val) : "Z"(*zaddr));
- return val;
-}
-
-static inline void
-out16le(void *addr, uint16_t val)
-{
- asm volatile ("sthbrx %0, 0, %1"::"r" (val), "r"(addr));
-}
-
-static inline uint16_t
-in16le(void *addr)
-{
- uint16_t val;
- const uint16_t *zaddr = addr;
- asm volatile ("lhbrx %0, %y1" : "=r"(val) : "Z"(*zaddr));
- return val;
-}
-
-/* debug function, dumps HID1 and HID4 to detect wether caches are on/off */
-static inline void
-dumpHID(void)
-{
- uint64_t hid;
- //HID1 = 1009
- __asm__ __volatile__("mfspr %0, 1009":"=r"(hid));
- printf("HID1: %016llx\n", hid);
- //HID4 = 1012
- __asm__ __volatile__("mfspr %0, 1012":"=r"(hid));
- printf("HID4: %016llx\n", hid);
-}
-
-#endif
diff --git a/qemu/roms/SLOF/clients/net-snk/app/biosemu/interrupt.c b/qemu/roms/SLOF/clients/net-snk/app/biosemu/interrupt.c
deleted file mode 100644
index ac3f5b430..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/biosemu/interrupt.c
+++ /dev/null
@@ -1,606 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#include <stdio.h>
-
-#include <rtas.h>
-
-#include "biosemu.h"
-#include "mem.h"
-#include "device.h"
-#include "debug.h"
-#include "interrupt.h"
-
-#include <x86emu/x86emu.h>
-#include <x86emu/prim_ops.h>
-
-
-
-//setup to run the code at the address, that the Interrupt Vector points to...
-static void
-setupInt(int intNum)
-{
- DEBUG_PRINTF_INTR("%s(%x): executing interrupt handler @%08x\n",
- __FUNCTION__, intNum, my_rdl(intNum * 4));
- // push current R_FLG... will be popped by IRET
- push_word((u16) M.x86.R_FLG);
- CLEAR_FLAG(F_IF);
- CLEAR_FLAG(F_TF);
- // push current CS:IP to the stack, will be popped by IRET
- push_word(M.x86.R_CS);
- push_word(M.x86.R_IP);
- // set CS:IP to the interrupt handler address... so the next executed instruction will
- // be the interrupt handler
- M.x86.R_CS = my_rdw(intNum * 4 + 2);
- M.x86.R_IP = my_rdw(intNum * 4);
-}
-
-// handle int10 (VGA BIOS Interrupt)
-static void
-handleInt10(void)
-{
- // the data for INT10 is stored in BDA (0000:0400h) offset 49h-66h
- // function number in AH
- //DEBUG_PRINTF_CS_IP("%s:\n", __FUNCTION__);
- //x86emu_dump_xregs();
- //if ((M.x86.R_IP == 0x32c2) && (M.x86.R_SI == 0x1ce2)){
- //X86EMU_trace_on();
- //M.x86.debug &= ~DEBUG_DECODE_NOPRINT_F;
- //}
- switch (M.x86.R_AH) {
- case 0x00:
- // set video mode
- // BDA offset 49h is current video mode
- my_wrb(0x449, M.x86.R_AL);
- if (M.x86.R_AL > 7)
- M.x86.R_AL = 0x20;
- else if (M.x86.R_AL == 6)
- M.x86.R_AL = 0x3f;
- else
- M.x86.R_AL = 0x30;
- break;
- case 0x01:
- // set cursor shape
- // ignore
- break;
- case 0x02:
- // set cursor position
- // BH: pagenumber, DX: cursor_pos (DH:row, DL:col)
- // BDA offset 50h-60h are 8 cursor position words for
- // eight possible video pages
- my_wrw(0x450 + (M.x86.R_BH * 2), M.x86.R_DX);
- break;
- case 0x03:
- //get cursor position
- // BH: pagenumber
- // BDA offset 50h-60h are 8 cursor position words for
- // eight possible video pages
- M.x86.R_AX = 0;
- M.x86.R_CH = 0; // start scan line ???
- M.x86.R_CL = 0; // end scan line ???
- M.x86.R_DX = my_rdw(0x450 + (M.x86.R_BH * 2));
- break;
- case 0x05:
- // set active page
- // BDA offset 62h is current page number
- my_wrb(0x462, M.x86.R_AL);
- break;
- case 0x06:
- //scroll up windows
- break;
- case 0x07:
- //scroll down windows
- break;
- case 0x08:
- //read character and attribute at position
- M.x86.R_AH = 0x07; // white-on-black
- M.x86.R_AL = 0x20; // a space...
- break;
- case 0x09:
- // write character and attribute
- //AL: char, BH: page number, BL: attribute, CX: number of times to write
- //BDA offset 62h is current page number
- CHECK_DBG(DEBUG_PRINT_INT10) {
- uint32_t i = 0;
- if (M.x86.R_BH == my_rdb(0x462)) {
- for (i = 0; i < M.x86.R_CX; i++)
- printf("%c", M.x86.R_AL);
- }
- }
- break;
- case 0x0a:
- // write character
- //AL: char, BH: page number, BL: attribute, CX: number of times to write
- //BDA offset 62h is current page number
- CHECK_DBG(DEBUG_PRINT_INT10) {
- uint32_t i = 0;
- if (M.x86.R_BH == my_rdb(0x462)) {
- for (i = 0; i < M.x86.R_CX; i++)
- printf("%c", M.x86.R_AL);
- }
- }
- break;
- case 0x0e:
- // teletype output: write character and advance cursor...
- //AL: char, BH: page number, BL: attribute
- //BDA offset 62h is current page number
- CHECK_DBG(DEBUG_PRINT_INT10) {
- // we ignore the pagenumber on this call...
- //if (M.x86.R_BH == my_rdb(0x462))
- {
- printf("%c", M.x86.R_AL);
- // for debugging, to read all lines
- //if (M.x86.R_AL == 0xd) // carriage return
- // printf("\n");
- }
- }
- break;
- case 0x0f:
- // get video mode
- // BDA offset 49h is current video mode
- // BDA offset 62h is current page number
- // BDA offset 4ah is columns on screen
- M.x86.R_AH = 80; //number of character columns... we hardcode it to 80
- M.x86.R_AL = my_rdb(0x449);
- M.x86.R_BH = my_rdb(0x462);
- break;
- default:
- printf("%s(): unknown function (%x) for int10 handler.\n",
- __FUNCTION__, M.x86.R_AH);
- DEBUG_PRINTF_INTR("AX=%04x BX=%04x CX=%04x DX=%04x\n",
- M.x86.R_AX, M.x86.R_BX, M.x86.R_CX,
- M.x86.R_DX);
- HALT_SYS();
- break;
- }
-}
-
-// this table translates ASCII chars into their XT scan codes:
-static uint8_t keycode_table[256] = {
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, // 0 - 7
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, // 8 - 15
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, // 16 - 23
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, // 24 - 31
- 0x39, 0x02, 0x28, 0x04, 0x05, 0x06, 0x08, 0x28, // 32 - 39
- 0x0a, 0x0b, 0x09, 0x2b, 0x33, 0x0d, 0x34, 0x35, // 40 - 47
- 0x0b, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07, 0x08, // 48 - 55
- 0x09, 0x0a, 0x27, 0x27, 0x33, 0x2b, 0x34, 0x35, // 56 - 63
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, // 64 - 71
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, // 72 - 79
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, // 80 - 87
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, // 88 - 95
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, // 96 - 103
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, // 104 - 111
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, // 112 - 119
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, // 120 - 127
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, // ...
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
-};
-
-static void
-translate_keycode(uint64_t * keycode)
-{
- uint8_t scan_code = 0;
- uint8_t char_code = 0;
- if (*keycode < 256) {
- scan_code = keycode_table[*keycode];
- char_code = (uint8_t) * keycode & 0xff;
- } else {
- switch (*keycode) {
- case 0x1b50:
- // F1
- scan_code = 0x3b;
- char_code = 0x0;
- break;
- default:
- printf("%s(): unknown multibyte keycode: %llx\n",
- __FUNCTION__, *keycode);
- break;
- }
- }
- //assemble scan/char code in keycode
- *keycode = (uint64_t) ((((uint16_t) scan_code) << 8) | char_code);
-}
-
-// handle int16 (Keyboard BIOS Interrupt)
-static void
-handleInt16(void)
-{
- // keyboard buffer is in BIOS Memory Area:
- // offset 0x1a (WORD) pointer to next char in keybuffer
- // offset 0x1c (WORD) pointer to next insert slot in keybuffer
- // offset 0x1e-0x3e: 16 WORD Ring Buffer
- // since we currently always read the char from the FW buffer,
- // we misuse the ring buffer, we use it as pointer to a uint64_t that stores
- // multi-byte keys (e.g. special keys in VT100 terminal)
- // and as long as a key is available (not 0) we dont read further keys
- uint64_t *keycode = (uint64_t *) (M.mem_base + 0x41e);
- int8_t c;
- // function number in AH
- DEBUG_PRINTF_INTR("%s(): Keyboard Interrupt: function: %x.\n",
- __FUNCTION__, M.x86.R_AH);
- DEBUG_PRINTF_INTR("AX=%04x BX=%04x CX=%04x DX=%04x\n", M.x86.R_AX,
- M.x86.R_BX, M.x86.R_CX, M.x86.R_DX);
- switch (M.x86.R_AH) {
- case 0x00:
- // get keystroke
- if (*keycode) {
- M.x86.R_AX = (uint16_t) * keycode;
- // clear keycode
- *keycode = 0;
- } else {
- M.x86.R_AH = 0x61; // scancode for space key
- M.x86.R_AL = 0x20; // a space
- }
- break;
- case 0x01:
- // check keystroke
- // ZF set = no keystroke
- // read first byte of key code
- if (*keycode) {
- // already read, but not yet taken
- CLEAR_FLAG(F_ZF);
- M.x86.R_AX = (uint16_t) * keycode;
- } else {
- c = getchar();
- if (c == -1) {
- // no key available
- SET_FLAG(F_ZF);
- } else {
- *keycode = c;
-
- // since after an ESC it may take a while to receive the next char,
- // we send something that is not shown on the screen, and then try to get
- // the next char
- // TODO: only after ESC?? what about other multibyte keys
- printf("tt%c%c", 0x08, 0x08); // 0x08 == Backspace
-
- while ((c = getchar()) != -1) {
- *keycode = (*keycode << 8) | c;
- DEBUG_PRINTF(" key read: %0llx\n",
- *keycode);
- }
- translate_keycode(keycode);
- DEBUG_PRINTF(" translated key: %0llx\n",
- *keycode);
- if (*keycode == 0) {
- //not found
- SET_FLAG(F_ZF);
- } else {
- CLEAR_FLAG(F_ZF);
- M.x86.R_AX = (uint16_t) * keycode;
- //X86EMU_trace_on();
- //M.x86.debug &= ~DEBUG_DECODE_NOPRINT_F;
- }
- }
- }
- break;
- default:
- printf("%s(): unknown function (%x) for int16 handler.\n",
- __FUNCTION__, M.x86.R_AH);
- DEBUG_PRINTF_INTR("AX=%04x BX=%04x CX=%04x DX=%04x\n",
- M.x86.R_AX, M.x86.R_BX, M.x86.R_CX,
- M.x86.R_DX);
- HALT_SYS();
- break;
- }
-}
-
-// handle int1a (PCI BIOS Interrupt)
-static void
-handleInt1a(void)
-{
- // function number in AX
- uint8_t bus, devfn, offs;
- switch (M.x86.R_AX) {
- case 0xb101:
- // Installation check
- CLEAR_FLAG(F_CF); // clear CF
- M.x86.R_EDX = 0x20494350; // " ICP" endian swapped "PCI "
- M.x86.R_AL = 0x1; // Config Space Mechanism 1 supported
- M.x86.R_BX = 0x0210; // PCI Interface Level Version 2.10
- M.x86.R_CL = 0xff; // number of last PCI Bus in system TODO: check!
- break;
- case 0xb102:
- // Find PCI Device
- // NOTE: we currently only allow the device to find itself...
- // it SHOULD be all we ever need...
- // device_id in CX, vendor_id in DX
- // device index in SI (i.e. if multiple devices with same vendor/device id
- // are connected). We currently only support device index 0
- DEBUG_PRINTF_INTR("%s(): function: %x: PCI Find Device\n",
- __FUNCTION__, M.x86.R_AX);
- if ((M.x86.R_CX == bios_device.pci_device_id)
- && (M.x86.R_DX == bios_device.pci_vendor_id)
- // device index must be 0
- && (M.x86.R_SI == 0)) {
- CLEAR_FLAG(F_CF);
- M.x86.R_AH = 0x00; // return code: success
- M.x86.R_BH = bios_device.bus;
- M.x86.R_BL = bios_device.devfn;
- DEBUG_PRINTF_INTR
- ("%s(): function %x: PCI Find Device --> 0x%04x\n",
- __FUNCTION__, M.x86.R_AX, M.x86.R_BX);
- } else {
- DEBUG_PRINTF_INTR
- ("%s(): function %x: invalid device/vendor/device index! (%04x/%04x/%02x expected: %04x/%04x/0) \n",
- __FUNCTION__, M.x86.R_AX, M.x86.R_CX, M.x86.R_DX,
- M.x86.R_SI, bios_device.pci_device_id,
- bios_device.pci_vendor_id);
- SET_FLAG(F_CF);
- M.x86.R_AH = 0x86; // return code: device not found
- }
- break;
- case 0xb108: //read configuration byte
- case 0xb109: //read configuration word
- case 0xb10a: //read configuration dword
- bus = M.x86.R_BH;
- devfn = M.x86.R_BL;
- offs = M.x86.R_DI;
- if ((bus != bios_device.bus)
- || (devfn != bios_device.devfn)) {
- // fail accesses to any device but ours...
- printf
- ("%s(): Config read access invalid! bus: %x (%x), devfn: %x (%x), offs: %x\n",
- __FUNCTION__, bus, bios_device.bus, devfn,
- bios_device.devfn, offs);
- SET_FLAG(F_CF);
- M.x86.R_AH = 0x87; //return code: bad pci register
- HALT_SYS();
- return;
- } else {
- switch (M.x86.R_AX) {
- case 0xb108:
- M.x86.R_CL =
- (uint8_t) rtas_pci_config_read(bios_device.
- puid, 1,
- bus, devfn,
- offs);
- DEBUG_PRINTF_INTR
- ("%s(): function %x: PCI Config Read @%02x --> 0x%02x\n",
- __FUNCTION__, M.x86.R_AX, offs,
- M.x86.R_CL);
- break;
- case 0xb109:
- M.x86.R_CX =
- (uint16_t) rtas_pci_config_read(bios_device.
- puid, 2,
- bus, devfn,
- offs);
- DEBUG_PRINTF_INTR
- ("%s(): function %x: PCI Config Read @%02x --> 0x%04x\n",
- __FUNCTION__, M.x86.R_AX, offs,
- M.x86.R_CX);
- break;
- case 0xb10a:
- M.x86.R_ECX =
- (uint32_t) rtas_pci_config_read(bios_device.
- puid, 4,
- bus, devfn,
- offs);
- DEBUG_PRINTF_INTR
- ("%s(): function %x: PCI Config Read @%02x --> 0x%08x\n",
- __FUNCTION__, M.x86.R_AX, offs,
- M.x86.R_ECX);
- break;
- }
- CLEAR_FLAG(F_CF);
- M.x86.R_AH = 0x0; // return code: success
- }
- break;
- case 0xb10b: //write configuration byte
- case 0xb10c: //write configuration word
- case 0xb10d: //write configuration dword
- bus = M.x86.R_BH;
- devfn = M.x86.R_BL;
- offs = M.x86.R_DI;
- if ((bus != bios_device.bus)
- || (devfn != bios_device.devfn)) {
- // fail accesses to any device but ours...
- printf
- ("%s(): Config read access invalid! bus: %x (%x), devfn: %x (%x), offs: %x\n",
- __FUNCTION__, bus, bios_device.bus, devfn,
- bios_device.devfn, offs);
- SET_FLAG(F_CF);
- M.x86.R_AH = 0x87; //return code: bad pci register
- HALT_SYS();
- return;
- } else {
- switch (M.x86.R_AX) {
- case 0xb10b:
- rtas_pci_config_write(bios_device.puid, 1, bus,
- devfn, offs, M.x86.R_CL);
- DEBUG_PRINTF_INTR
- ("%s(): function %x: PCI Config Write @%02x <-- 0x%02x\n",
- __FUNCTION__, M.x86.R_AX, offs,
- M.x86.R_CL);
- break;
- case 0xb10c:
- rtas_pci_config_write(bios_device.puid, 2, bus,
- devfn, offs, M.x86.R_CX);
- DEBUG_PRINTF_INTR
- ("%s(): function %x: PCI Config Write @%02x <-- 0x%04x\n",
- __FUNCTION__, M.x86.R_AX, offs,
- M.x86.R_CX);
- break;
- case 0xb10d:
- rtas_pci_config_write(bios_device.puid, 4, bus,
- devfn, offs, M.x86.R_ECX);
- DEBUG_PRINTF_INTR
- ("%s(): function %x: PCI Config Write @%02x <-- 0x%08x\n",
- __FUNCTION__, M.x86.R_AX, offs,
- M.x86.R_ECX);
- break;
- }
- CLEAR_FLAG(F_CF);
- M.x86.R_AH = 0x0; // return code: success
- }
- break;
- default:
- printf("%s(): unknown function (%x) for int1a handler.\n",
- __FUNCTION__, M.x86.R_AX);
- DEBUG_PRINTF_INTR("AX=%04x BX=%04x CX=%04x DX=%04x\n",
- M.x86.R_AX, M.x86.R_BX, M.x86.R_CX,
- M.x86.R_DX);
- HALT_SYS();
- break;
- }
-}
-
-// main Interrupt Handler routine, should be registered as x86emu interrupt handler
-void
-handleInterrupt(int intNum)
-{
- uint8_t int_handled = 0;
-#ifndef DEBUG_PRINT_INT10
- // this printf makes output by int 10 unreadable...
- // so we only enable it, if int10 print is disabled
- DEBUG_PRINTF_INTR("%s(%x)\n", __FUNCTION__, intNum);
-#endif
- switch (intNum) {
- case 0x10: //BIOS video interrupt
- case 0x42: // INT 10h relocated by EGA/VGA BIOS
- case 0x6d: // INT 10h relocated by VGA BIOS
- // get interrupt vector from IDT (4 bytes per Interrupt starting at address 0
- if ((my_rdl(intNum * 4) == 0xF000F065) || //F000:F065 is default BIOS interrupt handler address
- (my_rdl(intNum * 4) == 0xF4F4F4F4)) //invalid
- {
-#if 0
- // ignore interrupt...
- DEBUG_PRINTF_INTR
- ("%s(%x): invalid interrupt Vector (%08x) found, interrupt ignored...\n",
- __FUNCTION__, intNum, my_rdl(intNum * 4));
- DEBUG_PRINTF_INTR("AX=%04x BX=%04x CX=%04x DX=%04x\n",
- M.x86.R_AX, M.x86.R_BX, M.x86.R_CX,
- M.x86.R_DX);
- //HALT_SYS();
-#endif
- handleInt10();
- int_handled = 1;
- }
- break;
- case 0x16:
- // Keyboard BIOS Interrupt
- handleInt16();
- int_handled = 1;
- break;
- case 0x1a:
- // PCI BIOS Interrupt
- handleInt1a();
- int_handled = 1;
- break;
- default:
- printf("Interrupt %#x (Vector: %x) not implemented\n", intNum,
- my_rdl(intNum * 4));
- DEBUG_PRINTF_INTR("AX=%04x BX=%04x CX=%04x DX=%04x\n",
- M.x86.R_AX, M.x86.R_BX, M.x86.R_CX,
- M.x86.R_DX);
- int_handled = 1;
- HALT_SYS();
- break;
- }
- // if we did not handle the interrupt, jump to the interrupt vector...
- if (!int_handled) {
- setupInt(intNum);
- }
-}
-
-// prepare and execute Interrupt 10 (VGA Interrupt)
-void
-runInt10()
-{
- // Initialize stack and data segment
- M.x86.R_SS = STACK_SEGMENT;
- M.x86.R_DS = DATA_SEGMENT;
- M.x86.R_SP = STACK_START_OFFSET;
-
- // push a HLT instruction and a pointer to it onto the stack
- // any return will pop the pointer and jump to the HLT, thus
- // exiting (more or less) cleanly
- push_word(0xf4f4); //F4=HLT
- //push_word(M.x86.R_SS);
- //push_word(M.x86.R_SP + 2);
-
- // setupInt will push the current CS and IP to the stack to return to it,
- // but we want to halt, so set CS:IP to the HLT instruction we just pushed
- // to the stack
- M.x86.R_CS = M.x86.R_SS;
- M.x86.R_IP = M.x86.R_SP; // + 4;
-
- CHECK_DBG(DEBUG_TRACE_X86EMU) {
- X86EMU_trace_on();
- }
- CHECK_DBG(DEBUG_JMP) {
- M.x86.debug |= DEBUG_TRACEJMP_REGS_F;
- M.x86.debug |= DEBUG_TRACEJMP_REGS_F;
- M.x86.debug |= DEBUG_TRACECALL_F;
- M.x86.debug |= DEBUG_TRACECALL_REGS_F;
- }
- setupInt(0x10);
- DEBUG_PRINTF_INTR("%s(): starting execution of INT10...\n",
- __FUNCTION__);
- X86EMU_exec();
- DEBUG_PRINTF_INTR("%s(): execution finished\n", __FUNCTION__);
-}
-
-// prepare and execute Interrupt 13 (Disk Interrupt)
-void
-runInt13(void)
-{
- // Initialize stack and data segment
- M.x86.R_SS = STACK_SEGMENT;
- M.x86.R_DS = DATA_SEGMENT;
- M.x86.R_SP = STACK_START_OFFSET;
-
- // push a HLT instruction and a pointer to it onto the stack
- // any return will pop the pointer and jump to the HLT, thus
- // exiting (more or less) cleanly
- push_word(0xf4f4); //F4=HLT
- //push_word(M.x86.R_SS);
- //push_word(M.x86.R_SP + 2);
-
- // setupInt will push the current CS and IP to the stack to return to it,
- // but we want to halt, so set CS:IP to the HLT instruction we just pushed
- // to the stack
- M.x86.R_CS = M.x86.R_SS;
- M.x86.R_IP = M.x86.R_SP;
-
- CHECK_DBG(DEBUG_TRACE_X86EMU) {
- X86EMU_trace_on();
- }
- CHECK_DBG(DEBUG_JMP) {
- M.x86.debug |= DEBUG_TRACEJMP_REGS_F;
- M.x86.debug |= DEBUG_TRACEJMP_REGS_F;
- M.x86.debug |= DEBUG_TRACECALL_F;
- M.x86.debug |= DEBUG_TRACECALL_REGS_F;
- }
-
- setupInt(0x13);
- DEBUG_PRINTF_INTR("%s(): starting execution of INT13...\n",
- __FUNCTION__);
- X86EMU_exec();
- DEBUG_PRINTF_INTR("%s(): execution finished\n", __FUNCTION__);
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/app/biosemu/interrupt.h b/qemu/roms/SLOF/clients/net-snk/app/biosemu/interrupt.h
deleted file mode 100644
index 11755e102..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/biosemu/interrupt.h
+++ /dev/null
@@ -1,21 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-#ifndef _BIOSEMU_INTERRUPT_H_
-#define _BIOSEMU_INTERRUPT_H_
-
-void handleInterrupt(int intNum);
-
-void runInt10(void);
-
-void runInt13(void);
-
-#endif
diff --git a/qemu/roms/SLOF/clients/net-snk/app/biosemu/io.c b/qemu/roms/SLOF/clients/net-snk/app/biosemu/io.c
deleted file mode 100644
index e9c08932a..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/biosemu/io.c
+++ /dev/null
@@ -1,382 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#include <stdio.h>
-#include <cpu.h>
-#include <pci.h>
-#include "device.h"
-#include "rtas.h"
-#include "debug.h"
-#include "device.h"
-#include <stdint.h>
-#include <x86emu/x86emu.h>
-#include <time.h>
-#include "io.h"
-
-//defined in net-snk/kernel/timer.c
-extern uint64_t get_time(void);
-
-uint32_t pci_cfg_read(X86EMU_pioAddr addr, uint8_t size);
-void pci_cfg_write(X86EMU_pioAddr addr, uint32_t val, uint8_t size);
-uint8_t handle_port_61h(void);
-
-uint8_t
-my_inb(X86EMU_pioAddr addr)
-{
- uint8_t rval = 0xFF;
- uint64_t translated_addr = addr;
- uint8_t translated = dev_translate_address(&translated_addr);
- if (translated != 0) {
- //translation successful, access Device I/O (BAR or Legacy...)
- DEBUG_PRINTF_IO("%s(%x): access to Device I/O\n", __FUNCTION__,
- addr);
- //DEBUG_PRINTF_IO("%s(%04x): translated_addr: %llx\n", __FUNCTION__, addr, translated_addr);
- rval = read_io((void *)translated_addr, 1);
- DEBUG_PRINTF_IO("%s(%04x) Device I/O --> %02x\n", __FUNCTION__,
- addr, rval);
- return rval;
- } else {
- switch (addr) {
- case 0x61:
- //8254 KB Controller / Timer Port
- rval = handle_port_61h();
- //DEBUG_PRINTF_IO("%s(%04x) KB / Timer Port B --> %02x\n", __FUNCTION__, addr, rval);
- return rval;
- break;
- case 0xCFC:
- case 0xCFD:
- case 0xCFE:
- case 0xCFF:
- // PCI Config Mechanism 1 Ports
- return (uint8_t) pci_cfg_read(addr, 1);
- break;
- case 0x0a:
- CHECK_DBG(DEBUG_INTR) {
- X86EMU_trace_on();
- }
- M.x86.debug &= ~DEBUG_DECODE_NOPRINT_F;
- //HALT_SYS();
- // no break, intentional fall-through to default!!
- default:
- DEBUG_PRINTF_IO
- ("%s(%04x) reading from bios_device.io_buffer\n",
- __FUNCTION__, addr);
- rval = *((uint8_t *) (bios_device.io_buffer + addr));
- DEBUG_PRINTF_IO("%s(%04x) I/O Buffer --> %02x\n",
- __FUNCTION__, addr, rval);
- return rval;
- break;
- }
- }
-}
-
-uint16_t
-my_inw(X86EMU_pioAddr addr)
-{
- uint64_t translated_addr = addr;
- uint8_t translated = dev_translate_address(&translated_addr);
- if (translated != 0) {
- //translation successful, access Device I/O (BAR or Legacy...)
- DEBUG_PRINTF_IO("%s(%x): access to Device I/O\n", __FUNCTION__,
- addr);
- //DEBUG_PRINTF_IO("%s(%04x): translated_addr: %llx\n", __FUNCTION__, addr, translated_addr);
- uint16_t rval;
- if ((translated_addr & (uint64_t) 0x1) == 0) {
- // 16 bit aligned access...
- uint16_t tempval = read_io((void *)translated_addr, 2);
- //little endian conversion
- rval = in16le((void *) &tempval);
- } else {
- // unaligned access, read single bytes, little-endian
- rval = (read_io((void *)translated_addr, 1) << 8)
- | (read_io((void *)(translated_addr + 1), 1));
- }
- DEBUG_PRINTF_IO("%s(%04x) Device I/O --> %04x\n", __FUNCTION__,
- addr, rval);
- return rval;
- } else {
- switch (addr) {
- case 0xCFC:
- case 0xCFE:
- //PCI Config Mechanism 1
- return (uint16_t) pci_cfg_read(addr, 2);
- break;
- default:
- DEBUG_PRINTF_IO
- ("%s(%04x) reading from bios_device.io_buffer\n",
- __FUNCTION__, addr);
- uint16_t rval =
- in16le((void *) bios_device.io_buffer + addr);
- DEBUG_PRINTF_IO("%s(%04x) I/O Buffer --> %04x\n",
- __FUNCTION__, addr, rval);
- return rval;
- break;
- }
- }
-}
-
-uint32_t
-my_inl(X86EMU_pioAddr addr)
-{
- uint64_t translated_addr = addr;
- uint8_t translated = dev_translate_address(&translated_addr);
- if (translated != 0) {
- //translation successful, access Device I/O (BAR or Legacy...)
- DEBUG_PRINTF_IO("%s(%x): access to Device I/O\n", __FUNCTION__,
- addr);
- //DEBUG_PRINTF_IO("%s(%04x): translated_addr: %llx\n", __FUNCTION__, addr, translated_addr);
- uint32_t rval;
- if ((translated_addr & (uint64_t) 0x3) == 0) {
- // 32 bit aligned access...
- uint32_t tempval = read_io((void *) translated_addr, 4);
- //little endian conversion
- rval = in32le((void *) &tempval);
- } else {
- // unaligned access, read single bytes, little-endian
- rval = (read_io((void *)(translated_addr), 1) << 24)
- | (read_io((void *)(translated_addr + 1), 1) << 16)
- | (read_io((void *)(translated_addr + 2), 1) << 8)
- | (read_io((void *)(translated_addr + 3), 1));
- }
- DEBUG_PRINTF_IO("%s(%04x) Device I/O --> %08x\n", __FUNCTION__,
- addr, rval);
- return rval;
- } else {
- switch (addr) {
- case 0xCFC:
- //PCI Config Mechanism 1
- return pci_cfg_read(addr, 4);
- break;
- default:
- DEBUG_PRINTF_IO
- ("%s(%04x) reading from bios_device.io_buffer\n",
- __FUNCTION__, addr);
- uint32_t rval =
- in32le((void *) bios_device.io_buffer + addr);
- DEBUG_PRINTF_IO("%s(%04x) I/O Buffer --> %08x\n",
- __FUNCTION__, addr, rval);
- return rval;
- break;
- }
- }
-}
-
-void
-my_outb(X86EMU_pioAddr addr, uint8_t val)
-{
- uint64_t translated_addr = addr;
- uint8_t translated = dev_translate_address(&translated_addr);
- if (translated != 0) {
- //translation successful, access Device I/O (BAR or Legacy...)
- DEBUG_PRINTF_IO("%s(%x, %x): access to Device I/O\n",
- __FUNCTION__, addr, val);
- //DEBUG_PRINTF_IO("%s(%04x): translated_addr: %llx\n", __FUNCTION__, addr, translated_addr);
- write_io((void *) translated_addr, val, 1);
- DEBUG_PRINTF_IO("%s(%04x) Device I/O <-- %02x\n", __FUNCTION__,
- addr, val);
- } else {
- switch (addr) {
- case 0xCFC:
- case 0xCFD:
- case 0xCFE:
- case 0xCFF:
- // PCI Config Mechanism 1 Ports
- pci_cfg_write(addr, val, 1);
- break;
- default:
- DEBUG_PRINTF_IO
- ("%s(%04x,%02x) writing to bios_device.io_buffer\n",
- __FUNCTION__, addr, val);
- *((uint8_t *) (bios_device.io_buffer + addr)) = val;
- break;
- }
- }
-}
-
-void
-my_outw(X86EMU_pioAddr addr, uint16_t val)
-{
- uint64_t translated_addr = addr;
- uint8_t translated = dev_translate_address(&translated_addr);
- if (translated != 0) {
- //translation successful, access Device I/O (BAR or Legacy...)
- DEBUG_PRINTF_IO("%s(%x, %x): access to Device I/O\n",
- __FUNCTION__, addr, val);
- //DEBUG_PRINTF_IO("%s(%04x): translated_addr: %llx\n", __FUNCTION__, addr, translated_addr);
- if ((translated_addr & (uint64_t) 0x1) == 0) {
- // little-endian conversion
- uint16_t tempval = in16le((void *) &val);
- // 16 bit aligned access...
- write_io((void *) translated_addr, tempval, 2);
- } else {
- // unaligned access, write single bytes, little-endian
- write_io(((void *) (translated_addr + 1)),
- (uint8_t) ((val & 0xFF00) >> 8), 1);
- write_io(((void *) translated_addr),
- (uint8_t) (val & 0x00FF), 1);
- }
- DEBUG_PRINTF_IO("%s(%04x) Device I/O <-- %04x\n", __FUNCTION__,
- addr, val);
- } else {
- switch (addr) {
- case 0xCFC:
- case 0xCFE:
- // PCI Config Mechanism 1 Ports
- pci_cfg_write(addr, val, 2);
- break;
- default:
- DEBUG_PRINTF_IO
- ("%s(%04x,%04x) writing to bios_device.io_buffer\n",
- __FUNCTION__, addr, val);
- out16le((void *) bios_device.io_buffer + addr, val);
- break;
- }
- }
-}
-
-void
-my_outl(X86EMU_pioAddr addr, uint32_t val)
-{
- uint64_t translated_addr = addr;
- uint8_t translated = dev_translate_address(&translated_addr);
- if (translated != 0) {
- //translation successful, access Device I/O (BAR or Legacy...)
- DEBUG_PRINTF_IO("%s(%x, %x): access to Device I/O\n",
- __FUNCTION__, addr, val);
- //DEBUG_PRINTF_IO("%s(%04x): translated_addr: %llx\n", __FUNCTION__, addr, translated_addr);
- if ((translated_addr & (uint64_t) 0x3) == 0) {
- // little-endian conversion
- uint32_t tempval = in32le((void *) &val);
- // 32 bit aligned access...
- write_io((void *) translated_addr, tempval, 4);
- } else {
- // unaligned access, write single bytes, little-endian
- write_io(((void *) translated_addr + 3),
- (uint8_t) ((val & 0xFF000000) >> 24), 1);
- write_io(((void *) translated_addr + 2),
- (uint8_t) ((val & 0x00FF0000) >> 16), 1);
- write_io(((void *) translated_addr + 1),
- (uint8_t) ((val & 0x0000FF00) >> 8), 1);
- write_io(((void *) translated_addr),
- (uint8_t) (val & 0x000000FF), 1);
- }
- DEBUG_PRINTF_IO("%s(%04x) Device I/O <-- %08x\n", __FUNCTION__,
- addr, val);
- } else {
- switch (addr) {
- case 0xCFC:
- // PCI Config Mechanism 1 Ports
- pci_cfg_write(addr, val, 4);
- break;
- default:
- DEBUG_PRINTF_IO
- ("%s(%04x,%08x) writing to bios_device.io_buffer\n",
- __FUNCTION__, addr, val);
- out32le((void *) bios_device.io_buffer + addr, val);
- break;
- }
- }
-}
-
-uint32_t
-pci_cfg_read(X86EMU_pioAddr addr, uint8_t size)
-{
- uint32_t rval = 0xFFFFFFFF;
- if ((addr >= 0xCFC) && ((addr + size) <= 0xCFF)) {
- // PCI Configuration Mechanism 1 step 1
- // write to 0xCF8, sets bus, device, function and Config Space offset
- // later read from 0xCFC-0xCFF returns the value...
- uint8_t bus, devfn, offs;
- uint32_t port_cf8_val = my_inl(0xCF8);
- if ((port_cf8_val & 0x80000000) != 0) {
- //highest bit enables config space mapping
- bus = (port_cf8_val & 0x00FF0000) >> 16;
- devfn = (port_cf8_val & 0x0000FF00) >> 8;
- offs = (port_cf8_val & 0x000000FF);
- offs += (addr - 0xCFC); // if addr is not 0xcfc, the offset is moved accordingly
- if ((bus != bios_device.bus)
- || (devfn != bios_device.devfn)) {
- // fail accesses to any device but ours...
- printf
- ("Config access invalid! bus: %x, devfn: %x, offs: %x\n",
- bus, devfn, offs);
- HALT_SYS();
- } else {
- rval =
- (uint32_t) rtas_pci_config_read(bios_device.
- puid, size,
- bus, devfn,
- offs);
- DEBUG_PRINTF_IO
- ("%s(%04x) PCI Config Read @%02x, size: %d --> 0x%08x\n",
- __FUNCTION__, addr, offs, size, rval);
- }
- }
- }
- return rval;
-}
-
-void
-pci_cfg_write(X86EMU_pioAddr addr, uint32_t val, uint8_t size)
-{
- if ((addr >= 0xCFC) && ((addr + size) <= 0xCFF)) {
- // PCI Configuration Mechanism 1 step 1
- // write to 0xCF8, sets bus, device, function and Config Space offset
- // later write to 0xCFC-0xCFF sets the value...
- uint8_t bus, devfn, offs;
- uint32_t port_cf8_val = my_inl(0xCF8);
- if ((port_cf8_val & 0x80000000) != 0) {
- //highest bit enables config space mapping
- bus = (port_cf8_val & 0x00FF0000) >> 16;
- devfn = (port_cf8_val & 0x0000FF00) >> 8;
- offs = (port_cf8_val & 0x000000FF);
- offs += (addr - 0xCFC); // if addr is not 0xcfc, the offset is moved accordingly
- if ((bus != bios_device.bus)
- || (devfn != bios_device.devfn)) {
- // fail accesses to any device but ours...
- printf
- ("Config access invalid! bus: %x, devfn: %x, offs: %x\n",
- bus, devfn, offs);
- HALT_SYS();
- } else {
- rtas_pci_config_write(bios_device.puid,
- size, bus, devfn, offs,
- val);
- DEBUG_PRINTF_IO
- ("%s(%04x) PCI Config Write @%02x, size: %d <-- 0x%08x\n",
- __FUNCTION__, addr, offs, size, val);
- }
- }
- }
-}
-
-uint8_t
-handle_port_61h(void)
-{
- static uint64_t last_time = 0;
- uint64_t curr_time = get_time();
- uint64_t time_diff; // time since last call
- uint32_t period_ticks; // length of a period in ticks
- uint32_t nr_periods; //number of periods passed since last call
- // bit 4 should toggle with every (DRAM) refresh cycle... (66kHz??)
- time_diff = curr_time - last_time;
- // at 66kHz a period is ~ 15 ns long, converted to ticks: (tb_freq is ticks/second)
- // TODO: as long as the frequency does not change, we should not calculate this every time
- period_ticks = (15 * tb_freq) / 1000000;
- nr_periods = time_diff / period_ticks;
- // if the number if ticks passed since last call is odd, we toggle bit 4
- if ((nr_periods % 2) != 0) {
- *((uint8_t *) (bios_device.io_buffer + 0x61)) ^= 0x10;
- }
- //finally read the value from the io_buffer
- return *((uint8_t *) (bios_device.io_buffer + 0x61));
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/app/biosemu/io.h b/qemu/roms/SLOF/clients/net-snk/app/biosemu/io.h
deleted file mode 100644
index 5a0bb4b4b..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/biosemu/io.h
+++ /dev/null
@@ -1,30 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#ifndef _BIOSEMU_IO_H_
-#define _BIOSEMU_IO_H_
-#include <x86emu/x86emu.h>
-#include <stdint.h>
-
-uint8_t my_inb(X86EMU_pioAddr addr);
-
-uint16_t my_inw(X86EMU_pioAddr addr);
-
-uint32_t my_inl(X86EMU_pioAddr addr);
-
-void my_outb(X86EMU_pioAddr addr, uint8_t val);
-
-void my_outw(X86EMU_pioAddr addr, uint16_t val);
-
-void my_outl(X86EMU_pioAddr addr, uint32_t val);
-
-#endif
diff --git a/qemu/roms/SLOF/clients/net-snk/app/biosemu/mem.c b/qemu/roms/SLOF/clients/net-snk/app/biosemu/mem.c
deleted file mode 100644
index 1a6207554..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/biosemu/mem.c
+++ /dev/null
@@ -1,464 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#include <stdio.h>
-#include <stdint.h>
-#include <cpu.h>
-#include "debug.h"
-#include "device.h"
-#include "x86emu/x86emu.h"
-#include "biosemu.h"
-#include <time.h>
-#include "mem.h"
-
-// define a check for access to certain (virtual) memory regions (interrupt handlers, BIOS Data Area, ...)
-#ifdef DEBUG
-static uint8_t in_check = 0; // to avoid recursion...
-uint16_t ebda_segment;
-uint32_t ebda_size;
-
-//TODO: these macros have grown so large, that they should be changed to an inline function,
-//just for the sake of readability...
-
-//declare prototypes of the functions to follow, for use in DEBUG_CHECK_VMEM_ACCESS
-uint8_t my_rdb(uint32_t);
-uint16_t my_rdw(uint32_t);
-uint32_t my_rdl(uint32_t);
-
-#define DEBUG_CHECK_VMEM_READ(_addr, _rval) \
- if ((debug_flags & DEBUG_CHECK_VMEM_ACCESS) && (in_check == 0)) { \
- in_check = 1; \
- /* determine ebda_segment and size \
- * since we are using my_rdx calls, make sure, this is after setting in_check! */ \
- /* offset 03 in BDA is EBDA segment */ \
- ebda_segment = my_rdw(0x40e); \
- /* first value in ebda is size in KB */ \
- ebda_size = my_rdb(ebda_segment << 4) * 1024; \
- /* check Interrupt Vector Access (0000:0000h - 0000:0400h) */ \
- if (_addr < 0x400) { \
- DEBUG_PRINTF_CS_IP("%s: read from Interrupt Vector %x --> %x\n", \
- __FUNCTION__, _addr / 4, _rval); \
- } \
- /* access to BIOS Data Area (0000:0400h - 0000:0500h)*/ \
- else if ((_addr >= 0x400) && (addr < 0x500)) { \
- DEBUG_PRINTF_CS_IP("%s: read from BIOS Data Area: addr: %x --> %x\n", \
- __FUNCTION__, _addr, _rval); \
- /* dump registers */ \
- /* x86emu_dump_xregs(); */ \
- } \
- /* access to first 64k of memory... */ \
- else if (_addr < 0x10000) { \
- DEBUG_PRINTF_CS_IP("%s: read from segment 0000h: addr: %x --> %x\n", \
- __FUNCTION__, _addr, _rval); \
- /* dump registers */ \
- /* x86emu_dump_xregs(); */ \
- } \
- /* read from PMM_CONV_SEGMENT */ \
- else if ((_addr <= ((PMM_CONV_SEGMENT << 4) | 0xffff)) && (_addr >= (PMM_CONV_SEGMENT << 4))) { \
- DEBUG_PRINTF_CS_IP("%s: read from PMM Segment %04xh: addr: %x --> %x\n", \
- __FUNCTION__, PMM_CONV_SEGMENT, _addr, _rval); \
- /* HALT_SYS(); */ \
- /* dump registers */ \
- /* x86emu_dump_xregs(); */ \
- } \
- /* read from PNP_DATA_SEGMENT */ \
- else if ((_addr <= ((PNP_DATA_SEGMENT << 4) | 0xffff)) && (_addr >= (PNP_DATA_SEGMENT << 4))) { \
- DEBUG_PRINTF_CS_IP("%s: read from PnP Data Segment %04xh: addr: %x --> %x\n", \
- __FUNCTION__, PNP_DATA_SEGMENT, _addr, _rval); \
- /* HALT_SYS(); */ \
- /* dump registers */ \
- /* x86emu_dump_xregs(); */ \
- } \
- /* read from EBDA Segment */ \
- else if ((_addr <= ((ebda_segment << 4) | (ebda_size - 1))) && (_addr >= (ebda_segment << 4))) { \
- DEBUG_PRINTF_CS_IP("%s: read from Extended BIOS Data Area %04xh, size: %04x: addr: %x --> %x\n", \
- __FUNCTION__, ebda_segment, ebda_size, _addr, _rval); \
- } \
- /* read from BIOS_DATA_SEGMENT */ \
- else if ((_addr <= ((BIOS_DATA_SEGMENT << 4) | 0xffff)) && (_addr >= (BIOS_DATA_SEGMENT << 4))) { \
- DEBUG_PRINTF_CS_IP("%s: read from BIOS Data Segment %04xh: addr: %x --> %x\n", \
- __FUNCTION__, BIOS_DATA_SEGMENT, _addr, _rval); \
- /* for PMM debugging */ \
- /*if (_addr == BIOS_DATA_SEGMENT << 4) { \
- X86EMU_trace_on(); \
- M.x86.debug &= ~DEBUG_DECODE_NOPRINT_F; \
- }*/ \
- /* dump registers */ \
- /* x86emu_dump_xregs(); */ \
- } \
- in_check = 0; \
- }
-#define DEBUG_CHECK_VMEM_WRITE(_addr, _val) \
- if ((debug_flags & DEBUG_CHECK_VMEM_ACCESS) && (in_check == 0)) { \
- in_check = 1; \
- /* determine ebda_segment and size \
- * since we are using my_rdx calls, make sure, this is after setting in_check! */ \
- /* offset 03 in BDA is EBDA segment */ \
- ebda_segment = my_rdw(0x40e); \
- /* first value in ebda is size in KB */ \
- ebda_size = my_rdb(ebda_segment << 4) * 1024; \
- /* check Interrupt Vector Access (0000:0000h - 0000:0400h) */ \
- if (_addr < 0x400) { \
- DEBUG_PRINTF_CS_IP("%s: write to Interrupt Vector %x <-- %x\n", \
- __FUNCTION__, _addr / 4, _val); \
- } \
- /* access to BIOS Data Area (0000:0400h - 0000:0500h)*/ \
- else if ((_addr >= 0x400) && (addr < 0x500)) { \
- DEBUG_PRINTF_CS_IP("%s: write to BIOS Data Area: addr: %x <-- %x\n", \
- __FUNCTION__, _addr, _val); \
- /* dump registers */ \
- /* x86emu_dump_xregs(); */ \
- } \
- /* access to first 64k of memory...*/ \
- else if (_addr < 0x10000) { \
- DEBUG_PRINTF_CS_IP("%s: write to segment 0000h: addr: %x <-- %x\n", \
- __FUNCTION__, _addr, _val); \
- /* dump registers */ \
- /* x86emu_dump_xregs(); */ \
- } \
- /* write to PMM_CONV_SEGMENT... */ \
- else if ((_addr <= ((PMM_CONV_SEGMENT << 4) | 0xffff)) && (_addr >= (PMM_CONV_SEGMENT << 4))) { \
- DEBUG_PRINTF_CS_IP("%s: write to PMM Segment %04xh: addr: %x <-- %x\n", \
- __FUNCTION__, PMM_CONV_SEGMENT, _addr, _val); \
- /* dump registers */ \
- /* x86emu_dump_xregs(); */ \
- } \
- /* write to PNP_DATA_SEGMENT... */ \
- else if ((_addr <= ((PNP_DATA_SEGMENT << 4) | 0xffff)) && (_addr >= (PNP_DATA_SEGMENT << 4))) { \
- DEBUG_PRINTF_CS_IP("%s: write to PnP Data Segment %04xh: addr: %x <-- %x\n", \
- __FUNCTION__, PNP_DATA_SEGMENT, _addr, _val); \
- /* dump registers */ \
- /* x86emu_dump_xregs(); */ \
- } \
- /* write to EBDA Segment... */ \
- else if ((_addr <= ((ebda_segment << 4) | (ebda_size - 1))) && (_addr >= (ebda_segment << 4))) { \
- DEBUG_PRINTF_CS_IP("%s: write to Extended BIOS Data Area %04xh, size: %04x: addr: %x <-- %x\n", \
- __FUNCTION__, ebda_segment, ebda_size, _addr, _val); \
- } \
- /* write to BIOS_DATA_SEGMENT... */ \
- else if ((_addr <= ((BIOS_DATA_SEGMENT << 4) | 0xffff)) && (_addr >= (BIOS_DATA_SEGMENT << 4))) { \
- DEBUG_PRINTF_CS_IP("%s: write to BIOS Data Segment %04xh: addr: %x <-- %x\n", \
- __FUNCTION__, BIOS_DATA_SEGMENT, _addr, _val); \
- /* dump registers */ \
- /* x86emu_dump_xregs(); */ \
- } \
- /* write to current CS segment... */ \
- else if ((_addr < ((M.x86.R_CS << 4) | 0xffff)) && (_addr > (M.x86.R_CS << 4))) { \
- DEBUG_PRINTF_CS_IP("%s: write to CS segment %04xh: addr: %x <-- %x\n", \
- __FUNCTION__, M.x86.R_CS, _addr, _val); \
- /* dump registers */ \
- /* x86emu_dump_xregs(); */ \
- } \
- in_check = 0; \
- }
-#else
-#define DEBUG_CHECK_VMEM_READ(_addr, _rval)
-#define DEBUG_CHECK_VMEM_WRITE(_addr, _val)
-#endif
-
-//defined in net-snk/kernel/timer.c
-extern uint64_t get_time(void);
-
-void update_time(uint32_t);
-
-// read byte from memory
-uint8_t
-my_rdb(uint32_t addr)
-{
- uint64_t translated_addr = addr;
- uint8_t translated = dev_translate_address(&translated_addr);
- uint8_t rval;
- if (translated != 0) {
- //translation successful, access VGA Memory (BAR or Legacy...)
- DEBUG_PRINTF_MEM("%s(%08x): access to VGA Memory\n",
- __FUNCTION__, addr);
- //DEBUG_PRINTF_MEM("%s(%08x): translated_addr: %llx\n", __FUNCTION__, addr, translated_addr);
- set_ci();
- rval = *((uint8_t *) translated_addr);
- clr_ci();
- DEBUG_PRINTF_MEM("%s(%08x) VGA --> %02x\n", __FUNCTION__, addr,
- rval);
- return rval;
- } else if (addr > M.mem_size) {
- DEBUG_PRINTF("%s(%08x): Memory Access out of range!\n",
- __FUNCTION__, addr);
- //disassemble_forward(M.x86.saved_cs, M.x86.saved_ip, 1);
- HALT_SYS();
- } else {
- /* read from virtual memory */
- rval = *((uint8_t *) (M.mem_base + addr));
- DEBUG_CHECK_VMEM_READ(addr, rval);
- return rval;
- }
- return -1;
-}
-
-//read word from memory
-uint16_t
-my_rdw(uint32_t addr)
-{
- uint64_t translated_addr = addr;
- uint8_t translated = dev_translate_address(&translated_addr);
- uint16_t rval;
- if (translated != 0) {
- //translation successful, access VGA Memory (BAR or Legacy...)
- DEBUG_PRINTF_MEM("%s(%08x): access to VGA Memory\n",
- __FUNCTION__, addr);
- //DEBUG_PRINTF_MEM("%s(%08x): translated_addr: %llx\n", __FUNCTION__, addr, translated_addr);
- // check for legacy memory, because of the remapping to BARs, the reads must
- // be byte reads...
- if ((addr >= 0xa0000) && (addr < 0xc0000)) {
- //read bytes a using my_rdb, because of the remapping to BARs
- //words may not be contiguous in memory, so we need to translate
- //every address...
- rval = ((uint8_t) my_rdb(addr)) |
- (((uint8_t) my_rdb(addr + 1)) << 8);
- } else {
- if ((translated_addr & (uint64_t) 0x1) == 0) {
- // 16 bit aligned access...
- set_ci();
- rval = in16le((void *) translated_addr);
- clr_ci();
- } else {
- // unaligned access, read single bytes
- set_ci();
- rval = (*((uint8_t *) translated_addr)) |
- (*((uint8_t *) translated_addr + 1) << 8);
- clr_ci();
- }
- }
- DEBUG_PRINTF_MEM("%s(%08x) VGA --> %04x\n", __FUNCTION__, addr,
- rval);
- return rval;
- } else if (addr > M.mem_size) {
- DEBUG_PRINTF("%s(%08x): Memory Access out of range!\n",
- __FUNCTION__, addr);
- //disassemble_forward(M.x86.saved_cs, M.x86.saved_ip, 1);
- HALT_SYS();
- } else {
- /* read from virtual memory */
- rval = in16le((void *) (M.mem_base + addr));
- DEBUG_CHECK_VMEM_READ(addr, rval);
- return rval;
- }
- return -1;
-}
-
-//read long from memory
-uint32_t
-my_rdl(uint32_t addr)
-{
- uint64_t translated_addr = addr;
- uint8_t translated = dev_translate_address(&translated_addr);
- uint32_t rval;
- if (translated != 0) {
- //translation successful, access VGA Memory (BAR or Legacy...)
- DEBUG_PRINTF_MEM("%s(%x): access to VGA Memory\n",
- __FUNCTION__, addr);
- //DEBUG_PRINTF_MEM("%s(%08x): translated_addr: %llx\n", __FUNCTION__, addr, translated_addr);
- // check for legacy memory, because of the remapping to BARs, the reads must
- // be byte reads...
- if ((addr >= 0xa0000) && (addr < 0xc0000)) {
- //read bytes a using my_rdb, because of the remapping to BARs
- //dwords may not be contiguous in memory, so we need to translate
- //every address...
- rval = ((uint8_t) my_rdb(addr)) |
- (((uint8_t) my_rdb(addr + 1)) << 8) |
- (((uint8_t) my_rdb(addr + 2)) << 16) |
- (((uint8_t) my_rdb(addr + 3)) << 24);
- } else {
- if ((translated_addr & (uint64_t) 0x3) == 0) {
- // 32 bit aligned access...
- set_ci();
- rval = in32le((void *) translated_addr);
- clr_ci();
- } else {
- // unaligned access, read single bytes
- set_ci();
- rval = (*((uint8_t *) translated_addr)) |
- (*((uint8_t *) translated_addr + 1) << 8) |
- (*((uint8_t *) translated_addr + 2) << 16) |
- (*((uint8_t *) translated_addr + 3) << 24);
- clr_ci();
- }
- }
- DEBUG_PRINTF_MEM("%s(%08x) VGA --> %08x\n", __FUNCTION__, addr,
- rval);
- //HALT_SYS();
- return rval;
- } else if (addr > M.mem_size) {
- DEBUG_PRINTF("%s(%08x): Memory Access out of range!\n",
- __FUNCTION__, addr);
- //disassemble_forward(M.x86.saved_cs, M.x86.saved_ip, 1);
- HALT_SYS();
- } else {
- /* read from virtual memory */
- rval = in32le((void *) (M.mem_base + addr));
- switch (addr) {
- case 0x46c:
- //BDA Time Data, update it, before reading
- update_time(rval);
- rval = in32le((void *) (M.mem_base + addr));
- break;
- }
- DEBUG_CHECK_VMEM_READ(addr, rval);
- return rval;
- }
- return -1;
-}
-
-//write byte to memory
-void
-my_wrb(uint32_t addr, uint8_t val)
-{
- uint64_t translated_addr = addr;
- uint8_t translated = dev_translate_address(&translated_addr);
- if (translated != 0) {
- //translation successful, access VGA Memory (BAR or Legacy...)
- DEBUG_PRINTF_MEM("%s(%x, %x): access to VGA Memory\n",
- __FUNCTION__, addr, val);
- //DEBUG_PRINTF_MEM("%s(%08x): translated_addr: %llx\n", __FUNCTION__, addr, translated_addr);
- set_ci();
- *((uint8_t *) translated_addr) = val;
- clr_ci();
- } else if (addr > M.mem_size) {
- DEBUG_PRINTF("%s(%08x): Memory Access out of range!\n",
- __FUNCTION__, addr);
- //disassemble_forward(M.x86.saved_cs, M.x86.saved_ip, 1);
- HALT_SYS();
- } else {
- /* write to virtual memory */
- DEBUG_CHECK_VMEM_WRITE(addr, val);
- *((uint8_t *) (M.mem_base + addr)) = val;
- }
-}
-
-void
-my_wrw(uint32_t addr, uint16_t val)
-{
- uint64_t translated_addr = addr;
- uint8_t translated = dev_translate_address(&translated_addr);
- if (translated != 0) {
- //translation successful, access VGA Memory (BAR or Legacy...)
- DEBUG_PRINTF_MEM("%s(%x, %x): access to VGA Memory\n",
- __FUNCTION__, addr, val);
- //DEBUG_PRINTF_MEM("%s(%08x): translated_addr: %llx\n", __FUNCTION__, addr, translated_addr);
- // check for legacy memory, because of the remapping to BARs, the reads must
- // be byte reads...
- if ((addr >= 0xa0000) && (addr < 0xc0000)) {
- //read bytes a using my_rdb, because of the remapping to BARs
- //words may not be contiguous in memory, so we need to translate
- //every address...
- my_wrb(addr, (uint8_t) (val & 0x00FF));
- my_wrb(addr + 1, (uint8_t) ((val & 0xFF00) >> 8));
- } else {
- if ((translated_addr & (uint64_t) 0x1) == 0) {
- // 16 bit aligned access...
- set_ci();
- out16le((void *) translated_addr, val);
- clr_ci();
- } else {
- // unaligned access, write single bytes
- set_ci();
- *((uint8_t *) translated_addr) =
- (uint8_t) (val & 0x00FF);
- *((uint8_t *) translated_addr + 1) =
- (uint8_t) ((val & 0xFF00) >> 8);
- clr_ci();
- }
- }
- } else if (addr > M.mem_size) {
- DEBUG_PRINTF("%s(%08x): Memory Access out of range!\n",
- __FUNCTION__, addr);
- //disassemble_forward(M.x86.saved_cs, M.x86.saved_ip, 1);
- HALT_SYS();
- } else {
- /* write to virtual memory */
- DEBUG_CHECK_VMEM_WRITE(addr, val);
- out16le((void *) (M.mem_base + addr), val);
- }
-}
-void
-my_wrl(uint32_t addr, uint32_t val)
-{
- uint64_t translated_addr = addr;
- uint8_t translated = dev_translate_address(&translated_addr);
- if (translated != 0) {
- //translation successful, access VGA Memory (BAR or Legacy...)
- DEBUG_PRINTF_MEM("%s(%x, %x): access to VGA Memory\n",
- __FUNCTION__, addr, val);
- //DEBUG_PRINTF_MEM("%s(%08x): translated_addr: %llx\n", __FUNCTION__, addr, translated_addr);
- // check for legacy memory, because of the remapping to BARs, the reads must
- // be byte reads...
- if ((addr >= 0xa0000) && (addr < 0xc0000)) {
- //read bytes a using my_rdb, because of the remapping to BARs
- //words may not be contiguous in memory, so we need to translate
- //every address...
- my_wrb(addr, (uint8_t) (val & 0x000000FF));
- my_wrb(addr + 1, (uint8_t) ((val & 0x0000FF00) >> 8));
- my_wrb(addr + 2, (uint8_t) ((val & 0x00FF0000) >> 16));
- my_wrb(addr + 3, (uint8_t) ((val & 0xFF000000) >> 24));
- } else {
- if ((translated_addr & (uint64_t) 0x3) == 0) {
- // 32 bit aligned access...
- set_ci();
- out32le((void *) translated_addr, val);
- clr_ci();
- } else {
- // unaligned access, write single bytes
- set_ci();
- *((uint8_t *) translated_addr) =
- (uint8_t) (val & 0x000000FF);
- *((uint8_t *) translated_addr + 1) =
- (uint8_t) ((val & 0x0000FF00) >> 8);
- *((uint8_t *) translated_addr + 2) =
- (uint8_t) ((val & 0x00FF0000) >> 16);
- *((uint8_t *) translated_addr + 3) =
- (uint8_t) ((val & 0xFF000000) >> 24);
- clr_ci();
- }
- }
- } else if (addr > M.mem_size) {
- DEBUG_PRINTF("%s(%08x): Memory Access out of range!\n",
- __FUNCTION__, addr);
- //disassemble_forward(M.x86.saved_cs, M.x86.saved_ip, 1);
- HALT_SYS();
- } else {
- /* write to virtual memory */
- DEBUG_CHECK_VMEM_WRITE(addr, val);
- out32le((void *) (M.mem_base + addr), val);
- }
-}
-
-//update time in BIOS Data Area
-//DWord at offset 0x6c is the timer ticks since midnight, timer is running at 18Hz
-//byte at 0x70 is timer overflow (set if midnight passed since last call to interrupt 1a function 00
-//cur_val is the current value, of offset 6c...
-void
-update_time(uint32_t cur_val)
-{
- //for convenience, we let the start of timebase be at midnight, we currently dont support
- //real daytime anyway...
- uint64_t ticks_per_day = tb_freq * 60 * 24;
- // at 18Hz a period is ~55ms, converted to ticks (tb_freq is ticks/second)
- uint32_t period_ticks = (55 * tb_freq) / 1000;
- uint64_t curr_time = get_time();
- uint64_t ticks_since_midnight = curr_time % ticks_per_day;
- uint32_t periods_since_midnight = ticks_since_midnight / period_ticks;
- // if periods since midnight is smaller than last value, set overflow
- // at BDA Offset 0x70
- if (periods_since_midnight < cur_val) {
- my_wrb(0x470, 1);
- }
- // store periods since midnight at BDA offset 0x6c
- my_wrl(0x46c, periods_since_midnight);
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/app/biosemu/mem.h b/qemu/roms/SLOF/clients/net-snk/app/biosemu/mem.h
deleted file mode 100644
index f0fbad96c..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/biosemu/mem.h
+++ /dev/null
@@ -1,36 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#ifndef _BIOSEMU_MEM_H_
-#define _BIOSEMU_MEM_H_
-#include <x86emu/x86emu.h>
-#include <stdint.h>
-
-// read byte from memory
-uint8_t my_rdb(uint32_t addr);
-
-//read word from memory
-uint16_t my_rdw(uint32_t addr);
-
-//read long from memory
-uint32_t my_rdl(uint32_t addr);
-
-//write byte to memory
-void my_wrb(uint32_t addr, uint8_t val);
-
-//write word to memory
-void my_wrw(uint32_t addr, uint16_t val);
-
-//write long to memory
-void my_wrl(uint32_t addr, uint32_t val);
-
-#endif
diff --git a/qemu/roms/SLOF/clients/net-snk/app/biosemu/vbe.c b/qemu/roms/SLOF/clients/net-snk/app/biosemu/vbe.c
deleted file mode 100644
index 957a1f2a0..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/biosemu/vbe.c
+++ /dev/null
@@ -1,780 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-
-#include <stdint.h>
-#include <cpu.h>
-
-#include "debug.h"
-
-#include <x86emu/x86emu.h>
-#include <x86emu/regs.h>
-#include <x86emu/prim_ops.h> // for push_word
-
-#include "biosemu.h"
-#include "io.h"
-#include "mem.h"
-#include "interrupt.h"
-#include "device.h"
-#include "vbe.h"
-
-static X86EMU_memFuncs my_mem_funcs = {
- my_rdb, my_rdw, my_rdl,
- my_wrb, my_wrw, my_wrl
-};
-
-static X86EMU_pioFuncs my_pio_funcs = {
- my_inb, my_inw, my_inl,
- my_outb, my_outw, my_outl
-};
-
-// pointer to VBEInfoBuffer, set by vbe_prepare
-uint8_t *vbe_info_buffer = 0;
-// virtual BIOS Memory
-uint8_t *biosmem;
-uint32_t biosmem_size;
-
-// these structs are for input from and output to OF
-typedef struct {
- uint8_t display_type; // 0=NONE, 1= analog, 2=digital
- uint16_t screen_width;
- uint16_t screen_height;
- uint16_t screen_linebytes; // bytes per line in framebuffer, may be more than screen_width
- uint8_t color_depth; // color depth in bpp
- uint32_t framebuffer_address;
- uint8_t edid_block_zero[128];
-} __attribute__ ((__packed__)) screen_info_t;
-
-typedef struct {
- uint8_t signature[4];
- uint16_t size_reserved;
- uint8_t monitor_number;
- uint16_t max_screen_width;
- uint8_t color_depth;
-} __attribute__ ((__packed__)) screen_info_input_t;
-
-// these structs only store a subset of the VBE defined fields
-// only those needed.
-typedef struct {
- char signature[4];
- uint16_t version;
- uint8_t *oem_string_ptr;
- uint32_t capabilities;
- uint16_t video_mode_list[256]; // lets hope we never have more than 256 video modes...
- uint16_t total_memory;
-} vbe_info_t;
-
-typedef struct {
- uint16_t video_mode;
- uint8_t mode_info_block[256];
- uint16_t attributes;
- uint16_t linebytes;
- uint16_t x_resolution;
- uint16_t y_resolution;
- uint8_t x_charsize;
- uint8_t y_charsize;
- uint8_t bits_per_pixel;
- uint8_t memory_model;
- uint32_t framebuffer_address;
-} vbe_mode_info_t;
-
-typedef struct {
- uint8_t port_number; // i.e. monitor number
- uint8_t edid_transfer_time;
- uint8_t ddc_level;
- uint8_t edid_block_zero[128];
-} vbe_ddc_info_t;
-
-static inline uint8_t
-vbe_prepare(void)
-{
- vbe_info_buffer = biosmem + (VBE_SEGMENT << 4); // segment:offset off VBE Data Area
- //clear buffer
- memset(vbe_info_buffer, 0, 512);
- //set VbeSignature to "VBE2" to indicate VBE 2.0+ request
- vbe_info_buffer[0] = 'V';
- vbe_info_buffer[0] = 'B';
- vbe_info_buffer[0] = 'E';
- vbe_info_buffer[0] = '2';
- // ES:DI store pointer to buffer in virtual mem see vbe_info_buffer above...
- M.x86.R_EDI = 0x0;
- M.x86.R_ES = VBE_SEGMENT;
-
- return 0; // successful init
-}
-
-// VBE Function 00h
-static uint8_t
-vbe_info(vbe_info_t * info)
-{
- vbe_prepare();
- // call VBE function 00h (Info Function)
- M.x86.R_EAX = 0x4f00;
-
- // enable trace
- CHECK_DBG(DEBUG_TRACE_X86EMU) {
- X86EMU_trace_on();
- }
- // run VESA Interrupt
- runInt10();
-
- if (M.x86.R_AL != 0x4f) {
- DEBUG_PRINTF_VBE("%s: VBE Info Function NOT supported! AL=%x\n",
- __FUNCTION__, M.x86.R_AL);
- return -1;
- }
-
- if (M.x86.R_AH != 0x0) {
- DEBUG_PRINTF_VBE
- ("%s: VBE Info Function Return Code NOT OK! AH=%x\n",
- __FUNCTION__, M.x86.R_AH);
- return M.x86.R_AH;
- }
- //printf("VBE Info Dump:");
- //dump(vbe_info_buffer, 64);
-
- //offset 0: signature
- info->signature[0] = vbe_info_buffer[0];
- info->signature[1] = vbe_info_buffer[1];
- info->signature[2] = vbe_info_buffer[2];
- info->signature[3] = vbe_info_buffer[3];
-
- // offset 4: 16bit le containing VbeVersion
- info->version = in16le(vbe_info_buffer + 4);
-
- // offset 6: 32bit le containg segment:offset of OEM String in virtual Mem.
- info->oem_string_ptr =
- biosmem + ((in16le(vbe_info_buffer + 8) << 4) +
- in16le(vbe_info_buffer + 6));
-
- // offset 10: 32bit le capabilities
- info->capabilities = in32le(vbe_info_buffer + 10);
-
- // offset 14: 32 bit le containing segment:offset of supported video mode table
- uint16_t *video_mode_ptr;
- video_mode_ptr =
- (uint16_t *) (biosmem +
- ((in16le(vbe_info_buffer + 16) << 4) +
- in16le(vbe_info_buffer + 14)));
- uint32_t i = 0;
- do {
- info->video_mode_list[i] = in16le(video_mode_ptr + i);
- i++;
- }
- while ((i <
- (sizeof(info->video_mode_list) /
- sizeof(info->video_mode_list[0])))
- && (info->video_mode_list[i - 1] != 0xFFFF));
-
- //offset 18: 16bit le total memory in 64KB blocks
- info->total_memory = in16le(vbe_info_buffer + 18);
-
- return 0;
-}
-
-// VBE Function 01h
-static uint8_t
-vbe_get_mode_info(vbe_mode_info_t * mode_info)
-{
- vbe_prepare();
- // call VBE function 01h (Return VBE Mode Info Function)
- M.x86.R_EAX = 0x4f01;
- M.x86.R_CX = mode_info->video_mode;
-
- // enable trace
- CHECK_DBG(DEBUG_TRACE_X86EMU) {
- X86EMU_trace_on();
- }
- // run VESA Interrupt
- runInt10();
-
- if (M.x86.R_AL != 0x4f) {
- DEBUG_PRINTF_VBE
- ("%s: VBE Return Mode Info Function NOT supported! AL=%x\n",
- __FUNCTION__, M.x86.R_AL);
- return -1;
- }
-
- if (M.x86.R_AH != 0x0) {
- DEBUG_PRINTF_VBE
- ("%s: VBE Return Mode Info (mode: %04x) Function Return Code NOT OK! AH=%02x\n",
- __FUNCTION__, mode_info->video_mode, M.x86.R_AH);
- return M.x86.R_AH;
- }
- //pointer to mode_info_block is in ES:DI
- memcpy(mode_info->mode_info_block,
- biosmem + ((M.x86.R_ES << 4) + M.x86.R_DI),
- sizeof(mode_info->mode_info_block));
-
- //printf("Mode Info Dump:");
- //dump(mode_info_block, 64);
-
- // offset 0: 16bit le mode attributes
- mode_info->attributes = in16le(mode_info->mode_info_block);
-
- // offset 16: 16bit le bytes per scan line
- mode_info->linebytes = in16le(mode_info->mode_info_block + 16);
-
- // offset 18: 16bit le x resolution
- mode_info->x_resolution = in16le(mode_info->mode_info_block + 18);
-
- // offset 20: 16bit le y resolution
- mode_info->y_resolution = in16le(mode_info->mode_info_block + 20);
-
- // offset 22: 8bit le x charsize
- mode_info->x_charsize = *(mode_info->mode_info_block + 22);
-
- // offset 23: 8bit le y charsize
- mode_info->y_charsize = *(mode_info->mode_info_block + 23);
-
- // offset 25: 8bit le bits per pixel
- mode_info->bits_per_pixel = *(mode_info->mode_info_block + 25);
-
- // offset 27: 8bit le memory model
- mode_info->memory_model = *(mode_info->mode_info_block + 27);
-
- // offset 40: 32bit le containg offset of frame buffer memory ptr
- mode_info->framebuffer_address =
- in32le(mode_info->mode_info_block + 40);
-
- return 0;
-}
-
-// VBE Function 02h
-static uint8_t
-vbe_set_mode(vbe_mode_info_t * mode_info)
-{
- vbe_prepare();
- // call VBE function 02h (Set VBE Mode Function)
- M.x86.R_EAX = 0x4f02;
- M.x86.R_BX = mode_info->video_mode;
- M.x86.R_BX |= 0x4000; // set bit 14 to request linear framebuffer mode
- M.x86.R_BX &= 0x7FFF; // clear bit 15 to request clearing of framebuffer
-
- DEBUG_PRINTF_VBE("%s: setting mode: 0x%04x\n", __FUNCTION__,
- M.x86.R_BX);
-
- // enable trace
- CHECK_DBG(DEBUG_TRACE_X86EMU) {
- X86EMU_trace_on();
- }
- // run VESA Interrupt
- runInt10();
-
- if (M.x86.R_AL != 0x4f) {
- DEBUG_PRINTF_VBE
- ("%s: VBE Set Mode Function NOT supported! AL=%x\n",
- __FUNCTION__, M.x86.R_AL);
- return -1;
- }
-
- if (M.x86.R_AH != 0x0) {
- DEBUG_PRINTF_VBE
- ("%s: mode: %x VBE Set Mode Function Return Code NOT OK! AH=%x\n",
- __FUNCTION__, mode_info->video_mode, M.x86.R_AH);
- return M.x86.R_AH;
- }
- return 0;
-}
-
-//VBE Function 08h
-static uint8_t
-vbe_set_palette_format(uint8_t format)
-{
- vbe_prepare();
- // call VBE function 09h (Set/Get Palette Data Function)
- M.x86.R_EAX = 0x4f08;
- M.x86.R_BL = 0x00; // set format
- M.x86.R_BH = format;
-
- DEBUG_PRINTF_VBE("%s: setting palette format: %d\n", __FUNCTION__,
- format);
-
- // enable trace
- CHECK_DBG(DEBUG_TRACE_X86EMU) {
- X86EMU_trace_on();
- }
- // run VESA Interrupt
- runInt10();
-
- if (M.x86.R_AL != 0x4f) {
- DEBUG_PRINTF_VBE
- ("%s: VBE Set Palette Format Function NOT supported! AL=%x\n",
- __FUNCTION__, M.x86.R_AL);
- return -1;
- }
-
- if (M.x86.R_AH != 0x0) {
- DEBUG_PRINTF_VBE
- ("%s: VBE Set Palette Format Function Return Code NOT OK! AH=%x\n",
- __FUNCTION__, M.x86.R_AH);
- return M.x86.R_AH;
- }
- return 0;
-}
-
-// VBE Function 09h
-static uint8_t
-vbe_set_color(uint16_t color_number, uint32_t color_value)
-{
- vbe_prepare();
- // call VBE function 09h (Set/Get Palette Data Function)
- M.x86.R_EAX = 0x4f09;
- M.x86.R_BL = 0x00; // set color
- M.x86.R_CX = 0x01; // set only one entry
- M.x86.R_DX = color_number;
- // ES:DI is address where color_value is stored, we store it at 2000:0000
- M.x86.R_ES = 0x2000;
- M.x86.R_DI = 0x0;
-
- // store color value at ES:DI
- out32le(biosmem + (M.x86.R_ES << 4) + M.x86.R_DI, color_value);
-
- DEBUG_PRINTF_VBE("%s: setting color #%x: 0x%04x\n", __FUNCTION__,
- color_number, color_value);
-
- // enable trace
- CHECK_DBG(DEBUG_TRACE_X86EMU) {
- X86EMU_trace_on();
- }
- // run VESA Interrupt
- runInt10();
-
- if (M.x86.R_AL != 0x4f) {
- DEBUG_PRINTF_VBE
- ("%s: VBE Set Palette Function NOT supported! AL=%x\n",
- __FUNCTION__, M.x86.R_AL);
- return -1;
- }
-
- if (M.x86.R_AH != 0x0) {
- DEBUG_PRINTF_VBE
- ("%s: VBE Set Palette Function Return Code NOT OK! AH=%x\n",
- __FUNCTION__, M.x86.R_AH);
- return M.x86.R_AH;
- }
- return 0;
-}
-
-#if 0
-static uint8_t
-vbe_get_color(uint16_t color_number, uint32_t * color_value)
-{
- vbe_prepare();
- // call VBE function 09h (Set/Get Palette Data Function)
- M.x86.R_EAX = 0x4f09;
- M.x86.R_BL = 0x00; // get color
- M.x86.R_CX = 0x01; // get only one entry
- M.x86.R_DX = color_number;
- // ES:DI is address where color_value is stored, we store it at 2000:0000
- M.x86.R_ES = 0x2000;
- M.x86.R_DI = 0x0;
-
- // enable trace
- CHECK_DBG(DEBUG_TRACE_X86EMU) {
- X86EMU_trace_on();
- }
- // run VESA Interrupt
- runInt10();
-
- if (M.x86.R_AL != 0x4f) {
- DEBUG_PRINTF_VBE
- ("%s: VBE Set Palette Function NOT supported! AL=%x\n",
- __FUNCTION__, M.x86.R_AL);
- return -1;
- }
-
- if (M.x86.R_AH != 0x0) {
- DEBUG_PRINTF_VBE
- ("%s: VBE Set Palette Function Return Code NOT OK! AH=%x\n",
- __FUNCTION__, M.x86.R_AH);
- return M.x86.R_AH;
- }
- // read color value from ES:DI
- *color_value = in32le(biosmem + (M.x86.R_ES << 4) + M.x86.R_DI);
-
- DEBUG_PRINTF_VBE("%s: getting color #%x --> 0x%04x\n", __FUNCTION__,
- color_number, *color_value);
-
- return 0;
-}
-#endif
-
-// VBE Function 15h
-static uint8_t
-vbe_get_ddc_info(vbe_ddc_info_t * ddc_info)
-{
- vbe_prepare();
- // call VBE function 15h (DDC Info Function)
- M.x86.R_EAX = 0x4f15;
- M.x86.R_BL = 0x00; // get DDC Info
- M.x86.R_CX = ddc_info->port_number;
- M.x86.R_ES = 0x0;
- M.x86.R_DI = 0x0;
-
- // enable trace
- CHECK_DBG(DEBUG_TRACE_X86EMU) {
- X86EMU_trace_on();
- }
- // run VESA Interrupt
- runInt10();
-
- if (M.x86.R_AL != 0x4f) {
- DEBUG_PRINTF_VBE
- ("%s: VBE Get DDC Info Function NOT supported! AL=%x\n",
- __FUNCTION__, M.x86.R_AL);
- return -1;
- }
-
- if (M.x86.R_AH != 0x0) {
- DEBUG_PRINTF_VBE
- ("%s: port: %x VBE Get DDC Info Function Return Code NOT OK! AH=%x\n",
- __FUNCTION__, ddc_info->port_number, M.x86.R_AH);
- return M.x86.R_AH;
- }
- // BH = approx. time in seconds to transfer one EDID block
- ddc_info->edid_transfer_time = M.x86.R_BH;
- // BL = DDC Level
- ddc_info->ddc_level = M.x86.R_BL;
-
- vbe_prepare();
- // call VBE function 15h (DDC Info Function)
- M.x86.R_EAX = 0x4f15;
- M.x86.R_BL = 0x01; // read EDID
- M.x86.R_CX = ddc_info->port_number;
- M.x86.R_DX = 0x0; // block number
- // ES:DI is address where EDID is stored, we store it at 2000:0000
- M.x86.R_ES = 0x2000;
- M.x86.R_DI = 0x0;
-
- // enable trace
- CHECK_DBG(DEBUG_TRACE_X86EMU) {
- X86EMU_trace_on();
- }
- // run VESA Interrupt
- runInt10();
-
- if (M.x86.R_AL != 0x4f) {
- DEBUG_PRINTF_VBE
- ("%s: VBE Read EDID Function NOT supported! AL=%x\n",
- __FUNCTION__, M.x86.R_AL);
- return -1;
- }
-
- if (M.x86.R_AH != 0x0) {
- DEBUG_PRINTF_VBE
- ("%s: port: %x VBE Read EDID Function Return Code NOT OK! AH=%x\n",
- __FUNCTION__, ddc_info->port_number, M.x86.R_AH);
- return M.x86.R_AH;
- }
-
- memcpy(ddc_info->edid_block_zero,
- biosmem + (M.x86.R_ES << 4) + M.x86.R_DI,
- sizeof(ddc_info->edid_block_zero));
-
- return 0;
-}
-
-uint32_t
-vbe_get_info(uint8_t argc, char ** argv)
-{
- uint8_t rval;
- static const uint8_t valid_edid_sig[] = {
- 0x00, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0x00
- };
- uint32_t i;
-
- if (argc < 4) {
- printf
- ("Usage %s <vmem_base> <device_path> <address of screen_info_t>\n",
- argv[0]);
- int i = 0;
- for (i = 0; i < argc; i++) {
- printf("argv[%d]: %s\n", i, argv[i]);
- }
- return -1;
- }
- // get a copy of input struct...
- screen_info_input_t input =
- *((screen_info_input_t *) strtoul((char *) argv[4], 0, 16));
- // output is pointer to the address passed as argv[4]
- screen_info_t *output =
- (screen_info_t *) strtoul((char *) argv[4], 0, 16);
- // zero output
- memset(output, 0, sizeof(screen_info_t));
-
- // argv[1] is address of virtual BIOS mem...
- // argv[2] is the size
- biosmem = (uint8_t *) strtoul(argv[1], 0, 16);
- biosmem_size = strtoul(argv[2], 0, 16);;
- if (biosmem_size < MIN_REQUIRED_VMEM_SIZE) {
- printf("Error: Not enough virtual memory: %x, required: %x!\n",
- biosmem_size, MIN_REQUIRED_VMEM_SIZE);
- return -1;
- }
- // argv[3] is the device to open and use...
- if (dev_init((char *) argv[3]) != 0) {
- printf("Error initializing device!\n");
- return -1;
- }
- //setup interrupt handler
- X86EMU_intrFuncs intrFuncs[256];
- for (i = 0; i < 256; i++)
- intrFuncs[i] = handleInterrupt;
- X86EMU_setupIntrFuncs(intrFuncs);
- X86EMU_setupPioFuncs(&my_pio_funcs);
- X86EMU_setupMemFuncs(&my_mem_funcs);
-
- // set mem_base
- M.mem_base = (long) biosmem;
- M.mem_size = biosmem_size;
- DEBUG_PRINTF_VBE("membase set: %08x, size: %08x\n", (int) M.mem_base,
- (int) M.mem_size);
-
- vbe_info_t info;
- rval = vbe_info(&info);
- if (rval != 0)
- return rval;
-
- DEBUG_PRINTF_VBE("VbeSignature: %s\n", info.signature);
- DEBUG_PRINTF_VBE("VbeVersion: 0x%04x\n", info.version);
- DEBUG_PRINTF_VBE("OemString: %s\n", info.oem_string_ptr);
- DEBUG_PRINTF_VBE("Capabilities:\n");
- DEBUG_PRINTF_VBE("\tDAC: %s\n",
- (info.capabilities & 0x1) ==
- 0 ? "fixed 6bit" : "switchable 6/8bit");
- DEBUG_PRINTF_VBE("\tVGA: %s\n",
- (info.capabilities & 0x2) ==
- 0 ? "compatible" : "not compatible");
- DEBUG_PRINTF_VBE("\tRAMDAC: %s\n",
- (info.capabilities & 0x4) ==
- 0 ? "normal" : "use blank bit in Function 09h");
-
- // argv[4] may be a pointer with enough space to return screen_info_t
- // as input, it must contain a screen_info_input_t with the following content:
- // byte[0:3] = "DDC\0" (zero-terminated signature header)
- // byte[4:5] = reserved space for the return struct... just in case we ever change
- // the struct and dont have reserved enough memory (and let's hope the struct
- // never gets larger than 64KB)
- // byte[6] = monitor port number for DDC requests ("only" one byte... so lets hope we never have more than 255 monitors...
- // byte[7:8] = max. screen width (OF may want to limit this)
- // byte[9] = required color depth in bpp
- if (strncmp((char *) input.signature, "DDC", 4) != 0) {
- printf
- ("%s: Invalid input signature! expected: %s, is: %s\n",
- __FUNCTION__, "DDC", input.signature);
- return -1;
- }
- if (input.size_reserved != sizeof(screen_info_t)) {
- printf
- ("%s: Size of return struct is wrong, required: %d, available: %d\n",
- __FUNCTION__, (int) sizeof(screen_info_t),
- input.size_reserved);
- return -1;
- }
-
- vbe_ddc_info_t ddc_info;
- ddc_info.port_number = input.monitor_number;
- vbe_get_ddc_info(&ddc_info);
-
-#if 0
- DEBUG_PRINTF_VBE("DDC: edid_tranfer_time: %d\n",
- ddc_info.edid_transfer_time);
- DEBUG_PRINTF_VBE("DDC: ddc_level: %x\n", ddc_info.ddc_level);
- DEBUG_PRINTF_VBE("DDC: EDID: \n");
- CHECK_DBG(DEBUG_VBE) {
- dump(ddc_info.edid_block_zero,
- sizeof(ddc_info.edid_block_zero));
- }
-#endif
- if (memcmp(ddc_info.edid_block_zero, valid_edid_sig, 8) != 0) {
- // invalid EDID signature... probably no monitor
- output->display_type = 0x0;
- return 0;
- } else if ((ddc_info.edid_block_zero[20] & 0x80) != 0) {
- // digital display
- output->display_type = 2;
- } else {
- // analog
- output->display_type = 1;
- }
- DEBUG_PRINTF_VBE("DDC: found display type %d\n", output->display_type);
- memcpy(output->edid_block_zero, ddc_info.edid_block_zero,
- sizeof(ddc_info.edid_block_zero));
- i = 0;
- vbe_mode_info_t mode_info;
- vbe_mode_info_t best_mode_info;
- // initialize best_mode to 0
- memset(&best_mode_info, 0, sizeof(best_mode_info));
- while ((mode_info.video_mode = info.video_mode_list[i]) != 0xFFFF) {
- //DEBUG_PRINTF_VBE("%x: Mode: %04x\n", i, mode_info.video_mode);
- vbe_get_mode_info(&mode_info);
-#if 0
- DEBUG_PRINTF_VBE("Video Mode 0x%04x available, %s\n",
- mode_info.video_mode,
- (mode_info.attributes & 0x1) ==
- 0 ? "not supported" : "supported");
- DEBUG_PRINTF_VBE("\tTTY: %s\n",
- (mode_info.attributes & 0x4) ==
- 0 ? "no" : "yes");
- DEBUG_PRINTF_VBE("\tMode: %s %s\n",
- (mode_info.attributes & 0x8) ==
- 0 ? "monochrome" : "color",
- (mode_info.attributes & 0x10) ==
- 0 ? "text" : "graphics");
- DEBUG_PRINTF_VBE("\tVGA: %s\n",
- (mode_info.attributes & 0x20) ==
- 0 ? "compatible" : "not compatible");
- DEBUG_PRINTF_VBE("\tWindowed Mode: %s\n",
- (mode_info.attributes & 0x40) ==
- 0 ? "yes" : "no");
- DEBUG_PRINTF_VBE("\tFramebuffer: %s\n",
- (mode_info.attributes & 0x80) ==
- 0 ? "no" : "yes");
- DEBUG_PRINTF_VBE("\tResolution: %dx%d\n",
- mode_info.x_resolution,
- mode_info.y_resolution);
- DEBUG_PRINTF_VBE("\tChar Size: %dx%d\n",
- mode_info.x_charsize, mode_info.y_charsize);
- DEBUG_PRINTF_VBE("\tColor Depth: %dbpp\n",
- mode_info.bits_per_pixel);
- DEBUG_PRINTF_VBE("\tMemory Model: 0x%x\n",
- mode_info.memory_model);
- DEBUG_PRINTF_VBE("\tFramebuffer Offset: %08x\n",
- mode_info.framebuffer_address);
-#endif
- if ((mode_info.bits_per_pixel == input.color_depth)
- && (mode_info.x_resolution <= input.max_screen_width)
- && ((mode_info.attributes & 0x80) != 0) // framebuffer mode
- && ((mode_info.attributes & 0x10) != 0) // graphics
- && ((mode_info.attributes & 0x8) != 0) // color
- && (mode_info.x_resolution > best_mode_info.x_resolution)) // better than previous best_mode
- {
- // yiiiihaah... we found a new best mode
- memcpy(&best_mode_info, &mode_info, sizeof(mode_info));
- }
- i++;
- }
-
- if (best_mode_info.video_mode != 0) {
- DEBUG_PRINTF_VBE
- ("Best Video Mode found: 0x%x, %dx%d, %dbpp, framebuffer_address: 0x%x\n",
- best_mode_info.video_mode,
- best_mode_info.x_resolution,
- best_mode_info.y_resolution,
- best_mode_info.bits_per_pixel,
- best_mode_info.framebuffer_address);
-
- //printf("Mode Info Dump:");
- //dump(best_mode_info.mode_info_block, 64);
-
- // set the video mode
- vbe_set_mode(&best_mode_info);
-
- if ((info.capabilities & 0x1) != 0) {
- // switch to 8 bit palette format
- vbe_set_palette_format(8);
- }
- // setup a palette:
- // - first 216 colors are mixed colors for each component in 6 steps
- // (6*6*6=216)
- // - then 10 shades of the three primary colors
- // - then 10 shades of grey
- // -------
- // = 256 colors
- //
- // - finally black is color 0 and white color FF (because SLOF expects it
- // this way...)
- // this resembles the palette that the kernel/X Server seems to expect...
-
- uint8_t mixed_color_values[6] =
- { 0xFF, 0xDA, 0xB3, 0x87, 0x54, 0x00 };
- uint8_t primary_color_values[10] =
- { 0xF3, 0xE7, 0xCD, 0xC0, 0xA5, 0x96, 0x77, 0x66, 0x3F,
- 0x27
- };
- uint8_t mc_size = sizeof(mixed_color_values);
- uint8_t prim_size = sizeof(primary_color_values);
-
- uint8_t curr_color_index;
- uint32_t curr_color;
-
- uint8_t r, g, b;
- // 216 mixed colors
- for (r = 0; r < mc_size; r++) {
- for (g = 0; g < mc_size; g++) {
- for (b = 0; b < mc_size; b++) {
- curr_color_index =
- (r * mc_size * mc_size) +
- (g * mc_size) + b;
- curr_color = 0;
- curr_color |= ((uint32_t) mixed_color_values[r]) << 16; //red value
- curr_color |= ((uint32_t) mixed_color_values[g]) << 8; //green value
- curr_color |= (uint32_t) mixed_color_values[b]; //blue value
- vbe_set_color(curr_color_index,
- curr_color);
- }
- }
- }
-
- // 10 shades of each primary color
- // red
- for (r = 0; r < prim_size; r++) {
- curr_color_index = mc_size * mc_size * mc_size + r;
- curr_color = ((uint32_t) primary_color_values[r]) << 16;
- vbe_set_color(curr_color_index, curr_color);
- }
- //green
- for (g = 0; g < prim_size; g++) {
- curr_color_index =
- mc_size * mc_size * mc_size + prim_size + g;
- curr_color = ((uint32_t) primary_color_values[g]) << 8;
- vbe_set_color(curr_color_index, curr_color);
- }
- //blue
- for (b = 0; b < prim_size; b++) {
- curr_color_index =
- mc_size * mc_size * mc_size + prim_size * 2 + b;
- curr_color = (uint32_t) primary_color_values[b];
- vbe_set_color(curr_color_index, curr_color);
- }
- // 10 shades of grey
- for (i = 0; i < prim_size; i++) {
- curr_color_index =
- mc_size * mc_size * mc_size + prim_size * 3 + i;
- curr_color = 0;
- curr_color |= ((uint32_t) primary_color_values[i]) << 16; //red
- curr_color |= ((uint32_t) primary_color_values[i]) << 8; //green
- curr_color |= ((uint32_t) primary_color_values[i]); //blue
- vbe_set_color(curr_color_index, curr_color);
- }
-
- // SLOF is using color 0x0 (black) and 0xFF (white) to draw to the screen...
- vbe_set_color(0x00, 0x00000000);
- vbe_set_color(0xFF, 0x00FFFFFF);
-
- output->screen_width = best_mode_info.x_resolution;
- output->screen_height = best_mode_info.y_resolution;
- output->screen_linebytes = best_mode_info.linebytes;
- output->color_depth = best_mode_info.bits_per_pixel;
- output->framebuffer_address =
- best_mode_info.framebuffer_address;
- } else {
- printf("%s: No suitable video mode found!\n", __FUNCTION__);
- //unset display_type...
- output->display_type = 0;
- }
- return 0;
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/app/biosemu/vbe.h b/qemu/roms/SLOF/clients/net-snk/app/biosemu/vbe.h
deleted file mode 100644
index 17e982632..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/biosemu/vbe.h
+++ /dev/null
@@ -1,18 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#ifndef _BIOSEMU_VBE_H_
-#define _BIOSEMU_VBE_H_
-
-uint32_t vbe_get_info(uint8_t argc, char ** argv);
-
-#endif
diff --git a/qemu/roms/SLOF/clients/net-snk/app/main.c b/qemu/roms/SLOF/clients/net-snk/app/main.c
deleted file mode 100644
index 90e14b370..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/main.c
+++ /dev/null
@@ -1,77 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2011 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#include <string.h>
-#include <stdio.h>
-#include <of.h>
-#include <netapps/netapps.h>
-#include <libbootmsg.h>
-
-#ifdef SNK_BIOSEMU_APPS
-#include "biosemu/biosemu.h"
-#include "biosemu/vbe.h"
-#endif
-
-extern void _callback_entry(void);
-int callback(int argc, char *argv[]);
-
-
-int
-main(int argc, char *argv[])
-{
- int i;
- of_set_callback((void *) &_callback_entry);
-
- if (strcmp(argv[0], "netboot") == 0 && argc >= 5)
- return netboot(argc, argv);
- if (strcmp(argv[0], "ping") == 0)
- return ping(argc, argv);
-#ifdef SNK_BIOSEMU_APPS
- // BIOS Emulator applications
- if (strcmp(argv[0], "biosemu") == 0)
- return biosemu(argc, argv);
- if (strcmp(argv[0], "get_vbe_info") == 0)
- return vbe_get_info(argc, argv);
-#endif
-
- printf("Unknown client application called\n");
- for (i = 0; i < argc; i++)
- printf("argv[%d] %s\n", i, argv[i]);
-
- return -1;
-}
-
-int
-callback(int argc, char *argv[])
-{
- int i;
-
- printf("\n");
-
- /*
- * Register your application's callback handler here, similar to
- * the way you would register an application.
- * Please note that callback functions can be called safely only after
- * your application has called of_yield(). If you return or exit() from
- * your client application, the callback can no longer be used.
- */
-#if 0
- if (strcmp(argv[0], "example") == 0)
- return example(argc, argv);
-#endif
-
- printf("No such callback function\n");
- for (i = 0; i < argc; i++)
- printf("argv[%d] %s\n", i, argv[i]);
-
- return (-1);
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netapps/Makefile b/qemu/roms/SLOF/clients/net-snk/app/netapps/Makefile
deleted file mode 100644
index 70b990a77..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netapps/Makefile
+++ /dev/null
@@ -1,28 +0,0 @@
-# *****************************************************************************
-# * Copyright (c) 2004, 2008 IBM Corporation
-# * All rights reserved.
-# * This program and the accompanying materials
-# * are made available under the terms of the BSD License
-# * which accompanies this distribution, and is available at
-# * http://www.opensource.org/licenses/bsd-license.php
-# *
-# * Contributors:
-# * IBM Corporation - initial implementation
-# ****************************************************************************/
-
-ifndef TOP
- TOP = $(shell while ! test -e make.rules; do cd .. ; done; pwd)
- export TOP
-endif
-include $(TOP)/make.rules
-
-CFLAGS += -I../ -I../../../../lib/ -Wall -W
-
-OBJS = netboot.o ping.o args.o
-
-all: $(OBJS)
-
-clean:
- $(RM) -f *.o *.a *.i
-
-include $(TOP)/make.depend
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netapps/args.c b/qemu/roms/SLOF/clients/net-snk/app/netapps/args.c
deleted file mode 100644
index 52215e6a7..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netapps/args.c
+++ /dev/null
@@ -1,143 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#include <stdint.h>
-#include <ctype.h>
-#include <stdlib.h>
-#include <string.h>
-#include "args.h"
-
-/**
- * Returns pointer of the n'th argument within a string.
- *
- * @param arg_str string with arguments, separated with ','
- * @param index index of the requested arguments within arg_str
- * @return pointer of argument[index] on success
- * NULL if index is out of range
- */
-const char *
-get_arg_ptr(const char *arg_str, unsigned int index)
-{
- unsigned int i;
-
- for (i = 0; i < index; ++i) {
- for (; *arg_str != ',' && *arg_str != 0; ++arg_str);
- if (*arg_str == 0)
- return 0;
- ++arg_str;
- }
- return arg_str;
-}
-
-/**
- * Returns number of arguments within a string.
- *
- * @param arg_str string with arguments, separated with ','
- * @return number of arguments
- */
-unsigned int
-get_args_count(const char *arg_str)
-{
- unsigned int count = 1;
-
- while ((arg_str = get_arg_ptr(arg_str, 1)) != 0)
- ++count;
- return count;
-}
-
-/**
- * Returns the length of the first argument.
- *
- * @param arg_str string with arguments, separated with ','
- * @return length of first argument
- */
-unsigned int
-get_arg_length(const char *arg_str)
-{
- unsigned int i;
-
- for (i = 0; *arg_str != ',' && *arg_str != 0; ++i)
- ++arg_str;
- return i;
-}
-
-/**
- * Copy the n'th argument within a string into a buffer in respect
- * to a limited buffer size
- *
- * @param arg_str string with arguments, separated with ','
- * @param index index of the requested arguments within arg_str
- * @param buffer pointer to the buffer
- * @param length size of the buffer
- * @return pointer of buffer on success
- * NULL if index is out of range.
- */
-char *
-argncpy(const char *arg_str, unsigned int index, char *buffer,
- unsigned int length)
-{
- const char *ptr = get_arg_ptr(arg_str, index);
- unsigned int len;
-
- if (!ptr)
- return 0;
- len = get_arg_length(ptr);
- if (!strncpy(buffer, ptr, length))
- return 0;
- buffer[len] = 0;
- return buffer;
-}
-
-/**
- * Converts "255.255.255.255" -> char[4] = { 0xff, 0xff, 0xff, 0xff }
- *
- * @param str string to be converted
- * @param ip in case of SUCCESS - 32-bit long IP
- in case of FAULT - zero
- * @return TRUE - IP converted successfully;
- * FALSE - error condition occurs (e.g. bad format)
- */
-int
-strtoip(const char *str, char ip[4])
-{
- char octet[10];
- int res;
- unsigned int i = 0, len;
-
- while (*str != 0) {
- if (i > 3 || !isdigit(*str))
- return 0;
- if (strstr(str, ".") != NULL) {
- len = (int16_t) (strstr(str, ".") - str);
- if (len >= 10)
- return 0;
- strncpy(octet, str, len);
- octet[len] = 0;
- str += len;
- } else {
- strncpy(octet, str, 9);
- octet[9] = 0;
- str += strlen(octet);
- }
- res = strtol(octet, NULL, 10);
- if ((res > 255) || (res < 0))
- return 0;
- ip[i] = (char) res;
- i++;
- if (*str == '.')
- str++;
- }
-
- if (i != 4)
- return 0;
- return -1;
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netapps/args.h b/qemu/roms/SLOF/clients/net-snk/app/netapps/args.h
deleted file mode 100644
index b80982a39..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netapps/args.h
+++ /dev/null
@@ -1,22 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#ifndef _ARGS_H
-#define _ARGS_H
-
-const char *get_arg_ptr(const char *, unsigned int);
-unsigned int get_args_count(const char *);
-unsigned int get_arg_length(const char *);
-char *argncpy(const char *, unsigned int, char *, unsigned int);
-int strtoip(const char *, char[4]);
-
-#endif /* _ARGS_H */
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netapps/netapps.h b/qemu/roms/SLOF/clients/net-snk/app/netapps/netapps.h
deleted file mode 100644
index 18e607f53..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netapps/netapps.h
+++ /dev/null
@@ -1,30 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#ifndef _NETAPPS_H_
-#define _NETAPPS_H_
-
-#include <netlib/tftp.h>
-
-#define F_IPV4 4
-#define F_IPV6 6
-
-int netboot(int argc, char *argv[]);
-int netsave(int argc, char *argv[]);
-int netflash(int argc, char *argv[]);
-int bcmflash(int argc, char *argv[]);
-int mac_sync(int argc, char *argv[]);
-int net_eeprom_version( void );
-int ping(int argc, char *argv[]);
-int dhcp(char *ret_buffer, filename_ip_t * fn_ip, unsigned int retries, int flags);
-
-#endif
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netapps/netboot.c b/qemu/roms/SLOF/clients/net-snk/app/netapps/netboot.c
deleted file mode 100644
index bb1db03e3..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netapps/netboot.c
+++ /dev/null
@@ -1,858 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#include <netlib/tftp.h>
-#include <netlib/ethernet.h>
-#include <netlib/dhcp.h>
-#include <netlib/dhcpv6.h>
-#include <netlib/ipv4.h>
-#include <netlib/ipv6.h>
-#include <netlib/dns.h>
-#include <string.h>
-#include <stdio.h>
-#include <time.h>
-#include <stdlib.h>
-#include <sys/socket.h>
-#include <netapps/args.h>
-#include <libbootmsg/libbootmsg.h>
-#include <of.h>
-#include "netapps.h"
-
-#define IP_INIT_DEFAULT 5
-#define IP_INIT_NONE 0
-#define IP_INIT_BOOTP 1
-#define IP_INIT_DHCP 2
-#define IP_INIT_DHCPV6_STATELESS 3
-#define IP_INIT_IPV6_MANUAL 4
-
-#define DEFAULT_BOOT_RETRIES 10
-#define DEFAULT_TFTP_RETRIES 20
-static int ip_version = 4;
-
-typedef struct {
- char filename[100];
- int ip_init;
- char siaddr[4];
- ip6_addr_t si6addr;
- char ciaddr[4];
- ip6_addr_t ci6addr;
- char giaddr[4];
- ip6_addr_t gi6addr;
- int bootp_retries;
- int tftp_retries;
-} obp_tftp_args_t;
-
-
-/**
- * Parses a argument string for IPv6 booting, extracts all
- * parameters and fills a structure accordingly
- *
- * @param arg_str string with arguments, separated with ','
- * @param argc number of arguments
- * @param obp_tftp_args structure which contains the result
- * @return updated arg_str
- */
-static const char *
-parse_ipv6args (const char *arg_str, unsigned int argc,
- obp_tftp_args_t *obp_tftp_args)
-{
- char *ptr = NULL;
- char arg_buf[100];
-
- // find out siaddr
- if (argc == 0)
- memset(&obp_tftp_args->si6addr.addr, 0, 16);
- else {
- argncpy(arg_str, 0, arg_buf, 100);
- if(str_to_ipv6(arg_buf, (uint8_t *) &(obp_tftp_args->si6addr.addr[0]))) {
- arg_str = get_arg_ptr(arg_str, 1);
- --argc;
- }
- else if(arg_buf[0] == 0) {
- memset(&obp_tftp_args->si6addr.addr, 0, 16);
- arg_str = get_arg_ptr(arg_str, 1);
- --argc;
- }
- else
- memset(&obp_tftp_args->si6addr.addr, 0, 16);
- }
-
- // find out filename
- if (argc == 0)
- obp_tftp_args->filename[0] = 0;
- else {
- argncpy(arg_str, 0, obp_tftp_args->filename, 100);
- for(ptr = obp_tftp_args->filename; *ptr != 0; ++ptr)
- if(*ptr == '\\') {
- *ptr = '/';
- }
- arg_str = get_arg_ptr(arg_str, 1);
- --argc;
- }
-
- // find out ciaddr
- if (argc == 0)
- memset(&obp_tftp_args->ci6addr, 0, 16);
- else {
- argncpy(arg_str, 0, arg_buf, 100);
- if (str_to_ipv6(arg_buf, (uint8_t *) &(obp_tftp_args->ci6addr.addr[0]))) {
- arg_str = get_arg_ptr(arg_str, 1);
- --argc;
- }
- else if(arg_buf[0] == 0) {
- memset(&obp_tftp_args->ci6addr.addr, 0, 16);
- arg_str = get_arg_ptr(arg_str, 1);
- --argc;
- }
- else
- memset(&obp_tftp_args->ci6addr.addr, 0, 16);
- }
-
- // find out giaddr
- if (argc == 0)
- memset(&obp_tftp_args->gi6addr, 0, 16);
- else {
- argncpy(arg_str, 0, arg_buf, 100);
- if (str_to_ipv6(arg_buf, (uint8_t *) &(obp_tftp_args->gi6addr.addr)) ) {
- arg_str = get_arg_ptr(arg_str, 1);
- --argc;
- }
- else if(arg_buf[0] == 0) {
- memset(&obp_tftp_args->gi6addr, 0, 16);
- arg_str = get_arg_ptr(arg_str, 1);
- --argc;
- }
- else
- memset(&obp_tftp_args->gi6addr.addr, 0, 16);
- }
-
- return arg_str;
-}
-
-
-/**
- * Parses a argument string for IPv4 booting, extracts all
- * parameters and fills a structure accordingly
- *
- * @param arg_str string with arguments, separated with ','
- * @param argc number of arguments
- * @param obp_tftp_args structure which contains the result
- * @return updated arg_str
- */
-static const char *
-parse_ipv4args (const char *arg_str, unsigned int argc,
- obp_tftp_args_t *obp_tftp_args)
-{
- char *ptr = NULL;
- char arg_buf[100];
-
- // find out siaddr
- if(argc==0) {
- memset(obp_tftp_args->siaddr, 0, 4);
- } else {
- argncpy(arg_str, 0, arg_buf, 100);
- if(strtoip(arg_buf, obp_tftp_args->siaddr)) {
- arg_str = get_arg_ptr(arg_str, 1);
- --argc;
- }
- else if(arg_buf[0] == 0) {
- memset(obp_tftp_args->siaddr, 0, 4);
- arg_str = get_arg_ptr(arg_str, 1);
- --argc;
- }
- else
- memset(obp_tftp_args->siaddr, 0, 4);
- }
-
- // find out filename
- if(argc==0)
- obp_tftp_args->filename[0] = 0;
- else {
- argncpy(arg_str, 0, obp_tftp_args->filename, 100);
- for(ptr = obp_tftp_args->filename; *ptr != 0; ++ptr)
- if(*ptr == '\\')
- *ptr = '/';
- arg_str = get_arg_ptr(arg_str, 1);
- --argc;
- }
-
- // find out ciaddr
- if(argc==0)
- memset(obp_tftp_args->ciaddr, 0, 4);
- else {
- argncpy(arg_str, 0, arg_buf, 100);
- if(strtoip(arg_buf, obp_tftp_args->ciaddr)) {
- arg_str = get_arg_ptr(arg_str, 1);
- --argc;
- }
- else if(arg_buf[0] == 0) {
- memset(obp_tftp_args->ciaddr, 0, 4);
- arg_str = get_arg_ptr(arg_str, 1);
- --argc;
- }
- else
- memset(obp_tftp_args->ciaddr, 0, 4);
- }
-
- // find out giaddr
- if(argc==0)
- memset(obp_tftp_args->giaddr, 0, 4);
- else {
- argncpy(arg_str, 0, arg_buf, 100);
- if(strtoip(arg_buf, obp_tftp_args->giaddr)) {
- arg_str = get_arg_ptr(arg_str, 1);
- --argc;
- }
- else if(arg_buf[0] == 0) {
- memset(obp_tftp_args->giaddr, 0, 4);
- arg_str = get_arg_ptr(arg_str, 1);
- --argc;
- }
- else
- memset(obp_tftp_args->giaddr, 0, 4);
- }
-
- return arg_str;
-}
-
-/**
- * Parses a argument string which is given by netload, extracts all
- * parameters and fills a structure according to this
- *
- * Netload-Parameters:
- * [bootp,]siaddr,filename,ciaddr,giaddr,bootp-retries,tftp-retries
- *
- * @param arg_str string with arguments, separated with ','
- * @param obp_tftp_args structure which contains the result
- * @return none
- */
-static void
-parse_args(const char *arg_str, obp_tftp_args_t *obp_tftp_args)
-{
- unsigned int argc;
- char arg_buf[100];
-
- memset(obp_tftp_args, 0, sizeof(*obp_tftp_args));
-
- argc = get_args_count(arg_str);
-
- // find out if we should use BOOTP or DHCP
- if(argc==0)
- obp_tftp_args->ip_init = IP_INIT_DEFAULT;
- else {
- argncpy(arg_str, 0, arg_buf, 100);
- if (strcasecmp(arg_buf, "bootp") == 0) {
- obp_tftp_args->ip_init = IP_INIT_BOOTP;
- arg_str = get_arg_ptr(arg_str, 1);
- --argc;
- }
- else if(strcasecmp(arg_buf, "dhcp") == 0) {
- obp_tftp_args->ip_init = IP_INIT_DHCP;
- arg_str = get_arg_ptr(arg_str, 1);
- --argc;
- }
- else if(strcasecmp(arg_buf, "ipv6") == 0) {
- obp_tftp_args->ip_init = IP_INIT_DHCPV6_STATELESS;
- arg_str = get_arg_ptr(arg_str, 1);
- --argc;
- ip_version = 6;
- }
- else
- obp_tftp_args->ip_init = IP_INIT_DEFAULT;
- }
-
- if (ip_version == 4) {
- arg_str = parse_ipv4args (arg_str, argc, obp_tftp_args);
- }
- else if (ip_version == 6) {
- arg_str = parse_ipv6args (arg_str, argc, obp_tftp_args);
- }
-
- // find out bootp-retries
- if (argc == 0)
- obp_tftp_args->bootp_retries = DEFAULT_BOOT_RETRIES;
- else {
- argncpy(arg_str, 0, arg_buf, 100);
- if(arg_buf[0] == 0)
- obp_tftp_args->bootp_retries = DEFAULT_BOOT_RETRIES;
- else {
- obp_tftp_args->bootp_retries = strtol(arg_buf, 0, 10);
- if(obp_tftp_args->bootp_retries < 0)
- obp_tftp_args->bootp_retries = DEFAULT_BOOT_RETRIES;
- }
- arg_str = get_arg_ptr(arg_str, 1);
- --argc;
- }
-
- // find out tftp-retries
- if (argc == 0)
- obp_tftp_args->tftp_retries = DEFAULT_TFTP_RETRIES;
- else {
- argncpy(arg_str, 0, arg_buf, 100);
- if(arg_buf[0] == 0)
- obp_tftp_args->tftp_retries = DEFAULT_TFTP_RETRIES;
- else {
- obp_tftp_args->tftp_retries = strtol(arg_buf, 0, 10);
- if(obp_tftp_args->tftp_retries < 0)
- obp_tftp_args->tftp_retries = DEFAULT_TFTP_RETRIES;
- }
- arg_str = get_arg_ptr(arg_str, 1);
- --argc;
- }
-}
-
-/**
- * DHCP: Wrapper for obtaining IP and configuration info from DHCP server
- * for both IPv4 and IPv6.
- * (makes several attempts).
- *
- * @param ret_buffer buffer for returning BOOTP-REPLY packet data
- * @param fn_ip contains the following configuration information:
- * client MAC, client IP, TFTP-server MAC,
- * TFTP-server IP, Boot file name
- * @param retries No. of DHCP attempts
- * @param flags flags for specifying type of dhcp attempt (IPv4/IPv6)
- * ZERO - attempt DHCPv4 followed by DHCPv6
- * F_IPV4 - attempt only DHCPv4
- * F_IPV6 - attempt only DHCPv6
- * @return ZERO - IP and configuration info obtained;
- * NON ZERO - error condition occurs.
- */
-int dhcp(char *ret_buffer, filename_ip_t * fn_ip, unsigned int retries, int flags)
-{
- int i = (int) retries+1;
- int rc = -1;
-
- printf(" Requesting information via DHCP%s: ",
- flags == F_IPV4 ? "v4" : flags == F_IPV6 ? "v6" : "");
-
- if (flags != F_IPV6)
- dhcpv4_generate_transaction_id();
- if (flags != F_IPV4)
- dhcpv6_generate_transaction_id();
-
- do {
- printf("\b\b\b%03d", i-1);
- if (getchar() == 27) {
- printf("\nAborted\n");
- return -1;
- }
- if (!--i) {
- printf("\nGiving up after %d DHCP requests\n", retries);
- return -1;
- }
- if (!flags || (flags == F_IPV4)) {
- ip_version = 4;
- rc = dhcpv4(ret_buffer, fn_ip);
- }
- if ((!flags && (rc == -1)) || (flags == F_IPV6)) {
- ip_version = 6;
- set_ipv6_address(fn_ip->fd, 0);
- rc = dhcpv6(ret_buffer, fn_ip);
- if (rc == 0) {
- memcpy(&fn_ip->own_ip6, get_ipv6_address(), 16);
- break;
- }
-
- }
- if (rc != -1) /* either success or non-dhcp failure */
- break;
- } while (1);
- printf("\b\b\b\bdone\n");
-
- return rc;
-}
-
-/**
- * Seed the random number generator with our mac and current timestamp
- */
-static void seed_rng(uint8_t mac[])
-{
- unsigned int seed;
-
- asm volatile("mftbl %0" : "=r"(seed));
- seed ^= (mac[2] << 24) | (mac[3] << 16) | (mac[4] << 8) | mac[5];
- srand(seed);
-}
-
-int
-netboot(int argc, char *argv[])
-{
- char buf[256];
- int rc;
- int len = strtol(argv[2], 0, 16);
- char *buffer = (char *) strtol(argv[1], 0, 16);
- char *ret_buffer = (char *) strtol(argv[3], 0, 16);
- filename_ip_t fn_ip;
- int fd_device;
- tftp_err_t tftp_err;
- obp_tftp_args_t obp_tftp_args;
- char null_ip[4] = { 0x00, 0x00, 0x00, 0x00 };
- char null_ip6[16] = { 0x00, 0x00, 0x00, 0x00,
- 0x00, 0x00, 0x00, 0x00,
- 0x00, 0x00, 0x00, 0x00,
- 0x00, 0x00, 0x00, 0x00 };
- int huge_load = strtol(argv[4], 0, 10);
- int32_t block_size = strtol(argv[5], 0, 10);
- uint8_t own_mac[6];
-
- puts("\n Initializing NIC");
- memset(&fn_ip, 0, sizeof(filename_ip_t));
-
- /***********************************************************
- *
- * Initialize network stuff and retrieve boot informations
- *
- ***********************************************************/
-
- /* Wait for link up and get mac_addr from device */
- for(rc=0; rc<DEFAULT_BOOT_RETRIES; ++rc) {
- if(rc > 0) {
- set_timer(TICKS_SEC);
- while (get_timer() > 0);
- }
- fd_device = socket(0, 0, 0, (char*) own_mac);
- if(fd_device != -2)
- break;
- if(getchar() == 27) {
- fd_device = -2;
- break;
- }
- }
-
- if (fd_device == -1) {
- strcpy(buf,"E3000: (net) Could not read MAC address");
- bootmsg_error(0x3000, &buf[7]);
-
- write_mm_log(buf, strlen(buf), 0x91);
- return -100;
- }
- else if (fd_device == -2) {
- strcpy(buf,"E3006: (net) Could not initialize network device");
- bootmsg_error(0x3006, &buf[7]);
-
- write_mm_log(buf, strlen(buf), 0x91);
- return -101;
- }
-
- fn_ip.fd = fd_device;
-
- printf(" Reading MAC address from device: "
- "%02x:%02x:%02x:%02x:%02x:%02x\n",
- own_mac[0], own_mac[1], own_mac[2],
- own_mac[3], own_mac[4], own_mac[5]);
-
- // init ethernet layer
- set_mac_address(own_mac);
-
- seed_rng(own_mac);
-
- if (argc > 6) {
- parse_args(argv[6], &obp_tftp_args);
- if(obp_tftp_args.bootp_retries - rc < DEFAULT_BOOT_RETRIES)
- obp_tftp_args.bootp_retries = DEFAULT_BOOT_RETRIES;
- else
- obp_tftp_args.bootp_retries -= rc;
- }
- else {
- memset(&obp_tftp_args, 0, sizeof(obp_tftp_args_t));
- obp_tftp_args.ip_init = IP_INIT_DEFAULT;
- obp_tftp_args.bootp_retries = DEFAULT_BOOT_RETRIES;
- obp_tftp_args.tftp_retries = DEFAULT_TFTP_RETRIES;
- }
- memcpy(&fn_ip.own_ip, obp_tftp_args.ciaddr, 4);
-
- // reset of error code
- rc = 0;
-
- /* if we still have got all necessary parameters, then we don't
- need to perform an BOOTP/DHCP-Request */
- if (ip_version == 4) {
- if (memcmp(obp_tftp_args.ciaddr, null_ip, 4) != 0
- && memcmp(obp_tftp_args.siaddr, null_ip, 4) != 0
- && obp_tftp_args.filename[0] != 0) {
-
- memcpy(&fn_ip.server_ip, &obp_tftp_args.siaddr, 4);
- obp_tftp_args.ip_init = IP_INIT_NONE;
- }
- }
- else if (ip_version == 6) {
- if (memcmp(&obp_tftp_args.si6addr, null_ip6, 16) != 0
- && obp_tftp_args.filename[0] != 0) {
- memcpy(&fn_ip.server_ip6.addr[0],
- &obp_tftp_args.si6addr.addr, 16);
- obp_tftp_args.ip_init = IP_INIT_IPV6_MANUAL;
- }
- else {
- obp_tftp_args.ip_init = IP_INIT_DHCPV6_STATELESS;
- }
- }
-
- // construction of fn_ip from parameter
- switch(obp_tftp_args.ip_init) {
- case IP_INIT_BOOTP:
- // if giaddr in not specified, then we have to identify
- // the BOOTP server via broadcasts
- if(memcmp(obp_tftp_args.giaddr, null_ip, 4) == 0) {
- // don't do this, when using DHCP !!!
- fn_ip.server_ip = 0xFFFFFFFF;
- }
- // if giaddr is specified, then we have to use this
- // IP address as proxy to identify the BOOTP server
- else {
- memcpy(&fn_ip.server_ip, obp_tftp_args.giaddr, 4);
- }
- rc = bootp(ret_buffer, &fn_ip, obp_tftp_args.bootp_retries);
- break;
- case IP_INIT_DHCP:
- rc = dhcp(ret_buffer, &fn_ip, obp_tftp_args.bootp_retries, F_IPV4);
- break;
- case IP_INIT_DHCPV6_STATELESS:
- rc = dhcp(ret_buffer, &fn_ip,
- obp_tftp_args.bootp_retries, F_IPV6);
- break;
- case IP_INIT_IPV6_MANUAL:
- if (memcmp(&obp_tftp_args.ci6addr, null_ip6, 16)) {
- set_ipv6_address(fn_ip.fd, &obp_tftp_args.ci6addr);
- } else {
- /*
- * If no client address has been specified, then
- * use a link-local or stateless autoconfig address
- */
- set_ipv6_address(fn_ip.fd, NULL);
- memcpy(&fn_ip.own_ip6, get_ipv6_address(), 16);
- }
- break;
- case IP_INIT_DEFAULT:
- rc = dhcp(ret_buffer, &fn_ip, obp_tftp_args.bootp_retries, 0);
- break;
- case IP_INIT_NONE:
- default:
- break;
- }
-
- if(rc >= 0 && ip_version == 4) {
- if(memcmp(obp_tftp_args.ciaddr, null_ip, 4) != 0
- && memcmp(obp_tftp_args.ciaddr, &fn_ip.own_ip, 4) != 0)
- memcpy(&fn_ip.own_ip, obp_tftp_args.ciaddr, 4);
-
- if(memcmp(obp_tftp_args.siaddr, null_ip, 4) != 0
- && memcmp(obp_tftp_args.siaddr, &fn_ip.server_ip, 4) != 0)
- memcpy(&fn_ip.server_ip, obp_tftp_args.siaddr, 4);
-
- // init IPv4 layer
- set_ipv4_address(fn_ip.own_ip);
- }
- else if (rc >= 0 && ip_version == 6) {
- if(memcmp(&obp_tftp_args.ci6addr.addr, null_ip6, 16) != 0
- && memcmp(&obp_tftp_args.ci6addr.addr, &fn_ip.own_ip6, 16) != 0)
- memcpy(&fn_ip.own_ip6, &obp_tftp_args.ci6addr.addr, 16);
-
- if(memcmp(&obp_tftp_args.si6addr.addr, null_ip6, 16) != 0
- && memcmp(&obp_tftp_args.si6addr.addr, &fn_ip.server_ip6.addr, 16) != 0)
- memcpy(&fn_ip.server_ip6.addr, &obp_tftp_args.si6addr.addr, 16);
- }
- if (rc == -1) {
- strcpy(buf,"E3001: (net) Could not get IP address");
- bootmsg_error(0x3001, &buf[7]);
-
- write_mm_log(buf, strlen(buf), 0x91);
- return -101;
- }
-
- if (ip_version == 4) {
- printf(" Using IPv4 address: %d.%d.%d.%d\n",
- ((fn_ip.own_ip >> 24) & 0xFF), ((fn_ip.own_ip >> 16) & 0xFF),
- ((fn_ip.own_ip >> 8) & 0xFF), ( fn_ip.own_ip & 0xFF));
- } else if (ip_version == 6) {
- char ip6_str[40];
- ipv6_to_str(fn_ip.own_ip6.addr, ip6_str);
- printf(" Using IPv6 address: %s\n", ip6_str);
- }
-
- if (rc == -2) {
- sprintf(buf,
- "E3002: (net) ARP request to TFTP server "
- "(%d.%d.%d.%d) failed",
- ((fn_ip.server_ip >> 24) & 0xFF),
- ((fn_ip.server_ip >> 16) & 0xFF),
- ((fn_ip.server_ip >> 8) & 0xFF),
- ( fn_ip.server_ip & 0xFF));
- bootmsg_error(0x3002, &buf[7]);
-
- write_mm_log(buf, strlen(buf), 0x91);
- return -102;
- }
- if (rc == -4 || rc == -3) {
- strcpy(buf,"E3008: (net) Can't obtain TFTP server IP address");
- bootmsg_error(0x3008, &buf[7]);
-
- write_mm_log(buf, strlen(buf), 0x91);
- return -107;
- }
-
-
- /***********************************************************
- *
- * Load file via TFTP into buffer provided by OpenFirmware
- *
- ***********************************************************/
-
- if (obp_tftp_args.filename[0] != 0) {
- strncpy((char *) fn_ip.filename, obp_tftp_args.filename, sizeof(fn_ip.filename)-1);
- fn_ip.filename[sizeof(fn_ip.filename)-1] = 0;
- }
-
- if (ip_version == 4) {
- printf(" Requesting file \"%s\" via TFTP from %d.%d.%d.%d\n",
- fn_ip.filename,
- ((fn_ip.server_ip >> 24) & 0xFF),
- ((fn_ip.server_ip >> 16) & 0xFF),
- ((fn_ip.server_ip >> 8) & 0xFF),
- ( fn_ip.server_ip & 0xFF));
- } else if (ip_version == 6) {
- char ip6_str[40];
- printf(" Requesting file \"%s\" via TFTP from ", fn_ip.filename);
- ipv6_to_str(fn_ip.server_ip6.addr, ip6_str);
- printf("%s\n", ip6_str);
- }
-
- // accept at most 20 bad packets
- // wait at most for 40 packets
- rc = tftp(&fn_ip, (unsigned char *) buffer,
- len, obp_tftp_args.tftp_retries,
- &tftp_err, huge_load, block_size, ip_version);
-
- if(obp_tftp_args.ip_init == IP_INIT_DHCP)
- dhcp_send_release(fn_ip.fd);
-
- if (rc > 0) {
- printf(" TFTP: Received %s (%d KBytes)\n", fn_ip.filename,
- rc / 1024);
- } else if (rc == -1) {
- bootmsg_error(0x3003, "(net) unknown TFTP error");
- return -103;
- } else if (rc == -2) {
- sprintf(buf,
- "E3004: (net) TFTP buffer of %d bytes "
- "is too small for %s",
- len, fn_ip.filename);
- bootmsg_error(0x3004, &buf[7]);
-
- write_mm_log(buf, strlen(buf), 0x91);
- return -104;
- } else if (rc == -3) {
- sprintf(buf,"E3009: (net) file not found: %s",
- fn_ip.filename);
- bootmsg_error(0x3009, &buf[7]);
-
- write_mm_log(buf, strlen(buf), 0x91);
- return -108;
- } else if (rc == -4) {
- strcpy(buf,"E3010: (net) TFTP access violation");
- bootmsg_error(0x3010, &buf[7]);
-
- write_mm_log(buf, strlen(buf), 0x91);
- return -109;
- } else if (rc == -5) {
- strcpy(buf,"E3011: (net) illegal TFTP operation");
- bootmsg_error(0x3011, &buf[7]);
-
- write_mm_log(buf, strlen(buf), 0x91);
- return -110;
- } else if (rc == -6) {
- strcpy(buf, "E3012: (net) unknown TFTP transfer ID");
- bootmsg_error(0x3012, &buf[7]);
-
- write_mm_log(buf, strlen(buf), 0x91);
- return -111;
- } else if (rc == -7) {
- strcpy(buf, "E3013: (net) no such TFTP user");
- bootmsg_error(0x3013, &buf[7]);
-
- write_mm_log(buf, strlen(buf), 0x91);
- return -112;
- } else if (rc == -8) {
- strcpy(buf, "E3017: (net) TFTP blocksize negotiation failed");
- bootmsg_error(0x3017, &buf[7]);
-
- write_mm_log(buf, strlen(buf), 0x91);
- return -116;
- } else if (rc == -9) {
- strcpy(buf,"E3018: (net) file exceeds maximum TFTP transfer size");
- bootmsg_error(0x3018, &buf[7]);
-
- write_mm_log(buf, strlen(buf), 0x91);
- return -117;
- } else if (rc <= -10 && rc >= -15) {
- sprintf(buf,"E3005: (net) ICMP ERROR \"");
- switch (rc) {
- case -ICMP_NET_UNREACHABLE - 10:
- sprintf(buf+strlen(buf),"net unreachable");
- break;
- case -ICMP_HOST_UNREACHABLE - 10:
- sprintf(buf+strlen(buf),"host unreachable");
- break;
- case -ICMP_PROTOCOL_UNREACHABLE - 10:
- sprintf(buf+strlen(buf),"protocol unreachable");
- break;
- case -ICMP_PORT_UNREACHABLE - 10:
- sprintf(buf+strlen(buf),"port unreachable");
- break;
- case -ICMP_FRAGMENTATION_NEEDED - 10:
- sprintf(buf+strlen(buf),"fragmentation needed and DF set");
- break;
- case -ICMP_SOURCE_ROUTE_FAILED - 10:
- sprintf(buf+strlen(buf),"source route failed");
- break;
- default:
- sprintf(buf+strlen(buf)," UNKNOWN");
- break;
- }
- sprintf(buf+strlen(buf),"\"");
- bootmsg_error(0x3005, &buf[7]);
-
- write_mm_log(buf, strlen(buf), 0x91);
- return -105;
- } else if (rc == -40) {
- sprintf(buf,
- "E3014: (net) TFTP error occurred after "
- "%d bad packets received",
- tftp_err.bad_tftp_packets);
- bootmsg_error(0x3014, &buf[7]);
- write_mm_log(buf, strlen(buf), 0x91);
- return -113;
- } else if (rc == -41) {
- sprintf(buf,
- "E3015: (net) TFTP error occurred after "
- "missing %d responses",
- tftp_err.no_packets);
- bootmsg_error(0x3015, &buf[7]);
- write_mm_log(buf, strlen(buf), 0x91);
- return -114;
- } else if (rc == -42) {
- sprintf(buf,
- "E3016: (net) TFTP error missing block %d, "
- "expected block was %d",
- tftp_err.blocks_missed,
- tftp_err.blocks_received);
- bootmsg_error(0x3016, &buf[7]);
- write_mm_log(buf, strlen(buf), 0x91);
- return -115;
- }
- return rc;
-}
-
-/**
- * Parses a tftp arguments, extracts all
- * parameters and fills server ip according to this
- *
- * Parameters:
- * @param buffer string with arguments,
- * @param server_ip server ip as result
- * @param filename default filename
- * @param fd Socket descriptor
- * @param len len of the buffer,
- * @return 0 on SUCCESS and -1 on failure
- */
-int parse_tftp_args(char buffer[], char *server_ip, char filename[], int fd,
- int len)
-{
- char *raw;
- char *tmp, *tmp1;
- int i, j = 0;
- char domainname[256];
- uint8_t server_ip6[16];
-
- raw = malloc(len);
- if (raw == NULL) {
- printf("\n unable to allocate memory, parsing failed\n");
- return -1;
- }
- strncpy(raw,(const char *)buffer,len);
- /*tftp url contains tftp://[fd00:4f53:4444:90:214:5eff:fed9:b200]/testfile*/
- if(strncmp(raw,"tftp://",7)){
- printf("\n tftp missing in %s\n",raw);
- free(raw);
- return -1;
- }
- tmp = strchr(raw,'[');
- if(tmp != NULL && *tmp == '[') {
- /*check for valid ipv6 address*/
- tmp1 = strchr(tmp,']');
- if (tmp1 == NULL) {
- printf("\n missing ] in %s\n",raw);
- free(raw);
- return -1;
- }
- i = tmp1 - tmp;
- /*look for file name*/
- tmp1 = strchr(tmp,'/');
- if (tmp1 == NULL) {
- printf("\n missing filename in %s\n",raw);
- free(raw);
- return -1;
- }
- tmp[i] = '\0';
- /*check for 16 byte ipv6 address */
- if (!str_to_ipv6((tmp+1), (uint8_t *)(server_ip))) {
- printf("\n wrong format IPV6 address in %s\n",raw);
- free(raw);
- return -1;;
- }
- else {
- /*found filename */
- strcpy(filename,(tmp1+1));
- free(raw);
- return 0;
- }
- }
- else {
- /*here tftp://hostname/testfile from option request of dhcp*/
- /*look for dns server name */
- tmp1 = strchr(raw,'.');
- if(tmp1 == NULL) {
- printf("\n missing . seperator in %s\n",raw);
- free(raw);
- return -1;
- }
- /*look for domain name beyond dns server name
- * so ignore the current . and look for one more
- */
- tmp = strchr((tmp1+1),'.');
- if(tmp == NULL) {
- printf("\n missing domain in %s\n",raw);
- free(raw);
- return -1;
- }
- tmp1 = strchr(tmp1,'/');
- if (tmp1 == NULL) {
- printf("\n missing filename in %s\n",raw);
- free(raw);
- return -1;
- }
- j = tmp1 - (raw + 7);
- tmp = raw + 7;
- tmp[j] = '\0';
- strcpy(domainname, tmp);
- if (dns_get_ip(fd, domainname, server_ip6, 6) == 0) {
- printf("\n DNS failed for IPV6\n");
- return -1;
- }
- ipv6_to_str(server_ip6, server_ip);
-
- strcpy(filename,(tmp1+1));
- free(raw);
- return 0;
- }
-
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netapps/ping.c b/qemu/roms/SLOF/clients/net-snk/app/netapps/ping.c
deleted file mode 100644
index 2c7dadbde..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netapps/ping.c
+++ /dev/null
@@ -1,196 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#include <netlib/ipv4.h>
-#include <netlib/dhcp.h>
-#include <netlib/ethernet.h>
-#include <sys/socket.h>
-#include <string.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <time.h>
-#include <netapps/args.h>
-#include "netapps.h"
-
-struct ping_args {
- union {
- char string[4];
- unsigned int integer;
- } server_ip;
- union {
- char string[4];
- unsigned int integer;
- } client_ip;
- union {
- char string[4];
- unsigned int integer;
- } gateway_ip;
- unsigned int timeout;
-};
-
-static void
-usage(void)
-{
- printf
- ("\nping device-path:[device-args,]server-ip,[client-ip],[gateway-ip][,timeout]\n");
-
-}
-
-static int
-parse_args(const char *args, struct ping_args *ping_args)
-{
- unsigned int argc = get_args_count(args);
- char buf[64];
- ping_args->timeout = 10;
- if (argc == 0)
- /* at least server-ip has to be specified */
- return -1;
- if (argc == 1) {
- /* probably only server ip is specified */
- argncpy(args, 0, buf, 64);
- if (!strtoip(buf, ping_args->server_ip.string))
- return -1;
- return 0;
- }
- /* get first option from list */
- argncpy(args, 0, buf, 64);
- if (!strtoip(buf, ping_args->server_ip.string)) {
- /* it is not an IP address
- * therefore it has to be device-args
- * device-args are not supported and just ignored */
- args = get_arg_ptr(args, 1);
- argc--;
- }
-
- argncpy(args, 0, buf, 64);
- if (!strtoip(buf, ping_args->server_ip.string)) {
- /* this should have been the server IP address */
- return -1;
- } else {
- args = get_arg_ptr(args, 1);
- if (!--argc)
- return 0;
- }
-
- argncpy(args, 0, buf, 64);
- if (!strtoip(buf, ping_args->client_ip.string)) {
- /* this should have been the client (our) IP address */
- return -1;
- } else {
- args = get_arg_ptr(args, 1);
- if (!--argc)
- return 0;
- }
- argncpy(args, 0, buf, 64);
- if (!strtoip(buf, ping_args->gateway_ip.string)) {
- /* this should have been the gateway IP address */
- return -1;
- } else {
- args = get_arg_ptr(args, 1);
- if (!--argc)
- return 0;
- }
- argncpy(args, 0, buf, 64);
- ping_args->timeout = strtol(args, 0, 10);
- return 0;
-}
-
-int
-ping(int argc, char *argv[])
-{
- short arp_failed = 0;
- filename_ip_t fn_ip;
- int fd_device;
- struct ping_args ping_args;
- uint8_t own_mac[6];
-
- memset(&ping_args, 0, sizeof(struct ping_args));
-
- if (argc == 2) {
- if (parse_args(argv[1], &ping_args)) {
- usage();
- return -1;
- }
- } else {
- usage();
- return -1;
- }
-
- memset(&fn_ip, 0, sizeof(filename_ip_t));
-
- /* Get mac_addr from device */
- printf("\n Reading MAC address from device: ");
- fd_device = socket(0, 0, 0, (char *) own_mac);
- if (fd_device == -1) {
- printf("\nE3000: Could not read MAC address\n");
- return -100;
- } else if (fd_device == -2) {
- printf("\nE3006: Could not initialize network device\n");
- return -101;
- }
-
- fn_ip.fd = fd_device;
-
- printf("%02x:%02x:%02x:%02x:%02x:%02x\n",
- own_mac[0], own_mac[1], own_mac[2],
- own_mac[3], own_mac[4], own_mac[5]);
-
- // init ethernet layer
- set_mac_address(own_mac);
- // identify the BOOTP/DHCP server via broadcasts
- // don't do this, when using DHCP !!!
- // fn_ip.server_ip = 0xFFFFFFFF;
- // memset(fn_ip.server_mac, 0xff, 6);
-
- if (!ping_args.client_ip.integer) {
- /* Get ip address for our mac address */
- printf(" Requesting IP address via DHCP: ");
- arp_failed = dhcp(0, &fn_ip, 30, F_IPV4);
-
- if (arp_failed == -1) {
- printf("\n DHCP: Could not get ip address\n");
- return -1;
- }
-
- } else {
- memcpy(&fn_ip.own_ip, &ping_args.client_ip.integer, 4);
- arp_failed = 1;
- printf(" Own IP address: ");
- }
-
- // reinit network stack
- set_ipv4_address(fn_ip.own_ip);
-
- printf("%d.%d.%d.%d\n",
- ((fn_ip.own_ip >> 24) & 0xFF), ((fn_ip.own_ip >> 16) & 0xFF),
- ((fn_ip.own_ip >> 8) & 0xFF), (fn_ip.own_ip & 0xFF));
-
- memcpy(&fn_ip.server_ip, &ping_args.server_ip.integer, 4);
- printf(" Ping to %d.%d.%d.%d ", ((fn_ip.server_ip >> 24) & 0xFF),
- ((fn_ip.server_ip >> 16) & 0xFF),
- ((fn_ip.server_ip >> 8) & 0xFF), (fn_ip.server_ip & 0xFF));
-
-
- ping_ipv4(fd_device, fn_ip.server_ip);
-
- set_timer(TICKS_SEC / 10 * ping_args.timeout);
- while(get_timer() > 0) {
- receive_ether(fd_device);
- if(pong_ipv4() == 0) {
- printf("success\n");
- return 0;
- }
- }
-
- printf("failed\n");
- return -1;
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netlib/Makefile b/qemu/roms/SLOF/clients/net-snk/app/netlib/Makefile
deleted file mode 100644
index df09bf82e..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netlib/Makefile
+++ /dev/null
@@ -1,42 +0,0 @@
-# *****************************************************************************
-# * Copyright (c) 2004, 2008 IBM Corporation
-# * All rights reserved.
-# * This program and the accompanying materials
-# * are made available under the terms of the BSD License
-# * which accompanies this distribution, and is available at
-# * http://www.opensource.org/licenses/bsd-license.php
-# *
-# * Contributors:
-# * IBM Corporation - initial implementation
-# ****************************************************************************/
-
-ifndef TOP
- TOP = $(shell while ! test -e make.rules; do cd .. ; done; pwd)
- export TOP
-endif
-include $(TOP)/make.rules
-
-CFLAGS += -I../
-
-ifeq ($(SNK_USE_MTFTP), 1)
-CFLAGS += -DUSE_MTFTP
-endif
-
-OBJS = ethernet.o ipv4.o udp.o tcp.o dns.o bootp.o \
- dhcp.o ipv6.o dhcpv6.o icmpv6.o ndp.o
-
-ifeq ($(SNK_USE_MTFTP), 1)
-OBJS += mtftp.o
-else
-OBJS += tftp.o
-endif
-
-all: netlib.o
-
-netlib.o: $(OBJS)
- $(LD) $(LDFLAGS) $^ -o $@ -r
-
-clean:
- $(RM) -f *.o *.a *.i
-
-include $(TOP)/make.depend
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netlib/bootp.c b/qemu/roms/SLOF/clients/net-snk/app/netlib/bootp.c
deleted file mode 100644
index 6d58cef7d..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netlib/bootp.c
+++ /dev/null
@@ -1,255 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-
-#include <stdio.h>
-#include <string.h>
-#include <sys/socket.h>
-#include <time.h>
-
-#include <ethernet.h>
-#include <ipv4.h>
-#include <udp.h>
-#include <dhcp.h>
-
-#define DEBUG 0
-
-static char * response_buffer;
-
-#if DEBUG
-static void
-print_ip(char *ip)
-{
- printf("%d.%d.%d.%d\n", ip[0], ip[1], ip[2], ip[3]);
-}
-#endif
-
-/* IP header checksum calculation */
-static unsigned short
-checksum(unsigned short *packet, int words)
-{
- unsigned long checksum;
- for (checksum = 0; words > 0; words--)
- checksum += *packet++;
- checksum = (checksum >> 16) + (checksum & 0xffff);
- checksum += (checksum >> 16);
- return ~checksum;
-}
-
-
-static int
-send_bootp(filename_ip_t * fn_ip)
-{
-#if DEBUG
- int i;
-#endif
- unsigned int packetsize =
- sizeof(struct iphdr) + sizeof(struct ethhdr) +
- sizeof(struct udphdr) + sizeof(struct btphdr);
- unsigned char packet[packetsize];
- struct iphdr *iph;
- struct udphdr *udph;
- struct btphdr *btph;
-
- iph = (struct iphdr *) packet;
- udph = (struct udphdr *) (iph + 1);
- btph = (struct btphdr *) (udph + 1);
-
- memset(packet, 0, packetsize);
-
- fill_iphdr((uint8_t *) iph, htons(packetsize - sizeof(struct ethhdr)),
- IPTYPE_UDP, 0, fn_ip->server_ip);
- fill_udphdr((uint8_t *) udph,
- htons(sizeof(struct udphdr) + sizeof(struct btphdr)),
- htons(UDPPORT_BOOTPC), htons(UDPPORT_BOOTPS));
- btph->op = 1;
- btph->htype = 1;
- btph->hlen = 6;
- strcpy((char *) btph->file, "bla");
- memcpy(btph->chaddr, get_mac_address(), 6);
-
-#if DEBUG
- printf("Sending packet\n");
- printf("Packet is ");
- for (i = 0; i < packetsize; i++)
- printf(" %02x", packet[i]);
- printf(".\n");
-#endif
-
- send_ipv4(fn_ip->fd, packet, iph->ip_len);
-#if DEBUG
- printf("%d bytes transmitted over socket.\n", i);
-#endif
-
- return 0;
-}
-
-
-static int
-receive_bootp(filename_ip_t * fn_ip)
-{
- int len, old_sum;
- unsigned int packetsize = 2000;
- unsigned char packet[packetsize];
- struct iphdr *iph;
- struct udphdr *udph;
- struct btphdr *btph;
-
-#if DEBUG
- struct ethhdr *ethh;
- ethh = (struct ethhdr *) packet;
-#endif
-
- iph = (struct iphdr *) (packet + sizeof(struct ethhdr));
- udph = (struct udphdr *) (iph + 1);
- btph = (struct btphdr *) (udph + 1);
-
- memset(packet, 0, packetsize);
-
- /* setting up a timer with a timeout of one second */
- set_timer(TICKS_SEC);
-
- do {
-
- /* let's receive a packet */
- len = recv(fn_ip->fd, packet, packetsize, 0);
-
-#if DEBUG
- int j;
- printf("%d bytes received, %d expected \n", len, packetsize);
- if (len == 346) {
- printf("Rec packet\n");
- printf("Packet is ");
- for (j = 0; j < len; j++) {
- if (j % 16 == 0)
- printf("\n");
- printf(" %02x", packet[j]);
- }
- printf(".\n");
- }
-#endif
- if (len == 0)
- continue;
-
- /* check if the ip checksum is correct */
- old_sum = iph->ip_sum;
- iph->ip_sum = 0x00;
- if (old_sum !=
- checksum((unsigned short *) iph, sizeof(struct iphdr) >> 1))
- /* checksum failed */
- continue;
- /* is it a udp packet */
- if (iph->ip_p != IPTYPE_UDP)
- continue;
- /* check if the source port and destination port and the packet
- * say that it is a bootp answer */
- if (udph->uh_dport != htons(UDPPORT_BOOTPC) || udph->uh_sport != htons(UDPPORT_BOOTPS))
- continue;
- /* check if it is a Boot Reply */
- if (btph->op != 2)
- continue;
- /* Comparing our mac address with the one in the bootp reply */
- if (memcmp(get_mac_address(), btph->chaddr, ETH_ALEN))
- continue;
-
- if(response_buffer)
- memcpy(response_buffer, btph, 1720);
-
- fn_ip->own_ip = btph->yiaddr;
- fn_ip->server_ip = btph->siaddr;
- strcpy((char *) fn_ip->filename, (char *) btph->file);
-
-#if DEBUG
- printf("\nThese are the details of the bootp reply:\n");
- printf("Our IP address: ");
- print_ip((char*) &fn_ip->own_ip);
- printf("Next server IP address: ");
- print_ip((char*) &fn_ip->server_ip);
- printf("Boot file name: %s\n", btph->file);
- printf("Packet is: %s\n", btph->file);
- for (j = 0; j < len; j++) {
- if (j % 16 == 0)
- printf("\n");
- printf(" %02x", packet[j]);
- }
- printf(".\n");
- printf("fn_ip->own_mac: %02x:%02x:%02x:%02x:%02x:%02x\n",
- get_mac_address()[0], get_mac_address()[1],
- get_mac_address()[2], get_mac_address()[3],
- get_mac_address()[4], get_mac_address()[5]);
- printf("Header ethh->dest_mac: %02x:%02x:%02x:%02x:%02x:%02x\n",
- ethh->dest_mac[0], ethh->dest_mac[1], ethh->dest_mac[2],
- ethh->dest_mac[3], ethh->dest_mac[4], ethh->dest_mac[5]);
- printf("Header ethh->src_mac: %02x:%02x:%02x:%02x:%02x:%02x\n",
- ethh->src_mac[0], ethh->src_mac[1], ethh->src_mac[2],
- ethh->src_mac[3], ethh->src_mac[4], ethh->src_mac[5]);
- printf("Header ethh->typ: %x\n",ethh->type);
- printf("Header iph->ip_hlv: %x\n",iph->ip_hlv);
- printf("Header iph->ip_len: %x\n",iph->ip_len);
- printf("Header iph->ip_id: %x\n",iph->ip_id);
- printf("Header iph->ip_off: %x\n",iph->ip_off);
- printf("Header iph->ip_ttl: %x\n",iph->ip_ttl);
- printf("Header iph->ip_p: %x\n",iph->ip_p);
- printf("Header iph->ip_sum: %x\n",iph->ip_sum);
- printf("Header iph->ip_src: %x\n",iph->ip_src);
- printf("Header iph->ip_dst: %x\n",iph->ip_dst);
-
- printf("Header btph->op: %x\n",btph->op);
- printf("Header btph->htype: %x\n",btph->htype);
- printf("Header btph->hlen: %x\n",btph->hlen);
- printf("Header btph->hops: %x\n",btph->hops);
- printf("Header btph->xid: %x\n",btph->xid);
- printf("Header btph->secs: %x\n",btph->secs);
- printf("Header btph->ciaddr: %x\n",btph->ciaddr);
- printf("Header btph->yiaddr: %x\n",btph->yiaddr);
- printf("Header btph->siaddr: %x\n",btph->siaddr);
- printf("Header btph->giaddr: %x\n",btph->giaddr);
-
- printf("Header btph->chaddr: %02x:%02x:%02x:%02x:%02x:%02x:\n",
- btph->chaddr[0], btph->chaddr[1], btph->chaddr[2],
- btph->chaddr[3], btph->chaddr[4], btph->chaddr[5]);
-#endif
- return 0;
-
- /* only do this for the time specified during set_timer() */
- } while (get_timer() > 0);
- return -1;
-}
-
-
-int
-bootp(char *ret_buffer, filename_ip_t * fn_ip, unsigned int retries)
-{
- int i = (int) retries+1;
- fn_ip->own_ip = 0;
-
- printf(" Requesting IP address via BOOTP: ");
-
- response_buffer = ret_buffer;
-
- do {
- printf("\b\b%02d", i);
- if (!i--) {
- printf("\nGiving up after %d bootp requests\n",
- retries+1);
- return -1;
- }
- send_bootp(fn_ip);
- /* if the timer in receive_bootp expired it will return
- * -1 and we will just send another bootp request just
- * in case the previous one was lost. And because we don't
- * trust the network cable we keep on doing this 30 times */
- } while (receive_bootp(fn_ip) != 0);
-
- printf("\b\b\bdone\n");
- return 0;
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netlib/dhcp.c b/qemu/roms/SLOF/clients/net-snk/app/netlib/dhcp.c
deleted file mode 100644
index 7e2e88ccf..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netlib/dhcp.c
+++ /dev/null
@@ -1,955 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-
-/******************************* ALGORITHMS ******************************/
-
-/** \file dhcp.c <pre>
- * **************** State-transition diagram for DHCP client *************
- *
- * +---------+ Note: DHCP-server msg / DHCP-client msg
- * | INIT |
- * +---------+
- * |
- * | - / Discover
- * V
- * +---------+
- * | SELECT | Timeout
- * +---------+ |
- * | |
- * | Offer / Request |
- * | |
- * V V
- * +---------+ NACK / - ***********
- * | REQUEST | ----------------> * FAULT *
- * +---------+ ***********
- * |
- * | ACK / - ***********
- * +----------------------> * SUCCESS *
- * ***********
- *
- * ************************************************************************
- * </pre> */
-
-
-/********************** DEFINITIONS & DECLARATIONS ***********************/
-
-#include <dhcp.h>
-#include <ethernet.h>
-#include <ipv4.h>
-#include <udp.h>
-#include <dns.h>
-#include <netapps/args.h>
-
-#include <stdio.h>
-#include <string.h>
-#include <time.h>
-#include <sys/socket.h>
-#include <ctype.h>
-#include <stdlib.h>
-
-/* DHCP Message Types */
-#define DHCPDISCOVER 1
-#define DHCPOFFER 2
-#define DHCPREQUEST 3
-#define DHCPDECLINE 4
-#define DHCPACK 5
-#define DHCPNACK 6
-#define DHCPRELEASE 7
-#define DHCPINFORM 8
-
-/* DHCP Option Codes */
-#define DHCP_MASK 1
-#define DHCP_ROUTER 3
-#define DHCP_DNS 6
-#define DHCP_REQUESTED_IP 50
-#define DHCP_OVERLOAD 52
-#define DHCP_MSG_TYPE 53
-#define DHCP_SERVER_ID 54
-#define DHCP_REQUEST_LIST 55
-#define DHCP_TFTP_SERVER 66
-#define DHCP_BOOTFILE 67
-#define DHCP_CLIENT_ARCH 93
-#define DHCP_ENDOPT 0xFF
-#define DHCP_PADOPT 0x00
-
-/* "file/sname" overload option values */
-#define DHCP_OVERLOAD_FILE 1
-#define DHCP_OVERLOAD_SNAME 2
-#define DHCP_OVERLOAD_BOTH 3
-
-/* DHCP states codes */
-#define DHCP_STATE_SELECT 1
-#define DHCP_STATE_REQUEST 2
-#define DHCP_STATE_SUCCESS 3
-#define DHCP_STATE_FAULT 4
-
-/* DHCP Client Architecture */
-#ifndef DHCPARCH
-#define USE_DHCPARCH 0
-#define DHCPARCH 0
-#else
-#define USE_DHCPARCH 1
-#endif
-
-static uint8_t dhcp_magic[] = {0x63, 0x82, 0x53, 0x63};
-/**< DHCP_magic is a cookie, that identifies DHCP options (see RFC 2132) */
-
-/** \struct dhcp_options_t
- * This structure is used to fill options in DHCP-msg during transmitting
- * or to retrieve options from DHCP-msg during receiving.
- * <p>
- * If flag[i] == TRUE then field for i-th option retains valid value and
- * information from this field may retrived (in case of receiving) or will
- * be transmitted (in case of transmitting).
- *
- */
-typedef struct {
- uint8_t flag[256]; /**< Show if corresponding opt. is valid */
- uint8_t request_list[256]; /**< o.55 If i-th member is TRUE, then i-th
- option will be requested from server */
- uint32_t server_ID; /**< o.54 Identifies DHCP-server */
- uint32_t requested_IP; /**< o.50 Must be filled in DHCP-Request */
- uint32_t dns_IP; /**< o. 6 DNS IP */
- uint32_t router_IP; /**< o. 3 Router IP */
- uint32_t subnet_mask; /**< o. 1 Subnet mask */
- uint8_t msg_type; /**< o.53 DHCP-message type */
- uint8_t overload; /**< o.52 Overload sname/file fields */
- int8_t tftp_server[256]; /**< o.66 TFTP server name */
- int8_t bootfile[256]; /**< o.67 Boot file name */
- uint16_t client_arch; /**< o.93 Client architecture type */
-} dhcp_options_t;
-
-/** Stores state of DHCP-client (refer to State-transition diagram) */
-static uint8_t dhcp_state;
-
-
-/***************************** PROTOTYPES ********************************/
-
-static int32_t dhcp_attempt(int fd);
-
-static int32_t dhcp_encode_options(uint8_t * opt_field, dhcp_options_t * opt_struct);
-
-static int32_t dhcp_decode_options(uint8_t opt_field[], uint32_t opt_len,
- dhcp_options_t * opt_struct);
-
-static int8_t dhcp_merge_options(uint8_t dst_options[], uint32_t * dst_len,
- uint8_t src_options[], uint32_t src_len);
-
-static int8_t dhcp_find_option(uint8_t options[], uint32_t len,
- uint8_t op_code, uint32_t * op_offset);
-
-static void dhcp_append_option(uint8_t dst_options[], uint32_t * dst_len,
- uint8_t * new_option);
-
-static void dhcp_combine_option(uint8_t dst_options[], uint32_t * dst_len,
- uint32_t dst_offset, uint8_t * new_option);
-
-static void dhcp_send_discover(int fd);
-
-static void dhcp_send_request(int fd);
-
-/***************************** LOCAL VARIABLES ***************************/
-
-static uint8_t ether_packet[ETH_MTU_SIZE];
-static uint32_t dhcp_own_ip = 0;
-static uint32_t dhcp_server_ip = 0;
-static uint32_t dhcp_siaddr_ip = 0;
-static char dhcp_filename[256];
-static char dhcp_tftp_name[256];
-static uint32_t dhcp_xid;
-
-static char * response_buffer;
-
-/***************************** IMPLEMENTATION ****************************/
-
-void dhcpv4_generate_transaction_id(void)
-{
- dhcp_xid = (rand() << 16) ^ rand();
-}
-
-int32_t dhcpv4(char *ret_buffer, filename_ip_t *fn_ip)
-{
- uint32_t dhcp_tftp_ip = 0;
- int fd = fn_ip->fd;
-
- strcpy(dhcp_filename, "");
- strcpy(dhcp_tftp_name, "");
-
- response_buffer = ret_buffer;
-
- if (dhcp_attempt(fd) == 0)
- return -1;
-
- if (fn_ip->own_ip) {
- dhcp_own_ip = fn_ip->own_ip;
- }
- if (fn_ip->server_ip) {
- dhcp_siaddr_ip = fn_ip->server_ip;
- }
- if(fn_ip->filename[0] != 0) {
- strcpy(dhcp_filename, (char *) fn_ip->filename);
- }
-
- // TFTP SERVER
- if (!strlen(dhcp_tftp_name)) {
- if (!dhcp_siaddr_ip) {
- // ERROR: TFTP name is not presented
- return -3;
- }
-
- // take TFTP-ip from siaddr field
- dhcp_tftp_ip = dhcp_siaddr_ip;
- }
- else {
- // TFTP server defined by its name
- if (!strtoip(dhcp_tftp_name, (char *)&dhcp_tftp_ip)) {
- if (!dns_get_ip(fd, dhcp_tftp_name, (uint8_t *)&dhcp_tftp_ip, 4)) {
- // DNS error - can't obtain TFTP-server name
- // Use TFTP-ip from siaddr field, if presented
- if (dhcp_siaddr_ip) {
- dhcp_tftp_ip = dhcp_siaddr_ip;
- }
- else {
- // ERROR: Can't obtain TFTP server IP
- return -4;
- }
- }
- }
- }
-
- // Store configuration info into filename_ip strucutre
- fn_ip -> own_ip = dhcp_own_ip;
- fn_ip -> server_ip = dhcp_tftp_ip;
- strcpy((char *) fn_ip -> filename, dhcp_filename);
-
- return 0;
-}
-
-/**
- * DHCP: Tries o obtain DHCP parameters, refer to state-transition diagram
- */
-static int32_t dhcp_attempt(int fd)
-{
- int sec;
-
- // Send DISCOVER message and switch DHCP-client to SELECT state
- dhcp_send_discover(fd);
-
- dhcp_state = DHCP_STATE_SELECT;
-
- // setting up a timer with a timeout of two seconds
- for (sec = 0; sec < 2; sec++) {
- set_timer(TICKS_SEC);
- do {
- receive_ether(fd);
-
- // Wait until client will switch to Final state or Timeout occurs
- switch (dhcp_state) {
- case DHCP_STATE_SUCCESS :
- return 1;
- case DHCP_STATE_FAULT :
- return 0;
- }
- } while (get_timer() > 0);
- }
-
- // timeout
- return 0;
-}
-
-/**
- * DHCP: Supplements DHCP-message with options stored in structure.
- * For more information about option coding see dhcp_options_t.
- *
- * @param opt_field Points to the "vend" field of DHCP-message
- * (destination)
- * @param opt_struct this structure stores info about the options which
- * will be added to DHCP-message (source)
- * @return TRUE - options packed;
- * FALSE - error condition occurs.
- * @see dhcp_options_t
- */
-static int32_t dhcp_encode_options(uint8_t * opt_field, dhcp_options_t * opt_struct)
-{
- uint8_t * options = opt_field;
- uint16_t i, sum; // used to define is any options set
-
- // magic
- memcpy(options, dhcp_magic, 4);
- options += 4;
-
- // fill message type
- switch (opt_struct -> msg_type) {
- case DHCPDISCOVER :
- case DHCPREQUEST :
- case DHCPDECLINE :
- case DHCPINFORM :
- case DHCPRELEASE :
- options[0] = DHCP_MSG_TYPE;
- options[1] = 1;
- options[2] = opt_struct -> msg_type;
- options += 3;
- break;
- default :
- return 0; // Unsupported DHCP-message
- }
-
- if (opt_struct -> overload) {
- options[0] = DHCP_OVERLOAD;
- options[1] = 0x01;
- options[2] = opt_struct -> overload;
- options +=3;
- }
-
- if (opt_struct -> flag[DHCP_REQUESTED_IP]) {
- options[0] = DHCP_REQUESTED_IP;
- options[1] = 0x04;
- * (uint32_t *) (options + 2) = htonl (opt_struct -> requested_IP);
- options +=6;
- }
-
- if (opt_struct -> flag[DHCP_SERVER_ID]) {
- options[0] = DHCP_SERVER_ID;
- options[1] = 0x04;
- * (uint32_t *) (options + 2) = htonl (opt_struct -> server_ID);
- options +=6;
- }
-
- sum = 0;
- for (i = 0; i < 256; i++)
- sum += opt_struct -> request_list[i];
-
- if (sum) {
- options[0] = DHCP_REQUEST_LIST;
- options[1] = sum;
- options += 2;
- for (i = 0; i < 256; i++) {
- if (opt_struct -> request_list[i]) {
- options[0] = i; options++;
- }
- }
- }
-
- if (opt_struct -> flag[DHCP_TFTP_SERVER]) {
- options[0] = DHCP_TFTP_SERVER;
- options[1] = strlen((char *) opt_struct -> tftp_server) + 1;
- memcpy(options + 2, opt_struct -> tftp_server, options[1]);
- options += options[1] + 2;
- }
-
- if (opt_struct -> flag[DHCP_BOOTFILE]) {
- options[0] = DHCP_BOOTFILE;
- options[1] = strlen((char *) opt_struct -> bootfile) + 1;
- memcpy(options + 2, opt_struct -> bootfile, options[1]);
- options += options[1] + 2;
- }
-
- if (opt_struct -> flag[DHCP_CLIENT_ARCH]) {
- options[0] = DHCP_CLIENT_ARCH;
- options[1] = 2;
- options[2] = (DHCPARCH >> 8);
- options[3] = DHCPARCH & 0xff;
- options += 4;
- }
-
- // end options
- options[0] = 0xFF;
- options++;
-
- return 1;
-}
-
-/**
- * DHCP: Extracts encoded options from DHCP-message into the structure.
- * For more information about option coding see dhcp_options_t.
- *
- * @param opt_field Points to the "options" field of DHCP-message
- * (source).
- * @param opt_len Length of "options" field.
- * @param opt_struct this structure stores info about the options which
- * was extracted from DHCP-message (destination).
- * @return TRUE - options extracted;
- * FALSE - error condition occurs.
- * @see dhcp_options_t
- */
-static int32_t dhcp_decode_options(uint8_t opt_field[], uint32_t opt_len,
- dhcp_options_t * opt_struct)
-{
- uint32_t offset = 0;
-
- memset(opt_struct, 0, sizeof(dhcp_options_t));
-
- // magic
- if (memcmp(opt_field, dhcp_magic, 4)) {
- return 0;
- }
-
- offset += 4;
- while (offset < opt_len) {
- opt_struct -> flag[opt_field[offset]] = 1;
- switch(opt_field[offset]) {
- case DHCP_OVERLOAD :
- opt_struct -> overload = opt_field[offset + 2];
- offset += 2 + opt_field[offset + 1];
- break;
-
- case DHCP_REQUESTED_IP :
- opt_struct -> requested_IP = htonl(* (uint32_t *) (opt_field + offset + 2));
- offset += 2 + opt_field[offset + 1];
- break;
-
- case DHCP_MASK :
- opt_struct -> flag[DHCP_MASK] = 1;
- opt_struct -> subnet_mask = htonl(* (uint32_t *) (opt_field + offset + 2));
- offset += 2 + opt_field[offset + 1];
- break;
-
- case DHCP_DNS :
- opt_struct -> flag[DHCP_DNS] = 1;
- opt_struct -> dns_IP = htonl(* (uint32_t *) (opt_field + offset + 2));
- offset += 2 + opt_field[offset + 1];
- break;
-
- case DHCP_ROUTER :
- opt_struct -> flag[DHCP_ROUTER] = 1;
- opt_struct -> router_IP = htonl(* (uint32_t *) (opt_field + offset + 2));
- offset += 2 + opt_field[offset + 1];
- break;
-
- case DHCP_MSG_TYPE :
- if ((opt_field[offset + 2] > 0) && (opt_field[offset + 2] < 9))
- opt_struct -> msg_type = opt_field[offset + 2];
- else
- return 0;
- offset += 2 + opt_field[offset + 1];
- break;
-
- case DHCP_SERVER_ID :
- opt_struct -> server_ID = htonl(* (uint32_t *) (opt_field + offset + 2));
- offset += 2 + opt_field[offset + 1];
- break;
-
- case DHCP_TFTP_SERVER :
- memcpy(opt_struct -> tftp_server, opt_field + offset + 2, opt_field[offset + 1]);
- (opt_struct -> tftp_server)[opt_field[offset + 1]] = 0;
- offset += 2 + opt_field[offset + 1];
- break;
-
- case DHCP_BOOTFILE :
- memcpy(opt_struct -> bootfile, opt_field + offset + 2, opt_field[offset + 1]);
- (opt_struct -> bootfile)[opt_field[offset + 1]] = 0;
- offset += 2 + opt_field[offset + 1];
- break;
-
- case DHCP_CLIENT_ARCH :
- opt_struct -> client_arch = ((opt_field[offset + 2] << 8) & 0xFF00) | (opt_field[offset + 3] & 0xFF);
- offset += 4;
- break;
-
- case DHCP_PADOPT :
- offset++;
- break;
-
- case DHCP_ENDOPT : // End of options
- return 1;
-
- default :
- offset += 2 + opt_field[offset + 1]; // Unsupported opt. - do nothing
- }
- }
- if (offset == opt_len)
- return 1; // options finished without 0xFF
-
- return 0;
-}
-
-/**
- * DHCP: Appends information from source "options" into dest "options".
- * This function is used to support "file/sname" overloading.
- *
- * @param dst_options destanation "options" field
- * @param dst_len size of dst_options (modified by this function)
- * @param src_options source "options" field
- * @param src_len size of src_options
- * @return TRUE - options merged;
- * FALSE - error condition occurs.
- */
-static int8_t dhcp_merge_options(uint8_t dst_options[], uint32_t * dst_len,
- uint8_t src_options[], uint32_t src_len)
-{
- uint32_t dst_offset, src_offset = 0;
-
- // remove ENDOPT if presented
- if (dhcp_find_option(dst_options, * dst_len, DHCP_ENDOPT, &dst_offset))
- * dst_len = dst_offset;
-
- while (src_offset < src_len) {
- switch(src_options[src_offset]) {
- case DHCP_PADOPT:
- src_offset++;
- break;
- case DHCP_ENDOPT:
- return 1;
- default:
- if (dhcp_find_option(dst_options, * dst_len,
- src_options[src_offset],
- &dst_offset)) {
- dhcp_combine_option(dst_options, dst_len,
- dst_offset,
- (uint8_t *) src_options +
- src_offset);
- }
- else {
- dhcp_append_option(dst_options, dst_len, src_options + src_offset);
- }
- src_offset += 2 + src_options[src_offset + 1];
- }
- }
-
- if (src_offset == src_len)
- return 1;
- return 0;
-}
-
-/**
- * DHCP: Finds given occurrence of the option with the given code (op_code)
- * in "options" field of DHCP-message.
- *
- * @param options "options" field of DHCP-message
- * @param len length of the "options" field
- * @param op_code code of the option to find
- * @param op_offset SUCCESS - offset to an option occurrence;
- * FAULT - offset is set to zero.
- * @return TRUE - option was find;
- * FALSE - option wasn't find.
- */
-static int8_t dhcp_find_option(uint8_t options[], uint32_t len,
- uint8_t op_code, uint32_t * op_offset)
-{
- uint32_t srch_offset = 0;
- * op_offset = 0;
-
- while (srch_offset < len) {
- if (options[srch_offset] == op_code) {
- * op_offset = srch_offset;
- return 1;
- }
- if (options[srch_offset] == DHCP_ENDOPT)
- return 0;
-
- if (options[srch_offset] == DHCP_PADOPT)
- srch_offset++;
- else
- srch_offset += 2 + options[srch_offset + 1];
- }
- return 0;
-}
-
-/**
- * DHCP: Appends new option from one list (src) into the tail
- * of another option list (dst)
- *
- * @param dst_options "options" field of DHCP-message
- * @param dst_len length of the "options" field (modified)
- * @param new_option points to an option in another list (src)
- */
-static void dhcp_append_option(uint8_t dst_options[], uint32_t * dst_len,
- uint8_t * new_option)
-{
- memcpy(dst_options + ( * dst_len), new_option, 2 + (* (new_option + 1)));
- * dst_len += 2 + *(new_option + 1);
-}
-
-/**
- * DHCP: This function is used when options with the same code are
- * presented in both merged lists. In this case information
- * about the option from one list (src) is combined (complemented)
- * with information about the option in another list (dst).
- *
- * @param dst_options "options" field of DHCP-message
- * @param dst_len length of the "options" field (modified)
- * @param dst_offset offset of the option from beginning of the list
- * @param new_option points to an option in another list (src)
- */
-static void dhcp_combine_option(uint8_t dst_options[], uint32_t * dst_len,
- uint32_t dst_offset, uint8_t * new_option)
-{
- uint8_t tmp_buffer[1024]; // use to provide safe memcpy
- uint32_t tail_len;
-
- // move all subsequent options (allocate size for additional info)
- tail_len = (* dst_len) - dst_offset - 2 - dst_options[dst_offset + 1];
-
- memcpy(tmp_buffer, dst_options + (* dst_len) - tail_len, tail_len);
- memcpy(dst_options + (* dst_len) - tail_len + (* (new_option + 1)),
- tmp_buffer, tail_len);
-
- // add new_content to option
- memcpy(dst_options + (* dst_len) - tail_len, new_option + 2,
- * (new_option + 1));
- dst_options[dst_offset + 1] += * (new_option + 1);
-
- // correct dst_len
- * dst_len += * (new_option + 1);
-}
-
-/**
- * DHCP: Sends DHCP-Discover message. Looks for DHCP servers.
- */
-static void dhcp_send_discover(int fd)
-{
- uint32_t packetsize = sizeof(struct iphdr) +
- sizeof(struct udphdr) + sizeof(struct btphdr);
- struct btphdr *btph;
- dhcp_options_t opt;
-
- memset(ether_packet, 0, packetsize);
-
- btph = (struct btphdr *) (&ether_packet[
- sizeof(struct iphdr) + sizeof(struct udphdr)]);
-
- btph -> op = 1;
- btph -> htype = 1;
- btph -> hlen = 6;
- btph -> xid = dhcp_xid;
- memcpy(btph -> chaddr, get_mac_address(), 6);
-
- memset(&opt, 0, sizeof(dhcp_options_t));
-
- opt.msg_type = DHCPDISCOVER;
-
- opt.request_list[DHCP_MASK] = 1;
- opt.request_list[DHCP_DNS] = 1;
- opt.request_list[DHCP_ROUTER] = 1;
- opt.request_list[DHCP_TFTP_SERVER] = 1;
- opt.request_list[DHCP_BOOTFILE] = 1;
- opt.request_list[DHCP_CLIENT_ARCH] = USE_DHCPARCH;
-
- dhcp_encode_options(btph -> vend, &opt);
-
- fill_udphdr(&ether_packet[sizeof(struct iphdr)],
- sizeof(struct btphdr) + sizeof(struct udphdr),
- UDPPORT_BOOTPC, UDPPORT_BOOTPS);
- fill_iphdr(ether_packet, sizeof(struct btphdr) +
- sizeof(struct udphdr) + sizeof(struct iphdr),
- IPTYPE_UDP, dhcp_own_ip, 0xFFFFFFFF);
-
- send_ipv4(fd, ether_packet, packetsize);
-}
-
-/**
- * DHCP: Sends DHCP-Request message. Asks for acknowledgment to occupy IP.
- */
-static void dhcp_send_request(int fd)
-{
- uint32_t packetsize = sizeof(struct iphdr) +
- sizeof(struct udphdr) + sizeof(struct btphdr);
- struct btphdr *btph;
- dhcp_options_t opt;
-
- memset(ether_packet, 0, packetsize);
-
- btph = (struct btphdr *) (&ether_packet[
- sizeof(struct iphdr) + sizeof(struct udphdr)]);
-
- btph -> op = 1;
- btph -> htype = 1;
- btph -> hlen = 6;
- btph -> xid = dhcp_xid;
- memcpy(btph -> chaddr, get_mac_address(), 6);
-
- memset(&opt, 0, sizeof(dhcp_options_t));
-
- opt.msg_type = DHCPREQUEST;
- memcpy(&(opt.requested_IP), &dhcp_own_ip, 4);
- opt.flag[DHCP_REQUESTED_IP] = 1;
- memcpy(&(opt.server_ID), &dhcp_server_ip, 4);
- opt.flag[DHCP_SERVER_ID] = 1;
-
- opt.request_list[DHCP_MASK] = 1;
- opt.request_list[DHCP_DNS] = 1;
- opt.request_list[DHCP_ROUTER] = 1;
- opt.request_list[DHCP_TFTP_SERVER] = 1;
- opt.request_list[DHCP_BOOTFILE] = 1;
- opt.request_list[DHCP_CLIENT_ARCH] = USE_DHCPARCH;
- opt.flag[DHCP_CLIENT_ARCH] = USE_DHCPARCH;
-
- dhcp_encode_options(btph -> vend, &opt);
-
- fill_udphdr(&ether_packet[sizeof(struct iphdr)],
- sizeof(struct btphdr) + sizeof(struct udphdr),
- UDPPORT_BOOTPC, UDPPORT_BOOTPS);
- fill_iphdr(ether_packet, sizeof(struct btphdr) +
- sizeof(struct udphdr) + sizeof(struct iphdr),
- IPTYPE_UDP, 0, 0xFFFFFFFF);
-
- send_ipv4(fd, ether_packet, packetsize);
-}
-
-
-/**
- * DHCP: Sends DHCP-Release message. Releases occupied IP.
- */
-void dhcp_send_release(int fd)
-{
- uint32_t packetsize = sizeof(struct iphdr) +
- sizeof(struct udphdr) + sizeof(struct btphdr);
- struct btphdr *btph;
- dhcp_options_t opt;
-
- btph = (struct btphdr *) (&ether_packet[
- sizeof(struct iphdr) + sizeof(struct udphdr)]);
-
- memset(ether_packet, 0, packetsize);
-
- btph -> op = 1;
- btph -> htype = 1;
- btph -> hlen = 6;
- btph -> xid = dhcp_xid;
- strcpy((char *) btph -> file, "");
- memcpy(btph -> chaddr, get_mac_address(), 6);
- btph -> ciaddr = htonl(dhcp_own_ip);
-
- memset(&opt, 0, sizeof(dhcp_options_t));
-
- opt.msg_type = DHCPRELEASE;
- opt.server_ID = dhcp_server_ip;
- opt.flag[DHCP_SERVER_ID] = 1;
-
- dhcp_encode_options(btph -> vend, &opt);
-
- fill_udphdr(&ether_packet[sizeof(struct iphdr)],
- sizeof(struct btphdr) + sizeof(struct udphdr),
- UDPPORT_BOOTPC, UDPPORT_BOOTPS);
- fill_iphdr(ether_packet, sizeof(struct btphdr) +
- sizeof(struct udphdr) + sizeof(struct iphdr), IPTYPE_UDP,
- dhcp_own_ip, dhcp_server_ip);
-
- send_ipv4(fd, ether_packet, packetsize);
-}
-
-/**
- * DHCP: Handles DHCP-messages according to Receive-handle diagram.
- * Changes the state of DHCP-client.
- *
- * @param fd socket descriptor
- * @param packet BootP/DHCP-packet to be handled
- * @param packetsize length of the packet
- * @return ZERO - packet handled successfully;
- * NON ZERO - packet was not handled (e.g. bad format)
- * @see receive_ether
- * @see btphdr
- */
-
-int8_t handle_dhcp(int fd, uint8_t * packet, int32_t packetsize)
-{
- struct btphdr * btph;
- struct iphdr * iph;
- dhcp_options_t opt;
-
- memset(&opt, 0, sizeof(dhcp_options_t));
- btph = (struct btphdr *) packet;
- iph = (struct iphdr *) packet - sizeof(struct udphdr) -
- sizeof(struct iphdr);
-
- if (btph->op != 2)
- return -1; /* It is not a Bootp/DHCP reply */
- if (btph->xid != dhcp_xid)
- return -1; /* The transaction ID does not match */
-
- if (memcmp(btph -> vend, dhcp_magic, 4)) {
- // It is BootP - RFC 951
- dhcp_own_ip = htonl(btph -> yiaddr);
- dhcp_siaddr_ip = htonl(btph -> siaddr);
- dhcp_server_ip = htonl(iph -> ip_src);
-
- if (strlen((char *) btph -> sname) && !dhcp_siaddr_ip) {
- strncpy((char *) dhcp_tftp_name, (char *) btph -> sname,
- sizeof(btph -> sname));
- dhcp_tftp_name[sizeof(btph -> sname)] = 0;
- }
-
- if (strlen((char *) btph -> file)) {
- strncpy((char *) dhcp_filename, (char *) btph -> file, sizeof(btph -> file));
- dhcp_filename[sizeof(btph -> file)] = 0;
- }
-
- dhcp_state = DHCP_STATE_SUCCESS;
- return 0;
- }
-
-
- // decode options
- if (!dhcp_decode_options(btph -> vend, packetsize -
- sizeof(struct btphdr) + sizeof(btph -> vend),
- &opt)) {
- return -1; // can't decode options
- }
-
- if (opt.overload) {
- int16_t decode_res = 0;
- uint8_t options[1024]; // buffer for merged options
- uint32_t opt_len;
-
- // move 1-st part of options from vend field into buffer
- opt_len = packetsize - sizeof(struct btphdr) +
- sizeof(btph -> vend) - 4;
- memcpy(options, btph -> vend, opt_len + 4);
-
- // add other parts
- switch (opt.overload) {
- case DHCP_OVERLOAD_FILE:
- decode_res = dhcp_merge_options(options + 4, &opt_len,
- btph -> file,
- sizeof(btph -> file));
- break;
- case DHCP_OVERLOAD_SNAME:
- decode_res = dhcp_merge_options(options + 4, &opt_len,
- btph -> sname,
- sizeof(btph -> sname));
- break;
- case DHCP_OVERLOAD_BOTH:
- decode_res = dhcp_merge_options(options + 4, &opt_len,
- btph -> file,
- sizeof(btph -> file));
- if (!decode_res)
- break;
- decode_res = dhcp_merge_options(options + 4, &opt_len,
- btph -> sname,
- sizeof(btph -> sname));
- break;
- }
-
- if (!decode_res)
- return -1; // bad options in sname/file fields
-
- // decode merged options
- if (!dhcp_decode_options(options, opt_len + 4, &opt)) {
- return -1; // can't decode options
- }
- }
-
- if (!opt.msg_type) {
- // It is BootP with Extensions - RFC 1497
- // retrieve conf. settings from BootP - reply
- dhcp_own_ip = htonl(btph -> yiaddr);
- dhcp_siaddr_ip = htonl(btph -> siaddr);
- if (strlen((char *) btph -> sname) && !dhcp_siaddr_ip) {
- strncpy((char *) dhcp_tftp_name, (char *) btph -> sname, sizeof(btph -> sname));
- dhcp_tftp_name[sizeof(btph -> sname)] = 0;
- }
-
- if (strlen((char *) btph -> file)) {
- strncpy((char *) dhcp_filename, (char *) btph -> file, sizeof(btph -> file));
- dhcp_filename[sizeof(btph -> file)] = 0;
- }
-
- // retrieve DHCP-server IP from IP-header
- dhcp_server_ip = iph -> htonl(ip_src);
-
- dhcp_state = DHCP_STATE_SUCCESS;
- }
- else {
- // It is DHCP - RFC 2131 & RFC 2132
- // opt contains parameters from server
- switch (dhcp_state) {
- case DHCP_STATE_SELECT :
- if (opt.msg_type == DHCPOFFER) {
- dhcp_own_ip = htonl(btph -> yiaddr);
- dhcp_server_ip = opt.server_ID;
- dhcp_send_request(fd);
- dhcp_state = DHCP_STATE_REQUEST;
- }
- return 0;
- case DHCP_STATE_REQUEST :
- switch (opt.msg_type) {
- case DHCPNACK :
- dhcp_own_ip = 0;
- dhcp_server_ip = 0;
- dhcp_state = DHCP_STATE_FAULT;
- break;
- case DHCPACK :
- dhcp_own_ip = htonl(btph -> yiaddr);
- dhcp_server_ip = opt.server_ID;
- dhcp_siaddr_ip = htonl(btph -> siaddr);
- if (opt.flag[DHCP_TFTP_SERVER]) {
- strcpy((char *) dhcp_tftp_name, (char *) opt.tftp_server);
- }
- else {
- strcpy((char *) dhcp_tftp_name, "");
- if ((opt.overload != DHCP_OVERLOAD_SNAME &&
- opt.overload != DHCP_OVERLOAD_BOTH) &&
- !dhcp_siaddr_ip) {
- strncpy((char *) dhcp_tftp_name,
- (char *) btph->sname,
- sizeof(btph -> sname));
- dhcp_tftp_name[sizeof(btph->sname)] = 0;
- }
- }
-
- if (opt.flag[DHCP_BOOTFILE]) {
- strcpy((char *) dhcp_filename, (char *) opt.bootfile);
- }
- else {
- strcpy((char *) dhcp_filename, "");
- if (opt.overload != DHCP_OVERLOAD_FILE &&
- opt.overload != DHCP_OVERLOAD_BOTH &&
- strlen((char *) btph -> file)) {
- strncpy((char *) dhcp_filename,
- (char *) btph->file,
- sizeof(btph->file));
- dhcp_filename[sizeof(btph -> file)] = 0;
- }
- }
-
- dhcp_state = DHCP_STATE_SUCCESS;
- break;
- default:
- break; // Unused DHCP-message - do nothing
- }
- break;
- default :
- return -1; // Illegal DHCP-client state
- }
- }
-
- if (dhcp_state == DHCP_STATE_SUCCESS) {
-
- // initialize network entity with real own_ip
- // to be able to answer for foreign requests
- set_ipv4_address(dhcp_own_ip);
-
- if(response_buffer) {
- if(packetsize <= 1720)
- memcpy(response_buffer, packet, packetsize);
- else
- memcpy(response_buffer, packet, 1720);
- }
-
- /* Subnet mask */
- if (opt.flag[DHCP_MASK]) {
- /* Router */
- if (opt.flag[DHCP_ROUTER]) {
- set_ipv4_router(opt.router_IP);
- set_ipv4_netmask(opt.subnet_mask);
- }
- }
-
- /* DNS-server */
- if (opt.flag[DHCP_DNS]) {
- dns_init(opt.dns_IP, 0, 4);
- }
- }
-
- return 0;
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netlib/dhcp.h b/qemu/roms/SLOF/clients/net-snk/app/netlib/dhcp.h
deleted file mode 100644
index 54fb1eed3..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netlib/dhcp.h
+++ /dev/null
@@ -1,54 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#ifndef _DHCP_H_
-#define _DHCP_H_
-
-#include <stdint.h>
-
-#ifdef USE_MTFTP
-#include <netlib/mtftp.h>
-#else
-#include <netlib/tftp.h>
-#endif
-
-/** \struct btphdr
- * A header for BootP/DHCP-messages.
- * For more information see RFC 951 / RFC 2131.
- */
-struct btphdr {
- uint8_t op; /**< Identifies is it request (1) or reply (2) */
- uint8_t htype; /**< HW address type (ethernet usually) */
- uint8_t hlen; /**< HW address length */
- uint8_t hops; /**< This info used by relay agents (not used) */
- uint32_t xid; /**< This ID is used to match queries and replies */
- uint16_t secs; /**< Unused */
- uint16_t unused; /**< Unused */
- uint32_t ciaddr; /**< Client IP address (if client knows it) */
- uint32_t yiaddr; /**< "Your" (client) IP address */
- uint32_t siaddr; /**< Next server IP address (TFTP server IP) */
- uint32_t giaddr; /**< Gateway IP address (used by relay agents) */
- uint8_t chaddr[16]; /**< Client HW address */
- uint8_t sname[64]; /**< Server host name (TFTP server name) */
- uint8_t file[128]; /**< Boot file name */
- uint8_t vend[64]; /**< Optional parameters field (DHCP-options) */
-};
-
-void dhcpv4_generate_transaction_id(void);
-int bootp(char *ret_buffer, filename_ip_t *, unsigned int);
-int dhcpv4(char *ret_buffer, filename_ip_t *);
-void dhcp_send_release(int fd);
-
-/* Handles DHCP-packets, which are detected by receive_ether. */
-extern int8_t handle_dhcp(int fd, uint8_t * packet, int32_t packetsize);
-
-#endif
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netlib/dhcpv6.c b/qemu/roms/SLOF/clients/net-snk/app/netlib/dhcpv6.c
deleted file mode 100644
index d0a22d555..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netlib/dhcpv6.c
+++ /dev/null
@@ -1,212 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2013 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#include <string.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <stdint.h>
-#include <sys/socket.h>
-#include <time.h>
-#include <netlib/ethernet.h>
-#include <netlib/ipv6.h>
-#include <netlib/udp.h>
-#include <netlib/dhcpv6.h>
-#include <netlib/tftp.h>
-#include <netlib/dns.h>
-
-static uint8_t tid[3];
-static uint32_t dhcpv6_state = -1;
-static filename_ip_t *my_fn_ip;
-
-static struct ip6addr_list_entry all_dhcpv6_ll; /* All DHCPv6 servers address */
-
-void
-dhcpv6_generate_transaction_id(void)
-{
- /* As per RFC 3315 transaction IDs should be generated randomly */
- tid[0] = rand();
- tid[1] = rand();
- tid[2] = rand();
-}
-
-static void
-send_info_request(int fd)
-{
- uint8_t ether_packet[ETH_MTU_SIZE];
- uint32_t payload_length;
- struct dhcp_message_header *dhcph;
-
- memset(ether_packet, 0, ETH_MTU_SIZE);
-
- /* Get an IPv6 packet */
- payload_length = sizeof(struct udphdr) + sizeof(struct dhcp_message_header);
- fill_ip6hdr (ether_packet + sizeof(struct ethhdr),
- payload_length, IPTYPE_UDP,
- get_ipv6_address(), &(all_dhcpv6_ll.addr));
- fill_udphdr ( ether_packet + sizeof(struct ethhdr) + sizeof(struct ip6hdr),
- payload_length, DHCP_CLIENT_PORT, DHCP_SERVER_PORT);
- dhcph = (struct dhcp_message_header *) (ether_packet +
- sizeof(struct ethhdr) +
- sizeof(struct ip6hdr) +
- sizeof(struct udphdr));
-
- /* Fill in DHCPv6 data */
- dhcph->type = DHCP_INFORMATION_REQUEST;
- memcpy( &(dhcph->transaction_id), &tid, 3);
- dhcph->option.client_id.code = DHCPV6_OPTION_CLIENTID;
- dhcph->option.client_id.length = 10;
- dhcph->option.client_id.duid_type = DUID_LL;
- dhcph->option.client_id.hardware_type = 1;
- memcpy( &(dhcph->option.client_id.mac),
- get_mac_address(), 6);
- dhcph->option.el_time.code = DHCPV6_OPTION_ELAPSED_TIME;
- dhcph->option.el_time.length = 2;
- dhcph->option.el_time.time = 0x190; /* 4000 ms */
- dhcph->option.option_request_option.code = DHCPV6_OPTION_ORO;
- dhcph->option.option_request_option.length = DHCPV6_OPTREQUEST_NUMOPTS * 2;
- dhcph->option.option_request_option.option_code[0] = DHCPV6_OPTION_DNS_SERVERS;
- dhcph->option.option_request_option.option_code[1] = DHCPV6_OPTION_DOMAIN_LIST;
- dhcph->option.option_request_option.option_code[2] = DHCPV6_OPTION_BOOT_URL;
-
- send_ipv6(fd, ether_packet + sizeof(struct ethhdr),
- sizeof(struct ip6hdr) + sizeof(struct udphdr)
- + sizeof(struct dhcp_message_header));
-}
-
-static int32_t
-dhcpv6_attempt(int fd)
-{
- int sec;
-
- // Send information request
- send_info_request(fd);
-
- dhcpv6_state = DHCPV6_STATE_SELECT;
-
- // setting up a timer with a timeout of two seconds
- for (sec = 0; sec < 2; sec++) {
- set_timer(TICKS_SEC);
- do {
- receive_ether(fd);
-
- // Wait until client will switch to Final state or Timeout occurs
- switch (dhcpv6_state) {
- case DHCP_STATUSCODE_SUCCESS:
- return 1;
- case DHCP_STATUSCODE_UNSPECFAIL: //FIXME
- return 0;
- }
- } while (get_timer() > 0);
- }
-
- // timeout
- return 0;
-}
-
-int32_t
-dhcpv6 ( char *ret_buffer, void *fn_ip)
-{
- int fd;
-
- all_dhcpv6_ll.addr.part.prefix = 0xff02000000000000ULL;
- all_dhcpv6_ll.addr.part.interface_id = 0x10002ULL;
-
- my_fn_ip = (filename_ip_t *) fn_ip;
- fd = my_fn_ip->fd;
-
- if( !dhcpv6_attempt(fd)) {
- return -1;
- }
-
- return 0;
-}
-
-static void dhcp6_process_options (uint8_t *option, int32_t option_length)
-{
- struct dhcp_boot_url *option_boot_url;
- struct client_identifier *option_clientid;
- struct server_identifier *option_serverid;
- struct dhcp_dns *option_dns;
- struct dhcp_dns_list *option_dns_list;
- struct dhcp6_gen_option *option_gen;
- char buffer[256];
-
- while (option_length > 0) {
- switch ((uint16_t) *(option+1)) {
- case DHCPV6_OPTION_CLIENTID:
- option_clientid = (struct client_identifier *) option;
- option = option + option_clientid->length + 4;
- option_length = option_length - option_clientid->length - 4;
- break;
- case DHCPV6_OPTION_SERVERID:
- option_serverid = (struct server_identifier *) option;
- option = option + option_serverid->length + 4;
- option_length = option_length - option_serverid->length - 4;
- break;
- case DHCPV6_OPTION_DNS_SERVERS:
- option_dns = (struct dhcp_dns *) option;
- option = option + option_dns->length + 4;
- option_length = option_length - option_dns->length - 4;
- memcpy( &(my_fn_ip->dns_ip6),
- option_dns->p_ip6,
- IPV6_ADDR_LENGTH);
- dns_init(0, option_dns->p_ip6, 6);
- break;
- case DHCPV6_OPTION_DOMAIN_LIST:
- option_dns_list = (struct dhcp_dns_list *) option;
- option = option + option_dns_list->length + 4;
- option_length = option_length - option_dns_list->length - 4;
- break;
- case DHCPV6_OPTION_BOOT_URL:
- option_boot_url = (struct dhcp_boot_url *) option;
- option = option + option_boot_url->length + 4;
- option_length = option_length - option_boot_url->length - 4;
- strncpy((char *)buffer,
- (const char *)option_boot_url->url,
- (size_t)option_boot_url->length);
- buffer[option_boot_url->length] = 0;
- if (parse_tftp_args(buffer,
- (char *)my_fn_ip->server_ip6.addr,
- (char *)my_fn_ip->filename,
- (int)my_fn_ip->fd,
- option_boot_url->length) == -1)
- return;
- break;
- default:
- option_gen = (struct dhcp6_gen_option *) option;
- option = option + option_gen->length + 4;
- option_length = option_length - option_gen->length - 4;
- }
- }
-}
-
-uint32_t
-handle_dhcpv6(uint8_t * packet, int32_t packetsize)
-{
-
- uint8_t *first_option;
- int32_t option_length;
- struct dhcp_message_reply *reply;
- reply = (struct dhcp_message_reply *) packet;
-
- if (memcmp(reply->transaction_id, tid, 3))
- return -1; /* Wrong transaction ID */
-
- if (reply->type == 7)
- dhcpv6_state = DHCP_STATUSCODE_SUCCESS;
-
- first_option = packet + 4;
- option_length = packet + packetsize - first_option;
- dhcp6_process_options(first_option, option_length);
-
- return 0;
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netlib/dhcpv6.h b/qemu/roms/SLOF/clients/net-snk/app/netlib/dhcpv6.h
deleted file mode 100644
index fb77da648..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netlib/dhcpv6.h
+++ /dev/null
@@ -1,154 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2013 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#ifndef _DHCPV6_H_
-#define _DHCPV6_H_
-
-#include <stdint.h>
-#include <netlib/ethernet.h>
-
-#define DHCPV6_STATELESS 0
-#define DHCPV6_STATEFUL 1
-
-/* DHCP port numbers */
-#define DHCP_CLIENT_PORT 546
-#define DHCP_SERVER_PORT 547
-
-/* DHCPv6 message types */
-#define DHCP_SOLICIT 1
-#define DHCP_ADVERTISE 2
-#define DHCP_REQUEST 3
-#define DHCP_CONFIRM 4
-#define DHCP_RENEW 5
-#define DHCP_REBIND 6
-#define DHCP_REPLY 7
-#define DHCP_RELEASE 8
-#define DHCP_DECLINE 9
-#define DHCP_RECONFIGURE 10
-#define DHCP_INFORMATION_REQUEST 11
-#define RELAY_FORW 12
-#define RELAY_REPL 13
-
-/* DHCPv6 option types */
-#define DHCPV6_OPTION_CLIENTID 0x0001
-#define DHCPV6_OPTION_SERVERID 0x0002
-#define DHCPV6_OPTION_IA_NA 3
-#define DHCPV6_OPTION_IA_TA 4
-#define DHCPV6_OPTION_IAADDR 5
-#define DHCPV6_OPTION_ORO 6
-#define DHCPV6_OPTION_PREFEREN 7
-#define DHCPV6_OPTION_ELAPSED_TIME 8
-#define DHCPV6_OPTION_RELAY_MS 9
-#define DHCPV6_OPTION_AUTH 11
-#define DHCPV6_OPTION_UNICAST 12
-#define DHCPV6_OPTION_STATUS_C 13
-#define DHCPV6_OPTION_RAPID_CO 14
-#define DHCPV6_OPTION_USER_CLA 15
-#define DHCPV6_OPTION_VENDOR_C 16
-#define DHCPV6_OPTION_VENDOR_O 17
-#define DHCPV6_OPTION_INTERFAC 18
-#define DHCPV6_OPTION_RECONF_M 19
-#define DHCPV6_OPTION_RECONF_A 20
-#define DHCPV6_OPTION_DNS_SERVERS 23
-#define DHCPV6_OPTION_DOMAIN_LIST 24
-#define DHCPV6_OPTION_BOOT_URL 59
-
-/* DHCPv6 status codes */
-#define DHCP_STATUSCODE_SUCCESS 0
-#define DHCP_STATUSCODE_UNSPECFAIL 1
-#define DHCP_STATUSCODE_NOADDRAVAIL 2
-#define DHCP_STATUSCODE_NOBINDING 3
-#define DHCP_STATUSCODE_NOTONLINK 4
-#define DHCP_STATUSCODE_USEMULTICAST 5
-#define DHCPV6_STATE_SELECT 6
-
-/* DUID types */
-#define DUID_LLT 1 /* DUID based on Link-layer Address Plus Time */
-#define DUID_EN 2 /* DUID based on Assigned by Vendor Based on Enterprise Number */
-#define DUID_LL 3 /* DUID based on Link-layer Address */
-
-/* Prototypes */
-void dhcpv6_generate_transaction_id(void);
-int32_t dhcpv6 ( char *ret_buffer, void *fn_ip);
-uint32_t handle_dhcpv6(uint8_t * , int32_t);
-
-struct dhcp6_gen_option {
- uint16_t code;
- uint16_t length;
-};
-
-struct client_identifier {
- uint16_t code;
- uint16_t length;
- uint16_t duid_type;
- uint16_t hardware_type;
- uint8_t mac[6];
-};
-
-struct server_identifier {
- uint16_t code;
- uint16_t length;
- uint16_t duid_type;
- uint16_t hardware_type;
- uint32_t time;
- uint8_t mac[6];
-};
-
-#define DHCPV6_OPTREQUEST_NUMOPTS 3
-
-struct dhcp_info_request {
- struct client_identifier client_id;
- struct elapsed_time {
- uint16_t code;
- uint16_t length;
- uint16_t time;
- } el_time;
- struct option_request {
- uint16_t code;
- uint16_t length;
- uint16_t option_code[DHCPV6_OPTREQUEST_NUMOPTS];
- } option_request_option;
-};
-
-struct dhcp_message_header {
- uint8_t type; /* Message type */
- uint8_t transaction_id[3]; /* Transaction id */
- struct dhcp_info_request option;
-};
-
-struct dhcp_dns {
- uint16_t code;
- uint16_t length;
- uint8_t p_ip6[16];
- uint8_t s_ip6[16];
-}__attribute((packed));
-
-struct dhcp_dns_list {
- uint16_t code;
- uint16_t length;
- uint8_t domain[256];
-}__attribute((packed));
-
-struct dhcp_boot_url {
- uint16_t type;
- uint16_t length;
- uint8_t url[256];
-};
-
-struct dhcp_message_reply {
- uint8_t type; /* Message type */
- uint8_t transaction_id[3]; /* Transaction id */
- struct client_identifier client_id;
- struct server_identifier server_id;
-};
-
-#endif
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netlib/dns.c b/qemu/roms/SLOF/clients/net-snk/app/netlib/dns.c
deleted file mode 100644
index a5a36a18e..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netlib/dns.c
+++ /dev/null
@@ -1,527 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-/********************** DEFINITIONS & DECLARATIONS ***********************/
-
-#include <dns.h>
-#include <stdio.h>
-#include <string.h>
-#include <time.h>
-#include <sys/socket.h>
-
-#include <ethernet.h>
-#include <ipv4.h>
-#include <ipv6.h>
-#include <udp.h>
-
-#define DNS_FLAG_MSGTYPE 0xF800 /**< Message type mask (opcode) */
-#define DNS_FLAG_SQUERY 0x0000 /**< Standard query type */
-#define DNS_FLAG_SRESPONSE 0x8000 /**< Standard response type */
-#define DNS_FLAG_RD 0x0100 /**< Recursion desired flag */
-#define DNS_FLAG_RCODE 0x000F /**< Response code mask
- (stores err.cond.) code */
-#define DNS_RCODE_NERROR 0 /**< "No errors" code */
-
-#define DNS_QTYPE_A 1 /**< A 32-bit IP record type */
-#define DNS_QTYPE_AAAA 0x1c /**< 128-bit IPv6 record type */
-#define DNS_QTYPE_CNAME 5 /**< Canonical name record type */
-
-#define DNS_QCLASS_IN 1 /**< Query class for internet msgs */
-
-/** \struct dnshdr
- * A header for DNS-messages (see RFC 1035, paragraph 4.1.1).
- * <p>
- * DNS-message consist of DNS-header and 4 optional sections,
- * arranged in the following order:<ul>
- * <li> DNS-header
- * <li> question section
- * <li> answer section
- * <li> authority section
- * <li> additional section
- * </ul>
- */
-struct dnshdr {
- uint16_t id; /**< an identifier used to match up replies */
- uint16_t flags; /**< contains op_code, err_code, etc. */
- uint16_t qdcount; /**< specifies the number of entries in the
- question section */
- uint16_t ancount; /**< specifies the number of entries in the
- answer section */
- uint16_t nscount; /**< specifies the number of entries in the
- authority section */
- uint16_t arcount; /**< specifies the number of entries in the
- additional section */
-};
-
-
-/***************************** PROTOTYPES ********************************/
-
-static void
-dns_send_query(int fd, int8_t * domain_name, uint8_t ip_version);
-
-static void
-fill_dnshdr(uint8_t * packet, int8_t * domain_name, uint8_t ip_version);
-
-static uint8_t *
-dns_extract_name(uint8_t * dnsh, int8_t * head, int8_t * domain_name);
-
-static int8_t
-urltohost(char * url, char * host_name);
-
-static int8_t
-hosttodomain(char * host_name, char * domain_name);
-
-/**************************** LOCAL VARIABLES ****************************/
-
-static uint8_t ether_packet[ETH_MTU_SIZE];
-static int32_t dns_server_ip = 0;
-static uint8_t dns_server_ipv6[16] = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
-static int32_t dns_result_ip = 0;
-static uint8_t dns_result_ipv6[16] = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};
-static int8_t dns_error = 0; /**< Stores error code or 0 */
-static int8_t dns_domain_name[0x100]; /**< Raw domain name */
-static int8_t dns_domain_cname[0x100]; /**< Canonical domain name */
-
-/**************************** IMPLEMENTATION *****************************/
-
-/**
- * DNS: Initialize the environment for DNS client.
- * To perfrom DNS-queries use the function dns_get_ip.
- *
- * @param device_socket a socket number used to send and receive packets
- * @param server_ip DNS-server IPv4 address (e.g. 127.0.0.1)
- * @return TRUE in case of successful initialization;
- * FALSE in case of fault (e.g. can't obtain MAC).
- * @see dns_get_ip
- */
-int8_t
-dns_init(uint32_t _dns_server_ip, uint8_t _dns_server_ipv6[16], uint8_t ip_version)
-{
- if(ip_version == 6)
- memcpy(dns_server_ipv6, _dns_server_ipv6, 16);
- else
- dns_server_ip = _dns_server_ip;
- return 0;
-}
-
-/**
- * DNS: For given URL retrieves IPv4/IPv6 from DNS-server.
- * <p>
- * URL can be given in one of the following form: <ul>
- * <li> scheme with full path with (without) user and password
- * <br>(e.g. "http://user:pass@www.host.org/url-path");
- * <li> host name with url-path
- * <br>(e.g. "www.host.org/url-path");
- * <li> nothing but host name
- * <br>(e.g. "www.host.org");
- * </ul>
- *
- * @param fd socket descriptor
- * @param url the URL to be resolved
- * @param domain_ip In case of SUCCESS stores extracted IP.
- * In case of FAULT stores zeros (0.0.0.0).
- * @return TRUE - IP successfuly retrieved;
- * FALSE - error condition occurs.
- */
-int8_t
-dns_get_ip(int fd, char* url, uint8_t * domain_ip, uint8_t ip_version)
-{
- /* this counter is used so that we abort after 30 DNS request */
- int32_t i;
- /* this buffer stores host name retrieved from url */
- static int8_t host_name[0x100];
-
- (* domain_ip) = 0;
-
- // Retrieve host name from URL
- if (!urltohost(url, (char *) host_name)) {
- printf("\nERROR:\t\t\tBad URL!\n");
- return 0;
- }
-
- // Reformat host name into a series of labels
- if (!hosttodomain((char *) host_name, (char *) dns_domain_name)) {
- printf("\nERROR:\t\t\tBad host name!\n");
- return 0;
- }
-
- // Check if DNS server is presented and accessible
- if (dns_server_ip == 0) {
- printf("\nERROR:\t\t\tCan't resolve domain name "
- "(DNS server is not presented)!\n");
- return 0;
- }
-
- // Use DNS-server to obtain IP
- if (ip_version == 6)
- memset(dns_result_ipv6, 0, 16);
- else
- dns_result_ip = 0;
- dns_error = 0;
- strcpy((char *) dns_domain_cname, "");
-
- for(i = 0; i < 30; ++i) {
- // Use canonical name in case we obtained it
- if (strlen((char *) dns_domain_cname))
- dns_send_query(fd, dns_domain_cname, ip_version);
- else
- dns_send_query(fd, dns_domain_name, ip_version);
-
- // setting up a timer with a timeout of one seconds
- set_timer(TICKS_SEC);
- do {
- receive_ether(fd);
- if (dns_error)
- return 0; // FALSE - error
- if ((dns_result_ip != 0) && (ip_version == 4)) {
- memcpy(domain_ip, &dns_result_ip, 4);
- return 1; // TRUE - success (domain IP retrieved)
- }
- else if ((dns_result_ipv6[0] != 0) && (ip_version == 6)) {
- memcpy(domain_ip, dns_result_ipv6, 16);
- return 1; // TRUE - success (domain IP retrieved)
- }
- } while (get_timer() > 0);
- }
-
- printf("\nGiving up after %d DNS requests\n", i);
- return 0; // FALSE - domain name wasn't retrieved
-}
-
-/**
- * DNS: Handles DNS-messages according to Receive-handle diagram.
- * Sets dns_result_ip for given dns_domain_name (see dns_get_ip)
- * or signals error condition occurs during DNS-resolving process
- * by setting dns_error flag.
- *
- * @param packet DNS-packet to be handled
- * @param packetsize length of the packet
- * @return ZERO - packet handled successfully;
- * NON ZERO - packet was not handled (e.g. bad format)
- * @see dns_get_ip
- * @see receive_ether
- * @see dnshdr
- */
-int32_t
-handle_dns(uint8_t * packet, int32_t packetsize)
-{
- struct dnshdr * dnsh = (struct dnshdr *) packet;
- uint8_t * resp_section = packet + sizeof(struct dnshdr);
- /* This string stores domain name from DNS-packets */
- static int8_t handle_domain_name[0x100];
- int i;
-
- // verify ID - is it response for our query?
- if (dnsh -> id != htons(0x1234))
- return 0;
-
- // Is it DNS response?
- if ((dnsh -> flags & htons(DNS_FLAG_MSGTYPE)) != htons(DNS_FLAG_SRESPONSE))
- return 0;
-
- // Is error condition occurs? (check error field in incoming packet)
- if ((dnsh -> flags & htons(DNS_FLAG_RCODE)) != DNS_RCODE_NERROR) {
- dns_error = 1;
- return 0;
- }
-
- /* Pass all (qdcount) records in question section */
-
- for (i = 0; i < htons(dnsh -> qdcount); i++) {
- // pass QNAME
- resp_section = dns_extract_name((uint8_t *) dnsh, (int8_t *) resp_section,
- handle_domain_name);
- if (resp_section == NULL) {
- return -1; // incorrect domain name (bad packet)
- }
- // pass QTYPE & QCLASS
- resp_section += 4;
- }
-
- /* Handle all (ancount) records in answer section */
-
- for (i = 0; i < htons(dnsh -> ancount); i++) {
- // retrieve domain name from the packet
- resp_section = dns_extract_name((uint8_t *) dnsh, (int8_t *) resp_section,
- handle_domain_name);
-
- if (resp_section == NULL) {
- return -1; // incorrect domain name (bad packet)
- }
-
- // Check the class of the query (should be IN for Internet)
- if (* (uint16_t *) (resp_section + 2) == htons(DNS_QCLASS_IN)) {
- // check if retrieved name fit raw or canonical domain name
- if (!strcmp((char *) handle_domain_name, (char *) dns_domain_name) ||
- !strcmp((char *) handle_domain_name, (char *) dns_domain_cname)) {
- switch (htons(* (uint16_t *) resp_section)) {
-
- case DNS_QTYPE_A :
- // rdata contains IP
- dns_result_ip = htonl(* (uint32_t *) (resp_section + 10));
- return 0; // IP successfully obtained
-
- case DNS_QTYPE_CNAME :
- // rdata contains canonical name, store it for further requests
- if (dns_extract_name((uint8_t *) dnsh, (int8_t *) resp_section + 10,
- dns_domain_cname) == NULL) {
- // incorrect domain name (bad packet)
- return -1;
- }
- break;
- case DNS_QTYPE_AAAA :
- memcpy(dns_result_ipv6, (resp_section + 10), 16);
- return 0; // IP successfully obtained
- break;
- }
- }
- // continue with next record in answer section
- resp_section += htons(* (uint16_t *) (resp_section + 8)) + 10;
- }
- }
- return 0; // Packet successfully handled but IP wasn't obtained
-}
-
-/**
- * DNS: Sends a standard DNS-query (read request package) to a DNS-server.
- * DNS-server respones with host IP or signals some error condition.
- * Responses from the server are handled by handle_dns function.
- *
- * @param fd socket descriptor
- * @param domain_name the domain name given as series of labels preceded
- * with length(label) and terminated with 0
- * <br>(e.g. "\3,w,w,w,\4,h,o,s,t,\3,o,r,g,\0")
- * @see handle_dns
- */
-static void
-dns_send_query(int fd, int8_t * domain_name, uint8_t ip_version)
-{
- int qry_len = strlen((char *) domain_name) + 5;
- int iphdr_len = (ip_version == 4) ? sizeof(struct iphdr) : sizeof(struct ip6hdr);
- ip6_addr_t server_ipv6;
-
- uint32_t packetsize = iphdr_len +
- sizeof(struct udphdr) + sizeof(struct dnshdr) +
- qry_len;
-
- memset(ether_packet, 0, packetsize);
- fill_dnshdr(&ether_packet[
- iphdr_len + sizeof(struct udphdr)],
- domain_name,
- ip_version);
- fill_udphdr(&ether_packet[iphdr_len],
- sizeof(struct dnshdr) +
- sizeof(struct udphdr) + qry_len,
- UDPPORT_DNSC, UDPPORT_DNSS);
- if (ip_version == 4) {
- fill_iphdr(ether_packet,
- sizeof(struct dnshdr) + sizeof(struct udphdr) +
- iphdr_len + qry_len,
- IPTYPE_UDP, 0, dns_server_ip);
- } else {
- memcpy(server_ipv6.addr, dns_server_ipv6, 16);
- fill_ip6hdr(ether_packet,
- sizeof(struct dnshdr) + sizeof(struct udphdr) + qry_len,
- IPTYPE_UDP, get_ipv6_address(),
- &server_ipv6);
- }
-
- send_ip(fd, ether_packet, packetsize);
-}
-
-/**
- * DNS: Creates standard DNS-query package. Places DNS-header
- * and question section in a packet and fills it with
- * corresponding information.
- * <p>
- * Use this function with similar functions for other network layers
- * (fill_udphdr, fill_iphdr, fill_ethhdr).
- *
- * @param packet Points to the place where ARP-header must be placed.
- * @param domain_name the domain name given as series of labels preceded
- * with length(label) and terminated with 0
- * <br>(e.g. "\3,w,w,w,\4,h,o,s,t,\3,o,r,g,\0")
- * @see fill_udphdr
- * @see fill_iphdr
- * @see fill_ethhdr
- */
-static void
-fill_dnshdr(uint8_t * packet, int8_t * domain_name, uint8_t ip_version)
-{
- struct dnshdr * dnsh = (struct dnshdr *) packet;
- uint8_t * qry_section = packet + sizeof(struct dnshdr);
-
- dnsh -> id = htons(0x1234);
- dnsh -> flags = htons(DNS_FLAG_SQUERY) | htons(DNS_FLAG_RD);
- dnsh -> qdcount = htons(1);
-
- strcpy((char *) qry_section, (char *) domain_name);
- qry_section += strlen((char *) domain_name) + 1;
-
- // fill QTYPE (ask for IP)
- if (ip_version == 4)
- * (uint16_t *) qry_section = htons(DNS_QTYPE_A);
- else
- * (uint16_t *) qry_section = htons(DNS_QTYPE_AAAA);
- qry_section += 2;
- // fill QCLASS (IN is a standard class for Internet)
- * (uint16_t *) qry_section = htons(DNS_QCLASS_IN);
-}
-
-/**
- * DNS: Extracts domain name from the question or answer section of
- * the DNS-message. This function is need to support message
- * compression requirement (see RFC 1035, paragraph 4.1.4).
- *
- * @param dnsh Points at the DNS-header.
- * @param head Points at the beginning of the domain_name
- * which has to be extracted.
- * @param domain_name In case of SUCCESS this string stores extracted name.
- * In case of FAULT this string is empty.
- * @return NULL in case of FAULT (domain name > 255 octets);
- * otherwise pointer to the data following the name.
- * @see dnshdr
- */
-static uint8_t *
-dns_extract_name(uint8_t * dnsh, int8_t * head, int8_t * domain_name)
-{
- int8_t * tail = domain_name;
- int8_t * ptr = head;
- int8_t * next_section = NULL;
-
- while (1) {
- if ((ptr[0] & 0xC0) == 0xC0) {
- // message compressed (reference is used)
- next_section = ptr + 2;
- ptr = (int8_t *) dnsh + (htons(* (uint16_t *) ptr) & 0x3FFF);
- continue;
- }
- if (ptr[0] == 0) {
- // message termination
- tail[0] = 0;
- ptr += 1;
- break;
- }
- // maximum length for domain name is 255 octets w/o termination sym
- if (tail - domain_name + ptr[0] + 1 > 255) {
- strcpy((char *) domain_name, "");
- return NULL;
- }
- memcpy(tail, ptr, ptr[0] + 1);
- tail += ptr[0] + 1;
- ptr += ptr[0] + 1;
- }
-
- if (next_section == NULL)
- next_section = ptr;
-
- return (uint8_t *) next_section;
-}
-
-/**
- * DNS: Parses URL and returns host name.
- * Input string can be given as: <ul>
- * <li> scheme with full path with (without) user and password
- * <br>(e.g. "http://user:pass@www.host.org/url-path");
- * <li> host name with url-path
- * <br>(e.g. "www.host.org/url-path");
- * <li> nothing but host name
- * <br>(e.g. "www.host.org");
- * </ul>
- *
- * @param url string that stores incoming URL
- * @param host_name In case of SUCCESS this string stores the host name,
- * In case of FAULT this string is empty.
- * @return TRUE - host name retrieved,
- * FALSE - host name > 255 octets or empty.
- */
-static int8_t
-urltohost(char * url, char * host_name)
-{
- uint16_t length1;
- uint16_t length2;
-
- strcpy(host_name, "");
-
- if (strstr(url, "://") != NULL)
- url = strstr(url, "//") + 2; // URL
-
- if (strstr(url, "@") != NULL) // truncate user & password
- url = strstr(url, "@") + 1;
-
- if (strstr(url, "/") != NULL) // truncate url path
- length1 = strstr(url, "/") - url;
- else
- length1 = strlen(url);
-
- if (strstr(url, ":") != NULL) // truncate port path
- length2 = strstr(url, ":") - url;
- else
- length2 = strlen(url);
-
- if(length1 > length2)
- length1 = length2;
-
- if (length1 == 0)
- return 0; // string is empty
- if(length1 >= 256)
- return 0; // host name is too big
-
- strncpy(host_name, url, length1);
- host_name[length1] = 0;
-
- return 1; // Host name is retrieved
-}
-
-/**
- * DNS: Transforms host name string into a series of labels
- * each of them preceded with length(label). 0 is a terminator.
- * "www.domain.dom" -> "\3,w,w,w,\6,d,o,m,a,i,n,\3,c,o,m,\0"
- * <p>
- * This format is used in DNS-messages.
- *
- * @param host_name incoming string with the host name
- * @param domain_name resulting string with series of labels
- * or empty string in case of FAULT
- * @return TRUE - host name transformed,
- * FALSE - host name > 255 octets or label > 63 octets.
- */
-static int8_t
-hosttodomain(char * host_name, char * domain_name)
-{
- char * domain_iter = domain_name;
- char * host_iter = host_name;
-
- strcpy(domain_name, "");
-
- if(strlen(host_name) > 255)
- return 0; // invalid host name (refer to RFC 1035)
-
- for(; 1; ++host_iter) {
- if(*host_iter != '.' && *host_iter != 0)
- continue;
- *domain_iter = host_iter - host_name;
- if (*domain_iter > 63) {
- strcpy(domain_name, "");
- return 0; // invalid host name (refer to RFC 1035)
- }
- ++domain_iter;
- strncpy(domain_iter, host_name, host_iter - host_name);
- domain_iter += (host_iter - host_name);
- if(*host_iter == 0) {
- *domain_iter = 0;
- break;
- }
- host_name = host_iter + 1;
- }
- return 1; // ok
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netlib/dns.h b/qemu/roms/SLOF/clients/net-snk/app/netlib/dns.h
deleted file mode 100644
index b8756afca..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netlib/dns.h
+++ /dev/null
@@ -1,28 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-
-#ifndef _DNS_H_
-#define _DNS_H_
-
-#include <stdint.h>
-
-/* Initialize the environment for DNS client. */
-extern int8_t dns_init(uint32_t _dns_server_ip, uint8_t _dns_server_ipv6[16], uint8_t ip_version);
-
-/* For given URL retrieves IPv4 from DNS-server. */
-extern int8_t dns_get_ip(int fd, char * url, uint8_t * domain_ip, uint8_t ip_version);
-
-/* Handles DNS-packets, which are detected by receive_ether. */
-extern int32_t handle_dns(uint8_t * packet, int32_t packetsize);
-
-#endif
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netlib/ethernet.c b/qemu/roms/SLOF/clients/net-snk/app/netlib/ethernet.c
deleted file mode 100644
index 1e03a0bf3..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netlib/ethernet.c
+++ /dev/null
@@ -1,189 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-
-/******************************* ALGORITHMS ******************************/
-
-/** \file netbase.c <pre>
- * *********************** Receive-handle diagram *************************
- *
- * Note: Every layer calls out required upper layer
- *
- * lower
- * | MAC/LLC Receive packet (receive_ether)
- * | |
- * | NETWORK +-----------+---------+
- * | | |
- * | IPv4 (handle_ipv4) IPv6 (handle_ipv4)
- * | ARP (handle_arp) ICMP & NDP
- * | ICMP |
- * | | |
- * | +---------+---------+
- * | |
- * | TRANSPORT +---------+---------+
- * | | |
- * | TCP (handle_tcp) UDP (handle_udp)
- * | |
- * | APPLICATION +----------------+-----------+
- * V | |
- * upper DNS (handle_dns) BootP / DHCP (handle_bootp_client)
- *
- * ************************************************************************
- * </pre> */
-
-
-/************************ DEFINITIONS & DECLARATIONS *********************/
-
-#include <ethernet.h>
-#include <string.h>
-#include <sys/socket.h>
-#include <ipv4.h>
-#include <ipv6.h>
-
-
-/****************************** LOCAL VARIABLES **************************/
-
-static uint8_t ether_packet[ETH_MTU_SIZE];
-static uint8_t own_mac[6] = {0, 0, 0, 0, 0, 0};
-static uint8_t multicast_mac[] = {0x01, 0x00, 0x5E};
-static const uint8_t broadcast_mac[] = {0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF};
-
-/****************************** IMPLEMENTATION ***************************/
-
-/**
- * Ethernet: Set the own MAC address to initializes ethernet layer.
- *
- * @param own_mac own hardware-address (MAC)
- */
-void set_mac_address(const uint8_t * _own_mac)
-{
- if (_own_mac)
- memcpy(own_mac, _own_mac, 6);
- else
- memset(own_mac, 0, 6);
-}
-
-/**
- * Ethernet: Set the own MAC address to initializes ethernet layer.
- *
- * @return own hardware-address (MAC)
- */
-const uint8_t *get_mac_address(void)
-{
- return own_mac;
-}
-
-/**
- * Ethernet: Check if given multicast address is a multicast MAC address
- * starting with 0x3333
- *
- * @return true or false
- */
-static uint8_t is_multicast_mac(uint8_t * mac)
-{
-
- uint16_t mc = 0x3333;
- if (memcmp(mac, &mc, 2) == 0)
- return 1;
-
- return 0;
-}
-
-/**
- * Ethernet: Receives an ethernet-packet and handles it according to
- * Receive-handle diagram.
- *
- * @param fd socket fd
- * @return ZERO - packet was handled or no packets received;
- * NON ZERO - error condition occurs.
- */
-int32_t receive_ether(int fd)
-{
- int32_t bytes_received;
- struct ethhdr * ethh;
-
- memset(ether_packet, 0, ETH_MTU_SIZE);
- bytes_received = recv(fd, ether_packet, ETH_MTU_SIZE, 0);
-
- if (!bytes_received) // No messages
- return 0;
-
- if (bytes_received < 0)
- return -1; /* recv() failed */
-
- if ((size_t) bytes_received < sizeof(struct ethhdr))
- return -1; // packet is too small
-
- ethh = (struct ethhdr *) ether_packet;
-
- if(memcmp(ethh->dest_mac, broadcast_mac, 6) != 0
- && memcmp(ethh->dest_mac, multicast_mac, 3) != 0
- && memcmp(ethh->dest_mac, own_mac, 6 ) != 0
- && !is_multicast_mac(ethh->dest_mac))
- return -1; // packet is too small
-
- switch (htons(ethh -> type)) {
- case ETHERTYPE_IP:
- return handle_ipv4(fd, (uint8_t*) (ethh + 1),
- bytes_received - sizeof(struct ethhdr));
-
- case ETHERTYPE_IPv6:
- return handle_ipv6(fd, ether_packet + sizeof(struct ethhdr),
- bytes_received - sizeof(struct ethhdr));
-
- case ETHERTYPE_ARP:
- return handle_arp(fd, (uint8_t*) (ethh + 1),
- bytes_received - sizeof(struct ethhdr));
- default:
- break;
- }
- return -1; // unknown protocol
-}
-
-/**
- * Ethernet: Sends an ethernet frame via the initialized file descriptor.
- *
- * @return number of transmitted bytes
- */
-int
-send_ether(int fd, void* buffer, int len)
-{
- return send(fd, buffer, len, 0);
-}
-
-/**
- * Ethernet: Creates Ethernet-packet. Places Ethernet-header in a packet and
- * fills it with corresponding information.
- * <p>
- * Use this function with similar functions for other network layers
- * (fill_arphdr, fill_iphdr, fill_udphdr, fill_dnshdr, fill_btphdr).
- *
- * @param packet Points to the place where eth-header must be placed.
- * @param eth_type Type of the next level protocol (e.g. IP or ARP).
- * @param src_mac Sender MAC address
- * @param dest_mac Receiver MAC address
- * @see ethhdr
- * @see fill_arphdr
- * @see fill_iphdr
- * @see fill_udphdr
- * @see fill_dnshdr
- * @see fill_btphdr
- */
-void fill_ethhdr(uint8_t * packet, uint16_t eth_type,
- const uint8_t * src_mac, const uint8_t * dest_mac)
-{
- struct ethhdr * ethh = (struct ethhdr *) packet;
-
- ethh -> type = htons(eth_type);
- memcpy(ethh -> src_mac, src_mac, 6);
- memcpy(ethh -> dest_mac, dest_mac, 6);
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netlib/ethernet.h b/qemu/roms/SLOF/clients/net-snk/app/netlib/ethernet.h
deleted file mode 100644
index e541c8f8e..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netlib/ethernet.h
+++ /dev/null
@@ -1,47 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#ifndef _ETHERNET_H
-#define _ETHERNET_H
-
-#include <stdint.h>
-
-#define ETH_MTU_SIZE 1518 /**< Maximum Transfer Unit */
-#define ETH_ALEN 6 /**< HW address length */
-#define ETHERTYPE_IP 0x0800
-#define ETHERTYPE_IPv6 0x86DD
-#define ETHERTYPE_ARP 0x0806
-
-/** \struct ethhdr
- * A header for Ethernet-packets.
- */
-struct ethhdr {
- uint8_t dest_mac[ETH_ALEN]; /**< Destination HW address */
- uint8_t src_mac[ETH_ALEN]; /**< Source HW address */
- uint16_t type; /**< Next level protocol type */
-};
-
-/* Initializes ethernet layer */
-extern void set_mac_address(const uint8_t * own_mac);
-extern const uint8_t * get_mac_address(void);
-
-/* Receives and handles packets, according to Receive-handle diagram */
-extern int32_t receive_ether(int fd);
-
-/* Sends an ethernet frame. */
-extern int send_ether(int fd, void* buffer, int len);
-
-/* fills ethernet header */
-extern void fill_ethhdr(uint8_t * packet, uint16_t eth_type,
- const uint8_t * src_mac, const uint8_t * dest_mac);
-
-#endif
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netlib/icmpv6.c b/qemu/roms/SLOF/clients/net-snk/app/netlib/icmpv6.c
deleted file mode 100644
index c104f7015..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netlib/icmpv6.c
+++ /dev/null
@@ -1,390 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2013 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#include <stdint.h>
-#include <stdlib.h>
-#include <stdio.h>
-#include <string.h>
-#include <sys/socket.h>
-#include <netlib/ethernet.h>
-#include <netlib/ipv6.h>
-#include <netlib/icmpv6.h>
-#include <netlib/ndp.h>
-#include <netlib/dhcpv6.h>
-
-static int ra_received = 0;
-
-/**
- * NET:
- * @param fd socket fd
- */
-void
-send_router_solicitation (int fd)
-{
- ip6_addr_t dest_addr;
- uint8_t ether_packet[ETH_MTU_SIZE];
- struct packeth headers;
-
- headers.ip6h = (struct ip6hdr *) (ether_packet + sizeof(struct ethhdr));
- headers.icmp6h = (struct icmp6hdr *) (ether_packet +
- sizeof(struct ethhdr) +
- sizeof(struct ip6hdr));
-
- /* Destination is "All routers multicast address" (link-local) */
- dest_addr.part.prefix = 0xff02000000000000ULL;
- dest_addr.part.interface_id = 2;
-
- /* Fill IPv6 header */
- fill_ip6hdr (ether_packet + sizeof(struct ethhdr),
- ICMPv6_HEADER_SIZE + sizeof(struct router_solicitation),
- 0x3a, //ICMPV6
- get_ipv6_address(), &dest_addr);
-
- /* Fill ICMPv6 message */
- headers.icmp6h->type = ICMPV6_ROUTER_SOLICITATION;
- headers.icmp6h->code = 0;
- headers.icmp6h->icmp6body.router_solicit.lladdr.type = 1;
- headers.icmp6h->icmp6body.router_solicit.lladdr.length = 1;
- memcpy( &(headers.icmp6h->icmp6body.router_solicit.lladdr.mac),
- get_mac_address(), 6);
-
- send_ip (fd, headers.ip6h, sizeof(struct ip6hdr) +
- ICMPv6_HEADER_SIZE + sizeof(struct router_solicitation));
-}
-
-/**
- * NET: Process prefix option in Router Advertisements
- *
- * @param ip6_packet pointer to an IPv6 packet
- */
-static void
-handle_prefixoption (uint8_t *option)
-{
- ip6_addr_t prefix;
- struct ip6addr_list_entry *new_address;
- struct option_prefix *prefix_option;
- struct prefix_info *prfx_info;
-
- prefix_option = (struct option_prefix *) option;
- memcpy( &(prefix.addr), &(prefix_option->prefix.addr), IPV6_ADDR_LENGTH);
-
- /* Link-local adresses in RAs are nonsense */
- if (ip6_is_linklocal(&prefix))
- return;
-
- if (prefix_option->preferred_lifetime > prefix_option->valid_lifetime)
- return;
-
- /* Add address created from prefix to IPv6 address list */
- new_address = ip6_prefix2addr (prefix);
- if (!new_address)
- return;
-
- /* Process only prefixes we don't already have an adress from */
- if (!unknown_prefix (&new_address->addr)) {
- return;
- }
-
- /* Fill struct prefix_info from data in RA and store it in new_address */
- prfx_info = ip6_create_prefix_info();
- if (!prfx_info)
- return;
- memcpy (&(new_address->prfx_info), prfx_info, sizeof(struct prefix_info));
-
- /* Add prefix received in RA to list of known prefixes */
- ip6addr_add (new_address);
-}
-
-/**
- * NET: Process source link layer addresses in Router Advertisements
- *
- * @param ip6_packet pointer to an IPv6 packet
- */
-static void
-handle_source_lladdr ( struct option_ll_address *option, struct router *rtr)
-{
- memcpy (&(rtr->mac), &(option->mac), 6);
-}
-
-/**
- * NET: Process ICMPv6 options in Router Advertisements
- *
- * @param ip6_packet pointer to an IPv6 packet
- */
-static void
-process_ra_options (uint8_t *option, int32_t option_length, struct router *r)
-{
- while (option_length > 0) {
- switch (*option) {
- case ND_OPTION_SOURCE_LL_ADDR:
- handle_source_lladdr ((struct option_ll_address *) option, r);
- break;
- case ND_OPTION_PREFIX_INFO:
- handle_prefixoption(option);
- break;
- default:
- break;
- }
- //option+1 is the length field. length is in units of 8 bytes
- option_length = option_length - (*(option+1) * 8);
- option = option + (*(option+1) * 8);
- }
-
- return;
-}
-
-/**
- * NET: Process Router Advertisements
- *
- * @param ip6_packet pointer to an IPv6 packet
- */
-static void
-handle_ra (struct icmp6hdr *icmp6h, uint8_t *ip6_packet)
-{
- uint8_t *first_option;
- int32_t option_length;
- struct ip6hdr *ip6h;
- struct router_advertisement *ra;
- struct router *rtr;
- ip6_addr_t *rtr_ip;
- uint8_t rtr_mac[] = {0, 0, 0, 0, 0, 0};
-
- ip6h = (struct ip6hdr *) ip6_packet;
- ra = (struct router_advertisement *) &icmp6h->icmp6body.ra;
- rtr_ip = (ip6_addr_t *) &ip6h->src;
-
- rtr = find_router (&(ip6h->src));
- if (!rtr) {
- rtr = router_create (rtr_mac, rtr_ip);
- router_add (rtr);
- }
-
- /* store info from router advertisement in router struct */
- rtr->lifetime = ra->router_lifetime;
- rtr->reachable_time = ra->reachable_time;
- rtr->retrans_timer = ra->retrans_timer;
-
- /* save flags concerning address (auto-) configuration */
- ip6_state.managed_mode = ra->flags.managed;
- ip6_state.other_config = ra->flags.other;
-
- /* Process ICMPv6 options in Router Advertisement */
- first_option = (uint8_t *) icmp6h + ICMPv6_HEADER_SIZE + 12;
- option_length = (uint8_t *) icmp6h + ip6h->pl - first_option;
- process_ra_options( (uint8_t *) first_option, option_length, rtr);
-
- ra_received = 1;
-}
-
-int is_ra_received(void)
-{
- return ra_received;
-}
-
-/**
- * NET:
- *
- * @param fd socket fd
- * @param ip6_addr_t *dest_ip6
- */
-void
-send_neighbour_solicitation (int fd, ip6_addr_t *dest_ip6)
-{
- ip6_addr_t snma;
-
- uint8_t ether_packet[ETH_MTU_SIZE];
- struct packeth headers;
-
- memset(ether_packet, 0, ETH_MTU_SIZE);
- headers.ethh = (struct ethhdr *) ether_packet;
- headers.ip6h = (struct ip6hdr *) (ether_packet + sizeof(struct ethhdr));
- headers.icmp6h = (struct icmp6hdr *) (ether_packet +
- sizeof(struct ethhdr) +
- sizeof(struct ip6hdr));
-
- /* Fill IPv6 header */
- snma.part.prefix = IPV6_SOLIC_NODE_PREFIX;
- snma.part.interface_id = IPV6_SOLIC_NODE_IFACE_ID;
- snma.addr[13] = dest_ip6->addr[13];
- snma.addr[14] = dest_ip6->addr[14];
- snma.addr[15] = dest_ip6->addr[15];
- fill_ip6hdr((uint8_t *) headers.ip6h,
- ICMPv6_HEADER_SIZE +
- sizeof(struct neighbour_solicitation),
- 0x3a, //ICMPv6
- get_ipv6_address(), &snma);
-
- /* Fill ICMPv6 message */
- headers.icmp6h->type = ICMPV6_NEIGHBOUR_SOLICITATION;
- headers.icmp6h->code = 0;
- memcpy( &(headers.icmp6h->icmp6body.nghb_solicit.target),
- dest_ip6, IPV6_ADDR_LENGTH );
- headers.icmp6h->icmp6body.nghb_solicit.lladdr.type = 1;
- headers.icmp6h->icmp6body.nghb_solicit.lladdr.length = 1;
- memcpy( &(headers.icmp6h->icmp6body.nghb_solicit.lladdr.mac),
- get_mac_address(), 6);
-
- send_ip (fd, ether_packet + sizeof(struct ethhdr),
- sizeof(struct ip6hdr) + ICMPv6_HEADER_SIZE +
- sizeof(struct neighbour_solicitation));
-}
-
-/**
- * NET:
- *
- * @param fd socket fd
- * @param ip6_packet pointer to an IPv6 packet
- * @param icmp6hdr pointer to the icmp6 header in ip6_packet
- * @param na_flags Neighbour advertisment flags
- */
-static void
-send_neighbour_advertisement (int fd, struct neighbor *target)
-{
- struct na_flags na_adv_flags;
- uint8_t ether_packet[ETH_MTU_SIZE];
- struct packeth headers;
-
-
- headers.ip6h = (struct ip6hdr *) (ether_packet + sizeof(struct ethhdr));
- headers.icmp6h = (struct icmp6hdr *) (ether_packet +
- sizeof(struct ethhdr) +
- sizeof(struct ip6hdr));
-
- /* Fill IPv6 header */
- fill_ip6hdr(ether_packet + sizeof(struct ethhdr),
- ICMPv6_HEADER_SIZE +
- sizeof(struct neighbour_advertisement),
- 0x3a, //ICMPv6
- get_ipv6_address(), (ip6_addr_t *) &(target->ip.addr));
-
- /* Fill ICMPv6 message */
- memcpy( &(headers.icmp6h->icmp6body.nghb_adv.target),
- &(target->ip.addr), IPV6_ADDR_LENGTH );
- headers.icmp6h->icmp6body.nghb_adv.lladdr.type = 1;
- headers.icmp6h->icmp6body.nghb_adv.lladdr.length = 1;
- memcpy( &(headers.icmp6h->icmp6body.nghb_adv.lladdr.mac),
- get_mac_address(), 6);
-
- na_adv_flags.is_router = 0;
- na_adv_flags.na_is_solicited = 1;
- na_adv_flags.override = 1;
-
- headers.icmp6h->type = ICMPV6_NEIGHBOUR_ADVERTISEMENT;
- headers.icmp6h->code = 0;
- headers.icmp6h->icmp6body.nghb_adv.router = na_adv_flags.is_router;
-
- headers.icmp6h->icmp6body.nghb_adv.solicited = na_adv_flags.na_is_solicited;
- headers.icmp6h->icmp6body.nghb_adv.override = na_adv_flags.override;
- headers.icmp6h->icmp6body.nghb_adv.lladdr.type = 2;
- headers.icmp6h->icmp6body.nghb_adv.lladdr.length = 1;
-
- memset( &(headers.icmp6h->icmp6body.nghb_adv.target), 0,
- IPV6_ADDR_LENGTH );
-
- if( na_adv_flags.na_is_solicited ) {
- memcpy( &(headers.icmp6h->icmp6body.nghb_adv.target),
- get_ipv6_address(), IPV6_ADDR_LENGTH);
- }
-
- memcpy( &(headers.icmp6h->icmp6body.nghb_adv.lladdr.mac),
- get_mac_address(), 6);
-
- send_ip (fd, ether_packet + sizeof(struct ethhdr),
- sizeof(struct ip6hdr) + ICMPv6_HEADER_SIZE +
- sizeof(struct neighbour_advertisement));
-}
-
-/**
- * NET:
- *
- * @param fd socket fd
- * @param ip6_packet pointer to an IPv6 packet
- */
-static int8_t
-handle_na (int fd, uint8_t *packet)
-{
- struct neighbor *n = NULL;
- struct packeth headers;
- ip6_addr_t ip;
-
- headers.ethh = (struct ethhdr *) packet;
- headers.ip6h = (struct ip6hdr *) ((unsigned char *) headers.ethh +
- sizeof(struct ethhdr));
- headers.icmp6h = (struct icmp6hdr *) (packet +
- sizeof(struct ethhdr) +
- sizeof(struct ip6hdr));
-
- memcpy(&(ip.addr), &(headers.ip6h->src), IPV6_ADDR_LENGTH);
-
- n = find_neighbor (&ip);
-
- if (!n) {
- n= (struct neighbor *)
- neighbor_create( packet, &headers );
- if (!n)
- return 0;
- if (!neighbor_add(n))
- return 0;
- } else {
- memcpy (&(n->mac), &(headers.ethh->src_mac[0]), 6);
-
- if (n->eth_len > 0) {
- struct ethhdr * ethh = (struct ethhdr *) &(n->eth_frame);
- memcpy(ethh->dest_mac, &(n->mac), 6);
- send_ether (fd, &(n->eth_frame), n->eth_len + sizeof(struct ethhdr));
- n->eth_len = 0;
- }
- }
-
- return 1;
-}
-
-/**
- * NET: Handles ICMPv6 messages
- *
- * @param fd socket fd
- * @param ip6_packet pointer to an IPv6 packet
- * @param packetsize size of ipv6_packet
- */
-int8_t
-handle_icmpv6 (int fd, struct ethhdr *etherhdr,
- uint8_t *ip6_packet)
-{
-
- struct icmp6hdr *received_icmp6 = NULL;
- struct ip6hdr *received_ip6 = NULL;
- struct neighbor target;
-
- received_ip6 = (struct ip6hdr *) ip6_packet;
- received_icmp6 = (struct icmp6hdr *) (ip6_packet +
- sizeof(struct ip6hdr));
- memcpy( &(target.ip.addr), &(received_ip6->src),
- IPV6_ADDR_LENGTH );
- memcpy( &(target.mac), etherhdr->src_mac, 6);
-
- /* process ICMPv6 types */
- switch(received_icmp6->type) {
- case ICMPV6_NEIGHBOUR_SOLICITATION:
- send_neighbour_advertisement(fd, &target);
- break;
- case ICMPV6_NEIGHBOUR_ADVERTISEMENT:
- handle_na(fd, (uint8_t *) ip6_packet - sizeof(struct ethhdr));
- break;
- case ICMPV6_ROUTER_ADVERTISEMENT:
- handle_ra(received_icmp6, (uint8_t *) received_ip6);
- break;
- default:
- return -1;
- }
-
- return 1;
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netlib/icmpv6.h b/qemu/roms/SLOF/clients/net-snk/app/netlib/icmpv6.h
deleted file mode 100644
index 32797973d..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netlib/icmpv6.h
+++ /dev/null
@@ -1,135 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2013 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#ifndef _ICMPV6_H_
-#define _ICMPV6_H_
-
-#include <stdint.h>
-#include <netlib/ethernet.h>
-#include <netlib/ipv6.h>
-
-#define __ICMPV6_DEBUG__
-
-#ifdef __ICMPV6_DEBUG__
-#define ICMPV6_DEBUG_PRINT(format, ...) printf(format, ## __VA_ARGS__)
-#else
-#define ICMPV6_DEBUG_PRINT(format, ...)
-#endif
-
-#define ICMPv6_HEADER_SIZE 4 /* Size of common fields */
-#define IPTYPE_ICMPV6 0x3a
-
-/* Error message types */
-#define ICMPV6_DEST_UNREACHABLE 1 /* Destination unreachable */
-#define ICMPV6_PACKET_TOO_BIG 2 /* Packet too big */
-#define ICMPV6_TIME_EXCEEDED 3 /* Time exceeded */
-#define ICMPV6_PARAM_PROBLEM 4 /* Parameter problem */
-
-/* Informational message types */
-#define ICMPV6_ECHO_REQUEST 128 /* Echo request */
-#define ICMPV6_ECHO_REPLY 129 /* Echo reply */
-#define ICMPV6_MCAST_LISTENER_QUERY 130 /* Multicast listener query */
-#define ICMPV6_MCAST_LISTENER_REPORT 131 /* Multicast listener report */
-#define ICMPv6 MCAST_LISTENER_DONE 132 /* Multicast listener done */
-#define ICMPV6_ROUTER_SOLICITATION 133 /* Router solicitation */
-#define ICMPV6_ROUTER_ADVERTISEMENT 134 /* Router advertisement */
-#define ICMPV6_NEIGHBOUR_SOLICITATION 135 /* Neighbor solicitation */
-#define ICMPV6_NEIGHBOUR_ADVERTISEMENT 136 /* Neighbor advertisement */
-#define ICMPV6_REDIRECT_MSG 137 /* Redirect message */
-
-/******** Functions *******************/
-int8_t handle_icmpv6 (int fd, struct ethhdr *etherhdr, uint8_t *ip6_packet);
-void send_neighbour_solicitation(int fd, ip6_addr_t *target_ip6);
-void send_router_solicitation(int fd);
-int is_ra_received(void);
-
-/* Prefix information */
-struct option_prefix {
- uint8_t type;
- uint8_t length;
- uint8_t prefix_length;
- uint8_t onlink:1,
- autom:1,
- not_router:1,
- not_site_prefix:1,
- reserved:4;
- uint32_t valid_lifetime;
- uint32_t preferred_lifetime;
- uint32_t reserved2;
- ip6_addr_t prefix;
-} __attribute((packed));
-
-/* Neighbour advertisement/solicitation flags */
-struct na_flags {
- uint8_t is_router:1, /* sender (we) is a router */
- na_is_solicited:1, /* this NA was solicited (asked for) */
- override:1, /* receiver shall override its cache entries */
- unused:5;
-}__attribute((packed));
-
-/* Source/Target Link-layer address */
-struct option_ll_address{
- uint8_t type;
- uint8_t length;
- uint8_t mac[ETH_ALEN];
-} __attribute((packed));
-
-struct neighbour_solicitation {
- uint32_t router:1,
- solicited:1,
- override:1,
- reserved:29;
- ip6_addr_t target;
- struct option_ll_address lladdr;
-} __attribute((packed));
-
-struct neighbour_advertisement {
- uint32_t router:1,
- solicited:1,
- override:1,
- reserved:29;
- ip6_addr_t target;
- struct option_ll_address lladdr;
-} __attribute((packed));
-
-struct router_solicitation {
- uint32_t reserved;
- struct option_ll_address lladdr;
-} __attribute((packed));
-
-struct router_advertisement {
- uint8_t curr_hop_limit;
- struct raflags {
- uint8_t managed:1,
- other:1,
- reserved:6;
- } flags;
- uint16_t router_lifetime;
- uint32_t reachable_time;
- uint32_t retrans_timer;
- struct option_prefix prefix;
- struct option_ll_address ll_addr;
-} __attribute((packed));
-
-struct icmp6hdr {
- uint8_t type;
- uint8_t code;
- uint16_t checksum;
- union {
- struct neighbour_solicitation nghb_solicit;
- struct neighbour_advertisement nghb_adv;
- struct router_solicitation router_solicit;
- struct router_advertisement ra;
- } icmp6body;
-} __attribute((packed));
-
-#endif
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netlib/ipv4.c b/qemu/roms/SLOF/clients/net-snk/app/netlib/ipv4.c
deleted file mode 100644
index 2b92c77c4..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netlib/ipv4.c
+++ /dev/null
@@ -1,877 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-
-/********************** DEFINITIONS & DECLARATIONS ***********************/
-
-#include <ipv4.h>
-#include <udp.h>
-#include <tcp.h>
-#include <ethernet.h>
-#include <time.h>
-#include <sys/socket.h>
-#include <string.h>
-
-/* ARP Message types */
-#define ARP_REQUEST 1
-#define ARP_REPLY 2
-
-/* ARP talbe size (+1) */
-#define ARP_ENTRIES 10
-
-/* ICMP Message types */
-#define ICMP_ECHO_REPLY 0
-#define ICMP_DST_UNREACHABLE 3
-#define ICMP_SRC_QUENCH 4
-#define ICMP_REDIRECT 5
-#define ICMP_ECHO_REQUEST 8
-#define ICMP_TIME_EXCEEDED 11
-#define ICMP_PARAMETER_PROBLEM 12
-#define ICMP_TIMESTAMP_REQUEST 13
-#define ICMP_TIMESTAMP_REPLY 14
-#define ICMP_INFORMATION_REQUEST 15
-#define ICMP_INFORMATION_REPLY 16
-
-/** \struct arp_entry
- * A entry that describes a mapping between IPv4- and MAC-address.
- */
-typedef struct arp_entry arp_entry_t;
-struct arp_entry {
- uint32_t ipv4_addr;
- uint8_t mac_addr[6];
- uint8_t eth_frame[ETH_MTU_SIZE];
- int eth_len;
- int pkt_pending;
-};
-
-/** \struct icmphdr
- * ICMP packet
- */
-struct icmphdr {
- unsigned char type;
- unsigned char code;
- unsigned short int checksum;
- union {
- /* for type 3 "Destination Unreachable" */
- unsigned int unused;
- /* for type 0 and 8 */
- struct echo {
- unsigned short int id;
- unsigned short int seq;
- } echo;
- } options;
- union {
- /* payload for destination unreachable */
- struct dun {
- unsigned char iphdr[20];
- unsigned char data[64];
- } dun;
- /* payload for echo or echo reply */
- /* maximum size supported is 84 */
- unsigned char data[84];
- } payload;
-};
-
-/****************************** PROTOTYPES *******************************/
-
-static unsigned short checksum(unsigned short *packet, int words);
-
-static void arp_send_request(int fd, uint32_t dest_ip);
-
-static void arp_send_reply(int fd, uint32_t src_ip, uint8_t * src_mac);
-
-static void fill_arphdr(uint8_t * packet, uint8_t opcode,
- const uint8_t * src_mac, uint32_t src_ip,
- const uint8_t * dest_mac, uint32_t dest_ip);
-
-static arp_entry_t *lookup_mac_addr(uint32_t ipv4_addr);
-
-static void fill_udp_checksum(struct iphdr *ipv4_hdr);
-
-static int8_t handle_icmp(int fd, struct iphdr * iph, uint8_t * packet,
- int32_t packetsize);
-
-/****************************** LOCAL VARIABLES **************************/
-
-/* Routing parameters */
-static uint32_t own_ip = 0;
-static uint32_t multicast_ip = 0;
-static uint32_t router_ip = 0;
-static uint32_t subnet_mask = 0;
-
-/* helper variables */
-static uint32_t ping_dst_ip;
-static const uint8_t null_mac_addr[] = {0x00, 0x00, 0x00, 0x00, 0x00, 0x00};
-static const uint8_t broadcast_mac[] = {0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF};
-static uint8_t multicast_mac[] = {0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF};
-
-/* There are only (ARP_ENTRIES-1) effective entries because
- * the entry that is pointed by arp_producer is never used.
- */
-static unsigned int arp_consumer = 0;
-static unsigned int arp_producer = 0;
-static arp_entry_t arp_table[ARP_ENTRIES];
-
-static uint8_t pending_pkt_frame[ETH_MTU_SIZE];
-static int pending_pkt_len;
-
-/* Function pointer send_ip. Points either to send_ipv4() or send_ipv6() */
-int (*send_ip) (int fd, void *, int);
-
-/***************************** IMPLEMENTATION ****************************/
-
-/**
- * IPv4: Initialize the environment for the IPv4 layer.
- */
-static void ipv4_init(void)
-{
- int i;
-
- ping_dst_ip = 0;
-
- // clear ARP table
- arp_consumer = 0;
- arp_producer = 0;
- for(i=0; i<ARP_ENTRIES; ++i) {
- arp_table[i].ipv4_addr = 0;
- memset(arp_table[i].mac_addr, 0, 6);
- arp_table[i].eth_len = 0;
- arp_table[i].pkt_pending = 0;
- }
-
- /* Set IP send function to send_ipv4() */
- send_ip = &send_ipv4;
-}
-
-/**
- * IPv4: Set the own IPv4 address.
- *
- * @param _own_ip client IPv4 address (e.g. 127.0.0.1)
- */
-void set_ipv4_address(uint32_t _own_ip)
-{
- own_ip = _own_ip;
- ipv4_init();
-}
-
-/**
- * IPv4: Get the own IPv4 address.
- *
- * @return client IPv4 address (e.g. 127.0.0.1)
- */
-uint32_t get_ipv4_address(void)
-{
- return own_ip;
-}
-
-/**
- * IPv4: Set the IPv4 multicast address.
- *
- * @param _own_ip multicast IPv4 address (224.0.0.0 - 239.255.255.255)
- */
-void set_ipv4_multicast(uint32_t _multicast_ip)
-{
- // is this IP Multicast out of range (224.0.0.0 - 239.255.255.255)
- if((htonl(_multicast_ip) < 0xE0000000)
- || (htonl(_multicast_ip) > 0xEFFFFFFF)) {
- multicast_ip = 0;
- memset(multicast_mac, 0xFF, 6);
- return;
- }
-
- multicast_ip = _multicast_ip;
- multicast_mac[0] = 0x01;
- multicast_mac[1] = 0x00;
- multicast_mac[2] = 0x5E;
- multicast_mac[3] = (uint8_t) 0x7F & (multicast_ip >> 16);
- multicast_mac[4] = (uint8_t) 0xFF & (multicast_ip >> 8);
- multicast_mac[5] = (uint8_t) 0xFF & (multicast_ip >> 0);
-}
-
-/**
- * IPv4: Get the IPv4 multicast address.
- *
- * @return multicast IPv4 address (224.0.0.0 - 239.255.255.255 or 0 if not set)
- */
-uint32_t get_ipv4_multicast(void)
-{
- return multicast_ip;
-}
-
-/**
- * IPv4: Set the routers IPv4 address.
- *
- * @param _router_ip router IPv4 address
- */
-void set_ipv4_router(uint32_t _router_ip)
-{
- router_ip = _router_ip;
- ipv4_init();
-}
-
-/**
- * IPv4: Get the routers IPv4 address.
- *
- * @return router IPv4 address
- */
-uint32_t get_ipv4_router(void)
-{
- return router_ip;
-}
-
-/**
- * IPv4: Set the subnet mask.
- *
- * @param _subnet_mask netmask of the own IPv4 address
- */
-void set_ipv4_netmask(uint32_t _subnet_mask)
-{
- subnet_mask = _subnet_mask;
- ipv4_init();
-}
-
-/**
- * IPv4: Get the subnet mask.
- *
- * @return netmask of the own IPv4 address
- */
-uint32_t get_ipv4_netmask(void)
-{
- return subnet_mask;
-}
-
-/**
- * IPv4: Creates IP-packet. Places IP-header in a packet and fills it
- * with corresponding information.
- * <p>
- * Use this function with similar functions for other network layers
- * (fill_ethhdr, fill_udphdr, fill_dnshdr, fill_btphdr).
- *
- * @param packet Points to the place where IP-header must be placed.
- * @param packetsize Size of the packet in bytes incl. this hdr and data.
- * @param ip_proto Type of the next level protocol (e.g. UDP).
- * @param ip_src Sender IP address
- * @param ip_dst Receiver IP address
- * @see iphdr
- * @see fill_ethhdr
- * @see fill_udphdr
- * @see fill_dnshdr
- * @see fill_btphdr
- */
-void fill_iphdr(uint8_t * packet, uint16_t packetsize,
- uint8_t ip_proto, uint32_t ip_src, uint32_t ip_dst)
-{
- struct iphdr * iph = (struct iphdr *) packet;
-
- iph -> ip_hlv = 0x45;
- iph -> ip_tos = 0x10;
- iph -> ip_len = htons(packetsize);
- iph -> ip_id = htons(0);
- iph -> ip_off = 0;
- iph -> ip_ttl = 0xFF;
- iph -> ip_p = ip_proto;
- iph -> ip_src = htonl(ip_src);
- iph -> ip_dst = htonl(ip_dst);
- iph -> ip_sum = 0;
-}
-
-/**
- * IPv4: Handles IPv4-packets according to Receive-handle diagram.
- *
- * @param fd socket fd
- * @param ip_packet IP-packet to be handled
- * @param packetsize Length of the packet
- * @return ZERO - packet handled successfully;
- * NON ZERO - packet was not handled (e.g. bad format)
- * @see receive_ether
- * @see iphdr
- */
-int8_t handle_ipv4(int fd, uint8_t * ip_packet, uint32_t packetsize)
-{
- struct iphdr * iph;
- int32_t old_sum;
- static uint8_t ip_heap[65536 + ETH_MTU_SIZE];
-
- if (packetsize < sizeof(struct iphdr))
- return -1; // packet is too small
-
- iph = (struct iphdr * ) ip_packet;
-
- /* Drop it if destination IPv4 address is no IPv4 Broadcast, no
- * registered IPv4 Multicast and not our Unicast address
- */
- if((multicast_ip == 0 && iph->ip_dst >= 0xE0000000 && iph->ip_dst <= 0xEFFFFFFF)
- || (multicast_ip != iph->ip_dst && iph->ip_dst != 0xFFFFFFFF &&
- own_ip != 0 && iph->ip_dst != own_ip)) {
- return -1;
- }
-
- old_sum = iph -> ip_sum;
- iph -> ip_sum = 0;
- if (old_sum != checksum((uint16_t *) iph, sizeof (struct iphdr) >> 1))
- return -1; // Wrong IP checksum
-
- // is it the first fragment in a packet?
- if (((iph -> ip_off) & 0x1FFF) == 0) {
- // is it part of more fragments?
- if (((iph -> ip_off) & 0x2000) == 0x2000) {
- memcpy(ip_heap, ip_packet, iph->ip_len);
- return 0;
- }
- }
- // it's not the first fragment
- else {
- // get the first fragment
- struct iphdr * iph_first = (struct iphdr * ) ip_heap;
-
- // is this fragment not part of the first one, then exit
- if ((iph_first->ip_id != iph->ip_id ) ||
- (iph_first->ip_p != iph->ip_p ) ||
- (iph_first->ip_src != iph->ip_src) ||
- (iph_first->ip_dst != iph->ip_dst)) {
- return 0;
- }
-
- // this fragment is part of the first one!
- memcpy(ip_heap + sizeof(struct iphdr) +
- ((iph -> ip_off) & 0x1FFF) * 8,
- ip_packet + sizeof(struct iphdr),
- iph -> ip_len - sizeof(struct iphdr));
-
- // is it part of more fragments? Then return.
- if (((iph -> ip_off) & 0x2000) == 0x2000) {
- return 0;
- }
-
- // packet is completly reassambled now!
-
- // recalculate ip_len and set iph and ip_packet to the
- iph_first->ip_len = iph->ip_len + ((iph->ip_off) & 0x1FFF) * 8;
-
- // set iph and ip_packet to the resulting packet.
- ip_packet = ip_heap;
- iph = (struct iphdr * ) ip_packet;
- }
-
- switch (iph -> ip_p) {
- case IPTYPE_ICMP:
- return handle_icmp(fd, iph, ip_packet + sizeof(struct iphdr),
- iph -> ip_len - sizeof(struct iphdr));
- case IPTYPE_UDP:
- return handle_udp(fd, ip_packet + sizeof(struct iphdr),
- iph -> ip_len - sizeof(struct iphdr));
- case IPTYPE_TCP:
- return handle_tcp(ip_packet + sizeof(struct iphdr),
- iph -> ip_len - sizeof(struct iphdr));
- default:
- break;
- }
- return -1; // Unknown protocol
-}
-
-/**
- * IPv4: Send IPv4-packets.
- *
- * Before the packet is sent there are some patcches performed:
- * - IPv4 source address is replaced by our unicast IPV4 address
- * if it is set to 0 or 1
- * - IPv4 destination address is replaced by our multicast IPV4 address
- * if it is set to 1
- * - IPv4 checksum is calculaded.
- * - If payload type is UDP, then the UDP checksum is calculated also.
- *
- * We send an ARP request first, if this is the first packet sent to
- * the declared IPv4 destination address. In this case we store the
- * the packet and send it later if we receive the ARP response.
- * If the MAC address is known already, then we send the packet immediately.
- * If there is already an ARP request pending, then we drop this packet
- * and send again an ARP request.
- *
- * @param fd socket fd
- * @param ip_packet IP-packet to be handled
- * @param packetsize Length of the packet
- * @return -2 - packet dropped (MAC address not resolved - ARP request pending)
- * -1 - packet dropped (bad format)
- * 0 - packet stored (ARP request sent - packet will be sent if
- * ARP response is received)
- * >0 - packet send (number of transmitted bytes is returned)
- *
- * @see receive_ether
- * @see iphdr
- */
-int send_ipv4(int fd, void* buffer, int len)
-{
- arp_entry_t *arp_entry = 0;
- struct iphdr *ip;
- const uint8_t *mac_addr = 0;
- uint32_t ip_dst = 0;
-
- if(len + sizeof(struct ethhdr) > ETH_MTU_SIZE)
- return -1;
-
- ip = (struct iphdr *) buffer;
-
- /* Replace source IPv4 address with our own unicast IPv4 address
- * if it's 0 (= own unicast source address not specified).
- */
- if(ip->ip_src == 0) {
- ip->ip_src = htonl( own_ip );
- }
- /* Replace source IPv4 address with our unicast IPv4 address and
- * replace destination IPv4 address with our multicast IPv4 address
- * if source address is set to 1.
- */
- else if(ip->ip_src == 1) {
- ip->ip_src = htonl( own_ip );
- ip->ip_dst = htonl( multicast_ip );
- }
-
- // Calculate the IPv4 checksum
- ip->ip_sum = 0;
- ip->ip_sum = checksum((uint16_t *) ip, sizeof (struct iphdr) >> 1);
-
- // if payload type is UDP, then we need to calculate the
- // UDP checksum that depends on the IP header
- if(ip->ip_p == IPTYPE_UDP) {
- fill_udp_checksum(ip);
- }
-
- ip_dst = ip->ip_dst;
- // Check if the MAC address is already cached
- if(~ip->ip_dst == 0
- || ( ((~subnet_mask) & ip->ip_dst) == ~subnet_mask &&
- ( subnet_mask & ip->ip_dst) == (subnet_mask & own_ip))) {
- arp_entry = &arp_table[arp_producer];
- mac_addr = broadcast_mac;
- }
- else if(ip->ip_dst == multicast_ip) {
- arp_entry = &arp_table[arp_producer];
- mac_addr = multicast_mac;
- }
- else {
- // Check if IP address is in the same subnet as we are
- if((subnet_mask & own_ip) == (subnet_mask & ip->ip_dst))
- arp_entry = lookup_mac_addr(ip->ip_dst);
- // if not then we need to know the router's IP address
- else {
- ip_dst = router_ip;
- arp_entry = lookup_mac_addr(router_ip);
- }
- if(arp_entry && memcmp(arp_entry->mac_addr, null_mac_addr, 6) != 0)
- mac_addr = arp_entry->mac_addr;
- }
-
- // If we could not resolv the MAC address by our own...
- if(!mac_addr) {
- // send the ARP request
- arp_send_request(fd, ip_dst);
-
- // drop the current packet if there is already a ARP request pending
- if(arp_entry)
- return -2;
-
- // take the next entry in the ARP table to prepare a the new ARP entry.
- arp_entry = &arp_table[arp_producer];
- arp_producer = (arp_producer+1)%ARP_ENTRIES;
-
- // if ARP table is full then we must drop the oldes entry.
- if(arp_consumer == arp_producer)
- arp_consumer = (arp_consumer+1)%ARP_ENTRIES;
-
- // store the packet to be send if the ARP reply is received
- arp_entry->pkt_pending = 1;
- arp_entry->ipv4_addr = ip_dst;
- memset(arp_entry->mac_addr, 0, 6);
- fill_ethhdr (pending_pkt_frame, htons(ETHERTYPE_IP),
- get_mac_address(), null_mac_addr);
- memcpy(&pending_pkt_frame[sizeof(struct ethhdr)],
- buffer, len);
- pending_pkt_len = len + sizeof(struct ethhdr);
-
- set_timer(TICKS_SEC);
- do {
- receive_ether(fd);
- if (!arp_entry->eth_len)
- break;
- } while (get_timer() > 0);
-
- return 0;
- }
-
- // Send the packet with the known MAC address
- fill_ethhdr(arp_entry->eth_frame, htons(ETHERTYPE_IP),
- get_mac_address(), mac_addr);
- memcpy(&arp_entry->eth_frame[sizeof(struct ethhdr)], buffer, len);
- return send_ether(fd, arp_entry->eth_frame, len + sizeof(struct ethhdr));
-}
-
-/**
- * IPv4: Calculate UDP checksum. Places the result into the UDP-header.
- * <p>
- * Use this function after filling the UDP payload.
- *
- * @param ipv4_hdr Points to the place where IPv4-header starts.
- */
-static void fill_udp_checksum(struct iphdr *ipv4_hdr)
-{
- unsigned i;
- unsigned long checksum = 0;
- struct iphdr ip_hdr;
- char *ptr;
- udp_hdr_t *udp_hdr;
-
- udp_hdr = (udp_hdr_t *) (ipv4_hdr + 1);
- udp_hdr->uh_sum = 0;
-
- memset(&ip_hdr, 0, sizeof(struct iphdr));
- ip_hdr.ip_src = ipv4_hdr->ip_src;
- ip_hdr.ip_dst = ipv4_hdr->ip_dst;
- ip_hdr.ip_len = udp_hdr->uh_ulen;
- ip_hdr.ip_p = ipv4_hdr->ip_p;
-
- ptr = (char*) udp_hdr;
- for (i = 0; i < udp_hdr->uh_ulen; i+=2)
- checksum += *((uint16_t*) &ptr[i]);
-
- ptr = (char*) &ip_hdr;
- for (i = 0; i < sizeof(struct iphdr); i+=2)
- checksum += *((uint16_t*) &ptr[i]);
-
- checksum = (checksum >> 16) + (checksum & 0xffff);
- checksum += (checksum >> 16);
- udp_hdr->uh_sum = ~checksum;
-
- /* As per RFC 768, if the computed checksum is zero,
- * it is transmitted as all ones (the equivalent in
- * one's complement arithmetic).
- */
- if (udp_hdr->uh_sum == 0)
- udp_hdr->uh_sum = ~udp_hdr->uh_sum;
-}
-
-/**
- * IPv4: Calculates checksum for IP header.
- *
- * @param packet Points to the IP-header
- * @param words Size of the packet in words incl. IP-header and data.
- * @return Checksum
- * @see iphdr
- */
-static unsigned short checksum(unsigned short * packet, int words)
-{
- unsigned long checksum;
-
- for (checksum = 0; words > 0; words--)
- checksum += *packet++;
- checksum = (checksum >> 16) + (checksum & 0xffff);
- checksum += (checksum >> 16);
-
- return ~checksum;
-}
-
-static arp_entry_t* lookup_mac_addr(uint32_t ipv4_addr)
-{
- unsigned int i;
-
- for(i=arp_consumer; i != arp_producer; i = ((i+1)%ARP_ENTRIES) ) {
- if(arp_table[i].ipv4_addr == ipv4_addr)
- return &arp_table[i];
- }
- return 0;
-}
-
-
-/**
- * ARP: Sends an ARP-request package.
- * For given IPv4 retrieves MAC via ARP (makes several attempts)
- *
- * @param fd socket fd
- * @param dest_ip IP of the host which MAC should be obtained
- */
-static void arp_send_request(int fd, uint32_t dest_ip)
-{
- arp_entry_t *arp_entry = &arp_table[arp_producer];
-
- memset(arp_entry->eth_frame, 0, sizeof(struct ethhdr) + sizeof(struct arphdr));
- fill_arphdr(&arp_entry->eth_frame[sizeof(struct ethhdr)], ARP_REQUEST,
- get_mac_address(), own_ip, broadcast_mac, dest_ip);
- fill_ethhdr(arp_entry->eth_frame, ETHERTYPE_ARP,
- get_mac_address(), broadcast_mac);
-
- send_ether(fd, arp_entry->eth_frame,
- sizeof(struct ethhdr) + sizeof(struct arphdr));
-}
-
-/**
- * ARP: Sends an ARP-reply package.
- * This package is used to serve foreign requests (in case IP in
- * foreign request matches our host IP).
- *
- * @param fd socket fd
- * @param src_ip requester IP address (foreign IP)
- * @param src_mac requester MAC address (foreign MAC)
- */
-static void arp_send_reply(int fd, uint32_t src_ip, uint8_t * src_mac)
-{
- arp_entry_t *arp_entry = &arp_table[arp_producer];
-
- memset(arp_entry->eth_frame, 0, sizeof(struct ethhdr) + sizeof(struct arphdr));
- fill_ethhdr(arp_entry->eth_frame, ETHERTYPE_ARP,
- get_mac_address(), src_mac);
- fill_arphdr(&arp_entry->eth_frame[sizeof(struct ethhdr)], ARP_REPLY,
- get_mac_address(), own_ip, src_mac, src_ip);
-
- send_ether(fd, arp_entry->eth_frame,
- sizeof(struct ethhdr) + sizeof(struct arphdr));
-}
-
-/**
- * ARP: Creates ARP package. Places ARP-header in a packet and fills it
- * with corresponding information.
- * <p>
- * Use this function with similar functions for other network layers
- * (fill_ethhdr).
- *
- * @param packet Points to the place where ARP-header must be placed.
- * @param opcode Identifies is it request (ARP_REQUEST)
- * or reply (ARP_REPLY) package.
- * @param src_mac sender MAC address
- * @param src_ip sender IP address
- * @param dest_mac receiver MAC address
- * @param dest_ip receiver IP address
- * @see arphdr
- * @see fill_ethhdr
- */
-static void fill_arphdr(uint8_t * packet, uint8_t opcode,
- const uint8_t * src_mac, uint32_t src_ip,
- const uint8_t * dest_mac, uint32_t dest_ip)
-{
- struct arphdr * arph = (struct arphdr *) packet;
-
- arph -> hw_type = htons(1);
- arph -> proto_type = htons(ETHERTYPE_IP);
- arph -> hw_len = 6;
- arph -> proto_len = 4;
- arph -> opcode = htons(opcode);
-
- memcpy(arph->src_mac, src_mac, 6);
- arph->src_ip = htonl(src_ip);
- memcpy(arph->dest_mac, dest_mac, 6);
- arph->dest_ip = htonl(dest_ip);
-}
-
-/**
- * ARP: Handles ARP-messages according to Receive-handle diagram.
- * Updates arp_table for outstanding ARP requests (see arp_getmac).
- *
- * @param fd socket fd
- * @param packet ARP-packet to be handled
- * @param packetsize length of the packet
- * @return ZERO - packet handled successfully;
- * NON ZERO - packet was not handled (e.g. bad format)
- * @see arp_getmac
- * @see receive_ether
- * @see arphdr
- */
-int8_t handle_arp(int fd, uint8_t * packet, uint32_t packetsize)
-{
- struct arphdr * arph = (struct arphdr *) packet;
-
- if (packetsize < sizeof(struct arphdr))
- return -1; // Packet is too small
-
- if (arph -> hw_type != htons(1) || arph -> proto_type != htons(ETHERTYPE_IP))
- return -1; // Unknown hardware or unsupported protocol
-
- if (arph -> dest_ip != htonl(own_ip))
- return -1; // receiver IP doesn't match our IP
-
- switch(htons(arph -> opcode)) {
- case ARP_REQUEST:
- // foreign request
- if(own_ip != 0)
- arp_send_reply(fd, htonl(arph->src_ip), arph -> src_mac);
- return 0; // no error
- case ARP_REPLY: {
- unsigned int i;
- // if it is not for us -> return immediately
- if(memcmp(get_mac_address(), arph->dest_mac, 6)) {
- return 0; // no error
- }
-
- if(arph->src_ip == 0) {
- // we are not interested for a MAC address if
- // the IPv4 address is 0.0.0.0 or ff.ff.ff.ff
- return -1;
- }
-
- // now let's find the corresponding entry in the ARP table
-
- for(i=arp_consumer; i != arp_producer; i = ((i+1)%ARP_ENTRIES) ) {
- if(arp_table[i].ipv4_addr == arph->src_ip)
- break;
- }
- if(i == arp_producer || memcmp(arp_table[i].mac_addr, null_mac_addr, 6) != 0) {
- // we have not asked to resolve this IPv4 address !
- return -1;
- }
-
- memcpy(arp_table[i].mac_addr, arph->src_mac, 6);
-
- // do we have something to send
- if (arp_table[i].pkt_pending) {
- struct ethhdr * ethh = (struct ethhdr *) pending_pkt_frame;
- memcpy(ethh -> dest_mac, arp_table[i].mac_addr, 6);
-
- send_ether(fd, pending_pkt_frame, pending_pkt_len);
- arp_table[i].pkt_pending = 0;
- arp_table[i].eth_len = 0;
- }
- return 0; // no error
- }
- default:
- break;
- }
- return -1; // Invalid message type
-}
-
-/**
- * ICMP: Send an ICMP Echo request to destination IPv4 address.
- * This function does also set a global variable to the
- * destination IPv4 address. If there is an ICMP Echo Reply
- * received later then the variable is set back to 0.
- * In other words, reading a value of 0 form this variable
- * means that an answer to the request has been arrived.
- *
- * @param fd socket descriptor
- * @param _ping_dst_ip destination IPv4 address
- */
-void ping_ipv4(int fd, uint32_t _ping_dst_ip)
-{
- unsigned char packet[sizeof(struct iphdr) + sizeof(struct icmphdr)];
- struct icmphdr *icmp;
-
- ping_dst_ip = _ping_dst_ip;
-
- if(ping_dst_ip == 0)
- return;
-
- fill_iphdr(packet, sizeof(struct iphdr) + sizeof(struct icmphdr), IPTYPE_ICMP,
- 0, ping_dst_ip);
- icmp = (struct icmphdr *) (packet + sizeof(struct iphdr));
- icmp->type = ICMP_ECHO_REQUEST;
- icmp->code = 0;
- icmp->checksum = 0;
- icmp->options.echo.id = 0xd476;
- icmp->options.echo.seq = 1;
-
- memset(icmp->payload.data, '*', sizeof(icmp->payload.data));
-
- icmp->checksum =
- checksum((unsigned short *) icmp, sizeof(struct icmphdr) >> 1);
- send_ipv4(fd, packet, sizeof(struct iphdr) + sizeof(struct icmphdr));
-}
-
-/**
- * ICMP: Return host IPv4 address that we are waiting for a
- * ICMP Echo reply message. If this value is 0 then we have
- * received an reply.
- *
- * @return ping_dst_ip host IPv4 address
- */
-uint32_t pong_ipv4(void)
-{
- return ping_dst_ip;
-}
-
-/**
- * ICMP: Handles ICMP-packets according to Receive-handle diagram.
- *
- * @param fd socket fd
- * @param icmp_packet ICMP-packet to be handled
- * @param packetsize Length of the packet
- * @return ZERO - packet handled successfully;
- * NON ZERO - packet was not handled (e.g. bad format)
- * @see handle_ipv4
- */
-static int8_t handle_icmp(int fd, struct iphdr * iph, uint8_t * packet,
- int32_t packetsize)
-{
- struct icmphdr *icmp = (struct icmphdr *) packet;
-
- switch(icmp->type) {
- case ICMP_ECHO_REPLY:
- if (icmp->options.echo.id != 0xd476)
- return -1;
- if (icmp->options.echo.seq != 1)
- return -1;
- if(ping_dst_ip != iph->ip_src
- || ping_dst_ip == 0)
- return -1;
- ping_dst_ip = 0;
- break;
- case ICMP_DST_UNREACHABLE: {
- // We've got Destination Unreachable msg
- // Inform corresponding upper network layers
- struct iphdr * bad_iph = (struct iphdr * ) &icmp->payload;
-
- switch(bad_iph->ip_p) {
- case IPTYPE_TCP:
- handle_tcp_dun((uint8_t *) (bad_iph + 1), packetsize
- - sizeof(struct icmphdr)
- - sizeof(struct iphdr), icmp->code);
- break;
- case IPTYPE_UDP:
- handle_udp_dun((uint8_t *) (bad_iph + 1), packetsize
- - sizeof(struct icmphdr)
- - sizeof(struct iphdr), icmp->code);
- break;
- }
- break;
- }
- case ICMP_SRC_QUENCH:
- break;
- case ICMP_REDIRECT:
- break;
- case ICMP_ECHO_REQUEST: {
- // We've got an Echo Request - answer with Echo Replay msg
- unsigned char reply_packet[sizeof(struct iphdr) + packetsize];
- struct icmphdr *reply_icmph;
-
- fill_iphdr(reply_packet, sizeof(struct iphdr) + packetsize,
- IPTYPE_ICMP, 0, iph->ip_src);
-
- reply_icmph = (struct icmphdr *) &reply_packet[sizeof(struct iphdr)];
- memcpy(reply_icmph, packet, packetsize);
- reply_icmph -> type = ICMP_ECHO_REPLY;
- reply_icmph -> checksum = 0;
- reply_icmph->checksum = checksum((unsigned short *) reply_icmph,
- sizeof(struct icmphdr) >> 1);
-
- send_ipv4(fd, reply_packet, sizeof(struct iphdr) + packetsize);
- break;
- }
- case ICMP_TIME_EXCEEDED:
- break;
- case ICMP_PARAMETER_PROBLEM:
- break;
- case ICMP_TIMESTAMP_REQUEST:
- break;
- case ICMP_TIMESTAMP_REPLY:
- break;
- case ICMP_INFORMATION_REQUEST:
- break;
- case ICMP_INFORMATION_REPLY:
- break;
- }
- return 0;
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netlib/ipv4.h b/qemu/roms/SLOF/clients/net-snk/app/netlib/ipv4.h
deleted file mode 100644
index 18821ea74..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netlib/ipv4.h
+++ /dev/null
@@ -1,96 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-
-#ifndef _IPV4_H_
-#define _IPV4_H_
-
-#include <stdint.h>
-
-#define IPTYPE_ICMP 1
-
-/** \struct iphdr
- * A header for IP-packets.
- * For more information see RFC 791.
- */
-struct iphdr {
- uint8_t ip_hlv; /**< Header length and version of the header */
- uint8_t ip_tos; /**< Type of Service */
- uint16_t ip_len; /**< Length in octets, inlc. this header and data */
- uint16_t ip_id; /**< ID is used to aid in assembling framents */
- uint16_t ip_off; /**< Info about fragmentation (control, offset) */
- uint8_t ip_ttl; /**< Time to Live */
- uint8_t ip_p; /**< Next level protocol type */
- uint16_t ip_sum; /**< Header checksum */
- uint32_t ip_src; /**< Source IP address */
- uint32_t ip_dst; /**< Destination IP address */
-};
-typedef struct iphdr ipv4_hdr_t;
-
-/* ICMP Error Codes */
-#define ICMP_NET_UNREACHABLE 0
-#define ICMP_HOST_UNREACHABLE 1
-#define ICMP_PROTOCOL_UNREACHABLE 2
-#define ICMP_PORT_UNREACHABLE 3
-#define ICMP_FRAGMENTATION_NEEDED 4
-#define ICMP_SOURCE_ROUTE_FAILED 5
-
-/** \struct arphdr
- * A header for ARP-messages, retains info about HW and proto addresses.
- * For more information see RFC 826.
- */
-struct arphdr {
- uint16_t hw_type; /**< HW address space (1 for Ethernet) */
- uint16_t proto_type; /**< Protocol address space */
- uint8_t hw_len; /**< Byte length of each HW address */
- uint8_t proto_len; /**< Byte length of each proto address */
- uint16_t opcode; /**< Identifies is it request (1) or reply (2) */
- uint8_t src_mac[6]; /**< HW address of sender of this packet */
- uint32_t src_ip; /**< Proto address of sender of this packet */
- uint8_t dest_mac[6]; /**< HW address of target of this packet */
- uint32_t dest_ip; /**< Proto address of target of this packet */
-} __attribute((packed));
-
-/************** Initialization of the IPv4 network layer. **************/
-extern void set_ipv4_address(uint32_t own_ip);
-extern uint32_t get_ipv4_address(void);
-extern void set_ipv4_multicast(uint32_t multicast_ip);
-extern uint32_t get_ipv4_multicast(void);
-extern void set_ipv4_router(uint32_t router_ip);
-extern uint32_t get_ipv4_router(void);
-extern void set_ipv4_netmask(uint32_t subnet_mask);
-extern uint32_t get_ipv4_netmask(void);
-
-extern int (*send_ip) (int fd, void *, int);
-
-/* fills ip header */
-extern void fill_iphdr(uint8_t * packet, uint16_t packetsize,
- uint8_t ip_proto, uint32_t ip_src, uint32_t ip_dst);
-
-/* Send a IPv4 packet. Adding the Ethernet-Header and resolving the
- * MAC address is done transparent in the background if necessary.
- */
-extern int send_ipv4(int fd, void* buffer, int len);
-
-/* Sends an ICMP Echo request to destination IPv4 address */
-extern void ping_ipv4(int fd, uint32_t _ping_dst_ip);
-
-/* Returns host IPv4 address that we are waiting for a response */
-extern uint32_t pong_ipv4(void);
-
-/* Handles IPv4-packets that are detected by receive_ether. */
-extern int8_t handle_ipv4(int fd, uint8_t * packet, uint32_t packetsize);
-
-/* Handles ARP-packets that are detected by receive_ether. */
-extern int8_t handle_arp(int fd, uint8_t * packet, uint32_t packetsize);
-
-#endif
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netlib/ipv6.c b/qemu/roms/SLOF/clients/net-snk/app/netlib/ipv6.c
deleted file mode 100644
index 62d29ea86..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netlib/ipv6.c
+++ /dev/null
@@ -1,747 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2013 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#include <string.h>
-#include <stdlib.h>
-#include <stdio.h>
-#include <time.h>
-#include <ctype.h>
-#include <sys/socket.h>
-#include <netlib/ethernet.h>
-#include <netlib/ipv6.h>
-#include <netlib/icmpv6.h>
-#include <netlib/ndp.h>
-#include <netlib/udp.h>
-
-#undef IPV6_DEBUG
-//#define IPV6_DEBUG
-#ifdef IPV6_DEBUG
-#define dprintf(_x ...) do { printf(_x); } while (0)
-#else
-#define dprintf(_x ...)
-#endif
-
-/****************************** PROTOTYPES *******************************/
-int8_t ip6addr_add (struct ip6addr_list_entry *new_address);
-static void ipv6_init(int fd);
-static int ip6_is_multicast (ip6_addr_t * ip);
-
-/****************************** LOCAL VARIABLES **************************/
-
-/* List of Ipv6 Addresses */
-static struct ip6addr_list_entry *first_ip6;
-static struct ip6addr_list_entry *last_ip6;
-
-/* Own IPv6 address */
-static struct ip6addr_list_entry *own_ip6;
-
-/* All nodes link-local address */
-struct ip6addr_list_entry all_nodes_ll;
-
-/* Null IPv6 address */
-static ip6_addr_t null_ip6;
-
-/* helper variables */
-static uint8_t null_mac[] = {0x00, 0x00, 0x00, 0x00, 0x00, 0x00};
-
-struct ip6_config ip6_state;
-
-/****************************** IMPLEMENTATION ***************************/
-
-/**
- * IPv6: Set the own IPv6 address.
- *
- * @param fd Socket descriptor
- * @param _own_ip client IPv6 address (e.g. ::1)
- */
-void set_ipv6_address(int fd, ip6_addr_t *_own_ip6)
-{
- struct ip6addr_list_entry *ile;
-
- own_ip6 = malloc (sizeof(struct ip6addr_list_entry));
-
- /* If no address was passed as a parameter generate a link-local
- * address from our MAC address.*/
- if (_own_ip6 == NULL)
- memcpy(&(own_ip6->addr.addr),
- ip6_create_ll_address(get_mac_address()),
- IPV6_ADDR_LENGTH);
- else
- memcpy (&(own_ip6->addr.addr), _own_ip6, 16);
-
- /* Add to our list of IPv6 addresses */
- ip6addr_add (own_ip6);
-
- ipv6_init(fd);
-
- /*
- * Check whether we've got a non-link-local address during
- * ipv6_init() and use that as preferred address if possible
- */
- if (_own_ip6 == NULL) {
- for (ile = first_ip6; ile != NULL ; ile = ile->next) {
- if (!ip6_is_multicast(&ile->addr) &&
- !ip6_is_linklocal(&ile->addr)) {
- own_ip6 = ile;
- break;
- }
- }
- }
-}
-
-/**
- * IPv6: Get pointer to own IPv6 address.
- *
- * @return pointer to client IPv6 address (e.g. ::1)
- */
-ip6_addr_t *get_ipv6_address(void)
-{
- return (ip6_addr_t *) &(own_ip6->addr);
-}
-
-/**
- * IPv6: Search for IPv6 address in list
- *
- * @return 0 - IPv6 address is not in list
- * 1 - IPv6 address is in list
- */
-static int8_t find_ip6addr(ip6_addr_t *ip)
-{
- struct ip6addr_list_entry *n = NULL;
-
- if (ip == NULL)
- return 0;
-
- for (n = first_ip6; n != NULL ; n=n->next)
- if (ip6_cmp (&(n->addr), ip))
- return 1; /* IPv6 address is in our list*/
-
- return 0; /* not one of our IPv6 addresses*/
-}
-
-/**
- * NET: Handles IPv6-packets
- *
- * @param fd - Socket descriptor
- * @param ip6_packet - Pointer to IPv6 header
- * @param packetsize - Size of Ipv6 packet
- * @return ERROR - -1 if packet is too small or unknown protocol
- * return value of handle_udp
- *
- * @see handle_udp
- * @see ip6hdr
- */
-int8_t handle_ipv6(int fd, uint8_t * ip6_packet, uint32_t packetsize)
-{
-
- struct ip6hdr *ip6 = NULL;
- ip6 = (struct ip6hdr *) ip6_packet;
-
- /* Only handle packets which are for us */
- if (! find_ip6addr(&(ip6->dst)))
- return -1;
-
- if (packetsize < sizeof(struct ip6hdr))
- return -1; // packet is too small
-
- switch (ip6->nh) {
- case IPTYPE_UDP:
- return handle_udp (fd, ip6_packet + sizeof (struct ip6hdr),
- ip6->pl);
- case IPTYPE_ICMPV6:
- return handle_icmpv6 (fd, (struct ethhdr *) ip6_packet - sizeof(struct ethhdr),
- ip6_packet);
- }
-
- return -1; // unknown protocol
-}
-
- /**
- * NET: Creates IPv6-packet. Places IPv6-header in a packet and fills it
- * with corresponding information.
- * <p>
- * Use this function with similar functions for other network layers
- * (fill_ethhdr, fill_udphdr, fill_dnshdr, fill_btphdr).
- *
- * @param packet Points to the place where IPv6-header must be placed.
- * @param packetsize Size of payload (i.e. excluding ethhdr and ip6hdr)
- * @param ip_proto Type of the next level protocol (e.g. UDP).
- * @param ip6_src Sender IPv6 address
- * @param ip6_dst Receiver IPv6 address
- * @see ip6hdr
- * @see fill_iphdr
- * @see fill_ethhdr
- * @see fill_udphdr
- * @see fill_dnshdr
- * @see fill_btphdr
- */
-void fill_ip6hdr(uint8_t * packet, uint16_t packetsize,
- uint8_t ip_proto, ip6_addr_t *ip6_src, ip6_addr_t *ip6_dst)
-{
- struct ip6hdr * ip6h = (struct ip6hdr *) packet;
-
- ip6h->ver_tc_fl = 6 << 28; // set version to 6
- ip6h->pl = packetsize; // IPv6 payload size
- ip6h->nh = ip_proto;
- ip6h->hl = 255;
- memcpy (&(ip6h->src), ip6_src, IPV6_ADDR_LENGTH);
- memcpy (&(ip6h->dst), ip6_dst, IPV6_ADDR_LENGTH);
-}
-
-/**
- * NET: For a given MAC calculates EUI64-Identifier.
- * See RFC 4291 "IP Version 6 Addressing Architecture"
- *
- */
-uint64_t mac2eui64(const uint8_t *mac)
-{
- uint8_t eui64id[8];
- uint64_t retid;
-
- memcpy (eui64id, mac, 3);
- memcpy (eui64id + 5, mac + 3, 3);
- eui64id[3] = 0xff;
- eui64id[4] = 0xfe;
-
- memcpy(&retid, eui64id, 8);
- return retid;
-}
-
-/**
- * NET: create link-local IPv6 address
- *
- * @param own_mac MAC of NIC
- * @return ll_addr pointer to newly created link-local address
- */
-ip6_addr_t *ip6_create_ll_address(const uint8_t *own_mac)
-{
- ip6_addr_t *ll_addr;
-
- ll_addr = malloc (sizeof (struct ip6addr_list_entry));
- memset (ll_addr, 0, IPV6_ADDR_LENGTH);
- ll_addr->part.prefix |= IPV6_LL_PREFIX;
- ll_addr->part.interface_id |= mac2eui64((uint8_t *) own_mac);
-
- return ll_addr;
-}
-
-/*
- * NET: check if we already have an address with the same prefix.
- * @param struct ip6_addr_list_entry *ip6
- * @return true or false
- */
-int8_t unknown_prefix(ip6_addr_t *ip)
-{
- struct ip6addr_list_entry *node;
-
- for( node = first_ip6; node != NULL; node=node->next )
- if( node->addr.part.prefix == ip->part.prefix )
- return 0; /* address is one of ours */
-
- return 1; /* prefix not yet in our list */
-}
-
-/*
- * NET: Create empty element for prefix list and return a pointer to it;
- * @return NULL - malloc failed
- * ! NULL - pointer to new prefix_info
- */
-struct prefix_info *ip6_create_prefix_info()
-{
- struct prefix_info *prfx_info;
-
- prfx_info = malloc (sizeof(struct prefix_info));
- if (!prfx_info)
- return NULL;
-
- return prfx_info;
-}
-
-/*
- * NET: create a new IPv6 address with a given network prefix
- * and add it to our IPv6 address list
- *
- * @param ip6_addr prefix (as received in RA)
- * @return NULL - pointer to new ip6addr_list entry
- */
-void *ip6_prefix2addr(ip6_addr_t prefix)
-{
- struct ip6addr_list_entry *new_address;
- uint64_t interface_id;
-
- new_address = malloc (sizeof(struct ip6addr_list_entry));
- if( !new_address )
- return NULL;
-
- /* fill new addr struct */
- /* extract prefix from Router Advertisement */
- memcpy (&(new_address->addr.part.prefix), &prefix, 8 );
-
- /* interface id is generated from MAC address */
- interface_id = mac2eui64 (get_mac_address());
- memcpy (&(new_address->addr.part.interface_id), &interface_id, 8);
-
- return new_address;
-}
-
-/**
- * NET: add new IPv6 adress to list
- *
- * @param ip6_addr *new_address
- * @return 0 - passed pointer = NULL;
- * 1 - ok
- */
-int8_t ip6addr_add(struct ip6addr_list_entry *new_address)
-{
- struct ip6addr_list_entry *solicited_node;
-
-
- if (new_address == NULL)
- return 0;
-
- /* Don't add the same address twice */
- if (find_ip6addr (&(new_address->addr)))
- return 0;
-
- /* If address is a unicast address, we also have to process packets
- * for its solicited-node multicast address.
- * See RFC 2373 - IP Version 6 Adressing Architecture */
- if (! ip6_is_multicast(&(new_address->addr))) {
-
-
- solicited_node = malloc(sizeof(struct ip6addr_list_entry));
- if (! solicited_node)
- return 0;
-
- solicited_node->addr.part.prefix = IPV6_SOLIC_NODE_PREFIX;
- solicited_node->addr.part.interface_id = IPV6_SOLIC_NODE_IFACE_ID;
- solicited_node->addr.addr[13] = new_address->addr.addr[13];
- solicited_node->addr.addr[14] = new_address->addr.addr[14];
- solicited_node->addr.addr[15] = new_address->addr.addr[15];
- ip6addr_add (solicited_node);
- }
-
- if (NULL == first_ip6)
- first_ip6 = new_address;
- last_ip6->next = new_address;
- last_ip6 = new_address;
- last_ip6->next = NULL;
-
- return 1; /* no error */
-}
-
-/**
- * NET: Initialize IPv6
- *
- * @param fd socket fd
- */
-static void ipv6_init(int fd)
-{
- int i = 0;
-
- send_ip = &send_ipv6;
-
- /* Address configuration parameters */
- ip6_state.managed_mode = 0;
-
- /* Null IPv6 address */
- null_ip6.part.prefix = 0;
- null_ip6.part.interface_id = 0;
-
- /* Multicast addresses */
- all_nodes_ll.addr.part.prefix = 0xff02000000000000;
- all_nodes_ll.addr.part.interface_id = 1;
- ip6addr_add(&all_nodes_ll);
-
- ndp_init();
-
- send_router_solicitation (fd);
- for(i=0; i < 4 && !is_ra_received(); i++) {
- set_timer(TICKS_SEC);
- do {
- receive_ether(fd);
- if (is_ra_received())
- break;
- } while (get_timer() > 0);
- }
-}
-
-/**
- * NET: compare IPv6 adresses
- *
- * @param ip6_addr ip_1
- * @param ip6_addr ip_2
- */
-int8_t ip6_cmp(ip6_addr_t *ip_1, ip6_addr_t *ip_2)
-{
- return ((int8_t) !memcmp( &(ip_1->addr[0]), &(ip_2->addr[0]),
- IPV6_ADDR_LENGTH ));
-}
-
-/**
- * NET: Calculate checksum over IPv6 header and upper-layer protocol
- * (e.g. UDP or ICMPv6)
- *
- * @param *ip - pointer to IPv6 address
- * @return true or false
- */
-int ip6_is_multicast(ip6_addr_t * ip)
-{
- return ip->addr[0] == 0xFF;
-}
-
-/**
- * NET: Generate multicast MAC address from IPv6 address
- * (e.g. UDP or ICMPv6)
- *
- * @param *ip - pointer to IPv6 address
- * @param *mc_mac pointer to an array with 6 bytes (for the MAC address)
- * @return pointer to Multicast MAC address
- */
-static uint8_t *ip6_to_multicast_mac(ip6_addr_t * ip, uint8_t *mc_mac)
-{
- mc_mac[0] = 0x33;
- mc_mac[1] = 0x33;
- memcpy (mc_mac+2, (uint8_t *) &(ip->addr)+12, 4);
-
- return mc_mac;
-}
-
-/**
- * NET: calculate checksum over IPv6 header and upper-layer protocol
- * (e.g. UDP or ICMPv6)
- *
- * @param struct ip6hdr *ip6h - pointer to IPv6 header
- * @param unsigned short *packet - pointer to header of upper-layer
- * protocol
- * @param int words - number of words (as in 2 bytes)
- * starting from *packet
- * @return checksum
- */
-static unsigned short ip6_checksum(struct ip6hdr *ip6h, unsigned short *packet,
- int words)
-{
- int i=0;
- unsigned long checksum;
- struct ip6hdr pseudo_ip6h;
- unsigned short *pip6h;
-
- memcpy (&pseudo_ip6h, ip6h, sizeof(struct ip6hdr));
- pseudo_ip6h.hl = ip6h->nh;
- pseudo_ip6h.ver_tc_fl = 0;
- pseudo_ip6h.nh = 0;
- pip6h = (unsigned short *) &pseudo_ip6h;
-
- for (checksum = 0; words > 0; words--) {
- checksum += *packet++;
- i++;
- }
-
- for (i = 0; i < 20; i++) {
- checksum += *pip6h++;
- }
-
- checksum = (checksum >> 16) + (checksum & 0xffff);
- checksum += (checksum >> 16);
-
- return ~checksum;
-}
-
-/**
- * NET: Handles IPv6-packets
- *
- * @param fd socket fd
- * @param ip6_packet Pointer to IPv6 header in packet
- * @param packetsize Size of IPv6 packet
- * @return -1 == ERRROR
- * return of handle_udp() or handle_icmp6()
- *
- * @see receive_ether
- * @see ip6hdr
- */
-int send_ipv6(int fd, void* buffer, int len)
-{
- struct neighbor *n;
- struct ip6hdr *ip6h;
- struct udphdr *udph;
- struct icmp6hdr *icmp6h;
- ip6_addr_t ip_dst;
- uint8_t *mac_addr, mac[6];
-
- mac_addr = mac;
-
- ip6h = (struct ip6hdr *) buffer;
- udph = (struct udphdr *) ((uint8_t *) ip6h + sizeof (struct ip6hdr));
- icmp6h = (struct icmp6hdr *) ((uint8_t *) ip6h + sizeof (struct ip6hdr));
-
- memcpy(&ip_dst, &ip6h->dst, 16);
-
- if(len + sizeof(struct ethhdr) > 1500)
- return -1;
-
- if ( ip6_cmp (&ip6h->src, &null_ip6))
- memcpy (&(ip6h->src), get_ipv6_address(), IPV6_ADDR_LENGTH);
-
- if (ip6h->nh == 17) {//UDP
- udph->uh_sum = ip6_checksum (ip6h, (unsigned short *) udph ,
- ip6h->pl >> 1);
- /* As per RFC 768, if the computed checksum is zero,
- * it is transmitted as all ones (the equivalent in
- * one's complement arithmetic).
- */
- if (udph->uh_sum == 0)
- udph->uh_sum = ~udph->uh_sum;
- }
- else if (ip6h->nh == 0x3a) //ICMPv6
- icmp6h->checksum = ip6_checksum (ip6h,
- (unsigned short *) icmp6h,
- ip6h->pl >> 1);
-
- n = find_neighbor (&ip_dst);
-
- // If address is a multicast address, create a proper mac address
- if (ip6_is_multicast (&ip_dst)) {
- mac_addr = ip6_to_multicast_mac (&ip_dst, mac);
- }
- else {
- // Check if the MAC address is already cached
- if (n) {
- if (memcmp(n->mac, null_mac, ETH_ALEN) != 0)
- memcpy (mac_addr, &(n->mac), ETH_ALEN); /* found it */
- } else {
- mac_addr = null_mac;
- n = malloc(sizeof(struct neighbor));
- memcpy(&(n->ip.addr[0]), &ip_dst, 16);
- n->status = NB_PROBE;
- n->times_asked += 1;
- neighbor_add(n);
- }
-
- if (! memcmp (mac_addr, &null_mac, 6)) {
- if (n->eth_len == 0) {
- send_neighbour_solicitation (fd, &ip_dst);
-
- // Store the packet until we know the MAC address
- memset(n->eth_frame, 0, 1500);
- fill_ethhdr (n->eth_frame,
- htons(ETHERTYPE_IPv6),
- get_mac_address(),
- mac_addr);
- memcpy (&(n->eth_frame[sizeof(struct ethhdr)]),
- buffer, len);
- n->eth_len = len;
- set_timer(TICKS_SEC);
- do {
- receive_ether(fd);
- } while (get_timer() > 0);
- }
- }
- }
-
- fill_ethhdr (n->eth_frame, htons(ETHERTYPE_IPv6), get_mac_address(),
- mac_addr);
- memcpy (&(n->eth_frame[sizeof(struct ethhdr)]), buffer, len);
- return send_ether (fd, n->eth_frame, len + sizeof(struct ethhdr));
-}
-
-static int check_colons(const char *str)
-{
- char *pch, *prv;
- int col = 0;
- int dcol = 0;
-
- dprintf("str : %s\n",str);
- pch = strchr(str, ':');
- while(pch != NULL){
- prv = pch;
- pch = strchr(pch+1, ':');
- if((pch-prv) != 1) {
- col++;
- } else {
- col--; /* Its part of double colon */
- dcol++;
- }
- }
-
- dprintf("The number of col : %d \n",col);
- dprintf("The number of dcol : %d \n",dcol);
-
- if((dcol > 1) || /* Cannot have 2 "::" */
- ((dcol == 1) && (col > 5)) || /* Too many ':'s */
- ((dcol == 0) && (col != 7)) ) { /* Too few ':'s */
- dprintf(" exiting for check_colons \n");
- return 0;
- }
-
- return (col+dcol);
-}
-
-static int ipv6str_to_bytes(const char *str, char *ip)
-{
- char block[5];
- int res;
- char *pos;
- uint32_t cnt = 0, len;
-
- dprintf("str : %s \n",str);
-
- while (*str != 0) {
- if (cnt > 15 || !isxdigit(*str)){
- return 0;
- }
- if ((pos = strchr(str, ':')) != NULL) {
- len = (int16_t) (pos - str);
- dprintf("\t len is : %d \n",len);
- if (len > 4)
- return 0;
- strncpy(block, str, len);
- block[len] = 0;
- dprintf("\t str : %s \n",str);
- dprintf("\t block : %s \n",block);
- str += len;
- } else {
- strncpy(block, str, 4);
- block[4] = 0;
- dprintf("\t str : %s \n",str);
- dprintf("\t block : %s \n",block);
- str += strlen(block);
- }
- res = strtol(block, NULL, 16);
- dprintf("\t res : %x \n",res);
- if ((res > 0xFFFF) || (res < 0))
- return 0;
- ip[cnt++] = (res & 0xFF00) >> 8;
- ip[cnt++] = (res & 0x00FF);
- if (*str == ':'){
- str++;
- }
- }
-
- dprintf("cnt : %d\n",cnt);
- return cnt;
-}
-
-int str_to_ipv6(const char *str, uint8_t *ip)
-{
- int i, k;
- uint16_t len;
- char *ptr;
- char tmp[30], buf[16];
-
- memset(ip,0,16);
-
- if(!check_colons(str))
- return 0;
-
- if ((ptr = strstr(str, "::")) != NULL) {
- /* Handle the ::1 IPv6 loopback */
- if(!strcmp(str,"::1")) {
- ip[15] = 1;
- return 16;
- }
- len = (ptr-str);
- dprintf(" len : %d \n",len);
- if (len >= sizeof(tmp))
- return 0;
- strncpy(tmp, str, len);
- tmp[len] = 0;
- ptr += 2;
-
- i = ipv6str_to_bytes(ptr, buf);
- if(i == 0)
- return i;
-
- #if defined(ARGS_DEBUG)
- int j;
- dprintf("=========== bottom part i : %d \n",i);
- for(j=0; j<i; j++)
- dprintf("%02x \t",buf[j]);
- #endif
-
- /* Copy the bottom part i.e bytes following "::" */
- memcpy(ip+(16-i), buf, i);
-
- k = ipv6str_to_bytes(tmp, buf);
- if(k == 0)
- return k;
-
- #if defined(ARGS_DEBUG)
- dprintf("=========== top part k : %d \n",k);
- for(j=0; j<k; j++)
- printf("%02x \t",buf[j]);
- #endif
-
- /* Copy the top part i.e bytes before "::" */
- memcpy(ip, buf, k);
- #if defined(ARGS_DEBUG)
- dprintf("\n");
- for(j=0; j<16; j++)
- dprintf("%02x \t",ip[j]);
- #endif
-
- } else {
- i = ipv6str_to_bytes(str, (char *)ip);
- }
- return i;
-}
-
-void ipv6_to_str(const uint8_t *ip, char *str)
-{
- int i, len;
- uint8_t byte_even, byte_odd;
- char *consec_zero, *strptr;
-
- *str = 0;
- for (i = 0; i < 16; i+=2) {
- byte_even = ip[i];
- byte_odd = ip[i+1];
- if (byte_even)
- sprintf(str, "%s%x%02x", str, byte_even, byte_odd);
- else if (byte_odd)
- sprintf(str, "%s%x", str, byte_odd);
- else
- strcat(str, "0");
- if (i != 14)
- strcat(str, ":");
- }
- strptr = str;
- do {
- consec_zero = strstr(strptr, "0:0:");
- if (consec_zero) {
- len = consec_zero - strptr;
- if (!len)
- break;
- else if (strptr[len-1] == ':')
- break;
- else
- strptr = consec_zero + 2;
- }
- } while (consec_zero);
- if (consec_zero) {
- len = consec_zero - str;
- str[len] = 0;
- if (len)
- strcat(str, ":");
- else
- strcat(str, "::");
- strptr = consec_zero + 4;
- while (*strptr) {
- if (!strncmp(strptr, "0:", 2))
- strptr += 2;
- else
- break;
- }
- strcat(str, strptr);
- if (!strcmp(str, "::0"))
- strcpy(str, "::");
- }
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netlib/ipv6.h b/qemu/roms/SLOF/clients/net-snk/app/netlib/ipv6.h
deleted file mode 100644
index 72c6ee22f..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netlib/ipv6.h
+++ /dev/null
@@ -1,188 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2013 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#ifndef _IPV6_H_
-#define _IPV6_H_
-
-#include <stdint.h>
-#include <netlib/ethernet.h>
-
-#define __IPV6_DEBUG__
-
-#ifdef __IPV6_DEBUG__
-#define IPV6_DEBUG_PRINT(format, ...) do { printf(format, ## __VA_ARGS__); } while (0)
-#else
-#define IPV6_DEBUG_PRINT(format, ...)
-#endif
-
-#define IPV6_ADDR_LENGTH 16 /* Size of IPv6 adress in bytes */
-#define IPV6_LL_PREFIX 0xFE80000000000000ULL
-#define IPV6_LL_PREFIX_MASK 0xFFC0000000000000ULL
-#define IPV6_SOLIC_NODE_PREFIX 0xFF02000000000000ULL
-#define IPV6_SOLIC_NODE_IFACE_ID 0x00000001FF000000ULL
-
-/**
- * An IPv6 Address
- */
-typedef union {
- uint8_t addr[IPV6_ADDR_LENGTH];
- struct {
- uint64_t prefix;
- uint64_t interface_id;
- } part;
-} ip6_addr_t;
-
-typedef struct {
- uint8_t type;
- uint8_t pad[7];
- union {
- ip6_addr_t v6;
- char v4[4];
- } addr;
-} netaddr_t;
-
-/** \struct prefix_info
- *
- * List of Prefixes we have adresses from
- * Used for internal purposes, information derived from prefix option
- * in Router Advertisements
- * See RFC 4861 section 4.6.2
- */
-struct prefix_info {
- uint64_t prefix;
- uint8_t on_link:1, /* When set prefix can be used for on-link
- * determination */
- autoconf:1, /* Prefix can be used for stateless address
- * configuration */
- reserved1:6;
- uint32_t valid_lifetime; /* Time until prefix expires */
- uint32_t preferred_lifetime; /* Time until prefix becomes deprecated */
- uint32_t start_time; /* Time when received */
- uint32_t reserved2;
- struct prefix_info *next;
-};
-
-
-/* List of IPv6 addresses */
-struct ip6addr_list_entry {
- ip6_addr_t addr;
- struct prefix_info prfx_info;
- struct ip6addr_list_entry *next;
-};
-
-/** \struct ip6hdr
- * A header for IPv6 packets.
- * For more information see RFC 2460
- */
-struct ip6hdr {
- uint32_t ver_tc_fl; /**< Version, Traffic class, Flow label */
- uint16_t pl; /**< Payload length */
- uint8_t nh; /**< Next header */
- uint8_t hl; /**< Hop limit */
- ip6_addr_t src; /**< IPv6 source address */
- ip6_addr_t dst; /**< IPv6 destination address */
-} __attribute((packed));
-
-/** \struct packeth
- * Struct with pointers to headers within a packet
- */
-struct packeth {
- struct ethhdr *ethh;
- struct ip6hdr *ip6h;
- struct icmp6hdr *icmp6h;
- struct udphdr *udph;
- /* ... */
-};
-
-/** \struct parseip6_state
- * Stores information about state of IPv6 address parser
- */
-struct parseip6_state {
- char *lookahead;
- char *ptr;
- const char *addr;
- int state;
- int s1ctr;
- int s2ctr;
- int blocknr;
- int zeroblocks;
- int i;
- int done;
- int errorcode;
-};
-
-/** \struct ip6_config
- * Stores flags wheter we use Stateless- or Stateful Autoconfiguration or DHCPv6
- */
-struct ip6_config {
- uint8_t managed_mode:1,
- other_config:1,
- reserved:6;
-};
-
-/******************** VARIABLES **********************************************/
-/* Function pointer send_ip. Points either to send_ipv4() or send_ipv6() */
-extern int (*send_ip) (int fd, void *, int);
-
-extern struct ip6_config ip6_state;
-
-/******************** FUNCTIONS *********************************************/
-/* Handles IPv6-packets that are detected by receive_ether. */
-int8_t handle_ipv6(int fd, uint8_t * ip6_packet, uint32_t packetsize);
-
-/* Fill IPv6 header */
-void fill_ip6hdr(uint8_t * packet, uint16_t packetsize,
- uint8_t ip_proto, ip6_addr_t *ip6_src, ip6_addr_t *ip6_dst);
-
-/* Set own IPv6 address */
-void set_ipv6_address(int fd, ip6_addr_t *own_ip6);
-
-/* Get own IPv6 address */
-ip6_addr_t *get_ipv6_address(void);
-
-/* Create link-local address from a given Mac Address */
-ip6_addr_t * ip6_create_ll_address (const uint8_t *own_mac);
-
-/* For a given MAC calculates EUI64-Identifier.*/
-uint64_t mac2eui64 (const uint8_t *mac);
-
-/* Create empty element for prefix list and return a pointer to it */
-struct prefix_info * ip6_create_prefix_info(void);
-
-/* Create a new IPv6 address with a given network prefix
- * and add it to our IPv6 address list */
-void * ip6_prefix2addr (ip6_addr_t prefix);
-
-/* Compare IPv6 adresses */
-int8_t ip6_cmp( ip6_addr_t *ip_1, ip6_addr_t *ip_2 );
-
-/* Check if it is a link-local address */
-static inline int ip6_is_linklocal(ip6_addr_t *ip)
-{
- return (ip->part.prefix & IPV6_LL_PREFIX_MASK) == IPV6_LL_PREFIX;
-}
-
-/* Check if prefix is already in our list */
-int8_t unknown_prefix (ip6_addr_t *ip);
-
-/* Send IPv6 packet */
-int send_ipv6 (int fd, void* buffer, int len);
-
-/* Add IPv6 address to list */
-int8_t ip6addr_add (struct ip6addr_list_entry *new_address);
-
-/* Parse an IPv6 address */
-int parseip6(const char *addr, uint8_t *parsedaddr);
-int str_to_ipv6(const char *str, uint8_t *ip);
-void ipv6_to_str(const uint8_t *ip, char *str);
-
-#endif
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netlib/ndp.c b/qemu/roms/SLOF/clients/net-snk/app/netlib/ndp.c
deleted file mode 100644
index 96faa8716..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netlib/ndp.c
+++ /dev/null
@@ -1,166 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2013 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#include <stdlib.h>
-#include <string.h>
-#include <stdio.h>
-#include <netlib/ipv6.h>
-#include <netlib/icmpv6.h>
-#include <netlib/ndp.h>
-
-/* Neighbor cache */
-static struct neighbor *first_neighbor;
-static struct neighbor *last_neighbor;
-
-/* Router list */
-static struct router *first_router;
-static struct router *last_router;
-
-/*
- * NET: add new router to list
- * @param struct router nghb - new router
- * @return true or false
- */
-int8_t
-router_add (struct router *nghb )
-{
- if (nghb == NULL)
- return -1;
-
- if (first_router == NULL) {
- first_router= nghb;
- last_router = first_router;
- last_router->next = NULL;
- } else {
- last_router->next = nghb;
- last_router = nghb;
- last_router->next = NULL;
- }
- return 1; /* no error */
-}
-
-/*
- * NET: create a new router
- * @param uint8_t *packet - received packet (Ethernet/IPv6/ICMPv6/ND_NghSlct)
- * @param struct packeth - pointers to headers in packet
- * @return pointer to new router
- */
-void *
-router_create (uint8_t *mac, ip6_addr_t *ip)
-{
- struct router *new_router;
-
- new_router = malloc (sizeof(struct router));
- if( !new_router) {
- return 0;
- }
- memset (new_router, 0, sizeof(struct router));
-
- /* fill neighbor struct */
- memcpy (new_router->mac, mac, 6);
- memcpy (&(new_router->ip.addr[0]), &(ip->addr[0]), IPV6_ADDR_LENGTH);
-
- return new_router;
-}
-
-struct router *
-find_router( ip6_addr_t *ip )
-{
- struct router *n = NULL;
-
- for (n = first_router; n != NULL ; n=n->next)
- if (ip6_cmp (&(n->ip), ip))
- return n; /* router is already in list*/
-
- return NULL; /* router is unknown */
-}
-
-/*
- * NET: add new neighbor to list
- * @param struct neighbor nghb - new neighbor
- * @return true or false
- */
-int8_t
-neighbor_add (struct neighbor *nghb)
-{
- if (nghb == NULL)
- return -1;
-
- if (first_neighbor == NULL) {
- first_neighbor = nghb;
- last_neighbor = first_neighbor;
- last_neighbor->next = NULL;
- } else {
- last_neighbor->next = nghb;
- last_neighbor = nghb;
- last_neighbor->next = NULL;
- }
-
- return 1; /* no error */
-}
-
-/*
- * NET: create a new neighbor
- * @param uint8_t *packet - received packet (Ethernet/IPv6/ICMPv6/ND_NghSlct)
- * @param struct packeth - pointers to headers in packet
- * @return pointer - pointer to new neighbor
- * NULL - malloc failed
- */
-void *
-neighbor_create (uint8_t *packet, struct packeth *headers)
-{
- struct neighbor *new_neighbor;
-
- new_neighbor = malloc (sizeof(struct neighbor));
- if( !new_neighbor )
- return NULL;
-
- /* fill neighbor struct */
- memcpy (&(new_neighbor->mac),
- &(headers->ethh->src_mac[0]), 6);
- memcpy (&(new_neighbor->ip.addr), &(headers->ip6h->src), IPV6_ADDR_LENGTH);
- new_neighbor->status = NB_INCOMPLETE;
-
- return new_neighbor;
-}
-
-/**
- * NET: Find neighbor with given IPv6 address in Neighbor Cache
- *
- * @param ip - Pointer to IPv6 address
- * @return pointer - pointer to client IPv6 address (e.g. ::1)
- * NULL - Neighbor not found
- */
-struct neighbor *
-find_neighbor (ip6_addr_t *ip)
-{
- struct neighbor *n = NULL;
-
- for (n = first_neighbor; n != NULL ; n=n->next) {
- if (ip6_cmp (&(n->ip), ip)) {
- return n; /* neighbor is already in cache */
- }
- }
-
- return NULL; /* neighbor is unknown */
-}
-
-void ndp_init(void)
-{
- /* Router list */
- first_router = NULL;
- last_router = first_router;
-
- /* Init Neighbour cache */
- first_neighbor = NULL;
- last_neighbor = first_neighbor;
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netlib/ndp.h b/qemu/roms/SLOF/clients/net-snk/app/netlib/ndp.h
deleted file mode 100644
index c785c4897..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netlib/ndp.h
+++ /dev/null
@@ -1,71 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2013 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#ifndef _NDP_H_
-#define _NDP_H_
-
-#include <netlib/ipv6.h>
-
-#define __NDP_DEBUG__
-
-#ifdef __NDP_DEBUG__
-#define NDP_DEBUG_PRINT(format, ...) do { printf(format, ## __VA_ARGS__); } while (0)
-#else
-#define NDP_DEBUG_PRINT(format, ...)
-#endif
-
-#define ND_OPTION_SOURCE_LL_ADDR 1
-#define ND_OPTION_TARGET_LL_ADDR 2
-#define ND_OPTION_PREFIX_INFO 3
-#define ND_OPTION_REDIRECT_HDR 4
-#define ND_OPTION_MTU 5
-
-/* Default Router List */
-struct router {
- uint8_t mac[6];
- ip6_addr_t ip;
- uint32_t lifetime;
- uint32_t reachable_time;
- uint32_t retrans_timer;
- struct router *next;
-};
-
-/* Neighbor cache */
-struct neighbor {
- uint8_t mac[6];
- ip6_addr_t ip;
- uint8_t is_router;
- uint8_t status;
- uint8_t times_asked;
- /* ... */
- struct neighbor *next;
- uint8_t eth_frame[1500]; //FIXME
- uint32_t eth_len;
-
-#define NB_INCOMPLETE 1
-#define NB_REACHABLE 2
-#define NB_STALE 3
-#define NB_DELAY 4
-#define NB_PROBE 5
-};
-
-/******************** FUNCTIONS *********************************************/
-void ndp_init(void);
-int8_t neighbor_add (struct neighbor *);
-void * neighbor_create (uint8_t *packet, struct packeth *headers);
-struct neighbor * find_neighbor (ip6_addr_t *);
-
-int8_t router_add(struct router*);
-void * router_create(uint8_t *mac, ip6_addr_t *ip);
-struct router * find_router(ip6_addr_t *);
-
-#endif //_NDP_H_
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netlib/tcp.c b/qemu/roms/SLOF/clients/net-snk/app/netlib/tcp.c
deleted file mode 100644
index faa0b83ac..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netlib/tcp.c
+++ /dev/null
@@ -1,46 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-/************************ DEFINITIONS & DECLARATIONS *********************/
-
-#include <tcp.h>
-#include <sys/socket.h>
-
-/****************************** LOCAL VARIABLES **************************/
-
-/****************************** IMPLEMENTATION ***************************/
-
-/**
- * TCP: Handles TCP-packets according to Receive-handle diagram.
- *
- * @param tcp_packet TCP-packet to be handled
- * @param packetsize Length of the packet
- * @return ZERO - packet handled successfully;
- * NON ZERO - packet was not handled (e.g. bad format)
- */
-int8_t handle_tcp(uint8_t * tcp_packet, int32_t packetsize)
-{
- return -1;
-}
-
-/**
- * NET: This function handles situation when "Destination unreachable"
- * ICMP-error occurs during sending TCP-packet.
- *
- * @param err_code Error Code (e.g. "Host unreachable")
- * @param packet original TCP-packet
- * @param packetsize length of the packet
- * @see handle_icmp
- */
-void handle_tcp_dun(uint8_t * tcp_packet, uint32_t packetsize, uint8_t err_code)
-{
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netlib/tcp.h b/qemu/roms/SLOF/clients/net-snk/app/netlib/tcp.h
deleted file mode 100644
index 375afd771..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netlib/tcp.h
+++ /dev/null
@@ -1,27 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#ifndef _TCP_H
-#define _TCP_H
-
-#include <stdint.h>
-
-#define IPTYPE_TCP 6
-
-/* Handles TCP-packets that are detected by any network layer. */
-extern int8_t handle_tcp(uint8_t * udp_packet, int32_t packetsize);
-
-/* Handles TCP related ICMP-Dest.Unreachable packets that are detected by
- * the network layers. */
-extern void handle_tcp_dun(uint8_t * tcp_packet, uint32_t packetsize, uint8_t err_code);
-
-#endif
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netlib/tftp.c b/qemu/roms/SLOF/clients/net-snk/app/netlib/tftp.c
deleted file mode 100644
index c1197cf17..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netlib/tftp.c
+++ /dev/null
@@ -1,586 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#include <tftp.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <time.h>
-#include <sys/socket.h>
-
-#include <ethernet.h>
-#include <ipv4.h>
-#include <ipv6.h>
-#include <udp.h>
-
-//#define __DEBUG__
-
-#define MAX_BLOCKSIZE 1428
-#define BUFFER_LEN 256
-
-#define ENOTFOUND 1
-#define EACCESS 2
-#define EBADOP 4
-#define EBADID 5
-#define ENOUSER 7
-//#define EUNDEF 0
-//#define ENOSPACE 3
-//#define EEXISTS 6
-
-#define RRQ 1
-#define WRQ 2
-#define DATA 3
-#define ACK 4
-#define ERROR 5
-#define OACK 6
-
-/* Local variables */
-static unsigned char packet[BUFFER_LEN];
-static unsigned char *buffer = NULL;
-static unsigned short block = 0;
-static unsigned short blocksize;
-static char blocksize_str[6]; /* Blocksize string for read request */
-static int received_len = 0;
-static unsigned int retries = 0;
-static int huge_load;
-static int len;
-static int tftp_finished = 0;
-static int lost_packets = 0;
-static int tftp_errno = 0;
-static int ip_version = 0;
-static short port_number = -1;
-static tftp_err_t *tftp_err;
-static filename_ip_t *fn_ip;
-
-/**
- * dump_package - Prints a package.
- *
- * @package: package which is to print
- * @len: length of the package
- */
-#ifdef __DEBUG__
-
-static void dump_package(unsigned char *buffer, unsigned int len)
-{
- int i;
-
- for (i = 1; i <= len; i++) {
- printf("%02x%02x ", buffer[i - 1], buffer[i]);
- i++;
- if ((i % 16) == 0)
- printf("\n");
- }
- printf("\n");
-}
-#endif
-
-/**
- * send_rrq - Sends a read request package.
- *
- * @fd: Socket Descriptor
- */
-static void send_rrq(int fd)
-{
- int ip_len = 0;
- int ip6_payload_len = 0;
- unsigned short udp_len = 0;
- unsigned char mode[] = "octet";
- char *ptr = NULL;
- struct iphdr *ip = NULL;
- struct ip6hdr *ip6 = NULL;
- struct udphdr *udph = NULL;
- struct tftphdr *tftp = NULL;
-
- memset(packet, 0, BUFFER_LEN);
-
- if (4 == ip_version) {
- ip = (struct iphdr *) packet;
- udph = (struct udphdr *) (ip + 1);
- ip_len = sizeof(struct iphdr) + sizeof(struct udphdr)
- + strlen((char *) fn_ip->filename) + strlen((char *) mode) + 4
- + strlen("blksize") + strlen(blocksize_str) + 2;
- fill_iphdr ((uint8_t *) ip, ip_len, IPTYPE_UDP, 0,
- fn_ip->server_ip);
- }
- else if (6 == ip_version) {
- ip6 = (struct ip6hdr *) packet;
- udph = (struct udphdr *) (ip6 + 1);
- ip6_payload_len = sizeof(struct udphdr)
- + strlen((char *) fn_ip->filename) + strlen((char *) mode) + 4
- + strlen("blksize") + strlen(blocksize_str) + 2;
- ip_len = sizeof(struct ip6hdr) + ip6_payload_len;
- fill_ip6hdr ((uint8_t *) ip6, ip6_payload_len, IPTYPE_UDP, get_ipv6_address(),
- &(fn_ip->server_ip6));
-
- }
- udp_len = htons(sizeof(struct udphdr)
- + strlen((char *) fn_ip->filename) + strlen((char *) mode) + 4
- + strlen("blksize") + strlen(blocksize_str) + 2);
- fill_udphdr ((uint8_t *) udph, udp_len, htons(2001), htons(69));
-
- tftp = (struct tftphdr *) (udph + 1);
- tftp->th_opcode = htons(RRQ);
-
- ptr = (char *) &tftp->th_data;
- memcpy(ptr, fn_ip->filename, strlen((char *) fn_ip->filename) + 1);
-
- ptr += strlen((char *) fn_ip->filename) + 1;
- memcpy(ptr, mode, strlen((char *) mode) + 1);
-
- ptr += strlen((char *) mode) + 1;
- memcpy(ptr, "blksize", strlen("blksize") + 1);
-
- ptr += strlen("blksize") + 1;
- memcpy(ptr, blocksize_str, strlen(blocksize_str) + 1);
-
- send_ip (fd, packet, ip_len);
-
-#ifdef __DEBUG__
- printf("tftp RRQ with %d bytes transmitted.\n", ip_len);
-#endif
- return;
-}
-
-/**
- * send_ack - Sends a acknowlege package.
- *
- * @blckno: block number
- * @dport: UDP destination port
- */
-static void send_ack(int fd, int blckno, unsigned short dport)
-{
- int ip_len = 0;
- int ip6_payload_len = 0;
- unsigned short udp_len = 0;
- struct iphdr *ip = NULL;
- struct ip6hdr *ip6 = NULL;
- struct udphdr *udph = NULL;
- struct tftphdr *tftp = NULL;
-
- memset(packet, 0, BUFFER_LEN);
-
- if (4 == ip_version) {
- ip = (struct iphdr *) packet;
- udph = (struct udphdr *) (ip + 1);
- ip_len = sizeof(struct iphdr) + sizeof(struct udphdr) + 4;
- fill_iphdr ((uint8_t *) ip, ip_len, IPTYPE_UDP, 0,
- fn_ip->server_ip);
- }
- else if (6 == ip_version) {
- ip6 = (struct ip6hdr *) packet;
- udph = (struct udphdr *) (ip6 + 1);
- ip6_payload_len = sizeof(struct udphdr) + 4;
- ip_len = sizeof(struct ip6hdr) + ip6_payload_len;
- fill_ip6hdr ((uint8_t *) ip6, ip6_payload_len, IPTYPE_UDP, get_ipv6_address(),
- &(fn_ip->server_ip6));
- }
- udp_len = htons(sizeof(struct udphdr) + 4);
- fill_udphdr ((uint8_t *) udph, udp_len, htons(2001), htons(dport));
-
- tftp = (struct tftphdr *) (udph + 1);
- tftp->th_opcode = htons(ACK);
- tftp->th_data = htons(blckno);
-
- send_ip(fd, packet, ip_len);
-
-#ifdef __DEBUG__
- printf("tftp ACK %d bytes transmitted.\n", ip_len);
-#endif
-
- return;
-}
-
-/**
- * send_error - Sends an error package.
- *
- * @fd: Socket Descriptor
- * @error_code: Used sub code for error packet
- * @dport: UDP destination port
- */
-static void send_error(int fd, int error_code, unsigned short dport)
-{
- int ip_len = 0;
- int ip6_payload_len = 0;
- unsigned short udp_len = 0;
- struct ip6hdr *ip6 = NULL;
- struct iphdr *ip = NULL;
- struct udphdr *udph = NULL;
- struct tftphdr *tftp = NULL;
-
- memset(packet, 0, BUFFER_LEN);
-
- if (4 == ip_version) {
- ip = (struct iphdr *) packet;
- udph = (struct udphdr *) (ip + 1);
- ip_len = sizeof(struct iphdr) + sizeof(struct udphdr) + 5;
- fill_iphdr ((uint8_t *) ip, ip_len, IPTYPE_UDP, 0,
- fn_ip->server_ip);
- }
- else if (6 == ip_version) {
- ip6 = (struct ip6hdr *) packet;
- udph = (struct udphdr *) (ip6 + 1);
- ip6_payload_len = sizeof(struct udphdr) + 5;
- ip_len = sizeof(struct ip6hdr) + ip6_payload_len;
- fill_ip6hdr ((uint8_t *) ip6, ip6_payload_len, IPTYPE_UDP, get_ipv6_address(),
- &(fn_ip->server_ip6));
- }
- udp_len = htons(sizeof(struct udphdr) + 5);
- fill_udphdr ((uint8_t *) udph, udp_len, htons(2001), htons(dport));
-
- tftp = (struct tftphdr *) (udph + 1);
- tftp->th_opcode = htons(ERROR);
- tftp->th_data = htons(error_code);
- ((char *) &tftp->th_data)[2] = 0;
-
- send_ip(fd, packet, ip_len);
-
-#ifdef __DEBUG__
- printf("tftp ERROR %d bytes transmitted.\n", ip_len);
-#endif
-
- return;
-}
-
-static void print_progress(int urgent, int received_bytes)
-{
- static unsigned int i = 1;
- static int first = -1;
- static int last_bytes = 0;
- char buffer[100];
- char *ptr;
-
- // 1MB steps or 0x400 times or urgent
- if(((received_bytes - last_bytes) >> 20) > 0
- || (i & 0x3FF) == 0 || urgent) {
- if(!first) {
- sprintf(buffer, "%d KBytes", (last_bytes >> 10));
- for(ptr = buffer; *ptr != 0; ++ptr)
- *ptr = '\b';
- printf(buffer);
- }
- printf("%d KBytes", (received_bytes >> 10));
- i = 1;
- first = 0;
- last_bytes = received_bytes;
- }
- ++i;
-}
-
-/**
- * get_blksize tries to extract the blksize from the OACK package
- * the TFTP returned. From RFC 1782
- * The OACK packet has the following format:
- *
- * +-------+---~~---+---+---~~---+---+---~~---+---+---~~---+---+
- * | opc | opt1 | 0 | value1 | 0 | optN | 0 | valueN | 0 |
- * +-------+---~~---+---+---~~---+---+---~~---+---+---~~---+---+
- *
- * @param buffer the network packet
- * @param len the length of the network packet
- * @return the blocksize the server supports or 0 for error
- */
-static int get_blksize(unsigned char *buffer, unsigned int len)
-{
- unsigned char *orig = buffer;
- /* skip all headers until tftp has been reached */
- buffer += sizeof(struct udphdr);
- /* skip opc */
- buffer += 2;
- while (buffer < orig + len) {
- if (!memcmp(buffer, "blksize", strlen("blksize") + 1))
- return (unsigned short) strtoul((char *) (buffer +
- strlen("blksize") + 1),
- (char **) NULL, 10);
- else {
- /* skip the option name */
- buffer = (unsigned char *) strchr((char *) buffer, 0);
- if (!buffer)
- return 0;
- buffer++;
- /* skip the option value */
- buffer = (unsigned char *) strchr((char *) buffer, 0);
- if (!buffer)
- return 0;
- buffer++;
- }
- }
- return 0;
-}
-
-/**
- * Handle incoming tftp packets after read request was sent
- *
- * this function also prints out some status characters
- * \|-/ for each packet received
- * A for an arp packet
- * I for an ICMP packet
- * #+* for different unexpected TFTP packets (not very good)
- *
- * @param fd socket descriptor
- * @param packet points to the UDP header of the packet
- * @param len the length of the network packet
- * @return ZERO if packet was handled successfully
- * ERRORCODE if error occurred
- */
-int32_t handle_tftp(int fd, uint8_t *pkt, int32_t packetsize)
-{
- struct udphdr *udph;
- struct tftphdr *tftp;
-
- /* buffer is only set if we are handling TFTP */
- if (buffer == NULL )
- return 0;
-
-#ifndef __DEBUG__
- print_progress(0, received_len);
-#endif
- udph = (struct udphdr *) pkt;
- tftp = (struct tftphdr *) ((void *) udph + sizeof(struct udphdr));
- set_timer(TICKS_SEC);
-
-#ifdef __DEBUG__
- dump_package(pkt, packetsize);
-#endif
-
- port_number = udph->uh_sport;
- if (tftp->th_opcode == htons(OACK)) {
- /* an OACK means that the server answers our blocksize request */
- blocksize = get_blksize(pkt, packetsize);
- if (!blocksize || blocksize > MAX_BLOCKSIZE) {
- send_error(fd, 8, port_number);
- tftp_errno = -8;
- goto error;
- }
- send_ack(fd, 0, port_number);
- } else if (tftp->th_opcode == htons(ACK)) {
- /* an ACK means that the server did not answers
- * our blocksize request, therefore we will set the blocksize
- * to the default value of 512 */
- blocksize = 512;
- send_ack(fd, 0, port_number);
- } else if ((unsigned char) tftp->th_opcode == ERROR) {
-#ifdef __DEBUG__
- printf("tftp->th_opcode : %x\n", tftp->th_opcode);
- printf("tftp->th_data : %x\n", tftp->th_data);
-#endif
- switch ( (uint8_t) tftp->th_data) {
- case ENOTFOUND:
- tftp_errno = -3; // ERROR: file not found
- break;
- case EACCESS:
- tftp_errno = -4; // ERROR: access violation
- break;
- case EBADOP:
- tftp_errno = -5; // ERROR: illegal TFTP operation
- break;
- case EBADID:
- tftp_errno = -6; // ERROR: unknown transfer ID
- break;
- case ENOUSER:
- tftp_errno = -7; // ERROR: no such user
- break;
- default:
- tftp_errno = -1; // ERROR: unknown error
- }
- goto error;
- } else if (tftp->th_opcode == DATA) {
- /* DATA PACKAGE */
- if (block + 1 == tftp->th_data) {
- ++block;
- }
- else if( block == 0xffff && huge_load != 0
- && (tftp->th_data == 0 || tftp->th_data == 1) ) {
- block = tftp->th_data;
- }
- else if (tftp->th_data == block) {
-#ifdef __DEBUG__
- printf
- ("\nTFTP: Received block %x, expected block was %x\n",
- tftp->th_data, block + 1);
- printf("\b+ ");
-#endif
- send_ack(fd, tftp->th_data, port_number);
- lost_packets++;
- tftp_err->bad_tftp_packets++;
- return 0;
- } else if (tftp->th_data < block) {
-#ifdef __DEBUG__
- printf
- ("\nTFTP: Received block %x, expected block was %x\n",
- tftp->th_data, block + 1);
- printf("\b* ");
-#endif
- /* This means that an old data packet appears (again);
- * this happens sometimes if we don't answer fast enough
- * and a timeout is generated on the server side;
- * as we already have this packet we just ignore it */
- tftp_err->bad_tftp_packets++;
- return 0;
- } else {
- tftp_err->blocks_missed = block + 1;
- tftp_err->blocks_received = tftp->th_data;
- tftp_errno = -42;
- goto error;
- }
- tftp_err->bad_tftp_packets = 0;
- /* check if our buffer is large enough */
- if (received_len + udph->uh_ulen - 12 > len) {
- tftp_errno = -2;
- goto error;
- }
- memcpy(buffer + received_len, &tftp->th_data + 1,
- udph->uh_ulen - 12);
- send_ack(fd, tftp->th_data, port_number);
- received_len += udph->uh_ulen - 12;
- /* Last packet reached if the payload of the UDP packet
- * is smaller than blocksize + 12
- * 12 = UDP header (8) + 4 bytes TFTP payload */
- if (udph->uh_ulen < blocksize + 12) {
- tftp_finished = 1;
- return 0;
- }
- /* 0xffff is the highest block number possible
- * see the TFTP RFCs */
-
- if (block >= 0xffff && huge_load == 0) {
- tftp_errno = -9;
- goto error;
- }
- } else {
-#ifdef __DEBUG__
- printf("Unknown packet %x\n", tftp->th_opcode);
- printf("\b# ");
-#endif
- tftp_err->bad_tftp_packets++;
- return 0;
- }
-
- return 0;
-
-error:
-#ifdef __DEBUG__
- printf("\nTFTP errno: %d\n", tftp_errno);
-#endif
- tftp_finished = 1;
- return tftp_errno;
-}
-
-/**
- * TFTP: This function handles situation when "Destination unreachable"
- * ICMP-error occurs during sending TFTP-packet.
- *
- * @param err_code Error Code (e.g. "Host unreachable")
- */
-void handle_tftp_dun(uint8_t err_code)
-{
- tftp_errno = - err_code - 10;
- tftp_finished = 1;
-}
-
-/**
- * TFTP: Interface function to load files via TFTP.
- *
- * @param _fn_ip contains the following configuration information:
- * client IP, TFTP-server IP, filename to be loaded
- * @param _buffer destination buffer for the file
- * @param _len size of destination buffer
- * @param _retries max number of retries
- * @param _tftp_err contains info about TFTP-errors (e.g. lost packets)
- * @param _mode NON ZERO - multicast, ZERO - unicast
- * @param _blocksize blocksize for DATA-packets
- * @return ZERO - error condition occurs
- * NON ZERO - size of received file
- */
-int tftp(filename_ip_t * _fn_ip, unsigned char *_buffer, int _len,
- unsigned int _retries, tftp_err_t * _tftp_err,
- int32_t _mode, int32_t _blocksize, int _ip_version)
-{
- retries = _retries;
- fn_ip = _fn_ip;
- len = _len;
- huge_load = _mode;
- ip_version = _ip_version;
- tftp_errno = 0;
- tftp_err = _tftp_err;
- tftp_err->bad_tftp_packets = 0;
- tftp_err->no_packets = 0;
-
- /* Default blocksize must be 512 for TFTP servers
- * which do not support the RRQ blocksize option */
- blocksize = 512;
-
- /* Preferred blocksize - used as option for the read request */
- if (_blocksize < 8)
- _blocksize = 8;
- else if (_blocksize > MAX_BLOCKSIZE)
- _blocksize = MAX_BLOCKSIZE;
- sprintf(blocksize_str, "%d", _blocksize);
-
- printf(" Receiving data: ");
- print_progress(-1, 0);
-
- // Setting buffer to a non-zero address enabled handling of received TFTP packets.
- buffer = _buffer;
-
- set_timer(TICKS_SEC);
- send_rrq(fn_ip->fd);
-
- while (! tftp_finished) {
- /* if timeout (no packet received) */
- if(get_timer() <= 0) {
- /* the server doesn't seem to retry let's help out a bit */
- if (tftp_err->no_packets > 4 && port_number != -1
- && block > 1) {
- send_ack(fn_ip->fd, block, port_number);
- }
- else if (port_number == -1 && block == 0
- && (tftp_err->no_packets&3) == 3) {
- printf("\nRepeating TFTP read request...\n");
- send_rrq(fn_ip->fd);
- }
- tftp_err->no_packets++;
- set_timer(TICKS_SEC);
- }
-
- /* handle received packets */
- receive_ether(fn_ip->fd);
-
- /* bad_tftp_packets are counted whenever we receive a TFTP packet
- * which was not expected; if this gets larger than 'retries'
- * we just exit */
- if (tftp_err->bad_tftp_packets > retries) {
- tftp_errno = -40;
- break;
- }
-
- /* no_packets counts the times we have returned from receive_ether()
- * without any packet received; if this gets larger than 'retries'
- * we also just exit */
- if (tftp_err->no_packets > retries) {
- tftp_errno = -41;
- break;
- }
- }
-
- // Setting buffer to NULL disables handling of received TFTP packets.
- buffer = NULL;
-
- if (tftp_errno)
- return tftp_errno;
-
- print_progress(-1, received_len);
- printf("\n");
- if (lost_packets)
- printf("Lost ACK packets: %d\n", lost_packets);
-
- return received_len;
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netlib/tftp.h b/qemu/roms/SLOF/clients/net-snk/app/netlib/tftp.h
deleted file mode 100644
index 1cf1266fb..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netlib/tftp.h
+++ /dev/null
@@ -1,51 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-
-#ifndef _TFTP_H_
-#define _TFTP_H_
-
-#include <stdint.h>
-#include <netlib/ipv6.h>
-
-struct tftphdr {
- int16_t th_opcode;
- uint16_t th_data;
-};
-
-typedef struct {
- uint32_t own_ip;
- ip6_addr_t own_ip6;
- uint32_t server_ip;
- ip6_addr_t server_ip6;
- ip6_addr_t dns_ip6;
- int8_t filename[256];
- int fd;
-} __attribute__ ((packed)) filename_ip_t ;
-
-typedef struct {
- uint32_t bad_tftp_packets;
- uint32_t no_packets;
- uint32_t blocks_missed;
- uint32_t blocks_received;
-} tftp_err_t;
-
-int tftp(filename_ip_t *, unsigned char *, int, unsigned int,
- tftp_err_t *, int32_t mode, int32_t blocksize, int ip_version);
-int tftp_netsave(filename_ip_t *, uint8_t * buffer, int len,
- int use_ci, unsigned int retries, tftp_err_t * tftp_err);
-
-int32_t handle_tftp(int fd, uint8_t *, int32_t);
-void handle_tftp_dun(uint8_t err_code);
-int parse_tftp_args(char buffer[], char *server_ip, char filename[], int fd, int len);
-
-#endif
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netlib/udp.c b/qemu/roms/SLOF/clients/net-snk/app/netlib/udp.c
deleted file mode 100644
index 5d16e52c6..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netlib/udp.c
+++ /dev/null
@@ -1,153 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-/************************ DEFINITIONS & DECLARATIONS *********************/
-
-#include <udp.h>
-#include <sys/socket.h>
-#include <dhcp.h>
-#include <dhcpv6.h>
-#include <dns.h>
-#ifdef USE_MTFTP
-#include <mtftp.h>
-#else
-#include <tftp.h>
-#endif
-
-
-
-/****************************** LOCAL VARIABLES **************************/
-
-
-#ifdef USE_MTFTP
-
-uint16_t net_tftp_uport;
-uint16_t net_mtftp_uport;
-
-void net_set_tftp_port(uint16_t tftp_port)
-{
- net_tftp_uport = tftp_port;
-}
-
-void net_set_mtftp_port(uint16_t tftp_port)
-{
- net_mtftp_uport = tftp_port;
-}
-
-#endif
-
-/****************************** IMPLEMENTATION ***************************/
-
-
-/**
- * NET: Handles UDP-packets according to Receive-handle diagram.
- *
- * @param udp_packet UDP-packet to be handled
- * @param packetsize Length of the packet
- * @return ZERO - packet handled successfully;
- * NON ZERO - packet was not handled (e.g. bad format)
- * @see receive_ether
- * @see udphdr
- */
-int8_t handle_udp(int fd, uint8_t * udp_packet, uint32_t packetsize)
-{
- struct udphdr * udph = (struct udphdr *) udp_packet;
-
- if (packetsize < sizeof(struct udphdr))
- return -1; // packet is too small
-
- switch (htons(udph -> uh_dport)) {
- case UDPPORT_BOOTPC:
- if (udph -> uh_sport == htons(UDPPORT_BOOTPS))
- return handle_dhcp(fd, udp_packet + sizeof(struct udphdr),
- packetsize - sizeof(struct udphdr));
- else
- return -1;
- case UDPPORT_DNSC:
- if (udph -> uh_sport == htons(UDPPORT_DNSS))
- return handle_dns(udp_packet + sizeof(struct udphdr),
- packetsize - sizeof(struct udphdr));
- else
- return -1;
- case UDPPORT_DHCPV6C:
- return handle_dhcpv6(udp_packet+sizeof(struct udphdr),
- packetsize - sizeof(struct udphdr));
- case UDPPORT_TFTPC:
-#ifdef USE_MTFTP
- return handle_tftp(fd, udp_packet + sizeof(struct udphdr),
- packetsize - sizeof(struct udphdr));
-#else
- return handle_tftp(fd, udp_packet, packetsize);
-#endif
- default:
-#ifdef USE_MTFTP
- if (htons(udph -> uh_dport) == net_tftp_uport)
- return handle_tftp(fd, udp_packet + sizeof(struct udphdr),
- packetsize - sizeof(struct udphdr));
- else if (htons(udph -> uh_dport) == net_mtftp_uport)
- return handle_tftp(fd, udp_packet + sizeof(struct udphdr),
- packetsize - sizeof(struct udphdr));
-#endif
- return -1;
- }
-}
-
-/**
- * NET: This function handles situation when "Destination unreachable"
- * ICMP-error occurs during sending UDP-packet.
- *
- * @param err_code Error Code (e.g. "Host unreachable")
- * @param packet original UDP-packet
- * @param packetsize length of the packet
- * @see handle_icmp
- */
-void handle_udp_dun(uint8_t * udp_packet, uint32_t packetsize, uint8_t err_code)
-{
- struct udphdr * udph = (struct udphdr *) udp_packet;
-
- if (packetsize < sizeof(struct udphdr))
- return; // packet is too small
-
- switch (htons(udph -> uh_sport)) {
- case UDPPORT_TFTPC:
- handle_tftp_dun(err_code);
- break;
- }
-}
-
-/**
- * NET: Creates UDP-packet. Places UDP-header in a packet and fills it
- * with corresponding information.
- * <p>
- * Use this function with similar functions for other network layers
- * (fill_ethhdr, fill_iphdr, fill_dnshdr, fill_btphdr).
- *
- * @param packet Points to the place where UDP-header must be placed.
- * @param packetsize Size of the packet in bytes incl. this hdr and data.
- * @param src_port UDP source port
- * @param dest_port UDP destination port
- * @see udphdr
- * @see fill_ethhdr
- * @see fill_iphdr
- * @see fill_dnshdr
- * @see fill_btphdr
- */
-void fill_udphdr(uint8_t * packet, uint16_t packetsize,
- uint16_t src_port, uint16_t dest_port)
-{
- struct udphdr * udph = (struct udphdr *) packet;
-
- udph -> uh_sport = htons(src_port);
- udph -> uh_dport = htons(dest_port);
- udph -> uh_ulen = htons(packetsize);
- udph -> uh_sum = htons(0);
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/app/netlib/udp.h b/qemu/roms/SLOF/clients/net-snk/app/netlib/udp.h
deleted file mode 100644
index f154542dd..000000000
--- a/qemu/roms/SLOF/clients/net-snk/app/netlib/udp.h
+++ /dev/null
@@ -1,58 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#ifndef _UDP_H
-#define _UDP_H
-
-#include <stdint.h>
-
-#define IPTYPE_UDP 17
-
-#define UDPPORT_BOOTPS 67 /**< UDP port of BootP/DHCP-server */
-#define UDPPORT_BOOTPC 68 /**< UDP port of BootP/DHCP-client */
-#define UDPPORT_DNSS 53 /**< UDP port of DNS-server */
-#define UDPPORT_DNSC 32769 /**< UDP port of DNS-client */
-#define UDPPORT_TFTPC 2001 /**< UDP port of TFTP-client */
-#define UDPPORT_DHCPV6C 546 /**< UDP port of DHCPv6-client */
-
-/** \struct udphdr
- * A header for UDP-packets.
- * For more information see RFC 768.
- */
-struct udphdr {
- uint16_t uh_sport; /**< Source port */
- uint16_t uh_dport; /**< Destinantion port */
- uint16_t uh_ulen; /**< Length in octets, incl. this header and data */
- uint16_t uh_sum; /**< Checksum */
-};
-typedef struct udphdr udp_hdr_t;
-
-typedef int32_t *(*handle_upper_udp_t)(uint8_t *, int32_t);
-typedef void *(*handle_upper_udp_dun_t)(uint8_t);
-
-/* Handles UDP-packets that are detected by any network layer. */
-extern int8_t handle_udp(int fd, uint8_t * udp_packet, uint32_t packetsize);
-
-/* Handles UDP related ICMP-Dest.Unreachable packets that are detected by
- * the network layers. */
-extern void handle_udp_dun(uint8_t * udp_packet, uint32_t packetsize, uint8_t err_code);
-
-/* fills udp header */
-extern void fill_udphdr(uint8_t *packet, uint16_t packetsize,
- uint16_t src_port, uint16_t dest_port);
-
-#ifdef USE_MTFTP
-extern void net_set_tftp_port(uint16_t tftp_port);
-extern void net_set_mtftp_port(uint16_t tftp_port);
-#endif
-
-#endif
diff --git a/qemu/roms/SLOF/clients/net-snk/client.lds b/qemu/roms/SLOF/clients/net-snk/client.lds
deleted file mode 100644
index c2086445b..000000000
--- a/qemu/roms/SLOF/clients/net-snk/client.lds
+++ /dev/null
@@ -1,85 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-OUTPUT_FORMAT("elf64-powerpc", "elf64-powerpc", "elf64-powerpc")
-OUTPUT_ARCH(powerpc:common64)
-ENTRY(_entry)
-
-SECTIONS {
- . = 0xF000100;
- .text :
- {
- __client_start = .;
- *(.text* .stub .gnu.linkonce.t.*)
- *(.sfpr .glink)
- }
-
- . = ALIGN(0x100);
- .rodata :
- {
- *(.rodata* .gnu.linkonce.r.*)
- }
-
- . = ALIGN(0x10);
- .data :
- {
- *(.data* .gnu.linkonce.d.*)
- *(.force.data)
- *(.toc1)
- *(.branch_lt)
- }
-
- . = ALIGN(0x10);
- .opd :
- {
- *(.opd)
- }
-
- . = ALIGN(256);
- .got :
- {
- _got = DEFINED (.TOC.) ? .TOC. : ADDR (.got) + 0x8000;
- *(.got)
- *(.toc)
- _got_end = .;
- }
-
- . = ALIGN(0x1000);
- .bss :
- {
- *(*COM* .bss* .gnu.linkonce.b.*)
- }
- __client_end = .;
-
- .dynsym : { *(.dynsym) }
- .dynstr : { *(.dynstr) }
- . = ALIGN(0x10);
- .dynamic : {
- *(.dynamic)
- }
- . = ALIGN(0x10);
- .rela.dyn : {
- *(.rela*)
- }
- .hash : { *(.hash) }
-
- .comment : {
- /*
- * Discarding this section caused errors on binutils 2.23,
- * this is fixed in 2.24.
- */
- *(.comment)
- }
- /DISCARD/ : {
- *(.interp)
- }
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/include/crt0.h b/qemu/roms/SLOF/clients/net-snk/include/crt0.h
deleted file mode 100644
index d8fce05c9..000000000
--- a/qemu/roms/SLOF/clients/net-snk/include/crt0.h
+++ /dev/null
@@ -1,20 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-
-#ifndef _CRT0_H
-#define _CRT0_H
-
-int gen_argv(const char *, int, char **);
-
-
-#endif
diff --git a/qemu/roms/SLOF/clients/net-snk/include/fcntl.h b/qemu/roms/SLOF/clients/net-snk/include/fcntl.h
deleted file mode 100644
index 69de2cea3..000000000
--- a/qemu/roms/SLOF/clients/net-snk/include/fcntl.h
+++ /dev/null
@@ -1,25 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-
-#ifndef _FCNTL_H
-#define _FCNTL_H
-
-#define O_RDONLY 00
-#define O_WRONLY 01
-#define O_RDRW 02
-
-#define SEEK_SET 0
-#define SEEK_CUR 1
-#define SEEK_END 2
-
-#endif /* fcntl.h */
diff --git a/qemu/roms/SLOF/clients/net-snk/include/fileio.h b/qemu/roms/SLOF/clients/net-snk/include/fileio.h
deleted file mode 100644
index 50f9650b2..000000000
--- a/qemu/roms/SLOF/clients/net-snk/include/fileio.h
+++ /dev/null
@@ -1,31 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#ifndef FILEIO_H
-#define FILEIO_H
-
-#include <of.h>
-
-#define FILEIO_TYPE_EMPTY 0
-#define FILEIO_TYPE_FILE 1
-#define FILEIO_TYPE_SOCKET 2
-
-struct snk_fileio_type {
- int type;
- ihandle_t ih;
-};
-typedef struct snk_fileio_type snk_fileio_t;
-
-#define FILEIO_MAX 32
-extern snk_fileio_t fd_array[FILEIO_MAX];
-
-#endif
diff --git a/qemu/roms/SLOF/clients/net-snk/include/kernel.h b/qemu/roms/SLOF/clients/net-snk/include/kernel.h
deleted file mode 100644
index 4d6be2dc2..000000000
--- a/qemu/roms/SLOF/clients/net-snk/include/kernel.h
+++ /dev/null
@@ -1,33 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#ifndef KERNEL_H
-#define KERNEL_H
-
-#include <stddef.h>
-#include <stdint.h>
-#include <unistd.h>
-#include <string.h>
-#include <stdio.h>
-#include <of.h>
-
-uint64_t get_time(void);
-int getchar(void);
-
-void *malloc_aligned(size_t size, int align);
-
-int pre_open_ih(int fd, ihandle_t ih);
-
-void exception_forward(void);
-void undo_exception(void);
-
-#endif
diff --git a/qemu/roms/SLOF/clients/net-snk/include/of.h b/qemu/roms/SLOF/clients/net-snk/include/of.h
deleted file mode 100644
index 22411ff98..000000000
--- a/qemu/roms/SLOF/clients/net-snk/include/of.h
+++ /dev/null
@@ -1,70 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#ifndef OF_H
-#define OF_H
-
-#include <stdint.h>
-#include <stddef.h>
-
-#define p32 int
-#define p32cast (int) (unsigned long) (void*)
-
-#define phandle_t p32
-#define ihandle_t p32
-
-typedef struct
-{
- unsigned int serv;
- int nargs;
- int nrets;
- unsigned int args[16];
-} of_arg_t;
-
-
-phandle_t of_finddevice (const char *);
-phandle_t of_peer (phandle_t);
-phandle_t of_child (phandle_t);
-phandle_t of_parent (phandle_t);
-phandle_t of_instance_to_package(ihandle_t ihandle);
-int of_getprop (phandle_t, const char *, void *, int);
-void * of_call_method_3 (const char *, ihandle_t, int);
-int of_test(const char *name);
-int of_interpret_1(void *s, void *ret);
-
-ihandle_t of_open (const char *);
-void of_close(ihandle_t);
-int of_read (ihandle_t , void*, int);
-int of_write (ihandle_t, void*, int);
-int of_seek (ihandle_t, int, int);
-
-void * of_claim(void *, unsigned int , unsigned int );
-void of_release(void *, unsigned int );
-
-int of_yield(void);
-void * of_set_callback(void *);
-
-unsigned int romfs_lookup(const char *, void **);
-int vpd_read(unsigned int , unsigned int , char *);
-int vpd_write(unsigned int , unsigned int , char *);
-int write_mm_log(char *, unsigned int , unsigned short );
-
-int of_get_mac(phandle_t device, char *mac);
-uint64_t get_puid(phandle_t node);
-void translate_address_dev(uint64_t *, phandle_t);
-void translate_address(unsigned long *addr);
-
-int of_glue_init(unsigned int * timebase,
- size_t _client_start, size_t _client_size);
-void of_glue_release(void);
-
-#endif
diff --git a/qemu/roms/SLOF/clients/net-snk/include/pci.h b/qemu/roms/SLOF/clients/net-snk/include/pci.h
deleted file mode 100644
index cf584c348..000000000
--- a/qemu/roms/SLOF/clients/net-snk/include/pci.h
+++ /dev/null
@@ -1,20 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-
-#ifndef _PCI_H
-#define _PCI_H
-
-unsigned int read_io(void *addr, size_t sz);
-int write_io(void *addr, unsigned int value, size_t sz);
-
-#endif
diff --git a/qemu/roms/SLOF/clients/net-snk/include/rtas.h b/qemu/roms/SLOF/clients/net-snk/include/rtas.h
deleted file mode 100644
index 25cabf4d6..000000000
--- a/qemu/roms/SLOF/clients/net-snk/include/rtas.h
+++ /dev/null
@@ -1,45 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-
-#ifndef RTAS_H
-#define RTAS_H
-
-#include "of.h"
-
-typedef struct dtime {
- unsigned int year;
- unsigned int month;
- unsigned int day;
- unsigned int hour;
- unsigned int minute;
- unsigned int second;
- unsigned int nano;
-} dtime;
-
-typedef void (*thread_t) (int);
-
-int rtas_token(const char *);
-int rtas_call(int, int, int, int *, ...);
-void rtas_init(void);
-int rtas_pci_config_read (long long, int, int, int, int);
-int rtas_pci_config_write (long long, int, int, int, int, int);
-int rtas_set_time_of_day(dtime *);
-int rtas_get_time_of_day(dtime *);
-int rtas_ibm_update_flash_64(long long, long long);
-int rtas_ibm_update_flash_64_and_reboot(long long, long long);
-int rtas_system_reboot(void);
-int rtas_start_cpu (int, thread_t, int);
-int rtas_stop_self (void);
-int rtas_ibm_manage_flash(int);
-
-#endif
diff --git a/qemu/roms/SLOF/clients/net-snk/include/sys/socket.h b/qemu/roms/SLOF/clients/net-snk/include/sys/socket.h
deleted file mode 100644
index e9175be37..000000000
--- a/qemu/roms/SLOF/clients/net-snk/include/sys/socket.h
+++ /dev/null
@@ -1,53 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-
-#ifndef _SOCKET_H
-#define _SOCKET_H
-#include <stdint.h>
-
-#define AF_PACKET 0
-#define AF_INET 1
-#define AF_INET6 2
-
-#define SOCK_RAW 0
-#define SOCK_PACKET 1
-#define SOCK_DGRAM 2
-#define SOCK_STREAM 3
-
-#define INADDR_ANY 0xFFFFFFFF
-
-#define IPPROTO_UDP 1
-
-#define ETH_ALEN 6 /**< HW address length */
-
-struct sockaddr {
- uint16_t tra_port;
-
- uint16_t ipv4_proto;
- uint32_t ipv4_addr;
-
- // protocol field is only used by "connect"-handler
- uint16_t llc_proto;
- uint8_t mac_addr[ETH_ALEN];
-};
-
-int socket(int, int, int, char *);
-int sendto(int, const void *, int, int, const void *, int);
-int send(int, const void *, int, int);
-int recv(int, void *, int, int);
-
-#define htonl(x) x
-#define htons(x) x
-
-#endif
-
diff --git a/qemu/roms/SLOF/clients/net-snk/include/time.h b/qemu/roms/SLOF/clients/net-snk/include/time.h
deleted file mode 100644
index 14d1c4c57..000000000
--- a/qemu/roms/SLOF/clients/net-snk/include/time.h
+++ /dev/null
@@ -1,36 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-
-#ifndef _TIME_H_
-#define _TIME_H_
-
-typedef unsigned long clock_t;
-typedef unsigned long time_t;
-
-time_t time(time_t *);
-
-extern unsigned long tb_freq;
-
-/* setup the timer to start counting from the given parameter */
-void set_timer(int);
-/* read the current value from the decrementer */
-int get_timer(void);
-/* get the number of ticks for which the decrementer needs 1 second */
-int get_sec_ticks(void);
-/* get the number of ticks for which the decrementer needs 1 millisecond */
-int get_msec_ticks(void);
-
-#define TICKS_MSEC get_msec_ticks()
-#define TICKS_SEC get_sec_ticks()
-
-#endif
diff --git a/qemu/roms/SLOF/clients/net-snk/kernel/Makefile b/qemu/roms/SLOF/clients/net-snk/kernel/Makefile
deleted file mode 100644
index c4b8164ca..000000000
--- a/qemu/roms/SLOF/clients/net-snk/kernel/Makefile
+++ /dev/null
@@ -1,31 +0,0 @@
-# *****************************************************************************
-# * Copyright (c) 2004, 2008 IBM Corporation
-# * All rights reserved.
-# * This program and the accompanying materials
-# * are made available under the terms of the BSD License
-# * which accompanies this distribution, and is available at
-# * http://www.opensource.org/licenses/bsd-license.php
-# *
-# * Contributors:
-# * IBM Corporation - initial implementation
-# ****************************************************************************/
-
-
-ifndef TOP
- TOP = $(shell while ! test -e make.rules; do cd .. ; done; pwd)
- export TOP
-endif
-include $(TOP)/make.rules
-
-OBJS = init.o systemcall.o crt0.o timer.o
-OBJS2 = entry.o
-
-all: kernel.o
-
-kernel.o: $(OBJS) $(OBJS2)
- $(LD) $(LDFLAGS) $(OBJS) $(OBJS2) -o $@ -r
-
-clean:
- $(RM) -f *.o *.a *.i
-
-include $(TOP)/make.depend
diff --git a/qemu/roms/SLOF/clients/net-snk/kernel/crt0.c b/qemu/roms/SLOF/clients/net-snk/kernel/crt0.c
deleted file mode 100644
index a292273b0..000000000
--- a/qemu/roms/SLOF/clients/net-snk/kernel/crt0.c
+++ /dev/null
@@ -1,78 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#include <stdlib.h>
-#include <string.h>
-
-extern int main (int, char**);
-extern int callback (int, char **);
-
-int _start(char *arg_string, long len);
-unsigned long callback_entry(void *base, unsigned long len);
-
-
-#define MAX_ARGV 10
-static int
-gen_argv(const char *arg_string, int len, char* argv[])
-{
- const char *str, *str_end, *arg_string_end = arg_string + len;
- int i;
-
- str = arg_string;
- for (i = 0; i < MAX_ARGV; i++)
- {
- str_end = str;
-
- while((*str_end++ != ' ') && (str_end <= arg_string_end));
-
- argv[i] = malloc(str_end-str);
-
- memcpy (argv[i], str, str_end-str-1);
- argv[i][str_end-str-1] = '\0';
- str = str_end-1;
- while(*(++str) == ' ');
- if (str >= arg_string_end)
- break;
- }
- return i+1;
-}
-
-
-
-int
-_start(char * arg_string, long len)
-{
- int rc;
- int argc;
- char* argv[MAX_ARGV];
-
- argc = gen_argv(arg_string, len, argv);
-
- rc = main(argc, argv);
-
- return rc;
-}
-
-/*
- * Takes a Forth representation of a string and generates an argument array,
- * then calls callback().
- */
-unsigned long
-callback_entry(void *base, unsigned long len) {
- char *argv[MAX_ARGV];
- int argc;
-
- argc = gen_argv(base, len, argv);
-
- return (callback(argc, argv));
-}
-
diff --git a/qemu/roms/SLOF/clients/net-snk/kernel/entry.S b/qemu/roms/SLOF/clients/net-snk/kernel/entry.S
deleted file mode 100644
index bf10542bd..000000000
--- a/qemu/roms/SLOF/clients/net-snk/kernel/entry.S
+++ /dev/null
@@ -1,127 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#define STACKSIZE 0x100000
-#include <macros.h>
-
-
- .section ".toc","aw" # TOC entries are needed for relocation
-.exception_stack_frame_toc:
- .tc exception_stack_frame[TC],exception_stack_frame
-.exit_sp_toc:
- .tc _exit_sp[TC],_exit_sp
-.prom_entry_toc:
- .tc _prom_entry[TC],_prom_entry
-
- .previous
-
-
-/*
-Function:
- Input:
- r3:
- r4:
- r5: prom entry
- Output:
-
-Decription: Main entry point, called from OF
-
-*/
-C_ENTRY(_entry)
- mr r3, r6 # parm 0 passed in r6
- mr r4, r7 # parm 1 passed in r7
- mr r6, r1 # save stack pointer
- mflr r7 # save link register
- bcl 20,31,over # branch after pointer table
-base:
- .align 3
-.LCgot: .quad _got-base
-.LCstack: .quad _stack+STACKSIZE-0x80-base
-over:
- mflr r8 # gpr 8 is the base
- ld r1,.LCstack-base(r8) # load new stack pointer
- add r1, r1, r8 # add base
- std r2, 64(r1) # save got
- std r7, 56(r1) # save link register
- ld r2, .LCgot-base(r8) # load got pointer
- add r2, r2, r8 # add base
- std r6, 0(r1) # save stack pointer
-
- ld r6, .prom_entry_toc@toc(r2)
- std r5, 0(r6) # Save prom handle
-
- ld r10, .exit_sp_toc@toc(r2) # save stack pointer for exit call
- std r1, 0(r10)
-
- bl ._start_kernel # call kernel init code
-
-the_end:
- ld r4, 56(r1) # Restore link register
- mtlr r4
- ld r2, 64(r1) # restore got
- ld r1, 0(r1)
-
- blr
-
-/*
- * Function: _callback_entry
- * Input: r6 start address of parameter string
- * r7 length of parameter string.
- *
- * Description: If a client application wants to register a callback function,
- * this function is registered w/ SLOF, not the application's function. SLOF
- * passes the parameter string in Forth representation in R6 and R7. This
- * function moves R6 to R3 and R7 to R4 and then calls callback_entry().
- *
- */
-C_ENTRY(_callback_entry)
- # Save the LR
- mflr r0
- std r0, 16(r1)
-
- # Reserve stack space
- stdu r1, -32(r1)
-
- # SLOF passes the parameters in Registers R6 and R7 but the target
- # wants them in registers R3 and R4
- mr r3, r6
- mr r4, r7
-
- # Branch to the callback_entry function
- bl .callback_entry
-
- # Destroy stack frame
- ld r1, 0(r1)
-
- # Restore LR
- ld r0, 16(r1)
- mtlr r0
-
- # Return to caller
- blr
-
- .section ".bss"
-
-_exit_sp: .quad 0
-
-.global _prom_entry
-_prom_entry: .quad 0
-
- .section ".text"
-
-C_ENTRY(_exit)
- ld r1, .exit_sp_toc@toc(r2)
- ld r1, 0(r1)
- b the_end
-
-
- .lcomm _stack,STACKSIZE,16
diff --git a/qemu/roms/SLOF/clients/net-snk/kernel/init.c b/qemu/roms/SLOF/clients/net-snk/kernel/init.c
deleted file mode 100644
index 1376b6474..000000000
--- a/qemu/roms/SLOF/clients/net-snk/kernel/init.c
+++ /dev/null
@@ -1,67 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#include <stdint.h>
-#include <string.h>
-#include <stdlib.h> /* malloc */
-#include <of.h>
-#include <pci.h>
-#include <kernel.h>
-#include <cpu.h>
-#include <fileio.h>
-
-/* Application entry point .*/
-extern int _start(unsigned char *arg_string, long len);
-extern int main(int, char**);
-int _start_kernel(unsigned long p0, unsigned long p1);
-void * malloc_aligned(size_t size, int align);
-
-unsigned long exception_stack_frame;
-
-snk_fileio_t fd_array[FILEIO_MAX];
-
-extern uint64_t tb_freq;
-
-extern char __client_start;
-extern char __client_end;
-
-void * malloc_aligned(size_t size, int align)
-{
- unsigned long p = (unsigned long) malloc(size + align - 1);
- p = p + align - 1;
- p = p & ~(align - 1);
-
- return (void *) p;
-}
-
-int _start_kernel(unsigned long p0, unsigned long p1)
-{
- int rc;
- unsigned int timebase;
-
- /* initialize all file descriptor by marking them as empty */
- for(rc=0; rc<FILEIO_MAX; ++rc)
- fd_array[rc].type = FILEIO_TYPE_EMPTY;
-
- /* this is step is e.g. resposible to initialize file descriptor 0 and 1 for STDIO */
- rc = of_glue_init(&timebase, (size_t)(unsigned long)&__client_start,
- (size_t)(unsigned long)&__client_end - (size_t)(unsigned long)&__client_start);
- if(rc < 0)
- return -1;
-
- tb_freq = (uint64_t) timebase;
- rc = _start((unsigned char *) p0, p1);
-
- of_glue_release();
- return rc;
-}
-
diff --git a/qemu/roms/SLOF/clients/net-snk/kernel/systemcall.c b/qemu/roms/SLOF/clients/net-snk/kernel/systemcall.c
deleted file mode 100644
index 52c45cad7..000000000
--- a/qemu/roms/SLOF/clients/net-snk/kernel/systemcall.c
+++ /dev/null
@@ -1,176 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#include <stdint.h>
-#include <stdarg.h>
-#include <string.h>
-#include <fileio.h>
-#include <kernel.h>
-#include <of.h>
-#include <sys/socket.h>
-
-extern int vsprintf(char *, const char *, va_list);
-extern void _exit(int status);
-
-void exit(int status);
-
-int open(const char* name, int flags)
-{
- int fd;
-
- /* search free file descriptor */
- for (fd=0; fd<FILEIO_MAX; ++fd) {
- if(fd_array[fd].type == FILEIO_TYPE_EMPTY) {
- break;
- }
- }
- if (fd == FILEIO_MAX) {
- printf("Can not open \"%s\" because file descriptor list is full\n", name);
- /* there is no free file descriptor available */
- return -2;
- }
-
- fd_array[fd].ih = of_open(name);
- if (fd_array[fd].ih == 0)
- return -1;
-
- fd_array[fd].type = FILEIO_TYPE_FILE;
-
- return fd;
-}
-
-int pre_open_ih(int fd, ihandle_t ih)
-{
- if (fd_array[fd].type != FILEIO_TYPE_EMPTY)
- return -2;
- fd_array[fd].ih = ih;
- fd_array[fd].type = FILEIO_TYPE_FILE;
-
- return fd;
-}
-
-int socket(int domain, int type, int proto, char *mac_addr)
-{
- uint8_t tmpbuf[8];
- int fd;
- phandle_t ph;
-
- /* search free file descriptor */
- for (fd=0; fd<FILEIO_MAX; ++fd) {
- if(fd_array[fd].type == FILEIO_TYPE_EMPTY) {
- break;
- }
- }
- if (fd == FILEIO_MAX) {
- printf("Can not open socket, file descriptor list is full\n");
- /* there is no free file descriptor available */
- return -2;
- }
-
- fd_array[fd].ih = of_interpret_1("my-parent", tmpbuf);
- if (fd_array[fd].ih == 0) {
- printf("Can not open socket, no parent instance\n");
- return -1;
- }
- ph = of_instance_to_package(fd_array[fd].ih);
- if (ph == -1) {
- printf("Can not open socket, no parent package\n");
- return -1;
- }
- if (of_get_mac(ph, mac_addr) < 0) {
- printf("Can not open socket, no MAC address\n");
- return -1;
- }
- fd_array[fd].type = FILEIO_TYPE_SOCKET;
-
- return fd;
-}
-
-int close(int fd)
-{
- if (fd < 0 || fd >= FILEIO_MAX ||
- fd_array[fd].type == FILEIO_TYPE_EMPTY)
- return -1;
- if (fd_array[fd].type == FILEIO_TYPE_FILE)
- of_close(fd_array[fd].ih);
- fd_array[fd].type = FILEIO_TYPE_EMPTY;
- return 0;
-}
-
-ssize_t read(int fd, void *buf, size_t len)
-{
- if (fd < 0 || fd >= FILEIO_MAX ||
- fd_array[fd].type == FILEIO_TYPE_EMPTY)
- return -1;
-
- return of_read(fd_array[fd].ih, buf, len);
-}
-
-ssize_t write (int fd, const void *buf, size_t len)
-{
- char dest_buf[512];
- char *dest_buf_ptr;
- const char *dbuf = buf;
- int i;
-
- if (fd == 1 || fd == 2) {
- dest_buf_ptr = &dest_buf[0];
- for (i = 0; i < len && i < 256; i++)
- {
- *dest_buf_ptr++ = *dbuf++;
- if (dbuf[-1] == '\n')
- *dest_buf_ptr++ = '\r';
- }
- len = dest_buf_ptr - &dest_buf[0];
- buf = &dest_buf[0];
- }
-
- if(fd < 0 || fd >= FILEIO_MAX ||
- fd_array[fd].type == FILEIO_TYPE_EMPTY)
- return -1;
-
- return of_write(fd_array[fd].ih, (void *)buf, len);
-}
-
-ssize_t lseek (int fd, long offset, int whence)
-{
- return 0; // this syscall is unused !!!
-#if 0
- if (whence != 0)
- return -1;
-
- of_seek (fd_array[fd], (unsigned int) (offset>>32), (unsigned int) (offset & 0xffffffffULL));
-
- return offset;
-#endif
-}
-
-int recv(int fd, void *packet, int packet_len, int flags)
-{
- return read(fd, packet, packet_len);
-}
-
-int send(int fd, const void *packet, int packet_len, int flags)
-{
- return write(fd, packet, packet_len);
-}
-
-int sendto(int fd, const void *packet, int packet_len, int flags,
- const void *sock_addr, int sock_addr_len)
-{
- return send(fd, packet, packet_len, flags);
-}
-
-void exit(int status)
-{
- _exit(status);
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/kernel/timer.c b/qemu/roms/SLOF/clients/net-snk/kernel/timer.c
deleted file mode 100644
index 2d8705895..000000000
--- a/qemu/roms/SLOF/clients/net-snk/kernel/timer.c
+++ /dev/null
@@ -1,39 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#include <stdint.h>
-#include "kernel.h"
-
-//*******************************************************************
-// variable "tb_freq" contains the frequency in Hz
-// and is read from the device tree (setup by LLFW) in "init.c"
-uint64_t tb_freq;
-
-//-------------------------------------------------------------------
-// Read the current timebase
-uint64_t get_time(void)
-{
- uint64_t act;
-
- __asm__ __volatile__(
- "0: mftbu %0 ;\
- mftbl %%r0 ; \
- mftbu %%r4 ; \
- cmpw %0,%%r4 ; \
- bne 0b; \
- sldi %0,%0,32; \
- or %0,%0,%%r0"
- : "=r"(act)
- : /* no inputs */
- : "r0", "r4");
- return act;
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/libc/Makefile b/qemu/roms/SLOF/clients/net-snk/libc/Makefile
deleted file mode 100644
index 073f039aa..000000000
--- a/qemu/roms/SLOF/clients/net-snk/libc/Makefile
+++ /dev/null
@@ -1,45 +0,0 @@
-# *****************************************************************************
-# * Copyright (c) 2004, 2011 IBM Corporation
-# * All rights reserved.
-# * This program and the accompanying materials
-# * are made available under the terms of the BSD License
-# * which accompanies this distribution, and is available at
-# * http://www.opensource.org/licenses/bsd-license.php
-# *
-# * Contributors:
-# * IBM Corporation - initial implementation
-# ****************************************************************************/
-
-
-ifndef TOP
- TOP = $(shell while ! test -e make.rules; do cd .. ; done; pwd)
- export TOP
-endif
-include $(TOP)/make.rules
-
-
-OBJS = sbrk.o
-OBJDIRS = time/time.o
-SUBDIRS = $(filter-out ./,$(dir $(OBJDIRS)))
-
-
-all: subdirs
- $(MAKE) libc-glue.o
-
-libc-glue.o: $(OBJS) $(OBJDIRS)
- $(LD) $(LDFLAGS) $(OBJS) $(OBJDIRS) -o $@ -r
-
-
-subdirs :
- for dir in $(SUBDIRS); do \
- $(MAKE) -C $$dir DIRECTORY=$(DIRECTORY)$$dir || exit 1; \
- done
-
-clean:
- $(RM) -f *.a *.o
- @for dir in $(SUBDIRS); do \
- $(CLEAN) ; \
- $(MAKE) -C $$dir DIRECTORY=$(DIRECTORY)$$dir clean; \
- done
-
-include $(TOP)/make.depend
diff --git a/qemu/roms/SLOF/clients/net-snk/libc/sbrk.c b/qemu/roms/SLOF/clients/net-snk/libc/sbrk.c
deleted file mode 100644
index 2ec1b5f12..000000000
--- a/qemu/roms/SLOF/clients/net-snk/libc/sbrk.c
+++ /dev/null
@@ -1,39 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#include <unistd.h>
-
-#define HEAP_SIZE 0x200000
-
-
-static char heap[HEAP_SIZE];
-static char *actptr;
-
-void *sbrk(int increment)
-{
- char *oldptr;
-
- /* Called for the first time? Then init the actual pointer */
- if (!actptr) {
- actptr = heap;
- }
-
- if (actptr + increment > heap + HEAP_SIZE) {
- /* Out of memory */
- return (void *)-1;
- }
-
- oldptr = actptr;
- actptr += increment;
-
- return oldptr;
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/libc/time/Makefile b/qemu/roms/SLOF/clients/net-snk/libc/time/Makefile
deleted file mode 100644
index 5db779472..000000000
--- a/qemu/roms/SLOF/clients/net-snk/libc/time/Makefile
+++ /dev/null
@@ -1,34 +0,0 @@
-# *****************************************************************************
-# * Copyright (c) 2004, 2011 IBM Corporation
-# * All rights reserved.
-# * This program and the accompanying materials
-# * are made available under the terms of the BSD License
-# * which accompanies this distribution, and is available at
-# * http://www.opensource.org/licenses/bsd-license.php
-# *
-# * Contributors:
-# * IBM Corporation - initial implementation
-# ****************************************************************************/
-
-ifndef TOP
- TOP = $(shell while ! test -e make.rules; do cd .. ; done; pwd)
- export TOP
-
-endif
-include $(TOP)/make.rules
-
-
-OBJS = timer.o ftime.o
-
-
-all: time.o
-
-time.o: $(OBJS)
- $(LD) $(LDFLAGS) -r $< -o $@
-
-clean:
- $(RM) -f *.o *.i *.s
-
-distclean mrproper: clean
-
-include $(TOP)/make.depend
diff --git a/qemu/roms/SLOF/clients/net-snk/libc/time/ftime.c b/qemu/roms/SLOF/clients/net-snk/libc/time/ftime.c
deleted file mode 100644
index e092ba55d..000000000
--- a/qemu/roms/SLOF/clients/net-snk/libc/time/ftime.c
+++ /dev/null
@@ -1,38 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-
-#include <time.h>
-#include <rtas.h>
-#include <stdio.h>
-
-time_t
-time(time_t *tod)
-{
- dtime ts;
-
- rtas_get_time_of_day(&ts);
- printf("debug!!\n");
-
- printf("year : %d\n", ts.year);
- printf("month : %d\n", ts.month);
- printf("day : %d\n", ts.day);
- printf("hour : %d\n", ts.hour);
- printf("minute: %d\n", ts.minute);
- printf("second: %d\n", ts.second);
- printf("nano : %d\n", ts.nano);
- printf("debug ende\n");
-
-// if(tod)
-// *tod = t;
- return 0;
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/libc/time/timer.c b/qemu/roms/SLOF/clients/net-snk/libc/time/timer.c
deleted file mode 100644
index b17737276..000000000
--- a/qemu/roms/SLOF/clients/net-snk/libc/time/timer.c
+++ /dev/null
@@ -1,36 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#include <kernel.h>
-#include "time.h"
-
-int get_msec_ticks()
-{
- return tb_freq/1000;
-}
-
-int get_sec_ticks()
-{
- return tb_freq;
-}
-
-void set_timer(int val)
-{
- asm volatile ("mtdec %0"::"r" (val));
-}
-
-int get_timer()
-{
- int val;
- asm volatile ("mfdec %0":"=r" (val));
- return val;
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/make.rules b/qemu/roms/SLOF/clients/net-snk/make.rules
deleted file mode 100644
index 02160936f..000000000
--- a/qemu/roms/SLOF/clients/net-snk/make.rules
+++ /dev/null
@@ -1,25 +0,0 @@
-# *****************************************************************************
-# * Copyright (c) 2004, 2008 IBM Corporation
-# * All rights reserved.
-# * This program and the accompanying materials
-# * are made available under the terms of the BSD License
-# * which accompanies this distribution, and is available at
-# * http://www.opensource.org/licenses/bsd-license.php
-# *
-# * Contributors:
-# * IBM Corporation - initial implementation
-# ****************************************************************************/
-
-ROOTDIR ?= $(TOP)/../..
-
-include $(ROOTDIR)/make.rules
-
-INCLCMNDIR ?= $(ROOTDIR)/include
-LIBCMNDIR ?= $(ROOTDIR)/lib
-CPPFLAGS = -I$(TOP)/include -I$(LIBCMNDIR)/libc/include -I$(INCLCMNDIR) \
- -I$(LIBCMNDIR)/libbootmsg -I$(INCLCMNDIR)/$(CPUARCH) -I.
-CFLAGS += $(FLAG)
-
-LDFLAGS = -nostdlib -q -n
-ASFLAGS = -I. -I$(TOP)/include -Wa,-mregnames -I$(INCLCMNDIR)/$(CPUARCH)
-DD = dd
diff --git a/qemu/roms/SLOF/clients/net-snk/oflib/Makefile b/qemu/roms/SLOF/clients/net-snk/oflib/Makefile
deleted file mode 100644
index aad3e89ff..000000000
--- a/qemu/roms/SLOF/clients/net-snk/oflib/Makefile
+++ /dev/null
@@ -1,41 +0,0 @@
-# *****************************************************************************
-# * Copyright (c) 2004, 2008 IBM Corporation
-# * All rights reserved.
-# * This program and the accompanying materials
-# * are made available under the terms of the BSD License
-# * which accompanies this distribution, and is available at
-# * http://www.opensource.org/licenses/bsd-license.php
-# *
-# * Contributors:
-# * IBM Corporation - initial implementation
-# ****************************************************************************/
-
-
-ifndef TOP
- TOP = $(shell while ! test -e make.rules; do cd .. ; done; pwd)
- export TOP
-endif
-include $(TOP)/make.rules
-
-OBJS = rtas.o of.o pci.o
-OBJS2 = entry.o
-
-all: oflib.o
-
-
-oflib.o: $(OBJS) $(OBJS2)
- $(LD) $(LDFLAGS) $^ -o oflib.o -r
-
-clean:
- $(RM) -f $(OBJS) $(OBJS2) oflib.o
-
-include $(TOP)/make.depend
-
-
-#mrproper : clean
-# rm -rf .depend
-#
-#depend :
-# @rm -rf .depend ; touch .depend ; \
-# makedepend -v -f.depend -- $(CFLAGS) -- $(OBJS:.o=.c) 2> /dev/null ; \
-# $(CC) -M $(CFLAGS) $(OBJS2:.o=.S) >> .depend
diff --git a/qemu/roms/SLOF/clients/net-snk/oflib/entry.S b/qemu/roms/SLOF/clients/net-snk/oflib/entry.S
deleted file mode 100644
index f08026762..000000000
--- a/qemu/roms/SLOF/clients/net-snk/oflib/entry.S
+++ /dev/null
@@ -1,38 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2011 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#include <macros.h>
-
- .section ".toc","aw" # TOC entries are needed for relocation
-.prom_entry_toc:
- .tc _prom_entry[TC],_prom_entry
-
-
-C_ENTRY(call_client_interface)
- ld r4, .prom_entry_toc@toc(r2) # Load prom entry point
- mflr r0
- std r0, 16(r1)
- ld r4, 0(r4)
- stdu r1, -128(r1)
- std r2,40(r1)
- mtctr r4
- bctrl
- ld r2,40(r1)
- addi r1, r1, 128
- ld r0, 16(r1)
- mtlr r0
- blr
-
-
-C_ENTRY(rtas_call_entry)
- mtctr r5
- bctr
diff --git a/qemu/roms/SLOF/clients/net-snk/oflib/of.c b/qemu/roms/SLOF/clients/net-snk/oflib/of.c
deleted file mode 100644
index 5c502ac60..000000000
--- a/qemu/roms/SLOF/clients/net-snk/oflib/of.c
+++ /dev/null
@@ -1,715 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#include <stdint.h>
-#include <of.h>
-#include <rtas.h>
-#include <string.h>
-#include <libbootmsg.h>
-#include <kernel.h>
-
-extern void call_client_interface(of_arg_t *);
-
-static int claim_rc = 0;
-static void* client_start;
-static size_t client_size;
-
-static inline int
-of_0_1(const char *serv)
-{
- of_arg_t arg = {
- p32cast serv,
- 0, 1,
- { 0 }
- };
-
- call_client_interface(&arg);
-
- return arg.args[0];
-}
-
-static inline void
-of_1_0(const char *serv, int arg0)
-{
- of_arg_t arg = {
- p32cast serv,
- 1, 0,
- {arg0, 0}
- };
-
- call_client_interface(&arg);
-}
-
-static inline unsigned int
-of_1_1(const char *serv, int arg0)
-{
- of_arg_t arg = {
- p32cast serv,
- 1, 1,
- {arg0, 0}
- };
-
- call_client_interface(&arg);
- return arg.args[1];
-}
-
-static inline unsigned int
-of_1_2(const char *serv, int arg0, int *ret0)
-{
- of_arg_t arg = {
- p32cast serv,
- 1, 2,
- {arg0, 0, 0}
- };
-
- call_client_interface(&arg);
- *ret0 = arg.args[2];
- return arg.args[1];
-}
-
-static inline void
-of_2_0(const char *serv, int arg0, int arg1)
-{
- of_arg_t arg = {
- p32cast serv,
- 2, 0,
- {arg0, arg1, 0}
- };
-
- call_client_interface(&arg);
-}
-
-static inline unsigned int
-of_2_1(const char *serv, int arg0, int arg1)
-{
- of_arg_t arg = {
- p32cast serv,
- 2, 1,
- {arg0, arg1, 0}
- };
-
- call_client_interface(&arg);
- return arg.args[2];
-}
-
-static inline unsigned int
-of_2_2(const char *serv, int arg0, int arg1, int *ret0)
-{
- of_arg_t arg = {
- p32cast serv,
- 2, 2,
- {arg0, arg1, 0, 0}
- };
-
- call_client_interface(&arg);
- *ret0 = arg.args[3];
- return arg.args[2];
-}
-
-static inline unsigned int
-of_2_3(const char *serv, int arg0, int arg1, int *ret0, int *ret1)
-{
- of_arg_t arg = {
- p32cast serv,
- 2, 3,
- {arg0, arg1, 0, 0, 0}
- };
-
- call_client_interface(&arg);
- *ret0 = arg.args[3];
- *ret1 = arg.args[4];
- return arg.args[2];
-}
-
-static inline void
-of_3_0(const char *serv, int arg0, int arg1, int arg2)
-{
- of_arg_t arg = {
- p32cast serv,
- 3, 0,
- {arg0, arg1, arg2, 0}
- };
-
- call_client_interface(&arg);
- return;
-}
-
-static inline unsigned int
-of_3_1(const char *serv, int arg0, int arg1, int arg2)
-{
- of_arg_t arg = {
- p32cast serv,
- 3, 1,
- {arg0, arg1, arg2, 0}
- };
-
- call_client_interface(&arg);
- return arg.args[3];
-}
-
-static inline unsigned int
-of_3_2(const char *serv, int arg0, int arg1, int arg2, int *ret0)
-{
- of_arg_t arg = {
- p32cast serv,
- 3, 2,
- {arg0, arg1, arg2, 0, 0}
- };
-
- call_client_interface(&arg);
- *ret0 = arg.args[4];
- return arg.args[3];
-}
-
-static inline unsigned int
-of_3_3(const char *serv, int arg0, int arg1, int arg2, int *ret0, int *ret1)
-{
- of_arg_t arg = {
- p32cast serv,
- 3, 3,
- {arg0, arg1, arg2, 0, 0, 0}
- };
-
- call_client_interface(&arg);
- *ret0 = arg.args[4];
- *ret1 = arg.args[5];
- return arg.args[3];
-}
-
-static inline unsigned int
-of_4_1(const char *serv, int arg0, int arg1, int arg2, int arg3)
-{
- of_arg_t arg = {
- p32cast serv,
- 4, 1,
- {arg0, arg1, arg2, arg3, 0}
- };
-
- call_client_interface(&arg);
- return arg.args[4];
-}
-
-int
-of_test(const char *name)
-{
- return (int) of_1_1("test", p32cast name);
-}
-
-int
-of_interpret_1(void *s, void *ret)
-{
- return of_1_2("interpret", p32cast s, ret);
-}
-
-void
-of_close(ihandle_t ihandle)
-{
- of_1_0("close", ihandle);
-}
-
-int
-of_write(ihandle_t ihandle, void *s, int len)
-{
- return of_3_1("write", ihandle, p32cast s, len);
-}
-
-int
-of_read(ihandle_t ihandle, void *s, int len)
-{
- return of_3_1("read", ihandle, p32cast s, len);
-}
-
-int
-of_seek(ihandle_t ihandle, int poshi, int poslo)
-{
- return of_3_1("seek", ihandle, poshi, poslo);
-}
-
-int
-of_getprop(phandle_t phandle, const char *name, void *buf, int len)
-{
- return of_4_1("getprop", phandle, p32cast name, p32cast buf, len);
-}
-
-phandle_t
-of_peer(phandle_t phandle)
-{
- return (phandle_t) of_1_1("peer", phandle);
-}
-
-phandle_t
-of_child(phandle_t phandle)
-{
- return (phandle_t) of_1_1("child", phandle);
-}
-
-phandle_t
-of_parent(phandle_t phandle)
-{
- return (phandle_t) of_1_1("parent", phandle);
-}
-
-phandle_t
-of_instance_to_package(ihandle_t ihandle)
-{
- return (phandle_t) of_1_1("instance-to-package", ihandle);
-}
-
-
-phandle_t
-of_finddevice(const char *name)
-{
- return (phandle_t) of_1_1("finddevice", p32cast name);
-}
-
-ihandle_t
-of_open(const char *name)
-{
- return (ihandle_t) of_1_1("open", p32cast name);
-}
-
-void *
-of_claim(void *start, unsigned int size, unsigned int align)
-{
- return(void *)(long)(size_t)of_3_1("claim", p32cast start, size, align);
-}
-
-void
-of_release(void *start, unsigned int size)
-{
- (void) of_2_0("release", p32cast start, size);
-}
-
-void *
-of_call_method_3(const char *name, ihandle_t ihandle, int arg0)
-{
- int entry, rc;
- rc = of_3_2("call-method", p32cast name, ihandle, arg0, &entry);
- return rc != 0 ? 0 : (void *) (long) entry;
-}
-
-int
-vpd_read(unsigned int offset, unsigned int length, char *data)
-{
- int result;
- long tmp = (long) data;
- result = of_3_1("rtas-read-vpd", offset, length, (int) tmp);
- return result;
-}
-
-int
-vpd_write(unsigned int offset, unsigned int length, char *data)
-{
- int result;
- long tmp = (long) data;
- result = of_3_1("rtas-write-vpd", offset, length, (int) tmp);
- return result;
-}
-
-static void
-ipmi_oem_led_set(int type, int instance, int state)
-{
- return of_3_0("set-led", type, instance, state);
-}
-
-int
-write_mm_log(char *data, unsigned int length, unsigned short type)
-{
- long tmp = (long) data;
-
- ipmi_oem_led_set(2, 0, 1);
- return of_3_1("write-mm-log", (int) tmp, length, type);
-}
-
-int
-of_yield(void)
-{
- return of_0_1("yield");
-}
-
-void *
-of_set_callback(void *addr)
-{
- return (void *) (long) (size_t) of_1_1("set-callback", p32cast addr);
-}
-
-void
-bootmsg_warning(short id, const char *str, short lvl)
-{
- (void) of_3_0("bootmsg-warning", id, lvl, p32cast str);
-}
-
-void
-bootmsg_error(short id, const char *str)
-{
- (void) of_2_0("bootmsg-error", id, p32cast str);
-}
-
-/*
-void
-bootmsg_debugcp(short id, const char *str, short lvl)
-{
- (void) of_3_0("bootmsg-debugcp", id, lvl, p32cast str);
-}
-
-void
-bootmsg_cp(short id)
-{
- (void) of_1_0("bootmsg-cp", id);
-}
-*/
-
-#define CONFIG_SPACE 0
-#define IO_SPACE 1
-#define MEM_SPACE 2
-
-#define ASSIGNED_ADDRESS_PROPERTY 0
-#define REG_PROPERTY 1
-
-#define DEBUG_TRANSLATE_ADDRESS 0
-#if DEBUG_TRANSLATE_ADDRESS != 0
-#define DEBUG_TR(str...) printf(str)
-#else
-#define DEBUG_TR(str...)
-#endif
-
-/**
- * pci_address_type tries to find the type for which a
- * mapping should be done. This is PCI specific and is done by
- * looking at the first 32bit of the phys-addr in
- * assigned-addresses
- *
- * @param node the node of the device which requests
- * translatation
- * @param address the address which needs to be translated
- * @param prop_type the type of the property to search in (either REG_PROPERTY or ASSIGNED_ADDRESS_PROPERTY)
- * @return the corresponding type (config, i/o, mem)
- */
-static int
-pci_address_type(phandle_t node, uint64_t address, uint8_t prop_type)
-{
- char *prop_name = "assigned-addresses";
- if (prop_type == REG_PROPERTY)
- prop_name = "reg";
- /* #address-cells */
- const unsigned int nac = 3; //PCI
- /* #size-cells */
- const unsigned int nsc = 2; //PCI
- /* up to 11 pairs of (phys-addr(3) size(2)) */
- unsigned char buf[11 * (nac + nsc) * sizeof(int)];
- unsigned int *assigned_ptr;
- int result = -1;
- int len;
- len = of_getprop(node, prop_name, buf, 11 * (nac + nsc) * sizeof(int));
- assigned_ptr = (unsigned int *) &buf[0];
- while (len > 0) {
- if ((prop_type == REG_PROPERTY)
- && ((assigned_ptr[0] & 0xFF) != 0)) {
- //BARs and Expansion ROM must be in assigned-addresses... so in reg
- // we only look for those without config space offset set...
- assigned_ptr += (nac + nsc);
- len -= (nac + nsc) * sizeof(int);
- continue;
- }
- DEBUG_TR("%s %x size %x\n", prop_name, assigned_ptr[2],
- assigned_ptr[4]);
- if (address >= assigned_ptr[2]
- && address <= assigned_ptr[2] + assigned_ptr[4]) {
- DEBUG_TR("found a match\n");
- result = (assigned_ptr[0] & 0x03000000) >> 24;
- break;
- }
- assigned_ptr += (nac + nsc);
- len -= (nac + nsc) * sizeof(int);
- }
- /* this can only handle 32bit memory space and should be
- * removed as soon as translations for 64bit are available */
- return (result == 3) ? MEM_SPACE : result;
-}
-
-/**
- * this is a hack which returns the lower 64 bit of any number of cells
- * all the higher bits will silently discarded
- * right now this works pretty good as long 64 bit addresses is all we want
- *
- * @param addr a pointer to the first address cell
- * @param nc number of cells addr points to
- * @return the lower 64 bit to which addr points
- */
-static uint64_t
-get_dt_address(uint32_t *addr, uint32_t nc)
-{
- uint64_t result = 0;
- while (nc--)
- result = (result << 32) | *(addr++);
- return result;
-}
-
-/**
- * this functions tries to find a mapping for the given address
- * it assumes that if we have #address-cells == 3 that we are trying
- * to do a PCI translation
- *
- * @param addr a pointer to the address that should be translated
- * if a translation has been found the address will
- * be modified
- * @param type this is required for PCI devices to find the
- * correct translation
- * @param ranges this is one "range" containing the translation
- * information (one range = nac + pnac + nsc)
- * @param nac the OF property #address-cells
- * @param nsc the OF property #size-cells
- * @param pnac the OF property #address-cells from the parent node
- * @return -1 if no translation was possible; else 0
- */
-static int
-map_one_range(uint64_t *addr, int type, uint32_t *ranges, uint32_t nac,
- uint32_t nsc, uint32_t pnac)
-{
- long offset;
- /* cm - child mapping */
- /* pm - parent mapping */
- uint64_t cm, size, pm;
- /* only check for the type if nac == 3 (PCI) */
- DEBUG_TR("type %x, nac %x\n", ranges[0], nac);
- if (((ranges[0] & 0x03000000) >> 24) != type && nac == 3)
- return -1;
- /* okay, it is the same type let's see if we find a mapping */
- size = get_dt_address(ranges + nac + pnac, nsc);
- if (nac == 3) /* skip type if PCI */
- cm = get_dt_address(ranges + 1, nac - 1);
- else
- cm = get_dt_address(ranges, nac);
-
- DEBUG_TR("\t\tchild_mapping %lx\n", cm);
- DEBUG_TR("\t\tsize %lx\n", size);
- DEBUG_TR("\t\t*address %lx\n", (uint64_t) * addr);
- if (cm + size <= (uint64_t) * addr || cm > (uint64_t) * addr)
- /* it is not inside the mapping range */
- return -1;
- /* get the offset */
- offset = *addr - cm;
- /* and add the offset on the parent mapping */
- if (pnac == 3) /* skip type if PCI */
- pm = get_dt_address(ranges + nac + 1, pnac - 1);
- else
- pm = get_dt_address(ranges + nac, pnac);
- DEBUG_TR("\t\tparent_mapping %lx\n", pm);
- *addr = pm + offset;
- DEBUG_TR("\t\t*address %lx\n", *addr);
- return 0;
-}
-
-/**
- * translate_address_dev tries to translate the device specific address
- * to a host specific address by walking up in the device tree
- *
- * @param address a pointer to a 64 bit value which will be
- * translated
- * @param current_node phandle of the device from which the
- * translation will be started
- */
-void
-translate_address_dev(uint64_t *addr, phandle_t current_node)
-{
- unsigned char buf[1024];
- phandle_t parent;
- unsigned int pnac;
- unsigned int nac;
- unsigned int nsc;
- int addr_type;
- int len;
- unsigned int *ranges;
- unsigned int one_range;
- DEBUG_TR("translate address %lx, node: %lx\n", *addr, current_node);
- of_getprop(current_node, "name", buf, 400);
- DEBUG_TR("current node: %s\n", buf);
- addr_type =
- pci_address_type(current_node, *addr, ASSIGNED_ADDRESS_PROPERTY);
- if (addr_type == -1) {
- // check in "reg" property if not found in "assigned-addresses"
- addr_type = pci_address_type(current_node, *addr, REG_PROPERTY);
- }
- DEBUG_TR("address_type %x\n", addr_type);
- current_node = of_parent(current_node);
- while (1) {
- parent = of_parent(current_node);
- if (!parent) {
- DEBUG_TR("reached root node...\n");
- break;
- }
- of_getprop(current_node, "#address-cells", &nac, 4);
- of_getprop(current_node, "#size-cells", &nsc, 4);
- of_getprop(parent, "#address-cells", &pnac, 4);
- one_range = nac + pnac + nsc;
- len = of_getprop(current_node, "ranges", buf, 400);
- if (len < 0) {
- DEBUG_TR("no 'ranges' property; not translatable\n");
- return;
- }
- ranges = (unsigned int *) &buf[0];
- while (len > 0) {
- if (!map_one_range
- ((uint64_t *) addr, addr_type, ranges, nac, nsc,
- pnac))
- /* after a successful mapping we stop
- * going through the ranges */
- break;
- ranges += one_range;
- len -= one_range * sizeof(int);
- }
- DEBUG_TR("address %lx\n", *addr);
- of_getprop(current_node, "name", buf, 400);
- DEBUG_TR("current node: %s\n", buf);
- DEBUG_TR("\t#address-cells: %x\n", nac);
- DEBUG_TR("\t#size-cells: %x\n", nsc);
- of_getprop(parent, "name", buf, 400);
- DEBUG_TR("parent node: %s\n", buf);
- DEBUG_TR("\t#address-cells: %x\n", pnac);
- current_node = parent;
- }
-}
-
-static phandle_t
-get_boot_device(void)
-{
- char buf[1024];
- phandle_t dev = of_finddevice("/chosen");
-
- if (dev == -1) {
- dev = of_finddevice("/aliases");
- if (dev == -1)
- return dev;
- of_getprop(dev, "net", buf, 1024);
- } else
- of_getprop(dev, "bootpath", buf, 1024);
-
- return of_finddevice(buf);
-}
-
-/**
- * translate_address tries to translate the device specific address
- * of the boot device to a host specific address
- *
- * @param address a pointer to a 64 bit value which will be
- * translated
- */
-void
-translate_address(unsigned long *addr)
-{
- translate_address_dev((uint64_t*) addr, get_boot_device());
-}
-
-/**
- * get_puid walks up in the device tree until it finds a parent
- * node without a reg property. get_puid is assuming that if the
- * parent node has no reg property it has found the pci host bridge
- *
- * this is not the correct way to find PHBs but it seems to work
- * for all our systems
- *
- * @param node the device for which to find the puid
- *
- * @return the puid or 0
- */
-uint64_t
-get_puid(phandle_t node)
-{
- uint64_t puid = 0;
- uint64_t tmp = 0;
- phandle_t curr_node, last_node;
-
- curr_node = last_node = of_parent(node);
-
- while (curr_node) {
- puid = tmp;
- if (of_getprop(curr_node, "reg", &tmp, 8) < 8) {
- /* if the found PHB is not directly under
- * root we need to translate the found address */
- translate_address_dev(&puid, last_node);
- return puid;
- }
- last_node = curr_node;
- curr_node = of_parent(curr_node);
- }
-
- return 0;
-}
-
-int of_get_mac(phandle_t device, char *mac)
-{
- uint8_t localmac[8];
- int len;
-
- len = of_getprop(device, "local-mac-address", localmac, 8);
- if (len <= 0)
- return -1;
-
- if (len == 8) {
- /* Some bad FDT nodes like veth use a 8-byte wide
- * property instead of 6-byte wide MACs... :-( */
- memcpy(mac, &localmac[2], 6);
- }
- else {
- memcpy(mac, localmac, 6);
- }
- return 0;
-}
-
-static void
-get_timebase(unsigned int *timebase)
-{
- phandle_t cpu;
- phandle_t cpus = of_finddevice("/cpus");
-
- if (cpus == -1)
- return;
-
- cpu = of_child(cpus);
-
- if (cpu == -1)
- return;
-
- of_getprop(cpu, "timebase-frequency", timebase, 4);
-}
-
-int of_glue_init(unsigned int * timebase,
- size_t _client_start, size_t _client_size)
-{
- phandle_t chosen = of_finddevice("/chosen");
- ihandle_t stdin_ih, stdout_ih;
-
- client_start = (void *) (long) _client_start;
- client_size = _client_size;
-
- if (chosen == -1)
- return -1;
-
- of_getprop(chosen, "stdin", &stdin_ih, sizeof(ihandle_t));
- of_getprop(chosen, "stdout", &stdout_ih, sizeof(ihandle_t));
- pre_open_ih(0, stdin_ih);
- pre_open_ih(1, stdout_ih);
- pre_open_ih(2, stdout_ih);
- get_timebase(timebase);
- rtas_init();
-
- claim_rc=(int)(long)of_claim(client_start, client_size, 0);
-
- return 0;
-}
-
-void of_glue_release(void)
-{
- if (claim_rc >= 0) {
- of_release(client_start, client_size);
- }
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/oflib/pci.c b/qemu/roms/SLOF/clients/net-snk/oflib/pci.c
deleted file mode 100644
index 89003ae3e..000000000
--- a/qemu/roms/SLOF/clients/net-snk/oflib/pci.c
+++ /dev/null
@@ -1,60 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#include <stdint.h>
-#include <rtas.h>
-#include <of.h>
-#include <pci.h>
-#include <string.h>
-#include <kernel.h>
-#include <cpu.h>
-#include <cache.h>
-
-unsigned int read_io(void *addr, size_t sz)
-{
- unsigned int ret;
-
- switch (sz) {
- case 1:
- ret = ci_read_8(addr);
- break;
- case 2:
- ret = ci_read_16(addr);
- break;
- case 4:
- ret = ci_read_32(addr);
- break;
- default:
- ret = 0;
- }
-
- return ret;
-}
-
-int write_io(void *addr, unsigned int value, size_t sz)
-{
- switch (sz) {
- case 1:
- ci_write_8(addr, value);
- break;
- case 2:
- ci_write_16(addr, value);
- break;
- case 4:
- ci_write_32(addr, value);
- break;
- default:
- return -1;
- }
-
- return 0;
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/oflib/rtas.c b/qemu/roms/SLOF/clients/net-snk/oflib/rtas.c
deleted file mode 100644
index c514c7079..000000000
--- a/qemu/roms/SLOF/clients/net-snk/oflib/rtas.c
+++ /dev/null
@@ -1,226 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#include <stdint.h>
-#include <stdarg.h>
-#include <stdio.h>
-#include <rtas.h>
-#include <of.h>
-#include <kernel.h>
-
-typedef int rtas_arg_t;
-
-typedef struct {
- int token;
- int nargs;
- int nret;
- rtas_arg_t args[16];
- rtas_arg_t *rets; /* Pointer to return values in args[]. */
-} rtas_args_t;
-
-rtas_args_t rtas_args;
-
-typedef struct {
- void *rtas_start;
- void *rtas_entry;
- int rtas_size;
- phandle_t dev;
-} rtas_t;
-
-extern rtas_t _rtas;
-static int instantiate_rtas(void);
-void rtas_call_entry(rtas_args_t *, void *, void *);
-
-int
-rtas_token(const char *service)
-{
- int token;
- int retVal;
- if (_rtas.dev == 0)
- instantiate_rtas();
-
- retVal = of_getprop(_rtas.dev, service, &token, sizeof(token));
- if (retVal == -1) {
- token = 0;
- }
- return token;
-}
-
-int
-rtas_call(int token, int nargs, int nret, int *outputs, ...)
-{
- va_list list;
- int i;
-
- rtas_args.token = token;
- rtas_args.nargs = nargs;
- rtas_args.nret = nret;
- rtas_args.rets = (rtas_arg_t *) & (rtas_args.args[nargs]);
- va_start(list, outputs);
- for (i = 0; i < nargs; ++i) {
- rtas_args.args[i] = (rtas_arg_t) (va_arg(list, unsigned int));
- }
- va_end(list);
-
- for (i = 0; i < nret; ++i)
- rtas_args.rets[i] = 0;
-
- rtas_call_entry(&rtas_args, _rtas.rtas_start, _rtas.rtas_entry);
- if (nret > 0 && outputs != 0)
- for (i = 0; i < nret; i++)
- outputs[i] = rtas_args.rets[i];
-#if 0
- printf("rtas call %x %x %x args: %x %x %x %x %x %x %x %x\n",
- token, nargs, nret,
- rtas_args.args[0],
- rtas_args.args[1],
- rtas_args.args[2],
- rtas_args.args[3],
- rtas_args.args[4], rtas_args.args[5], outputs[0], outputs[1]);
-#endif
- return ((nret > 0) ? rtas_args.rets[0] : 0);
-}
-
-rtas_t _rtas;
-
-static int
-instantiate_rtas(void)
-{
- long long *rtas_mem_space;
- ihandle_t ihandle;
-
- _rtas.dev = of_finddevice("/rtas");
- if ((long) _rtas.dev < 0) {
- printf("\nCould not open /rtas\n");
- return -1;
- }
-
- of_getprop(_rtas.dev, "rtas-size", &_rtas.rtas_size,
- sizeof(_rtas.rtas_size));
-
- if (_rtas.rtas_size <= 0) {
- printf("\nSize of rtas (%x) too small to make sense\n",
- _rtas.rtas_size);
- return -1;
- }
-
- rtas_mem_space = (long long *) malloc_aligned(_rtas.rtas_size, 0x100);
-
- if (!rtas_mem_space) {
- printf("\nFailed to allocated memory for RTAS\n");
- return -1;
- }
-
- ihandle = of_open("/rtas");
-
- if ((long) ihandle < 0) {
- printf("Could not open /rtas\n");
- return -1;
- }
-
- if ((long) (_rtas.rtas_entry = of_call_method_3("instantiate-rtas",
- ihandle,
- p32cast rtas_mem_space))
- > 0) {
- _rtas.rtas_start = rtas_mem_space;
- } else {
- printf("instantiate-rtas failed\n");
- return -1;
- }
-#if 0
- printf("\ninstantiate-rtas at %x size %x entry %x\n",
- _rtas.rtas_start, _rtas.rtas_size, _rtas.rtas_entry);
-#endif
- return 0;
-}
-
-static int read_pci_config_token = 0;
-static int write_pci_config_token = 0;
-static int ibm_read_pci_config_token = 0;
-static int ibm_write_pci_config_token = 0;
-static int get_time_of_day_token = 0;
-
-void
-rtas_init()
-{
- int ret;
- ret = instantiate_rtas();
- if (ret)
- return;
- read_pci_config_token = rtas_token("read-pci-config");
- ibm_read_pci_config_token = rtas_token("ibm,read-pci-config");
- write_pci_config_token = rtas_token("write-pci-config");
- ibm_write_pci_config_token = rtas_token("ibm,write-pci-config");
- get_time_of_day_token = rtas_token("get-time-of-day");
-}
-
-
-int
-rtas_pci_config_read(long long puid, int size, int bus, int devfn, int offset)
-{
- int value[2];
-
- if (ibm_read_pci_config_token && puid) {
- rtas_call(ibm_read_pci_config_token, 4, 2, value,
- bus << 16 | devfn << 8 | offset,
- puid >> 32, puid & 0xffffffffULL, size);
- } else if (read_pci_config_token) {
- rtas_call(read_pci_config_token, 2, 2, value,
- bus << 16 | devfn << 8 | offset, size);
- }
-
- return value[1];
-}
-
-int
-rtas_pci_config_write(long long puid, int size, int bus, int devfn,
- int offset, int value)
-{
- int rc;
-
- if (ibm_write_pci_config_token && puid) {
- rtas_call(ibm_write_pci_config_token, 5, 1, &rc,
- bus << 16 | devfn << 8 | offset,
- puid >> 32, puid & 0xffffffffULL, size, value);
- } else
- rtas_call(write_pci_config_token, 3, 1, &rc,
- bus << 16 | devfn << 8 | offset, size, value);
-
- return rc;
-}
-
-int
-rtas_get_time_of_day(dtime * get)
-{
- int rc = -1;
- unsigned int year;
- unsigned int month;
- unsigned int day;
- unsigned int hour;
- unsigned int minute;
- unsigned int second;
- unsigned int nano;
-
- if (get_time_of_day_token)
- rtas_call(get_time_of_day_token, 0, 8, &rc, &year, &month, &day,
- &hour, &minute, &second, &nano);
-
- get->year = year;
- get->month = month;
- get->day = day;
- get->hour = hour;
- get->minute = minute;
- get->second = second;
- get->nano = nano;
-
- return rc;
-}
diff --git a/qemu/roms/SLOF/clients/net-snk/sec-client.lds b/qemu/roms/SLOF/clients/net-snk/sec-client.lds
deleted file mode 100644
index 0eefdda95..000000000
--- a/qemu/roms/SLOF/clients/net-snk/sec-client.lds
+++ /dev/null
@@ -1,43 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-OUTPUT_FORMAT("elf64-powerpc", "elf64-powerpc", "elf64-powerpc")
-OUTPUT_ARCH(powerpc:common64)
-ENTRY(_entry)
-
-SECTIONS {
- .client 0x200000:
- {
- __client_start = .;
- *(.text .stub .text.* .gnu.linkonce.t.*)
- *(.sfpr .glink)
- *(.rodata .rodata.* .gnu.linkonce.r.*)
- KEEP (*(.opd))
- . = ALIGN(256);
- *(.data .data.* .gnu.linkonce.d.*)
- . = ALIGN(256);
-/* *(*COM* .bss .gnu.linkonce.b.*) */
- } =0x60000000
-
- .got :
- {
- . = ALIGN(8);
- _got = .;
- *(.got .toc)
- _got_end = .;
- }
- .bss :
- {
- *(*COM* .bss .gnu.linkonce.b.*)
- __client_end = .;
- }
-}
diff --git a/qemu/roms/SLOF/clients/takeover/Makefile b/qemu/roms/SLOF/clients/takeover/Makefile
deleted file mode 100644
index f71f7ecdf..000000000
--- a/qemu/roms/SLOF/clients/takeover/Makefile
+++ /dev/null
@@ -1,60 +0,0 @@
-# *****************************************************************************
-# * Copyright (c) 2004, 2011 IBM Corporation
-# * All rights reserved.
-# * This program and the accompanying materials
-# * are made available under the terms of the BSD License
-# * which accompanies this distribution, and is available at
-# * http://www.opensource.org/licenses/bsd-license.php
-# *
-# * Contributors:
-# * IBM Corporation - initial implementation
-# ****************************************************************************/
-
-include $(TOPCMNDIR)/make.rules
-
-SNKDIR = $(TOPCMNDIR)/clients/net-snk
-
-CFLAGS += -fno-builtin -I$(LIBCMNDIR)/libc/include
-CFLAGS += -I$(SNKDIR)/include -I. $(CPUARCHDEF)
-CFLAGS += -I$(INCLBRDDIR) -I$(INCLCMNDIR) -I$(INCLCMNDIR)/$(CPUARCH)
-CFLAGS += -O2 -msoft-float -Wa,-mregnames $(RELEASE)
-
-OBJS = $(SNKDIR)/kernel/kernel.o
-OBJS += $(SNKDIR)/oflib/oflib.o
-OBJS += $(SNKDIR)/libc/time/timer.o
-OBJS += entry.o main.o of.elf takeover.o
-OBJS += $(LIBCMNDIR)/libelf.a $(LIBCMNDIR)/libc.a
-
-%.o: %.S
- $(CC) $(CFLAGS) -c $^
-
-all: takeover.elf
-
-takeover.elf: ppc32wrap.o takeover.elf32
- @echo " ====== Building $@ ======"
- $(LD) -N -melf32ppclinux -static -nostdlib \
- -Ttext=0x400000 -Tdata=0x400100 \
- $(LDFLAGS) $^ -o $@
-
-takeover.elf64: entry.o main.o takeover.o $(SNKDIR)/libc/time/timer.o of.elf
- $(MAKE) -C $(LIBCMNDIR) libc
- $(MAKE) -C $(CLIENTSDIR)
- $(LD) $(LDFLAGS) -o $@ -Tclient.lds $(OBJS)
-
-of.elf: ../../boot_rom.bin
- $(OBJCOPY) --input-target=binary --binary-architecture=powerpc -O elf64-powerpc $< $@
-
-takeover.elf32: takeover.elf64
- $(OBJCOPY) -O binary $^ takeover.tmp
- $(OBJCOPY) --input-target=binary --binary-architecture=powerpc -O elf32-powerpc takeover.tmp $@
-
-ppc32wrap.o: ppc32wrap.S
- $(CROSS)gcc -m32 $(CFLAGS) -c $< -o $@
-
-clean distclean:
- $(MAKE) -C $(LIBCMNDIR) $@
- $(MAKE) -C $(CLIENTSDIR) $@
- $(RM) *.o *.bin *.elf
- $(RM) takeover.elf32 takeover.elf64 takeover.tmp
-%.o: %.oco
- cp -f $< $@
diff --git a/qemu/roms/SLOF/clients/takeover/client.lds b/qemu/roms/SLOF/clients/takeover/client.lds
deleted file mode 100644
index 0ab428a01..000000000
--- a/qemu/roms/SLOF/clients/takeover/client.lds
+++ /dev/null
@@ -1,60 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-OUTPUT_FORMAT("elf64-powerpc", "elf64-powerpc", "elf64-powerpc")
-OUTPUT_ARCH(powerpc:common64)
-ENTRY(_entry)
-
-SECTIONS {
- .client 0x400100:
- {
- __client_start = .;
- *(.start)
- *(.text .stub .text.* .gnu.linkonce.t.*)
- *(.sfpr .glink)
- *(.rodata .rodata.* .gnu.linkonce.r.*)
- KEEP (*(.opd))
- . = ALIGN(256);
- *(.data .data.* .gnu.linkonce.d.*)
- . = ALIGN(256);
- } =0x60000000
-
- .diag_table :
- {
- _diag_init_start = .;
- *(.diag_init)
- _diag_init_end = .;
- }
- .lowmem :
- {
- _lowmem_start = .;
- *(.lowmem)
- _lowmem_end = .;
- }
-
- .got :
- {
- . = ALIGN(256);
- _got = DEFINED (.TOC.) ? .TOC. : ADDR (.got) + 0x8000;
- *(.got .toc)
- _got_end = .;
- }
- .comment : { *(.comment) }
- .branch_lt : { *(.branch_lt) }
- .bss :
- {
- __bssStart = .;
- *(*COM* .bss .gnu.linkonce.b.*)
- __client_end = .;
- __bssSize = . - __bssStart;
- }
-}
diff --git a/qemu/roms/SLOF/clients/takeover/entry.S b/qemu/roms/SLOF/clients/takeover/entry.S
deleted file mode 100644
index ff482732d..000000000
--- a/qemu/roms/SLOF/clients/takeover/entry.S
+++ /dev/null
@@ -1,99 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#include <macros.h>
-#include "takeover.h"
-
- .globl _wrapclient
- .section ".start"
- .align 3
-
-_wrapclient:
- bcl 20,31,over # branch after pointer table
-base:
- .align 3
-.LCgot: .quad _got-base
-over:
- mflr r8 # gpr 8 is the base
- ld r2, .LCgot-base(r8) # load got pointer
- add r2, r2, r8 # add base
- li 14, 0
- oris 14, 14, __bssSize@h
- ori 14, 14, __bssSize@l
- addi 14,14,7
- srwi 14,14,3
- mtctr 14
- li 14, 0
- oris 14, 14, __bssStart@h
- ori 14, 14, __bssStart@l
- subi 14, 14, 8
- li 15, 0
-1:
- stdu 15,8(14)
- bdnz 1b
-
- bl ._entry
-
-
-
- .globl slaveLoopNoTakeover
-slaveLoopNoTakeover:
- mr 28,3
-
- li 14,0
- oris 14, 14, slaveQuitt@h
- ori 14, 14, slaveQuitt@l
-
- li 3,0
- std 3,0(14)
-1:
- ld 3,0(14)
- cmpld 3,28
- bne 1b
-
- li 3,0
- std 3,0(14)
-
- LOAD64(r3, (TAKEOVERBASEADDRESS+0x150))
- mtctr r3
- bctr
-
-
- .globl slaveLoop
-slaveLoop:
- mr 28,3
- li r3, 0x5124
- li r0, -1; .long 0x44000022
-
- li 14,0
- oris 14, 14, slaveQuitt@h
- ori 14, 14, slaveQuitt@l
- li 3,0
- std 3,0(14)
-1:
- ld 3,0(14)
- cmpld 3,28
- bne 1b
-
- li 3,0
- std 3,0(14)
-
- LOAD64(r3, (TAKEOVERBASEADDRESS+0x150))
- mtctr r3
- bctr
-
-
-C_ENTRY(m_sync)
- isync
- sync
- nop
- blr
diff --git a/qemu/roms/SLOF/clients/takeover/main.c b/qemu/roms/SLOF/clients/takeover/main.c
deleted file mode 100644
index 1e1b02614..000000000
--- a/qemu/roms/SLOF/clients/takeover/main.c
+++ /dev/null
@@ -1,163 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#include <string.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <of.h>
-#include <pci.h>
-#include <cpu.h>
-#include <unistd.h>
-#include <takeover.h>
-
-extern void call_client_interface(of_arg_t *);
-extern void m_sync(void);
-
-int callback(int argc, char *argv[]);
-
-#define boot_rom_bin_start _binary_______boot_rom_bin_start
-#define boot_rom_bin_end _binary_______boot_rom_bin_end
-
-extern char boot_rom_bin_start;
-extern char boot_rom_bin_end;
-
-#if defined(__GNUC__)
-# define UNUSED __attribute__((unused))
-#else
-# define UNUSED
-#endif
-
-void *
-sbrk(int incr)
-{
- return (void *) -1;
-}
-
-static void
-doWait(void)
-{
- static const char *wheel = "|/-\\";
- static int i = 0;
- volatile int dly = 0xf0000;
- while (dly--)
- asm volatile (" nop ");
- printf("\b%c", wheel[i++]);
- i &= 0x3;
-}
-
-static void
-quiesce(void)
-{
- of_arg_t arg = {
- p32cast "quiesce",
- 0, 0,
- };
- call_client_interface(&arg);
-}
-
-static int
-startCpu(int num, int addr, int reg)
-{
- of_arg_t arg = {
- p32cast "start-cpu",
- 3, 0,
- {num, addr, reg}
- };
- call_client_interface(&arg);
- return arg.args[3];
-}
-
-volatile unsigned long slaveQuitt;
-int takeoverFlag;
-
-void
-main(int argc, char *argv[])
-{
- phandle_t cpus;
- phandle_t cpu;
- unsigned long slaveMask;
- extern int slaveLoop[];
- extern int slaveLoopNoTakeover[];
- int index = 0;
- int delay = 100;
- unsigned long reg;
- unsigned long msr;
-
- asm volatile ("mfmsr %0":"=r" (msr));
- if (msr & 0x1000000000000000)
- takeoverFlag = 0;
- else
- takeoverFlag = 1;
-
- cpus = of_finddevice("/cpus");
- cpu = of_child(cpus);
- slaveMask = 0;
- while (cpu) {
- char devType[100];
- *devType = '\0';
- of_getprop(cpu, "device_type", devType, sizeof(devType));
- if (strcmp(devType, "cpu") == 0) {
- of_getprop(cpu, "reg", &reg, sizeof(reg));
- if (index) {
- printf("\r\n takeover on cpu%d (%x, %lx) ", index,
- cpu, reg);
- slaveQuitt = -1;
- if (takeoverFlag)
- startCpu(cpu, (int)(unsigned long)slaveLoop, index);
- else
- startCpu(cpu, (int)(unsigned long)slaveLoopNoTakeover,
- index);
- slaveMask |= 0x1 << index;
- delay = 100;
- while (delay-- && slaveQuitt)
- doWait();
- }
- index++;
- }
- cpu = of_peer(cpu);
- }
-
-
- printf("\r\n takeover on master cpu ");
- quiesce();
-
- delay = 5;
- while (delay--)
- doWait();
- if (takeoverFlag)
- takeover();
-
- memcpy((void*)TAKEOVERBASEADDRESS, &boot_rom_bin_start, &boot_rom_bin_end - &boot_rom_bin_start);
- flush_cache((void *)TAKEOVERBASEADDRESS, &boot_rom_bin_end - &boot_rom_bin_start);
- index = 0;
-
- while (slaveMask) {
- m_sync();
- unsigned long shifter = 0x1 << index;
- if (shifter & slaveMask) {
- slaveQuitt = index;
- while (slaveQuitt)
- m_sync();
- slaveMask &= ~shifter;
- }
- index++;
- }
-
- asm volatile(" mtctr %0 ; bctr " : : "r" (TAKEOVERBASEADDRESS+0x180) );
-}
-
-int
-callback(int argc, char *argv[])
-{
- /* Dummy, only for takeover */
- return (0);
-}
diff --git a/qemu/roms/SLOF/clients/takeover/ppc32wrap.S b/qemu/roms/SLOF/clients/takeover/ppc32wrap.S
deleted file mode 100644
index 90afa268d..000000000
--- a/qemu/roms/SLOF/clients/takeover/ppc32wrap.S
+++ /dev/null
@@ -1,30 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
- .globl _start
- .section ".text"
- .align 3
-
-_start:
- nop
- bl over
- .llong 0x9000000000003000
-over:
- li 14, 0
- oris 14, 14, _binary_takeover_tmp_start@h
- ori 14, 14, _binary_takeover_tmp_start@l
- mtsrr0 14
- mflr 15
- ld 14,0(15)
- mtsrr1 14
- rfid
-
diff --git a/qemu/roms/SLOF/clients/takeover/takeover.h b/qemu/roms/SLOF/clients/takeover/takeover.h
deleted file mode 100644
index f348e2359..000000000
--- a/qemu/roms/SLOF/clients/takeover/takeover.h
+++ /dev/null
@@ -1,23 +0,0 @@
-/******************************************************************************
- * Copyright (c) 2004, 2008 IBM Corporation
- * All rights reserved.
- * This program and the accompanying materials
- * are made available under the terms of the BSD License
- * which accompanies this distribution, and is available at
- * http://www.opensource.org/licenses/bsd-license.php
- *
- * Contributors:
- * IBM Corporation - initial implementation
- *****************************************************************************/
-
-#if defined(CPU_CBEA)
-#define TAKEOVERBASEADDRESS 0x0e000000
-#elif defined(CPU_PPC970)
-#define TAKEOVERBASEADDRESS 0x00000000
-#else
-#error no processor specified
-#endif
-
-#ifndef __ASSEMBLER__
-int takeover(void);
-#endif
diff --git a/qemu/roms/SLOF/clients/takeover/takeover.oco b/qemu/roms/SLOF/clients/takeover/takeover.oco
deleted file mode 100644
index 6e2a1a6ab..000000000
--- a/qemu/roms/SLOF/clients/takeover/takeover.oco
+++ /dev/null
Binary files differ