1327e51cbSPeter Avalos 2327e51cbSPeter Avalos#------------------------------------------------------------------------------ 3*970935fdSSascha Wildner# $File: sccs,v 1.8 2020/06/20 21:32:52 christos Exp $ 4327e51cbSPeter Avalos# sccs: file(1) magic for SCCS archives 5327e51cbSPeter Avalos# 6*970935fdSSascha Wildner# SCCS v4 archive structure: 7327e51cbSPeter Avalos# \001h01207 8327e51cbSPeter Avalos# \001s 00276/00000/00000 9327e51cbSPeter Avalos# \001d D 1.1 87/09/23 08:09:20 ian 1 0 10327e51cbSPeter Avalos# \001c date and time created 87/09/23 08:09:20 by ian 11327e51cbSPeter Avalos# \001e 12327e51cbSPeter Avalos# \001u 13327e51cbSPeter Avalos# \001U 14327e51cbSPeter Avalos# ... etc. 15327e51cbSPeter Avalos# Now '\001h' happens to be the same as the 3B20's a.out magic number (0550). 16327e51cbSPeter Avalos# *Sigh*. And these both came from various parts of the USG. 17327e51cbSPeter Avalos# Maybe we should just switch everybody from SCCS to RCS! 18327e51cbSPeter Avalos# Further, you can't just say '\001h0', because the five-digit number 19327e51cbSPeter Avalos# is a checksum that could (presumably) have any leading digit, 20*970935fdSSascha Wildner# Fortunately we have regular expression matching: 21*970935fdSSascha Wildner0 string \001h 22*970935fdSSascha Wildner>2 regex [0-9][0-9][0-9][0-9][0-9]$ 23*970935fdSSascha Wildner>>8 string \001s\040 SCCS v4 archive data 24*970935fdSSascha Wildner>2 string V6,sum= SCCS v6 archive data 25