File: aleph-query

package info (click to toggle)
aleph 0.9.0-2
  • links: PTS
  • area: main
  • in suites: sarge
  • size: 4,460 kB
  • ctags: 5,520
  • sloc: cpp: 30,907; makefile: 1,973; sh: 506; lisp: 193
file content (62 lines) | stat: -rwxr-xr-x 2,087 bytes parent folder | download
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
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
#!/bin/sh
# ----------------------------------------------------------------------------
# - aleph-query                                                              -
# - aleph default option query system                                        -
# ----------------------------------------------------------------------------
# - This program is  free software;  you can  redistribute it and/or  modify -
# - it provided that this copyright notice is kept intact.                   -
# -                                                                          -
# - This  program  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. In not event shall -
# - the copyright holder be  liable for  any direct, indirect, incidental or -
# - special damages arising in any way out of the use of this software.      -
# ----------------------------------------------------------------------------
# - copyright (c) 1999-2003 amaury darsch                                    -
# ----------------------------------------------------------------------------

# the program name
progname=$0
# the value to query
queryval=$1
# default value to return
retrnval=$2
# the directory list to search
dirslist=
# the platform to search
platname=

# update the platform name by calling aleph-guess
update_platform () {
    guess=`dirname $progname`/aleph-guess
    platname=`$guess -n`
}

# update the platform directory list
update_dirslist () {
    defltdir=`dirname $progname`/../def
    dirslist="~/.aleph /usr/local/etc/aleph /etc/aleph $defltdir"
}

# query the value in the directory list
query_value () {
    for d in $dirslist; do
        dfile=$d/aleph-${platname}.def
	if test -f $dfile; then
	    value=`grep "^$queryval" $dfile`
	    if test $? = 0; then
		echo $value | awk '{print $2}'
		exit 0
	    fi
	fi
    done
}

# update the variables
update_platform
update_dirslist

# query the value or return default
query_value
echo $retrnval
exit 0