File: deletefolder.php

package info (click to toggle)
postaci 1.1.3-4
  • links: PTS
  • area: main
  • in suites: woody
  • size: 1,176 kB
  • ctags: 1,382
  • sloc: php: 6,083; sql: 1,035; sh: 488; makefile: 47; pascal: 24
file content (71 lines) | stat: -rwxr-xr-x 2,632 bytes parent folder | download
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
<?
/*
   File name         : deletefolder.php
   Version           : 1.1.0
   Last Modified By  : Umut Gokbayrak
   e-mail            : umut@trlinux.com
   Purpose           : Deletes a mailbox
   Last modified     : 16 Sep 2000
*/

include ("includes/global.inc");
session_start();

// ID comparison between logged hash and session. If they are both the same, let the user to go on...
$dbq = $db->execute("select * from tblLoggedUsers where hash = '$ID'");
$log_id   = $dbq->fields['log_id'];
$user_id  = $dbq->fields['user_id'];
$username = $dbq->fields['username'];
$password = $dbq->fields['password'];
$dbq->close();

$mbox_id = rawurldecode($mbox_id);
if ($log_id == ""){
  Header("Location: index.php?error_id=1");
} else {
  if ($default_protocol == "imap") {   // protocol = imap
    include ("$postaci_directory" . "classes/imap_pop3.inc");
    $email=new imap_pop3($default_port,$default_protocol,$default_host,$username,$password,"INBOX");
    imap_unsubscribe($email->mbox, "{" . $default_host . "}$mbox_id");
    $sonuc = imap_deletemailbox($email->mbox, "{" . $default_host . "}$mbox_id");
    if (!$sonuc) {
      Header("Location: folders.php?error_id=6");
      exit;
    }
  } else {                             // protocol = pop3
    $dbq = $db->execute("select user_id from tblMailBoxes where mbox_id = $mbox_id"); // security check
    $auth_user   = $dbq->fields['user_id'];
    if ($auth_user != $user_id) {
      Header("Location: index.php?error_id=1");
    }

    // delete the folder
    $dbq = $db->execute("delete from tblMailBoxes where mbox_id = $mbox_id and user_id = $user_id");
    $dbq->close();

    // delete the attachments and messages
    $dbq = $db->execute("select message_id from tblMessages where mbox_id = $mbox_id and user_id = $user_id");
    while (!$dbq->EOF) {
      $message_id = $dbq->fields['message_id'];
      $dbq2 = $db->execute("select file_actual_name from tblAttachments where message_id = $message_id and user_id = $user_id");
      while (!$dbq2->EOF) {
        $act_name = $dbq2->fields['file_actual_name'];
        if (file_exists($act_name)) {
          unlink($act_name);
        }
        $dbq2->nextRow();
      }
      $dbq2->close();
      $dbq3 = $db->execute("delete from tblAtachments where message_id = $message_id and user_id = $user_id");
      $dbq3->close();
      $dbq->nextRow();
    }
    $dbq->close();
    $dbq = $db->execute("delete from tblMessages where mbox_id = $mbox_id and user_id = $user_id");
    $dbq->close();
  } // end if

  Header("Location: folders.php");
}

?>