blob: 95a6709abb4b51392ab4e03d9a6e78877190baa1 (plain)

ofs	hex dump	ascii
0000	23 21 2f 75 73 72 2f 62 69 6e 2f 70 65 72 6c 0a 23 0a 23 20 43 6f 70 79 72 69 67 68 74 20 28 43	#!/usr/bin/perl.#.#.Copyright.(C
0020	29 20 32 30 30 31 20 62 79 20 53 65 62 61 73 74 69 65 6e 20 44 55 50 4f 4e 54 20 3c 73 64 75 70	).2001.by.Sebastien.DUPONT.<sdup
0040	6f 6e 74 40 6d 61 6e 64 72 61 6b 65 73 6f 66 74 2e 63 6f 6d 3e 0a 23 20 52 65 64 69 73 74 72 69	ont@mandrakesoft.com>.#.Redistri
0060	62 75 74 69 6f 6e 20 6f 66 20 74 68 69 73 20 66 69 6c 65 20 69 73 20 70 65 72 6d 69 74 74 65 64	bution.of.this.file.is.permitted
0080	20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e 55 0a 23 20 50 75	.under.the.terms.of.the.GNU.#.Pu
00a0	62 6c 69 63 20 4c 69 63 65 6e 73 65 20 28 47 50 4c 29 0a 23 23 20 64 65 73 63 72 69 70 74 69 6f	blic.License.(GPL).##.descriptio
00c0	6e 3a 0a 23 0a 23 20 20 44 72 61 6b 62 61 63 75 70 20 69 73 20 75 73 65 20 74 6f 20 62 61 63 6b	n:.#.#..Drakbacup.is.use.to.back
00e0	75 70 20 73 79 73 74 65 6d 20 66 69 6c 65 73 20 61 6e 64 20 75 73 65 72 20 66 69 6c 65 73 0a 23	up.system.files.and.user.files.#
0100	20 20 44 72 61 6b 62 61 63 75 70 20 61 6c 6c 6f 77 20 74 6f 20 72 65 73 74 6f 72 65 20 74 68 65	..Drakbacup.allow.to.restore.the
0120	20 73 79 73 74 65 6d 20 28 65 74 63 2c 20 76 61 72 20 66 69 6c 65 73 29 0a 23 20 20 66 72 6f 6d	.system.(etc,.var.files).#..from
0140	20 73 74 61 72 75 70 20 6f 72 20 6f 6e 20 64 72 61 6b 63 6f 6e 66 20 75 74 69 6c 69 74 79 2e 0a	.starup.or.on.drakconf.utility..
0160	23 0a 23 62 61 63 6b 75 70 20 6e 61 6d 65 20 66 6f 72 6d 61 74 3a 20 61 6c 6c 20 74 68 65 20 74	#.#backup.name.format:.all.the.t
0180	69 6d 65 20 66 72 6f 6d 20 74 68 65 20 2f 0a 23 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	ime.from.the./.#................
01a0	20 20 20 20 62 61 63 6b 75 70 5f 73 79 73 5f 31 32 31 30 32 30 30 31 2e 74 61 72 2e 67 7a 20 20	....backup_sys_12102001.tar.gz..
01c0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2d 3e 20 64 65 66 61 75 6c 74 20 73 79 73	..................->.default.sys
01e0	74 65 6d 20 62 61 63 6b 75 70 0a 23 09 09 20 20 20 20 20 62 61 63 6b 75 70 5f 73 79 73 5f 65 74	tem.backup.#.......backup_sys_et
0200	63 5f 76 61 72 5f 70 72 6f 63 5f 31 32 31 30 32 30 30 31 2e 74 61 72 2e 67 7a 20 20 20 20 20 20	c_var_proc_12102001.tar.gz......
0220	20 2d 3e 20 73 70 65 63 69 66 69 63 20 73 79 73 74 65 6d 20 64 69 72 65 63 74 6f 72 69 65 73 0a	.->.specific.system.directories.
0240	23 09 09 20 20 20 20 20 62 61 63 6b 75 70 5f 75 73 65 72 5f 6a 61 6d 65 73 5f 31 32 31 30 32 30	#.......backup_user_james_121020
0260	30 31 2e 74 61 72 2e 67 7a 20 20 20 20 20 20 20 20 20 20 20 20 20 2d 3e 20 64 65 66 61 75 6c 74	01.tar.gz.............->.default
0280	20 75 73 65 72 20 62 61 63 6b 75 70 0a 23 09 09 20 20 20 20 20 62 61 63 6b 75 70 5f 75 73 65 72	.user.backup.#.......backup_user
02a0	5f 6a 61 6d 65 73 5f 64 6f 63 75 6d 65 6e 74 73 5f 31 32 31 30 32 30 30 31 2e 74 61 72 2e 67 7a	_james_documents_12102001.tar.gz
02c0	20 20 20 2d 3e 20 73 70 65 63 69 66 69 63 20 75 73 65 72 20 64 69 72 65 63 74 6f 72 69 65 73 0a	...->.specific.user.directories.
02e0	23 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 62 61 63 6b 75 70 5f 6f 74 68 65	#....................backup_othe
0300	72 5f 70 72 6f 63 5f 31 32 31 30 32 30 30 31 2e 74 61 72 2e 67 7a 20 20 20 20 20 20 20 20 20 20	r_proc_12102001.tar.gz..........
0320	20 20 20 2d 3e 20 73 70 65 63 69 66 69 63 20 6f 74 68 65 72 20 64 69 72 65 63 74 6f 72 69 65 73	...->.specific.other.directories
0340	0a 23 0a 23 20 62 61 63 6b 75 70 20 6e 61 6d 65 20 72 75 6c 65 73 3a 20 73 79 73 74 65 6d 3a 20	.#.#.backup.name.rules:.system:.
0360	62 65 67 69 6e 20 62 79 20 73 79 73 0a 23 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20	begin.by.sys.#..................
0380	20 20 75 73 65 72 3a 20 20 20 62 65 67 69 6e 20 62 79 20 75 73 65 72 0a 23 20 20 20 20 20 20 20	..user:...begin.by.user.#.......
03a0	20 20 20 20 20 20 20 20 20 20 20 20 20 6f 74 68 65 72 3a 20 20 20 62 65 67 69 6e 20 62 79 20 6f	.............other:...begin.by.o
03c0	74 68 65 72 0a 23 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 6e 64 20 6f 66	ther.#....................end.of
03e0	20 61 6c 6c 20 60 64 61 74 65 60 2e 74 61 72 2e 67 7a 0a 23 0a 23 20 73 65 65 6d 73 20 74 6f 20	.all.`date`.tar.gz.#.#.seems.to.
0400	62 65 20 67 6f 6f 64 20 69 64 65 61 20 74 6f 20 68 61 76 65 20 61 20 74 78 74 20 66 69 6c 65 20	be.good.idea.to.have.a.txt.file.
0420	77 68 65 72 65 20 75 73 65 72 20 65 78 70 6c 61 69 6e 20 74 68 65 20 64 69 66 66 65 72 65 6e 63	where.user.explain.the.differenc
0440	65 73 0a 23 20 62 65 74 77 65 65 6e 20 61 6c 6c 20 74 68 65 20 62 61 63 6b 75 70 0a 23 0a 23 20	es.#.between.all.the.backup.#.#.
0460	73 61 76 65 20 6f 6e 6c 79 20 74 68 65 20 64 69 66 66 65 72 65 6e 63 65 73 2e 2e 2e 0a 23 20 66	save.only.the.differences....#.f
0480	69 6e 64 20 2f 20 2d 6d 74 69 6d 65 20 2d 31 20 5c 21 20 2d 74 79 70 65 20 64 20 2d 70 72 69 6e	ind./.-mtime.-1.\!.-type.d.-prin
04a0	74 20 3e 20 2f 74 6d 70 2f 6c 69 73 74 65 2e 6a 6f 75 72 0a 23 0a 23 20 62 75 69 6c 64 20 69 73	t.>./tmp/liste.jour.#.#.build.is
04c0	6f 20 66 73 20 77 69 74 68 20 72 65 73 63 75 65 2e 0a 23 0a 23 20 63 6f 6e 66 69 67 75 72 61 74	o.fs.with.rescue..#.#.configurat
04e0	69 6f 6e 20 66 69 6c 65 20 6f 6e 20 2f 65 74 63 2f 64 72 61 6b 63 6f 6e 66 2f 64 72 61 6b 62 61	ion.file.on./etc/drakconf/drakba
0500	63 6b 75 70 2f 64 72 61 6b 62 61 6b 75 70 2e 63 6f 6e 66 0a 23 0a 0a 75 73 65 20 47 74 6b 3b 0a	ckup/drakbakup.conf.#..use.Gtk;.
0520	75 73 65 20 6c 69 62 20 71 77 28 2f 75 73 72 2f 6c 69 62 2f 6c 69 62 44 72 61 6b 58 29 3b 0a 75	use.lib.qw(/usr/lib/libDrakX);.u
0540	73 65 20 69 6e 74 65 72 61 63 74 69 76 65 3b 0a 75 73 65 20 73 74 61 6e 64 61 6c 6f 6e 65 3b 0a	se.interactive;.use.standalone;.
0560	75 73 65 20 6d 79 5f 67 74 6b 20 71 77 28 3a 68 65 6c 70 65 72 73 20 3a 77 72 61 70 70 65 72 73	use.my_gtk.qw(:helpers.:wrappers
0580	29 3b 0a 75 73 65 20 63 6f 6d 6d 6f 6e 3b 0a 75 73 65 20 73 74 72 69 63 74 3b 0a 0a 0a 69 66 20	);.use.common;.use.strict;...if.
05a0	28 22 40 41 52 47 56 22 20 3d 7e 20 2f 2d 2d 68 65 6c 70 7c 2d 68 2f 29 20 7b 0a 20 20 20 20 70	("@ARGV".=~./--help|-h/).{.....p
05c0	72 69 6e 74 20 71 28 42 61 63 6b 75 70 20 61 6e 64 20 6d 6f 6e 69 74 6f 72 69 6e 67 20 61 70 70	rint.q(Backup.and.monitoring.app
05e0	6c 69 63 61 74 69 6f 6e 0a 0a 2d 2d 6c 69 73 74 20 20 20 20 20 20 20 20 20 20 20 3a 20 6c 69 73	lication..--list...........:.lis
0600	74 20 6f 66 20 66 69 6c 65 73 20 6f 72 20 64 69 72 65 63 74 6f 72 69 65 73 20 74 6f 20 62 61 63	t.of.files.or.directories.to.bac
0620	6b 75 70 2e 0a 2d 2d 64 65 66 61 75 6c 74 20 20 20 20 20 20 20 20 3a 20 73 61 76 65 20 64 65 66	kup..--default........:.save.def
0640	61 75 6c 74 20 64 69 72 65 63 74 6f 72 69 65 73 2e 0a 2d 2d 62 75 69 6c 64 5f 63 64 20 20 20 20	ault.directories..--build_cd....
0660	20 20 20 3a 20 62 75 69 6c 64 20 72 65 73 74 6f 72 65 20 69 73 6f 20 77 69 74 68 20 74 68 65 20	...:.build.restore.iso.with.the.
0680	63 75 72 72 65 6e 74 73 20 62 61 63 6b 75 70 73 20 66 69 6c 65 73 0a 20 20 20 20 20 20 20 20 20	currents.backups.files..........
06a0	20 20 20 20 20 20 20 20 20 20 20 20 20 20 26 20 72 65 73 63 75 65 20 6f 70 74 69 6f 6e 73 2e 0a	..............&.rescue.options..
06c0	2d 2d 62 75 69 6c 64 5f 66 6c 6f 70 70 79 20 20 20 3a 20 62 75 69 6c 64 20 72 65 73 74 6f 72 65	--build_floppy...:.build.restore
06e0	20 66 6c 6f 70 70 79 2e 0a 2d 2d 75 70 64 61 74 65 20 20 20 20 20 20 20 20 20 3a 20 64 6f 6e 20	.floppy..--update.........:.don.
0700	74 20 72 65 70 6c 61 63 65 20 74 68 65 20 6f 6c 64 20 62 61 63 6b 75 70 2c 20 6f 6e 6c 79 20 75	t.replace.the.old.backup,.only.u
0720	70 64 61 74 65 20 69 74 2e 20 0a 2d 2d 72 65 70 6c 61 63 65 20 20 20 20 20 20 20 20 3a 20 64 65	pdate.it...--replace........:.de
0740	6c 65 74 65 20 62 61 63 6b 75 70 20 66 69 6c 65 73 20 62 65 66 6f 72 65 20 62 75 69 6c 64 20 6e	lete.backup.files.before.build.n
0760	65 77 2e 0a 2d 2d 73 61 76 65 5f 64 69 72 20 20 20 20 20 20 20 3a 20 62 79 20 64 65 66 61 75 6c	ew..--save_dir.......:.by.defaul
0780	74 20 74 68 65 20 62 61 63 6b 75 70 20 66 69 6c 65 73 20 61 72 65 20 73 61 76 65 64 20 69 6e 20	t.the.backup.files.are.saved.in.
07a0	0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69 6e 20 2f 76 61 72 2f	........................in./var/
07c0	62 61 63 6b 75 70 20 64 69 72 65 63 74 6f 72 79 20 73 6f 20 77 72 69 74 65 20 6f 74 68 65 72 20	backup.directory.so.write.other.
07e0	64 69 72 65 63 74 6f 72 79 0a 09 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 6f 20 63 68 61	directory.................to.cha
0800	6e 67 65 20 74 6f 20 63 68 61 6e 67 65 20 69 74 2e 0a 2d 2d 63 6f 6e 66 5f 66 69 6c 65 20 20 20	nge.to.change.it..--conf_file...
0820	20 20 20 3a 20 74 6f 20 72 65 61 64 20 6f 74 68 65 72 20 63 6f 6e 66 69 67 75 72 61 74 69 6f 6e	...:.to.read.other.configuration
0840	20 66 69 6c 65 2e 20 0a 29 3b 0a 20 20 20 20 65 78 69 74 28 30 29 3b 0a 7d 0a 0a 23 20 42 61 63	.file...);.....exit(0);.}..#.Bac
0860	6b 65 6e 64 20 4f 70 74 69 6f 6e 73 2e 0a 6d 79 20 24 64 65 66 61 75 6c 74 20 3d 20 30 3b 0a 6d	kend.Options..my.$default.=.0;.m
0880	79 20 24 62 75 69 6c 64 5f 63 64 20 3d 20 30 3b 0a 6d 79 20 24 62 75 69 6c 64 5f 66 6c 6f 70 70	y.$build_cd.=.0;.my.$build_flopp
08a0	79 20 3d 20 30 3b 0a 6d 79 20 24 63 6f 6d 70 5f 6d 6f 64 65 20 3d 20 30 3b 0a 6d 79 20 24 6d 6f	y.=.0;.my.$comp_mode.=.0;.my.$mo
08c0	64 65 20 3d 20 30 3b 0a 6d 79 20 24 72 65 70 6c 61 63 65 20 3d 20 30 3b 0a 6d 79 20 24 75 70 64	de.=.0;.my.$replace.=.0;.my.$upd
08e0	61 74 65 20 3d 20 30 3b 0a 6d 79 20 24 63 6f 6e 66 5f 66 69 6c 65 20 3d 20 30 3b 0a 6d 79 20 40	ate.=.0;.my.$conf_file.=.0;.my.@
0900	6c 69 73 74 5f 61 72 67 20 3d 20 28 29 3b 0a 6d 79 20 40 73 79 73 5f 66 69 6c 65 73 20 3b 0a 6d	list_arg.=.();.my.@sys_files.;.m
0920	79 20 40 68 6f 6d 65 5f 66 69 6c 65 73 3b 0a 6d 79 20 40 6f 74 68 65 72 5f 66 69 6c 65 73 3b 0a	y.@home_files;.my.@other_files;.
0940	6d 79 20 24 73 61 76 65 5f 70 61 74 68 3b 0a 6d 79 20 24 6f 70 74 69 6f 6e 5f 72 65 70 6c 61 63	my.$save_path;.my.$option_replac
0960	65 20 3d 20 30 3b 0a 6d 79 20 24 6f 70 74 69 6f 6e 5f 75 70 64 61 74 65 20 3d 20 30 3b 0a 6d 79	e.=.0;.my.$option_update.=.0;.my
0980	20 24 77 69 6e 64 6f 77 73 20 3d 20 30 3b 0a 6d 79 20 24 63 65 6e 74 72 61 6c 5f 77 69 64 67 65	.$windows.=.0;.my.$central_widge
09a0	74 3b 0a 6d 79 20 24 69 6e 74 65 72 61 63 74 69 76 65 3b 0a 0a 0a 23 20 50 41 54 48 20 20 26 20	t;.my.$interactive;...#.PATH..&.
09c0	47 6c 6f 62 61 6c 20 76 61 72 69 61 62 6c 65 73 2e 0a 6d 79 20 24 63 66 67 5f 66 69 6c 65 20 3d	Global.variables..my.$cfg_file.=
09e0	20 22 2f 65 74 63 2f 64 72 61 6b 63 6f 6e 66 2f 64 72 61 6b 62 61 63 6b 75 70 2f 64 72 61 6b 62	."/etc/drakconf/drakbackup/drakb
0a00	61 63 6b 75 70 2e 63 6f 6e 66 22 3b 0a 0a 0a 0a 66 6f 72 65 61 63 68 20 28 40 41 52 47 56 29 20	ackup.conf";....foreach.(@ARGV).
0a20	7b 0a 20 20 20 20 2f 2d 2d 64 65 66 61 75 6c 74 2f 20 61 6e 64 20 24 64 65 66 61 75 6c 74 20 3d	{...../--default/.and.$default.=
0a40	20 31 2c 20 24 6d 6f 64 65 3d 2d 31 3b 0a 20 20 20 20 2f 2d 2d 62 75 69 6c 64 5f 63 64 2f 20 61	.1,.$mode=-1;...../--build_cd/.a
0a60	6e 64 20 24 62 75 69 6c 64 5f 63 64 20 3d 20 31 2c 20 24 6d 6f 64 65 3d 2d 31 3b 0a 20 20 20 20	nd.$build_cd.=.1,.$mode=-1;.....
0a80	2f 2d 2d 62 75 69 6c 64 5f 66 6c 6f 70 70 79 2f 20 61 6e 64 20 24 62 75 69 6c 64 5f 66 6c 6f 70	/--build_floppy/.and.$build_flop
0aa0	70 79 20 3d 20 31 2c 20 24 6d 6f 64 65 3d 2d 31 3b 0a 20 20 20 20 2f 2d 2d 72 65 70 6c 61 63 65	py.=.1,.$mode=-1;...../--replace
0ac0	7c 2d 72 2f 20 61 6e 64 20 24 72 65 70 6c 61 63 65 20 3d 20 31 2c 20 24 6d 6f 64 65 3d 2d 31 3b	|-r/.and.$replace.=.1,.$mode=-1;
0ae0	0a 20 20 20 20 2f 2d 2d 75 70 64 61 74 65 7c 2d 75 2f 20 61 6e 64 20 24 75 70 64 61 74 65 20 3d	...../--update|-u/.and.$update.=
0b00	20 31 2c 20 24 6d 6f 64 65 3d 2d 31 3b 0a 20 20 20 20 2f 2d 2d 63 6f 6e 66 5f 66 69 6c 65 2f 20	.1,.$mode=-1;...../--conf_file/.
0b20	61 6e 64 20 24 6d 6f 64 65 20 3d 20 30 2c 20 6e 65 78 74 3b 0a 23 20 20 20 20 24 6d 6f 64 65 20	and.$mode.=.0,.next;.#....$mode.
0b40	3d 3d 20 30 20 61 6e 64 20 70 75 73 68 20 24 63 6f 6e 66 5f 66 69 6c 65 2c 20 24 5f 3b 0a 20 20	==.0.and.push.$conf_file,.$_;...
0b60	20 20 2f 2d 2d 6c 69 73 74 2f 20 61 6e 64 20 24 6d 6f 64 65 20 3d 20 31 2c 20 6e 65 78 74 3b 0a	../--list/.and.$mode.=.1,.next;.
0b80	20 20 20 20 24 6d 6f 64 65 20 3d 3d 20 31 20 61 6e 64 20 70 75 73 68 20 40 6c 69 73 74 5f 61 72	....$mode.==.1.and.push.@list_ar
0ba0	67 2c 20 24 5f 3b 0a 7d 0a 0a 73 75 62 20 64 65 62 75 67 20 7b 0a 20 20 20 20 70 72 69 6e 74 20	g,.$_;.}..sub.debug.{.....print.
0bc0	22 53 59 53 5f 46 49 4c 45 53 3a 20 24 5f 20 5c 6e 22 20 66 6f 72 65 61 63 68 20 28 40 73 79 73	"SYS_FILES:.$_.\n".foreach.(@sys
0be0	5f 66 69 6c 65 73 29 3b 0a 20 20 20 20 70 72 69 6e 74 20 22 48 4f 4d 45 5f 46 49 4c 45 53 3a 20	_files);.....print."HOME_FILES:.
0c00	24 5f 20 5c 6e 22 20 66 6f 72 65 61 63 68 20 28 40 68 6f 6d 65 5f 66 69 6c 65 73 29 3b 0a 20 20	$_.\n".foreach.(@home_files);...
0c20	20 20 70 72 69 6e 74 20 22 4f 54 48 45 52 5f 46 49 4c 45 53 3a 20 24 5f 20 5c 6e 22 20 66 6f 72	..print."OTHER_FILES:.$_.\n".for
0c40	65 61 63 68 20 28 40 6f 74 68 65 72 5f 66 69 6c 65 73 29 3b 0a 20 20 20 20 70 72 69 6e 74 20 22	each.(@other_files);.....print."
0c60	50 41 54 48 5f 54 4f 5f 53 41 56 45 3a 20 24 73 61 76 65 5f 70 61 74 68 20 5c 6e 22 3b 0a 20 20	PATH_TO_SAVE:.$save_path.\n";...
0c80	20 20 70 72 69 6e 74 20 22 4f 50 54 49 4f 4e 5f 52 45 50 4c 41 43 45 3a 20 24 6f 70 74 69 6f 6e	..print."OPTION_REPLACE:.$option
0ca0	5f 72 65 70 6c 61 63 65 20 5c 6e 22 3b 0a 20 20 20 20 70 72 69 6e 74 20 22 4f 50 54 49 4f 4e 5f	_replace.\n";.....print."OPTION_
0cc0	55 50 44 41 54 45 3a 20 24 6f 70 74 69 6f 6e 5f 75 70 64 61 74 65 20 5c 6e 22 3b 0a 20 20 20 20	UPDATE:.$option_update.\n";.....
0ce0	70 72 69 6e 74 20 22 4f 50 54 49 4f 4e 5f 43 4f 4d 50 3a 20 24 63 6f 6d 70 5f 6d 6f 64 65 20 5c	print."OPTION_COMP:.$comp_mode.\
0d00	6e 22 3b 0a 7d 0a 0a 0a 6d 79 20 40 78 70 6d 5f 64 61 74 61 20 3d 20 28 20 22 31 36 20 31 36 20	n";.}...my.@xpm_data.=.(."16.16.
0d20	34 20 31 22 2c 0a 09 09 20 22 20 63 20 4e 6f 6e 65 20 73 20 4e 6f 6e 65 22 2c 0a 09 09 20 22 2e	4.1",....".c.None.s.None",....".
0d40	20 20 20 20 20 20 63 20 62 6c 61 63 6b 22 2c 0a 09 09 20 22 58 20 20 20 20 20 20 63 20 23 38 30	......c.black",...."X......c.#80
0d60	38 30 38 30 22 2c 0a 09 09 20 22 6f 20 20 20 20 20 20 63 20 77 68 69 74 65 22 2c 0a 09 09 20 22	8080",...."o......c.white",...."
0d80	20 22 2c 0a 09 09 20 22 20 2e 2e 20 20 20 20 20 20 20 20 20 20 20 20 22 2c 0a 09 09 20 22 20 2e	.",...."...............",...."..
0da0	58 6f 2e 20 20 20 20 2e 2e 2e 20 20 20 20 22 2c 0a 09 09 20 22 20 2e 58 6f 6f 2e 20 2e 2e 6f 6f	Xo............",...."..Xoo....oo
0dc0	2e 20 20 20 20 22 2c 0a 09 09 20 22 20 2e 58 6f 6f 6f 2e 58 6f 6f 6f 2e 2e 2e 20 20 22 2c 0a 09	.....",...."..Xooo.Xooo.....",..
0de0	09 20 22 20 2e 58 6f 6f 6f 2e 6f 6f 6f 6f 2e 58 2e 20 20 22 2c 0a 09 09 20 22 20 2e 58 6f 6f 6f	.."..Xooo.oooo.X...",...."..Xooo
0e00	2e 58 6f 6f 6f 2e 58 2e 20 20 22 2c 0a 09 09 20 22 20 2e 58 6f 6f 6f 2e 6f 6f 6f 6f 2e 58 2e 20	.Xooo.X...",...."..Xooo.oooo.X..
0e20	20 22 2c 0a 09 09 20 22 20 2e 58 6f 6f 6f 2e 58 6f 6f 6f 2e 58 2e 20 20 22 2c 0a 09 09 20 22 20	.",...."..Xooo.Xooo.X...",....".
0e40	2e 58 6f 6f 6f 2e 6f 6f 6f 6f 2e 58 2e 20 20 22 2c 0a 09 09 20 22 20 2e 58 6f 6f 2e 58 6f 6f 2e	.Xooo.oooo.X...",...."..Xoo.Xoo.
0e60	2e 58 2e 20 20 22 2c 0a 09 09 20 22 20 2e 58 6f 2e 6f 2e 2e 6f 6f 58 2e 20 20 22 2c 0a 09 09 20	.X...",...."..Xo.o..ooX...",....
0e80	22 20 2e 58 2e 2e 58 58 58 58 58 2e 20 20 22 2c 0a 09 09 20 22 20 2e 2e 58 2e 2e 2e 2e 2e 2e 2e	"..X..XXXXX...",...."...X.......
0ea0	20 20 22 2c 0a 09 09 20 22 20 2e 2e 20 20 20 20 20 20 20 20 20 22 2c 0a 09 09 20 22 20 22 29 3b	..",...."............",....".");
0ec0	0a 0a 0a 0a 0a 73 75 62 20 72 65 61 64 5f 63 6f 6e 66 5f 66 69 6c 65 20 7b 0a 20 20 20 20 66 6f	.....sub.read_conf_file.{.....fo
0ee0	72 65 61 63 68 20 28 63 61 74 5f 28 22 24 63 66 67 5f 66 69 6c 65 22 29 29 20 7b 0a 09 69 66 20	reach.(cat_("$cfg_file")).{..if.
0f00	28 2f 5e 53 59 53 5f 46 49 4c 45 53 2f 29 20 7b 20 20 0a 09 20 20 20 20 63 68 6f 6d 70 3b 0a 09	(/^SYS_FILES/).{........chomp;..
0f20	20 20 20 20 73 2f 5e 53 59 53 5f 46 49 4c 45 53 3d 2f 2f 67 69 3b 0a 09 20 20 20 20 40 73 79 73	....s/^SYS_FILES=//gi;......@sys
0f40	5f 66 69 6c 65 73 20 3d 20 73 70 6c 69 74 28 27 20 27 2c 20 24 5f 20 29 3b 0a 09 7d 0a 09 69 66	_files.=.split('.',.$_.);..}..if
0f60	20 28 2f 5e 48 4f 4d 45 5f 46 49 4c 45 53 2f 29 20 20 7b 0a 09 20 20 20 20 63 68 6f 6d 70 3b 0a	.(/^HOME_FILES/)..{......chomp;.
0f80	09 20 20 20 20 73 2f 5e 48 4f 4d 45 5f 46 49 4c 45 53 3d 2f 2f 67 69 3b 0a 09 20 20 20 20 40 68	.....s/^HOME_FILES=//gi;......@h
0fa0	6f 6d 65 5f 66 69 6c 65 73 20 3d 20 73 70 6c 69 74 28 27 20 27 2c 20 24 5f 20 29 3b 0a 09 7d 0a	ome_files.=.split('.',.$_.);..}.
0fc0	09 69 66 20 28 2f 5e 4f 54 48 45 52 5f 46 49 4c 45 53 2f 29 20 20 7b 0a 09 20 20 20 20 63 68 6f	.if.(/^OTHER_FILES/)..{......cho
0fe0	6d 70 3b 0a 09 20 20 20 20 73 2f 5e 4f 54 48 45 52 5f 46 49 4c 45 53 3d 2f 2f 67 69 3b 0a 09 20	mp;......s/^OTHER_FILES=//gi;...
1000	20 20 20 40 6f 74 68 65 72 5f 66 69 6c 65 73 20 3d 20 73 70 6c 69 74 28 27 20 27 2c 20 24 5f 20	...@other_files.=.split('.',.$_.
1020	29 3b 0a 09 7d 0a 09 69 66 20 28 2f 5e 50 41 54 48 5f 54 4f 5f 53 41 56 45 2f 29 20 7b 0a 09 20	);..}..if.(/^PATH_TO_SAVE/).{...
1040	20 20 20 63 68 6f 6d 70 3b 0a 09 20 20 20 20 24 73 61 76 65 5f 70 61 74 68 20 3d 20 24 5f 3b 0a	...chomp;......$save_path.=.$_;.
1060	09 7d 0a 09 69 66 20 28 2f 5e 4f 50 54 49 4f 4e 5f 52 45 50 4c 41 43 45 2f 29 7b 0a 09 20 20 20	.}..if.(/^OPTION_REPLACE/){.....
1080	20 24 6f 70 74 69 6f 6e 5f 72 65 70 6c 61 63 65 20 3d 20 31 3b 0a 09 20 20 20 20 24 6f 70 74 69	.$option_replace.=.1;......$opti
10a0	6f 6e 5f 75 70 64 61 74 65 20 20 3d 20 30 3b 0a 09 7d 0a 20 20 20 20 20 20 20 20 69 66 20 28 2f	on_update..=.0;..}.........if.(/
10c0	5e 4f 50 54 49 4f 4e 5f 55 50 44 41 54 45 2f 29 7b 0a 09 20 20 20 20 24 6f 70 74 69 6f 6e 5f 72	^OPTION_UPDATE/){......$option_r
10e0	65 70 6c 61 63 65 20 3d 20 30 3b 0a 09 20 20 20 20 24 6f 70 74 69 6f 6e 5f 75 70 64 61 74 65 20	eplace.=.0;......$option_update.
1100	20 3d 20 31 3b 0a 09 7d 0a 09 69 66 20 28 2f 5e 4f 50 54 49 4f 4e 5f 43 4f 4d 50 2f 29 20 7b 0a	.=.1;..}..if.(/^OPTION_COMP/).{.
1120	09 20 20 20 20 63 68 6f 6d 70 3b 0a 09 20 20 20 20 73 2f 5e 4f 50 54 49 4f 4e 5f 43 4f 4d 50 3d	.....chomp;......s/^OPTION_COMP=
1140	2f 2f 67 69 3b 0a 09 20 20 20 20 2f 54 41 52 2e 47 5a 2f 20 61 6e 64 20 20 24 63 6f 6d 70 5f 6d	//gi;....../TAR.GZ/.and..$comp_m
1160	6f 64 65 20 3d 20 30 3b 0a 09 20 20 20 20 2f 54 41 52 2e 42 5a 32 2f 20 61 6e 64 20 24 63 6f 6d	ode.=.0;....../TAR.BZ2/.and.$com
1180	70 5f 6d 6f 64 65 20 3d 20 31 3b 0a 09 7d 0a 20 20 20 20 7d 0a 20 20 20 20 64 65 62 75 67 3b 20	p_mode.=.1;..}.....}.....debug;.
11a0	0a 7d 0a 0a 24 62 75 69 6c 64 5f 66 6c 6f 70 70 79 20 7c 7c 20 24 62 75 69 6c 64 5f 63 64 20 7c	.}..$build_floppy.||.$build_cd.|
11c0	7c 20 24 64 65 66 61 75 6c 74 20 7c 7c 20 40 6c 69 73 74 5f 61 72 67 20 7c 7c 20 24 63 6f 6e 66	|.$default.||.@list_arg.||.$conf
11e0	5f 66 69 6c 65 20 3f 20 62 61 63 6b 65 6e 64 5f 6d 6f 64 28 29 20 3a 20 69 6e 74 65 72 61 63 74	_file.?.backend_mod().:.interact
1200	69 76 65 5f 6d 6f 64 65 28 29 3b 0a 0a 73 75 62 20 62 61 63 6b 65 6e 64 5f 6d 6f 64 20 7b 0a 20	ive_mode();..sub.backend_mod.{..
1220	20 20 20 72 65 61 64 5f 63 6f 6e 66 5f 66 69 6c 65 28 29 3b 0a 7d 0a 0a 73 75 62 20 62 75 69 6c	...read_conf_file();.}..sub.buil
1240	64 5f 63 64 5f 66 63 74 20 7b 0a 0a 7d 0a 0a 73 75 62 20 62 75 69 6c 64 5f 66 6c 6f 70 70 79 5f	d_cd_fct.{..}..sub.build_floppy_
1260	66 63 74 20 7b 0a 0a 7d 0a 0a 73 75 62 20 62 75 69 6c 64 5f 62 61 63 6b 75 70 5f 66 69 6c 65 73	fct.{..}..sub.build_backup_files
1280	20 7b 0a 0a 7d 0a 0a 73 75 62 20 69 6e 74 65 72 61 63 74 69 76 65 5f 6d 6f 64 65 20 7b 0a 20 20	.{..}..sub.interactive_mode.{...
12a0	20 20 6d 79 20 24 66 73 74 5f 63 68 6f 69 63 65 5f 62 6f 78 3b 0a 20 20 20 20 6d 79 20 24 66 73	..my.$fst_choice_box;.....my.$fs
12c0	74 5f 63 68 6f 69 63 65 5f 62 6f 78 31 3b 0a 20 20 20 20 6d 79 20 24 70 69 78 6d 61 70 5f 66 73	t_choice_box1;.....my.$pixmap_fs
12e0	74 5f 63 68 6f 69 63 65 3b 0a 20 20 20 20 24 69 6e 74 65 72 61 63 74 69 76 65 20 3d 20 31 3b 0a	t_choice;.....$interactive.=.1;.
1300	20 20 20 20 6d 79 20 24 70 69 78 6d 61 70 3b 0a 20 20 20 20 6d 79 20 24 70 69 78 6d 61 70 77 69	....my.$pixmap;.....my.$pixmapwi
1320	64 3b 0a 20 20 20 20 6d 79 20 24 6d 61 73 6b 3b 0a 20 20 20 20 6d 79 20 24 73 74 79 6c 65 3b 0a	d;.....my.$mask;.....my.$style;.
1340	20 20 20 20 69 6e 69 74 20 47 74 6b 3b 0a 20 20 20 20 0a 20 20 20 20 6d 79 20 24 77 69 6e 64 6f	....init.Gtk;..........my.$windo
1360	77 31 20 3d 20 24 3a 3a 69 73 45 6d 62 65 64 64 65 64 20 3f 20 6e 65 77 20 47 74 6b 3a 3a 50 6c	w1.=.$::isEmbedded.?.new.Gtk::Pl
1380	75 67 20 28 24 3a 3a 58 49 44 29 20 3a 20 6e 65 77 20 47 74 6b 3a 3a 57 69 6e 64 6f 77 20 2d 74	ug.($::XID).:.new.Gtk::Window.-t
13a0	6f 70 6c 65 76 65 6c 3b 0a 20 20 20 20 24 77 69 6e 64 6f 77 31 2d 3e 73 69 67 6e 61 6c 5f 63 6f	oplevel;.....$window1->signal_co
13c0	6e 6e 65 63 74 20 28 64 65 6c 65 74 65 5f 65 76 65 6e 74 20 3d 3e 20 73 75 62 20 7b 20 47 74 6b	nnect.(delete_event.=>.sub.{.Gtk
13e0	2d 3e 65 78 69 74 28 30 29 20 7d 29 3b 0a 20 20 20 20 24 77 69 6e 64 6f 77 31 2d 3e 73 65 74 5f	->exit(0).});.....$window1->set_
1400	70 6f 73 69 74 69 6f 6e 28 31 29 3b 0a 20 20 20 20 24 77 69 6e 64 6f 77 31 2d 3e 73 65 74 5f 74	position(1);.....$window1->set_t
1420	69 74 6c 65 28 5f 28 22 44 72 61 6b 62 61 63 6b 75 70 22 29 29 3b 0a 20 20 20 20 24 77 69 6e 64	itle(_("Drakbackup"));.....$wind
1440	6f 77 31 2d 3e 73 65 74 5f 62 6f 72 64 65 72 5f 77 69 64 74 68 28 35 29 3b 0a 20 20 20 20 0a 23	ow1->set_border_width(5);......#
1460	20 20 20 20 6d 79 20 24 63 68 65 63 6b 62 75 74 74 6f 6e 20 3d 20 6e 65 77 20 47 74 6b 3a 3a 43	....my.$checkbutton.=.new.Gtk::C
1480	68 65 63 6b 42 75 74 74 6f 6e 28 20 22 43 68 65 63 6b 20 6d 65 20 70 6c 65 61 73 65 21 22 20 29	heckButton(."Check.me.please!".)
14a0	3b 0a 23 20 20 20 20 24 63 68 65 63 6b 62 75 74 74 6f 6e 2d 3e 73 65 74 5f 75 73 69 7a 65 28 20	;.#....$checkbutton->set_usize(.
14c0	31 30 30 2c 20 37 35 20 29 3b 0a 23 20 20 20 20 24 63 68 65 63 6b 62 75 74 74 6f 6e 2d 3e 73 68	100,.75.);.#....$checkbutton->sh
14e0	6f 77 28 29 3b 0a 0a 20 20 20 20 6d 79 20 28 24 70 69 78 5f 75 5f 6d 61 70 2c 20 24 70 69 78 5f	ow();......my.($pix_u_map,.$pix_
1500	75 5f 6d 61 73 6b 29 20 3d 20 67 74 6b 63 72 65 61 74 65 5f 70 6e 67 28 22 2f 68 6f 6d 65 2f 73	u_mask).=.gtkcreate_png("/home/s
1520	65 62 2f 64 72 61 6b 6c 6f 67 6f 2e 70 6e 67 22 29 3b 0a 20 20 20 20 6d 79 20 28 24 70 69 78 5f	eb/draklogo.png");.....my.($pix_
1540	6c 5f 6d 61 70 2c 20 24 70 69 78 5f 6c 5f 6d 61 73 6b 29 20 3d 20 67 74 6b 63 72 65 61 74 65 5f	l_map,.$pix_l_mask).=.gtkcreate_
1560	70 6e 67 28 22 2f 68 6f 6d 65 2f 73 65 62 2f 62 61 63 6b 5f 6c 2e 70 6e 67 22 29 3b 0a 20 20 20	png("/home/seb/back_l.png");....
1580	20 6d 79 20 28 24 70 69 78 5f 72 5f 6d 61 70 2c 20 24 70 69 78 5f 72 5f 6d 61 73 6b 29 20 3d 20	.my.($pix_r_map,.$pix_r_mask).=.
15a0	67 74 6b 63 72 65 61 74 65 5f 70 6e 67 28 22 2f 68 6f 6d 65 2f 73 65 62 2f 62 61 63 6b 5f 72 2e	gtkcreate_png("/home/seb/back_r.
15c0	70 6e 67 22 29 3b 0a 0a 20 20 20 20 67 74 6b 61 64 64 28 24 77 69 6e 64 6f 77 31 2c 0a 09 20 20	png");......gtkadd($window1,....
15e0	20 67 74 6b 70 61 63 6b 5f 28 6e 65 77 20 47 74 6b 3a 3a 56 42 6f 78 28 30 2c 32 29 2c 0a 09 09	.gtkpack_(new.Gtk::VBox(0,2),...
1600	20 20 20 20 31 2c 20 67 74 6b 70 61 63 6b 5f 28 6e 65 77 20 47 74 6b 3a 3a 56 42 6f 78 28 30 2c	....1,.gtkpack_(new.Gtk::VBox(0,
1620	32 29 2c 0a 09 09 09 09 31 2c 20 6e 65 77 20 47 74 6b 3a 3a 56 42 6f 78 28 30 2c 30 29 2c 0a 09	2),.....1,.new.Gtk::VBox(0,0),..
1640	09 09 09 31 2c 20 67 74 6b 70 61 63 6b 28 67 74 6b 73 65 74 5f 75 73 69 7a 65 28 24 66 73 74 5f	...1,.gtkpack(gtkset_usize($fst_
1660	63 68 6f 69 63 65 5f 62 6f 78 20 3d 20 6e 65 77 20 47 74 6b 3a 3a 56 42 6f 78 28 30 2c 35 00 29	choice_box.=.new.Gtk::VBox(0,5.)
1680	2c 35 34 30 2c 20 32 33 30 29 2c 0a 09 09 09 09 09 20 20 20 6d 79 20 24 70 69 78 5f 63 20 3d 20	,540,.230),.........my.$pix_c.=.
16a0	6e 65 77 20 47 74 6b 3a 3a 50 69 78 6d 61 70 28 24 70 69 78 5f 75 5f 6d 61 70 2c 20 24 70 69 78	new.Gtk::Pixmap($pix_u_map,.$pix
16c0	5f 75 5f 6d 61 73 6b 29 2c 0a 09 09 09 09 09 20 20 20 29 2c 0a 09 09 09 09 31 2c 20 6e 65 77 20	_u_mask),.........),.....1,.new.
16e0	47 74 6b 3a 3a 48 42 6f 78 28 30 2c 30 29 2c 0a 09 09 09 09 31 2c 20 67 74 6b 70 61 63 6b 28 67	Gtk::HBox(0,0),.....1,.gtkpack(g
1700	74 6b 73 65 74 5f 75 73 69 7a 65 28 24 66 73 74 5f 63 68 6f 69 63 65 5f 62 6f 78 31 20 3d 20 6e	tkset_usize($fst_choice_box1.=.n
1720	65 77 20 47 74 6b 3a 3a 48 42 6f 78 28 30 2c 35 29 2c 35 34 30 2c 20 34 30 29 2c 0a 09 09 09 09	ew.Gtk::HBox(0,5),540,.40),.....
1740	09 20 20 20 6d 79 20 24 70 69 78 5f 6c 20 3d 20 6e 65 77 20 47 74 6b 3a 3a 50 69 78 6d 61 70 28	....my.$pix_l.=.new.Gtk::Pixmap(
1760	24 70 69 78 5f 6c 5f 6d 61 70 2c 20 24 70 69 78 5f 6c 5f 6d 61 73 6b 29 2c 0a 09 09 09 09 09 20	$pix_l_map,.$pix_l_mask),.......
1780	20 20 67 74 6b 70 61 63 6b 28 67 74 6b 73 65 74 5f 75 73 69 7a 65 28 6e 65 77 20 47 74 6b 3a 3a	..gtkpack(gtkset_usize(new.Gtk::
17a0	56 42 6f 78 28 30 2c 30 29 2c 20 31 33 37 2c 20 35 30 29 2c 0a 09 09 09 09 09 09 20 20 20 67 74	VBox(0,0),.137,.50),..........gt
17c0	6b 73 69 67 6e 61 6c 5f 63 6f 6e 6e 65 63 74 28 6e 65 77 20 47 74 6b 3a 3a 42 75 74 74 6f 6e 28	ksignal_connect(new.Gtk::Button(
17e0	5f 28 22 57 69 7a 61 72 64 22 29 29 2c 20 63 6c 69 63 6b 65 64 20 3d 3e 20 73 75 62 20 7b 20 0a	_("Wizard")),.clicked.=>.sub.{..
1800	09 09 09 09 09 09 20 20 20 20 20 20 20 24 7b 24 63 65 6e 74 72 61 6c 5f 77 69 64 67 65 74 7d 2d	.............${$central_widget}-
1820	3e 64 65 73 74 72 6f 79 28 29 3b 20 77 69 7a 61 72 64 28 29 20 7d 29 2c 0a 09 09 09 09 09 09 20	>destroy();.wizard().}),........
1840	20 20 67 74 6b 73 69 67 6e 61 6c 5f 63 6f 6e 6e 65 63 74 28 6e 65 77 20 47 74 6b 3a 3a 42 75 74	..gtksignal_connect(new.Gtk::But
1860	74 6f 6e 28 5f 28 22 41 64 76 61 6e 63 65 64 22 29 29 2c 20 63 6c 69 63 6b 65 64 20 3d 3e 20 73	ton(_("Advanced")),.clicked.=>.s
1880	75 62 20 7b 20 0a 09 09 09 09 09 09 20 20 20 20 20 20 20 24 7b 24 63 65 6e 74 72 61 6c 5f 77 69	ub.{...............${$central_wi
18a0	64 67 65 74 7d 2d 3e 64 65 73 74 72 6f 79 28 29 3b 20 61 64 76 61 6e 63 65 64 28 29 20 7d 29 2c	dget}->destroy();.advanced().}),
18c0	0a 09 09 09 09 09 09 20 20 20 29 2c 0a 09 09 09 09 09 20 20 20 6d 79 20 24 70 69 78 5f 72 20 3d	..........),.........my.$pix_r.=
18e0	20 6e 65 77 20 47 74 6b 3a 3a 50 69 78 6d 61 70 28 24 70 69 78 5f 72 5f 6d 61 70 2c 20 24 70 69	.new.Gtk::Pixmap($pix_r_map,.$pi
1900	78 5f 72 5f 6d 61 73 6b 29 2c 0a 09 09 09 09 09 20 20 20 29 2c 0a 09 09 09 09 29 2c 0a 09 09 20	x_r_mask),.........),.....),....
1920	20 20 20 30 2c 20 67 74 6b 70 61 63 6b 5f 28 6e 65 77 20 47 74 6b 3a 3a 48 42 6f 78 28 30 2c 35	...0,.gtkpack_(new.Gtk::HBox(0,5
1940	29 2c 0a 09 09 09 09 31 2c 20 6e 65 77 20 47 74 6b 3a 3a 48 42 6f 78 28 30 2c 30 29 2c 0a 09 09	),.....1,.new.Gtk::HBox(0,0),...
1960	09 09 31 2c 20 67 74 6b 61 64 64 28 67 74 6b 73 65 74 5f 6c 61 79 6f 75 74 28 6e 65 77 20 47 74	..1,.gtkadd(gtkset_layout(new.Gt
1980	6b 3a 3a 48 42 75 74 74 6f 6e 42 6f 78 2c 20 2d 65 6e 64 29 2c 0a 09 09 09 09 09 20 20 67 74 6b	k::HButtonBox,.-end),........gtk
19a0	73 69 67 6e 61 6c 5f 63 6f 6e 6e 65 63 74 28 6e 65 77 20 47 74 6b 3a 3a 42 75 74 74 6f 6e 28 5f	signal_connect(new.Gtk::Button(_
19c0	28 22 48 65 6c 70 22 29 29 2c 20 63 6c 69 63 6b 65 64 20 3d 3e 20 73 75 62 20 7b 20 0a 09 09 09	("Help")),.clicked.=>.sub.{.....
19e0	09 09 20 20 20 20 20 20 24 7b 24 63 65 6e 74 72 61 6c 5f 77 69 64 67 65 74 7d 2d 3e 64 65 73 74	........${$central_widget}->dest
1a00	72 6f 79 28 29 3b 20 68 65 6c 70 28 29 20 7d 29 2c 0a 09 09 09 09 09 20 20 67 74 6b 73 69 67 6e	roy();.help().}),........gtksign
1a20	61 6c 5f 63 6f 6e 6e 65 63 74 28 6e 65 77 20 47 74 6b 3a 3a 42 75 74 74 6f 6e 28 5f 28 22 41 62	al_connect(new.Gtk::Button(_("Ab
1a40	6f 75 74 22 29 29 2c 20 63 6c 69 63 6b 65 64 20 3d 3e 20 73 75 62 20 7b 20 0a 09 09 09 09 09 20	out")),.clicked.=>.sub.{........
1a60	20 20 20 20 20 24 7b 24 63 65 6e 74 72 61 6c 5f 77 69 64 67 65 74 7d 2d 3e 64 65 73 74 72 6f 79	.....${$central_widget}->destroy
1a80	28 29 3b 20 68 65 6c 70 28 29 20 7d 29 2c 0a 09 09 09 09 09 20 20 67 74 6b 73 69 67 6e 61 6c 5f	();.help().}),........gtksignal_
1aa0	63 6f 6e 6e 65 63 74 28 6e 65 77 20 47 74 6b 3a 3a 42 75 74 74 6f 6e 28 5f 28 22 43 6c 6f 73 65	connect(new.Gtk::Button(_("Close
1ac0	22 29 29 2c 20 63 6c 69 63 6b 65 64 20 3d 3e 20 73 75 62 20 7b 20 47 74 6b 2d 3e 6d 61 69 6e 5f	")),.clicked.=>.sub.{.Gtk->main_
1ae0	71 75 69 74 28 29 20 7d 29 2c 0a 09 09 09 09 09 20 20 29 2c 0a 09 09 09 09 29 0a 09 09 20 20 20	quit().}),........),.....)......
1b00	20 29 2c 0a 09 20 20 20 29 3b 0a 20 20 20 20 24 63 65 6e 74 72 61 6c 5f 77 69 64 67 65 74 20 3d	.),.....);.....$central_widget.=
1b20	20 5c 24 70 69 78 6d 61 70 5f 66 73 74 5f 63 68 6f 69 63 65 3b 0a 20 20 20 20 24 77 69 6e 64 6f	.\$pixmap_fst_choice;.....$windo
1b40	77 31 2d 3e 73 68 6f 77 5f 61 6c 6c 3b 0a 20 20 20 20 24 77 69 6e 64 6f 77 31 2d 3e 72 65 61 6c	w1->show_all;.....$window1->real
1b60	69 7a 65 3b 0a 20 20 20 20 24 77 69 6e 64 6f 77 31 2d 3e 73 68 6f 77 5f 61 6c 6c 28 29 3b 0a 20	ize;.....$window1->show_all();..
1b80	20 20 20 0a 20 20 20 20 47 74 6b 2d 3e 6d 61 69 6e 3b 0a 20 20 20 20 47 74 6b 2d 3e 65 78 69 74	........Gtk->main;.....Gtk->exit
1ba0	28 30 29 3b 0a 7d 0a 0a 0a 73 75 62 20 77 69 7a 61 72 64 20 7b 0a 0a 7d 0a 0a 0a 73 75 62 20 61	(0);.}...sub.wizard.{..}...sub.a
1bc0	64 76 61 6e 63 65 64 20 7b 0a 0a 7d 0a 0a 0a 0a 0a 0a 0a 0a 0a 0a 0a 0a 23 20 20 20 20 20 24 70	dvanced.{..}............#.....$p
1be0	69 78 6d 61 70 5f 66 73 74 5f 63 68 6f 69 63 65 20 3d 20 6e 65 77 20 47 74 6b 3a 3a 4e 6f 74 65	ixmap_fst_choice.=.new.Gtk::Note
1c00	62 6f 6f 6b 2c 0a 23 20 20 20 20 20 6d 79 20 24 6c 61 62 65 6c 31 20 3d 20 6e 65 77 20 47 74 6b	book,.#.....my.$label1.=.new.Gtk
1c20	3a 3a 4c 61 62 65 6c 28 20 22 57 68 61 74 20 62 61 63 6b 75 70 2e 22 20 29 3b 0a 23 20 20 20 20	::Label(."What.backup.".);.#....
1c40	20 6d 79 20 24 6c 61 62 65 6c 32 20 3d 20 6e 65 77 20 47 74 6b 3a 3a 4c 61 62 65 6c 28 20 22 57	.my.$label2.=.new.Gtk::Label(."W
1c60	68 65 72 65 20 62 61 63 6b 75 70 2e 22 20 29 3b 0a 23 20 20 20 20 20 6d 79 20 24 6c 61 62 65 6c	here.backup.".);.#.....my.$label
1c80	33 20 3d 20 6e 65 77 20 47 74 6b 3a 3a 4c 61 62 65 6c 28 20 22 57 68 65 6e 20 62 61 63 6b 75 70	3.=.new.Gtk::Label(."When.backup
1ca0	2e 22 20 29 3b 0a 23 0a 23 20 20 20 20 20 67 74 6b 61 64 64 28 24 77 69 6e 64 6f 77 31 2c 0a 23	.".);.#.#.....gtkadd($window1,.#
1cc0	20 09 20 20 20 67 74 6b 70 61 63 6b 5f 28 6e 65 77 20 47 74 6b 3a 3a 56 42 6f 78 28 30 2c 32 29	.....gtkpack_(new.Gtk::VBox(0,2)
1ce0	2c 0a 23 20 09 09 20 20 20 20 31 2c 20 67 74 6b 70 61 63 6b 5f 28 6e 65 77 20 47 74 6b 3a 3a 56	,.#.......1,.gtkpack_(new.Gtk::V
1d00	42 6f 78 28 30 2c 32 29 2c 0a 23 20 09 09 09 09 31 2c 20 6e 65 77 20 47 74 6b 3a 3a 56 42 6f 78	Box(0,2),.#.....1,.new.Gtk::VBox
1d20	28 30 2c 30 29 2c 0a 23 20 09 09 09 09 31 2c 20 67 74 6b 70 61 63 6b 28 67 74 6b 73 65 74 5f 75	(0,0),.#.....1,.gtkpack(gtkset_u
1d40	73 69 7a 65 28 24 6e 6f 74 65 62 6f 6f 6b 5f 62 6f 78 20 3d 20 6e 65 77 20 47 74 6b 3a 3a 56 42	size($notebook_box.=.new.Gtk::VB
1d60	6f 78 28 30 2c 35 29 2c 35 30 30 2c 20 33 35 30 29 2c 0a 23 20 09 09 09 09 09 20 20 20 24 6e 6f	ox(0,5),500,.350),.#.........$no
1d80	74 65 62 6f 6f 6b 20 3d 20 6e 65 77 20 47 74 6b 3a 3a 4e 6f 74 65 62 6f 6f 6b 2c 0a 23 20 09 09	tebook.=.new.Gtk::Notebook,.#...
1da0	09 09 09 20 20 20 24 6e 6f 74 65 62 6f 6f 6b 2d 3e 69 6e 73 65 72 74 5f 70 61 67 65 28 20 24 63	......$notebook->insert_page(.$c
1dc0	68 65 63 6b 62 75 74 74 6f 6e 2c 20 24 6c 61 62 65 6c 31 2c 20 32 20 29 2c 0a 23 20 09 09 09 09	heckbutton,.$label1,.2.),.#.....
1de0	09 20 20 20 24 6e 6f 74 65 62 6f 6f 6b 2d 3e 69 6e 73 65 72 74 5f 70 61 67 65 28 20 24 63 68 65	....$notebook->insert_page(.$che
1e00	63 6b 62 75 74 74 6f 6e 2c 20 24 6c 61 62 65 6c 32 2c 20 32 20 29 2c 0a 23 20 09 09 09 09 09 20	ckbutton,.$label2,.2.),.#.......
1e20	20 20 24 6e 6f 74 65 62 6f 6f 6b 2d 3e 69 6e 73 65 72 74 5f 70 61 67 65 28 20 24 63 68 65 63 6b	..$notebook->insert_page(.$check
1e40	62 75 74 74 6f 6e 2c 20 24 6c 61 62 65 6c 33 2c 20 32 20 29 0a 23 20 09 09 09 09 09 20 20 20 29	button,.$label3,.2.).#.........)
1e60	2c 0a 23 20 09 09 09 09 31 2c 20 6e 65 77 20 47 74 6b 3a 3a 56 42 6f 78 28 30 2c 30 29 0a 23 20	,.#.....1,.new.Gtk::VBox(0,0).#.
1e80	09 09 09 09 29 2c 0a 23 20 09 09 20 20 20 20 30 2c 20 67 74 6b 70 61 63 6b 5f 28 6e 65 77 20 47	....),.#.......0,.gtkpack_(new.G
1ea0	74 6b 3a 3a 48 42 6f 78 28 30 2c 35 29 2c 0a 23 20 09 09 09 09 31 2c 20 6e 65 77 20 47 74 6b 3a	tk::HBox(0,5),.#.....1,.new.Gtk:
1ec0	3a 48 42 6f 78 28 30 2c 30 29 2c 0a 23 20 09 09 09 09 31 2c 20 67 74 6b 61 64 64 28 67 74 6b 73	:HBox(0,0),.#.....1,.gtkadd(gtks
1ee0	65 74 5f 6c 61 79 6f 75 74 28 6e 65 77 20 47 74 6b 3a 3a 48 42 75 74 74 6f 6e 42 6f 78 2c 20 2d	et_layout(new.Gtk::HButtonBox,.-
1f00	65 6e 64 29 2c 0a 23 20 09 09 09 09 09 20 20 67 74 6b 73 69 67 6e 61 6c 5f 63 6f 6e 6e 65 63 74	end),.#........gtksignal_connect
1f20	28 6e 65 77 20 47 74 6b 3a 3a 42 75 74 74 6f 6e 28 5f 28 22 48 65 6c 70 22 29 29 2c 20 63 6c 69	(new.Gtk::Button(_("Help")),.cli
1f40	63 6b 65 64 20 3d 3e 20 73 75 62 20 7b 20 0a 23 20 09 09 09 09 09 20 20 20 20 20 20 20 24 7b 24	cked.=>.sub.{..#.............${$
1f60	63 65 6e 74 72 61 6c 5f 77 69 64 67 65 74 7d 2d 3e 64 65 73 74 72 6f 79 28 29 3b 20 68 65 6c 70	central_widget}->destroy();.help
1f80	28 29 20 7d 29 2c 0a 23 20 09 09 09 09 09 20 20 67 74 6b 73 69 67 6e 61 6c 5f 63 6f 6e 6e 65 63	().}),.#........gtksignal_connec
1fa0	74 28 6e 65 77 20 47 74 6b 3a 3a 42 75 74 74 6f 6e 28 5f 28 22 41 62 6f 75 74 22 29 29 2c 20 63	t(new.Gtk::Button(_("About")),.c
1fc0	6c 69 63 6b 65 64 20 3d 3e 20 73 75 62 20 7b 20 0a 23 20 09 09 09 09 09 20 20 20 20 20 20 20 24	licked.=>.sub.{..#.............$
1fe0	7b 24 63 65 6e 74 72 61 6c 5f 77 69 64 67 65 74 7d 2d 3e 64 65 73 74 72 6f 79 28 29 3b 20 68 65	{$central_widget}->destroy();.he
2000	6c 70 28 29 20 7d 29 2c 0a 23 20 09 09 09 09 09 20 20 67 74 6b 73 69 67 6e 61 6c 5f 63 6f 6e 6e	lp().}),.#........gtksignal_conn
2020	65 63 74 28 6e 65 77 20 47 74 6b 3a 3a 42 75 74 74 6f 6e 28 5f 28 22 43 6c 6f 73 65 22 29 29 2c	ect(new.Gtk::Button(_("Close")),
2040	20 63 6c 69 63 6b 65 64 20 3d 3e 20 73 75 62 20 7b 20 47 74 6b 2d 3e 6d 61 69 6e 5f 71 75 69 74	.clicked.=>.sub.{.Gtk->main_quit
2060	28 29 20 7d 29 2c 0a 23 20 09 09 09 09 09 20 20 29 2c 0a 23 20 09 09 09 09 29 0a 23 20 09 09 20	().}),.#........),.#.....).#....
2080	20 20 20 29 2c 0a 23 20 09 20 20 20 29 3b 0a 0a 23 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f	...),.#.....);..#_______________
20a0	5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f	________________________________
20c0	5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f	________________________________
20e0	5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 5f 0a 0a 0a 23 09 09 09	_________________________...#...
2100	09 30 2c 20 5f 28 22 44 72 61 6b 46 6f 6e 74 22 29 2c 0a 23 09 09 09 09 30 2c 20 67 74 6b 61 64	.0,._("DrakFont"),.#....0,.gtkad
2120	64 28 67 74 6b 73 65 74 5f 6c 61 79 6f 75 74 28 6e 65 77 20 47 74 6b 3a 3a 56 42 75 74 74 6f 6e	d(gtkset_layout(new.Gtk::VButton
2140	42 6f 78 2c 20 2d 65 6e 64 29 2c 0a 23 20 09 09 09 09 09 20 20 67 74 6b 73 69 67 6e 61 6c 5f 63	Box,.-end),.#........gtksignal_c
2160	6f 6e 6e 65 63 74 28 6e 65 77 20 47 74 6b 3a 3a 42 75 74 74 6f 6e 28 5f 28 22 57 69 6e 64 6f 77	onnect(new.Gtk::Button(_("Window
2180	73 20 49 6d 70 6f 72 74 61 74 69 6f 6e 22 29 29 2c 20 63 6c 69 63 6b 65 64 20 09 3d 3e 0a 23 20	s.Importation")),.clicked..=>.#.
21a0	09 09 09 09 09 09 09 20 20 20 20 73 75 62 20 7b 20 24 7b 24 63 65 6e 74 72 61 6c 5f 77 69 64 67	...........sub.{.${$central_widg
21c0	65 74 7d 2d 3e 64 65 73 74 72 6f 79 28 29 3b 20 24 77 69 6e 64 6f 77 73 20 3d 20 31 3b 20 6c 69	et}->destroy();.$windows.=.1;.li
21e0	63 65 6e 73 65 28 5c 26 61 70 70 6c 69 5f 63 68 6f 69 63 65 29 7d 29 2c 0a 23 20 09 09 09 09 09	cense(\&appli_choice)}),.#......
2200	20 20 67 74 6b 73 69 67 6e 61 6c 5f 63 6f 6e 6e 65 63 74 28 6e 65 77 20 47 74 6b 3a 3a 42 75 74	..gtksignal_connect(new.Gtk::But
2220	74 6f 6e 28 5f 28 22 43 6f 6e 66 69 67 75 72 61 74 69 6f 6e 22 29 29 2c 20 63 6c 69 63 6b 65 64	ton(_("Configuration")),.clicked
2240	20 3d 3e 0a 23 20 09 09 09 09 09 09 09 20 20 20 20 73 75 62 20 7b 20 20 24 7b 24 63 65 6e 74 72	.=>.#............sub.{..${$centr
2260	61 6c 5f 77 69 64 67 65 74 7d 2d 3e 64 65 73 74 72 6f 79 28 29 3b 20 24 77 69 6e 64 6f 77 73 20	al_widget}->destroy();.$windows.
2280	3d 20 30 3b 20 6c 69 63 65 6e 73 65 28 5c 26 61 64 76 61 6e 63 65 64 5f 69 6e 73 74 61 6c 6c 29	=.0;.license(\&advanced_install)
22a0	7d 29 2c 0a 23 20 09 09 09 09 09 20 20 67 74 6b 73 69 67 6e 61 6c 5f 63 6f 6e 6e 65 63 74 28 6e	}),.#........gtksignal_connect(n
22c0	65 77 20 47 74 6b 3a 3a 42 75 74 74 6f 6e 28 5f 28 22 55 6e 69 6e 73 74 61 6c 6c 20 46 6f 6e 74	ew.Gtk::Button(_("Uninstall.Font
22e0	73 22 29 29 2c 20 63 6c 69 63 6b 65 64 20 3d 3e 20 0a 23 20 09 09 09 09 09 09 09 20 20 20 20 73	s")),.clicked.=>..#............s
2300	75 62 20 7b 20 24 7b 24 63 65 6e 74 72 61 6c 5f 77 69 64 67 65 74 7d 2d 3e 64 65 73 74 72 6f 79	ub.{.${$central_widget}->destroy
2320	28 29 3b 20 75 6e 69 6e 73 74 61 6c 6c 28 29 20 7d 29 2c 0a 23 20 09 09 09 09 09 20 20 67 74 6b	();.uninstall().}),.#........gtk
2340	73 69 67 6e 61 6c 5f 63 6f 6e 6e 65 63 74 28 6e 65 77 20 47 74 6b 3a 3a 42 75 74 74 6f 6e 28 5f	signal_connect(new.Gtk::Button(_
2360	28 22 46 6f 6e 74 20 4c 69 73 74 22 29 29 2c 20 63 6c 69 63 6b 65 64 20 09 3d 3e 0a 23 20 09 09	("Font.List")),.clicked..=>.#...
2380	09 09 09 09 09 20 20 20 20 73 75 62 20 7b 20 24 7b 24 63 65 6e 74 72 61 6c 5f 77 69 64 67 65 74	.........sub.{.${$central_widget
23a0	7d 2d 3e 64 65 73 74 72 6f 79 28 29 3b 20 63 72 65 61 74 65 5f 66 6f 6e 74 73 65 6c 28 29 7d 29	}->destroy();.create_fontsel()})
23c0	2c 0a 23 09 09 09 09 09 20 20 29 2c 0a	,.#.......),.