1 2#------------------------------------------------------------------------------ 3# $File: sccs,v 1.6 2009/09/19 16:28:12 christos Exp $ 4# sccs: file(1) magic for SCCS archives 5# 6# SCCS archive structure: 7# \001h01207 8# \001s 00276/00000/00000 9# \001d D 1.1 87/09/23 08:09:20 ian 1 0 10# \001c date and time created 87/09/23 08:09:20 by ian 11# \001e 12# \001u 13# \001U 14# ... etc. 15# Now '\001h' happens to be the same as the 3B20's a.out magic number (0550). 16# *Sigh*. And these both came from various parts of the USG. 17# Maybe we should just switch everybody from SCCS to RCS! 18# Further, you can't just say '\001h0', because the five-digit number 19# is a checksum that could (presumably) have any leading digit, 20# and we don't have regular expression matching yet. 21# Hence the following official kludge: 228 string \001s\ SCCS archive data 23