LibraryDefinition.st
changeset 9516 19c7b1811407
parent 9514 761b3f12d37c
child 9517 3b3f76394117
--- a/LibraryDefinition.st	Thu Aug 10 16:41:27 2006 +0200
+++ b/LibraryDefinition.st	Thu Aug 10 16:44:43 2006 +0200
@@ -1,10 +1,10 @@
 "{ Package: 'stx:libbasic3' }"
 
 Object subclass:#ProjectDefinition
-	instanceVariableNames:''
-	classVariableNames:''
-	poolDictionaries:''
-	category:'System-Support-Projects'
+        instanceVariableNames:''
+        classVariableNames:''
+        poolDictionaries:''
+        category:'System-Support-Projects'
 !
 
 
@@ -78,8 +78,7 @@
        ^ self package asString copy replaceAny:':/' by:$_
 
 "
-   DapasXProject libraryName
-   DapasX_Datenbasis libraryName
+   bosch_dapasx_datenbasis_Definition libraryName   
 "
 
     "Modified: / 09-08-2006 / 18:20:29 / fm"
@@ -149,12 +148,26 @@
     "Created: / 09-08-2006 / 15:45:54 / fm"
 !
 
+packageName
+
+^((self package asString copy replaceAny:':/' by:$_) subStrings: $_) last
+
+
+"
+   bosch_dapasx_hw_schnittstellen_Definition  packageName
+   bosch_dapasx_datenbasis_Definition packageName
+"
+
+    "Created: / 08-08-2006 / 20:24:53 / fm"
+    "Modified: / 09-08-2006 / 16:16:37 / fm"
+!
+
 parentProject
 
     ^(self package asString subStrings: $/) first
 
 "
-    DapasXProject parentProject
+    bosch_dapasx_hw_schnittstellen_Definition  parentProject
     DapasX_Datenbasis parentProject
 "
 
@@ -312,6 +325,20 @@
 "
 
     "Modified: / 09-08-2006 / 11:46:14 / fm"
+!
+
+generate_packageName_dot_rc
+
+    ^self replaceMappings: self packageName_dot_rc_mappings 
+            in: self packageName_dot_rc
+
+"
+  bosch_dapasx_datenbasis_Definition generate_packageName_dot_rc
+  bosch_dapasx_hw_schnittstellen_Definition  generate_packageName_dot_rc
+
+"
+
+    "Modified: / 09-08-2006 / 11:31:09 / fm"
 ! !
 
 !ProjectDefinition class methodsFor:'file templates'!
@@ -642,6 +669,46 @@
 ^'    %(CLASS).$(O) \'
 
     "Created: / 08-08-2006 / 20:16:46 / fm"
+!
+
+packageName_dot_rc
+
+^ 
+'VS_VERSION_INFO VERSIONINFO
+  FILEVERSION     0,1,1,1
+  PRODUCTVERSION  0,1,1,1
+  FILEFLAGSMASK   VS_FF_DEBUG | VS_FF_PRERELEASE
+  FILEFLAGS       VS_FF_PRERELEASE | VS_FF_SPECIALBUILD
+  FILEOS          VOS_NT_WINDOWS32
+  FILETYPE        VFT_DLL
+  FILESUBTYPE     VS_USER_DEFINED
+
+BEGIN
+  BLOCK "StringFileInfo"
+  BEGIN
+    BLOCK "040904E4"
+    BEGIN
+      VALUE "CompanyName", "%(COMPANY_NAME)\0"
+      VALUE "FileDescription", "%(FILE_DESCRIPTION)\0"
+      VALUE "FileVersion", "%(FILE_VERSION)\0"
+      VALUE "InternalName", "%(INTERNAL_NAME)\0"
+      VALUE "LegalCopyright", "%(LEGAL_COPYRIGHT)\0"
+      VALUE "ProductName", "%(PRODUCT_NAME)\0"
+      VALUE "ProductVersion", "%(PRODUCT_VERSION)\0"
+    END
+
+  END
+
+  BLOCK "VarFileInfo"
+  BEGIN                               //  Language   |    Translation
+    VALUE "Translation", 0x409, 0x4E4 // U.S. English, Windows Multilingual
+  END
+END
+'
+
+
+    "Created: / 08-08-2006 / 19:31:29 / fm"
+    "Modified: / 09-08-2006 / 15:10:57 / fm"
 ! !
 
 !ProjectDefinition class methodsFor:'mappings'!
@@ -750,6 +817,21 @@
     "Modified: / 09-08-2006 / 18:26:52 / fm"
 !
 
+packageName_dot_rc_mappings
+
+^Dictionary new
+    at: #'COMPANY_NAME' put: [self companyName];
+    at: #'FILE_DESCRIPTION' put: [self fileDescription];
+    at: #'FILE_VERSION' put: [self fileVersion];
+    at: #'INTERNAL_NAME' put: [self internalName];
+    at: #'LEGAL_COPYRIGHT' put: [self legalCopyright];
+    at: #'PRODUCT_NAME' put: [self productName];
+    at: #'PRODUCT_VERSION' put: [self productVersion];
+    yourself
+
+    "Created: / 09-08-2006 / 11:21:21 / fm"
+!
+
 replaceMappings: mappings in: fileTemplate
 "Replaces the defined variable mappings found in a file template with the corresponding information"
 
@@ -1038,6 +1120,36 @@
     "Created: / 08-08-2006 / 11:35:52 / fm"
 ! !
 
+!ProjectDefinition class methodsFor:'project information'!
+
+companyName
+    ^'eXept Software AG'
+!
+
+fileDescription
+    ^self productName,' ',  self packageName
+!
+
+fileVersion
+    ^self revision
+!
+
+internalName
+    ^self packageName
+!
+
+legalCopyright
+    ^'Copyright eXept Software AG 2006 (until payment)'
+!
+
+productName
+    ^'Product Name'
+!
+
+productVersion
+    ^'0.1.1.1'
+! !
+
 !ProjectDefinition class methodsFor:'public update description'!
 
 compileDescriptionMethods
@@ -1369,5 +1481,6 @@
 !ProjectDefinition class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/LibraryDefinition.st,v 1.9 2006-08-10 14:40:24 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/LibraryDefinition.st,v 1.10 2006-08-10 14:44:43 fm Exp $'
+
 ! !