Mercurial > forge

annotate main/database/src/__pq_connect__.cc @ 11394:9aee227e296c octave-forge

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Populated new database package with initial postgresql interface.
author i7tiol
date Wed, 16 Jan 2013 06:17:06 +0000
parents
children 2257648e8ce1
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
11394
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
1 /*
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
2
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
3 Copyright (C) 2012 Olaf Till <i7tiol@t-online.de>
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
4
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
5 This program is free software; you can redistribute it and/or modify
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
6 it under the terms of the GNU General Public License as published by
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
7 the Free Software Foundation; either version 3 of the License, or
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
8 (at your option) any later version.
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
9
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
10 This program is distributed in the hope that it will be useful,
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
13 GNU General Public License for more details.
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
14
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
15 You should have received a copy of the GNU General Public License
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
16 along with this program; If not, see <http://www.gnu.org/licenses/>.
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
17
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
18 */
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
19
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
20 #include <octave/oct.h>
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
21
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
22 #include "pq_connection.h"
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
23
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
24
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
25 // PKG_ADD: autoload ("__pq_connect__", "pq_interface.oct");
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
26
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
27 DEFUN_DLD (__pq_connect__, args, ,
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
28 "-*- texinfo -*-\n\
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
29 @deftypefn {Loadable Function} {@var{id}} __pq_connect__ (@var{options})\n\
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
30 Text.\n\
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
31 \n\
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
32 @end deftypefn")
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
33 {
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
34 std::string fname ("__pq_connect__");
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
35
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
36 if (args.length () != 1)
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
37 {
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
38 print_usage ();
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
39
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
40 return octave_value_list ();
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
41 }
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
42
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
43 std::string opt_string = args(0).string_value ();
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
44
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
45 if (error_state)
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
46 {
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
47 error ("%s: argument not a string", fname.c_str ());
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
48
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
49 return octave_value_list ();
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
50 }
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
51
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
52 octave_value retval (new octave_pq_connection (opt_string));
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
53
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
54 // We spare checking
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
55 // bool(octave_pq_connection::octave_pq_get_conn()), since in case
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
56 // of false there was an error thrown, so destruction of the
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
57 // octave_pq_connection object will be caused by Octaves reference
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
58 // counting scheme.
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
59 return retval;
9aee227e296c Populated new database package with initial postgresql interface.
i7tiol
parents:
diff changeset
60 }