| 36 |
kaklik |
1 |
<?php
|
|
|
2 |
|
|
|
3 |
/*
|
|
|
4 |
V4.80 8 Mar 2006 (c) 2000-2006 John Lim (jlim@natsoft.com.my). All rights reserved.
|
|
|
5 |
Contributed by Ross Smith (adodb@netebb.com).
|
|
|
6 |
Released under both BSD license and Lesser GPL library license.
|
|
|
7 |
Whenever there is any discrepancy between the two licenses,
|
|
|
8 |
the BSD license will take precedence.
|
|
|
9 |
Set tabs to 4 for best viewing.
|
|
|
10 |
|
|
|
11 |
*/
|
|
|
12 |
|
|
|
13 |
@define('HORDE_BASE', dirname(dirname(dirname(__FILE__))) . '/horde');
|
|
|
14 |
|
|
|
15 |
if (!is_dir(HORDE_BASE)) {
|
|
|
16 |
trigger_error(sprintf('Directory not found: \'%s\'', HORDE_BASE), E_USER_ERROR);
|
|
|
17 |
return 0;
|
|
|
18 |
}
|
|
|
19 |
|
|
|
20 |
include_once HORDE_BASE . '/lib/Horde.php';
|
|
|
21 |
include_once HORDE_BASE . '/lib/Secret.php';
|
|
|
22 |
|
|
|
23 |
/**
|
|
|
24 |
|
|
|
25 |
NOTE: On Windows 2000 SP4 with PHP 4.3.1, MCrypt 2.4.x, and Apache 1.3.28,
|
|
|
26 |
the session didn't work properly.
|
|
|
27 |
|
|
|
28 |
This may be resolved with 4.3.3.
|
|
|
29 |
|
|
|
30 |
*/
|
|
|
31 |
class ADODB_Encrypt_Secret {
|
|
|
32 |
/**
|
|
|
33 |
*/
|
|
|
34 |
function write($data, $key) {
|
|
|
35 |
return Secret::write($key, $data);
|
|
|
36 |
}
|
|
|
37 |
|
|
|
38 |
/**
|
|
|
39 |
*/
|
|
|
40 |
function read($data, $key) {
|
|
|
41 |
return Secret::read($key, $data);
|
|
|
42 |
}
|
|
|
43 |
|
|
|
44 |
}
|
|
|
45 |
|
|
|
46 |
return 1;
|
|
|
47 |
|
|
|
48 |
?>
|