Debug code now HTTPS aware; registration of https: protocol with the URL module now sanitised.

c/module

@@ -387,7 +387,8 @@ _kernel_oserror *swi_handler(int swi_offset, _kernel_swi_regs *r, void *pw)
 	_kernel_oserror *e;
 	#ifdef TRACE
 	static const char *swi[] = {"GetData", "Status", "ReadData", "Stop"};
-	protocol_debug(">>Handling SWI &%02X (HTTP_%s) for R1=%08x\n", swi_offset,
+	protocol_debug(">>Handling SWI &%02X (HTTP_%s%s) for R1=%08x\n", swi_offset,
+		(swi_offset >= 16 && (swi_offset-16) < (sizeof(swi)/sizeof(char*))) ? "Secure" : "",
 		swi_offset < (sizeof(swi)/sizeof(char*)) ? swi[swi_offset] :
 		(swi_offset >= 16 && (swi_offset-16) < (sizeof(swi)/sizeof(char*))) ? swi[swi_offset-16] :
 		swi_offset == HTTP_EnumerateCookies ? "EnumerateCookies" :
@@ -397,8 +398,9 @@ _kernel_oserror *swi_handler(int swi_offset, _kernel_swi_regs *r, void *pw)
 	#endif
 	e = swi_handler_2(swi_offset, r, pw);
 	#ifdef TRACE
-	protocol_debug("<<Exiting  SWI &%02X (HTTP_%s) for R1=%08x  %s "
+	protocol_debug("<<Exiting  SWI &%02X (HTTP_%s%s) for R1=%08x  %s "
 		"R0=%s; R2=%d (=&%p); R3=%d; R4=%d; R5=%d\n\n", swi_offset,
+		(swi_offset >= 16 && (swi_offset-16) < (sizeof(swi)/sizeof(char*))) ? "Secure" : "",
 		swi_offset < (sizeof(swi)/sizeof(char*)) ? swi[swi_offset] :
 		(swi_offset >= 16 && (swi_offset-16) < (sizeof(swi)/sizeof(char*))) ? swi[swi_offset-16] :
 		swi_offset == HTTP_EnumerateCookies ? "EnumerateCookies" :

cmhg/HttpHdr

@@ -21,7 +21,7 @@
 title-string: AcornHTTP
 
 ; Version information
-help-string: Acorn_HTTP 0.77
+help-string: Acorn_HTTP 0.78
 
 ; Initialisation routine.
 initialisation-code: module_init
@@ -55,4 +55,4 @@ service-call-handler: service_handler &83E00 &83E02
 vector-handlers:  callevery_entry/callevery_handler,
 		  callback_entry/callback_handler
 
-date-string: 19 Mar 1998
+date-string: 25 Mar 1998