Changeset 2659 in MondoRescue for devel/mrmini/sbin/mrmini
- Timestamp:
- Jun 23, 2010, 4:26:59 PM (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
devel/mrmini/sbin/mrmini
r2650 r2659 27 27 use MondoRescue::LVM; 28 28 use MondoRescue::Base; 29 30 # Global variables 31 my %opts; # CLI Options 32 my @date = pb_get_date(); 33 my $mr_date = strftime("%Y-%m-%d %H:%M:%S", @date); 29 use MondoRescue::DynConf; 30 use MondoRescue::Mini::Base; 34 31 35 32 =pod … … 105 102 106 103 =cut 104 105 # Global variables 106 my %opts; # CLI Options 107 107 108 GetOptions( 108 109 "verbose|v+" => \$opts{'v'}, … … 154 155 =cut 155 156 157 158 156 159 # --------------------------------------------------------------------------- 157 160 158 161 # Initialize the syntax string 159 162 160 pb_syntax_init("mrmini Version PBVER-rPBREV\n"); 163 # 164 # Global variables 165 # 166 my $proj; 167 ($mr->{'confdir'},$proj) = mr_dynconf_init(); 168 my @date = pb_get_date(); 169 $mr->{'start_date'} = strftime("%Y-%m-%d %H:%M:%S", @date); 170 171 $ENV{'PBPROJ'} = $proj; 172 $ENV{'PBPKG'} = "mrmini"; 173 174 # Adds conf files in order 175 pb_conf_add("$mr->{'confdir'}/mondorescue.conf.dist","$mr->{'confdir'}/mondorescue.conf"); 176 ($mr->{'install_dir'},$mr->{'version'}) = mr_conf_get("mr_install_dir","mr_version"); 177 178 pb_syntax_init("$ENV{'PBPKG'} Version $mr->{'version'}\n"); 161 179 pb_display_init("text",""); 162 180 … … 190 208 $iso = $opts{'i'}; 191 209 } 192 193 # 194 # Global variables 195 # 196 my ($MRMINI_PREFIX,$MRMINI_CONF,$MRMINI_LIB) = mr_setup_var(); 197 my $MRMINI_VERSION = "PBVER-rPBREV"; 198 my $MRMINI_SBIN = "$MRMINI_PREFIX/sbin"; 199 my $MRMINI_FDISK = "$MRMINI_SBIN/parted2fdik"; 200 my $MRMINI_DEPLIST = "$MRMINI_CONF/deplist.d"; 201 # Better ? 202 my $ARCH = `uname -m`; 203 chop($ARCH); 210 my $logfile = undef; 211 if (defined $opts{'l'}) { 212 $logfile = $opts{'l'}; 213 } 204 214 205 215 # … … 207 217 # 208 218 pb_temp_init(); 209 210 # Adds conf files in order 211 pb_conf_add("$ENV{'HOME'}/.mondorescuerc","$MRMINI_CONF/mondorescue.conf"); 212 213 # 214 # Configuration parameters 215 # 216 $ENV{'PBPROJ'} = "mrmini"; 217 my ($mr_boot_size,$mr_boot_cd,$mr_boot_usb,$mr_boot_tape,$mr_kernel,$mr_fstab) = pb_conf_get("mr_boot_size","mr_boot_cd","mr_boot_usb","mr_boot_tape","mr_kernel","mr_fstab"); 218 my ($mr_tape_mods,$mr_scsi_mods,$mr_ide_mods,$mr_pcmcia_mods,$mr_usb_mods,$mr_net_mods,$mr_cdrom_mods,$mr_deny_mods,$mr_force_mods) = pb_conf_get("mr_tape_mods","mr_scsi_mods","mr_ide_mods","mr_pcmcia_mods","mr_usb_mods","mr_net_mods","mr_cdrom_mods","mr_extra_mods","mr_deny_mods","mr_force_mods"); 219 my ($mr_logfile,$mr_cache_dir,$mr_boot_msg,$mr_burn_cmd,$mr_burn_opt) = pb_conf_get("mr_logfile","mr_cache_dir","mr_boot_msg","mr_burn_cmd","mr_burn_opt"); 220 221 # 222 # Manage log file 223 # 224 my $logfile = $mr_logfile->{$ENV{'PBPROJ'}}; 225 226 if (defined $opts{'l'}) { 227 $logfile = $opts{'l'}; 228 } 229 open(pbLOG,"> $logfile") || die "Unable to log to $logfile: $!"; 230 $pbLOG = \*pbLOG; 231 $pbdebug = 0 if ($pbdebug == -1); 232 pb_log_init($pbdebug, $pbLOG); 233 234 pb_log(0,"mrmini start date: $mr_date"); 235 pb_log(0,"-------------------------------------"); 236 pb_log(0,"mrmini v$MRMINI_VERSION"); 237 pb_log(0,"$ARCH architecture detected"); 238 pb_log(0,"mrmini called with the following arguments: ".join(" ",@ARGV)); 239 pb_log(0,"-------------------------------------"); 240 pb_log(0,"MONDO_CACHE: $ENV{'MONDO_CACHE'}") if (defined $ENV{'MONDO_CACHE'}); 241 pb_log(0,"MRMINI_LIB: $MRMINI_LIB"); 242 pb_log(0,"MRMINI_CONF: $MRMINI_CONF"); 243 pb_log(0,"MRMINI_SBIN: $MRMINI_SBIN"); 244 if (-r "$ENV{'HOME'}/.mondorescuerc") { 245 pb_log(0,"-------------------------------------"); 246 pb_log(0,"Conf file $ENV{'HOME'}/.mondorescuerc"); 247 pb_display_file("$ENV{'HOME'}/.mondorescuerc"); 248 } 249 if (-r "$MRMINI_CONF/mondorescue.conf") { 250 pb_log(0,"-------------------------------------"); 251 pb_log(0,"Conf file $MRMINI_CONF/mondorescue.conf"); 252 pb_display_file("$MRMINI_CONF/mondorescue.conf"); 253 } 254 pb_log(0,"-------------------------------------"); 255 256 # 257 # Prepare cache dir 258 # 259 pb_rm_rf("$mr_cache_dir/*"); 260 pb_mkdir_p($mr_cache_dir); 261 262 # 263 # LVM setup 264 # 265 my ($lvmver,$lvmcmd) = mr_lvm_check(); 266 267 pb_log(0,"LVM $lvmver command set to $lvmcmd"); 268 pb_log(0,"-------------------------------------"); 219 mr_mini_main($logfile); 269 220 mr_exit(0);
Note:
See TracChangeset
for help on using the changeset viewer.