annotate dwt/internal/Library.d @ 364:2bcb17ebe0be default tip

fix: thx torhu
author Frank Benoit <benoit@tionex.de>
date Sun, 08 Nov 2009 20:57:46 +0100
parents f1bb3949939b
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
211
00180515eb65 Update to SWT 3.3.2
Frank Benoit <benoit@tionex.de>
parents: 108
diff changeset
1 /*******************************************************************************
259
c0d810de7093 Update SWT 3.4M7 to 3.4
Frank Benoit <benoit@tionex.de>
parents: 240
diff changeset
2 * Copyright (c) 2000, 2008 IBM Corporation and others.
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
3 * All rights reserved. This program and the accompanying materials
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
4 * are made available under the terms of the Eclipse Public License v1.0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
5 * which accompanies this distribution, and is available at
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
6 * http://www.eclipse.org/legal/epl-v10.html
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
7 *
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
8 * Contributors:
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
9 * IBM Corporation - initial API and implementation
108
0f12f6bb9739 author notice
Frank Benoit <benoit@tionex.de>
parents: 104
diff changeset
10 * Port to the D programming language:
0f12f6bb9739 author notice
Frank Benoit <benoit@tionex.de>
parents: 104
diff changeset
11 * Frank Benoit <benoit@tionex.de>
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
12 *******************************************************************************/
10
63c023465156 moved from org.eclipse.swt to dwt
Frank Benoit <benoit@tionex.de>
parents: 9
diff changeset
13 module dwt.internal.Library;
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
14
238
380bad9f6852 reverted char[] to String
Frank Benoit <benoit@tionex.de>
parents: 211
diff changeset
15 import dwt.dwthelper.utils;
380bad9f6852 reverted char[] to String
Frank Benoit <benoit@tionex.de>
parents: 211
diff changeset
16
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
17 import tango.util.Convert;
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
18
104
62a654ba5276 optimation of static ctors
Frank Benoit <benoit@tionex.de>
parents: 71
diff changeset
19 // do it here, so it can be evaluated at compile time
62a654ba5276 optimation of static ctors
Frank Benoit <benoit@tionex.de>
parents: 71
diff changeset
20 // this saves a static ctor.
62a654ba5276 optimation of static ctors
Frank Benoit <benoit@tionex.de>
parents: 71
diff changeset
21 private int buildSWT_VERSION (int major, int minor) {
62a654ba5276 optimation of static ctors
Frank Benoit <benoit@tionex.de>
parents: 71
diff changeset
22 return major * 1000 + minor;
62a654ba5276 optimation of static ctors
Frank Benoit <benoit@tionex.de>
parents: 71
diff changeset
23 }
62a654ba5276 optimation of static ctors
Frank Benoit <benoit@tionex.de>
parents: 71
diff changeset
24
62a654ba5276 optimation of static ctors
Frank Benoit <benoit@tionex.de>
parents: 71
diff changeset
25
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
26 public class Library {
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
27
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 59
diff changeset
28 /* DWT Version - Mmmm (M=major, mmm=minor) */
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
29
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
30 /**
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 59
diff changeset
31 * DWT Major version number (must be >= 0)
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
32 */
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
33 static const int MAJOR_VERSION = 3;
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
34
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
35 /**
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 59
diff changeset
36 * DWT Minor version number (must be in the range 0..999)
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
37 */
351
f1bb3949939b Update to SWT 3.4.1
Frank Benoit <benoit@tionex.de>
parents: 259
diff changeset
38 static const int MINOR_VERSION = 449;
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
39
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
40 /**
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 59
diff changeset
41 * DWT revision number (must be >= 0)
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
42 */
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
43 static const int REVISION = 0;
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
44
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
45 /**
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 59
diff changeset
46 * The JAVA and DWT versions
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
47 */
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
48 //public static const int JAVA_VERSION;
104
62a654ba5276 optimation of static ctors
Frank Benoit <benoit@tionex.de>
parents: 71
diff changeset
49 public static const int SWT_VERSION = .buildSWT_VERSION(MAJOR_VERSION, MINOR_VERSION);
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
50
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
51 version( linux ){
238
380bad9f6852 reverted char[] to String
Frank Benoit <benoit@tionex.de>
parents: 211
diff changeset
52 static const String SEPARATOR = "\n";
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
53 }
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
54 else {
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
55 static assert( false, "only linux supported for this port" );
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
56 }
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
57
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
58
238
380bad9f6852 reverted char[] to String
Frank Benoit <benoit@tionex.de>
parents: 211
diff changeset
59 static int parseVersion(String aVersion) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
60 if (aVersion == null) return 0;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
61 int major = 0, minor = 0, micro = 0;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
62 int length = aVersion.length, index = 0, start = 0;
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
63 bool isDigit( char c ){
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
64 return c >= '0' && c <= '9';
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
65 }
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
66 while (index < length && isDigit(aVersion[index])) index++;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
67 try {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
68 if (start < length) major = to!(int)( aVersion[start .. index] );
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
69 } catch (ConversionException e) {}
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
70 start = ++index;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
71 while (index < length && isDigit(aVersion[index])) index++;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
72 try {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
73 if (start < length) minor = to!(int)(aVersion[start .. index]);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
74 } catch (ConversionException e) {}
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
75 start = ++index;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
76 while (index < length && isDigit(aVersion[index])) index++;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
77 try {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
78 if (start < length) micro = to!(int)(aVersion[start .. index]);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
79 } catch (ConversionException e) {}
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
80 return buildJAVA_VERSION(major, minor, micro);
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
81 }
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
82
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
83 /**
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
84 * Returns the Java version number as an integer.
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
85 *
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
86 * @param major
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
87 * @param minor
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
88 * @param micro
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
89 * @return the version
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
90 */
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
91 public static int buildJAVA_VERSION (int major, int minor, int micro) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
92 return (major << 16) + (minor << 8) + micro;
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
93 }
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
94
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
95 /**
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 59
diff changeset
96 * Returns the DWT version number as an integer.
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
97 *
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
98 * @param major
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
99 * @param minor
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
100 * @return the version
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
101 */
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
102 public static int buildSWT_VERSION (int major, int minor) {
104
62a654ba5276 optimation of static ctors
Frank Benoit <benoit@tionex.de>
parents: 71
diff changeset
103 return .buildSWT_VERSION(major, minor);
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
104 }
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
105 /+ PORTING_LEFT
238
380bad9f6852 reverted char[] to String
Frank Benoit <benoit@tionex.de>
parents: 211
diff changeset
106 static bool extract (String fileName, String mappedName) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
107 FileOutputStream os = null;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
108 InputStream is = null;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
109 File file = new File(fileName);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
110 try {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
111 if (!file.exists ()) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
112 is = Library.class.getResourceAsStream ("/" + mappedName); //$NON-NLS-1$
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
113 if (is != null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
114 int read;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
115 byte [] buffer = new byte [4096];
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
116 os = new FileOutputStream (fileName);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
117 while ((read = is.read (buffer)) != -1) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
118 os.write(buffer, 0, read);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
119 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
120 os.close ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
121 is.close ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
122 if (!Platform.PLATFORM.equals ("win32")) { //$NON-NLS-1$
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
123 try {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
124 Runtime.getRuntime ().exec (new String []{"chmod", "755", fileName}).waitFor(); //$NON-NLS-1$ //$NON-NLS-2$
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
125 } catch (Throwable e) {}
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
126 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
127 if (load (fileName)) return true;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
128 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
129 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
130 } catch (Throwable e) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
131 try {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
132 if (os != null) os.close ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
133 } catch (IOException e1) {}
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
134 try {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
135 if (is != null) is.close ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
136 } catch (IOException e1) {}
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
137 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
138 if (file.exists ()) file.delete ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
139 return false;
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
140 }
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
141
238
380bad9f6852 reverted char[] to String
Frank Benoit <benoit@tionex.de>
parents: 211
diff changeset
142 static bool load (String libName) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
143 try {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
144 if (libName.indexOf (SEPARATOR) != -1) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
145 System.load (libName);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
146 } else {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
147 System.loadLibrary (libName);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
148 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
149 return true;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
150 } catch (UnsatisfiedLinkError e) {}
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
151 return false;
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
152 }
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
153
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
154 /**
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
155 * Loads the shared library that matches the version of the
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 59
diff changeset
156 * Java code which is currently running. DWT shared libraries
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
157 * follow an encoding scheme where the major, minor and revision
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
158 * numbers are embedded in the library name and this along with
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
159 * <code>name</code> is used to load the library. If this fails,
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
160 * <code>name</code> is used in another attempt to load the library,
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 59
diff changeset
161 * this time ignoring the DWT version encoding scheme.
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
162 *
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
163 * @param name the name of the library to load
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
164 */
238
380bad9f6852 reverted char[] to String
Frank Benoit <benoit@tionex.de>
parents: 211
diff changeset
165 public static void loadLibrary (String name) {
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
166 loadLibrary (name, true);
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
167 }
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
168
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
169 /**
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
170 * Loads the shared library that matches the version of the
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 59
diff changeset
171 * Java code which is currently running. DWT shared libraries
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
172 * follow an encoding scheme where the major, minor and revision
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
173 * numbers are embedded in the library name and this along with
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
174 * <code>name</code> is used to load the library. If this fails,
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
175 * <code>name</code> is used in another attempt to load the library,
71
295b29fc7d13 Renamed SWT to DWT
Frank Benoit <benoit@tionex.de>
parents: 59
diff changeset
176 * this time ignoring the DWT version encoding scheme.
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
177 *
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
178 * @param name the name of the library to load
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
179 * @param mapName true if the name should be mapped, false otherwise
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
180 */
238
380bad9f6852 reverted char[] to String
Frank Benoit <benoit@tionex.de>
parents: 211
diff changeset
181 public static void loadLibrary (String name, boolean mapName) {
240
ce446666f5a2 Update to SWT 3.4M7
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
182 String prop = System.getProperty ("sun.arch.data.model"); //$NON-NLS-1$
ce446666f5a2 Update to SWT 3.4M7
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
183 if (prop is null) prop = System.getProperty ("com.ibm.vm.bitmode"); //$NON-NLS-1$
ce446666f5a2 Update to SWT 3.4M7
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
184 if (prop !is null) {
ce446666f5a2 Update to SWT 3.4M7
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
185 if ("32".equals (prop)) { //$NON-NLS-1$
ce446666f5a2 Update to SWT 3.4M7
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
186 if (0x1FFFFFFFFL is (int /*long*/)0x1FFFFFFFFL) {
ce446666f5a2 Update to SWT 3.4M7
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
187 throw new UnsatisfiedLinkError ("Cannot load 64-bit DWT libraries on 32-bit JVM"); //$NON-NLS-1$
ce446666f5a2 Update to SWT 3.4M7
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
188 }
ce446666f5a2 Update to SWT 3.4M7
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
189 }
ce446666f5a2 Update to SWT 3.4M7
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
190 if ("64".equals (prop)) { //$NON-NLS-1$
ce446666f5a2 Update to SWT 3.4M7
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
191 if (0x1FFFFFFFFL !is (int /*long*/)0x1FFFFFFFFL) {
ce446666f5a2 Update to SWT 3.4M7
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
192 throw new UnsatisfiedLinkError ("Cannot load 32-bit DWT libraries on 64-bit JVM"); //$NON-NLS-1$
ce446666f5a2 Update to SWT 3.4M7
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
193 }
ce446666f5a2 Update to SWT 3.4M7
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
194 }
ce446666f5a2 Update to SWT 3.4M7
Frank Benoit <benoit@tionex.de>
parents: 238
diff changeset
195 }
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
196
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
197 /* Compute the library name and mapped name */
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
198 String libName1, libName2, mappedName1, mappedName2;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
199 if (mapName) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
200 String version = System.getProperty ("swt.version"); //$NON-NLS-1$
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
201 if (version == null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
202 version = "" + MAJOR_VERSION; //$NON-NLS-1$
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
203 /* Force 3 digits in minor version number */
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
204 if (MINOR_VERSION < 10) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
205 version += "00"; //$NON-NLS-1$
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
206 } else {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
207 if (MINOR_VERSION < 100) version += "0"; //$NON-NLS-1$
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
208 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
209 version += MINOR_VERSION;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
210 /* No "r" until first revision */
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
211 if (REVISION > 0) version += "r" + REVISION; //$NON-NLS-1$
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
212 }
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
213 libName1 = name + "-" + Platform.PLATFORM + "-" + version; //$NON-NLS-1$ //$NON-NLS-2$
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
214 libName2 = name + "-" + Platform.PLATFORM; //$NON-NLS-1$
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
215 mappedName1 = System.mapLibraryName (libName1);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
216 mappedName2 = System.mapLibraryName (libName2);
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
217 } else {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
218 libName1 = libName2 = mappedName1 = mappedName2 = name;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
219 }
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
220
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
221 /* Try loading library from swt library path */
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
222 String path = System.getProperty ("swt.library.path"); //$NON-NLS-1$
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
223 if (path != null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
224 path = new File (path).getAbsolutePath ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
225 if (load (path + SEPARATOR + mappedName1)) return;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
226 if (mapName && load (path + SEPARATOR + mappedName2)) return;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
227 }
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
228
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
229 /* Try loading library from java library path */
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
230 if (load (libName1)) return;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
231 if (mapName && load (libName2)) return;
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
232
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
233 /* Try loading library from the tmp directory if swt library path is not specified */
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
234 if (path == null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
235 path = System.getProperty ("java.io.tmpdir"); //$NON-NLS-1$
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
236 path = new File (path).getAbsolutePath ();
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
237 if (load (path + SEPARATOR + mappedName1)) return;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
238 if (mapName && load (path + SEPARATOR + mappedName2)) return;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
239 }
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
240
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
241 /* Try extracting and loading library from jar */
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
242 if (path != null) {
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
243 if (extract (path + SEPARATOR + mappedName1, mappedName1)) return;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
244 if (mapName && extract (path + SEPARATOR + mappedName2, mappedName2)) return;
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
245 }
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
246
59
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
247 /* Failed to find the library */
8cec8f536af3 All D sources complete gvim retab (4 spaces), bug with Composite moveAbove/moveBelow fixed.
Frank Benoit <benoit@tionex.de>
parents: 54
diff changeset
248 throw new UnsatisfiedLinkError ("no " + libName1 + " or " + libName2 + " in swt.library.path, java.library.path or the jar file"); //$NON-NLS-1$ //$NON-NLS-2$ //$NON-NLS-3$
0
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
249 }
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
250 +/
c8ad75f8819e first import
Frank Benoit <benoit@tionex.de>
parents:
diff changeset
251 }