LXR linux/Documentation/arm/samsung/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 }
 167