editor/bass-sys/bass24/c/plugins/plugins.c

180 lines
6.1 KiB
C
Raw Normal View History

2021-01-05 10:17:41 +00:00
/*
BASS plugin test
Copyright (c) 2005-2011 Un4seen Developments Ltd.
*/
#include <windows.h>
#include <stdio.h>
#include <math.h>
#include <commctrl.h>
#include "bass.h"
HWND win = NULL;
DWORD chan; // the channel
OPENFILENAME ofn;
char filter[2000];
// display error messages
void Error(const char *es)
{
char mes[200];
sprintf(mes, "%s\n(error code: %d)", es, BASS_ErrorGetCode());
MessageBox(win, mes, 0, 0);
}
// translate a CTYPE value to text
const char *GetCTypeString(DWORD ctype, HPLUGIN plugin)
{
if (plugin) { // using a plugin
const BASS_PLUGININFO *pinfo = BASS_PluginGetInfo(plugin); // get plugin info
int a;
for (a = 0; a < pinfo->formatc; a++) {
if (pinfo->formats[a].ctype == ctype) // found a "ctype" match...
return pinfo->formats[a].name; // return its name
}
}
// check built-in stream formats...
if (ctype == BASS_CTYPE_STREAM_OGG) return "Ogg Vorbis";
if (ctype == BASS_CTYPE_STREAM_MP1) return "MPEG layer 1";
if (ctype == BASS_CTYPE_STREAM_MP2) return "MPEG layer 2";
if (ctype == BASS_CTYPE_STREAM_MP3) return "MPEG layer 3";
if (ctype == BASS_CTYPE_STREAM_AIFF) return "Audio IFF";
if (ctype == BASS_CTYPE_STREAM_WAV_PCM) return "PCM WAVE";
if (ctype == BASS_CTYPE_STREAM_WAV_FLOAT) return "Floating-point WAVE";
if (ctype == BASS_CTYPE_STREAM_MF) { // a Media Foundation codec, check the format...
const WAVEFORMATEX *wf = (WAVEFORMATEX*)BASS_ChannelGetTags(chan, BASS_TAG_WAVEFORMAT);
if (wf->wFormatTag == 0x1610) return "Advanced Audio Coding";
if (wf->wFormatTag >= 0x0160 && wf->wFormatTag <= 0x0163) return "Windows Media Audio";
}
if (ctype & BASS_CTYPE_STREAM_WAV) // other WAVE codec, could use acmFormatTagDetails to get its name, but for now...
return "WAVE";
return "?";
}
#define MESS(id,m,w,l) SendDlgItemMessage(win,id,m,(WPARAM)(w),(LPARAM)(l))
INT_PTR CALLBACK dialogproc(HWND h, UINT m, WPARAM w, LPARAM l)
{
switch (m) {
case WM_COMMAND:
switch (LOWORD(w)) {
case IDCANCEL:
EndDialog(h, 0);
break;
case 10:
{
char file[MAX_PATH] = "";
ofn.lpstrFile = file;
ofn.nMaxFile = MAX_PATH;
if (GetOpenFileName(&ofn)) {
BASS_StreamFree(chan); // free the old stream
if (!(chan = BASS_StreamCreateFile(FALSE, file, 0, 0, BASS_SAMPLE_LOOP))) {
// it ain't playable
MESS(10, WM_SETTEXT, 0, "click here to open a file...");
MESS(11, WM_SETTEXT, 0, "");
Error("Can't play the file");
break;
}
MESS(10, WM_SETTEXT, 0, file);
{ // display the file type and length
QWORD bytes = BASS_ChannelGetLength(chan, BASS_POS_BYTE);
DWORD time = BASS_ChannelBytes2Seconds(chan, bytes);
BASS_CHANNELINFO info;
BASS_ChannelGetInfo(chan, &info);
sprintf(file, "channel type = %x (%s)\nlength = %I64u (%u:%02u)",
info.ctype, GetCTypeString(info.ctype, info.plugin), bytes, time / 60, time % 60);
MESS(11, WM_SETTEXT, 0, file);
MESS(12, TBM_SETRANGEMAX, 1, time); // update scroller range
}
BASS_ChannelPlay(chan, FALSE);
}
}
break;
}
break;
case WM_HSCROLL:
if (l && LOWORD(w) != SB_THUMBPOSITION && LOWORD(w) != SB_ENDSCROLL) { // set the position
int pos = SendMessage((HWND)l, TBM_GETPOS, 0, 0);
BASS_ChannelSetPosition(chan, BASS_ChannelSeconds2Bytes(chan, pos), BASS_POS_BYTE);
}
break;
case WM_TIMER:
MESS(12, TBM_SETPOS, 1, (DWORD)BASS_ChannelBytes2Seconds(chan, BASS_ChannelGetPosition(chan, BASS_POS_BYTE))); // update position
break;
case WM_INITDIALOG:
win = h;
// initialize default output device
if (!BASS_Init(-1, 44100, 0, win, NULL)) {
Error("Can't initialize device");
EndDialog(h, 0);
break;
}
// initialize file selector
memset(&ofn, 0, sizeof(ofn));
ofn.lStructSize = sizeof(ofn);
ofn.hwndOwner = h;
ofn.Flags = OFN_HIDEREADONLY | OFN_EXPLORER;
ofn.lpstrFilter = filter;
memcpy(filter, "BASS built-in formats (*.mp3;*.mp2;*.mp1;*.ogg;*.wav;*.aif)\0*.mp3;*.mp2;*.mp1;*.ogg;*.wav;*.aif\0", 96);
{ // look for plugins (in the executable's directory)
WIN32_FIND_DATA fd;
HANDLE fh;
char path[MAX_PATH], *fp = filter + 96;
GetModuleFileName(0, path, sizeof(path));
strcpy(strrchr(path, '\\') + 1, "bass*.dll");
fh = FindFirstFile(path, &fd);
if (fh != INVALID_HANDLE_VALUE) {
do {
HPLUGIN plug;
if (plug = BASS_PluginLoad(fd.cFileName, 0)) { // plugin loaded...
const BASS_PLUGININFO *pinfo = BASS_PluginGetInfo(plug); // get plugin info to add to the file selector filter...
int a;
for (a = 0; a < pinfo->formatc; a++) {
fp += sprintf(fp, "%s (%s) - %s", pinfo->formats[a].name, pinfo->formats[a].exts, fd.cFileName) + 1; // format description
fp += sprintf(fp, "%s", pinfo->formats[a].exts) + 1; // extension filter
}
// add plugin to the list
MESS(20, LB_ADDSTRING, 0, fd.cFileName);
}
} while (FindNextFile(fh, &fd));
FindClose(fh);
}
if (!MESS(20, LB_GETCOUNT, 0, 0)) // no plugins...
MESS(20, LB_ADDSTRING, 0, "no plugins - visit the BASS webpage to get some");
// check if Media Foundation is available
if (!BASS_GetConfig(BASS_CONFIG_MF_DISABLE)) {
fp += sprintf(fp, "Media Foundation formats (*.aac;*.m4a;*.mp4;*.wma)") + 1;
fp += sprintf(fp, "*.aac;*.m4a;*.mp4;*.wma") + 1;
}
memcpy(fp, "All files\0*.*\0\0", 15);
}
SetTimer(h, 0, 500, 0); // timer to update the position
return 1;
case WM_DESTROY:
// "free" the output device and all plugins
BASS_Free();
BASS_PluginFree(0);
break;
}
return 0;
}
int PASCAL WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance, LPSTR lpCmdLine, int nCmdShow)
{
// check the correct BASS was loaded
if (HIWORD(BASS_GetVersion()) != BASSVERSION) {
MessageBox(0, "An incorrect version of BASS.DLL was loaded", 0, MB_ICONERROR);
return 0;
}
DialogBox(hInstance, MAKEINTRESOURCE(1000), NULL, dialogproc);
return 0;
}