/usr/share/dahdi/XppConfig.pm is in dahdi-linux 1:2.5.0.1+dfsg-1ubuntu3.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
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 | package XppConfig;
#
# Written by Oron Peled <oron@actcom.co.il>
# Copyright (C) 2008, Xorcom
# This program is free software; you can redistribute and/or
# modify it under the same terms as Perl itself.
#
# $Id: XppConfig.pm 4480 2008-06-29 15:05:48Z tzafrir $
#
use strict;
my $conf_file = "/etc/dahdi/xpp.conf";
sub import {
my $pack = shift || die "Import without package?";
my $init_dir = shift || die "$pack::import -- missing init_dir parameter";
my $local_conf = "$init_dir/xpp.conf";
$conf_file = $local_conf if -r $local_conf;
}
sub read_config($) {
my $opts = shift || die;
open(F, $conf_file) || return ();
while(<F>) {
chomp;
s/#.*//; # strip comments
next unless /\S/;
s/\s*$//; # Trim trailing whitespace
my ($key, $value) = split(/\s+/, $_, 2);
$opts->{$key} = $value;
}
close F;
$opts->{'xppconf'} = $conf_file;
return %{$opts};
}
1;
|