#!/usr/bin/perl

use strict;
use warnings;
use open ':std', ':encoding(UTF-8)';

use Git;
use JSON::XS;
use DateTime;
use FileHandle;
use Array::Utils qw(:all);
use Digest::MD5  qw(md5 md5_hex md5_base64);
use Text::CSV::Easy(qw/csv_build csv_parse/);
use Getopt::Long::Descriptive(qw/describe_options/);

use lib '/var/app/orchard/collab/jgetter/perllib';
use Orchard::Session;
use Orchard::NameCase;
use Orchard::DB::Connect;
use Orchard::Accounting::JIRA;
use Orchard::ETL::Extract::CSV;

my $table = 'nr_contributors';

my $data;
while(<>) {
	chomp;
	next if $_ =~ m/^ID/;
	my ($id,$name,$sname) = split "\t", $_;
	next if defined $name and $name eq '';
	$name =~ s/'//g;
	$sname =~ s/'//g;
	push @{$data}, "('$id','$name','$sname')";
}
my $inserts = join ",\n", @{$data};

print <<"!";
-- liquibase formatted sql

-- changeset jgetter:1

DROP TABLE IF EXISTS $table;

CREATE TABLE $table (
	contributor_id varchar(180) not null,
	contributor_name varchar(180) not null,
	contributor_stage_name varchar(180) null,
	primary key (contributor_id),
	key idx_contributor_name (contributor_name)
);

INSERT INTO $table VALUES
$inserts;

--rollback DROP TABLE IF EXISTS $table;
!