Age Owner Branch data TLA Line data Source code
1 : : /*-------------------------------------------------------------------------
2 : : *
3 : : * foreigncmds.c
4 : : * foreign-data wrapper/server creation/manipulation commands
5 : : *
6 : : * Portions Copyright (c) 1996-2025, PostgreSQL Global Development Group
7 : : *
8 : : *
9 : : * IDENTIFICATION
10 : : * src/backend/commands/foreigncmds.c
11 : : *
12 : : *-------------------------------------------------------------------------
13 : : */
14 : : #include "postgres.h"
15 : :
16 : : #include "access/htup_details.h"
17 : : #include "access/reloptions.h"
18 : : #include "access/table.h"
19 : : #include "access/xact.h"
20 : : #include "catalog/catalog.h"
21 : : #include "catalog/dependency.h"
22 : : #include "catalog/indexing.h"
23 : : #include "catalog/objectaccess.h"
24 : : #include "catalog/pg_foreign_data_wrapper.h"
25 : : #include "catalog/pg_foreign_server.h"
26 : : #include "catalog/pg_foreign_table.h"
27 : : #include "catalog/pg_proc.h"
28 : : #include "catalog/pg_type.h"
29 : : #include "catalog/pg_user_mapping.h"
30 : : #include "commands/defrem.h"
31 : : #include "foreign/fdwapi.h"
32 : : #include "foreign/foreign.h"
33 : : #include "miscadmin.h"
34 : : #include "parser/parse_func.h"
35 : : #include "tcop/utility.h"
36 : : #include "utils/acl.h"
37 : : #include "utils/builtins.h"
38 : : #include "utils/lsyscache.h"
39 : : #include "utils/rel.h"
40 : : #include "utils/syscache.h"
41 : :
42 : :
43 : : typedef struct
44 : : {
45 : : char *tablename;
46 : : char *cmd;
47 : : } import_error_callback_arg;
48 : :
49 : : /* Internal functions */
50 : : static void import_error_callback(void *arg);
51 : :
52 : :
53 : : /*
54 : : * Convert a DefElem list to the text array format that is used in
55 : : * pg_foreign_data_wrapper, pg_foreign_server, pg_user_mapping, and
56 : : * pg_foreign_table.
57 : : *
58 : : * Returns the array in the form of a Datum, or PointerGetDatum(NULL)
59 : : * if the list is empty.
60 : : *
61 : : * Note: The array is usually stored to database without further
62 : : * processing, hence any validation should be done before this
63 : : * conversion.
64 : : */
65 : : static Datum
6105 peter_e@gmx.net 66 :CBC 786 : optionListToArray(List *options)
67 : : {
5931 bruce@momjian.us 68 : 786 : ArrayBuildState *astate = NULL;
69 : : ListCell *cell;
70 : :
6104 tgl@sss.pgh.pa.us 71 [ + + + + : 1982 : foreach(cell, options)
+ + ]
72 : : {
6105 peter_e@gmx.net 73 : 1197 : DefElem *def = lfirst(cell);
74 : : const char *name;
75 : : const char *value;
76 : : Size len;
77 : : text *t;
78 : :
96 tgl@sss.pgh.pa.us 79 : 1197 : name = def->defname;
6105 peter_e@gmx.net 80 : 1197 : value = defGetString(def);
81 : :
82 : : /* Insist that name not contain "=", else "a=b=c" is ambiguous */
96 tgl@sss.pgh.pa.us 83 [ + + ]: 1197 : if (strchr(name, '=') != NULL)
84 [ + - ]: 1 : ereport(ERROR,
85 : : (errcode(ERRCODE_INVALID_PARAMETER_VALUE),
86 : : errmsg("invalid option name \"%s\": must not contain \"=\"",
87 : : name)));
88 : :
89 : 1196 : len = VARHDRSZ + strlen(name) + 1 + strlen(value);
90 : : /* +1 leaves room for sprintf's trailing null */
6105 peter_e@gmx.net 91 : 1196 : t = palloc(len + 1);
92 : 1196 : SET_VARSIZE(t, len);
96 tgl@sss.pgh.pa.us 93 : 1196 : sprintf(VARDATA(t), "%s=%s", name, value);
94 : :
6105 peter_e@gmx.net 95 : 1196 : astate = accumArrayResult(astate, PointerGetDatum(t),
96 : : false, TEXTOID,
97 : : CurrentMemoryContext);
98 : : }
99 : :
100 [ + + ]: 785 : if (astate)
101 : 517 : return makeArrayResult(astate, CurrentMemoryContext);
102 : :
103 : 268 : return PointerGetDatum(NULL);
104 : : }
105 : :
106 : :
107 : : /*
108 : : * Transform a list of DefElem into text array format. This is substantially
109 : : * the same thing as optionListToArray(), except we recognize SET/ADD/DROP
110 : : * actions for modifying an existing list of options, which is passed in
111 : : * Datum form as oldOptions. Also, if fdwvalidator isn't InvalidOid
112 : : * it specifies a validator function to call on the result.
113 : : *
114 : : * Returns the array in the form of a Datum, or PointerGetDatum(NULL)
115 : : * if the list is empty.
116 : : *
117 : : * This is used by CREATE/ALTER of FOREIGN DATA WRAPPER/SERVER/USER MAPPING/
118 : : * FOREIGN TABLE.
119 : : */
120 : : Datum
5736 heikki.linnakangas@i 121 : 798 : transformGenericOptions(Oid catalogId,
122 : : Datum oldOptions,
123 : : List *options,
124 : : Oid fdwvalidator)
125 : : {
5931 bruce@momjian.us 126 : 798 : List *resultOptions = untransformRelOptions(oldOptions);
127 : : ListCell *optcell;
128 : : Datum result;
129 : :
5999 tgl@sss.pgh.pa.us 130 [ + + + + : 1606 : foreach(optcell, options)
+ + ]
131 : : {
5931 bruce@momjian.us 132 : 820 : DefElem *od = lfirst(optcell);
133 : : ListCell *cell;
134 : :
135 : : /*
136 : : * Find the element in resultOptions. We need this for validation in
137 : : * all cases.
138 : : */
139 [ + + + + : 1883 : foreach(cell, resultOptions)
+ + ]
140 : : {
141 : 1178 : DefElem *def = lfirst(cell);
142 : :
5999 tgl@sss.pgh.pa.us 143 [ + + ]: 1178 : if (strcmp(def->defname, od->defname) == 0)
6105 peter_e@gmx.net 144 : 115 : break;
145 : : }
146 : :
147 : : /*
148 : : * It is possible to perform multiple SET/DROP actions on the same
149 : : * option. The standard permits this, as long as the options to be
150 : : * added are unique. Note that an unspecified action is taken to be
151 : : * ADD.
152 : : */
5999 tgl@sss.pgh.pa.us 153 [ + + + - ]: 820 : switch (od->defaction)
154 : : {
155 : 58 : case DEFELEM_DROP:
6105 peter_e@gmx.net 156 [ + + ]: 58 : if (!cell)
157 [ + - ]: 3 : ereport(ERROR,
158 : : (errcode(ERRCODE_UNDEFINED_OBJECT),
159 : : errmsg("option \"%s\" not found",
160 : : od->defname)));
2245 tgl@sss.pgh.pa.us 161 : 55 : resultOptions = list_delete_cell(resultOptions, cell);
6105 peter_e@gmx.net 162 : 55 : break;
163 : :
5999 tgl@sss.pgh.pa.us 164 : 57 : case DEFELEM_SET:
6105 peter_e@gmx.net 165 [ + + ]: 57 : if (!cell)
166 [ + - ]: 3 : ereport(ERROR,
167 : : (errcode(ERRCODE_UNDEFINED_OBJECT),
168 : : errmsg("option \"%s\" not found",
169 : : od->defname)));
5999 tgl@sss.pgh.pa.us 170 : 54 : lfirst(cell) = od;
6105 peter_e@gmx.net 171 : 54 : break;
172 : :
5999 tgl@sss.pgh.pa.us 173 : 705 : case DEFELEM_ADD:
174 : : case DEFELEM_UNSPEC:
6105 peter_e@gmx.net 175 [ + + ]: 705 : if (cell)
176 [ + - ]: 6 : ereport(ERROR,
177 : : (errcode(ERRCODE_DUPLICATE_OBJECT),
178 : : errmsg("option \"%s\" provided more than once",
179 : : od->defname)));
5999 tgl@sss.pgh.pa.us 180 : 699 : resultOptions = lappend(resultOptions, od);
6105 peter_e@gmx.net 181 : 699 : break;
182 : :
6105 peter_e@gmx.net 183 :UBC 0 : default:
184 [ # # ]: 0 : elog(ERROR, "unrecognized action %d on option \"%s\"",
185 : : (int) od->defaction, od->defname);
186 : : break;
187 : : }
188 : : }
189 : :
6038 peter_e@gmx.net 190 :CBC 786 : result = optionListToArray(resultOptions);
191 : :
5177 tgl@sss.pgh.pa.us 192 [ + + ]: 785 : if (OidIsValid(fdwvalidator))
193 : : {
4836 bruce@momjian.us 194 : 447 : Datum valarg = result;
195 : :
196 : : /*
197 : : * Pass a null options list as an empty array, so that validators
198 : : * don't have to be declared non-strict to handle the case.
199 : : */
5177 tgl@sss.pgh.pa.us 200 [ + + ]: 447 : if (DatumGetPointer(valarg) == NULL)
201 : 61 : valarg = PointerGetDatum(construct_empty_array(TEXTOID));
202 : 447 : OidFunctionCall2(fdwvalidator, valarg, ObjectIdGetDatum(catalogId));
203 : : }
204 : :
6038 peter_e@gmx.net 205 : 710 : return result;
206 : : }
207 : :
208 : :
209 : : /*
210 : : * Internal workhorse for changing a data wrapper's owner.
211 : : *
212 : : * Allow this only for superusers; also the new owner must be a
213 : : * superuser.
214 : : */
215 : : static void
4946 alvherre@alvh.no-ip. 216 : 10 : AlterForeignDataWrapperOwner_internal(Relation rel, HeapTuple tup, Oid newOwnerId)
217 : : {
218 : : Form_pg_foreign_data_wrapper form;
219 : : Datum repl_val[Natts_pg_foreign_data_wrapper];
220 : : bool repl_null[Natts_pg_foreign_data_wrapper];
221 : : bool repl_repl[Natts_pg_foreign_data_wrapper];
222 : : Acl *newAcl;
223 : : Datum aclDatum;
224 : : bool isNull;
225 : :
226 : 10 : form = (Form_pg_foreign_data_wrapper) GETSTRUCT(tup);
227 : :
228 : : /* Must be a superuser to change a FDW owner */
6105 peter_e@gmx.net 229 [ + + ]: 10 : if (!superuser())
230 [ + - ]: 3 : ereport(ERROR,
231 : : (errcode(ERRCODE_INSUFFICIENT_PRIVILEGE),
232 : : errmsg("permission denied to change owner of foreign-data wrapper \"%s\"",
233 : : NameStr(form->fdwname)),
234 : : errhint("Must be superuser to change owner of a foreign-data wrapper.")));
235 : :
236 : : /* New owner must also be a superuser */
237 [ + + ]: 7 : if (!superuser_arg(newOwnerId))
238 [ + - ]: 3 : ereport(ERROR,
239 : : (errcode(ERRCODE_INSUFFICIENT_PRIVILEGE),
240 : : errmsg("permission denied to change owner of foreign-data wrapper \"%s\"",
241 : : NameStr(form->fdwname)),
242 : : errhint("The owner of a foreign-data wrapper must be a superuser.")));
243 : :
244 [ + + ]: 4 : if (form->fdwowner != newOwnerId)
245 : : {
3880 bruce@momjian.us 246 : 3 : memset(repl_null, false, sizeof(repl_null));
247 : 3 : memset(repl_repl, false, sizeof(repl_repl));
248 : :
249 : 3 : repl_repl[Anum_pg_foreign_data_wrapper_fdwowner - 1] = true;
250 : 3 : repl_val[Anum_pg_foreign_data_wrapper_fdwowner - 1] = ObjectIdGetDatum(newOwnerId);
251 : :
252 : 3 : aclDatum = heap_getattr(tup,
253 : : Anum_pg_foreign_data_wrapper_fdwacl,
254 : : RelationGetDescr(rel),
255 : : &isNull);
256 : : /* Null ACLs do not require changes */
257 [ - + ]: 3 : if (!isNull)
258 : : {
3880 bruce@momjian.us 259 :UBC 0 : newAcl = aclnewowner(DatumGetAclP(aclDatum),
260 : : form->fdwowner, newOwnerId);
261 : 0 : repl_repl[Anum_pg_foreign_data_wrapper_fdwacl - 1] = true;
262 : 0 : repl_val[Anum_pg_foreign_data_wrapper_fdwacl - 1] = PointerGetDatum(newAcl);
263 : : }
264 : :
3880 bruce@momjian.us 265 :CBC 3 : tup = heap_modify_tuple(tup, RelationGetDescr(rel), repl_val, repl_null,
266 : : repl_repl);
267 : :
3140 alvherre@alvh.no-ip. 268 : 3 : CatalogTupleUpdate(rel, &tup->t_self, tup);
269 : :
270 : : /* Update owner dependency reference */
6105 peter_e@gmx.net 271 : 3 : changeDependencyOnOwner(ForeignDataWrapperRelationId,
272 : : form->oid,
273 : : newOwnerId);
274 : : }
275 : :
4556 rhaas@postgresql.org 276 [ - + ]: 4 : InvokeObjectPostAlterHook(ForeignDataWrapperRelationId,
277 : : form->oid, 0);
4946 alvherre@alvh.no-ip. 278 : 4 : }
279 : :
280 : : /*
281 : : * Change foreign-data wrapper owner -- by name
282 : : *
283 : : * Note restrictions in the "_internal" function, above.
284 : : */
285 : : ObjectAddress
286 : 10 : AlterForeignDataWrapperOwner(const char *name, Oid newOwnerId)
287 : : {
288 : : Oid fdwId;
289 : : HeapTuple tup;
290 : : Relation rel;
291 : : ObjectAddress address;
292 : : Form_pg_foreign_data_wrapper form;
293 : :
294 : :
2420 andres@anarazel.de 295 : 10 : rel = table_open(ForeignDataWrapperRelationId, RowExclusiveLock);
296 : :
4946 alvherre@alvh.no-ip. 297 : 10 : tup = SearchSysCacheCopy1(FOREIGNDATAWRAPPERNAME, CStringGetDatum(name));
298 : :
299 [ - + ]: 10 : if (!HeapTupleIsValid(tup))
4946 alvherre@alvh.no-ip. 300 [ # # ]:UBC 0 : ereport(ERROR,
301 : : (errcode(ERRCODE_UNDEFINED_OBJECT),
302 : : errmsg("foreign-data wrapper \"%s\" does not exist", name)));
303 : :
2482 andres@anarazel.de 304 :CBC 10 : form = (Form_pg_foreign_data_wrapper) GETSTRUCT(tup);
305 : 10 : fdwId = form->oid;
306 : :
4946 alvherre@alvh.no-ip. 307 : 10 : AlterForeignDataWrapperOwner_internal(rel, tup, newOwnerId);
308 : :
3840 309 : 4 : ObjectAddressSet(address, ForeignDataWrapperRelationId, fdwId);
310 : :
6105 peter_e@gmx.net 311 : 4 : heap_freetuple(tup);
312 : :
2420 andres@anarazel.de 313 : 4 : table_close(rel, RowExclusiveLock);
314 : :
3840 alvherre@alvh.no-ip. 315 : 4 : return address;
316 : : }
317 : :
318 : : /*
319 : : * Change foreign-data wrapper owner -- by OID
320 : : *
321 : : * Note restrictions in the "_internal" function, above.
322 : : */
323 : : void
4946 alvherre@alvh.no-ip. 324 :UBC 0 : AlterForeignDataWrapperOwner_oid(Oid fwdId, Oid newOwnerId)
325 : : {
326 : : HeapTuple tup;
327 : : Relation rel;
328 : :
2420 andres@anarazel.de 329 : 0 : rel = table_open(ForeignDataWrapperRelationId, RowExclusiveLock);
330 : :
4946 alvherre@alvh.no-ip. 331 : 0 : tup = SearchSysCacheCopy1(FOREIGNDATAWRAPPEROID, ObjectIdGetDatum(fwdId));
332 : :
6105 peter_e@gmx.net 333 [ # # ]: 0 : if (!HeapTupleIsValid(tup))
5931 bruce@momjian.us 334 [ # # ]: 0 : ereport(ERROR,
335 : : (errcode(ERRCODE_UNDEFINED_OBJECT),
336 : : errmsg("foreign-data wrapper with OID %u does not exist", fwdId)));
337 : :
4946 alvherre@alvh.no-ip. 338 : 0 : AlterForeignDataWrapperOwner_internal(rel, tup, newOwnerId);
339 : :
340 : 0 : heap_freetuple(tup);
341 : :
2420 andres@anarazel.de 342 : 0 : table_close(rel, RowExclusiveLock);
4946 alvherre@alvh.no-ip. 343 : 0 : }
344 : :
345 : : /*
346 : : * Internal workhorse for changing a foreign server's owner
347 : : */
348 : : static void
4946 alvherre@alvh.no-ip. 349 :CBC 40 : AlterForeignServerOwner_internal(Relation rel, HeapTuple tup, Oid newOwnerId)
350 : : {
351 : : Form_pg_foreign_server form;
352 : : Datum repl_val[Natts_pg_foreign_server];
353 : : bool repl_null[Natts_pg_foreign_server];
354 : : bool repl_repl[Natts_pg_foreign_server];
355 : : Acl *newAcl;
356 : : Datum aclDatum;
357 : : bool isNull;
358 : :
6105 peter_e@gmx.net 359 : 40 : form = (Form_pg_foreign_server) GETSTRUCT(tup);
360 : :
361 [ + + ]: 40 : if (form->srvowner != newOwnerId)
362 : : {
363 : : /* Superusers can always do it */
364 [ + + ]: 36 : if (!superuser())
365 : : {
366 : : Oid srvId;
367 : : AclResult aclresult;
368 : :
2482 andres@anarazel.de 369 : 15 : srvId = form->oid;
370 : :
371 : : /* Must be owner */
1028 peter@eisentraut.org 372 [ + + ]: 15 : if (!object_ownercheck(ForeignServerRelationId, srvId, GetUserId()))
2835 peter_e@gmx.net 373 : 6 : aclcheck_error(ACLCHECK_NOT_OWNER, OBJECT_FOREIGN_SERVER,
4946 alvherre@alvh.no-ip. 374 : 6 : NameStr(form->srvname));
375 : :
376 : : /* Must be able to become new owner */
1023 rhaas@postgresql.org 377 : 9 : check_can_set_role(GetUserId(), newOwnerId);
378 : :
379 : : /* New owner must have USAGE privilege on foreign-data wrapper */
1028 peter@eisentraut.org 380 : 6 : aclresult = object_aclcheck(ForeignDataWrapperRelationId, form->srvfdw, newOwnerId, ACL_USAGE);
6105 peter_e@gmx.net 381 [ + + ]: 6 : if (aclresult != ACLCHECK_OK)
382 : : {
383 : 3 : ForeignDataWrapper *fdw = GetForeignDataWrapper(form->srvfdw);
384 : :
2835 385 : 3 : aclcheck_error(aclresult, OBJECT_FDW, fdw->fdwname);
386 : : }
387 : : }
388 : :
3880 bruce@momjian.us 389 : 24 : memset(repl_null, false, sizeof(repl_null));
390 : 24 : memset(repl_repl, false, sizeof(repl_repl));
391 : :
392 : 24 : repl_repl[Anum_pg_foreign_server_srvowner - 1] = true;
393 : 24 : repl_val[Anum_pg_foreign_server_srvowner - 1] = ObjectIdGetDatum(newOwnerId);
394 : :
395 : 24 : aclDatum = heap_getattr(tup,
396 : : Anum_pg_foreign_server_srvacl,
397 : : RelationGetDescr(rel),
398 : : &isNull);
399 : : /* Null ACLs do not require changes */
400 [ + + ]: 24 : if (!isNull)
401 : : {
402 : 9 : newAcl = aclnewowner(DatumGetAclP(aclDatum),
403 : : form->srvowner, newOwnerId);
404 : 9 : repl_repl[Anum_pg_foreign_server_srvacl - 1] = true;
405 : 9 : repl_val[Anum_pg_foreign_server_srvacl - 1] = PointerGetDatum(newAcl);
406 : : }
407 : :
408 : 24 : tup = heap_modify_tuple(tup, RelationGetDescr(rel), repl_val, repl_null,
409 : : repl_repl);
410 : :
3140 alvherre@alvh.no-ip. 411 : 24 : CatalogTupleUpdate(rel, &tup->t_self, tup);
412 : :
413 : : /* Update owner dependency reference */
2482 andres@anarazel.de 414 : 24 : changeDependencyOnOwner(ForeignServerRelationId, form->oid,
415 : : newOwnerId);
416 : : }
417 : :
4556 rhaas@postgresql.org 418 [ - + ]: 28 : InvokeObjectPostAlterHook(ForeignServerRelationId,
419 : : form->oid, 0);
4946 alvherre@alvh.no-ip. 420 : 28 : }
421 : :
422 : : /*
423 : : * Change foreign server owner -- by name
424 : : */
425 : : ObjectAddress
426 : 34 : AlterForeignServerOwner(const char *name, Oid newOwnerId)
427 : : {
428 : : Oid servOid;
429 : : HeapTuple tup;
430 : : Relation rel;
431 : : ObjectAddress address;
432 : : Form_pg_foreign_server form;
433 : :
2420 andres@anarazel.de 434 : 34 : rel = table_open(ForeignServerRelationId, RowExclusiveLock);
435 : :
4946 alvherre@alvh.no-ip. 436 : 34 : tup = SearchSysCacheCopy1(FOREIGNSERVERNAME, CStringGetDatum(name));
437 : :
438 [ - + ]: 34 : if (!HeapTupleIsValid(tup))
4946 alvherre@alvh.no-ip. 439 [ # # ]:UBC 0 : ereport(ERROR,
440 : : (errcode(ERRCODE_UNDEFINED_OBJECT),
441 : : errmsg("server \"%s\" does not exist", name)));
442 : :
2482 andres@anarazel.de 443 :CBC 34 : form = (Form_pg_foreign_server) GETSTRUCT(tup);
444 : 34 : servOid = form->oid;
445 : :
4946 alvherre@alvh.no-ip. 446 : 34 : AlterForeignServerOwner_internal(rel, tup, newOwnerId);
447 : :
3840 448 : 22 : ObjectAddressSet(address, ForeignServerRelationId, servOid);
449 : :
6105 peter_e@gmx.net 450 : 22 : heap_freetuple(tup);
451 : :
2420 andres@anarazel.de 452 : 22 : table_close(rel, RowExclusiveLock);
453 : :
3840 alvherre@alvh.no-ip. 454 : 22 : return address;
455 : : }
456 : :
457 : : /*
458 : : * Change foreign server owner -- by OID
459 : : */
460 : : void
4946 461 : 6 : AlterForeignServerOwner_oid(Oid srvId, Oid newOwnerId)
462 : : {
463 : : HeapTuple tup;
464 : : Relation rel;
465 : :
2420 andres@anarazel.de 466 : 6 : rel = table_open(ForeignServerRelationId, RowExclusiveLock);
467 : :
4946 alvherre@alvh.no-ip. 468 : 6 : tup = SearchSysCacheCopy1(FOREIGNSERVEROID, ObjectIdGetDatum(srvId));
469 : :
470 [ - + ]: 6 : if (!HeapTupleIsValid(tup))
4946 alvherre@alvh.no-ip. 471 [ # # ]:UBC 0 : ereport(ERROR,
472 : : (errcode(ERRCODE_UNDEFINED_OBJECT),
473 : : errmsg("foreign server with OID %u does not exist", srvId)));
474 : :
4946 alvherre@alvh.no-ip. 475 :CBC 6 : AlterForeignServerOwner_internal(rel, tup, newOwnerId);
476 : :
477 : 6 : heap_freetuple(tup);
478 : :
2420 andres@anarazel.de 479 : 6 : table_close(rel, RowExclusiveLock);
4946 alvherre@alvh.no-ip. 480 : 6 : }
481 : :
482 : : /*
483 : : * Convert a handler function name passed from the parser to an Oid.
484 : : */
485 : : static Oid
5313 tgl@sss.pgh.pa.us 486 : 22 : lookup_fdw_handler_func(DefElem *handler)
487 : : {
488 : : Oid handlerOid;
489 : :
490 [ + - - + ]: 22 : if (handler == NULL || handler->arg == NULL)
5313 tgl@sss.pgh.pa.us 491 :UBC 0 : return InvalidOid;
492 : :
493 : : /* handlers have no arguments */
2125 alvherre@alvh.no-ip. 494 :CBC 22 : handlerOid = LookupFuncName((List *) handler->arg, 0, NULL, false);
495 : :
496 : : /* check that handler has correct return type */
5313 tgl@sss.pgh.pa.us 497 [ + + ]: 22 : if (get_func_rettype(handlerOid) != FDW_HANDLEROID)
498 [ + - ]: 6 : ereport(ERROR,
499 : : (errcode(ERRCODE_WRONG_OBJECT_TYPE),
500 : : errmsg("function %s must return type %s",
501 : : NameListToString((List *) handler->arg), "fdw_handler")));
502 : :
503 : 16 : return handlerOid;
504 : : }
505 : :
506 : : /*
507 : : * Convert a validator function name passed from the parser to an Oid.
508 : : */
509 : : static Oid
510 : 28 : lookup_fdw_validator_func(DefElem *validator)
511 : : {
512 : : Oid funcargtypes[2];
513 : :
514 [ + - + + ]: 28 : if (validator == NULL || validator->arg == NULL)
515 : 3 : return InvalidOid;
516 : :
517 : : /* validators take text[], oid */
6038 peter_e@gmx.net 518 : 25 : funcargtypes[0] = TEXTARRAYOID;
519 : 25 : funcargtypes[1] = OIDOID;
520 : :
5313 tgl@sss.pgh.pa.us 521 : 25 : return LookupFuncName((List *) validator->arg, 2, funcargtypes, false);
522 : : /* validator's return value is ignored, so we don't check the type */
523 : : }
524 : :
525 : : /*
526 : : * Process function options of CREATE/ALTER FDW
527 : : */
528 : : static void
1514 dean.a.rasheed@gmail 529 : 139 : parse_func_options(ParseState *pstate, List *func_options,
530 : : bool *handler_given, Oid *fdwhandler,
531 : : bool *validator_given, Oid *fdwvalidator)
532 : : {
533 : : ListCell *cell;
534 : :
5313 tgl@sss.pgh.pa.us 535 : 139 : *handler_given = false;
536 : 139 : *validator_given = false;
537 : : /* return InvalidOid if not given */
538 : 139 : *fdwhandler = InvalidOid;
539 : 139 : *fdwvalidator = InvalidOid;
540 : :
541 [ + + + + : 177 : foreach(cell, func_options)
+ + ]
542 : : {
543 : 56 : DefElem *def = (DefElem *) lfirst(cell);
544 : :
545 [ + + ]: 56 : if (strcmp(def->defname, "handler") == 0)
546 : : {
547 [ + + ]: 28 : if (*handler_given)
1514 dean.a.rasheed@gmail 548 : 6 : errorConflictingDefElem(def, pstate);
5313 tgl@sss.pgh.pa.us 549 : 22 : *handler_given = true;
550 : 22 : *fdwhandler = lookup_fdw_handler_func(def);
551 : : }
552 [ + - ]: 28 : else if (strcmp(def->defname, "validator") == 0)
553 : : {
554 [ - + ]: 28 : if (*validator_given)
1514 dean.a.rasheed@gmail 555 :UBC 0 : errorConflictingDefElem(def, pstate);
5313 tgl@sss.pgh.pa.us 556 :CBC 28 : *validator_given = true;
557 : 28 : *fdwvalidator = lookup_fdw_validator_func(def);
558 : : }
559 : : else
5313 tgl@sss.pgh.pa.us 560 [ # # ]:UBC 0 : elog(ERROR, "option \"%s\" not recognized",
561 : : def->defname);
562 : : }
5313 tgl@sss.pgh.pa.us 563 :CBC 121 : }
564 : :
565 : : /*
566 : : * Create a foreign-data wrapper
567 : : */
568 : : ObjectAddress
1514 dean.a.rasheed@gmail 569 : 103 : CreateForeignDataWrapper(ParseState *pstate, CreateFdwStmt *stmt)
570 : : {
571 : : Relation rel;
572 : : Datum values[Natts_pg_foreign_data_wrapper];
573 : : bool nulls[Natts_pg_foreign_data_wrapper];
574 : : HeapTuple tuple;
575 : : Oid fdwId;
576 : : bool handler_given;
577 : : bool validator_given;
578 : : Oid fdwhandler;
579 : : Oid fdwvalidator;
580 : : Datum fdwoptions;
581 : : Oid ownerId;
582 : : ObjectAddress myself;
583 : : ObjectAddress referenced;
584 : :
2420 andres@anarazel.de 585 : 103 : rel = table_open(ForeignDataWrapperRelationId, RowExclusiveLock);
586 : :
587 : : /* Must be superuser */
6105 peter_e@gmx.net 588 [ + + ]: 103 : if (!superuser())
589 [ + - ]: 10 : ereport(ERROR,
590 : : (errcode(ERRCODE_INSUFFICIENT_PRIVILEGE),
591 : : errmsg("permission denied to create foreign-data wrapper \"%s\"",
592 : : stmt->fdwname),
593 : : errhint("Must be superuser to create a foreign-data wrapper.")));
594 : :
595 : : /* For now the owner cannot be specified on create. Use effective user ID. */
596 : 93 : ownerId = GetUserId();
597 : :
598 : : /*
599 : : * Check that there is no other foreign-data wrapper by this name.
600 : : */
601 [ + + ]: 93 : if (GetForeignDataWrapperByName(stmt->fdwname, true) != NULL)
602 [ + - ]: 3 : ereport(ERROR,
603 : : (errcode(ERRCODE_DUPLICATE_OBJECT),
604 : : errmsg("foreign-data wrapper \"%s\" already exists",
605 : : stmt->fdwname)));
606 : :
607 : : /*
608 : : * Insert tuple into pg_foreign_data_wrapper.
609 : : */
6104 tgl@sss.pgh.pa.us 610 : 90 : memset(values, 0, sizeof(values));
611 : 90 : memset(nulls, false, sizeof(nulls));
612 : :
2482 andres@anarazel.de 613 : 90 : fdwId = GetNewOidWithIndex(rel, ForeignDataWrapperOidIndexId,
614 : : Anum_pg_foreign_data_wrapper_oid);
615 : 90 : values[Anum_pg_foreign_data_wrapper_oid - 1] = ObjectIdGetDatum(fdwId);
6105 peter_e@gmx.net 616 : 90 : values[Anum_pg_foreign_data_wrapper_fdwname - 1] =
617 : 90 : DirectFunctionCall1(namein, CStringGetDatum(stmt->fdwname));
618 : 90 : values[Anum_pg_foreign_data_wrapper_fdwowner - 1] = ObjectIdGetDatum(ownerId);
619 : :
620 : : /* Lookup handler and validator functions, if given */
1514 dean.a.rasheed@gmail 621 : 90 : parse_func_options(pstate, stmt->func_options,
622 : : &handler_given, &fdwhandler,
623 : : &validator_given, &fdwvalidator);
624 : :
5313 tgl@sss.pgh.pa.us 625 : 81 : values[Anum_pg_foreign_data_wrapper_fdwhandler - 1] = ObjectIdGetDatum(fdwhandler);
626 : 81 : values[Anum_pg_foreign_data_wrapper_fdwvalidator - 1] = ObjectIdGetDatum(fdwvalidator);
627 : :
6038 peter_e@gmx.net 628 : 81 : nulls[Anum_pg_foreign_data_wrapper_fdwacl - 1] = true;
629 : :
5736 heikki.linnakangas@i 630 : 81 : fdwoptions = transformGenericOptions(ForeignDataWrapperRelationId,
631 : : PointerGetDatum(NULL),
632 : : stmt->options,
633 : : fdwvalidator);
634 : :
6104 635 [ + + ]: 78 : if (PointerIsValid(DatumGetPointer(fdwoptions)))
6105 peter_e@gmx.net 636 : 9 : values[Anum_pg_foreign_data_wrapper_fdwoptions - 1] = fdwoptions;
637 : : else
638 : 69 : nulls[Anum_pg_foreign_data_wrapper_fdwoptions - 1] = true;
639 : :
640 : 78 : tuple = heap_form_tuple(rel->rd_att, values, nulls);
641 : :
2482 andres@anarazel.de 642 : 78 : CatalogTupleInsert(rel, tuple);
643 : :
6105 peter_e@gmx.net 644 : 78 : heap_freetuple(tuple);
645 : :
646 : : /* record dependencies */
5324 tgl@sss.pgh.pa.us 647 : 78 : myself.classId = ForeignDataWrapperRelationId;
648 : 78 : myself.objectId = fdwId;
649 : 78 : myself.objectSubId = 0;
650 : :
5313 651 [ + + ]: 78 : if (OidIsValid(fdwhandler))
652 : : {
653 : 7 : referenced.classId = ProcedureRelationId;
654 : 7 : referenced.objectId = fdwhandler;
655 : 7 : referenced.objectSubId = 0;
656 : 7 : recordDependencyOn(&myself, &referenced, DEPENDENCY_NORMAL);
657 : : }
658 : :
659 [ + + ]: 78 : if (OidIsValid(fdwvalidator))
660 : : {
6038 peter_e@gmx.net 661 : 16 : referenced.classId = ProcedureRelationId;
662 : 16 : referenced.objectId = fdwvalidator;
663 : 16 : referenced.objectSubId = 0;
664 : 16 : recordDependencyOn(&myself, &referenced, DEPENDENCY_NORMAL);
665 : : }
666 : :
6105 667 : 78 : recordDependencyOnOwner(ForeignDataWrapperRelationId, fdwId, ownerId);
668 : :
669 : : /* dependency on extension */
5159 tgl@sss.pgh.pa.us 670 : 78 : recordDependencyOnCurrentExtension(&myself, false);
671 : :
672 : : /* Post creation hook for new foreign data wrapper */
4567 rhaas@postgresql.org 673 [ - + ]: 78 : InvokeObjectPostCreateHook(ForeignDataWrapperRelationId, fdwId, 0);
674 : :
2420 andres@anarazel.de 675 : 78 : table_close(rel, RowExclusiveLock);
676 : :
3840 alvherre@alvh.no-ip. 677 : 78 : return myself;
678 : : }
679 : :
680 : :
681 : : /*
682 : : * Alter foreign-data wrapper
683 : : */
684 : : ObjectAddress
1514 dean.a.rasheed@gmail 685 : 61 : AlterForeignDataWrapper(ParseState *pstate, AlterFdwStmt *stmt)
686 : : {
687 : : Relation rel;
688 : : HeapTuple tp;
689 : : Form_pg_foreign_data_wrapper fdwForm;
690 : : Datum repl_val[Natts_pg_foreign_data_wrapper];
691 : : bool repl_null[Natts_pg_foreign_data_wrapper];
692 : : bool repl_repl[Natts_pg_foreign_data_wrapper];
693 : : Oid fdwId;
694 : : bool isnull;
695 : : Datum datum;
696 : : bool handler_given;
697 : : bool validator_given;
698 : : Oid fdwhandler;
699 : : Oid fdwvalidator;
700 : : ObjectAddress myself;
701 : :
2420 andres@anarazel.de 702 : 61 : rel = table_open(ForeignDataWrapperRelationId, RowExclusiveLock);
703 : :
704 : : /* Must be superuser */
6105 peter_e@gmx.net 705 [ + + ]: 61 : if (!superuser())
706 [ + - ]: 12 : ereport(ERROR,
707 : : (errcode(ERRCODE_INSUFFICIENT_PRIVILEGE),
708 : : errmsg("permission denied to alter foreign-data wrapper \"%s\"",
709 : : stmt->fdwname),
710 : : errhint("Must be superuser to alter a foreign-data wrapper.")));
711 : :
5683 rhaas@postgresql.org 712 : 49 : tp = SearchSysCacheCopy1(FOREIGNDATAWRAPPERNAME,
713 : : CStringGetDatum(stmt->fdwname));
714 : :
6105 peter_e@gmx.net 715 [ - + ]: 49 : if (!HeapTupleIsValid(tp))
6105 peter_e@gmx.net 716 [ # # ]:UBC 0 : ereport(ERROR,
717 : : (errcode(ERRCODE_UNDEFINED_OBJECT),
718 : : errmsg("foreign-data wrapper \"%s\" does not exist", stmt->fdwname)));
719 : :
5313 tgl@sss.pgh.pa.us 720 :CBC 49 : fdwForm = (Form_pg_foreign_data_wrapper) GETSTRUCT(tp);
2482 andres@anarazel.de 721 : 49 : fdwId = fdwForm->oid;
722 : :
6105 peter_e@gmx.net 723 : 49 : memset(repl_val, 0, sizeof(repl_val));
724 : 49 : memset(repl_null, false, sizeof(repl_null));
725 : 49 : memset(repl_repl, false, sizeof(repl_repl));
726 : :
1514 dean.a.rasheed@gmail 727 : 49 : parse_func_options(pstate, stmt->func_options,
728 : : &handler_given, &fdwhandler,
729 : : &validator_given, &fdwvalidator);
730 : :
5313 tgl@sss.pgh.pa.us 731 [ + + ]: 40 : if (handler_given)
732 : : {
733 : 3 : repl_val[Anum_pg_foreign_data_wrapper_fdwhandler - 1] = ObjectIdGetDatum(fdwhandler);
734 : 3 : repl_repl[Anum_pg_foreign_data_wrapper_fdwhandler - 1] = true;
735 : :
736 : : /*
737 : : * It could be that the behavior of accessing foreign table changes
738 : : * with the new handler. Warn about this.
739 : : */
740 [ + - ]: 3 : ereport(WARNING,
741 : : (errmsg("changing the foreign-data wrapper handler can change behavior of existing foreign tables")));
742 : : }
743 : :
744 [ + + ]: 40 : if (validator_given)
745 : : {
6038 peter_e@gmx.net 746 : 6 : repl_val[Anum_pg_foreign_data_wrapper_fdwvalidator - 1] = ObjectIdGetDatum(fdwvalidator);
747 : 6 : repl_repl[Anum_pg_foreign_data_wrapper_fdwvalidator - 1] = true;
748 : :
749 : : /*
750 : : * It could be that existing options for the FDW or dependent SERVER,
751 : : * USER MAPPING or FOREIGN TABLE objects are no longer valid according
752 : : * to the new validator. Warn about this.
753 : : */
5313 tgl@sss.pgh.pa.us 754 [ + + ]: 6 : if (OidIsValid(fdwvalidator))
6038 peter_e@gmx.net 755 [ + - ]: 3 : ereport(WARNING,
756 : : (errmsg("changing the foreign-data wrapper validator can cause "
757 : : "the options for dependent objects to become invalid")));
758 : : }
759 : : else
760 : : {
761 : : /*
762 : : * Validator is not changed, but we need it for validating options.
763 : : */
5313 tgl@sss.pgh.pa.us 764 : 34 : fdwvalidator = fdwForm->fdwvalidator;
765 : : }
766 : :
767 : : /*
768 : : * If options specified, validate and update.
769 : : */
6105 peter_e@gmx.net 770 [ + + ]: 40 : if (stmt->options)
771 : : {
772 : : /* Extract the current options */
773 : 31 : datum = SysCacheGetAttr(FOREIGNDATAWRAPPEROID,
774 : : tp,
775 : : Anum_pg_foreign_data_wrapper_fdwoptions,
776 : : &isnull);
6104 tgl@sss.pgh.pa.us 777 [ + + ]: 31 : if (isnull)
778 : 10 : datum = PointerGetDatum(NULL);
779 : :
780 : : /* Transform the options */
5736 heikki.linnakangas@i 781 : 31 : datum = transformGenericOptions(ForeignDataWrapperRelationId,
782 : : datum,
783 : : stmt->options,
784 : : fdwvalidator);
785 : :
6104 786 [ + - ]: 15 : if (PointerIsValid(DatumGetPointer(datum)))
tgl@sss.pgh.pa.us 787 : 15 : repl_val[Anum_pg_foreign_data_wrapper_fdwoptions - 1] = datum;
788 : : else
6105 peter_e@gmx.net 789 :UBC 0 : repl_null[Anum_pg_foreign_data_wrapper_fdwoptions - 1] = true;
790 : :
6105 peter_e@gmx.net 791 :CBC 15 : repl_repl[Anum_pg_foreign_data_wrapper_fdwoptions - 1] = true;
792 : : }
793 : :
794 : : /* Everything looks good - update the tuple */
795 : 24 : tp = heap_modify_tuple(tp, RelationGetDescr(rel),
796 : : repl_val, repl_null, repl_repl);
797 : :
3140 alvherre@alvh.no-ip. 798 : 24 : CatalogTupleUpdate(rel, &tp->t_self, tp);
799 : :
6105 peter_e@gmx.net 800 : 24 : heap_freetuple(tp);
801 : :
3840 alvherre@alvh.no-ip. 802 : 24 : ObjectAddressSet(myself, ForeignDataWrapperRelationId, fdwId);
803 : :
804 : : /* Update function dependencies if we changed them */
5313 tgl@sss.pgh.pa.us 805 [ + + + + ]: 24 : if (handler_given || validator_given)
806 : : {
807 : : ObjectAddress referenced;
808 : :
809 : : /*
810 : : * Flush all existing dependency records of this FDW on functions; we
811 : : * assume there can be none other than the ones we are fixing.
812 : : */
813 : 9 : deleteDependencyRecordsForClass(ForeignDataWrapperRelationId,
814 : : fdwId,
815 : : ProcedureRelationId,
816 : : DEPENDENCY_NORMAL);
817 : :
818 : : /* And build new ones. */
819 : :
820 [ + + ]: 9 : if (OidIsValid(fdwhandler))
821 : : {
822 : 3 : referenced.classId = ProcedureRelationId;
823 : 3 : referenced.objectId = fdwhandler;
824 : 3 : referenced.objectSubId = 0;
825 : 3 : recordDependencyOn(&myself, &referenced, DEPENDENCY_NORMAL);
826 : : }
827 : :
828 [ + + ]: 9 : if (OidIsValid(fdwvalidator))
829 : : {
830 : 3 : referenced.classId = ProcedureRelationId;
831 : 3 : referenced.objectId = fdwvalidator;
832 : 3 : referenced.objectSubId = 0;
833 : 3 : recordDependencyOn(&myself, &referenced, DEPENDENCY_NORMAL);
834 : : }
835 : : }
836 : :
4556 rhaas@postgresql.org 837 [ - + ]: 24 : InvokeObjectPostAlterHook(ForeignDataWrapperRelationId, fdwId, 0);
838 : :
2420 andres@anarazel.de 839 : 24 : table_close(rel, RowExclusiveLock);
840 : :
3840 alvherre@alvh.no-ip. 841 : 24 : return myself;
842 : : }
843 : :
844 : :
845 : : /*
846 : : * Create a foreign server
847 : : */
848 : : ObjectAddress
6105 peter_e@gmx.net 849 : 148 : CreateForeignServer(CreateForeignServerStmt *stmt)
850 : : {
851 : : Relation rel;
852 : : Datum srvoptions;
853 : : Datum values[Natts_pg_foreign_server];
854 : : bool nulls[Natts_pg_foreign_server];
855 : : HeapTuple tuple;
856 : : Oid srvId;
857 : : Oid ownerId;
858 : : AclResult aclresult;
859 : : ObjectAddress myself;
860 : : ObjectAddress referenced;
861 : : ForeignDataWrapper *fdw;
862 : :
2420 andres@anarazel.de 863 : 148 : rel = table_open(ForeignServerRelationId, RowExclusiveLock);
864 : :
865 : : /* For now the owner cannot be specified on create. Use effective user ID. */
6105 peter_e@gmx.net 866 : 148 : ownerId = GetUserId();
867 : :
868 : : /*
869 : : * Check that there is no other foreign server by this name. If there is
870 : : * one, do nothing if IF NOT EXISTS was specified.
871 : : */
1125 tgl@sss.pgh.pa.us 872 : 148 : srvId = get_foreign_server_oid(stmt->servername, true);
873 [ + + ]: 148 : if (OidIsValid(srvId))
874 : : {
3092 andrew@dunslane.net 875 [ + + ]: 8 : if (stmt->if_not_exists)
876 : : {
877 : : /*
878 : : * If we are in an extension script, insist that the pre-existing
879 : : * object be a member of the extension, to avoid security risks.
880 : : */
1125 tgl@sss.pgh.pa.us 881 : 5 : ObjectAddressSet(myself, ForeignServerRelationId, srvId);
882 : 5 : checkMembershipInCurrentExtension(&myself);
883 : :
884 : : /* OK to skip */
3092 andrew@dunslane.net 885 [ + + ]: 4 : ereport(NOTICE,
886 : : (errcode(ERRCODE_DUPLICATE_OBJECT),
887 : : errmsg("server \"%s\" already exists, skipping",
888 : : stmt->servername)));
2420 andres@anarazel.de 889 : 4 : table_close(rel, RowExclusiveLock);
3092 andrew@dunslane.net 890 : 4 : return InvalidObjectAddress;
891 : : }
892 : : else
893 [ + - ]: 3 : ereport(ERROR,
894 : : (errcode(ERRCODE_DUPLICATE_OBJECT),
895 : : errmsg("server \"%s\" already exists",
896 : : stmt->servername)));
897 : : }
898 : :
899 : : /*
900 : : * Check that the FDW exists and that we have USAGE on it. Also get the
901 : : * actual FDW for option validation etc.
902 : : */
6105 peter_e@gmx.net 903 : 140 : fdw = GetForeignDataWrapperByName(stmt->fdwname, false);
904 : :
1028 peter@eisentraut.org 905 : 137 : aclresult = object_aclcheck(ForeignDataWrapperRelationId, fdw->fdwid, ownerId, ACL_USAGE);
6105 peter_e@gmx.net 906 [ + + ]: 137 : if (aclresult != ACLCHECK_OK)
2835 907 : 13 : aclcheck_error(aclresult, OBJECT_FDW, fdw->fdwname);
908 : :
909 : : /*
910 : : * Insert tuple into pg_foreign_server.
911 : : */
6104 tgl@sss.pgh.pa.us 912 : 124 : memset(values, 0, sizeof(values));
913 : 124 : memset(nulls, false, sizeof(nulls));
914 : :
2482 andres@anarazel.de 915 : 124 : srvId = GetNewOidWithIndex(rel, ForeignServerOidIndexId,
916 : : Anum_pg_foreign_server_oid);
917 : 124 : values[Anum_pg_foreign_server_oid - 1] = ObjectIdGetDatum(srvId);
6105 peter_e@gmx.net 918 : 124 : values[Anum_pg_foreign_server_srvname - 1] =
919 : 124 : DirectFunctionCall1(namein, CStringGetDatum(stmt->servername));
920 : 124 : values[Anum_pg_foreign_server_srvowner - 1] = ObjectIdGetDatum(ownerId);
921 : 124 : values[Anum_pg_foreign_server_srvfdw - 1] = ObjectIdGetDatum(fdw->fdwid);
922 : :
923 : : /* Add server type if supplied */
924 [ + + ]: 124 : if (stmt->servertype)
925 : 9 : values[Anum_pg_foreign_server_srvtype - 1] =
926 : 9 : CStringGetTextDatum(stmt->servertype);
927 : : else
928 : 115 : nulls[Anum_pg_foreign_server_srvtype - 1] = true;
929 : :
930 : : /* Add server version if supplied */
931 [ + + ]: 124 : if (stmt->version)
932 : 9 : values[Anum_pg_foreign_server_srvversion - 1] =
933 : 9 : CStringGetTextDatum(stmt->version);
934 : : else
935 : 115 : nulls[Anum_pg_foreign_server_srvversion - 1] = true;
936 : :
937 : : /* Start with a blank acl */
938 : 124 : nulls[Anum_pg_foreign_server_srvacl - 1] = true;
939 : :
940 : : /* Add server options */
5736 heikki.linnakangas@i 941 : 124 : srvoptions = transformGenericOptions(ForeignServerRelationId,
942 : : PointerGetDatum(NULL),
943 : : stmt->options,
944 : : fdw->fdwvalidator);
945 : :
6104 946 [ + + ]: 119 : if (PointerIsValid(DatumGetPointer(srvoptions)))
6105 peter_e@gmx.net 947 : 30 : values[Anum_pg_foreign_server_srvoptions - 1] = srvoptions;
948 : : else
949 : 89 : nulls[Anum_pg_foreign_server_srvoptions - 1] = true;
950 : :
951 : 119 : tuple = heap_form_tuple(rel->rd_att, values, nulls);
952 : :
2482 andres@anarazel.de 953 : 119 : CatalogTupleInsert(rel, tuple);
954 : :
6105 peter_e@gmx.net 955 : 119 : heap_freetuple(tuple);
956 : :
957 : : /* record dependencies */
958 : 119 : myself.classId = ForeignServerRelationId;
959 : 119 : myself.objectId = srvId;
960 : 119 : myself.objectSubId = 0;
961 : :
962 : 119 : referenced.classId = ForeignDataWrapperRelationId;
963 : 119 : referenced.objectId = fdw->fdwid;
964 : 119 : referenced.objectSubId = 0;
965 : 119 : recordDependencyOn(&myself, &referenced, DEPENDENCY_NORMAL);
966 : :
967 : 119 : recordDependencyOnOwner(ForeignServerRelationId, srvId, ownerId);
968 : :
969 : : /* dependency on extension */
5159 tgl@sss.pgh.pa.us 970 : 119 : recordDependencyOnCurrentExtension(&myself, false);
971 : :
972 : : /* Post creation hook for new foreign server */
4567 rhaas@postgresql.org 973 [ - + ]: 119 : InvokeObjectPostCreateHook(ForeignServerRelationId, srvId, 0);
974 : :
2420 andres@anarazel.de 975 : 119 : table_close(rel, RowExclusiveLock);
976 : :
3840 alvherre@alvh.no-ip. 977 : 119 : return myself;
978 : : }
979 : :
980 : :
981 : : /*
982 : : * Alter foreign server
983 : : */
984 : : ObjectAddress
6105 peter_e@gmx.net 985 : 116 : AlterForeignServer(AlterForeignServerStmt *stmt)
986 : : {
987 : : Relation rel;
988 : : HeapTuple tp;
989 : : Datum repl_val[Natts_pg_foreign_server];
990 : : bool repl_null[Natts_pg_foreign_server];
991 : : bool repl_repl[Natts_pg_foreign_server];
992 : : Oid srvId;
993 : : Form_pg_foreign_server srvForm;
994 : : ObjectAddress address;
995 : :
2420 andres@anarazel.de 996 : 116 : rel = table_open(ForeignServerRelationId, RowExclusiveLock);
997 : :
5683 rhaas@postgresql.org 998 : 116 : tp = SearchSysCacheCopy1(FOREIGNSERVERNAME,
999 : : CStringGetDatum(stmt->servername));
1000 : :
6105 peter_e@gmx.net 1001 [ + + ]: 116 : if (!HeapTupleIsValid(tp))
1002 [ + - ]: 3 : ereport(ERROR,
1003 : : (errcode(ERRCODE_UNDEFINED_OBJECT),
1004 : : errmsg("server \"%s\" does not exist", stmt->servername)));
1005 : :
1006 : 113 : srvForm = (Form_pg_foreign_server) GETSTRUCT(tp);
2482 andres@anarazel.de 1007 : 113 : srvId = srvForm->oid;
1008 : :
1009 : : /*
1010 : : * Only owner or a superuser can ALTER a SERVER.
1011 : : */
1028 peter@eisentraut.org 1012 [ + + ]: 113 : if (!object_ownercheck(ForeignServerRelationId, srvId, GetUserId()))
2835 peter_e@gmx.net 1013 : 12 : aclcheck_error(ACLCHECK_NOT_OWNER, OBJECT_FOREIGN_SERVER,
6105 1014 : 12 : stmt->servername);
1015 : :
1016 : 101 : memset(repl_val, 0, sizeof(repl_val));
1017 : 101 : memset(repl_null, false, sizeof(repl_null));
1018 : 101 : memset(repl_repl, false, sizeof(repl_repl));
1019 : :
1020 [ + + ]: 101 : if (stmt->has_version)
1021 : : {
1022 : : /*
1023 : : * Change the server VERSION string.
1024 : : */
1025 [ + - ]: 12 : if (stmt->version)
1026 : 12 : repl_val[Anum_pg_foreign_server_srvversion - 1] =
1027 : 12 : CStringGetTextDatum(stmt->version);
1028 : : else
6105 peter_e@gmx.net 1029 :UBC 0 : repl_null[Anum_pg_foreign_server_srvversion - 1] = true;
1030 : :
6105 peter_e@gmx.net 1031 :CBC 12 : repl_repl[Anum_pg_foreign_server_srvversion - 1] = true;
1032 : : }
1033 : :
1034 [ + + ]: 101 : if (stmt->options)
1035 : : {
1036 : 92 : ForeignDataWrapper *fdw = GetForeignDataWrapper(srvForm->srvfdw);
1037 : : Datum datum;
1038 : : bool isnull;
1039 : :
1040 : : /* Extract the current srvoptions */
1041 : 92 : datum = SysCacheGetAttr(FOREIGNSERVEROID,
1042 : : tp,
1043 : : Anum_pg_foreign_server_srvoptions,
1044 : : &isnull);
6104 tgl@sss.pgh.pa.us 1045 [ + + ]: 92 : if (isnull)
1046 : 9 : datum = PointerGetDatum(NULL);
1047 : :
1048 : : /* Prepare the options array */
5736 heikki.linnakangas@i 1049 : 92 : datum = transformGenericOptions(ForeignServerRelationId,
1050 : : datum,
1051 : : stmt->options,
1052 : : fdw->fdwvalidator);
1053 : :
6104 1054 [ + + ]: 80 : if (PointerIsValid(DatumGetPointer(datum)))
6105 peter_e@gmx.net 1055 : 77 : repl_val[Anum_pg_foreign_server_srvoptions - 1] = datum;
1056 : : else
1057 : 3 : repl_null[Anum_pg_foreign_server_srvoptions - 1] = true;
1058 : :
1059 : 80 : repl_repl[Anum_pg_foreign_server_srvoptions - 1] = true;
1060 : : }
1061 : :
1062 : : /* Everything looks good - update the tuple */
1063 : 89 : tp = heap_modify_tuple(tp, RelationGetDescr(rel),
1064 : : repl_val, repl_null, repl_repl);
1065 : :
3140 alvherre@alvh.no-ip. 1066 : 89 : CatalogTupleUpdate(rel, &tp->t_self, tp);
1067 : :
4556 rhaas@postgresql.org 1068 [ - + ]: 89 : InvokeObjectPostAlterHook(ForeignServerRelationId, srvId, 0);
1069 : :
3840 alvherre@alvh.no-ip. 1070 : 89 : ObjectAddressSet(address, ForeignServerRelationId, srvId);
1071 : :
6105 peter_e@gmx.net 1072 : 89 : heap_freetuple(tp);
1073 : :
2420 andres@anarazel.de 1074 : 89 : table_close(rel, RowExclusiveLock);
1075 : :
3840 alvherre@alvh.no-ip. 1076 : 89 : return address;
1077 : : }
1078 : :
1079 : :
1080 : : /*
1081 : : * Common routine to check permission for user-mapping-related DDL
1082 : : * commands. We allow server owners to operate on any mapping, and
1083 : : * users to operate on their own mapping.
1084 : : */
1085 : : static void
6073 peter_e@gmx.net 1086 : 213 : user_mapping_ddl_aclcheck(Oid umuserid, Oid serverid, const char *servername)
1087 : : {
1088 : 213 : Oid curuserid = GetUserId();
1089 : :
1028 peter@eisentraut.org 1090 [ + + ]: 213 : if (!object_ownercheck(ForeignServerRelationId, serverid, curuserid))
1091 : : {
6073 peter_e@gmx.net 1092 [ + + ]: 38 : if (umuserid == curuserid)
1093 : : {
1094 : : AclResult aclresult;
1095 : :
1028 peter@eisentraut.org 1096 : 11 : aclresult = object_aclcheck(ForeignServerRelationId, serverid, curuserid, ACL_USAGE);
6073 peter_e@gmx.net 1097 [ + + ]: 11 : if (aclresult != ACLCHECK_OK)
2835 1098 : 4 : aclcheck_error(aclresult, OBJECT_FOREIGN_SERVER, servername);
1099 : : }
1100 : : else
1101 : 27 : aclcheck_error(ACLCHECK_NOT_OWNER, OBJECT_FOREIGN_SERVER,
1102 : : servername);
1103 : : }
6073 1104 : 182 : }
1105 : :
1106 : :
1107 : : /*
1108 : : * Create user mapping
1109 : : */
1110 : : ObjectAddress
6105 1111 : 128 : CreateUserMapping(CreateUserMappingStmt *stmt)
1112 : : {
1113 : : Relation rel;
1114 : : Datum useoptions;
1115 : : Datum values[Natts_pg_user_mapping];
1116 : : bool nulls[Natts_pg_user_mapping];
1117 : : HeapTuple tuple;
1118 : : Oid useId;
1119 : : Oid umId;
1120 : : ObjectAddress myself;
1121 : : ObjectAddress referenced;
1122 : : ForeignServer *srv;
1123 : : ForeignDataWrapper *fdw;
3834 alvherre@alvh.no-ip. 1124 : 128 : RoleSpec *role = (RoleSpec *) stmt->user;
1125 : :
2420 andres@anarazel.de 1126 : 128 : rel = table_open(UserMappingRelationId, RowExclusiveLock);
1127 : :
3834 alvherre@alvh.no-ip. 1128 [ + + ]: 128 : if (role->roletype == ROLESPEC_PUBLIC)
1129 : 33 : useId = ACL_ID_PUBLIC;
1130 : : else
1131 : 95 : useId = get_rolespec_oid(stmt->user, false);
1132 : :
1133 : : /* Check that the server exists. */
6105 peter_e@gmx.net 1134 : 124 : srv = GetForeignServerByName(stmt->servername, false);
1135 : :
6073 1136 : 121 : user_mapping_ddl_aclcheck(useId, srv->serverid, stmt->servername);
1137 : :
1138 : : /*
1139 : : * Check that the user mapping is unique within server.
1140 : : */
2482 andres@anarazel.de 1141 : 108 : umId = GetSysCacheOid2(USERMAPPINGUSERSERVER, Anum_pg_user_mapping_oid,
1142 : : ObjectIdGetDatum(useId),
1143 : : ObjectIdGetDatum(srv->serverid));
1144 : :
6105 peter_e@gmx.net 1145 [ + + ]: 108 : if (OidIsValid(umId))
1146 : : {
3092 andrew@dunslane.net 1147 [ + + ]: 9 : if (stmt->if_not_exists)
1148 : : {
1149 : : /*
1150 : : * Since user mappings aren't members of extensions (see comments
1151 : : * below), no need for checkMembershipInCurrentExtension here.
1152 : : */
1153 [ + - + - ]: 3 : ereport(NOTICE,
1154 : : (errcode(ERRCODE_DUPLICATE_OBJECT),
1155 : : errmsg("user mapping for \"%s\" already exists for server \"%s\", skipping",
1156 : : MappingUserName(useId),
1157 : : stmt->servername)));
1158 : :
2420 andres@anarazel.de 1159 : 3 : table_close(rel, RowExclusiveLock);
3092 andrew@dunslane.net 1160 : 3 : return InvalidObjectAddress;
1161 : : }
1162 : : else
1163 [ + - + - ]: 6 : ereport(ERROR,
1164 : : (errcode(ERRCODE_DUPLICATE_OBJECT),
1165 : : errmsg("user mapping for \"%s\" already exists for server \"%s\"",
1166 : : MappingUserName(useId),
1167 : : stmt->servername)));
1168 : : }
1169 : :
6105 peter_e@gmx.net 1170 : 99 : fdw = GetForeignDataWrapper(srv->fdwid);
1171 : :
1172 : : /*
1173 : : * Insert tuple into pg_user_mapping.
1174 : : */
6104 tgl@sss.pgh.pa.us 1175 : 99 : memset(values, 0, sizeof(values));
1176 : 99 : memset(nulls, false, sizeof(nulls));
1177 : :
2482 andres@anarazel.de 1178 : 99 : umId = GetNewOidWithIndex(rel, UserMappingOidIndexId,
1179 : : Anum_pg_user_mapping_oid);
1180 : 99 : values[Anum_pg_user_mapping_oid - 1] = ObjectIdGetDatum(umId);
6105 peter_e@gmx.net 1181 : 99 : values[Anum_pg_user_mapping_umuser - 1] = ObjectIdGetDatum(useId);
1182 : 99 : values[Anum_pg_user_mapping_umserver - 1] = ObjectIdGetDatum(srv->serverid);
1183 : :
1184 : : /* Add user options */
5736 heikki.linnakangas@i 1185 : 99 : useoptions = transformGenericOptions(UserMappingRelationId,
1186 : : PointerGetDatum(NULL),
1187 : : stmt->options,
1188 : : fdw->fdwvalidator);
1189 : :
6104 1190 [ + + ]: 91 : if (PointerIsValid(DatumGetPointer(useoptions)))
6105 peter_e@gmx.net 1191 : 46 : values[Anum_pg_user_mapping_umoptions - 1] = useoptions;
1192 : : else
1193 : 45 : nulls[Anum_pg_user_mapping_umoptions - 1] = true;
1194 : :
1195 : 91 : tuple = heap_form_tuple(rel->rd_att, values, nulls);
1196 : :
2482 andres@anarazel.de 1197 : 91 : CatalogTupleInsert(rel, tuple);
1198 : :
6105 peter_e@gmx.net 1199 : 91 : heap_freetuple(tuple);
1200 : :
1201 : : /* Add dependency on the server */
1202 : 91 : myself.classId = UserMappingRelationId;
1203 : 91 : myself.objectId = umId;
1204 : 91 : myself.objectSubId = 0;
1205 : :
1206 : 91 : referenced.classId = ForeignServerRelationId;
1207 : 91 : referenced.objectId = srv->serverid;
1208 : 91 : referenced.objectSubId = 0;
1209 : 91 : recordDependencyOn(&myself, &referenced, DEPENDENCY_NORMAL);
1210 : :
1211 [ + + ]: 91 : if (OidIsValid(useId))
1212 : : {
1213 : : /* Record the mapped user dependency */
1214 : 70 : recordDependencyOnOwner(UserMappingRelationId, umId, useId);
1215 : : }
1216 : :
1217 : : /*
1218 : : * Perhaps someday there should be a recordDependencyOnCurrentExtension
1219 : : * call here; but since roles aren't members of extensions, it seems like
1220 : : * user mappings shouldn't be either. Note that the grammar and pg_dump
1221 : : * would need to be extended too if we change this.
1222 : : */
1223 : :
1224 : : /* Post creation hook for new user mapping */
4567 rhaas@postgresql.org 1225 [ - + ]: 91 : InvokeObjectPostCreateHook(UserMappingRelationId, umId, 0);
1226 : :
2420 andres@anarazel.de 1227 : 91 : table_close(rel, RowExclusiveLock);
1228 : :
3840 alvherre@alvh.no-ip. 1229 : 91 : return myself;
1230 : : }
1231 : :
1232 : :
1233 : : /*
1234 : : * Alter user mapping
1235 : : */
1236 : : ObjectAddress
6105 peter_e@gmx.net 1237 : 59 : AlterUserMapping(AlterUserMappingStmt *stmt)
1238 : : {
1239 : : Relation rel;
1240 : : HeapTuple tp;
1241 : : Datum repl_val[Natts_pg_user_mapping];
1242 : : bool repl_null[Natts_pg_user_mapping];
1243 : : bool repl_repl[Natts_pg_user_mapping];
1244 : : Oid useId;
1245 : : Oid umId;
1246 : : ForeignServer *srv;
1247 : : ObjectAddress address;
3834 alvherre@alvh.no-ip. 1248 : 59 : RoleSpec *role = (RoleSpec *) stmt->user;
1249 : :
2420 andres@anarazel.de 1250 : 59 : rel = table_open(UserMappingRelationId, RowExclusiveLock);
1251 : :
3834 alvherre@alvh.no-ip. 1252 [ + + ]: 59 : if (role->roletype == ROLESPEC_PUBLIC)
1253 : 18 : useId = ACL_ID_PUBLIC;
1254 : : else
1255 : 41 : useId = get_rolespec_oid(stmt->user, false);
1256 : :
6105 peter_e@gmx.net 1257 : 55 : srv = GetForeignServerByName(stmt->servername, false);
1258 : :
2482 andres@anarazel.de 1259 : 52 : umId = GetSysCacheOid2(USERMAPPINGUSERSERVER, Anum_pg_user_mapping_oid,
1260 : : ObjectIdGetDatum(useId),
1261 : : ObjectIdGetDatum(srv->serverid));
6105 peter_e@gmx.net 1262 [ + + ]: 52 : if (!OidIsValid(umId))
1263 [ + - - + ]: 3 : ereport(ERROR,
1264 : : (errcode(ERRCODE_UNDEFINED_OBJECT),
1265 : : errmsg("user mapping for \"%s\" does not exist for server \"%s\"",
1266 : : MappingUserName(useId), stmt->servername)));
1267 : :
6073 1268 : 49 : user_mapping_ddl_aclcheck(useId, srv->serverid, stmt->servername);
1269 : :
5683 rhaas@postgresql.org 1270 : 40 : tp = SearchSysCacheCopy1(USERMAPPINGOID, ObjectIdGetDatum(umId));
1271 : :
6105 peter_e@gmx.net 1272 [ - + ]: 40 : if (!HeapTupleIsValid(tp))
6105 peter_e@gmx.net 1273 [ # # ]:UBC 0 : elog(ERROR, "cache lookup failed for user mapping %u", umId);
1274 : :
6105 peter_e@gmx.net 1275 :CBC 40 : memset(repl_val, 0, sizeof(repl_val));
1276 : 40 : memset(repl_null, false, sizeof(repl_null));
1277 : 40 : memset(repl_repl, false, sizeof(repl_repl));
1278 : :
1279 [ + - ]: 40 : if (stmt->options)
1280 : : {
1281 : : ForeignDataWrapper *fdw;
1282 : : Datum datum;
1283 : : bool isnull;
1284 : :
1285 : : /*
1286 : : * Process the options.
1287 : : */
1288 : :
1289 : 40 : fdw = GetForeignDataWrapper(srv->fdwid);
1290 : :
1291 : 40 : datum = SysCacheGetAttr(USERMAPPINGUSERSERVER,
1292 : : tp,
1293 : : Anum_pg_user_mapping_umoptions,
1294 : : &isnull);
6104 tgl@sss.pgh.pa.us 1295 [ + + ]: 40 : if (isnull)
1296 : 10 : datum = PointerGetDatum(NULL);
1297 : :
1298 : : /* Prepare the options array */
5736 heikki.linnakangas@i 1299 : 40 : datum = transformGenericOptions(UserMappingRelationId,
1300 : : datum,
1301 : : stmt->options,
1302 : : fdw->fdwvalidator);
1303 : :
6104 1304 [ + + ]: 29 : if (PointerIsValid(DatumGetPointer(datum)))
6105 peter_e@gmx.net 1305 : 24 : repl_val[Anum_pg_user_mapping_umoptions - 1] = datum;
1306 : : else
1307 : 5 : repl_null[Anum_pg_user_mapping_umoptions - 1] = true;
1308 : :
1309 : 29 : repl_repl[Anum_pg_user_mapping_umoptions - 1] = true;
1310 : : }
1311 : :
1312 : : /* Everything looks good - update the tuple */
1313 : 29 : tp = heap_modify_tuple(tp, RelationGetDescr(rel),
1314 : : repl_val, repl_null, repl_repl);
1315 : :
3140 alvherre@alvh.no-ip. 1316 : 29 : CatalogTupleUpdate(rel, &tp->t_self, tp);
1317 : :
1932 michael@paquier.xyz 1318 [ - + ]: 29 : InvokeObjectPostAlterHook(UserMappingRelationId,
1319 : : umId, 0);
1320 : :
3840 alvherre@alvh.no-ip. 1321 : 29 : ObjectAddressSet(address, UserMappingRelationId, umId);
1322 : :
6105 peter_e@gmx.net 1323 : 29 : heap_freetuple(tp);
1324 : :
2420 andres@anarazel.de 1325 : 29 : table_close(rel, RowExclusiveLock);
1326 : :
3840 alvherre@alvh.no-ip. 1327 : 29 : return address;
1328 : : }
1329 : :
1330 : :
1331 : : /*
1332 : : * Drop user mapping
1333 : : */
1334 : : Oid
6105 peter_e@gmx.net 1335 : 63 : RemoveUserMapping(DropUserMappingStmt *stmt)
1336 : : {
1337 : : ObjectAddress object;
1338 : : Oid useId;
1339 : : Oid umId;
1340 : : ForeignServer *srv;
3834 alvherre@alvh.no-ip. 1341 : 63 : RoleSpec *role = (RoleSpec *) stmt->user;
1342 : :
1343 [ + + ]: 63 : if (role->roletype == ROLESPEC_PUBLIC)
1344 : 16 : useId = ACL_ID_PUBLIC;
1345 : : else
1346 : : {
1347 : 47 : useId = get_rolespec_oid(stmt->user, stmt->missing_ok);
1348 [ + + ]: 43 : if (!OidIsValid(useId))
1349 : : {
1350 : : /*
1351 : : * IF EXISTS specified, role not found and not public. Notice this
1352 : : * and leave.
1353 : : */
1354 [ + - ]: 4 : elog(NOTICE, "role \"%s\" does not exist, skipping",
1355 : : role->rolename);
1356 : 4 : return InvalidOid;
1357 : : }
1358 : : }
1359 : :
1360 : 55 : srv = GetForeignServerByName(stmt->servername, true);
1361 : :
6105 peter_e@gmx.net 1362 [ + + ]: 55 : if (!srv)
1363 : : {
1364 [ + + ]: 6 : if (!stmt->missing_ok)
1365 [ + - ]: 3 : ereport(ERROR,
1366 : : (errcode(ERRCODE_UNDEFINED_OBJECT),
1367 : : errmsg("server \"%s\" does not exist",
1368 : : stmt->servername)));
1369 : : /* IF EXISTS, just note it */
2313 alvherre@alvh.no-ip. 1370 [ + - ]: 3 : ereport(NOTICE,
1371 : : (errmsg("server \"%s\" does not exist, skipping",
1372 : : stmt->servername)));
4634 rhaas@postgresql.org 1373 : 3 : return InvalidOid;
1374 : : }
1375 : :
2482 andres@anarazel.de 1376 : 49 : umId = GetSysCacheOid2(USERMAPPINGUSERSERVER, Anum_pg_user_mapping_oid,
1377 : : ObjectIdGetDatum(useId),
1378 : : ObjectIdGetDatum(srv->serverid));
1379 : :
6105 peter_e@gmx.net 1380 [ + + ]: 49 : if (!OidIsValid(umId))
1381 : : {
1382 [ + + ]: 6 : if (!stmt->missing_ok)
1383 [ + - - + ]: 3 : ereport(ERROR,
1384 : : (errcode(ERRCODE_UNDEFINED_OBJECT),
1385 : : errmsg("user mapping for \"%s\" does not exist for server \"%s\"",
1386 : : MappingUserName(useId), stmt->servername)));
1387 : :
1388 : : /* IF EXISTS specified, just note it */
1389 [ + - - + ]: 3 : ereport(NOTICE,
1390 : : (errmsg("user mapping for \"%s\" does not exist for server \"%s\", skipping",
1391 : : MappingUserName(useId), stmt->servername)));
4634 rhaas@postgresql.org 1392 : 3 : return InvalidOid;
1393 : : }
1394 : :
6073 peter_e@gmx.net 1395 : 43 : user_mapping_ddl_aclcheck(useId, srv->serverid, srv->servername);
1396 : :
1397 : : /*
1398 : : * Do the deletion
1399 : : */
6105 1400 : 34 : object.classId = UserMappingRelationId;
1401 : 34 : object.objectId = umId;
1402 : 34 : object.objectSubId = 0;
1403 : :
4972 rhaas@postgresql.org 1404 : 34 : performDeletion(&object, DROP_CASCADE, 0);
1405 : :
4634 1406 : 34 : return umId;
1407 : : }
1408 : :
1409 : :
1410 : : /*
1411 : : * Create a foreign table
1412 : : * call after DefineRelation().
1413 : : */
1414 : : void
5362 1415 : 222 : CreateForeignTable(CreateForeignTableStmt *stmt, Oid relid)
1416 : : {
1417 : : Relation ftrel;
1418 : : Datum ftoptions;
1419 : : Datum values[Natts_pg_foreign_table];
1420 : : bool nulls[Natts_pg_foreign_table];
1421 : : HeapTuple tuple;
1422 : : AclResult aclresult;
1423 : : ObjectAddress myself;
1424 : : ObjectAddress referenced;
1425 : : Oid ownerId;
1426 : : ForeignDataWrapper *fdw;
1427 : : ForeignServer *server;
1428 : :
1429 : : /*
1430 : : * Advance command counter to ensure the pg_attribute tuple is visible;
1431 : : * the tuple might be updated to add constraints in previous step.
1432 : : */
1433 : 222 : CommandCounterIncrement();
1434 : :
2420 andres@anarazel.de 1435 : 222 : ftrel = table_open(ForeignTableRelationId, RowExclusiveLock);
1436 : :
1437 : : /*
1438 : : * For now the owner cannot be specified on create. Use effective user ID.
1439 : : */
5362 rhaas@postgresql.org 1440 : 222 : ownerId = GetUserId();
1441 : :
1442 : : /*
1443 : : * Check that the foreign server exists and that we have USAGE on it. Also
1444 : : * get the actual FDW for option validation etc.
1445 : : */
1446 : 222 : server = GetForeignServerByName(stmt->servername, false);
1028 peter@eisentraut.org 1447 : 219 : aclresult = object_aclcheck(ForeignServerRelationId, server->serverid, ownerId, ACL_USAGE);
5362 rhaas@postgresql.org 1448 [ - + ]: 219 : if (aclresult != ACLCHECK_OK)
2835 peter_e@gmx.net 1449 :UBC 0 : aclcheck_error(aclresult, OBJECT_FOREIGN_SERVER, server->servername);
1450 : :
5362 rhaas@postgresql.org 1451 :CBC 219 : fdw = GetForeignDataWrapper(server->fdwid);
1452 : :
1453 : : /*
1454 : : * Insert tuple into pg_foreign_table.
1455 : : */
1456 : 219 : memset(values, 0, sizeof(values));
1457 : 219 : memset(nulls, false, sizeof(nulls));
1458 : :
1459 : 219 : values[Anum_pg_foreign_table_ftrelid - 1] = ObjectIdGetDatum(relid);
1460 : 219 : values[Anum_pg_foreign_table_ftserver - 1] = ObjectIdGetDatum(server->serverid);
1461 : : /* Add table generic options */
1462 : 219 : ftoptions = transformGenericOptions(ForeignTableRelationId,
1463 : : PointerGetDatum(NULL),
1464 : : stmt->options,
1465 : : fdw->fdwvalidator);
1466 : :
1467 [ + + ]: 187 : if (PointerIsValid(DatumGetPointer(ftoptions)))
1468 : 131 : values[Anum_pg_foreign_table_ftoptions - 1] = ftoptions;
1469 : : else
1470 : 56 : nulls[Anum_pg_foreign_table_ftoptions - 1] = true;
1471 : :
1472 : 187 : tuple = heap_form_tuple(ftrel->rd_att, values, nulls);
1473 : :
3140 alvherre@alvh.no-ip. 1474 : 187 : CatalogTupleInsert(ftrel, tuple);
1475 : :
5362 rhaas@postgresql.org 1476 : 187 : heap_freetuple(tuple);
1477 : :
1478 : : /* Add pg_class dependency on the server */
1479 : 187 : myself.classId = RelationRelationId;
1480 : 187 : myself.objectId = relid;
1481 : 187 : myself.objectSubId = 0;
1482 : :
1483 : 187 : referenced.classId = ForeignServerRelationId;
1484 : 187 : referenced.objectId = server->serverid;
1485 : 187 : referenced.objectSubId = 0;
1486 : 187 : recordDependencyOn(&myself, &referenced, DEPENDENCY_NORMAL);
1487 : :
2420 andres@anarazel.de 1488 : 187 : table_close(ftrel, RowExclusiveLock);
5362 rhaas@postgresql.org 1489 : 187 : }
1490 : :
1491 : : /*
1492 : : * Import a foreign schema
1493 : : */
1494 : : void
4076 tgl@sss.pgh.pa.us 1495 : 24 : ImportForeignSchema(ImportForeignSchemaStmt *stmt)
1496 : : {
1497 : : ForeignServer *server;
1498 : : ForeignDataWrapper *fdw;
1499 : : FdwRoutine *fdw_routine;
1500 : : AclResult aclresult;
1501 : : List *cmd_list;
1502 : : ListCell *lc;
1503 : :
1504 : : /* Check that the foreign server exists and that we have USAGE on it */
1505 : 24 : server = GetForeignServerByName(stmt->server_name, false);
1028 peter@eisentraut.org 1506 : 23 : aclresult = object_aclcheck(ForeignServerRelationId, server->serverid, GetUserId(), ACL_USAGE);
4076 tgl@sss.pgh.pa.us 1507 [ - + ]: 23 : if (aclresult != ACLCHECK_OK)
2835 peter_e@gmx.net 1508 :UBC 0 : aclcheck_error(aclresult, OBJECT_FOREIGN_SERVER, server->servername);
1509 : :
1510 : : /* Check that the schema exists and we have CREATE permissions on it */
4076 tgl@sss.pgh.pa.us 1511 :CBC 23 : (void) LookupCreationNamespace(stmt->local_schema);
1512 : :
1513 : : /* Get the FDW and check it supports IMPORT */
1514 : 22 : fdw = GetForeignDataWrapper(server->fdwid);
1515 [ + + ]: 22 : if (!OidIsValid(fdw->fdwhandler))
1516 [ + - ]: 12 : ereport(ERROR,
1517 : : (errcode(ERRCODE_OBJECT_NOT_IN_PREREQUISITE_STATE),
1518 : : errmsg("foreign-data wrapper \"%s\" has no handler",
1519 : : fdw->fdwname)));
1520 : 10 : fdw_routine = GetFdwRoutine(fdw->fdwhandler);
1521 [ - + ]: 10 : if (fdw_routine->ImportForeignSchema == NULL)
4076 tgl@sss.pgh.pa.us 1522 [ # # ]:UBC 0 : ereport(ERROR,
1523 : : (errcode(ERRCODE_FDW_NO_SCHEMAS),
1524 : : errmsg("foreign-data wrapper \"%s\" does not support IMPORT FOREIGN SCHEMA",
1525 : : fdw->fdwname)));
1526 : :
1527 : : /* Call FDW to get a list of commands */
4076 tgl@sss.pgh.pa.us 1528 :CBC 10 : cmd_list = fdw_routine->ImportForeignSchema(stmt, server->serverid);
1529 : :
1530 : : /* Parse and execute each command */
1531 [ + - + + : 39 : foreach(lc, cmd_list)
+ + ]
1532 : : {
1533 : 32 : char *cmd = (char *) lfirst(lc);
1534 : : import_error_callback_arg callback_arg;
1535 : : ErrorContextCallback sqlerrcontext;
1536 : : List *raw_parsetree_list;
1537 : : ListCell *lc2;
1538 : :
1539 : : /*
1540 : : * Setup error traceback support for ereport(). This is so that any
1541 : : * error in the generated SQL will be displayed nicely.
1542 : : */
1543 : 32 : callback_arg.tablename = NULL; /* not known yet */
1544 : 32 : callback_arg.cmd = cmd;
1545 : 32 : sqlerrcontext.callback = import_error_callback;
282 peter@eisentraut.org 1546 : 32 : sqlerrcontext.arg = &callback_arg;
4076 tgl@sss.pgh.pa.us 1547 : 32 : sqlerrcontext.previous = error_context_stack;
1548 : 32 : error_context_stack = &sqlerrcontext;
1549 : :
1550 : : /*
1551 : : * Parse the SQL string into a list of raw parse trees.
1552 : : */
1553 : 32 : raw_parsetree_list = pg_parse_query(cmd);
1554 : :
1555 : : /*
1556 : : * Process each parse tree (we allow the FDW to put more than one
1557 : : * command per string, though this isn't really advised).
1558 : : */
1559 [ + - + + : 62 : foreach(lc2, raw_parsetree_list)
+ + ]
1560 : : {
3071 1561 : 32 : RawStmt *rs = lfirst_node(RawStmt, lc2);
3157 1562 : 32 : CreateForeignTableStmt *cstmt = (CreateForeignTableStmt *) rs->stmt;
1563 : : PlannedStmt *pstmt;
1564 : :
1565 : : /*
1566 : : * Because we only allow CreateForeignTableStmt, we can skip parse
1567 : : * analysis, rewrite, and planning steps here.
1568 : : */
4076 1569 [ - + ]: 32 : if (!IsA(cstmt, CreateForeignTableStmt))
4076 tgl@sss.pgh.pa.us 1570 [ # # ]:UBC 0 : elog(ERROR,
1571 : : "foreign-data wrapper \"%s\" returned incorrect statement type %d",
1572 : : fdw->fdwname, (int) nodeTag(cstmt));
1573 : :
1574 : : /* Ignore commands for tables excluded by filter options */
4076 tgl@sss.pgh.pa.us 1575 [ - + ]:CBC 32 : if (!IsImportableForeignTable(cstmt->base.relation->relname, stmt))
4076 tgl@sss.pgh.pa.us 1576 :UBC 0 : continue;
1577 : :
1578 : : /* Enable reporting of current table's name on error */
4076 tgl@sss.pgh.pa.us 1579 :CBC 32 : callback_arg.tablename = cstmt->base.relation->relname;
1580 : :
1581 : : /* Ensure creation schema is the one given in IMPORT statement */
1582 : 32 : cstmt->base.relation->schemaname = pstrdup(stmt->local_schema);
1583 : :
1584 : : /* No planning needed, just make a wrapper PlannedStmt */
3157 1585 : 32 : pstmt = makeNode(PlannedStmt);
1586 : 32 : pstmt->commandType = CMD_UTILITY;
1587 : 32 : pstmt->canSetTag = false;
1588 : 32 : pstmt->utilityStmt = (Node *) cstmt;
1589 : 32 : pstmt->stmt_location = rs->stmt_location;
1590 : 32 : pstmt->stmt_len = rs->stmt_len;
37 michael@paquier.xyz 1591 :GNC 32 : pstmt->planOrigin = PLAN_STMT_INTERNAL;
1592 : :
1593 : : /* Execute statement */
1541 tgl@sss.pgh.pa.us 1594 :CBC 32 : ProcessUtility(pstmt, cmd, false,
1595 : : PROCESS_UTILITY_SUBCOMMAND, NULL, NULL,
1596 : : None_Receiver, NULL);
1597 : :
1598 : : /* Be sure to advance the command counter between subcommands */
4076 1599 : 30 : CommandCounterIncrement();
1600 : :
1601 : 30 : callback_arg.tablename = NULL;
1602 : : }
1603 : :
1604 : 30 : error_context_stack = sqlerrcontext.previous;
1605 : : }
1606 : 7 : }
1607 : :
1608 : : /*
1609 : : * error context callback to let us supply the failing SQL statement's text
1610 : : */
1611 : : static void
1612 : 2 : import_error_callback(void *arg)
1613 : : {
1614 : 2 : import_error_callback_arg *callback_arg = (import_error_callback_arg *) arg;
1615 : : int syntaxerrposition;
1616 : :
1617 : : /* If it's a syntax error, convert to internal syntax error report */
1618 : 2 : syntaxerrposition = geterrposition();
1619 [ + + ]: 2 : if (syntaxerrposition > 0)
1620 : : {
1621 : 1 : errposition(0);
1622 : 1 : internalerrposition(syntaxerrposition);
1623 : 1 : internalerrquery(callback_arg->cmd);
1624 : : }
1625 : :
1626 [ + - ]: 2 : if (callback_arg->tablename)
1627 : 2 : errcontext("importing foreign table \"%s\"",
1628 : : callback_arg->tablename);
1629 : 2 : }
|
