MODULE NEWSCMD !++ ! FACILITY: ! NEWSCMD ! ! ABSTRACT ! Command definition for NEWS ! ! AUTHOR: ! Geoff Huston ! ! COPYRIGHT: ! Copyright © 1988,1989,1990 ! ! Modification History: ! 6.1b5 17-Feb-1993 Charles Bailey bailey@genetics.upenn.edu ! - changed 'unseenitems' to 'unreaditems' throughout ! ! Modification History: ! 6.1b6 Mark Martinec mark.martinec@ijs.si ! - added TCPWARE keyword to protocol_type to be distinct from generic TCP ! ! Modification History: ! 6.1b6 22-Mar-1993 Charles Bailey bailey@genetics.upenn.edu ! - changes to synchronize with 6.1b6 C source ! ! Modification History: ! 6.1b7 26-Apr-1993 Martin Winter winter@vision.rs.ch ! - added /HEADER=(list_of_rfc-elements) to EXTRACT and PRINT which ! allows to specifiy which headerlines should be in the file or print ! - added /REVERSE to SEARCH to allow searching in the reverse order ! - added /NEWSGROUPS=(list_of_newsgroups) to FOLLOWUP to avoid the ! newsgroup-prompt ! - added /MARK, /ALL and itemrange to MAIL and FORWARD ! 6.1b7 29-Jul-1993 Dave Costa newsmgr@drunivac.drew.edu ! - Added /Local qualifier to print to support terminal printers ! 6.1b8 17-Sep-1993 Charles Bailey bailey@genetics.upenn.edu ! - added /FeedThrough qualifier to Add File ! 6.1b8 31-Mar-1994 Mark Marinec mark.martinec@ijs.si ! - added /Log and /Statistics qualifiers to Add File ! - added /On_Error to the program invocation command !-- ! ! type definitions ! define type ADD_OPTIONS keyword ALIAS syntax=ADD_ALIAS keyword BATCH, syntax=ADD_BATCH keyword ENTRY, syntax=ADD_ENTRY keyword FILE syntax=ADD_BATCH keyword KEYWORD, syntax=ADD_KEYWORD keyword MARKER syntax=ADD_MARKER keyword MAIL syntax=ADD_MAIL keyword MEMBER syntax=ADD_MEMBER define type BACK_OPTIONS keyword NOTE, syntax=BACK_NOTE keyword REPLY, syntax=BACK_REPLY,default keyword TOPIC, syntax=BACK_TOPIC define type CLEAR_OPTIONS keyword MARKER syntax=CLEAR_MARK keyword MESSAGES syntax=CLEAR_MESSAGES keyword KILL syntax=CLEAR_KILL define type CREATE_OPTIONS keyword CONFERENCE, syntax=CREATE_NEWSGROUP keyword KEYWORD, syntax=CREATE_KEYWORD keyword NEWSGROUPS syntax=CREATE_NEWSGROUP keyword GROUPS syntax=CREATE_NEWSGROUP define type DELETE_OPTIONS keyword ALIAS syntax=DELETE_ALIAS keyword ENTRY syntax=DELETE_ENTRY keyword KEYWORD syntax=DELETE_KEYWORD keyword GROUPS syntax=DELETE_GROUP keyword ITEMS syntax=DELETE_ITEM keyword NEWSGROUPS syntax=DELETE_GROUP keyword NEWSITEMS syntax=DELETE_ITEM keyword NOTE syntax=DELETE_ITEM keyword MARKER syntax=DELETE_MARKER keyword MEMBER syntax=DELETE_MEMBER define type DIR_TYPE keyword UNSEEN default keyword DIRECTORY define type HEADER_LINES keyword ALL default keyword APPROVED keyword CONTROL keyword DATE keyword DISTRIBUTION keyword EXPIRES keyword FOLLOWUP keyword FROM keyword MESSAGEID keyword KEYWORDS keyword LINES keyword ORGANIZATION keyword NEWSGROUPS keyword NONE keyword PATH keyword REFERENCES keyword REPLYTO keyword SENDER keyword SUBJECT keyword SUMMARY keyword XREF keyword XNEWS define type PRINT_DIRTYPE keyword NEWSGROUPS keyword NEWSGROUPTITLES keyword GROUPS keyword NEWSITEMS keyword ITEMS keyword NOTES define type EXECUTE_OPTIONS keyword DELETE keyword LOCAL keyword RETAIN define type MODIFY_OPTIONS keyword ALIAS syntax=MOD_ALIAS keyword KILL syntax=MOD_KILL keyword ENTRY syntax=MOD_ENTRY keyword KEYWORD syntax=MOD_KEYWORD keyword MEMBER syntax=MOD_MEMBER define type NEXT_OPTIONS keyword NOTE, syntax=NEXT_NOTE keyword REPLY, syntax=NEXT_REPLY,default keyword TOPIC, syntax=NEXT_TOPIC keyword UNSEEN, syntax=NEXT_UNSEEN define type PRINT_BFT keyword ALL default keyword ONE define type PRIVS keyword MODERATE keyword NOMODERATE keyword SUPERVISE keyword NOSUPERVISE keyword CREATE_KEYWORDS keyword WRITE keyword NOWRITE define type RESTRCT keyword MEMBERS keyword KEYWORDS define type SEARCH_TYPES keyword LITERAL default keyword WILDCARD keyword PATTERN define type SET_OPTIONS keyword ALIAS syntax=ADD_ALIAS keyword BROADCAST_TRAPPING syntax=SET_BROAD keyword NOBROADCAST_TRAPPING syntax=SET_NOBROAD keyword HISTORY syntax=SET_HISTORY keyword NOHISTORY syntax=SET_NOHISTORY keyword LINE_EDITING syntax=SET_LINE keyword NOLINE_EDITING syntax=SET_NOLINE keyword DOTNEWSRC syntax=SET_DOTNEWSRC keyword NODOTNEWSRC syntax=SET_NODOTNEWSRC keyword MANAGER syntax=SET_MANAGER keyword NOMANAGER syntax=SET_NOMANAGER keyword NEWSGROUP syntax=SET_NEWSGROUP keyword ITEM syntax=SET_ITEM keyword DISPLAY syntax=SET_DISPLAY keyword SEEN syntax=SET_SEEN keyword ACCESS syntax=SET_ACCESS keyword CLASS syntax=SET_CLASS keyword CONFERENCE, syntax=SET_CONF keyword MODERATOR, syntax=SET_MODERATOR keyword NOMODERATOR syntax=SET_NOMODERATOR keyword SUPERVISOR syntax=SET_MODERATOR keyword NOSUPERVISOR syntax=SET_NOMODERATOR keyword NOTE, syntax=SET_NOTE keyword PROFILE, syntax=SET_PROFILE keyword MAILPROFILE syntax=SET_MAIL define type SHOW_OPTIONS keyword ALIASES syntax=SHOW_ALIASES keyword CLASSES syntax=SHOW_CLASSES keyword CONFERENCES syntax=SHOW_ENTRY keyword ENTRY syntax=SHOW_ENTRY keyword HISTORY syntax=SHOW_HISTORY keyword ITEM syntax=SHOW_ITEM keyword KEYWORDS syntax=SHOW_KEYWORDS keyword KILL syntax=SHOW_KILL keyword LINECOUNTS syntax=SHOW_LINECOUNTS keyword MAILPROFILE syntax=SHOW_MAIL keyword MARKER syntax=SHOW_MARKS keyword MEMBER syntax=SHOW_MEMBER keyword MESSAGES syntax=SHOW_MESSAGES keyword MODERATOR syntax=SHOW_MODERATOR keyword NEWSGROUP syntax=SHOW_NEWSGROUP keyword NOTE syntax=SHOW_NOTE keyword PROFILE syntax=SHOW_PROFILE keyword POSTMARKS syntax=SHOW_POSTMARKS keyword SUPERVISOR syntax=SHOW_MODERATOR keyword ALLITEMS syntax=SHOW_ALLITEMS keyword SYSCONFIG syntax=SHOW_SYS keyword UNREADITEMS syntax=SHOW_UNREADITEMS keyword UNSEENSTACK syntax=SHOW_UNSEENSTACK keyword VERSION syntax=SHOW_VERSION define type SWITCH keyword ON keyword OFF define type PROTOCOL_OPTIONS keyword DECNET keyword TCP keyword TCPWARE ! mark.martinec@ijs.si 28-Feb-1993 keyword CMUTCP keyword WINTCP keyword MULTINETTCP keyword UCXTCP keyword IPCUCX keyword EXOS define type TYPE_OPTIONS keyword NEWS keyword MAIL keyword NOTES define type ON_ERROR_OPTIONS keyword ABORT ! report signal and abort program execution keyword NEXT_COMMAND ! unwind to main command loop, continue with ! the next command (useful in interactive mode) keyword CONTINUE ! report signal and continue ! (not recommended for regular use) keyword HANDLE_OR_ABORT ! try to handle error (e.g. write a log entry ! or ignore error) on expected errors, ! otherwise the signal is send and handled ! as if ABORT was selected. Could be useful ! during batch processing (ADD FILE, SKIM). ! default is NEXT_COMMAND in interactive mode and HANDLE_OR_ABORT otherwise ! ! syntax definitions ! define syntax ADD_ALIAS routine do_add_alias parameter P1 label=OPTIONS, value(required) parameter P2 label=NEWSGROUP parameter P3 label=ALIAS,value(list) define syntax ADD_BATCH routine do_add_net parameter P1 label=OPTIONS, value(required) parameter P2, label=FILE,value(required,impcat,list,type=$infile) qualifier MODERATOR qualifier CREGRP placement=positional qualifier DELETE placement=positional qualifier RETRY placement=positional qualifier EXECUTE placement=positional,value(default="RETAIN",type=EXECUTE_OPTIONS) qualifier DEFNEWSGROUP placement=positional,value qualifier NETFEED placement=positional,negatable,default qualifier JUNK placement=positional,negatable qualifier ACCEPT placement=positional,negatable qualifier FEEDTHROUGH placement=positional,negatable qualifier NEWSGROUP placement=positional,value qualifier NOCONTROL nonnegatable qualifier LOG default qualifier STATISTICS qualifier GENID qualifier DEBUG define syntax ADD_ENTRY routine do_add_entry parameter P1, label=OPTIONS, value(required) parameter P2, label=ENTRY qualifier CLASSES, value(required,list) ! qualifier FILE, value(required) ! qualifier NAME, value(required) ! qualifier TYPE, value(default="NEWS",type=TYPE_OPTIONS) ! qualifier PROTOCOL, value(default="DECNET",type=PROTOCOL_OPTIONS) define syntax ADD_KEYWORD routine do_error parameter P1, label=OPTIONS, value(required) parameter P2, label=KEYWORDNAME, value(required) parameter P3 label=NOTEID define syntax ADD_MARKER routine do_mark parameter P1 label=OPTIONS, value(required) parameter P2, label=TAG, prompt="Mark", value(required) parameter P3, label=NOTERANGE, value(list) qualifier ALL nonnegatable qualifier MARKER disallow MARKER define syntax ADD_MAIL routine do_error parameter P1 label=OPTIONS, value(required) qualifier MODERATOR qualifier CREGRP qualifier RETRY qualifier EXECUTE value(default="RETAIN",type=EXECUTE_OPTIONS) qualifier DEFNEWSGROUP value qualifier NETFEED negatable,default qualifier JUNK negatable qualifier ACCEPT negatable qualifier NEWSGROUP value qualifier USERNAME value qualifier MAILFILE value(required,type=$infile) qualifier FOLDER value(required) qualifier DELETE qualifier NEWFOLDER value(required) disallow (USERNAME and MAILFILE) or (DELETE and NEWFOLDER) define syntax ADD_MEMBER routine do_add_member parameter P1, label=OPTIONS, value(required) parameter P2, label=USERNAME, value(required) qualifier MAIL value(required) qualifier NODES value(required,list) qualifier PRIVILEGES, value(required,list,type=PRIVS) define syntax BACK_NOTE routine do_back_note parameter P1, label=OPTIONS qualifier HEADER, nonnegatable qualifier TPU, nonnegatable qualifier EDITOR, nonnegatable qualifier ROT13, nonnegatable define syntax BACK_REPLY routine do_back_reply parameter P1, label=OPTIONS qualifier HEADER, nonnegatable qualifier TPU, nonnegatable qualifier EDITOR, nonnegatable qualifier ROT13, nonnegatable define syntax BACK_TOPIC routine do_back_note parameter P1, label=OPTIONS qualifier HEADER, nonnegatable qualifier TPU, nonnegatable qualifier EDITOR, nonnegatable qualifier ROT13, nonnegatable define syntax CLEAR_MARK routine do_markclear parameter P1 label=OPTIONS, value(required) parameter P2 label=TAG define syntax CLEAR_MESSAGES routine do_clear_messages define syntax CLEAR_KILL routine do_killclear parameter P1 label=OPTIONS, value(required) parameter P2 label=TAG define syntax CREATE_KEYWORD routine do_error parameter P1, label=OPTIONS, value(required) parameter P2, label=KEYWORDNAME,value(required) define syntax CREATE_NEWSGROUP routine do_cregrp parameter P1 label=OPTIONS, value(required) parameter P2, label=NEWSGROUPS,value(list) qualifier APPROVAL negatable qualifier SUBJECTORDER negatable qualifier CACHE negatable,value qualifier CONFIRM negatable qualifier HOLD value(default= "0") qualifier IGNOREEXPIRES negatable qualifier INQUIRE qualifier ITEMHOLD negatable,value(default="0") qualifier LOCAL qualifier NOTICE value qualifier MODERATOR value qualifier MAILLIST value qualifier PROTOCOL value(default="DECNET",type=PROTOCOL_OPTIONS) qualifier RESTRICT, negatable,value(type=RESTRCT,default="MEMBERS",list) qualifier SERVER value qualifier SINCE, nonnegatable,value(default="YESTERDAY",type=$datetime) qualifier TITLE value qualifier UPDATE negatable,default qualifier WRITE negatable qualifier FILEHOLD value(default="2") qualifier KEEPREQUEST negatable,default define syntax DELETE_ALIAS routine do_delete_alias parameter P1 label=OPTIONS, value(required) parameter P2, label=NEWSGROUP qualifier CONFIRM negatable define syntax DELETE_ENTRY routine do_delete_entry parameter P1 label=OPTIONS, value(required) parameter P2, label=ENTRY qualifier CLASSES, value(required,list) define syntax DELETE_KEYWORD routine do_error parameter P1 label=OPTIONS, value(required) parameter P2, label=KEYWORDNAME parameter P3, label=NOTEID qualifier ALL define syntax DELETE_GROUP routine do_dgroup parameter P1 label=OPTIONS, value(required) parameter P2, label=GROUP, value(list) qualifier CONFIRM negatable define syntax DELETE_ITEM routine do_ditem parameter P1 label=OPTIONS, value(required) parameter P2, label=ITEM, value(list) qualifier IDENTIFIER, value qualifier CONFIRM negatable disallow (ITEM and IDENTIFIER) define syntax DELETE_MARKER routine do_markclear parameter P1 label=OPTIONS, value(required) parameter P2, label=TAG, prompt="DELETE Mark", value(required) define syntax DELETE_MEMBER routine do_delete_member parameter P1 label=OPTIONS, value(required) parameter P2, label=USERNAME, prompt="DELETE Username", value(required) define syntax DIR_CONFERENCES routine do_error parameter P1, label=NODENAME define syntax DIR_ENTRIES routine do_error parameter P1, label=ENTRYNAME qualifier CLASS value(required) define syntax DIR_NOTEBOOK routine do_error parameter P1, label=ENTRYNAME qualifier CLASS, value(required) define syntax MOD_ALIAS routine do_mod_alias parameter P1 label=OPTIONS, value(required) parameter P2 label=NEWSGROUP parameter P3 label=ALIAS,value(list) define syntax MOD_KILL routine do_killmod parameter P1 label=OPTIONS, value(required) parameter P2 label=TAG define syntax MOD_ENTRY routine do_modify_entry parameter P1 label=OPTIONS, value(required) parameter P2 label=NEWSGROUP qualifier CLASSES, value(required,list) qualifier FILE, value(required) qualifier NAME, value(required) define syntax MOD_KEYWORD routine do_error parameter P1, label=OPTIONS, value(required) parameter P2, label=KEYWORD, value(required) qualifier NAME, value(required) define syntax MOD_MEMBER routine do_modify_member parameter P1, label=OPTIONS, value(required) parameter P2, label=USERNAME, value(required) qualifier MAIL value(required) qualifier NODES value(required,list) qualifier PRIVILEGES, value(required,list,type=PRIVS) qualifier NAME value(required) define syntax NEXT_NOTE routine do_next_note parameter P1, label=OPTIONS qualifier HEADER, nonnegatable qualifier TPU, nonnegatable qualifier EDITOR, nonnegatable qualifier ROT13, nonnegatable define syntax NEXT_REPLY routine do_next_reply parameter P1, label=OPTIONS qualifier HEADER, nonnegatable qualifier TPU, nonnegatable qualifier EDITOR, nonnegatable qualifier ROT13, nonnegatable define syntax NEXT_TOPIC routine do_next_note parameter P1, label=OPTIONS qualifier HEADER, nonnegatable qualifier TPU, nonnegatable qualifier EDITOR, nonnegatable qualifier ROT13, nonnegatable define syntax NEXT_UNSEEN routine do_next_unseen parameter P1, label=OPTIONS qualifier HEADER, nonnegatable qualifier TPU, nonnegatable qualifier EDITOR, nonnegatable qualifier ROT13, nonnegatable define syntax SET_BROAD routine set_broad parameter P1 label=OPTIONS, value(required) parameter P2 label=BOOL,value(type=SWITCH) define syntax SET_NOBROAD routine set_nobroad parameter P1 label=OPTIONS, value(required) define syntax SET_HISTORY routine set_history parameter P1 label=OPTIONS, value(required) parameter P2 label=BOOL,value(type=SWITCH) define syntax SET_NOHISTORY routine set_nohistory parameter P1 label=OPTIONS, value(required) define syntax SET_LINE routine set_line parameter P1 label=OPTIONS, value(required) parameter P2 label=BOOL,value(type=SWITCH) define syntax SET_NOLINE routine set_noline parameter P1 label=OPTIONS, value(required) define syntax SET_DOTNEWSRC routine set_dotnewsrc parameter P1 label=OPTIONS, value(required) parameter P2 label=BOOL,value(type=SWITCH) define syntax SET_NODOTNEWSRC routine set_nodotnewsrc parameter P1 label=OPTIONS, value(required) define syntax SET_CLASS routine do_set_class parameter P1 label=OPTIONS, value(required) parameter P2 label=CLASSNAME define syntax SET_CONF routine do_error parameter P1 label=OPTIONS, value(required) qualifier TITLE, nonnegatable, value(required) qualifier NOTICE, nonnegatable, value(required) qualifier RESTRICT, negatable, value(type=RESTRCT) qualifier WRITE, negatable define syntax SET_ITEM routine do_set_item parameter P1 label=OPTIONS, value(required) parameter P2 label=NOTEID qualifier HOLD value(default="0") define syntax DEFINE_KEY routine do_define parameter P1, prompt="Key name", value(required) parameter P2, prompt="Equivalence name", value(required) qualifier ECHO qualifier TERMINATE qualifier LOCK_STATE qualifier IF_STATE, value(required,list) qualifier SET_STATE, value(required) qualifier PROTECT disallow ((not LOCK_STATE and TERMINATE and SET_STATE) or (LOCK_STATE and not SET_STATE)) define syntax SET_ACCESS routine do_setaccess parameter P1 label=OPTIONS, value(required) parameter P2, label=NEWSGROUP define syntax SET_DISPLAY routine do_set_display parameter P1 label=OPTIONS, value(required) qualifier SCANSIZE value(type=$number,required) qualifier FROMSIZE value(type=$number,required) qualifier ALLITEMS nonnegatable qualifier UNREADITEMS nonnegatable qualifier UNSEENSTACK nonnegatable,value(type=$number) qualifier SUBJECTORDER negatable define syntax SET_MANAGER routine do_set_manager parameter P1 label=OPTIONS, value(required) parameter P2 label=BOOL,value(type=SWITCH) define syntax SET_NOMANAGER routine do_set_nomanager parameter P1 label=OPTIONS, value(required) define syntax SET_MODERATOR routine do_set_mod parameter P1 label=OPTIONS, value(required) parameter P2 label=BOOL,value(type=SWITCH) qualifier ALL negatable define syntax SET_NOMODERATOR routine do_set_nomod parameter P1 label=OPTIONS, value(required) define syntax SET_NEWSGROUP routine do_set_newsgroup parameter P1 label=OPTIONS, value(required) parameter P2 label=GROUP qualifier APPROVAL negatable qualifier SUBJECTORDER negatable qualifier CACHE negatable,value qualifier HOLD value(default="0") qualifier IGNOREEXPIRES negatable qualifier ITEMHOLD negatable,value(default="0") qualifier LOCAL qualifier MODERATOR negatable,value qualifier MAILLIST negatable,value qualifier SUPERVISOR negatable,value qualifier NOTICE negatable,value qualifier PROTOCOL value(default="DECNET",type=PROTOCOL_OPTIONS) qualifier RESTRICT negatable, value(type=RESTRCT) qualifier SERVER value qualifier TITLE value qualifier UPDATE negatable,default qualifier WRITE negatable qualifier FILEHOLD value(default="2") qualifier KEEPREQUEST negatable,default define syntax SET_NOTE routine do_error parameter P1 label=OPTIONS, value(required) parameter P2, label=NOTEID qualifier CONFERENCE, nonnegatable, value(required) qualifier HIDDEN, negatable qualifier TITLE, nonnegatable, value(required) qualifier WRITE, negatable define syntax SET_PROFILE routine do_set_profile parameter P1 label=OPTIONS, value(required) parameter P2 label=BOOL qualifier AUTOMATIC negatable,value(type=DIR_TYPE,default="UNSEEN") qualifier CLASS, negatable,value(default="MAIN") qualifier DISPLAY value(list) qualifier EDITOR, negatable,value(required,list) qualifier VIEWER, negatable,value(required,list) qualifier PERSONAL_NAME, negatable,value(required) qualifier RCORDER negatable qualifier RCFILTER negatable qualifier RCREG negatable qualifier PRINT negatable,value qualifier DIRECTORY negatable,value qualifier TEMPORARY negatable qualifier NEWREGISTER negatable,value qualifier SEARCH nonnegatable,value(type=SEARCH_TYPES,default="LITERAL") qualifier SCANSIZE value qualifier FROMSIZE value qualifier SHOWDIRS negatable qualifier SIGNATURE value qualifier LOCSIGNATURE value qualifier ORGANIZATION value qualifier KEYDEFS value qualifier LINE_EDITING negatable qualifier DOTNEWSRC negatable qualifier BROADCAST_TRAPPING negatable qualifier FASTLOAD negatable qualifier REPLYTO negatable,value(required) disallow DIRECTORY and PRINT define syntax SET_SEEN routine do_skip parameter P1 label=OPTIONS, value(required) parameter P2, label=NEWG qualifier NEWSGROUP nonnegatable,default qualifier ALL nonnegatable qualifier REGISTERED nonnegatable qualifier UNREGISTERED nonnegatable qualifier POINTER nonnegatable qualifier FOLLOWUP nonnegatable qualifier BEFORE value (default="TODAY",type=$datetime) qualifier UPTO nonnegatable,value disallow any2(NEWSGROUP,NEWG,POINTER,FOLLOWUP,UPTO,ALL,REGISTERED,UNREGISTERED) define syntax SET_MAIL routine do_set_mail parameter P1 label=OPTIONS, value(required) parameter P2 label=MAILTYPE parameter P3 label=QUAL define syntax SHOW_SYS routine do_show_sys parameter P1 label=OPTIONS, value(required) define syntax SHOW_ALLITEMS routine do_show_allitems parameter P1 label=OPTIONS, value(required) define syntax SHOW_UNREADITEMS routine do_show_unreaditems parameter P1 label=OPTIONS, value(required) define syntax SHOW_UNSEENSTACK routine do_show_unseenstack parameter P1 label=OPTIONS, value(required) parameter P2 label=PLUSMORE, value(type=$number) define syntax SHOW_ALIASES routine do_show_aliases parameter P1 label=OPTIONS, value(required) define syntax SHOW_CLASSES routine do_show_classes parameter P1 label=OPTIONS, value(required) define syntax SHOW_ITEM routine do_show_item parameter P1 label=OPTIONS, value(required) parameter P2 label=NOTEID qualifier FULL nonnegatable define syntax SHOW_KEYWORDS routine do_error parameter P1 label=OPTIONS, value(required) parameter P2, label=KEYWORDNAME qualifier ALL, nonnegatable qualifier FULL, nonnegatable define syntax SHOW_ENTRY routine do_show_entry parameter P1 label=OPTIONS, value(required) parameter P2 label=GROUP define syntax SHOW_HISTORY routine do_show_history define syntax SHOW_KILL routine do_killshow parameter P1 label=OPTIONS, value(required) define syntax SHOW_LINECOUNTS routine do_show_linecounts parameter P1 label=OPTIONS, value(required) define syntax SHOW_MARKS routine do_markshow parameter P1 label=OPTIONS, value(required) parameter P2 label=TAG qualifier ALL disallow (TAG and ALL) define syntax SHOW_MEMBER routine do_show_member parameter P1 label=OPTIONS, value(required) parameter P2 label=USERNAME qualifier ALL, nonnegatable qualifier MODERATOR, nonnegatable qualifier SUPERVISOR nonnegatable define syntax SHOW_MESSAGES routine do_show_messages define syntax SHOW_MODERATOR routine do_show_moderator parameter P1 label=OPTIONS, value(required) define syntax SHOW_NEWSGROUP routine do_show_newsgroup parameter P1 label=OPTIONS, value(required) parameter P2 label=GROUP qualifier FULL nonnegatable define syntax SHOW_NOTE routine do_show_note parameter P1 label=OPTIONS, value(required) parameter P2 label=NOTEID define syntax SHOW_POSTMARKS routine do_show_postmarks parameter P1 label=OPTIONS, value(required) define syntax SHOW_PROFILE routine do_show_profile parameter P1 label=OPTIONS, value(required) define syntax SHOW_VERSION routine do_version parameter P1 label=OPTIONS, value(required) define syntax SHOW_MAIL routine do_show_mail parameter P1 label=OPTIONS, value(required) parameter P2 label=MAILTYPE ! ! verb definition for news qualifiers and single line commands ! define verb INVOKENEWS qualifier SCREEN default qualifier ALLSCAN value(list) qualifier SCAN value(list) qualifier UNSEEN qualifier READONLY qualifier DOTNEWSRC qualifier CAPTIVE qualifier CLASS value qualifier NETSERVER negatable,value qualifier NETPROTOCOL nonnegatable,value(required,type=PROTOCOL_OPTIONS) qualifier ON_ERROR value(required,type=ON_ERROR_OPTIONS) parameter P1 label=COMMAND,value(type=$rest_of_line) disallow(SCAN and ALLSCAN) ! ! verb definition for news command language ! define verb ADD routine do_error parameter P1 label=OPTIONS, prompt="_NEWS ADD>", value(required,type=ADD_OPTIONS) define verb ATTACH routine do_attach parameter P1, label=PROCESSNAME qualifier PARENT nonnegatable disallow (PARENT and PROCESSNAME) define verb BACK routine do_back_note parameter P1, label=OPTIONS, value(type=BACK_OPTIONS) qualifier HEADER, nonnegatable qualifier TPU, nonnegatable qualifier EDITOR, nonnegatable qualifier ROT13, nonnegatable define verb BOTTOM routine do_bottom define verb CANCEL routine do_cancel define verb CHECKPOINT routine write_reg_file define verb CLEAR routine do_error parameter P1 label=OPTIONS, prompt="_NEWS CLEAR>", value(required,type=CLEAR_OPTIONS) define verb CLOSE routine do_closeit parameter p1 label=OBJECT qualifier MAIL nonnegatable define verb CREATE routine do_error parameter P1 label=OPTIONS, prompt="_NEWS CREATE>", value(required,type=CREATE_OPTIONS) define verb COMPRESS routine do_mail_compress define verb DEFINE routine do_error qualifier KEY, syntax=DEFINE_KEY define verb DELETE synonym REMOVE routine do_dcontext parameter P1 label=OPTIONS, value(type=DELETE_OPTIONS) qualifier CONFIRM negatable qualifier IDENTIFIER ! a Kludge to get rid of the error message qualifier ITEM qualifier GROUP disallow (ITEM or GROUP) define verb DEREGISTER routine do_deregister parameter P1, label=NEWSGROUP qualifier ALL, nonnegatable disallow (NEWSGROUP and ALL) define verb DIRECTORY routine do_dircall qualifier ALL, nonnegatable qualifier ITEMS, nonnegatable qualifier NEW, nonnegatable qualifier NEWSGROUPS, nonnegatable qualifier REGISTER, nonnegatable qualifier RESET, nonnegatable qualifier SINCE, nonnegatable,value (default="TODAY",type=$datetime) qualifier CLASS, value(required) qualifier AUTHOR, value(required) qualifier BEFORE nonnegatable,value (type=$datetime) qualifier BUFFER value(required) qualifier KEYWORD value(required) qualifier OUTPUT value(required,type=$outfile) qualifier TITLE value(required) qualifier UNSEEN qualifier UNREGISTERED nonnegatable qualifier CONFERENCES, nonnegatable,syntax=DIR_CONFERENCES qualifier ENTRIES, nonnegatable,syntax=DIR_ENTRIES qualifier NOTEBOOK, nonnegatable,syntax=DIR_NOTEBOOK disallow any2 (ALL,ITEMS,NEW,NEWSGROUPS,REGISTER,SINCE,UNREGISTERED) define verb DISPLAY routine do_display_file parameter P1 label=FILE,value(type=$infile) define verb DOWN routine screen_cur_down parameter P1 label=LINES,value(type=$number) define verb EDIT routine do_edit parameter P1, label=FILE,value(type=$infile,required),prompt="File", define verb EXIT synonym EX synonym EXI routine do_exit define verb EXTRACT synonym SAVE routine do_extract parameter P1, label=FILE,value(type=$outfile) parameter P2, label=NOTERANGE, value(list) qualifier ALL, nonnegatable qualifier AUTHOR, value(required) qualifier APPEND, nonnegatable qualifier BEFORE value(required,type=$datetime) qualifier DIRECTORY value(type=PRINT_DIRTYPE) qualifier KEYWORD, value(required) qualifier SEEN, nonnegatable qualifier SINCE, value(default="TODAY",type=$datetime) qualifier TITLE, value(required) qualifier UNSEEN, nonnegatable qualifier FROM, value(required) qualifier SUBJECT, value(required) qualifier UNREAD, nonnegatable qualifier MARKER, value(list) qualifier ROT13 nonnegatable qualifier NEWSGROUPS, value(required,list) qualifier HEADER value(list,type=HEADER_LINES) disallow (NOTERANGE and MARKER) or (AUTHOR and FROM) or (NOTERANGE and NEWSGROUPS) or (TITLE and SUBJECT) or (UNSEEN and UNREAD) define verb FOLLOWUP synonym ANSWER routine do_followup parameter P1, label=NEWSITEM qualifier EDIT, negatable,default qualifier EXTRACT, negatable,default qualifier HEADERS, negatable qualifier SELF, negatable qualifier ROT13, negatable qualifier REPLY qualifier FILE, label=INFILE, nonnegatable,value(required,type=$infile) qualifier NEWSGROUPS, value(list) define verb FORWARD routine do_forward parameter P1, label=NOTERANGE, value(list) qualifier ALL, nonnegatable qualifier HEADERS, negatable qualifier SUBJECT, value(required) qualifier SELF, negatable qualifier TO, value(impcat,required,list) qualifier EDIT, negatable,default qualifier MARKER, value(list) qualifier MEMBERS disallow (NOTERANGE and MARKER) define verb HELP routine do_help parameter P1, label=TOPIC,value(type=$rest_of_line) define verb KILL routine do_kill qualifier SUBJECT nonnegatable qualifier FROM nonnegatable qualifier HEADER value(required) define verb LAST routine do_last qualifier HEADER, nonnegatable qualifier TPU, nonnegatable qualifier EDITOR, nonnegatable qualifier ROT13, nonnegatable define verb MAIL routine do_forward parameter P1, label=NOTERANGE, value(list) qualifier ALL, nonnegatable qualifier HEADERS, negatable qualifier SUBJECT, value(required) qualifier SELF, negatable qualifier TO, value(impcat,required,list) qualifier EDIT, negatable,default qualifier MARKER, value(list) disallow (NOTERANGE and MARKER) define verb MARK routine do_mark parameter P1, label=TAG parameter P2, label=NOTERANGE, value(list) qualifier ALL nonnegatable ! a Kludge to get rid of the error message qualifier MARKER disallow MARKER define verb MODIFY routine do_error parameter P1 label=OPTIONS, prompt="_NEWS MODIFY>", value(required,type=MODIFY_OPTIONS) define verb NEXT routine do_next_note parameter P1, label=OPTIONS, value(type=NEXT_OPTIONS) qualifier HEADER, nonnegatable qualifier TPU, nonnegatable qualifier EDITOR, nonnegatable qualifier ROT13, nonnegatable define verb NEWSGROUPS routine do_groups_display define verb NOOP routine do_noop define verb NOSCREEN routine do_noscreen define verb OPEN routine do_openit parameter P1, label=NEWSGROUP qualifier MAIL nonnegatable qualifier NEW, nonnegatable qualifier MARKER value,nonnegatable qualifier CLASSNAME value(required),nonnegatable ! this is never used in News 6.1beta6 - C. Bailey ! qualifier AUTOMATIC negatable ! this is never used in News 6.1beta6 - C. Bailey ! qualifier NOTEBOOK negatable disallow any2(NEWSGROUP,MARKER,NEW) or(MAIL and (NEW or MARKER or CLASSNAME)) ! these are never used in News 6.1beta6 - C. Bailey ! or AUTOMATIC or NOTEBOOK)) define verb CROSSPOST routine do_xpost parameter P1, label=NEWSGROUPS,value(list) define verb POST routine do_post parameter P1, label=INFILE,value(type=$infile) qualifier EDIT, negatable,default qualifier CONTROL, value, nonnegatable qualifier HEADERS, negatable qualifier NEWSGROUPS, nonnegatable, value(required,list) qualifier SUBJECT, nonnegatable, value(required) qualifier SELF, negatable qualifier ROT13, negatable qualifier REPLY, negatable define verb PRINT routine do_print parameter P1, label=NOTERANGE, value(list) qualifier ALL, nonnegatable qualifier AUTHOR, value(required) qualifier BEFORE value(required,type=$datetime) qualifier DIRECTORY value(type=PRINT_DIRTYPE) qualifier KEYWORD, value(required) qualifier SEEN, nonnegatable qualifier SINCE, value(default="TODAY",type=$datetime) qualifier TITLE, value(required) qualifier UNSEEN, nonnegatable qualifier FROM, value(required) qualifier SUBJECT, value(required) qualifier UNREAD, nonnegatable qualifier MARKER, value(list) qualifier ROT13 nonnegatable qualifier CONFIRM qualifier NAME value(required) qualifier NOTE value(required) qualifier NOTIFY, negatable qualifier PRIORITY value(required) qualifier AFTER value(required,type=$datetime) qualifier CHARACTERISTICS value(required,list) qualifier FORM value(required) qualifier HOLD qualifier JOB_COUNT value(required) qualifier LOWERCASE qualifier OPERATOR value(required) qualifier PARAMETERS value(required,list) qualifier QUEUE value(required) qualifier LOCAL nonnegatable qualifier RESTART qualifier BURST value(type=PRINT_BFT) qualifier COPIES value(required) qualifier FEED qualifier FLAG value(type=PRINT_BFT) qualifier PASSALL qualifier SETUP value(required,list) qualifier SPACE qualifier TRAILER value(type=PRINT_BFT) qualifier WAIT negatable,default qualifier NEWSGROUPS value(required,list) qualifier HEADER value(list,type=HEADER_LINES) disallow (NOTERANGE and MARKER) or (AUTHOR and FROM) or (UNSEEN and UNREAD) or (NOTERANGE and NEWSGROUPS) or (LOCAL and (QUEUE or BURST or FLAG or TRAILER)) define verb PURGE routine do_mail_purge qualifier RECLAIM qualifier STATISTICS define verb QUIT routine do_quit define verb READ routine do_read parameter P1, label=NEWSITEM qualifier HEADER, nonnegatable qualifier NEW, nonnegatable qualifier TPU, nonnegatable qualifier EDITOR, nonnegatable qualifier ROT13, nonnegatable qualifier NEXT, nonnegatable qualifier BACK, nonnegatable qualifier LAST, nonnegatable qualifier PARENT, nonnegatable qualifier REFS, nonnegatable qualifier TOPIC nonnegatable qualifier PREV, nonnegatable qualifier IDENTIFIER, value,nonnegatable qualifier MARKER, value,nonnegatable qualifier FOLLOWUP, value,nonnegatable qualifier SUBJECT value,nonnegatable qualifier TITLE value,nonnegatable disallow any2(REFS,PREV,BACK,NEXT,LAST,PARENT,TOPIC,IDENTIFIER,MARKER,FOLLOWUP) define verb REFRESH routine do_refresh define verb REGISTER routine do_register parameter P1, label=NEWSGROUP qualifier ALL, nonnegatable qualifier NEW, nonnegatable qualifier LOCAL, nonnegatable qualifier NETGROUPS, nonnegatable qualifier SINCE, nonnegatable,value (default="TODAY",type=$datetime) qualifier BEFORE, nonnegatable,value (default="TODAY",type=$datetime) qualifier PRIORITY, value qualifier CONFIRM qualifier RECORD disallow any2(ALL,NEW,NEWSGROUP,SINCE,BEFORE,LOCAL,NETGROUPS) define verb REPLY routine do_reply parameter P1, label=NEWSITEM qualifier HEADERS, negatable qualifier TO, value(impcat,required,list) qualifier SUBJECT, value(required) qualifier SELF, negatable qualifier EDIT, negatable,default qualifier EXTRACT, negatable,default qualifier ROT13, negatable define verb REPOST routine do_repost define verb SCREEN routine do_screen define verb SEARCH routine do_search parameter P1, label=target qualifier HEADER, negatable qualifier TPU, nonnegatable qualifier EDIT, nonnegatable qualifier DISPLAY, negatable qualifier NEWSGROUPS, nonnegatable, value(required,list) qualifier NOTERANGE value(list) qualifier MARKER value(list) qualifier ALL qualifier AUTHOR, value(required) qualifier BEFORE value(required,type=$datetime) qualifier KEYWORD, value(required) qualifier SEEN, nonnegatable qualifier SINCE, value(default="TODAY",type=$datetime) qualifier TITLE, value(required) qualifier UNSEEN, nonnegatable qualifier FROM, value(required) qualifier SUBJECT, value(required) qualifier UNREAD, nonnegatable qualifier WILDCARD nonnegatable qualifier PATTERN nonnegatable qualifier LITERAL nonnegatable qualifier REVERSE nonnegatable disallow (NOTERANGE and MARKER) or any2(WILDCARD,PATTERN,LITERAL) define verb SELECT routine do_selgrp parameter P1, label=NEWSGROUP qualifier NEW, nonnegatable qualifier MARKER value,nonnegatable qualifier MAIL nonnegatable disallow any2(NEWSGROUP,MARKER,NEW,MAIL) define verb SEND routine do_send parameter P1, label=INFILE,value(type=$infile) qualifier AUTHOR nonnegatable qualifier EXTRACT qualifier HEADERS, negatable qualifier SUBJECT, value(required) qualifier SELF, negatable qualifier QUOTE, value qualifier TO, value(impcat,required,list) qualifier EDIT, negatable,default qualifier MEMBERS define verb SET routine do_error parameter P1 label=OPTIONS, prompt="_NEWS SET>", value(required,type=SET_OPTIONS) define verb SHOW routine do_error parameter P1 label=OPTIONS, prompt="_NEWS SHOW>", value(required,type=SHOW_OPTIONS) define verb SKIM routine do_skim parameter P1, label=GROUPS,value(list) qualifier ITEMS negatable qualifier DIRECTORIES negatable qualifier FILES negatable qualifier NEWSGROUPS negatable qualifier SERVED negatable qualifier FILECHECK negatable qualifier VERBOSE negatable qualifier ARCHIVE value(type=$outfile) qualifier HISTORY value(default="45") define verb SKIP routine do_skip parameter P1, label=NEWG qualifier NEWSGROUP nonnegatable qualifier POINTER nonnegatable qualifier ALL nonnegatable qualifier REGISTERED nonnegatable qualifier UNREGISTERED nonnegatable qualifier FOLLOWUP nonnegatable qualifier BEFORE value (default="TODAY",type=$datetime) qualifier UPTO nonnegatable,value disallow any2(NEWSGROUP,NEWG,POINTER,FOLLOWUP,UPTO,ALL,REGISTERED,UNREGISTERED) define verb SPAWN routine do_spawn parameter P1 label=COMMAND,value(type=$rest_of_line) qualifier INPUT value(required,type=$infile),nonnegatable qualifier LOGICAL_NAMES negatable qualifier OUTPUT value(required,type=$outfile),nonnegatable qualifier PROCESS value(required),nonnegatable qualifier SYMBOLS negatable qualifier WAIT negatable define verb TOP routine do_top define verb TOPIC routine do_topic qualifier HEADER, nonnegatable qualifier TPU, nonnegatable qualifier EDITOR, nonnegatable qualifier ROT13, nonnegatable define verb UNMARK routine do_unmark parameter P1, label=TAG parameter P2, label=NOTERANGE, value(list) qualifier ALL nonnegatable ! a Kludge to get rid of the error message qualifier MARKER disallow MARKER define verb UNREAD routine do_unread qualifier ALL nonnegatable define verb UNSKIP routine do_unskip define verb UP routine screen_cur_up parameter P1 label=LINES,value(type=$number) define verb UPDATE routine do_update parameter P1 label=ENTRYNAME qualifier CLASS, nonnegatable, value(required) qualifier CLIENT nonnegatable qualifier PROTOCOL value(default="DECNET",type=PROTOCOL_OPTIONS) qualifier SERVER value disallow CLASS and (CLIENT or PROTOCOL or SERVER) define verb VERSION routine do_version define verb WRITE routine do_post parameter P1, label=INFILE,value(type=$infile) qualifier EDIT, negatable,default qualifier CONTROL, negatable qualifier HEADERS, negatable qualifier NEWSGROUPS, nonnegatable, value(required,list) qualifier SUBJECT, nonnegatable, value(required) qualifier SELF, negatable qualifier LAST nonnegatable qualifier ROT13, negatable define verb MOVE routine do_move synonym FILE parameter P1 label=FOLDER define verb COPY routine do_copy parameter P1 label=FOLDER define verb SCUP routine scup define verb SCDOWN routine scdown