152 lines
5.7 KiB
Plaintext
152 lines
5.7 KiB
Plaintext
{
|
|
$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.
|