perlmpeix.1

视频监控网络部分的协议ddns,的模块的实现代码,请大家大胆指正.

/BIND/PUB/include and /BIND/PUB/lib portions of BIND/iX
( http://www.bixby.org/mark/bindix.html ).
.SH "How to Obtain Perl/iX"
.IX Header "How to Obtain Perl/iX"
.IP "1." 4
Download Perl using either \s-1FTP\s0.ARPA.SYS or some other client
.IP "2." 4
Extract the installation script
.IP "3." 4
Edit the installation script
.IP "4." 4
Run the installation script
.IP "5." 4
Convert your *.a system archive libraries to *.sl shared libraries
.PP
Download Perl using \s-1FTP\s0.ARPA.SYS from your \s-1HP\s0 3000 (the preferred
method).....
.PP
.Vb 9
\&    :HELLO MANAGER.SYS
\&    :XEQ FTP.ARPA.SYS
\&    open ftp.bixby.org
\&    anonymous
\&    [e-mail]
\&    bytestream
\&    cd /pub/mpe
\&    get perl\-5.6.0\-mpe.tar.Z /tmp/perl.tar.Z;disc=2147483647
\&    exit
.Ve
.PP
\&.....Or download using some other generic web or ftp client (the alternate
method)
.PP
Download the following files (make sure that you use \*(L"binary mode\*(R" or
whatever client feature that is 8\-bit clean):
.IP "\(bu" 4
Perl from
.Sp
.Vb 1
\&    http://www.bixby.org/ftp/pub/mpe/perl\-5.6.0\-mpe.tar.Z
.Ve
.Sp
or
.Sp
.Vb 1
\&    ftp://ftp.bixby.org/pub/mpe/perl\-5.6.0\-mpe.tar.Z
.Ve
.IP "\(bu" 4
Upload those files to your \s-1HP\s0 3000 in an 8\-bit clean bytestream manner to:
.Sp
.Vb 1
\&    /tmp/perl.tar.Z
.Ve
.IP "\(bu" 4
Then extract the installation script (after both download methods)
.Sp
.Vb 2
\&    :CHDIR /tmp
\&    :XEQ TAR.HPBIN.SYS \*(Aqxvfopz /tmp/perl.tar.Z INSTALL\*(Aq
.Ve
.IP "\(bu" 4
Edit the installation script
.Sp
Examine the accounting structure creation commands and modify if
necessary (adding additional capabilities, choosing a non-system
volume set, etc).
.Sp
.Vb 1
\&    :XEQ VI.HPBIN.SYS /tmp/INSTALL
.Ve
.IP "\(bu" 4
Run the installation script.
.Sp
The accounting structure will be created and then all files will be
extracted from the archive.
.Sp
.Vb 1
\&    :XEQ SH.HPBIN.SYS /tmp/INSTALL
.Ve
.IP "\(bu" 4
Convert your *.a system archive libraries to *.sl shared libraries
.Sp
You only have to do this \s-1ONCE\s0 on your MPE/iX 5.5 machine in order to
convert /lib/lib*.a and /usr/lib/lib*.a libraries to their *.sl
equivalents.  This step should not be necessary on MPE/iX 6.0 or later
machines because the 6.0 or later update process does it for you.
.Sp
.Vb 1
\&    :XEQ SH.HPBIN.SYS /PERL/PUB/LIBSHP3K
.Ve
.SH "Perl/iX Distribution Contents Highlights"
.IX Header "Perl/iX Distribution Contents Highlights"
.IP "\s-1README\s0" 4
.IX Item "README"
The file you're reading now.
.IP "\s-1INSTALL\s0" 4
.IX Item "INSTALL"
Perl/iX Installation script.
.IP "\s-1LIBSHP3K\s0" 4
.IX Item "LIBSHP3K"
Script to convert *.a system archive libraries to *.sl shared libraries.
.IP "\s-1PERL\s0" 4
.IX Item "PERL"
Perl \s-1NMPRG\s0 executable.  A version-numbered backup copy also
exists.  You might wish to \*(L"ln \-s /PERL/PUB/PERL /usr/local/bin/perl\*(R".
.IP ".cpan/" 4
.IX Item ".cpan/"
Much add-on source code downloaded with the \s-1CPAN\s0 module.
.IP "lib/" 4
.IX Item "lib/"
Perl libraries, both core and add-on.
.IP "man/" 4
.IX Item "man/"
Perl man page documentation.
.IP "public_html/feedback.cgi" 4
.IX Item "public_html/feedback.cgi"
Sample feedback \s-1CGI\s0 form written in Perl.
.IP "src/perl\-5.6.0\-mpe" 4
.IX Item "src/perl-5.6.0-mpe"
Source code.
.SH "How to Compile Perl/iX"
.IX Header "How to Compile Perl/iX"
.IP "1." 4
cd src/perl\-5.6.0\-mpe
.IP "2." 4
Read the \s-1INSTALL\s0 file for the official instructions
.IP "3." 4
\&./Configure \-d
.IP "4." 4
make
.IP "5." 4
\&./mpeix/relink
.IP "6." 4
make test (expect approximately 15 out of 11306 subtests to fail,
mostly due to \s-1MPE\s0 not supporting hard links, \s-1UDP\s0 socket problems,
and handling \fIexit()\fR return codes improperly)
.IP "7." 4
make install
.IP "8." 4
Optionally create symbolic links that point to the Perl
executable, i.e. ln \-s /PERL/PUB/PERL /usr/local/bin/perl
.PP
The summary test results from \*(L"cd t; ./perl \-I../lib harness\*(R":
.PP
.Vb 11
\&  Failed Test  Status Wstat Total Fail  Failed  List of failed
\&  \-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-\-
\&  io/fs.t                      29    8  27.59%  2\-5, 7\-9, 11
\&  io/openpid.t                 10    1  10.00%  7
\&  lib/io_sock.t                14    1   7.14%  13
\&  lib/io_udp.t                  7    2  28.57%  3, 5
\&  lib/posix.t                  27    1   3.70%  12
\&  op/lex_assign.t             187    1   0.53%  13
\&  op/stat.t                    58    1   1.72%  3
\&  15 tests and 94 subtests skipped.
\&  Failed 7/236 test scripts, 97.03% okay. 15/11306 subtests failed, 99.87% okay.
.Ve
.SH "Getting Started with Perl/iX"
.IX Header "Getting Started with Perl/iX"
Create your Perl script files with \*(L"#!/PERL/PUB/perl\*(R" (or an
equivalent symbolic link) as the first line.  Use the chmod command to
make sure that your script has execute permission. Run your script!
.PP
Be sure to take a look at the \s-1CPAN\s0 module list
( http://www.cpan.org/CPAN.html ). A wide variety of free Perl software
is available.  You can automatically download these packages by using
the \s-1CPAN\s0 module ( http://theoryx5.uwinnipeg.ca/CPAN/data/perl/CPAN.html ).
.SH "MPE/iX Implementation Considerations"
.IX Header "MPE/iX Implementation Considerations"
There some minor functionality issues to be aware of when comparing
Perl for Unix (Perl/UX) to Perl/iX:
.IP "\(bu" 4
\&\s-1MPE\s0 gcc/ld doesn't properly support linking \s-1NMPRG\s0 executables against
\&\s-1NMXL\s0 dynamic libraries, so you must manually run mpeix/relink after
each re-build of Perl.
.IP "\(bu" 4
Perl/iX File::Copy will use \s-1MPE\s0's /bin/cp command to copy files by
name in order to preserve file attributes like file code.
.IP "\(bu" 4
\&\s-1MPE\s0 (and thus Perl/iX) lacks support for \fIsetgrent()\fR, \fIendgrent()\fR,
\&\fIsetpwent()\fR, \fIendpwent()\fR.
.IP "\(bu" 4
\&\s-1MPE\s0 (and thus Perl/iX) lacks support for hard links.
.IP "\(bu" 4
\&\s-1MPE\s0 requires \s-1\fIGETPRIVMODE\s0()\fR in order to \fIbind()\fR to ports less than 1024.
Perl/iX will call \s-1\fIGETPRIVMODE\s0()\fR automatically on your behalf if you
attempt to \fIbind()\fR to these low-numbered ports.  Note that the Perl/iX
executable and the \s-1PERL\s0 account do not normally have CAP=PM, so if you
will be \fIbind()\fR\-ing to these privileged ports, you will manually need
to add \s-1PM\s0 capability as appropriate.
.IP "\(bu" 4
\&\s-1MPE\s0 requires that you \fIbind()\fR to an \s-1IP\s0 address of zero.  Perl/iX
automatically replaces the \s-1IP\s0 address that you pass to \fIbind()\fR with
a zero.
.IP "\(bu" 4
\&\s-1MPE\s0 requires \s-1\fIGETPRIVMODE\s0()\fR in order to \fIsetuid()\fR.  There are too many
calls to \fIsetuid()\fR within Perl/iX, so I have not attempted an automatic
\&\s-1\fIGETPRIVMODE\s0()\fR solution similar to \fIbind()\fR.
.SH "Known Perl/iX Bugs Under Investigation"
.IX Header "Known Perl/iX Bugs Under Investigation"
None.
.SH "Perl/iX To-Do List"
.IX Header "Perl/iX To-Do List"
.IP "\(bu" 4
Make \fIsetuid()\fR/\fIsetgid()\fR support work.
.IP "\(bu" 4
Make sure that \fIfcntl()\fR against a socket descriptor is redirected to \fIsfcntl()\fR.
.IP "\(bu" 4
Add support for Berkeley \s-1DB\s0 once I've finished porting Berkeley \s-1DB\s0.
.IP "\(bu" 4
Write an \s-1MPE\s0 \s-1XS\s0 extension library containing miscellaneous important
\&\s-1MPE\s0 functions like \s-1\fIGETPRIVMODE\s0()\fR, \s-1\fIGETUSERMODE\s0()\fR, and \fIsfcntl()\fR.
.SH "Perl/iX Change History"
.IX Header "Perl/iX Change History"
May 6, 1999
.IP "\(bu" 4
Patch \s-1LBCJXT6A\s0 is required on MPE/iX 5.5 machines in order to prevent
Perl/iX from dying with an unresolved external reference to _getenv_libc.
.PP
April 7, 1999
.IP "\(bu" 4
Updated to version 5.005_03.
.IP "\(bu" 4
The official source distribution once again compiles \*(L"straight out
of the box\*(R" for \s-1MPE\s0.
.IP "\(bu" 4
The current incarnation of the 5.5 \s-1POSIX\s0 filename extended
characters patch is now \s-1MPEKX40B\s0.
.IP "\(bu" 4
The \s-1LIBSHP3K\s0 *.a \-> *.sl library conversion script is now included
as /PERL/PUB/LIBSHP3K.
.PP
November 20, 1998
.IP "\(bu" 4
Updated to version 5.005_02.
.IP "\(bu" 4
Fixed a DynaLoader bug that was unable to load symbols from relative
path name libraries.
.IP "\(bu" 4
Fixed a .xs compilation bug where the mpeixish.sh include file wasn't
being installed into the proper directory.
.IP "\(bu" 4
All bugfixes will be submitted back to the official Perl developers.
.IP "\(bu" 4
The current incarnation of the \s-1POSIX\s0 filename extended characters
patch is now \s-1MPEKXJ3A\s0.
.PP
August 14, 1998
.IP "\(bu" 4
The previous \s-1POSIX\s0 filename extended characters patch \s-1MPEKX44C\s0 has
been superseded by \s-1MPEKXB5A\s0.
.PP
August 7, 1998
.IP "\(bu" 4
The previous \s-1POSIX\s0 filename extended characters patch \s-1MPEKX76A\s0 has
been superseded by \s-1MPEKX44C\s0.
.PP
July 28, 1998
.IP "\(bu" 4
Updated to version 5.005_01.
.PP
July 23, 1998
.IP "\(bu" 4
Updated to version 5.005 (production release).  The public
freeware sources are now 100% MPE-ready \*(L"straight out of the box\*(R".
.PP
July 17, 1998
.IP "\(bu" 4
Updated to version 5.005b1 (public beta release).  The public
freeware sources are now 99.9% MPE-ready.  By installing and
testing this beta on your own \s-1HP3000\s0, you will be helping to
insure that the final release of 5.005 will be 100% MPE-ready and
100% bug free.
.IP "\(bu" 4
My \s-1MPE\s0 binary release is now extracted using my standard \s-1INSTALL\s0 script.
.PP
July 15, 1998
.IP "\(bu" 4
Changed startperl to #!/PERL/PUB/perl so that Perl will recognize
scripts more easily and efficiently.
.PP
July 8, 1998
.IP "\(bu" 4
Updated to version 5.004_70 (internal developer release) which is now
MPE-ready.  The next public freeware release of Perl should compile
\&\*(L"straight out of the box\*(R" on \s-1MPE\s0.  Note that this version of Perl/iX
was strictly internal to me and never publicly released.  Note that
[21]BIND/iX is now required (well, the include files and libbind.a) if
you wish to compile Perl/iX.
.PP
November 6, 1997
.IP "\(bu" 4
Updated to version 5.004_04.  No changes in MPE-specific functionality.
.PP
October 16, 1997
.IP "\(bu" 4
Added Demos section to the Perl/iX home page so you can see some
sample Perl applications running on my 3000.
.PP
October 3, 1997
.IP "\(bu" 4
Added System Requirements section to the Perl/iX home page just so the
prerequisites stand out more. Various other home page tweaks.
.PP
October 2, 1997
.IP "\(bu" 4
Initial public release.
.PP
September 1997
.IP "\(bu" 4
Porting begins.
.SH "AUTHOR"
.IX Header "AUTHOR"
Mark Bixby, http://www.bixby.org/mark/