1

#!/bin/bash

     2

## vim: set ft=sh :

     3

#

     4

# Operations on zonefiles/hosts/whatever

     5

     6

function link {

     9

    11

        log_update "Linking $out -> $tgt..."

    12

    14

    15

    else

    16

        log_skip "Linking $out -> $tgt: not changed"

    17

    fi

    18

}

    19

    20

function copy {

    23

    25

        log_update "Copying $out <- $src..."

    26

    29

    else

    30

        log_skip "Copying $out <- $src: not changed"

    31

    fi

    32

}

    33

    34

## Run check-command on given file, outputting results:

    35

#

    36

#   check    $src    $cmd $args...

    37

#

    38

function check {

    41

    43

        log_skip    "Check $src: OK"

    44

    45

    else

    46

        log_error   "  Check $src: Failed"

    47

    49

    50

        exit 1

    51

    fi

    52

}

    53

    54

## Generate forward zone from hosts hosts using pvl.hosts-dns:

    55

#

    56

#   update_hosts_forward out/hosts/$hosts $hosts in/hosts/$hosts

    57

function update_hosts_forward {

    61

    63

        log_update "Generating forward hosts zone $out <- $src..."

    64

    66

            --hosts-charset=$CHARSET \

    69

    70

    else

    71

        log_skip "Generating forward hosts $out <- $src: not changed"

    72

    fi

    73

}

    74

    75

function update_hosts_dhcp {

    76

    local out=$1; shift

    77

    local src=$1; shift

    78

    79

    if check_update $out $src "$@"; then

    80

        log_update "Generating DHCP hosts $out <- $src..."

    81

    82

        do_update $out $OPT/bin/pvl.hosts-dhcp \

    83

            --hosts-charset=$CHARSET \

    84

            $src "$@"

    85

    else

    86

        log_skip "Generating DHCP hosts $out <- $src: not changed"

    87

    fi

    88

}

    89

    90

## Generate reverse zone from hosts hosts using pvl.hosts-dns:

    91

#

    92

#   update_hosts_reverse out/hosts/$reverse $reverse in/hosts/$hosts

    93

function update_hosts_reverse {

    97

    99

        log_update "Generating reverse hosts zone $out <- $src..."

   100

   102

            --hosts-charset=$CHARSET \

   105

   106

    else

   107

        log_skip "Generating reverse hosts $out <- $src: not changed"

   108

    fi

   109

}

   110

   111

## Update .serial number:

   112

#

   113

#   do_update_serial $serial

   114

#

   115

# Shows old/new serial on debug.

   116

function do_update_serial {

   118

   119

    # read

   121

   123

   124

    # read

   126

   127

    debug "  $old -> $new"

   128

}

   129

   130

   131

## Generate new serial for zone using pvl.dns-serial, if the zone data has changed:

   132

#

   133

#   update_serial   $zone   $deps...

   134

#

   135

# Supports SERIAL_FORCE/NOOP.

   136

# Updates $SERIALS/$zone.serial.

   137

function update_serial {

   139

   140

    # test

   141

    if [ $SERIAL_FORCE ]; then

   142

        log_force "Updating $serial: forced"

   143

   145

   147

        log_skip "Updating $serial: not changed"

   148

   149

    elif [ $SERIAL_NOOP ]; then

   150

        log_noop "Updating $serial: skipped"

   151

   152

    else

   153

        log_update "Updating $serial..."

   154

   156

    fi

   157

}

   158

   160

#

   166

   168

        log_update "Generating $out <- $src..." 

   169

   172

    else

   173

        log_skip "Generating $out <- $src: not changed" 

   174

    fi

   175

}

   176

   177

## Test hosts zone for validity using pvl.hosts-check:

   178

#

   179

#   check_hosts     .../hosts

   180

function check_hosts {

   181

    local hosts=$1; shift 1

   182

   183

    # TODO

   184

    check $hosts \

   185

        $OPT/bin/pvl.hosts-check $hosts

   186

}

   187

   188

## Test zone file for validity using named-checkzone:

   189

#

   190

#   check_zone      ..../$zone $origin

   191

function check_zone {

   192

    local zone=$1

   193

    local origin=$2

   194

   195

    # checkzone is very specific about the order of arguments, -q must be first

   196

    check $zone $NAMED_CHECKZONE $origin $zone

   197

}

   198

   199

## Test DHCP configuration for validity using dhcpd -t:

   200

#

   201

#   check_dhcp      [$conf]

   202

#

   203

# Defaults to the global $DHCPD_CONF.

   204

# Fails if the check fails.

   205

function check_dhcp {

   206

    local conf=${1:-$DHCPD_CONF}

   207

   208

    if [ ! -e $DHCPD ]; then

   209

        log_warn "check_dhcp: dhcpd not installed, skipping: $conf"

   210

        return 0

   211

    fi

   212

   213

    check $conf \

   214

        $DHCPD -cf $conf -t

   215

}

   216

   217

## Test DHCP configuration of given settings/dhcp using check_dhcp $DHCP_DATA/$host.conf:

   218

#

   219

#   check_dhcp_conf     $conf

   220

#

   221

function check_dhcp_conf {

   222

    local conf=$1;

   223

   224

    check_dhcp $DHCP_DATA/$conf.conf

   225

}

   226

   227

### Deploy

   228

## Run rndc reload

   229

function do_reload_zones {

   230

    # run

   231

    indent "        rndc: " \

   232

        $RNDC reload

   233

   234

    # set flag

   235

    RELOAD_ZONES=y

   236

}

   237

   238

## Load update zonefiles into bind:

   239

#

   240

#   reload_zones    

   241

#

   242

# Invokes `rndc reload`, showing its output.

   243

function reload_zones {

   244

    local msg="Reload zones"

   245

   246

    if [ $RELOAD_FORCE ]; then

   247

        log_force  "$msg..."

   248

   249

        do_reload_zones

   250

   251

    elif [ $RELOAD_NOOP ]; then

   252

        log_noop    "$msg: skipped"

   253

   254

    elif [ ! -e $RNDC ]; then

   255

        log_warn "reload_zones: rndc not installed, skipping"

   256

   257

    elif [ ! -e $RNDC_KEY ]; then

   258

        log_warn   "  $msg: rndc: key not found: $RNDC_KEY"

   259

   260

    elif [ ! -r $RNDC_KEY ]; then

   261

        log_error   "  $msg: rndc: permission denied: $RNDC_KEY"

   262

   263

        return 1

   264

   265

    else

   266

        log_update  "$msg..."

   267

   268

        # run

   269

        do_reload_zones

   270

    fi

   271

}

   272

   273

## Reload DHCP by restarting it, if running:

   274

#

   275

#   do_reload_dhcp

   276

#

   277

# Does NOT restart dhcp if it is not running (status).

   278

function do_reload_dhcp {

   279

    if cmd_test $DHCPD_INIT status >/dev/null; then

   280

        cmd $DHCPD_INIT restart

   281

    else

   282

        log_warn "dhcpd not running; did not restart"

   283

    fi

   284

}

   285

   286

## Reload dhcp hosts

   287

#

   288

#   reload_dhcp

   289

#

   290

# noop's if we haven't reloaded zones

   291

function reload_dhcp {

   292

    local msg="Reload DHCP hosts"

   293

   294

    if [ $RELOAD_FORCE ]; then

   295

        log_force  "$msg..."

   296

   297

        do_reload_dhcp

   298

   299

    elif [ $RELOAD_NOOP ]; then

   300

        log_noop    "$msg: skipped"

   301

   302

    elif [ ! -e $DHCPD ]; then

   303

        log_warn "reload_dhcp: dhcpd not installed, skipping: $conf"

   304

   305

    else

   306

        log_update  "$msg..."

   307

   308

        # run

   309

        do_reload_dhcp

   310

    fi

   311

}

   312

   313

### Commit

   314

## Perform `hg commit`

   315

function do_commit {

   316

    local msg=$1

   317

   318

    [ $LOG_DIFF ] && indent "    " hg_diff

   319

   320

    hg_commit "$msg"

   321

}

   322

   323

   324

## Commit changes to version control:

   325

#

   326

#   commit_data

   327

#

   328

# Invokes `hg commit`, first showing the diff.

   329

function commit_data {

   330

    local commit_msg="$COMMIT_MSG"

   331

   332

    local msg="Commit changes"

   333

   334

    # operate?

   335

    if [ $COMMIT_FORCE ]; then

   336

        log_force   "$msg..."

   337

   338

        do_commit "$commit_msg"

   339

   340

    elif ! hg_modified; then

   341

        log_skip    "$msg: no changes"

   342

   343

    elif [ $COMMIT_SKIP ]; then

   344

        log_noop    "$msg: skipped"

   345

   346

        # still show diff, though

   347

        [ $LOG_DIFF ] && indent "    " hg_diff

   348

    else

   349

        log_update  "$msg..."

   350

   351

        do_commit "$commit_msg"

   352

    fi

   353

}