wxDialogWrapper(parent, wxID_ANY, _("Macros Palette"),

wxDefaultPosition, wxDefaultSize,

wxDEFAULT_DIALOG_STYLE | wxRESIZE_BORDER)

, mCatalog( GetActiveProject() )

{

//AudacityProject * p = GetActiveProject();

mAbort = false;

mbExpanded = false;

if( bInherited )

return;

SetLabel(_("Macros Palette")); // Provide visual label

SetName(_("Macros Palette")); // Provide audible label

Populate();

{

//------------------------- Main section --------------------

ShuttleGui S(this, eIsCreating);

PopulateOrExchange(S);

// ----------------------- End of main section --------------

// Get and validate the currently active macro

mActiveMacro = gPrefs->Read(wxT("/Batch/ActiveMacro"), wxT(""));

// Go populate the macros list.

PopulateMacros();

Layout();

Fit();

wxSize sz = GetSize();

SetSizeHints( sz );

// Size and place window

SetSize(std::min(wxSystemSettings::GetMetric(wxSYS_SCREEN_X) * 3 / 4, sz.GetWidth()),

std::min(wxSystemSettings::GetMetric(wxSYS_SCREEN_Y) * 4 / 5, 400));

Center();

// Set the column size for the macros list.

sz = mMacros->GetClientSize();

mMacros->SetColumnWidth(0, sz.x);

{

/*i18n-hint: A macro is a sequence of commands that can be applied

* to one or more audio files.*/

S.StartStatic(_("Select Macro"), 1);

{

S.SetStyle(wxSUNKEN_BORDER | wxLC_REPORT | wxLC_HRULES | wxLC_VRULES |

wxLC_SINGLE_SEL);

mMacros = S.Id(MacrosListID).Prop(1).AddListControlReportMode();

mMacros->InsertColumn(0, _("Macro"), wxLIST_FORMAT_LEFT);

}

S.EndStatic();

S.StartHorizontalLay(wxEXPAND, 0);

{

S.AddPrompt( _("Apply Macro to:") );

wxButton* btn = S.Id(ApplyToProjectID).AddButton(_("&Project"));

#if wxUSE_ACCESSIBILITY

// so that name can be set on a standard control

btn->SetAccessible(safenew WindowAccessible(btn));

#endif

btn->SetName(_("Apply macro to project"));

btn = S.Id(ApplyToFilesID).AddButton(_("&Files..."));

#if wxUSE_ACCESSIBILITY

// so that name can be set on a standard control

btn->SetAccessible(safenew WindowAccessible(btn));

#endif

btn->SetName(_("Apply macro to files..."));

}

S.EndHorizontalLay();

S.StartHorizontalLay(wxEXPAND, 0);

{

/* i18n-hint: The Expand button makes the dialog bigger, with more in it */

mResize = S.Id(ExpandID).AddButton(_("&Expand"));

S.Prop(1).AddSpace( 10 );

S.AddStandardButtons( eCancelButton | eHelpButton);

}

S.EndHorizontalLay();

{

auto names = mMacroCommands.GetNames();

int i;

int topItem = mMacros->GetTopItem();

mMacros->DeleteAllItems();

for (i = 0; i < (int)names.size(); i++) {

mMacros->InsertItem(i, names[i]);

}

int item = mMacros->FindItem(-1, mActiveMacro);

bool bFound = item >=0;

if (item == -1) {

item = 0;

mActiveMacro = mMacros->GetItemText(0);

}

// Select the name in the list...this will fire an event.

mMacros->SetItemState(item, wxLIST_STATE_SELECTED | wxLIST_STATE_FOCUSED,

wxLIST_STATE_SELECTED | wxLIST_STATE_FOCUSED);

if( 0 <= topItem && topItem < (int)mMacros->GetItemCount())

{

// Workaround for scrolling being windows only.

// Try to scroll back to where we once were...

mMacros->EnsureVisible( (int)mMacros->GetItemCount() -1 );

mMacros->EnsureVisible( topItem );

// And then make sure whatever is selected is still visible...

if( bFound )

mMacros->EnsureVisible( item );

}

{

wxString page = GetHelpPageName();

HelpSystem::ShowHelp(this, page, true);

{

long item = mMacros->GetNextItem(-1,

wxLIST_NEXT_ALL,

wxLIST_STATE_SELECTED);

if (item == -1) {

AudacityMessageBox(_("No macro selected"));

return;

}

ApplyMacroToProject( item );

{

wxString Temp = MacroName;

Temp.Replace(" ","");

Temp = wxString( "Macro_" ) + Temp;

return Temp;

{

for( int i=0;i<mMacros->GetItemCount();i++){

wxString name = mMacros->GetItemText(i);

if( MacroIdOfName( name ) == MacroID ){

ApplyMacroToProject( i, bHasGui );

return;

}

}

{

wxString name = mMacros->GetItemText(iMacro);

if( name.empty() )

return;

#ifdef OPTIONAL_ACTIVITY_WINDOW

wxDialogWrapper activityWin( this, wxID_ANY, GetTitle());

activityWin.SetName(activityWin.GetTitle());

ShuttleGui S(&activityWin, eIsCreating);

S.StartHorizontalLay(wxCENTER, false);

{

S.StartStatic( {}, false); // deliberately not translated (!)

{

S.SetBorder(20);

S.AddFixedText(wxString::Format(_("Applying '%s' to current project"),

name));

}

S.EndStatic();

}

S.EndHorizontalLay();

activityWin.Layout();

activityWin.Fit();

activityWin.CenterOnScreen();

// Avoid overlap with progress.

int x,y;

activityWin.GetPosition( &x, &y );

activityWin.Move(wxMax(0,x-300), 0);

activityWin.Show();

// Without this the newly created dialog may not show completely.

wxYield();

#endif

//Since we intend to keep this dialog open, there is no reason to hide it

//and then show it again.

//if( bHasGui )

// Hide();

gPrefs->Write(wxT("/Batch/ActiveMacro"), name);

gPrefs->Flush();

mMacroCommands.ReadMacro(name);

// The disabler must get deleted before the EndModal() call. Otherwise,

// the menus on OSX will remain disabled.

bool success;

{

#ifdef OPTIONAL_ACTIVITY_WINDOW

wxWindowDisabler wd(&activityWin);

#endif

success = GuardedCall< bool >(

[this]{ return mMacroCommands.ApplyMacro(mCatalog); } );

}

if( !bHasGui )

return;

Show();

Raise();

{

long item = mMacros->GetNextItem(-1,

wxLIST_NEXT_ALL,

wxLIST_STATE_SELECTED);

if (item == -1) {

AudacityMessageBox(_("No macro selected"));

return;

}

wxString name = mMacros->GetItemText(item);

gPrefs->Write(wxT("/Batch/ActiveMacro"), name);

gPrefs->Flush();

AudacityProject *project = GetActiveProject();

if (!TrackList::Get( *project ).empty()) {

AudacityMessageBox(_("Please save and close the current project first."));

return;

}

wxString prompt = _("Select file(s) for batch processing...");

FormatList l;

wxString filter;

wxString all;

Importer::Get().GetSupportedImportFormats(&l);

for (const auto &format : l) {

const Format *f = &format;

wxString newfilter = f->formatName + wxT("|");

for (size_t i = 0; i < f->formatExtensions.size(); i++) {

if (!newfilter.Contains(wxT("*.") + f->formatExtensions[i] + wxT(";")))

newfilter += wxT("*.") + f->formatExtensions[i] + wxT(";");

if (!all.Contains(wxT("*.") + f->formatExtensions[i] + wxT(";")))

all += wxT("*.") + f->formatExtensions[i] + wxT(";");

}

newfilter.RemoveLast(1);

filter += newfilter;

filter += wxT("|");

}

all.RemoveLast(1);

filter.RemoveLast(1);

wxString mask = _("All files|*|All supported files|") +

all + wxT("|") +

filter;

wxString type = gPrefs->Read(wxT("/DefaultOpenType"),mask.BeforeFirst(wxT('|')));

// Convert the type to the filter index

int index = mask.First(type + wxT("|"));

if (index == wxNOT_FOUND) {

index = 0;

}

else {

index = mask.Left(index).Freq(wxT('|')) / 2;

if (index < 0) {

index = 0;

}

}

auto path = FileNames::FindDefaultPath(FileNames::Operation::Open);

FileDialogWrapper dlog(this,

prompt,

path,

wxT(""),

mask,

wxFD_OPEN | wxFD_MULTIPLE | wxRESIZE_BORDER);

dlog.SetFilterIndex(index);

if (dlog.ShowModal() != wxID_OK) {

Raise();

return;

}

Raise();

wxArrayString files;

dlog.GetPaths(files);

files.Sort();

wxDialogWrapper activityWin(this, wxID_ANY, GetTitle());

activityWin.SetName(activityWin.GetTitle());

ShuttleGui S(&activityWin, eIsCreating);

wxListCtrl * fileList = NULL;

S.StartVerticalLay(false);

{

S.StartStatic(_("Applying..."), 1);

{

auto imageList = std::make_unique<wxImageList>(9, 16);

imageList->Add(wxIcon(empty9x16_xpm));

imageList->Add(wxIcon(arrow_xpm));

S.SetStyle(wxSUNKEN_BORDER | wxLC_REPORT | wxLC_HRULES | wxLC_VRULES |

wxLC_SINGLE_SEL);

fileList = S.Id(CommandsListID).AddListControlReportMode();

// AssignImageList takes ownership

fileList->AssignImageList(imageList.release(), wxIMAGE_LIST_SMALL);

fileList->InsertColumn(0, _("File"), wxLIST_FORMAT_LEFT);

}

S.EndStatic();

S.StartHorizontalLay(wxCENTER, false);

{

S.Id(wxID_CANCEL).AddButton(_("&Cancel"));

}

S.EndHorizontalLay();

}

S.EndVerticalLay();

int i;

for (i = 0; i < (int)files.size(); i++ ) {

fileList->InsertItem(i, files[i], i == 0);

}

// Set the column size for the files list.

fileList->SetColumnWidth(0, wxLIST_AUTOSIZE);

int width = fileList->GetColumnWidth(0);

wxSize sz = fileList->GetClientSize();

if (width > sz.GetWidth() && width < 500) {

sz.SetWidth(width);

fileList->SetInitialSize(sz);

}

activityWin.Layout();

activityWin.Fit();

activityWin.CenterOnScreen();

// Avoid overlap with progress.

int x,y;

activityWin.GetPosition( &x, &y );

activityWin.Move(wxMax(0,x-300), 0);

activityWin.Show();

// Without this the newly created dialog may not show completely.

wxYield();

// We could avoid hiding, but there are many dialogs on screen,

// and hiding this one temporarily has some advantages.

Hide();

mMacroCommands.ReadMacro(name);

for (i = 0; i < (int)files.size(); i++) {

wxWindowDisabler wd(&activityWin);

if (i > 0) {

//Clear the arrow in previous item.

fileList->SetItemImage(i - 1, 0, 0);

}

fileList->SetItemImage(i, 1, 1);

fileList->EnsureVisible(i);

auto success = GuardedCall< bool >( [&] {

ProjectFileManager::Get( *project ).Import(files[i]);

ProjectWindow::Get( *project ).ZoomAfterImport(nullptr);

SelectUtilities::DoSelectAll(*project);

if (!mMacroCommands.ApplyMacro(mCatalog))

return false;

if (!activityWin.IsShown() || mAbort)

return false;

return true;

} );

if (!success)

break;

ProjectManager::Get( *project ).ResetProjectToEmpty();

}

Show();

Raise();

ApplyMacroDialog(parent, true)

{

mbExpanded = bExpanded;

wxString Title = mbExpanded ? _("Manage Macros") : _("Macros Palette");

SetLabel( Title ); // Provide visual label

SetName( Title ); // Provide audible label

SetTitle( Title );

mChanged = false;

mSelectedCommand = 0;

if( mbExpanded )

Populate();

else

ApplyMacroDialog::Populate();

{

//------------------------- Main section --------------------

ShuttleGui S(this, eIsCreating);

PopulateOrExchange(S);

// ----------------------- End of main section --------------

// Get and validate the currently active macro

mActiveMacro = gPrefs->Read(wxT("/Batch/ActiveMacro"), wxT(""));

// Go populate the macros list.

PopulateMacros();

// We have a bare list. We need to add columns and content.

PopulateList();

// Layout and set minimum size of window

Layout();

Fit();

SetSizeHints(GetSize());

// Size and place window

SetSize(std::min(wxSystemSettings::GetMetric(wxSYS_SCREEN_X) * 3 / 4, 800),

std::min(wxSystemSettings::GetMetric(wxSYS_SCREEN_Y) * 4 / 5, 400));

Center();

// Set the column size for the macros list.

wxSize sz = mMacros->GetClientSize();

mMacros->SetColumnWidth(0, sz.x);

// Size columns properly

FitColumns();

{

S.StartHorizontalLay(wxEXPAND, 1);

{

S.StartStatic(_("Select Macro"),0);

{

S.StartHorizontalLay(wxEXPAND,1);

{

S.SetStyle(wxSUNKEN_BORDER | wxLC_REPORT | wxLC_HRULES | wxLC_SINGLE_SEL |

wxLC_EDIT_LABELS);

mMacros = S.Id(MacrosListID).Prop(1).AddListControlReportMode();

// i18n-hint: This is the heading for a column in the edit macros dialog

mMacros->InsertColumn(0, _("Macro"), wxLIST_FORMAT_LEFT);

S.StartVerticalLay(wxALIGN_TOP, 0);

{

S.Id(AddButtonID).AddButton(_("&New"));

mRemove = S.Id(RemoveButtonID).AddButton(_("Remo&ve"));

mRename = S.Id(RenameButtonID).AddButton(_("&Rename..."));

// Not yet ready for prime time.

#if 0

S.Id(ImportButtonID).AddButton(_("I&mport..."))->Enable( false);

S.Id(ExportButtonID).AddButton(_("E&xport..."))->Enable( false);

#endif

}

S.EndVerticalLay();

}

S.EndHorizontalLay();

}

S.EndStatic();

S.StartStatic(_("Edit Steps"), true);

{

S.StartHorizontalLay(wxEXPAND,1);

{

S.SetStyle(wxSUNKEN_BORDER | wxLC_REPORT | wxLC_HRULES | wxLC_VRULES |

wxLC_SINGLE_SEL);

mList = S.Id(CommandsListID).AddListControlReportMode();

//A dummy first column, which is then deleted, is a workaround - under Windows the first column

//can't be right aligned.

mList->InsertColumn(0, wxT(""), wxLIST_FORMAT_LEFT);

/* i18n-hint: This is the number of the command in the list */

mList->InsertColumn(ItemNumberColumn + 1, _("Num"), wxLIST_FORMAT_RIGHT);

mList->InsertColumn(ActionColumn + 1, _("Command "), wxLIST_FORMAT_RIGHT);

mList->InsertColumn(ParamsColumn + 1, _("Parameters"), wxLIST_FORMAT_LEFT);

mList->DeleteColumn(0);

S.StartVerticalLay(wxALIGN_TOP, 0);

{

S.Id(InsertButtonID).AddButton(_("&Insert"), wxALIGN_LEFT);

S.Id(EditButtonID).AddButton(_("&Edit..."), wxALIGN_LEFT);

S.Id(DeleteButtonID).AddButton(_("De&lete"), wxALIGN_LEFT);

S.Id(UpButtonID).AddButton(_("Move &Up"), wxALIGN_LEFT);

S.Id(DownButtonID).AddButton(_("Move &Down"), wxALIGN_LEFT);

mDefaults = S.Id(DefaultsButtonID).AddButton(_("De&faults"));

}

S.EndVerticalLay();

}

S.EndHorizontalLay();

}

S.EndStatic();

}

S.EndHorizontalLay();

S.StartHorizontalLay(wxEXPAND, 0);

{

/* i18n-hint: The Shrink button makes the dialog smaller, with less in it */

mResize = S.Id(ShrinkID).AddButton(_("Shrin&k"));

// Using variable text just to get the positioning options.

S.Prop(0).AddVariableText( _("Apply Macro to:"), false, wxALL | wxALIGN_CENTRE_VERTICAL );

wxButton* btn = S.Id(ApplyToProjectID).AddButton(_("&Project"));

#if wxUSE_ACCESSIBILITY

// so that name can be set on a standard control

btn->SetAccessible(safenew WindowAccessible(btn));

#endif

btn->SetName(_("Apply macro to project"));

btn = S.Id(ApplyToFilesID).AddButton(_("&Files..."));

#if wxUSE_ACCESSIBILITY

// so that name can be set on a standard control

btn->SetAccessible(safenew WindowAccessible(btn));

#endif

btn->SetName(_("Apply macro to files..."));

S.Prop(1).AddSpace( 10 );

S.AddStandardButtons( eOkButton | eCancelButton | eHelpButton);

}

S.EndHorizontalLay();

return;

{

int topItem = mList->GetTopItem();

mList->DeleteAllItems();

for (int i = 0; i < mMacroCommands.GetCount(); i++) {

AddItem(mMacroCommands.GetCommand(i),

mMacroCommands.GetParams(i));

}

/*i18n-hint: This is the last item in a list.*/

AddItem(_("- END -"), wxT(""));

// Select the name in the list...this will fire an event.

if (mSelectedCommand >= (int)mList->GetItemCount()) {

mSelectedCommand = 0;

}

mList->SetItemState(mSelectedCommand,

wxLIST_STATE_SELECTED | wxLIST_STATE_FOCUSED,

wxLIST_STATE_SELECTED | wxLIST_STATE_FOCUSED);

if( 0 <= topItem && topItem < (int)mList->GetItemCount())

{

// Workaround for scrolling being windows only.

// Try to scroll back to where we once were...

mList->EnsureVisible( (int)mList->GetItemCount() -1 );

mList->EnsureVisible( topItem );

// And then make sure whatever is selected is still visible...

if (mSelectedCommand >= 0) {

mList->EnsureVisible( mSelectedCommand );

}

}

{

auto entry = mCatalog.ByCommandId(Action);

auto friendlyName = entry != mCatalog.end()

? entry->name.Translated()

:

// uh oh, using GET to expose an internal name to the user!

// in default of any better friendly name

Action.GET();

int i = mList->GetItemCount();

mList->InsertItem(i, wxString::Format(wxT(" %02i"), i + 1));

mList->SetItem(i, ActionColumn, friendlyName );

mList->SetItem(i, ParamsColumn, Params );

{

// OK even on mac, as dialog is modal.

auto p = GetActiveProject();

MenuManager::Get(*p).RebuildMenuBar(*p);

{

if( bExpanded == mbExpanded )

return;

if( !SaveChanges() )

return;

mbExpanded = bExpanded;

DestroyChildren();

SetSizer( nullptr );

mChanged = false;

mSelectedCommand = 0;

SetMinSize( wxSize( 200,200 ));

// Get and set position for optical stability.

// Expanded and shrunk dialogs 'stay where they were'.

// That's OK , and what we want, even if we exapnd off-screen.

// We won't shrink to being off-screen, since the shrink button

// was clicked, so must have been on screen.

wxPoint p = GetPosition( );

if( mbExpanded )

Populate();

else

ApplyMacroDialog::Populate();

SetPosition( p );

mResize->SetFocus();

wxString Title = mbExpanded ? _("Manage Macros") : _("Macros Palette");

SetLabel( Title ); // Provide visual label

SetName( Title ); // Provide audible label

SetTitle( Title );

{

if (mChanged) {

wxString title;

wxString msg;

int id;

title.Printf(_("%s changed"), mActiveMacro);

msg = _("Do you want to save the changes?");

id = AudacityMessageBox(msg, title, wxYES_NO | wxCANCEL);

if (id == wxCANCEL) {

return false;

}

if (id == wxYES) {

if (!mMacroCommands.WriteMacro(mActiveMacro)) {

return false;

}

}

mChanged = false;

}

return true;

{

if (!ChangeOK()) {

event.Veto();

return;

}

int item = event.GetIndex();

mActiveMacro = mMacros->GetItemText(item);

mMacroCommands.ReadMacro(mActiveMacro);

if( !mbExpanded )

return;

if (mMacroCommands.IsFixed(mActiveMacro)) {

mRemove->Disable();

mRename->Disable();

mDefaults->Enable();

}

else {

mRemove->Enable();

mRename->Enable();

mDefaults->Disable();

}

PopulateList();

{

// Refrsh the layout and re-fit the columns.

Layout();

if( !mbExpanded )

return;

FitColumns();

{

#if defined(__WXMAC__)

// wxMac uses a hard coded width of 150 when wxLIST_AUTOSIZE_USEHEADER

// is specified, so we calculate the width ourselves. This method may

// work equally well on other platforms.

for (size_t c = 0; c < mList->GetColumnCount(); c++) {

wxListItem info;

int width;

mList->SetColumnWidth(c, wxLIST_AUTOSIZE);

info.Clear();

info.SetId(c);

info.SetMask(wxLIST_MASK_TEXT | wxLIST_MASK_WIDTH);

mList->GetColumn(c, info);

mList->GetTextExtent(info.GetText(), &width, NULL);

width += 2 * 4; // 2 * kItemPadding - see listctrl_mac.cpp

width += 16; // kIconWidth - see listctrl_mac.cpp

mList->SetColumnWidth(c, wxMax(width, mList->GetColumnWidth(c)));

}

// Looks strange, but it forces the horizontal scrollbar to get

// drawn. If not done, strange column sizing can occur if the

// user attempts to resize the columns.

mList->SetClientSize(mList->GetClientSize());

#else

mList->SetColumnWidth(0, wxLIST_AUTOSIZE_USEHEADER);

mList->SetColumnWidth(1, wxLIST_AUTOSIZE_USEHEADER);

mList->SetColumnWidth(2, wxLIST_AUTOSIZE);

#endif

int bestfit = mList->GetColumnWidth(2);

int clientsize = mList->GetClientSize().GetWidth();

int col0 = mList->GetColumnWidth(0);

int col1 = mList->GetColumnWidth(1);

bestfit = (bestfit > clientsize-col0-col1)? bestfit : clientsize-col0-col1;

mList->SetColumnWidth(2, bestfit);

{

int itemNo = event.GetIndex();

wxString macro = mMacros->GetItemText(itemNo);

if (mMacroCommands.IsFixed(mActiveMacro)) {

wxBell();

event.Veto();

}

{

if (event.IsEditCancelled()) {

return;

}

wxString newname = event.GetLabel();

mMacroCommands.RenameMacro(mActiveMacro, newname);

mActiveMacro = newname;

PopulateMacros();

{

while (true) {

AudacityTextEntryDialog d(this,

_("Enter name of new macro"),

_("Name of new macro"));

d.SetName(d.GetTitle());

wxString name;

if (d.ShowModal() == wxID_CANCEL) {

Raise();

return;

}

Raise();

name = d.GetValue().Strip(wxString::both);

if (name.length() == 0) {

AudacityMessageBox(_("Name must not be blank"),

GetTitle(),

wxOK | wxICON_ERROR,

this);

continue;

}

if (name.Contains(wxFILE_SEP_PATH) ||

name.Contains(wxFILE_SEP_PATH_UNIX)) {

/*i18n-hint: The %c will be replaced with 'forbidden characters', like '/' and '\'.*/

AudacityMessageBox(wxString::Format(_("Names may not contain '%c' and '%c'"),

wxFILE_SEP_PATH, wxFILE_SEP_PATH_UNIX),

GetTitle(),

wxOK | wxICON_ERROR,

this);

continue;

}

mMacroCommands.AddMacro(name);

mActiveMacro = name;

PopulateMacros();

UpdateMenus();

break;

}

{

long item = mMacros->GetNextItem(-1,

wxLIST_NEXT_ALL,

wxLIST_STATE_SELECTED);

if (item == -1) {