236 lines
6.5 KiB
C++
236 lines
6.5 KiB
C++
/*
|
|
LICENSE
|
|
-------
|
|
Copyright 2005 Nullsoft, Inc.
|
|
All rights reserved.
|
|
|
|
Redistribution and use in source and binary forms, with or without modification,
|
|
are permitted provided that the following conditions are met:
|
|
|
|
* Redistributions of source code must retain the above copyright notice,
|
|
this list of conditions and the following disclaimer.
|
|
|
|
* Redistributions in binary form must reproduce the above copyright notice,
|
|
this list of conditions and the following disclaimer in the documentation
|
|
and/or other materials provided with the distribution.
|
|
|
|
* Neither the name of Nullsoft nor the names of its contributors may be used to
|
|
endorse or promote products derived from this software without specific prior written permission.
|
|
|
|
THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND ANY EXPRESS OR
|
|
IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND
|
|
FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
|
|
CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
|
DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
|
|
DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER
|
|
IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
|
|
OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
|
|
*/
|
|
#include <windows.h>
|
|
#include "../ns-eel2/ns-eel-int.h"
|
|
#include "../ns-eel2/ns-eel-addfuncs.h"
|
|
#include "avs_eelif.h"
|
|
|
|
|
|
|
|
char last_error_string[1024];
|
|
int g_log_errors;
|
|
CRITICAL_SECTION g_eval_cs;
|
|
static char *g_evallib_visdata;
|
|
|
|
|
|
|
|
/////////////////////// begin AVS specific script functions
|
|
|
|
|
|
|
|
static double NSEEL_CGEN_CALL getvis(unsigned char *visdata, int bc, int bw, int ch, int xorv)
|
|
{
|
|
int x;
|
|
int accum=0;
|
|
if (ch && ch != 1 && ch != 2) return 0.0;
|
|
|
|
if (bw < 1) bw=1;
|
|
bc-=bw/2;
|
|
if (bc < 0)
|
|
{
|
|
bw+=bc;
|
|
bc=0;
|
|
}
|
|
if (bc > 575) bc=575;
|
|
if (bc+bw > 576) bw=576-bc;
|
|
|
|
|
|
if (!ch)
|
|
{
|
|
for (x = 0; x < bw; x ++)
|
|
{
|
|
accum+=(visdata[bc]^xorv)-xorv;
|
|
accum+=(visdata[bc+576]^xorv)-xorv;
|
|
bc++;
|
|
}
|
|
return (double)accum / ((double)bw*255.0);
|
|
}
|
|
else
|
|
{
|
|
if (ch == 2) visdata+=576;
|
|
for (x = 0; x < bw; x ++) accum+=(visdata[bc++]^xorv)-xorv;
|
|
return (double)accum / ((double)bw*127.5);
|
|
}
|
|
}
|
|
|
|
static double NSEEL_CGEN_CALL getspec_(void *_this, double *band, double *bandw, double *chan)
|
|
{
|
|
if (!g_evallib_visdata) return 0.0;
|
|
return getvis((unsigned char *)g_evallib_visdata,(int)(*band*576.0),(int)(*bandw*576.0),(int)(*chan+0.5),0)*0.5;
|
|
}
|
|
|
|
static double NSEEL_CGEN_CALL getosc_(void *_this, double *band, double *bandw, double *chan)
|
|
{
|
|
if (!g_evallib_visdata) return 0.0;
|
|
return getvis((unsigned char *)g_evallib_visdata+576*2,(int)(*band*576.0),(int)(*bandw*576.0),(int)(*chan+0.5),128);
|
|
}
|
|
|
|
static double NSEEL_CGEN_CALL gettime_(void *_this, double *sc)
|
|
{
|
|
int ispos;
|
|
if ((ispos=(*sc > -1.001 && *sc < -0.999)) || (*sc > -2.001 && *sc < -1.999))
|
|
{
|
|
int pos=0;
|
|
|
|
extern HWND hwnd_WinampParent;
|
|
if (IsWindow(hwnd_WinampParent))
|
|
{
|
|
if (!SendMessageTimeout( hwnd_WinampParent, WM_USER,(WPARAM)!ispos,(LPARAM)105,SMTO_BLOCK,50,(LPDWORD)&pos)) pos=0;
|
|
}
|
|
if (!ispos) return (double)pos;
|
|
return pos / 1000.0;
|
|
}
|
|
|
|
return GetTickCount()/1000.0 - *sc;
|
|
}
|
|
|
|
static double NSEEL_CGEN_CALL setmousepos_(void *_this, double *x, double *y)
|
|
{
|
|
//fucko: implement me
|
|
return 0.0;
|
|
}
|
|
|
|
|
|
extern double DDraw_translatePoint(POINT p, int isY);
|
|
|
|
static double NSEEL_CGEN_CALL getmouse_(void *_this, double *which)
|
|
{
|
|
int w=(int)(*which+0.5);
|
|
|
|
if (w > 5)
|
|
return (GetAsyncKeyState(w)&0x8000)?1.0:0.0;
|
|
|
|
if (w == 1 || w == 2)
|
|
{
|
|
POINT p;
|
|
GetCursorPos(&p);
|
|
return DDraw_translatePoint(p,w==2);
|
|
}
|
|
if (w == 3) return (GetAsyncKeyState(MK_LBUTTON)&0x8000)?1.0:0.0;
|
|
if (w == 4) return (GetAsyncKeyState(MK_RBUTTON)&0x8000)?1.0:0.0;
|
|
if (w == 5) return (GetAsyncKeyState(MK_MBUTTON)&0x8000)?1.0:0.0;
|
|
return 0.0;
|
|
}
|
|
|
|
|
|
|
|
/////////////////////// end AVS specific script functions
|
|
|
|
void NSEEL_HOSTSTUB_EnterMutex()
|
|
{
|
|
EnterCriticalSection(&g_eval_cs);
|
|
}
|
|
void NSEEL_HOSTSTUB_LeaveMutex()
|
|
{
|
|
LeaveCriticalSection(&g_eval_cs);
|
|
}
|
|
|
|
void AVS_EEL_IF_init()
|
|
{
|
|
InitializeCriticalSection(&g_eval_cs);
|
|
NSEEL_init();
|
|
|
|
// todo: check to see that parameter orders are correct
|
|
NSEEL_addfunctionex("getosc",3,(char *)_asm_generic3parm_retd,(char *)_asm_generic3parm_retd_end-(char *)_asm_generic3parm_retd,NSEEL_PProc_THIS,(void*)getosc_);
|
|
NSEEL_addfunctionex("getspec",3,(char *)_asm_generic3parm_retd,(char *)_asm_generic3parm_retd_end-(char *)_asm_generic3parm_retd,NSEEL_PProc_THIS,(void*)getspec_);
|
|
|
|
NSEEL_addfunctionex("gettime",1,(char *)_asm_generic1parm_retd,(char *)_asm_generic1parm_retd_end-(char *)_asm_generic1parm_retd,NSEEL_PProc_THIS,(void*)gettime_);
|
|
NSEEL_addfunctionex("getkbmouse",1,(char *)_asm_generic1parm_retd,(char *)_asm_generic1parm_retd_end-(char *)_asm_generic1parm_retd,NSEEL_PProc_THIS,(void*)getmouse_);
|
|
|
|
NSEEL_addfunctionex("setmousepos",2,(char *)_asm_generic2parm_retd,(char *)_asm_generic2parm_retd_end-(char *)_asm_generic2parm_retd,NSEEL_PProc_THIS,(void*)setmousepos_);
|
|
}
|
|
void AVS_EEL_IF_quit()
|
|
{
|
|
DeleteCriticalSection(&g_eval_cs);
|
|
NSEEL_quit();
|
|
}
|
|
|
|
static void movestringover(char *str, int amount)
|
|
{
|
|
char tmp[1024+8];
|
|
|
|
int l=(int)strlen(str);
|
|
l=min(1024-amount-1,l);
|
|
|
|
memcpy(tmp,str,l+1);
|
|
|
|
while (l >= 0 && tmp[l]!='\n') l--;
|
|
l++;
|
|
|
|
tmp[l]=0;//ensure we null terminate
|
|
|
|
memcpy(str+amount,tmp,l+1);
|
|
}
|
|
|
|
NSEEL_CODEHANDLE AVS_EEL_IF_Compile(void *context, char *code)
|
|
{
|
|
NSEEL_CODEHANDLE ret;
|
|
EnterCriticalSection(&g_eval_cs);
|
|
ret=NSEEL_code_compile((NSEEL_VMCTX)context,code,0);
|
|
if (!ret)
|
|
{
|
|
if (g_log_errors)
|
|
{
|
|
char *expr = NSEEL_code_getcodeerror((NSEEL_VMCTX)context);
|
|
if (expr)
|
|
{
|
|
int l=strlen(expr);
|
|
if (l > 512) l=512;
|
|
movestringover(last_error_string,l+2);
|
|
memcpy(last_error_string,expr,l);
|
|
last_error_string[l]='\r';
|
|
last_error_string[l+1]='\n';
|
|
}
|
|
}
|
|
}
|
|
LeaveCriticalSection(&g_eval_cs);
|
|
return ret;
|
|
}
|
|
|
|
void AVS_EEL_IF_Execute(NSEEL_CODEHANDLE handle, char visdata[2][2][576])
|
|
{
|
|
if (handle)
|
|
{
|
|
EnterCriticalSection(&g_eval_cs);
|
|
g_evallib_visdata=(char*)visdata;
|
|
NSEEL_code_execute((NSEEL_CODEHANDLE)handle);
|
|
g_evallib_visdata=NULL;
|
|
LeaveCriticalSection(&g_eval_cs);
|
|
}
|
|
}
|
|
|
|
|
|
void AVS_EEL_IF_resetvars(NSEEL_VMCTX ctx)
|
|
{
|
|
NSEEL_VM_freeRAM(ctx);
|
|
NSEEL_VM_remove_all_nonreg_vars(ctx);
|
|
}
|
|
|