1

#!/bin/bash

     2

# vim: set ft=sh :

     3

     4

set -ue

     5

     6

# resolve $0 -> bin/update

     7

self=$0

     8

while [ -L $self ]; do

     9

    tgt=$(readlink $self)

    10

    11

    if [ "${tgt:0:1}" == "/" ]; then

    12

        self=$tgt

    13

    else

    14

        self=$(dirname $self)/$tgt

    15

    fi

    16

done

    17

    18

# Our bin dir, with scripts

    19

BIN=$(dirname $self)

    20

    21

# code root

    22

CODE=$(dirname $BIN)

    23

    24

# library code

    25

LIB=$CODE/lib

    26

    27

## Data paths

    28

# absolute path to data files; can be changed using -d

    29

ROOT=$(pwd)

    30

    31

DATA=settings

    32

ZONES=zones

    33

SERIALS=$DATA

    34

    35

# hg repo to commit

    36

REPO=$DATA

    37

    38

## Settings used in lib

    39

# Hide files under repo in commit diff output..

    40

REPO_HIDE='*.serial'

    41

    42

# XXX: hosts data input charset?

    43

PROCESS_ARGS='--input-charset latin-1'

    44

    45

# External bins

    46

NAMED_CHECKZONE=/usr/sbin/named-checkzone

    48

HG=/usr/bin/hg

    51

RNDC=/usr/sbin/rndc

    52

    53

# Path to rndc key, must be readable to run..

    54

RNDC_KEY=/etc/bind/rndc.key

    55

    56

## Library includes

    57

# Command-line argument handling

    58

source $LIB/update.args

    59

    60

# Logging

    61

source $LIB/update.logging

    62

    63

# Utility functions

    64

source $LIB/update.utils

    65

    66

# Dependency-based updates

    67

source $LIB/update.updates

    68

    69

# Operations; the functions called from run()

    70

source $LIB/update.operations

    71

    72

    73

## Site settings, used as arguments to scripts

    74

# MX record to generate in hosts --forward-zone

    75

FORWARD_MX=mail

    76

    77

# IP network to generate reverse records for in --reverse-zone

    78

REVERSE_ZONE=194.197.235

    79

    80

# Origin domain to generate reverse records for in --reverse-zone

    81

REVERSE_DOMAIN=paivola.fi

    82

    83

# Views used

    84

VIEWS=(internal external)

    85

    86

# Base domain zone for domains

    87

DOMAIN_BASE=paivola

    88

    89

# List of actual domains used; will be linked to $DOMAIN_BASE

    90

DOMAINS=(paivola.fi paivola.net paivola.org paivola.info paivola.mobi xn--pivl-load8j.fi)

    91

    92

    93

## Operate!

    94

# these functions are all defined in lib/update.operations

    95

function run {

    96

    ## Hosts

    97

    # test

    98

    log "Testing hosts..."

    99

        #                   data                            args...

   100

        check_hosts         $DATA/paivola.txt               --check-exempt ufc

   101

   102

    # update

   103

    log "Generating host zones..."

   104

        #                   hosts                           data                args...

   105

        update_hosts        $ZONES/hosts/paivola:internal   $DATA/paivola.txt   --forward-zone --forward-txt --forward-mx $FORWARD_MX

   106

        update_hosts        $ZONES/hosts/paivola:external   $DATA/paivola.txt   --forward-zone

   107

        update_hosts        $ZONES/hosts/194.197.235        $DATA/paivola.txt   --reverse-zone $REVERSE_ZONE --reverse-domain $REVERSE_DOMAIN

   108

   109

   110

        update_hosts        $ZONES/hosts/10                 $DATA/pvl.txt       --reverse-zone 10 --reverse-domain pvl -q

   111

        update_hosts        $ZONES/hosts/192.168            $DATA/pvl.txt       --reverse-zone 192.168 --reverse-domain pvl -q

   112

   113

        # XXX: unsupported --forward-zone with pvl.txt

   114

        # update_hosts    $ZONES/hosts/pvl                    $DATA/pvl.txt      --forward-zone

   115

        copy_hosts          $ZONES/hosts/pvl                $DATA/pvl.txt

   116

   117

    ## Includes

   118

    log "Copying zone includes..."

   119

        #                   view            zone                    base

   120

        copy_zone           includes        paivola:internal        paivola.zone.internal

   121

        copy_zone           includes        paivola:external        paivola.zone.external

   122

        copy_zone           includes        paivola.auto            paivola.zone.auto

   123

        copy_zone           includes        paivola.services        paivola.zone.services

   124

   125

    ## Serials

   126

    log "Updating serials..."

   127

   128

        #                   zone            deps...

   129

        #   includes...

   130

        update_serial       pvl             $ZONES/hosts/pvl            $DATA/pvl.zone

   131

        update_serial       10              $ZONES/hosts/10             $DATA/10.zone

   132

        update_serial       192.168         $ZONES/hosts/192.168        $DATA/192.168.zone

   133

   134

        update_serial       paivola         $ZONES/hosts/paivola:*      $DATA/paivola.zone          \

   135

            $ZONES/includes/paivola:*       \

   136

            $ZONES/includes/paivola.*

   137

   138

        update_serial       194.197.235     $ZONES/hosts/194.197.235    $DATA/194.197.235.zone          

   139

   140

    ## Zones

   141

    log "Updating zones..."

   142

        #                   view        zone            base

   143

        update_zone         internal    pvl

   144

        update_zone         internal    paivola

   145

        update_zone         external    paivola

   146

   147

        update_zone         internal    10

   148

        update_zone         internal    192.168

   149

   150

        update_zone         common      194.197.235

   151

        link_zone           internal    194.197.235

   152

        link_zone           external    194.197.235

   153

   154

    ## Test

   155

    log "Testing zones..."

   156

        #                   view        zone            origin

   157

        check_zone          internal    paivola         paivola.fi

   158

        check_zone          external    paivola         paivola.fi

   159

   160

        check_zone          internal    10              10.in-addr.arpa

   161

        check_zone          internal    192.168         192.168.in-addr.arpa

   162

        check_zone          common      194.197.235     235.197.194.in-addr.arpa

   163

   164

    ## Domains...

   165

    log "Linking domains..."

   166

        for view in "${VIEWS[@]}"; do

   167

            for zone in "${DOMAINS[@]}"; do

   168

                # link

   169

                link_zone       $view       $zone           $DOMAIN_BASE

   170

   171

                # test

   172

                check_zone      $view       $zone           $zone

   173

            done

   174

        done

   175

   176

    ## Deploy

   177

    log "Deploy zones..."

   178

        deploy_zones

   179

   180

    ## Commit

   181

    log "Commit data..."

   182

        commit_data

   183

}

   184

   185

## Main entry point

   186

function main {

   187

    # test tty

   188

    [ -t 1 ] && IS_TTY=y

   189

   190

    parse_args "$@"

   191

   192

    ## test env

   193

    [ -d $ROOT/$DATA ] || die "Missing data: $ROOT/$DATA"

   194

    ensure_dir  $ZONES

   195

   196

    ## Output dirs

   197

    for dir in "common" "hosts" "includes" "${VIEWS[@]}"; do

   198

        ensure_dir $ZONES/$dir

   199

    done

   200

   201

    ## Go

   202

    run

   203

}

   204

   205

main "$@"