#!/bin/bash
## Copy "NAV-CODE" from index.htm to each other webpage,  preserving each page's STYLE, SCRIPT-within-head, TITLE, BODY-tag, and its body;  Eugene Reimer  2008;
## REQUIREMENTS:
##	each page:  optional STYLE+SCRIPT-within-head tags, with SCRIPT sections contiguous;  body-tag is required;  CASE of these tags gets stdized to that shown;
##	index.htm:  style+script+meta (lowercase) for To-Be-Replicated stuff;  STYLE required, SCRIPT+META optional for Unique-To-Page stuff;
##		    also required is HTML-comment "end nav";  (formerly /head body tags were on one line, but now stdize to being on separate lines);
## USAGE:
##	webnavreplicate  [-n/--nobackup]  [DIRECTORY]	--works in CURDIR, unless DIRECTORY-param specified;  makes backups unless --nobackup specified;
##	webnavreplicate  [-b/--backup]    [DIRECTORY]	--works in CURDIR, unless DIRECTORY-param specified;  makes backups if -b specified  <==when nobackup DEFAULT!!
##
## The backups enable unchg-nav to undo accidents;  this script is run from webput,  but may be run separately when testing, or after an accident with --nobackup...
BACKUP=1;						##==backup is again the DEFAULT
while [ $# -gt 0 ] && [[ $1 == -* ]];do			##parse the options
  case "$1" in
  -b|--back*)	BACKUP=1		;;		##backup option (may make nobackup the default??)
  -n|--nob*)	BACKUP=			;;		##no-backup option
  -v|--verb*)	VERBOSE=1		;;		##verbose-output option (unfinished)
  --)		shift; break		;;		##ender for options
  esac
  shift;						##remove that arg
done
if [ $# -ge 1 ];then  cd $1 || exit;  fi								##==work in $1 dir, if specified
if ! grep -q '<!-- end nav' index.htm;then exit; fi							##do nothing if index.htm lacks nav-code
##echo -n "webnavreplicate: BACKUP=$BACKUP;"; read							##DEBUG
[ $BACKUP ] && rm -f /tmp/bknav-$(fullnameNOSLASH $(pwd))*						##eliminate old bknav* files for improved undo
cat index.htm |sed -n '0,/<!-- end nav/p' |sed '/<STYLE/,/<body/c</head>' >/tmp/navX			##==save navX nav-code less STYLE+SCRIPT+META+title+bodyTag
for F in {,*/}*htm;do  [[ -e $F ]] || continue								##==for each other webpage...
  if [[ $F == ANON*           ]];then continue; fi							##skip ANON files
  if [[ $F == */ANON*         ]];then continue; fi							##skip ANON files
##if [[ $F == custom404*htm   ]];then continue; fi							##skip custom404 page??  2009-12:YANKED
  if [[ $F == *feedback*      ]];then continue; fi							##skip feedback forms??
  if [[ $F == *printable*     ]];then continue; fi							##skip *printable*      (for NOCI)
  if grep -iq '<!DOCTYPE'  $F   ;then continue; fi							##skip if has DOCTYPE;  skips NOPER*(ER), wa-stats, operashow
  if [[ $F == Thiessen*       ]];then continue; fi							##skip Thiessen pages   (for ER; they're done w separate call)
##if [[ $F == NOPERCART-DEMO* ]];then continue; fi							##skip nopERcart demos  (for ER, obsoleted by DOCTYPE)
##if [[ $F == wa-stats*       ]];then continue; fi							##skip wa-stats pages??         (obsoleted by DOCTYPE)
##if [[ $F == *Sex*Murder*    ]];then continue; fi							##skip operashow/slideshowER    (obsoleted by DOCTYPE)  ==TEMP??
  if [[ $F == index*          ]];then continue; fi							##skip index.{htm,html}
  if grep -q '<!-- end nav' $F;then									##==$F already has nav stuff, altho possibly outdated
    cat $F  |sed -n '0,/<!-- end nav/p'  |sed '/<STYLE/,/<body/c</head>'  >/tmp/navF			##save navF nav-code less STYLE+SCRIPT+META+title+bodyTag
    if cmp -s /tmp/navX /tmp/navF;then  continue;  fi							##leave $F unchanged if its navF same as navX
    cat $F  |sed '0,/<!-- end nav/d'  >/tmp/navbdyF							##save $F sans entire-head + BODY-tag + Nav-Code
  else													##==$F does NOT have nav-code
    chgsed --tmp 's|<BODY|<body|; 0,/<body/s|</*\(style\|script\|meta\)|\U&|g'  $F			##limited support for lowercase STYLE,SCRIPT, uppercase BODY
    if grep -iq '<BASE'  $F;then echo "==??==$F CONTAINS BASE-TAG==??==";  continue;  fi		##skip $F if my revising method cant handle
    if ! grep -q '<body' $F;then echo "==??==$F LACKS A BODY-TAG==??==";   continue;  fi		##skip $F if my revising method cant handle;  /TITLE 2nd choice?
    cat $F |sed '/<body[^>]>$/!s|<body[^>]*>|&\n|'  |sed '0,/<body/d'  >/tmp/navbdyF			##save $F sans entire-head + BODY-tag  (fixed wrt one-liners)
    if ! [[ -s /tmp/navbdyF ]];then echo "==??==cannot handle $F body==??==";  continue;  fi		##skip $F if my revising method cannot handle it
  fi
  STY=$(cat $F |sed -n '/<STYLE/,/<\/STYLE/p'					|tr '\n' '\v')		##save STYLE stuff from $F         (reversible NL-xlate)
  SCR=$(cat $F |sed -n '/<body/,$d; /<SCRIPT/,/<\/SCRIPT/p'			|tr '\n' '\v')		##save SCRIPT-within-HEAD from $F  (reversible NL-xlate)
  MET=$(cat $F |grep '<META'							|tr '\n' '\v')		##save META-tags                   (reversible NL-xlate)
  OTH=$(cat $F |sed '/<body/,$d; /<STYLE/,/\/STYLE/d; /<SCRIPT/,/\/SCRIPT/d;
    /title>/d; /head>/d; /^<!/d'						|tr '\n' '\v')		##save other HEAD-tags, META etc   (reversible NL-xlate)
  TIT=$(cat $F |grep '<title>'  |sed 's|.*\(<title>.*</title>\).*|\1|'		|head -n1   )		##save title from $F
  BOD=$(cat $F |grep '<body'    |sed 's|.*\(<body[^>]*>\).*|\1|'		|head -n1   )		##save body-tag from $F
  if [[ $MET != $OTH ]];then echo "==nav-revision anomaly $F; OTH:$OTH"; fi				##check for lost tags
  if [[ $STY == "" ]];then  STY="<STYLE>\v</STYLE>\v";  fi						##ensure resulting $F has STYLE /STYLE
  if [ $BACKUP ];then FBK=/tmp/bknav-$(fullnameNOSLASH $F);  else FBK=/tmp/navbkup;  fi			##need "before"-copy even if nobackups, for TS
  mv -f $F $FBK												##make backup
  cat /tmp/navX /tmp/navbdyF |sed "/<\/head/c$STY$SCR$MET${TIT}\v</head>\v$BOD" |tr '\v' '\n'  >$F	##==make $F with navX-code (undoing NL-xlate)  ==MET->OTH==??==
  if ! grep -q '<!-- end nav' $FBK;then touch -r$FBK $F; fi						##2009-12-29: preserve timestamp on add-revised $F  ==yank on cvt
  if [ $BACKUP ];then echo "nav-revised $F; backup in $FBK"						##msg about nav-revision with backup
  else                echo "nav-revised $F"								##msg about nav-revision
  fi
  ##echo -n "==Check nav-revision; Continue??";  read							##DEBUG step-by-step
done
##echo -n "==Check nav-revisions; Continue??";  read							##DEBUG


exit
CHANGE-LOG:
===========
==is this obsoleted by SSI-includes??  nav-code now just 2 SSI-Includes;  nav1-head.txt: has the CSS+js;  nav2-body.txt: has the menu layout;  ==NOPE, still useful;
==NEEDED:  after converting to CSS, scrap preservation of BODY-tag since it'll be content-free;  ==bgcolor still meaningfule==??==

2009-12-23:  revised for conversion of ER-site to use a nav-bar;  see notes in:  /er/color-schemes-HISTORY;
	yanked exclusion for custom404*htm;	<==CHECK results;
	added exclusion for file having DOCTYPE -- obsoleting tests for:  NOPERCART-DEMO*  wa-stats*  *Sex*Murder*

2009-12-26:  complete set of backups renamed to /tmp/BKNAV-\[er* to preserve until I'm satisfied w nav-replication on ER-site  (and back to backup DEFAULT)==!!==
2009-12-29:
	preserve timestamp on a nav-revised file;  when adding nav-code, NOT when replacing it!!  TS-preserving needed on:
	    pixCaption, pixOrchid:					<--these I may generate with nav-code included, to prevent nav-revision+upload on every webput??
	    webcp-installed HTML-files eg programs/books-README.htm	<--these I won't generate with nav-code included => need TS-preserving so TS-cmp works==!!==
	NOTE: "only when adding" makes uploading work after nav-code revised -- but uploading will still be troublesome when first converting a website...
2009-12-29:
	added limited support for uppercase BODY, lowercase STYLE,SCRIPT tags, in nav-less files -- those tags will be stdized;  --the -p on chgsed was TEMP;
	preserve BASE-tag for PreservingsIndex-1-13.htm??  --NOPE:
	    issue a warning for BASE, because menu-links won't work in a page using BASE--!!--
	    PreservingsIndex-1-13.htm:  modified "source" adding DOCTYPE, to avoid navbar, so BASE can be used;
	see OTH above;  replace saving of META by saving entire HEAD-part sans STYLE, SCRIPT, title, head, <!-lines;  ==TEMP: keeping MET + "anomaly" msg is TEMP==!!==
	    ==ought to handle multiple tags on same line as TITLE, BODY, otherwise seems misleading for TIT, BOD to do so--??--

==NEEDED:  looking at SSI-expanded source would be more pleasant if the Page-Specific parts were up front;

2010-01-09:  revised nav1 CSS wrt class=ctr on ER-site -- to be done on other sites provided no undesirable side-effects==??==
	--to enable writing class=ctr on anything (eg: on P, H2, etc), revised the .ctr CSS rules as follows:
	table.ctr       {margin-left:auto; margin-right:auto;}                                          /*centered-class for tables*/
	div.ctr         {text-align:center;}                                                            /*for systematic-conversion from quirks-mode*/
	div.ctr table   {margin-left:auto; margin-right:auto; text-align:left;}                         /*for systematic-conversion from quirks-mode*/
	--to:
	.ctr		{text-align:center;}                                                            /*centered-class for everything but tables*/
	table.ctr       {margin-left:auto; margin-right:auto; text-align:left;}                         /*centered-class for tables*/
	.ctr table	{margin-left:auto; margin-right:auto; text-align:left;}                         /*for systematic-conversion from quirks-mode*/
	--looks to be OK => do on other sites too;  DONE;

2010-04-16:  webnavreplicate broken for Debwendon as its pages having a DOCTYPE, and an XHTML doctype at that -- any reason for it==??==
		<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
		<html xmlns="http://www.w3.org/1999/xhtml">
	debwendon/website/*htm:  removed 1st 2 lines (shown above);  also removed:  <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
		and converted to using nav1, nav2 include files, and to a Standards-mode (HTML) DOCTYPE;
	systematic ctr-conversion:  <center> --> <div class=ctr>;  </center> --> </div>;  FILES AFFECTED:
		ChasingBenevolencePhotos.htm  LogoDesignContest-20071217.htm  LogoDesignContestWinner.htm  ReelGreenPhotos.htm  TrailDesign.htm  Vid01-EKO.htm  
		Vid02-EKO-Subset.htm  aboutdebwendon.htm  announcingCharityStatus.htm  links.htm  news+articles.htm  video-EKO-feedback.htm  videos.htm
	video-EKO-feedback.htm:  centering not working DUE to its not using nav1 (special case above);  FIXED;
	TrailDesign.htm:  bgcolor within TABLEs not working in Firefox DUE to hex-color w/o nbr-sign;  ==CHECK FOR OTHER CASES;
	
2010-07-05:  getting repeated nav-revision on NativeOrchidTour.htm;  one unusual feature is having a META-tag;  flaw in navX:navF comparing??
	most peculiar: after several such spurious nav-revisings, I started looking at why, was baffled;  happens again if NativeOrchidTour.htm is "touch"ed;
	AHA, it's a "dos-file" problem;  ie: it contained CR+LF line-endings;  have fixed it--!!--
	if [[ $F == NativeOrchidTour.htm ]];then echo "==F:NativeOrchidTour.htm"; exit; fi			##==TEMP DEBUG==