aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorYang Tse <yangsita@gmail.com>2012-04-12 19:13:23 +0200
committerYang Tse <yangsita@gmail.com>2012-04-12 19:13:23 +0200
commite19917296f360159975214bcabbaf1713956c356 (patch)
treee6fff1e5fcdf53b8e6df912e00524912a514a084
parent8ed40acac62d9de0903ea1b8a0ee8ee563e9e211 (diff)
OS400/initscript.sh: fix db2_name() module name generation
Allow repeatable file name length reduction on file names with underscore or dash characters. This is done in order to better support libcurl's existing source file names and allow OS/400 package to build out of the box again.
-rw-r--r--packages/OS400/initscript.sh4
1 files changed, 4 insertions, 0 deletions
diff --git a/packages/OS400/initscript.sh b/packages/OS400/initscript.sh
index 97e978158..d28a8db11 100644
--- a/packages/OS400/initscript.sh
+++ b/packages/OS400/initscript.sh
@@ -157,6 +157,10 @@ db2_name()
basename "${1}" |
tr 'a-z-' 'A-Z_' |
sed -e 's/\..*//' \
+ -e 's/\([^_]\)[^_]*_\(.*\)/\1\2/' \
+ -e 's/\([^_]\)\([^_]\)[^_]*_\(.*\)/\1\2\3/' \
+ -e 's/\([^_]\)\([^_]\)\([^_]\)[^_]*_\(.*\)/\1\2\3\4/' \
+ -e 's/\([^_]\)\([^_]\)\([^_]\)\([^_]\)[^_]*_\(.*\)/\1\2\3\4\5/' \
-e 's/^\(..........\).*/\1/'
}