aboutsummaryrefslogtreecommitdiff
path: root/Src/Plugins/Library/ml_pmp/autofill.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'Src/Plugins/Library/ml_pmp/autofill.cpp')
-rw-r--r--Src/Plugins/Library/ml_pmp/autofill.cpp432
1 files changed, 432 insertions, 0 deletions
diff --git a/Src/Plugins/Library/ml_pmp/autofill.cpp b/Src/Plugins/Library/ml_pmp/autofill.cpp
new file mode 100644
index 00000000..f8eb47a4
--- /dev/null
+++ b/Src/Plugins/Library/ml_pmp/autofill.cpp
@@ -0,0 +1,432 @@
+/*
+** This is adapted from the autofill code in ml_ipod. It was originally written by and is
+** Copyright (C) Will Fisher and Justin Frankel. It remains under the following licence:
+**
+** This software is provided 'as-is', without any express or implied warranty. In no event will the authors be held
+** liable for any damages arising from the use of this software.
+**
+** Permission is granted to anyone to use this software for any purpose, including commercial applications, and to
+** alter it and redistribute it freely, subject to the following restrictions:
+**
+** 1. The origin of this software must not be misrepresented; you must not claim that you wrote the original software.
+** If you use this software in a product, an acknowledgment in the product documentation would be appreciated but is not required.
+**
+** 2. Altered source versions must be plainly marked as such, and must not be misrepresented as being the original software.
+**
+** 3. This notice may not be removed or altered from any source distribution.
+*/
+
+#include <windows.h>
+#include <time.h>
+#include "../../General/gen_ml/ml.h"
+#include "pmp.h"
+#include "../../General/gen_ml/itemlist.h"
+#include "DeviceView.h"
+#include "mt19937ar.h"
+#include "config.h"
+#include "../nu/AutoChar.h"
+#include "metadata_utils.h"
+#include "api__ml_pmp.h"
+
+extern winampMediaLibraryPlugin plugin;
+
+extern C_ItemList * getSelectedItems(bool all=false);
+
+typedef struct {
+ wchar_t * albumName;
+ int rating;
+ float ratingf;
+ int lastplayed;
+ int size;
+ bool album;
+ itemRecordW * ice;
+} AutoFillItem;
+
+static void randomizeList(void *list, int elems, int elemsize) {
+ if (elems < 2) return;
+ if (elemsize < 1) return;
+ char *plist=(char*)list;
+ int p;
+ char *tmp=(char*)calloc(elemsize, sizeof(char));
+ if (!tmp) return;
+ for (p = 0; p < elems; p ++) {
+ int np=genrand_int31()%elems;
+ if (p != np) {
+ np*=elemsize;
+ int pp=p*elemsize;
+ memcpy(tmp,plist+pp,elemsize);
+ memcpy(plist+pp,plist+np,elemsize);
+ memcpy(plist+np,tmp,elemsize);
+ }
+ }
+ free(tmp);
+}
+
+#define atoi_NULLOK(s) ((s)?atoi(s):0)
+#define STRCMP_NULLOK(a,b) _wcsicmp(a?a:L"",b?b:L"")
+
+static int sortFunc_icealbums(const void *elem1, const void *elem2) {
+ itemRecordW * a = (itemRecordW *)elem1;
+ itemRecordW * b = (itemRecordW *)elem2;
+ return STRCMP_NULLOK(a->album,b->album);
+}
+
+
+static void autoFill_songfilter(Device * dev, C_ItemList * list, itemRecordListW * results) {
+ if (results) {
+ for(int i=0; i < results->Size; i++) {
+ AutoFillItem * a = (AutoFillItem *)calloc(sizeof(AutoFillItem),1);
+ a->rating = results->Items[i].rating;
+ a->lastplayed = (int)results->Items[i].lastplay;
+ a->size = (int)dev->getTrackSizeOnDevice(&results->Items[i]);
+ a->album = false;
+ a->ice = &results->Items[i];
+ a->albumName=L"arse";
+ list->Add(a);
+ }
+ }
+}
+
+static void autoFill_songfilter(Device * dev, C_ItemList * list, C_ItemList * results) {
+ for(int i=0; i < results->GetSize(); i++) {
+ itemRecordW *r = (itemRecordW*)results->Get(i);
+ AutoFillItem * a = (AutoFillItem *)calloc(sizeof(AutoFillItem),1);
+ a->rating = r->rating;
+ a->lastplayed = (int)r->lastplay;
+ a->size = (int)dev->getTrackSizeOnDevice(r);
+ a->album = false;
+ a->ice = r;
+ a->albumName=L"arse";
+ list->Add(a);
+ }
+}
+
+static void autoFill_albumfilter(Device * dev, C_ItemList * list, itemRecordListW * results, C_ItemList * res = NULL) {
+ if (results)
+ qsort(results->Items,results->Size,sizeof(itemRecordW),sortFunc_icealbums);
+ AutoFillItem * curalbum = NULL;
+ wchar_t * albumName=NULL;
+ int albumSize=0;
+ __int64 lastplayacc=0;
+ int size = res?res->GetSize():(results?results->Size:0);
+ int i;
+ for(i=0; i < size; i++) {
+ itemRecordW * item = res?(itemRecordW*)res->Get(i):&results->Items[i];
+ if(!curalbum || STRCMP_NULLOK(item->album,albumName) != 0) {
+ if(curalbum && albumSize) {
+ curalbum->lastplayed = (int)(lastplayacc / (__int64)albumSize);
+ curalbum->ratingf /= (float)albumSize;
+ list->Add(curalbum);
+ }
+ AutoFillItem * a = (AutoFillItem *)calloc(sizeof(AutoFillItem),1);
+ a->ratingf = (float)item->rating;
+ lastplayacc = item->lastplay;
+ a->size = (int)dev->getTrackSizeOnDevice(item);
+ a->album = true;
+ a->albumName = item->album;
+ curalbum = a;
+ albumName = a->albumName;
+ albumSize++;
+ } else {
+ albumSize++;
+ curalbum->size += (int)dev->getTrackSizeOnDevice(item);
+ curalbum->ratingf += (float)item->rating;
+ lastplayacc += item->lastplay;
+ }
+ }
+ if(curalbum && albumSize) {
+ curalbum->lastplayed = (int)(lastplayacc / (__int64)albumSize);
+ curalbum->ratingf /= (float)albumSize;
+ list->Add(curalbum);
+ }
+
+ //FUCKO: think of something clever to make the ratings relevant
+ for(i=0; i < list->GetSize(); i++) {
+ AutoFillItem * a = (AutoFillItem *)list->Get(i);
+ a->rating = (int)(a->ratingf + 0.5);
+ if(a->rating > 5) a->rating = 5;
+ }
+}
+
+// FUCKO lame O(n^2) gayness. Make this better.
+static void autoFill_addAlbums(C_ItemList * albums, itemRecordListW * songs, C_ItemList * dest) {
+ if (songs) {
+ for(int i=0; i < songs->Size; i++)
+ for(int j=0; j < albums->GetSize(); j++)
+ if(STRCMP_NULLOK(songs->Items[i].album,(wchar_t *)albums->Get(j))==0)
+ dest->Add(&songs->Items[i]);
+ }
+}
+
+static int sortFunc_autofill(const void *elem1, const void *elem2)
+{
+ AutoFillItem *a=(AutoFillItem *)*(void **)elem1;
+ AutoFillItem *b=(AutoFillItem *)*(void **)elem2;
+ return a->lastplayed - b->lastplayed;
+}
+
+itemRecordListW * generateAutoFillList(DeviceView * dev, C_Config * config)
+{
+ // Settings for an autofill
+ int lastAutofill=config->ReadInt(L"LastAutoFill",(int)time(NULL));
+ int fillpc = config->ReadInt(L"FillPercent",90);; // fill device 90% full.
+ bool byAlbum = dev->dev->getDeviceCapacityTotal() > (__int64)1500000000;
+ byAlbum = config->ReadInt(L"AlbumAutoFill",byAlbum?1:0)==1;
+ wchar_t * afquery = _wcsdup(config->ReadString(L"AutoFillQuery",L"length > 30"));
+ wchar_t * squery = _wcsdup(config->ReadString(L"SyncQuery",L"type = 0"));
+ char * tmp2 = AutoCharDup(config->ReadString(L"AutoFillRatings",L"")); // ratings ratio string (eg "3:1:1:1:0:0")
+ int len = 2*strlen(tmp2)+2;
+ char * tmp = (char*)calloc(len,sizeof(char));
+ strncpy(tmp,tmp2,len); free(tmp2);
+
+ int ratingsRatios[6]={0,0,0,0,0,0,};
+ bool useratings=true;
+ if(tmp[0]==0) useratings=false;
+ int i=0;
+ int ratingsRatiosTotal=0;
+ if(useratings) {
+ int len = strlen(tmp);
+ while(tmp[++i]!=0) if(tmp[i]==':') tmp[i]=0;
+ tmp[i+1]=0;
+ char * p = &tmp[0];
+ for(i=0; i<6; i++) {
+ if(p > len + tmp) break;
+ if(*p == 0) break;
+ ratingsRatios[i] = atoi_NULLOK(p);
+ ratingsRatiosTotal+=ratingsRatios[i];
+ p+=strlen(p)+1;
+ }
+ }
+ if(ratingsRatiosTotal==0) {
+ ratingsRatiosTotal=6;
+ for(i=0; i<6; i++) ratingsRatios[i]=1;
+ }
+
+ //construct query
+ wchar_t query[2048]=L"";
+ if(afquery[0]==0) wsprintf(query,L"%s",squery);
+ else wsprintf(query,L"(%s) AND (%s)",squery,afquery);
+
+ //run query
+ itemRecordListW *items = 0;
+ itemRecordListW *results = AGAVE_API_MLDB?AGAVE_API_MLDB->Query(query):0;
+ if (results)
+ {
+ C_ItemList * songList = new C_ItemList;
+
+ if(!byAlbum) autoFill_songfilter(dev->dev,songList, results);
+ else autoFill_albumfilter(dev->dev,songList, results);
+
+ //dump into ratings "bins"
+ C_ItemList * songs[7];
+ for(i=0; i<7; i++) songs[i] = new C_ItemList;
+ for(i=0; i<songList->GetSize(); i++) {
+ if(useratings) {
+ int rating = ((AutoFillItem*)songList->Get(i))->rating;
+ switch (rating) {
+ case 1: songs[1]->Add(songList->Get(i)); break;
+ case 2: songs[2]->Add(songList->Get(i)); break;
+ case 3: songs[3]->Add(songList->Get(i)); break;
+ case 4: songs[4]->Add(songList->Get(i)); break;
+ case 5: songs[5]->Add(songList->Get(i)); break;
+ default: songs[0]->Add(songList->Get(i)); break;
+ }
+ } else songs[0]->Add(songList->Get(i));
+ }
+
+ for(i=0; i<6; i++)
+ {
+ randomizeList(songs[i]->GetAll(),songs[i]->GetSize(),sizeof(void*)); // randomize
+ qsort(songs[i]->GetAll(),songs[i]->GetSize(),sizeof(void*),sortFunc_autofill); // sort by date
+ }
+
+
+ __int64 sizeToFill, totalSize=0;
+
+ sizeToFill = (((__int64)fillpc) * dev->dev->getDeviceCapacityTotal()) / ((__int64)100);
+ //sizeToFill = dev->dev->getDeviceCapacityTotal();
+
+ C_ItemList * alreadyIn = new C_ItemList;
+ C_ItemList * notGoingIn = new C_ItemList;
+ C_ItemList * songsToSend = new C_ItemList;
+
+ if(!byAlbum) {
+
+ int numTracks = dev->dev->getPlaylistLength(0);
+ /* Hmm. This should make autofill just replace selected songs
+ ** gonna leave it out for now, until i have good ipod shuffle (et al) support.
+ C_ItemList * selected = getSelectedItems(false);
+ int j=0;
+ if(selected) {
+ if(selected->GetSize() > 0 && selected->GetSize() < numTracks) {
+ for(i=0; i<numTracks; i++) {
+ if(j < selected->GetSize()) if((songid_t)selected->Get(j) == dev->dev->getPlaylistTrack(0,i)) {
+ j++;
+ notGoingIn->Add(selected->Get(j));
+ } else alreadyIn->Add(dev->dev->getPlaylistTrack(0,i));
+ }
+ }
+ delete selected;
+ }
+ */
+ // otherwise replace ones played since last autofill, unless none played, in which case replace all
+ if(notGoingIn->GetSize() == 0) {
+ delete alreadyIn;
+ alreadyIn = new C_ItemList;
+ if(lastAutofill > 0)
+ {
+ for(i=0; i<numTracks; ++i)
+ if(dev->dev->getTrackLastPlayed(dev->dev->getPlaylistTrack(0,i)) >= lastAutofill) break;
+
+ if (i >= numTracks) // this means nothing has been played, so in this case we set everything to be replaced
+ {
+ for(i=0; i<numTracks; ++i) notGoingIn->Add((void*)dev->dev->getPlaylistTrack(0,i));
+ }
+ else
+ {
+ for(i=0; i < numTracks; ++i)
+ {
+ songid_t s = dev->dev->getPlaylistTrack(0,i);
+ if(dev->dev->getTrackLastPlayed(s) <= lastAutofill) alreadyIn->Add((void*)s);
+ }
+ }
+ }
+ }
+
+ //remove our already selected songs from the bins
+ for(i=0; i<notGoingIn->GetSize(); ++i) {
+ songid_t s = (songid_t)notGoingIn->Get(i);
+ for (int b=0; b < 6; b ++)
+ {
+ for(int j=0; j<songs[b]->GetSize(); ++j)
+ {
+ if(!compareItemRecordAndSongId(((AutoFillItem *)songs[b]->Get(j))->ice,s, dev->dev))
+ { // FUCKO
+ songs[6]->Add(songs[b]->Get(j));
+ songs[b]->Del(j);
+ b=6;
+ break;
+ }
+ }
+ }
+ }
+ for(i=0; i<alreadyIn->GetSize(); ++i) {
+ songid_t s = (songid_t)alreadyIn->Get(i);
+ for (int b= 0; b < 6; b ++)
+ {
+ for(int j=0; j<songs[b]->GetSize(); ++j)
+ {
+ if(!compareItemRecordAndSongId(((AutoFillItem *)songs[b]->Get(j))->ice,s, dev->dev))
+ {
+ songsToSend->Add(((AutoFillItem *)songs[b]->Get(j))->ice);
+ songs[b]->Del(j);
+ b=6;
+ break;
+ }
+ }
+ }
+
+ __int64 size = (__int64)dev->dev->getTrackSize(s);
+
+ if(totalSize + size >= sizeToFill) break;
+ totalSize += size;
+ }
+ } // end if(!byAlbum)
+
+ //select the rest!
+ C_ItemList * albumsToSend = new C_ItemList;
+
+ while(true) {
+ int bin=0;
+ if (useratings)
+ {
+ int val = genrand_int31() % ratingsRatiosTotal;
+ bin=-1;
+ while(val>=0 && bin < 5) val -= ratingsRatios[++bin];
+
+ if (bin > 5) bin=5;
+ else if(bin<0) bin=0;
+
+ bin = 5-bin; // work in reverse mapped bin now (since ratingsRatio is 5-0)
+
+ int sbin=bin;
+ while(bin<6&&songs[bin]->GetSize()<=0) { bin++; } // if our bin is empty, go to a higher bin
+
+ if (bin > 5) // out of higher rated bins, go lower
+ {
+ bin=sbin-1; // start at one lower than where we started
+ while (bin >= 0 && songs[bin]->GetSize()<=0) bin--; // if our bin is still empty, go to a lower bin
+ }
+
+ if (bin < 0) bin = 6;
+ } else bin = songs[0]->GetSize()?0:6;
+ if(!songs[bin])
+ break;
+ int bsize=songs[bin]->GetSize();
+ if (bsize<1)
+ break;
+
+ // JF> will had a %(bsize/2) here effectively, which I think is too major.
+ // I propose a nice simple weighted thing, where stuff near the beginning is more likely
+ // to be picked.
+ int snum = genrand_int31() % bsize;
+ if (genrand_int31()&1) snum/=2; // half the time, just use the first half (less recently played items)
+
+ int size = ((AutoFillItem *)songs[bin]->Get(snum))->size;
+ if(size <= 0)
+ {
+ songs[bin]->Del(snum);
+ continue;
+ }
+ totalSize += (__int64)size;
+
+ /*{
+ wchar_t buf[100] = {0};
+ wsprintf(buf,L"not full. must fill: %d, so far: %d, this track: %d",(int)sizeToFill,(int)totalSize,(int)size);
+ OutputDebugString(buf);
+ }*/
+
+ if(totalSize >= sizeToFill)
+ {
+ /*OutputDebugString(L"full");*/
+ break;
+ }
+
+ if(byAlbum) {
+ albumsToSend->Add(((AutoFillItem *)songs[bin]->Get(snum))->albumName);
+ } else {
+ songsToSend->Add(((AutoFillItem *)songs[bin]->Get(snum))->ice);
+ }
+ songs[bin]->Del(snum);
+ }
+
+ // dump our albums into songsToSend
+ if(albumsToSend->GetSize() > 0)
+ autoFill_addAlbums(albumsToSend, results, songsToSend);
+
+ items = new itemRecordListW;
+ items->Alloc = songsToSend->GetSize();
+ items->Size = songsToSend->GetSize();
+ items->Items = (itemRecordW*)calloc(items->Alloc, sizeof(itemRecordW));
+
+ for(i=0; i<songsToSend->GetSize(); ++i) copyRecord(&items->Items[i],(itemRecordW*)songsToSend->Get(i));
+
+ // clear stuff up
+ for(i=0; i < songList->GetSize(); i++) free(songList->Get(i));
+ for(i=0; i<7; ++i) delete songs[i];
+ delete songsToSend;
+ delete albumsToSend;
+ delete songList;
+
+ delete notGoingIn;
+ delete alreadyIn;
+
+ AGAVE_API_MLDB->FreeRecordList(results); //free memory
+ }
+
+ free(afquery);
+ free(squery);
+ free(tmp);
+
+ return items;
+}