| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151 |
- {
- $Project$
- $Workfile$
- $Revision$
- $DateUTC$
- $Id$
- This file is part of the Indy (Internet Direct) project, and is offered
- under the dual-licensing agreement described on the Indy website.
- (http://www.indyproject.org/)
- Copyright:
- (c) 1993-2005, Chad Z. Hower and the Indy Pit Crew. All rights reserved.
- }
- {
- $Log$
- }
- {
- Rev 1.2 2004.02.03 5:44:46 PM czhower
- Name changes
- Rev 1.1 10/17/2003 12:06:16 AM DSiders
- Added localization comments.
- Rev 1.0 11/13/2002 08:30:10 AM JPMugaas
- Initial import from FTP VC.
- }
- unit IdGopherConsts;
- {*******************************************************}
- { }
- { Indy IdGopherConsts - this just contains }
- { Constants used for writing Gopher servers }
- { and clients }
- { }
- { Copyright (C) 2000 Winshoes Working Group }
- { Original author: Pete Mee and moved to }
- { this unit by J. Peter Mugaas }
- { 2000-April-23 }
- { }
- {*******************************************************}
- interface
- {$i IdCompilerDefines.inc}
- uses
- IdGlobal;
- Const
- {Item constants - comments taken from RFC}
- IdGopherItem_Document = '0'; // Item is a file
- IdGopherItem_Directory = '1'; // Item is a directory
- IdGopherItem_CSO = '2'; // Item is a CSO phone-book server
- IdGopherItem_Error = '3'; // Error
- IdGopherItem_BinHex = '4'; // Item is a BinHexed Macintosh file.
- IdGopherItem_BinDOS = '5'; // Item is DOS binary archive of some sort.
- // Client must read until the TCP connection closes. Beware.
- IdGopherItem_UUE = '6'; // Item is a UNIX uuencoded file.
- IdGopherItem_Search = '7'; // Item is an Index-Search server.
- IdGopherItem_Telnet = '8'; // Item points to a text-based telnet session.
- IdGopherItem_Binary = '9'; // Item is a binary file.
- // Client must read until the TCP connection closes. Beware.
- IdGopherItem_Redundant = '+'; // Item is a redundant server
- IdGopherItem_TN3270 = 'T'; // Item points to a text-based tn3270 session.
- IdGopherItem_GIF = 'g'; // Item is a GIF format graphics file.
- IdGopherItem_Image = ':'; // Item is some kind of image file.
- // Client decides how to display. Was 'I', but depracted
- IdGopherItem_Image2 = 'I'; //Item is some kind of image file -
- // this was drepreciated
- {Items discovered outside of Gopher RFC - "Gopher+"}
- IdGopherItem_Sound = '<'; //Was 'S', but deprecated
- IdGopherItem_Sound2 = 'S'; //This was depreciated but should be used with clients
- IdGopherItem_Movie = ';'; //Was 'M', but deprecated
- IdGopherItem_HTML = 'h';
- IdGopherItem_MIME = 'M'; //See above for a potential conflict with Movie
- IdGopherItem_Information = 'i'; // Not a file - just information
- IdGopherPlusIndicator = IdGopherItem_Redundant; // Observant people will note
- // the conflict here...!
- IdGopherPlusInformation = '!'; // Formatted information
- IdGopherPlusDirectoryInformation = '$';
- //Gopher+ additional information
- IdGopherPlusInfo = '+INFO: '; {do not localize}
- { Info format is the standard Gopher directory entry + TAB + '+'.
- The info is contained on the same line as the '+INFO: '}
- IdGopherPlusAdmin = '+ADMIN:' + EOL; {do not localize}
- { Admin block required for every item. The '+ADMIN:' occurs on a
- line of it's own (starting with a space) and is followed by
- the fields - one per line.
- Required fields:
- ' Admin: ' [+ comments] + '<' + admin e-mail address + '>'
- ' ModDate: ' [+ comments] + '<' + dateformat:YYYYMMDDhhnnss + '>'
- Optional fields regardless of location:
- ' Score: ' + relevance-ranking
- ' Score-range: ' + lower-bound + ' ' + upper-bound
- Optional fields recommended at the root only:
- ' Site: ' + site-name
- ' Org: ' + organization-description
- ' Loc: ' + city + ', ' + state + ', ' + country
- ' Geog: ' + latitude + ' ' + longitude
- ' TZ: ' + GMT-offset
- Additional recorded possibilities:
- ' Provider: ' + item-provider-name
- ' Author: ' + author
- ' Creation-Date: ' + '<' + YYYYMMDDhhnnss + '>'
- ' Expiration-Date: ' + '<' + YYYYMMDDhhnnss + '>'
- }
- IdGopherPlusViews = '+VIEWS:' + EOL; {do not localize}
- { View formats are one per line:
- ' ' + mime/type [+ langcode] + ': <' + size estimate + '>'
- ' ' + logcode = ' ' + ISO-639-Code + '_' + ISO-3166-Code
- }
- IdGopherPlusAbstract = '+ABSTRACT:' + EOL; {do not localize}
- { Is followed by a (multi-)line description. Line(s) begin with
- a space.}
- IdGopherPlusAsk = '+ASK:'; {do not localize}
- //Questions for +ASK section:
- IdGopherPlusAskPassword = 'AskP: '; {do not localize}
- IdGopherPlusAskLong = 'AskL: '; {do not localize}
- IdGopherPlusAskFileName = 'AskF: '; {do not localize}
- // Prompted responses for +ASK section:
- // Multi-choice, multi-selection
- IdGopherPlusSelect = 'Select: '; {do not localize}
- // Multi-choice, single-selection
- IdGopherPlusChoose = 'Choose: '; {do not localize}
- //Multi-choice, single-selection
- IdGopherPlusChooseFile = 'ChooseF: '; {do not localize}
- //Known response types:
- IdGopherPlusData_BeginSign = '+-1' + EOL;
- IdGopherPlusData_EndSign = EOL + '.' + EOL;
- IdGopherPlusData_UnknownSize = '+-2' + EOL;
- IdGopherPlusData_ErrorBeginSign = '--1' + EOL;
- IdGopherPlusData_ErrorUnknownSize = '--2' + EOL;
- IdGopherPlusError_NotAvailable = '1';
- IdGopherPlusError_TryLater = '2';
- IdGopherPlusError_ItemMoved = '3';
- implementation
- end.
|