scalos/Release

   1 /* Release */
   2 /* Scalos release package creation script */
   3 /* $Date: 2008-05-19 20:20:58 +0200 (Mo, 19 Mai 2008) $ */
   4 /* $Revision: 2819 $ */
   5
   6 LHAName = 'RAM:ScalosBeta'
   7 tmpfname = "t:xyzzy"
   8
   9 address command
  10
  11 "version"
  12
  13 os = GetOsName()
  14
  15 /* system-specific language catalog names */
  16 select
  17 when os = "AmigaOS4" then do
  18         /* Amiga OS4 */
  19         LangGerman = "german";
  20         LangFrench = "french";
  21         BinDir = ".bin_os4/";
  22         end
  23 when os = "AmigaOS3" then do
  24         /* Amiga OS3 */
  25         LangGerman = "Deutsch";
  26         LangFrench = "français";
  27         BinDir = ".bin_os3/";
  28         end
  29 otherwise do
  30         /* MorphOS */
  31         LangGerman = "Deutsch";
  32         LangFrench = "français";
  33         BinDir = ".bin_mos/";
  34         end;
  35 end
  36
  37 say BinDir
  38
  39 say "Deleting old directory tree..."
  40 "delete RAM:ScalosBeta all QUIET"
  41 say "Deleting old archive..."
  42 "delete " || LHAName || ".lha quiet"
  43
  44 /* "makedir RAM:ScalosBeta" */
  45 address workbench "newdrawer RAM:ScalosBeta"
  46
  47 /* "copy ScalosBeta.info RAM: clone quiet" */
  48
  49 "makedir RAM:ScalosBeta/c"
  50 "mkdir -p RAM:ScalosBeta/Icondatatypes/Datatypes"
  51 "makedir RAM:ScalosBeta/libs"
  52 "makedir RAM:ScalosBeta/libs/OS4"
  53 "makedir RAM:ScalosBeta/Prefs"
  54 "mkdir -p RAM:ScalosBeta/Themes/default"
  55 "mkdir -p RAM:ScalosBeta/env-archive"
  56 "makedir RAM:ScalosBeta/Tools"
  57 "mkdir -p RAM:ScalosBeta/modules"
  58 "mkdir -p RAM:ScalosBeta/Plugins/FileTypes"
  59 "mkdir -p RAM:ScalosBeta/Plugins/Menu"
  60 "mkdir -p RAM:ScalosBeta/Plugins/OOP"
  61 "mkdir -p RAM:ScalosBeta/Plugins/Preview"
  62
  63 "mkdir -p RAM:ScalosBeta/catalogs/" || LangGerman || "/Scalos"
  64 "mkdir -p RAM:ScalosBeta/catalogs/" || LangFrench || "/Scalos"
  65
  66
  67 say "Copying Installer..."
  68
  69 "copy Installer/#? RAM:ScalosBeta/ all clone quiet"
  70
  71 say "Copying History and Readme.txt..."
  72
  73 "copy History RAM:ScalosBeta/ clone quiet"
  74 "copy ReadMe#? RAM:ScalosBeta/ clone quiet"
  75 "copy gpl#? RAM:ScalosBeta/ clone quiet"
  76 "copy lgpl#? RAM:ScalosBeta/ clone quiet"
  77
  78 say "Copying Scalos main executable..."
  79
  80 "copy main/" || BinDir || "Scalos RAM:ScalosBeta/ clone quiet"
  81 "copy main/Scalos.info RAM:ScalosBeta/ clone quiet"
  82
  83 say "Copying Preferences..."
  84
  85 'copy Prefs/Menu/' || BinDir || 'Scalos_Menu "RAM:ScalosBeta/Prefs/Scalos Menu" clone quiet'
  86 'copy Prefs/Menu/Scalos_Menu.info "RAM:ScalosBeta/Prefs/Scalos Menu.info" clone quiet'
  87
  88 'copy Prefs/Pattern/' || BinDir || 'Scalos_Pattern "RAM:ScalosBeta/Prefs/Scalos Pattern" clone quiet'
  89 'copy Prefs/Pattern/Scalos_Pattern.info "RAM:ScalosBeta/Prefs/Scalos Pattern.info" clone quiet'
  90
  91 'copy Prefs/Palette/' || BinDir || 'Scalos_Palette "RAM:ScalosBeta/Prefs/Scalos Palette" clone quiet'
  92 'copy Prefs/Palette/Scalos_Palette.info "RAM:ScalosBeta/Prefs/Scalos Palette.info" clone quiet'
  93
  94 'copy Prefs/FileTypes/' || BinDir || 'Scalos_FileTypes "RAM:ScalosBeta/Prefs/Scalos FileTypes" clone quiet'
  95 'copy Prefs/FileTypes/Scalos_FileTypes.info "RAM:ScalosBeta/Prefs/Scalos FileTypes.info" clone quiet'
  96
  97 'copy Prefs/MainPrefs/' || BinDir || 'Scalos_Prefs "RAM:ScalosBeta/Prefs/Scalos Prefs" clone quiet'
  98 'copy Prefs/MainPrefs/Scalos_Prefs.info "RAM:ScalosBeta/Prefs/Scalos Prefs.info" clone quiet'
  99
 100 'copy Plugins/Prefs/FileTypes/' || BinDir || '#?.prefsplugin "RAM:ScalosBeta/Prefs/" clone quiet'
 101 'copy Plugins/Prefs/Palette/' || BinDir || '#?.prefsplugin "RAM:ScalosBeta/Prefs/" clone quiet'
 102 'copy Plugins/Prefs/Pattern/' || BinDir || '#?.prefsplugin "RAM:ScalosBeta/Prefs/" clone quiet'
 103 'copy Plugins/Prefs/Menu/' || BinDir || '#?.prefsplugin "RAM:ScalosBeta/Prefs/" clone quiet'
 104 if os ~= "AmigaOS4" then do
 105         'copy Plugins/Prefs/Popupmenu/' || BinDir || '#?.prefsplugin "RAM:ScalosBeta/Prefs/" clone quiet'
 106 end
 107
 108
 109 say "Copying Modules..."
 110
 111 'copy Modules/IconProperties.MUI/' || BinDir || 'IconProperties.module     "RAM:ScalosBeta/modules/" clone quiet'
 112 'copy Modules/WindowProperties.MUI/' || BinDir || 'WindowProperties.module "RAM:ScalosBeta/modules/" clone quiet'
 113 'copy Modules/Delete.MUI/Source/' || BinDir || 'Delete.module "RAM:ScalosBeta/modules/" clone quiet'
 114 'copy Modules/Empty_Trashcan.MUI/' || BinDir || 'Empty_Trashcan.module "RAM:ScalosBeta/modules/" clone quiet'
 115 'copy Modules/Exchange.MUI/' || BinDir || 'Exchange.module "RAM:ScalosBeta/modules/" clone quiet'
 116 'copy Modules/Find.MUI/' || BinDir || 'Find.module "RAM:ScalosBeta/modules/" clone quiet'
 117 'copy Modules/FormatDisk.Gadtools/' || BinDir || 'Format_Disk.module "RAM:ScalosBeta/modules/" clone quiet'
 118 'copy Modules/Execute_Command.MUI/' || BinDir || 'Execute_Command.module "RAM:ScalosBeta/modules/" clone quiet'
 119 'copy Modules/Information.MUI/' || BinDir || 'Information.module "RAM:ScalosBeta/modules/" clone quiet'
 120 'copy Modules/NewDrawer.MUI/' || BinDir || 'NewDrawer.module "RAM:ScalosBeta/modules/" clone quiet'
 121 'copy Modules/Rename.MUI/' || BinDir || 'Rename.module "RAM:ScalosBeta/modules/" clone quiet'
 122 'copy Modules/Updater.MUI/' || BinDir || 'Updater.module "RAM:ScalosBeta/modules/" clone quiet'
 123
 124
 125 say "Copying Libraries..."
 126
 127 'copy libraries/iconobject/' || BinDir || 'iconobject.library "RAM:ScalosBeta/libs/" clone quiet'
 128 'copy libraries/preferences/' || BinDir || 'preferences.library "RAM:ScalosBeta/libs/" clone quiet'
 129 'copy libraries/sqlite/' || BinDir || 'sqlite3.library "RAM:ScalosBeta/libs/" clone quiet'
 130 'copy libraries/scalosgfx/' || BinDir || 'scalosgfx.library "RAM:ScalosBeta/libs/" clone quiet'
 131 if os ~= "AmigaOS4" then do
 132         'copy libraries/popupmenu/' || BinDir || 'popupmenu.library "RAM:ScalosBeta/libs/" clone quiet'
 133 end
 134 'copy libs/#?.library#? "RAM:ScalosBeta/libs/" clone quiet'
 135 'copy libs/OS4/#?.library "RAM:ScalosBeta/libs/OS4" clone quiet'
 136
 137 say "Copying Datatypes..."
 138
 139 'copy datatypes/AmigaIconObj3.5/' || BinDir || '#?.datatype "RAM:ScalosBeta/Icondatatypes/Datatypes/" clone quiet'
 140 'copy datatypes/AmigaIconObject/' || BinDir || '#?.datatype "RAM:ScalosBeta/Icondatatypes/Datatypes/" clone quiet'
 141 'copy datatypes/GlowIconObject/' || BinDir || '#?.datatype "RAM:ScalosBeta/Icondatatypes/Datatypes/" clone quiet'
 142 'copy datatypes/IconObject/' || BinDir || '#?.datatype "RAM:ScalosBeta/Icondatatypes/Datatypes/" clone quiet'
 143 'copy datatypes/PNGIcons/' || BinDir || '#?.datatype "RAM:ScalosBeta/Icondatatypes/Datatypes/" clone quiet'
 144 if os ~= "AmigaOS4" then do
 145         'copy datatypes/NewIcons/' || BinDir || '#?.datatype "RAM:ScalosBeta/Icondatatypes/Datatypes/" clone quiet'
 146 end
 147
 148 'copy main/envarc/#? "RAM:ScalosBeta/env-archive/" all clone quiet'
 149
 150 'copy Default_Theme/#? "RAM:ScalosBeta/Themes/default" all clone quiet'
 151
 152 'copy main/tools/' || BinDir || 'LoadWB.Scalos "RAM:ScalosBeta/c/LoadWB" clone quiet'
 153
 154 'copy main/tools/' || BinDir || 'ScalosCtrl "RAM:ScalosBeta/Tools/" clone quiet'
 155
 156 say "Copying Extras..."
 157
 158 'copy Extras/browse.script "RAM:ScalosBeta/Tools/" clone quiet'
 159 'copy Extras/opendrawer#? "RAM:ScalosBeta/Tools/" clone quiet'
 160 'copy Extras/PictIcon "RAM:ScalosBeta/Tools/" clone quiet'
 161 'copy Extras/open_volume.rexx "RAM:ScalosBeta/Tools/" clone quiet'
 162 'copy Extras/CreateTrash#? "RAM:ScalosBeta/Tools/" clone quiet'
 163 'copy Extras/CreateDefaultIcon#? "RAM:ScalosBeta/Tools/" clone quiet'
 164 'copy Extras/run.script "RAM:ScalosBeta/Tools/" clone quiet'
 165 'copy Extras/NewIconUtil "RAM:ScalosBeta/Tools/" clone quiet'
 166 'copy Extras/OpenLocation#? "RAM:ScalosBeta/Tools/" clone quiet'
 167 'copy Extras/OpenShell "RAM:ScalosBeta/Tools/" clone quiet'
 168 'copy Extras/Scalos_Comment#? "RAM:ScalosBeta/Tools/" all clone quiet'
 169 'copy Extras/Scalos_GetHidden#? "RAM:ScalosBeta/Tools/" all clone quiet'
 170
 171 say "Copying Plugins..."
 172
 173 'copy Plugins/FileTypes/DrawerContents/#?.plugin "RAM:ScalosBeta/Plugins/FileTypes/" clone quiet'
 174 'copy Plugins/FileTypes/Picture_Dimensions/#?.plugin "RAM:ScalosBeta/Plugins/FileTypes/" clone quiet'
 175 'copy Plugins/FileTypes/ExifPicture/#?.plugin "RAM:ScalosBeta/Plugins/FileTypes/" clone quiet'
 176
 177 'copy Plugins/OOP/DeviceFilter/#?.plugin "RAM:ScalosBeta/Plugins/OOP/" clone quiet'
 178 'copy Plugins/OOP/title_freepens/#?.plugin "RAM:ScalosBeta/Plugins/OOP/" clone quiet'
 179 'copy Plugins/OOP/TitleClock/#?.plugin "RAM:ScalosBeta/Plugins/OOP/" clone quiet'
 180 'copy Plugins/OOP/wb39_plugin/#?.plugin "RAM:ScalosBeta/Plugins/OOP/" clone quiet'
 181 'copy Plugins/OOP/wb39_plugin/wbrexx/#?.plugin "RAM:ScalosBeta/Plugins/OOP/" clone quiet'
 182 'copy Plugins/OOP/wb39_plugin/persist/#?.plugin "RAM:ScalosBeta/Plugins/OOP/" clone quiet'
 183 'copy Plugins/OOP/wb39_plugin/volumegauge/#?.plugin "RAM:ScalosBeta/Plugins/OOP/" clone quiet'
 184 'copy Plugins/OOP/XTWindows/#?.plugin "RAM:ScalosBeta/Plugins/OOP/" clone quiet'
 185
 186 'copy Plugins/Menu/Sorted_Cleanup/#?.plugin "RAM:ScalosBeta/Plugins/Menu/" clone quiet'
 187
 188 'copy Plugins/Preview/DefPicture/#?.pvplugin "RAM:ScalosBeta/Plugins/Preview/" clone quiet'
 189 'copy Plugins/Preview/JpegPicture/#?.pvplugin "RAM:ScalosBeta/Plugins/Preview/" clone quiet'
 190 'copy Plugins/Preview/PNGPicture/#?.pvplugin "RAM:ScalosBeta/Plugins/Preview/" clone quiet'
 191 'copy Plugins/Preview/Video/#?.pvplugin "RAM:ScalosBeta/Plugins/Preview/" clone quiet'
 192
 193 say "Copying Language catalogs..."
 194
 195 'copy main/catalogs/deutsch/Scalos/#?.catalog                                           "RAM:ScalosBeta/catalogs/' || LangGerman || '/Scalos/" clone quiet'
 196 'copy Plugins/FileTypes/DrawerContents/Catalogs/deutsch/Scalos/#?.catalog               "RAM:ScalosBeta/catalogs/' || LangGerman || '/Scalos/" clone quiet'
 197 'copy Plugins/FileTypes/Picture_Dimensions/Catalogs/deutsch/Scalos/#?.catalog           "RAM:ScalosBeta/catalogs/' || LangGerman || '/Scalos/" clone quiet'
 198 'copy Prefs/MainPrefs/Catalogs/deutsch/Scalos/#?.catalog                                "RAM:ScalosBeta/catalogs/' || LangGerman || '/Scalos/" clone quiet'
 199 'copy Prefs/FileTypes/Catalogs/deutsch/Scalos/#?.catalog                                "RAM:ScalosBeta/catalogs/' || LangGerman || '/Scalos/" clone quiet'
 200 'copy Prefs/Menu/Catalogs/deutsch/Scalos/#?.catalog                                     "RAM:ScalosBeta/catalogs/' || LangGerman || '/Scalos/" clone quiet'
 201 'copy Prefs/Palette/Catalogs/deutsch/Scalos/#?.catalog                                  "RAM:ScalosBeta/catalogs/' || LangGerman || '/Scalos/" clone quiet'
 202 'copy Prefs/Pattern/Catalogs/deutsch/Scalos/#?.catalog                                  "RAM:ScalosBeta/catalogs/' || LangGerman || '/Scalos/" clone quiet'
 203 'copy Plugins/FileTypes/ExifPicture/Catalogs/deutsch/Scalos/#?.catalog                  "RAM:ScalosBeta/catalogs/' || LangGerman || '/Scalos/" clone quiet'
 204 'copy Plugins/FileTypes/DrawerContents/Catalogs/deutsch/Scalos/#?.catalog               "RAM:ScalosBeta/catalogs/' || LangGerman || '/Scalos/" clone quiet'
 205 'copy Plugins/Prefs/Popupmenu/Catalogs/deutsch/Scalos/#?.catalog                        "RAM:ScalosBeta/catalogs/' || LangGerman || '/Scalos/" clone quiet'
 206 'copy Modules/Delete.MUI/Source/Catalogs/deutsch/Scalos/#?.catalog                      "RAM:ScalosBeta/catalogs/' || LangGerman || '/Scalos/"  clone quiet'
 207 'copy Modules/Execute_Command.MUI/Catalogs/deutsch/Scalos/#?.catalog                    "RAM:ScalosBeta/catalogs/' || LangGerman || '/Scalos/"  clone quiet'
 208 'copy Modules/IconProperties.MUI/Catalogs/deutsch/Scalos/#?.catalog                     "RAM:ScalosBeta/catalogs/' || LangGerman || '/Scalos/"  clone quiet'
 209 'copy Modules/Information.MUI/Catalogs/deutsch/Scalos/#?.catalog                        "RAM:ScalosBeta/catalogs/' || LangGerman || '/Scalos/"  clone quiet'
 210 'copy Modules/NewDrawer.MUI/Catalogs/deutsch/Scalos/#?.catalog                          "RAM:ScalosBeta/catalogs/' || LangGerman || '/Scalos/"  clone quiet'
 211 'copy Modules/Rename.MUI/Catalogs/deutsch/Scalos/#?.catalog                             "RAM:ScalosBeta/catalogs/' || LangGerman || '/Scalos/"  clone quiet'
 212 'copy Modules/Empty_Trashcan.MUI/Catalogs/deutsch/Scalos/#?.catalog                     "RAM:ScalosBeta/catalogs/' || LangGerman || '/Scalos/"  clone quiet'
 213 'copy Modules/Exchange.MUI/Catalogs/deutsch/Scalos/#?.catalog                           "RAM:ScalosBeta/catalogs/' || LangGerman || '/Scalos/"  clone quiet'
 214 'copy Modules/Find.MUI/Catalogs/deutsch/Scalos/#?.catalog                               "RAM:ScalosBeta/catalogs/' || LangGerman || '/Scalos/"  clone quiet'
 215 'copy Modules/WindowProperties.MUI/Catalogs/deutsch/Scalos/#?.catalog                   "RAM:ScalosBeta/catalogs/' || LangGerman || '/Scalos/"  clone quiet'
 216 'copy Modules/Updater.MUI/Catalogs/deutsch/Scalos/#?.catalog                            "RAM:ScalosBeta/catalogs/' || LangGerman || '/Scalos/"  clone quiet'
 217
 218 'copy main/catalogs/français/Scalos/#?.catalog                                          "RAM:ScalosBeta/catalogs/' || LangFrench || '/Scalos/" clone quiet'
 219 'copy Plugins/FileTypes/DrawerContents/Catalogs/français/Scalos/#?.catalog              "RAM:ScalosBeta/catalogs/' || LangFrench || '/Scalos/" clone quiet'
 220 'copy Plugins/FileTypes/Picture_Dimensions/Catalogs/français/Scalos/#?.catalog          "RAM:ScalosBeta/catalogs/' || LangFrench || '/Scalos/" clone quiet'
 221 'copy Prefs/MainPrefs/Catalogs/français/Scalos/#?.catalog                               "RAM:ScalosBeta/catalogs/' || LangFrench || '/Scalos/" clone quiet'
 222 'copy Prefs/FileTypes/Catalogs/français/Scalos/#?.catalog                               "RAM:ScalosBeta/catalogs/' || LangFrench || '/Scalos/" clone quiet'
 223 'copy Prefs/Menu/Catalogs/français/Scalos/#?.catalog                                    "RAM:ScalosBeta/catalogs/' || LangFrench || '/Scalos/" clone quiet'
 224 'copy Prefs/Palette/Catalogs/français/Scalos/#?.catalog                                 "RAM:ScalosBeta/catalogs/' || LangFrench || '/Scalos/" clone quiet'
 225 'copy Prefs/Pattern/Catalogs/français/Scalos/#?.catalog                                 "RAM:ScalosBeta/catalogs/' || LangFrench || '/Scalos/" clone quiet'
 226 'copy Plugins/FileTypes/ExifPicture/Catalogs/français/Scalos/#?.catalog                 "RAM:ScalosBeta/catalogs/' || LangFrench || '/Scalos/" clone quiet'
 227 'copy Plugins/FileTypes/DrawerContents/Catalogs/français/Scalos/#?.catalog              "RAM:ScalosBeta/catalogs/' || LangFrench || '/Scalos/" clone quiet'
 228 'copy Plugins/Prefs/Popupmenu/Catalogs/français/Scalos/#?.catalog                       "RAM:ScalosBeta/catalogs/' || LangFrench || '/Scalos/" clone quiet'
 229 'copy Modules/Delete.MUI/Source/Catalogs/français/Scalos/#?.catalog                     "RAM:ScalosBeta/catalogs/' || LangFrench || '/Scalos/" clone quiet'
 230 'copy Modules/Execute_Command.MUI/Catalogs/français/Scalos/#?.catalog                   "RAM:ScalosBeta/catalogs/' || LangFrench || '/Scalos/" clone quiet'
 231 'copy Modules/IconProperties.MUI/Catalogs/français/Scalos/#?.catalog                    "RAM:ScalosBeta/catalogs/' || LangFrench || '/Scalos/" clone quiet'
 232 'copy Modules/Information.MUI/Catalogs/français/Scalos/#?.catalog                       "RAM:ScalosBeta/catalogs/' || LangFrench || '/Scalos/" clone quiet'
 233 'copy Modules/NewDrawer.MUI/Catalogs/français/Scalos/#?.catalog                         "RAM:ScalosBeta/catalogs/' || LangFrench || '/Scalos/" clone quiet'
 234 'copy Modules/Rename.MUI/Catalogs/français/Scalos/#?.catalog                            "RAM:ScalosBeta/catalogs/' || LangFrench || '/Scalos/" clone quiet'
 235 'copy Modules/Empty_Trashcan.MUI/Catalogs/français/Scalos/#?.catalog                    "RAM:ScalosBeta/catalogs/' || LangFrench || '/Scalos/" clone quiet'
 236 'copy Modules/Exchange.MUI/Catalogs/français/Scalos/#?.catalog                          "RAM:ScalosBeta/catalogs/' || LangFrench || '/Scalos/" clone quiet'
 237 'copy Modules/Find.MUI/Catalogs/français/Scalos/#?.catalog                              "RAM:ScalosBeta/catalogs/' || LangFrench || '/Scalos/" clone quiet'
 238 'copy Modules/WindowProperties.MUI/Catalogs/français/Scalos/#?.catalog                  "RAM:ScalosBeta/catalogs/' || LangFrench || '/Scalos/" clone quiet'
 239 'copy Modules/Updater.MUI/Catalogs/français/Scalos/#?.catalog                           "RAM:ScalosBeta/catalogs/' || LangFrench || '/Scalos/" clone quiet'
 240
 241 say "Removing SVN directories..."
 242
 243 TempName = 't:xx123'
 244
 245 'list dir "RAM:ScalosBeta/" all pat ".svn" nohead lformat "delete *"%f%n*" all quiet" to ' || TempName
 246 'execute ' || TempName
 247 'delete ' || TempName || ' quiet'
 248
 249 'list dir "RAM:ScalosBeta/" all pat ".subversion" nohead lformat "delete *"%f%n*" all quiet" to ' || TempName
 250 'execute ' || TempName
 251 'delete ' || TempName || ' quiet'
 252
 253 'lha -r -e -x a ' || LHAName || ' RAM:ScalosBeta'
 254 'lha -r -e -x a ' || LHAName || ' RAM:ScalosBeta.info '
 255
 256 lha t LHAName
 257
 258 exit
 259
 260 /* -------------------------------------------------------------------------------- */
 261
 262 GetOsName: procedure
 263
 264 'version >' tmpfname
 265 rc = open( 'tmpfile', tmpfname, 'R' )
 266 versionstring = readln( 'tmpfile' )
 267 rc = close( 'tmpfile' )
 268 'delete ' || tmpfname || ' quiet'
 269 if index(versionstring, "MorphOS") > 0 then
 270         do
 271         os = "MorphOS"
 272         end
 273 else
 274         do
 275         versionstring = strip(subword(versionstring, 2, 1), 'B', ',')
 276         if versionstring > 50 then
 277                 os = "AmigaOS4"
 278         else
 279                 os = "AmigaOS3"
 280         end
 281
 282 return os
 283
 284 END
 285
 286 /* -------------------------------------------------------------------------------- */