2 * MltMiracle.cpp - MLT Wrapper
3 * Copyright (C) 2004-2005 Charles Yates
4 * Author: Charles Yates <charles.yates@pandora.be>
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU Lesser General Public License as published
8 * by the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, write to the Free Software Foundation,
18 * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
21 #include "MltMiracle.h"
22 #include "MltService.h"
23 #include "MltResponse.h"
28 static valerie_response
mlt_miracle_execute( void *arg
, char *command
)
30 Miracle
*miracle
= ( Miracle
* )arg
;
31 if ( miracle
!= NULL
)
33 Response
*response
= miracle
->execute( command
);
34 valerie_response real
= valerie_response_clone( response
->get_response( ) );
40 valerie_response response
= valerie_response_init( );
41 valerie_response_set_error( response
, 500, "Invalid server" );
46 static valerie_response
mlt_miracle_received( void *arg
, char *command
, char *doc
)
48 Miracle
*miracle
= ( Miracle
* )arg
;
49 if ( miracle
!= NULL
)
51 Response
*response
= miracle
->received( command
, doc
);
52 if ( response
!= NULL
)
54 valerie_response real
= valerie_response_clone( response
->get_response( ) );
62 valerie_response response
= valerie_response_init( );
63 valerie_response_set_error( response
, 500, "Invalid server" );
68 static valerie_response
mlt_miracle_push( void *arg
, char *command
, mlt_service service
)
70 Miracle
*miracle
= ( Miracle
* )arg
;
71 if ( miracle
!= NULL
)
73 Service
input( service
);
74 Response
*response
= miracle
->push( command
, &input
);
75 valerie_response real
= valerie_response_clone( response
->get_response( ) );
81 valerie_response response
= valerie_response_init( );
82 valerie_response_set_error( response
, 500, "Invalid server" );
87 Miracle
::Miracle( char *name
, int port
, char *config
) :
90 server
= miracle_server_init( name
);
91 miracle_server_set_port( server
, port
);
92 miracle_server_set_config( server
, config
);
97 miracle_server_close( server
);
100 mlt_properties Miracle
::get_properties( )
102 return &server
->parent
;
105 bool Miracle
::start( )
107 miracle_server_execute( server
);
108 _real
= server
->parser
->real
;
109 _execute
= server
->parser
->execute
;
110 _received
= server
->parser
->received
;
111 _push
= server
->parser
->push
;
112 server
->parser
->real
= this;
113 server
->parser
->execute
= mlt_miracle_execute
;
114 server
->parser
->received
= mlt_miracle_received
;
115 server
->parser
->push
= mlt_miracle_push
;
116 return server
->shutdown
== 0;
119 bool Miracle
::is_running( )
121 return server
->shutdown
== 0;
124 Response
*Miracle
::execute( char *command
)
126 return new Response( _execute( _real
, command
) );
129 Response
*Miracle
::received( char *command
, char *doc
)
131 return new Response( _received( _real
, command
, doc
) );
134 Response
*Miracle
::push( char *command
, Service
*service
)
136 return new Response( _push( _real
, command
, service
->get_service( ) ) );
139 void Miracle
::wait_for_shutdown( )
141 struct timespec tm
= { 1, 0 };
142 while ( !server
->shutdown
)
143 nanosleep( &tm
, NULL
);