DataMuseum.dk

Presents historical artifacts from the history of:

DKUUG/EUUG Conference tapes

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about DKUUG/EUUG Conference tapes

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download
Index: ┃ T c

⟦3b03657a0⟧ TextFile

    Length: 843 (0x34b)
    Types: TextFile
    Names: »compat.cpp«

Derivation

└─⟦a0efdde77⟧ Bits:30001252 EUUGD11 Tape, 1987 Spring Conference Helsinki
    └─ ⟦this⟧ »EUUGD11/euug-87hel/sec8/ease/config-files/FINIS/compat.cpp« 

TextFile

/***********************************************************
 ***********************************************************
 ****
 ****	Provide Backward Compatibility
 ****
 ****	$Id: compat.cpp,v 1.4 85/11/24 22:46:32 acu Exp $
 ****
 ***********************************************************
 ***********************************************************/

#define cppCOMPAT 4.2

field
	berkhost: match (1) in berkhosts;

/***************************************************
 * General code to convert back to old style names *
 ***************************************************/

ruleset OLDSTYLE_RW {

	if ( usr < @berkhost > )
		return ( $2:$1 );			/* u@bhost => h:u */

	if ( usr < @hostname ".UUCP" > )
		retry ( $2!$1 );			/* u@host.UUCP => host!u */

	if ( usr @ hostpath ".ARPA" )
		retry ( $1@$2 );			/* u@host.ARPA => u@host */

}