winamp/Src/Wasabi/api/script/objects/PlaylistScriptObject.cpp
2024-09-24 14:54:57 +02:00

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;