cluster.wcChildren: toplevel
+!================================================================
! Program resources
+*font: fixed
+
+!================================================================
! Widget tree
-*toplevel.wcClass: xmBulletinBoardWidgetClass
-*toplevel.wcChildren: buttons, clusters, machines
+*toplevel.wcClass: formWidgetClass
+*toplevel.wcChildren: buttons, clusters, machines, query, \
+ help, error
+
+
+!================================================================
+! Menu Bar
-*buttons.wcConstructor: XmCreateMenuBar
-*buttons.wcClass: formWidgetClass
-*buttons.wcChildren: fileMenu, cluMenu, macMenu, helpMenu, \
- file, cluButton, macButton, help
+*buttons.wcClass: boxWidgetClass
+*buttons.wcChildren: file, clusterb, machineb, mappingb, helpm, \
+ fileMenu, cluMenu, macMenu, mapMenu, helpMenu
+*buttons.orientation: horizontal
+*clusterb.wcClass: menuButtonWidgetClass
+*clusterb.label: Cluster
+*clusterb.menuName: cluMenu
+*clusterb.borderWidth: 0
+*machineb.wcClass: menuButtonWidgetClass
+*machineb.label: Machine
+*machineb.menuName: macMenu
+*machineb.borderWidth: 0
+*mappingb.wcClass: menuButtonWidgetClass
+*mappingb.label: Mappings
+*mappingb.menuName: mapMenu
+*mappingb.borderWidth: 0
+*file.wcClass: menuButtonWidgetClass
+*file.label: File
+*file.menuName: fileMenu
+*file.borderWidth: 0
+*helpm.wcClass: menuButtonWidgetClass
+*helpm.label: Help
+*helpm.menuName: helpMenu
+*helpm.borderWidth: 0
-*file.wcConstructor: XmCreateCascadeButton
-*file.subMenuId: *fileMenu
-*file.mnemonic: F
-*fileMenu.wcConstructor: XmCreatePulldownMenu
+*fileMenu.wcClass: simpleMenuWidgetClass
*fileMenu.wcManaged: False
-*fileMenu.wcCallback: WcSetValueCB(*file.subMenuID: this)
-*fileMenu.wcChildren: quit
-
-*quit.wcConstructor: XmCreateCascadeButton
-*quit.labelString: Quit
-*quit.mnemonic: Q
-*quit.callback: WcExitCB(0)
-
-*clu.wcConstructor: XmCreateCascadeButton
-*clu.subMenuId: *cluMenu
-*clu.mnemonic: C
-*cluMenu.wcConstructor: XmCreatePulldownMenu
-*cluMenu.wcManaged: False
-*cluMenu.wcCallback: WcSetValueCB(*clu.subMenuID: this)
-*cluMenu.wcChildren: fetch
+*fileMenu.wcChildren: fileM1, fileM2, fileM3
+*fileM1.wcClass: smeBSBObjectClass
+*fileM1.label: Quit
+*fileM1.callback: WcExitCB(0)
+*fileM2.wcClass: smeBSBObjectClass
+*fileM2.label: Save Cluster List
+*fileM2.callback: saveCluster
+*fileM3.wcClass: smeBSBObjectClass
+*fileM3.label: Save Machine List
+*fileM3.callback: saveMachine
-*fetch.wcConstructor: XmCreateCascadeButton
-*fetch.labelString: Fetch
-*fetch.callback: getClusters
+*cluMenu.wcClass: simpleMenuWidgetClass
+*cluMenu.wcManaged: False
+*cluMenu.wcChildren: cluM1, cluM2, cluM7, cluM3, cluM4, \
+ cluM9, cluM8, cluM5, cluM6
+*cluM1.wcClass: smeBSBObjectClass
+*cluM1.label: Fetch by Name
+*cluM1.callback: getClusters
+*cluM2.wcClass: smeBSBObjectClass
+*cluM2.label: Fetch by Member Machine
+*cluM2.callback: getClusterMachine
+*cluM7.wcClass: smeBSBObjectClass
+*cluM7.label: Fetch by Fileserver Used
+*cluM7.callback: getClusterServer
+*cluM3.wcClass: smeBSBObjectClass
+*cluM3.label: Select by Name
+*cluM3.callback: selectClusters
+*cluM4.wcClass: smeBSBObjectClass
+*cluM4.label: Select by Member Machine
+*cluM4.callback: selectClusterMachine
+*cluM9.wcClass: smeBSBObjectClass
+*cluM9.label: Select by Cluster Data
+*cluM9.callback: selectClusterData
+*cluM8.wcClass: smeBSBObjectClass
+*cluM8.label: Select All
+*cluM8.callback: selectAllCluster
+*cluM5.wcClass: smeBSBObjectClass
+*cluM5.label: Deselect All
+*cluM5.callback: deselectClusters
+*cluM6.wcClass: smeBSBObjectClass
+*cluM6.label: Clear All
+*cluM6.callback: clearClusters
-*mac.wcConstructor: XmCreateCascadeButton
-*mac.subMenuId: *macMenu
-*mac.mnemonic: M
-*macMenu.wcConstructor: XmCreatePulldownMenu
+*macMenu.wcClass: simpleMenuWidgetClass
*macMenu.wcManaged: False
-*macMenu.wcCallback: WcSetValueCB(*mac.subMenuID: this)
-*macMenu.wcChildren: fetch
+*macMenu.wcChildren: macM1, macM2, macM3, macM4, macM5, \
+ macM10,macM11,macM8, macM6, macM9, \
+ macM7
+*macM1.wcClass: smeBSBObjectClass
+*macM1.label: Fetch by Name
+*macM1.callback: getMachines
+*macM2.wcClass: smeBSBObjectClass
+*macM2.label: Fetch by Cluster
+*macM2.callback: getMachineCluster
+*macM3.wcClass: smeBSBObjectClass
+*macM3.label: Select by Name
+*macM3.callback: selectMachines
+*macM4.wcClass: smeBSBObjectClass
+*macM4.label: Select by Cluster
+*macM4.callback: selectMachineCluster
+*macM5.wcClass: smeBSBObjectClass
+*macM5.label: Select by Type
+*macM5.callback: selectMachineType
+*macM10.wcClass: smeBSBObjectClass
+*macM10.label: Select by Subnet
+*macM10.callback: selectMachineSubnet
+*macM11.wcClass: smeBSBObjectClass
+*macM11.label: Update Machine Types
+*macM11.callback: getMachineTypes
+*macM8.wcClass: smeBSBObjectClass
+*macM8.label: Select All
+*macM8.callback: selectAllMachine
+*macM6.wcClass: smeBSBObjectClass
+*macM6.label: Deselect All
+*macM6.callback: deselectMachines
+*macM9.wcClass: smeBSBObjectClass
+*macM9.label: Check Machine
+!*macM9.callback: clearMachines
+*macM9.sensitive: False
+*macM7.wcClass: smeBSBObjectClass
+*macM7.label: Clear All
+*macM7.callback: clearMachines
+*mapMenu.wcClass: simpleMenuWidgetClass
+*mapMenu.wcManaged: False
+*mapMenu.wcChildren: mapM1, mapM2, mapM3
+*mapM1.wcClass: smeBSBObjectClass
+*mapM1.label: Remove Selected Machines from Selected Clusters
+*mapM1.callback: removeMachineCluster
+*mapM2.wcClass: smeBSBObjectClass
+*mapM2.label: Remove Selected Machines from All Clusters
+*mapM2.callback: removeMachineAllCluster
+*mapM3.wcClass: smeBSBObjectClass
+*mapM3.label: Add Selected Machines to Selected Clusters
+*mapM3.callback: addMachineCluster
-*help.wcConstructor: XmCreateCascadeButton
-*help.subMenuId: *helpMenu
-*help.mnemonic: H
-*helpMenu.wcConstructor: XmCreatePulldownMenu
+*helpMenu.wcClass: simpleMenuWidgetClass
*helpMenu.wcManaged: False
-*helpMenu.wcCallback: WcSetValueCB(*help.subMenuID: this)
-*helpMenu.wcChildren: fetch
+*helpMenu.wcChildren: helpM1, helpM2, helpM3
+*helpM1.wcClass: smeBSBObjectClass
+*helpM1.label: About Moira
+*helpM1.callback: HelpCB(moira)
+*helpM2.wcClass: smeBSBObjectClass
+*helpM2.label: About This Program
+*helpM2.callback: HelpCB(program)
+*helpM3.wcClass: smeBSBObjectClass
+*helpM3.label: Author
+*helpM3.callback: HelpCB(author)
+!================================================================
+! Cluster box
+
*clusters.wcClass: formWidgetClass
-*clusters.wcChildren: clutitle, cget, cclear, \
- clufltrl, clufilter, clusterlist
+*clusters.wcChildren: clutitle, cluhead, clusterport
*clusters.fromVert: *buttons
+*clusters.borderWidth: 0
+*clusters.top: ChainTop
+*clusters.bottom: ChainBottom
+!*clusters.right: ChainRight
+*clusters.left: ChainLeft
*clutitle.wcClass: labelWidgetClass
*clutitle.label: Clusters
*clutitle.borderWidth: 0
-*cget.wcClass: commandWidgetClass
-*cget.fromVert: *clutitle
-*cget.label: get
-*cget.callback: getClusters
-*cclear.wcClass: commandWidgetClass
-*cclear.fromVert: *clutitle
-*cclear.fromHoriz: *cget
-*cclear.label: clear
-!*cclear.callback:
-*clufltrl.wcClass: labelWidgetClass
-*clufltrl.label: filter:
-*clufltrl.fromVert: *cget
-*clufltrl.borderWidth: 0
-*clufilter.wcClass: asciiTextWidgetClass
-*clufilter.fromVert: *cget
-*clufilter.fromHoriz: *clufltrl
-*clufilter*length: 8
-*clufilter*string: *
-*clufilter*editType: edit
-*clufilter*useStringInPlace: True
-
-*clusterlist.wcClass: listWidgetClass
-*clusterlist.fromVert: *clufilter
+*clutitle.width: 300
+*clutitle.font: -*-fixed-bold-r-normal-*-*-140-*
+
+*cluhead.wcClass: labelWidgetClass
+*cluhead.label: Name Data
+*cluhead.borderWidth: 0
+*cluhead.width: 300
+*cluhead.fromVert: *clutitle
+*cluhead.justify: left
+*cluhead.horizDistance: 20
+
+*clusterport.wcClass: viewportWidgetClass
+*clusterport.wcChildren: clusterlist
+*clusterport.allowVert: True
+*clusterport.allowHoriz: True
+*clusterport.height: 300
+*clusterport.width: 300
+*clusterport.fromVert: *cluhead
+*clusterport.forceBars: True
+*clusterlist.wcClass: mlistWidgetClass
*clusterlist.Columns: 1
-*clusterlist.height: 300
-*clusterlist.width: 200
*clusterlist.numberStrings: 0
*clusterlist.verticalList: True
-!*clusterlist*scrollVertical: always
-!*clusterlist*displayCaret: False
-!*clusterlist*editType: edit
+
+
+!================================================================
+! Machine box
*machines.wcClass: formWidgetClass
-*machines.wcChildren: mactitle, macfltrl, macfilter, machinelist
+*machines.wcChildren: mactitle, machead, machineport
*machines.fromVert: *buttons
*machines.fromHoriz: *clusters
+*machines.borderWidth: 0
+*machines.top: ChainTop
+*machines.bottom: ChainBottom
+*machines.right: ChainRight
+!*machines.left: ChainLeft
*mactitle.wcClass: labelWidgetClass
*mactitle.label: Machines
+*mactitle.font: -*-fixed-bold-r-normal-*-*-140-*
*mactitle.borderWidth: 0
-*macfltrl.wcClass: labelWidgetClass
-*macfltrl.label: filter:
-*macfltrl.fromVert: *mactitle
-*macfltrl.borderWidth: 0
-*macfilter.wcClass: asciiTextWidgetClass
-*macfilter.fromVert: *mactitle
-*macfilter.fromHoriz: *macfltrl
-*macfilter*length: 8
-*macfilter*string: *
-*macfilter*editType: edit
-*macfilter*useStringInPlace: True
-
-*machinelist.wcClass: asciiTextWidgetClass
-*machinelist.fromVert: *macfilter
-*machinelist.height: 300
-*machinelist.width: 200
-*machinelist*scrollVertical: always
-*machinelist*displayCaret: False
+*mactitle.width: 350
+
+*machead.wcClass: labelWidgetClass
+*machead.label: Name Type Address
+*machead.justify: left
+*machead.borderWidth: 0
+*machead.width: 350
+*machead.fromVert: *mactitle
+*machead.horizDistance: 20
+
+*machineport.wcClass: viewportWidgetClass
+*machineport.wcChildren: machinelist
+*machineport.allowVert: True
+*machineport.allowHoriz: True
+*machineport.height: 300
+*machineport.width: 350
+*machineport.fromVert: *machead
+*machineport.forceBars: True
+*machinelist.wcClass: mlistWidgetClass
+*machinelist.Columns: 1
+*machinelist.verticalList: True
+
+!================================================================
+! User prompt
+
+*query.wcClass: boxWidgetClass
+*query.wcChildren: prompt, input
+*query.wcManaged: False
+*query.orientation: vertical
+*query.borderWidth: 3
+*query.fromVert: *buttons
+*prompt.wcClass: labelWidgetClass
+*prompt.borderWidth: 0
+*input*string: *
+*input.wcClass: asciiTextWidgetClass
+*input*length: 128
+*input*editType: edit
+*input*useStringInPlace: True
+*input*translations: #override <Key>Return: inputDone()
+
+!================================================================
+! Help window
+
+*help.wcConstructor: XtCreateTransientShell
+*help.wcChildren: helpbox
+*help.geometry: +300+280
+*helpbox.wcClass: formWidgetClass
+*helpbox.wcChildren: msg, dismiss
+*msg.wcClass: asciiTextWidgetClass
+*msg.width: 500
+*msg.height: 200
+*msg*editType: edit
+*msg*string: This is a test
+*msg*useStringInPlace: True
+*dismiss.wcClass: commandWidgetClass
+*dismiss.label: Remove Help Window
+*dismiss.callback: WcPopdownCB(*help)
+*dismiss.fromVert: *msg
+
+!================================================================
+! Error popup
+
+*error.wcConstructor: XtCreateTransientShell
+*error.wcChildren: errorbox
+*error.geometry: +300+280
+*errorbox.wcClass: formWidgetClass
+*errorbox.wcChildren: errmsg, edismiss
+*errmsg.wcClass: asciiTextWidgetClass
+*errmsg.width: 300
+*errmsg.height: 50
+*errmsg*editType: edit
+*errmsg*string: This is a test
+*errmsg*useStringInPlace: True
+*edismiss.wcClass: commandWidgetClass
+*edismiss.label: Remove This Window
+*edismiss.callback: WcPopdownCB(*error)
+*edismiss.fromVert: *errmsg