Go Back   vb.org Archive > vBulletin Modifications > Archive > vB.org Archives > vBulletin 3.0 > vBulletin 3.0 Full Releases
FAQ Community Calendar Today's Posts Search

Reply
 
Thread Tools
vBouncer : Change thread subscribtion options for members with bouncing emails Details »»
vBouncer : Change thread subscribtion options for members with bouncing emails
Version: 1.00, by tamarian tamarian is offline
Developer Last Online: Nov 2023 Show Printable Version Email this Page

Version: 3.0.0 Rating:
Released: 02-07-2004 Last Update: Never Installs: 16
 
No support by the author.

Update April 5th: Step 2A for vBulletin 3 Gold added.

What vBouncer does
vBouncer will reduce your server load, bandwidth, and your forum admin in-box, by unsubscribing members who keep bouncing their emails back to your forum admin email, which may bomb your mail box if you have a busy forum with many members who subscribe to many threads, but their emails are either invalid, inbox full, or have ISP problems.

Screen shots
None, this is a command line script, with some changes in functions.php

Who may want to use this?
1. Very busy sites, with thousands of notifications a day.
2. Your admin box gets too many bouncing emails
3. You use Postfix or Sendmail. I'm not sure how this works on other mail servers, please let me know if this works with QMail, or Exism.

Caution
This may drive some of your members mad If their email bounces a lot, this script will modify their subscriptions from their favourite threads. They will have to fix their email account, and then modify their subscribtion manually to each thread again... This may not be due to bad emails, just ISP-side problems.

Use at your own risk. I'm sharing this since some indicated interest at vBulletin.com in this thread:
http://www.vbulletin.com/forum/showt...threadid=71496
I'd be glad to help answer questions, but as with most hacks, it is your responsibility....


Installation
1. Create a unique email address on your server, dedicated to catch bouncing emails. Do not use adminemail, or any other existing email that you want to receive through a POP account. This email will be used only to catch bouncing emails.

Recommended name (makes for less editing): subscriber_notify

2. For vB 3.0.3 (older versions below, steps 2a or 2b)

I have yet to upgrade to 3.0.3, so this is contributed by ScottA:
Quote:
Originally Posted by ScottA
I got this running on 3.0.3. IIRC, what you need to do is open mail.php and look for this:

PHP Code:
    function Mail($toemail$subject$message$headers$fromemail$minusf false)
        {
            if (
$minusf)
            {
             
$this->success = @mail($toemail$subject$messagetrim($headers), "-f $fromemail");
            }
            else
            {
             
$this->success = @mail($toemail$subject$messagetrim($headers));
            }
        } 
And change it to this:

PHP Code:
    function Mail($toemail$subject$message$headers$fromemail$minusf false)
        {
            if (
$minusf)
            {
             
$this->success = @mail($toemail$subject$messagetrim($headers), "-f subscriber_notify@yourdomain.com");
            }
            else
            {
             
$this->success = @mail($toemail$subject$messagetrim($headers), "-f subscriber_notify@yourdomain.com");
            }
        } 
Note: You need to replace "subscriber_notify@yourdomain.com" with the email created in step 1.

2a. For vB3 gold
Edit functions.php

Find:
PHP Code:
       if ($vboptions['needfromemail'])
       {
         @
mail($toemail$subject$messagetrim($header), "-f $vboptions[webmasteremail]");
       }
       else
       {
           @
mail($toemail$subject$messagetrim($header));
       } 
Replace with (replace subscriber_notify@example.com with the email from step 1:
PHP Code:
   @mail($toemail$subject$messagetrim($header), "-fsubscriber_notify@example.com"); 

2b. For older, vB3 beta versions
Edit functions.php

Find:
PHP Code:
                   // send those mails
                 
if ($vboptions['needfromemail'])
                   {
                     @
mail($email['toemail'], $email['subject'], $email['message'], trim($email['header']), "-f $vboptions[webmasteremail]");
                   }
                   else
                   {
                     @
mail($email['toemail'], $email['subject'], $email['message'], trim($email['header']));
                   } 
Replace with (replace subscriber_notify@example.com with the email from step 1:
PHP Code:
                   // vBouncer hack
                 // Replace subscriber_notify email@example.com with the email from step 1
                 
mail($email['toemail'], $email['subject'], $email['message'], trim($email['header']), "-fsubscriber_notify@example.com");
                   
// end hack 

3. Copy vBouncer.pl.txt to a directory on your server above apache level. vBouncer.pl.txt is attached below.

Rename it to vBouncer.pl by typing:

mv vBounver.pl.txt vBouncer.pl

Make it executable by typing:

chmod +x vBouncer.pl

4. Edit the configuation section of vBouncer.pl
Code:
   #! /usr/bin/perl -w
   #
   # USAGE: ./vBouncer.pl -bounce : to unsubscribe threads from members with bouncing email
   #        ./vBouncer.pl : with no parameters to see (test) who will be unsubscribed
   #
   
   # Config:
   my $bouncelimit = 10;   # how many bounced emails are allowed, before taking actions
   my $downgrade = 0;      # What subscription level you will assign to bouncing members?
                           # 0 = No email, member will check subscribed thread through usercp
                           # 1 = Instant email, bad choice!
                           # 2 = Daily
                           # 3 = Weekly
   
 my $clearmailfile = 1;	# delete the mail file for bounced email when done (only deletes when -bounce option is used)
   
   my $bouncefile = "/var/spool/mail/subscriber_notify";
                           # the path/to/bouncing emails file. "subscriber_notify is the email name, you need
                           # to change it to the email name you chose for bouncing emails.
   
   
   my $db="database";        # mysql database name
   my $db_host="localhost";                # mysql host
   my $db_username="username";             # mysql username
   my $db_password="password";             # mysql password
   # end of config
5. Once a day or once a week (depending on the size of the spool size), you can run the scropt manually, or through a cron job. When done, you have to clear the email file, otherwise it will keep unsubscribing members whos emails no longer bounce.

To run the script in test mode, type:

./vBounver.pl

To run the script in bouncer mode, type:

./vBounver.pl -bouncer

To clear the mail box, use:
cat /dev/null > subscriber_notify
(or set the option in the script to do it)

Changes
Feel free to modify and post changes here or as new hacks, no credir or permission required. I may eventually add some features when I have the time.

Notes

1. The script assumes that Perl is installed @ /usr/bin/perl

If you have Perl installed elsewhere, you just need to update the first line of the script with the cirrect path:

#! /usr/bin/perl -w

2. You need to login to your server with a username that has write access to the mail spool, like a root/admin level user.

3. When run in test mode, ignore the warning "Use of uninitialized value in string eq at ./vBouncer.pl line 49" It just means you did not pass a parameter.

Show Your Support

  • This modification may not be copied, reproduced or published elsewhere without author's permission.

Comments
  #32  
Old 04-08-2004, 03:46 PM
Big Daddy Chemo Big Daddy Chemo is offline
 
Join Date: Oct 2002
Posts: 19
Благодарил(а): 0 раз(а)
Поблагодарили: 0 раз(а) в 0 сообщениях
Default

What app are you using to modify functions.php? I use Dreamweaver, Notepad, and wordpad but get parse errors on upload.

Chemo
Reply With Quote
  #33  
Old 04-08-2004, 09:39 PM
kontrabass kontrabass is offline
 
Join Date: Feb 2002
Posts: 139
Благодарил(а): 0 раз(а)
Поблагодарили: 0 раз(а) в 0 сообщениях
Default

Hmm...:
error:

Can't locate DBI.pm in @INC

I guess I need some soft of perl DBI module or something? Just guessing... ?

Thanks-
Reply With Quote
  #34  
Old 04-08-2004, 10:15 PM
tamarian tamarian is offline
 
Join Date: Oct 2001
Location: Canada
Posts: 1,205
Благодарил(а): 0 раз(а)
Поблагодарили: 0 раз(а) в 0 сообщениях
Default

Quote:
Originally Posted by Big Daddy Chemo
What app are you using to modify functions.php? I use Dreamweaver, Notepad, and wordpad but get parse errors on upload.

Chemo
I mostly use Quanta and Kate (Linux apps) on the desktop, or vi on the server.

I think many windows users use TextPad, or PHPEdit. Basically any programming editor, and make sure you upload as ASCII, not binary when using FTP.
Reply With Quote
  #35  
Old 04-08-2004, 10:16 PM
tamarian tamarian is offline
 
Join Date: Oct 2001
Location: Canada
Posts: 1,205
Благодарил(а): 0 раз(а)
Поблагодарили: 0 раз(а) в 0 сообщениях
Default

Quote:
Originally Posted by kontrabass
Hmm...:
error:

Can't locate DBI.pm in @INC

I guess I need some soft of perl DBI module or something? Just guessing... ?

Thanks-
Correct
Reply With Quote
  #36  
Old 04-09-2004, 03:22 PM
kontrabass kontrabass is offline
 
Join Date: Feb 2002
Posts: 139
Благодарил(а): 0 раз(а)
Поблагодарили: 0 раз(а) в 0 сообщениях
Default

Many many thanks for this fantastic hack. No more 500MB bounced email boxes! Took me awhile to get the perl DBD module installed correctly (with the correct --cflags and -lib options to point to my mysql source install), but it's working like a charm now.
Reply With Quote
  #37  
Old 04-12-2004, 06:38 PM
Big Daddy Chemo Big Daddy Chemo is offline
 
Join Date: Oct 2002
Posts: 19
Благодарил(а): 0 раз(а)
Поблагодарили: 0 раз(а) в 0 сообщениях
Default

Anyone figure out how to port this for Exim?
Reply With Quote
  #38  
Old 04-13-2004, 06:17 PM
influence influence is offline
 
Join Date: Jan 2002
Location: inside a bullet
Posts: 207
Благодарил(а): 0 раз(а)
Поблагодарили: 0 раз(а) в 0 сообщениях
Default

if ($vboptions['needfromemail'])
{
@mail($toemail, $subject, $message, trim($header), "-f $vboptions[webmasteremail]");
}
else
{
@mail($toemail, $subject, $message, trim($header));
}
} <-- remove

You need to take that extra code i have in bold out or else this script will give out some sort of functions error
Reply With Quote
  #39  
Old 04-13-2004, 06:35 PM
tamarian tamarian is offline
 
Join Date: Oct 2001
Location: Canada
Posts: 1,205
Благодарил(а): 0 раз(а)
Поблагодарили: 0 раз(а) в 0 сообщениях
Default

Quote:
Originally Posted by influence
if ($vboptions['needfromemail'])
{
@mail($toemail, $subject, $message, trim($header), "-f $vboptions[webmasteremail]");
}
else
{
@mail($toemail, $subject, $message, trim($header));
}
} <-- remove

You need to take that extra code i have in bold out or else this script will give out some sort of functions error
Thanks for catching this

First post updated.
Reply With Quote
  #40  
Old 04-22-2004, 02:32 PM
Pseudomizer's Avatar
Pseudomizer Pseudomizer is offline
 
Join Date: Mar 2002
Location: Germany
Posts: 614
Благодарил(а): 0 раз(а)
Поблагодарили: 0 раз(а) в 0 сообщениях
Default

Hi,

i would like to use this script but only for one reason: I got round about 10 registrations per day and 5 of them use invalid email addresses. :disappointed:

What i would need is a cron job which runs once a day one specific script which checks this bouncing emailaddress and afterwards deletes all invalid accounts from the usergroup "Awaing Email confirmation". :nervous:

Environment:
SuSe Linux 8.2, Perl 5.8.0, latest MySQL and latest Apach 1.x version and latest Qmail version mit POP3-before-SMTP installed.

Any help would be appreciated.

Cheers,
Reply With Quote
  #41  
Old 04-22-2004, 03:21 PM
tamarian tamarian is offline
 
Join Date: Oct 2001
Location: Canada
Posts: 1,205
Благодарил(а): 0 раз(а)
Поблагодарили: 0 раз(а) в 0 сообщениях
Default

Quote:
Originally Posted by Pseudomizer
Hi,

i would like to use this script but only for one reason: I got round about 10 registrations per day and 5 of them use invalid email addresses. :disappointed:

What i would need is a cron job which runs once a day one specific script which checks this bouncing emailaddress and afterwards deletes all invalid accounts from the usergroup "Awaing Email confirmation". :nervous:

Environment:
SuSe Linux 8.2, Perl 5.8.0, latest MySQL and latest Apach 1.x version and latest Qmail version mit POP3-before-SMTP installed.

Any help would be appreciated.

Cheers,
Should be easy to modify this script to do what you want.

The search can be restricted to only the usergroup awaiting email activation:

Change this qury:

"SELECT userid, username from user where email='$theemail'"

To:

"SELECT userid, username from user where email='$theemail' AND usergroupid=3"

And the unsubscribe query can be replaced with a user deletion query:

Change:

UPDATE subscribethread set emailupdate='$downgrade' where userid='$varname1'"

To:
DELETE from user where userid='$varname1'

This is a rough idea of how it can be done....
Reply With Quote
Reply


Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off

Forum Jump


All times are GMT. The time now is 12:19 AM.


Powered by vBulletin® Version 3.8.12 by vBS
Copyright ©2000 - 2025, vBulletin Solutions Inc.
X vBulletin 3.8.12 by vBS Debug Information
  • Page Generation 0.05022 seconds
  • Memory Usage 2,360KB
  • Queries Executed 25 (?)
More Information
Template Usage:
  • (1)SHOWTHREAD
  • (1)ad_footer_end
  • (1)ad_footer_start
  • (1)ad_header_end
  • (1)ad_header_logo
  • (1)ad_navbar_below
  • (1)ad_showthread_beforeqr
  • (1)bbcode_code
  • (6)bbcode_php
  • (5)bbcode_quote
  • (1)footer
  • (1)forumjump
  • (1)forumrules
  • (1)gobutton
  • (1)header
  • (1)headinclude
  • (1)modsystem_post
  • (1)navbar
  • (6)navbar_link
  • (120)option
  • (1)pagenav
  • (1)pagenav_curpage
  • (4)pagenav_pagelink
  • (11)post_thanks_box
  • (11)post_thanks_button
  • (1)post_thanks_javascript
  • (1)post_thanks_navbar_search
  • (11)post_thanks_postbit_info
  • (10)postbit
  • (11)postbit_onlinestatus
  • (11)postbit_wrapper
  • (1)spacer_close
  • (1)spacer_open
  • (1)tagbit_wrapper 

Phrase Groups Available:
  • global
  • inlinemod
  • postbit
  • posting
  • reputationlevel
  • showthread
Included Files:
  • ./showthread.php
  • ./global.php
  • ./includes/init.php
  • ./includes/class_core.php
  • ./includes/config.php
  • ./includes/functions.php
  • ./includes/class_hook.php
  • ./includes/modsystem_functions.php
  • ./includes/functions_bigthree.php
  • ./includes/class_postbit.php
  • ./includes/class_bbcode.php
  • ./includes/functions_reputation.php
  • ./includes/functions_post_thanks.php 

Hooks Called:
  • init_startup
  • init_startup_session_setup_start
  • init_startup_session_setup_complete
  • cache_permissions
  • fetch_threadinfo_query
  • fetch_threadinfo
  • fetch_foruminfo
  • style_fetch
  • cache_templates
  • global_start
  • parse_templates
  • global_setup_complete
  • showthread_start
  • showthread_getinfo
  • forumjump
  • showthread_post_start
  • showthread_query_postids
  • showthread_query
  • bbcode_fetch_tags
  • bbcode_create
  • showthread_postbit_create
  • postbit_factory
  • postbit_display_start
  • post_thanks_function_post_thanks_off_start
  • post_thanks_function_post_thanks_off_end
  • post_thanks_function_fetch_thanks_start
  • post_thanks_function_fetch_thanks_end
  • post_thanks_function_thanked_already_start
  • post_thanks_function_thanked_already_end
  • fetch_musername
  • postbit_imicons
  • bbcode_parse_start
  • bbcode_parse_complete_precache
  • bbcode_parse_complete
  • postbit_display_complete
  • post_thanks_function_can_thank_this_post_start
  • pagenav_page
  • pagenav_complete
  • tag_fetchbit_complete
  • forumrules
  • navbits
  • navbits_complete
  • showthread_complete