mirror of
https://github.com/ruby/ruby.git
synced 2022-11-09 12:17:21 -05:00
Import the "syslog" module from the rough ruby project. This module
provides the interface to the UNIX system logger (syslog). git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@1860 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
knu
parent
43271e97ab
commit
09a4937b2f
12 changed files with 723 additions and 0 deletions
|
|
@ -1,3 +1,8 @@
|
|||
Mon Nov 26 20:57:24 2001 Akinori MUSHA <knu@iDaemons.org>
|
||||
|
||||
* ext/Setup*, ext/syslog/*: import the "syslog" module from the
|
||||
rough ruby project.
|
||||
|
||||
Mon Nov 26 16:54:59 2001 Usaku Nakamura <usa@ruby-lang.org>
|
||||
|
||||
* win32/win32.c (mypopen): fixed that mypclose() didn't really close
|
||||
|
|
|
|||
4
doc/NEWS
4
doc/NEWS
|
|
@ -1,3 +1,7 @@
|
|||
: Syslog module
|
||||
|
||||
Imported.
|
||||
|
||||
: String#chomp
|
||||
|
||||
if $/ == '\n', chops off last newlines (any of \n, \r, \r\n).
|
||||
|
|
|
|||
|
|
@ -14,6 +14,7 @@
|
|||
#pty
|
||||
#sdbm
|
||||
#socket
|
||||
#syslog
|
||||
#tk
|
||||
#tcltklib
|
||||
#gtk
|
||||
|
|
|
|||
|
|
@ -16,4 +16,5 @@ marshal
|
|||
readline
|
||||
sdbm
|
||||
#socket
|
||||
#syslog
|
||||
#tkutil
|
||||
|
|
|
|||
|
|
@ -16,5 +16,6 @@ nkf
|
|||
#readline
|
||||
#sdbm
|
||||
socket
|
||||
#syslog
|
||||
#tcltklib
|
||||
#tk
|
||||
|
|
|
|||
|
|
@ -19,5 +19,6 @@ nkf
|
|||
#readline
|
||||
sdbm
|
||||
socket
|
||||
#syslog
|
||||
#tcltklib
|
||||
#tk
|
||||
|
|
|
|||
|
|
@ -13,4 +13,5 @@ fcntl
|
|||
kconv
|
||||
marshal
|
||||
#socket
|
||||
#syslog
|
||||
#tkutil
|
||||
|
|
|
|||
5
ext/syslog/MANIFEST
Normal file
5
ext/syslog/MANIFEST
Normal file
|
|
@ -0,0 +1,5 @@
|
|||
MANIFEST
|
||||
extconf.rb
|
||||
syslog.c
|
||||
syslog.txt
|
||||
test.rb
|
||||
10
ext/syslog/extconf.rb
Normal file
10
ext/syslog/extconf.rb
Normal file
|
|
@ -0,0 +1,10 @@
|
|||
# $RoughId: extconf.rb,v 1.3 2001/11/24 17:49:26 knu Exp $
|
||||
# $Id$
|
||||
|
||||
require 'mkmf'
|
||||
|
||||
have_header("syslog.h") &&
|
||||
have_func("openlog") &&
|
||||
have_func("setlogmask") &&
|
||||
create_makefile("syslog")
|
||||
|
||||
409
ext/syslog/syslog.c
Normal file
409
ext/syslog/syslog.c
Normal file
|
|
@ -0,0 +1,409 @@
|
|||
/*
|
||||
* UNIX Syslog extension for Ruby
|
||||
* Amos Gouaux, University of Texas at Dallas
|
||||
* <amos+ruby@utdallas.edu>
|
||||
*
|
||||
* $RoughId: syslog.c,v 1.17 2001/11/24 12:42:39 knu Exp $
|
||||
* $Id$
|
||||
*/
|
||||
|
||||
#include "ruby.h"
|
||||
#include <syslog.h>
|
||||
|
||||
/* Syslog class */
|
||||
static VALUE cSyslog, mSyslogConstants;
|
||||
static VALUE syslog_instance = Qnil, syslog_ident, syslog_options,
|
||||
syslog_facility, syslog_mask;
|
||||
static int syslog_opened = 0;
|
||||
|
||||
/* Package helper routines */
|
||||
static void syslog_write(int pri, int argc, VALUE *argv)
|
||||
{
|
||||
VALUE str;
|
||||
|
||||
if (argc < 1) {
|
||||
rb_raise(rb_eArgError, "no log message supplied");
|
||||
}
|
||||
|
||||
if (!syslog_opened) {
|
||||
rb_raise(rb_eRuntimeError, "must open syslog before write");
|
||||
}
|
||||
|
||||
str = rb_f_sprintf(argc, argv);
|
||||
|
||||
syslog(pri, "%s", RSTRING(str)->ptr);
|
||||
}
|
||||
|
||||
/* Syslog instance methods */
|
||||
static VALUE cSyslog_close(VALUE self)
|
||||
{
|
||||
closelog();
|
||||
syslog_opened = 0;
|
||||
|
||||
return Qnil;
|
||||
}
|
||||
|
||||
static VALUE cSyslog_open(int argc, VALUE *argv, VALUE self)
|
||||
{
|
||||
VALUE ident, opt, fac;
|
||||
int mask;
|
||||
|
||||
if (syslog_opened) {
|
||||
rb_raise(rb_eRuntimeError, "syslog already open");
|
||||
}
|
||||
rb_scan_args(argc, argv, "03", &ident, &opt, &fac);
|
||||
if (NIL_P(ident)) {
|
||||
ident = rb_gv_get("$0");
|
||||
}
|
||||
if (NIL_P(opt)) {
|
||||
opt = INT2NUM(LOG_PID | LOG_CONS);
|
||||
}
|
||||
if (NIL_P(fac)) {
|
||||
fac = INT2NUM(LOG_USER);
|
||||
}
|
||||
|
||||
Check_SafeStr(ident);
|
||||
syslog_ident = ident;
|
||||
syslog_options = opt;
|
||||
syslog_facility = fac;
|
||||
openlog(RSTRING(ident)->ptr, NUM2INT(opt), NUM2INT(fac));
|
||||
syslog_opened = 1;
|
||||
|
||||
setlogmask(mask = setlogmask(0));
|
||||
syslog_mask = INT2NUM(mask);
|
||||
|
||||
/* be like File.new.open {...} */
|
||||
if (rb_block_given_p()) {
|
||||
rb_ensure(rb_yield, self, cSyslog_close, self);
|
||||
}
|
||||
|
||||
return self;
|
||||
}
|
||||
|
||||
static VALUE cSyslog_init(VALUE self)
|
||||
{
|
||||
syslog_instance = self;
|
||||
syslog_opened = 0;
|
||||
syslog_ident = Qnil;
|
||||
syslog_options = syslog_facility = syslog_mask = INT2FIX(-1);
|
||||
|
||||
return self;
|
||||
}
|
||||
|
||||
static VALUE cSyslog_reopen(int argc, VALUE *argv, VALUE self)
|
||||
{
|
||||
cSyslog_close(self);
|
||||
|
||||
return cSyslog_open(argc, argv, self);
|
||||
}
|
||||
|
||||
static VALUE cSyslog_isopen(VALUE self)
|
||||
{
|
||||
return syslog_opened ? Qtrue : Qfalse;
|
||||
}
|
||||
|
||||
static VALUE cSyslog_ident(VALUE self)
|
||||
{
|
||||
return syslog_ident;
|
||||
}
|
||||
|
||||
static VALUE cSyslog_options(VALUE self)
|
||||
{
|
||||
return syslog_options;
|
||||
}
|
||||
|
||||
static VALUE cSyslog_facility(VALUE self)
|
||||
{
|
||||
return syslog_facility;
|
||||
}
|
||||
|
||||
static VALUE cSyslog_get_mask(VALUE self)
|
||||
{
|
||||
return syslog_mask;
|
||||
}
|
||||
|
||||
static VALUE cSyslog_set_mask(VALUE self, VALUE mask)
|
||||
{
|
||||
if (!syslog_opened) {
|
||||
rb_raise(rb_eRuntimeError, "must open syslog before setting log mask");
|
||||
}
|
||||
|
||||
setlogmask(NUM2INT(mask));
|
||||
syslog_mask = mask;
|
||||
|
||||
return mask;
|
||||
}
|
||||
|
||||
static VALUE cSyslog_log(int argc, VALUE *argv, VALUE self)
|
||||
{
|
||||
VALUE pri;
|
||||
|
||||
if (argc < 2) {
|
||||
rb_raise(rb_eArgError, "wrong # of arguments(%d for 2+)", argc);
|
||||
}
|
||||
|
||||
argc--;
|
||||
pri = *argv++;
|
||||
|
||||
if (!FIXNUM_P(pri)) {
|
||||
rb_raise(rb_eTypeError, "type mismatch: %s given", rb_class2name(CLASS_OF(pri)));
|
||||
}
|
||||
|
||||
syslog_write(FIX2INT(pri), argc, argv);
|
||||
|
||||
return self;
|
||||
}
|
||||
|
||||
static VALUE cSyslog_inspect(VALUE self)
|
||||
{
|
||||
#define N 7
|
||||
int argc = N;
|
||||
VALUE argv[N];
|
||||
const char fmt[] =
|
||||
"<#%s: opened=%s, ident=\"%s\", options=%d, facility=%d, mask=%d>";
|
||||
|
||||
argv[0] = rb_str_new(fmt, sizeof(fmt) - 1);
|
||||
argv[1] = cSyslog;
|
||||
argv[2] = syslog_opened ? Qtrue : Qfalse;
|
||||
argv[3] = syslog_ident;
|
||||
argv[4] = syslog_options;
|
||||
argv[5] = syslog_facility;
|
||||
argv[6] = syslog_mask;
|
||||
|
||||
return rb_f_sprintf(argc, argv);
|
||||
#undef N
|
||||
}
|
||||
|
||||
#define define_syslog_shortcut_method(pri, name) \
|
||||
static VALUE cSyslog_##name(int argc, VALUE *argv, VALUE self) \
|
||||
{ \
|
||||
syslog_write(pri, argc, argv); \
|
||||
\
|
||||
return self; \
|
||||
}
|
||||
|
||||
#ifdef LOG_EMERG
|
||||
define_syslog_shortcut_method(LOG_EMERG, emerg)
|
||||
#endif
|
||||
#ifdef LOG_ALERT
|
||||
define_syslog_shortcut_method(LOG_ALERT, alert)
|
||||
#endif
|
||||
#ifdef LOG_CRIT
|
||||
define_syslog_shortcut_method(LOG_CRIT, crit)
|
||||
#endif
|
||||
#ifdef LOG_ERR
|
||||
define_syslog_shortcut_method(LOG_ERR, err)
|
||||
#endif
|
||||
#ifdef LOG_WARNING
|
||||
define_syslog_shortcut_method(LOG_WARNING, warning)
|
||||
#endif
|
||||
#ifdef LOG_NOTICE
|
||||
define_syslog_shortcut_method(LOG_NOTICE, notice)
|
||||
#endif
|
||||
#ifdef LOG_INFO
|
||||
define_syslog_shortcut_method(LOG_INFO, info)
|
||||
#endif
|
||||
#ifdef LOG_DEBUG
|
||||
define_syslog_shortcut_method(LOG_DEBUG, debug)
|
||||
#endif
|
||||
|
||||
/* Syslog class methods */
|
||||
static VALUE cSyslog_s_instance(VALUE klass)
|
||||
{
|
||||
VALUE obj;
|
||||
|
||||
obj = syslog_instance;
|
||||
|
||||
if (NIL_P(obj)) {
|
||||
obj = rb_obj_alloc(klass);
|
||||
rb_obj_call_init(obj, 0, NULL);
|
||||
}
|
||||
|
||||
return obj;
|
||||
}
|
||||
|
||||
static VALUE cSyslog_s_open(int argc, VALUE *argv, VALUE klass)
|
||||
{
|
||||
VALUE obj;
|
||||
|
||||
obj = cSyslog_s_instance(klass);
|
||||
|
||||
cSyslog_open(argc, argv, obj);
|
||||
|
||||
return obj;
|
||||
}
|
||||
|
||||
static VALUE cSyslog_s_LOG_MASK(VALUE klass, VALUE pri)
|
||||
{
|
||||
return INT2FIX(LOG_MASK(FIX2INT(pri)));
|
||||
}
|
||||
|
||||
static VALUE cSyslog_s_LOG_UPTO(VALUE klass, VALUE pri)
|
||||
{
|
||||
return INT2FIX(LOG_UPTO(FIX2INT(pri)));
|
||||
}
|
||||
|
||||
/* Init for package syslog */
|
||||
void Init_syslog()
|
||||
{
|
||||
cSyslog = rb_define_class("Syslog", rb_cObject);
|
||||
|
||||
mSyslogConstants = rb_define_module_under(cSyslog, "Constants");
|
||||
|
||||
rb_include_module(cSyslog, mSyslogConstants);
|
||||
|
||||
rb_define_module_function(cSyslog, "open", cSyslog_s_open, -1);
|
||||
rb_define_module_function(cSyslog, "instance", cSyslog_s_instance, 0);
|
||||
rb_define_module_function(cSyslog, "LOG_MASK", cSyslog_s_LOG_MASK, 1);
|
||||
rb_define_module_function(cSyslog, "LOG_UPTO", cSyslog_s_LOG_UPTO, 1);
|
||||
|
||||
rb_undef_method(CLASS_OF(cSyslog), "new");
|
||||
|
||||
rb_define_method(cSyslog, "initialize", cSyslog_init, 0);
|
||||
rb_define_method(cSyslog, "open", cSyslog_open, -1);
|
||||
rb_define_method(cSyslog, "reopen", cSyslog_reopen, -1);
|
||||
rb_define_method(cSyslog, "open!", cSyslog_reopen, -1);
|
||||
rb_define_method(cSyslog, "opened?", cSyslog_isopen, 0);
|
||||
|
||||
rb_define_method(cSyslog, "ident", cSyslog_ident, 0);
|
||||
rb_define_method(cSyslog, "options", cSyslog_options, 0);
|
||||
rb_define_method(cSyslog, "facility", cSyslog_facility, 0);
|
||||
|
||||
rb_define_method(cSyslog, "log", cSyslog_log, -1);
|
||||
rb_define_method(cSyslog, "close", cSyslog_close, 0);
|
||||
rb_define_method(cSyslog, "mask", cSyslog_get_mask, 0);
|
||||
rb_define_method(cSyslog, "mask=", cSyslog_set_mask, 1);
|
||||
|
||||
rb_define_method(cSyslog, "inspect", cSyslog_inspect, 0);
|
||||
|
||||
#define rb_define_syslog_const(id) \
|
||||
rb_define_const(mSyslogConstants, #id, INT2NUM(id))
|
||||
|
||||
/* Various options when opening log */
|
||||
#ifdef LOG_PID
|
||||
rb_define_syslog_const(LOG_PID);
|
||||
#endif
|
||||
#ifdef LOG_CONS
|
||||
rb_define_syslog_const(LOG_CONS);
|
||||
#endif
|
||||
#ifdef LOG_ODELAY
|
||||
rb_define_syslog_const(LOG_ODELAY); /* deprecated */
|
||||
#endif
|
||||
#ifdef LOG_NDELAY
|
||||
rb_define_syslog_const(LOG_NDELAY);
|
||||
#endif
|
||||
#ifdef LOG_NOWAIT
|
||||
rb_define_syslog_const(LOG_NOWAIT); /* deprecated */
|
||||
#endif
|
||||
#ifdef LOG_PERROR
|
||||
rb_define_syslog_const(LOG_PERROR);
|
||||
#endif
|
||||
|
||||
/* Various syslog facilities */
|
||||
#ifdef LOG_AUTH
|
||||
rb_define_syslog_const(LOG_AUTH);
|
||||
#endif
|
||||
#ifdef LOG_AUTHPRIV
|
||||
rb_define_syslog_const(LOG_AUTHPRIV);
|
||||
#endif
|
||||
#ifdef LOG_CONSOLE
|
||||
rb_define_syslog_const(LOG_CONSOLE);
|
||||
#endif
|
||||
#ifdef LOG_CRON
|
||||
rb_define_syslog_const(LOG_CRON);
|
||||
#endif
|
||||
#ifdef LOG_DAEMON
|
||||
rb_define_syslog_const(LOG_DAEMON);
|
||||
#endif
|
||||
#ifdef LOG_FTP
|
||||
rb_define_syslog_const(LOG_FTP);
|
||||
#endif
|
||||
#ifdef LOG_KERN
|
||||
rb_define_syslog_const(LOG_KERN);
|
||||
#endif
|
||||
#ifdef LOG_LPR
|
||||
rb_define_syslog_const(LOG_LPR);
|
||||
#endif
|
||||
#ifdef LOG_MAIL
|
||||
rb_define_syslog_const(LOG_MAIL);
|
||||
#endif
|
||||
#ifdef LOG_NEWS
|
||||
rb_define_syslog_const(LOG_NEWS);
|
||||
#endif
|
||||
#ifdef LOG_NTP
|
||||
rb_define_syslog_const(LOG_NTP);
|
||||
#endif
|
||||
#ifdef LOG_SECURITY
|
||||
rb_define_syslog_const(LOG_SECURITY);
|
||||
#endif
|
||||
#ifdef LOG_SYSLOG
|
||||
rb_define_syslog_const(LOG_SYSLOG);
|
||||
#endif
|
||||
#ifdef LOG_USER
|
||||
rb_define_syslog_const(LOG_USER);
|
||||
#endif
|
||||
#ifdef LOG_UUCP
|
||||
rb_define_syslog_const(LOG_UUCP);
|
||||
#endif
|
||||
#ifdef LOG_LOCAL0
|
||||
rb_define_syslog_const(LOG_LOCAL0);
|
||||
#endif
|
||||
#ifdef LOG_LOCAL1
|
||||
rb_define_syslog_const(LOG_LOCAL1);
|
||||
#endif
|
||||
#ifdef LOG_LOCAL2
|
||||
rb_define_syslog_const(LOG_LOCAL2);
|
||||
#endif
|
||||
#ifdef LOG_LOCAL3
|
||||
rb_define_syslog_const(LOG_LOCAL3);
|
||||
#endif
|
||||
#ifdef LOG_LOCAL4
|
||||
rb_define_syslog_const(LOG_LOCAL4);
|
||||
#endif
|
||||
#ifdef LOG_LOCAL5
|
||||
rb_define_syslog_const(LOG_LOCAL5);
|
||||
#endif
|
||||
#ifdef LOG_LOCAL6
|
||||
rb_define_syslog_const(LOG_LOCAL6);
|
||||
#endif
|
||||
#ifdef LOG_LOCAL7
|
||||
rb_define_syslog_const(LOG_LOCAL7);
|
||||
#endif
|
||||
|
||||
#define rb_define_syslog_shortcut(name) \
|
||||
rb_define_method(cSyslog, #name, cSyslog_##name, -1)
|
||||
|
||||
/* Various syslog priorities and the shortcut methods */
|
||||
#ifdef LOG_EMERG
|
||||
rb_define_syslog_const(LOG_EMERG);
|
||||
rb_define_syslog_shortcut(emerg);
|
||||
#endif
|
||||
#ifdef LOG_ALERT
|
||||
rb_define_syslog_const(LOG_ALERT);
|
||||
rb_define_syslog_shortcut(alert);
|
||||
#endif
|
||||
#ifdef LOG_CRIT
|
||||
rb_define_syslog_const(LOG_CRIT);
|
||||
rb_define_syslog_shortcut(crit);
|
||||
#endif
|
||||
#ifdef LOG_ERR
|
||||
rb_define_syslog_const(LOG_ERR);
|
||||
rb_define_syslog_shortcut(err);
|
||||
#endif
|
||||
#ifdef LOG_WARNING
|
||||
rb_define_syslog_const(LOG_WARNING);
|
||||
rb_define_syslog_shortcut(warning);
|
||||
#endif
|
||||
#ifdef LOG_NOTICE
|
||||
rb_define_syslog_const(LOG_NOTICE);
|
||||
rb_define_syslog_shortcut(notice);
|
||||
#endif
|
||||
#ifdef LOG_INFO
|
||||
rb_define_syslog_const(LOG_INFO);
|
||||
rb_define_syslog_shortcut(info);
|
||||
#endif
|
||||
#ifdef LOG_DEBUG
|
||||
rb_define_syslog_const(LOG_DEBUG);
|
||||
rb_define_syslog_shortcut(debug);
|
||||
#endif
|
||||
}
|
||||
124
ext/syslog/syslog.txt
Normal file
124
ext/syslog/syslog.txt
Normal file
|
|
@ -0,0 +1,124 @@
|
|||
.\" syslog.txt - -*- Indented-Text -*-
|
||||
$RoughId: syslog.txt,v 1.15 2001/11/25 21:21:23 knu Exp $
|
||||
$Id$
|
||||
|
||||
UNIX Syslog extension for Ruby
|
||||
Amos Gouaux, University of Texas at Dallas
|
||||
<amos+ruby@utdallas.edu>
|
||||
&
|
||||
Akinori MUSHA
|
||||
<knu@ruby-lang.org>
|
||||
|
||||
** Syslog(Class)
|
||||
|
||||
Superclass: Object
|
||||
|
||||
Mix-ins: Syslog::Constants
|
||||
|
||||
require 'syslog'
|
||||
|
||||
A Simple wrapper for the UNIX syslog system calls that might be handy
|
||||
if you're writing a server in Ruby. For the details of the syslog(8)
|
||||
architecture and constants, see the syslog(3) manual page of your
|
||||
platform.
|
||||
|
||||
Class Methods:
|
||||
|
||||
open(ident = $0, logopt = Syslog::LOG_PID | Syslog::LOG_CONS,
|
||||
facility = Syslog::LOG_USER) [{ |syslog| ... }]
|
||||
|
||||
Opens syslog with the given options and returns the singleton
|
||||
object of the Syslog class. If a block is given, calls it
|
||||
with an argument of the object. If syslog is already opened,
|
||||
raises RuntimeError.
|
||||
|
||||
Example:
|
||||
sl = Syslog.open('ftpd', Syslog::LOG_PID | Syslog::LOG_NDELAY,
|
||||
Syslog::LOG_FTP)
|
||||
|
||||
instance
|
||||
|
||||
Returns the singleton object.
|
||||
|
||||
LOG_MASK(pri)
|
||||
|
||||
Creates a mask for one priority.
|
||||
|
||||
LOG_UPTO(pri)
|
||||
|
||||
Creates a mask for all priorities up to pri.
|
||||
|
||||
Methods:
|
||||
|
||||
open(ident = $0, logopt = Syslog::LOG_PID | Syslog::LOG_CONS,
|
||||
facility = Syslog::LOG_USER)
|
||||
|
||||
Opens syslog with the given options. If syslog is already
|
||||
opened, raises RuntimeError.
|
||||
|
||||
open!(ident = $0, logopt = Syslog::LOG_PID | Syslog::LOG_CONS,
|
||||
facility = Syslog::LOG_USER)
|
||||
reopen(ident = $0, logopt = Syslog::LOG_PID | Syslog::LOG_CONS,
|
||||
facility = Syslog::LOG_USER)
|
||||
|
||||
Same as open, but does a close first.
|
||||
|
||||
opened?
|
||||
|
||||
Returns true if syslog opened, otherwise false.
|
||||
|
||||
ident
|
||||
options
|
||||
facility
|
||||
|
||||
Returns the parameters given in the last open, respectively.
|
||||
Every call of Syslog::open/Syslog#open resets those values.
|
||||
|
||||
log(pri, message, ...)
|
||||
|
||||
Writes message to syslog.
|
||||
|
||||
Example:
|
||||
sl.log(Syslog::LOG_CRIT, "the sky is falling in %d seconds!", 10)
|
||||
|
||||
crit(message, ...)
|
||||
emerg(message, ...)
|
||||
alert(message, ...)
|
||||
err(message, ...)
|
||||
warning(message, ...)
|
||||
notice(message, ...)
|
||||
info(message, ...)
|
||||
debug(message, ...)
|
||||
|
||||
These are shortcut methods of Syslog#log(). The Lineup may
|
||||
vary depending on what priorities are defined on your system.
|
||||
|
||||
Example:
|
||||
sl.crit("the sky is falling in %d seconds!",5)
|
||||
|
||||
mask
|
||||
mask=(mask)
|
||||
|
||||
Returns or sets the log priority mask. The value of the mask
|
||||
is persistent and Syslog::open/Syslog#open/Syslog#close don't
|
||||
reset it.
|
||||
|
||||
Example:
|
||||
sl.mask = Syslog::LOG_UPTO(Syslog::LOG_ERR)
|
||||
|
||||
close
|
||||
|
||||
Closes syslog.
|
||||
|
||||
inspect
|
||||
|
||||
Returns the "inspect" string of the object.
|
||||
|
||||
** Syslog::Constants(Module)
|
||||
|
||||
Superclass: Object
|
||||
|
||||
require 'syslog'
|
||||
include Syslog::Constants
|
||||
|
||||
This module includes the LOG_* constants available on the system.
|
||||
161
ext/syslog/test.rb
Normal file
161
ext/syslog/test.rb
Normal file
|
|
@ -0,0 +1,161 @@
|
|||
#!/usr/bin/env ruby
|
||||
# $RoughId: test.rb,v 1.8 2001/11/24 18:11:32 knu Exp $
|
||||
# $Id$
|
||||
|
||||
# Please only run this test on machines reasonable for testing.
|
||||
# If in doubt, ask your admin.
|
||||
|
||||
require 'runit/testcase'
|
||||
require 'runit/cui/testrunner'
|
||||
|
||||
# Prepend current directory to load path for testing.
|
||||
$:.unshift('.')
|
||||
|
||||
require 'syslog'
|
||||
|
||||
class TestSyslog < RUNIT::TestCase
|
||||
def test_s_new
|
||||
assert_exception(NameError) {
|
||||
Syslog.new
|
||||
}
|
||||
end
|
||||
|
||||
def test_s_instance
|
||||
sl1 = Syslog.instance
|
||||
sl2 = Syslog.open
|
||||
sl3 = Syslog.instance
|
||||
|
||||
assert_equal(sl1, sl2)
|
||||
assert_equal(sl1, sl3)
|
||||
ensure
|
||||
sl1.close
|
||||
end
|
||||
|
||||
def test_s_open
|
||||
# default parameters
|
||||
sl = Syslog.open
|
||||
|
||||
assert_equal($0, sl.ident)
|
||||
assert_equal(Syslog::LOG_PID | Syslog::LOG_CONS, sl.options)
|
||||
assert_equal(Syslog::LOG_USER, sl.facility)
|
||||
|
||||
# open without close
|
||||
assert_exception(RuntimeError) {
|
||||
sl.open
|
||||
}
|
||||
|
||||
sl.close
|
||||
|
||||
# given parameters
|
||||
sl = Syslog.open("foo", Syslog::LOG_NDELAY | Syslog::LOG_PERROR, Syslog::LOG_DAEMON)
|
||||
|
||||
assert_equal('foo', sl.ident)
|
||||
assert_equal(Syslog::LOG_NDELAY | Syslog::LOG_PERROR, sl.options)
|
||||
assert_equal(Syslog::LOG_DAEMON, sl.facility)
|
||||
|
||||
sl.close
|
||||
|
||||
# default parameters again (after close)
|
||||
sl = Syslog.open
|
||||
sl.close
|
||||
|
||||
assert_equal($0, sl.ident)
|
||||
assert_equal(Syslog::LOG_PID | Syslog::LOG_CONS, sl.options)
|
||||
assert_equal(Syslog::LOG_USER, sl.facility)
|
||||
|
||||
# block
|
||||
param = nil
|
||||
Syslog.open { |param| }
|
||||
assert_equal(sl, param)
|
||||
ensure
|
||||
sl.close
|
||||
end
|
||||
|
||||
def test_opened?
|
||||
sl = Syslog.instance
|
||||
assert_equal(false, sl.opened?)
|
||||
|
||||
sl.open
|
||||
assert_equal(true, sl.opened?)
|
||||
|
||||
sl.close
|
||||
assert_equal(false, sl.opened?)
|
||||
|
||||
sl.open {
|
||||
assert_equal(true, sl.opened?)
|
||||
}
|
||||
|
||||
assert_equal(false, sl.opened?)
|
||||
end
|
||||
|
||||
def test_mask
|
||||
sl = Syslog.open
|
||||
|
||||
orig = sl.mask
|
||||
|
||||
sl.mask = Syslog.LOG_UPTO(Syslog::LOG_ERR)
|
||||
assert_equal(Syslog.LOG_UPTO(Syslog::LOG_ERR), sl.mask)
|
||||
|
||||
sl.mask = Syslog.LOG_MASK(Syslog::LOG_CRIT)
|
||||
assert_equal(Syslog.LOG_MASK(Syslog::LOG_CRIT), sl.mask)
|
||||
|
||||
sl.mask = orig
|
||||
ensure
|
||||
sl.close
|
||||
end
|
||||
|
||||
def test_log
|
||||
stderr = IO::pipe
|
||||
|
||||
pid = fork {
|
||||
stderr[0].close
|
||||
STDERR.reopen(stderr[1])
|
||||
stderr[1].close
|
||||
|
||||
options = Syslog::LOG_PERROR | Syslog::LOG_NDELAY
|
||||
|
||||
Syslog.open("syslog_test", options) { |sl|
|
||||
sl.log(Syslog::LOG_NOTICE, "test1 - hello, %s!", "world")
|
||||
sl.notice("test1 - hello, %s!", "world")
|
||||
}
|
||||
|
||||
Syslog.open("syslog_test", options | Syslog::LOG_PID) { |sl|
|
||||
sl.log(Syslog::LOG_CRIT, "test2 - pid")
|
||||
sl.crit("test2 - pid")
|
||||
}
|
||||
exit!
|
||||
}
|
||||
|
||||
stderr[1].close
|
||||
Process.waitpid(pid)
|
||||
|
||||
# LOG_PERROR is not yet implemented on Cygwin.
|
||||
return if RUBY_PLATFORM =~ /cygwin/
|
||||
|
||||
2.times {
|
||||
assert_equal("syslog_test: test1 - hello, world!\n", stderr[0].gets)
|
||||
}
|
||||
|
||||
2.times {
|
||||
assert_equal(format("syslog_test[%d]: test2 - pid\n", pid), stderr[0].gets)
|
||||
}
|
||||
end
|
||||
|
||||
def test_inspect
|
||||
Syslog.open { |sl|
|
||||
assert_equal(format('<#%s: opened=%s, ident="%s", ' +
|
||||
'options=%d, facility=%d, mask=%d>',
|
||||
Syslog, sl.opened?, sl.ident,
|
||||
sl.options, sl.facility, sl.mask),
|
||||
sl.inspect)
|
||||
}
|
||||
end
|
||||
end
|
||||
|
||||
if $0 == __FILE__
|
||||
suite = RUNIT::TestSuite.new
|
||||
|
||||
suite.add_test(TestSyslog.suite)
|
||||
|
||||
RUNIT::CUI::TestRunner.run(suite)
|
||||
end
|
||||
Loading…
Reference in a new issue