]>
Commit | Line | Data |
---|---|---|
7ef6c2b9 TH |
1 | #!/bin/sh |
2 | # | |
3 | # openssl-format-source | |
4 | # - format source tree according to OpenSSL coding style using indent | |
5 | # | |
6 | # usage: | |
7 | # openssl-format-source [-v] [-n] [file|directory] ... | |
8 | # | |
9 | # note: the indent options assume GNU indent v2.2.10 which was released | |
10 | # Feb-2009 so if you have an older indent the options may not | |
11 | # match what is expected | |
12 | # | |
13 | # any marked block comment blocks have to be moved to align manually after | |
14 | # the reformatting has been completed as marking a block causes indent to | |
15 | # not move it at all ... | |
16 | # | |
17 | ||
18 | PATH=/usr/local/bin:/bin:/usr/bin:$PATH | |
19 | export PATH | |
a2a2bbaf | 20 | HERE="`dirname $0`" |
7ef6c2b9 TH |
21 | |
22 | set -e | |
23 | ||
24 | if [ $# -eq 0 ]; then | |
25 | echo "usage: $0 [-v] [-n] [-c] [sourcefile|sourcedir] ..." >&2 | |
26 | exit 1 | |
27 | fi | |
28 | ||
29 | VERBOSE=false | |
30 | DONT=false | |
31 | STOPARGS=false | |
32 | COMMENTS=false | |
33 | ||
5e121092 RL |
34 | # for this exercise, we want to force the openssl style, so we roll |
35 | # our own indent profile, which is at a well known location | |
a2a2bbaf | 36 | INDENT_PROFILE="$HERE/indent.pro" |
5e121092 | 37 | export INDENT_PROFILE |
5741067d | 38 | if [ ! -f "$INDENT_PROFILE" ]; then |
5e121092 | 39 | echo "$0: unable to locate the openssl indent.pro file" >&2 |
7ef6c2b9 TH |
40 | exit 1 |
41 | fi | |
42 | ||
43 | # Extra arguments; for adding the comment-formatting | |
44 | INDENT_ARGS="" | |
45 | for i | |
46 | do | |
47 | if [ "$STOPARGS" != "true" ]; then | |
48 | case $i in | |
49 | --) STOPARGS="true"; continue;; | |
50 | -n) DONT="true"; continue;; | |
51 | -v) VERBOSE="true"; | |
52 | echo "INDENT_PROFILE=$INDENT_PROFILE"; | |
53 | continue;; | |
54 | -c) COMMENTS="true"; | |
55 | INDENT_ARGS="-fc1 -fca -cdb -sc"; | |
56 | continue;; | |
7d3081c5 DSH |
57 | -nc) COMMENTS="true"; |
58 | continue;; | |
7ef6c2b9 TH |
59 | esac |
60 | fi | |
61 | ||
62 | if [ -d "$i" ]; then | |
63 | LIST=`find "$i" -name '*.[ch]' -print` | |
64 | else | |
65 | if [ ! -f "$i" ]; then | |
66 | echo "$0: source file not found: $i" >&2 | |
67 | exit 1 | |
68 | fi | |
69 | LIST="$i" | |
70 | fi | |
71 | ||
72 | for j in $LIST | |
73 | do | |
74 | # ignore symlinks - we only ever process the base file - so if we | |
75 | # expand a directory tree we need to ignore any located symlinks | |
76 | if [ -d "$i" ]; then | |
77 | if [ -h "$j" ]; then | |
78 | continue; | |
79 | fi | |
80 | fi | |
81 | ||
82 | if [ "$VERBOSE" = "true" ]; then | |
83 | echo "$j" | |
84 | fi | |
85 | ||
86 | if [ "$DONT" = "false" ]; then | |
87 | tmp=$(mktemp /tmp/indent.XXXXXX) | |
88 | trap 'rm -f "$tmp"' HUP INT TERM EXIT | |
89 | ||
d1d4b4f3 | 90 | case `basename $j` in |
7ef6c2b9 TH |
91 | # the list of files that indent is unable to handle correctly |
92 | # that we simply leave alone for manual formatting now | |
9a5d7753 | 93 | obj_dat.h|aes_core.c|aes_x86core.c|ecp_nistz256.c) |
d1d4b4f3 MC |
94 | echo "skipping $j" |
95 | ;; | |
7ef6c2b9 TH |
96 | *) |
97 | if [ "$COMMENTS" = "true" ]; then | |
98 | # we have to mark single line comments as /*- ...*/ to stop indent | |
99 | # messing with them, run expand then indent as usual but with the | |
100 | # the process-comments options and then undo that marking, and then | |
101 | # finally re-run indent without process-comments so the marked-to- | |
102 | # be-ignored comments we did automatically end up getting moved | |
103 | # into the right possition within the code as indent leaves marked | |
104 | # comments entirely untouched - we appear to have no way to avoid | |
105 | # the double processing and get the desired output | |
23f5f5b9 RL |
106 | cat "$j" | \ |
107 | expand | \ | |
7ef6c2b9 | 108 | perl -0 -np \ |
d808ebd3 | 109 | -e 's/(\n#[ \t]*ifdef[ \t]+__cplusplus\n[^\n]*\n#[ \t]*endif\n)/\n\/**INDENT-OFF**\/$1\/**INDENT-ON**\/\n/g;' \ |
7ef6c2b9 | 110 | -e 's/(\n\/\*\!)/\n\/**/g;' \ |
53d6e678 | 111 | -e 's/(STACK_OF|LHASH_OF)\(([^ \t,\)]+)\)( |\n)/$1_$2_$3/g;' \ |
23f5f5b9 | 112 | | \ |
7ef6c2b9 TH |
113 | perl -np \ |
114 | -e 's/^([ \t]*)\/\*([ \t]+.*)\*\/[ \t]*$/if (length("$1$2")<75) {$c="-"}else{$c=""}; "$1\/*$c$2*\/"/e;' \ | |
115 | -e 's/^\/\* ((Copyright|=|----).*)$/\/*-$1/;' \ | |
53d6e678 | 116 | -e 's/^((DECLARE|IMPLEMENT)_(EXTERN_ASN1|ASN1|ADB|STACK_OF|PKCS12_STACK_OF).*)$/\/**INDENT-OFF**\/\n$1\n\/**INDENT-ON**\//;' \ |
7ef6c2b9 TH |
117 | -e 's/^([ \t]*(make_dh|make_dh_bn|make_rfc5114_td)\(.*\)[ \t,]*)$/\/**INDENT-OFF**\/\n$1\n\/**INDENT-ON**\//;' \ |
118 | -e 's/^(ASN1_ADB_TEMPLATE\(.*)$/\/**INDENT-OFF**\/\n$1\n\/**INDENT-ON**\//;' \ | |
119 | -e 's/^((ASN1|ADB)_.*_END\(.*[\){=,;]+[ \t]*)$/$1\n\/**INDENT-ON**\//;' \ | |
d808ebd3 | 120 | -e '/ASN1_(ITEM_ref|ITEM_ptr|ITEM_rptr|PCTX)/ || s/^((ASN1|ADB)_[^\*]*[){=,]+[ \t]*)$/\/**INDENT-OFF**\/\n$1/;' \ |
7ef6c2b9 TH |
121 | -e 's/^(} (ASN1|ADB)_[^\*]*[\){=,;]+)$/$1\n\/**INDENT-ON**\//;' \ |
122 | | \ | |
23f5f5b9 | 123 | indent $INDENT_ARGS | \ |
7ef6c2b9 TH |
124 | perl -np \ |
125 | -e 's/^([ \t]*)\/\*-(.*)\*\/[ \t]*$/$1\/*$2*\//;' \ | |
126 | -e 's/^\/\*-((Copyright|=|----).*)$/\/* $1/;' \ | |
127 | | indent | \ | |
128 | perl -0 -np \ | |
129 | -e 's/\/\*\*INDENT-(ON|OFF)\*\*\/\n//g;' \ | |
130 | | perl -np \ | |
131 | -e 's/(STACK_OF|LHASH_OF)_([^ \t,]+)_( |\/)/$1($2)$3/g;' \ | |
132 | -e 's/(STACK_OF|LHASH_OF)_([^ \t,]+)_$/$1($2)/g;' \ | |
a2a2bbaf | 133 | | perl "$HERE"/su-filter.pl \ |
7ef6c2b9 TH |
134 | > "$tmp" |
135 | else | |
136 | expand "$j" | indent $INDENT_ARGS > "$tmp" | |
d1d4b4f3 MC |
137 | fi; |
138 | mv "$tmp" "$j" | |
7ef6c2b9 TH |
139 | ;; |
140 | esac | |
7ef6c2b9 TH |
141 | fi |
142 | done | |
143 | done | |
144 | ||
145 |