Merged gsoc-ssh branch. Closes #910

libssh2/vms/libssh2_make_help.dcl

@@ -0,0 +1,95 @@
+$!
+$!
+$!
+$ 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