From 975f34431a49dce78814fece062494634f4e982f Mon Sep 17 00:00:00 2001
From: Mario Fetka <mario.fetka@gmail.com>
Date: Sun, 13 Nov 2011 00:40:40 +0100
Subject: [PATCH] mars_dosutils-0.10

---
 capture.c                |  80 ++++++++++
 doc                      |  87 ++++++++---
 e.pck                    | Bin 1848 -> 0 bytes
 kern.lst                 | 317 ---------------------------------------
 login.bat                |   4 -
 login.c                  | 215 ++++++++++++++++++++++++--
 makefile => makefile.bcc |   2 +-
 map.c                    | 155 +++++++++++++------
 mars_dosutils.lsm        |  16 ++
 mk.bat                   |   4 -
 net.c                    | 197 +++++++++++++++---------
 net.exe                  | Bin 51020 -> 64180 bytes
 net.h                    |  62 +++++---
 netcall.c                |  44 +++---
 nwdebug.c                |  11 +-
 nwtests.c                |   6 +-
 slist.c                  |   2 +-
 tools.c                  |  95 ++++++++++++
 18 files changed, 768 insertions(+), 529 deletions(-)
 create mode 100644 capture.c
 delete mode 100755 e.pck
 delete mode 100755 kern.lst
 delete mode 100755 login.bat
 rename makefile => makefile.bcc (94%)
 create mode 100644 mars_dosutils.lsm
 delete mode 100755 mk.bat

diff --git a/capture.c b/capture.c
new file mode 100644
index 0000000..248d003
--- /dev/null
+++ b/capture.c
@@ -0,0 +1,80 @@
+/* capture.c 05-Apr-96 */
+
+/****************************************************************
+ * (C)opyright (C) 1993,1996  Martin Stover, Marburg, Germany   *
+ ****************************************************************/
+
+#include "net.h"
+
+static int usage(void)
+{
+  fprintf(stderr, "usage:\t%s  level\n", funcname);
+  fprintf(stderr, "\tlevel=0 .. 99\n" );
+  return(-1);
+}
+
+static int parse_argv(uint8 *devname, uint8 *queuename,
+                  int argc, char *argv[], int parsemode)
+{
+  int  k      = 0;
+  *devname    = '\0';
+  *queuename  = '\0';
+  while (++k < argc) {
+    uint8 *p  = argv[k];
+    if (k == 1) {
+      strmaxcpy(devname,   p, 20);
+      upstr(devname);
+      if (!strcmp(devname, "PRN"))
+        strcpy(devname, "LPT1");
+    } else if (k == 2) {
+      strmaxcpy(queuename, p, 20);
+      upstr(queuename);
+    }
+  }
+  return(0);
+}
+
+static int do_capture(uint8 *drvstr, uint8 *queuestr, int delete)
+{
+  int result = redir_device_drive(delete ? -1 : 0x3, drvstr, queuestr);
+  return(result);
+}
+
+static int show_capture(uint8 *drvstr)
+{
+  int result;
+  int k =-1;
+  uint8 devname[20];
+  uint8 remotename[130];
+  int  devicetyp;
+  while ((result = list_redir(++k, &devicetyp, devname, remotename)) > -1){
+    if (result > -1 && devicetyp == 0x3) {
+      upstr(devname);
+      upstr(remotename);
+      if (!drvstr || !*drvstr || !strcmp(devname, drvstr))
+        fprintf(stdout, "%-10s captured to %s\n", devname, remotename);
+    }
+  }
+  return(result);
+}
+
+int func_capture(int argc, char *argv[], int mode)
+{
+  uint8  devname [22];
+  uint8  queuestr[22];
+  if (!parse_argv(devname, queuestr, argc, argv, mode)) {
+    int result=0;
+    if (*queuestr || mode == 1) {
+      result=do_capture(devname, queuestr, mode);
+      if (result< 0)
+        fprintf(stderr, "capture error:%d, device:%s \n", result, devname);
+    }
+    if (mode != 1)
+      show_capture(devname);
+    else if (result > -1)
+      fprintf(stdout, "Capture of %s removed\n", devname);
+    return(result);
+  }
+  return(1);
+}
+
diff --git a/doc b/doc
index 9b7bb04..68e8cb0 100755
--- a/doc
+++ b/doc
@@ -1,46 +1,93 @@
 /* DOC for NET.EXE */
+/* last updated: 21-May-96 */
 This is a short description of net.exe which is a simple DOS-client
-programm to allow standard NCP network actions, mainly for mars_nwe.
-All functions are called as a second parameter.
-This programm is very incomplete till now, but some functions
+program to allow standard NCP network actions, mainly for mars_nwe.
+All functions are called as a second parameter, or if the program
+is renamed to a guilty function like login.exe then the function
+will be the progname. This is very usefull for login.exe.
+
+This program is very incomplete till now, but some functions
 works well with mars_nwe.
 
-LOGOUT:
-Logout from a NCP Server.
 
 LOGIN:
 usage: LOGIN [-u] [user | user password]
 -u = use unencrypted password.
 With this function you can log into a NCP Server.
-Its only make a login, no mappings or something else.
+If there exists a 'login' file in the same directory as
+net.exe resides then this file will be interpreted as a
+command file. You also can use command files with
+the PROFILE command.
+It is usefull to copy (or do a Linux link) net.exe to login.exe.
 
-If you want a login similar to NOVELL's login.exe you should
-do it with a batch job.
+example for a 'login' script (resides in same directory as net.exe)
+
+map     f:=SYS:
+map     h:=home:
+map     z:=SYS:PUBLIC
+path    s16:=z:.
+capture lpt1 q1
+profile h:\profile      # will call users home 'profile'
 
-example:
-[\LOGIN\LOGIN.BAT]
-@echo OFF
-net logout
-net login %1 %2 %3
-if errorlevel 1 goto :end
-map h:=HOME:
 if not exist h:\profile.bat goto :end
-h:
-profile.bat
-:end
+
+
+PROFILE:
+usage: PROFILE filename
+With this function you are able to run a command script.
+In this command script you can use every net.exe command.
+
+SPAWN:
+With SPAWN you can start external programs.
 
 PASSWD:
 usage: PASSWD [user]
 With this function you are able to change a users password.
 This call uses the old unencryted change password call !!
 
-
 PATH:
 usage: PATH sn:[=[path]]
        sn = 's1' .. 's16'
 
 With this function a new path element can be created.
-Its only sets the path environment.
+Its only sets the path environment !
+
+PATHINS:
+usage: PATHINS sn:[=[path]]
+       sn = 's1' .. 's16'
+like PATH, but inserts PATH, not overwrites.
+
+PATHDEL:
+usage: PATHDEL sn:
+       sn = 's1' .. 's16'
+deletes PATH element
+
+MAP:
+usage: MAP [d:[=[path]]]
+       d = 'A' .. 'Z'
+Maps a drive to a volume or volume/path.
+
+
+MAPDEL:
+usage: MAPDEL d:
+       d = 'A' .. 'Z'
+Removes a map.
+
+
+LOGOUT:
+Logout from a NCP Server.
+
+DEBUG:
+For setting debug flag in mars_nwe processes.
+If you want to use this, you must set
+mars_nwe/config.h: FUNC_17_02_IS_DEBUG to '1'
+
+
+SPAWN:
+EXEC:
+external program execution spawning or overlayed.
+
+
 
 
 
diff --git a/e.pck b/e.pck
deleted file mode 100755
index da7271c715cc9feffc1a6f6220a303b6578708fe..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 1848
zcmd^<!AiqG5QaBa3EJ9PtO^Pu9z;AOwYl}Cw}K#^JeEydlci}=l2{cys`vojd<q}I
zSMU)$`4&18cjLBr$oA^MW=Y6=`RAX>vJtPeO+s3AziUS<8+mxOf_+jlYLpo8>Ip2^
z8wF*+l1K+*<QV)YVAj2^9j6^TrDJ9%3^&WAS$R=&z^Nh(qovYjV_}JT7<c7G>_Nu1
z$Rl+j0?M*@#LH7&;oGM`$t5&@Dd}yh2YQkal(aSN3Hq&#d;ro1tY<_{G;J0dR#+Il
zstVLL?GsRMFa(b{2&(mQcv0T^7f9ZjC*-}NP{P<7SczAjvH{6OS<9lVu}`%iz6xmw
z$khlYNei>4Vx+}%$oY`^OmCbfy0sz{UGu2#w6!E1gQNh~CM+U3(C~gok8=j;h0QAG
z(9zQKXI<bk{v0}OKZn6_uqF)IcHMq)$i?}|W4C&gxQu6M?6Sn{MQKLEu&F$|4DY>w
vEijASFjG92$zoqD4(OWtgPGz+o-g^qn_qtNjGl2o$k!C?zuhhs^F_V^^%A5)

diff --git a/kern.lst b/kern.lst
deleted file mode 100755
index 96fd9cc..0000000
--- a/kern.lst
+++ /dev/null
@@ -1,317 +0,0 @@
-Turbo Assembler	 Version 3.1	    28/04/96 13:28:50	    Page 1
-kern.asm
-
-
-
-      1				     ; kern.asm: 20-Nov-93, 21:52
-      2				     IDEAL
-      3				     P286
-      4	0000			     MODEL LARGE
-      5				     ; Fuer Turboc gerettet werden muessen folgende Register:
-      6				     ; BP, SS, SP, DS, CS u. SI, DI
-      7
-      8				     MACRO P_START
-      9					push	bp
-     10					mov	bp, sp
-     11				     ENDM
-     12
-     13				     MACRO P_END
-     14					pop	bp
-     15				     ENDM
-     16
-     17				     MACRO PUSH_REGS
-     18					push	ds
-     19					push	si
-     20					push	di
-     21				     ENDM
-     22
-     23				     MACRO POP_REGS
-     24					pop	di
-     25					pop	si
-     26					pop	ds
-     27				     ENDM
-     28
-     29				     ;;	EXTRN	_esr_routine:FAR
-     30
-     31				     PUBLIC  _IPXinit;
-     32				     PUBLIC  _IPXopen_socket;
-     33				     PUBLIC  _IPXclose_socket;
-     34				     PUBLIC  _IPXlisten;
-     35				     ;;	PUBLIC	_asm_esr_routine;
-     36				     PUBLIC  _xmemmove;
-     37				     PUBLIC  _Net_Call;
-     38
-     39	0000			     DATASEG
-     40	0000  0000FFFE		     enterIPX  DD FAR
-     41
-     42	0004			     CODESEG
-     43	0000			     PROC _IPXinit;
-     44					P_START
-1    45	0000  55			push	bp
-1    46	0001  8B EC			mov	bp, sp
-     47					PUSH_REGS
-1    48	0003  1E			push	ds
-1    49	0004  56			push	si
-1    50	0005  57			push	di
-     51	0006  B8 7A00			mov	ax,  7A00h
-     52	0009  CD 2F			int	2Fh
-     53	000B  3C FF			cmp	al,  0FFh
-     54	000D  75 10			jne	@@fertig
-     55	000F  B9 0000s			mov	cx, @data
-     56	0012  8E D9			mov	ds, cx
-     57	0014  89 3E 0000r		mov	[WORD PTR enterIPX],   di
-Turbo Assembler	 Version 3.1	    28/04/96 13:28:50	    Page 2
-kern.asm
-
-
-
-     58	0018  8C C0			mov	ax, es
-     59	001A  A3 0002r			mov	[WORD PTR enterIPX+2], ax
-     60	001D  B0 01			mov	al, 1 ;	OK
-     61	001F			     @@fertig:
-     62	001F  B4 00			mov    ah, 0
-     63					POP_REGS
-1    64	0021  5F			pop	di
-1    65	0022  5E			pop	si
-1    66	0023  1F			pop	ds
-     67					P_END
-1    68	0024  5D			pop	bp
-     69	0025  CB			ret	    ;  OK = 1 ;	nicht ok = 0
-     70	0026			     ENDP
-     71
-     72	0026			     PROC  _xmemmove;
-     73					   ARG	   z:DATAPTR, q:DATAPTR, nmbr:WORD; Argumente
-     74	0026  FA			   cli		   ; Disable Interrupts
-     75	0027  55			   push	   bp
-     76	0028  8B EC			   mov	   bp,sp
-     77	002A  8B 4E 0E			   mov	   cx, [nmbr];
-     78	002D  0B C9			   or	   cx, cx;
-     79	002F  74 1F			   jz	   @@fertig; Anzahl ist	0;
-     80	0031  1E			   push	   ds;
-     81	0032  56			   push	   si;
-     82	0033  57			   push	   di;
-     83	0034  9C			   pushf
-     84	0035  C5 76 0A			   lds	   si, [q] ; Quelle
-     85	0038  C4 7E 06			   les	   di, [z] ; Ziel
-     86	003B  3B FE			   cmp	   di, si  ;
-     87	003D  7C 0A			   jl	   @@L1	   ; Ziel ist kleiner
-     88	003F  FD			   std		   ; Richtungsflag setzen
-     89	0040  49			   dec	   cx
-     90	0041  03 F9			   add	   di, cx  ; Von oben nach unten kopieren
-     91	0043  03 F1			   add	   si, cx  ;
-     92	0045  41			   inc	   cx	   ; alten Wert	wiederherstellen
-     93	0046  EB 02 90			   jmp	   @@L2;
-     94	0049				   @@L1:
-     95	0049  FC			   cld		   ; Richtungsflag loeschen
-     96	004A				   @@L2:	   ; und nun das eigentliche kopieren
-     97	004A  F3> A4			   REP	   movsb   ;
-     98	004C  9D			   popf
-     99	004D  5F			   pop	   di;
-    100	004E  5E			   pop	   si;
-    101	004F  1F			   pop	   ds;
-    102	0050				   @@fertig:
-    103	0050  5D			   pop	   bp;
-    104	0051  FB			   sti		   ; enable Interrupts
-    105	0052  CB			   ret
-    106	0053			     ENDP
-    107
-    108	0053			     PROC  _IPXopen_socket;
-    109					   ARG	sock:WORD, live:WORD
-    110					   P_START
-1   111	0053  55			push	bp
-1   112	0054  8B EC			mov	bp, sp
-    113					   PUSH_REGS
-1   114	0056  1E			push	ds
-Turbo Assembler	 Version 3.1	    28/04/96 13:28:50	    Page 3
-kern.asm
-
-
-
-1   115	0057  56			push	si
-1   116	0058  57			push	di
-    117	0059  8B 46 08			   mov	   ax, [live]
-    118	005C  8B 56 06			   mov	   dx, [sock]
-    119	005F  BB 0000s			   mov	   bx, @data
-    120	0062  8E DB			   mov	   ds, bx
-    121	0064  BB 0000			   mov	   bx, 0
-    122	0067  FF 1E 0000r		   call	   [enterIPX]
-    123	006B  3C FF			   cmp	   al,	0FFh
-    124	006D  75 06			   jne	   @@L1
-    125	006F  B8 FFFF			   mov	   ax, -1 ; Socket already open
-    126	0072  EB 0D 90			   jmp	   @@L3
-    127	0075			     @@L1:
-    128	0075  3C FE			   cmp	   al,	0FEh
-    129	0077  75 06			   jne	   @@L2
-    130	0079  B8 FFFE			   mov	   ax, -2 ; Socket Table full
-    131	007C  EB 03 90			   jmp	   @@L3
-    132	007F			     @@L2:
-    133	007F  8B C2			   mov	   ax, dx
-    134	0081			     @@L3:
-    135					   POP_REGS
-1   136	0081  5F			pop	di
-1   137	0082  5E			pop	si
-1   138	0083  1F			pop	ds
-    139					   P_END
-1   140	0084  5D			pop	bp
-    141	0085  CB			   ret
-    142	0086			     ENDP
-    143
-    144	0086			     PROC  _IPXclose_socket;
-    145					   ARG	sock:WORD
-    146					   P_START
-1   147	0086  55			push	bp
-1   148	0087  8B EC			mov	bp, sp
-    149					   PUSH_REGS
-1   150	0089  1E			push	ds
-1   151	008A  56			push	si
-1   152	008B  57			push	di
-    153	008C  8B 56 06			   mov	   dx, [sock]
-    154	008F  BB 0000s			   mov	   bx, @data
-    155	0092  8E DB			   mov	   ds, bx
-    156	0094  BB 0001			   mov	   bx, 1
-    157	0097  FF 1E 0000r		   call	   [enterIPX]
-    158					   POP_REGS
-1   159	009B  5F			pop	di
-1   160	009C  5E			pop	si
-1   161	009D  1F			pop	ds
-    162					   P_END
-1   163	009E  5D			pop	bp
-    164	009F  CB			   ret
-    165	00A0			     ENDP
-    166
-    167	00A0			     PROC  _IPXlisten;
-    168					   ARG	ecb:DATAPTR
-    169					   P_START
-1   170	00A0  55			push	bp
-1   171	00A1  8B EC			mov	bp, sp
-Turbo Assembler	 Version 3.1	    28/04/96 13:28:50	    Page 4
-kern.asm
-
-
-
-    172					   PUSH_REGS
-1   173	00A3  1E			push	ds
-1   174	00A4  56			push	si
-1   175	00A5  57			push	di
-    176	00A6  C4 76 06			   les	   si, [ecb] ; Adresse ecb
-    177	00A9  BB 0000s			   mov	   bx, @data
-    178	00AC  8E DB			   mov	   ds, bx
-    179	00AE  BB 0004			   mov	   bx, 4
-    180	00B1  FF 1E 0000r		   call	   [enterIPX]
-    181					   POP_REGS
-1   182	00B5  5F			pop	di
-1   183	00B6  5E			pop	si
-1   184	00B7  1F			pop	ds
-    185					   P_END
-1   186	00B8  5D			pop	bp
-    187	00B9  B4 00			   mov	ah, 0
-    188	00BB  CB			   ret
-    189	00BC			     ENDP
-    190
-    191				     ;;	PROC  _asm_esr_routine;
-    192				     ;;	      push    bp;
-    193				     ;;	      PUSH_REGS;
-    194				     ;;	      mov     ax, @data
-    195				     ;;	      mov     ds, ax	 ;  F�r	C PROGRAMM
-    196				     ;;	      push    es; Adressegment vom EBC
-    197				     ;;	      push    si; Adressoffset vom ECB
-    198				     ;;	      call    _esr_routine;  C ROUTINE
-    199				     ;;	      pop     si;
-    200				     ;;	      pop     es;
-    201				     ;;	      POP_REGS;
-    202				     ;;	      pop     bp;
-    203				     ;;	      cli   ; no Interrupt says	NOVELL
-    204				     ;;	      ret
-    205				     ;;	ENDP
-    206
-    207
-    208	00BC			     PROC  _Net_Call;
-    209					   ARG	   func:WORD, req:DATAPTR, repl:DATAPTR; Argumente
-    210	00BC  55			   push	   bp
-    211	00BD  8B EC			   mov	   bp, sp
-    212	00BF  8B 46 06			   mov	   ax, [func];
-    213	00C2  1E			   push	   ds;
-    214	00C3  56			   push	   si;
-    215	00C4  57			   push	   di;
-    216	00C5  9C			   pushf
-    217	00C6  C5 76 08			   lds	   si, [req]  ;	Request
-    218	00C9  C4 7E 0C			   les	   di, [repl] ;	Reply
-    219	00CC  CD 21			   int	   21h
-    220	00CE  9D			   popf
-    221	00CF  5F			   pop	   di;
-    222	00D0  5E			   pop	   si;
-    223	00D1  1F			   pop	   ds;
-    224	00D2  5D			   pop	   bp;
-    225	00D3  B4 00			   mov	   ah, 0
-    226	00D5  CB			   ret
-    227	00D6			     ENDP
-    228
-Turbo Assembler	 Version 3.1	    28/04/96 13:28:50	    Page 5
-kern.asm
-
-
-
-    229				     END
-Turbo Assembler	 Version 3.1	    28/04/96 13:28:50	    Page 6
-Symbol Table
-
-
-
-
-Symbol Name			  Type	 Value
-
-??DATE				  Text	 "28/04/96"
-??FILENAME			  Text	 "kern	  "
-??TIME				  Text	 "13:28:50"
-??VERSION			  Number 030A
-@32BIT				  Text	 0
-@@FERTIG			  Near	 KERN_TEXT:001F
-@@FERTIG			  Near	 KERN_TEXT:0050
-@@L1				  Near	 KERN_TEXT:0049
-@@L1				  Near	 KERN_TEXT:0075
-@@L2				  Near	 KERN_TEXT:004A
-@@L2				  Near	 KERN_TEXT:007F
-@@L3				  Near	 KERN_TEXT:0081
-@CODE				  Text	 KERN_TEXT
-@CODESIZE			  Text	 1
-@CPU				  Text	 0787H
-@CURSEG				  Text	 KERN_TEXT
-@DATA				  Text	 DGROUP
-@DATASIZE			  Text	 1
-@FILENAME			  Text	 KERN
-@INTERFACE			  Text	 00H
-@MODEL				  Text	 5
-@STACK				  Text	 DGROUP
-@WORDSIZE			  Text	 2
-ECB				  Number [DGROUP:BP+0006]
-ENTERIPX			  Dword	 DGROUP:0000
-FUNC				  Number [DGROUP:BP+0006]
-LIVE				  Number [DGROUP:BP+0008]
-NMBR				  Number [DGROUP:BP+000E]
-Q				  Number [DGROUP:BP+000A]
-REPL				  Number [DGROUP:BP+000C]
-REQ				  Number [DGROUP:BP+0008]
-SOCK				  Number [DGROUP:BP+0006]
-Z				  Number [DGROUP:BP+0006]
-_IPXCLOSE_SOCKET	       +  Far	 KERN_TEXT:0086
-(_IPXclose_socket)
-_IPXINIT (_IPXinit)		  Far	 KERN_TEXT:0000
-_IPXLISTEN (_IPXlisten)		  Far	 KERN_TEXT:00A0
-_IPXOPEN_SOCKET		       +  Far	 KERN_TEXT:0053
-(_IPXopen_socket)
-_NET_CALL (_Net_Call)		  Far	 KERN_TEXT:00BC
-_XMEMMOVE (_xmemmove)		  Far	 KERN_TEXT:0026
-
-Macro Name
-
-POP_REGS
-PUSH_REGS
-P_END
-P_START
-
-Groups & Segments		  Bit Size Align  Combine Class
-
-DGROUP				  Group
-  _DATA				  16  0004 Word	  Public  DATA
-KERN_TEXT			  16  00D6 Word	  Public  CODE
-
\ No newline at end of file
diff --git a/login.bat b/login.bat
deleted file mode 100755
index 74ee3df..0000000
--- a/login.bat
+++ /dev/null
@@ -1,4 +0,0 @@
-c:\net logout
-c:\net login %1 %2 %3
-map h:=HOME:
-
diff --git a/login.c b/login.c
index 2ceca64..c479f2b 100755
--- a/login.c
+++ b/login.c
@@ -1,4 +1,4 @@
-/* login.c 05-Apr-96 */
+/* login.c 21-May-96 */
 
 /****************************************************************
  * (C)opyright (C) 1993,1996  Martin Stover, Marburg, Germany   *
@@ -7,7 +7,6 @@
 #include "net.h"
 #include "nwcrypt.h"
 
-
 static int do_change_object_passwd(char *name,
                                    uint16 objtyp,
                                    char *oldpassword,
@@ -115,12 +114,13 @@ static int login_usage(void)
   return(-1);
 }
 
-int func_login(int argc, char *argv[])
+int func_login(int argc, char *argv[], int mode)
 {
   int result=-1;
   int option=0;
   uint8 uname[200];
   uint8 upasswd[200];
+  SEARCH_VECTOR  save_drives;
 
   if (argc > 1) {
     if (argv[1][0] == '-') {
@@ -130,13 +130,15 @@ int func_login(int argc, char *argv[])
       argv++;
     }
   }
-
+  get_search_drive_vektor(save_drives);
+  remove_nwpathes();
   if (argc > 1) strmaxcpy(uname, argv[1], sizeof(uname) -1);
   else uname[0]='\0';
   if (argc > 2) strmaxcpy(upasswd, argv[2], sizeof(upasswd) -1);
   else upasswd[0]='\0';
+
   while (result) {
-    if (!uname[0]) getstr("login", uname, sizeof(uname)-1, 1);
+    if (!uname[0]) getstr("Login", uname, sizeof(uname)-1, 1);
     if (uname[0]) {
       upstr(uname);
       upstr(upasswd);
@@ -152,16 +154,29 @@ int func_login(int argc, char *argv[])
       }
     } else break;
   }
+  if (result > -1) {
+    char profile[200];
+    remove_nwpathes();
+    sprintf(profile, "%slogin", prgpath);
+    read_command_file(profile);
+  } else {
+    (void)set_search_drive_vektor(save_drives);
+  }
   return(result);
 }
 
-int func_logout(int argc, char *argv[])
+int func_logout(int argc, char *argv[], int mode)
 {
-  if (logout()) fprintf(stderr, "logout=%d", neterrno);
+  remove_nwpathes();
+  if (logout()) {
+    fprintf(stderr, "logout=%d\n", neterrno);
+    return(1);
+  }
+  return(0);
 }
 
 
-int func_passwd(int argc, char *argv[])
+int func_passwd(int argc, char *argv[], int mode)
 {
   int result=0;
   uint8 uname[100];
@@ -169,7 +184,7 @@ int func_passwd(int argc, char *argv[])
   uint32 my_obj_id;
 
   if (ncp_14_46(&my_obj_id) < 0 || my_obj_id == MAX_U32 || !my_obj_id) {
-    fprintf(stderr, "Cannot get actual User ID\n");
+    fprintf(stderr, "Cannot get actual user id\n");
     result = -1;
   }
 
@@ -179,13 +194,13 @@ int func_passwd(int argc, char *argv[])
     upstr(uname);
     obj_id = ncp_17_35(uname,  1);
     if (!obj_id) {
-      fprintf(stderr, "Unkwown User: %s\n", uname);
+      fprintf(stderr, "Unkwown user: %s\n", uname);
       return(-1);
     }
   } else if (!result) {
     uint16 obj_typ;
     if (ncp_17_36(my_obj_id, uname, &obj_typ) || obj_typ != 1) {
-      fprintf(stderr, "Cannot get actual Username\n");
+      fprintf(stderr, "Cannot get actual username\n");
       result=-1;
     }
   }
@@ -194,11 +209,11 @@ int func_passwd(int argc, char *argv[])
     uint8 newpasswd2[130];
     if (my_obj_id == 1L) *upasswd='\0';
     else {
-      getstr("Old Password", upasswd, sizeof(upasswd)-1, 0);
+      getstr("Old password", upasswd, sizeof(upasswd)-1, 0);
       upstr(upasswd);
     }
-    getstr("New Password", newpasswd, sizeof(newpasswd)-1, 0);
-    getstr("New Password again", newpasswd2, sizeof(newpasswd2)-1, 0);
+    getstr("New password", newpasswd, sizeof(newpasswd)-1, 0);
+    getstr("New password again", newpasswd2, sizeof(newpasswd2)-1, 0);
     if (!strcmp(newpasswd, newpasswd2)) {
       upstr(uname);
       upstr(newpasswd);
@@ -213,3 +228,175 @@ int func_passwd(int argc, char *argv[])
   return(result);
 }
 
+static int get_line(FILE *f, char *buff, int bufsize, uint8 *str, int strsize)
+/* returns command line or -1 if ends */
+{
+  if ((FILE*) NULL != f) {
+    while (fgets(buff, bufsize, f) != NULL){
+      char *p       = buff;
+      char *beg     = NULL;
+      char c;
+      int  len=0;
+      while (0 != (c = *p++) && c != '\n' && c != '\r' && c != '#') {
+        if (!beg){
+          if (c != '\t' && c != 32) {
+            beg = p - 1;
+            len = 1;
+          }
+        } else ++len;
+      }
+      if (len) {
+        strmaxcpy((uint8*)str, (uint8*)beg, min(len, strsize-1));
+        return(0);
+      }
+    }
+  }
+  return(-1);
+}
+
+
+
+static char **build_argv(char *buf, int bufsize, char *command)
+/* routine returns **argv for use with execv routines */
+/* buf will contain the path component 	     	      */
+{
+  int len        = strlen(command);
+  int offset     = ((len+4) / 4) * 4; /* aligned offset for **argv */
+  int components = (bufsize - offset) / 4;
+  if (components > 1) {  /* minimal argv[0] + NULL */
+    char **argv  = (char **)(buf+offset);
+    char **pp    = argv;
+    char  *p     = buf;
+    char  c;
+    int   i=0;
+    --components;
+    memcpy(buf, command, len);
+    memset(buf+len, 0, bufsize - len);
+    *pp    = p;
+    while ((0 != (c = *p++)) && i < components) {
+      if (c == 32 || c == '\t') {
+        *(p-1) = '\0';
+        if (*p != 32 && *p != '\t') {
+          *(++pp)=p;
+          i++;
+        }
+      } else if (!i && c == '/') {  /* here i must get argv[0] */
+        *pp=p;
+      }
+    }
+    return(argv);
+  }
+  return(NULL);
+}
+
+int read_command_file(char *fstr)
+{
+  FILE *f=fopen(fstr, "r");
+  int  result=-1;
+  if (f != NULL) {
+    char *linebuf= xmalloc(512);
+    char *buf    = xmalloc(512);
+
+    while (get_line(f, buf, 512, linebuf, 512) > -1) {
+      char **argv=build_argv(buf, 512, linebuf);
+      if (argv != NULL) {
+        int argc=0;
+        char **pp=argv;
+        while (*pp) {
+          argc++;
+          pp++;
+        }
+        upstr(argv[0]);
+        if (argc > 2 && !strcmp(argv[0], "ECHO")) {
+          char *p=argv[argc-1];
+          while (p-- > argv[1]) {
+            if (*p=='\0') *p=32;
+          }
+          argc=2;
+        }
+        call_func_entry(argc, argv);
+        result = 0;
+      }
+    }
+
+    fclose(f);
+    xfree(linebuf);
+    xfree(buf);
+  } else result=-2;
+  return(result);
+}
+
+int func_profile(int argc, char *argv[], int mode)
+{
+  if (argc < 2) {
+    fprintf(stderr, "usage:\t%s fn\n", funcname);
+    return(-1);
+  }
+  if (read_command_file(argv[1]) == -2) {
+    fprintf(stderr, "command file %s not found\n", argv[1]);
+  }
+  return(0);
+}
+
+int func_cwd(int argc, char *argv[], int mode)
+{
+  char pathname[65];
+  int  len;
+  if (argc < 2) {
+    fprintf(stderr, "usage:\t%s path\n", funcname);
+    return(-1);
+  }
+  strmaxcpy(pathname, argv[1], sizeof(pathname) -1);
+  korrpath(pathname);
+  if (0 != (len = strlen(pathname))) {
+    char *p=pathname+len-1;
+    if (*p == '/' || *p == ':') {
+      *(++p) = '.';
+      *(++p) = '\0';
+      len++;
+    }
+    if (!chdir(pathname)) {
+      if (len > 2 && *(pathname+1) == ':')   /* device changed */
+        setdisk(*pathname - 'a' );
+    } else {
+      fprintf(stderr, "cannot chdir to %s\n", pathname);
+      return(1);
+    }
+    return(0);
+  } else return(-1);
+}
+
+int func_echo(int argc, char *argv[], int mode)
+{
+  if (argc > 1)
+    fprintf(stdout, "%s\n", argv[1]);
+  return(0);
+}
+
+int func_exec(int argc, char *argv[], int mode)
+{
+  if (argc > 1)  {
+    char *buf   = xmalloc(512);
+    char *buff  = xmalloc(512);
+    char *p     = buff;
+    int   k     = 0;
+    char **nargv;
+    while (++k < argc) {
+      strcpy(p, argv[k]);
+      p    += strlen(argv[k]);
+      *p++  = 32;
+      *p    = '\0';
+    }
+    nargv=build_argv(buf, 512, buff);
+    xfree(buff);
+    if (nargv != NULL) {
+      if (!mode)
+        spawnvp(P_WAIT, buf, nargv);
+      else
+        execvp(buf, nargv);
+    }
+    xfree(buf);
+  }
+  return(0);
+}
+
diff --git a/makefile b/makefile.bcc
similarity index 94%
rename from makefile
rename to makefile.bcc
index 6b0f1ad..a787aa0 100755
--- a/makefile
+++ b/makefile.bcc
@@ -21,7 +21,7 @@ RM = del
 ASMODS=  kern$(O)
 CCMODS=  tools$(O) netcall$(O) ncpcall$(O) \
          login$(O) map$(O) slist$(O) nwcrypt$(O) \
-         nwdebug$(O) nwtests$(O)
+         nwdebug$(O) nwtests$(O) capture$(O)
 
 all:      net$(E)
 
diff --git a/map.c b/map.c
index 841cb50..1ef4c1f 100755
--- a/map.c
+++ b/map.c
@@ -24,6 +24,7 @@ static void show_map(uint8 *drvstr)
     if ((!get_drive_info(j, &connid, &dhandle, &flags)) && flags){
       char  servern[52];
       char  path[256];
+      servern[0]='\0';
       if (flags & 0x80) { /* lokal DRIVE */
         path[0]= '\\';
         if (j < 2){
@@ -35,11 +36,11 @@ static void show_map(uint8 *drvstr)
         if (get_dir_path(dhandle, path)) {
           strcpy(path, "DHANDLE !OK");
         }
+        if (connid) {
+          get_fs_name(connid, servern);
+          strcat(servern, "\\");
+        } else servern[0]='\0';
       }
-      if (connid) {
-        get_fs_name(connid, servern);
-        strcat(servern, "\\");
-      } else servern[0]='\0';
       printf("MAP %c: = %s%s\n", (char)j+'A', servern, path);
     }
   }
@@ -76,22 +77,27 @@ static void do_map(int drive, NWPATH *nwp)
 }
 #endif
 
-static int do_map(int drive, NWPATH *nwp)
+static int do_map(int drive, NWPATH *nwp, int delete)
 {
   int result = -1;
   if (drive > -1 && drive < 32) {
-    uint8 nmdrive[3];
-    nmdrive[0] = drive+'A';
-    nmdrive[1] = ':';
-    nmdrive[2] = '\0';
-    result = redir_device_drive(0x4, nmdrive, nwp->path);
+    uint8 connid;
+    uint8 dhandle;
+    uint8 flags;
+    if (!delete ||
+      (!get_drive_info(drive, &connid, &dhandle, &flags) && flags && connid)){
+      uint8 nmdrive[3];
+      nmdrive[0] = drive+'A';
+      nmdrive[1] = ':';
+      nmdrive[2] = '\0';
+      result = redir_device_drive(delete ? -1 : 0x4, nmdrive, nwp->path);
+    }
   }
   return(result);
 }
 
-
 static int parse_argv(uint8 *drvstr, NWPATH *nwpath,
-                  int argc, char *argv[], int smode)
+                  int argc, char *argv[], int smode, int argvmode)
 {
   int k     = 0;
   int mode  = 0;
@@ -149,7 +155,8 @@ static int parse_argv(uint8 *drvstr, NWPATH *nwpath,
     } /* while *p */
   } /* while k */
   if (mode == 30) {
-    getcwd((char *)nwpath->buff, sizeof(nwpath->buff));
+    if (argvmode != 1)
+       getcwd((char *)nwpath->buff, sizeof(nwpath->buff));
     mode = 40;
   }
   if (mode && mode != 20 && mode != 40) {
@@ -159,21 +166,24 @@ static int parse_argv(uint8 *drvstr, NWPATH *nwpath,
   return(0);
 }
 
-int func_map(int argc, char *argv[])
+int func_map(int argc, char *argv[], int mode)
 {
   uint8  drvstr[22];
   NWPATH nwpath;
   if (!ipx_init()) argc = 1;
-  if (!parse_argv(drvstr, &nwpath, argc, argv, 0)) {
-    if (*(nwpath.path)) {
-      if (do_map(*drvstr - 'A', &nwpath)< 0)
+  if (!parse_argv(drvstr, &nwpath, argc, argv, 0, mode)) {
+    if (*(nwpath.path) || mode==1) {
+      if (do_map(*drvstr - 'A', &nwpath, mode)< 0)
         fprintf(stderr, "MAP Error\n");
     }
-    show_map(drvstr);
+    if (mode != 1)
+      show_map(drvstr);
     return(0);
   }
   return(1);
 }
+
+
 /* ------------------------------------------------- */
 static int show_search(uint8 *drvstr)
 {
@@ -183,38 +193,42 @@ static int show_search(uint8 *drvstr)
   get_search_drive_vektor(drives);
   while (p->drivenummer != 0xff && j++ < 16) {
     char  path[256];
-    char  nwname[256];
+    char  nwname_path[300];
+
+
     if ( !*drvstr || j == *(drvstr+1)) {
-      if (p->flags && !(p->flags & 0x80)){
-        get_fs_name(p->u.fs.connid, nwname);
-        if (get_dir_path(p->u.fs.dhandle, path)) {
-          strcpy(path, "ERROR NW");
-        }
-        (void)xadd_char(nwname, '\\', 20);
+
+      if (p->drivenummer == 0xfe){
+        strcpy(path, p->dospath);
       } else {
-        nwname[0] = '\0';
-        /*
-        nwname[0] = '<';
-        strcpy(nwname+1, "LOCAL");
-        */
-        if (p->drivenummer == 0xfe){
-          strcpy(path, p->u.d.dospath);
-        } else if (getcurdir((int)(p->drivenummer)+1, path)) {
-          strcpy(path, "ERROR DOS");
-        }
-        /*
-        (void)xadd_char(nwname, '>', 20);
-        */
+        *path      = p->drivenummer+'A';
+        *(path+1)  = ':';
+        strcpy(path+2, p->dospath);
       }
-      strcat(nwname, path);
-      printf("SEARCH%2d = %c: %s\n", j, (char)(p->drivenummer)+'A', nwname);
+
+      if (p->flags && !(p->flags & 0x80)){
+        char *pp=nwname_path;
+        *pp++ = '[';
+        get_fs_name(p->connid, pp);
+        pp   +=strlen(pp);
+        *pp++='\\';
+        if (get_dir_path(p->dhandle, pp)) {
+          strcpy(pp, "ERROR NW");
+        }
+        pp   += strlen(pp);
+        *pp ++= ']';
+        *pp   = '\0';
+      } else {
+        *nwname_path  = '\0';
+      }
+      printf("SEARCH%2d = %s %s\n", j,  path, nwname_path);
     }
     p++;
   }
   return(0);
 }
 
-static int set_search(uint8 *drvstr, NWPATH *nwp)
+static int set_search(uint8 *drvstr, NWPATH *nwp, int pathmode)
 {
   int result=-1;
   SEARCH_VECTOR          drives;
@@ -222,31 +236,78 @@ static int set_search(uint8 *drvstr, NWPATH *nwp)
   int j=0;
   int entry = (*drvstr=='s') ? *(drvstr+1) : 0;
   get_search_drive_vektor(drives);
+
   while (p->drivenummer != 0xff && j++ < 16) {
     if (!entry && (p->drivenummer + 'A' == *drvstr)) entry=j;
+    if (p->drivenummer + 'A' == nwp->path[0] && nwp->path[1] == ':'
+         && !strcmp(nwp->path+2, p->dospath)) {
+      p->drivenummer=0xfe;
+      *(p->dospath) = '\0';
+    }
     p++;
   }
+
   if (entry > 0) {
     if (entry > 16)  entry = 16;
-    if (--entry < j) p = drives+entry;
+    if (pathmode == 2 && entry <= j && entry < 16) {  /* insert modus */
+      int k=j+1-entry;
+      if (j < 16) {
+        p++;
+        k++;
+        j++;
+      }
+      while (k--) {
+        memcpy(p, p-1, sizeof(SEARCH_VECTOR_ENTRY));
+        --p;
+      }
+    }
+    if (--entry < j)
+      p = drives+entry;
     else (p+1)->drivenummer = 0xff;
+    p->flags       = 0;
     p->drivenummer = 0xfe;
-    strcpy(p->u.d.dospath, nwp->path);
+    if (pathmode==1)
+      *(p->dospath) = '\0';
+    else
+      strcpy(p->dospath, nwp->path);
     result = set_search_drive_vektor(drives);
   }
   return(result);
 }
 
-int func_path(int argc, char *argv[])
+int func_path(int argc, char *argv[], int mode)
 {
   uint8  drvstr[22];
   NWPATH nwpath;
-  if (!parse_argv(drvstr, &nwpath, argc, argv, 1)) {
+  if (!parse_argv(drvstr, &nwpath, argc, argv, 1, mode)) {
     int result=0;
-    if (*(nwpath.path)) result=set_search(drvstr, &nwpath);
-    show_search(drvstr);
+    if (*(nwpath.path) || mode==1)
+       result=set_search(drvstr, &nwpath, mode);
+    if (mode != 1)
+      show_search(drvstr);
     return(result);
   }
   return(1);
 }
 
+void remove_nwpathes(void)
+{
+  SEARCH_VECTOR          drives;
+  SEARCH_VECTOR_ENTRY *p=drives;
+  int j=0;
+  get_search_drive_vektor(drives);
+  while (p->drivenummer != 0xff && j++ < 16) {
+    if (p->flags && !(p->flags & 0x80)){
+      p->flags=0;
+      p->drivenummer=0xfe;
+      *(p->dospath) ='\0';
+    }
+    ++p;
+  }
+  set_search_drive_vektor(drives);
+}
+
+
+
+
+
diff --git a/mars_dosutils.lsm b/mars_dosutils.lsm
new file mode 100644
index 0000000..e033569
--- /dev/null
+++ b/mars_dosutils.lsm
@@ -0,0 +1,16 @@
+Begin3
+Title:          mars_dosutils
+Version:        0.10
+Entered-date:   21-May-96
+
+Description:    Simple DOS client program specially
+                for mars_nwe.
+                Supports login, map, capture, passwd
+                Binary + sourcen
+Keywords:       novell, netware, client, ipx, ncp, mars_nwe
+Author:         mstover@freeway.de  (Martin Stover)
+Maintained-by:  mstover@freeway.de  (Martin Stover)
+Primary-site:   ftp.gwdg.de:/pub/linux/misc/ncpfs
+                60kB mars_dosutils-0.10.tgz
+Platforms:      DOS, DOSEMU
+End
diff --git a/mk.bat b/mk.bat
deleted file mode 100755
index db2def5..0000000
--- a/mk.bat
+++ /dev/null
@@ -1,4 +0,0 @@
-maker %1 %2 %3 %4  > err
-type err
-copy net.exe c:\
-del net.exe
diff --git a/net.c b/net.c
index 8ee55cd..7f5b918 100755
--- a/net.c
+++ b/net.c
@@ -1,74 +1,123 @@
-/* net.c 14-Mar-96 */
-/* simple client programm to act with mars_nwe */
-
-/****************************************************************
- * (C)opyright (C) 1993,1996  Martin Stover, Marburg, Germany   *
- ****************************************************************/
-
-#include "net.h"
-char *funcname=NULL;
-typedef int (*NET_FUNC)(int argc, char *argv[]);
-
-static struct s_net_functions {
- char      *name;
- char      *description;
- NET_FUNC  func;
-} net_functions[] = {
-{"LOGIN",  "login to Server as User" ,              func_login  },
-{"MAP",    "list maps and map drives" ,             func_map    },
-{"PATH",   "list and set search path" ,             func_path   },
-{"LOGOUT", "logout from Server",       		    func_logout },
-#if 0
-{"SLIST",  "list Servers",          		    func_slist  },
-#endif
-{"PASSWD", "change password",          		    func_passwd },
-#if 1
-{"TESTS",  "only testroutines!",                    func_tests  },
-#endif
-{"DEBUG",  "set debug level, for mars_nwe only !",  func_debug  }
-};
-
-#define MAX_FUNCS  (sizeof(net_functions) / sizeof(struct s_net_functions))
-
-int main(int argc, char *argv[])
-{
-  NET_FUNC  func    = NULL;
-  int       result  = -1;
-  if (argc > 1) {
-    char funcn[200];
-    int  k= MAX_FUNCS;
-    strmaxcpy(funcn, argv[1], sizeof(funcn)-1);
-    upstr(funcn);
-    while (k--) {
-      if (!strcmp(funcn, net_functions[k].name)) {
-        func=net_functions[k].func;
-        funcname=net_functions[k].name;
-        break;
-      }
-    }
-  }
-  if (func != NULL) {
-    if (ipx_init() || func == func_map) {
-      result = (*func) (argc-1, &(argv[1]));
-    }
-  } else {
-    int  k= MAX_FUNCS;
-    char progname[256];
-    strmaxcpy(progname, argv[0], sizeof(progname)-1);
-    upstr(progname);
-    fprintf(stderr, "\n"
-     "****************************************************************\n"
-     "* (C)opyright (C) 1993,1996  Martin Stover, Marburg, Germany   *\n"
-     "****************************************************************\n\n" );
-    fprintf(stderr, "Usage:\t%s func ... \nfuncs:", progname);
-    while (k--) {
-      if (net_functions[k].func) {
-        fprintf(stderr, "\t%s\t: %s\n",
-           net_functions[k].name, net_functions[k].description);
-      }
-    }
-  }
-  return(result);
-}
-
-
+/* net.c */
+#define VERS_DATE "21-May-96"
+/* simple client program to act with mars_nwe */
+
+/****************************************************************
+ * (C)opyright (C) 1993,1996  Martin Stover, Marburg, Germany   *
+ ****************************************************************/
+
+#include "net.h"
+
+char *funcname=NULL;
+char  prgpath[65];
+
+typedef int (*NET_FUNC)(int argc, char *argv[], int mode);
+
+static struct s_net_functions {
+ char      *name;
+ char      *description;
+ NET_FUNC  func;
+ int       mode;
+} net_functions[] = {
+
+{"SPAWN",  "spawn program(command file)" ,          func_exec   , 0},
+{"EXEC",   "execute program(command file)",         func_exec   , 1},
+{"ECHO",   "echoes string (command file)" ,         func_echo   , 0},
+{"CD",     "change directory (command file)" ,      func_cwd    , 0},
+{"LOGIN",  "login to server as user" ,              func_login  , 0},
+{"PROFILE","read command file" ,                    func_profile, 0},
+{"CAPTURE","list and redirect printers" ,           func_capture, 0},
+{"ENDCAP", "cancel redirect printers" ,             func_capture, 1},
+{"MAP",    "list maps and map drives" ,             func_map    , 0},
+{"MAPDEL", "removes maps" ,                         func_map    , 1},
+{"PATH",   "list and set search path" ,             func_path   , 0},
+{"PATHDEL","removes search path" ,                  func_path   , 1},
+{"PATHINS","insert search path" ,                   func_path   , 2},
+{"LOGOUT", "logout from server",       		    func_logout , 0},
+#if 0
+{"SLIST",  "list servers",          		    func_slist  , 0},
+#endif
+{"PASSWD", "change password",          		    func_passwd , 0},
+#if 1
+{"TESTS",  "only testroutines!",                    func_tests  , 0},
+#endif
+{"DEBUG",  "set debug level, for mars_nwe only !",  func_debug  , 0}
+};
+
+#define MAX_FUNCS  (sizeof(net_functions) / sizeof(struct s_net_functions))
+
+static int get_entry_nr(char *fstr)
+{
+  int       entry    = MAX_FUNCS;
+  char      buff[200];
+  char      funcn[100];
+  char      *pp;
+  strmaxcpy(buff, fstr, sizeof(buff)-1);
+  korrpath(buff);
+  get_path_fn(buff, NULL, funcn);
+  pp=strrchr(funcn, '.');
+  if (NULL != pp) *pp = '\0';
+  upstr(funcn);
+  while (entry--) {
+    if (!strcmp(funcn, net_functions[entry].name)) return(entry);
+  }
+  return(-1);
+}
+
+int call_func_entry(int argc, char *argv[])
+{
+  int       funcmode;
+  int       result   = -1;
+  NET_FUNC  func     = NULL;
+  int       entry = get_entry_nr(argv[0]);
+  if (entry > -1) {
+    func     = net_functions[entry].func;
+    funcmode = net_functions[entry].mode;
+    funcname = net_functions[entry].name;
+  }
+  if (NULL != func) {
+    if (ipx_init() || func == func_map) {
+      result = (*func)(argc, argv, funcmode);
+    } else {
+      fprintf(stderr, "Cannot init IPX\n");
+    }
+  } else result = -0xff;
+  return(result);
+}
+
+static void get_path(char *path)
+{
+  char buf[100];
+  strmaxcpy(buf, path, sizeof(buf)-1);
+  korrpath(buf);
+  get_path_fn(buf, prgpath, NULL);
+}
+
+int main(int argc, char *argv[])
+{
+  int result = -0xff;
+  get_path(argv[0]);
+  result = call_func_entry(argc, argv);
+  if (result == -0xff)
+    result = call_func_entry(argc-1, argv+1);
+  if (result == -0xff) {
+    int  k= MAX_FUNCS;
+    char progname[256];
+    strmaxcpy(progname, argv[0], sizeof(progname)-1);
+    upstr(progname);
+    fprintf(stderr, "\n"
+     "* (C)opyright (C) 1993,1996  Martin Stover, Marburg, Germany *\n"
+     "  Version: %s\n\n", VERS_DATE);
+
+    fprintf(stderr, "Usage:\t%s func ... \nfuncs:", progname);
+    while (k--) {
+      if (net_functions[k].func) {
+        fprintf(stderr, "\t%s\t: %s\n",
+           net_functions[k].name, net_functions[k].description);
+      }
+    }
+  }
+  return(result);
+}
+
+
diff --git a/net.exe b/net.exe
index 77dd44adf8d9568ae9cf1fb1a2ac5754382453e8..de14040340a40036b24a8ad2041220afab9ccd0d 100755
GIT binary patch
delta 28387
zcmb7t3qVxW_V=DM!!R#kc!+>H3_kFU4-5?iQFPEUoqUXfih`hMh6Xd3B@8yE!XTPQ
z)3`k}dtEa#<r=<G2{g0Jy8TUim}M6nGgCuE<b1!q&zWJg?*IEf>o@1I*M6<N_u6Z%
zz4zg>3VGF^a{UwORiv0a&k<P|5rl*OFX@x)&vQz3GSCMI1ysN$nNnQ>6aY^EQ9u~L
z6Q#Nkm<*%<eSt1Ov8>4NIiL_&0xSY@fh-^cNC&0>W?(#E0!9HzvLd_RFx(6Q1_FJ6
zXrL?583+SH0DnLOC;<Yrk|Mum;3jY#xC;CNTmrrWz5&hwp93d>TA&6v0PF+y06T&A
zh`q?~E!?~gR01ypdNM#g2Urj60Pf3&t49HYxZ&zH*>Lq&z+qq=Fc%mE^aKd-Eg7yp
z0Bi=<0d`<K&;@Am9j-nEj0V0}4p)B+l-u!h!)LfU2N(u~0iP>C2uuP#Rt;A#0ww?s
z`6+ce@DX=P9SvxJE3#AScK{xk0t^DKkyGkw;ALPk5Dr}RJ*7SZJO_*bIsm^YPpR#t
z_{j&J06GG<d`_tk0{;Y-0rP<?ic{)Ofu+D@)hYEEU@Pz(kP37G7AcDS{*b3@z5`AG
z?*kiw8NegJT`pboGw?339#{sXbLn<X3T|%5(lwt0hk>;~9*_WZ2L6YnYyJsr0J4Bc
zK&e6|zUi8GfM<XqfC0FsOxOGyI0)E*T;NGyFwhA&?31o}30ML=2@LkJr)z#uq-%}=
zZv!R3Q@})E81NP{S_k9+i9j@PUVcS$5_lh21Iz%r11|20=4;?1U?Wfh<N{NGAwUP9
zNp?k31-uR{0iLkqXCTlSPysi{70q|RA>cKj7#Ipf0dM$T(KvyrKq?RiG%2rWb^;rK
zJm7I)I4}TE0hfHPXpR9pfp>w8z)~O^7zNlv@N-&mMROP^1}wlZU?6Z(dqr~)*acJo
zIY121rn#c|1Na5_0LTDRfXnJDny-K=Kn47+x}sSHWC5wbN<U-{WCDr6UELMC=8_JH
z0Ivhffib{9AP{JiAJP6B*bBVL9nt<MJEDCX$N(aMKgkj8FTiQwU%;C{Ij|H+2AsY}
zv_(Jwut|AD+Y>nLgL_~#@QjcBh;{;Ql7TylBib#%3}C71h_*XmlI7_70i6LI&_r@{
z-vaxAR{=ZlG%y?J4|D;R%AV8B0+N6ZKr4ApcL}Hm_5yDJB|rku)sCMhxedDRz=yI8
zIv%hBW?&T10r-w=(0vYk1pEUi1)c}`01@=siI5OK2rfVer~m~(fL0wOC2$+K0bBzb
zfM0-1fc-oCoCm%J&H|qSCxKd^1~>#%169CoU?=b%@D{KYcoo<JYy{Q=<-i(XB~St^
z2c8A2z!G2)kPBo3b99jZGjTH=NbO0;tO11l5l2WqkOlMtK7WLeUBEhE5s(XH0Z$Gg
zWH=BGEYuhIeHv8ccNr+d{VL!Epy%U+D1nQQ5pojv7tj}Qj3Xovcw?-ckp5!{c|Vm9
z(_})10^vZ{z#=~b@aQx`4p<1;0sJ<Vkn_L^;9tN8z|C|*>VbEG6d(lnpEN>t0yba{
zFd29p=nuRyose;W0r(VY7u)eO8CWonkaS=IFc1g>jJbqFEg>WbxV@N==;efT1hl|!
z&lB=*VAm=_#sEp>gmeZ%00poT*a9>IH-N86weC$|1CR|&1bP7W5d7$Xg=-0!2}}XZ
zz)7xJR|PBw9s}Y56>v>ftvd|73v2+M0v-pt0{*~#r1d9|vW}1hU??yM=m|suoq!I2
z7Lczab|O>|au@g!_!2k)><2yq{sF87?0^k;8kh!*0}_BiKyRQMAos1--BniWeg%#J
zhkz<z1F#fG2Sxyqz_&iA1hB`)Uafl>H&$Q_&<O|zIN*+=T6YoH50nA3fT_S};8CCp
za8F*X`wVyk*bJ-!mIGq}0}u`b0>d<*2hOXJF|ZNn1^6z;Pot_@#{*7a888JH4<rDC
zfB@hoYIha*7B~cy0WSd008@a@KnU=t4jBPIYpZqd1IvH~z)+wQu=g3&I{DrbRVpVx
zP~^wUbu)St`Bl_MJCo+<R|teFP#q;)bSa)bQhfD$YQpaYKI{D(9!ugKx~`F+tYKlX
zH8B;+r@5oQ1nvJixbGLOw{|#^(zSf8E{enDKf0dw!-=uKO-0PBlczJ%BL{+x{t(n~
zj0kc0z!D%2SOhF2m9Ij%G=qA0A|tj;JMu#i5^wm1%+5G{+Ig*Ne3?mcChEZB#4rhD
zu7vc+YB`}Xx+EH^$s=c?N)73xTsf0eE7$|S*6(WXed;RWv?w0Cb5(9qj+NKQmHXAs
z(1YsP8MBTn$W-Sw$2HC}ZELlf-|ByGz%EcHnA(aK3KQB~Ia}#tsj1C1Lol_vEG0=F
ztBEbfk#s~&tUb%3_o(@@fWfJI)Mci7RqBt)ei><K^$|>MTX##z_`6fswo@%LwQl{0
zy>Bh*yjy7&;&!QpxDSEdz(;CcuD2+L_|MMZkLf$^wdz;OxP5BAC2%~wj1B75<DlB+
zQ!OJdF1DuBbX!|v)d_|8U(+y4C^fY@O{xUtK{dZAXq%cAGn^Ka9}zr6%{Xv!>%Y|e
z^57>q6#9$c9y*X%<&6Vmlxj~%e;Iv0pu>>xUFv<L@9|`C+%m1<g7A^*tA;947WyF~
zcerWat6qaz&(1gjzFDTBIo_;NR|PaA3u~hHspFMZYHP?=yde!S0$%qP5KKc#lB(45
z!eDwyF3{17FUFc!l{Y_T!O2#|?r@j3I+>t%ZCy#)YTo=83-GlXtI3T6R|WGVjHMbi
ze<QSGYPA>yevsWRc{Qoteo$SHh9zV-dGkZ{o4eFo_o)@ao4eJhHm)Dh=00JWR+4lQ
z_14rWaoGxec|yl<?xdPu(6PUr2KZD9g3FJF%F0a2H&3A^hzCxH@mP_4s<daKwtzqG
zt|K-AdSNA(mWIxfY!=@Lg({&?iTA6CqgLazsGKIH+|)KZ!+B+v7+GPN<{?U$h1ki?
zlM>yrQcD{e)zwj$&{~_(8eQfaZ_?OQPD`5;Z`I?pr)*bZ&&AfT)cCrN?{SF(`6XfR
zJko0Tq)=Iwp}A8hBUbg!_!HL7U2Cj?AK)egH>&ubt=g`?*nW?sv0c8VwWHh0FYvnX
zxx>mYv?6M4u_m_0d4B(MnLDG)x@c;wop)LPjQ=EG8Gmdk*UuRLeZFt}w@c+EE+bO>
zuJ4J83;eur!Or@F)1=XwbT(CahOXYEi4GPD6{xe;q_X*zU#MQAbt%Q#O_DeS-WXaP
zwW>+xh6UXW)#cju_y4$$_fCrrNz#F;@eEY-cknE>#%!+5P((XM2<QVGv7-~n2z?{-
zjduE)8x{+t7EP&16}r~chE!=B<R+jcR2Vo1ofZwo3uE4K6|qd)??YT&o!`nY)~}wa
zC8Rop+-Y>4b)K(V{kdB3`Bd$^P`dg%^~ePObZ!3mt)Hv6P^mLtmZq(-DOW^)rnU?B
zs|jarQl3$Bo}O){r8HE3%7oh84vt#g*2`kd7<bG|YInq+SVWGEZYkmqEMg6fD2_NL
zsp?H_pu)IsLlG7!(;#k~CVN|g5=C=)I+tadp(^1Mi}FlVWWE9otuQy_vcAk3%21Uu
zxJC-q)MjX+O9Moj7apM5Edz~ng2pS6OmBkJGK=z)LKTAfh)&(ZH)x#~%2sdGZgHM<
z`QN#a5E|-d|FvGZLCa6;G@6^K<zMR*IZx~;8A|!ZCa{{bDyw~n*%e}_8sW@9Ub;^#
zG`)O|mN-eEqmRY#9#Z}d`vtV4C(KYa^1+%a1-`n|Pl11G9rrpG${W|q<riawce{4n
zyQA~tGVa$d{GBd4x$9c~ZNuYSykYN6gH2{H4$ckU8(a|lQ}FfRej%|T!$MvS&I}n5
zk`j^{ax5gTLtuwN9rlD?Xa7|MZwwaeVNoW8g74~TB{4SywYUPE7u<b_PEp;0)1*?m
zn@$j<5g~7U1N~JQ?Mw|yFe$Be6q7wW>`G#dLB}RV0qC@okxB_kqaE!TO5T*pDXam}
z!cq-DyL6s0EsX}0*cD`XKy+EEg7wWg0u@Cxpgxs@(paCWq`$uSsY_J|(GI(wSR-i%
zHJg!=esIJ1JCkUq9@HYHSD&gU#QA`@!Zaxro@V?e|GsfEmlwc~j_PfPB#S*I4sJ<s
zsj1Xj6M%WsaaUuF6DDYi2i0ciqJ@Cv9ipAn{G**q@sO&kI38W5s3I;uq0k?VjD&Xt
zrKLGfCJKV>kmIgk3l(Kvf<<N1f>Smn6I@+r@^!vonGQS|!|AQ!dr880#)0FS$}+9q
z)J({>bZx1rr97jp-qiZ3+SQpR0B*{y$hM8LIfvgI)z|L<D*lV8N4Ow=UfFes-Ej?-
z#NZ<|Pr;;%E(<6-Hay>^IUplQ5|dfClDkW7J_k6tOI30=(-v@mQ-i*QhGN9}#MU%A
zSb5996<x{QzSdw``jQcSZ9PivTCF}Mce8Ar@ZP4R@5=%lms=g5Drge2dXv3XPCx~5
z^C?Mo87M8iEpY{GTdD0qYP4sa$D3+PtP013*5rESDzsj`a;5%g@7fGibZJM3Ml@!0
zsV}AvQS9kNk?NU)n54u{tGOXisLk+?E=}biD*LdWRTOI%3ZY`OX-$fDA#Dr7Fr=hw
zQWct-B0arjy^HlZ*HrrK?vQ~^=)+d@3jgR86FI_BaY-MVQsoaxOrcPZzJLaKRRhU~
zNSH_Tf}Opx-%Cql?H@qnihb0gcbcFzVOBlv@2Qi!ooOqxq0tc)cbHm3%v83=q-!D6
z(-Y3-|L7s`^dCCIvgD|e!&<%JJ)zXj=40(~ssDwc(|{x5^eqY}45o%%?bEwuT6J-E
z@QNw{BEeddzq#RyKfNV_IG(H_A{pwu=?|tuV7ODM-P0YtO;CxdUWqUNQrA6Pc?&<L
z+jQ>hTl^c{hH$Un;{V;Pf2Ubmm31yALpFUtntFI|xy5(s-iPaRiyzm0lAVrXMdD0o
zJBb5`N25fkj&maWf>88rOs_UXq=~~B^_Dj_%ESq|)Y1g~vo_;4w302(^G&P!2k5Nb
zop>&>%i?Vj^mVD}29+kRz%-v4Xs6d5rrVq=6y58(oxXqOcZ_k<b)S)BEGVU<%ng|W
zDn5f|?q=_G5HIzkv-WWtx&`Gq-V}wUr8Ulwd7igiM{<@nxv90((o$+_uFYsh<%KQg
zh5(vkU;13<JJS^jB0HMbLse$F5xvG&5M$K&#^X*XY!V7@3xzF0VKcJ&`Zr`QiXbtT
zr}l!0F`(3R6Ma-`Zg{&5S;-quV~jV06GDtF7=>s<A)E-YDjj*voa>2NyE`-mL~Sv)
z;UKyXqWP3)0EpyL{CFEC0I9+i9n;cWPYV;on)!l!7$v{%D85N-Guo@$mA;irbSOi-
z&6if(Q$ZpW+NC7t|3>xAvr-S7kYMpI?CQxc68W)lHU?>znQn?qYSaiKg{Qk#U-Lw{
z7K+g-P64ifNuJlHa7V4uOB|1mwM+wB-}+54a*gRwo#}9Vo$1I-bd004+ahG&?}z~D
zZ;i*xL-fs&Yy6kpyKu!F`5WDP*!{1u2BF%tSF#Xe+lonoGSsgq(veh5$nr3!p_qKc
zef6_*^K_kawM8dQOwdm06c8LB)f@s6v*!q6H5#gKs_B5GlR;Jsdool<1<)c)ZgJG=
z*_$L!&63?D-5JRsO5!PzIQk9M(BVX8tu<-P4d;L7&-Lif4GHFD(fuNZ1Z%9ClB6NQ
zez3%bqc=-hYS5p2YV;WH^liQ(y6eCp!I&b~C@P>(W4cnIhgA_8$t&)5G^-SM*=_z(
zbVL>v1>x<YK!rXg>IJ{j?#!awqUp?lB$I8Op*urSjSet-=swngE>T8okz&}8U`Xrs
zWVYz|nLWD%4ha?wB&H0}%JOAB9o%EL_<&v=nK<$)gTj;cfouH8USZrTT7E{aA>7HE
z{7b!z+)uyqdwcc#?~#;Zq$?Uep!agwfB5p=BS-ZKAhv)N#mXPlHdVc{PXOlN5Jyrk
zy!FG|Pt`VMy|NeH(iVn7WeuTqp*oM$$h(^OfIeYdLLlF}&(Me$*pykKm-UhC7z_tJ
z+WvMR|6Ct4=08YsYHm|2Ls-g13qujO=ND?*nJ^1d(_^wSx+0Y;ukoD`?TmyS3k8Ll
z8Il2GnMO;3m(@FZn$f%A17In#iJ|zaN1^>Ys?oHC{TtHSsUDtQXmGqcc*V8#Fl*4o
znO&e^`l)Xtf4@)IXxcY|-F-u}P)9b>F(oSHv$V;!j$*mQo{L&Ws1V+Gn=q0U??RPN
z>s!FR?8|@NcQQB9m+#hZFkGnaIoC_K(qgpG;j{_DhR(i%sl{n(VP(4L87q!!N~&44
zDE_w;f+6CC2`w}cM{x_W{osiX)w9M7{Xnv|d%?z2I?p;<1RLiHYcgq|UNjw-vH27}
zf@0!BVC8#wZGg>Dl~QKXNG62*C2D#6^s9%UDhahd6P2%XEB2zLbhMoUJoIm{pA*`3
zeMloW>y?!Cu2~-DO3Kc}YBE|(cVyG?65Ft9*(fN`Um~ADlg!ne^Z*Y4q*i)be&=d3
z3Sk`*EN%I^r9KI!)_mrSfFVqa8~f|*x$SNRk((jy+%!-n$C=9YAo4^ax49eT#5J)|
z&?4Y0Ca?31r=o9%c4(%X$s7I&b&z&>CEpm;$)2J>U!X5aeYG{k>S)J&?njgYVw9TW
z#HMFC+1vb#gsPA(KN`Rc5647KFS1^Ayotj>@TH^Czd;QvhcbP-zge`cM9+b|@wj{Z
z7W=?@u)9V}!x`4jom5UQ!xRT8CbMbTd*sph5{m&fvxLCVfjvd_sL4=kQO80`B|v?I
z>GhBm;(DIGl`8#4n<)6=sNic?rA&4?s*iMrc)xABp9WcJg=m1FK?z)e^p0}e!w2eF
zGL$661^d|;85O+N^(+DyxHV3aq_Eqm!@$3xwT-ev^b?I`-3j&_^0jNK!p}rikz_oU
znc5V|YfRO3ru~>j56m=_pRG8*w(wvT4D&W>Mbjy?n$BPME~TX<m~{CNlf|SfaYaEa
zY2i?c#6U;zK`rz=>MntnrK2P&!e;+)7T+_uJbuYhYlkxA@tugaIfjs;YPd9hnBl(R
zXSC#TB~>R;^bAGcQ+>}>C7+3+ZzUxYW?7R7^-+uFi`t~Y{0#$*j%D{yege)RCF<!Y
zZWC;Nj-(Cn7uc0T+y<>{HahM0VuB=O80OD!TcwRM!C9pHX9@ZPZMlYkpINkiO|Z4B
zRGFq8A|wWhaKk!C%mbM<42OE!tgR^uZoEsAQ&?lF&4_;Xa^p2jt5gMSxR>S%7b8&h
zsX;5oST1i|MH)Ym=3Y^d)==TY(p&x%s|k%ilKBN&-z%|3ub7}AM&wdr?b$;h7$ULf
zFx*jGF{h3kI+sfa0yswSs^KV#+a|L{(t29MY0>SF-Jox0Qr~-s<0x(>%ZJx1%h(*Y
zM*oE#G34+>5j}MmqsdlW7Miuk%`7>Q8$^~4qcNjdezA1(Os&(@?2)L<S+QFN&(ED>
z9I<J3b9as@h>hD#44>F7%8zbzouJVit4gF@ECMXWeAz>&_9G?Ej5eeOzYZ)#DwisL
z@}x;!om59*!tx*R-#~k7cZ0g6r8rSd`>AmkCQe;)B1iId-l8+M#@@IQ9H;ZJr<)x9
z2^>H%9wJY+`Osp_b53ZhEmS$%oIkWi?;IXs9XQ<2>a*kWEm!2_-<6XoGuN8#hk~Kh
zSG%32HN&^H%yfT8!aZ~?-qn@S-1)XsjrmETupgz0q*Sb2E7rkZ$j#_`Z?jiTr4nPB
z+}y9L76kg~lp8sh_}YHPG*Mal#G<JhU1p-GI4Ag1PU;-RDq>SOkGqtVy7MK8K^Q?6
zC7sTgcRHf%IMy?m(WSDg>4VQD!KI)#doT6-M8@?G;NOk0b&b)x<OgE)aBNm3ALPiH
zsQo?3fnj<&3LEdJh3Gv&eA0k^+^9Hy(SR^}#~~<{<63v9t%MxxF$8rqPDcmEKkA>u
zOLKLXM<l;wmYymvEmW@jyBip>ZJr+7$J0;KoadpeI(%i(j%geLO{m$wdQ=>xY#HLH
zjqvb@nbpqFh5Bu|ddzT$-zs^J@NRpqo(~=v+c{S+wuwd2ZiT85L91M-=d%WOP4J_+
zQ}?AaRY4_bX{rJ_1wL2`F<r{bQCLUDsxelCRdM{$fnoMJkFZ*I6>I(MBZz#)Qg6Dd
zB&fQfdJ(H<tGV(TRx*(jd?TTFjp~E2B9f|5-~+-{Slfg0FBJYjD{2vI$;_O5i^!1y
z;K*!FOjeBF*ww*X26a==xO~x|xS*9NoexPO&t@)Kw0JI7LF4%3F<rUZseEQ}I2YfQ
zR}4<#T+{iZW5Rg5N;f?wAyhroI<(?Kg@GfEBslr3zA@zn?NHaS^7AnXN(6S;rXn%h
zwL=Y5&b>)uDhvTbUEN}wh!|530zz=niWfh6p#*%*;7CqAl>ce)(m=nV6&Fu{h6bL9
z+2%KtUl7|X-fw8R0lJz&iA8WK;E`*<P_S8h&KiJHX@}Z;8a`@s$zgo66e;h`V%n!;
z!(#)6nkO|_F^wvwn`1AQeTOAR*H@QV_+)d#3>q+l+J9j&rL>@>NRaP1#26Vc6v0uR
z;9)(W=ZD2O{k0N}Wyqpl0Yj}BKEcFsj^vNLbNq&2OF-%kUtQK*X0=8MjkrNQt`12I
z3K&XDHaW%_7dX^{-{7JAqmN_-2Moo0iRA}HdbI+zP5?{!U5_l)2GD#0hsJCN-N3l%
z99UHr*Nb~j&sW6_$7S!$xDGPz#Miuf*zOSBmuYE|jNaNLI{h>FGs8M{SPlto9kt>#
zxiR^*SEu(NH|mwk_5A%|-6t;B%gH?FWh;!9<$C0dUKz@~Fthy9(64@g=Utp{Vc+VF
zqT{ABj9fi4a@q1y>E`(0($&L)1!b|GU-D?g=wiK_KzL(VFpWrTjY#az<AR|?kDJUB
zw96iM6f23XBNIR>!LU*<7}lUW)6w+fasKm1EnK;tkB*;Bmw6o5G)!BUVO7;1LfY*h
zvOWS8o)A|!luc;qUN(~U3wRo2rWU4!`bKM0IjcIlHj*0MwsXuPpt=Zk^GQbRh0oK{
zeB=aCRzTG+$(J|&2h%}|Pk^2A;~#e+51LC&P0TBG2Ff0Mn@!QB)39Xi>o7G1IOa9o
zc&KnsdSyPw)$hSFVy1=H2bKNTX$*5Q?b?hcYN-jPCa;+G4(@UvbwP`3r*PkiYL#^$
z4XgK+5tN2=PgPPLlm0Fbr==NH=xb_mDX8MbB*<}Z4=tVW*8AHVrpe$Rbh{!YSH?~>
z75=AwY>!J4l~F?%!NQSewGn0k)oessNCc1!qP`Sx5t+K+Y@&(aZN?dR)6T-dD!)Kk
zfI-t6%No>|Yflx{n1taot>Gob!T@Wqp?a5IN)Yh^K0|75JxNOI9<41h^CbRx1EzjB
zsUD|toAv<a5=J(zXHkd{maDS1P=i$g-)QQZ(~J@+6RgT;JB{$YJEpvGrhxE9i||0b
zXvLoR9%gx|r4<UL_P7;VE<Ckx=t+g@@R|4mgyWhXWD+d5+G1sSjkexu+)bj(dh8d3
z)|<QTd^ygluT6TQMqh4fD?g$Av9!3==Erp8SlZcZi(8{>6KR0;YIK<omQ8<-zht}O
z{5HDe(L~$#bWQfwJCUnT+s>sr>&uUet-?Q}66~=;`N@j&6*VmtXV<>Hj@)~4Qnmc?
zwXfYHYd5`wSsS)r|5%}=V$&bQ`SvYx&v^~ZbiTNb&^Xbhp&X1X|9&LK`QlF`Mu@p1
z&i4BQpje)Xs^-R@i4y3fM`Uc|>RK&^Y07Pdm=(THsV0e3ox_fbNKD@a@<xBILirqt
zDOajeqPO*fu6+Aw2{gV!)lTO(J7Q0jog8`Vt!i0s=gp%tQL>mf(^JY6!;Mz$aJAJJ
zI+fhy`W?YX7qP$@DUnr=9TbE!Q6)*siM&9u!d1eRW?&5gPC|d@dF=&w(rcXdW>=Sr
z<Id)3;B#!v&0W#Md~A2eIqKy%ca3u%yK{baX>n7zso5uh>{pPl8ql83xI!|aqAof?
zDJO;Mm^S|(Q<8g|uyn2P_dTjf*||egV{3sTYVh@sJi2UD)rkFJ;N{OKRDO>Yhkqtd
zq+5GOJ4fFu`OKIYGuLjzO4R84enw;B;-{hRJzlLPW@_@oewyCcMw~DH2dpgny6n>6
znlCSXc~1V~6*{}1FkfE%^8DqN<i0Pui2TLh2u~ZuM^9ug-Ua?3ysHm0<7qpzQ!}bk
zkkr3;2aQttqWupVi7!Qim%etN_=IBjNo%!=VA=9nK`KWDQm%T;nbCSC3aykW$X{DW
zoL@Oy9b-xj7gH)u?B7j}EE^Ro+<LphblW+hC8i|l#}ugTRb!psqSgs6Ma;JEQz~j=
zg-;5b<frI=x87DxGGNMm+QeZH>}ifnmm;aL_2&DOs&Qwc($Jm0P4S%_nPG02eHv2a
z1a{vk_vzOutAPW0%=!jXY1|=wY0?orzcv2t9&Jr&@=uW{UK@7nQ{)%r7oE4A*ZR8h
zFFUW4#_Z9ThgRwNg$V|`!Q@0lCn5@Q2Y_n*w%z*e3(2-B{q{VvZI6CCwgg4*(_5xh
zC<{rf0Gsbwf`T^xF~fP@cYBS#H1xRMP;mjG%V+)i#zjrBHRwOlC5gluP&%SKm2;d>
zh<)jgQeQYBB4=l8JFefJPqx+Qw=W@mPnah^IZ0`-Oq+TbyP3Xc%RIFiL6ApTR^L|z
z!=Yf;WM}9%`fXq9`GJXj{9bQLt5<%*Y%9D89Nrf?q!i5=`ni7FXChfYO7=M;!yCtg
zWasqT&N8yl1Al_-93wl6U+9p~uI>Di#ID}Sdg%Sedeigs6CcR^Q~kD+dj8GCK3%`L
zjbuM%$)3co5O+LSh^q;%?#3of!=Ke0zkYa#A5+<4&(Wp&OL{&ascVNiC<TG_$^*d!
zONQ0KVUN`*>-4-Sski-8y>s<RDCks<Vo1Q3&TRkE&7bN^5df`$vkfmv`UDAtO8HE_
zorcB<-d+=2r~E`Oll%-CcWGQIW=kv^X9m4%2~tqmu)hZk*fdsJ0O)=jGX#4z-4|pE
z;(82ZT3c*MQY|tvQG*11!F3B69SPokD45Z1OJ$Y{0<PRb{5oZ=UgnBGM1?Jc5p)}C
zrmi>;)ZXGvBOU>(Xyy17BYF-Rd@Hu*Ot)$|#3i){LDO(E&D8@{rn*)AYQ|L%V?{ip
zt!(wLdj8uH-MFY*eA|esPG8qf_nKwl*Fb|d(=;aC<j*88vnSJV$<*~{OUQES6{ac=
z*8L=vC-hia8a4+}uMVs|EYOKer>@kNc5m~I8V{8N{!$v|WD1q-JSKl+xy#kA8u`-c
zsd1kjdKy(Ol1nYOu~t=^aTAleQ83+<%Fx}dpJ2`FCX%>xnCU<d)9SP)f2-+%vO$Y-
zmyNBM(b#YPCAJ+|Jyh6}tPrV!A5|}$rkk<n`kI;?7l;BI7Md{Wiv{*lf}pveSupcK
zk7zgjt1qRP8(xBzgJl=S-xb$N;Pe(X5HvywZG@@zqvE{pezExoA~=eJh_#!Tn4$U_
zGxQkwp+BGxND78^fU6gaCDI`=^-=H!J(Ajej6CKd(`LL@Q6+V2#kEQlg&L)Hx=4C9
zF_YxW9aoKxmXY}Zj+XSL%n3->ORfE?2T-j{a$gTa@syBjq17|J-gXt=T7BwGK^Uc`
zU$I9i#w+}(Lx@#sxrxP8=sQ@W3NlpxL2I>Yo?Va<hY8W<sP!*3HNfpAZ(K>Ro<+5{
zn?m6Y)NMMlppMO_UGrG<J7V<q*jw9Uk7E?A4^tGkQ^4bjBFF;Gp>~v^J&~Cn5?YsE
zp&=JH5Nl^g@vqp9VyIRI(l&dGE`qz2T;{XqNaJ~sf(TXu)p8Bh{((|waD~un3aop;
z6Xm0z{vmV2MroB7>%GldQ;UtIqatt)vvk~B>6GQ?Xl%CkWy@h^v`H(!Wq3-LV<Ev_
z$lRtO#AU%w1FcDK^K)YU!CX>mf#(8xw;qb~-=`Y7)^56HZn*!OxNMAu4HNyVo(1N+
zzow;8=kVjyBJ*B+{`&+43;gf8QqxtT@VZcV4cw~!)sxl-zoHGDCM*Jp^EH77)((p;
zhN^v`*!w|sFKQ9Xk3$qt)vmPgc6mk<)V8(7=Sqv4%S|n&Gf{u1)~zkR44oI+FVsbY
zk}8VOxS${Ix0BYLD{H7nt$8=u;Tt*Cur}jnh2c4JpoCPD$K&imTnvd5;s!#q4Bhc$
zOlkCcPo9ZtiK(CuPCVR;Tc;dI@DoEKXB8;T4dF*!imE5hL{Z&?)`QJhbhWm|>I;vc
zwUg`7c5wjiOA?`a=aa6Ee+}qbsA7WR890;mF4hZz-77%MN27P~Q$~*CwoQgU9?GxJ
zP<9K(-hXVM7k5KMi{7EWbQvr3(ee!H<9V`<|6$}5Zs1jZ$f&JcMI-;ssLuj}0^{nH
z5#+bF^7GrH1Gje%<oBiw<>vj!UrQM?whTuH=s$W@kQPxXC-39%z<0R!LCD^zOhxY{
zW_OHkn_d}5MV^-nF4e*>8=b<HS@<KPmjr!=w7fk=;nUzTdXoF$J3ef1AIVk39Zl!I
z9b?RVavDora&^t7OYlDop*+Rr%n&Nk@FMnmj5;_{A%3irq<4|@9o>nFcQJ5{`Ag1M
zEbzBh%0<5zqOKakC-3aaFE>R?8OC>>?ww(u=^zSzIK$lU+B39B8BY0*Z!<+IXwrOC
z>Uy*2TT{aIEwf^em?S0NyC5zWt;R_U`fnUgRa_Rlb9|EeOj-v&#K7d~ylku?cy&6h
z@AUwWOH$;Leg}2VI<84vs!rpx#>VNT5=iCSaiP6@r^n8b*sM|zy-`EXrSngW>+SaG
zh4CB4b>`xO_U<0{qMUp40zdSL9-Q(=KH~`s7yj+ueNQZvacOh+4w&eWalPmARpxth
zVzT11QnIFGEy&8x+K{y^>-nrwcI`S>{BL*Gp{$cx7qYHp-O1wS2F?BFoP%@D%=u}~
z-8rhvj+uQklQYekb21Au!?VQyR%dR?d?)j8=GU2*Gyll+$>IYh6>xz$dsj{hmJMv1
ztILka?w6gEJudsn?Ah6Q*~_!bvbSVwa>W1M$=;KFB>S`M3)xq)Z)D%k=8sK?;D4Gt
zm}|-5J4|`Xur6my&bFMLIs0>t<$RyhkaH^MD|V#~ayFNaCa(7a_n_(;G>^Vl0CLht
zx@X+R>J}8VgQMo{y*;H`#@)~0cUfj~x3=%qP1DFZILE@$J9DSD?u|>ID&z9s*t>Sd
zA{k!qy*IN+#+jG6GYGxDSj>PW3f-P2s$8;nXU0A`cV)}o>@2g48@HL?H+Lkb+|1vd
z`#%GoSqk5dJmWf60_kd<qBQi=;O!@av0xQfpBf}1246!(#_g%jyryWua59(|vYU0|
z3#Tll|E(@mFWoDj_ZY{Wcz*B1T$3!~^Wg2D1((Atw>S%bLBwAX@hT#I7R-ORpfc$F
z=MOwL==oF2-hcjmoY;XMdO71zKD$t{)Ac{>y@Dvgp)YW+bc-OVGQ#tFKU&x-Pno{Q
zJ@1H{mFVo#kp7XV-#I7Tc4piZHK>M|J-to-;TAn}VMWp%nzx~DHFVsw_eNf=g8On8
zzpo&Pdwv(+RPdyKN)RSg>L<a_cwrSk)tc4mm0j%vG>IxR(q>ZMh;sg%HJWR6@-5a8
zK@sIxVD}oG(I4=S+dky7SMja3%z(4OSOoahY4&f}iDi=re$X=G-txk|a^G__;GB~;
zJvVB&0jHC!%a-IU$eXv=*at_W@J#=0UPZ7NDJRjmFVGJpIOgT`Pex>*;A@{V!E%Z#
zP4$l}U8+ahag(3rBc4y!<U@*3^6TY%@$)GuyWYVrDg|8-qY9&C8XT$-IL!1J4lGfs
zf8n~?*ec292{``rgCv^;LCIuv`dVJGd<56;9e#arXFhZJ0Q-+`|0PM9R2LjYx-8ts
zQ5*Vn0#^m03DY+U(kx}+q~S6dCBeU*h;u>8a6kpkP)1TK{`WNOut*+A<SDO23Zz7w
z|CdA_PUAzbG(MKn_yX?;xrN`$!Z_q86>9{!&tB2M0G#C#1MlIC6MYlT-q5?ge+hep
zz2TP(4B>w&n#0As#aKGKcmVg)cHBO0-?-hIvnL12h~-Ei$*so(L?;30d_x3t<y$yz
z4OgG^q`+BeIPURuw#~edEQD>%sK&7Ox`i=fNTmYBV+u2!*{~l_YihIl(m?`yL?W?Y
z!9j1N<?81A;i-%M!pAQY;p2_&&<lPv0je%5oOLdpvu*-zzoBXz$vAcTq>@1SKPm{=
zXGXPkxW(z_DRI*f=2@(MDx5bQZ9;J@OWe8nb>dw8Dv=CrnxE6YdMjP6mcm~~_(oD1
zx`Aw8PhH_!Q>%4Er3y#7k+1)X;?^TtTNgOXf0x@rnSv~>jtUvrm8NnwyYz<K7vzTA
zo9fE9I<um?<VR(Kv))B!(*kGX^yFMOV@<DuuXZ<M>664)%27k^FF~+=@KRzbVxyzt
zu$BzlMA|F4lUCAgT4I09H7Nc{=ZzI@GQk!G)03&`8Z%Uov5*X(w})ac+!k^)&`xp%
zFRr0g$OFwypQI)-<o=AR@!r+biS&lt-yV4Dder$NWiEKFUHv+-_F<30$CYT?Ekt?{
z8#>XDt5SF|Oz*6p2wvBqxf#o-a>(TJb7uw&7i{|d@CbcdniQlcuh|}=;Fp%9Xz}La
zK{#RzK??qpk{<Mk-Nl14_B=Zyl3A=sp|((YkcGf*p_BnD;<)c0=Tleor<cMNF&)ro
z@x5rH=?uA@-DTqUujp!zcR#TvJ&OHrMn~HOtB<2C&lY0HO?n_WR&a5y-Tn=aw>LXx
zV@y^`ZIe}Pshs>MArOz$Yapt8;=r(VL2$UmkUPpdHO)d<<qP&C#1Qw!iv3<n&jJ$;
z=MO}^vB?@}S%^VPt+vV&Y~Z<VFFIDhMmn*GZVaoD-iza;a@;UlE4Hxfo_26HSX=^g
z7Gvp2(_L%QS))Y*pwjBk$P?;u=&0T$nFV;uk9(mvw@k-dUl_#U>D?ES9!W0LmbA<$
zP?jB67-yZPOXrCd#Hvetg;=$TmDtDQ((PI4((KvjQtnv+rjfGavrh9DUns&E3yeOh
zG}E2zY}=?!aq6^drZ{xmWx!e}&KipKcOgP6&Mg#nkWO-yj4)bJWo%0yp|<`k-WX|e
z><wKGVPeRIg>BrV$_NISJ6pTT+DXdS8YJErt=M2iOQN>Yk|ayZ=#2L+IgVe52@^_B
zbMVUQve+n6*)@!RD%K*BVZhBg?dmC}K9d$qX@`Iu;9@zK`C`}(ZDVIo=rRq?EQtI#
zD>l(X9Jzt!qOAoftD#a>G^FVxjtpRpsR<s5YZ&h|jTl=7yRl<S6&8f>$}WqsJ%&3w
zZm}UHSxO8|Pp1N@14tDx<YqzcP@AxFrYNN!%B%53;+liR<Ub&<0am(gjNQiD9+M~`
zpOo^tWTXy_h-z1rQra`5jE!qY%Mj$1`5DGNICW6FWO^1voDyD<Qj|9MKbRVHkdqh>
z+rkuDWrTvyats+Ap{Q4ep|$CbcxS5o*d@jGP=zBYR6(qT&d>-2Xr-~q4g$)Rp?Ge=
zh9g&)G{VruFF1OIhbiDsgRxvdPsh3Z&<B&@WkcG0r<LKlP`Z0hN{>%oIfM?3!j--0
zW!uW`+$Mj%eq|1Qig~e+Ufy|eIDPrci<1=5_!bHuzbb;$`16)k<LG7Es_2k;*dL@5
zl=Bpo1O(f2729$Z{KZuRxgW;!eyc}vJIC|p)kb>BUp<&RgCtj{_)1LUSFGtw>HOCu
zhDZV;w**rS{8DgoRG#2xuSufeZ>;HNkQ%~i(rZmY)PG7z;A;YB(MbHIHKkm7Apcb9
zy9%lq@S$Y}?IHzE7b_~$@r@OJL|IS8UD9}&UsyIUcs}KF$%v85(cS1xx_v5ttSrJl
z8acOMW@`3HVRvkMJ?-wjsPhU3CKHoMkq@reQkG0Wc-w~qVUyX_m6Fmi%dWm{j<)0?
zsvs~r(YHgBrPM7R-Nj*Qrn~Gh3^0LWi1M+{aJvSpVba{JqO<GTRn2YXY*6F4v{)fY
z;5ly`)zdT7>?NkX<~FmtyVkwX+?Hsfzr=kkVMIhe<OMySfN>;m{1>4Su;f$#rze#=
z3G|?|T*mKqYGm{IgU&8PMOy2C_JT`2&C?W~3P~lxL1$MW|BbVI|No7I&8JqQD6bqQ
z<rv;r9x}jRkg5=b@8eMQOVm$v*li#lE~R_dyo7sJ`4F*7R+dNgK7_6ZWpH~oc#)0S
zs^Ebc%aN3gVdS?07yg&>asKVpG=xuB+l_YhIcs~-*`jRiqYo2&xi)U#gK@Cq1}Yz<
zZe-c2*0w6@7G8DVecY6(ru@)~0Wtq2QkOE*RTjtOf-Ip5n;2zd#elzLT@fbM^0$iK
z-RKBpDlfJkK@)2*=aS2n59Yx?y6#a`iDJKjR3048Keuiqt=ZvqF+JMV<@0T{v`uY)
z7hAvHC=Q<?>ql~<2J=hTccGV;*AJqXQ{q#@`d;C$E3m%|S>XE&rY7u-%6&_*U(WLE
z{gN^I!7_=bt52OSGc{LXPQ$EL1KIbUf?xbnf4kIka3HBrv3me*U@BYP^XZyZV}vpQ
z+;R(DYNu8%W7>p948m>^NNPxacdWz`npg=<%=<N6v{>US#-aCR9rqEw(}t+-Qfgo+
zV@<LE*8Kc1W9Mv$dAM<2-4GTc#f`0D6&r<$?NIP1H}s%<U$MDEgjByZrqc^iF<Lid
zbIgny@CLqPw+FK}9r?SQr}K}7yV*35)@+~`oA@1k#Ps%5*3*u0@^4Zh;xWlnrxy+Y
z#TJR3ZY!$Hw5f`&c4ut-n3yNUp8H7UJW+`j@4PXJHvEW<<GHzm`L!FncwJ6!jC`0O
z%^MA3_lellm)oh}Q#bYZl>9FZ%&*<lWuR2@vQ?j86#YLmB!6L3d}k>VYeQdbh-UHF
zL;$7_e7OVVed@~tA8ywg+U5V!uK#%XFN5y<%ROnWWt%(Ei(zvVw@bl~+-#uYArlv|
zY3XIl=4kq|W^=EHTk^fX%S*c@G9nls!-9CDr?ndU%PdlV*WzPS{OBzyl)t507@MU_
z{T9P?srAulv_GT$el=IVNle&!=#PhMbUbGWwB?)4mCwrPduj&Zl{7!L$ERFskIyH*
z60Z0WAI{>_Ux`#)!56XkqF4GnP{cdrfg&DzC5aYMR>_JeT}D(IMz?1n6|vzjMV#|c
z5v7D#4Jzk>E&R61aD^Yf2gV<%3{&rh4F7>zt^ALbsp>tRrvd+nQSb9S&HG1p`+oNm
zGnGVDOH>5?agrQnup#$|H;IZVs@P4A*>gSY+8P9U>|>Z(|M7lSLD0`S4TbH760@<h
zSb2n6_c#pf5M;&uso~43U+p^jdD%pVNkttH=kJ;;^YNKBG;*Z|-;kno26!(-8<`q8
zlq#;>rgiz$;SuTaGhYo8$Ir8`M)gzrU{fme4qeF+gks8mgZdz7JjwdSQy!*#`o#Oc
z78<)1>l`}g4eV$iQ*tD)jo6YFQm=_fX2{hcy+t&=hvM0%N%5MBA`H15d?c<@UaDBZ
z>W~e-PT=x|IVf)&BvAK7A67N$5-{ZU^g)Vx)cW_HtO3NQ^*B7FaQV5=Lm5jx#K+^n
z61No%>yIT-`Q}jO%dm!vGxq@G?`aDS7IkKwj;&$*zX@$9wh6tZ)m%A&_Sto>by3H=
z$@zc1)?=h+k~3}eaA~0oQSeAd81wv4r5P#>T^a1ef(*G+J*jkhy=&*&j1uRMZAu(C
zl3}x3?tBkH+UvvY4sf!JG7VJ=YHts4dj;k8`Zmmm>p?S*(zxIH)3>kTtyzkR7b0<G
zyH6=eENgoMBQ3Ay#uK90k*8EE|AyC^Aq3Fma&${qFn$cVyWNFlO{i@uf(z)A2j0;}
zpw1r+^;S8HLnNzD-uNMDtiY}ToTtDZI_e^0E-ZG6KDNo#Q)HXnW+*AXqqc_P*J#y?
zZh*0(HF5+Nkjw;)651qA1FtdN!H&2f5NfPC{Q6my`0Zx<7+tC7+A%^xT`|*=aSK^R
zmtQ4`CAB0}KCIP?))tj3)V2$-htrB_ur4KUoFXvS8*^o0eVpzA@SgIWH`b0;98{23
z?%X?eiKAXMlcuk!O?=~Q#?Zv)7p|bj(kEIZKb!@w!4`2hsN1ThyCUjM*9n<u!GS=r
zEKF08CL@|~9XyZBfJBkaZjT2xHi*u5X`8BRMoIA>M#_gj)V5e@KLmusP1qqu>IR`V
zYHLSqAcY6y!MK9yx~sFpUVI(9ZV-Qf4gUQHDG(jIE*R(k0Ox%kExx{dy_40)C7yE^
z)#@<HD?{!DA8G!1O7snijSl~%<N=a5#>;XES9t^9uY_BN4xL<L_dL_n;Ei?Era{Yr
zPBe7<8ww$2(1GZt1Sj?-m~JxZ6^o)`@5zl)%k@&zHJ6XcVY-GYUUTnc`MoydhT8=s
zjQ~d*R}2T#cRpT07wjGv?C`at1+*&y<>#@K!y%<o%T?@iaDg!m;3KiY&(Hwt#^^LP
z2ooA;G6|`Qr9T~^me@@gk(SC2@dZ-|hFF1B;DMTm_KttUMGRRzcBU808-oQLIAk8J
z;*PW%LYC86w}3fK>BDW$gUbi5);5pNjjm2%+f-4P_KD{w?@_5^6OGp_fu$YrQIUuv
zQ1Jaw2P>OA4EEgLABZQ(M-!TqWngH}K%?}Mrn<(Xr1210nCz7p3Vgt0kBSc-S2_)m
zrgb{2pbhQN_7BMIbz?<?RP-wiaJ#VLZ5<@9Q=M;&=Z=`fWba}R6>5WYI?+}QDJeb}
zZ}TrR9oXXY24v{?0P2H`V6=wZhzH7zS-_=*DDZW$gD`f<dx*-)iXY%iZVcivoq^`1
zlNf`H*~Bf5_CJVMho&OV>yb?jmKKOPanlB5-gsvn>tQPNFws4U_HV+jC%38nmvA@F
zWa5_+*p{o?)XxBKm&sX|P`~^GuK`255<Igw$|VgLaG<?EiKE9l*io#*kq5EI3UgWi
z!)Md-CNV+if-{76Wyw0XO`vb-_m419O8wH~Qi!LYEP?XU*g?kpYd9O-f!>rskA@(3
z93PoL#p-Q-#Ty}ZGd?iOW*5Bqij)-Jqgu$Pq|Q`_^K$n}tdG^Ls%x8x!**N|e9nXE
z%1m9m55m<O&-HEalHkKwmFa=BRCFf?G=}(xNwIT|Mx~D8jrcOHNazpBk?oYcVQa_W
zj!dyaD?fn%Q=J)}K7Q<0qkW>X^3|?12Y-AO2_-TX$r~@XVTxl5GR{IBWE%R5Q2aE0
zjYab@|MWou_o>oMCsh-jf0UJ;8r#N{6yGP-5!mfctdHW8VDzH}Ep?`QIBwZ0s&XGI
za1#7ujzi>@E@mXiI;WiO7O1R+PJ<S8HnVjWzHVzj*$MvE*5h1KEdTMg7Q4Yw94fPR
zK-a^(!Ms8`b7fH!W6_abaEe-cIod+3-5hPbtOf|c+1}$pgDG9~E#1fYFHh5U=EQD}
z%DUHwu+l@A3!eHID35<(6~1bROKT$zx&&b~PN>cJl}Sph9ms5bEg}{3Q1~1bK==!U
zAJ)657V(02F;t+pQe)&Qh<J2hS`>CRS)5`%g}%IYRn|RGR#43i529-91LDRZ{A=5B
z{tW$)dZ*iLftYg`E0~g#)#AcjNOcHsepOaW-Kx1Q@efdB!;vPrnOG8V8l!vu6ODsd
zsj@19W0&&ASK#N0yIb!0I7po@zUT)ngUWeO+CiEE??R>2vBZG(A<RCzA$~{069-X7
zo4xuey6IZDqG^im0{xd{X0?Bgg9<Zf*JJN8rT#9}>#|zRXzG_eJsHOf;2xyR5v*Eg
zoheaI(5tK4Xp2+r?R5nj9HUtf5SPFBR(F3le<^!kAiVDFE_Sz(j1R6*7j^9$9LF3V
z3CC?nTzbL2-Vz6$hw;DFOaq*&IS!BL;tI~}rJ~{hbqhopHf-XOiUVk-79`Xnm9jon
zEagH$+XU6B-cB5C`eOMJJ@(%DbGESwckH9_rf9_4F|xjOP$wLMzDPyW0BcfRhJ|Bj
zDR6qAu$4*!@X_t-apbiitQlW8L8m=GfeO;1U}xP^HDlJkoOMrryqxV-ri&-ETw~x-
zrPmqMBg@K*{AKh2wpeOcB&{Q@8ymyzRd=_b)LSL1g=vm$l1ow?XoWg{_uJw2+jqrb
z6d#Kmy#`VTX&_1CLq#<rD4bqHW+lcIU9j>RGL>ji>`C+<GV`P%16tQ$cR#mwcX#p;
z=;bzi<4IgFVprNU^pQ4Adk0d99ccMsRE(x6Rg71@)1TYn%RlnY*svW+`W?IqlS)n}
zglV#U1Y5;7?@;oa-q}oPV&1(J{;99GLSe}L!~M+nd~cxLV}E&@sfJt`CL{Ky-O%wx
zzs2&za6_*8?*rw;6=}%T|9v37*~hsIq8h_KhgO*s3)#7lF0N~vmP3-wEyl`ogy71B
zlcBA02fiatncb`viUu2UJHjF0u`zMq`=RHw2cBJFbYnLyzajS-gor)~<3Gbjxjh40
zse-Xkxlr!T2;GIQm@mvW<i4uHHMp`3pHau;<ZOn8h8c(}qTfZ_rsCiHXJ5N&TBQab
zHFwm8I&ZLOG^+HUA$N~=FxA=jyURdl3s^*SkQj2$sj$-Fo_21a*5d1bdlUPYXHbLg
zci1gr=uH*M-082e?zm&|^LIq4)b2X3-_b>}n0{>jqaC4kiKp)A2ik4B+8Ku^9tOjq
zGS>Uq<4~b%#<4hL$3Bcgha(iEMxICtmEKFGr)nCVohB@VszWs<oW^Iym(<}TBStbB
z47t<Q(wp`U2O&Mv{Z^VaT)m-)+Pb%=$;?YnlI%%JlIm?He@NdfwmJjpYd?u|x1vQV
z<^}m8I=ZpugKyKi+d`Ba%sIS;b`$6!t_9SCk_|0IZp&cu!OO(YZTBaLR=Kz`4pYX8
zZ?n)!i!to&Rf88}6{4~ChTKedbJ6ah_X<LIn;D1D%$2kaX=l74nl#S{Zl}!2exj<Z
zYd^A&SYL}t`!`I45Yt2YE{bg`u@`@hPl!RKw#Cq64<4FECg?B<i$Ym}FrzK?Zhe15
zu~M%k)f#@I_6^QzfE^v!D?{!k@8V;7jhA?&29&t-f*fq>P+mE&+`T3*Ze*?eYzW`H
zqgTgt`ri9Ex=?tz^55nB(D(a=v?9!hw4b%EqPtBaKZtRkuRi*|u21gTze^hCiD!?j
z6}z0wG`m0F?@8UjhMfj3y_`?l*(2d^GXDXYqeRTdAf6XdkoDLzx)D3jrcAcxFUXre
zDQBLs5C6r!NUnG-e{^SrVkW})?{~(8oW^D}?*g*`slXFIhzolkpR@KMqey!~*h@wu
zzxKgnny3m^lS-8Bj}Lm$B6iv}xQ7d}5}(vzOd-(Kq=O5NYtjznsWcWp@WT%L>Rp}t
zrmkcA>#=2DiE{(fgJ@@HrJHDFP$0#V@puE1#Ws!qe3y}Ca${F$pZi*K<+=s54@L-u
z7Z?Zrn$s&%PJ{Fh=295MKl5QYhZM^{{QpbwdzRw$4`UumabpnQZ#PRZb+<dkz`vA{
zU%xwoL$mJOJvxzXilM@(bQ;#oQ{h_xw5bZ4j(rHA@(b+Xrd*WVQj`*&U1}rJwVnPS
zb&3={Lu?;I?QAIe{&G_Ygc_tA8ie4SU{OS{r$gWIZmLjz$47p{=r)+NH1GY-mH)Nr
zjN-0W^*Y*gzkk#{#1d2pcip9A`i)PqR0rbub$dE>qJ7b;C8UVKEaI#^hW{GT{!m0|
zYibV~k#1YS(ItFMHdO^asUFCc_5rp><p07*I!6DlXamF?61PnXDm7hl`cDahVC-wU
zBtJGb_S~I6?lj6xm!K<((Y+63N&ELlvZ~G7n-UD3%*I!KG&0+Cr|Ckn85^JYLwm!N
z_$~vQlfSSxk}l@l+q;k(>c`Ko>Pau_tHNQr?Wh{fjT^?_s0x3W4fr(bw(%$!Jd4Wh
z<59Hs??AGTscf6z4xI2efo6B0`ELSgeOa=TyaG*B2+~ZaxI?D|Ig+LX5&FrqDcHLF
z*AiIVl$Q2%__O;A-12oy*3f;VOxB#j&P;Dv!veg7<Jo;G{`GyK?YrD*BBAT~8~Y-B
z*=AHCXM3`{e_U+;8fOY0{PzO>aL*cGHU6*%A#dUCpVAY261e*en8m^xad!<^g1<FF
zh>k1r3j%(@-&i4}5AFujH!N&4?#2Uk_%j)V%*S1x_+-bvfz`Nm0>9(0haf}Ty)Qk<
zNHy*b1FzyQgAno!?tYM-WaK99TBIkA_{s4%h=6VQLn+v*i@O-$OZJq6yU{=g{1p%U
zWdhvI0v^R50m1g%$>x#MCXj+9nM?DGOY#@b&(D0i*WATVKb@JEZJf7YQBH3%X8M>E
zlJjiNT$?rLzmcSjok()#<}S`DFcz?>!uU`kDWl2U+|0cBImYY-`8ji~i}RO(#Qs1=
z<0qz$n?M#Vp1&Z^XkBb9$jL9v$v0*e7;U)4g6~Arxbb61eokh#(Yu5sWu$q^)JbE=
zq6Gz3BQ1A+j+hBbyCBb+lV3o_Oc)I+GB-1CZqB0i@L?W;ClJcwKb^UxfF*((V|M<6
z!khwvz|mvIBj=|V<I#u^eq^<=w|V50vEJ_sax(Mh<{Fn|T5|~v8#iGxS&)aa^OLKi
zWCgsfIx{dOGcRwk)wm#Ufz>$9JY7Thj{B23_0brO7L;?r;=Ficj{=Q`3?9_~iOgmF
zAC2Sxu|JwWzJFjp8Z9Spv2A`XYM-Ce&zP5!lWpvgZ5*}Cnp2=51EhYOhd*(|x9;B}
z8_#b#V6^urU<{>fU2L-^_Q=){sSNXTz^%DfTjnChVB-P=P0f31>0<N*%5heb|3aLX
z`E-tkOk9+W+7=WnU7VjyCgd#rn+Lw{!6DP~$r#!}Yz3L~bK=!K3XJpeG{n0JQD-Bq
z-@L`PJd~oHkn$3wBGcyPqFHIr0EY;`&pwzFJbBE>NhxD{49+$t(o|^B-k%PZ$WoW&
z<mb}1T(;PTK9|kX&&kWoT9jinO`VW3d(hC?0|(C@H+lBxF{7rYYS2<>*!+Uoc}sH!
z%w3!}Z^8VST;qr+e$L^3{Gr2@n)X8RQHR4On<q^m<IPhBkskdA4J<Iu&0J!&q2IZS
zCp{Z;^79wx$M?wYXUxtiTrf8$9%ZC0z^ILj=g~5Y{VH3-Pdzed(x><v0UFM|=U!~n
zAMlRjpvimvyNP!xoZRaT4rE~HkK$mkc>Rme?0rVnPsS^1`f8H}VagL`64SkVcfMau
zojnYHddCP11115PfDKp;YzB4$M}UjK??4+6<X_|$2^fI^z*HayC;(Ohn}BzL{lEd>
zAaDpc3>*QD0yV%f|Dut8$8mE4_!77bGy$rBB0n{t0knV)@B{pT06-4}0ztsuJ;x@=
zyT;<s#YCHxa`R~n(fnmn^}AvFuLwT+lkT#akotqb9+fsAlyoSEK&68eUlkfPatet_
znfL^Wfv6K7@if^Cu{Qu8I%@w{4^Q@?$>3+0jDN50*}*4c&#?c9-U7}Ot}lG}GUKX8
XaIb$Mk^UO7+(Go?QtA7j@c#b*F%s{-

delta 15957
zcmbuG3tZFH|NqZE8@mBxDuSSnp)wH>Q4|3cLEr;k!UYMUhPPBg!`p^klu;`chGv~i
zBTWRgGBX8I)Iu=6P?`DtX&3XBnJGF=E5Arc+y8Yw+W@WK@9}>;zUXtGea?BGbKd8D
z?w3{nNBq?WvHG#;lSNMv53Y{%Aa?sP_t(_1rum{USqSh363{}zWHsO;un44rIB<<r
zDzAV`;2ii4oCaTmFF_+X4r;*>a1d02eP9pR4a&hgpcK3b{7I5YmP?XkrJx$v#Obol
zU>V@S9xh$BQj{)B1b#pa&X9D-rpsOfMc_HW17EPrEnTJqa!@Tvm*s=i;=Qsbzz5u3
znHEUEkD|S@GO%7`+AB-Nm%-o~*(<9A8^L3s2RJR;D|-(Z!35w2zLX*`SOUDkUv7J4
zXF)kIfmARCd@k85+YhqAGxEK%X<#sL1LwF(<t=ff{Cg8VYQb*sD#!rg;2sw#zXZyG
z1sK3o5DToLNck6_2CM^5gGk^DPLoLaPOu(43H*Ubjx=PE@*Q9?7z+Hrb!nvB^ly9|
z1kZzcU@{m2d_av`q`U+y0+YcI@S`MB{s|}pFMtJLB8ULnkx((14Wd9GI3uo?e+G5~
zGspk|;2KviKgHFX<a_buRqz6s2d03bKn;Eq)yqEuZ-GT11q=qhKn$#;Uj98e1h#<Z
zz;Mt9jFHvLgTe38dihmw22d~o3<d6>+09fh|G}+Z{uS5-R)d8g4TOMpNxi%Z>;elw
zEI2G4sdxh{2Mf88ik+g7ibbF=XeA>R*TL7I2J8Z_g6Bapm?Ryk7z;jj8>z?wqfPi2
z2)cp$l97s2;8XA}cn$Et3ur}k3Msft>J(={6?hXo2Nr@XFcA2Hw?t<YCNLX}0vf=9
z8{~}QTTl<m!IQw0h>yXbH`u7GRF;5s;AKz<R)J@M0W1ZJK@NBd%my>TH1Gt_gUKKT
zB!W0F21J1oARL5(U@!n^m6axCAAIQrynz~c06CBV0@@Xo%2sd>+y%ElGq?&agA3p+
z_y)|?5R#}P<X=IAd<<Ryfj|VV3?SqfI0`-nJNpyzYJU?Ui}B@}CzMcEDno!&RjK5F
z4Q`PUg!BYAhZFKWXaF(b^<ji)!M<=p#(*P33HfRyA)kWnU@5{c2FIcai38zaMHC^~
zU;-EoBEYkzv4lJZhJY`|5K;=B1jE6D(NGNh0R9J5fdFtS2HFEXkboZ$`JEI(E`x8t
zLGTXPJ&}-i(+JrDo(Frg3E2i-11rD`U>fl>At!Q>vphn|K`AH($|ZzoKmo`H-;>*@
z&9@bsz(SA)f`Kpa0(T*E1)KxlffL+q#UWq<kAbnk9o!M!R@8w#V3X*!Ns)&ysUQe+
z0|c}p!Y`H)QV%`_hrowm7uW&b2Cso4@Cq=2`5+Ta0OP<Y5D0nzH}GI7A%B32;1s9_
zhnAxJKf;&yfmC)|(JsBMxB(i#F>nZM0?&gd!FbRQTyR4!z{lV%uo9#I4e$YOpiOdH
zaS40^)`Qt#8b}6XfEL(H;@gT-pd6HfBEZ}xfk4m)c!SYO1OVq1NEmDegMkv<lHXRm
z2{wRLAQMahv0wz~4*rA8-3AxHF|Z!I0>TaW$OHkv7mV>hLg1SFZN)yY3M>XOKm)3V
zDPI?hk5nqDSUn@CQn{f?XNkSw`J$b0E9A!rrz^tS0m+#=$)oSAaNDSA-Zq4q)%^k>
zSts~K)P-%3KEoXgRUiIRJ@{1nAA8KPSLL)p9mwHvT|LmG9ujeTDnc%eoF<6Y%GJko
z>gIZ4k6aFxf;_Mo<dRYaCMSAGzZxnCXJppu)QG(KJ2ET##0kr->dD2t<YeHHNko$d
zvDm@W18T&Cg;*M@K_7iGut+nVlt^ci8j0{i*LS-)C=PQBONM0P{hMN5nj)?fOA}-k
zpCs9=>?e;)$W+TM^DQnTvuwPKmUTZmGz!wAdE4q-d#cSkzl^;W@iyxWJKt{2D2$Dl
z5o4G+Hbq7Z1B-QIWVE=)@Z>SFV*Ww3;t)A3BF*h?cHUMN<BUe-ieX2jOvJaBjTYS7
zSNGX3)!QSZWcJ8t5CcZbsMtG0@|^puY+CQ_TV?QmS;WQ3Xj{+8?2+OV9F!z8y48q?
zm5Zn=;_tcF89eOy_^)h!(q6>3TX^|sX_Aa?^4XzaYWguX={VmJ3c&)OmyMIrRlbjN
zQ2LZ_kOxEz;u}LnOscZi5D{}9>NmnKN_LP8J{|{)XJj^?vmcP3X|5*4KG6v5_q%DV
zY#nkvEBiCpEh7`fQ64L+_G*r^uhYfJVx+M$gLfHRNOPDS&V%gmW<G_nu`+Rf5B7*#
z;lUm<gDWfL@q%}pL9*Y^>RuB^P`k=rCbqirae{};psgWykKDBD(=_6mi86ZE-#2-@
z!wdEx`>o;{Qd5y6YeK;ivY(Vk%gUo<WpOfzy*x&SY~wka758TunT4@w$hWdlibq+x
zjHdSX<I-gG>E1)anTK1A-EQ?{zM^7YTF$1Y2nS0z!U-z7RlA=I+=5cl_j!-=*V48=
zyXlX8v*>f07E?y%VK-v!XZb;VzG>|>IUzOP<o*rIzb$7Q*G`k!-JXzH&K0d)Ad4TZ
zx+-6OwrrYg3#+~tNS1q@QTn1TLuUW0hH&~8X{L<pu#i5YPOsP0JRvlWb1HL#N7-UW
zzzSEuTp?f(3%N)L$qCiO88Sx*xr2p7(b4IFBmGng%emsUYQ+}IzpbkK=SKUyt~6b1
zlByK+y}(57nw<U`7(iF{yVz}+!u-HDUwmVuSbRRr{_aBWs`>pViMV@Sv~s{+E>}Tk
z2TkHq)Kwn_8AXYosXtV=s%zA`ZV}y<b$hnk>TW-&cXxZa+q!Ng-K5>Cx@UCH?|#2W
zgg5(lM*V}@)%q;F)SZ_b<*<dErUh^2$`sTZJSaq-k=ewzVx+h#FXG!uvTaR#`x7#2
zpN8yqT}v`2HmL0RwseHD)3bvHdp;yZ)gdFfOLCeVGQuw-v*xYddV9Xyo-cK@nf1I%
z-~8gAv@WzS*V;mV#6#{zZK0K1+F!JC$TaTmed-Z5f;)1bjt?8cU6<2kVZPk*`?NSL
zgyZkigJEe?&9@RWGLg9HKa%)${3nh4r!kFu?M$Eb{4r*D_)KguH%Q0Y?S>dQe!^Vd
zx|fwTnpZBDH%SXfKVl7ZW<3Dy7~TiH=(odyxR86aeOMpU>&n#u=GX#4R`s%I3djNO
z%+Hq1-zY3=Pb-QtY-saVxx*%}dN`sn3~I=h>I%mZgH}_sO2%@`taGkic+=Eu^I$rh
zXg4>go&Gj^emk6MToPr1#QRKQmNwh+%abRBmd?zlsX;w**l<0s)Hic2^w97jT&S8}
z8y@N(s>Z~!Fg8@}iEd?#2-$%sV%E3O(1;{X(MDH9^qU;2-f&#EPO^blvhtG~#W$)6
z3)CfS1?dQT=+7+HFvK@rB{$ZRhHSa6I9akqTxU7kvKA%sQ-rVL`FrLDIg5dcM)Vj`
z?x7b%SS}~K!Dp<97z5B}Litd&-W3D$9^yvhNA&F$s&+JSA(t$Nbjb*F?{%##VPs^r
zs3BYOaH{nqefy;Tfw%=zu>RL2!lDh6(72H!IB6@*AF1WW+@V`W4rH~5g)061e+%`z
znBE(?N|Z^LMaIwE?LmxQFBV91WJc7I-5%)iz0I*Z;pz$3CuBxxlXNFsSy7u&)ZQ$A
ztc!4#w(d`J19Xxy3rh@MI{Qi`U}dpFK~<wh`P)1RX_B^kPSjd>r91Co>}Stc!#h+-
zXN}UE9&IZ2d{y(kyR09CkzTyDkz{0|wvCpe2UFHaiN1O8-5ZG_3-1v(mLn_NBI<5L
ziY(bu@p)EAazl?A&ZV9diOjzXBXoGj8GRk?(NVA9KTa)zz>RxEka_W4bVXlBt>BIl
znh>4NEg*DD^l<7CBlmr%A8>c}1O4yO!7=^{XZ#3zJ+7ZSI%4%St3==Y)UWjRo4#~#
zyrSy0_<9ldz6X6G!Psw)r&WC9BTsbQ)p18Tax(DnKyswovpVi%;EnqVyN;--H6hfr
z2}=(NX|t1#zYF;8hPT}QLPs_L-3(SG&-O<)(kHPJ(d%p6h#rpmnxzAro$)14JvxIn
zR$1h}$m)(Oo|s|a&3lsNELw+ICeoQRIRY6Uy{cwY5R)7dYz}GgpXF+h=35dJg3mS2
z9alXaJ%J@djzTGdQ^i$JT9+8n=c*?<I|R*;WI06Kj~f+`cb8uCq+Ut=M#uRe^@ePv
z&XO!))ukv|0`bI&4{70umlZzCJ|UN|l$sGl7bo>HRSghw-OrKh69W*KOl;zBN(r*A
zsc9DS*{(0WgCzh`TF<xpz!}+xV10L1D_{rsyJJ#}?#7;f2_8cxIx;DAth**SbQubZ
z%;Fr;I>PtyF;g+$U&6xD5I(Z|_t4Ib#FA&{EMB~19w7sC^vHsK-2D`~aho6aOiy}%
zkL8w)roZt6r_R(FMr}B^LBkPqEJuhz7FMFk)>)%U&W4Sa!n5ZNISH%C)@hKB=5i9Y
zK{Hop?H^|GnW+nFf&d|SWIG<S*@FqtXOaWBnL4^5d1bfRx((+)gADWhENsVY9rZ~G
zHqF+RXe6XWBPEX66H=Y4gMHmk8@$3s`(*2kZp{a5R&leJU5JqxT`zoNRjGNs*xVoq
z@<Mw*q9%j?%_iRnuTN_>Fpp{ai1Wo4Fk82txh#03>zijVj~Q(E=@nMwBZKxuNQE|}
zXanZz;2+rGABA|0y}~T2Y^RKP!eS12S~j7#`%E1a)FSuD#^woQyU*1z#nQtpkx%I|
z@VP)ouT7ZSW3Eos{NOJnIK4)KOpk^|>5Pdh-RH6xpVEa@K<?tiX)M-JlY+SxPdaDP
z7(A-BPwFY+0)D0kC-3+E=yFz;bBHM`bWCxM(&r!R-Ln;4mSOyhC&=COZCj@Wk-JUO
zR!_R;u>n(BJ;h{!<%$8FVyh=oMs4&F)&zdiEYzn<Z0#U)?&jDwPpxAD-N&M7^Atu?
zN2}Q!t}a>|rnXDlJZaxl|HL*=mw<hHn3@G7#v6#N{ES`G?ujp|Z}9Q%8FPV@7=6tJ
za$=O*HAH3CNH8H`t*GP-eIYf2ldI^N)LFf;Js}NKy($d{!&NBvSHg-SN2rQoBULmy
zW0&dXUs>WWQEG731gjFn=f&qO_bj&tTbEz4{8AJaqAKwTRsGzpD4&#MaOQtWBKIom
zF1HzOvvmNLC!7$}f*37`(H=P*gsXN0t15EIj!;!a9@!D1s=y*k7pBsuKb|JlWMoeL
z6wA1aZ1E#$@X79uIm29oY^z;UskWwDd?u=Pq^M|MR*3(Vzp|R76IE=$NWmvsEc!Af
zaHlU$(_oLq8HvSbylO|B5XN&U3o~8_0~f=z!Cl38)s93#%*WOaF<uZ$?1<V#=VbN!
zM|sbZuJUwR)<e<8s&<S~QJNLf&!36K3ek?ir#-SpZI3*tuIVq-in;AI95na#6zW98
zX*LUfLiPIeem!GU#MrG#x?j!mx=%fDc%w8%MMq5^WQtW;){apXWwc`sYRR@?5|*LF
zYO82-tf~kes0EyHOkr#^BJgo0v-v?*kxz}f;-I=w8m+?MD0k<TMx{#`t6Ufp)(z7`
z-ntYq$c<R#z^psN*)V|`l=A>nN5N^D55y$IIuT;-#)!h$C?v$QfdyhiSwhw7ib}O0
zyML%K;=p4N3*RV>Qi-ho2q-an3j)K#^=!<Bfcya+HDe?!#WF{i&lor?zb&HfWd9oR
z<dcDHN&%VBwk&H9vdr2_(^|o(5GEL#ZN+P+tLT?A`g8N!=$#qWy$$E4bs3&8aYt2Y
zWpTXuC#{|Noa*uq@MlXYI9<F?zn(jR8yHE4DShbBdD8xGVW*9auEL0-bBrhlMncpl
zx+I&83&lUuY4e`o{%WE7=9O_XTB!c1ue!}vMK($O$!%N7*$RWIV!4VAnLmn)xJ4Jt
zPfAf^FOB`NXXmgzEQ%1<upJ#GBp2*RE;$Oxyd25;+AhQP$te2A`~*%NO`{ep?Vg6X
zx{fm2qcO@n&V6u$dM*rc3@^R7q_I?!qmB7KT8P~_JpK}m*e{K6&i1`gp3FAnCdOtg
zZKUqU4QWodTQ}&33wukX7&Ylv3-zw(%451lw?77<dpsK5$Qzx}WjLb?yg{GM32;RB
zcFsn<W3-jF@Jf*ZGX%CGLR7}<Sy`-jJh6Gn{!U?Y@`}A{ir<fhSo`ot%+nY{UwB&6
z!*eXl&97c&*Br%R19kYAu2IB}p%<QxR68|r>bLTGr+!Jfvz<ny$8x3Iw6U})caUR@
zzn43LTjy03vgj2tx8yoKkQc<AvC^}78QisBs=}A76mdT$RlUE|EaE;&qG8J)%&tzX
zOZ+17T;iR?*2G>(1CvBaUP<ivp7UR1()gs*q}fT!lU66KOWKk&G$B4AJz-&jDPcpx
zwuA!-jS1f+Tub;fVSA$EpJ!t4#L&cq#OaASi7OK=iL_|N3T|_9m2E{2QTWUJ>wFns
z$v5z)`0x2&_<KB;tWMS>Z*=|(O^!-VOioLloxCVHKiQm2<BgNK!W8<dagnBHiY8@X
z%J7tNDak4GQu0!!q+|(CRty=FSPS7k5+1Cf^xJ~nU{;?A5tIGS?}Cj}9JToKl&ZY^
z8WCrXr@_z8<bJNJTJx+@ti>p~LVV*OSune3K}(GmQ!jgdi_iKs&)ZnR9saax{|i$^
z+}uy9WUCj8xK__9W5H?>_g$K+f%+J*>)g>mF@B&kIa-odr7Jur=Dz*7>XKP6;-af*
z_$%>TOBG%5%J;tav#?4RXaB0RWJ=i-v&g4TT~Vv1bJqB9cs#eJ)#LQEb6M=4XV$A(
zRjb!d<hTjhRbLeGBL4<;#c_4X*$s6Wmi()l4cXVGTJmn{?3&|hI>=JmeOPwflZT$1
zGILn=FzkF2(wr^Wsa1Fgc6vr|mk=rJG!@^auFl1&`zzU1gG<`Q2|>q-GSo#phV52Z
z1nVHS+8J0|lyR?!|J{;$&yxMSC8O2Cw=_Sf9mK2rGSqDE!4eShg(c&jh5x<zYHd~S
z#s&%Z&QTh^DV9q)N|$bWT=kk4rZMgI{5Dv3c?CVSX>RWYM>`v5ESqmPC1dibYm$}a
z(Ynn&do=Mjj68fh!OR~sWmU~fdDQUcxb9_nEyuey)jtl?f4%t;*Rz7=Z=NG-R6}xc
zUe%?|=f$$m*~>IU_x5=Ioq3osJ-2lJ(|HS)XhU$!fOq!S_i5T^tCqtfb}Ns8HnJ#L
z6<M@W9SL=Qm`>l=I$dc**TX~&OK9uXgoGEWva+law(IEVz%ilfi|zkYY=<9zHF&Po
zwmX+a-{8RDl5<&Pw@ZcP(d8wyVB0wE&q{i1+a%N8%D+X&qN%{X{S`aGel>e*#QwB|
z2$8}?LRy{CZ-6@yiI@ofK17&v&cr@m$`TWilS}{aI81~*9LaB8BKgx9Nw;PHcO;L-
zF%qW|E=9&Jb0{(uZiGCC&nx!HOl?QjMiaB(#5^~3c-n9vz+AR>_#OD0-_d0>Vf(Y(
zgZ(gLANs@gq1-;lS6$gq)13WXt@^oC#8&AA(#}fN#JAb)X1l1MpjJk5nuOgH`${Qx
z1|;YQhTHX}H*xHaodf6FEgaBeHg8R_Tv~MA!+z*ZVn6f-=6`}{H%!N|q{H6KAi>*W
z+WZc&tldhSi%}NDviVIoy+Mk6UMCeBiB)E4OhteL7QWq`w;6_&ayXTTgX+Zs+en2`
z^I}2!KC#gkQzbVE+XB+BPqORn+1QDaV%~M*4Z`%cJN4#t_EFHK&E{0wB<RgvoqB6>
z4vI86t7N64d<0b;!f@fbxO!Nl9qL1K_qFd3Lx?l8rO50S@=(q-Ih(r%RXcK1XW`qd
zSYiZx!4?@p-}3y)p=0bu^<hkne<+GA=Su1-c5>9SBEcOl=Z|7WswwB_jEW$3<Z}L~
zNO(sK!uAScXvmiy6?|X?Cb_F3lDic_FIEg;509N;J&~(_X;`j2G&y@+O3^7h`<cFU
zy$N|fhMgm=*_LW>Gu!fv-kO}RAM%c{TRH1~Rr4gfrHSQ1$O5Z1D#x~vLFd?-Da{p1
zTQa&SUjj*Vm2A_?<;wa6%U#F3hVI<ei@W1aYj+Lfay{v9yJBhH?iET8Y~a4fxl8wO
zH0u2kiF>#v>3it<8nW+UToBh^mQ?KK%(1&UV#v4n?BO8m+S9P1vWTU-@!nR%w_1B)
zmj~S{lBWCL5B7VHGoK^Eo)b0`te%jKi#R<Pans-4_w(3|11uc$2=P&$JtLS#llKf_
zkCl4{a28LxZO?r6Cix(rJyv}%hB+SjAWagE3oKN<*Pn~`q@jB!u*b^1I`3~dV)U>}
zzu`)i5UBW$+wmPo59|%+ZjYcp?~Uh<j-a{^wd|4d;c)IVMEPL?d(?jz$V9GwIMzEF
zwm`$lDI~e5<9F@(zm`VRk^5qqzj0rGmQv|HA>D)fia3QAjsNIf32T`2)<+umbDTZ$
zELZA{`!uxY{(+Kf<i;r)w?Eu8o7u8(T>Pp`$Cv4*RI`mUc$sZtW1`?>;=+tE>|3!+
za;zb{Rku!N;alS{Lh12z6GI!vH%|D*B#LEvY)aY84JvCedv8o;dyaU@Y#G8>iSe)1
zjmfLpI(iQ?-<m+x2ZB=j+9T>5wd!*@I-~V#T5To5p0z#FnGI*PvfOpKppCYo1;;x&
zm&TV`ZDV=%Nvx~rI|sC)Fna7jU)r;>-(;tVD}5yIj0|UNjvXsAFHLaN8ceM{nA(No
z?AXwK%I-|%D;SaWZ-iPZ{aN|HTRFl}@IO`t4r)XJqc5yD4U3;ftNE#G%TbzRPouJW
zzK91MR5d}>Db0LnVO4(?;jXG+))-DzML#OwQyuxJ)AVYMqnuY&4}H|{aCIMt-w)M8
zLmo~Gn^!op`r?GuFISBP*DcIC*uHzIP=kkmJg7hWB6RB5X@fwsK8IW>eK-zU@Nu;K
zSMIQel&V7Mv5(`K^4!6&pw0o|tPO$JwAlVB^wfh|hjz~$jOR85(oYWdWsma*hp~t1
zknlF-P_Une7(1*;f=zH*uoaloU3^$9q?va}t9w`{$5GrDCyM#jYVyU2FHU@3hfc&t
zOsfwK@pG2-*r6m}vVSP+kk~4Q^$Kl=`ug2*XH865ye7$BO+*;=@>!3?e8X#cvaBW7
z#0+o>!6HJ=;_S%T&yU(=S54TXMe$QjFK=hqh&n;9@zAT6n0g)#TIA9zoaq(*Xh*q@
zKauM=Gms+LdhClj73EJ<6O<e4RN?Vehlf)+zV@GV+jcm*!w#M4x$JP~u>Z8qEN)~a
z|M@?}LJZP~(<~pkLm{yRN(d1+%e|Q2R81mI7iYh5i0IQIP9Kn4J}X6$&N&juO7`U=
zlevR|^tU5@yFAoK10FTm*rU#xJ?rRT&R<MRjt+@(S?X^k$cj#~Zq2`J#Xv9%)5tNE
zhQa7>M};DEmSn&uF%iyeHe|P<!>T56LWy_BMBddUj4fovQOJtJ=}b#L34gQ()Umq#
zw;FKylfN~_zMl>Z*c6B>H(BnVyPp&4r~BDr{ysC+;|F@BGYif8G?42frfWXcunu7N
zr<#8#D(4tVFMg_HLT<Ie{X0vHRZ9N7f6_=_8{n_PtwNYdIG`FLLSHPDniSXeXi;qf
zD~+#fg+g&YJdSBhPK%?6S!+P-*Yu@(Nf|cYRd~6@ns>IHrP``5eM!XJA;g?ItR@tV
z^YxMNYf_oqO{XS8e5L1bEfKr=nBZ~NKr4O!SWn4iTsox3kA*yxf&1j43`px@l?P$o
zqKs=r{8c)%uID4KrcU36?90XcRg7fNbT-q#+0b2@I&<3mx12)wp`1RX_#DByN<s17
z*1nEdT{_CS{w!O}SAy|PxGz8)Gbc@sMy$!nVKYuTpgvil?RYcPhbabhynRqVz%<bH
z##BX3P&-mV4}fbec1#d7IiX!e<ih089{D=9GdB`VP8d8p=C+sxPVM?G$B6Lci6>8d
z{<^RT$d?|o+l6(2*(NF&!p=Zx>hXSx!J<?%FPE5YwB&fNP-mOBx;3tev=dAo3N#&y
z1mXA)HqLX-w&}l*2bv6GRr6&`4m=8L5ddej+u7nE66*-(4BQ#O`G%RB!y#AX5K}c*
zVQTMTX?3q#om5zxXCubgT(&TAh-q@3M*=36z&}Q0vgtcx%5}zMU+u5SF+XHDAv=vw
z9rq!uGIurw7}j;ZTe?+Pg&4dY<NT(shE&3azr%(R*ePKLRTG3Njdr)n+pH<D*^N?j
zLA%|6gEzLKG4{~pY<C5x(;9-b9pfkeMu%0H((F}et=k%UDUNgmscq=j=MEY%vW)75
zxZ6Yq#Q9Z+Kzl=!sTo#jX4!>Rx_25ImV1#|Zlew3>VF{9z+_ymD(1>bRL%RGA>rT<
zF6~^&#X1!0EIq{4r7ZD=An8ccnFSp8w4(Pw@ri43Yo-T2G&wybT`H#By=ApplN0ig
zo2Ajp8qDW0B5ZbG$Kysfdh0}A(_LuKKVZ#Ln5X=O)@&=Chzs6A5-7D(q_E%tt7na*
zg?~_JnAo_c(KgduVB=O}WfR91v5lRRN9!QGH`y?^wZ-X6ajg;UOo|S(yCx^)QPF`A
zoq(`xWf6c|;T@7w9+508_=^~HP_a>8%>RYask9qzqeEPiGXtV<E<No*zx_&^{iLMy
zkRMA^h09>jQM+1v<C+b*#>QO+422DOd%*~NYFCHhq7l13(%#7bh3g|W#{&0|1S{M_
z94FW#S5jJwT8eH53oV$BzIHNH6isVS9_L=`M_>B7EuvQr;jm~ECgUFZ(k;D&{MH5&
z_ZCC2+2(ENZ?**+G#Q$lXIzCrKRy*;vS8ZeT!xElMTD(M*z_?27P<NtD~y|10&K^r
z9_z;w8nUlp7L8T1!@HQjSxwxI*&z}E5tx^i_C{9%Oa-|!3M&pH9Q`Ghq(bpOE5(|i
z_nLJN9E$?h#PFgoT`X8sa>JXN{@u%TAJ%Bs6`DlEFrR%ZP8L;@_X>^EnDn2x&%vCy
zE+xU-+nnxV{lmriHY-l}x)vC@-nqD|!{RBOE^Kzltr?AYb)-4YX7o3qWeYYH>VB7?
z*03%Kv029>b!_J&NjapQiJf+=0Ud8b7Gzu8;)x!mv(Hs;Jj{H1LPIdiJeDo)mPUT8
znxGP$wXszdYd_CRu)~8EWVf$hvxZ*$p8=k0I?ZPdq+X}{n#_C~3aw3uLvCqGMjWfY
zc5f+|W45Ua#I<UYYH1wZw7Q3-aZz2u`Zw1+5FalQPPweO7tn?UUxHnD%53bKfZbIo
zvF9OJ1zn<ZA%?uL)ZfJKBT&$|&VY6YHQAoR=Y2Smk?Xt<gt;6<JFAwh%~7?6Mzpvp
zm-j;gKVblnTkblm(M#-n87)A#heznlZ-#Kk-Kgc8lwQXr?9SZ=UM|MQYH_CMAi=@j
z=Hn7-{bn<hdHLJReplSO^i3Ev6==7@AWBz%7e1q-v+g>EX>$CS!faIQ>?mchI`$jJ
zXmSGo*;7oc0h*lP4o@ooKEU)^Kh_{5mb>mPtFRw4uRyA5_P1M8Ftf0g?!xaqm}jfI
zeKoqMp)SpYHe~I^4%3(tnw)s}2vZE^qlPrwk--j3$No*{9AR<SNIcRsIVD{kIwlEa
z=#esWrMY645-7b~^aQz2X>zto@$6ArgrC5mE3>pZdM<9YtmItH4k^9+{a}+cv(ybg
zOffh3SndkJSWxFbO-^N3?~F`M&f%{5W8%ZM$Tc~qrCqx?Sj6G{ZC7DcNp?H-Fz+}Q
z1Dc%Qna;gCI>wGr_g$gr$7ciOGS`&s(%HU}r}5h$YCr2U%xUi~b~8IR@5s?rOG<BH
ztGw$$U1`7oy6b$f?`7uR^@@%?|4QkMCG_g~P~VrZ@9jo9@1GnJ_Rz(2>Ghs;%mp9U
zvDV@X9wEQ}V+w?H9uF95JTSN*)$$7i*^2eV1r2vOk6JGT4gCilE<pz<CR}B39KlM+
zMy--;#wI--cX2Q$SxOgQ^q0(H@5L9xd>_Y-cUN7R2hNio)z$lwrq@2)kar{F$rI^@
z<xl4=Oq;&|*X~(76E96vzPnT~RVh@9zv4ryFLjqN^{Cg=z3DHPdIrVf=NMU84kHn4
zFgkA&nr}HzT+g%cG~mZ!>XXZa%TZ1IH7U{5?DnFwfAr%XMAH|3)Q<mKj<H5z$0Gy-
zUC+s^9r)Yx&j~j8dlCW597*(~zyH|hkz^XYsOGYeO!VddGMRZoGH+iF8~kuiu6Q|S
zG#gdT>o5d5?m(e4!y*g0yLVYT=>I!+bnH+59I8atPl?>_V7mP$e<`j)l}?SK$A0o-
zE68&{_3rCfL3*>(rG{CU5vatxxA-h}><BBQ?pK18tC^<wZHQ22{R6fRWJT2VFu1g9
zsnOrAc)PtSWNzz~0p2^k@&{V@%W-;kY5=%W&k#E1=iVF|0h4@7kW~Jx`ClcYSXJ#(
zOwQA|4;)%SZ_HwF5lxPbVfn+!y!vw=wIjowm5L?W?PEvS9c5lc{AG)(+>2iR*|!f%
zr|X3T=beHkLBk$b6NVu#vv5OFDKbv8@aHgq?+zB4;N>Fz60@HrnbWx^ON<`El{IGP
zwO0d}o!`5f%YEoUy?+_V9%Fy;!&EHumqc#sK)UT0Khq-_#7_%$ltMF%h|-EuFN}*_
za?d=sx;(f3gXcRg&v*X8lVw<lwycXM@BBT(j&hf8xtBS%9M`*WL8{zKgpTb|4R*RD
zcXq}@S6|m~+;XAcV8>-bzcFR`!~KSEj`sI{V>Pb3PP*>nIJcjFJ(AnHoNl}BFLR04
zUw_T?rJ9{~b^U9`uSkCdKjIgKQc<N+3HIT4dHwMW1~c(nyLdcPz-0WMZw8)oK_0#@
z$Mab*3cq}_;Q1Pez|ZF<Pf4DTN)|6!_;jAuutb|ae|i4=<=Qzbw34YS<}ariH#Kw}
zxOlUND4qUxb56W6<iGr*^Q^JFRvYqPN2FBJPpmrnlXaNVVWkWBohgmIwMDd;et%0F
zhD<Fn8pZ}aMH1%Z<t;I27tS|m=gc!0=PcH;%xNbiD#_HmMJt!A%+pS#VYhn^V$OMU
zo|&&CQx-p^)z4Y6V&#(MPm$F5D<65G%Wp?f(XaFSCZ(lKNz*1yNhj$^@o5PuLBpTY
zj@1Uui_r$HP*y$nYoUn7-yPh`xMI%2`7w&1724DUeR@(_#;VlJgej@1RQ+2oy7+D>
zUG-ad+7tL~hLUrg+&c1<12>MtQBaq^Rd7q-#9dqn*$B7s9J}<;`L|P6HB1>Qq9K0_
zrt|*z%=89+V7L`jgRj9w@EZ{0*sTW$1~DKLECSDi4d89C6?_2x2mA!?0OC=p><0RS
zksuO`0#P6u#DLLY3>fQC8Ly1RmvP`RkPViDm%%Gw4Ok1-fg(^0ET9Ce2OB`uwR>se
zerqshPB9v^OBQIKng7g^<<B{DoIeCV-V>nHTL;jQ$`HE0)uT%*dJH$H#z(>?y+l;m
q_H1bH{#xN5QD?9k#LZXX$CKJ0@N-F`{uX=iM7=hQxs1TY+5ZRb+ywmq

diff --git a/net.h b/net.h
index 54cf5f6..ad1afce 100755
--- a/net.h
+++ b/net.h
@@ -1,4 +1,4 @@
-/* net.h: 01-Feb-96 */
+/* net.h: 20-May-96 */
 
 /****************************************************************
  * (C)opyright (C) 1993,1996  Martin Stover, Marburg, Germany   *
@@ -17,6 +17,7 @@
 #include <stdarg.h>
 
 typedef unsigned int       UI;
+typedef unsigned int       uint;
 typedef unsigned char      UC;
 typedef unsigned char      uint8;
 typedef unsigned short int uint16;
@@ -103,15 +104,31 @@ typedef struct {
 #define NWBIND   5
 
 /* net.c */
-extern char *funcname;
+extern char  *funcname;
+extern char   prgpath[];
+
+extern int   call_func_entry(int argc, char *argv[]);
 
 /* tools.c */
 extern void  clear_kb(void);
 extern int   key_pressed(void);
 extern int   ask_user(char *p, ...);
+#define xfree(p)      x_x_xfree((char **)&(p))
+extern  void x_x_xfree(char **p);
+extern char  *xmalloc(uint  size);
+extern char  *xcmalloc(uint size);
+
 extern int   strmaxcpy(char *dest, char *source, int len);
 extern char  *xadd_char(char *s, int c, int maxlen);
 extern uint8 *upstr(uint8 *s);
+extern void korrpath(char *s);
+extern void get_path_fn(char *s, char *p, char *fn);
+
+#define reb(s) deb((s)),leb((s))
+
+extern void  deb(uint8 *s);
+extern void  leb(uint8 *s);
+
 
 #define add_char(s, c) xadd_char((s), (c), -1)
 
@@ -124,17 +141,11 @@ extern int  putglobenv(char  *option);
 #define DRIVE_DELETE  3
 
 typedef struct {
-  uint8  drivenummer;  /* 0xff, 0xfe f�r DOSPATH mit Pfad */
-  uint8  flags;
-  union {
-    struct {
-      char   dospath[65];
-    } d;
-    struct fs {
-      uint8  connid;
-      uint8  dhandle;
-    } fs;
-  } u;
+  uint8  drivenummer;   /* 0xff=last of list,  0xfe only DOSPATH */
+  uint8  flags;         /* 0x80 = local drive */
+  char   dospath[65];
+  uint8  connid;
+  uint8  dhandle;
 } SEARCH_VECTOR_ENTRY;
 
 typedef SEARCH_VECTOR_ENTRY  SEARCH_VECTOR[17];
@@ -180,23 +191,30 @@ extern int    ncp_17_4b(uint8 *cryptkey, uint8 *objname, uint16 objtyp,
                                int passwx, uint8 *newpassword);
 
 /* map.c */
-extern int func_map(int argc, char *argv[]);
-extern int func_path(int argc, char *argv[]);
+extern int func_map   (int argc, char *argv[], int mode);
+extern int func_path  (int argc, char *argv[], int mode);
 
 /* login.c */
-extern int func_login(int argc, char *argv[]);
-extern int func_logout(int argc, char *argv[]);
-extern int func_passwd(int argc, char *argv[]);
+extern int func_login  (int argc, char *argv[], int mode);
+extern int func_logout (int argc, char *argv[], int mode);
+extern int func_passwd (int argc, char *argv[], int mode);
+extern int func_profile(int argc, char *argv[], int mode);
+extern int func_cwd    (int argc, char *argv[], int mode);
+extern int func_echo   (int argc, char *argv[], int mode);
+extern int func_exec   (int argc, char *argv[], int mode);
+extern int read_command_file(char *fstr);
 
 /* slist.c */
-extern int func_slist(int argc, char *argv[]);
+extern int func_slist (int argc, char *argv[], int mode);
 
 /* nwdebug.c */
-extern int func_debug(int argc, char *argv[]);
+extern int func_debug (int argc, char *argv[], int mode);
 
 /* nwtests.c */
-extern int func_tests(int argc, char *argv[]);
-
+extern int func_tests (int argc, char *argv[], int mode);
+
+/* capture.c */
+extern int func_capture(int argc, char *argv[], int mode);
 
 
 
diff --git a/netcall.c b/netcall.c
index 25fc654..4f5b888 100755
--- a/netcall.c
+++ b/netcall.c
@@ -49,6 +49,8 @@ int logout(void)
 
 int redir_device_drive(int devicetyp, uint8 *devname, uint8 *remotename)
 /* if devicetyp == -1, the redir is canceled */
+/* devicetyp 3 = printer    */
+/* devicetyp 4 = disk drive */
 {
    REGS    regs;
    SREGS   sregs;
@@ -157,16 +159,15 @@ int get_search_drive_vektor(SEARCH_VECTOR_ENTRY *vec)
       char *p1 = path;
       int  len = 0;
       while (*path && *path++ !=';') len++;
-      if (*(p1+1) == ':'
-          && *p1 >= 'A' &&  *p1 <= 'Z' &&
-           (len==2 || (len == 3 && *(p1+2) == '.'))) {
+      if (*(p1+1) == ':' && *p1 >= 'A' &&  *p1 <= 'Z') {
         v->drivenummer =  *p1 - 'A';
-        get_drive_info(v->drivenummer, &(v->u.fs.connid),
-           &(v->u.fs.dhandle), &(v->flags));
+        get_drive_info(v->drivenummer, &(v->connid),
+           &(v->dhandle), &(v->flags));
+        strmaxcpy(v->dospath, p1+2, min(len-2, sizeof(v->dospath)-1));
       } else {
         v->flags       = 0;
         v->drivenummer = 0xfe;  /* ergibt ? */
-        strmaxcpy(v->u.d.dospath, p1, len);
+        strmaxcpy(v->dospath, p1, min(len, sizeof(v->dospath)-1));
       }
       (++v)->drivenummer =  0xff;
       if (*path == ';') path++;
@@ -181,20 +182,29 @@ int set_search_drive_vektor(SEARCH_VECTOR_ENTRY *vec)
   char *p=path;
   SEARCH_VECTOR_ENTRY *v;
   int  plen=strlen(path_env_name);
+  int  maxcount=16;
   strcpy(path, path_env_name);
   path[plen]   = '=';
   path[++plen] = '\0';
-  while ((NULL != (v = vec++)) && v->drivenummer != 0xff){
-    if (p > path) *p++=';';
-    else p+=plen;
-    if (v->drivenummer < 26) {
-      *p++ = (char) v->drivenummer + 'A';
-      *p++ = ':';
-      *p++ = '.';
-      *p   = '\0';
-    } else {
-      strcpy(p,  v->u.d.dospath);
-      p+= strlen(v->u.d.dospath);
+
+  while (maxcount-- && (NULL != (v = vec++)) && v->drivenummer != 0xff){
+    if (v->drivenummer < 26 || *(v->dospath)) {
+      if (p > path) *p++=';';
+      else p+=plen;
+      if (v->drivenummer < 26) {
+        *p++ = (char) v->drivenummer + 'A';
+        *p++ = ':';
+        if (*v->dospath) {
+          strcpy(p,  v->dospath);
+          p+= strlen(v->dospath);
+        } else {
+          *p++='.';
+          *p  ='\0';
+        }
+      } else {
+        strcpy(p,  v->dospath);
+        p+= strlen(v->dospath);
+      }
     }
   }
   return(putglobenv(path));
diff --git a/nwdebug.c b/nwdebug.c
index a1f9c56..1a0feb2 100755
--- a/nwdebug.c
+++ b/nwdebug.c
@@ -1,4 +1,4 @@
-/* nwdebug.c 04-Apr-96 */
+/* nwdebug.c 21-May-96 */
 
 /****************************************************************
  * (C)opyright (C) 1993,1996  Martin Stover, Marburg, Germany   *
@@ -13,7 +13,7 @@ static int usage(void)
   return(-1);
 }
 
-int func_debug(int argc, char *argv[])
+int func_debug(int argc, char *argv[], int mode)
 {
   uint8 s[200];
   int   module;
@@ -29,8 +29,11 @@ int func_debug(int argc, char *argv[])
   level = atoi(argv[2]);
   if (level < 0 || level > 99) return(usage());
   result = ncp_17_02(module, level);
-  if (result < 0) fprintf(stderr, "set debug failed\n");
-  else fprintf(stdout, "Debug level for %s changed from %d to %d\n",
+  if (result < 0) {
+    fprintf(stderr, "set debug failed\n");
+    fprintf(stderr, "perhaps you did not enable FUNC_17_02_IS_DEBUG\n");
+    fprintf(stderr, "in mars_nwe/config.h ?!");
+  } else fprintf(stdout, "Debug level for %s changed from %d to %d\n",
              s, result, level);
   return(result < 0 ? result : 0);
 }
diff --git a/nwtests.c b/nwtests.c
index 52c8fed..a2e7abf 100755
--- a/nwtests.c
+++ b/nwtests.c
@@ -1,4 +1,4 @@
-/* nwtests.c 14-Mar-96 */
+/* nwtests.c 20-May-96 */
 
 /****************************************************************
  * (C)opyright (C) 1993,1996  Martin Stover, Marburg, Germany   *
@@ -8,12 +8,10 @@
 
 static int usage(void)
 {
-  fprintf(stderr, "usage:\t%s NCPSERV|NWCONN level\n", funcname);
-  fprintf(stderr, "\tlevel=0 .. 99\n" );
   return(-1);
 }
 
-int func_tests(int argc, char *argv[])
+int func_tests(int argc, char *argv[], int mode)
 {
   int level     = ncp_17_02(NWCONN, 6);
   int dirhandle = alloc_temp_dir_handle(0, "SYS:", 'd', NULL);
diff --git a/slist.c b/slist.c
index d046816..dcc220d 100755
--- a/slist.c
+++ b/slist.c
@@ -6,7 +6,7 @@
 
 #include "net.h"
 
-int func_slist(int argc, char *argv[])
+int func_slist(int argc, char *argv[], int mode)
 {
 
 
diff --git a/tools.c b/tools.c
index 65ca658..35a86ed 100755
--- a/tools.c
+++ b/tools.c
@@ -48,6 +48,31 @@ int ask_user(char *p, ...)
    return(flag);
 }
 
+char *xmalloc(uint size)
+{
+  char *p = (size) ? (char *)malloc(size) : (char*)NULL;
+  if (p == (char *)NULL && size){
+    fprintf(stderr, "not enough core, need %d Bytes\n", size);
+    exit(1);
+  }
+  return(p);
+}
+
+char *xcmalloc(uint size)
+{
+  char *p = xmalloc(size);
+  if (size) memset(p, 0, size);
+  return(p);
+}
+
+void x_x_xfree(char **p)
+{
+  if (*p != (char *)NULL){
+    free(*p);
+    *p = (char*)NULL;
+  }
+}
+
 int strmaxcpy(char *dest, char *source, int len)
 /* copied max. len chars + '\0' Byte */
 {
@@ -69,6 +94,18 @@ char *xadd_char(char *s, int c, int maxlen)
   return(s);
 }
 
+static uint8 down_char(uint8 ch)
+{
+  if (ch > 64 && ch < 91) return(ch + 32);
+  switch(ch){
+    case 142:  ch =  132; break;
+    case 153:  ch =  148; break;
+    case 154:  ch =  129; break;
+    default :break;
+  }
+  return(ch);
+}
+
 static uint8 up_char(uint8 ch)
 {
   if (ch > 96 && ch < 123) return(ch - 32);
@@ -88,6 +125,64 @@ uint8 *upstr(uint8 *s)
   return(s);
 }
 
+void deb(uint8 *s)
+{
+  if (!s || !*s) return;
+  else {
+    uint8 *p = s + strlen(s);
+    while (p > s && (*--p==32 || *p==9));;
+    if (*p==32 || *p==9) *p='\0';
+    else *(p+1) = '\0';
+  }
+}
+
+void leb(uint8 *s)
+{
+  if (!s || !*s || (*s != 32 && *s != 9)) return;
+  else {
+    uint8 *p = s;
+    for (;*p && *p!=32 && *p!=9;p++);;
+    strcpy(s, p);
+  }
+}
+
+void korrpath(char *s)
+{
+  if (!s) return;
+  for (;*s;s++) {
+    if (*s=='\\') *s='/';
+    else *s=down_char(*s);
+  }
+}
+
+void get_path_fn(char *s, char *p, char *fn)
+{
+  int j= strlen(s);
+  if (p  != (char *)NULL)  p[0]  = 0;
+  if (fn != (char*) NULL)  fn[0] = 0;
+  if (!j) return;
+  if (s[0] == '.' && (s[1] == 0 || (s[1] == '.' && s[2] == 0) ) ) {
+    if (p != (char *)NULL) {
+      strcpy(p, s);
+      strcat(p, "/");
+    }
+    if (fn != (char *)NULL) fn[0] = 0;
+    return;
+  }
+  while (j--){
+    if ((s[j] == '/') || (s[j] == ':') ) {
+      if (fn != (char *)NULL) strcpy(fn, s+j+1);
+      if (p != (char *)NULL) {
+        strncpy(p, s, j+1);
+        p[j+1] = 0;
+      }
+      return;
+    }
+  }
+  if (fn != (char *)NULL) strcpy(fn, s);  /* no path */
+}
+
+
 typedef struct {
   uint16  adr1;
   uint16  adr2;