forked from openkylin/libssh2
96 lines
2.5 KiB
Plaintext
96 lines
2.5 KiB
Plaintext
|
$!
|
||
|
$!
|
||
|
$!
|
||
|
$ olddir = f$environment( "default" )
|
||
|
$ on control_y then goto End
|
||
|
$ on error then goto End
|
||
|
$!
|
||
|
$ gosub Init
|
||
|
$!
|
||
|
$ man2help sys$input: libssh2.hlp -b 1
|
||
|
|
||
|
LIBSSH2
|
||
|
|
||
|
OpenVMS port of the libssh2 library, which provides an
|
||
|
API to implement client SSH communication.
|
||
|
|
||
|
License information is available at the Copying subtopic.
|
||
|
|
||
|
$!
|
||
|
$ open/append mh libssh2.hlp
|
||
|
$ write mh helpversion
|
||
|
$ close mh
|
||
|
$!
|
||
|
$ man2help -a [-]README.; libssh2.hlp -b 2
|
||
|
$ man2help -a [-]COPYING.; libssh2.hlp -b 2
|
||
|
$ man2help -a [-]NEWS.; libssh2.hlp -b 2
|
||
|
$ man2help -a [-]RELEASE-NOTES.; libssh2.hlp -b 2
|
||
|
$ man2help -a [-.docs]AUTHORS.; libssh2.hlp -b 2
|
||
|
$ man2help -a [-.docs]BINDINGS.; libssh2.hlp -b 2
|
||
|
$ man2help -a [-.docs]HACKING.; libssh2.hlp -b 2
|
||
|
$ if f$search("[]HACKING_CRYPTO.") .nes. "" then delete []HACKING_CRYPTO.;*
|
||
|
$ copy [-.docs]HACKING-CRYPTO; []HACKING_CRYPTO.
|
||
|
$ man2help -a []HACKING_CRYPTO.; libssh2.hlp -b 2
|
||
|
$ man2help -a [-.docs]TODO.; libssh2.hlp -b 2
|
||
|
$!
|
||
|
$ man2help -a sys$input: libssh2.hlp -b 2
|
||
|
|
||
|
API_Reference
|
||
|
|
||
|
Reference of all implemented API calls in
|
||
|
libssh2.
|
||
|
|
||
|
$!
|
||
|
$ man2help -a [-.docs]*.3 libssh2.hlp -b 3 -p
|
||
|
$!
|
||
|
$ library/help/create libssh2.hlb libssh2.hlp
|
||
|
$!
|
||
|
$End:
|
||
|
$ set default 'olddir'
|
||
|
$exit
|
||
|
$!
|
||
|
$!-------------------------------------------------------
|
||
|
$!
|
||
|
$Init:
|
||
|
$!
|
||
|
$ thisdir = f$environment( "procedure" )
|
||
|
$ thisdir = f$parse(thisdir,,,"device") + f$parse(thisdir,,,"directory")
|
||
|
$ set default 'thisdir'
|
||
|
$!
|
||
|
$ say = "write sys$output"
|
||
|
$!
|
||
|
$ pipe search [-.include]*.h libssh2_version_major/nohead | (read sys$input l ; l = f$element(2," ",f$edit(l,"trim,compress")) ; -
|
||
|
define/job majorv &l )
|
||
|
$ pipe search [-.include]*.h libssh2_version_minor/nohead | (read sys$input l ; l = f$element(2," ",f$edit(l,"trim,compress")) ; -
|
||
|
define/job minorv &l )
|
||
|
$ pipe search [-.include]*.h libssh2_version_patch/nohead | (read sys$input l ; l = f$element(2," ",f$edit(l,"trim,compress")) ; -
|
||
|
define/job patchv &l )
|
||
|
$!
|
||
|
$ majorv = f$trnlnm("majorv")
|
||
|
$ minorv = f$integer(f$trnlnm("minorv"))
|
||
|
$ patchv = f$integer( f$trnlnm("patchv"))
|
||
|
$!
|
||
|
$ helpversion = "This help library is based on build version ''majorv'.''minorv'.''patchv' of libssh2."
|
||
|
$!
|
||
|
$ deassign/job majorv
|
||
|
$ deassign/job minorv
|
||
|
$ deassign/job patchv
|
||
|
$!
|
||
|
$ if f$search( "man2help.exe" ) .eqs. ""
|
||
|
$ then
|
||
|
$ cc man2help
|
||
|
$ link man2help
|
||
|
$ endif
|
||
|
$!
|
||
|
$ man2help := $'thisdir'man2help.exe
|
||
|
$!
|
||
|
$ if f$search("libssh2.hlp") .nes. ""
|
||
|
$ then
|
||
|
$ delete libssh2.hlp;*
|
||
|
$ endif
|
||
|
$ if f$search("libssh2.hlb") .nes. ""
|
||
|
$ then
|
||
|
$ delete libssh2.hlb;*
|
||
|
$ endif
|
||
|
$return
|