head	1.4;
access;
symbols;
locks; strict;
comment	@# @;


1.4
date	2000.08.28.02.28.20;	author chuck;	state dead;
branches;
next	1.3;

1.3
date	2000.01.17.22.11.00;	author chuck;	state Exp;
branches;
next	1.2;

1.2
date	2000.01.06.05.01.08;	author chuck;	state Exp;
branches;
next	1.1;

1.1
date	99.07.20.07.36.25;	author jon;	state Exp;
branches;
next	;


desc
@@


1.4
log
@starting to modernize babel - nothing autogenerated, standard
directory/library names, etc.
@
text
@function can_read (&$request_ref) {
  global $conf;
  
  if (!($request_ref->topic))
    return success();
  
  if (!($username = $request_ref->username))
    return error("'username' not found in request");
  
  if (!($administrator = $conf['admin']['user']))
    return error("'administrator' not found in conf");
  
  if (!($editors = $request_ref->editors))
    return error("editors not found in conf");
  
  if (!($users = $request_ref->users))
    return error("users not found in conf");
  
  if (!($anonymous = $conf['anonymous']['login']))
    return error("'anonymous_login' not found in conf");
  
  if (($username == $anonymous) && !$conf['anonymous']['can_read'])
    return FAILURE;
  
  if (preg_match("/^.*$/", implode("\n", $users))) return success();
  if ($username == $administrator)         return success();
  if (member($username, $editors))         return success();
  if (member($username, $users))           return success();
  
  return FAILURE;
}
@


1.3
log
@Another whomping commit that really doesn't do much tangible. The conf
system is now moved over to the $conf[section][value|subsection] mode that
the other cvs horde stuff is using.

Also, I'm compacting and tightening up the code wherever possible when I go.
Lots of major changes - moving the configuration of forums into the
database, changes in the database code for faster sql access, options to put
different forums in different tables/databases, and some nifty setup ideas -
to come.

Comments on what people would like to see in a forum system - I've already
thought of being able to attach files (where should they be stored?) - would
be welcome.
@
text
@@


1.2
log
@The Great ereg->preg change hits the cvs branch. I got a few things in
Babel, the DuctTape stuff, etc as well as horde and imp. Changelogs updated
as well. If you find any errors that seem to be related, let me know, but it
was actually pretty straightforward.
@
text
@d2 2
d10 1
a10 1
  if (!($administrator = $request_ref->conf['administrator']))
d19 1
a19 1
  if (!($anonymous = $request_ref->conf['anonymous_login']))
d22 1
a22 1
  if (($username == $anonymous) && !$request_ref->conf['anonymous_can_read'])
@


1.1
log
@
jon: alrighty, babel.php3.in is now broken down into seperate
     function files.  they're jusy dying to be combined into
     objects and seperate source files.
@
text
@d23 1
a23 1
  if (ereg("^.*$", implode("\n", $users))) return success();
@

