function Frame = edit(h)
%EDIT  Open GUI for editing SISO Tool Preferences

%   Author(s): A. DiVergilio
%   Copyright 1986-2004 The MathWorks, Inc. 
%   $Revision: 1.12.4.1 $  $Date: 2004/12/10 19:25:42 $

%---Get handle to editor frame for preference object
Frame = h.EditorFrame;

%---Abort if Java MWT is unsupported
if ~usejava('MWT'), 
    return; 
end

%---Watch on
TargetFig = h.Target.Figure;
OldPTR  = get(TargetFig,'Pointer');
OldPSCD = get(TargetFig,'PointerShapeCData');
OldPSHS = get(TargetFig,'PointerShapeHotSpot');
set(TargetFig,'Pointer','watch');

%---Create a new editor if one is not found
if isempty(Frame)
    %---Get Toolbox Preferences
    Prefs = cstprefs.tbxprefs;
    %---Frame
    Frame = com.mathworks.mwt.MWFrame(sprintf('SISO Tool Preferences'));
    Frame.setLayout(com.mathworks.mwt.MWBorderLayout(0,0));
    Frame.setFont(Prefs.JavaFontP);
    set(Frame,'WindowClosingCallback',{@localCancel,Frame});
    %---Disable if sisotool is in cshelp mode
    if strcmpi(get(TargetFig,'CSHelpMode'),'on')
        set(Frame,'Enabled','off')
    end
    %---Show empty Frame with some status text while loading
    Frame.setSize(java.awt.Dimension(360,280));
    centerfig(Frame,TargetFig);
    s.Status = com.mathworks.mwt.MWLabel(sprintf('Loading SISO Tool Preferences...'),com.mathworks.mwt.MWLabel.CENTER);
    Frame.add(s.Status,com.mathworks.mwt.MWBorderLayout.CENTER);
    awtinvoke(Frame,'setVisible(Z)',true);
    Frame.toFront;
    xypos1 = Frame.getLocation;
    
    %---Store handle to frame in preference object (this must occur before copy!)
    h.EditorFrame = Frame;
    
    %---Listen for Target destruction
    s.TargetDestroyedListener = handle.listener(h.Target,'ObjectBeingDestroyed',{@localDispose,Frame});
    
    %---Handle to current preferences
    s.OldPrefs = h;
    %---Copy of current preferences for editing
    s.NewPrefs = copy(s.OldPrefs);
    %---Temporarily clear property values (we'll set them back after listeners are installed)
    AllProps = fieldnames(s.NewPrefs);
    for n=1:size(AllProps,1)
        set(s.NewPrefs,AllProps{n,:},'');
    end
    
    %---ButtonPanel
    s.ButtonPanel = com.mathworks.mwt.MWPanel(java.awt.FlowLayout(java.awt.FlowLayout.RIGHT,7,0));
    s.ButtonPanel.setInsets(java.awt.Insets(2,5,5,-2));
    %---OK
    s.OK = com.mathworks.mwt.MWButton(sprintf('OK')); s.ButtonPanel.add(s.OK);
    s.OK.setFont(Prefs.JavaFontP);
    set(s.OK,'ActionPerformedCallback',{@localOK,Frame});
    %---Cancel
    s.Cancel = com.mathworks.mwt.MWButton(sprintf('Cancel')); s.ButtonPanel.add(s.Cancel);
    s.Cancel.setFont(Prefs.JavaFontP);
    set(s.Cancel,'ActionPerformedCallback',{@localCancel,Frame});
    %---Help
    s.Help = com.mathworks.mwt.MWButton(sprintf('Help')); s.ButtonPanel.add(s.Help);
    s.Help.setFont(Prefs.JavaFontP);
    set(s.Help,'ActionPerformedCallback','ctrlguihelp(''sisotool_preferences'');');
    %---Apply
    s.Apply = com.mathworks.mwt.MWButton(sprintf('Apply')); s.ButtonPanel.add(s.Apply);
    s.Apply.setFont(Prefs.JavaFontP);
    set(s.Apply,'ActionPerformedCallback',{@localApply,Frame});
    
    %---TabPanel
    s.TabPanel = com.mathworks.mwt.MWTabPanel;
    s.TabPanel.setInsets(java.awt.Insets(5,5,5,5));
    s.TabPanel.setMargins(java.awt.Insets(12,8,8,8));
    s.TabPanel.setFont(Prefs.JavaFontP);
    %---Units
    s.Units = unit_gui(s.NewPrefs); 
    s.UnitsTab = localMakeTab(s.Units);
    s.TabPanel.addPanel(sprintf('Units'),s.UnitsTab);
    %---Style
    s.Grid  = grid_gui(s.NewPrefs);
    s.Font  = font_gui(s.NewPrefs);
    s.Color = clr_gui(s.NewPrefs);
    s.StyleTab = localMakeTab(s.Grid,s.Font,s.Color);
    s.TabPanel.addPanel(sprintf('Style'),s.StyleTab);
    %---Options
    s.CompensatorFormat = cfmt_gui(s.NewPrefs);
    s.Bode = bode_gui(s.NewPrefs);
    s.SisoToolTab = localMakeTab(s.CompensatorFormat,s.Bode);
    s.TabPanel.addPanel(sprintf('Options'),s.SisoToolTab);
    %---Colors
    s.LineColors = ls_gui(s.NewPrefs);
    s.ColorsTab = localMakeTab(s.LineColors);
    s.TabPanel.addPanel(sprintf('Line Colors'),s.ColorsTab);
    %---Start on the first tab panel
    s.TabPanel.selectPanel(0);
    
    %---Store structure in Frame UserData
    set(Frame,'UserData',s);
    
    %---Set property values (listeners will update GUI)
    for n=1:size(AllProps,1)
        set(s.NewPrefs,AllProps{n,:},s.OldPrefs.get(AllProps{n,:}));
    end
    
    %---Remove the status text, add the real components and pack
    Frame.remove(s.Status);
    Frame.add(s.TabPanel,com.mathworks.mwt.MWBorderLayout.CENTER);
    Frame.add(s.ButtonPanel,com.mathworks.mwt.MWBorderLayout.SOUTH);
    Frame.pack;
    xypos2 = Frame.getLocation;
    if abs(xypos1.x-xypos2.x)<5 & abs(xypos1.y-xypos2.y)<5
        centerfig(Frame,TargetFig);
    end
    
else
    %---Structure of handles/data
    s = get(Frame,'UserData');
    %---Copy current Preferences to our editable copy
    %--- (our listeners will update the GUI automatically)
    set(s.NewPrefs,get(s.OldPrefs));
    %---Raise Frame (no java methods here... findobj returns hg handles!)
    set(Frame,'Minimized','off','Visible','off','Visible','on');
    
end

%---Watch off
set(TargetFig,'Pointer',OldPTR,'PointerShapeCData',OldPSCD,'PointerShapeHotSpot',OldPSHS);


%%%%%%%%%%%%%%%%
% localMakeTab %
%%%%%%%%%%%%%%%%
function Tab = localMakeTab(varargin)
% Combine panels into a single panel for use in a tab dialog
Tab = com.mathworks.mwt.MWPanel(com.mathworks.mwt.MWBorderLayout(0,0));
for n=1:nargin
    if n<nargin
        %---Not last element, leave 5-pixel spacing
        tmp = com.mathworks.mwt.MWPanel(com.mathworks.mwt.MWBorderLayout(0,5));
    else
        %---Last element, leave 0-pixel spacing
        tmp = com.mathworks.mwt.MWPanel(com.mathworks.mwt.MWBorderLayout(0,0));
    end
    %---Pack towards top
    tmp.add(varargin{n},com.mathworks.mwt.MWBorderLayout.NORTH);
    %---Add java handle to structure
    s(n,1) = tmp;
    %---Add first panel to Tab
    if n==1
        Tab.add(tmp,com.mathworks.mwt.MWBorderLayout.CENTER);
        %---Nest other panels
    else
        tmp2 = s(n-1,1);
        tmp2.add(tmp,com.mathworks.mwt.MWBorderLayout.CENTER);
    end
end
%---Store java handles
set(Tab,'UserData',s);


%%%%%%%%%%%
% localOK %
%%%%%%%%%%%
function localOK(eventSrc,eventData,Frame)
s = get(Frame,'UserData');
set(s.OldPrefs,get(s.NewPrefs));
awtinvoke(Frame,'setVisible(Z)',false);


%%%%%%%%%%%%%%%
% localCancel %
%%%%%%%%%%%%%%%
function localCancel(eventSrc,eventData,Frame)
s = get(Frame,'UserData');
set(s.NewPrefs,get(s.OldPrefs));
awtinvoke(Frame,'setVisible(Z)',false);


%%%%%%%%%%%%%%
% localApply %
%%%%%%%%%%%%%%
function localApply(eventSrc,eventData,Frame)
s = get(Frame,'UserData');
set(s.OldPrefs,get(s.NewPrefs));


%%%%%%%%%%%%%%%%
% localDispose %
%%%%%%%%%%%%%%%%
function localDispose(eventSrc,eventData,Frame)
awtinvoke(Frame,'dispose');