nlua_music.c

Go to the documentation of this file.

/*
 * See Licensing and Copyright notice in naev.h
 */
#include "SDL.h"
 
#include "naev.h"
#include "nlua_music.h"
 
#include "log.h"
#include "music.h"
#include "ndata.h"
#include "nluadef.h"
 
/* Music methods. */
static int musicL_choose( lua_State *L );
static int musicL_play( lua_State *L );
static int musicL_pause( lua_State *L );
static int musicL_stop( lua_State *L );
static int musicL_isPlaying( lua_State *L );
static int musicL_current( lua_State *L );
static int musicL_getVolume( lua_State *L );
static const luaL_Reg music_methods[] = {
   { "choose", musicL_choose },
   { "play", musicL_play },
   { "pause", musicL_pause },
   { "stop", musicL_stop },
   { "isPlaying", musicL_isPlaying },
   { "current", musicL_current },
   { "getVolume", musicL_getVolume },
   {0,0}
}; 
int nlua_loadMusic( nlua_env env )
{
   nlua_register(env, "music", music_methods, 0);
   return 0;
}
 
static int musicL_choose( lua_State* L )
{
   const char *situation = luaL_checkstring(L,1);
   if (music_choose( situation ))
      return NLUA_ERROR(L,"music.choose failed!");
   return 0;
}
 
static int musicL_play( lua_State *L )
{
   const char *str = luaL_optstring(L,1,NULL);
   if (music_play( str ))
      return NLUA_ERROR(L,"music.play failed!");
   return 0;
}
 
static int musicL_pause( lua_State* L )
{
   int disable = lua_toboolean(L,1);
   if (music_pause(disable))
      return NLUA_ERROR(L,"music.pause failed!");
   return 0;
}
 
static int musicL_stop( lua_State *L )
{
   int nodisable = lua_toboolean(L,1);
   if (music_stop(!nodisable))
      return NLUA_ERROR(L,"music.stop failed!");
   return 0;
}
 
static int musicL_isPlaying( lua_State* L )
{
   if (music_disabled) {
      lua_pushboolean(L, 0);
   }
   else {
      MusicInfo_t *minfo = music_info();
      if (minfo==NULL)
         return NLUA_ERROR(L,"Failed to get music info!");
      lua_pushboolean(L, minfo->playing);
   }
   return 1;
}
 
static int musicL_current( lua_State* L )
{
   if (music_disabled) {
      lua_pushstring(L, "none");
      lua_pushnumber(L, -1.);
   }
   else {
      MusicInfo_t *minfo = music_info();
      if (minfo==NULL)
         return NLUA_ERROR(L,"Failed to get music info!");
      lua_pushstring(L, minfo->name);
      lua_pushnumber(L, minfo->pos);
   }
   return 2;
}
 
static int musicL_getVolume( lua_State *L )
{
   if (lua_toboolean(L,1))
      lua_pushnumber(L, music_getVolumeLog() );
   else
      lua_pushnumber(L, music_getVolume() );
   return 1;
}