mouse test

Author: braindigitalis

os/programs/drivers/ps2mouse.rrbasic

@@ -18,9 +18,13 @@ PROCmouse_send(&FF)
 PROCmouse_send(&F6)
 PROCmouse_send(&F4)
 
-x = 0
-y = 0
+x = GRAPHICS_WIDTH / 2
+y = GRAPHICS_HEIGHT / 2
 buttons = 0
+
+MAXX = GRAPHICS_WIDTH - 1
+MAXY = GRAPHICS_HEIGHT - 1
+
 DIM pkt,3
 idx = 0
 
@@ -53,6 +57,11 @@ REPEAT
         x = x + dx
         y = y - dy
 
+        IF x < 0 THEN x = 0
+        IF x > MAXX THEN x = MAXX
+        IF y < 0 THEN y = 0
+        IF y > MAXY THEN y = MAXY
+
         buttons = BITAND(b0, 7)
 
         idx = 0

os/programs/mousetest.rrbasic

@@ -0,0 +1,29 @@
+CLS
+UDPBIND "127.0.0.1", 9999
+X = GRAPHICS_WIDTH / 2
+Y = GRAPHICS_HEIGHT / 2
+GCOL RGB(255,255,0)
+POINT X, Y
+REPEAT
+    CURSOR 0, 0
+    UDPWRITE "127.0.0.1", 9999, 14501, "GET"
+    PACKET$ = UDPREAD$(9999)
+    IF PACKET$ <> "" THEN
+        PRINT PACKET$
+        X$ = TOKENIZE$(PACKET$, " ")
+        Y$ = TOKENIZE$(PACKET$, " ")
+        M$ = TOKENIZE$(PACKET$, " ")
+        NEW_X = VAL(X$)
+        NEW_Y = VAL(Y$)
+        IF NEW_X <> X OR NEW_Y <> Y THEN
+            GCOL 0
+            POINT X, Y
+            M = VAL(M$)
+            GCOL RGB(255,255,0)
+            X = NEW_X
+            Y = NEW_Y
+            POINT X, Y
+        ENDIF
+    ENDIF
+UNTIL INKEY$ <> ""
+UDPUNBIND "127.0.0.1", 9999

src/basic/sockets.c

@@ -258,7 +258,6 @@ static void basic_udp_handle_packet(uint32_t src_ip, uint16_t src_port, uint16_t
 	packet->data = buddy_strdup(ctx->allocator, data);
 	packet->ip = buddy_strdup(ctx->allocator, ip);
 	packet->source_port = src_port;
-	dprintf("UDPREAD handle packet from %s TO PORT %d SOURCE %d\n", ip, dst_port, src_port);
 	packet->next = NULL;
 	uint64_t flags;
 	lock_spinlock_irq(&udp_read_lock, &flags);
@@ -290,7 +289,6 @@ void udpwrite_statement(struct basic_ctx* ctx) {
 		tokenizer_error_print(ctx, "Invalid UDP packet length");
 	}
 	uint32_t dest = htonl(str_to_ip(dest_ip));
-	dprintf("UDPWRITE to %08x ON PORT %ld\n", dest, dest_port);
 	udp_send_packet((uint8_t*)&dest, source_port, dest_port, (void*)data, strlen(data) + 1); // including the NULL terminator
 }
 
@@ -360,6 +358,11 @@ char* basic_udpread(struct basic_ctx* ctx) {
 			udp_packets[port]->prev = NULL;
 		}
 		buddy_free(ctx->allocator, queue);
+	} else {
+		ctx->last_packet.ip = buddy_strdup(ctx->allocator, "0.0.0.0");
+		ctx->last_packet.data = buddy_strdup(ctx->allocator, "");
+		ctx->last_packet.length = 0;
+		ctx->last_packet.source_port = 0;
 	}
 
 	unlock_spinlock_irq(&udp_read_lock, flags);