Sha256: 1b4056bdc732eef9e9d01cfdb75a9dc9aacb050ee9577628becea01955476d65
Contents?: true
Size: 1.83 KB
Versions: 4
Compression:
Stored size: 1.83 KB
Contents
'##################################################################
'#
'# mongrel_service: Win32 native implementation for mongrel
'# (using ServiceFB and FreeBASIC)
'#
'# Copyright (c) 2006 Multimedia systems
'# (c) and code by Luis Lavena
'#
'# mongrel_service (native) and mongrel_service gem_pluing are licensed
'# in the same terms as mongrel, please review the mongrel license at
'# http://mongrel.rubyforge.org/license.html
'#
'##################################################################
'##################################################################
'# Requirements:
'# - FreeBASIC 0.18.
'#
'##################################################################
#define SERVICEFB_INCLUDE_UTILS
#include once "ServiceFB.bi"
#include once "console_process.bi"
'# use for debug versions
#if not defined(GEM_VERSION)
#define GEM_VERSION (debug mode)
#endif
'# preprocessor stringize
#define PPSTR(x) #x
namespace mongrel_service
const VERSION as string = PPSTR(GEM_VERSION)
'# namespace include
using fb.svc
using fb.svc.utils
declare function single_onInit(byref as ServiceProcess) as integer
declare sub single_onStart(byref as ServiceProcess)
declare sub single_onStop(byref as ServiceProcess)
'# SingleMongrel
type SingleMongrel
declare constructor()
declare destructor()
'# TODO: replace for inheritance here
'declare function onInit() as integer
'declare sub onStart()
'declare sub onStop()
__service as ServiceProcess
__console as ConsoleProcess
__child_pid as uinteger
end type
'# TODO: replace with inheritance here
dim shared single_mongrel_ref as SingleMongrel ptr
end namespace
Version data entries
4 entries across 4 versions & 1 rubygems