1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
|
/*
* MPT_MIDI.cpp
* ------------
* Purpose: MIDI Input handling code.
* Notes : (currently none)
* Authors: OpenMPT Devs
* The OpenMPT source code is released under the BSD license. Read LICENSE for more details.
*/
#include "stdafx.h"
#include <mmsystem.h>
#include "Mainfrm.h"
#include "InputHandler.h"
#include "Dlsbank.h"
#include "../soundlib/MIDIEvents.h"
OPENMPT_NAMESPACE_BEGIN
#ifdef MPT_ALL_LOGGING
#define MPTMIDI_RECORDLOG
#endif
// Midi Input globals
HMIDIIN CMainFrame::shMidiIn = nullptr;
//Get Midi message(dwParam1), apply MIDI settings having effect on volume, and return
//the volume value [0, 256]. In addition value -1 is used as 'use default value'-indicator.
int CMainFrame::ApplyVolumeRelatedSettings(const DWORD &dwParam1, const BYTE midivolume)
{
int nVol = MIDIEvents::GetDataByte2FromEvent(dwParam1);
if(TrackerSettings::Instance().m_dwMidiSetup & MIDISETUP_RECORDVELOCITY)
{
nVol = (CDLSBank::DLSMidiVolumeToLinear(nVol)+255) >> 8;
nVol *= TrackerSettings::Instance().midiVelocityAmp / 100;
Limit(nVol, 1, 256);
if(TrackerSettings::Instance().m_dwMidiSetup & MIDISETUP_MIDIVOL_TO_NOTEVOL)
nVol = static_cast<int>((midivolume / 127.0) * nVol);
} else
{
// Case: No velocity record.
if(TrackerSettings::Instance().m_dwMidiSetup & MIDISETUP_MIDIVOL_TO_NOTEVOL)
nVol = 4*((midivolume+1)/2);
else //Use default volume
nVol = -1;
}
return nVol;
}
void ApplyTransposeKeyboardSetting(CMainFrame &rMainFrm, uint32 &dwParam1)
{
if ( (TrackerSettings::Instance().m_dwMidiSetup & MIDISETUP_TRANSPOSEKEYBOARD)
&& (MIDIEvents::GetChannelFromEvent(dwParam1) != 9) )
{
int nTranspose = rMainFrm.GetBaseOctave() - 4;
if (nTranspose)
{
int note = MIDIEvents::GetDataByte1FromEvent(dwParam1);
if (note < 0x80)
{
note += nTranspose * 12;
Limit(note, 0, NOTE_MAX - NOTE_MIN);
dwParam1 &= 0xffff00ff;
dwParam1 |= (note << 8);
}
}
}
}
/////////////////////////////////////////////////////////////////////////////
// MMSYSTEM Midi Record
void CALLBACK MidiInCallBack(HMIDIIN, UINT wMsg, DWORD_PTR, DWORD_PTR dwParam1, DWORD_PTR dwParam2)
{
CMainFrame *pMainFrm = CMainFrame::GetMainFrame();
HWND hWndMidi;
if (!pMainFrm) return;
#ifdef MPTMIDI_RECORDLOG
DWORD dwMidiStatus = dwParam1 & 0xFF;
DWORD dwMidiByte1 = (dwParam1 >> 8) & 0xFF;
DWORD dwMidiByte2 = (dwParam1 >> 16) & 0xFF;
DWORD dwTimeStamp = (DWORD)dwParam2;
MPT_LOG_GLOBAL(LogDebug, "MIDI", MPT_UFORMAT("time={}ms status={} data={}.{}")(mpt::ufmt::dec(dwTimeStamp), mpt::ufmt::HEX0<2>(dwMidiStatus), mpt::ufmt::HEX0<2>(dwMidiByte1), mpt::ufmt::HEX0<2>(dwMidiByte2)));
#endif
hWndMidi = pMainFrm->GetMidiRecordWnd();
if(wMsg == MIM_DATA || wMsg == MIM_MOREDATA)
{
uint32 data = static_cast<uint32>(dwParam1);
if(::IsWindow(hWndMidi))
{
switch(MIDIEvents::GetTypeFromEvent(data))
{
case MIDIEvents::evNoteOff: // Note Off
case MIDIEvents::evNoteOn: // Note On
ApplyTransposeKeyboardSetting(*pMainFrm, data);
[[fallthrough]];
default:
if(::PostMessage(hWndMidi, WM_MOD_MIDIMSG, data, dwParam2))
return; // Message has been handled
break;
}
}
// Pass MIDI to keyboard handler
CMainFrame::GetInputHandler()->HandleMIDIMessage(kCtxAllContexts, data);
} else if(wMsg == MIM_LONGDATA)
{
// SysEx...
} else if (wMsg == MIM_CLOSE)
{
// midiInClose will trigger this, but also disconnecting a USB MIDI device (although delayed, seems to be coupled to calling something like midiInGetNumDevs).
// In the latter case, we need to inform the UI.
if(CMainFrame::shMidiIn != nullptr)
{
pMainFrm->SendMessage(WM_COMMAND, ID_MIDI_RECORD);
}
}
}
bool CMainFrame::midiOpenDevice(bool showSettings)
{
if (shMidiIn) return true;
if (midiInOpen(&shMidiIn, TrackerSettings::Instance().GetCurrentMIDIDevice(), (DWORD_PTR)MidiInCallBack, 0, CALLBACK_FUNCTION) != MMSYSERR_NOERROR)
{
shMidiIn = nullptr;
// Show MIDI configuration on fail.
if(showSettings)
{
CMainFrame::m_nLastOptionsPage = OPTIONS_PAGE_MIDI;
CMainFrame::GetMainFrame()->OnViewOptions();
}
// Let's see if the user updated the settings.
if(midiInOpen(&shMidiIn, TrackerSettings::Instance().GetCurrentMIDIDevice(), (DWORD_PTR)MidiInCallBack, 0, CALLBACK_FUNCTION) != MMSYSERR_NOERROR)
{
shMidiIn = nullptr;
return false;
}
}
midiInStart(shMidiIn);
return true;
}
void CMainFrame::midiCloseDevice()
{
if (shMidiIn)
{
// Prevent infinite loop in MIM_CLOSE
auto handle = shMidiIn;
shMidiIn = nullptr;
midiInClose(handle);
}
}
void CMainFrame::OnMidiRecord()
{
if (shMidiIn)
{
midiCloseDevice();
} else
{
midiOpenDevice();
}
}
void CMainFrame::OnUpdateMidiRecord(CCmdUI *pCmdUI)
{
if (pCmdUI) pCmdUI->SetCheck((shMidiIn) ? TRUE : FALSE);
}
OPENMPT_NAMESPACE_END
|
