#!/usr/bin/awk

# Convert H:MM:SS to seconds.

# SYNTAX:
# $ clear; awk -f ~cymbala/bin/hms_to_s.awk

function hms_to_s (hms,    n, s, factor, parts) {
    n = split(hms, parts, /:/);
    s = parts[n] + 0;
    for (i=n-1; i>=1; i--) {
	factor = 1;
	for (j=n-i; j>=1; j--) {
	    factor = factor * 60;
	}
	s = s + (parts[i] * factor);
    }
    return s;
}

BEGIN {

    # EXAMPLE:
    hms = "1:07:13:20";
    print "INPUT: " hms;
    print "FUNCTION RESULTS: " hms_to_s(hms);

    # RESULTS:
    # INPUT: 1:07:13:20
    # FUNCTION RESULTS: 242000

    exit;
}

###
#