tero@627: update_GETOPTS='sSrR'
tero@627: 
tero@627: UPDATE_SERIAL=
tero@627: UPDATE_RELOAD=
tero@648: UPDATE_INCLUDES=
tero@627: 
tero@628: . $LIB/pvl/hosts/dhcp.sh
tero@628: . $LIB/pvl/hosts/zone.sh
tero@628: 
tero@627: function update_help {
tero@627:     cat <<END
tero@627: Update:
tero@627:     -s      force update serials
tero@627:     -S      do not update serial
tero@627: 
tero@627:     -r      force reload zones/dhcp
tero@627:     -R      do not reload zones/dhcp
tero@627: END
tero@627: }
tero@627: 
tero@627: function update_opt {
tero@627:     local opt=$1
tero@627:     local optarg="$2"
tero@627: 
tero@627:     case $opt in
tero@627:         s)  UPDATE_SERIAL=1 ;;
tero@627:         S)  UPDATE_SERIAL=0 ;;
tero@627: 
tero@627:         r)  UPDATE_RELOAD=1 ;;
tero@627:         R)  UPDATE_RELOAD=0 ;;
tero@648:         
tero@648:         F)  UPDATE_INCLUDES=1 ;;
tero@627:         n)
tero@627:             UPDATE_SERIAL=0
tero@627:             UPDATE_RELOAD=0
tero@648:             UPDATE_INCLUDES=0
tero@627:         ;;
tero@627:         *)  return 1
tero@627:     esac
tero@627: }
tero@627: 
tero@627: function update_setup {
tero@654:     for dir in etc etc/zones etc/hosts; do
tero@627:         [ -d $dir ] || die "$dir: missing source directory"
tero@627:     done
tero@627:     
tero@654:     apply_dir       var
tero@627: 
tero@654:     for dir in var/dhcp var/zones var/include-cache var/serials; do
tero@627:         apply_dir   $dir
tero@627:     done
tero@654:     for dir in var/dhcp/hosts; do
tero@627:         apply_dir   $dir
tero@627:     done
tero@654:     for dir in var/zones/includes var/zones/forward var/zones/reverse; do
tero@627:         apply_dir   $dir
tero@627:     done
tero@627: }
tero@627: 
tero@627: function update_commit {
tero@628:     # TODO: pre-commit test host files
tero@627: 
tero@627:     log "Commit..."
tero@627:         commit  $SRV
tero@627: }
tero@627: 
tero@627: function update_update {
tero@628:     if commit_modified $SRV; then
tero@627:         serial=$(unix_time)
tero@627:         log_warn "Using local unix time for uncommited changes: $serial"
tero@627:     else
tero@628:         serial=$(commit_time $SRV)
tero@632:         log "Using commit timestamp: $serial"
tero@627:     fi
tero@627: 
tero@627:     ## Hosts
tero@627:     log "Updating forward host zones..."
tero@628:     for zone in $(list_dirs etc/zones/forward); do
tero@628:         update_hosts_forward "var/zones/forward/$zone" "etc/zones/forward/$zone/"
tero@628:     done
tero@628: 
tero@628:     log "Updating reverse host zones..."
tero@628:     for zone in $(list_dirs etc/zones/reverse); do
tero@628:         update_hosts_reverse "var/zones/reverse/$zone" "etc/zones/reverse/$zone/"
tero@627:     done
tero@627: 
tero@627:     log "Updating DHCP hosts..."
tero@628:     for hosts in $(list etc/dhcp/hosts); do
tero@628:         update_hosts_dhcp "var/dhcp/hosts/$hosts.conf" "etc/dhcp/hosts/$hosts"
tero@627:     done
tero@627: 
tero@627:     ## Zones
tero@627:     log "Copying zone includes..."
tero@627:     for zone in $(list_files etc/zones/includes); do
tero@628:         update_zone_include "var/zones/includes/$zone" "etc/zones/includes/$zone"
tero@627:     done
tero@627: 
tero@627:     log "Updating zones..."
tero@627:     for zone in $(list_files etc/zones); do
tero@648:         update_zone_includes "var/include-cache/$zone" "etc/zones/$zone"
tero@648: 
tero@648:         zone_includes=$(cat "var/include-cache/$zone")
tero@628: 
tero@628:         update_zone_serial "var/serials/$zone" $serial \
tero@628:             "etc/zones/$zone" $zone_includes
tero@628: 
tero@628:         update_zone "var/zones/$zone" "etc/zones/$zone" "var/serials/$zone" \
tero@628:             $zone_includes
tero@627:     done
tero@627: 
tero@627:     log "Updating DHCP confs..."
tero@627:     for conf in $(list_files etc/dhcp); do
tero@628:         update_dhcp_conf "var/dhcp/$conf" "etc/dhcp/$conf"
tero@627:     done
tero@627: }
tero@627: 
tero@627: function update_reload {
tero@627:     ## Check
tero@627:     log "Testing zones..."
tero@627:     for zone in $(list_files etc/zones); do
tero@628:         test_zone "var/zones/$zone" $zone
tero@627:     done
tero@627: 
tero@632:     log "Reload zones..."
tero@632:         reload_zones
tero@632: 
tero@632:     log "Testing DHCP..."
tero@628:     for conf in $(list_files var/dhcp); do
tero@628:         test_dhcp "var/dhcp/$conf"
tero@627:     done
tero@627: 
tero@632:     log "Reload DHCP..."
tero@627:         reload_dhcp
tero@627: }
tero@627: 
tero@627: ## Main entry point
tero@627: function update_main {
tero@627:     ## Setup source/output dirs
tero@627:     update_setup
tero@627:    
tero@627:     ## Commit source dirs
tero@627:     update_commit
tero@627: 
tero@627:     ## Update output from sources
tero@627:     update_update
tero@627: 
tero@627:     ## Reload output
tero@627:     update_reload
tero@627: }
tero@650: 
tero@650: # entry point
tero@650: MODULES=(log commit apply service test)
tero@650: MODULE=hosts
tero@650: MODULE_MAIN=update
tero@650: 
tero@650: . $LIB/pvl/main.sh && main "$@"