← Back to branch summary

~andersk/ubuntu/oneiric/openssl/spurious-reboot

« back to all changes in this revision

Viewing changes to VMS/openssl_startup.com

  • Committer: Package Import Robot
  • Author(s): Steve Beattie
  • Date: 2011-09-14 22:06:03 UTC
  • mfrom: (11.1.23 sid)
  • Revision ID: package-import@ubuntu.com-20110914220603-tsuxw8z3kt4lx9oc
Tags: 1.0.0e-2ubuntu1
https://launchpad.net/bugs/850608
https://launchpad.net/bugs/244250
* Resynchronise with Debian, fixes CVE-2011-1945, CVE-2011-3207 and
  CVE-2011-3210 (LP: #850608). Remaining changes:
  - debian/libssl1.0.0.postinst:
    + Display a system restart required notification bubble on libssl1.0.0
      upgrade.
    + Use a different priority for libssl1.0.0/restart-services depending
      on whether a desktop, or server dist-upgrade is being performed.
  - debian/{libssl1.0.0-udeb.dirs, control, rules}: Create
    libssl1.0.0-udeb, for the benefit of wget-udeb (no wget-udeb package
    in Debian).
  - debian/{libcrypto1.0.0-udeb.dirs, libssl1.0.0.dirs, libssl1.0.0.files,
    rules}: Move runtime libraries to /lib, for the benefit of
    wpasupplicant.
  - debian/patches/aesni.patch: Backport Intel AES-NI support, now from
    http://rt.openssl.org/Ticket/Display.html?id=2065 rather than the
    0.9.8 variant.
  - debian/patches/Bsymbolic-functions.patch: Link using
    -Bsymbolic-functions.
  - debian/patches/perlpath-quilt.patch: Don't change perl #! paths under
    .pc.
  - debian/rules:
    + Don't run 'make test' when cross-building.
    + Use host compiler when cross-building.  Patch from Neil Williams.
    + Don't build for processors no longer supported: i486, i586 (on
      i386), v8 (on sparc).
    + Fix Makefile to properly clean up libs/ dirs in clean target.
    + Replace duplicate files in the doc directory with symlinks.
* debian/libssl1.0.0.postinst: only display restart notification on
  servers (LP: #244250)

Show diffs side-by-side

added added

removed removed

Lines of Context:
VMS/openssl_startup.com
 
1
$!
 
2
$! Startup file for OpenSSL 1.x.
 
3
$!
 
4
$! 2011-03-05 SMS.
 
5
$!
 
6
$! This procedure must reside in the OpenSSL installation directory.
 
7
$! It will fail if it is copied to a different location.
 
8
$!
 
9
$! P1  qualifier(s) for DEFINE.  For example, "/SYSTEM" to get the
 
10
$!     logical names defined in the system logical name table.
 
11
$!
 
12
$! P2  "64", to use executables which were built with 64-bit pointers.
 
13
$!
 
14
$! Good (default) and bad status values.
 
15
$!
 
16
$ status =    %x00010001 ! RMS$_NORMAL, normal successful completion.
 
17
$ rms_e_fnf = %x00018292 ! RMS$_FNF, file not found.
 
18
$!
 
19
$! Prepare for problems.
 
20
$!
 
21
$ orig_dev_dir = f$environment( "DEFAULT")
 
22
$ on control_y then goto clean_up
 
23
$ on error then goto clean_up
 
24
$!
 
25
$! Determine hardware architecture.
 
26
$!
 
27
$ if (f$getsyi( "cpu") .lt. 128)
 
28
$ then
 
29
$   arch_name = "VAX"
 
30
$ else
 
31
$   arch_name = f$edit( f$getsyi( "arch_name"), "upcase")
 
32
$   if (arch_name .eqs. "") then arch_name = "UNK"
 
33
$ endif
 
34
$!
 
35
$ if (p2 .eqs. "64")
 
36
$ then
 
37
$   arch_name_exe = arch_name+ "_64"
 
38
$ else
 
39
$   arch_name_exe = arch_name
 
40
$ endif
 
41
$!
 
42
$! Derive the OpenSSL installation device:[directory] from the location
 
43
$! of this command procedure.
 
44
$!
 
45
$ proc = f$environment( "procedure")
 
46
$ proc_dev_dir = f$parse( "A.;", proc, , , "no_conceal") - "A.;"
 
47
$ proc_dev = f$parse( proc_dev_dir, , , "device", "syntax_only")
 
48
$ proc_dir = f$parse( proc_dev_dir, , , "directory", "syntax_only") - -
 
49
   ".][000000"- "[000000."- "]["- "["- "]"
 
50
$ proc_dev_dir = proc_dev+ "["+ proc_dir+ "]"
 
51
$ set default 'proc_dev_dir'
 
52
$ set default [-]
 
53
$ ossl_dev_dir = f$environment( "default")
 
54
$!
 
55
$! Check existence of expected directories (to see if this procedure has
 
56
$! been moved away from its proper place).
 
57
$!
 
58
$ if ((f$search( "certs.dir;1") .eqs. "") .or. -
 
59
   (f$search( "include.dir;1") .eqs. "") .or. -
 
60
   (f$search( "private.dir;1") .eqs. "") .or. -
 
61
   (f$search( "vms.dir;1") .eqs. ""))
 
62
$ then
 
63
$    write sys$output -
 
64
      "   Can't find expected common OpenSSL directories in:"
 
65
$    write sys$output "   ''ossl_dev_dir'"
 
66
$    status = rms_e_fnf
 
67
$    goto clean_up
 
68
$ endif
 
69
$!
 
70
$ if ((f$search( "''arch_name_exe'_exe.dir;1") .eqs. "") .or. -
 
71
   (f$search( "''arch_name'_lib.dir;1") .eqs. ""))
 
72
$ then
 
73
$    write sys$output -
 
74
      "   Can't find expected architecture-specific OpenSSL directories in:"
 
75
$    write sys$output "   ''ossl_dev_dir'"
 
76
$    status = rms_e_fnf
 
77
$    goto clean_up
 
78
$ endif
 
79
$!
 
80
$! All seems well (enough).  Define the OpenSSL logical names.
 
81
$!
 
82
$ ossl_root = ossl_dev_dir- "]"+ ".]"
 
83
$ define /translation_attributes = concealed /nolog'p1 SSLROOT 'ossl_root'
 
84
$ define /nolog 'p1' SSLCERTS     sslroot:[certs]
 
85
$ define /nolog 'p1' SSLINCLUDE   sslroot:[include]
 
86
$ define /nolog 'p1' SSLPRIVATE   sslroot:[private]
 
87
$ define /nolog 'p1' SSLEXE       sslroot:['arch_name_exe'_exe]
 
88
$ define /nolog 'p1' SSLLIB       sslroot:['arch_name'_lib]
 
89
$!
 
90
$! Defining OPENSSL lets a C program use "#include <openssl/{foo}.h>":
 
91
$ define /nolog 'p1' OPENSSL      SSLINCLUDE:
 
92
$!
 
93
$! Run a site-specific procedure, if it exists.
 
94
$!
 
95
$ if f$search( "sslroot:[vms]openssl_systartup.com") .nes."" then -
 
96
   @ sslroot:[vms]openssl_systartup.com
 
97
$!
 
98
$! Restore the original default dev:[dir] (if known).
 
99
$!
 
100
$ clean_up:
 
101
$!
 
102
$ if (f$type( orig_dev_dir) .nes. "")
 
103
$ then
 
104
$    set default 'orig_dev_dir'
 
105
$ endif
 
106
$!
 
107
$ EXIT 'status'
 
108
$!