X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2Fbin%2Ffreeside-daily;h=a7c38d557adf80d82720849dbeb1f2451e263e4d;hb=0e7c29b192fff137d3b9167b29633a94f94b995f;hp=728fa969a257f2d2d018c0227359a7660505fc1c;hpb=56a2965996454a0649d43ecbc062beda61106e21;p=freeside.git diff --git a/FS/bin/freeside-daily b/FS/bin/freeside-daily index 728fa969a..a7c38d557 100755 --- a/FS/bin/freeside-daily +++ b/FS/bin/freeside-daily @@ -7,18 +7,34 @@ use FS::Conf; &untaint_argv; #what it sounds like (eww) use vars qw(%opt); -getopts("p:a:d:vl:sy:nmrkg:", \%opt); +getopts("p:a:d:vl:sy:nmrkg:u", \%opt); my $user = shift or die &usage; adminsuidsetup $user; +#you can skip this by not having a NetworkMonitoringSystem configured +use FS::Cron::nms_report qw(nms_report); +nms_report(%opt); + +#no way to skip this yet, but should be harmless/quick +use FS::Cron::expire_banned_pay qw(expire_banned_pay); +expire_banned_pay(%opt); + +#you can skip this by setting the disable_cron_billing config use FS::Cron::bill qw(bill); bill(%opt); #you can skip this just by not having the config +use FS::Cron::breakage qw(reconcile_breakage); +reconcile_breakage(%opt); + +#you can skip this just by not having the config use FS::Cron::upload qw(upload); upload(%opt); +use FS::Cron::set_lata_have_usage qw(set_lata_have_usage); +set_lata_have_usage(%opt); + # Send alerts about upcoming credit card expiration. use FS::Cron::alert_expiration qw(alert_expiration); my $conf = new FS::Conf; @@ -31,19 +47,28 @@ use FS::Cron::expire_user_pref qw(expire_user_pref); expire_user_pref(); unless ( $opt{k} ) { - use FS::Cron::notify qw(notify_flat_delay); notify_flat_delay(%opt); +} - #Pg 8.1+ auto-vaccums, 7.4 w/postgresql-contrib - #use FS::Cron::vacuum qw(vacuum); - #vacuum(); - +#debian Pg 8.1+ auto-vaccums, 7.4 w/postgresql-contrib +if ( $opt{u} ) { + use FS::Cron::vacuum qw(vacuum); + vacuum(); } #you can skip this just by not having the config -use FS::Cron::backup qw(backup_scp); -backup_scp(); +use FS::Cron::backup qw(backup); +backup(); + +#same +use FS::Cron::rt_tasks qw(rt_escalate); +rt_escalate(%opt); + +my $deldir = "$FS::UID::cache_dir/cache.$FS::UID::datasrc/"; +unlink <${deldir}.invoice*>; +unlink <${deldir}.letter*>; +unlink <${deldir}.CGItemp*>; ### # subroutines @@ -59,7 +84,7 @@ sub untaint_argv { } sub usage { - die "Usage:\n\n freeside-daily [ -d 'date' ] [ -y days ] [ -p 'payby' ] [ -a agentnum ] [ -s ] [ -v ] [ -l level ] [ -m ] [ -k ] user [ custnum custnum ... ]\n"; + die "Usage:\n\n freeside-daily [ -d 'date' ] [ -y days ] [ -p 'payby' ] [ -a agentnum,agentnum,... ] [ -s ] [ -v ] [ -l level ] [ -m ] [ -k ] user [ custnum custnum ... ]\n"; } ### @@ -72,7 +97,7 @@ freeside-daily - Run daily billing and invoice collection events. =head1 SYNOPSIS - freeside-daily [ -d 'date' ] [ -y days ] [ -p 'payby' ] [ -a agentnum ] [ -s ] [ -v ] [ -l level ] [ -m ] [ -r ] [ -k ] user [ custnum custnum ... ] + freeside-daily [ -d 'date' ] [ -y days ] [ -p 'payby' ] [ -a agentnum,agentnum,... ] [ -s ] [ -v ] [ -l level ] [ -m ] [ -r ] [ -k ] user [ custnum custnum ... ] =head1 DESCRIPTION @@ -94,9 +119,9 @@ the bill and collect methods of a cust_main object. See L. with today's date, irregardless of the pretend date used to pre-generate the invoices. - -p: Only process customers with the specified payby (I, I, I, I, I, I, I) + -p: Only process customers with the specified payby (CARD, DCRD, CHEK, DCHK, BILL, COMP, LECB) - -a: Only process customers with the specified agentnum + -a: Only process customers with the specified agentnum. Multiple agentnums can be specified, separated with commas. -g: Don't process the provided pkgpart (or pkgparts, specified as a comma- separated list). @@ -111,7 +136,9 @@ the bill and collect methods of a cust_main object. See L. -r: Multi-process mode dry run option - -k: skip notify_flat_delay and vacuum + -k: skip notify_flat_delay + + -u: Do a vacuum (starting with version 1.9, this is not run by default). user: From the mapsecrets file - see config.html from the base documentation