File Manager

X7ROOT File Manager

Current Path: /usr/libexec/kde4

📁 ..
📄 add-printer(215.26 KB)
📄 backlighthelper(28.04 KB)
📄 bluedevil-authorize(19.81 KB)
📄 bluedevil-confirmmodechange(19.77 KB)
📄 bluedevil-requestconfirmation(15.71 KB)
📄 bluedevil-requestpin(28.18 KB)
📄 configure-printer(128.11 KB)
📄 drkonqi(496.52 KB)
📄 filesharelist(10.76 KB)
📄 fileshareset(10.76 KB)
📄 fontinst(147.27 KB)
📄 fontinst_helper(90.28 KB)
📄 fontinst_x11(1.86 KB)
📄 installdbgsymbols.sh(2.59 KB)
📄 kaccessibleapp(70.57 KB)
📄 kalarm_helper(23.91 KB)
📄 kauth-policy-gen(27.84 KB)
📄 kcheckpass(19.61 KB)
📄 kcmdatetimehelper(28.05 KB)
📄 kcmremotewidgetshelper(15.54 KB)
📄 kconf_update(6.99 KB)
📄 kdeeject(993 B)
📄 kdesu(49.17 KB)
📄 kdesu_stub(15.58 KB)
📄 kdesud(51.82 KB)
📄 kdontchangethehostname(28.02 KB)
📄 kfontprint(53.63 KB)
📄 khc_docbookdig.pl(5.09 KB)
📄 khc_htdig.pl(3.73 KB)
📄 khc_htsearch.pl(2.09 KB)
📄 khc_indexbuilder(28.34 KB)
📄 khc_mansearch.pl(1.99 KB)
📄 kio_http_cache_cleaner(7 KB)
📄 kioexec(36.38 KB)
📄 kioslave(11.19 KB)
📄 klauncher(6.99 KB)
📄 knetattach(57.37 KB)
📄 kpac_dhcp_helper(10.87 KB)
📄 kscreenlocker_greet(125.84 KB)
📄 ksendbugmail(44.99 KB)
📄 ksysguardprocesslist_helper(52.76 KB)
📄 kwin_killer_helper(23.65 KB)
📄 kwin_opengl_test(11.13 KB)
📄 kwin_rules_dialog(7 KB)
📄 lnusertemp(15.24 KB)
📄 networkmanagement_configshell(119.38 KB)
📄 polkit-kde-authentication-agent-1(78.72 KB)
📄 print-queue(116.21 KB)
📄 start_kdeinit(11.2 KB)
📄 start_kdeinit_wrapper(7.07 KB)

Editing: khc_docbookdig.pl

#!/usr/bin/perl
#
#  Wrapper script for creating search indices for htdig.
#
#  This file is part of KHelpcenter.
#
#  Copyright (C) 2002  SuSE Linux AG, Nuernberg
#
#  Author: Cornelius Schumacher <cschum@suse.de>
#
#  This program 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 License, or
#  (at your option) any later version.
#
#  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.  See the
#  GNU General Public License for more details.
#
#  You should have received a copy of the GNU General Public License
#  along with this program; if not, write to the Free Software
#  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA

use strict;

use Getopt::Long;

my $htdigdata = "/srv/www/htdig/common/";
my $htdigbin = "/usr/bin";
my $kdeprefix = "/usr";
chomp $kdeprefix;

my $dbg = 1;

my ($indexdir, $docpath, $identifier, $lang, $help );

GetOptions (
  'indexdir=s' => \$indexdir,
  'docpath=s' => \$docpath,
  'identifier=s' => \$identifier,
  'lang=s' => \$lang,
  'help' => \$help,
);

if ( $help ) {
  usage();
}

if ( !$indexdir || !$docpath || !$identifier ) {
  print STDERR "Missing arguments.\n";
  usage();
}

&dbg( "INDEXDIR: $indexdir" );

if ( !$lang ) { $lang = "en"; }

my $tmpdir = "$indexdir/$identifier.tmp";
if ( ! -e $tmpdir ) {
  mkdir $tmpdir;
}

print "Creating index for <b>'$identifier'</b>\n";

my $htdigconf = $indexdir;
my $htdigdb = $indexdir;

my $conffile = "$htdigconf/$identifier.conf";

my $commondir = "$htdigdata/$lang";
if ( !$lang || !-e $commondir ) {
  $commondir = "$htdigdata/en";
}
if ( !-e $commondir ) { $commondir = $htdigdata; }

my $locale;
if ( $lang eq "de" ) { $locale = "de_DE"; }
else { $locale = $lang; }

my $startfile = "$tmpdir/index.html";

if ( !open( START, ">$startfile" ) ) {
  print STDERR "Unable to open '$startfile' for writing.\n";
  exit 1;
}

$ENV{ PATH } = '/bin:/usr/bin';
$ENV{ CDPATH } = '';
$ENV{ ENV } = '';

my $findpath = "/usr/share/doc/HTML/$lang/";
my $findcmd = "find $findpath -name index.docbook";

print STDERR "FINDCMD: $findcmd\n";

if ( !open FIND, "$findcmd|" ) {
  print STDERR "Unable to find docs.\n";
  exit 1;
}
while ( <FIND> ) {
  chomp;
  my $path = $_;
  $path =~ /$findpath(.*)\/index.docbook$/;
  my $app = $1;
  print START "<a href=\"help://$app/index.docbook\">$path</a>\n";
}
close START;

my $mimetypefile = "$tmpdir/htdig_mime";
if ( !open( MIME, ">$mimetypefile" ) ) {
  print STDERR "Unable to open '$mimetypefile' for writing.\n";
  exit 1;
}
print MIME << "EOT";
text/html       html
text/docbook    docbook
EOT
close MIME;

my $parserfile = "$tmpdir/docbookparser";
if ( !open( PARSER, ">$parserfile" ) ) {
  print STDERR "Unable to open '$parserfile' for writing.\n";
  exit 1;
}
print PARSER << "EOT";
#! /bin/bash

file=\$1
shift
mime=\$1
shift

if test "\$#" -gt 0; then
  orig=\${1/file:\\//}
  shift
fi

case "\$orig" in
  help:/*)
	orig=\${orig/help:\\//}
	orig=\${orig/\/index.docbook/}
	cd /usr/share/doc/HTML/en/\$orig
	file=index.docbook
	;;
  *)	
	file=\$orig
	cd `dirname \$orig`
	;;
esac

echo "t	apptitle"
#$kdeprefix/bin/meinproc --htdig "\$file"
$kdeprefix/bin/meinproc4 --htdig "\$file"
EOT
close PARSER;
chmod 0755, $parserfile;

if ( !open( CONF, ">$conffile" ) ) {
  print STDERR "Unable to open '$conffile' for writing.\n";
  exit 1;
}
print CONF << "EOT";
# htdig configuration for doc '$identifier'
#
# This file has been automatically created by KHelpcenter
common_dir:		$commondir
locale:                 $locale
database_dir:           $htdigdb
database_base:		\${database_dir}/$identifier
local_urls:             help://=/usr/share/doc/HTML/en/ file://=/
local_urls_only:        true
limit_urls_to:          file:// help:/
ignore_noindex:         true
max_hop_count:          4
robotstxt_name:         kdedig
compression_level:      6
template_map:           Long long /usr/share/kde4/apps/khelpcenter/searchhandlers/htdig/htdig_long.html
search_algorithm:       exact:1 prefix:0.8
maximum_pages:          1
matches_per_page:       10
start_url:              file://$tmpdir/index.html
external_parsers:       text/docbook $parserfile
valid_extensions:       .docbook .html
mime_types:             $mimetypefile
EOT
close CONF;

my $ret = system( "$htdigbin/htdig", "-v", "-s", "-i", "-c", $conffile );
if ( $ret != 0 ) {
  print STDERR "htdig failed\n";
} else {
  $ret = system( "$htdigbin/htmerge", "-c", $conffile );
  if ( $ret != 0 ) { print STDERR "htmerge failed\n"; }
}

if ( $ret == 0 ) {
  my $existsfile = "$indexdir/$identifier.exists";

if ( !open( EXISTS, ">$existsfile" ) ) {
    print STDERR "Unable to open '$existsfile' for writing.\n";
    exit 1;
  }
  print EXISTS "$identifier\n";
  close EXISTS;

print "Finished successfully.\n";
}

exit $ret;

sub dbg($)
{
  $dbg && print STDERR shift, "\n";
}

sub usage()
{
  print "Usage: khc_docbookdig.pl --indexdir <indexdir> --docpath <path> ";
  print "--identifier <identifier>\n";
  exit 1;
}

X7ROOT File Manager

Editing: khc_docbookdig.pl

Upload File

Create Folder