|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - downloadIndex: ┃ f ┃
Length: 8464 (0x2110)
Names: »ftp.elc«
└─⟦a0efdde77⟧ Bits:30001252 EUUGD11 Tape, 1987 Spring Conference Helsinki
└─ ⟦this⟧ »EUUGD11/gnu-31mar87/emacs/lisp/ftp.elc«
0x0000…0020 0a 28 64 65 66 76 61 72 20 66 74 70 2d 70 61 73 73 77 6f 72 64 2d 61 6c 69 73 74 20 6e 69 6c 20 ┆ (defvar ftp-password-alist nil ┆ 0x0020…0040 22 5c 0a 53 65 63 75 72 69 74 79 20 73 75 63 6b 73 22 29 0a 0a 28 64 65 66 75 6e 20 72 65 61 64 ┆"\ Security sucks") (defun read┆ 0x0040…0060 2d 66 74 70 2d 75 73 65 72 2d 70 61 73 73 77 6f 72 64 20 28 68 6f 73 74 20 75 73 65 72 20 6e 65 ┆-ftp-user-password (host user ne┆ 0x0060…0080 77 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c6 18 09 3f 85 20 00 0a 3c 85 20 00 c7 0b 0a 5c 22 ┆w) (byte-code " ? < \"┆ 0x0080…00a0 41 89 10 85 20 00 0c 3f 86 20 00 c8 0c 08 40 5c 22 83 27 00 08 82 97 00 0c 86 52 00 0a 3c 85 36 ┆A ? @\" ' R < 6┆ 0x00a0…00c0 00 c7 0b 0a 5c 22 41 40 86 3b 00 c9 20 89 10 88 ca cb cc 0b 08 23 21 89 14 88 cd 0c ce 5c 22 85 ┆ \"A@ ; #! \" ┆ 0x00c0…00e0 52 00 08 89 14 88 0c ca cb cf 0c 0b 23 0a 3c 3f 83 64 00 ce 82 77 00 c7 0b 0a 5c 22 41 41 86 77 ┆R # <? d w \"AA w┆ 0x00e0…0100 00 0a 1d d0 d1 8d 29 86 77 00 ce 5c 22 42 89 10 88 d2 ce 21 88 0a 3c 85 8b 00 c8 08 41 ce 5c 22 ┆ ) w \"B ! < A \"┆ 0x0100…0120 3f 85 95 00 0b 08 42 0a 42 89 12 88 08 29 87 22 20 5b 74 65 6d 20 6e 65 77 20 66 74 70 2d 70 61 ┆? B B ) " [tem new ftp-pa┆ 0x0120…0140 73 73 77 6f 72 64 2d 61 6c 69 73 74 20 68 6f 73 74 20 75 73 65 72 20 6c 20 6e 69 6c 20 61 73 73 ┆ssword-alist host user l nil ass┆ 0x0140…0160 6f 63 20 73 74 72 69 6e 67 3d 20 75 73 65 72 2d 6c 6f 67 69 6e 2d 6e 61 6d 65 20 72 65 61 64 2d ┆oc string= user-login-name read-┆ 0x0160…0180 73 74 72 69 6e 67 20 66 6f 72 6d 61 74 20 22 55 73 65 72 2d 6e 61 6d 65 20 66 6f 72 20 25 73 20 ┆string format "User-name for %s ┆ 0x0180…01a0 28 64 65 66 61 75 6c 74 20 5c 22 25 73 5c 22 29 3a 20 22 20 65 71 75 61 6c 20 22 22 20 22 50 61 ┆(default \"%s\"): " equal "" "Pa┆ 0x01a0…01c0 73 73 77 6f 72 64 20 66 6f 72 20 25 73 40 25 73 3a 20 22 20 66 6f 6f 20 28 62 79 74 65 2d 63 6f ┆ssword for %s@%s: " foo (byte-co┆ 0x01c0…01e0 64 65 20 22 08 85 20 00 c3 08 40 41 40 09 5c 22 83 18 00 c4 c5 08 40 41 41 5c 22 82 1c 00 08 41 ┆de " @A@ \" @AA\" A┆ 0x01e0…0200 89 10 88 82 00 00 88 c2 87 22 20 5b 6c 20 75 73 65 72 20 6e 69 6c 20 73 74 72 69 6e 67 3d 20 74 ┆ " [l user nil string= t┆ 0x0200…0220 68 72 6f 77 20 66 6f 6f 5d 20 35 29 20 6d 65 73 73 61 67 65 5d 20 31 34 29 29 0a 0a 28 64 65 66 ┆hrow foo] 5) message] 14)) (def┆ 0x0220…0240 75 6e 20 66 74 70 2d 72 65 61 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 28 70 72 6f 6d 70 74 29 20 28 ┆un ftp-read-file-name (prompt) (┆ 0x0240…0260 62 79 74 65 2d 63 6f 64 65 20 22 c2 18 c3 c4 08 5c 22 3f 85 14 00 c5 09 08 5c 22 89 10 88 82 02 ┆byte-code " \"? \" ┆ 0x0260…0280 00 88 08 c6 c7 21 c8 c7 21 4f 08 c6 c9 21 c8 c9 21 4f 44 29 87 22 20 5b 73 20 70 72 6f 6d 70 74 ┆ ! !O ! !OD) " [s prompt┆ 0x0280…02a0 20 22 22 20 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 5c 5c 60 5b 20 09 5d 2a 5c 5c 28 5b 5e 20 ┆ "" string-match "\\`[ ]*\\([^ ┆ 0x02a0…02c0 09 3a 5d 2b 5c 5c 29 5b 20 09 5d 2a 3a 5c 5c 28 2e 2b 5c 5c 29 5c 5c 27 22 20 72 65 61 64 2d 73 ┆ :]+\\)[ ]*:\\(.+\\)\\'" read-s┆ 0x02c0…02e0 74 72 69 6e 67 20 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 31 20 6d 61 74 63 68 2d 65 6e ┆tring match-beginning 1 match-en┆ 0x02e0…0300 64 20 32 5d 20 31 30 29 29 0a 0a 28 64 65 66 75 6e 20 66 74 70 2d 66 69 6e 64 2d 66 69 6c 65 20 ┆d 2] 10)) (defun ftp-find-file ┆ 0x0300…0320 28 68 6f 73 74 20 66 69 6c 65 20 26 6f 70 74 69 6f 6e 61 6c 20 75 73 65 72 20 70 61 73 73 77 6f ┆(host file &optional user passwo┆ 0x0320…0340 72 64 29 20 22 5c 0a 46 54 50 20 74 6f 20 48 4f 53 54 20 74 6f 20 67 65 74 20 46 49 4c 45 2c 20 ┆rd) "\ FTP to HOST to get FILE, ┆ 0x0340…0360 6c 6f 67 67 69 6e 67 20 69 6e 20 61 73 20 55 53 45 52 20 77 69 74 68 20 70 61 73 73 77 6f 72 64 ┆logging in as USER with password┆ 0x0360…0380 20 50 41 53 53 57 4f 52 44 2e 0a 49 6e 74 65 72 61 63 74 69 76 65 6c 79 2c 20 48 4f 53 54 20 61 ┆ PASSWORD. Interactively, HOST a┆ 0x0380…03a0 6e 64 20 46 49 4c 45 20 61 72 65 20 73 70 65 63 69 66 69 65 64 20 62 79 20 72 65 61 64 69 6e 67 ┆nd FILE are specified by reading┆ 0x03a0…03c0 20 61 20 73 74 72 69 6e 67 20 77 69 74 68 0a 20 61 20 63 6f 6c 6f 6e 20 63 68 61 72 61 63 74 65 ┆ a string with a colon characte┆ 0x03c0…03e0 72 20 73 65 70 61 72 61 74 69 6e 67 20 74 68 65 20 68 6f 73 74 20 66 72 6f 6d 20 74 68 65 20 66 ┆r separating the host from the f┆ 0x03e0…0400 69 6c 65 6e 61 6d 65 2e 0a 55 53 45 52 20 61 6e 64 20 50 41 53 53 57 4f 52 44 20 61 72 65 20 64 ┆ilename. USER and PASSWORD are d┆ 0x0400…0420 65 66 61 75 6c 74 65 64 20 66 72 6f 6d 20 74 68 65 20 76 61 6c 75 65 73 20 75 73 65 64 20 77 68 ┆efaulted from the values used wh┆ 0x0420…0440 65 6e 0a 20 6c 61 73 74 20 66 74 70 69 6e 67 20 66 72 6f 6d 20 48 4f 53 54 20 28 75 6e 6c 65 73 ┆en last ftping from HOST (unles┆ 0x0440…0460 73 20 70 61 73 73 77 6f 72 64 2d 72 65 6d 65 6d 62 65 72 69 6e 67 20 69 73 20 64 69 73 61 62 6c ┆s password-remembering is disabl┆ 0x0460…0480 65 64 29 2e 0a 20 53 75 70 70 6c 79 20 61 20 70 61 73 73 77 6f 72 64 20 6f 66 20 74 68 65 20 73 ┆ed). Supply a password of the s┆ 0x0480…04a0 79 6d 62 6f 6c 20 60 74 27 20 74 6f 20 6f 76 65 72 72 69 64 65 20 74 68 69 73 20 64 65 66 61 75 ┆ymbol `t' to override this defau┆ 0x04a0…04c0 6c 74 0a 20 28 69 6e 74 65 72 61 63 74 69 76 65 6c 79 2c 20 74 68 69 73 20 69 73 20 64 6f 6e 65 ┆lt (interactively, this is done┆ 0x04c0…04e0 20 62 79 20 67 69 76 69 6e 67 20 61 20 70 72 65 66 69 78 20 61 72 67 29 22 20 28 69 6e 74 65 72 ┆ by giving a prefix arg)" (inter┆ 0x04e0…0500 61 63 74 69 76 65 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c2 c3 c4 21 c0 09 3f 3f 44 5c 22 87 22 ┆active (byte-code " ! ??D\" "┆ 0x0500…0520 20 5b 6e 69 6c 20 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 20 61 70 70 65 6e 64 20 ┆ [nil current-prefix-arg append ┆ 0x0520…0540 66 74 70 2d 72 65 61 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 46 54 50 20 67 65 74 20 68 6f 73 74 ┆ftp-read-file-name "FTP get host┆ 0x0540…0560 3a 66 69 6c 65 3a 20 22 5d 20 35 29 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c0 88 c7 0a 0b c4 ┆:file: "] 5)) (byte-code " ┆ 0x0560…0580 0d 0e 06 25 87 22 20 5b 6e 69 6c 20 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 20 68 ┆ % " [nil current-prefix-arg h┆ 0x0580…05a0 6f 73 74 20 66 69 6c 65 20 74 20 75 73 65 72 20 70 61 73 73 77 6f 72 64 20 66 74 70 2d 66 69 6e ┆ost file t user password ftp-fin┆ 0x05a0…05c0 64 2d 66 69 6c 65 2d 6f 72 2d 64 69 72 65 63 74 6f 72 79 5d 20 36 29 29 0a 0a 28 64 65 66 75 6e ┆d-file-or-directory] 6)) (defun┆ 0x05c0…05e0 20 66 74 70 2d 6c 69 73 74 2d 64 69 72 65 63 74 6f 72 79 20 28 68 6f 73 74 20 66 69 6c 65 20 26 ┆ ftp-list-directory (host file &┆ 0x05e0…0600 6f 70 74 69 6f 6e 61 6c 20 75 73 65 72 20 70 61 73 73 77 6f 72 64 29 20 22 5c 0a 46 54 50 20 74 ┆optional user password) "\ FTP t┆ 0x0600…0620 6f 20 48 4f 53 54 20 74 6f 20 6c 69 73 74 20 44 49 52 45 43 54 4f 52 59 2c 20 6c 6f 67 67 69 6e ┆o HOST to list DIRECTORY, loggin┆ 0x0620…0640 67 20 69 6e 20 61 73 20 55 53 45 52 20 77 69 74 68 20 70 61 73 73 77 6f 72 64 20 50 41 53 53 57 ┆g in as USER with password PASSW┆ 0x0640…0660 4f 52 44 2e 0a 49 6e 74 65 72 61 63 74 69 76 65 6c 79 2c 20 48 4f 53 54 20 61 6e 64 20 46 49 4c ┆ORD. Interactively, HOST and FIL┆ 0x0660…0680 45 20 61 72 65 20 73 70 65 63 69 66 69 65 64 20 62 79 20 72 65 61 64 69 6e 67 20 61 20 73 74 72 ┆E are specified by reading a str┆ 0x0680…06a0 69 6e 67 20 77 69 74 68 0a 20 61 20 63 6f 6c 6f 6e 20 63 68 61 72 61 63 74 65 72 20 73 65 70 61 ┆ing with a colon character sepa┆ 0x06a0…06c0 72 61 74 69 6e 67 20 74 68 65 20 68 6f 73 74 20 66 72 6f 6d 20 74 68 65 20 66 69 6c 65 6e 61 6d ┆rating the host from the filenam┆ 0x06c0…06e0 65 2e 0a 55 53 45 52 20 61 6e 64 20 50 41 53 53 57 4f 52 44 20 61 72 65 20 64 65 66 61 75 6c 74 ┆e. USER and PASSWORD are default┆ 0x06e0…0700 65 64 20 66 72 6f 6d 20 74 68 65 20 76 61 6c 75 65 73 20 75 73 65 64 20 77 68 65 6e 0a 20 6c 61 ┆ed from the values used when la┆ 0x0700…0720 73 74 20 66 74 70 69 6e 67 20 66 72 6f 6d 20 48 4f 53 54 20 28 75 6e 6c 65 73 73 20 70 61 73 73 ┆st ftping from HOST (unless pass┆ 0x0720…0740 77 6f 72 64 2d 72 65 6d 65 6d 62 65 72 69 6e 67 20 69 73 20 64 69 73 61 62 6c 65 64 29 2e 0a 20 ┆word-remembering is disabled). ┆ 0x0740…0760 53 75 70 70 6c 79 20 61 20 70 61 73 73 77 6f 72 64 20 6f 66 20 74 68 65 20 73 79 6d 62 6f 6c 20 ┆Supply a password of the symbol ┆ 0x0760…0780 60 74 27 20 74 6f 20 6f 76 65 72 72 69 64 65 20 74 68 69 73 20 64 65 66 61 75 6c 74 0a 20 28 69 ┆`t' to override this default (i┆ 0x0780…07a0 6e 74 65 72 61 63 74 69 76 65 6c 79 2c 20 74 68 69 73 20 69 73 20 64 6f 6e 65 20 62 79 20 67 69 ┆nteractively, this is done by gi┆ 0x07a0…07c0 76 69 6e 67 20 61 20 70 72 65 66 69 78 20 61 72 67 29 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 ┆ving a prefix arg)" (interactive┆ 0x07c0…07e0 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c2 c3 c4 21 c0 09 3f 3f 44 5c 22 87 22 20 5b 6e 69 6c 20 ┆ (byte-code " ! ??D\" " [nil ┆ 0x07e0…0800 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 20 61 70 70 65 6e 64 20 66 74 70 2d 72 65 ┆current-prefix-arg append ftp-re┆ 0x0800…0820 61 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 46 54 50 20 67 65 74 20 68 6f 73 74 3a 64 69 72 65 63 ┆ad-file-name "FTP get host:direc┆ 0x0820…0840 74 6f 72 79 3a 20 22 5d 20 35 29 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c0 88 c6 0a 0b c0 0c ┆tory: "] 5)) (byte-code " ┆ 0x0840…0860 0d 25 87 22 20 5b 6e 69 6c 20 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 72 67 20 68 6f 73 ┆ % " [nil current-prefix-arg hos┆ 0x0860…0880 74 20 66 69 6c 65 20 75 73 65 72 20 70 61 73 73 77 6f 72 64 20 66 74 70 2d 66 69 6e 64 2d 66 69 ┆t file user password ftp-find-fi┆ 0x0880…08a0 6c 65 2d 6f 72 2d 64 69 72 65 63 74 6f 72 79 5d 20 36 29 29 0a 0a 28 64 65 66 75 6e 20 66 74 70 ┆le-or-directory] 6)) (defun ftp┆ 0x08a0…08c0 2d 66 69 6e 64 2d 66 69 6c 65 2d 6f 72 2d 64 69 72 65 63 74 6f 72 79 20 28 68 6f 73 74 20 66 69 ┆-find-file-or-directory (host fi┆ 0x08c0…08e0 6c 65 2d 6e 61 6d 65 20 66 69 6c 65 70 20 26 6f 70 74 69 6f 6e 61 6c 20 75 73 65 72 20 70 61 73 ┆le-name filep &optional user pas┆ 0x08e0…0900 73 77 6f 72 64 29 20 22 5c 0a 46 54 50 20 74 6f 20 48 4f 53 54 20 74 6f 20 67 65 74 20 46 49 4c ┆sword) "\ FTP to HOST to get FIL┆ 0x0900…0920 45 2e 20 20 54 68 69 72 64 20 61 72 67 20 69 73 20 74 20 66 6f 72 20 66 69 6c 65 2c 20 6e 69 6c ┆E. Third arg is t for file, nil┆ 0x0920…0940 20 66 6f 72 20 64 69 72 65 63 74 6f 72 79 2e 0a 4c 6f 67 20 69 6e 20 61 73 20 55 53 45 52 20 77 ┆ for directory. Log in as USER w┆ 0x0940…0960 69 74 68 20 50 41 53 53 57 4f 52 44 2e 20 20 49 66 20 55 53 45 52 20 69 73 20 6e 69 6c 20 6f 72 ┆ith PASSWORD. If USER is nil or┆ 0x0960…0980 20 50 41 53 53 57 4f 52 44 20 69 73 20 6e 69 6c 20 6f 72 20 74 2c 0a 77 65 20 70 72 6f 6d 70 74 ┆ PASSWORD is nil or t, we prompt┆ 0x0980…09a0 20 66 6f 72 20 74 68 65 20 75 73 65 72 20 6e 61 6d 65 20 61 6e 64 20 70 61 73 73 77 6f 72 64 2e ┆ for the user name and password.┆ 0x09a0…09c0 22 20 28 62 79 74 65 2d 63 6f 64 65 20 22 08 85 0c 00 09 85 0c 00 09 c2 3d 3f 86 1e 00 cc 0b 08 ┆" (byte-code " =? ┆ 0x09c0…09e0 09 c2 3d 23 10 08 41 11 08 40 89 10 88 cd ce cf 0d 83 2a 00 d0 82 2b 00 d1 0b 0e 06 24 21 1c 0c ┆ =# A @ * + $! ┆ 0x09e0…0a00 71 88 d2 0b 0e 06 5c 22 c9 1e 08 1e 07 c9 1e 0a d3 8e d4 0e 07 0b 08 09 24 89 16 0a 83 56 00 d5 ┆q \" $ V ┆ 0x0a00…0a20 d6 21 82 59 00 d7 d8 21 29 29 88 d5 d9 0d 83 66 00 da 82 67 00 db 0b 0e 06 24 88 dc 0e 07 ce dd ┆ ! Y !)) f g $ ┆ 0x0a20…0a40 0d 83 79 00 de 82 7a 00 df 0e 06 23 e0 e1 24 83 a2 00 e2 e3 21 88 c9 1e 0b e4 65 60 5c 22 29 88 ┆ y z # $ ! e`\") ┆ 0x0a40…0a60 d5 e5 0b 0e 06 23 88 e6 0e 07 e7 5c 22 88 0e 07 82 b9 00 e8 0c 21 88 c9 1e 0b e9 ea 21 29 88 eb ┆ # \" ! !) ┆ 0x0a60…0a80 0e 07 21 88 d7 ec 0b 0e 06 23 2a 29 87 22 20 5b 75 73 65 72 20 70 61 73 73 77 6f 72 64 20 74 20 ┆ ! #*) " [user password t ┆ 0x0a80…0aa0 68 6f 73 74 20 62 75 66 66 65 72 20 66 69 6c 65 70 20 66 69 6c 65 20 70 72 6f 63 65 73 73 20 63 ┆host buffer filep file process c┆ 0x0aa0…0ac0 61 73 65 2d 66 6f 6c 64 2d 73 65 61 72 63 68 20 6e 69 6c 20 77 69 6e 20 62 75 66 66 65 72 2d 72 ┆ase-fold-search nil win buffer-r┆ 0x0ac0…0ae0 65 61 64 2d 6f 6e 6c 79 20 72 65 61 64 2d 66 74 70 2d 75 73 65 72 2d 70 61 73 73 77 6f 72 64 20 ┆ead-only read-ftp-user-password ┆ 0x0ae0…0b00 67 65 74 2d 62 75 66 66 65 72 2d 63 72 65 61 74 65 20 66 6f 72 6d 61 74 20 22 2a 66 74 70 25 73 ┆get-buffer-create format "*ftp%s┆ 0x0b00…0b20 20 25 73 3a 25 73 2a 22 20 22 22 20 22 2d 64 69 72 65 63 74 6f 72 79 22 20 66 74 70 2d 73 65 74 ┆ %s:%s*" "" "-directory" ftp-set┆ 0x0b20…0b40 75 70 2d 62 75 66 66 65 72 20 28 28 62 79 74 65 2d 63 6f 64 65 20 22 08 86 07 00 c2 09 21 87 22 ┆up-buffer ((byte-code " ! "┆ 0x0b40…0b60 20 5b 77 69 6e 20 70 72 6f 63 65 73 73 20 64 65 6c 65 74 65 2d 70 72 6f 63 65 73 73 5d 20 32 29 ┆ [win process delete-process] 2)┆ 0x0b60…0b80 29 20 66 74 70 2d 6c 6f 67 69 6e 20 6d 65 73 73 61 67 65 20 22 4c 6f 67 67 65 64 20 69 6e 22 20 ┆) ftp-login message "Logged in" ┆ 0x0b80…0ba0 65 72 72 6f 72 20 22 46 74 70 20 6c 6f 67 69 6e 20 6c 6f 73 74 22 20 22 4f 70 65 6e 69 6e 67 20 ┆error "Ftp login lost" "Opening ┆ 0x0ba0…0bc0 25 73 20 25 73 3a 25 73 2e 2e 2e 22 20 22 66 69 6c 65 22 20 22 64 69 72 65 63 74 6f 72 79 22 20 ┆%s %s:%s..." "file" "directory" ┆ 0x0bc0…0be0 66 74 70 2d 63 6f 6d 6d 61 6e 64 20 22 25 73 20 5c 22 25 73 5c 22 20 2d 0a 71 75 69 74 0a 22 20 ┆ftp-command "%s \"%s\" - quit " ┆ 0x0be0…0c00 22 67 65 74 22 20 22 64 69 72 22 20 22 5c 5c 28 31 35 30 5c 5c 7c 31 32 35 5c 5c 29 2e 2a 0a 22 ┆"get" "dir" "\\(150\\|125\\).* "┆ 0x0c00…0c20 20 22 32 30 30 2e 2a 0a 22 20 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 31 20 64 65 6c 65 74 65 2d ┆ "200.* " forward-line 1 delete-┆ 0x0c20…0c40 72 65 67 69 6f 6e 20 22 52 65 74 72 69 65 76 69 6e 67 20 25 73 3a 25 73 20 69 6e 20 62 61 63 6b ┆region "Retrieving %s:%s in back┆ 0x0c40…0c60 67 72 6f 75 6e 64 2e 20 20 42 79 65 21 22 20 73 65 74 2d 70 72 6f 63 65 73 73 2d 73 65 6e 74 69 ┆ground. Bye!" set-process-senti┆ 0x0c60…0c80 6e 65 6c 20 66 74 70 2d 61 73 79 6e 63 68 72 6f 6e 6f 75 73 2d 69 6e 70 75 74 2d 73 65 6e 74 69 ┆nel ftp-asynchronous-input-senti┆ 0x0c80…0ca0 6e 65 6c 20 73 77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 20 69 6e 73 65 72 74 2d 62 65 66 6f ┆nel switch-to-buffer insert-befo┆ 0x0ca0…0cc0 72 65 2d 6d 61 72 6b 65 72 73 20 22 3c 3c 3c 46 74 70 20 6c 6f 73 74 3e 3e 3e 22 20 64 65 6c 65 ┆re-markers "<<<Ftp lost>>>" dele┆ 0x0cc0…0ce0 74 65 2d 70 72 6f 63 65 73 73 20 22 46 74 70 20 25 73 3a 25 73 20 6c 6f 73 74 22 5d 20 32 31 29 ┆te-process "Ftp %s:%s lost"] 21)┆ 0x0ce0…0d00 29 0a 0a 28 64 65 66 75 6e 20 66 74 70 2d 77 72 69 74 65 2d 66 69 6c 65 20 28 68 6f 73 74 20 66 ┆) (defun ftp-write-file (host f┆ 0x0d00…0d20 69 6c 65 20 26 6f 70 74 69 6f 6e 61 6c 20 75 73 65 72 20 70 61 73 73 77 6f 72 64 29 20 22 5c 0a ┆ile &optional user password) "\ ┆ 0x0d20…0d40 46 54 50 20 74 6f 20 48 4f 53 54 20 74 6f 20 77 72 69 74 65 20 46 49 4c 45 2c 20 6c 6f 67 67 69 ┆FTP to HOST to write FILE, loggi┆ 0x0d40…0d60 6e 67 20 69 6e 20 61 73 20 55 53 45 52 20 77 69 74 68 20 70 61 73 73 77 6f 72 64 20 50 41 53 53 ┆ng in as USER with password PASS┆ 0x0d60…0d80 57 4f 52 44 2e 0a 49 6e 74 65 72 61 63 74 69 76 65 6c 79 2c 20 48 4f 53 54 20 61 6e 64 20 46 49 ┆WORD. Interactively, HOST and FI┆ 0x0d80…0da0 4c 45 20 61 72 65 20 73 70 65 63 69 66 69 65 64 20 62 79 20 72 65 61 64 69 6e 67 20 61 20 73 74 ┆LE are specified by reading a st┆ 0x0da0…0dc0 72 69 6e 67 20 77 69 74 68 20 63 6f 6c 6f 6e 0a 73 65 70 61 72 61 74 69 6e 67 20 74 68 65 20 68 ┆ring with colon separating the h┆ 0x0dc0…0de0 6f 73 74 20 66 72 6f 6d 20 74 68 65 20 66 69 6c 65 6e 61 6d 65 2e 0a 55 53 45 52 20 61 6e 64 20 ┆ost from the filename. USER and ┆ 0x0de0…0e00 50 41 53 53 57 4f 52 44 20 61 72 65 20 64 65 66 61 75 6c 74 65 64 20 66 72 6f 6d 20 74 68 65 20 ┆PASSWORD are defaulted from the ┆ 0x0e00…0e20 76 61 6c 75 65 73 20 75 73 65 64 20 77 68 65 6e 0a 20 6c 61 73 74 20 66 74 70 69 6e 67 20 66 72 ┆values used when last ftping fr┆ 0x0e20…0e40 6f 6d 20 48 4f 53 54 20 28 75 6e 6c 65 73 73 20 70 61 73 73 77 6f 72 64 2d 72 65 6d 65 6d 62 65 ┆om HOST (unless password-remembe┆ 0x0e40…0e60 72 69 6e 67 20 69 73 20 64 69 73 61 62 6c 65 64 29 2e 0a 20 53 75 70 70 6c 79 20 61 20 70 61 73 ┆ring is disabled). Supply a pas┆ 0x0e60…0e80 73 77 6f 72 64 20 6f 66 20 74 68 65 20 73 79 6d 62 6f 6c 20 60 74 27 20 74 6f 20 6f 76 65 72 72 ┆sword of the symbol `t' to overr┆ 0x0e80…0ea0 69 64 65 20 74 68 69 73 20 64 65 66 61 75 6c 74 0a 20 28 69 6e 74 65 72 61 63 74 69 76 65 6c 79 ┆ide this default (interactively┆ 0x0ea0…0ec0 2c 20 74 68 69 73 20 69 73 20 64 6f 6e 65 20 62 79 20 67 69 76 69 6e 67 20 61 20 70 72 65 66 69 ┆, this is done by giving a prefi┆ 0x0ec0…0ee0 78 20 61 72 67 29 22 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 28 62 79 74 65 2d 63 6f 64 65 20 ┆x arg)" (interactive (byte-code ┆ 0x0ee0…0f00 22 c2 c3 c4 21 c0 09 3f 3f 44 5c 22 87 22 20 5b 6e 69 6c 20 63 75 72 72 65 6e 74 2d 70 72 65 66 ┆" ! ??D\" " [nil current-pref┆ 0x0f00…0f20 69 78 2d 61 72 67 20 61 70 70 65 6e 64 20 66 74 70 2d 72 65 61 64 2d 66 69 6c 65 2d 6e 61 6d 65 ┆ix-arg append ftp-read-file-name┆ 0x0f20…0f40 20 22 46 54 50 20 77 72 69 74 65 20 68 6f 73 74 3a 66 69 6c 65 3a 20 22 5d 20 35 29 29 20 28 62 ┆ "FTP write host:file: "] 5)) (b┆ 0x0f40…0f60 79 74 65 2d 63 6f 64 65 20 22 c0 88 0a 85 0e 00 0b 85 0e 00 0b c4 3d 3f 86 20 00 ce 0d 0a 0b c4 ┆yte-code " =? ┆ 0x0f60…0f80 3d 23 12 0a 41 13 0a 40 89 12 88 cf d0 d1 0d 0e 07 23 21 d2 d3 21 1e 08 1e 06 d4 65 64 0e 08 23 ┆=# A @ #! ! ed #┆ 0x0f80…0fa0 88 0e 06 71 88 d5 c9 21 88 0e 08 89 16 09 88 d6 0d 0e 07 5c 22 c0 1e 0b 1e 0a c0 1e 0c d7 8e d8 ┆ q ! \" ┆ 0x0fa0…0fc0 0e 0a 0d 0a 0b 24 89 16 0c 83 67 00 d9 da 21 82 6a 00 db dc 21 29 29 88 d9 dd 0d 0e 07 23 88 de ┆ $ g ! j !)) # ┆ 0x0fc0…0fe0 0e 0a d0 df 0e 08 0e 07 23 e0 e1 24 83 a3 00 e2 e3 21 88 c0 1e 0d e4 65 60 5c 22 29 88 d9 e5 0d ┆ # $ ! e`\") ┆ 0x0fe0…1000 0e 07 23 88 e6 0e 0a e7 5c 22 88 0e 0a 82 bb 00 e8 0e 06 21 88 c0 1e 0d e9 ea 21 29 88 eb 0e 0a ┆ # \" ! !) ┆ 0x1000…1020 21 88 db ec 0d 0e 07 23 2a 2a 87 22 20 5b 6e 69 6c 20 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 ┆! #** " [nil current-prefix┆ 0x1020…1040 2d 61 72 67 20 75 73 65 72 20 70 61 73 73 77 6f 72 64 20 74 20 68 6f 73 74 20 62 75 66 66 65 72 ┆-arg user password t host buffer┆ 0x1040…1060 20 66 69 6c 65 20 74 6d 70 20 66 74 70 2d 74 65 6d 70 2d 66 69 6c 65 2d 6e 61 6d 65 20 70 72 6f ┆ file tmp ftp-temp-file-name pro┆ 0x1060…1080 63 65 73 73 20 63 61 73 65 2d 66 6f 6c 64 2d 73 65 61 72 63 68 20 77 69 6e 20 62 75 66 66 65 72 ┆cess case-fold-search win buffer┆ 0x1080…10a0 2d 72 65 61 64 2d 6f 6e 6c 79 20 72 65 61 64 2d 66 74 70 2d 75 73 65 72 2d 70 61 73 73 77 6f 72 ┆-read-only read-ftp-user-passwor┆ 0x10a0…10c0 64 20 67 65 74 2d 62 75 66 66 65 72 2d 63 72 65 61 74 65 20 66 6f 72 6d 61 74 20 22 2a 66 74 70 ┆d get-buffer-create format "*ftp┆ 0x10c0…10e0 20 25 73 3a 25 73 2a 22 20 6d 61 6b 65 2d 74 65 6d 70 2d 6e 61 6d 65 20 22 2f 74 6d 70 2f 65 6d ┆ %s:%s*" make-temp-name "/tmp/em┆ 0x10e0…1100 61 63 73 66 74 70 22 20 77 72 69 74 65 2d 72 65 67 69 6f 6e 20 6d 61 6b 65 2d 6c 6f 63 61 6c 2d ┆acsftp" write-region make-local-┆ 0x1100…1120 76 61 72 69 61 62 6c 65 20 66 74 70 2d 73 65 74 75 70 2d 62 75 66 66 65 72 20 28 28 62 79 74 65 ┆variable ftp-setup-buffer ((byte┆ 0x1120…1140 2d 63 6f 64 65 20 22 08 86 07 00 c2 09 21 87 22 20 5b 77 69 6e 20 70 72 6f 63 65 73 73 20 64 65 ┆-code " ! " [win process de┆ 0x1140…1160 6c 65 74 65 2d 70 72 6f 63 65 73 73 5d 20 32 29 29 20 66 74 70 2d 6c 6f 67 69 6e 20 6d 65 73 73 ┆lete-process] 2)) ftp-login mess┆ 0x1160…1180 61 67 65 20 22 4c 6f 67 67 65 64 20 69 6e 22 20 65 72 72 6f 72 20 22 46 74 70 20 6c 6f 67 69 6e ┆age "Logged in" error "Ftp login┆ 0x1180…11a0 20 6c 6f 73 74 22 20 22 4f 70 65 6e 69 6e 67 20 66 69 6c 65 20 25 73 3a 25 73 2e 2e 2e 22 20 66 ┆ lost" "Opening file %s:%s..." f┆ 0x11a0…11c0 74 70 2d 63 6f 6d 6d 61 6e 64 20 22 73 65 6e 64 20 5c 22 25 73 5c 22 20 5c 22 25 73 5c 22 0a 71 ┆tp-command "send \"%s\" \"%s\" q┆ 0x11c0…11e0 75 69 74 0a 22 20 22 31 35 30 2e 2a 0a 22 20 22 32 30 30 2e 2a 0a 22 20 66 6f 72 77 61 72 64 2d ┆uit " "150.* " "200.* " forward-┆ 0x11e0…1200 6c 69 6e 65 20 31 20 64 65 6c 65 74 65 2d 72 65 67 69 6f 6e 20 22 53 61 76 69 6e 67 20 25 73 3a ┆line 1 delete-region "Saving %s:┆ 0x1200…1220 25 73 20 69 6e 20 62 61 63 6b 67 72 6f 75 6e 64 2e 20 20 42 79 65 21 22 20 73 65 74 2d 70 72 6f ┆%s in background. Bye!" set-pro┆ 0x1220…1240 63 65 73 73 2d 73 65 6e 74 69 6e 65 6c 20 66 74 70 2d 61 73 79 6e 63 68 72 6f 6e 6f 75 73 2d 6f ┆cess-sentinel ftp-asynchronous-o┆ 0x1240…1260 75 74 70 75 74 2d 73 65 6e 74 69 6e 65 6c 20 73 77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 20 ┆utput-sentinel switch-to-buffer ┆ 0x1260…1280 69 6e 73 65 72 74 2d 62 65 66 6f 72 65 2d 6d 61 72 6b 65 72 73 20 22 3c 3c 3c 46 74 70 20 6c 6f ┆insert-before-markers "<<<Ftp lo┆ 0x1280…12a0 73 74 3e 3e 3e 22 20 64 65 6c 65 74 65 2d 70 72 6f 63 65 73 73 20 22 46 74 70 20 77 72 69 74 65 ┆st>>>" delete-process "Ftp write┆ 0x12a0…12c0 20 25 73 3a 25 73 20 6c 6f 73 74 22 5d 20 32 34 29 29 0a 0a 28 64 65 66 75 6e 20 66 74 70 2d 73 ┆ %s:%s lost"] 24)) (defun ftp-s┆ 0x12c0…12e0 65 74 75 70 2d 62 75 66 66 65 72 20 28 68 6f 73 74 20 66 69 6c 65 29 20 28 62 79 74 65 2d 63 6f ┆etup-buffer (host file) (byte-co┆ 0x12e0…1300 64 65 20 22 c7 20 88 c8 70 21 85 31 00 c9 20 88 ca cb cc cd c8 70 21 21 ce 70 21 23 21 83 2e 00 ┆de " p! 1 p!! p!#! . ┆ 0x1300…1320 c8 70 21 85 2b 00 cf c8 70 21 21 88 82 1c 00 82 31 00 d0 d1 21 88 c1 89 10 88 d2 20 88 d3 c2 21 ┆ p! + p!! 1 ! !┆ 0x1320…1340 88 0b 89 12 88 d3 c4 21 88 0d 89 14 88 c6 89 10 88 d4 d5 70 d5 d6 d7 d8 26 06 87 22 20 5b 62 75 ┆ ! p & " [bu┆ 0x1340…1360 66 66 65 72 2d 72 65 61 64 2d 6f 6e 6c 79 20 6e 69 6c 20 66 74 70 2d 68 6f 73 74 20 68 6f 73 74 ┆ffer-read-only nil ftp-host host┆ 0x1360…1380 20 66 74 70 2d 66 69 6c 65 20 66 69 6c 65 20 74 20 66 75 6e 64 61 6d 65 6e 74 61 6c 2d 6d 6f 64 ┆ ftp-file file t fundamental-mod┆ 0x1380…13a0 65 20 67 65 74 2d 62 75 66 66 65 72 2d 70 72 6f 63 65 73 73 20 64 69 73 63 61 72 64 2d 69 6e 70 ┆e get-buffer-process discard-inp┆ 0x13a0…13c0 75 74 20 79 2d 6f 72 2d 6e 2d 70 20 66 6f 72 6d 61 74 20 22 4b 69 6c 6c 20 70 72 6f 63 65 73 73 ┆ut y-or-n-p format "Kill process┆ 0x13c0…13e0 20 5c 22 25 73 5c 22 20 69 6e 20 25 73 3f 20 22 20 70 72 6f 63 65 73 73 2d 6e 61 6d 65 20 62 75 ┆ \"%s\" in %s? " process-name bu┆ 0x13e0…1400 66 66 65 72 2d 6e 61 6d 65 20 6b 69 6c 6c 2d 70 72 6f 63 65 73 73 20 65 72 72 6f 72 20 22 46 6f ┆ffer-name kill-process error "Fo┆ 0x1400…1420 6f 22 20 65 72 61 73 65 2d 62 75 66 66 65 72 20 6d 61 6b 65 2d 6c 6f 63 61 6c 2d 76 61 72 69 61 ┆o" erase-buffer make-local-varia┆ 0x1420…1440 62 6c 65 20 73 74 61 72 74 2d 70 72 6f 63 65 73 73 20 22 66 74 70 22 20 22 2d 69 22 20 22 2d 6e ┆ble start-process "ftp" "-i" "-n┆ 0x1440…1460 22 20 22 2d 67 22 5d 20 32 32 29 29 0a 0a 28 64 65 66 75 6e 20 66 74 70 2d 6c 6f 67 69 6e 20 28 ┆" "-g"] 22)) (defun ftp-login (┆ 0x1460…1480 70 72 6f 63 65 73 73 20 68 6f 73 74 20 75 73 65 72 20 70 61 73 73 77 6f 72 64 29 20 28 62 79 74 ┆process host user password) (byt┆ 0x1480…14a0 65 2d 63 6f 64 65 20 22 c7 c8 08 09 23 88 c9 0a ca cb 09 08 0b 24 cc cd 24 83 18 00 c4 82 32 00 ┆e-code " # $ $ 2 ┆ 0x14a0…14c0 ce cf 0a 21 21 88 d0 0a 21 88 0d 3c 85 30 00 d1 d2 09 0d 5c 22 0d 5c 22 89 15 88 c6 87 22 20 5b ┆ !! ! < 0 \" \" " [┆ 0x14c0…14e0 75 73 65 72 20 68 6f 73 74 20 70 72 6f 63 65 73 73 20 70 61 73 73 77 6f 72 64 20 74 20 66 74 70 ┆user host process password t ftp┆ 0x14e0…1500 2d 70 61 73 73 77 6f 72 64 2d 61 6c 69 73 74 20 6e 69 6c 20 6d 65 73 73 61 67 65 20 22 46 54 50 ┆-password-alist nil message "FTP┆ 0x1500…1520 20 6c 6f 67 67 69 6e 67 20 69 6e 20 61 73 20 25 73 40 25 73 2e 2e 2e 22 20 66 74 70 2d 63 6f 6d ┆ logging in as %s@%s..." ftp-com┆ 0x1520…1540 6d 61 6e 64 20 66 6f 72 6d 61 74 20 22 6f 70 65 6e 20 25 73 0a 75 73 65 72 20 25 73 20 25 73 0a ┆mand format "open %s user %s %s ┆ 0x1540…1560 22 20 22 32 33 30 2e 2a 0a 22 20 22 5c 5c 28 43 6f 6e 6e 65 63 74 65 64 20 74 6f 20 5c 5c 7c 32 ┆" "230.* " "\\(Connected to \\|2┆ 0x1560…1580 32 30 5c 5c 7c 33 33 31 5c 5c 29 2e 2a 0a 22 20 73 77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 ┆20\\|331\\).* " switch-to-buffer┆ 0x1580…15a0 20 70 72 6f 63 65 73 73 2d 62 75 66 66 65 72 20 64 65 6c 65 74 65 2d 70 72 6f 63 65 73 73 20 64 ┆ process-buffer delete-process d┆ 0x15a0…15c0 65 6c 71 20 61 73 73 6f 63 5d 20 31 30 29 29 0a 0a 28 64 65 66 75 6e 20 66 74 70 2d 63 6f 6d 6d ┆elq assoc] 10)) (defun ftp-comm┆ 0x15c0…15e0 61 6e 64 20 28 70 72 6f 63 65 73 73 20 63 6f 6d 6d 61 6e 64 20 77 69 6e 20 69 67 6e 6f 72 65 29 ┆and (process command win ignore)┆ 0x15e0…1600 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c7 08 09 5c 22 88 c8 1a c9 0a 21 85 52 00 ca 0b 21 83 1c ┆ (byte-code " \" ! R ! ┆ 0x1600…1620 00 64 62 88 c4 89 12 82 4e 00 ca cb 21 83 29 00 cc cd 21 62 82 4e 00 ca 0d 21 83 35 00 ce c8 21 ┆ db N ! ) !b N ! 5 !┆ 0x1620…1640 82 4e 00 cf d0 c6 c4 23 3f 83 4b 00 60 89 12 88 d1 08 21 88 0a 62 82 4e 00 c6 89 12 88 82 07 00 ┆ N #? K ` ! b N ┆ 0x1640…1660 88 0a 29 87 22 20 5b 70 72 6f 63 65 73 73 20 63 6f 6d 6d 61 6e 64 20 70 20 77 69 6e 20 74 20 69 ┆ ) " [process command p win t i┆ 0x1660…1680 67 6e 6f 72 65 20 6e 69 6c 20 70 72 6f 63 65 73 73 2d 73 65 6e 64 2d 73 74 72 69 6e 67 20 31 20 ┆gnore nil process-send-string 1 ┆ 0x1680…16a0 6e 75 6d 62 65 72 70 20 6c 6f 6f 6b 69 6e 67 2d 61 74 20 22 5e 66 74 70 3e 20 5c 5c 7c 5e 0a 22 ┆numberp looking-at "^ftp> \\|^ "┆ 0x16a0…16c0 20 6d 61 74 63 68 2d 65 6e 64 20 30 20 66 6f 72 77 61 72 64 2d 6c 69 6e 65 20 73 65 61 72 63 68 ┆ match-end 0 forward-line search┆ 0x16c0…16e0 2d 66 6f 72 77 61 72 64 20 22 0a 22 20 61 63 63 65 70 74 2d 70 72 6f 63 65 73 73 2d 6f 75 74 70 ┆-forward " " accept-process-outp┆ 0x16e0…1700 75 74 5d 20 31 32 29 29 0a 0a 28 64 65 66 75 6e 20 66 74 70 2d 61 73 79 6e 63 68 72 6f 6e 6f 75 ┆ut] 12)) (defun ftp-asynchronou┆ 0x1700…1720 73 2d 69 6e 70 75 74 2d 73 65 6e 74 69 6e 65 6c 20 28 70 72 6f 63 65 73 73 20 6d 73 67 29 20 28 ┆s-input-sentinel (process msg) (┆ 0x1720…1740 62 79 74 65 2d 63 6f 64 65 20 22 c3 08 09 c2 c2 24 87 22 20 5b 70 72 6f 63 65 73 73 20 6d 73 67 ┆byte-code " $ " [process msg┆ 0x1740…1760 20 74 20 66 74 70 2d 73 65 6e 74 69 6e 65 6c 5d 20 35 29 29 0a 0a 28 64 65 66 75 6e 20 66 74 70 ┆ t ftp-sentinel] 5)) (defun ftp┆ 0x1760…1780 2d 73 79 6e 63 68 72 6f 6e 6f 75 73 2d 69 6e 70 75 74 2d 73 65 6e 74 69 6e 65 6c 20 28 70 72 6f ┆-synchronous-input-sentinel (pro┆ 0x1780…17a0 63 65 73 73 20 6d 73 67 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c4 08 09 c2 c3 24 87 22 20 5b ┆cess msg) (byte-code " $ " [┆ 0x17a0…17c0 70 72 6f 63 65 73 73 20 6d 73 67 20 6e 69 6c 20 74 20 66 74 70 2d 73 65 6e 74 69 6e 65 6c 5d 20 ┆process msg nil t ftp-sentinel] ┆ 0x17c0…17e0 35 29 29 0a 0a 28 64 65 66 75 6e 20 66 74 70 2d 61 73 79 6e 63 68 72 6f 6e 6f 75 73 2d 6f 75 74 ┆5)) (defun ftp-asynchronous-out┆ 0x17e0…1800 70 75 74 2d 73 65 6e 74 69 6e 65 6c 20 28 70 72 6f 63 65 73 73 20 6d 73 67 29 20 28 62 79 74 65 ┆put-sentinel (process msg) (byte┆ 0x1800…1820 2d 63 6f 64 65 20 22 c4 08 09 c2 c3 24 87 22 20 5b 70 72 6f 63 65 73 73 20 6d 73 67 20 74 20 6e ┆-code " $ " [process msg t n┆ 0x1820…1840 69 6c 20 66 74 70 2d 73 65 6e 74 69 6e 65 6c 5d 20 35 29 29 0a 0a 28 64 65 66 75 6e 20 66 74 70 ┆il ftp-sentinel] 5)) (defun ftp┆ 0x1840…1860 2d 73 79 6e 63 68 72 6f 6e 6f 75 73 2d 6f 75 74 70 75 74 2d 73 65 6e 74 69 6e 65 6c 20 28 70 72 ┆-synchronous-output-sentinel (pr┆ 0x1860…1880 6f 63 65 73 73 20 6d 73 67 29 20 28 62 79 74 65 2d 63 6f 64 65 20 22 c3 08 09 c2 c2 24 87 22 20 ┆ocess msg) (byte-code " $ " ┆ 0x1880…18a0 5b 70 72 6f 63 65 73 73 20 6d 73 67 20 6e 69 6c 20 66 74 70 2d 73 65 6e 74 69 6e 65 6c 5d 20 35 ┆[process msg nil ftp-sentinel] 5┆ 0x18a0…18c0 29 29 0a 0a 28 64 65 66 75 6e 20 66 74 70 2d 73 65 6e 74 69 6e 65 6c 20 28 70 72 6f 63 65 73 73 ┆)) (defun ftp-sentinel (process┆ 0x18c0…18e0 20 6d 73 67 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 20 69 6e 70 75 74 29 20 28 62 79 74 65 2d 63 ┆ msg asynchronous input) (byte-c┆ 0x18e0…1900 6f 64 65 20 22 cd ce 08 21 21 3f 83 10 00 cf 08 c1 5c 22 82 10 01 d0 08 21 d1 3d 85 1d 00 d2 08 ┆ode " !!? \" ! = ┆ 0x1900…1920 21 d3 55 83 cf 00 8a ce 08 21 71 88 c1 0c 83 2f 00 d4 82 30 00 d5 c1 1d 1b 1a 64 62 88 d6 d7 21 ┆! U !q / 0 db !┆ […truncated at 200 lines…]