Merge 'current' into 'back-compat'
[dbsrgits/DBIx-Class-Schema-Loader.git] / lib / DBIx / Class / Schema / Loader / DBI / Writing.pm
CommitLineData
996be9ee 1package DBIx::Class::Schema::Loader::DBI::Writing;
2use strict;
3
b1ad1a84 4our $VERSION = '0.04999_10';
32f784fc 5
996be9ee 6# Empty. POD only.
7
996be9ee 8=head1 NAME
9
10DBIx::Class::Schema::Loader::DBI::Writing - Loader subclass writing guide for DBI
11
12=head1 SYNOPSIS
13
14 package DBIx::Class::Schema::Loader::DBI::Foo;
15
16 # THIS IS JUST A TEMPLATE TO GET YOU STARTED.
17
18 use strict;
19 use warnings;
20 use base 'DBIx::Class::Schema::Loader::DBI';
fa994d3c 21 use Carp::Clan qw/^DBIx::Class/;
996be9ee 22 use Class::C3;
23
24 sub _table_uniq_info {
25 my ($self, $table) = @_;
26
27 # ... get UNIQUE info for $table somehow
28 # and return a data structure that looks like this:
29
30 return [
31 [ 'keyname' => [ 'colname' ] ],
32 [ 'keyname2' => [ 'col1name', 'col2name' ] ],
33 [ 'keyname3' => [ 'colname' ] ],
34 ];
35
36 # Where the "keyname"'s are just unique identifiers, such as the
37 # name of the unique constraint, or the names of the columns involved
38 # concatenated if you wish.
39 }
40
41 1;
42
43=head1 DETAILS
44
45The only required method for new subclasses is C<_table_uniq_info>,
25328cc4 46as there is not (yet) any standardized, DBD-agnostic way for obtaining
47this information from DBI.
996be9ee 48
49The base DBI Loader contains generic methods that *should* work for
50everything else in theory, although in practice some DBDs need to
51override one or more of the other methods. The other methods one might
b15c5735 52likely want to override are: C<_table_pk_info>, C<_table_fk_info>,
53C<_tables_list> and C<_extra_column_info>. See the included DBD drivers
54for examples of these.
996be9ee 55
be80bba7 56=head1 AUTHOR
57
58See L<DBIx::Class::Schema::Loader/CONTRIBUTORS>.
59
60=head1 LICENSE
61
62This library is free software; you can redistribute it and/or modify it under
63the same terms as Perl itself.
64
996be9ee 65=cut
66
671;