]> gb7djk.dxcluster.net Git - spider.git/blob - cmd/Aliases
alter is_callsign checks
[spider.git] / cmd / Aliases
1 #!/usr/bin/perl
2 #
3 # provide some standard aliases for commands for terminally
4 # helpless ak1a user (helpless in the sense that they never
5 # read nor understand help files)
6 #
7 # This file is automagically reloaded if its modification time is 
8 # later than the one stored in CmdAlias.pm
9 #
10 # PLEASE make this file consistant with reality! (the patterns MUST
11 # match the filenames!)
12 #
13 # Don't alter this file, copy it into the local_cmd tree and modify it.
14 # This file will be replaced everytime I issue a new release.
15 #
16 # You only need to put aliases in here for commands that don't work as
17 # you desire naturally, e.g sh/dx on its own just works as you expect
18 # so you need not add it as an alias.
19 #
20
21
22 package CmdAlias;
23
24 %alias = (
25     '?' => [
26           '^\?', 'apropos', 'apropos',
27         ],
28     'a' => [
29           '^a$', 'announce', 'announce',
30         '^acc?e?p?t?$', 'apropos accept', 'apropos',
31           '^ann?o?u?n?c?e?/full', 'announce full', 'announce', 
32           '^ann?o?u?n?c?e?/sysop', 'announce sysop', 'announce',
33           '^ann?o?u?n?c?e?/(.*)$', 'announce $1', 'announce',
34         ],
35         'b' => [
36           '^b$', 'bye', 'bye',
37         ],
38         'c' => [
39         '^cle?a?r?$', 'apropos clear', 'apropos',
40         '^cre?a?t?e?$', 'apropos create', 'apropos',
41         ],
42         'd' => [
43           '^dele?t?e?/fu', 'kill full', 'kill',
44           '^dele?t?e?$', 'kill', 'kill',
45           '^dir?e?c?t?o?r?y?/a\w*', 'directory all', 'directory',
46           '^dir?e?c?t?o?r?y?/b\w*', 'directory bulletins', 'directory',
47           '^dir?e?c?t?o?r?y?/n\w*', 'directory new', 'directory',
48           '^dir?e?c?t?o?r?y?/o\w*', 'directory own', 'directory',
49           '^dir?e?c?t?o?r?y?/s\w*', 'directory subject', 'directory',
50           '^dir?e?c?t?o?r?y?/t\w*', 'directory to', 'directory',
51           '^dir?e?c?t?o?r?y?/f\w*', 'directory from', 'directory',
52           '^dir?e?c?t?o?r?y?/(\d+)-(\d+)', 'directory $1-$2', 'directory',
53           '^dir?e?c?t?o?r?y?/(\d+)', 'directory $1', 'directory',
54         ],
55         'e' => [
56           '^exi?t?$', 'bye', 'bye',
57           '^export_u', 'export_users', 'export_users',
58           '^expor?', 'export', 'export',
59           '^expun?g?e?$', 'kill expunge', 'kill expunge',
60         ],
61         'f' => [
62         '^for?w?a?r?d?$', 'apropos forward', 'apropos',
63         ],
64         'g' => [
65         ],
66         'h' => [
67         ],
68         'i' => [
69         ],
70         'j' => [
71         ],
72         'k' => [
73                         '^ki?l?l?/ex', 'kill expunge', 'kill',
74         ],
75         'l' => [
76         '^loa?d?$', 'apropos load', 'apropos',
77           '^l$', 'directory', 'directory',
78           '^ll$', 'directory', 'directory',
79           '^ll/(\d+)', 'directory $1', 'directory',
80           '^lm$', 'directory own', 'directory',
81       '^l>$', 'directory to', 'directory',
82       '^l<$', 'directory from', 'directory',
83         ],
84         'm' => [
85         ],
86         'n' => [
87         ],
88         'o' => [
89         ],
90         'p' => [
91         ],
92         'q' => [
93           '^qu?i?t?$', 'bye', 'bye',
94         ],
95         'r' => [        
96           '^r$', 'read', 'read',
97         '^reje?c?t?$', 'apropos reject', 'apropos',
98           '^rcmd/(\S+)', 'rcmd $1', 'rcmd',
99         ],
100         's' => [
101           '^s$', 'send', 'send',
102           '^s/p$', 'send', 'send',
103           '^sb$', 'send noprivate', 'send',
104           '^set/home$', 'set/homenode', 'set/homenode',
105           '^set/nobe', 'unset/beep', 'unset/beep',
106           '^set/nohe', 'unset/here', 'unset/here',
107           '^set/noan', 'unset/announce', 'unset/announce',
108           '^set/nodxg', 'unset/dxgrid', 'unset/dxgrid',
109           '^set/nodx', 'unset/dx', 'unset/dx',
110           '^set/noe', 'unset/echo', 'unset/echo',
111           '^set/nota', 'unset/talk', 'unset/talk',
112           '^set/noww', 'unset/wwv', 'unset/wwv',
113           '^set/nowx', 'unset/wx', 'unset/wx',
114         '^set$', 'apropos set', 'apropos',
115           '^sho?w?/u$', 'show/user', 'show/user',
116           '^sho?w?/bul', 'show/files bulletins', 'show/files',
117           '^sho?w?/co?n?\w*/a', 'show/configuration all', 'show/configuration',
118           '^sho?w?/co?n?\w*/n', 'show/configuration nodes', 'show/configuration',
119           '^sho?w?/c$', 'show/configuration', 'show/configuration',
120           '^sho?w?/com', 'dbavail', 'dbavail',
121           '^sho?w?/dxcc', 'show/dx dxcc', 'show/dx',
122           '^sho?w?/dx/(\d+)-(\d+)', 'show/dx $1-$2', 'show/dx',
123           '^sho?w?/dx/(\d+)', 'show/dx $1', 'show/dx',
124           '^sho?w?/dx/d(\d+)', 'show/dx from $1', 'show/dx',
125           '^sho?w?/fdx/(\d+)-(\d+)', 'show/dx real $1-$2', 'show/fdx',
126           '^sho?w?/fdx/(\d+)', 'show/dx real $1', 'show/fdx',
127           '^sho?w?/fdx/d(\d+)', 'show/dx real from $1', 'show/fdx',
128           '^sho?w?/fdx', 'show/dx real', 'show/fdx',
129           '^sho?w?/grou?p?s?', 'show/groups', 'show/groups',
130           '^sho?w?/gr[ae]?y?l?i?n?e?', 'show/grayline', 'show/grayline',
131           '^sho?w?/myfd?x?/(\d+)-(\d+)', 'show/dx filter real $1-$2', 'show/mydx',
132           '^sho?w?/myfd?x?/(\d+)', 'show/dx filter real $1', 'show/mydx',
133           '^sho?w?/myfd?x?/d(\d+)', 'show/dx filter real from $1', 'show/mydx',
134           '^sho?w?/myfd?x?', 'show/dx filter real', 'show/mydx',
135           '^sho?w?/myd?x?/(\d+)-(\d+)', 'show/dx filter $1-$2', 'show/mydx',
136           '^sho?w?/myd?x?/(\d+)', 'show/dx filter $1', 'show/mydx',
137           '^sho?w?/myd?x?/d(\d+)', 'show/dx filter from $1', 'show/mydx',
138           '^sho?w?/myd?x?', 'show/dx filter', 'show/mydx',
139           '^sho?w?/newco?n?\w*/n', 'show/newconfiguration node', 'show/newconfiguration',
140           '^sho?w?/sta?$', 'show/station', 'show/station',
141           '^sho?w?/tnc', 'who', 'who',
142       '^sho?w?/up', 'show/cluster', 'show/cluster',
143           '^sho?w?/ww?v?/(\d+)-(\d+)', 'show/wwv $1-$2', 'show/wwv',
144           '^sho?w?/ww?v?/(\d+)', 'show/wwv $1', 'show/wwv',
145         '^sho?w?$', 'apropos show', 'apropos',
146         '^shutd?\w*$', 'shutdown', 'shutdown',
147           '^sp$', 'send', 'send',
148         '^sta?t?$', 'apropos stat', 'apropos',
149         
150     ],
151         't' => [
152           '^ta$', 'talk', 'talk',
153           '^t$', 'talk', 'talk',
154         ],
155         'u' => [
156         '^uns?e?t?$', 'apropos unset', 'apropos',
157         '^uns?e?t?/node$', 'set/user', 'set/user',
158         ],
159         'v' => [
160         ],
161         'w' => [
162           '^w$', 'who', 'who',
163           '^wx/full', 'wx full', 'wx',
164           '^wx/sysop', 'wx sysop', 'wx',
165         ],
166         'x' => [
167         ],
168         'y' => [
169         ],
170         'z' => [
171         ],
172 )