home *** CD-ROM | disk | FTP | other *** search
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: SHell self-extracting ARchive
(archive/shar).
You can browse this item here: 799
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| dexvert
| Newsgroup Content (archive/news)
| magic
| Supported |
| 100%
| dexvert
| SHell self-extracting ARchive (archive/shar)
| magic
| Supported |
| 1%
| dexvert
| Text File (text/txt)
| fallback
| Supported |
| 100%
| file
| news text
| default
| |
| 99%
| file
| Lisp/Scheme program text
| default
| |
| 98%
| file
| Lisp/Scheme program, ASCII text
| default
| |
| 100%
| checkBytes
| Printable ASCII
| default
| |
| 100%
| perlTextCheck
| Likely Text (Perl)
| default
| |
| 100%
| siegfried
| fmt/329 Shell Archive Format
| default
| |
| 100%
| detectItEasy
| Format: plain text[LF]
| default (weak)
| |
| 100%
| xdgMime
| message/news
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 58 72 65 66 3a 20 73 70 | 61 72 6b 79 20 67 6e 75 |Xref: sp|arky gnu|
|00000010| 2e 65 6d 61 63 73 2e 73 | 6f 75 72 63 65 73 3a 37 |.emacs.s|ources:7|
|00000020| 39 39 20 72 65 63 2e 67 | 61 6d 65 73 2e 6e 65 74 |99 rec.g|ames.net|
|00000030| 72 65 6b 3a 39 37 37 38 | 0a 4e 65 77 73 67 72 6f |rek:9778|.Newsgro|
|00000040| 75 70 73 3a 20 67 6e 75 | 2e 65 6d 61 63 73 2e 73 |ups: gnu|.emacs.s|
|00000050| 6f 75 72 63 65 73 2c 72 | 65 63 2e 67 61 6d 65 73 |ources,r|ec.games|
|00000060| 2e 6e 65 74 72 65 6b 0a | 50 61 74 68 3a 20 73 70 |.netrek.|Path: sp|
|00000070| 61 72 6b 79 21 75 75 6e | 65 74 21 66 65 72 6b 65 |arky!uun|et!ferke|
|00000080| 6c 2e 75 63 73 62 2e 65 | 64 75 21 74 61 63 6f 21 |l.ucsb.e|du!taco!|
|00000090| 67 61 74 65 63 68 21 73 | 77 72 69 6e 64 65 21 7a |gatech!s|wrinde!z|
|000000a0| 61 70 68 6f 64 2e 6d 70 | 73 2e 6f 68 69 6f 2d 73 |aphod.mp|s.ohio-s|
|000000b0| 74 61 74 65 2e 65 64 75 | 21 73 64 64 2e 68 70 2e |tate.edu|!sdd.hp.|
|000000c0| 63 6f 6d 21 73 67 69 62 | 6c 61 62 21 6e 65 77 73 |com!sgib|lab!news|
|000000d0| 2e 63 73 2e 69 6e 64 69 | 61 6e 61 2e 65 64 75 21 |.cs.indi|ana.edu!|
|000000e0| 77 6d 70 65 72 72 79 40 | 63 68 65 72 72 79 2e 75 |wmperry@|cherry.u|
|000000f0| 63 73 2e 69 6e 64 69 61 | 6e 61 2e 65 64 75 0a 46 |cs.india|na.edu.F|
|00000100| 72 6f 6d 3a 20 22 57 69 | 6c 6c 69 61 6d 20 4d 2e |rom: "Wi|lliam M.|
|00000110| 20 50 65 72 72 79 22 20 | 3c 77 6d 70 65 72 72 79 | Perry" |<wmperry|
|00000120| 40 63 68 65 72 72 79 2e | 75 63 73 2e 69 6e 64 69 |@cherry.|ucs.indi|
|00000130| 61 6e 61 2e 65 64 75 3e | 0a 53 75 62 6a 65 63 74 |ana.edu>|.Subject|
|00000140| 3a 20 6d 65 74 61 2d 73 | 65 72 76 65 72 2e 65 6c |: meta-s|erver.el|
|00000150| 20 63 6f 64 65 20 66 6f | 72 20 6e 65 74 72 65 6b | code fo|r netrek|
|00000160| 20 6a 75 6e 6b 69 65 73 | 20 6f 75 74 20 74 68 65 | junkies| out the|
|00000170| 72 65 0a 4d 65 73 73 61 | 67 65 2d 49 44 3a 20 3c |re.Messa|ge-ID: <|
|00000180| 31 39 39 32 4e 6f 76 31 | 37 2e 30 31 32 34 31 34 |1992Nov1|7.012414|
|00000190| 2e 31 35 32 32 35 40 6e | 65 77 73 2e 63 73 2e 69 |.15225@n|ews.cs.i|
|000001a0| 6e 64 69 61 6e 61 2e 65 | 64 75 3e 0a 4b 65 79 77 |ndiana.e|du>.Keyw|
|000001b0| 6f 72 64 73 3a 20 6d 65 | 74 61 73 65 72 76 65 72 |ords: me|taserver|
|000001c0| 20 65 6d 61 63 73 20 75 | 67 6c 79 2d 68 61 63 6b | emacs u|gly-hack|
|000001d0| 0a 4f 72 67 61 6e 69 7a | 61 74 69 6f 6e 3a 20 49 |.Organiz|ation: I|
|000001e0| 6e 64 69 61 6e 61 20 55 | 6e 69 76 65 72 73 69 74 |ndiana U|niversit|
|000001f0| 79 2c 20 42 6c 6f 6f 6d | 69 6e 67 74 6f 6e 0a 44 |y, Bloom|ington.D|
|00000200| 61 74 65 3a 20 54 75 65 | 2c 20 31 37 20 4e 6f 76 |ate: Tue|, 17 Nov|
|00000210| 20 31 39 39 32 20 30 31 | 3a 32 34 3a 30 32 20 2d | 1992 01|:24:02 -|
|00000220| 30 35 30 30 0a 4c 69 6e | 65 73 3a 20 35 30 30 0a |0500.Lin|es: 500.|
|00000230| 0a 0a 46 65 6c 6c 6f 77 | 20 6e 65 74 72 65 6b 20 |..Fellow| netrek |
|00000240| 6a 75 6e 6b 69 65 73 2c | 0a 20 20 20 20 49 20 77 |junkies,|. I w|
|00000250| 72 6f 74 65 20 74 68 69 | 73 20 77 68 69 6c 65 20 |rote thi|s while |
|00000260| 70 75 6c 6c 69 6e 67 20 | 61 6e 20 61 6c 6c 20 6e |pulling |an all n|
|00000270| 69 67 68 74 65 72 20 28 | 70 6c 61 79 69 6e 67 20 |ighter (|playing |
|00000280| 6e 65 74 72 65 6b 20 69 | 6e 73 74 65 61 64 20 6f |netrek i|nstead o|
|00000290| 66 0a 64 6f 69 6e 67 20 | 74 68 61 74 20 67 72 61 |f.doing |that gra|
|000002a0| 70 68 69 63 73 20 68 6f | 6d 65 77 6f 72 6b 20 3a |phics ho|mework :|
|000002b0| 29 2e 20 20 49 20 74 68 | 6f 75 67 68 74 20 74 68 |). I th|ought th|
|000002c0| 65 20 78 2f 6d 6f 74 69 | 66 20 6d 65 74 61 73 65 |e x/moti|f metase|
|000002d0| 72 76 65 72 20 63 6c 69 | 65 6e 74 0a 77 61 73 20 |rver cli|ent.was |
|000002e0| 70 72 65 74 74 79 20 73 | 6c 6f 77 2c 20 61 6e 64 |pretty s|low, and|
|000002f0| 20 49 20 61 6c 77 61 79 | 73 20 68 61 76 65 20 61 | I alway|s have a|
|00000300| 74 20 6c 65 61 73 74 20 | 6f 6e 65 20 65 6d 61 63 |t least |one emac|
|00000310| 73 20 77 69 6e 64 6f 77 | 20 75 70 20 61 74 20 61 |s window| up at a|
|00000320| 6c 6c 0a 74 69 6d 65 73 | 2c 20 73 6f 20 49 20 66 |ll.times|, so I f|
|00000330| 69 67 75 72 65 64 20 49 | 20 77 6f 75 6c 64 20 6a |igured I| would j|
|00000340| 75 73 74 20 77 72 69 74 | 65 20 69 74 20 69 6e 20 |ust writ|e it in |
|00000350| 65 6c 69 73 70 2e 20 3a | 29 0a 20 20 20 20 54 68 |elisp. :|). Th|
|00000360| 69 73 20 69 73 20 77 68 | 61 74 20 63 61 6d 65 20 |is is wh|at came |
|00000370| 6f 66 20 69 74 2e 20 20 | 50 72 65 74 74 79 20 75 |of it. |Pretty u|
|00000380| 67 6c 79 2c 20 62 75 74 | 20 69 74 20 77 6f 72 6b |gly, but| it work|
|00000390| 73 20 71 75 69 74 65 20 | 77 65 6c 6c 2e 0a 54 68 |s quite |well..Th|
|000003a0| 65 72 65 20 69 73 20 61 | 20 6d 65 74 61 2d 73 65 |ere is a| meta-se|
|000003b0| 72 76 65 72 2e 64 6f 63 | 20 66 69 6c 65 20 69 6e |rver.doc| file in|
|000003c0| 20 74 68 65 20 73 68 65 | 6c 6c 20 61 72 63 68 69 | the she|ll archi|
|000003d0| 76 65 2c 20 62 75 74 20 | 68 65 72 65 20 61 72 65 |ve, but |here are|
|000003e0| 20 74 68 65 0a 62 61 73 | 69 63 73 20 6f 6e 20 68 | the.bas|ics on h|
|000003f0| 6f 77 20 74 6f 20 67 65 | 74 20 67 6f 69 6e 67 2e |ow to ge|t going.|
|00000400| 20 20 0a 20 20 20 20 50 | 75 74 20 74 68 65 20 65 | . P|ut the e|
|00000410| 6c 69 73 70 20 66 69 6c | 65 20 28 2e 65 6c 29 20 |lisp fil|e (.el) |
|00000420| 69 6e 20 61 20 64 69 72 | 65 63 74 6f 72 79 20 73 |in a dir|ectory s|
|00000430| 6f 6d 65 77 68 65 72 65 | 20 61 6e 64 20 61 64 64 |omewhere| and add|
|00000440| 20 74 68 61 74 0a 64 69 | 72 65 63 74 6f 72 79 20 | that.di|rectory |
|00000450| 74 6f 20 79 6f 75 72 20 | 6c 6f 61 64 2d 70 61 74 |to your |load-pat|
|00000460| 68 20 76 61 72 69 61 62 | 6c 65 20 69 6e 20 65 6d |h variab|le in em|
|00000470| 61 63 73 2e 0a 20 20 20 | 20 28 73 65 74 71 20 6c |acs.. | (setq l|
|00000480| 6f 61 64 2d 70 61 74 68 | 20 28 61 70 70 65 6e 64 |oad-path| (append|
|00000490| 20 28 6c 69 73 74 20 28 | 65 78 70 61 6e 64 2d 66 | (list (|expand-f|
|000004a0| 69 6c 65 2d 6e 61 6d 65 | 20 22 7e 2f 6c 69 73 70 |ile-name| "~/lisp|
|000004b0| 22 29 29 20 6c 6f 61 64 | 2d 70 61 74 68 29 29 0a |")) load|-path)).|
|000004c0| 20 20 20 20 6f 72 20 73 | 6f 6d 65 74 68 69 6e 67 | or s|omething|
|000004d0| 20 73 69 6d 69 6c 61 72 | 2e 0a 0a 20 20 20 54 68 | similar|... Th|
|000004e0| 65 6e 20 73 65 74 20 74 | 68 65 20 61 6e 79 20 76 |en set t|he any v|
|000004f0| 61 72 69 61 62 6c 65 73 | 20 79 6f 75 20 77 61 6e |ariables| you wan|
|00000500| 74 20 28 74 68 65 79 20 | 61 72 65 20 64 65 73 63 |t (they |are desc|
|00000510| 72 69 70 65 64 20 69 6e | 20 74 68 65 20 2e 64 6f |riped in| the .do|
|00000520| 63 0a 66 69 6c 65 29 2e | 20 20 49 66 20 79 6f 75 |c.file).| If you|
|00000530| 20 68 61 76 65 20 70 72 | 6f 62 6c 65 6d 73 20 63 | have pr|oblems c|
|00000540| 6f 6e 6e 65 63 74 69 6e | 67 20 74 6f 20 63 68 61 |onnectin|g to cha|
|00000550| 72 6f 6e 2e 61 6d 64 61 | 68 6c 2e 63 6f 6d 20 66 |ron.amda|hl.com f|
|00000560| 72 6f 6d 20 79 6f 75 72 | 0a 73 69 74 65 2c 20 74 |rom your|.site, t|
|00000570| 72 79 20 69 6e 62 6f 75 | 6e 64 2e 6d 61 69 6c 2e |ry inbou|nd.mail.|
|00000580| 61 6d 64 61 68 6c 2e 63 | 6f 6d 20 6f 72 20 31 32 |amdahl.c|om or 12|
|00000590| 39 2e 32 31 32 2e 31 31 | 2e 31 20 61 73 20 74 68 |9.212.11|.1 as th|
|000005a0| 65 20 6d 65 74 61 73 65 | 72 76 65 72 2d 73 69 74 |e metase|rver-sit|
|000005b0| 65 2e 0a 46 6f 72 20 73 | 6f 6d 65 20 72 65 61 73 |e..For s|ome reas|
|000005c0| 6f 6e 20 74 68 65 72 65 | 20 61 72 65 20 32 20 69 |on there| are 2 i|
|000005d0| 70 20 23 73 20 66 6f 72 | 20 63 68 61 72 6f 6e 2e |p #s for| charon.|
|000005e0| 0a 20 0a 20 20 20 50 6c | 65 61 73 65 20 66 65 65 |. . Pl|ease fee|
|000005f0| 6c 20 66 72 65 65 20 74 | 6f 20 73 65 6e 64 20 61 |l free t|o send a|
|00000600| 6e 79 20 73 75 67 67 65 | 73 74 69 6f 6e 73 20 74 |ny sugge|stions t|
|00000610| 6f 20 6d 65 20 40 20 77 | 6d 70 65 72 72 79 40 69 |o me @ w|mperry@i|
|00000620| 6e 64 69 61 6e 61 2e 65 | 64 75 2c 0a 61 6e 64 20 |ndiana.e|du,.and |
|00000630| 66 6c 61 6d 65 73 2f 65 | 74 63 20 74 6f 20 72 6f |flames/e|tc to ro|
|00000640| 6f 74 40 60 68 6f 73 74 | 6e 61 6d 65 60 20 3a 29 |ot@`host|name` :)|
|00000650| 0a 0a 20 20 20 54 68 69 | 73 20 69 73 20 6d 79 20 |.. Thi|s is my |
|00000660| 66 69 72 73 74 20 61 74 | 74 65 6d 70 74 20 61 74 |first at|tempt at|
|00000670| 20 70 6f 73 74 69 6e 67 | 20 73 6f 6d 65 74 68 69 | posting| somethi|
|00000680| 6e 67 20 49 20 77 72 6f | 74 65 20 74 6f 20 74 68 |ng I wro|te to th|
|00000690| 65 20 6e 65 74 2c 0a 70 | 6c 65 61 73 65 20 62 65 |e net,.p|lease be|
|000006a0| 20 67 65 6e 74 6c 65 2e | 2e 2e 0a 0a 2d 42 69 6c | gentle.|....-Bil|
|000006b0| 6c 20 50 65 72 72 79 0a | 0a 23 21 20 2f 62 69 6e |l Perry.|.#! /bin|
|000006c0| 2f 73 68 0a 23 20 54 68 | 69 73 20 69 73 20 61 20 |/sh.# Th|is is a |
|000006d0| 73 68 65 6c 6c 20 61 72 | 63 68 69 76 65 2e 20 20 |shell ar|chive. |
|000006e0| 52 65 6d 6f 76 65 20 61 | 6e 79 74 68 69 6e 67 20 |Remove a|nything |
|000006f0| 62 65 66 6f 72 65 20 74 | 68 69 73 20 6c 69 6e 65 |before t|his line|
|00000700| 2c 20 74 68 65 6e 20 75 | 6e 70 61 63 6b 0a 23 20 |, then u|npack.# |
|00000710| 69 74 20 62 79 20 73 61 | 76 69 6e 67 20 69 74 20 |it by sa|ving it |
|00000720| 69 6e 74 6f 20 61 20 66 | 69 6c 65 20 61 6e 64 20 |into a f|ile and |
|00000730| 74 79 70 69 6e 67 20 22 | 73 68 20 66 69 6c 65 22 |typing "|sh file"|
|00000740| 2e 20 20 54 6f 20 6f 76 | 65 72 77 72 69 74 65 20 |. To ov|erwrite |
|00000750| 65 78 69 73 74 69 6e 67 | 0a 23 20 66 69 6c 65 73 |existing|.# files|
|00000760| 2c 20 74 79 70 65 20 22 | 73 68 20 66 69 6c 65 20 |, type "|sh file |
|00000770| 2d 63 22 2e 20 20 59 6f | 75 20 63 61 6e 20 61 6c |-c". Yo|u can al|
|00000780| 73 6f 20 66 65 65 64 20 | 74 68 69 73 20 61 73 20 |so feed |this as |
|00000790| 73 74 61 6e 64 61 72 64 | 20 69 6e 70 75 74 20 76 |standard| input v|
|000007a0| 69 61 0a 23 20 75 6e 73 | 68 61 72 2c 20 6f 72 20 |ia.# uns|har, or |
|000007b0| 62 79 20 74 79 70 69 6e | 67 20 22 73 68 20 3c 66 |by typin|g "sh <f|
|000007c0| 69 6c 65 22 2c 20 65 2e | 67 2e 2e 20 20 49 66 20 |ile", e.|g.. If |
|000007d0| 74 68 69 73 20 61 72 63 | 68 69 76 65 20 69 73 20 |this arc|hive is |
|000007e0| 63 6f 6d 70 6c 65 74 65 | 2c 20 79 6f 75 0a 23 20 |complete|, you.# |
|000007f0| 77 69 6c 6c 20 73 65 65 | 20 74 68 65 20 66 6f 6c |will see| the fol|
|00000800| 6c 6f 77 69 6e 67 20 6d | 65 73 73 61 67 65 20 61 |lowing m|essage a|
|00000810| 74 20 74 68 65 20 65 6e | 64 3a 0a 23 09 09 22 45 |t the en|d:.#.."E|
|00000820| 6e 64 20 6f 66 20 73 68 | 65 6c 6c 20 61 72 63 68 |nd of sh|ell arch|
|00000830| 69 76 65 2e 22 0a 23 20 | 43 6f 6e 74 65 6e 74 73 |ive.".# |Contents|
|00000840| 3a 20 20 6d 65 74 61 2d | 73 65 72 76 65 72 2e 65 |: meta-|server.e|
|00000850| 6c 20 6d 65 74 61 2d 73 | 65 72 76 65 72 2e 64 6f |l meta-s|erver.do|
|00000860| 63 0a 23 20 57 72 61 70 | 70 65 64 20 62 79 20 77 |c.# Wrap|ped by w|
|00000870| 6d 70 65 72 72 79 40 63 | 68 65 72 72 79 20 6f 6e |mperry@c|herry on|
|00000880| 20 54 75 65 20 4e 6f 76 | 20 31 37 20 30 31 3a 32 | Tue Nov| 17 01:2|
|00000890| 30 3a 35 39 20 31 39 39 | 32 0a 50 41 54 48 3d 2f |0:59 199|2.PATH=/|
|000008a0| 62 69 6e 3a 2f 75 73 72 | 2f 62 69 6e 3a 2f 75 73 |bin:/usr|/bin:/us|
|000008b0| 72 2f 75 63 62 20 3b 20 | 65 78 70 6f 72 74 20 50 |r/ucb ; |export P|
|000008c0| 41 54 48 0a 69 66 20 74 | 65 73 74 20 2d 66 20 27 |ATH.if t|est -f '|
|000008d0| 6d 65 74 61 2d 73 65 72 | 76 65 72 2e 65 6c 27 20 |meta-ser|ver.el' |
|000008e0| 2d 61 20 22 24 7b 31 7d | 22 20 21 3d 20 22 2d 63 |-a "${1}|" != "-c|
|000008f0| 22 20 3b 20 74 68 65 6e | 20 0a 20 20 65 63 68 6f |" ; then| . echo|
|00000900| 20 73 68 61 72 3a 20 57 | 69 6c 6c 20 6e 6f 74 20 | shar: W|ill not |
|00000910| 63 6c 6f 62 62 65 72 20 | 65 78 69 73 74 69 6e 67 |clobber |existing|
|00000920| 20 66 69 6c 65 20 5c 22 | 27 6d 65 74 61 2d 73 65 | file \"|'meta-se|
|00000930| 72 76 65 72 2e 65 6c 27 | 5c 22 0a 65 6c 73 65 0a |rver.el'|\".else.|
|00000940| 65 63 68 6f 20 73 68 61 | 72 3a 20 45 78 74 72 61 |echo sha|r: Extra|
|00000950| 63 74 69 6e 67 20 5c 22 | 27 6d 65 74 61 2d 73 65 |cting \"|'meta-se|
|00000960| 72 76 65 72 2e 65 6c 27 | 5c 22 20 5c 28 31 32 33 |rver.el'|\" \(123|
|00000970| 31 36 20 63 68 61 72 61 | 63 74 65 72 73 5c 29 0a |16 chara|cters\).|
|00000980| 73 65 64 20 22 73 2f 5e | 58 2f 2f 22 20 3e 27 6d |sed "s/^|X//" >'m|
|00000990| 65 74 61 2d 73 65 72 76 | 65 72 2e 65 6c 27 20 3c |eta-serv|er.el' <|
|000009a0| 3c 27 45 4e 44 5f 4f 46 | 5f 46 49 4c 45 27 0a 58 |<'END_OF|_FILE'.X|
|000009b0| 3b 3b 20 6d 65 74 61 73 | 65 72 76 65 72 2d 6d 6f |;; metas|erver-mo|
|000009c0| 64 65 2e 65 6c 20 2d 2d | 2d 20 6d 61 6a 6f 72 20 |de.el --|- major |
|000009d0| 6d 6f 64 65 20 66 6f 72 | 20 77 61 74 63 68 69 6e |mode for| watchin|
|000009e0| 67 20 6e 65 74 72 65 6b | 20 73 69 74 65 20 69 6e |g netrek| site in|
|000009f0| 66 6f 0a 58 3b 3b 20 41 | 75 74 68 6f 72 3a 20 31 |fo.X;; A|uthor: 1|
|00000a00| 39 39 32 20 57 69 6c 6c | 69 61 6d 20 4d 2e 20 50 |992 Will|iam M. P|
|00000a10| 65 72 72 79 2c 20 49 6e | 64 69 61 6e 61 20 55 6e |erry, In|diana Un|
|00000a20| 69 76 65 72 73 69 74 79 | 20 28 77 6d 70 65 72 72 |iversity| (wmperr|
|00000a30| 79 40 69 6e 64 69 61 6e | 61 2e 65 64 75 29 0a 58 |y@indian|a.edu).X|
|00000a40| 3b 3b 20 4d 61 69 6e 74 | 61 69 6e 65 72 3a 20 77 |;; Maint|ainer: w|
|00000a50| 6d 70 65 72 72 79 40 69 | 6e 64 69 61 6e 61 2e 65 |mperry@i|ndiana.e|
|00000a60| 64 75 0a 58 3b 3b 20 43 | 72 65 61 74 65 64 3a 20 |du.X;; C|reated: |
|00000a70| 31 30 2f 31 37 2f 39 32 | 0a 58 3b 3b 20 56 65 72 |10/17/92|.X;; Ver|
|00000a80| 73 69 6f 6e 3a 20 31 2e | 35 62 0a 58 3b 3b 20 4c |sion: 1.|5b.X;; L|
|00000a90| 61 73 74 20 4d 6f 64 69 | 66 69 65 64 3a 20 54 68 |ast Modi|fied: Th|
|00000aa0| 75 20 4e 6f 76 20 31 32 | 20 32 33 3a 34 31 3a 34 |u Nov 12| 23:41:4|
|00000ab0| 30 20 31 39 39 32 0a 58 | 3b 3b 20 4b 65 79 77 6f |0 1992.X|;; Keywo|
|00000ac0| 72 64 73 3a 20 4e 65 74 | 72 65 6b 20 4d 65 74 61 |rds: Net|rek Meta|
|00000ad0| 73 65 72 76 65 72 0a 58 | 0a 58 3b 3b 20 54 68 69 |server.X|.X;; Thi|
|00000ae0| 73 20 66 69 6c 65 20 69 | 73 20 6e 6f 74 20 70 61 |s file i|s not pa|
|00000af0| 72 74 20 6f 66 20 47 4e | 55 20 45 6d 61 63 73 2e |rt of GN|U Emacs.|
|00000b00| 0a 58 0a 58 3b 3b 20 54 | 68 69 73 20 69 73 20 66 |.X.X;; T|his is f|
|00000b10| 72 65 65 20 73 6f 66 74 | 77 61 72 65 3b 20 79 6f |ree soft|ware; yo|
|00000b20| 75 20 63 61 6e 20 72 65 | 64 69 73 74 72 69 62 75 |u can re|distribu|
|00000b30| 74 65 20 69 74 20 61 6e | 64 2f 6f 72 20 6d 6f 64 |te it an|d/or mod|
|00000b40| 69 66 79 0a 58 3b 3b 20 | 69 74 20 75 6e 64 65 72 |ify.X;; |it under|
|00000b50| 20 74 68 65 20 74 65 72 | 6d 73 20 6f 66 20 74 68 | the ter|ms of th|
|00000b60| 65 20 47 4e 55 20 47 65 | 6e 65 72 61 6c 20 50 75 |e GNU Ge|neral Pu|
|00000b70| 62 6c 69 63 20 4c 69 63 | 65 6e 73 65 20 61 73 20 |blic Lic|ense as |
|00000b80| 70 75 62 6c 69 73 68 65 | 64 20 62 79 0a 58 3b 3b |publishe|d by.X;;|
|00000b90| 20 74 68 65 20 46 72 65 | 65 20 53 6f 66 74 77 61 | the Fre|e Softwa|
|00000ba0| 72 65 20 46 6f 75 6e 64 | 61 74 69 6f 6e 3b 20 65 |re Found|ation; e|
|00000bb0| 69 74 68 65 72 20 56 65 | 72 73 69 6f 6e 20 32 2c |ither Ve|rsion 2,|
|00000bc0| 20 6f 72 20 28 61 74 20 | 79 6f 75 72 20 6f 70 74 | or (at |your opt|
|00000bd0| 69 6f 6e 29 0a 58 3b 3b | 20 61 6e 79 20 6c 61 74 |ion).X;;| any lat|
|00000be0| 65 72 20 76 65 72 73 69 | 6f 6e 2e 0a 58 0a 58 3b |er versi|on..X.X;|
|00000bf0| 3b 20 54 68 69 73 20 73 | 6f 66 74 77 61 72 65 20 |; This s|oftware |
|00000c00| 69 73 20 64 69 73 74 72 | 69 62 75 74 65 64 20 69 |is distr|ibuted i|
|00000c10| 6e 20 74 68 65 20 68 6f | 70 65 20 74 68 61 74 20 |n the ho|pe that |
|00000c20| 69 74 20 77 69 6c 6c 20 | 62 65 20 75 73 65 66 75 |it will |be usefu|
|00000c30| 6c 2c 0a 58 3b 3b 20 62 | 75 74 20 57 49 54 48 4f |l,.X;; b|ut WITHO|
|00000c40| 55 54 20 41 4e 59 20 57 | 41 52 52 41 4e 54 59 3b |UT ANY W|ARRANTY;|
|00000c50| 20 77 69 74 68 6f 75 74 | 20 65 76 65 6e 20 74 68 | without| even th|
|00000c60| 65 20 69 6d 70 6c 69 65 | 64 20 77 61 72 72 61 6e |e implie|d warran|
|00000c70| 74 79 20 6f 66 0a 58 3b | 3b 20 4d 45 52 43 48 41 |ty of.X;|; MERCHA|
|00000c80| 4e 54 41 42 49 4c 49 54 | 59 20 6f 72 20 46 49 54 |NTABILIT|Y or FIT|
|00000c90| 4e 45 53 53 20 46 4f 52 | 20 41 20 50 41 52 54 49 |NESS FOR| A PARTI|
|00000ca0| 43 55 4c 41 52 20 50 55 | 52 50 4f 53 45 2e 20 20 |CULAR PU|RPOSE. |
|00000cb0| 53 65 65 20 74 68 65 0a | 58 3b 3b 20 47 4e 55 20 |See the.|X;; GNU |
|00000cc0| 47 65 6e 65 72 61 6c 20 | 50 75 62 6c 69 63 20 4c |General |Public L|
|00000cd0| 69 63 65 6e 73 65 20 66 | 6f 72 20 6d 6f 72 65 20 |icense f|or more |
|00000ce0| 64 65 74 61 69 6c 73 2e | 0a 58 0a 58 3b 3b 20 46 |details.|.X.X;; F|
|00000cf0| 6f 72 20 61 20 63 6f 70 | 79 20 6f 66 20 74 68 65 |or a cop|y of the|
|00000d00| 20 47 4e 55 20 47 65 6e | 65 72 61 6c 20 50 75 62 | GNU Gen|eral Pub|
|00000d10| 6c 69 63 20 4c 69 63 65 | 6e 73 65 20 77 72 69 74 |lic Lice|nse writ|
|00000d20| 65 20 74 6f 0a 58 3b 3b | 20 74 68 65 20 46 72 65 |e to.X;;| the Fre|
|00000d30| 65 20 53 6f 66 74 77 61 | 72 65 20 46 6f 75 6e 64 |e Softwa|re Found|
|00000d40| 61 74 69 6f 6e 2c 20 36 | 37 35 20 4d 61 73 73 20 |ation, 6|75 Mass |
|00000d50| 41 76 65 2c 20 43 61 6d | 62 72 69 64 67 65 2c 20 |Ave, Cam|bridge, |
|00000d60| 4d 41 20 30 32 31 33 39 | 2c 20 55 53 41 2e 0a 58 |MA 02139|, USA..X|
|00000d70| 0a 58 28 64 65 66 76 61 | 72 20 6d 65 74 61 73 65 |.X(defva|r metase|
|00000d80| 72 76 65 72 2d 75 73 65 | 2d 62 61 63 6b 67 72 6f |rver-use|-backgro|
|00000d90| 75 6e 64 20 6e 69 6c 0a | 58 20 20 22 2a 55 73 65 |und nil.|X "*Use|
|00000da0| 20 74 68 65 20 62 61 63 | 6b 67 72 6f 75 6e 64 2e | the bac|kground.|
|00000db0| 65 6c 20 70 61 63 6b 61 | 67 65 20 6f 72 20 6e 6f |el packa|ge or no|
|00000dc0| 74 3f 20 20 44 65 66 61 | 75 6c 74 20 69 73 20 6e |t? Defa|ult is n|
|00000dd0| 69 6c 22 29 0a 58 0a 58 | 28 64 65 66 76 61 72 20 |il").X.X|(defvar |
|00000de0| 6d 65 74 61 73 65 72 76 | 65 72 2d 73 69 74 65 20 |metaserv|er-site |
|00000df0| 22 63 68 61 72 6f 6e 2e | 61 6d 64 61 68 6c 2e 63 |"charon.|amdahl.c|
|00000e00| 6f 6d 22 0a 58 20 20 22 | 2a 57 68 61 74 20 6d 61 |om".X "|*What ma|
|00000e10| 63 68 69 6e 65 20 69 73 | 20 74 68 65 20 6d 65 74 |chine is| the met|
|00000e20| 61 73 65 72 76 65 72 20 | 6f 6e 3f 22 29 0a 58 0a |aserver |on?").X.|
|00000e30| 58 28 64 65 66 76 61 72 | 20 6d 65 74 61 73 65 72 |X(defvar| metaser|
|00000e40| 76 65 72 2d 70 6f 72 74 | 20 33 35 32 31 20 22 2a |ver-port| 3521 "*|
|00000e50| 57 68 69 63 68 20 70 6f | 72 74 20 74 6f 20 71 75 |Which po|rt to qu|
|00000e60| 65 72 79 20 6f 6e 20 6d | 65 74 61 73 65 72 76 65 |ery on m|etaserve|
|00000e70| 72 22 29 0a 58 0a 58 28 | 64 65 66 76 61 72 20 6d |r").X.X(|defvar m|
|00000e80| 65 74 61 73 65 72 76 65 | 72 2d 74 72 61 69 6c 69 |etaserve|r-traili|
|00000e90| 6e 67 2d 68 65 61 64 65 | 72 73 20 22 2e 2a 54 68 |ng-heade|rs ".*Th|
|00000ea0| 61 74 27 73 2e 2a 22 0a | 58 20 20 22 53 74 72 69 |at's.*".|X "Stri|
|00000eb0| 6e 67 20 74 68 61 74 20 | 63 6f 6d 65 73 20 61 74 |ng that |comes at|
|00000ec0| 20 74 68 65 20 65 6e 64 | 20 6f 66 20 74 68 65 20 | the end| of the |
|00000ed0| 6d 65 74 61 73 65 72 76 | 65 72 20 6f 75 74 70 75 |metaserv|er outpu|
|00000ee0| 74 22 29 0a 58 0a 58 28 | 64 65 66 76 61 72 20 6d |t").X.X(|defvar m|
|00000ef0| 65 74 61 73 65 72 76 65 | 72 2d 6e 65 74 72 65 6b |etaserve|r-netrek|
|00000f00| 2d 62 69 6e 61 72 79 20 | 22 6e 65 74 72 65 6b 5f |-binary |"netrek_|
|00000f10| 75 64 70 22 20 0a 58 20 | 20 22 2a 4e 6f 72 6d 61 |udp" .X | "*Norma|
|00000f20| 6c 20 6e 65 74 72 65 6b | 20 63 6c 69 65 6e 74 20 |l netrek| client |
|00000f30| 74 6f 20 72 75 6e 20 77 | 68 65 6e 20 69 6e 20 6e |to run w|hen in n|
|00000f40| 6f 6e 2d 62 6f 72 67 20 | 6d 6f 64 65 2e 22 29 0a |on-borg |mode.").|
|00000f50| 58 0a 58 28 64 65 66 76 | 61 72 20 6d 65 74 61 73 |X.X(defv|ar metas|
|00000f60| 65 72 76 65 72 2d 75 73 | 65 2d 62 6f 72 67 20 6e |erver-us|e-borg n|
|00000f70| 69 6c 20 22 2a 55 73 65 | 20 62 6f 72 67 20 6f 72 |il "*Use| borg or|
|00000f80| 20 6e 6f 74 3f 22 29 0a | 58 28 64 65 66 76 61 72 | not?").|X(defvar|
|00000f90| 20 6d 65 74 61 73 65 72 | 76 65 72 2d 70 69 6e 67 | metaser|ver-ping|
|00000fa0| 2d 70 72 6f 67 72 61 6d | 20 22 2f 75 73 72 2f 65 |-program| "/usr/e|
|00000fb0| 74 63 2f 70 69 6e 67 20 | 2d 73 22 20 22 2a 50 69 |tc/ping |-s" "*Pi|
|00000fc0| 6e 67 20 50 72 6f 67 72 | 61 6d 2e 22 29 0a 58 28 |ng Progr|am.").X(|
|00000fd0| 64 65 66 76 61 72 20 6d | 65 74 61 73 65 72 76 65 |defvar m|etaserve|
|00000fe0| 72 2d 70 69 6e 67 2d 70 | 61 63 6b 65 74 73 20 31 |r-ping-p|ackets 1|
|00000ff0| 30 20 22 2a 23 20 6f 66 | 20 70 69 6e 67 73 20 74 |0 "*# of| pings t|
|00001000| 6f 20 73 65 6e 64 20 74 | 6f 20 61 20 73 65 72 76 |o send t|o a serv|
|00001010| 65 72 2e 22 29 0a 58 28 | 64 65 66 76 61 72 20 6d |er.").X(|defvar m|
|00001020| 65 74 61 73 65 72 76 65 | 72 2d 70 69 6e 67 2d 73 |etaserve|r-ping-s|
|00001030| 69 7a 65 6f 66 20 36 35 | 20 22 2a 53 69 7a 65 20 |izeof 65| "*Size |
|00001040| 6f 66 20 70 61 63 6b 65 | 74 73 20 74 6f 20 73 65 |of packe|ts to se|
|00001050| 6e 64 20 61 20 73 65 72 | 76 65 72 2e 22 29 0a 58 |nd a ser|ver.").X|
|00001060| 28 64 65 66 76 61 72 20 | 6d 65 74 61 73 65 72 76 |(defvar |metaserv|
|00001070| 65 72 2d 6c 69 73 74 2d | 61 6c 6c 20 6e 69 6c 20 |er-list-|all nil |
|00001080| 22 2a 4c 69 73 74 20 65 | 76 65 72 79 20 73 65 72 |"*List e|very ser|
|00001090| 76 65 72 2c 20 6f 70 65 | 6e 20 6f 72 20 6e 6f 74 |ver, ope|n or not|
|000010a0| 2e 22 29 0a 58 0a 58 28 | 64 65 66 76 61 72 20 6d |.").X.X(|defvar m|
|000010b0| 65 74 61 73 65 72 76 65 | 72 2d 62 6f 72 67 2d 62 |etaserve|r-borg-b|
|000010c0| 69 6e 61 72 79 20 22 73 | 75 6e 62 6f 72 67 33 22 |inary "s|unborg3"|
|000010d0| 0a 58 20 20 22 2a 42 6f | 72 67 20 6e 65 74 72 65 |.X "*Bo|rg netre|
|000010e0| 6b 20 63 6c 69 65 6e 74 | 20 74 6f 20 72 75 6e 20 |k client| to run |
|000010f0| 77 68 65 6e 20 69 6e 20 | 62 6f 72 67 20 6d 6f 64 |when in |borg mod|
|00001100| 65 2e 22 29 0a 58 0a 58 | 28 64 65 66 76 61 72 20 |e.").X.X|(defvar |
|00001110| 6d 65 74 61 73 65 72 76 | 65 72 2d 68 65 61 64 65 |metaserv|er-heade|
|00001120| 72 73 2d 6b 69 6c 6c 2d | 74 6f 20 22 5e 2d 68 20 |rs-kill-|to "^-h |
|00001130| 2a 22 0a 58 20 20 22 2a | 44 65 6e 6f 74 65 73 20 |*".X "*|Denotes |
|00001140| 6c 61 73 74 20 6c 69 6e | 65 20 6f 66 20 6d 65 74 |last lin|e of met|
|00001150| 61 73 65 72 76 65 72 20 | 68 65 61 64 65 72 73 2e |aserver |headers.|
|00001160| 22 29 0a 58 0a 58 28 64 | 65 66 76 61 72 20 6d 65 |").X.X(d|efvar me|
|00001170| 74 61 73 65 72 76 65 72 | 2d 65 6d 70 74 79 2d 73 |taserver|-empty-s|
|00001180| 69 74 65 2d 72 65 67 65 | 78 70 20 22 4e 6f 74 20 |ite-rege|xp "Not |
|00001190| 52 65 73 70 6f 6e 64 69 | 6e 67 5c 5c 7c 4e 6f 62 |Respondi|ng\\|Nob|
|000011a0| 6f 64 79 22 0a 58 20 20 | 22 2a 52 65 67 75 6c 61 |ody".X |"*Regula|
|000011b0| 72 20 65 78 70 72 65 73 | 73 69 6f 6e 20 74 68 61 |r expres|sion tha|
|000011c0| 74 20 6d 61 74 63 68 65 | 73 20 65 6d 70 74 79 20 |t matche|s empty |
|000011d0| 73 69 74 65 73 2e 22 29 | 0a 58 0a 58 28 64 65 66 |sites.")|.X.X(def|
|000011e0| 76 61 72 20 6d 65 74 61 | 73 65 72 76 65 72 2d 64 |var meta|server-d|
|000011f0| 61 74 61 2d 72 65 67 65 | 78 70 20 22 2d 68 20 5c |ata-rege|xp "-h \|
|00001200| 5c 28 5b 5e 20 5d 2a 5c | 5c 29 20 2a 2d 70 20 5c |\([^ ]*\|\) *-p \|
|00001210| 5c 28 5b 5e 20 5d 2a 5c | 5c 29 5c 5c 28 2e 2a 5c |\([^ ]*\|\)\\(.*\|
|00001220| 5c 29 22 0a 58 20 20 22 | 2a 50 61 72 65 6e 74 68 |\)".X "|*Parenth|
|00001230| 65 73 69 7a 65 64 20 72 | 65 67 75 6c 61 72 20 65 |esized r|egular e|
|00001240| 78 70 72 65 73 73 69 6f | 6e 20 77 68 65 72 65 20 |xpressio|n where |
|00001250| 74 68 65 20 66 69 72 73 | 74 20 70 61 72 65 6e 74 |the firs|t parent|
|00001260| 68 65 73 69 7a 65 64 20 | 72 65 67 65 78 70 0a 58 |hesized |regexp.X|
|00001270| 6d 61 74 63 68 65 73 20 | 74 68 65 20 68 6f 73 74 |matches |the host|
|00001280| 2c 20 74 68 65 20 73 65 | 63 6f 6e 64 20 6d 61 74 |, the se|cond mat|
|00001290| 63 68 65 73 20 74 68 65 | 20 70 6f 72 74 2c 20 61 |ches the| port, a|
|000012a0| 6e 64 20 74 68 65 20 74 | 68 69 72 64 20 6d 61 74 |nd the t|hird mat|
|000012b0| 63 68 65 73 20 61 6e 79 | 0a 58 64 61 74 61 20 74 |ches any|.Xdata t|
|000012c0| 6f 20 62 65 20 6b 65 70 | 74 20 69 6e 20 74 68 65 |o be kep|t in the|
|000012d0| 20 4d 65 74 61 53 65 72 | 76 65 72 20 62 75 66 66 | MetaSer|ver buff|
|000012e0| 65 72 2e 22 29 0a 58 0a | 58 28 64 65 66 76 61 72 |er.").X.|X(defvar|
|000012f0| 20 6d 65 74 61 73 65 72 | 76 65 72 2d 73 69 74 65 | metaser|ver-site|
|00001300| 2d 6f 72 64 65 72 20 22 | 64 65 73 63 65 6e 64 69 |-order "|descendi|
|00001310| 6e 67 22 0a 58 20 20 22 | 2a 48 6f 77 20 74 6f 20 |ng".X "|*How to |
|00001320| 73 6f 72 74 20 74 68 65 | 20 6f 70 65 6e 20 73 69 |sort the| open si|
|00001330| 74 65 73 2e 2e 2e 2e 20 | 20 63 61 6e 20 62 65 20 |tes.... | can be |
|00001340| 5c 22 61 73 63 65 6e 64 | 69 6e 67 5c 22 20 6f 72 |\"ascend|ing\" or|
|00001350| 20 5c 22 64 65 73 63 65 | 6e 64 69 6e 67 5c 22 2e | \"desce|nding\".|
|00001360| 0a 58 41 73 63 65 6e 64 | 69 6e 67 20 6d 65 61 6e |.XAscend|ing mean|
|00001370| 73 20 70 75 74 20 73 69 | 74 65 73 20 77 69 74 68 |s put si|tes with|
|00001380| 20 77 61 69 74 20 71 75 | 65 75 65 73 20 61 74 20 | wait qu|eues at |
|00001390| 74 68 65 20 62 6f 74 74 | 6f 6d 20 6f 66 20 74 68 |the bott|om of th|
|000013a0| 65 20 6c 69 73 74 2e 22 | 29 0a 58 0a 58 28 64 65 |e list."|).X.X(de|
|000013b0| 66 76 61 72 20 6d 65 74 | 61 73 65 72 76 65 72 2d |fvar met|aserver-|
|000013c0| 62 72 69 65 66 2d 64 65 | 73 63 72 69 70 74 69 6f |brief-de|scriptio|
|000013d0| 6e 0a 58 20 20 22 2d 20 | 42 20 54 6f 67 67 6c 65 |n.X "- |B Toggle|
|000013e0| 20 42 6f 72 67 20 53 74 | 61 74 75 73 20 2d 20 4c | Borg St|atus - L|
|000013f0| 20 54 6f 67 67 6c 65 20 | 4c 69 73 74 20 41 6c 6c | Toggle |List All|
|00001400| 20 2d 20 52 20 52 65 66 | 72 65 73 68 20 2d 20 52 | - R Ref|resh - R|
|00001410| 45 54 55 52 4e 20 52 75 | 6e 20 4e 65 74 72 65 6b |ETURN Ru|n Netrek|
|00001420| 22 0a 58 20 20 22 4f 6e | 65 20 6c 69 6e 65 20 64 |".X "On|e line d|
|00001430| 65 73 63 72 69 70 74 69 | 6f 6e 20 6f 66 20 6b 65 |escripti|on of ke|
|00001440| 79 20 62 69 6e 64 69 6e | 67 73 2c 20 65 74 63 2e |y bindin|gs, etc.|
|00001450| 22 29 0a 58 0a 58 28 64 | 65 66 76 61 72 20 6d 65 |").X.X(d|efvar me|
|00001460| 74 61 73 65 72 76 65 72 | 2d 6d 6f 64 65 2d 6d 61 |taserver|-mode-ma|
|00001470| 70 20 28 29 20 22 6d 6f | 64 65 20 6d 61 70 20 75 |p () "mo|de map u|
|00001480| 73 65 64 20 69 6e 20 6d | 65 74 61 73 65 72 76 65 |sed in m|etaserve|
|00001490| 72 2d 6d 6f 64 65 22 29 | 0a 58 0a 58 28 69 66 20 |r-mode")|.X.X(if |
|000014a0| 6d 65 74 61 73 65 72 76 | 65 72 2d 75 73 65 2d 62 |metaserv|er-use-b|
|000014b0| 61 63 6b 67 72 6f 75 6e | 64 0a 58 20 20 20 20 28 |ackgroun|d.X (|
|000014c0| 6c 6f 61 64 20 22 62 61 | 63 6b 67 72 6f 75 6e 64 |load "ba|ckground|
|000014d0| 22 20 6e 69 6c 20 74 29 | 29 0a 58 0a 58 0a 58 28 |" nil t)|).X.X.X(|
|000014e0| 69 66 20 6d 65 74 61 73 | 65 72 76 65 72 2d 6d 6f |if metas|erver-mo|
|000014f0| 64 65 2d 6d 61 70 20 28 | 29 0a 58 20 20 28 73 65 |de-map (|).X (se|
|00001500| 74 71 20 6d 65 74 61 73 | 65 72 76 65 72 2d 6d 6f |tq metas|erver-mo|
|00001510| 64 65 2d 6d 61 70 20 28 | 6d 61 6b 65 2d 73 70 61 |de-map (|make-spa|
|00001520| 72 73 65 2d 6b 65 79 6d | 61 70 29 29 29 0a 58 0a |rse-keym|ap))).X.|
|00001530| 58 28 64 65 66 69 6e 65 | 2d 6b 65 79 20 6d 65 74 |X(define|-key met|
|00001540| 61 73 65 72 76 65 72 2d | 6d 6f 64 65 2d 6d 61 70 |aserver-|mode-map|
|00001550| 20 22 62 22 20 20 20 20 | 20 27 6d 65 74 61 73 65 | "b" | 'metase|
|00001560| 72 76 65 72 2d 74 6f 67 | 67 6c 65 2d 62 6f 72 67 |rver-tog|gle-borg|
|00001570| 29 0a 58 28 64 65 66 69 | 6e 65 2d 6b 65 79 20 6d |).X(defi|ne-key m|
|00001580| 65 74 61 73 65 72 76 65 | 72 2d 6d 6f 64 65 2d 6d |etaserve|r-mode-m|
|00001590| 61 70 20 22 42 22 20 20 | 20 20 20 27 6d 65 74 61 |ap "B" | 'meta|
|000015a0| 73 65 72 76 65 72 2d 74 | 6f 67 67 6c 65 2d 62 6f |server-t|oggle-bo|
|000015b0| 72 67 29 0a 58 28 64 65 | 66 69 6e 65 2d 6b 65 79 |rg).X(de|fine-key|
|000015c0| 20 6d 65 74 61 73 65 72 | 76 65 72 2d 6d 6f 64 65 | metaser|ver-mode|
|000015d0| 2d 6d 61 70 20 22 6e 22 | 20 20 20 20 20 27 6e 65 |-map "n"| 'ne|
|000015e0| 78 74 2d 6c 69 6e 65 29 | 0a 58 28 64 65 66 69 6e |xt-line)|.X(defin|
|000015f0| 65 2d 6b 65 79 20 6d 65 | 74 61 73 65 72 76 65 72 |e-key me|taserver|
|00001600| 2d 6d 6f 64 65 2d 6d 61 | 70 20 22 70 22 20 20 20 |-mode-ma|p "p" |
|00001610| 20 20 27 70 72 65 76 69 | 6f 75 73 2d 6c 69 6e 65 | 'previ|ous-line|
|00001620| 29 0a 58 28 64 65 66 69 | 6e 65 2d 6b 65 79 20 6d |).X(defi|ne-key m|
|00001630| 65 74 61 73 65 72 76 65 | 72 2d 6d 6f 64 65 2d 6d |etaserve|r-mode-m|
|00001640| 61 70 20 22 50 22 20 20 | 20 20 20 27 6d 65 74 61 |ap "P" | 'meta|
|00001650| 73 65 72 76 65 72 2d 70 | 69 6e 67 29 0a 58 28 64 |server-p|ing).X(d|
|00001660| 65 66 69 6e 65 2d 6b 65 | 79 20 6d 65 74 61 73 65 |efine-ke|y metase|
|00001670| 72 76 65 72 2d 6d 6f 64 | 65 2d 6d 61 70 20 22 71 |rver-mod|e-map "q|
|00001680| 22 20 20 20 20 20 27 6d | 65 74 61 73 65 72 76 65 |" 'm|etaserve|
|00001690| 72 2d 71 75 69 74 29 0a | 58 28 64 65 66 69 6e 65 |r-quit).|X(define|
|000016a0| 2d 6b 65 79 20 6d 65 74 | 61 73 65 72 76 65 72 2d |-key met|aserver-|
|000016b0| 6d 6f 64 65 2d 6d 61 70 | 20 22 51 22 20 20 20 20 |mode-map| "Q" |
|000016c0| 20 27 6d 65 74 61 73 65 | 72 76 65 72 2d 71 75 69 | 'metase|rver-qui|
|000016d0| 74 29 0a 58 28 64 65 66 | 69 6e 65 2d 6b 65 79 20 |t).X(def|ine-key |
|000016e0| 6d 65 74 61 73 65 72 76 | 65 72 2d 6d 6f 64 65 2d |metaserv|er-mode-|
|000016f0| 6d 61 70 20 22 6c 22 20 | 20 20 20 20 27 6d 65 74 |map "l" | 'met|
|00001700| 61 73 65 72 76 65 72 2d | 74 6f 67 67 6c 65 2d 6c |aserver-|toggle-l|
|00001710| 69 73 74 29 0a 58 28 64 | 65 66 69 6e 65 2d 6b 65 |ist).X(d|efine-ke|
|00001720| 79 20 6d 65 74 61 73 65 | 72 76 65 72 2d 6d 6f 64 |y metase|rver-mod|
|00001730| 65 2d 6d 61 70 20 22 4c | 22 20 20 20 20 20 27 6d |e-map "L|" 'm|
|00001740| 65 74 61 73 65 72 76 65 | 72 2d 74 6f 67 67 6c 65 |etaserve|r-toggle|
|00001750| 2d 6c 69 73 74 29 0a 58 | 28 64 65 66 69 6e 65 2d |-list).X|(define-|
|00001760| 6b 65 79 20 6d 65 74 61 | 73 65 72 76 65 72 2d 6d |key meta|server-m|
|00001770| 6f 64 65 2d 6d 61 70 20 | 22 72 22 20 20 20 20 20 |ode-map |"r" |
|00001780| 27 6d 65 74 61 73 65 72 | 76 65 72 2d 72 65 66 72 |'metaser|ver-refr|
|00001790| 65 73 68 29 0a 58 28 64 | 65 66 69 6e 65 2d 6b 65 |esh).X(d|efine-ke|
|000017a0| 79 20 6d 65 74 61 73 65 | 72 76 65 72 2d 6d 6f 64 |y metase|rver-mod|
|000017b0| 65 2d 6d 61 70 20 22 52 | 22 20 20 20 20 20 27 6d |e-map "R|" 'm|
|000017c0| 65 74 61 73 65 72 76 65 | 72 2d 72 65 66 72 65 73 |etaserve|r-refres|
|000017d0| 68 29 0a 58 28 64 65 66 | 69 6e 65 2d 6b 65 79 20 |h).X(def|ine-key |
|000017e0| 6d 65 74 61 73 65 72 76 | 65 72 2d 6d 6f 64 65 2d |metaserv|er-mode-|
|000017f0| 6d 61 70 20 22 20 22 20 | 20 20 20 20 27 73 63 72 |map " " | 'scr|
|00001800| 6f 6c 6c 2d 75 70 29 0a | 58 28 64 65 66 69 6e 65 |oll-up).|X(define|
|00001810| 2d 6b 65 79 20 6d 65 74 | 61 73 65 72 76 65 72 2d |-key met|aserver-|
|00001820| 6d 6f 64 65 2d 6d 61 70 | 20 22 5c 43 2d 3f 22 20 |mode-map| "\C-?" |
|00001830| 20 27 73 63 72 6f 6c 6c | 2d 64 6f 77 6e 29 0a 58 | 'scroll|-down).X|
|00001840| 28 64 65 66 69 6e 65 2d | 6b 65 79 20 6d 65 74 61 |(define-|key meta|
|00001850| 73 65 72 76 65 72 2d 6d | 6f 64 65 2d 6d 61 70 20 |server-m|ode-map |
|00001860| 22 5c 43 2d 6d 22 20 20 | 27 6d 65 74 61 73 65 72 |"\C-m" |'metaser|
|00001870| 76 65 72 2d 72 75 6e 2d | 6e 65 74 72 65 6b 29 0a |ver-run-|netrek).|
|00001880| 58 28 64 65 66 69 6e 65 | 2d 6b 65 79 20 6d 65 74 |X(define|-key met|
|00001890| 61 73 65 72 76 65 72 2d | 6d 6f 64 65 2d 6d 61 70 |aserver-|mode-map|
|000018a0| 20 22 3f 22 20 20 20 20 | 20 27 6d 65 74 61 73 65 | "?" | 'metase|
|000018b0| 72 76 65 72 2d 64 65 73 | 63 72 69 62 65 2d 62 72 |rver-des|cribe-br|
|000018c0| 69 65 66 6c 79 29 0a 58 | 28 64 65 66 69 6e 65 2d |iefly).X|(define-|
|000018d0| 6b 65 79 20 6d 65 74 61 | 73 65 72 76 65 72 2d 6d |key meta|server-m|
|000018e0| 6f 64 65 2d 6d 61 70 20 | 22 68 22 20 20 20 20 20 |ode-map |"h" |
|000018f0| 27 6d 65 74 61 73 65 72 | 76 65 72 2d 64 65 73 63 |'metaser|ver-desc|
|00001900| 72 69 62 65 2d 62 72 69 | 65 66 6c 79 29 0a 58 0a |ribe-bri|efly).X.|
|00001910| 58 28 64 65 66 75 6e 20 | 66 6c 69 70 2d 6c 69 73 |X(defun |flip-lis|
|00001920| 74 20 28 74 68 65 6c 69 | 73 74 29 0a 58 20 20 28 |t (theli|st).X (|
|00001930| 69 6e 74 65 72 61 63 74 | 69 76 65 29 0a 58 20 20 |interact|ive).X |
|00001940| 28 69 66 20 28 63 64 72 | 20 74 68 65 6c 69 73 74 |(if (cdr| thelist|
|00001950| 29 0a 58 20 20 20 20 20 | 20 28 61 70 70 65 6e 64 |).X | (append|
|00001960| 20 28 66 6c 69 70 2d 6c | 69 73 74 20 28 63 64 72 | (flip-l|ist (cdr|
|00001970| 20 74 68 65 6c 69 73 74 | 29 29 20 28 6c 69 73 74 | thelist|)) (list|
|00001980| 20 28 63 61 72 20 74 68 | 65 6c 69 73 74 29 29 29 | (car th|elist)))|
|00001990| 0a 58 20 20 20 20 28 6c | 69 73 74 20 28 63 61 72 |.X (l|ist (car|
|000019a0| 20 74 68 65 6c 69 73 74 | 29 29 29 29 0a 58 0a 58 | thelist|)))).X.X|
|000019b0| 28 64 65 66 75 6e 20 6d | 65 74 61 73 65 72 76 65 |(defun m|etaserve|
|000019c0| 72 2d 74 6f 67 67 6c 65 | 2d 6c 69 73 74 20 28 29 |r-toggle|-list ()|
|000019d0| 0a 58 20 20 22 54 6f 67 | 67 6c 65 73 20 77 68 65 |.X "Tog|gles whe|
|000019e0| 74 68 65 72 20 74 6f 20 | 6c 69 73 74 20 61 6c 6c |ther to |list all|
|000019f0| 20 74 68 65 20 73 65 72 | 76 65 72 73 20 61 6e 64 | the ser|vers and|
|00001a00| 20 75 70 64 61 74 65 73 | 20 6d 6f 64 65 20 6c 69 | updates| mode li|
|00001a10| 6e 65 20 61 63 63 6f 72 | 64 69 6e 67 6c 79 2e 22 |ne accor|dingly."|
|00001a20| 0a 58 20 20 28 69 6e 74 | 65 72 61 63 74 69 76 65 |.X (int|eractive|
|00001a30| 29 0a 58 20 20 28 69 66 | 20 62 75 66 66 65 72 2d |).X (if| buffer-|
|00001a40| 72 65 61 64 2d 6f 6e 6c | 79 20 28 74 6f 67 67 6c |read-onl|y (toggl|
|00001a50| 65 2d 72 65 61 64 2d 6f | 6e 6c 79 29 29 0a 58 20 |e-read-o|nly)).X |
|00001a60| 20 28 73 65 74 71 20 6d | 65 74 61 73 65 72 76 65 | (setq m|etaserve|
|00001a70| 72 2d 6c 69 73 74 2d 61 | 6c 6c 20 28 6e 6f 74 20 |r-list-a|ll (not |
|00001a80| 6d 65 74 61 73 65 72 76 | 65 72 2d 6c 69 73 74 2d |metaserv|er-list-|
|00001a90| 61 6c 6c 29 29 0a 58 20 | 20 28 6d 65 74 61 73 65 |all)).X | (metase|
|00001aa0| 72 76 65 72 2d 75 70 64 | 61 74 65 2d 6d 6f 64 65 |rver-upd|ate-mode|
|00001ab0| 2d 6c 69 6e 65 29 0a 58 | 20 20 28 69 66 20 28 6e |-line).X| (if (n|
|00001ac0| 6f 74 20 6d 65 74 61 73 | 65 72 76 65 72 2d 6c 69 |ot metas|erver-li|
|00001ad0| 73 74 2d 61 6c 6c 29 0a | 58 20 20 20 20 20 20 28 |st-all).|X (|
|00001ae0| 73 61 76 65 2d 65 78 63 | 75 72 73 69 6f 6e 0a 58 |save-exc|ursion.X|
|00001af0| 09 28 67 6f 74 6f 2d 63 | 68 61 72 20 28 70 6f 69 |.(goto-c|har (poi|
|00001b00| 6e 74 2d 6d 69 6e 29 29 | 0a 58 09 28 64 65 6c 65 |nt-min))|.X.(dele|
|00001b10| 74 65 2d 6d 61 74 63 68 | 69 6e 67 2d 6c 69 6e 65 |te-match|ing-line|
|00001b20| 73 20 6d 65 74 61 73 65 | 72 76 65 72 2d 65 6d 70 |s metase|rver-emp|
|00001b30| 74 79 2d 73 69 74 65 2d | 72 65 67 65 78 70 29 29 |ty-site-|regexp))|
|00001b40| 0a 58 20 20 20 20 28 73 | 61 76 65 2d 65 78 63 75 |.X (s|ave-excu|
|00001b50| 72 73 69 6f 6e 0a 58 20 | 20 20 20 20 20 28 67 6f |rsion.X | (go|
|00001b60| 74 6f 2d 63 68 61 72 20 | 28 70 6f 69 6e 74 2d 6d |to-char |(point-m|
|00001b70| 61 78 29 29 0a 58 20 20 | 20 20 20 20 28 69 66 20 |ax)).X | (if |
|00001b80| 28 65 71 75 61 6c 20 6d | 65 74 61 73 65 72 76 65 |(equal m|etaserve|
|00001b90| 72 2d 73 69 74 65 2d 6f | 72 64 65 72 20 22 64 65 |r-site-o|rder "de|
|00001ba0| 73 63 65 6e 64 69 6e 67 | 22 29 0a 58 09 20 20 28 |scending|").X. (|
|00001bb0| 6d 65 74 61 73 65 72 76 | 65 72 2d 69 6e 73 65 72 |metaserv|er-inser|
|00001bc0| 74 2d 6c 69 73 74 20 28 | 66 6c 69 70 2d 6c 69 73 |t-list (|flip-lis|
|00001bd0| 74 20 6d 65 74 61 73 65 | 72 76 65 72 2d 65 6d 70 |t metase|rver-emp|
|00001be0| 74 79 2d 6c 69 73 74 29 | 29 0a 58 09 28 6d 65 74 |ty-list)|).X.(met|
|00001bf0| 61 73 65 72 76 65 72 2d | 69 6e 73 65 72 74 2d 6c |aserver-|insert-l|
|00001c00| 69 73 74 20 6d 65 74 61 | 73 65 72 76 65 72 2d 65 |ist meta|server-e|
|00001c10| 6d 70 74 79 2d 6c 69 73 | 74 29 29 29 29 0a 58 20 |mpty-lis|t)))).X |
|00001c20| 20 28 69 66 20 28 6e 6f | 74 20 62 75 66 66 65 72 | (if (no|t buffer|
|00001c30| 2d 72 65 61 64 2d 6f 6e | 6c 79 29 20 28 74 6f 67 |-read-on|ly) (tog|
|00001c40| 67 6c 65 2d 72 65 61 64 | 2d 6f 6e 6c 79 29 29 29 |gle-read|-only)))|
|00001c50| 0a 58 0a 58 28 64 65 66 | 75 6e 20 6d 65 74 61 73 |.X.X(def|un metas|
|00001c60| 65 72 76 65 72 2d 64 65 | 73 63 72 69 62 65 2d 62 |erver-de|scribe-b|
|00001c70| 72 69 65 66 6c 79 20 28 | 29 0a 58 20 20 22 44 65 |riefly (|).X "De|
|00001c80| 73 63 72 69 62 65 20 62 | 72 69 65 66 6c 79 20 74 |scribe b|riefly t|
|00001c90| 68 65 20 6b 65 79 73 20 | 75 73 65 64 20 69 6e 20 |he keys |used in |
|00001ca0| 6d 65 74 61 73 65 72 76 | 65 72 2d 6d 6f 64 65 2e |metaserv|er-mode.|
|00001cb0| 22 0a 58 20 20 28 69 6e | 74 65 72 61 63 74 69 76 |".X (in|teractiv|
|00001cc0| 65 29 0a 58 20 20 28 6d | 65 73 73 61 67 65 20 6d |e).X (m|essage m|
|00001cd0| 65 74 61 73 65 72 76 65 | 72 2d 62 72 69 65 66 2d |etaserve|r-brief-|
|00001ce0| 64 65 73 63 72 69 70 74 | 69 6f 6e 29 29 0a 58 0a |descript|ion)).X.|
|00001cf0| 58 28 64 65 66 75 6e 20 | 6d 65 74 61 73 65 72 76 |X(defun |metaserv|
|00001d00| 65 72 2d 74 6f 67 67 6c | 65 2d 62 6f 72 67 20 28 |er-toggl|e-borg (|
|00001d10| 29 0a 58 20 20 22 54 6f | 67 67 6c 65 73 20 77 68 |).X "To|ggles wh|
|00001d20| 65 74 68 65 72 20 74 6f | 20 75 73 65 20 74 68 65 |ether to| use the|
|00001d30| 20 62 6f 72 67 20 62 69 | 6e 61 72 79 20 6f 72 20 | borg bi|nary or |
|00001d40| 74 68 65 20 6e 65 74 72 | 65 6b 20 62 69 6e 61 72 |the netr|ek binar|
|00001d50| 79 2e 20 20 55 70 64 61 | 74 65 73 20 74 68 65 0a |y. Upda|tes the.|
|00001d60| 58 6d 6f 64 65 20 6c 69 | 6e 65 20 61 63 63 6f 72 |Xmode li|ne accor|
|00001d70| 64 69 6e 67 6c 79 2e 22 | 0a 58 20 20 28 69 6e 74 |dingly."|.X (int|
|00001d80| 65 72 61 63 74 69 76 65 | 29 0a 58 20 20 28 73 65 |eractive|).X (se|
|00001d90| 74 71 20 6d 65 74 61 73 | 65 72 76 65 72 2d 75 73 |tq metas|erver-us|
|00001da0| 65 2d 62 6f 72 67 20 28 | 6e 6f 74 20 6d 65 74 61 |e-borg (|not meta|
|00001db0| 73 65 72 76 65 72 2d 75 | 73 65 2d 62 6f 72 67 29 |server-u|se-borg)|
|00001dc0| 29 0a 58 20 20 28 73 65 | 74 71 20 6d 6f 64 65 2d |).X (se|tq mode-|
|00001dd0| 6c 69 6e 65 2d 70 72 6f | 63 65 73 73 20 28 69 66 |line-pro|cess (if|
|00001de0| 20 6d 65 74 61 73 65 72 | 76 65 72 2d 75 73 65 2d | metaser|ver-use-|
|00001df0| 62 6f 72 67 20 22 2d 42 | 6f 72 67 22 20 22 22 29 |borg "-B|org" "")|
|00001e00| 29 0a 58 20 20 28 6d 65 | 74 61 73 65 72 76 65 72 |).X (me|taserver|
|00001e10| 2d 75 70 64 61 74 65 2d | 6d 6f 64 65 2d 6c 69 6e |-update-|mode-lin|
|00001e20| 65 29 29 0a 58 0a 58 3b | 3b 3b 20 55 70 64 61 74 |e)).X.X;|;; Updat|
|00001e30| 65 20 74 68 65 20 6d 6f | 64 65 20 6c 69 6e 65 20 |e the mo|de line |
|00001e40| 74 6f 20 73 68 6f 77 20 | 66 6c 61 67 73 20 6f 66 |to show |flags of|
|00001e50| 20 62 6f 72 67 2d 75 73 | 65 20 61 6e 64 20 6c 69 | borg-us|e and li|
|00001e60| 73 74 2d 61 6c 6c 0a 58 | 28 64 65 66 75 6e 20 6d |st-all.X|(defun m|
|00001e70| 65 74 61 73 65 72 76 65 | 72 2d 75 70 64 61 74 65 |etaserve|r-update|
|00001e80| 2d 6d 6f 64 65 2d 6c 69 | 6e 65 20 28 29 0a 58 20 |-mode-li|ne ().X |
|00001e90| 20 22 43 68 61 6e 67 65 | 20 6d 6f 64 65 2d 6c 69 | "Change| mode-li|
|00001ea0| 6e 65 20 74 6f 20 69 6e | 63 6c 75 64 65 20 2d 42 |ne to in|clude -B|
|00001eb0| 6f 72 67 20 61 6e 64 2f | 6f 72 20 2d 41 6c 6c 20 |org and/|or -All |
|00001ec0| 69 66 20 61 70 70 72 6f | 70 72 69 61 74 65 2c 20 |if appro|priate, |
|00001ed0| 61 6e 64 20 66 6f 72 63 | 65 20 61 6e 0a 58 75 70 |and forc|e an.Xup|
|00001ee0| 64 61 74 65 2e 22 0a 58 | 20 20 28 73 65 74 71 20 |date.".X| (setq |
|00001ef0| 6d 6f 64 65 2d 6c 69 6e | 65 2d 70 72 6f 63 65 73 |mode-lin|e-proces|
|00001f00| 73 20 0a 58 09 28 63 6f | 6e 63 61 74 20 28 69 66 |s .X.(co|ncat (if|
|00001f10| 20 6d 65 74 61 73 65 72 | 76 65 72 2d 75 73 65 2d | metaser|ver-use-|
|00001f20| 62 6f 72 67 20 22 2d 42 | 6f 72 67 22 20 22 22 29 |borg "-B|org" "")|
|00001f30| 0a 58 09 09 28 69 66 20 | 6d 65 74 61 73 65 72 76 |.X..(if |metaserv|
|00001f40| 65 72 2d 6c 69 73 74 2d | 61 6c 6c 20 22 2d 41 6c |er-list-|all "-Al|
|00001f50| 6c 22 20 22 22 29 29 29 | 0a 58 20 20 28 73 65 74 |l" "")))|.X (set|
|00001f60| 2d 62 75 66 66 65 72 2d | 6d 6f 64 69 66 69 65 64 |-buffer-|modified|
|00001f70| 2d 70 20 6e 69 6c 29 29 | 0a 58 0a 58 28 64 65 66 |-p nil))|.X.X(def|
|00001f80| 75 6e 20 6d 65 74 61 73 | 65 72 76 65 72 2d 6d 6f |un metas|erver-mo|
|00001f90| 64 65 20 28 29 0a 58 22 | 20 20 20 54 68 69 73 20 |de ().X"| This |
|00001fa0| 69 73 20 61 20 6d 61 6a | 6f 72 20 6d 6f 64 65 20 |is a maj|or mode |
|00001fb0| 66 6f 72 20 76 69 65 77 | 69 6e 67 20 61 63 74 69 |for view|ing acti|
|00001fc0| 76 65 20 6e 65 74 72 65 | 6b 20 73 65 72 76 65 72 |ve netre|k server|
|00001fd0| 73 2e 20 20 41 20 6c 69 | 73 74 20 6f 66 20 61 63 |s. A li|st of ac|
|00001fe0| 74 69 76 65 0a 58 73 65 | 72 76 65 72 73 20 69 73 |tive.Xse|rvers is|
|00001ff0| 20 70 75 74 20 69 6e 20 | 61 20 62 75 66 66 65 72 | put in |a buffer|
|00002000| 2c 20 64 69 73 70 6c 61 | 79 69 6e 67 20 77 61 69 |, displa|ying wai|
|00002010| 74 20 71 75 65 75 65 20 | 73 74 61 74 75 73 2c 20 |t queue |status, |
|00002020| 61 6e 64 20 74 69 6d 65 | 20 74 68 65 20 73 65 72 |and time| the ser|
|00002030| 76 65 72 0a 58 77 61 73 | 20 6c 61 73 74 20 63 68 |ver.Xwas| last ch|
|00002040| 65 63 6b 65 64 2e 0a 58 | 0a 58 20 20 20 20 55 73 |ecked..X|.X Us|
|00002050| 65 72 20 6d 6f 64 69 66 | 69 61 62 6c 65 20 76 61 |er modif|iable va|
|00002060| 72 69 61 62 6c 65 73 20 | 61 72 65 3a 0a 58 20 20 |riables |are:.X |
|00002070| 20 20 20 20 6d 65 74 61 | 73 65 72 76 65 72 2d 6e | meta|server-n|
|00002080| 65 74 72 65 6b 2d 62 69 | 6e 61 72 79 3a 20 4e 6f |etrek-bi|nary: No|
|00002090| 72 6d 61 6c 20 6e 65 74 | 72 65 6b 20 63 6c 69 65 |rmal net|rek clie|
|000020a0| 6e 74 20 62 69 6e 61 72 | 79 0a 58 20 20 20 20 20 |nt binar|y.X |
|000020b0| 20 20 20 6d 65 74 61 73 | 65 72 76 65 72 2d 62 6f | metas|erver-bo|
|000020c0| 72 67 2d 62 69 6e 61 72 | 79 3a 20 42 6f 72 67 20 |rg-binar|y: Borg |
|000020d0| 6e 65 74 72 65 6b 20 63 | 6c 69 65 6e 74 20 62 69 |netrek c|lient bi|
|000020e0| 6e 61 72 79 0a 58 20 20 | 6d 65 74 61 73 65 72 76 |nary.X |metaserv|
|000020f0| 65 72 2d 65 6d 70 74 79 | 2d 73 69 74 65 2d 72 65 |er-empty|-site-re|
|00002100| 67 65 78 70 3a 20 52 65 | 67 75 6c 61 72 20 65 78 |gexp: Re|gular ex|
|00002110| 70 72 65 73 73 69 6f 6e | 20 74 68 61 74 20 6d 61 |pression| that ma|
|00002120| 74 63 68 65 73 20 65 6d | 70 74 79 20 73 69 74 65 |tches em|pty site|
|00002130| 73 0a 58 20 20 20 20 6d | 65 74 61 73 65 72 76 65 |s.X m|etaserve|
|00002140| 72 2d 68 65 61 64 65 72 | 73 2d 6b 69 6c 6c 2d 74 |r-header|s-kill-t|
|00002150| 6f 3a 20 52 65 67 75 6c | 61 72 20 65 78 70 72 65 |o: Regul|ar expre|
|00002160| 73 73 69 6f 6e 20 74 68 | 61 74 20 6d 61 74 63 68 |ssion th|at match|
|00002170| 65 73 20 6c 61 73 74 20 | 6c 69 6e 65 20 6f 66 0a |es last |line of.|
|00002180| 58 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |X | |
|00002190| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000021a0| 20 74 68 65 20 6d 65 74 | 61 73 65 72 76 65 72 20 | the met|aserver |
|000021b0| 68 65 61 64 65 72 73 2e | 0a 58 20 20 20 20 20 20 |headers.|.X |
|000021c0| 20 6d 65 74 61 73 65 72 | 76 65 72 2d 70 69 6e 67 | metaser|ver-ping|
|000021d0| 2d 70 72 6f 67 72 61 6d | 3a 20 50 72 6f 67 72 61 |-program|: Progra|
|000021e0| 6d 20 74 6f 20 75 73 65 | 20 74 6f 20 70 69 6e 67 |m to use| to ping|
|000021f0| 20 73 65 72 76 65 72 73 | 0a 58 20 20 20 20 20 20 | servers|.X |
|00002200| 20 6d 65 74 61 73 65 72 | 76 65 72 2d 70 69 6e 67 | metaser|ver-ping|
|00002210| 2d 70 61 63 6b 65 74 73 | 3a 20 23 20 6f 66 20 70 |-packets|: # of p|
|00002220| 61 63 6b 65 74 73 20 74 | 6f 20 73 65 6e 64 20 74 |ackets t|o send t|
|00002230| 6f 20 73 65 72 76 65 72 | 20 77 68 65 6e 20 70 69 |o server| when pi|
|00002240| 6e 67 69 6e 67 0a 58 20 | 20 20 20 20 20 20 20 6d |nging.X | m|
|00002250| 65 74 61 73 65 72 76 65 | 72 2d 70 69 6e 67 2d 73 |etaserve|r-ping-s|
|00002260| 69 7a 65 6f 66 3a 20 53 | 69 7a 65 20 69 6e 20 62 |izeof: S|ize in b|
|00002270| 79 74 65 73 20 6f 66 20 | 70 61 63 6b 65 74 73 20 |ytes of |packets |
|00002280| 73 65 6e 74 20 64 75 72 | 69 6e 67 20 61 20 70 69 |sent dur|ing a pi|
|00002290| 6e 67 0a 58 20 20 20 20 | 20 20 20 20 20 20 20 6d |ng.X | m|
|000022a0| 65 74 61 73 65 72 76 65 | 72 2d 6c 69 73 74 2d 61 |etaserve|r-list-a|
|000022b0| 6c 6c 3a 20 53 68 6f 77 | 20 61 6c 6c 20 73 65 72 |ll: Show| all ser|
|000022c0| 76 65 72 73 20 6f 72 20 | 6a 75 73 74 20 6f 70 65 |vers or |just ope|
|000022d0| 6e 20 6f 6e 65 73 3f 0a | 58 20 20 20 20 20 20 20 |n ones?.|X |
|000022e0| 20 20 20 20 6d 65 74 61 | 73 65 72 76 65 72 2d 75 | meta|server-u|
|000022f0| 73 65 2d 62 6f 72 67 3a | 20 52 75 6e 20 6e 6f 72 |se-borg:| Run nor|
|00002300| 6d 61 6c 20 63 6c 69 65 | 6e 74 20 6f 72 20 62 6f |mal clie|nt or bo|
|00002310| 72 67 20 63 6c 69 65 6e | 74 3f 0a 58 20 20 20 20 |rg clien|t?.X |
|00002320| 20 20 20 20 20 6d 65 74 | 61 73 65 72 76 65 72 2d | met|aserver-|
|00002330| 73 69 74 65 2d 6f 72 64 | 65 72 3a 20 41 73 63 65 |site-ord|er: Asce|
|00002340| 6e 64 69 6e 67 20 6f 72 | 20 64 65 73 63 65 6e 64 |nding or| descend|
|00002350| 69 6e 67 20 6f 72 64 65 | 72 20 77 68 65 6e 0a 58 |ing orde|r when.X|
|00002360| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002370| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00002380| 70 72 69 6e 74 69 6e 67 | 20 73 69 74 65 73 3f 20 |printing| sites? |
|00002390| 20 0a 58 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | .X | |
|000023a0| 20 20 6d 65 74 61 73 65 | 72 76 65 72 2d 73 69 74 | metase|rver-sit|
|000023b0| 65 3a 20 48 6f 6d 65 20 | 6f 66 20 74 68 65 20 6d |e: Home |of the m|
|000023c0| 65 74 61 73 65 72 76 65 | 72 0a 58 20 20 20 20 20 |etaserve|r.X |
|000023d0| 20 20 20 20 20 20 20 20 | 20 20 6d 65 74 61 73 65 | | metase|
|000023e0| 72 76 65 72 2d 70 6f 72 | 74 3a 20 50 6f 72 74 20 |rver-por|t: Port |
|000023f0| 6f 66 20 74 68 65 20 6d | 65 74 61 73 65 72 76 65 |of the m|etaserve|
|00002400| 72 22 0a 58 20 20 28 69 | 6e 74 65 72 61 63 74 69 |r".X (i|nteracti|
|00002410| 76 65 29 0a 58 20 20 28 | 6b 69 6c 6c 2d 61 6c 6c |ve).X (|kill-all|
|00002420| 2d 6c 6f 63 61 6c 2d 76 | 61 72 69 61 62 6c 65 73 |-local-v|ariables|
|00002430| 29 0a 58 20 20 28 75 73 | 65 2d 6c 6f 63 61 6c 2d |).X (us|e-local-|
|00002440| 6d 61 70 20 6d 65 74 61 | 73 65 72 76 65 72 2d 6d |map meta|server-m|
|00002450| 6f 64 65 2d 6d 61 70 29 | 0a 58 20 20 28 73 65 74 |ode-map)|.X (set|
|00002460| 71 20 6d 61 6a 6f 72 2d | 6d 6f 64 65 20 27 6d 65 |q major-|mode 'me|
|00002470| 74 61 73 65 72 76 65 72 | 2d 6d 6f 64 65 29 0a 58 |taserver|-mode).X|
|00002480| 20 20 28 73 65 74 71 20 | 6d 6f 64 65 2d 6e 61 6d | (setq |mode-nam|
|00002490| 65 20 22 4d 65 74 61 53 | 65 72 76 65 72 22 29 0a |e "MetaS|erver").|
|000024a0| 58 20 20 28 6d 65 74 61 | 73 65 72 76 65 72 2d 75 |X (meta|server-u|
|000024b0| 70 64 61 74 65 2d 6d 6f | 64 65 2d 6c 69 6e 65 29 |pdate-mo|de-line)|
|000024c0| 29 0a 58 0a 58 3b 3b 3b | 20 47 65 74 20 74 68 65 |).X.X;;;| Get the|
|000024d0| 20 6d 69 6c 6c 69 73 65 | 63 6f 6e 64 20 73 65 65 | millise|cond see|
|000024e0| 6b 20 74 69 6d 65 20 74 | 6f 20 74 68 65 20 73 65 |k time t|o the se|
|000024f0| 72 76 65 72 0a 58 28 64 | 65 66 75 6e 20 6d 65 74 |rver.X(d|efun met|
|00002500| 61 73 65 72 76 65 72 2d | 70 69 6e 67 20 28 29 0a |aserver-|ping ().|
|00002510| 58 20 20 28 69 6e 74 65 | 72 61 63 74 69 76 65 29 |X (inte|ractive)|
|00002520| 0a 58 20 20 28 73 61 76 | 65 2d 65 78 63 75 72 73 |.X (sav|e-excurs|
|00002530| 69 6f 6e 0a 58 20 20 20 | 20 28 73 61 76 65 2d 77 |ion.X | (save-w|
|00002540| 69 6e 64 6f 77 2d 65 78 | 63 75 72 73 69 6f 6e 0a |indow-ex|cursion.|
|00002550| 58 20 20 20 20 20 20 28 | 6c 65 74 2a 20 28 28 74 |X (|let* ((t|
|00002560| 6d 70 20 28 67 72 61 62 | 2d 63 75 72 72 65 6e 74 |mp (grab|-current|
|00002570| 2d 6c 69 6e 65 29 29 0a | 58 09 20 20 20 20 20 28 |-line)).|X. (|
|00002580| 73 65 72 76 65 72 20 28 | 73 75 62 73 74 72 69 6e |server (|substrin|
|00002590| 67 20 74 6d 70 20 30 20 | 28 73 74 72 69 6e 67 2d |g tmp 0 |(string-|
|000025a0| 6d 61 74 63 68 20 22 20 | 22 20 74 6d 70 29 29 29 |match " |" tmp)))|
|000025b0| 29 0a 58 09 28 6d 65 73 | 73 61 67 65 20 22 50 69 |).X.(mes|sage "Pi|
|000025c0| 6e 67 69 6e 67 20 25 73 | 2e 2e 2e 22 20 73 65 72 |nging %s|..." ser|
|000025d0| 76 65 72 29 0a 58 09 28 | 73 68 65 6c 6c 2d 63 6f |ver).X.(|shell-co|
|000025e0| 6d 6d 61 6e 64 20 28 63 | 6f 6e 63 61 74 20 6d 65 |mmand (c|oncat me|
|000025f0| 74 61 73 65 72 76 65 72 | 2d 70 69 6e 67 2d 70 72 |taserver|-ping-pr|
|00002600| 6f 67 72 61 6d 20 22 20 | 22 0a 58 09 09 09 20 20 |ogram " |".X... |
|00002610| 20 20 20 20 20 73 65 72 | 76 65 72 20 22 20 22 0a | ser|ver " ".|
|00002620| 58 09 09 09 20 20 20 20 | 20 20 20 28 69 6e 74 2d |X... | (int-|
|00002630| 74 6f 2d 73 74 72 69 6e | 67 20 6d 65 74 61 73 65 |to-strin|g metase|
|00002640| 72 76 65 72 2d 70 69 6e | 67 2d 73 69 7a 65 6f 66 |rver-pin|g-sizeof|
|00002650| 29 20 22 20 22 0a 58 09 | 09 09 20 20 20 20 20 20 |) " ".X.|.. |
|00002660| 20 28 69 6e 74 2d 74 6f | 2d 73 74 72 69 6e 67 20 | (int-to|-string |
|00002670| 6d 65 74 61 73 65 72 76 | 65 72 2d 70 69 6e 67 2d |metaserv|er-ping-|
|00002680| 70 61 63 6b 65 74 73 29 | 29 29 0a 58 09 28 6c 65 |packets)|)).X.(le|
|00002690| 74 20 28 28 70 69 6e 67 | 2d 73 74 72 20 28 70 72 |t ((ping|-str (pr|
|000026a0| 6f 67 6e 20 28 73 65 74 | 2d 62 75 66 66 65 72 20 |ogn (set|-buffer |
|000026b0| 22 2a 53 68 65 6c 6c 20 | 43 6f 6d 6d 61 6e 64 20 |"*Shell |Command |
|000026c0| 4f 75 74 70 75 74 2a 22 | 29 0a 58 09 09 09 20 20 |Output*"|).X... |
|000026d0| 20 20 20 20 20 28 62 75 | 66 66 65 72 2d 73 74 72 | (bu|ffer-str|
|000026e0| 69 6e 67 29 29 29 0a 58 | 09 20 20 20 20 20 20 28 |ing))).X|. (|
|000026f0| 70 69 6e 67 2d 72 65 67 | 65 78 70 20 28 63 6f 6e |ping-reg|exp (con|
|00002700| 63 61 74 20 22 2e 2a 70 | 61 63 6b 65 74 73 20 74 |cat ".*p|ackets t|
|00002710| 72 61 6e 73 6d 69 74 74 | 65 64 2c 20 22 0a 58 09 |ransmitt|ed, ".X.|
|00002720| 09 09 09 20 20 20 22 2e | 2a 20 70 61 63 6b 65 74 |... ".|* packet|
|00002730| 73 20 72 65 63 65 69 76 | 65 64 2c 20 5c 5c 28 2e |s receiv|ed, \\(.|
|00002740| 2a 5c 5c 29 5c 5c 5c 6e | 22 0a 58 09 09 09 09 20 |*\\)\\\n|".X.... |
|00002750| 20 20 22 72 6f 75 6e 64 | 2d 74 72 69 70 20 28 6d | "round|-trip (m|
|00002760| 73 29 20 5c 5c 28 2e 2a | 5c 5c 29 22 29 29 29 0a |s) \\(.*|\\)"))).|
|00002770| 58 09 20 20 28 6b 69 6c | 6c 2d 62 75 66 66 65 72 |X. (kil|l-buffer|
|00002780| 20 22 2a 53 68 65 6c 6c | 20 43 6f 6d 6d 61 6e 64 | "*Shell| Command|
|00002790| 20 4f 75 74 70 75 74 2a | 22 29 0a 58 09 20 20 28 | Output*|").X. (|
|000027a0| 69 66 20 28 73 74 72 69 | 6e 67 2d 6d 61 74 63 68 |if (stri|ng-match|
|000027b0| 20 70 69 6e 67 2d 72 65 | 67 65 78 70 20 70 69 6e | ping-re|gexp pin|
|000027c0| 67 2d 73 74 72 29 0a 58 | 09 20 20 20 20 20 20 28 |g-str).X|. (|
|000027d0| 6d 65 73 73 61 67 65 20 | 22 25 73 3a 25 73 22 0a |message |"%s:%s".|
|000027e0| 58 09 09 20 20 20 20 20 | 20 20 28 73 75 62 73 74 |X.. | (subst|
|000027f0| 72 69 6e 67 20 70 69 6e | 67 2d 73 74 72 20 28 6d |ring pin|g-str (m|
|00002800| 61 74 63 68 2d 62 65 67 | 69 6e 6e 69 6e 67 20 31 |atch-beg|inning 1|
|00002810| 29 20 28 6d 61 74 63 68 | 2d 65 6e 64 20 31 29 29 |) (match|-end 1))|
|00002820| 0a 58 09 09 20 20 20 20 | 20 20 20 28 73 75 62 73 |.X.. | (subs|
|00002830| 74 72 69 6e 67 20 70 69 | 6e 67 2d 73 74 72 20 28 |tring pi|ng-str (|
|00002840| 6d 61 74 63 68 2d 62 65 | 67 69 6e 6e 69 6e 67 20 |match-be|ginning |
|00002850| 32 29 20 28 6d 61 74 63 | 68 2d 65 6e 64 20 32 29 |2) (matc|h-end 2)|
|00002860| 29 29 0a 58 09 20 20 20 | 20 28 6d 65 73 73 61 67 |)).X. | (messag|
|00002870| 65 20 22 25 73 20 69 73 | 20 6e 6f 74 20 72 65 73 |e "%s is| not res|
|00002880| 70 6f 6e 64 69 6e 67 2e | 2e 2e 22 20 73 65 72 76 |ponding.|.." serv|
|00002890| 65 72 29 29 29 29 29 29 | 29 0a 58 0a 58 28 64 65 |er))))))|).X.X(de|
|000028a0| 66 75 6e 20 6d 65 74 61 | 73 65 72 76 65 72 2d 69 |fun meta|server-i|
|000028b0| 6e 73 65 72 74 2d 68 65 | 61 64 65 72 73 20 28 29 |nsert-he|aders ()|
|000028c0| 0a 58 20 20 22 49 6e 73 | 65 72 74 20 68 65 61 64 |.X "Ins|ert head|
|000028d0| 65 72 73 20 69 6e 20 6d | 65 74 61 73 65 72 76 65 |ers in m|etaserve|
|000028e0| 72 20 62 75 66 66 65 72 | 2e 2e 2e 2e 20 6d 61 6b |r buffer|.... mak|
|000028f0| 65 73 20 69 74 20 65 61 | 73 69 65 72 20 74 6f 20 |es it ea|sier to |
|00002900| 72 65 61 64 2e 22 0a 58 | 20 20 28 65 72 61 73 65 |read.".X| (erase|
|00002910| 2d 62 75 66 66 65 72 29 | 0a 58 20 20 28 69 6e 73 |-buffer)|.X (ins|
|00002920| 65 72 74 20 28 66 6f 72 | 6d 61 74 20 22 25 35 33 |ert (for|mat "%53|
|00002930| 73 5c 6e 25 2d 34 30 73 | 25 33 35 73 5c 6e 22 20 |s\n%-40s|%35s\n" |
|00002940| 22 4d 69 6e 73 22 20 22 | 53 69 74 65 22 0a 58 09 |"Mins" "|Site".X.|
|00002950| 09 20 20 22 41 67 6f 20 | 20 20 53 74 61 74 75 73 |. "Ago | Status|
|00002960| 20 20 20 20 20 20 20 20 | 46 6c 61 67 73 22 29 29 | |Flags"))|
|00002970| 0a 58 20 20 28 77 68 69 | 6c 65 20 28 3c 20 28 63 |.X (whi|le (< (c|
|00002980| 75 72 72 65 6e 74 2d 63 | 6f 6c 75 6d 6e 29 20 37 |urrent-c|olumn) 7|
|00002990| 39 29 20 28 69 6e 73 65 | 72 74 20 22 2d 22 29 29 |9) (inse|rt "-"))|
|000029a0| 0a 58 20 20 28 69 6e 73 | 65 72 74 20 22 5c 6e 22 |.X (ins|ert "\n"|
|000029b0| 29 29 0a 58 0a 58 28 64 | 65 66 75 6e 20 6d 65 74 |)).X.X(d|efun met|
|000029c0| 61 73 65 72 76 65 72 2d | 69 6e 73 65 72 74 2d 6c |aserver-|insert-l|
|000029d0| 69 73 74 20 28 74 68 65 | 6c 69 73 74 29 0a 58 20 |ist (the|list).X |
|000029e0| 20 22 49 6e 73 65 72 74 | 20 61 20 6c 69 73 74 20 | "Insert| a list |
|000029f0| 6f 66 20 28 73 65 72 76 | 65 72 20 2e 20 70 6f 72 |of (serv|er . por|
|00002a00| 74 20 2e 20 64 61 74 61 | 29 20 69 6e 74 6f 20 74 |t . data|) into t|
|00002a10| 68 65 20 62 75 66 66 65 | 72 22 0a 58 20 20 28 6c |he buffe|r".X (l|
|00002a20| 65 74 2a 20 28 28 74 6d | 70 20 74 68 65 6c 69 73 |et* ((tm|p thelis|
|00002a30| 74 29 29 0a 58 20 20 20 | 20 28 77 68 69 6c 65 20 |t)).X | (while |
|00002a40| 74 6d 70 0a 58 20 20 20 | 20 20 20 28 6c 65 74 2a |tmp.X | (let*|
|00002a50| 20 28 28 73 69 74 65 20 | 28 63 61 72 20 28 63 61 | ((site |(car (ca|
|00002a60| 72 20 74 6d 70 29 29 29 | 0a 58 09 20 20 20 20 20 |r tmp)))|.X. |
|00002a70| 28 64 61 74 61 20 28 63 | 61 72 20 28 63 64 72 20 |(data (c|ar (cdr |
|00002a80| 28 63 64 72 20 28 63 61 | 72 20 74 6d 70 29 29 29 |(cdr (ca|r tmp)))|
|00002a90| 29 29 29 0a 58 09 28 69 | 6e 73 65 72 74 20 28 66 |))).X.(i|nsert (f|
|00002aa0| 6f 72 6d 61 74 20 22 25 | 2d 34 30 73 25 33 39 73 |ormat "%|-40s%39s|
|00002ab0| 5c 6e 22 20 73 69 74 65 | 20 64 61 74 61 29 29 29 |\n" site| data)))|
|00002ac0| 0a 58 20 20 20 20 20 20 | 28 73 65 74 71 20 74 6d |.X |(setq tm|
|00002ad0| 70 20 28 63 64 72 20 74 | 6d 70 29 29 29 29 29 0a |p (cdr t|mp))))).|
|00002ae0| 58 0a 58 28 64 65 66 75 | 6e 20 6d 65 74 61 73 65 |X.X(defu|n metase|
|00002af0| 72 76 65 72 2d 66 69 6c | 74 65 72 20 28 70 72 6f |rver-fil|ter (pro|
|00002b00| 63 20 73 74 72 69 6e 67 | 29 0a 58 20 20 22 46 69 |c string|).X "Fi|
|00002b10| 6c 74 65 72 20 66 6f 72 | 20 74 68 65 20 73 74 72 |lter for| the str|
|00002b20| 65 61 6d 20 74 6f 20 74 | 68 65 20 6d 65 74 61 73 |eam to t|he metas|
|00002b30| 65 72 76 65 72 2e 20 20 | 43 61 6c 6c 73 20 70 61 |erver. |Calls pa|
|00002b40| 72 73 65 72 20 77 68 65 | 6e 20 61 70 70 72 6f 70 |rser whe|n approp|
|00002b50| 72 69 61 74 65 2e 22 0a | 58 20 20 28 73 65 74 71 |riate.".|X (setq|
|00002b60| 20 6d 65 74 61 73 65 72 | 76 65 72 2d 73 65 72 76 | metaser|ver-serv|
|00002b70| 65 72 2d 6f 75 74 70 75 | 74 20 28 63 6f 6e 63 61 |er-outpu|t (conca|
|00002b80| 74 20 6d 65 74 61 73 65 | 72 76 65 72 2d 73 65 72 |t metase|rver-ser|
|00002b90| 76 65 72 2d 6f 75 74 70 | 75 74 20 73 74 72 69 6e |ver-outp|ut strin|
|00002ba0| 67 29 29 0a 58 20 20 28 | 69 66 20 28 73 74 72 69 |g)).X (|if (stri|
|00002bb0| 6e 67 2d 6d 61 74 63 68 | 20 6d 65 74 61 73 65 72 |ng-match| metaser|
|00002bc0| 76 65 72 2d 74 72 61 69 | 6c 69 6e 67 2d 68 65 61 |ver-trai|ling-hea|
|00002bd0| 64 65 72 73 20 73 74 72 | 69 6e 67 29 20 28 6d 65 |ders str|ing) (me|
|00002be0| 74 61 73 65 72 76 65 72 | 2d 70 61 72 73 65 72 29 |taserver|-parser)|
|00002bf0| 29 29 0a 58 0a 58 28 64 | 65 66 75 6e 20 6d 65 74 |)).X.X(d|efun met|
|00002c00| 61 73 65 72 76 65 72 2d | 70 61 72 73 65 72 20 28 |aserver-|parser (|
|00002c10| 29 0a 58 20 20 22 50 61 | 72 73 65 73 20 6f 75 74 |).X "Pa|rses out|
|00002c20| 20 74 68 65 20 6d 65 74 | 61 73 65 72 76 65 72 20 | the met|aserver |
|00002c30| 73 74 72 69 6e 67 20 69 | 6e 74 6f 20 61 20 6c 69 |string i|nto a li|
|00002c40| 73 74 2e 20 20 43 6f 6e | 73 74 72 75 63 74 73 20 |st. Con|structs |
|00002c50| 62 75 66 66 65 72 2e 22 | 0a 58 20 20 28 73 65 74 |buffer."|.X (set|
|00002c60| 71 20 6d 65 74 61 73 65 | 72 76 65 72 2d 73 65 72 |q metase|rver-ser|
|00002c70| 76 65 72 2d 6f 75 74 70 | 75 74 20 28 73 75 62 73 |ver-outp|ut (subs|
|00002c80| 74 72 69 6e 67 20 0a 58 | 09 09 20 20 20 20 20 6d |tring .X|.. m|
|00002c90| 65 74 61 73 65 72 76 65 | 72 2d 73 65 72 76 65 72 |etaserve|r-server|
|00002ca0| 2d 6f 75 74 70 75 74 0a | 58 09 09 20 20 20 20 20 |-output.|X.. |
|00002cb0| 28 73 74 72 69 6e 67 2d | 6d 61 74 63 68 20 6d 65 |(string-|match me|
|00002cc0| 74 61 73 65 72 76 65 72 | 2d 68 65 61 64 65 72 73 |taserver|-headers|
|00002cd0| 2d 6b 69 6c 6c 2d 74 6f | 0a 58 09 09 09 09 20 20 |-kill-to|.X.... |
|00002ce0| 20 6d 65 74 61 73 65 72 | 76 65 72 2d 73 65 72 76 | metaser|ver-serv|
|00002cf0| 65 72 2d 6f 75 74 70 75 | 74 29 0a 58 09 09 20 20 |er-outpu|t).X.. |
|00002d00| 20 20 20 6e 69 6c 29 29 | 0a 58 20 20 28 73 65 74 | nil))|.X (set|
|00002d10| 71 20 6d 65 74 61 73 65 | 72 76 65 72 2d 73 65 72 |q metase|rver-ser|
|00002d20| 76 65 72 2d 6f 75 74 70 | 75 74 20 0a 58 09 28 73 |ver-outp|ut .X.(s|
|00002d30| 75 62 73 74 72 69 6e 67 | 20 6d 65 74 61 73 65 72 |ubstring| metaser|
|00002d40| 76 65 72 2d 73 65 72 76 | 65 72 2d 6f 75 74 70 75 |ver-serv|er-outpu|
|00002d50| 74 0a 58 09 09 20 20 20 | 30 20 28 31 2d 20 28 73 |t.X.. |0 (1- (s|
|00002d60| 74 72 69 6e 67 2d 6d 61 | 74 63 68 20 6d 65 74 61 |tring-ma|tch meta|
|00002d70| 73 65 72 76 65 72 2d 74 | 72 61 69 6c 69 6e 67 2d |server-t|railing-|
|00002d80| 68 65 61 64 65 72 73 20 | 0a 58 09 09 09 09 20 20 |headers |.X.... |
|00002d90| 20 20 20 20 20 6d 65 74 | 61 73 65 72 76 65 72 2d | met|aserver-|
|00002da0| 73 65 72 76 65 72 2d 6f | 75 74 70 75 74 29 29 29 |server-o|utput)))|
|00002db0| 29 0a 58 20 20 28 77 68 | 69 6c 65 20 28 6e 6f 74 |).X (wh|ile (not|
|00002dc0| 20 28 65 71 75 61 6c 20 | 22 22 20 6d 65 74 61 73 | (equal |"" metas|
|00002dd0| 65 72 76 65 72 2d 73 65 | 72 76 65 72 2d 6f 75 74 |erver-se|rver-out|
|00002de0| 70 75 74 29 29 0a 58 20 | 20 20 20 28 6c 65 74 2a |put)).X | (let*|
|00002df0| 20 28 28 74 6d 70 20 28 | 73 75 62 73 74 72 69 6e | ((tmp (|substrin|
|00002e00| 67 20 6d 65 74 61 73 65 | 72 76 65 72 2d 73 65 72 |g metase|rver-ser|
|00002e10| 76 65 72 2d 6f 75 74 70 | 75 74 20 0a 58 09 09 09 |ver-outp|ut .X...|
|00002e20| 20 20 20 30 20 28 73 74 | 72 69 6e 67 2d 6d 61 74 | 0 (st|ring-mat|
|00002e30| 63 68 20 22 24 22 20 6d | 65 74 61 73 65 72 76 65 |ch "$" m|etaserve|
|00002e40| 72 2d 73 65 72 76 65 72 | 2d 6f 75 74 70 75 74 29 |r-server|-output)|
|00002e50| 29 29 29 0a 58 20 20 20 | 20 20 20 28 73 65 74 71 |))).X | (setq|
|00002e60| 20 6d 65 74 61 73 65 72 | 76 65 72 2d 73 65 72 76 | metaser|ver-serv|
|00002e70| 65 72 2d 6f 75 74 70 75 | 74 20 0a 58 09 20 20 20 |er-outpu|t .X. |
|00002e80| 20 28 73 75 62 73 74 72 | 69 6e 67 20 6d 65 74 61 | (substr|ing meta|
|00002e90| 73 65 72 76 65 72 2d 73 | 65 72 76 65 72 2d 6f 75 |server-s|erver-ou|
|00002ea0| 74 70 75 74 0a 58 09 09 | 20 20 20 20 20 20 20 28 |tput.X..| (|
|00002eb0| 31 2b 20 28 73 74 72 69 | 6e 67 2d 6d 61 74 63 68 |1+ (stri|ng-match|
|00002ec0| 20 22 24 22 20 6d 65 74 | 61 73 65 72 76 65 72 2d | "$" met|aserver-|
|00002ed0| 73 65 72 76 65 72 2d 6f | 75 74 70 75 74 29 29 0a |server-o|utput)).|
|00002ee0| 58 09 09 09 09 20 20 20 | 6e 69 6c 29 29 0a 58 20 |X.... |nil)).X |
|00002ef0| 20 20 20 20 20 28 73 74 | 72 69 6e 67 2d 6d 61 74 | (st|ring-mat|
|00002f00| 63 68 20 6d 65 74 61 73 | 65 72 76 65 72 2d 64 61 |ch metas|erver-da|
|00002f10| 74 61 2d 72 65 67 65 78 | 70 20 74 6d 70 29 0a 58 |ta-regex|p tmp).X|
|00002f20| 20 20 20 20 20 20 28 6c | 65 74 2a 20 28 28 73 69 | (l|et* ((si|
|00002f30| 74 65 20 28 73 75 62 73 | 74 72 69 6e 67 20 74 6d |te (subs|tring tm|
|00002f40| 70 20 28 6d 61 74 63 68 | 2d 62 65 67 69 6e 6e 69 |p (match|-beginni|
|00002f50| 6e 67 20 31 29 20 28 6d | 61 74 63 68 2d 65 6e 64 |ng 1) (m|atch-end|
|00002f60| 20 31 29 29 29 0a 58 09 | 20 20 20 20 20 28 70 6f | 1))).X.| (po|
|00002f70| 72 74 20 28 73 74 72 69 | 6e 67 2d 74 6f 2d 69 6e |rt (stri|ng-to-in|
|00002f80| 74 20 0a 58 09 09 20 20 | 20 20 28 73 75 62 73 74 |t .X.. | (subst|
|00002f90| 72 69 6e 67 20 74 6d 70 | 20 28 6d 61 74 63 68 2d |ring tmp| (match-|
|00002fa0| 62 65 67 69 6e 6e 69 6e | 67 20 32 29 20 28 6d 61 |beginnin|g 2) (ma|
|00002fb0| 74 63 68 2d 65 6e 64 20 | 32 29 29 29 29 0a 58 09 |tch-end |2)))).X.|
|00002fc0| 20 20 20 20 20 28 64 61 | 74 61 20 28 73 75 62 73 | (da|ta (subs|
|00002fd0| 74 72 69 6e 67 20 74 6d | 70 20 28 6d 61 74 63 68 |tring tm|p (match|
|00002fe0| 2d 62 65 67 69 6e 6e 69 | 6e 67 20 33 29 20 28 6d |-beginni|ng 3) (m|
|00002ff0| 61 74 63 68 2d 65 6e 64 | 20 33 29 29 29 29 0a 58 |atch-end| 3)))).X|
|00003000| 09 28 69 66 20 28 6e 6f | 74 20 28 73 74 72 69 6e |.(if (no|t (strin|
|00003010| 67 2d 6d 61 74 63 68 20 | 6d 65 74 61 73 65 72 76 |g-match |metaserv|
|00003020| 65 72 2d 65 6d 70 74 79 | 2d 73 69 74 65 2d 72 65 |er-empty|-site-re|
|00003030| 67 65 78 70 20 64 61 74 | 61 29 29 0a 58 09 20 20 |gexp dat|a)).X. |
|00003040| 20 20 28 73 65 74 71 20 | 6d 65 74 61 73 65 72 76 | (setq |metaserv|
|00003050| 65 72 2d 6f 70 65 6e 2d | 6c 69 73 74 0a 58 09 09 |er-open-|list.X..|
|00003060| 20 20 28 61 70 70 65 6e | 64 20 28 63 6f 6e 73 20 | (appen|d (cons |
|00003070| 28 63 6f 6e 73 20 73 69 | 74 65 20 28 63 6f 6e 73 |(cons si|te (cons|
|00003080| 20 70 6f 72 74 20 28 63 | 6f 6e 73 20 64 61 74 61 | port (c|ons data|
|00003090| 20 27 28 29 29 29 29 20 | 27 28 29 29 0a 58 09 09 | '()))) |'()).X..|
|000030a0| 09 20 20 6d 65 74 61 73 | 65 72 76 65 72 2d 6f 70 |. metas|erver-op|
|000030b0| 65 6e 2d 6c 69 73 74 29 | 29 0a 58 09 20 20 28 73 |en-list)|).X. (s|
|000030c0| 65 74 71 20 6d 65 74 61 | 73 65 72 76 65 72 2d 65 |etq meta|server-e|
|000030d0| 6d 70 74 79 2d 6c 69 73 | 74 0a 58 09 09 28 61 70 |mpty-lis|t.X..(ap|
|000030e0| 70 65 6e 64 20 28 63 6f | 6e 73 20 28 63 6f 6e 73 |pend (co|ns (cons|
|000030f0| 20 73 69 74 65 20 28 63 | 6f 6e 73 20 70 6f 72 74 | site (c|ons port|
|00003100| 20 28 63 6f 6e 73 20 64 | 61 74 61 20 27 28 29 29 | (cons d|ata '())|
|00003110| 29 29 20 27 28 29 29 0a | 58 09 09 09 6d 65 74 61 |)) '()).|X...meta|
|00003120| 73 65 72 76 65 72 2d 65 | 6d 70 74 79 2d 6c 69 73 |server-e|mpty-lis|
|00003130| 74 29 29 29 29 29 29 0a | 58 20 20 28 73 61 76 65 |t)))))).|X (save|
|00003140| 2d 65 78 63 75 72 73 69 | 6f 6e 0a 58 20 20 20 20 |-excursi|on.X |
|00003150| 28 73 77 69 74 63 68 2d | 74 6f 2d 62 75 66 66 65 |(switch-|to-buffe|
|00003160| 72 20 22 2a 4d 65 74 61 | 53 65 72 76 65 72 2a 22 |r "*Meta|Server*"|
|00003170| 29 0a 58 20 20 20 20 28 | 67 6f 74 6f 2d 63 68 61 |).X (|goto-cha|
|00003180| 72 20 28 70 6f 69 6e 74 | 2d 6d 69 6e 29 29 0a 58 |r (point|-min)).X|
|00003190| 20 20 20 20 28 6d 65 74 | 61 73 65 72 76 65 72 2d | (met|aserver-|
|000031a0| 69 6e 73 65 72 74 2d 68 | 65 61 64 65 72 73 29 0a |insert-h|eaders).|
|000031b0| 58 20 20 20 20 28 69 66 | 20 28 65 71 75 61 6c 20 |X (if| (equal |
|000031c0| 22 64 65 73 63 65 6e 64 | 69 6e 67 22 20 6d 65 74 |"descend|ing" met|
|000031d0| 61 73 65 72 76 65 72 2d | 73 69 74 65 2d 6f 72 64 |aserver-|site-ord|
|000031e0| 65 72 29 0a 58 09 28 6d | 65 74 61 73 65 72 76 65 |er).X.(m|etaserve|
|000031f0| 72 2d 69 6e 73 65 72 74 | 2d 6c 69 73 74 20 28 66 |r-insert|-list (f|
|00003200| 6c 69 70 2d 6c 69 73 74 | 20 6d 65 74 61 73 65 72 |lip-list| metaser|
|00003210| 76 65 72 2d 6f 70 65 6e | 2d 6c 69 73 74 29 29 0a |ver-open|-list)).|
|00003220| 58 20 20 20 20 20 20 28 | 6d 65 74 61 73 65 72 76 |X (|metaserv|
|00003230| 65 72 2d 69 6e 73 65 72 | 74 2d 6c 69 73 74 20 6d |er-inser|t-list m|
|00003240| 65 74 61 73 65 72 76 65 | 72 2d 6f 70 65 6e 2d 6c |etaserve|r-open-l|
|00003250| 69 73 74 29 29 0a 58 20 | 20 20 20 28 69 66 20 6d |ist)).X | (if m|
|00003260| 65 74 61 73 65 72 76 65 | 72 2d 6c 69 73 74 2d 61 |etaserve|r-list-a|
|00003270| 6c 6c 20 0a 58 09 28 69 | 66 20 28 65 71 75 61 6c |ll .X.(i|f (equal|
|00003280| 20 22 64 65 73 63 65 6e | 64 69 6e 67 22 20 6d 65 | "descen|ding" me|
|00003290| 74 61 73 65 72 76 65 72 | 2d 73 69 74 65 2d 6f 72 |taserver|-site-or|
|000032a0| 64 65 72 29 0a 58 09 20 | 20 20 20 28 6d 65 74 61 |der).X. | (meta|
|000032b0| 73 65 72 76 65 72 2d 69 | 6e 73 65 72 74 2d 6c 69 |server-i|nsert-li|
|000032c0| 73 74 20 28 66 6c 69 70 | 2d 6c 69 73 74 20 6d 65 |st (flip|-list me|
|000032d0| 74 61 73 65 72 76 65 72 | 2d 65 6d 70 74 79 2d 6c |taserver|-empty-l|
|000032e0| 69 73 74 29 29 0a 58 09 | 20 20 28 6d 65 74 61 73 |ist)).X.| (metas|
|000032f0| 65 72 76 65 72 2d 69 6e | 73 65 72 74 2d 6c 69 73 |erver-in|sert-lis|
|00003300| 74 20 6d 65 74 61 73 65 | 72 76 65 72 2d 65 6d 70 |t metase|rver-emp|
|00003310| 74 79 2d 6c 69 73 74 29 | 29 29 0a 58 20 20 20 20 |ty-list)|)).X |
|00003320| 28 6d 65 73 73 61 67 65 | 20 22 22 29 0a 58 20 20 |(message| "").X |
|00003330| 20 20 28 69 66 20 28 6e | 6f 74 20 62 75 66 66 65 | (if (n|ot buffe|
|00003340| 72 2d 72 65 61 64 2d 6f | 6e 6c 79 29 20 28 74 6f |r-read-o|nly) (to|
|00003350| 67 67 6c 65 2d 72 65 61 | 64 2d 6f 6e 6c 79 29 29 |ggle-rea|d-only))|
|00003360| 29 29 0a 58 09 20 20 0a | 58 28 64 65 66 75 6e 20 |)).X. .|X(defun |
|00003370| 6d 65 74 61 73 65 72 76 | 65 72 2d 72 65 66 72 65 |metaserv|er-refre|
|00003380| 73 68 20 28 29 0a 58 20 | 20 22 53 74 61 72 74 20 |sh ().X | "Start |
|00003390| 74 68 65 20 6d 65 74 61 | 73 65 72 76 65 72 2e 20 |the meta|server. |
|000033a0| 20 47 65 74 20 73 69 74 | 65 20 69 6e 66 6f 2c 20 | Get sit|e info, |
|000033b0| 70 75 74 20 69 6e 20 62 | 75 66 66 65 72 2c 20 65 |put in b|uffer, e|
|000033c0| 74 63 2c 20 65 74 63 2e | 22 0a 58 20 20 28 69 6e |tc, etc.|".X (in|
|000033d0| 74 65 72 61 63 74 69 76 | 65 29 0a 58 20 20 28 6d |teractiv|e).X (m|
|000033e0| 65 73 73 61 67 65 20 22 | 43 61 6c 6c 69 6e 67 20 |essage "|Calling |
|000033f0| 6d 65 74 61 73 65 72 76 | 65 72 20 61 74 20 25 73 |metaserv|er at %s|
|00003400| 20 25 64 2e 2e 2e 22 20 | 6d 65 74 61 73 65 72 76 | %d..." |metaserv|
|00003410| 65 72 2d 73 69 74 65 20 | 6d 65 74 61 73 65 72 76 |er-site |metaserv|
|00003420| 65 72 2d 70 6f 72 74 29 | 0a 58 20 20 28 73 77 69 |er-port)|.X (swi|
|00003430| 74 63 68 2d 74 6f 2d 62 | 75 66 66 65 72 20 22 2a |tch-to-b|uffer "*|
|00003440| 4d 65 74 61 53 65 72 76 | 65 72 2a 22 29 0a 58 20 |MetaServ|er*").X |
|00003450| 20 28 6d 65 74 61 73 65 | 72 76 65 72 2d 6d 6f 64 | (metase|rver-mod|
|00003460| 65 29 0a 58 20 20 28 69 | 66 20 62 75 66 66 65 72 |e).X (i|f buffer|
|00003470| 2d 72 65 61 64 2d 6f 6e | 6c 79 20 28 74 6f 67 67 |-read-on|ly (togg|
|00003480| 6c 65 2d 72 65 61 64 2d | 6f 6e 6c 79 29 29 0a 58 |le-read-|only)).X|
|00003490| 20 20 28 65 72 61 73 65 | 2d 62 75 66 66 65 72 29 | (erase|-buffer)|
|000034a0| 0a 58 20 20 28 73 65 74 | 71 20 6d 65 74 61 73 65 |.X (set|q metase|
|000034b0| 72 76 65 72 2d 73 65 72 | 76 65 72 2d 6f 75 74 70 |rver-ser|ver-outp|
|000034c0| 75 74 20 6e 69 6c 0a 58 | 09 6d 65 74 61 73 65 72 |ut nil.X|.metaser|
|000034d0| 76 65 72 2d 65 6d 70 74 | 79 2d 6c 69 73 74 20 6e |ver-empt|y-list n|
|000034e0| 69 6c 0a 58 09 6d 65 74 | 61 73 65 72 76 65 72 2d |il.X.met|aserver-|
|000034f0| 6f 70 65 6e 2d 6c 69 73 | 74 20 6e 69 6c 29 0a 58 |open-lis|t nil).X|
|00003500| 20 20 28 73 65 74 2d 70 | 72 6f 63 65 73 73 2d 66 | (set-p|rocess-f|
|00003510| 69 6c 74 65 72 0a 58 20 | 20 20 28 6f 70 65 6e 2d |ilter.X | (open-|
|00003520| 6e 65 74 77 6f 72 6b 2d | 73 74 72 65 61 6d 20 22 |network-|stream "|
|00003530| 6d 65 74 61 73 65 72 76 | 65 72 22 20 6e 69 6c 20 |metaserv|er" nil |
|00003540| 6d 65 74 61 73 65 72 76 | 65 72 2d 73 69 74 65 20 |metaserv|er-site |
|00003550| 6d 65 74 61 73 65 72 76 | 65 72 2d 70 6f 72 74 29 |metaserv|er-port)|
|00003560| 0a 58 20 20 20 27 6d 65 | 74 61 73 65 72 76 65 72 |.X 'me|taserver|
|00003570| 2d 66 69 6c 74 65 72 29 | 29 0a 58 0a 58 28 64 65 |-filter)|).X.X(de|
|00003580| 66 75 6e 20 6d 65 74 61 | 73 65 72 76 65 72 2d 71 |fun meta|server-q|
|00003590| 75 69 74 20 28 29 0a 58 | 20 20 28 69 6e 74 65 72 |uit ().X| (inter|
|000035a0| 61 63 74 69 76 65 29 0a | 58 20 20 28 6b 69 6c 6c |active).|X (kill|
|000035b0| 2d 62 75 66 66 65 72 20 | 22 2a 4d 65 74 61 53 65 |-buffer |"*MetaSe|
|000035c0| 72 76 65 72 2a 22 29 29 | 0a 58 0a 58 28 64 65 66 |rver*"))|.X.X(def|
|000035d0| 75 6e 20 6d 65 74 61 73 | 65 72 76 65 72 2d 72 75 |un metas|erver-ru|
|000035e0| 6e 2d 6e 65 74 72 65 6b | 20 28 29 0a 58 20 20 22 |n-netrek| ().X "|
|000035f0| 52 75 6e 20 61 20 6e 65 | 74 72 65 6b 20 63 6c 69 |Run a ne|trek cli|
|00003600| 65 6e 74 20 69 6e 20 74 | 68 65 20 62 61 63 6b 67 |ent in t|he backg|
|00003610| 72 6f 75 6e 64 2e 22 0a | 58 20 20 28 69 6e 74 65 |round.".|X (inte|
|00003620| 72 61 63 74 69 76 65 29 | 0a 58 20 20 28 69 66 20 |ractive)|.X (if |
|00003630| 28 61 6e 64 20 6d 65 74 | 61 73 65 72 76 65 72 2d |(and met|aserver-|
|00003640| 75 73 65 2d 62 61 63 6b | 67 72 6f 75 6e 64 20 28 |use-back|ground (|
|00003650| 6e 6f 74 20 28 62 6f 75 | 6e 64 70 20 27 62 61 63 |not (bou|ndp 'bac|
|00003660| 6b 67 72 6f 75 6e 64 29 | 29 29 0a 58 20 20 20 20 |kground)|)).X |
|00003670| 20 20 28 6c 6f 61 64 20 | 22 62 61 63 6b 67 72 6f | (load |"backgro|
|00003680| 75 6e 64 22 20 6e 69 6c | 20 74 29 29 0a 58 20 20 |und" nil| t)).X |
|00003690| 28 69 66 20 28 6e 6f 74 | 20 28 67 65 74 65 6e 76 |(if (not| (getenv|
|000036a0| 20 22 44 49 53 50 4c 41 | 59 22 29 29 0a 58 20 20 | "DISPLA|Y")).X |
|000036b0| 20 20 20 20 28 6d 65 73 | 73 61 67 65 20 22 44 49 | (mes|sage "DI|
|000036c0| 53 50 4c 41 59 20 76 61 | 72 69 61 62 6c 65 20 6e |SPLAY va|riable n|
|000036d0| 6f 74 20 73 65 74 2e 2e | 2e 20 6d 75 73 74 20 75 |ot set..|. must u|
|000036e0| 73 65 20 58 77 69 6e 64 | 6f 77 73 20 74 6f 20 70 |se Xwind|ows to p|
|000036f0| 6c 61 79 20 6e 65 74 72 | 65 6b 21 22 29 0a 58 20 |lay netr|ek!").X |
|00003700| 20 20 20 28 73 61 76 65 | 2d 65 78 63 75 72 73 69 | (save|-excursi|
|00003710| 6f 6e 0a 58 20 20 20 20 | 20 20 28 6c 65 74 2a 20 |on.X | (let* |
|00003720| 28 28 74 6d 70 20 28 62 | 75 66 66 65 72 2d 73 75 |((tmp (b|uffer-su|
|00003730| 62 73 74 72 69 6e 67 20 | 28 70 72 6f 67 6e 20 28 |bstring |(progn (|
|00003740| 62 65 67 69 6e 6e 69 6e | 67 2d 6f 66 2d 6c 69 6e |beginnin|g-of-lin|
|00003750| 65 29 20 28 70 6f 69 6e | 74 29 29 0a 58 09 09 09 |e) (poin|t)).X...|
|00003760| 09 20 20 20 20 28 70 72 | 6f 67 6e 20 28 65 6e 64 |. (pr|ogn (end|
|00003770| 2d 6f 66 2d 6c 69 6e 65 | 29 20 28 70 6f 69 6e 74 |-of-line|) (point|
|00003780| 29 29 29 29 0a 58 09 20 | 20 20 20 20 28 73 69 74 |)))).X. | (sit|
|00003790| 65 20 28 73 75 62 73 74 | 72 69 6e 67 20 74 6d 70 |e (subst|ring tmp|
|000037a0| 20 30 20 28 73 74 72 69 | 6e 67 2d 6d 61 74 63 68 | 0 (stri|ng-match|
|000037b0| 20 22 20 22 20 74 6d 70 | 29 29 29 0a 58 09 20 20 | " " tmp|))).X. |
|000037c0| 20 20 20 28 70 6f 72 74 | 20 32 35 39 32 29 0a 58 | (port| 2592).X|
|000037d0| 09 20 20 20 20 20 28 74 | 6d 70 6c 69 73 74 20 28 |. (t|mplist (|
|000037e0| 69 66 20 6d 65 74 61 73 | 65 72 76 65 72 2d 6c 69 |if metas|erver-li|
|000037f0| 73 74 2d 61 6c 6c 0a 58 | 09 09 09 20 20 28 61 70 |st-all.X|... (ap|
|00003800| 70 65 6e 64 20 6d 65 74 | 61 73 65 72 76 65 72 2d |pend met|aserver-|
|00003810| 6f 70 65 6e 2d 6c 69 73 | 74 20 6d 65 74 61 73 65 |open-lis|t metase|
|00003820| 72 76 65 72 2d 65 6d 70 | 74 79 2d 6c 69 73 74 29 |rver-emp|ty-list)|
|00003830| 0a 58 09 09 09 6d 65 74 | 61 73 65 72 76 65 72 2d |.X...met|aserver-|
|00003840| 6f 70 65 6e 2d 6c 69 73 | 74 29 29 29 0a 58 09 28 |open-lis|t))).X.(|
|00003850| 77 68 69 6c 65 20 74 6d | 70 6c 69 73 74 0a 58 09 |while tm|plist.X.|
|00003860| 20 20 28 6c 65 74 2a 20 | 28 28 63 75 72 72 65 6e | (let* |((curren|
|00003870| 74 2d 73 69 74 65 20 28 | 63 61 72 20 28 63 61 72 |t-site (|car (car|
|00003880| 20 74 6d 70 6c 69 73 74 | 29 29 29 0a 58 09 09 20 | tmplist|))).X.. |
|00003890| 28 63 75 72 72 65 6e 74 | 2d 70 6f 72 74 20 28 63 |(current|-port (c|
|000038a0| 61 72 20 28 63 64 72 20 | 28 63 61 72 20 74 6d 70 |ar (cdr |(car tmp|
|000038b0| 6c 69 73 74 29 29 29 29 | 29 0a 58 09 20 20 20 20 |list))))|).X. |
|000038c0| 28 69 66 20 28 65 71 75 | 61 6c 20 63 75 72 72 65 |(if (equ|al curre|
|000038d0| 6e 74 2d 73 69 74 65 20 | 73 69 74 65 29 0a 58 09 |nt-site |site).X.|
|000038e0| 09 28 6c 65 74 2a 20 28 | 28 74 68 65 2d 63 6f 6d |.(let* (|(the-com|
|000038f0| 6d 61 6e 64 20 28 63 6f | 6e 63 61 74 20 28 69 66 |mand (co|ncat (if|
|00003900| 20 6d 65 74 61 73 65 72 | 76 65 72 2d 75 73 65 2d | metaser|ver-use-|
|00003910| 62 6f 72 67 0a 58 09 09 | 09 09 09 09 6d 65 74 61 |borg.X..|....meta|
|00003920| 73 65 72 76 65 72 2d 62 | 6f 72 67 2d 62 69 6e 61 |server-b|org-bina|
|00003930| 72 79 0a 58 09 09 09 09 | 09 20 20 20 20 20 20 6d |ry.X....|. m|
|00003940| 65 74 61 73 65 72 76 65 | 72 2d 6e 65 74 72 65 6b |etaserve|r-netrek|
|00003950| 2d 62 69 6e 61 72 79 29 | 0a 58 09 09 09 09 09 20 |-binary)|.X..... |
|00003960| 20 20 20 22 20 2d 68 20 | 22 20 73 69 74 65 20 22 | " -h |" site "|
|00003970| 20 2d 70 20 22 0a 58 09 | 09 09 09 09 20 20 20 20 | -p ".X.|.... |
|00003980| 28 69 6e 74 2d 74 6f 2d | 73 74 72 69 6e 67 20 70 |(int-to-|string p|
|00003990| 6f 72 74 29 29 29 29 0a | 58 09 09 20 20 28 69 66 |ort)))).|X.. (if|
|000039a0| 20 6d 65 74 61 73 65 72 | 76 65 72 2d 75 73 65 2d | metaser|ver-use-|
|000039b0| 62 61 63 6b 67 72 6f 75 | 6e 64 0a 58 09 09 20 20 |backgrou|nd.X.. |
|000039c0| 20 20 20 20 28 62 61 63 | 6b 67 72 6f 75 6e 64 20 | (bac|kground |
|000039d0| 74 68 65 2d 63 6f 6d 6d | 61 6e 64 29 0a 58 09 09 |the-comm|and).X..|
|000039e0| 20 20 20 20 28 73 74 61 | 72 74 2d 70 72 6f 63 65 | (sta|rt-proce|
|000039f0| 73 73 20 22 6e 65 74 72 | 65 6b 22 20 6e 69 6c 20 |ss "netr|ek" nil |
|00003a00| 73 68 65 6c 6c 2d 66 69 | 6c 65 2d 6e 61 6d 65 20 |shell-fi|le-name |
|00003a10| 22 2d 63 22 20 0a 58 09 | 09 09 09 20 20 20 20 28 |"-c" .X.|... (|
|00003a20| 6d 65 73 73 61 67 65 20 | 74 68 65 2d 63 6f 6d 6d |message |the-comm|
|00003a30| 61 6e 64 29 29 29 0a 58 | 09 09 20 20 28 73 65 74 |and))).X|.. (set|
|00003a40| 71 20 74 6d 70 6c 69 73 | 74 20 6e 69 6c 29 29 0a |q tmplis|t nil)).|
|00003a50| 58 09 20 20 20 20 20 20 | 28 73 65 74 71 20 74 6d |X. |(setq tm|
|00003a60| 70 6c 69 73 74 20 28 63 | 64 72 20 74 6d 70 6c 69 |plist (c|dr tmpli|
|00003a70| 73 74 29 29 29 29 29 29 | 29 29 29 0a 58 20 20 0a |st))))))|))).X .|
|00003a80| 58 28 64 65 66 75 6e 20 | 67 72 61 62 2d 63 75 72 |X(defun |grab-cur|
|00003a90| 72 65 6e 74 2d 6c 69 6e | 65 20 28 29 0a 58 20 20 |rent-lin|e ().X |
|00003aa0| 28 62 75 66 66 65 72 2d | 73 75 62 73 74 72 69 6e |(buffer-|substrin|
|00003ab0| 67 20 28 70 72 6f 67 6e | 20 28 62 65 67 69 6e 6e |g (progn| (beginn|
|00003ac0| 69 6e 67 2d 6f 66 2d 6c | 69 6e 65 29 20 28 70 6f |ing-of-l|ine) (po|
|00003ad0| 69 6e 74 29 29 0a 58 09 | 09 20 20 20 20 28 70 72 |int)).X.|. (pr|
|00003ae0| 6f 67 6e 20 28 65 6e 64 | 2d 6f 66 2d 6c 69 6e 65 |ogn (end|-of-line|
|00003af0| 29 20 28 70 6f 69 6e 74 | 29 29 29 29 0a 45 4e 44 |) (point|)))).END|
|00003b00| 5f 4f 46 5f 46 49 4c 45 | 0a 69 66 20 74 65 73 74 |_OF_FILE|.if test|
|00003b10| 20 31 32 33 31 36 20 2d | 6e 65 20 60 77 63 20 2d | 12316 -|ne `wc -|
|00003b20| 63 20 3c 27 6d 65 74 61 | 2d 73 65 72 76 65 72 2e |c <'meta|-server.|
|00003b30| 65 6c 27 60 3b 20 74 68 | 65 6e 0a 20 20 20 20 65 |el'`; th|en. e|
|00003b40| 63 68 6f 20 73 68 61 72 | 3a 20 5c 22 27 6d 65 74 |cho shar|: \"'met|
|00003b50| 61 2d 73 65 72 76 65 72 | 2e 65 6c 27 5c 22 20 75 |a-server|.el'\" u|
|00003b60| 6e 70 61 63 6b 65 64 20 | 77 69 74 68 20 77 72 6f |npacked |with wro|
|00003b70| 6e 67 20 73 69 7a 65 21 | 0a 66 69 0a 23 20 65 6e |ng size!|.fi.# en|
|00003b80| 64 20 6f 66 20 27 6d 65 | 74 61 2d 73 65 72 76 65 |d of 'me|ta-serve|
|00003b90| 72 2e 65 6c 27 0a 66 69 | 0a 69 66 20 74 65 73 74 |r.el'.fi|.if test|
|00003ba0| 20 2d 66 20 27 6d 65 74 | 61 2d 73 65 72 76 65 72 | -f 'met|a-server|
|00003bb0| 2e 64 6f 63 27 20 2d 61 | 20 22 24 7b 31 7d 22 20 |.doc' -a| "${1}" |
|00003bc0| 21 3d 20 22 2d 63 22 20 | 3b 20 74 68 65 6e 20 0a |!= "-c" |; then .|
|00003bd0| 20 20 65 63 68 6f 20 73 | 68 61 72 3a 20 57 69 6c | echo s|har: Wil|
|00003be0| 6c 20 6e 6f 74 20 63 6c | 6f 62 62 65 72 20 65 78 |l not cl|obber ex|
|00003bf0| 69 73 74 69 6e 67 20 66 | 69 6c 65 20 5c 22 27 6d |isting f|ile \"'m|
|00003c00| 65 74 61 2d 73 65 72 76 | 65 72 2e 64 6f 63 27 5c |eta-serv|er.doc'\|
|00003c10| 22 0a 65 6c 73 65 0a 65 | 63 68 6f 20 73 68 61 72 |".else.e|cho shar|
|00003c20| 3a 20 45 78 74 72 61 63 | 74 69 6e 67 20 5c 22 27 |: Extrac|ting \"'|
|00003c30| 6d 65 74 61 2d 73 65 72 | 76 65 72 2e 64 6f 63 27 |meta-ser|ver.doc'|
|00003c40| 5c 22 20 5c 28 34 38 37 | 31 20 63 68 61 72 61 63 |\" \(487|1 charac|
|00003c50| 74 65 72 73 5c 29 0a 73 | 65 64 20 22 73 2f 5e 58 |ters\).s|ed "s/^X|
|00003c60| 2f 2f 22 20 3e 27 6d 65 | 74 61 2d 73 65 72 76 65 |//" >'me|ta-serve|
|00003c70| 72 2e 64 6f 63 27 20 3c | 3c 27 45 4e 44 5f 4f 46 |r.doc' <|<'END_OF|
|00003c80| 5f 46 49 4c 45 27 0a 58 | 09 09 09 20 20 20 20 20 |_FILE'.X|... |
|00003c90| 4d 45 54 41 53 45 52 56 | 45 52 20 4d 4f 44 45 20 |METASERV|ER MODE |
|00003ca0| 76 31 2e 35 62 0a 58 09 | 09 09 09 20 20 20 20 20 |v1.5b.X.|... |
|00003cb0| 20 42 59 0a 58 09 09 09 | 20 20 20 20 20 57 49 4c | BY.X...| WIL|
|00003cc0| 4c 49 41 4d 20 4d 49 43 | 48 41 45 4c 20 50 45 52 |LIAM MIC|HAEL PER|
|00003cd0| 52 59 0a 58 09 09 09 20 | 20 20 20 20 28 77 6d 70 |RY.X... | (wmp|
|00003ce0| 65 72 72 79 40 69 6e 64 | 69 61 6e 61 2e 65 64 75 |erry@ind|iana.edu|
|00003cf0| 29 0a 58 09 09 09 20 20 | 20 20 20 20 20 4e 6f 76 |).X... | Nov|
|00003d00| 65 6d 62 65 72 20 31 34 | 2c 20 31 39 39 32 0a 58 |ember 14|, 1992.X|
|00003d10| 0a 58 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.X------|--------|
|00003d20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003d30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003d40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003d50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003d60| 2d 0a 58 54 68 69 73 20 | 69 73 20 61 6e 20 65 6c |-.XThis |is an el|
|00003d70| 69 73 70 20 70 61 63 6b | 61 67 65 20 74 6f 20 69 |isp pack|age to i|
|00003d80| 6e 74 65 72 66 61 63 65 | 20 77 69 74 68 20 74 68 |nterface| with th|
|00003d90| 65 20 6e 65 74 72 65 6b | 20 6d 65 74 61 73 65 72 |e netrek| metaser|
|00003da0| 76 65 72 2d 49 49 2e 0a | 58 49 74 20 77 69 6c 6c |ver-II..|XIt will|
|00003db0| 20 70 75 74 20 61 20 6c | 69 73 74 20 6f 66 20 61 | put a l|ist of a|
|00003dc0| 6c 6c 20 61 63 74 69 76 | 65 20 73 65 72 76 65 72 |ll activ|e server|
|00003dd0| 73 20 69 6e 20 61 20 62 | 75 66 66 65 72 2e 20 20 |s in a b|uffer. |
|00003de0| 4c 69 73 74 69 6e 67 20 | 74 68 65 20 23 0a 58 6f |Listing |the #.Xo|
|00003df0| 66 20 70 6c 61 79 65 72 | 20 73 6c 6f 74 73 20 6f |f player| slots o|
|00003e00| 70 65 6e 20 61 6e 64 20 | 74 68 65 20 6c 61 73 74 |pen and |the last|
|00003e10| 20 74 69 6d 65 20 61 20 | 73 65 72 76 65 72 20 77 | time a |server w|
|00003e20| 61 73 20 63 68 65 63 6b | 65 64 20 62 79 20 74 68 |as check|ed by th|
|00003e30| 65 0a 58 6d 65 74 61 73 | 65 72 76 65 72 2e 0a 58 |e.Xmetas|erver..X|
|00003e40| 0a 58 54 68 65 20 66 6f | 6c 6c 6f 77 69 6e 67 20 |.XThe fo|llowing |
|00003e50| 6b 65 79 73 20 61 72 65 | 20 64 65 66 69 6e 65 64 |keys are| defined|
|00003e60| 20 69 6e 20 6d 65 74 61 | 73 65 72 76 65 72 2d 6d | in meta|server-m|
|00003e70| 6f 64 65 3a 0a 58 68 2f | 3f 20 6d 65 74 61 73 65 |ode:.Xh/|? metase|
|00003e80| 72 76 65 72 2d 64 65 73 | 63 72 69 62 65 2d 62 72 |rver-des|cribe-br|
|00003e90| 69 65 66 6c 79 3a 20 73 | 68 6f 77 20 28 76 65 72 |iefly: s|how (ver|
|00003ea0| 79 29 20 69 6e 63 6f 6d | 70 6c 65 74 65 20 6c 69 |y) incom|plete li|
|00003eb0| 73 74 20 6f 66 20 6b 65 | 79 20 66 75 6e 63 74 69 |st of ke|y functi|
|00003ec0| 6f 6e 73 0a 58 0a 58 62 | 2f 42 20 6d 65 74 61 73 |ons.X.Xb|/B metas|
|00003ed0| 65 72 76 65 72 2d 74 6f | 67 67 6c 65 2d 62 6f 72 |erver-to|ggle-bor|
|00003ee0| 67 3a 20 74 6f 67 67 6c | 65 73 20 77 68 65 74 68 |g: toggl|es wheth|
|00003ef0| 65 72 20 74 6f 20 75 73 | 65 20 74 68 65 20 63 6c |er to us|e the cl|
|00003f00| 69 65 6e 74 0a 58 20 20 | 20 20 20 20 20 20 20 20 |ient.X | |
|00003f10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003f20| 20 20 73 70 65 63 69 66 | 69 65 64 20 62 79 20 62 | specif|ied by b|
|00003f30| 6f 72 67 2d 62 69 6e 61 | 72 79 20 6f 72 20 74 68 |org-bina|ry or th|
|00003f40| 65 20 6e 6f 72 6d 61 6c | 0a 58 20 20 20 20 20 20 |e normal|.X |
|00003f50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003f60| 20 20 20 20 20 20 6e 65 | 74 72 65 6b 2d 62 69 6e | ne|trek-bin|
|00003f70| 61 72 79 2e 20 20 4d 6f | 64 65 2d 6e 61 6d 65 20 |ary. Mo|de-name |
|00003f80| 63 68 61 6e 67 65 73 20 | 74 6f 0a 58 20 20 20 20 |changes |to.X |
|00003f90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003fa0| 20 20 20 20 20 20 20 20 | 4d 65 74 61 73 65 72 76 | |Metaserv|
|00003fb0| 65 72 2d 42 6f 72 67 20 | 77 68 65 6e 20 62 6f 72 |er-Borg |when bor|
|00003fc0| 67 20 6f 70 74 69 6f 6e | 20 69 73 0a 58 20 20 20 |g option| is.X |
|00003fd0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00003fe0| 20 20 20 20 20 20 20 20 | 20 61 63 74 69 76 65 2e | | active.|
|00003ff0| 0a 58 0a 58 6c 2f 4c 20 | 6d 65 74 61 73 65 72 76 |.X.Xl/L |metaserv|
|00004000| 65 72 2d 74 6f 67 67 6c | 65 2d 6c 69 73 74 3a 20 |er-toggl|e-list: |
|00004010| 74 6f 67 67 6c 65 73 20 | 77 68 65 74 68 65 72 20 |toggles |whether |
|00004020| 74 6f 20 6c 69 73 74 20 | 61 6c 6c 20 74 68 65 20 |to list |all the |
|00004030| 6e 65 74 72 65 6b 0a 58 | 20 20 20 20 20 20 20 20 |netrek.X| |
|00004040| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004050| 20 20 20 20 73 65 72 76 | 65 72 73 20 6f 72 20 6a | serv|ers or j|
|00004060| 75 73 74 20 6f 6e 65 73 | 20 77 69 74 68 20 61 63 |ust ones| with ac|
|00004070| 74 69 76 65 20 67 61 6d | 65 73 2e 0a 58 20 20 20 |tive gam|es..X |
|00004080| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004090| 20 20 20 20 20 20 20 20 | 20 4d 6f 64 65 2d 6e 61 | | Mode-na|
|000040a0| 6d 65 20 63 68 61 6e 67 | 65 73 20 74 6f 20 4d 65 |me chang|es to Me|
|000040b0| 74 61 73 65 72 76 65 72 | 2d 41 6c 6c 20 77 68 65 |taserver|-All whe|
|000040c0| 6e 0a 58 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |n.X | |
|000040d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 6c | | l|
|000040e0| 69 73 74 69 6e 67 20 61 | 6c 6c 20 73 69 74 65 73 |isting a|ll sites|
|000040f0| 2e 0a 58 0a 58 20 20 50 | 20 20 20 20 20 20 20 20 |..X.X P| |
|00004100| 6d 65 74 61 73 65 72 76 | 65 72 2d 70 69 6e 67 3a |metaserv|er-ping:|
|00004110| 20 70 69 6e 67 73 20 74 | 68 65 20 73 70 65 63 69 | pings t|he speci|
|00004120| 66 69 65 64 20 73 65 72 | 76 65 72 2e 20 20 53 74 |fied ser|ver. St|
|00004130| 61 74 75 73 20 6f 66 20 | 74 68 65 0a 58 20 20 20 |atus of |the.X |
|00004140| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00004150| 20 20 20 20 20 20 20 20 | 20 70 69 6e 67 20 69 73 | | ping is|
|00004160| 20 66 6c 61 73 68 65 64 | 20 69 6e 20 74 68 65 20 | flashed| in the |
|00004170| 6d 69 6e 69 62 75 66 66 | 65 72 2e 0a 58 0a 58 71 |minibuff|er..X.Xq|
|00004180| 2f 51 20 20 20 20 20 20 | 20 20 71 75 69 74 2d 6d |/Q | quit-m|
|00004190| 65 74 61 73 65 72 76 65 | 72 3a 20 65 78 69 74 20 |etaserve|r: exit |
|000041a0| 6d 65 74 61 73 65 72 76 | 65 72 2d 6d 6f 64 65 2c |metaserv|er-mode,|
|000041b0| 20 6b 69 6c 6c 69 6e 67 | 20 62 75 66 66 65 72 0a | killing| buffer.|
|000041c0| 58 0a 58 72 2f 52 20 72 | 65 66 72 65 73 68 2d 6d |X.Xr/R r|efresh-m|
|000041d0| 65 74 61 73 65 72 76 65 | 72 3a 20 75 70 64 61 74 |etaserve|r: updat|
|000041e0| 65 20 6c 69 73 74 20 66 | 72 6f 6d 20 74 68 65 20 |e list f|rom the |
|000041f0| 6d 65 74 61 73 65 72 76 | 65 72 2e 20 20 43 61 6c |metaserv|er. Cal|
|00004200| 6c 0a 58 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |l.X | |
|00004210| 20 20 20 20 20 20 20 20 | 20 20 20 74 68 69 73 20 | | this |
|00004220| 66 75 6e 63 74 69 6f 6e | 20 74 6f 20 73 74 61 72 |function| to star|
|00004230| 74 20 74 68 65 20 6d 65 | 74 61 73 65 72 76 65 72 |t the me|taserver|
|00004240| 2e 0a 58 6e 20 20 20 20 | 20 20 20 20 20 20 20 20 |..Xn | |
|00004250| 6e 65 78 74 2d 6c 69 6e | 65 3a 20 67 6f 20 74 6f |next-lin|e: go to|
|00004260| 20 6e 65 78 74 20 6c 69 | 6e 65 0a 58 70 20 20 20 | next li|ne.Xp |
|00004270| 20 20 20 20 20 70 72 65 | 76 69 6f 75 73 2d 6c 69 | pre|vious-li|
|00004280| 6e 65 3a 20 67 6f 20 74 | 6f 20 70 72 65 76 69 6f |ne: go t|o previo|
|00004290| 75 73 20 6c 69 6e 65 0a | 58 20 20 20 20 20 20 20 |us line.|X |
|000042a0| 20 20 20 20 20 20 20 20 | 20 20 53 70 61 63 65 3a | | Space:|
|000042b0| 20 53 63 72 6f 6c 6c 20 | 64 6f 77 6e 20 74 68 72 | Scroll |down thr|
|000042c0| 75 20 6c 69 73 74 20 6f | 66 20 73 69 74 65 73 0a |u list o|f sites.|
|000042d0| 58 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |X | |
|000042e0| 20 44 65 6c 65 74 65 3a | 20 53 63 72 6f 6c 6c 20 | Delete:| Scroll |
|000042f0| 62 61 63 6b 20 75 70 20 | 74 68 72 75 20 6c 69 73 |back up |thru lis|
|00004300| 74 20 6f 66 20 73 69 74 | 65 73 0a 58 20 20 20 20 |t of sit|es.X |
|00004310| 20 20 20 20 20 20 20 20 | 20 20 20 20 52 65 74 75 | | Retu|
|00004320| 72 6e 3a 20 52 75 6e 20 | 78 74 72 65 6b 20 63 6c |rn: Run |xtrek cl|
|00004330| 69 65 6e 74 20 6f 6e 20 | 73 70 65 63 69 66 69 65 |ient on |specifie|
|00004340| 64 20 73 65 72 76 65 72 | 2e 0a 58 0a 58 2d 2d 2d |d server|..X.X---|
|00004350| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004360| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004370| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004380| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004390| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0a 58 43 75 |--------|----.XCu|
|000043a0| 73 74 6f 6d 69 7a 61 62 | 6c 65 20 76 61 72 69 61 |stomizab|le varia|
|000043b0| 62 6c 65 73 3a 0a 58 6d | 65 74 61 73 65 72 76 65 |bles:.Xm|etaserve|
|000043c0| 72 2d 75 73 65 2d 62 61 | 63 6b 67 72 6f 75 6e 64 |r-use-ba|ckground|
|000043d0| 3a 0a 58 20 20 20 20 53 | 68 6f 75 6c 64 20 74 68 |:.X S|hould th|
|000043e0| 65 20 70 72 6f 67 72 61 | 6d 20 75 73 65 20 74 68 |e progra|m use th|
|000043f0| 65 20 62 61 63 6b 67 72 | 6f 75 6e 64 2e 65 6c 20 |e backgr|ound.el |
|00004400| 70 61 63 6b 61 67 65 20 | 6f 72 20 73 70 61 77 6e |package |or spawn|
|00004410| 0a 58 20 20 20 20 70 72 | 6f 63 65 73 73 65 73 20 |.X pr|ocesses |
|00004420| 6f 6e 20 69 74 73 20 6f | 77 6e 3f 20 20 44 65 66 |on its o|wn? Def|
|00004430| 61 75 6c 74 20 69 73 20 | 74 6f 20 73 70 61 77 6e |ault is |to spawn|
|00004440| 20 6f 6e 20 69 74 73 20 | 6f 77 6e 2e 20 20 28 54 | on its |own. (T|
|00004450| 68 69 73 0a 58 20 20 20 | 20 64 6f 65 73 6e 27 74 |his.X | doesn't|
|00004460| 20 6e 6f 74 69 66 79 20 | 79 6f 75 20 69 66 20 61 | notify |you if a|
|00004470| 20 63 6f 6e 6e 65 63 74 | 69 6f 6e 20 69 73 20 72 | connect|ion is r|
|00004480| 65 66 75 73 65 64 20 6f | 72 20 61 20 73 65 72 76 |efused o|r a serv|
|00004490| 65 72 20 69 73 20 64 6f | 77 6e 0a 58 20 20 20 20 |er is do|wn.X |
|000044a0| 74 68 6f 75 67 68 29 20 | 0a 58 0a 58 6d 65 74 61 |though) |.X.Xmeta|
|000044b0| 73 65 72 76 65 72 2d 75 | 73 65 2d 62 6f 72 67 3a |server-u|se-borg:|
|000044c0| 0a 58 20 20 20 20 53 68 | 6f 75 6c 64 20 74 68 65 |.X Sh|ould the|
|000044d0| 20 62 6f 72 67 20 63 6c | 69 65 6e 74 20 62 65 20 | borg cl|ient be |
|000044e0| 75 73 65 64 3f 20 20 44 | 65 66 61 75 6c 74 73 20 |used? D|efaults |
|000044f0| 74 6f 20 6e 69 6c 0a 58 | 0a 58 6d 65 74 61 73 65 |to nil.X|.Xmetase|
|00004500| 72 76 65 72 2d 6c 69 73 | 74 2d 61 6c 6c 3a 0a 58 |rver-lis|t-all:.X|
|00004510| 20 20 20 20 4c 69 73 74 | 20 61 6c 6c 20 73 65 72 | List| all ser|
|00004520| 76 65 72 73 2c 20 6f 72 | 20 6a 75 73 74 20 74 68 |vers, or| just th|
|00004530| 65 20 6f 6e 65 73 20 77 | 69 74 68 20 61 63 74 69 |e ones w|ith acti|
|00004540| 76 65 20 67 61 6d 65 73 | 3f 20 20 44 65 66 61 75 |ve games|? Defau|
|00004550| 6c 74 73 20 74 6f 20 6e | 69 6c 2e 0a 58 0a 58 6d |lts to n|il..X.Xm|
|00004560| 65 74 61 73 65 72 76 65 | 72 2d 70 69 6e 67 2d 70 |etaserve|r-ping-p|
|00004570| 72 6f 67 72 61 6d 3a 0a | 58 20 20 20 20 50 72 6f |rogram:.|X Pro|
|00004580| 67 72 61 6d 20 74 6f 20 | 75 73 65 20 74 6f 20 70 |gram to |use to p|
|00004590| 69 6e 67 20 73 65 72 76 | 65 72 73 2e 20 20 44 65 |ing serv|ers. De|
|000045a0| 66 61 75 6c 74 73 20 74 | 6f 20 22 2f 75 73 72 2f |faults t|o "/usr/|
|000045b0| 65 74 63 2f 70 69 6e 67 | 20 2d 73 22 2e 0a 58 0a |etc/ping| -s"..X.|
|000045c0| 58 6d 65 74 61 73 65 72 | 76 65 72 2d 70 69 6e 67 |Xmetaser|ver-ping|
|000045d0| 2d 70 61 63 6b 65 74 73 | 3a 0a 58 20 20 20 20 23 |-packets|:.X #|
|000045e0| 20 6f 66 20 70 61 63 6b | 65 74 73 20 74 6f 20 73 | of pack|ets to s|
|000045f0| 65 6e 64 20 77 68 65 6e | 20 70 69 6e 67 69 6e 67 |end when| pinging|
|00004600| 2e 20 20 44 65 66 61 75 | 6c 74 73 20 74 6f 20 35 |. Defau|lts to 5|
|00004610| 2e 0a 58 0a 58 6d 65 74 | 61 73 65 72 76 65 72 2d |..X.Xmet|aserver-|
|00004620| 70 69 6e 67 2d 73 69 7a | 65 6f 66 3a 0a 58 20 20 |ping-siz|eof:.X |
|00004630| 20 20 53 69 7a 65 20 69 | 6e 20 62 79 74 65 73 20 | Size i|n bytes |
|00004640| 6f 66 20 65 61 63 68 20 | 70 61 63 6b 65 74 20 74 |of each |packet t|
|00004650| 6f 20 73 65 6e 64 20 77 | 68 65 6e 20 70 69 6e 67 |o send w|hen ping|
|00004660| 69 6e 67 2e 20 20 44 65 | 66 61 75 6c 74 73 20 74 |ing. De|faults t|
|00004670| 6f 20 36 34 2e 0a 58 0a | 58 6d 65 74 61 73 65 72 |o 64..X.|Xmetaser|
|00004680| 76 65 72 2d 73 69 74 65 | 3a 20 0a 58 20 20 20 20 |ver-site|: .X |
|00004690| 48 6f 73 74 20 77 68 65 | 72 65 20 74 68 65 20 6d |Host whe|re the m|
|000046a0| 65 74 61 73 65 72 76 65 | 72 20 6c 69 76 65 73 2e |etaserve|r lives.|
|000046b0| 20 20 44 65 66 61 75 6c | 74 73 20 74 6f 20 22 63 | Defaul|ts to "c|
|000046c0| 68 61 72 6f 6e 2e 61 6d | 64 61 68 6c 2e 63 6f 6d |haron.am|dahl.com|
|000046d0| 22 0a 58 0a 58 6d 65 74 | 61 73 65 72 76 65 72 2d |".X.Xmet|aserver-|
|000046e0| 70 6f 72 74 3a 20 0a 58 | 20 20 20 20 50 6f 72 74 |port: .X| Port|
|000046f0| 20 74 6f 20 71 75 65 72 | 79 2e 20 20 44 65 66 61 | to quer|y. Defa|
|00004700| 75 6c 74 73 20 74 6f 20 | 33 35 32 31 2e 0a 58 0a |ults to |3521..X.|
|00004710| 58 6d 65 74 61 73 65 72 | 76 65 72 2d 62 6f 72 67 |Xmetaser|ver-borg|
|00004720| 2d 62 69 6e 61 72 79 3a | 0a 58 20 20 20 20 43 6c |-binary:|.X Cl|
|00004730| 69 65 6e 74 20 74 6f 20 | 72 75 6e 20 77 68 65 6e |ient to |run when|
|00004740| 20 75 73 69 6e 67 20 61 | 20 62 6f 72 67 2e 20 20 | using a| borg. |
|00004750| 44 65 66 61 75 6c 74 73 | 20 74 6f 20 22 73 75 6e |Defaults| to "sun|
|00004760| 62 6f 72 67 33 2e 73 75 | 6e 22 0a 58 0a 58 6e 65 |borg3.su|n".X.Xne|
|00004770| 74 61 73 65 72 76 65 72 | 2d 6e 65 74 72 65 6b 2d |taserver|-netrek-|
|00004780| 62 69 6e 61 72 79 3a 0a | 58 20 20 20 20 54 68 65 |binary:.|X The|
|00004790| 20 22 6e 6f 72 6d 61 6c | 22 20 6e 65 74 72 65 6b | "normal|" netrek|
|000047a0| 20 63 6c 69 65 6e 74 2e | 20 20 44 65 66 61 75 6c | client.| Defaul|
|000047b0| 74 73 20 74 6f 20 22 6e | 65 74 72 65 6b 5f 75 64 |ts to "n|etrek_ud|
|000047c0| 70 22 0a 58 0a 58 6d 65 | 74 61 73 65 72 76 65 72 |p".X.Xme|taserver|
|000047d0| 2d 65 6d 70 74 79 2d 73 | 69 74 65 2d 72 65 67 65 |-empty-s|ite-rege|
|000047e0| 78 70 3a 20 0a 58 20 20 | 20 20 52 65 67 75 6c 61 |xp: .X | Regula|
|000047f0| 72 20 65 78 70 72 65 73 | 73 69 6f 6e 20 74 68 61 |r expres|sion tha|
|00004800| 74 20 6d 61 74 63 68 65 | 73 20 65 6d 70 74 79 20 |t matche|s empty |
|00004810| 73 69 74 65 73 2e 20 20 | 44 65 66 61 75 6c 74 73 |sites. |Defaults|
|00004820| 20 74 6f 20 6d 65 74 61 | 73 65 72 76 65 72 2d 49 | to meta|server-I|
|00004830| 49 0a 58 20 20 20 20 74 | 79 70 65 20 6d 65 73 73 |I.X t|ype mess|
|00004840| 61 67 65 73 2e 20 20 0a | 58 0a 58 6d 65 74 61 73 |ages. .|X.Xmetas|
|00004850| 65 72 76 65 72 2d 68 65 | 61 64 65 72 73 2d 6b 69 |erver-he|aders-ki|
|00004860| 6c 6c 2d 74 6f 3a 0a 58 | 20 20 20 20 52 65 67 75 |ll-to:.X| Regu|
|00004870| 6c 61 72 20 65 78 70 72 | 65 73 73 69 6f 6e 20 74 |lar expr|ession t|
|00004880| 68 61 74 20 6d 61 74 63 | 68 65 73 20 6c 61 73 74 |hat matc|hes last|
|00004890| 20 6c 69 6e 65 20 6f 66 | 20 68 65 61 64 65 72 20 | line of| header |
|000048a0| 69 6e 66 6f 20 66 72 6f | 6d 20 74 68 65 0a 58 20 |info fro|m the.X |
|000048b0| 20 20 20 6d 65 74 61 73 | 65 72 76 65 72 2e 20 0a | metas|erver. .|
|000048c0| 58 0a 58 6d 65 74 61 73 | 65 72 76 65 72 2d 64 61 |X.Xmetas|erver-da|
|000048d0| 74 61 2d 72 65 67 65 78 | 70 3a 0a 58 20 20 20 20 |ta-regex|p:.X |
|000048e0| 50 61 72 65 6e 74 68 65 | 73 69 7a 65 64 20 72 65 |Parenthe|sized re|
|000048f0| 67 75 6c 61 72 20 65 78 | 70 72 65 73 73 69 6f 6e |gular ex|pression|
|00004900| 20 77 68 6f 73 65 20 66 | 69 72 73 74 20 73 65 74 | whose f|irst set|
|00004910| 20 6f 66 20 70 61 72 65 | 6e 74 68 65 73 65 73 20 | of pare|ntheses |
|00004920| 6d 61 74 63 68 65 73 20 | 74 68 65 0a 58 20 20 20 |matches |the.X |
|00004930| 20 6e 65 74 72 65 6b 20 | 73 69 74 65 2c 20 74 68 | netrek |site, th|
|00004940| 65 20 73 65 63 6f 6e 64 | 20 6d 61 74 63 68 65 73 |e second| matches|
|00004950| 20 74 68 65 20 70 6f 72 | 74 20 23 2c 20 61 6e 64 | the por|t #, and|
|00004960| 20 74 68 65 20 74 68 69 | 72 64 20 6d 61 74 63 68 | the thi|rd match|
|00004970| 65 73 20 61 6e 79 20 64 | 61 74 61 0a 58 20 20 20 |es any d|ata.X |
|00004980| 20 74 6f 20 62 65 20 70 | 72 69 6e 74 65 64 20 69 | to be p|rinted i|
|00004990| 6e 20 74 68 65 20 62 75 | 66 66 65 72 2e 0a 58 0a |n the bu|ffer..X.|
|000049a0| 58 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |X-------|--------|
|000049b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000049c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000049d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000049e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000049f0| 0a 58 43 68 61 6e 67 65 | 73 20 73 69 6e 63 65 20 |.XChange|s since |
|00004a00| 56 31 2e 32 62 3a 0a 58 | 2a 20 41 64 64 65 64 20 |V1.2b:.X|* Added |
|00004a10| 6d 65 74 61 73 65 72 76 | 65 72 2d 73 69 74 65 2d |metaserv|er-site-|
|00004a20| 6f 72 64 65 72 20 74 6f | 20 61 6c 6c 6f 77 20 63 |order to| allow c|
|00004a30| 75 73 74 6f 6d 69 7a 61 | 74 69 6f 6e 20 6f 66 20 |ustomiza|tion of |
|00004a40| 6f 72 64 65 72 69 6e 67 | 20 6f 66 20 73 65 72 76 |ordering| of serv|
|00004a50| 65 72 73 20 69 6e 0a 58 | 20 20 74 68 65 20 62 75 |ers in.X| the bu|
|00004a60| 66 66 65 72 2e 0a 58 0a | 58 2a 20 43 68 61 6e 67 |ffer..X.|X* Chang|
|00004a70| 65 64 20 70 69 6e 67 20 | 74 6f 20 69 6e 63 6c 75 |ed ping |to inclu|
|00004a80| 64 65 20 6d 69 6e 2f 61 | 76 67 2f 6d 61 78 20 72 |de min/a|vg/max r|
|00004a90| 6f 75 6e 64 2d 74 72 69 | 70 20 70 61 63 6b 65 74 |ound-tri|p packet|
|00004aa0| 20 74 69 6d 65 2e 0a 58 | 0a 58 2a 20 43 68 61 6e | time..X|.X* Chan|
|00004ab0| 67 65 64 20 72 75 6e 2d | 6e 65 74 72 65 6b 20 74 |ged run-|netrek t|
|00004ac0| 6f 20 75 73 65 20 65 69 | 74 68 65 72 20 62 61 63 |o use ei|ther bac|
|00004ad0| 6b 67 72 6f 75 6e 64 20 | 6f 72 20 73 70 61 77 6e |kground |or spawn|
|00004ae0| 20 69 74 73 20 6f 77 6e | 20 70 72 6f 63 65 73 73 | its own| process|
|00004af0| 65 73 2e 0a 58 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |es..X---|--------|
|00004b00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004b10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004b20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004b30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004b40| 2d 2d 2d 2d 0a 58 43 68 | 61 6e 67 65 73 20 73 69 |----.XCh|anges si|
|00004b50| 6e 63 65 20 56 31 2e 30 | 3a 0a 58 2a 20 42 61 73 |nce V1.0|:.X* Bas|
|00004b60| 69 63 61 6c 6c 79 20 61 | 20 63 6f 6d 70 6c 65 74 |ically a| complet|
|00004b70| 65 20 72 65 77 72 69 74 | 65 2e 2e 2e 20 6f 6e 6c |e rewrit|e... onl|
|00004b80| 79 20 76 61 72 69 61 62 | 6c 65 73 20 61 6e 64 20 |y variab|les and |
|00004b90| 66 75 6e 63 74 69 6f 6e | 20 6e 61 6d 65 73 20 73 |function| names s|
|00004ba0| 74 61 79 65 64 0a 58 20 | 20 74 68 65 20 73 61 6d |tayed.X | the sam|
|00004bb0| 65 0a 58 0a 58 2a 20 44 | 6f 65 73 6e 27 74 20 6b |e.X.X* D|oesn't k|
|00004bc0| 69 6c 6c 20 69 74 73 20 | 6f 6c 64 20 62 75 66 66 |ill its |old buff|
|00004bd0| 65 72 20 61 6e 79 6d 6f | 72 65 2e 20 20 49 20 67 |er anymo|re. I g|
|00004be0| 6f 74 20 74 68 65 20 68 | 61 6e 67 20 6f 66 20 70 |ot the h|ang of p|
|00004bf0| 72 6f 63 65 73 73 20 66 | 69 6c 74 65 72 73 2e 20 |rocess f|ilters. |
|00004c00| 3a 29 0a 58 0a 58 2a 20 | 44 6f 65 73 20 6e 6f 74 |:).X.X* |Does not|
|00004c10| 20 6e 65 65 64 20 74 6f | 20 63 61 6c 6c 20 74 68 | need to| call th|
|00004c20| 65 20 6d 65 74 61 73 65 | 72 76 65 72 20 74 6f 20 |e metase|rver to |
|00004c30| 6c 69 73 74 20 61 6c 6c | 20 73 65 72 76 65 72 73 |list all| servers|
|00004c40| 2e 20 20 4b 65 65 70 73 | 20 32 20 6c 69 73 74 73 |. Keeps| 2 lists|
|00004c50| 20 2d 0a 58 20 20 6f 6e | 65 20 66 6f 72 20 65 6d | -.X on|e for em|
|00004c60| 70 74 79 20 73 65 72 76 | 65 72 73 20 61 6e 64 20 |pty serv|ers and |
|00004c70| 6f 6e 65 20 66 6f 72 20 | 6f 70 65 6e 20 73 65 72 |one for |open ser|
|00004c80| 76 65 72 73 2e 20 20 4a | 75 73 74 20 69 6e 73 65 |vers. J|ust inse|
|00004c90| 72 74 20 74 68 65 20 6c | 69 73 74 73 20 69 6e 74 |rt the l|ists int|
|00004ca0| 6f 0a 58 20 20 61 20 62 | 75 66 66 65 72 20 61 6e |o.X a b|uffer an|
|00004cb0| 64 20 79 6f 75 20 61 72 | 65 20 73 65 74 2e 0a 58 |d you ar|e set..X|
|00004cc0| 0a 58 2a 20 43 61 6e 20 | 6e 6f 77 20 73 75 70 70 |.X* Can |now supp|
|00004cd0| 6f 72 74 20 6d 65 74 61 | 73 65 72 76 65 72 2d 49 |ort meta|server-I|
|00004ce0| 20 77 69 74 68 20 73 6f | 6d 65 20 72 65 67 75 6c | with so|me regul|
|00004cf0| 61 72 20 65 78 70 72 65 | 73 73 69 6f 6e 20 68 61 |ar expre|ssion ha|
|00004d00| 63 6b 69 6e 67 2e 0a 58 | 20 20 45 78 61 6d 70 6c |cking..X| Exampl|
|00004d10| 65 3a 20 6d 65 74 61 73 | 65 72 76 65 72 2d 65 6d |e: metas|erver-em|
|00004d20| 70 74 79 2d 73 69 74 65 | 2d 72 65 67 65 78 70 20 |pty-site|-regexp |
|00004d30| 3d 20 22 43 6f 75 6c 64 | 6e 27 74 5c 5c 7c 20 30 |= "Could|n't\\| 0|
|00004d40| 20 50 6c 61 79 65 72 73 | 22 0a 58 20 20 20 20 20 | Players|".X |
|00004d50| 20 20 20 20 20 20 6d 65 | 74 61 73 65 72 76 65 72 | me|taserver|
|00004d60| 2d 64 61 74 61 2d 72 65 | 67 65 78 70 20 3d 20 22 |-data-re|gexp = "|
|00004d70| 5e 5c 5c 28 5b 5e 28 5d | 2a 5c 5c 29 28 28 5c 5c |^\\([^(]|*\\)((\\|
|00004d80| 28 5b 5e 29 5d 2a 5c 5c | 29 29 20 2a 3a 5c 5c 28 |([^)]*\\|)) *:\\(|
|00004d90| 2e 2a 5c 5c 29 22 0a 58 | 20 20 20 20 20 20 20 20 |.*\\)".X| |
|00004da0| 20 20 20 6d 65 74 61 73 | 65 72 76 65 72 2d 70 6f | metas|erver-po|
|00004db0| 72 74 20 3d 20 33 35 32 | 30 20 3c 2d 20 46 6f 72 |rt = 352|0 <- For|
|00004dc0| 20 63 68 61 72 6f 6e 2e | 61 6d 64 61 68 6c 2e 63 | charon.|amdahl.c|
|00004dd0| 6f 6d 0a 58 20 20 20 20 | 20 20 20 20 20 20 20 6d |om.X | m|
|00004de0| 65 74 61 73 65 72 76 65 | 72 2d 68 65 61 64 65 72 |etaserve|r-header|
|00004df0| 73 2d 6b 69 6c 6c 2d 74 | 6f 20 3d 20 22 5e 2e 2a |s-kill-t|o = "^.*|
|00004e00| 28 5b 30 2d 39 5d 2a 29 | 2e 2a 22 0a 58 20 20 54 |([0-9]*)|.*".X T|
|00004e10| 68 69 73 20 77 6f 72 6b | 73 2c 20 62 75 74 20 74 |his work|s, but t|
|00004e20| 68 65 20 66 6f 72 6d 61 | 74 74 69 6e 67 20 69 73 |he forma|tting is|
|00004e30| 20 61 20 6c 69 74 74 6c | 65 20 73 63 72 65 77 79 | a littl|e screwy|
|00004e40| 2c 20 49 27 64 20 6a 75 | 73 74 20 73 74 69 63 6b |, I'd ju|st stick|
|00004e50| 20 77 69 74 68 0a 58 20 | 20 6d 65 74 61 73 65 72 | with.X | metaser|
|00004e60| 76 65 72 2d 49 49 2e 20 | 20 49 66 20 6e 6f 74 2c |ver-II. | If not,|
|00004e70| 20 6d 6f 64 69 66 79 20 | 74 68 65 20 28 66 6f 72 | modify |the (for|
|00004e80| 6d 61 74 20 58 58 58 58 | 58 29 20 63 61 6c 6c 20 |mat XXXX|X) call |
|00004e90| 69 6e 20 74 68 65 0a 58 | 20 20 6d 65 74 61 73 65 |in the.X| metase|
|00004ea0| 72 76 65 72 2d 69 6e 73 | 65 72 74 2d 6c 69 73 74 |rver-ins|ert-list|
|00004eb0| 20 66 75 6e 63 74 69 6f | 6e 2e 0a 58 0a 58 2a 20 | functio|n..X.X* |
|00004ec0| 4e 6f 20 6c 6f 6e 67 65 | 72 20 74 69 6d 65 20 73 |No longe|r time s|
|00004ed0| 74 61 6d 70 73 20 74 68 | 65 20 62 75 66 66 65 72 |tamps th|e buffer|
|00004ee0| 2e 2e 2e 20 69 66 20 69 | 74 20 6d 61 74 74 65 72 |... if i|t matter|
|00004ef0| 73 2c 20 79 6f 75 20 63 | 61 6e 20 70 75 74 20 69 |s, you c|an put i|
|00004f00| 74 20 69 6e 20 62 79 0a | 58 20 20 61 64 64 69 6e |t in by.|X addin|
|00004f10| 67 20 61 20 6c 69 6e 65 | 20 69 6e 20 6d 65 74 61 |g a line| in meta|
|00004f20| 73 65 72 76 65 72 2d 69 | 6e 73 65 72 74 2d 68 65 |server-i|nsert-he|
|00004f30| 61 64 65 72 73 20 74 6f | 20 69 6e 73 65 72 74 20 |aders to| insert |
|00004f40| 74 68 65 20 74 69 6d 65 | 20 28 66 6f 72 6d 61 74 |the time| (format|
|00004f50| 20 69 74 0a 58 20 20 61 | 73 20 79 6f 75 20 73 65 | it.X a|s you se|
|00004f60| 65 20 66 69 74 2e 20 3a | 29 0a 58 0a 58 2a 20 46 |e fit. :|).X.X* F|
|00004f70| 69 6e 65 20 74 75 6e 69 | 6e 67 2c 20 62 75 74 20 |ine tuni|ng, but |
|00004f80| 49 20 74 68 69 6e 6b 20 | 49 20 6d 61 64 65 20 74 |I think |I made t|
|00004f90| 68 65 20 63 6f 64 65 20 | 75 67 6c 69 65 72 20 3a |he code |uglier :|
|00004fa0| 29 0a 58 0a 58 54 68 61 | 74 20 64 6f 65 73 20 69 |).X.XTha|t does i|
|00004fb0| 74 21 0a 58 45 6e 6a 6f | 79 21 0a 58 0a 58 2d 42 |t!.XEnjo|y!.X.X-B|
|00004fc0| 69 6c 6c 20 50 65 72 72 | 79 20 7c 20 77 6d 70 65 |ill Perr|y | wmpe|
|00004fd0| 72 72 79 40 75 63 73 2e | 69 6e 64 69 61 6e 61 2e |rry@ucs.|indiana.|
|00004fe0| 65 64 75 20 7c 20 43 6f | 6d 6d 61 6e 64 65 72 20 |edu | Co|mmander |
|00004ff0| 41 72 69 6f 63 68 20 7c | 20 43 61 70 74 61 69 6e |Arioch || Captain|
|00005000| 20 45 6c 72 69 63 0a 58 | 0a 58 0a 58 0a 58 0a 45 | Elric.X|.X.X.X.E|
|00005010| 4e 44 5f 4f 46 5f 46 49 | 4c 45 0a 69 66 20 74 65 |ND_OF_FI|LE.if te|
|00005020| 73 74 20 34 38 37 31 20 | 2d 6e 65 20 60 77 63 20 |st 4871 |-ne `wc |
|00005030| 2d 63 20 3c 27 6d 65 74 | 61 2d 73 65 72 76 65 72 |-c <'met|a-server|
|00005040| 2e 64 6f 63 27 60 3b 20 | 74 68 65 6e 0a 20 20 20 |.doc'`; |then. |
|00005050| 20 65 63 68 6f 20 73 68 | 61 72 3a 20 5c 22 27 6d | echo sh|ar: \"'m|
|00005060| 65 74 61 2d 73 65 72 76 | 65 72 2e 64 6f 63 27 5c |eta-serv|er.doc'\|
|00005070| 22 20 75 6e 70 61 63 6b | 65 64 20 77 69 74 68 20 |" unpack|ed with |
|00005080| 77 72 6f 6e 67 20 73 69 | 7a 65 21 0a 66 69 0a 23 |wrong si|ze!.fi.#|
|00005090| 20 65 6e 64 20 6f 66 20 | 27 6d 65 74 61 2d 73 65 | end of |'meta-se|
|000050a0| 72 76 65 72 2e 64 6f 63 | 27 0a 66 69 0a 65 63 68 |rver.doc|'.fi.ech|
|000050b0| 6f 20 73 68 61 72 3a 20 | 45 6e 64 20 6f 66 20 73 |o shar: |End of s|
|000050c0| 68 65 6c 6c 20 61 72 63 | 68 69 76 65 2e 0a 65 78 |hell arc|hive..ex|
|000050d0| 69 74 20 30 0a 2d 2d 20 | 0a 57 69 6c 6c 69 61 6d |it 0.-- |.William|
|000050e0| 20 4d 2e 20 50 65 72 72 | 79 20 20 20 20 20 20 20 | M. Perr|y |
|000050f0| 20 20 20 2f 20 27 57 68 | 65 6e 20 79 6f 75 20 6b | / 'Wh|en you k|
|00005100| 6e 6f 77 20 61 20 74 68 | 69 6e 67 2c 20 74 6f 20 |now a th|ing, to |
|00005110| 68 6f 6c 64 20 74 68 61 | 74 20 79 6f 75 20 6b 6e |hold tha|t you kn|
|00005120| 6f 77 20 69 74 3b 0a 77 | 6d 70 65 72 72 79 40 75 |ow it;.w|mperry@u|
|00005130| 63 73 2e 69 6e 64 69 61 | 6e 61 2e 65 64 75 20 20 |cs.india|na.edu |
|00005140| 2f 20 61 6e 64 20 77 68 | 65 6e 20 79 6f 75 20 64 |/ and wh|en you d|
|00005150| 6f 20 6e 6f 74 20 6b 6e | 6f 77 20 61 20 74 68 69 |o not kn|ow a thi|
|00005160| 6e 67 2c 20 74 6f 20 61 | 6c 6c 6f 77 20 74 68 61 |ng, to a|llow tha|
|00005170| 74 20 79 6f 75 0a 50 68 | 6f 6e 65 3a 20 28 38 31 |t you.Ph|one: (81|
|00005180| 32 29 20 33 33 36 20 2d | 20 33 30 37 31 20 2f 20 |2) 336 -| 3071 / |
|00005190| 64 6f 20 6e 6f 74 20 6b | 6e 6f 77 20 69 74 3b 20 |do not k|now it; |
|000051a0| 74 68 69 73 20 69 73 20 | 6b 6e 6f 77 6c 65 64 67 |this is |knowledg|
|000051b0| 65 2e 27 20 2d 20 43 6f | 6e 66 75 63 69 75 73 0a |e.' - Co|nfucius.|
+--------+-------------------------+-------------------------+--------+--------+
