blob: b449a5a0c878a0c45bfe02799e7d02174dcc0cc4 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
|
<?php
/**
* $Header: /cvsroot/bitweaver/_bit_contact/edit.php,v 1.6 2010/02/08 21:27:22 wjames5 Exp $
*
* Copyright (c) 2006 bitweaver.org
* All Rights Reserved. See below for details and a complete list of authors.
* Licensed under the GNU LESSER GENERAL PUBLIC LICENSE. See http://www.gnu.org/copyleft/lesser.html for details
*
* @package contact
* @subpackage functions
*/
/**
* required setup
*/
require_once '../kernel/includes/setup_inc.php';
$gBitSystem->verifyPackage( 'contact' );
$gBitSystem->verifyPermission( 'p_contact_update' );
include_once CONTACT_PKG_INCLUDE_PATH . 'lookup_contact_inc.php';
if (!empty( $gContent->mInfo )) {
$formInfo = $gContent->mInfo;
$formInfo['edit'] = !empty( $gContent->mInfo['data'] ) ? $gContent->mInfo['data'] : '';
}
require_once 'import/Mbox.php';
require_once 'import/mimeDecode.php';
//reads a mbox file
$file = '/srv/website/bitweaver/contact/data/Stockport';
echo 'Using file ' . $file . "<br>";
$mbox = new Mail_Mbox( $file );
$mbox->open();
for ( $n = 0; $n < $mbox->size(); $n++ ) {
$message = $mbox->get( $n );
preg_match( '/Subject: (.*)$/m', $message, $matches );
$subject = $matches[1];
echo 'Mail #' . $n . ': ' . $subject . "<br>";
$Decoder = new Mail_mimeDecode( $message );
$params = [
'include_bodies' => true,
'decode_bodies' => true,
'decode_headers' => true,
];
$Decoded = $Decoder->decode( $params );
if ($Decoded->ctype_primary == "multipart") {
\Bitweaver\vd( $Decoded->parts[0]->ctype_primary );
\Bitweaver\vd( $Decoded->parts[0]->ctype_secondary );
print $Decoded->parts[0]->body;
}
else {
\Bitweaver\vd( $Decoded->ctype_primary );
\Bitweaver\vd( $Decoded->ctype_secondary );
print $Decoded->body;
}
\Bitweaver\vd( $Decoded->headers );
print $message;
}
$mbox->close();
// formInfo might be set due to a error on submit
if( empty( $formInfo ) ) {
$formInfo = &$gContent->mInfo;
}
$formInfo['contact_type_list'] = $gContent->getXrefSourceList();
$gBitSmarty->assign( 'pageInfo', $formInfo );
$gBitSmarty->assign( 'errors', $gContent->mErrors );
$gBitSmarty->assign( (!empty( $_REQUEST['tab'] ) ? $_REQUEST['tab'] : 'body').'TabSelect', 'tdefault' );
$gBitSmarty->assign('show_page_bar', 'y');
$gBitSystem->display( 'bitpackage:contact/edit.tpl', 'Edit: ' , [ 'display_mode' => 'edit' ]);
|
