forked from KolibriOS/kolibrios
310 lines
10 KiB
PHP
310 lines
10 KiB
PHP
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
;; ;;
|
|
;; Copyright (C) KolibriOS team 2004-2015. All rights reserved. ;;
|
|
;; Distributed under terms of the GNU General Public License ;;
|
|
;; ;;
|
|
;; ETHERNET.INC ;;
|
|
;; ;;
|
|
;; Ethernet network layer for KolibriOS ;;
|
|
;; ;;
|
|
;; Written by hidnplayr@kolibrios.org ;;
|
|
;; ;;
|
|
;; GNU GENERAL PUBLIC LICENSE ;;
|
|
;; Version 2, June 1991 ;;
|
|
;; ;;
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
|
$Revision: 6011 $
|
|
|
|
ETH_FRAME_MINIMUM = 60
|
|
ETH_QUEUE_SIZE = 255
|
|
|
|
struct ETH_header
|
|
|
|
DstMAC dp ? ; destination MAC-address
|
|
SrcMAC dp ? ; source MAC-address
|
|
Type dw ? ; type of the upper-layer protocol
|
|
|
|
ends
|
|
|
|
struct ETH_DEVICE NET_DEVICE
|
|
|
|
mac dp ?
|
|
|
|
ends
|
|
|
|
iglobal
|
|
align 4
|
|
|
|
ETH_BROADCAST dp 0xffffffffffff
|
|
|
|
ETH_frame_queued dd 0 ; Number of queued frames
|
|
|
|
ETH_frame_head dd ETH_frame_head ; Pointer to next frame in the linked list
|
|
ETH_frame_tail dd ETH_frame_head ; Pointer to last frame in the linked list
|
|
|
|
endg
|
|
|
|
uglobal
|
|
align 4
|
|
ETH_input_event dd ?
|
|
endg
|
|
|
|
macro eth_init {
|
|
|
|
movi ebx, 1
|
|
mov ecx, eth_process_input
|
|
call new_sys_threads
|
|
test eax, eax
|
|
jns @f
|
|
DEBUGF DEBUG_NETWORK_ERROR,'K : cannot create kernel thread for ethernet, error %d\n', eax
|
|
@@:
|
|
|
|
}
|
|
|
|
;-----------------------------------------------------------------;
|
|
; ;
|
|
; eth_input: This function is called by ethernet drivers. ;
|
|
; Push the received ethernet packet onto the ethernet input queue.;
|
|
; ;
|
|
; IN: [esp] = Pointer to buffer ;
|
|
; ;
|
|
; OUT: / ;
|
|
; ;
|
|
;-----------------------------------------------------------------;
|
|
align 4
|
|
eth_input:
|
|
|
|
pop eax
|
|
pushf
|
|
cli
|
|
|
|
cmp [ETH_frame_queued], ETH_QUEUE_SIZE
|
|
jae .full
|
|
inc [ETH_frame_queued]
|
|
|
|
; Add frame to the end of the linked list
|
|
mov [eax + NET_BUFF.NextPtr], ETH_frame_head
|
|
|
|
mov ebx, [ETH_frame_tail]
|
|
mov [eax + NET_BUFF.PrevPtr], ebx
|
|
|
|
mov [ETH_frame_tail], eax
|
|
mov [ebx + NET_BUFF.NextPtr], eax
|
|
|
|
popf
|
|
|
|
; Now queue an event to process it
|
|
xor edx, edx
|
|
mov eax, [ETH_input_event]
|
|
mov ebx, [eax + EVENT.id]
|
|
xor esi, esi
|
|
call raise_event
|
|
|
|
ret
|
|
|
|
.full:
|
|
DEBUGF DEBUG_NETWORK_ERROR, "ETH incoming queue is full, discarding packet!\n"
|
|
popf
|
|
push eax
|
|
call net_buff_free
|
|
ret
|
|
|
|
|
|
|
|
;-----------------------------------------------------------------;
|
|
; ;
|
|
; eth_process_input: Process packets from ethernet input queue. ;
|
|
; ;
|
|
; IN: / ;
|
|
; ;
|
|
; OUT: / ;
|
|
; ;
|
|
;-----------------------------------------------------------------;
|
|
align 4
|
|
eth_process_input:
|
|
|
|
xor esi, esi
|
|
mov ecx, MANUAL_DESTROY
|
|
call create_event
|
|
mov [ETH_input_event], eax
|
|
pushf
|
|
.wait:
|
|
popf
|
|
mov eax, [ETH_input_event]
|
|
mov ebx, [eax + EVENT.id]
|
|
call wait_event
|
|
|
|
.loop:
|
|
pushf
|
|
cli
|
|
cmp [ETH_frame_queued], 0
|
|
je .wait
|
|
|
|
dec [ETH_frame_queued]
|
|
|
|
mov esi, [ETH_frame_head]
|
|
mov ebx, [esi + NET_BUFF.NextPtr]
|
|
|
|
mov [ETH_frame_head], ebx
|
|
mov [ebx + NET_BUFF.PrevPtr], ETH_frame_head
|
|
|
|
popf
|
|
|
|
mov eax, [esi + NET_BUFF.offset]
|
|
add eax, esi
|
|
mov ecx, [esi + NET_BUFF.length]
|
|
mov ebx, [esi + NET_BUFF.device]
|
|
|
|
pushd .loop ; return address for protocol handler
|
|
push esi ; keep pointer to NET_BUFF on stack
|
|
|
|
DEBUGF DEBUG_NETWORK_VERBOSE, "ETH_input: size=%u\n", ecx
|
|
sub ecx, sizeof.ETH_header
|
|
jb .dump
|
|
|
|
; Set registers for protocol handlers
|
|
lea edx, [eax + sizeof.ETH_header]
|
|
mov ax, [eax + ETH_header.Type]
|
|
|
|
; Place protocol handlers here
|
|
cmp ax, ETHER_PROTO_IPv4
|
|
je ipv4_input
|
|
|
|
cmp ax, ETHER_PROTO_ARP
|
|
je arp_input
|
|
|
|
; cmp ax, ETHER_PROTO_IPv6
|
|
; je ipv6_input
|
|
|
|
; cmp ax, ETHER_PROTO_PPP_DISCOVERY
|
|
; je pppoe_discovery_input
|
|
|
|
; cmp ax, ETHER_PROTO_PPP_SESSION
|
|
; je pppoe_session_input
|
|
|
|
DEBUGF DEBUG_NETWORK_VERBOSE, "ETH_input: Unknown packet type=%x\n", ax
|
|
|
|
.dump:
|
|
DEBUGF DEBUG_NETWORK_VERBOSE, "ETH_input: dumping\n"
|
|
call net_buff_free
|
|
ret
|
|
|
|
|
|
|
|
;-----------------------------------------------------------------;
|
|
; ;
|
|
; eth_output ;
|
|
; ;
|
|
; IN: ax = protocol ;
|
|
; ebx = device ptr ;
|
|
; ecx = payload size ;
|
|
; edx = pointer to destination mac ;
|
|
; ;
|
|
; OUT: eax = start of net frame / 0 on error ;
|
|
; ebx = device ptr ;
|
|
; ecx = payload size ;
|
|
; edi = start of payload ;
|
|
; ;
|
|
;-----------------------------------------------------------------;
|
|
align 4
|
|
eth_output:
|
|
|
|
DEBUGF DEBUG_NETWORK_VERBOSE, "ETH_output: size=%u device=%x\n", ecx, ebx
|
|
|
|
cmp ecx, [ebx + ETH_DEVICE.mtu]
|
|
ja .exit
|
|
|
|
push ecx
|
|
push ax edx
|
|
|
|
add ecx, sizeof.ETH_header + NET_BUFF.data
|
|
stdcall net_buff_alloc, ecx
|
|
test eax, eax
|
|
jz .out_of_ram
|
|
mov [eax + NET_BUFF.type], NET_BUFF_ETH
|
|
mov [eax + NET_BUFF.device], ebx
|
|
mov [eax + NET_BUFF.offset], NET_BUFF.data
|
|
lea edi, [eax + NET_BUFF.data]
|
|
|
|
pop esi
|
|
movsd
|
|
movsw
|
|
lea esi, [ebx + ETH_DEVICE.mac]
|
|
movsd
|
|
movsw
|
|
pop ax
|
|
stosw
|
|
|
|
lea eax, [edi - sizeof.ETH_header - NET_BUFF.data] ; Set eax to buffer start
|
|
pop ecx
|
|
|
|
lea edx, [ecx + sizeof.ETH_header] ; Set edx to complete buffer size
|
|
cmp edx, ETH_FRAME_MINIMUM
|
|
jbe .adjust_size
|
|
.done:
|
|
mov [eax + NET_BUFF.length], edx
|
|
DEBUGF DEBUG_NETWORK_VERBOSE, "ETH_output: ptr=%x size=%u\n", eax, edx
|
|
ret
|
|
|
|
.adjust_size:
|
|
mov edx, ETH_FRAME_MINIMUM
|
|
test edx, edx ; clear zero flag
|
|
jmp .done
|
|
|
|
.out_of_ram:
|
|
DEBUGF DEBUG_NETWORK_ERROR, "ETH_output: Out of ram!\n"
|
|
add esp, 4+2+4
|
|
xor eax, eax
|
|
ret
|
|
|
|
.exit:
|
|
DEBUGF DEBUG_NETWORK_ERROR, "ETH_output: Packet too large!\n"
|
|
xor eax, eax
|
|
ret
|
|
|
|
|
|
|
|
;-----------------------------------------------------------------;
|
|
; ;
|
|
; eth_api: Part of system function 76. ;
|
|
; ;
|
|
; IN: bl = subfunction number ;
|
|
; bh = device number ;
|
|
; ecx, edx, .. depends on subfunction ;
|
|
; ;
|
|
; OUT: depends on subfunction ;
|
|
; ;
|
|
;-----------------------------------------------------------------;
|
|
align 4
|
|
eth_api:
|
|
|
|
cmp bh, NET_DEVICES_MAX
|
|
ja .error
|
|
movzx eax, bh
|
|
mov eax, dword [NET_DRV_LIST + 4*eax]
|
|
cmp [eax + NET_DEVICE.device_type], NET_DEVICE_ETH
|
|
jne .error
|
|
|
|
and ebx, 0xff
|
|
cmp ebx, .number
|
|
ja .error
|
|
jmp dword [.table + 4*ebx]
|
|
|
|
.table:
|
|
dd .read_mac ; 0
|
|
.number = ($ - .table) / 4 - 1
|
|
|
|
.error:
|
|
or eax, -1
|
|
ret
|
|
|
|
|
|
.read_mac:
|
|
movzx ebx, word [eax + ETH_DEVICE.mac]
|
|
mov eax, dword [eax + ETH_DEVICE.mac + 2]
|
|
mov [esp+20+4], ebx ; FIXME
|
|
ret
|
|
|
|
|