aboutsummaryrefslogtreecommitdiff
path: root/code/http_test.odin
diff options
context:
space:
mode:
authorGinger Bill <bill@gingerbill.org>2017-02-05 15:19:30 +0000
committerGinger Bill <bill@gingerbill.org>2017-02-05 15:19:30 +0000
commit2a5b674d33e4f483964da119f76038457cd9f1f2 (patch)
tree1e094b9e6ed3fa435dc5c76cdf7f4a7e740781f7 /code/http_test.odin
parent7944b7714f5478b9a89e3fc1e331e8090652e49e (diff)
Custom struct alignment
Diffstat (limited to 'code/http_test.odin')
-rw-r--r--code/http_test.odin172
1 files changed, 86 insertions, 86 deletions
diff --git a/code/http_test.odin b/code/http_test.odin
index 9048cfd63..e6c5f1173 100644
--- a/code/http_test.odin
+++ b/code/http_test.odin
@@ -1,10 +1,10 @@
-#import "fmt.odin"
+#import "fmt.odin";
-#foreign_system_library "Ws2_32" when ODIN_OS == "windows"
+#foreign_system_library ws2 "Ws2_32.lib" when ODIN_OS == "windows";
-SOCKET :: type uint
-INVALID_SOCKET :: ~(0 as SOCKET)
+SOCKET :: type uint;
+INVALID_SOCKET :: ~(cast(SOCKET)0);
AF :: enum i32 {
UNSPEC = 0, // unspecified
@@ -35,111 +35,111 @@ AF :: enum i32 {
SIP = 24, // Simple Internet Protocol
PIP = 25, // Help Identify PIP packets
MAX = 26,
-}
+};
-SOCK_STREAM :: 1
-SOCKET_ERROR :: -1
-IPPROTO_TCP :: 6
-AI_PASSIVE :: 0x0020
-SOMAXCONN :: 128
+SOCK_STREAM :: 1;
+SOCKET_ERROR :: -1;
+IPPROTO_TCP :: 6;
+AI_PASSIVE :: 0x0020;
+SOMAXCONN :: 128;
-SD_RECEIVE :: 0
-SD_SEND :: 1
-SD_BOTH :: 2
+SD_RECEIVE :: 0;
+SD_SEND :: 1;
+SD_BOTH :: 2;
-WSADESCRIPTION_LEN :: 256
-WSASYS_STATUS_LEN :: 128
+WSADESCRIPTION_LEN :: 256;
+WSASYS_STATUS_LEN :: 128;
WSADATA :: struct #ordered {
- version: i16
- high_version: i16
+ version: i16,
+ high_version: i16,
// NOTE(bill): This is x64 ordering
- max_sockets: u16
- max_udp_dg: u16
- vendor_info: ^byte
- description: [WSADESCRIPTION_LEN+1]byte
- system_status: [WSASYS_STATUS_LEN+1]byte
+ max_sockets: u16,
+ max_udp_dg: u16,
+ vendor_info: ^byte,
+ description: [WSADESCRIPTION_LEN+1]byte,
+ system_status: [WSASYS_STATUS_LEN+1]byte,
}
addrinfo :: struct #ordered {
- flags: i32
- family: i32
- socktype: i32
- protocol: i32
- addrlen: uint
- canonname: ^u8
- addr: ^sockaddr
- next: ^addrinfo
+ flags: i32,
+ family: i32,
+ socktype: i32,
+ protocol: i32,
+ addrlen: uint,
+ canonname: ^u8,
+ addr: ^sockaddr,
+ next: ^addrinfo,
}
sockaddr :: struct #ordered {
- family: u16
- data: [14]byte
+ family: u16,
+ data: [14]byte,
}
-WSAStartup :: proc(version_requested: i16, data: ^WSADATA) -> i32 #foreign #dll_import
-WSACleanup :: proc() -> i32 #foreign #dll_import
-getaddrinfo :: proc(node_name, service_name: ^u8, hints: ^addrinfo, result: ^^addrinfo) -> i32 #foreign #dll_import
-freeaddrinfo :: proc(ai: ^addrinfo) #foreign #dll_import
-socket :: proc(af, type_, protocol: i32) -> SOCKET #foreign #dll_import
-closesocket :: proc(s: SOCKET) -> i32 #foreign #dll_import
-bind :: proc(s: SOCKET, name: ^sockaddr, name_len: i32) -> i32 #foreign #dll_import
-listen :: proc(s: SOCKET, back_log: i32) -> i32 #foreign #dll_import
-accept :: proc(s: SOCKET, addr: ^sockaddr, addr_len: i32) -> SOCKET #foreign #dll_import
-recv :: proc(s: SOCKET, buf: ^byte, len: i32, flags: i32) -> i32 #foreign #dll_import
-send :: proc(s: SOCKET, buf: ^byte, len: i32, flags: i32) -> i32 #foreign #dll_import
-shutdown :: proc(s: SOCKET, how: i32) -> i32 #foreign #dll_import
-WSAGetLastError :: proc() -> i32 #foreign #dll_import
+WSAStartup :: proc(version_requested: i16, data: ^WSADATA) -> i32 #foreign ws2;
+WSACleanup :: proc() -> i32 #foreign ws2;
+getaddrinfo :: proc(node_name, service_name: ^u8, hints: ^addrinfo, result: ^^addrinfo) -> i32 #foreign ws2;
+freeaddrinfo :: proc(ai: ^addrinfo) #foreign ws2;
+socket :: proc(af, type_, protocol: i32) -> SOCKET #foreign ws2;
+closesocket :: proc(s: SOCKET) -> i32 #foreign ws2;
+bind :: proc(s: SOCKET, name: ^sockaddr, name_len: i32) -> i32 #foreign ws2;
+listen :: proc(s: SOCKET, back_log: i32) -> i32 #foreign ws2;
+accept :: proc(s: SOCKET, addr: ^sockaddr, addr_len: i32) -> SOCKET #foreign ws2;
+recv :: proc(s: SOCKET, buf: ^byte, len: i32, flags: i32) -> i32 #foreign ws2;
+send :: proc(s: SOCKET, buf: ^byte, len: i32, flags: i32) -> i32 #foreign ws2;
+shutdown :: proc(s: SOCKET, how: i32) -> i32 #foreign ws2;
+WSAGetLastError :: proc() -> i32 #foreign ws2;
to_c_string :: proc(s: string) -> ^byte {
- c_str := new_slice(byte, s.count+1)
- assert(c_str.data != nil)
- copy(c_str, s as []byte)
- c_str[s.count] = 0
- return c_str.data
+ c_str := new_slice(byte, s.count+1);
+ assert(c_str.data != nil);
+ copy(c_str, cast([]byte)s);
+ c_str[s.count] = 0;
+ return c_str.data;
}
run :: proc() {
- wsa: WSADATA
- res: ^addrinfo = nil
- hints: addrinfo
- s, client: SOCKET
+ wsa: WSADATA;
+ res: ^addrinfo = nil;
+ hints: addrinfo;
+ s, client: SOCKET;
if WSAStartup(2 | (2 << 8), ^wsa) != 0 {
- fmt.println("WSAStartup failed: ", WSAGetLastError())
- return
+ fmt.println("WSAStartup failed: ", WSAGetLastError());
+ return;
}
- defer WSACleanup()
+ defer WSACleanup();
- hints.family = AF.INET as i32
- hints.socktype = SOCK_STREAM
- hints.protocol = IPPROTO_TCP
- hints.flags = AI_PASSIVE
+ hints.family = cast(i32)AF.INET;
+ hints.socktype = SOCK_STREAM;
+ hints.protocol = IPPROTO_TCP;
+ hints.flags = AI_PASSIVE;
if getaddrinfo(nil, to_c_string("8080"), ^hints, ^res) != 0 {
- fmt.println("getaddrinfo failed: ", WSAGetLastError())
- return
+ fmt.println("getaddrinfo failed: ", WSAGetLastError());
+ return;
}
- defer freeaddrinfo(res)
+ defer freeaddrinfo(res);
- s = socket(res.family, res.socktype, res.protocol)
+ s = socket(res.family, res.socktype, res.protocol);
if s == INVALID_SOCKET {
- fmt.println("socket failed: ", WSAGetLastError())
- return
+ fmt.println("socket failed: ", WSAGetLastError());
+ return;
}
- defer closesocket(s)
+ defer closesocket(s);
- bind(s, res.addr, res.addrlen as i32)
- listen(s, SOMAXCONN)
+ bind(s, res.addr, cast(i32)res.addrlen);
+ listen(s, SOMAXCONN);
- client = accept(s, nil, 0)
+ client = accept(s, nil, 0);
if client == INVALID_SOCKET {
- fmt.println("socket failed: ", WSAGetLastError())
- return
+ fmt.println("socket failed: ", WSAGetLastError());
+ return;
}
- defer closesocket(client)
+ defer closesocket(client);
html :=
`HTTP/1.1 200 OK
@@ -154,27 +154,27 @@ Content-type: text/html
<h1 style="color: orange;">Odin Server Demo</h1>
</body>
</html>
-`
+`;
- buf: [1024]byte
+ buf: [1024]byte;
for {
- bytes := recv(client, ^buf[0], buf.count as i32, 0)
+ bytes := recv(client, ^buf[0], cast(i32)buf.count, 0);
if bytes > 0 {
// fmt.println(buf[:bytes] as string)
- bytes_sent := send(client, html.data, (html.count-1) as i32, 0)
+ bytes_sent := send(client, html.data, cast(i32)(html.count-1), 0);
if bytes_sent == SOCKET_ERROR {
- fmt.println("send failed: ", WSAGetLastError())
- return
+ fmt.println("send failed: ", WSAGetLastError());
+ return;
}
- break
+ break;
} else if bytes == 0 {
- fmt.println("Connection closing...")
- break
+ fmt.println("Connection closing...");
+ break;
} else {
- fmt.println("recv failed: ", WSAGetLastError())
- return
+ fmt.println("recv failed: ", WSAGetLastError());
+ return;
}
}
- shutdown(client, SD_SEND)
+ shutdown(client, SD_SEND);
}