src/preferences/media/MidiSettingsView.cpp

   1 /*
   2  * Copyright 2014, Haiku, Inc. All rights reserved.
   3  * Distributed under the terms of the MIT License.
   4  */
   5
   6 #include "MidiSettingsView.h"
   7
   8 #include <Box.h>
   9 #include <Catalog.h>
  10 #include <Directory.h>
  11 #include <Entry.h>
  12 #include <FindDirectory.h>
  13 #include <GridView.h>
  14 #include <LayoutBuilder.h>
  15 #include <ListView.h>
  16 #include <Locale.h>
  17 #include <Node.h>
  18 #include <NodeInfo.h>
  19 #include <Path.h>
  20 #include <PathFinder.h>
  21 #include <ScrollView.h>
  22 #include <StringList.h>
  23
  24 #include <stdio.h>
  25
  26
  27 #undef B_TRANSLATION_CONTEXT
  28 #define B_TRANSLATION_CONTEXT "Midi View"
  29
  30 #define SETTINGS_FILE "midi"
  31
  32 const static uint32 kSelectSoundFont = 'SeSf';
  33
  34
  35 MidiSettingsView::MidiSettingsView()
  36         :
  37         SettingsView()
  38 {
  39         BBox* defaultsBox = new BBox("SoundFont");
  40         defaultsBox->SetLabel(B_TRANSLATE("SoundFont"));
  41         BGridView* defaultsGridView = new BGridView();
  42
  43         fListView = new BListView(B_SINGLE_SELECTION_LIST);
  44         fListView->SetSelectionMessage(new BMessage(kSelectSoundFont));
  45
  46         BScrollView *scrollView = new BScrollView("ScrollView", fListView,
  47                         0, false, true);
  48         BLayoutBuilder::Grid<>(defaultsGridView)
  49                 .SetInsets(B_USE_DEFAULT_SPACING, 0, B_USE_DEFAULT_SPACING,
  50                                 B_USE_DEFAULT_SPACING)
  51                 .Add(scrollView, 0, 0);
  52
  53         defaultsBox->AddChild(defaultsGridView);
  54
  55         BLayoutBuilder::Group<>(this)
  56                 .SetInsets(0, 0, 0, 0)
  57                 .Add(defaultsBox)
  58                 .AddGlue();
  59 }
  60
  61
  62 /* virtual */
  63 void
  64 MidiSettingsView::AttachedToWindow()
  65 {
  66         SettingsView::AttachedToWindow();
  67
  68         fListView->SetTarget(this);
  69         _RetrieveSoftSynthList();
  70
  71         _LoadSettings();
  72 }
  73
  74
  75 /* virtual */
  76 void
  77 MidiSettingsView::MessageReceived(BMessage* message)
  78 {
  79         switch (message->what) {
  80                 case kSelectSoundFont:
  81                         _SaveSettings();
  82                         break;
  83
  84                 default:
  85                         SettingsView::MessageReceived(message);
  86                         break;
  87         }
  88 }
  89
  90
  91 void
  92 MidiSettingsView::_RetrieveSoftSynthList()
  93 {
  94         BStringList paths;
  95         status_t status = BPathFinder::FindPaths(B_FIND_PATH_DATA_DIRECTORY,
  96                         "synth", paths);
  97         if (status != B_OK)
  98                 return;
  99
 100         fListView->MakeEmpty();
 101
 102         for (int32 i = 0; i < paths.CountStrings(); i++) {
 103                 BDirectory directory(paths.StringAt(i).String());
 104                 BEntry entry;
 105                 if (directory.InitCheck() != B_OK)
 106                         continue;
 107                 while (directory.GetNextEntry(&entry) == B_OK) {
 108                         BNode node(&entry);
 109                         BNodeInfo nodeInfo(&node);
 110                         char mimeType[B_MIME_TYPE_LENGTH];
 111                         // TODO: For some reason this doesn't work
 112                         if (nodeInfo.GetType(mimeType) == B_OK
 113                                         /*&& !strcmp(mimeType, "audio/x-soundfont")*/) {
 114                                 BPath fullPath = paths.StringAt(i).String();
 115                                 fullPath.Append(entry.Name());
 116                                 fListView->AddItem(new BStringItem(fullPath.Path()));
 117                         }
 118                 }
 119         }
 120 }
 121
 122
 123 void
 124 MidiSettingsView::_LoadSettings()
 125 {
 126         // TODO: Duplicated code between here
 127         // and BSoftSynth::SetDefaultInstrumentsFile
 128         char buffer[512];
 129         BPath path;
 130         if (find_directory(B_USER_SETTINGS_DIRECTORY, &path) == B_OK) {
 131                 path.Append(SETTINGS_FILE);
 132                 BFile file(path.Path(), B_READ_ONLY);
 133                 if (file.InitCheck() == B_OK) {
 134                         file.Read(buffer, sizeof(buffer));
 135                         char soundFont[512];
 136                         sscanf(buffer, "# Midi Settings\n soundfont = %s\n",
 137                                 soundFont);
 138
 139                         for (int32 i = 0; i < fListView->CountItems(); i++) {
 140                                 BStringItem* item = (BStringItem*)fListView->ItemAt(i);
 141                                 if (!strcmp(item->Text(), soundFont)) {
 142                                         fListView->Select(i);
 143                                         break;
 144                                 }
 145                         }
 146                 }
 147         }
 148 }
 149
 150
 151 void
 152 MidiSettingsView::_SaveSettings()
 153 {
 154         int32 selection = fListView->CurrentSelection();
 155         if (selection < 0)
 156                 return;
 157
 158         BStringItem* item = (BStringItem*)fListView->ItemAt(selection);
 159         if (item == NULL)
 160                 return;
 161
 162         char buffer[512];
 163         snprintf(buffer, 512, "# Midi Settings\n soundfont = %s\n",
 164                         item->Text());
 165
 166         BPath path;
 167         if (find_directory(B_USER_SETTINGS_DIRECTORY, &path) == B_OK) {
 168                 path.Append(SETTINGS_FILE);
 169                 BFile file(path.Path(), B_READ_WRITE | B_CREATE_FILE | B_ERASE_FILE);
 170                 if (file.InitCheck() == B_OK)
 171                         file.Write(buffer, strlen(buffer));
 172         }
 173 }
 174