/ Linux Cubed Series 2: Applications / Linux Cubed Series 2 - Applications.iso / editors / emacs / xemacs / xemacs-1.006 / xemacs-1 / lib / xemacs-19.13 / lisp / w3 / w3-srch.elc

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 63 74 68 6f 6d 70 40 |piled by| cthomp@|
|00000020| 77 69 6c 6c 6f 77 2e 63 | 73 2e 75 69 75 63 2e 65 |willow.c|s.uiuc.e|
|00000030| 64 75 20 6f 6e 20 54 75 | 65 20 41 75 67 20 32 39 |du on Tu|e Aug 29|
|00000040| 20 31 34 3a 34 36 3a 34 | 30 20 31 39 39 35 0a 3b | 14:46:4|0 1995.;|
|00000050| 3b 3b 20 66 72 6f 6d 20 | 66 69 6c 65 20 2f 65 78 |;; from |file /ex|
|00000060| 70 6f 72 74 2f 77 69 6c | 6c 6f 77 33 2f 78 65 6d |port/wil|low3/xem|
|00000070| 61 63 73 2d 31 39 2e 31 | 33 2d 72 65 6c 65 61 73 |acs-19.1|3-releas|
|00000080| 65 2f 65 64 69 74 6f 72 | 2f 6c 69 73 70 2f 77 33 |e/editor|/lisp/w3|
|00000090| 2f 77 33 2d 73 72 63 68 | 2e 65 6c 0a 3b 3b 3b 20 |/w3-srch|.el.;;; |
|000000a0| 65 6d 61 63 73 20 76 65 | 72 73 69 6f 6e 20 31 39 |emacs ve|rsion 19|
|000000b0| 2e 31 33 20 58 45 6d 61 | 63 73 20 4c 75 63 69 64 |.13 XEma|cs Lucid|
|000000c0| 2e 0a 3b 3b 3b 20 62 79 | 74 65 63 6f 6d 70 20 76 |..;;; by|tecomp v|
|000000d0| 65 72 73 69 6f 6e 20 32 | 2e 32 35 3b 20 31 2d 53 |ersion 2|.25; 1-S|
|000000e0| 65 70 2d 39 34 2e 0a 3b | 3b 3b 20 6f 70 74 69 6d |ep-94..;|;; optim|
|000000f0| 69 7a 61 74 69 6f 6e 20 | 69 73 20 6f 6e 2e 0a 3b |ization |is on..;|
|00000100| 3b 3b 20 74 68 69 73 20 | 66 69 6c 65 20 75 73 65 |;; this |file use|
|00000110| 73 20 6f 70 63 6f 64 65 | 73 20 77 68 69 63 68 20 |s opcode|s which |
|00000120| 64 6f 20 6e 6f 74 20 65 | 78 69 73 74 20 69 6e 20 |do not e|xist in |
|00000130| 45 6d 61 63 73 20 31 38 | 2e 0a 0a 28 69 66 20 28 |Emacs 18|...(if (|
|00000140| 61 6e 64 20 28 62 6f 75 | 6e 64 70 20 27 65 6d 61 |and (bou|ndp 'ema|
|00000150| 63 73 2d 76 65 72 73 69 | 6f 6e 29 0a 09 20 28 6f |cs-versi|on).. (o|
|00000160| 72 20 28 61 6e 64 20 28 | 62 6f 75 6e 64 70 20 27 |r (and (|boundp '|
|00000170| 65 70 6f 63 68 3a 3a 76 | 65 72 73 69 6f 6e 29 20 |epoch::v|ersion) |
|00000180| 65 70 6f 63 68 3a 3a 76 | 65 72 73 69 6f 6e 29 0a |epoch::v|ersion).|
|00000190| 09 20 20 20 20 20 28 73 | 74 72 69 6e 67 2d 6c 65 |.     (s|tring-le|
|000001a0| 73 73 70 20 65 6d 61 63 | 73 2d 76 65 72 73 69 6f |ssp emac|s-versio|
|000001b0| 6e 20 22 31 39 22 29 29 | 29 0a 20 20 20 20 28 65 |n "19"))|).    (e|
|000001c0| 72 72 6f 72 20 22 54 68 | 69 73 20 66 69 6c 65 20 |rror "Th|is file |
|000001d0| 77 61 73 20 63 6f 6d 70 | 69 6c 65 64 20 66 6f 72 |was comp|iled for|
|000001e0| 20 45 6d 61 63 73 20 31 | 39 2e 22 29 29 0a 0a 28 | Emacs 1|9."))..(|
|000001f0| 64 65 66 76 61 72 20 77 | 33 2d 61 6c 6c 6f 77 2d |defvar w|3-allow-|
|00000200| 73 65 61 72 63 68 69 6e | 67 2d 6f 66 20 27 28 22 |searchin|g-of '("|
|00000210| 74 65 78 74 2f 70 6c 61 | 69 6e 22 20 22 74 65 78 |text/pla|in" "tex|
|00000220| 74 2f 68 74 6d 6c 22 20 | 22 74 65 78 74 2f 78 2d |t/html" |"text/x-|
|00000230| 73 65 74 65 78 74 22 20 | 22 61 70 70 6c 69 63 61 |setext" |"applica|
|00000240| 74 69 6f 6e 2f 78 2d 74 | 72 6f 66 66 2d 6d 61 6e |tion/x-t|roff-man|
|00000250| 22 20 22 61 70 70 6c 69 | 63 61 74 69 6f 6e 2f 78 |" "appli|cation/x|
|00000260| 2d 74 72 6f 66 66 2d 6d | 65 22 20 22 61 70 70 6c |-troff-m|e" "appl|
|00000270| 69 63 61 74 69 6f 6e 2f | 78 2d 74 72 6f 66 66 2d |ication/|x-troff-|
|00000280| 6d 73 22 20 22 61 70 70 | 6c 69 63 61 74 69 6f 6e |ms" "app|lication|
|00000290| 2f 72 74 66 22 20 22 74 | 65 78 74 2f 72 69 63 68 |/rtf" "t|ext/rich|
|000002a0| 74 65 78 74 22 20 22 61 | 70 70 6c 69 63 61 74 69 |text" "a|pplicati|
|000002b0| 6f 6e 2f 78 2d 77 61 69 | 73 2d 73 6f 75 72 63 65 |on/x-wai|s-source|
|000002c0| 22 20 22 61 70 70 6c 69 | 63 61 74 69 6f 6e 2f 74 |" "appli|cation/t|
|000002d0| 65 78 22 20 22 61 70 70 | 6c 69 63 61 74 69 6f 6e |ex" "app|lication|
|000002e0| 2f 74 65 78 69 6e 66 6f | 22 20 22 61 70 70 6c 69 |/texinfo|" "appli|
|000002f0| 63 61 74 69 6f 6e 2f 78 | 2d 74 72 6f 66 66 22 29 |cation/x|-troff")|
|00000300| 20 22 5c 0a 2a 41 20 6c | 69 73 74 20 6f 66 20 4d | "\.*A l|ist of M|
|00000310| 49 4d 45 20 63 6f 6e 74 | 65 6e 74 20 74 79 70 65 |IME cont|ent type|
|00000320| 73 20 74 68 61 74 20 69 | 74 20 69 73 20 4f 6b 20 |s that i|t is Ok |
|00000330| 66 6f 72 20 74 68 65 20 | 61 75 74 6f 6d 61 74 69 |for the |automati|
|00000340| 63 0a 73 65 61 72 63 68 | 20 74 6f 20 64 65 73 63 |c.search| to desc|
|00000350| 65 6e 64 20 74 6f 2e 22 | 29 0a 28 66 73 65 74 20 |end to."|).(fset |
|00000360| 27 77 33 2d 64 6f 2d 73 | 65 61 72 63 68 20 23 5b |'w3-do-s|earch #[|
|00000370| 28 74 65 72 6d 20 26 6f | 70 74 69 6f 6e 61 6c 20 |(term &o|ptional |
|00000380| 62 61 73 65 20 68 6f 70 | 73 2d 6c 69 6d 69 74 20 |base hop|s-limit |
|00000390| 72 65 73 74 72 69 63 74 | 69 6f 6e 29 20 22 c0 19 |restrict|ion) "..|
|000003a0| 5c 6e ac 84 c3 c4 21 12 | c5 5c 6e 21 89 11 ab 85 |\n....!.|.\n!....|
|000003b0| 09 71 88 aa 84 c6 5c 6e | 21 88 c7 0e 08 0e 09 0e |.q....\n|!.......|
|000003c0| 5c 6e 23 29 87 22 20 5b | 6e 69 6c 20 78 20 62 61 |\n#)." [|nil x ba|
|000003d0| 73 65 20 75 72 6c 2d 76 | 69 65 77 2d 75 72 6c 20 |se url-v|iew-url |
|000003e0| 74 20 75 72 6c 2d 62 75 | 66 66 65 72 2d 76 69 73 |t url-bu|ffer-vis|
|000003f0| 69 74 69 6e 67 20 77 33 | 2d 66 65 74 63 68 20 77 |iting w3|-fetch w|
|00000400| 33 2d 73 65 61 72 63 68 | 2d 69 6e 74 65 72 6e 61 |3-search|-interna|
|00000410| 6c 20 74 65 72 6d 20 68 | 6f 70 73 2d 6c 69 6d 69 |l term h|ops-limi|
|00000420| 74 20 72 65 73 74 72 69 | 63 74 69 6f 6e 5d 20 34 |t restri|ction] 4|
|00000430| 20 22 5c 0a 52 65 63 75 | 72 73 69 76 65 6c 79 20 | "\.Recu|rsively |
|00000440| 64 65 73 63 65 6e 64 20 | 61 6c 6c 20 74 68 65 20 |descend |all the |
|00000450| 63 68 69 6c 64 20 6c 69 | 6e 6b 73 20 6f 66 20 74 |child li|nks of t|
|00000460| 68 65 20 63 75 72 72 65 | 6e 74 20 64 6f 63 75 6d |he curre|nt docum|
|00000470| 65 6e 74 20 66 6f 72 20 | 54 45 52 4d 2e 0a 54 45 |ent for |TERM..TE|
|00000480| 52 4d 20 6d 61 79 20 62 | 65 20 61 20 73 74 72 69 |RM may b|e a stri|
|00000490| 6e 67 2c 20 69 6e 20 77 | 68 69 63 68 20 63 61 73 |ng, in w|hich cas|
|000004a0| 65 20 69 74 20 69 73 20 | 74 72 65 61 74 65 64 20 |e it is |treated |
|000004b0| 61 73 20 61 20 72 65 67 | 75 6c 61 72 20 65 78 70 |as a reg|ular exp|
|000004c0| 72 65 73 73 69 6f 6e 2c | 0a 61 6e 64 20 72 65 2d |ression,|.and re-|
|000004d0| 73 65 61 72 63 68 2d 66 | 6f 72 77 61 72 64 20 69 |search-f|orward i|
|000004e0| 73 20 75 73 65 64 2c 20 | 6f 72 20 61 20 73 79 6d |s used, |or a sym|
|000004f0| 62 6f 6c 2c 20 69 6e 20 | 77 68 69 63 68 20 63 61 |bol, in |which ca|
|00000500| 73 65 20 69 74 20 69 73 | 20 66 75 6e 63 61 6c 6c |se it is| funcall|
|00000510| 65 64 0a 77 69 74 68 20 | 31 20 61 72 67 75 6d 65 |ed.with |1 argume|
|00000520| 6e 74 2c 20 74 68 65 20 | 63 75 72 72 65 6e 74 20 |nt, the |current |
|00000530| 55 52 4c 20 62 65 69 6e | 67 20 73 65 61 72 63 68 |URL bein|g search|
|00000540| 65 64 2e 0a 0a 42 41 53 | 45 20 69 73 20 74 68 65 |ed...BAS|E is the|
|00000550| 20 55 52 4c 20 74 6f 20 | 73 74 61 72 74 20 73 65 | URL to |start se|
|00000560| 61 72 63 68 69 6e 67 20 | 66 72 6f 6d 2e 0a 0a 48 |arching |from...H|
|00000570| 4f 50 53 2d 4c 49 4d 49 | 54 20 69 73 20 74 68 65 |OPS-LIMI|T is the|
|00000580| 20 6d 61 78 69 6d 75 6d | 20 6e 75 6d 62 65 72 20 | maximum| number |
|00000590| 6f 66 20 6e 6f 64 65 73 | 20 74 6f 20 64 65 73 63 |of nodes| to desc|
|000005a0| 65 6e 64 20 62 65 66 6f | 72 65 20 74 68 65 79 0a |end befo|re they.|
|000005b0| 73 65 61 72 63 68 20 64 | 69 65 73 20 6f 75 74 2e |search d|ies out.|
|000005c0| 0a 0a 52 45 53 54 52 49 | 43 54 49 4f 4e 20 69 73 |..RESTRI|CTION is|
|000005d0| 20 61 20 72 65 67 75 6c | 61 72 20 65 78 70 72 65 | a regul|ar expre|
|000005e0| 73 73 69 6f 6e 20 6f 72 | 20 66 75 6e 63 74 69 6f |ssion or| functio|
|000005f0| 6e 20 74 6f 20 63 61 6c | 6c 20 77 69 74 68 20 6f |n to cal|l with o|
|00000600| 6e 65 0a 61 72 67 75 6d | 65 6e 74 2c 20 61 20 55 |ne.argum|ent, a U|
|00000610| 52 4c 20 74 68 61 74 20 | 63 6f 75 6c 64 20 62 65 |RL that |could be|
|00000620| 20 73 65 61 72 63 68 65 | 64 2e 20 20 49 66 20 52 | searche|d.  If R|
|00000630| 45 53 54 52 49 43 54 49 | 4f 4e 20 72 65 74 75 72 |ESTRICTI|ON retur|
|00000640| 6e 73 0a 6e 6f 6e 2d 6e | 69 6c 2c 20 74 68 65 6e |ns.non-n|il, then|
|00000650| 20 74 68 65 20 75 72 6c | 20 69 73 20 61 64 64 65 | the url| is adde|
|00000660| 64 20 74 6f 20 74 68 65 | 20 71 75 65 75 65 2c 20 |d to the| queue, |
|00000670| 6f 74 68 65 72 77 69 73 | 65 20 69 74 20 69 73 0a |otherwis|e it is.|
|00000680| 64 69 73 63 61 72 64 65 | 64 2e 20 20 54 68 69 73 |discarde|d.  This|
|00000690| 20 69 73 20 75 73 65 66 | 75 6c 20 66 6f 72 20 72 | is usef|ul for r|
|000006a0| 65 73 74 72 69 63 74 69 | 6e 67 20 73 65 61 72 63 |estricti|ng searc|
|000006b0| 68 69 6e 67 20 74 6f 20 | 65 69 74 68 65 72 0a 63 |hing to |either.c|
|000006c0| 65 72 74 61 69 6e 20 74 | 79 65 73 20 6f 66 20 55 |ertain t|yes of U|
|000006d0| 52 4c 73 20 28 6f 6e 6c | 79 20 73 65 61 72 63 68 |RLs (onl|y search|
|000006e0| 20 66 74 70 20 6c 69 6e | 6b 73 29 2c 20 6f 72 20 | ftp lin|ks), or |
|000006f0| 72 65 73 74 72 69 63 74 | 69 6e 67 20 73 65 61 72 |restrict|ing sear|
|00000700| 63 68 69 6e 67 0a 74 6f | 20 6f 6e 65 20 64 6f 6d |ching.to| one dom|
|00000710| 61 69 6e 20 28 6f 6e 6c | 79 20 73 65 61 72 63 68 |ain (onl|y search|
|00000720| 20 73 74 75 66 66 20 69 | 6e 20 74 68 65 20 69 6e | stuff i|n the in|
|00000730| 64 69 61 6e 61 2e 65 64 | 75 20 64 6f 6d 61 69 6e |diana.ed|u domain|
|00000740| 29 2e 0a 0a 46 6f 72 20 | 75 73 65 20 69 6e 20 66 |)...For |use in f|
|00000750| 75 6e 63 74 69 6f 6e 73 | 20 70 61 73 73 65 64 20 |unctions| passed |
|00000760| 74 6f 20 77 33 2d 64 6f | 2d 73 65 61 72 63 68 3a |to w3-do|-search:|
|00000770| 0a 51 55 45 55 45 20 69 | 73 20 74 68 65 20 71 75 |.QUEUE i|s the qu|
|00000780| 65 75 65 20 6f 66 20 6c | 69 6e 6b 73 20 74 6f 20 |eue of l|inks to |
|00000790| 62 65 20 73 65 61 72 63 | 68 65 64 0a 48 4f 50 53 |be searc|hed.HOPS|
|000007a0| 20 69 73 20 74 68 65 20 | 63 75 72 72 65 6e 74 20 | is the |current |
|000007b0| 6e 75 6d 62 65 72 20 6f | 66 20 68 6f 70 73 20 66 |number o|f hops f|
|000007c0| 72 6f 6d 20 74 68 65 20 | 72 6f 6f 74 20 64 6f 63 |rom the |root doc|
|000007d0| 75 6d 65 6e 74 0a 52 45 | 53 55 4c 54 53 20 69 73 |ument.RE|SULTS is|
|000007e0| 20 61 6e 20 61 73 73 6f | 63 20 6c 69 73 74 20 6f | an asso|c list o|
|000007f0| 66 20 28 55 52 4c 20 2e | 20 52 45 54 56 41 4c 29 |f (URL .| RETVAL)|
|00000800| 2c 20 77 68 65 72 65 20 | 52 45 54 56 41 4c 20 69 |, where |RETVAL i|
|00000810| 73 20 74 68 65 20 76 61 | 6c 75 65 0a 72 65 74 75 |s the va|lue.retu|
|00000820| 72 6e 65 64 20 66 72 6f | 6d 20 70 72 65 76 69 6f |rned fro|m previo|
|00000830| 75 73 20 63 61 6c 6c 73 | 20 74 6f 20 74 68 65 20 |us calls| to the |
|00000840| 54 45 52 4d 20 66 75 6e | 63 74 69 6f 6e 20 28 6f |TERM fun|ction (o|
|00000850| 72 20 70 6f 69 6e 74 20 | 69 66 20 73 65 61 72 63 |r point |if searc|
|00000860| 68 69 6e 67 0a 66 6f 72 | 20 61 20 72 65 67 65 78 |hing.for| a regex|
|00000870| 70 22 5d 29 0a 28 66 73 | 65 74 20 27 77 33 2d 6e |p"]).(fs|et 'w3-n|
|00000880| 6f 72 6d 61 6c 69 7a 65 | 2d 75 72 6c 20 23 5b 28 |ormalize|-url #[(|
|00000890| 75 72 6c 29 20 22 08 ac | 82 c1 87 c2 c3 08 5c 22 |url) "..|......\"|
|000008a0| ab 85 c4 08 c5 5c 22 87 | 08 87 22 20 5b 75 72 6c |.....\".|.." [url|
|000008b0| 20 6e 69 6c 20 73 74 72 | 69 6e 67 2d 6d 61 74 63 | nil str|ing-matc|
|000008c0| 68 20 22 23 5c 5c 28 2e | 2a 5c 5c 29 22 20 75 72 |h "#\\(.|*\\)" ur|
|000008d0| 6c 2d 6d 61 74 63 68 20 | 31 5d 20 33 20 22 5c 0a |l-match |1] 3 "\.|
|000008e0| 4e 6f 72 6d 61 6c 69 7a | 65 20 61 20 55 52 4c 2c |Normaliz|e a URL,|
|000008f0| 20 72 65 6d 6f 76 69 6e | 67 20 61 6c 6c 20 27 23 | removin|g all '#|
|00000900| 27 20 72 65 66 65 72 65 | 6e 63 65 73 20 66 72 6f |' refere|nces fro|
|00000910| 6d 20 69 74 2c 20 65 74 | 63 2e 22 5d 29 0a 28 66 |m it, et|c."]).(f|
|00000920| 73 65 74 20 27 77 33 2d | 73 65 61 72 63 68 2d 69 |set 'w3-|search-i|
|00000930| 6e 74 65 72 6e 61 6c 20 | 23 5b 28 74 65 72 6d 20 |nternal |#[(term |
|00000940| 26 6f 70 74 69 6f 6e 61 | 6c 20 68 6f 70 73 2d 6c |&optiona|l hops-l|
|00000950| 69 6d 69 74 20 72 65 73 | 74 72 69 63 74 69 6f 6e |imit res|triction|
|00000960| 29 20 22 08 ae 81 c1 10 | c2 89 89 c3 1c 1d 1e 06 |) ".....|........|
|00000970| 1e 07 65 62 88 0e 08 3b | ab 8d c9 ca 21 cb 0e 08 |..eb...;|....!...|
|00000980| c2 ca 23 42 15 aa 90 0e | 08 39 ab 8b c9 ca 21 0e |..#B....|.9....!.|
|00000990| 08 c9 ca 21 21 42 15 cc | cd 21 88 0e 07 ab e9 0e |...!!B..|.!......|
|000009a0| 07 40 c2 1e 0e 89 1e 0f | 0e 06 42 16 06 d0 0e 0f |.@......|..B.....|
|000009b0| 21 89 16 0e ab 86 0e 0e | 71 88 aa 85 d1 0e 0f 21 |!.......|q......!|
|000009c0| 88 0e 12 ae 86 d3 d4 0e | 15 21 21 d6 9a ab 8a d7 |........|.!!.....|
|000009d0| ca 21 88 cc d8 21 88 aa | a6 65 62 88 0e 08 3b ab |.!...!..|.eb...;.|
|000009e0| 8e 0e 0f cb 0e 08 c2 ca | 23 42 0d 42 15 aa 90 0e |........|#B.B....|
|000009f0| 08 39 ab 8b 0e 0f 0e 08 | 0e 0f 21 42 0d 42 15 2a |.9......|..!B.B.*|
|00000a00| 0e 07 41 89 16 07 ac 17 | 0d 2c 87 22 20 5b 68 6f |..A.....|.,." [ho|
|00000a10| 70 73 2d 6c 69 6d 69 74 | 20 35 20 6e 69 6c 20 30 |ps-limit| 5 nil 0|
|00000a20| 20 68 6f 70 73 20 72 65 | 73 75 6c 74 73 20 76 69 | hops re|sults vi|
|00000a30| 73 69 74 65 64 20 71 75 | 65 75 65 20 74 65 72 6d |sited qu|eue term|
|00000a40| 20 75 72 6c 2d 76 69 65 | 77 2d 75 72 6c 20 74 20 | url-vie|w-url t |
|00000a50| 72 65 2d 73 65 61 72 63 | 68 2d 66 6f 72 77 61 72 |re-searc|h-forwar|
|00000a60| 64 20 77 33 2d 6d 61 70 | 2d 6c 69 6e 6b 73 20 23 |d w3-map|-links #|
|00000a70| 5b 28 78 20 73 74 20 6e | 64 20 79 29 20 22 c0 c1 |[(x st n|d y) "..|
|00000a80| c2 0b 38 21 38 0c 9d ad | b1 c2 0b 38 ac 82 c5 87 |..8!8...|...8....|
|00000a90| 0e 06 3b ab 89 c7 0e 06 | c2 0b 38 5c 22 aa 8e 0e |..;.....|..8\"...|
|00000aa0| 06 39 ab 88 0e 06 c2 0b | 38 21 aa 81 c8 ad 8c 0e |.9......|8!......|
|00000ab0| 09 ca c2 0b 38 21 43 a4 | 89 16 09 87 22 20 5b 38 |....8!C.|...." [8|
|00000ac0| 20 75 72 6c 2d 66 69 6c | 65 2d 61 74 74 72 69 62 | url-fil|e-attrib|
|00000ad0| 75 74 65 73 20 32 20 78 | 20 77 33 2d 61 6c 6c 6f |utes 2 x| w3-allo|
|00000ae0| 77 2d 73 65 61 72 63 68 | 69 6e 67 2d 6f 66 20 6e |w-search|ing-of n|
|00000af0| 69 6c 20 72 65 73 74 72 | 69 63 74 69 6f 6e 20 73 |il restr|iction s|
|00000b00| 74 72 69 6e 67 2d 6d 61 | 74 63 68 20 74 20 71 75 |tring-ma|tch t qu|
|00000b10| 65 75 65 20 77 33 2d 6e | 6f 72 6d 61 6c 69 7a 65 |eue w3-n|ormalize|
|00000b20| 2d 75 72 6c 5d 20 34 5d | 20 79 20 78 20 75 72 6c |-url] 4]| y x url|
|00000b30| 2d 62 75 66 66 65 72 2d | 76 69 73 69 74 69 6e 67 |-buffer-|visiting|
|00000b40| 20 75 72 6c 2d 72 65 74 | 72 69 65 76 65 20 75 72 | url-ret|rieve ur|
|00000b50| 6c 2d 63 75 72 72 65 6e | 74 2d 6d 69 6d 65 2d 74 |l-curren|t-mime-t|
|00000b60| 79 70 65 20 6d 6d 2d 65 | 78 74 65 6e 73 69 6f 6e |ype mm-e|xtension|
|00000b70| 2d 74 6f 2d 6d 69 6d 65 | 20 77 33 2d 66 69 6c 65 |-to-mime| w3-file|
|00000b80| 2d 65 78 74 65 6e 73 69 | 6f 6e 20 75 72 6c 2d 63 |-extensi|on url-c|
|00000b90| 75 72 72 65 6e 74 2d 66 | 69 6c 65 20 22 74 65 78 |urrent-f|ile "tex|
|00000ba0| 74 2f 68 74 6d 6c 22 20 | 77 33 2d 70 72 65 70 61 |t/html" |w3-prepa|
|00000bb0| 72 65 2d 62 75 66 66 65 | 72 20 23 5b 28 6c 69 6e |re-buffe|r #[(lin|
|00000bc0| 6b 2d 64 61 74 61 20 73 | 74 20 6e 64 20 73 65 61 |k-data s|t nd sea|
|00000bd0| 72 63 68 69 6e 67 2d 66 | 75 6e 63 29 20 22 c0 c1 |rching-f|unc) "..|
|00000be0| 5c 6e 38 21 89 1b ac 83 | c4 aa 99 0d 3b ab 86 c6 |\n8!....|....;...|
|00000bf0| 0d 0b 5c 22 aa 8a 0d 39 | ab 85 0d 0b 21 aa 81 c7 |..\"...9|....!...|
|00000c00| ad 83 c8 0b 21 1e 09 ca | 1e 0b 0e 09 ac 88 cc cd |....!...|........|
|00000c10| 0b 5c 22 88 c4 aa c8 ce | 0e 09 38 0e 0f 9d ab bb |.\".....|..8.....|
|00000c20| 0e 10 0e 11 57 ab 84 d2 | d3 21 88 65 62 88 0e 14 |....W...|.!.eb...|
|00000c30| 3b ab 90 0b d5 0e 14 c4 | c7 23 42 0e 16 42 89 16 |;.......|.#B..B..|
|00000c40| 16 aa 9c 0e 14 39 ab 8e | 0b 0e 14 0b 21 42 0e 16 |.....9..|....!B..|
|00000c50| 42 89 16 16 aa 89 d7 d8 | 21 aa 84 cc d9 0b 5c 22 |B.......|!.....\"|
|00000c60| 2b 87 22 20 5b 77 33 2d | 6e 6f 72 6d 61 6c 69 7a |+." [w3-|normaliz|
|00000c70| 65 2d 75 72 6c 20 32 20 | 6c 69 6e 6b 2d 64 61 74 |e-url 2 |link-dat|
|00000c80| 61 20 75 72 6c 20 6e 69 | 6c 20 72 65 73 74 72 69 |a url ni|l restri|
|00000c90| 63 74 69 6f 6e 20 73 74 | 72 69 6e 67 2d 6d 61 74 |ction st|ring-mat|
|00000ca0| 63 68 20 74 20 75 72 6c | 2d 66 69 6c 65 2d 61 74 |ch t url|-file-at|
|00000cb0| 74 72 69 62 75 74 65 73 | 20 69 6e 66 6f 20 30 20 |tributes| info 0 |
|00000cc0| 6e 75 6d 2d 63 68 69 6c | 64 72 65 6e 20 6d 65 73 |num-chil|dren mes|
|00000cd0| 73 61 67 65 20 22 53 6b | 69 70 70 69 6e 67 20 25 |sage "Sk|ipping %|
|00000ce0| 73 20 28 6e 6f 74 20 73 | 65 61 72 63 68 61 62 6c |s (not s|earchabl|
|00000cf0| 65 29 22 20 38 20 77 33 | 2d 61 6c 6c 6f 77 2d 73 |e)" 8 w3|-allow-s|
|00000d00| 65 61 72 63 68 69 6e 67 | 2d 6f 66 20 68 6f 70 73 |earching|-of hops|
|00000d10| 20 68 6f 70 73 2d 6c 69 | 6d 69 74 20 77 33 2d 6d | hops-li|mit w3-m|
|00000d20| 61 70 2d 6c 69 6e 6b 73 | 20 23 5b 28 6c 6e 6b 20 |ap-links| #[(lnk |
|00000d30| 73 74 20 6e 64 20 61 72 | 67 29 20 22 08 54 10 09 |st nd ar|g) ".T..|
|00000d40| 5c 6e 9d ae 83 09 0b 9d | 3f ad 86 0b 09 43 a4 89 |\n......|?....C..|
|00000d50| 13 87 22 20 5b 6e 75 6d | 2d 63 68 69 6c 64 72 65 |.." [num|-childre|
|00000d60| 6e 20 75 72 6c 20 76 69 | 73 69 74 65 64 20 71 75 |n url vi|sited qu|
|00000d70| 65 75 65 5d 20 32 5d 20 | 74 65 72 6d 20 72 65 2d |eue] 2] |term re-|
|00000d80| 73 65 61 72 63 68 2d 66 | 6f 72 77 61 72 64 20 72 |search-f|orward r|
|00000d90| 65 73 75 6c 74 73 20 65 | 72 72 6f 72 20 22 54 45 |esults e|rror "TE|
|00000da0| 52 4d 20 6d 75 73 74 20 | 62 65 20 61 20 72 65 67 |RM must |be a reg|
|00000db0| 75 6c 61 72 20 65 78 70 | 72 65 73 73 69 6f 6e 20 |ular exp|ression |
|00000dc0| 6f 72 20 73 79 6d 62 6f | 6c 2e 22 20 22 53 6b 69 |or symbo|l." "Ski|
|00000dd0| 70 70 69 6e 67 20 25 73 | 20 28 77 68 79 3f 29 22 |pping %s| (why?)"|
|00000de0| 5d 20 36 5d 5d 20 36 20 | 22 5c 0a 52 65 63 75 72 |] 6]] 6 |"\.Recur|
|00000df0| 73 69 76 65 6c 79 20 64 | 65 73 63 65 6e 64 20 61 |sively d|escend a|
|00000e00| 6c 6c 20 74 68 65 20 63 | 68 69 6c 64 20 6c 69 6e |ll the c|hild lin|
|00000e10| 6b 73 20 6f 66 20 74 68 | 65 20 63 75 72 72 65 6e |ks of th|e curren|
|00000e20| 74 20 64 6f 63 75 6d 65 | 6e 74 20 66 6f 72 20 54 |t docume|nt for T|
|00000e30| 45 52 4d 2e 0a 54 45 52 | 4d 20 6d 61 79 20 62 65 |ERM..TER|M may be|
|00000e40| 20 61 20 73 74 72 69 6e | 67 2c 20 69 6e 20 77 68 | a strin|g, in wh|
|00000e50| 69 63 68 20 63 61 73 65 | 20 69 74 20 69 73 20 74 |ich case| it is t|
|00000e60| 72 65 61 74 65 64 20 61 | 73 20 61 20 72 65 67 75 |reated a|s a regu|
|00000e70| 6c 61 72 20 65 78 70 72 | 65 73 73 69 6f 6e 2c 0a |lar expr|ession,.|
|00000e80| 61 6e 64 20 72 65 2d 73 | 65 61 72 63 68 2d 66 6f |and re-s|earch-fo|
|00000e90| 72 77 61 72 64 20 69 73 | 20 75 73 65 64 2c 20 6f |rward is| used, o|
|00000ea0| 72 20 61 20 73 79 6d 62 | 6f 6c 2c 20 69 6e 20 77 |r a symb|ol, in w|
|00000eb0| 68 69 63 68 20 63 61 73 | 65 20 69 74 20 69 73 20 |hich cas|e it is |
|00000ec0| 66 75 6e 63 61 6c 6c 65 | 64 0a 77 69 74 68 20 31 |funcalle|d.with 1|
|00000ed0| 20 61 72 67 75 6d 65 6e | 74 2c 20 74 68 65 20 63 | argumen|t, the c|
|00000ee0| 75 72 72 65 6e 74 20 55 | 52 4c 20 62 65 69 6e 67 |urrent U|RL being|
|00000ef0| 20 73 65 61 72 63 68 65 | 64 2e 0a 0a 48 4f 50 53 | searche|d...HOPS|
|00000f00| 2d 4c 49 4d 49 54 20 69 | 73 20 74 68 65 20 6d 61 |-LIMIT i|s the ma|
|00000f10| 78 69 6d 75 6d 20 6e 75 | 6d 62 65 72 20 6f 66 20 |ximum nu|mber of |
|00000f20| 6e 6f 64 65 73 20 74 6f | 20 64 65 73 63 65 6e 64 |nodes to| descend|
|00000f30| 20 62 65 66 6f 72 65 20 | 74 68 65 79 0a 73 65 61 | before |they.sea|
|00000f40| 72 63 68 20 64 69 65 73 | 20 6f 75 74 2e 0a 0a 52 |rch dies| out...R|
|00000f50| 45 53 54 52 49 43 54 49 | 4f 4e 20 69 73 20 61 20 |ESTRICTI|ON is a |
|00000f60| 72 65 67 75 6c 61 72 20 | 65 78 70 72 65 73 73 69 |regular |expressi|
|00000f70| 6f 6e 20 6f 72 20 66 75 | 6e 63 74 69 6f 6e 20 74 |on or fu|nction t|
|00000f80| 6f 20 63 61 6c 6c 20 77 | 69 74 68 20 6f 6e 65 0a |o call w|ith one.|
|00000f90| 61 72 67 75 6d 65 6e 74 | 2c 20 61 20 55 52 4c 20 |argument|, a URL |
|00000fa0| 74 68 61 74 20 63 6f 75 | 6c 64 20 62 65 20 73 65 |that cou|ld be se|
|00000fb0| 61 72 63 68 65 64 2e 20 | 20 49 66 20 52 45 53 54 |arched. | If REST|
|00000fc0| 52 49 43 54 49 4f 4e 20 | 72 65 74 75 72 6e 73 0a |RICTION |returns.|
|00000fd0| 6e 6f 6e 2d 6e 69 6c 2c | 20 74 68 65 6e 20 74 68 |non-nil,| then th|
|00000fe0| 65 20 75 72 6c 20 69 73 | 20 61 64 64 65 64 20 74 |e url is| added t|
|00000ff0| 6f 20 74 68 65 20 71 75 | 65 75 65 2c 20 6f 74 68 |o the qu|eue, oth|
|00001000| 65 72 77 69 73 65 20 69 | 74 20 69 73 0a 64 69 73 |erwise i|t is.dis|
|00001010| 63 61 72 64 65 64 2e 20 | 20 54 68 69 73 20 69 73 |carded. | This is|
|00001020| 20 75 73 65 66 75 6c 20 | 66 6f 72 20 72 65 73 74 | useful |for rest|
|00001030| 72 69 63 74 69 6e 67 20 | 73 65 61 72 63 68 69 6e |ricting |searchin|
|00001040| 67 20 74 6f 20 65 69 74 | 68 65 72 0a 63 65 72 74 |g to eit|her.cert|
|00001050| 61 69 6e 20 74 79 65 73 | 20 6f 66 20 55 52 4c 73 |ain tyes| of URLs|
|00001060| 20 28 6f 6e 6c 79 20 73 | 65 61 72 63 68 20 66 74 | (only s|earch ft|
|00001070| 70 20 6c 69 6e 6b 73 29 | 2c 20 6f 72 20 72 65 73 |p links)|, or res|
|00001080| 74 72 69 63 74 69 6e 67 | 20 73 65 61 72 63 68 69 |tricting| searchi|
|00001090| 6e 67 0a 74 6f 20 6f 6e | 65 20 64 6f 6d 61 69 6e |ng.to on|e domain|
|000010a0| 20 28 6f 6e 6c 79 20 73 | 65 61 72 63 68 20 73 74 | (only s|earch st|
|000010b0| 75 66 66 20 69 6e 20 74 | 68 65 20 69 6e 64 69 61 |uff in t|he india|
|000010c0| 6e 61 2e 65 64 75 20 64 | 6f 6d 61 69 6e 29 2e 0a |na.edu d|omain)..|
|000010d0| 0a 46 6f 72 20 75 73 65 | 20 69 6e 20 66 75 6e 63 |.For use| in func|
|000010e0| 74 69 6f 6e 73 20 70 61 | 73 73 65 64 20 74 6f 20 |tions pa|ssed to |
|000010f0| 77 33 2d 64 6f 2d 73 65 | 61 72 63 68 3a 0a 51 55 |w3-do-se|arch:.QU|
|00001100| 45 55 45 20 69 73 20 74 | 68 65 20 71 75 65 75 65 |EUE is t|he queue|
|00001110| 20 6f 66 20 6c 69 6e 6b | 73 20 74 6f 20 62 65 20 | of link|s to be |
|00001120| 73 65 61 72 63 68 65 64 | 0a 48 4f 50 53 20 69 73 |searched|.HOPS is|
|00001130| 20 74 68 65 20 63 75 72 | 72 65 6e 74 20 6e 75 6d | the cur|rent num|
|00001140| 62 65 72 20 6f 66 20 68 | 6f 70 73 20 66 72 6f 6d |ber of h|ops from|
|00001150| 20 74 68 65 20 72 6f 6f | 74 20 64 6f 63 75 6d 65 | the roo|t docume|
|00001160| 6e 74 0a 52 45 53 55 4c | 54 53 20 69 73 20 61 6e |nt.RESUL|TS is an|
|00001170| 20 61 73 73 6f 63 20 6c | 69 73 74 20 6f 66 20 28 | assoc l|ist of (|
|00001180| 55 52 4c 20 2e 20 52 45 | 54 56 41 4c 29 2c 20 77 |URL . RE|TVAL), w|
|00001190| 68 65 72 65 20 52 45 54 | 56 41 4c 20 69 73 20 74 |here RET|VAL is t|
|000011a0| 68 65 20 76 61 6c 75 65 | 0a 72 65 74 75 72 6e 65 |he value|.returne|
|000011b0| 64 20 66 72 6f 6d 20 70 | 72 65 76 69 6f 75 73 20 |d from p|revious |
|000011c0| 63 61 6c 6c 73 20 74 6f | 20 74 68 65 20 54 45 52 |calls to| the TER|
|000011d0| 4d 20 66 75 6e 63 74 69 | 6f 6e 20 28 6f 72 20 70 |M functi|on (or p|
|000011e0| 6f 69 6e 74 20 69 66 20 | 73 65 61 72 63 68 69 6e |oint if |searchin|
|000011f0| 67 0a 66 6f 72 20 61 20 | 72 65 67 65 78 70 22 5d |g.for a |regexp"]|
|00001200| 29 0a 28 70 72 6f 76 69 | 64 65 20 27 77 33 2d 73 |).(provi|de 'w3-s|
|00001210| 72 63 68 29 0a          |                         |rch).   |        |
+--------+-------------------------+-------------------------+--------+--------+