clksrc-change-registers.awk

  1#!/usr/bin/awk -f
  2#
  3# Copyright 2010 Ben Dooks <ben-linux@fluff.org>
  4#
  5# Released under GPLv2
  6
  7# example usage
  8# ./clksrc-change-registers.awk arch/arm/plat-s5pc1xx/include/plat/regs-clock.h < src > dst
  9
 10function extract_value(s)
 11{
 12    eqat = index(s, "=")
 13    comat = index(s, ",")
 14    return substr(s, eqat+2, (comat-eqat)-2)
 15}
 16
 17function remove_brackets(b)
 18{
 19    return substr(b, 2, length(b)-2)
 20}
 21
 22function splitdefine(l, p)
 23{
 24    r = split(l, tp)
 25
 26    p[0] = tp[2]
 27    p[1] = remove_brackets(tp[3])
 28}
 29
 30function find_length(f)
 31{
 32    if (0)
 33	printf "find_length " f "\n" > "/dev/stderr"
 34
 35    if (f ~ /0x1/)
 36	return 1
 37    else if (f ~ /0x3/)
 38	return 2
 39    else if (f ~ /0x7/)
 40	return 3
 41    else if (f ~ /0xf/)
 42	return 4
 43
 44    printf "unknown length " f "\n" > "/dev/stderr"
 45    exit
 46}
 47
 48function find_shift(s)
 49{
 50    id = index(s, "<")
 51    if (id <= 0) {
 52	printf "cannot find shift " s "\n" > "/dev/stderr"
 53	exit
 54    }
 55
 56    return substr(s, id+2)
 57}
 58
 59
 60BEGIN {
 61    if (ARGC < 2) {
 62	print "too few arguments" > "/dev/stderr"
 63	exit
 64    }
 65
 66# read the header file and find the mask values that we will need
 67# to replace and create an associative array of values
 68
 69    while (getline line < ARGV[1] > 0) {
 70	if (line ~ /\#define.*_MASK/ &&
 71	    !(line ~ /USB_SIG_MASK/)) {
 72	    splitdefine(line, fields)
 73	    name = fields[0]
 74	    if (0)
 75		printf "MASK " line "\n" > "/dev/stderr"
 76	    dmask[name,0] = find_length(fields[1])
 77	    dmask[name,1] = find_shift(fields[1])
 78	    if (0)
 79		printf "=> '" name "' LENGTH=" dmask[name,0] " SHIFT=" dmask[name,1] "\n" > "/dev/stderr"
 80	} else {
 81	}
 82    }
 83
 84    delete ARGV[1]
 85}
 86
 87/clksrc_clk.*=.*{/ {
 88    shift=""
 89    mask=""
 90    divshift=""
 91    reg_div=""
 92    reg_src=""
 93    indent=1
 94
 95    print $0
 96
 97    for(; indent >= 1;) {
 98	if ((getline line) <= 0) {
 99	    printf "unexpected end of file" > "/dev/stderr"
100	    exit 1;
101	}
102
103	if (line ~ /\.shift/) {
104	    shift = extract_value(line)
105	} else if (line ~ /\.mask/) {
106	    mask = extract_value(line)
107	} else if (line ~ /\.reg_divider/) {
108	    reg_div = extract_value(line)
109	} else if (line ~ /\.reg_source/) {
110	    reg_src = extract_value(line)
111	} else if (line ~ /\.divider_shift/) {
112	    divshift = extract_value(line)
113	} else if (line ~ /{/) {
114		indent++
115		print line
116	    } else if (line ~ /}/) {
117	    indent--
118
119	    if (indent == 0) {
120		if (0) {
121		    printf "shift '" shift   "' ='" dmask[shift,0] "'\n" > "/dev/stderr"
122		    printf "mask  '" mask    "'\n" > "/dev/stderr"
123		    printf "dshft '" divshift "'\n" > "/dev/stderr"
124		    printf "rdiv  '" reg_div "'\n" > "/dev/stderr"
125		    printf "rsrc  '" reg_src "'\n" > "/dev/stderr"
126		}
127
128		generated = mask
129		sub(reg_src, reg_div, generated)
130
131		if (0) {
132		    printf "/* rsrc " reg_src " */\n"
133		    printf "/* rdiv " reg_div " */\n"
134		    printf "/* shift " shift " */\n"
135		    printf "/* mask " mask " */\n"
136		    printf "/* generated " generated " */\n"
137		}
138
139		if (reg_div != "") {
140		    printf "\t.reg_div = { "
141		    printf ".reg = " reg_div ", "
142		    printf ".shift = " dmask[generated,1] ", "
143		    printf ".size = " dmask[generated,0] ", "
144		    printf "},\n"
145		}
146
147		printf "\t.reg_src = { "
148		printf ".reg = " reg_src ", "
149		printf ".shift = " dmask[mask,1] ", "
150		printf ".size = " dmask[mask,0] ", "
151
152		printf "},\n"
153
154	    }
155
156	    print line
157	} else {
158	    print line
159	}
160
161	if (0)
162	    printf indent ":" line "\n" > "/dev/stderr"
163    }
164}
165
166// && ! /clksrc_clk.*=.*{/ { print $0 }