Go to:
Gentoo Home
Documentation
Forums
Lists
Bugs
Planet
Store
Wiki
Get Gentoo!
Gentoo's Bugzilla – Attachment 55213 Details for
Bug 38163
net-dialup/vocp - answering machine, text-to-speech, pager, fax, redirection, caler id
Home
|
New
–
[Ex]
|
Browse
|
Search
|
Privacy Policy
|
[?]
|
Reports
|
Requests
|
Help
|
New Account
|
Log In
[x]
|
Forgot Password
Login:
[x]
[patch]
sys-apps/vocp/files/install-vocp-0.9.3.patch
install-vocp-0.9.3.patch (text/plain), 9.15 KB, created by
James Hiscock
on 2005-04-03 10:43:54 UTC
(
hide
)
Description:
sys-apps/vocp/files/install-vocp-0.9.3.patch
Filename:
MIME Type:
Creator:
James Hiscock
Created:
2005-04-03 10:43:54 UTC
Size:
9.15 KB
patch
obsolete
>--- /var/tmp/portage/vocp-0.9.3/work/vocp-0.9.3/install_vocp.pl 2003-02-05 19:05:35.000000000 -0500 >+++ /tmp/install_vocp.pl 2005-04-03 12:39:21.782755960 -0400 >@@ -69,7 +69,9 @@ > 'Crypt::Blowfish' => [0, 'VOCPweb'], > 'MIME::Parser' => [0, 'Email-to-VoiceMail'], > ); >- >+ >+my $BASEDIR = $ENV{'VOCP_BASEDIR'}; >+ > my $AudioDSPModLocation = 'prog/dependencies/Audio-DSP-0.02b/'; > > my $ModemVgettyModLocation = 'prog/dependencies/Modem-Vgetty-0.04/'; >@@ -77,13 +79,13 @@ > my $VOCPDepsLocation = 'prog/dependencies/'; > $Version = '0.9.2'; > >-$LocalDir = '/usr/local/vocp'; >+$LocalDir = $BASEDIR . '/usr/local/vocp'; > > $Cp = '/bin/cp'; > >-$VOCP_conf_dir = "/etc/vocp"; >+$VOCP_conf_dir = $BASEDIR . "/etc/vocp"; > >-$Spool_dir = '/var/spool/voice'; >+$Spool_dir = $BASEDIR . '/var/spool/voice'; > > @Message_dirs = ( > 'messages/num', >@@ -136,7 +138,7 @@ > 'boxsample' => 'prog/boxes.conf.sample', > ); > >-@LogFiles = ('/var/log/vocp.log', '/var/log/vocp-calls.log'); >+@LogFiles = ($BASEDIR . '/var/log/vocp.log', $BASEDIR . '/var/log/vocp-calls.log'); > > > @Doc_files = ( >@@ -170,20 +172,21 @@ > $Pwd = `pwd`; > chomp($Pwd); > >- print "\n\nVOCP installer\n" >- . "$License\n\n" >- ."This program will install VOCP $Version.\n" >- ."You may just press the ENTER key to accept " >- ."the [default] value for any question.\n"; >- >- my $AgreeLicense = 'n'; >- print "\n\nYou understand that the VOCP system, it's source code and all supporting documents and resources are\n" >- . "\nCopyright (C) 2000-2003 Patrick Deegan, Psychogenic INC\n" >- . "\nand subject to the terms and conditions described in the accompanying LICENSE file. You have read the LICENSE and " >- . "agree to comply with the terms and conditions described therein? [$AgreeLicense]: "; >+# print "\n\nVOCP installer\n" >+# . "$License\n\n" >+# ."This program will install VOCP $Version.\n" >+# ."You may just press the ENTER key to accept " >+# ."the [default] value for any question.\n"; >+ >+# my $AgreeLicense = 'n'; >+# print "\n\nYou understand that the VOCP system, it's source code and all supporting documents and resources are\n" >+# . "\nCopyright (C) 2000-2003 Patrick Deegan, Psychogenic INC\n" >+# . "\nand subject to the terms and conditions described in the accompanying LICENSE file. You have read the LICENSE and " >+# . "agree to comply with the terms and conditions described therein? [$AgreeLicense]: "; >+# >+# option(\$AgreeLicense); > >- option(\$AgreeLicense); >- >+ my $AgreeLicense = 'y'; > unless ($AgreeLicense =~ m|^\s*[yY]|) > { > print "\nYou must agree to comply to the terms of the LICENSE before using VOCP or any parts thereof.\n" >@@ -191,16 +194,20 @@ > exit(0); > } > >- print "\n\n"; >- >+# print "\n\n"; >+# > ########################### INSTALL Type ################################ > # Type of installation > my $install = $Install_type{'full'}; >- print "Enter:\n$Install_type{'full'} for full vocp install,\n" >- ."$Install_type{'upgrade'} if you are upgrading a previous version of VOCP (read doc/upgrading.txt!),\n" >- ."$Install_type{'sound'} if you only wish to convert the sound files " >- ."to rmd format\n[$install]: "; >- option(\$install); >+ if ( $ENV{'VOCP_INSTALL_TYPE'} ne '' ) { >+ $install = $ENV{'VOCP_INSTALL_TYPE'}; >+ } >+ >+# print "Enter:\n$Install_type{'full'} for full vocp install,\n" >+# ."$Install_type{'upgrade'} if you are upgrading a previous version of VOCP (read doc/upgrading.txt!),\n" >+# ."$Install_type{'sound'} if you only wish to convert the sound files " >+# ."to rmd format\n[$install]: "; >+# option(\$install); > > unless ($install =~ /^\d$/ && $install < 4) { > print "Invalid selection ($install), please try again...\n\n"; >@@ -212,18 +219,18 @@ > || $install == $Install_type{'upgrade'}) && $> != 0); > > if ($install == $Install_type{'upgrade'}) { # Skip sound file conversion >- print "Skipping sound file conversion.\n"; >+# print "Skipping sound file conversion.\n"; > } else { > convert_sound() ; > } > > # If user selected only to convert, we're done. > if ($install == $Install_type{'sound'}) { >- print "Done.\n\n"; >+# print "Done.\n\n"; > exit(0); > } > >- system("touch " . join(" ", @LogFiles)); >+# system("touch " . join(" ", @LogFiles)); > > ########################### Dependencies ################################ > my $numSpaces = 30; >@@ -267,10 +274,10 @@ > if ($numFound != $numReqs) > { > >- my $installDeps = 'y'; >- print "\nCertain modules now required by VOCP were not found. You must install the modules marked REQUIRED before proceeding. " >- . "You may:\n\t- Abort and manually install any dependencies\n\t- Proceed with current configuration.\n\t- Attempt to automatically install all missing dependencies.\n\nInstall ALL dependencies automatically (you must be connected to the Internet)? [$installDeps]: "; >- option(\$installDeps); >+ my $installDeps = 'n'; >+ print "\nCertain modules now required by VOCP were not found. You must install the modules marked REQUIRED before proceeding."; >+# . "You may:\n\t- Abort and manually install any dependencies\n\t- Proceed with current configuration.\n\t- Attempt to automatically install all missing dependencies.\n\nInstall ALL dependencies automatically (you must be connected to the Internet)? [$installDeps]: "; >+# option(\$installDeps); > > if ($installDeps =~ /^\s*[yY]/) > { >@@ -355,11 +362,11 @@ > > ########################### VOCP modules ################################ > #Copy program files >- chdir($Pwd); >- print "Installing VOCP Perl modules...\n"; >- chdir($PerlModule_dirs{'VOCP'}); >- system("perl Makefile.PL; make; make install"); >- print "\nDone\n\n\n"; >+# chdir($Pwd); >+# print "Installing VOCP Perl modules...\n"; >+# chdir($PerlModule_dirs{'VOCP'}); >+# system("perl Makefile.PL; make; make install"); >+# print "\nDone\n\n\n"; > chdir($Pwd); > > >@@ -398,9 +405,13 @@ > system("$compiler -o pwcheck pwcheck.c"); > print "Creating xfer_to_vocp setuid wrapper\n"; > system("$compiler -o xfer_to_vocp xfer_to_vocp.c"); >- my $haveTTS = 'n'; >- print "\nDo you wish to use Text-to-speech (to hear emails, etc.) AND do you have the Festival TTS engine installed [$haveTTS]: "; >- option(\$haveTTS); >+# my $haveTTS = 'n'; >+# print "\nDo you wish to use Text-to-speech (to hear emails, etc.) AND do you have the Festival TTS engine installed [$haveTTS]: "; >+# option(\$haveTTS); >+ my $haveTTS = 'y'; >+ if ( $ENV{'VOCP_HAVE_TTS'} ne 'y' ) { >+ $haveTTS = 'n'; >+ } > > if ($haveTTS =~ m|^\s*[yY]|) > { >@@ -408,10 +419,11 @@ > my $festDir; > do > { >- print "Under which directory can Festival's bin/text2wave program be \nfound (enter full path up to bin/text2wave): "; >- option(\$festDir); >- chomp($festDir); >+# print "Under which directory can Festival's bin/text2wave program be \nfound (enter full path up to bin/text2wave): "; >+# option(\$festDir); >+# chomp($festDir); > >+ $festDir = '/usr/bin/text2wave'; > # Correct if they've entered the full path including the executable > if ($festDir =~ m|^(.*)/bin/text2wave$|) > { >@@ -504,17 +516,20 @@ > } > > >- option(\$VOCP_group); >- >- while (! -x $Groupadd) >- { >- print "\nWhat is the full path of the groupadd program on your system?\n" >- . "[$Groupadd]: "; >- option(\$Groupadd); >- } >- >- print "\nCreating group and setting permissions on boxes.conf and messages.pl...\n"; >- system("$Groupadd $VOCP_group"); >+# option(\$VOCP_group); >+ if ( $ENV{'VOCP_GROUP'} ne '' ) { >+ $VOCP_group = $ENV{'VOCP_GROUP'}; >+ } >+# >+# while (! -x $Groupadd) >+# { >+# print "\nWhat is the full path of the groupadd program on your system?\n" >+# . "[$Groupadd]: "; >+# option(\$Groupadd); >+# } >+# >+# print "\nCreating group and setting permissions on boxes.conf and messages.pl...\n"; >+# system("$Groupadd $VOCP_group"); > > > # Do a little work on permissions >@@ -562,11 +577,11 @@ > my ($pvftormd, $found); > do { > # locate pvftormd >- my $pvftoolsdir = '/usr/local/bin'; >- print "Where is the pvftormd executable (included " >- ."with mgetty) installed on your system\n" >- ."[$pvftoolsdir]: "; >- option(\$pvftoolsdir); >+ my $pvftoolsdir = '/usr/bin'; >+# print "Where is the pvftormd executable (included " >+# ."with mgetty) installed on your system\n" >+# ."[$pvftoolsdir]: "; >+# option(\$pvftoolsdir); > $pvftormd = $pvftoolsdir . '/pvftormd'; > if (-x $pvftormd) { > print "\n"; >@@ -580,14 +595,18 @@ > } until ($found); > > my $pvftormdopt = 'Lucent 5'; >+ >+ if ( $ENV{'PVF_FORMAT'} ne '' ) { >+ $pvftormdopt = $ENV{'PVF_FORMAT'}; >+ } > >- print "\nListed above are the supported modems and " >- ."compression types. You should already know which " >- ."of these apply to your modem (if not see the " >- ."documentation included on vgetty or the website). " >- ."Please enter the options that apply to your modem, " >- ."for example, $pvftormdopt\n[$pvftormdopt]: "; >- option(\$pvftormdopt); >+# print "\nListed above are the supported modems and " >+# ."compression types. You should already know which " >+# ."of these apply to your modem (if not see the " >+# ."documentation included on vgetty or the website). " >+# ."Please enter the options that apply to your modem, " >+# ."for example, $pvftormdopt\n[$pvftormdopt]: "; >+# option(\$pvftormdopt); > > print "\nConverting sound files, this can take a while...\n"; >
You cannot view the attachment while viewing its details because your browser does not support IFRAMEs.
View the attachment on a separate page
.
View Attachment As Diff
View Attachment As Raw
Actions:
View
|
Diff
Attachments on
bug 38163
:
55212
|
55213
|
55214
|
55215
|
55216
|
55217
|
114582
|
114584