]> git.sesse.net Git - vlc/blob - modules/misc/lua/libs/volume.c
playlist: Make sure we don't pl_Release(p_playlist).
[vlc] / modules / misc / lua / libs / volume.c
1 /*****************************************************************************
2  * volume.c
3  *****************************************************************************
4  * Copyright (C) 2007-2008 the VideoLAN team
5  * $Id$
6  *
7  * Authors: Antoine Cellerier <dionoea at videolan tod org>
8  *          Pierre d'Herbemont <pdherbemont # videolan.org>
9  *
10  * This program is free software; you can redistribute it and/or modify
11  * it under the terms of the GNU General Public License as published by
12  * the Free Software Foundation; either version 2 of the License, or
13  * (at your option) any later version.
14  *
15  * This program is distributed in the hope that it will be useful,
16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18  * GNU General Public License for more details.
19  *
20  * You should have received a copy of the GNU General Public License
21  * along with this program; if not, write to the Free Software
22  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
23  *****************************************************************************/
24
25 /*****************************************************************************
26  * Preamble
27  *****************************************************************************/
28 #ifndef  _GNU_SOURCE
29 #   define  _GNU_SOURCE
30 #endif
31
32 #ifdef HAVE_CONFIG_H
33 # include "config.h"
34 #endif
35
36 #include <vlc_common.h>
37 #include <vlc_plugin.h>
38 #include <vlc_meta.h>
39 #include <vlc_charset.h>
40 #include <vlc_aout.h>
41
42 #include <lua.h>        /* Low level lua C API */
43 #include <lauxlib.h>    /* Higher level C API */
44 #include <lualib.h>     /* Lua libs */
45
46 #include "../vlc.h"
47 #include "../libs.h"
48
49 /*****************************************************************************
50  * Volume related
51  *****************************************************************************/
52 static int vlclua_volume_set( lua_State *L )
53 {
54     vlc_object_t *p_this = vlclua_get_this( L );
55     int i_volume = luaL_checkint( L, 1 );
56     /* Do we need to check that i_volume is in the AOUT_VOLUME_MIN->MAX range?*/
57     return vlclua_push_ret( L, aout_VolumeSet( p_this, i_volume ) );
58 }
59
60 static int vlclua_volume_get( lua_State *L )
61 {
62     vlc_object_t *p_this = vlclua_get_this( L );
63     audio_volume_t i_volume;
64     if( aout_VolumeGet( p_this, &i_volume ) == VLC_SUCCESS )
65         lua_pushnumber( L, i_volume );
66     else
67         lua_pushnil( L );
68     return 1;
69 }
70
71 static int vlclua_volume_up( lua_State *L )
72 {
73     audio_volume_t i_volume;
74     aout_VolumeUp( vlclua_get_this( L ),
75                    luaL_optint( L, 1, 1 ),
76                    &i_volume );
77     lua_pushnumber( L, i_volume );
78     return 1;
79 }
80
81 static int vlclua_volume_down( lua_State *L )
82 {
83     audio_volume_t i_volume;
84     aout_VolumeDown( vlclua_get_this( L ),
85                      luaL_optint( L, 1, 1 ),
86                      &i_volume );
87     lua_pushnumber( L, i_volume );
88     return 1;
89 }
90
91 /*****************************************************************************
92  *
93  *****************************************************************************/
94 static const luaL_Reg vlclua_volume_reg[] = {
95     { "get", vlclua_volume_get },
96     { "set", vlclua_volume_set },
97     { "up", vlclua_volume_up },
98     { "down", vlclua_volume_down },
99     { NULL, NULL }
100 };
101
102 void luaopen_volume( lua_State *L )
103 {
104     lua_newtable( L );
105     luaL_register( L, NULL, vlclua_volume_reg );
106     lua_setfield( L, -2, "volume" );
107 }