X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2Fbin%2Ffreeside-daily;h=e0c555f7bd83ef4bbf663bf4535c7b5ef0b11064;hb=d4496963925b57f117bdf336661e4cc33ce25c9d;hp=67c4860d52b07c43ea125b3fcf42cc26f8d3fb5c;hpb=247a72232486b809bd0f0d88f3506dc0a1e79d93;p=freeside.git diff --git a/FS/bin/freeside-daily b/FS/bin/freeside-daily index 67c4860d5..e0c555f7b 100755 --- a/FS/bin/freeside-daily +++ b/FS/bin/freeside-daily @@ -8,7 +8,7 @@ use FS::Log; &untaint_argv; #what it sounds like (eww) use vars qw(%opt); -getopts("p:a:d:vl:sy:nmrkg:o", \%opt); +getopts("p:a:d:vl:sy:nmrkg:ox", \%opt); my $user = shift or die &usage; adminsuidsetup $user; @@ -25,7 +25,7 @@ use FS::Cron::nms_report qw(nms_report); nms_report(%opt); #you can skip this by not having any vitelity exports configured -use FS::Cron::lnp_vitelity; +use FS::Cron::lnp_vitelity qw(lnp_vitelity); lnp_vitelity(%opt); #no way to skip this yet, but should be harmless/quick @@ -100,9 +100,9 @@ use FS::Cron::cleanup qw( cleanup cleanup_before_backup ); cleanup_before_backup(); #backup should be last -#you can skip this just by not having the config +#you can skip this just by not having the config (or with the -x option) use FS::Cron::backup qw(backup); -backup(); +backup() unless $opt{'x'}; #except we'd rather not start cleanup jobs until the backup is done cleanup( quiet => !$opt{'v'} ); @@ -123,7 +123,7 @@ sub untaint_argv { } sub usage { - die "Usage:\n\n freeside-daily [ -d 'date' ] [ -y days ] [ -a agentnum,agentnum,... ] [ -s ] [ -v ] [ -l level ] [ -m ] [ -k ] user [ custnum custnum ... ]\n"; + die "Usage:\n\n freeside-daily [ -d 'date' ] [ -y days ] [ -a agentnum,agentnum,... ] [ -s ] [ -v ] [ -l level ] [ -m ] [ -k ] [ -x ] user [ custnum custnum ... ]\n"; } ### @@ -179,6 +179,8 @@ the bill and collect methods of a cust_main object. See L. -k: skip notify_flat_delay + -x: skip backup + user: Typically "fs_daily" custnum: if one or more customer numbers are specified, only bills those