File: forge_get_config_basic

package info (click to toggle)
fusionforge 5.3.2%2B20141104-3
  • links: PTS, VCS
  • area: main
  • in suites: jessie-kfreebsd
  • size: 60,472 kB
  • sloc: php: 271,846; sql: 36,817; python: 14,575; perl: 6,406; sh: 5,980; xml: 4,294; pascal: 1,411; makefile: 911; cpp: 52; awk: 27
file content (45 lines) | stat: -rwxr-xr-x 1,757 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
#! /bin/sh
# FusionForge source control management
#
# Copyright 2012, Christian Bayle
#
# This file is part of FusionForge. FusionForge is free software;
# you can redistribute it and/or modify it under the terms of the
# GNU General Public License as published by the Free Software
# Foundation; either version 2 of the Licence, or (at your option)
# any later version.
#
# FusionForge is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License along
# with FusionForge; if not, write to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
#

# In php this would be coded like this
#require (dirname(__FILE__).'/../common/include/env.inc.php');
#require_once $gfcommon.'include/pre.php';
#forge_read_config_file (dirname(__FILE__) . '/../../src/etc/config.ini-' . $argv[1]) ;
#forge_read_config_file (dirname(__FILE__) . '/../../src/etc/config.ini.d/defaults.ini') ;
#printf("%s",forge_get_config ($argv[2]));
# but it didn't work, with only php5-cli build-depends in a cowbuilder

# So this is the very short shell version for package build purpose
pathfromarvg0=`dirname $0`
curpath=`cd $pathfromarvg0;pwd`

variant=$1

getcorevar () {
    grep ^$1 $curpath/../etc/config.ini-$variant $curpath/../etc/config.ini.d/defaults.ini| cut -d= -f2 | xargs echo
}

res=$(getcorevar $2)
while echo "$res" | grep -q '\$core/' ; do
    e=$(perl -e '$r=q!'$res'!;$r=~s,.*\$core/(\w+).*,$1,;print "$r\n";')
    res=$(echo $res | sed -e "s,\$core/$e,$($0 $1 $e foo),")
done
echo $res