#] #] ********************* #] loaddefs link d_Qndfs 'webSite/webSite header.ndf' # used by 'Website updates.ndf' # www.BillHowell.ca 14Apr2020 initial, adapted from 'conference guides - header.ndf' # view this file in a text editor, with [constant width font, tab = 3 spaces], no line-wrap f_webHeaders := 'webSite header.ndf' ; loaddefs_start f_webHeaders ; #**************************** # List of operators, generated with : # $ cat "$d_Qndfs""webSite header.ndf" | grep "^#]" | sed 's/^#\]/ /' # ********************* loaddefs link d_Qndfs 'webSite/webSite header.ndf' +-----+ Global variables +-----+ Find all d_webRawe html files related to webSite [URLs, convert, update] webRawe_extract_pathsSubDirsFnames IS - all relevant webSite paths to p_[all, html]FileList sorted [fname, all] lists webSite_readpathsSubDirsFnames IS - read stable [path, dir] lists #************************************************************* #] +-----+ #] Global variables IF flag_debug THEN write '+-----+' ; ENDIF ; IF flag_debug THEN write 'Global variables' ; ENDIF ; # d_webRawe d_webSite d_webWork - already defined in setup.ndf d_backupDay := link d_webRawe 'z_Archive/' timestamp_YYMMDD ' backups/' ; IF (NOT path_exists "d_old d_backupDay) THEN host link 'mkdir "' d_backupDay '"' ; ENDIF ; p_log := link d_backupDay 'webSite maintenance log.txt' ; # The following globals are primarily for [webSite_link_counts, webURLs_extract] # but might also used by link 'Website conversions from old formats.ndf' p_webPageList := link d_webWork 'webSite webPageList.txt' ; p_webSiteURLlist := link d_webWork 'webSite urlList.txt' ; p_allLinkLines := link d_webWork 'webURLs_extract allLinkLines.txt' ; p_mailtoURLs := link d_webWork 'urls mailto list.txt' ; p_externURLs := link d_webWork 'urls extern list.txt' ; p_externURL_fails := link d_webWork 'urls extern fails.txt' ; p_externURL_OK := link d_webWork 'urls extern OK.txt' ; p_internURLs := link d_webWork 'urls intern list.txt' ; p_internURL_fails := link d_webWork 'urls intern fails.txt' ; p_internURL_OK := link d_webWork 'urls intern OK.txt' ; p_bkmkInURLs := link d_webWork 'urls bkmkIn list.txt' ; p_bkmkInURL_fails := link d_webWork 'urls bkmkIn fails.txt' ; p_bkmkInURL_OK := link d_webWork 'urls bkmkIn OK.txt' ; p_bkmkExURLs := link d_webWork 'urls bkmkEx list.txt' ; p_bkmkExURL_fails := link d_webWork 'urls bkmkEx fails.txt' ; p_bkmkExURL_OK := link d_webWork 'urls bkmkEx OK.txt' ; # The following are IMPORTANT "commented-outs" of the above variables # they are noted as they may necessary for : 'Website conversions from old formats.ndf' # 04Jun2021 - I don't have the right backup drive to re-instate all those deleted, symbol changes p_allLinkErrors := link d_webWork 'webURLs_extract errLinkLines.txt' ; d_htmlBackup := link d_webRawe 'z_Archive/' timestamp_YYMMDD ' backups/' ; #***************************** # Optr deratons of [,non-]local variables # webRawe_extract_pathsSubDirsFnames IS { LOCAL fnames fnamePosns paths p_nonuniqueFileList subDirs ; NONLOCAL d_webRawe p_allFileList p_webPageList flag_webRawe_extract_pathsSubDirsFnames allPathsSortedByFname allSubDirsSortedByFname allFnamesSortedByFname allPathsSortedByPath allSubDirsSortedBySubdir allMulplicateIndxs allMulplicateFnames allMulplicateSubDirs htmlPathsSortedByFname htmlSubDirsSortedByFname htmlFnamesSortedByFname htmlPathsSortedByPath htmlSubDirsSortedBySubdir ; # webURLs_extract IS { LOCAL allLinks links cmd linker p_htmlNow p_temp1 p_temp2 ferr fext fhow fint fmto fbki ; NONLOCAL d_htmlBackup d_temp d_webRawe d_webSite d_webWork htmlPathsSortedByPath p_webSiteURLlist # webSite_link_counts IS { LOCAL fname finn fout paths p_allLinksCnt p_linkTypeL p_summary p_temp cmd counts shaper fails OKs wcHead sedTail fails unkns OKKs in_fails in_unkns in_OKKs i_fails i_unkns i_OKKs n_fails n_unkns n_OKKs tblfails tblunkns tblOKKs tbl_linkCnt tbl_tots total p_allLinkErrors p_linkErrorNotOnlys p_linkErrorOnlys p_allLinksCnt p_allLinkErrorCnt p_linkErrorNotOnlyCnt p_linkErrorOnlyCnt ; NONLOCAL p_allLinkLines d_htmlBackup d_webWork ; loaddefs_ended f_webHeaders ; # enddoc