forked from pool/perl-Expect
This commit is contained in:
commit
dfc093e247
23
.gitattributes
vendored
Normal file
23
.gitattributes
vendored
Normal file
@ -0,0 +1,23 @@
|
||||
## Default LFS
|
||||
*.7z filter=lfs diff=lfs merge=lfs -text
|
||||
*.bsp filter=lfs diff=lfs merge=lfs -text
|
||||
*.bz2 filter=lfs diff=lfs merge=lfs -text
|
||||
*.gem filter=lfs diff=lfs merge=lfs -text
|
||||
*.gz filter=lfs diff=lfs merge=lfs -text
|
||||
*.jar filter=lfs diff=lfs merge=lfs -text
|
||||
*.lz filter=lfs diff=lfs merge=lfs -text
|
||||
*.lzma filter=lfs diff=lfs merge=lfs -text
|
||||
*.obscpio filter=lfs diff=lfs merge=lfs -text
|
||||
*.oxt filter=lfs diff=lfs merge=lfs -text
|
||||
*.pdf filter=lfs diff=lfs merge=lfs -text
|
||||
*.png filter=lfs diff=lfs merge=lfs -text
|
||||
*.rpm filter=lfs diff=lfs merge=lfs -text
|
||||
*.tbz filter=lfs diff=lfs merge=lfs -text
|
||||
*.tbz2 filter=lfs diff=lfs merge=lfs -text
|
||||
*.tgz filter=lfs diff=lfs merge=lfs -text
|
||||
*.ttf filter=lfs diff=lfs merge=lfs -text
|
||||
*.txz filter=lfs diff=lfs merge=lfs -text
|
||||
*.whl filter=lfs diff=lfs merge=lfs -text
|
||||
*.xz filter=lfs diff=lfs merge=lfs -text
|
||||
*.zip filter=lfs diff=lfs merge=lfs -text
|
||||
*.zst filter=lfs diff=lfs merge=lfs -text
|
1
.gitignore
vendored
Normal file
1
.gitignore
vendored
Normal file
@ -0,0 +1 @@
|
||||
.osc
|
3
Expect-1.20.tar.gz
Normal file
3
Expect-1.20.tar.gz
Normal file
@ -0,0 +1,3 @@
|
||||
version https://git-lfs.github.com/spec/v1
|
||||
oid sha256:bbf70ce7cb39425a0f72c252491826747983ee82fb2d7b0a8a99d8940a58392f
|
||||
size 53388
|
63
Expect.diff
Normal file
63
Expect.diff
Normal file
@ -0,0 +1,63 @@
|
||||
diff -uNr Expect-1.15/examples/kibitz/kibitz Expect-new/examples/kibitz/kibitz
|
||||
--- Expect-1.15/examples/kibitz/kibitz Sat Nov 17 14:18:49 2001
|
||||
+++ Expect-new/examples/kibitz/kibitz Fri Apr 5 09:24:52 2002
|
||||
@@ -1,4 +1,4 @@
|
||||
-#!/usr/local/bin/perl
|
||||
+#!/usr/bin/perl
|
||||
# Original author: Author: Don Libes, NIST (tcl/expect)
|
||||
# Date written: December 5, 1991
|
||||
# Date last editted: October 19, 1994
|
||||
diff -uNr Expect-1.15/tutorial/2.A.ftp Expect-new/tutorial/2.A.ftp
|
||||
--- Expect-1.15/tutorial/2.A.ftp Sat Nov 17 14:18:48 2001
|
||||
+++ Expect-new/tutorial/2.A.ftp Fri Apr 5 09:24:52 2002
|
||||
@@ -1,4 +1,4 @@
|
||||
-#!/usr/local/bin/perl
|
||||
+#!/usr/bin/perl
|
||||
# This example demonstrates how to spawn an ftp process, have it
|
||||
#log in to a host, and grab a file off the host. This should give you a
|
||||
#general idea of how to spawn processes and talk to them.
|
||||
diff -uNr Expect-1.15/tutorial/2.B.rlogin Expect-new/tutorial/2.B.rlogin
|
||||
--- Expect-1.15/tutorial/2.B.rlogin Sat Nov 17 14:18:47 2001
|
||||
+++ Expect-new/tutorial/2.B.rlogin Fri Apr 5 09:24:52 2002
|
||||
@@ -1,4 +1,4 @@
|
||||
-#!/usr/local/bin/perl
|
||||
+#!/usr/bin/perl
|
||||
# There are three new things in this example. First is the concept
|
||||
#of closing the process, second is the concept of using regular
|
||||
#expressions in match patterns, and third is the concept of grabbing
|
||||
diff -uNr Expect-1.15/tutorial/3.A.debugging Expect-new/tutorial/3.A.debugging
|
||||
--- Expect-1.15/tutorial/3.A.debugging Sat Nov 17 14:18:48 2001
|
||||
+++ Expect-new/tutorial/3.A.debugging Fri Apr 5 09:24:52 2002
|
||||
@@ -1,4 +1,4 @@
|
||||
-#!/usr/local/bin/perl
|
||||
+#!/usr/bin/perl
|
||||
# This example demonstrates how to use the debugging features in
|
||||
#expect. They're reasonably straghtforward.
|
||||
#
|
||||
diff -uNr Expect-1.15/tutorial/4.A.top Expect-new/tutorial/4.A.top
|
||||
--- Expect-1.15/tutorial/4.A.top Sat Nov 17 14:18:47 2001
|
||||
+++ Expect-new/tutorial/4.A.top Fri Apr 5 09:24:52 2002
|
||||
@@ -1,4 +1,4 @@
|
||||
-#!/usr/local/bin/perl
|
||||
+#!/usr/bin/perl
|
||||
# This example is a replay of sorts of the rlogin example
|
||||
#before except in this example we turn control of the process back
|
||||
#to the user through use of interact().
|
||||
diff -uNr Expect-1.15/tutorial/5.A.top Expect-new/tutorial/5.A.top
|
||||
--- Expect-1.15/tutorial/5.A.top Sat Nov 17 14:18:47 2001
|
||||
+++ Expect-new/tutorial/5.A.top Fri Apr 5 09:24:52 2002
|
||||
@@ -1,4 +1,4 @@
|
||||
-#!/usr/local/bin/perl
|
||||
+#!/usr/bin/perl
|
||||
# Here we are doing this again only this time we'll do it
|
||||
#without Echoing the password.
|
||||
|
||||
diff -uNr Expect-1.15/tutorial/5.B.top Expect-new/tutorial/5.B.top
|
||||
--- Expect-1.15/tutorial/5.B.top Sat Nov 17 14:18:48 2001
|
||||
+++ Expect-new/tutorial/5.B.top Fri Apr 5 09:24:52 2002
|
||||
@@ -1,4 +1,4 @@
|
||||
-#!/usr/local/bin/perl
|
||||
+#!/usr/bin/perl
|
||||
# Here we set manual_stty on the process so we can do things like
|
||||
#hit ^Z to stop it instead of the ^Z going to the process on the other machine.
|
||||
# This is to say, normally when you interact with a process STDIN is
|
105
perl-Expect.changes
Normal file
105
perl-Expect.changes
Normal file
@ -0,0 +1,105 @@
|
||||
-------------------------------------------------------------------
|
||||
Tue Sep 19 15:47:35 CEST 2006 - mc@suse.de
|
||||
|
||||
- Version 1.20
|
||||
* fixed non-localized usage of $_
|
||||
* added new example ssh.pl
|
||||
* added early return to send and send_slow if filehandle was closed
|
||||
* fixed bug in expect() param handling (exact pattern "0" was ignored)
|
||||
* fixed bug in _make_readable()
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Fri Jul 14 12:13:21 CEST 2006 - mc@suse.de
|
||||
|
||||
- Version 1.18
|
||||
- added param check for expect()
|
||||
- added another pipe to synchronize spawning. Closing the slave in
|
||||
the parent can lead to a hang if the child already wrote
|
||||
something into it...
|
||||
- some bugfixes
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Wed Jan 25 21:39:40 CET 2006 - mls@suse.de
|
||||
|
||||
- converted neededforbuild to BuildRequires
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Thu Sep 29 01:24:08 CEST 2005 - dmueller@suse.de
|
||||
|
||||
- add norootforbuild
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Fri Aug 22 14:44:02 CEST 2003 - mjancar@suse.cz
|
||||
|
||||
- require the perl version we build with
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Fri Jul 18 17:51:29 CEST 2003 - mc@suse.de
|
||||
|
||||
- add vendorarch changes
|
||||
- add make test
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Mon May 19 11:33:34 CEST 2003 - mc@suse.de
|
||||
|
||||
- removed unpackaged Files from RPM_BUILD_ROOT
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Tue Sep 17 17:34:28 CEST 2002 - ro@suse.de
|
||||
|
||||
- removed bogus self-provides
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Tue Jul 2 17:40:06 MEST 2002 - mls@suse.de
|
||||
|
||||
- remove race in .packlist generation
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Fri Apr 5 14:46:28 CEST 2002 - mc@suse.de
|
||||
|
||||
- switch to version 1.15
|
||||
- changed tests to check out pty behaviour (max. string length)
|
||||
- added autoflush(1) to log_file
|
||||
- split 'new' and 'spawn' to be able to set slave pty params via stty
|
||||
before actually spawning the program
|
||||
- added print_log_file(), send() now no longer prints to log file or
|
||||
stdout.
|
||||
- spawn() now uses IO::Pty spawn, thus exec errors are reported and
|
||||
ssh should work too!
|
||||
- timeout handlers now also can exp_continue
|
||||
- added 'raw_pty' option, also setting master to raw if isatty()
|
||||
- use 'set_raw' instead of stty("raw"); IO::Stty now optional
|
||||
- updated docs & FAQs; explained how terminal sizes and SIGWINCH
|
||||
should be propagated
|
||||
- bug fixes
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Wed Nov 7 15:39:07 CET 2001 - mc@suse.de
|
||||
|
||||
- switch to version 1.12
|
||||
- exp_Max_Accum didn't work for interact.
|
||||
- removed soft_close() from DESTROY. Being overly nice to a doomed process
|
||||
doesn't pay off. Old behaviour is available via
|
||||
$Expect::Do_Soft_Close = 1;
|
||||
- cleanup of log and exp_internal output
|
||||
- added various aliases for functions starting with 'exp_'
|
||||
- moved FAQ and intro into the main pod as I got the impression
|
||||
that many users didn't bother to read all the documentation
|
||||
or didn't know that it was there.
|
||||
- added a hook for log_file: can be set to a code ref.
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Sun Aug 12 14:48:42 CEST 2001 - kukuk@suse.de
|
||||
|
||||
- Fix path to perl interpreter
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Thu Jun 21 16:51:28 CEST 2001 - mc@suse.de
|
||||
|
||||
- fixed the specfile. Used more RPM macros
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Wed Feb 21 17:59:50 CET 2001 - mc@suse.de
|
||||
|
||||
- first package, v1.11
|
||||
|
127
perl-Expect.spec
Normal file
127
perl-Expect.spec
Normal file
@ -0,0 +1,127 @@
|
||||
#
|
||||
# spec file for package perl-Expect (Version 1.20)
|
||||
#
|
||||
# Copyright (c) 2006 SUSE LINUX Products GmbH, Nuernberg, Germany.
|
||||
# This file and all modifications and additions to the pristine
|
||||
# package are under the same license as the package itself.
|
||||
#
|
||||
# Please submit bugfixes or comments via http://bugs.opensuse.org/
|
||||
#
|
||||
|
||||
# norootforbuild
|
||||
|
||||
Name: perl-Expect
|
||||
BuildRequires: perl-IO-Stty perl-IO-Tty
|
||||
URL: http://search.cpan.org/search?module=Expect
|
||||
License: Artistic License
|
||||
Group: Development/Libraries/Perl
|
||||
Requires: perl-IO-Tty perl-IO-Stty
|
||||
Requires: perl = %{perl_version}
|
||||
Autoreqprov: on
|
||||
Summary: Expect for perl
|
||||
Version: 1.20
|
||||
Release: 1
|
||||
Source: Expect-%{version}.tar.gz
|
||||
Patch: Expect.diff
|
||||
BuildRoot: %{_tmppath}/%{name}-%{version}-build
|
||||
|
||||
%description
|
||||
A tool for automating interactive programs
|
||||
|
||||
|
||||
|
||||
Authors:
|
||||
--------
|
||||
Roland Giersig <RGiersig@cpan.org>
|
||||
Austin Schutz <tex@habit.com>
|
||||
|
||||
%prep
|
||||
%setup -n Expect-%{version}
|
||||
%patch -p1
|
||||
|
||||
%build
|
||||
touch $RPM_BUILD_ROOT/timestamp
|
||||
perl Makefile.PL
|
||||
make
|
||||
make test
|
||||
|
||||
%install
|
||||
[ "$RPM_BUILD_ROOT" != "/" ] && [ -d $RPM_BUILD_ROOT ] && rm -rf $RPM_BUILD_ROOT;
|
||||
make DESTDIR=$RPM_BUILD_ROOT install_vendor
|
||||
%perl_process_packlist
|
||||
|
||||
%files
|
||||
%defattr(-,root,root)
|
||||
%doc Changes MANIFEST README
|
||||
%{perl_vendorarch}/auto/Expect/
|
||||
/%{perl_vendorlib}/Expect.pod
|
||||
/%{perl_vendorlib}/Expect.pm
|
||||
%doc tutorial
|
||||
%doc examples
|
||||
%doc %{_mandir}/man3/*
|
||||
/var/adm/perl-modules/perl-Expect
|
||||
|
||||
%changelog -n perl-Expect
|
||||
* Tue Sep 19 2006 - mc@suse.de
|
||||
- Version 1.20
|
||||
* fixed non-localized usage of $_
|
||||
* added new example ssh.pl
|
||||
* added early return to send and send_slow if filehandle was closed
|
||||
* fixed bug in expect() param handling (exact pattern "0" was ignored)
|
||||
* fixed bug in _make_readable()
|
||||
* Fri Jul 14 2006 - mc@suse.de
|
||||
- Version 1.18
|
||||
- added param check for expect()
|
||||
- added another pipe to synchronize spawning. Closing the slave in
|
||||
the parent can lead to a hang if the child already wrote
|
||||
something into it...
|
||||
- some bugfixes
|
||||
* Wed Jan 25 2006 - mls@suse.de
|
||||
- converted neededforbuild to BuildRequires
|
||||
* Thu Sep 29 2005 - dmueller@suse.de
|
||||
- add norootforbuild
|
||||
* Fri Aug 22 2003 - mjancar@suse.cz
|
||||
- require the perl version we build with
|
||||
* Fri Jul 18 2003 - mc@suse.de
|
||||
- add vendorarch changes
|
||||
- add make test
|
||||
* Mon May 19 2003 - mc@suse.de
|
||||
- removed unpackaged Files from RPM_BUILD_ROOT
|
||||
* Tue Sep 17 2002 - ro@suse.de
|
||||
- removed bogus self-provides
|
||||
* Tue Jul 02 2002 - mls@suse.de
|
||||
- remove race in .packlist generation
|
||||
* Fri Apr 05 2002 - mc@suse.de
|
||||
- switch to version 1.15
|
||||
- changed tests to check out pty behaviour (max. string length)
|
||||
- added autoflush(1) to log_file
|
||||
- split 'new' and 'spawn' to be able to set slave pty params via stty
|
||||
before actually spawning the program
|
||||
- added print_log_file(), send() now no longer prints to log file or
|
||||
stdout.
|
||||
- spawn() now uses IO::Pty spawn, thus exec errors are reported and
|
||||
ssh should work too!
|
||||
- timeout handlers now also can exp_continue
|
||||
- added 'raw_pty' option, also setting master to raw if isatty()
|
||||
- use 'set_raw' instead of stty("raw"); IO::Stty now optional
|
||||
- updated docs & FAQs; explained how terminal sizes and SIGWINCH
|
||||
should be propagated
|
||||
- bug fixes
|
||||
* Wed Nov 07 2001 - mc@suse.de
|
||||
- switch to version 1.12
|
||||
- exp_Max_Accum didn't work for interact.
|
||||
- removed soft_close() from DESTROY. Being overly nice to a doomed process
|
||||
doesn't pay off. Old behaviour is available via
|
||||
$Expect::Do_Soft_Close = 1;
|
||||
- cleanup of log and exp_internal output
|
||||
- added various aliases for functions starting with 'exp_'
|
||||
- moved FAQ and intro into the main pod as I got the impression
|
||||
that many users didn't bother to read all the documentation
|
||||
or didn't know that it was there.
|
||||
- added a hook for log_file: can be set to a code ref.
|
||||
* Sun Aug 12 2001 - kukuk@suse.de
|
||||
- Fix path to perl interpreter
|
||||
* Thu Jun 21 2001 - mc@suse.de
|
||||
- fixed the specfile. Used more RPM macros
|
||||
* Wed Feb 21 2001 - mc@suse.de
|
||||
- first package, v1.11
|
Loading…
x
Reference in New Issue
Block a user