id3fs: create & connect to DB

[id3fs.git] / bin / id3fs

diff --git a/bin/id3fs b/bin/id3fs
index 31a480f..eb0b2bd 100755 (executable)
--- a/bin/id3fs
+++ b/bin/id3fs
@@ -2,23 +2,29 @@
 # Ian Beckwith <ianb@erislabs.net>
 #
 
+use lib '/home/ianb/projects/id3fs/id3fs/lib';
 use strict;
 use Getopt::Long qw(Configure);
+use ID3FS::DB;
 use vars qw($me);
 $me=($0=~/(?:.*\/)?(.*)/)[0];
 
 my $verbose=0;
 my $help=0;
-
+my $init=0;
 Configure(qw(bundling no_ignore_case));
 my $optret=GetOptions(
     "verbose|v"  => \$verbose,
     "quiet|q"    => sub { $verbose=0; },
     "help|h"     => \$help,
+    "init|i"     => \$init,
     );
 
 usage() if(!@ARGV || !$optret || $help);
 
+my $path=shift;
+my $db=ID3FS::DB->new($path, $init, $me);
+
 sub usage
 {
     die("Usage: $me [-v] [-q] [-h] [--] file...\n".