mirror of
https://github.com/WinampDesktop/winamp.git
synced 2024-12-18 23:05:52 +01:00
438 lines
12 KiB
C++
438 lines
12 KiB
C++
// -----------------------------------------------------------------------------------------------------
|
|
// Playlist Script Object
|
|
//
|
|
// functions for <pledit.mi>
|
|
// -----------------------------------------------------------------------------------------------------
|
|
|
|
#include <precomp.h>
|
|
#include "main.h"
|
|
|
|
#include "PlaylistScriptObject.h"
|
|
|
|
#include <bfc/wasabi_std.h>
|
|
#include <api/script/script.h>
|
|
#include <api/script/scriptmgr.h>
|
|
#include <api/script/scriptobj.h>
|
|
#include <api/script/scriptguid.h>
|
|
|
|
#ifdef WASABI_COMPILE_MEDIACORE
|
|
#include <api/service/svcs/svc_player.h>
|
|
#include <api/core/buttons.h>
|
|
#include <api/core/api_core.h>
|
|
#include <api/core/corehandle.h> // safe to include even if core isn't there
|
|
#endif
|
|
|
|
static PlaylistScriptController _playlistController;
|
|
ScriptObjectController *playlistController = &_playlistController;
|
|
|
|
|
|
#ifndef _WASABIRUNTIME
|
|
|
|
BEGIN_SERVICES(PlaylistObject_Svc);
|
|
DECLARE_SERVICE(ScriptObjectCreator<PlaylistScriptObjectSvc>);
|
|
END_SERVICES(PlaylistObject_Svc, _PlaylistObject_Svc);
|
|
|
|
#ifdef _X86_
|
|
extern "C" { int _link_PlaylistObjectSvc; }
|
|
#else
|
|
extern "C" { int __link_PlaylistObjectSvc; }
|
|
#endif
|
|
|
|
#endif
|
|
|
|
|
|
// -----------------------------------------------------------------------------------------------------
|
|
// Functions Table
|
|
function_descriptor_struct PlaylistScriptController::exportedFunction[] =
|
|
{
|
|
{L"showCurrentlyPlayingTrack", 0, (void*)SPlaylist::script_vcpu_showCurrentlyPlayingEntry},
|
|
{L"showTrack", 1, (void*)SPlaylist::script_vcpu_showEntry},
|
|
{L"getNumTracks", 0, (void*)SPlaylist::script_vcpu_getNumItems},
|
|
{L"getCurrentIndex", 0, (void*)SPlaylist::script_vcpu_getCurrentIndex},
|
|
{L"getRating", 1, (void*)SPlaylist::script_vcpu_getTrackRating},
|
|
{L"setRating", 2, (void*)SPlaylist::script_vcpu_setTrackRating},
|
|
{L"enqueueFile", 1, (void*)SPlaylist::script_vcpu_enqueueFile },
|
|
{L"clear", 0, (void*)SPlaylist::script_vcpu_clear },
|
|
{L"removeTrack", 1, (void*)SPlaylist::script_vcpu_removeTrack },
|
|
{L"swapTracks", 2, (void*)SPlaylist::script_vcpu_swapTrack },
|
|
{L"moveUp", 1, (void*)SPlaylist::script_vcpu_moveUp },
|
|
{L"moveDown", 1, (void*)SPlaylist::script_vcpu_moveDown },
|
|
{L"moveTo", 2, (void*)SPlaylist::script_vcpu_moveTo },
|
|
{L"getTitle", 1, (void*)SPlaylist::script_vcpu_getTitle },
|
|
{L"getLength", 1, (void*)SPlaylist::script_vcpu_getLength },
|
|
{L"getMetaData", 2, (void*)SPlaylist::script_vcpu_getExtendedInfo },
|
|
{L"getNumSelectedTracks", 0, (void*)SPlaylist::script_vcpu_getNumSelectedItems },
|
|
{L"getNextSelectedTrack", 1, (void*)SPlaylist::script_vcpu_getNextSelectedItem },
|
|
{L"getFileName", 1, (void*)SPlaylist::script_vcpu_getFileName },
|
|
{L"playTrack", 1, (void*)SPlaylist::script_vcpu_playTrack },
|
|
{L"onPleditModified", 0, (void*)SPlaylist::script_vcpu_onPleditModified },
|
|
};
|
|
|
|
ScriptObjectController *PlaylistScriptObjectSvc::getController(int n)
|
|
{
|
|
switch (n) {
|
|
case 0:
|
|
return playlistController;
|
|
}
|
|
return NULL;
|
|
}
|
|
|
|
ScriptObject *PlaylistScriptController::instantiate()
|
|
{
|
|
SPlaylist *c = new SPlaylist;
|
|
if (!c) return NULL;
|
|
return c->getScriptObject();
|
|
}
|
|
|
|
void PlaylistScriptController::destroy(ScriptObject *o)
|
|
{
|
|
SPlaylist *obj = static_cast<SPlaylist *>(o->vcpu_getInterface(playlistScriptObjectGUID));
|
|
ASSERT(obj != NULL);
|
|
delete obj;
|
|
}
|
|
|
|
void *PlaylistScriptController::encapsulate(ScriptObject *o)
|
|
{
|
|
return NULL;
|
|
}
|
|
|
|
void PlaylistScriptController::deencapsulate(void *o)
|
|
{
|
|
}
|
|
|
|
int PlaylistScriptController::getNumFunctions()
|
|
{
|
|
return sizeof(exportedFunction) / sizeof(function_descriptor_struct);
|
|
}
|
|
|
|
SPlaylist::SPlaylist()
|
|
{
|
|
getScriptObject()->vcpu_setInterface(playlistScriptObjectGUID, (void *)static_cast<SPlaylist *>(this));
|
|
getScriptObject()->vcpu_setClassName(L"PlEdit");
|
|
getScriptObject()->vcpu_setController(playlistController);
|
|
|
|
SOList.addItem(this);
|
|
}
|
|
|
|
SPlaylist::~SPlaylist()
|
|
{
|
|
SOList.removeItem(this);
|
|
}
|
|
|
|
// Script helper functions
|
|
|
|
void SPlaylist::onPleditModified ()
|
|
{
|
|
//This one is not working
|
|
for (int i=0; i < SOList.getNumItems(); i++)
|
|
{
|
|
//script_vcpu_onPleditModified(SCRIPT_CALL, getScriptObject());
|
|
script_vcpu_onPleditModified(SCRIPT_CALL, SOList.enumItem(i)->getScriptObject());
|
|
//Std::messageBox(SOList.enumItem(i)->getClassName(), t, 0);
|
|
}
|
|
}
|
|
|
|
void SPlaylist::showEntry( int i)
|
|
{
|
|
HWND hPeWindow = wa2.getWnd(IPC_GETWND_PE);
|
|
SendMessageW(hPeWindow, WM_USER, 666, i);
|
|
}
|
|
|
|
void SPlaylist::swap(int track1, int track2)
|
|
{
|
|
HWND hPeWindow = wa2.getWnd(IPC_GETWND_PE);
|
|
|
|
int i = wa2.PE_getCurrentIndex();
|
|
|
|
int param = ((track1) << 16) | (track2);
|
|
SendMessageW(hPeWindow, WM_USER, IPC_PE_SWAPINDEX, param);
|
|
|
|
//Swap our currently playing item as well
|
|
if (i == track1)
|
|
{
|
|
wa2.PE_setCurrentIndex(track2);
|
|
}
|
|
else if (i == track2)
|
|
{
|
|
wa2.PE_setCurrentIndex(track1);
|
|
}
|
|
}
|
|
|
|
fileinfoW *SPlaylist::getFileInfoStructW1 (int item)
|
|
{
|
|
static fileinfoW fi;
|
|
fi.index = item;
|
|
*(fi.file) = 0;
|
|
HWND hPeWindow = wa2.getWnd(IPC_GETWND_PE);
|
|
SendMessageW(hPeWindow, WM_USER, IPC_PE_GETINDEXINFOW_INPROC, (LPARAM)&fi);
|
|
return &fi;
|
|
}
|
|
|
|
// Script Calls
|
|
|
|
scriptVar SPlaylist::script_vcpu_showCurrentlyPlayingEntry(SCRIPT_FUNCTION_PARAMS, ScriptObject *o)
|
|
{
|
|
SCRIPT_FUNCTION_INIT
|
|
|
|
showEntry (wa2.PE_getCurrentIndex());
|
|
|
|
RETURN_SCRIPT_VOID;
|
|
}
|
|
|
|
|
|
scriptVar SPlaylist::script_vcpu_showEntry(SCRIPT_FUNCTION_PARAMS, ScriptObject *o, scriptVar i)
|
|
{
|
|
SCRIPT_FUNCTION_INIT
|
|
|
|
showEntry (GET_SCRIPT_INT(i));
|
|
|
|
RETURN_SCRIPT_VOID;
|
|
}
|
|
|
|
scriptVar SPlaylist::script_vcpu_getNumItems(SCRIPT_FUNCTION_PARAMS, ScriptObject *o)
|
|
{
|
|
SCRIPT_FUNCTION_INIT
|
|
|
|
int i = wa2.PE_getNumItems();
|
|
|
|
return MAKE_SCRIPT_INT(i);
|
|
}
|
|
|
|
scriptVar SPlaylist::script_vcpu_getCurrentIndex(SCRIPT_FUNCTION_PARAMS, ScriptObject *o)
|
|
{
|
|
SCRIPT_FUNCTION_INIT
|
|
|
|
int i = wa2.PE_getCurrentIndex();
|
|
|
|
return MAKE_SCRIPT_INT(i);
|
|
}
|
|
|
|
scriptVar SPlaylist::script_vcpu_setTrackRating(SCRIPT_FUNCTION_PARAMS, ScriptObject *o, scriptVar i, scriptVar rating)
|
|
{
|
|
SCRIPT_FUNCTION_INIT
|
|
|
|
HWND hwnd_winamp = wa2.getMainWindow();
|
|
|
|
int cur_pos = wa2.PE_getCurrentIndex();
|
|
wa2.PE_setCurrentIndex(GET_SCRIPT_INT(i));
|
|
SendMessageW(hwnd_winamp, WM_WA_IPC, GET_SCRIPT_INT(rating), IPC_SETRATING);
|
|
wa2.PE_setCurrentIndex(cur_pos);
|
|
|
|
RETURN_SCRIPT_VOID;
|
|
}
|
|
|
|
scriptVar SPlaylist::script_vcpu_getTrackRating(SCRIPT_FUNCTION_PARAMS, ScriptObject *o, scriptVar i)
|
|
{
|
|
SCRIPT_FUNCTION_INIT
|
|
|
|
HWND hwnd_winamp = wa2.getMainWindow();
|
|
|
|
int cur_pos = wa2.PE_getCurrentIndex();
|
|
wa2.PE_setCurrentIndex(GET_SCRIPT_INT(i));
|
|
int r = 0;
|
|
r = SendMessageW(hwnd_winamp, WM_WA_IPC, GET_SCRIPT_INT(i), IPC_GETRATING);
|
|
wa2.PE_setCurrentIndex(cur_pos);
|
|
|
|
return MAKE_SCRIPT_INT(r);
|
|
}
|
|
|
|
scriptVar SPlaylist::script_vcpu_enqueueFile(SCRIPT_FUNCTION_PARAMS, ScriptObject *o, scriptVar file)
|
|
{
|
|
SCRIPT_FUNCTION_INIT;
|
|
|
|
wa2.enqueueFile (GET_SCRIPT_STRING(file));
|
|
|
|
RETURN_SCRIPT_VOID;
|
|
}
|
|
|
|
scriptVar SPlaylist::script_vcpu_clear(SCRIPT_FUNCTION_PARAMS, ScriptObject *o)
|
|
{
|
|
SCRIPT_FUNCTION_INIT;
|
|
|
|
wa2.clearPlaylist();
|
|
|
|
RETURN_SCRIPT_VOID;
|
|
}
|
|
|
|
scriptVar SPlaylist::script_vcpu_removeTrack(SCRIPT_FUNCTION_PARAMS, ScriptObject *o, scriptVar i)
|
|
{
|
|
SCRIPT_FUNCTION_INIT;
|
|
|
|
HWND hPeWindow = wa2.getWnd(IPC_GETWND_PE);
|
|
SendMessageW(hPeWindow, WM_USER, IPC_PE_DELETEINDEX, GET_SCRIPT_INT(i));
|
|
|
|
RETURN_SCRIPT_VOID;
|
|
}
|
|
|
|
scriptVar SPlaylist::script_vcpu_swapTrack(SCRIPT_FUNCTION_PARAMS, ScriptObject *o, scriptVar _track1, scriptVar _track2)
|
|
{
|
|
SCRIPT_FUNCTION_INIT;
|
|
|
|
int track1 = GET_SCRIPT_INT(_track1);
|
|
int track2 = GET_SCRIPT_INT(_track2);
|
|
|
|
if (track1 >= wa2.PE_getNumItems() || track1 < 0 || track2 >= wa2.PE_getNumItems() || track2 < 0) RETURN_SCRIPT_VOID;
|
|
swap ((track1), (track2));
|
|
|
|
RETURN_SCRIPT_VOID;
|
|
}
|
|
|
|
scriptVar SPlaylist::script_vcpu_moveUp(SCRIPT_FUNCTION_PARAMS, ScriptObject *o, scriptVar _track)
|
|
{
|
|
SCRIPT_FUNCTION_INIT;
|
|
|
|
int track = GET_SCRIPT_INT(_track);
|
|
if (track < wa2.PE_getNumItems()-1) swap (track, track+1);
|
|
|
|
RETURN_SCRIPT_VOID;
|
|
}
|
|
|
|
scriptVar SPlaylist::script_vcpu_moveDown(SCRIPT_FUNCTION_PARAMS, ScriptObject *o, scriptVar _track)
|
|
{
|
|
SCRIPT_FUNCTION_INIT;
|
|
|
|
int track = GET_SCRIPT_INT(_track);
|
|
if (track > 0) swap (track, track-1);
|
|
|
|
RETURN_SCRIPT_VOID;
|
|
}
|
|
|
|
scriptVar SPlaylist::script_vcpu_moveTo(SCRIPT_FUNCTION_PARAMS, ScriptObject *o, scriptVar _track, scriptVar _pos)
|
|
{
|
|
SCRIPT_FUNCTION_INIT;
|
|
|
|
int track = GET_SCRIPT_INT(_track);
|
|
int pos = GET_SCRIPT_INT(_pos);
|
|
|
|
if (track == pos || pos >= wa2.PE_getNumItems() || pos < 0 || track >= wa2.PE_getNumItems() || track < 0)
|
|
{
|
|
RETURN_SCRIPT_VOID;
|
|
}
|
|
|
|
// Martin> This can be done much faster :P
|
|
/*if (track > pos)
|
|
{
|
|
for (int i = track; i > pos; i--)
|
|
{
|
|
swap (i, i-1);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
for (int i = track; i < pos; i++)
|
|
{
|
|
swap (i, i+1);
|
|
}
|
|
}*/
|
|
HWND hPeWindow = wa2.getWnd(IPC_GETWND_PE);
|
|
fileinfoW *fi = getFileInfoStructW1(track);
|
|
SendMessageW(hPeWindow, WM_USER, IPC_PE_DELETEINDEX, fi->index);
|
|
fi->index = pos;
|
|
static COPYDATASTRUCT cds;
|
|
cds.dwData = IPC_PE_INSERTFILENAMEW;
|
|
cds.lpData = fi;
|
|
SendMessageW(hPeWindow, WM_COPYDATA, NULL, (LPARAM)&cds);
|
|
|
|
RETURN_SCRIPT_VOID;
|
|
}
|
|
|
|
scriptVar SPlaylist::script_vcpu_getTitle(SCRIPT_FUNCTION_PARAMS, ScriptObject *o, scriptVar _track)
|
|
{
|
|
SCRIPT_FUNCTION_INIT;
|
|
|
|
int track = GET_SCRIPT_INT(_track);
|
|
|
|
// Martin> There might be a better way to convert this;)
|
|
// benski> yes, there is :) see below. There's a unicode equivalent API for this, just wasn't enabled in wa2frontend object
|
|
// so I added it
|
|
fileinfo2W *fi = wa2.PE_getFileTitleW(track);
|
|
if (fi)
|
|
return MAKE_SCRIPT_STRING(fi->filetitle);
|
|
else
|
|
return MAKE_SCRIPT_STRING(L"");
|
|
}
|
|
|
|
scriptVar SPlaylist::script_vcpu_getLength(SCRIPT_FUNCTION_PARAMS, ScriptObject *o, scriptVar _track)
|
|
{
|
|
SCRIPT_FUNCTION_INIT;
|
|
|
|
int track = GET_SCRIPT_INT(_track);
|
|
|
|
fileinfo2W *fi = wa2.PE_getFileTitleW(track);
|
|
if (fi)
|
|
return MAKE_SCRIPT_STRING((fi->filelength));
|
|
else
|
|
return MAKE_SCRIPT_STRING(L"");
|
|
}
|
|
|
|
scriptVar SPlaylist::script_vcpu_getFileName(SCRIPT_FUNCTION_PARAMS, ScriptObject *o, scriptVar _track)
|
|
{
|
|
SCRIPT_FUNCTION_INIT;
|
|
|
|
int track = GET_SCRIPT_INT(_track);
|
|
|
|
fileinfoW *fi = getFileInfoStructW1(track);
|
|
|
|
return MAKE_SCRIPT_STRING(fi->file);
|
|
}
|
|
|
|
|
|
scriptVar SPlaylist::script_vcpu_getExtendedInfo(SCRIPT_FUNCTION_PARAMS, ScriptObject *o, scriptVar _track, scriptVar _name)
|
|
{
|
|
SCRIPT_FUNCTION_INIT;
|
|
|
|
int track = GET_SCRIPT_INT(_track);
|
|
const wchar_t *name = GET_SCRIPT_STRING(_name);
|
|
|
|
fileinfoW *fi = getFileInfoStructW1(track);
|
|
|
|
wa2.getMetaData((fi->file), name, staticStr, 4096);
|
|
|
|
return MAKE_SCRIPT_STRING(staticStr);
|
|
}
|
|
|
|
scriptVar SPlaylist::script_vcpu_getNumSelectedItems(SCRIPT_FUNCTION_PARAMS, ScriptObject *o)
|
|
{
|
|
SCRIPT_FUNCTION_INIT;
|
|
|
|
HWND hPeWindow = wa2.getWnd(IPC_GETWND_PE);
|
|
int ret = SendMessageW(hPeWindow, WM_USER, IPC_PE_GETSELECTEDCOUNT, 0);
|
|
|
|
return MAKE_SCRIPT_INT(ret);
|
|
}
|
|
|
|
scriptVar SPlaylist::script_vcpu_getNextSelectedItem(SCRIPT_FUNCTION_PARAMS, ScriptObject *o, scriptVar _track)
|
|
{
|
|
SCRIPT_FUNCTION_INIT;
|
|
|
|
int track = GET_SCRIPT_INT(_track);
|
|
|
|
track = SendMessageW(wa2.getMainWindow(), WM_USER, track, IPC_PLAYLIST_GET_NEXT_SELECTED);
|
|
|
|
return MAKE_SCRIPT_INT(track);
|
|
}
|
|
|
|
scriptVar SPlaylist::script_vcpu_playTrack(SCRIPT_FUNCTION_PARAMS, ScriptObject *o, scriptVar _track)
|
|
{
|
|
SCRIPT_FUNCTION_INIT;
|
|
#ifdef WASABI_COMPILE_MEDIACORE
|
|
int track = GET_SCRIPT_INT(_track);
|
|
WASABI_API_MEDIACORE->core_userButton(0, UserButton::STOP);
|
|
wa2.PE_setCurrentIndex(track);
|
|
WASABI_API_MEDIACORE->core_userButton(0, UserButton::PLAY);
|
|
return MAKE_SCRIPT_VOID();
|
|
#else
|
|
RETURN_SCRIPT_VOID;
|
|
#endif
|
|
}
|
|
|
|
scriptVar SPlaylist::script_vcpu_onPleditModified(SCRIPT_FUNCTION_PARAMS, ScriptObject *o)
|
|
{
|
|
SCRIPT_FUNCTION_INIT;
|
|
PROCESS_HOOKS0(o, playlistController);
|
|
SCRIPT_FUNCTION_CHECKABORTEVENT;
|
|
SCRIPT_EXEC_EVENT0(o);
|
|
}
|
|
|
|
wchar_t SPlaylist::staticStr[4096] = {0};
|
|
PtrList < SPlaylist > SPlaylist::SOList; |