1 /*-------------------------------------------------------------------------
5 * Portions Copyright (c) 1996-2008, PostgreSQL Global Development Group
6 * Portions Copyright (c) 1994, Regents of the University of California
8 * $PostgreSQL: pgsql/src/bin/scripts/createlang.c,v 1.30 2008/07/14 22:00:04 momjian Exp $
10 *-------------------------------------------------------------------------
12 #include "postgres_fe.h"
17 static void help(const char *progname);
21 main(int argc, char *argv[])
23 static struct option long_options[] = {
24 {"list", no_argument, NULL, 'l'},
25 {"host", required_argument, NULL, 'h'},
26 {"port", required_argument, NULL, 'p'},
27 {"username", required_argument, NULL, 'U'},
28 {"password", no_argument, NULL, 'W'},
29 {"dbname", required_argument, NULL, 'd'},
30 {"echo", no_argument, NULL, 'e'},
38 bool listlangs = false;
39 const char *dbname = NULL;
42 char *username = NULL;
43 bool password = false;
45 char *langname = NULL;
54 progname = get_progname(argv[0]);
55 set_pglocale_pgservice(argv[0], "pgscripts");
57 handle_help_version_opts(argc, argv, "createlang", help);
59 while ((c = getopt_long(argc, argv, "lh:p:U:Wd:e", long_options, &optindex)) != -1)
85 fprintf(stderr, _("Try \"%s --help\" for more information.\n"), progname);
90 if (argc - optind > 0)
93 dbname = argv[optind++];
96 langname = argv[optind++];
97 if (argc - optind > 0)
98 dbname = argv[optind++];
102 if (argc - optind > 0)
104 fprintf(stderr, _("%s: too many command-line arguments (first is \"%s\")\n"),
105 progname, argv[optind]);
106 fprintf(stderr, _("Try \"%s --help\" for more information.\n"), progname);
112 if (getenv("PGDATABASE"))
113 dbname = getenv("PGDATABASE");
114 else if (getenv("PGUSER"))
115 dbname = getenv("PGUSER");
117 dbname = get_user_name(progname);
120 initPQExpBuffer(&sql);
128 static const bool translate_columns[] = {false, true};
130 conn = connectDatabase(dbname, host, port, username, password,
133 printfPQExpBuffer(&sql, "SELECT lanname as \"%s\", "
134 "(CASE WHEN lanpltrusted THEN '%s' ELSE '%s' END) as \"%s\" "
135 "FROM pg_catalog.pg_language WHERE lanispl;",
136 gettext_noop("Name"),
137 gettext_noop("yes"), gettext_noop("no"),
138 gettext_noop("Trusted?"));
139 result = executeQuery(conn, sql.data, progname, echo);
141 memset(&popt, 0, sizeof(popt));
142 popt.topt.format = PRINT_ALIGNED;
143 popt.topt.border = 1;
144 popt.topt.start_table = true;
145 popt.topt.stop_table = true;
146 popt.topt.encoding = PQclientEncoding(conn);
147 popt.title = _("Procedural Languages");
148 popt.translate_header = true;
149 popt.translate_columns = translate_columns;
150 printQuery(result, &popt, stdout, NULL);
156 if (langname == NULL)
158 fprintf(stderr, _("%s: missing required argument language name\n"), progname);
159 fprintf(stderr, _("Try \"%s --help\" for more information.\n"), progname);
163 for (p = langname; *p; p++)
164 if (*p >= 'A' && *p <= 'Z')
167 conn = connectDatabase(dbname, host, port, username, password, progname);
170 * Make sure the language isn't already installed
172 printfPQExpBuffer(&sql,
173 "SELECT oid FROM pg_catalog.pg_language WHERE lanname = '%s';",
175 result = executeQuery(conn, sql.data, progname, echo);
176 if (PQntuples(result) > 0)
180 _("%s: language \"%s\" is already installed in database \"%s\"\n"),
181 progname, langname, dbname);
182 /* separate exit status for "already installed" */
187 printfPQExpBuffer(&sql, "CREATE LANGUAGE \"%s\";\n", langname);
190 printf("%s", sql.data);
191 result = PQexec(conn, sql.data);
192 if (PQresultStatus(result) != PGRES_COMMAND_OK)
194 fprintf(stderr, _("%s: language installation failed: %s"),
195 progname, PQerrorMessage(conn));
208 help(const char *progname)
210 printf(_("%s installs a procedural language into a PostgreSQL database.\n\n"), progname);
211 printf(_("Usage:\n"));
212 printf(_(" %s [OPTION]... LANGNAME [DBNAME]\n"), progname);
213 printf(_("\nOptions:\n"));
214 printf(_(" -d, --dbname=DBNAME database to install language in\n"));
215 printf(_(" -e, --echo show the commands being sent to the server\n"));
216 printf(_(" -l, --list show a list of currently installed languages\n"));
217 printf(_(" -h, --host=HOSTNAME database server host or socket directory\n"));
218 printf(_(" -p, --port=PORT database server port\n"));
219 printf(_(" -U, --username=USERNAME user name to connect as\n"));
220 printf(_(" -W, --password force password prompt\n"));
221 printf(_(" --help show this help, then exit\n"));
222 printf(_(" --version output version information, then exit\n"));
223 printf(_("\nReport bugs to <pgsql-bugs@postgresql.org>.\n"));