#!/bin/sh
#
# Copyright (c) 1994, 1995, 1996 Gunther Schadow.  All rights reserved.
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
# 
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
# 
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.

#
# upid update date in the IDENT("...") string of the following type:
#
#	IDENT("@(#) trap.c 6/4/95 (Gunther Schadow)");
#	IDENT("@(#) trap.c (Gunther Schadow) 6/4/95");
#

MDATE=`$1 $2`
NDATE=`$1 $2 '%y%m%d%H%M.%S'`

BASE=`basename $2`

mv $2 $2.bak

sed \
-e "s:\(^[ 	]*\)IDENT(\"[ 	]*@(#)[ 	]*\([^ 	]*\)[ 	]*\([0-9][0-9]*/[0-9][0-9]*/[0-9][0-9]*\)[ 	]*\(([^)]*)\):\1IDENT(\"@(#) $BASE $MDATE:" \
-e "s:\(^[ 	]*\)IDENT(\"[ 	]*@(#)[ 	]*\([^ 	]*\)[ 	]*\(([^)]*)\)[ 	]*\([0-9][0-9]*/[0-9][0-9]*/[0-9][0-9]*\)[ 	]*\").*$:\1IDENT(\"@(#) $BASE \3 $MDATE\");:" $2.bak > $2

touch -t $NDATE $2