"

 COPYRIGHT (c) 1998 by eXept Software AG

              All Rights Reserved

 This software is furnished under a license and may be used

 only in accordance with the terms of that license and with the

 inclusion of the above copyright notice. This software may not

 be provided or otherwise made available to, or used by, any

 other person. No title to or ownership of the software is

 hereby transferred.

"

"{ Package: 'stx:libtool' }"

"{ NameSpace: Smalltalk }"

ToolApplicationModel subclass:#ApplicationBuilder

	instanceVariableNames:'task shellView aspects'

	classVariableNames:''

	poolDictionaries:''

	category:'Interface-Tools'

!

ApplicationBuilder class instanceVariableNames:'aspects'

"

 The following class instance variables are inherited by this class:

	ToolApplicationModel - history fileHistory clipboard settings showingHelp instances

	ApplicationModel - ClassResources defaultKeyboardMap defaultStyleSheet

	Model - 

	Object - 

"

!

!ApplicationBuilder class methodsFor:'documentation'!

copyright

"

 COPYRIGHT (c) 1998 by eXept Software AG

              All Rights Reserved

 This software is furnished under a license and may be used

 only in accordance with the terms of that license and with the

 inclusion of the above copyright notice. This software may not

 be provided or otherwise made available to, or used by, any

 other person. No title to or ownership of the software is

 hereby transferred.

"

!

documentation

"

    WARNING: unfinished - do not use.

    The Application Builder of ST/X allows you to build ST/X-applications by following steps:

        0. Clobber the target directory of the application

        1. Generate the h-file with symbols

        2. Generate the c-file with modules

        3. Compile the modules init file

        4. Compile the startup C-file

        5. Define the symbolic links to the libraries

        6. Link the libraries to the application

        7. Define the symbolic links to the resources

    [instance variables:]

        task           <Process>               task of the running build

        shellView      <ShellView>             shell view for outputting the build results

    [instance class variables:]

        aspects        <IdentityDictionary>    aspects of the settings

    [start with:]

        ApplicationBuilder open

    [see also:]

        LibraryBuilder

    [author:]

        Thomas Zwick, eXept Software AG

"

! !

!ApplicationBuilder class methodsFor:'accessing'!

aspects

    aspects isNil ifTrue: [aspects := IdentityDictionary new].

    ^aspects

!

aspects: anIdentityDictionary

    aspects := anIdentityDictionary

!

label

   ^'Application Builder (experimental)'

! !

!ApplicationBuilder class methodsFor:'help specs'!

helpSpec

    "This resource specification was automatically generated

     by the UIHelpTool of ST/X."

    "Do not manually edit this!! If it is corrupted,

     the UIHelpTool may not be able to read the specification."

    "

     UIHelpTool openOnClass:ApplicationBuilder    

    "

    <resource: #help>

    ^super helpSpec addPairsFrom:#(

#applicationLinkDefines

'Opens a dialog to define the link defines for the application.'

#applicationName

'Name of the application.'

#build

'Starts the process of building the target.'

#buildDate

'Build date of the application.'

#configuration

'Configuration information of the application.'

#libraryDirectory

'Directory of the ST/X libraries.'

#link

'Starts the process of linking the application.'

#selectPath

'Opens a dialog for choosing the name of the file/path.'

#sourceDirectory

'Source directory of ST/X.'

#start

'Start the build application.'

#startupCFile

'Startup C-file of ST/X for the application.'

#startupFile

'Startup C-file of ST/X for the application.'

#startupMessage

'Startup message consisting of the class name and the selector name.'

#startupModule

'Startup module of ST/X for the application.'

#stop

'Stops the process of the building.'

#stxLibraries

'List of the ST/X library names.'

#symlinkBitmaps

'Create symbolic links to the bitmaps of ST/X.'

#symlinkRCFiles

'Create symbolic links to the RC-files of ST/X.'

#symlinkResources

'Create symbolic links to the resources of ST/X.'

#symlinkSources

'Create symbolic links to the sources of ST/X.'

#systemLibaries

'Libraries of the operating system needed by the target.'

#targetDirectory

'Directory where the target will build.'

#topDirectory

'Top directory of ST/X.'

#userLibraries

'Libraries of the user wanted to add to the application.'

)

! !

!ApplicationBuilder class methodsFor:'interface specs'!

windowSpec

    "This resource specification was automatically generated

     by the UIPainter of ST/X."

    "Do not manually edit this!! If it is corrupted,

     the UIPainter may not be able to read the specification."

    "

     UIPainter new openOnClass:ApplicationBuilder andSelector:#windowSpec

     ApplicationBuilder new openInterface:#windowSpec

     ApplicationBuilder open

    "

    <resource: #canvas>

    ^

       #(#FullSpec

          #window: 

           #(#WindowSpec

              #name: 'Application Builder'

              #layout: #(#LayoutFrame 79 0 285 0 578 0 744 0)

              #label: 'Application Builder'

              #min: #(#Point 420 220)

              #max: #(#Point 1152 900)

              #bounds: #(#Rectangle 79 285 579 745)

              #menu: #menu

              #usePreferredExtent: false

          )

          #component: 

           #(#SpecCollection

              #collection: 

               #(

                 #(#ViewSpec

                    #name: 'Box1'

                    #layout: #(#LayoutFrame 0 0.0 3 0 0 1.0 292 0)

                    #component: 

                     #(#SpecCollection

                        #collection: 

                         #(

                           #(#ViewSpec

                              #name: 'Box2'

                              #layout: #(#LayoutFrame 0 0.0 0 0.0 -148 1.0 2 1.0)

                              #component: 

                               #(#SpecCollection

                                  #collection: 

                                   #(

                                     #(#LabelSpec

                                        #name: 'applicationNameLabel'

                                        #layout: #(#AlignmentOrigin 147 0 15 0 1 0.5)

                                        #label: 'Application Name:'

                                        #adjust: #right

                                    )

                                     #(#InputFieldSpec

                                        #name: 'applicationNameField'

                                        #layout: #(#LayoutFrame 150 0 4 0 0 1 26 0)

                                        #activeHelpKey: #applicationName

                                        #model: #applicationName

                                    )

                                     #(#LabelSpec

                                        #name: 'startupMessageLabel'

                                        #layout: #(#AlignmentOrigin 147 0 39 0 1 0.5)

                                        #label: 'Startup Message:'

                                        #adjust: #right

                                    )

                                     #(#InputFieldSpec

                                        #name: 'startupMessageField'

                                        #layout: #(#LayoutFrame 150 0 28 0 0 1.0 50 0)

                                        #activeHelpKey: #startupMessage

                                        #model: #startupMessage

                                    )

                                     #(#LabelSpec

                                        #name: 'buildDateLabel'

                                        #layout: #(#AlignmentOrigin 147 0 63 0 1 0.5)

                                        #label: 'Build Date:'

                                        #adjust: #right

                                    )

                                     #(#InputFieldSpec

                                        #name: 'buildDateField'

                                        #layout: #(#LayoutFrame 150 0 52 0 0 1.0 74 0)

                                        #activeHelpKey: #buildDate

                                        #model: #buildDate

                                    )

                                     #(#LabelSpec

                                        #name: 'configurationLabel'

                                        #layout: #(#AlignmentOrigin 147 0 87 0 1 0.5)

                                        #label: 'Configuration:'

                                        #adjust: #right

                                    )

                                     #(#InputFieldSpec

                                        #name: 'configurationField'

                                        #layout: #(#LayoutFrame 150 0 76 0 0 1.0 98 0)

                                        #activeHelpKey: #configuration

                                        #model: #configuration

                                    )

                                     #(#DividerSpec

                                        #name: 'Separator2'

                                        #layout: #(#LayoutFrame 0 0 102 0 0 1 105 0)

                                    )

                                     #(#ActionButtonSpec

                                        #name: 'targetDirectoryButton'

                                        #layout: #(#LayoutFrame 4 0 109 0 147 0 133 0)

                                        #activeHelpKey: #selectPath

                                        #label: 'Target Directory:'

                                        #model: #doSelectDirectory:

                                        #actionValue: 'Target'

                                    )

                                     #(#InputFieldSpec

                                        #name: 'targetDirectoryField'

                                        #layout: #(#LayoutFrame 150 0 109 0 0 1.0 131 0)

                                        #activeHelpKey: #targetDirectory

                                        #model: #targetDirectory

                                    )

                                     #(#ActionButtonSpec

                                        #name: 'topDirectoryButton'

                                        #layout: #(#LayoutFrame 4 0 133 0 147 0 157 0)

                                        #activeHelpKey: #selectPath

                                        #label: 'Top Directory:'

                                        #model: #doSelectDirectory:

                                        #actionValue: 'Top'

                                    )

                                     #(#InputFieldSpec

                                        #name: 'topDirectoryField'

                                        #layout: #(#LayoutFrame 150 0 133 0 0 1.0 155 0)

                                        #activeHelpKey: #topDirectory

                                        #model: #topDirectory

                                    )

                                     #(#ActionButtonSpec

                                        #name: 'libraryDirectoryButton'

                                        #layout: #(#LayoutFrame 4 0 157 0 147 0 181 0)

                                        #activeHelpKey: #selectPath

                                        #label: 'Library Directory:'

                                        #model: #doSelectDirectory:

                                        #actionValue: 'Library'

                                    )

                                     #(#InputFieldSpec

                                        #name: 'libraryDirectoryField'

                                        #layout: #(#LayoutFrame 150 0 157 0 0 1.0 179 0)

                                        #activeHelpKey: #libraryDirectory

                                        #model: #libraryDirectory

                                    )

                                     #(#ActionButtonSpec

                                        #name: 'startupCFileButton'

                                        #layout: #(#LayoutFrame 4 0 181 0 147 0 205 0)

                                        #activeHelpKey: #selectPath

                                        #label: 'Startup C-File:'

                                        #model: #doSelectCFile:

                                        #actionValue: 'StartupCFile'

                                    )

                                     #(#InputFieldSpec

                                        #name: 'startupCFileField'

                                        #layout: #(#LayoutFrame 150 0 181 0 0 1.0 203 0)

                                        #activeHelpKey: #startupModule

                                        #model: #startupCFile

                                    )

                                     #(#DividerSpec

                                        #name: 'Separator3'

                                        #layout: #(#LayoutFrame 0 0.0 208 0 0 1.0 211 0)

                                    )

                                     #(#LabelSpec

                                        #name: 'stxLibraryButton'

                                        #layout: #(#AlignmentOrigin 147 0 227 0 1 0.5)

                                        #label: 'ST/X Libraries:'

                                    )

                                     #(#ComboBoxSpec

                                        #name: 'stxLibrariesComboBox'

                                        #layout: #(#LayoutFrame 150 0 216 0 0 1 238 0)

                                        #activeHelpKey: #stxLibraries

                                        #model: #stxLibrary

                                        #immediateAccept: false

                                        #acceptOnTab: false

                                        #comboList: #stxLibraries

                                    )

                                     #(#ActionButtonSpec

                                        #name: 'systemLibrariesButton'

                                        #layout: #(#LayoutFrame 4 0 239 0 147 0 263 0)

                                        #activeHelpKey: #selectPath

                                        #label: 'System Libraries:'

                                        #model: #doSelectLibrary:

                                        #actionValue: 'SystemLibrary'

                                    )

                                     #(#ComboBoxSpec

                                        #name: 'systemLibrariesComboBox'

                                        #layout: #(#LayoutFrame 150 0 240 0 0 1 262 0)

                                        #activeHelpKey: #systemLibaries

                                        #model: #systemLibrary

                                        #immediateAccept: false

                                        #acceptOnTab: false

                                        #comboList: #systemLibraries

                                    )

                                     #(#ActionButtonSpec

                                        #name: 'userLibrariesButton'

                                        #layout: #(#LayoutFrame 4 0 263 0 147 0 287 0)

                                        #activeHelpKey: #selectPath

                                        #label: 'User Libraries:'

                                        #model: #doSelectLibrary:

                                        #actionValue: 'UserLibrary'

                                    )

                                     #(#ComboBoxSpec

                                        #name: 'userLibrariesComboBox'

                                        #layout: #(#LayoutFrame 150 0 264 0 0 1 286 0)

                                        #activeHelpKey: #userLibraries

                                        #model: #userLibrary

                                        #immediateAccept: false

                                        #acceptOnTab: false

                                        #comboList: #userLibraries

                                    )

                                  )

                              )

                          )

                           #(#DividerSpec

                              #name: 'Separator4'

                              #layout: #(#LayoutFrame -144 1 0 0.0 -138 1 0 1.0)

                              #orientation: #vertical

                          )

                           #(#ViewSpec

                              #name: 'Box3'

                              #layout: #(#LayoutFrame -134 1 0 0.0 0 1.0 0 1.0)

                              #component: 

                               #(#SpecCollection

                                  #collection: 

                                   #(

                                     #(#FramedBoxSpec

                                        #name: 'FramedBox'

                                        #layout: #(#LayoutFrame -4 0.0 4 0.0 0 1.0 -150 1.0)

                                        #component: 

                                         #(#SpecCollection

                                            #collection: 

                                             #(

                                               #(#CheckBoxSpec

                                                  #name: 'linkRCFilesCheckBox'

                                                  #layout: #(#LayoutFrame 12 0 24 0 12 1 46 0)

                                                  #activeHelpKey: #symlinkRCFiles

                                                  #model: #linkRCFiles

                                                  #label: 'RC-Files'

                                              )

                                               #(#CheckBoxSpec

                                                  #name: 'linkResourcesCheckBox'

                                                  #layout: #(#LayoutFrame 12 0 48 0 12 1 70 0)

                                                  #activeHelpKey: #symlinkResources

                                                  #model: #linkResources

                                                  #label: 'Resources'

                                              )

                                               #(#CheckBoxSpec

                                                  #name: 'linkSourcesCheckBox'

                                                  #layout: #(#LayoutFrame 12 0 72 0 12 1 94 0)

                                                  #activeHelpKey: #symlinkSources

                                                  #model: #linkSources

                                                  #label: 'Sources'

                                              )

                                               #(#CheckBoxSpec

                                                  #name: 'linkBitmapsCheckBox'

                                                  #layout: #(#LayoutFrame 12 0 96 0 12 1 118 0)

                                                  #activeHelpKey: #symlinkBitmaps

                                                  #model: #linkBitmaps

                                                  #label: 'Bitmaps'

                                              )

                                            )

                                        )

                                        #label: 'Symbolic Links'

                                        #labelPosition: #topLeft

                                    )

                                     #(#VerticalPanelViewSpec

                                        #name: 'VerticalPanel'

                                        #layout: #(#LayoutFrame 0 0.0 -144 1 -6 1.0 -2 1.0)

                                        #component: 

                                         #(#SpecCollection

                                            #collection: 

                                             #(

                                               #(#ActionButtonSpec

                                                  #name: 'buildButton'

                                                  #activeHelpKey: #build

                                                  #label: 'Build'

                                                  #model: #doBuild

                                                  #extent: #(#Point 128 33)

                                              )

                                               #(#ActionButtonSpec

                                                  #name: 'linkButton'

                                                  #activeHelpKey: #link

                                                  #label: 'Link'

                                                  #model: #doLink

                                                  #extent: #(#Point 128 34)

                                              )

                                               #(#ActionButtonSpec

                                                  #name: 'stopButton'

                                                  #activeHelpKey: #stop

                                                  #label: 'Stop'

                                                  #model: #doStop

                                                  #extent: #(#Point 128 33)

                                              )

                                               #(#ActionButtonSpec

                                                  #name: 'Button1'

                                                  #activeHelpKey: #start

                                                  #label: 'Start'

                                                  #model: #doStart

                                                  #extent: #(#Point 128 33)

                                              )

                                            )

                                        )

                                        #horizontalLayout: #fit

                                        #verticalLayout: #fit

                                        #horizontalSpace: 3

                                        #verticalSpace: 3

                                    )

                                  )

                              )

                          )

                        )

                    )

                    #borderWidth: 1

                )

                 #(#SubCanvasSpec

                    #name: 'shellViewSubCanvas'

                    #layout: #(#LayoutFrame 0 0.0 294 0 0 1.0 -26 1)

                    #hasHorizontalScrollBar: false

                    #hasVerticalScrollBar: false