PostgreSQL Source Code git master
fe-lobj.c
Go to the documentation of this file.
1/*-------------------------------------------------------------------------
2 *
3 * fe-lobj.c
4 * Front-end large object interface
5 *
6 * Portions Copyright (c) 1996-2025, PostgreSQL Global Development Group
7 * Portions Copyright (c) 1994, Regents of the University of California
8 *
9 *
10 * IDENTIFICATION
11 * src/interfaces/libpq/fe-lobj.c
12 *
13 *-------------------------------------------------------------------------
14 */
15
16#ifdef WIN32
17/*
18 * As unlink/rename are #define'd in port.h (via postgres_fe.h), io.h
19 * must be included first on MS C. Might as well do it for all WIN32's
20 * here.
21 */
22#include <io.h>
23#endif
24
25#include "postgres_fe.h"
26
27#ifdef WIN32
28#include "win32.h"
29#else
30#include <unistd.h>
31#endif
32
33#include <fcntl.h>
34#include <limits.h>
35#include <sys/stat.h>
36
37#include "libpq-fe.h"
38#include "libpq-int.h"
39#include "libpq/libpq-fs.h" /* must come after sys/stat.h */
40#include "port/pg_bswap.h"
41
42#define LO_BUFSIZE 8192
43
44static int lo_initialize(PGconn *conn);
45static Oid lo_import_internal(PGconn *conn, const char *filename, Oid oid);
46static pg_int64 lo_hton64(pg_int64 host64);
47static pg_int64 lo_ntoh64(pg_int64 net64);
48
49/*
50 * lo_open
51 * opens an existing large object
52 *
53 * returns the file descriptor for use in later lo_* calls
54 * return -1 upon failure.
55 */
56int
57lo_open(PGconn *conn, Oid lobjId, int mode)
58{
59 int fd;
60 int result_len;
61 PQArgBlock argv[2];
63
64 if (lo_initialize(conn) < 0)
65 return -1;
66
67 argv[0].isint = 1;
68 argv[0].len = 4;
69 argv[0].u.integer = lobjId;
70
71 argv[1].isint = 1;
72 argv[1].len = 4;
73 argv[1].u.integer = mode;
74
75 res = PQfn(conn, conn->lobjfuncs->fn_lo_open, &fd, &result_len, 1, argv, 2);
77 {
78 PQclear(res);
79 return fd;
80 }
81 else
82 {
83 PQclear(res);
84 return -1;
85 }
86}
87
88/*
89 * lo_close
90 * closes an existing large object
91 *
92 * returns 0 upon success
93 * returns -1 upon failure.
94 */
95int
97{
98 PQArgBlock argv[1];
100 int retval;
101 int result_len;
102
103 if (lo_initialize(conn) < 0)
104 return -1;
105
106 argv[0].isint = 1;
107 argv[0].len = 4;
108 argv[0].u.integer = fd;
110 &retval, &result_len, 1, argv, 1);
112 {
113 PQclear(res);
114 return retval;
115 }
116 else
117 {
118 PQclear(res);
119 return -1;
120 }
121}
122
123/*
124 * lo_truncate
125 * truncates an existing large object to the given size
126 *
127 * returns 0 upon success
128 * returns -1 upon failure
129 */
130int
132{
133 PQArgBlock argv[2];
134 PGresult *res;
135 int retval;
136 int result_len;
137
138 if (lo_initialize(conn) < 0)
139 return -1;
140
141 /* Must check this on-the-fly because it's not there pre-8.3 */
142 if (conn->lobjfuncs->fn_lo_truncate == 0)
143 {
144 libpq_append_conn_error(conn, "cannot determine OID of function %s",
145 "lo_truncate");
146 return -1;
147 }
148
149 /*
150 * Long ago, somebody thought it'd be a good idea to declare this function
151 * as taking size_t ... but the underlying backend function only accepts a
152 * signed int32 length. So throw error if the given value overflows
153 * int32. (A possible alternative is to automatically redirect the call
154 * to lo_truncate64; but if the caller wanted to rely on that backend
155 * function being available, he could have called lo_truncate64 for
156 * himself.)
157 */
158 if (len > (size_t) INT_MAX)
159 {
160 libpq_append_conn_error(conn, "argument of lo_truncate exceeds integer range");
161 return -1;
162 }
163
164 argv[0].isint = 1;
165 argv[0].len = 4;
166 argv[0].u.integer = fd;
167
168 argv[1].isint = 1;
169 argv[1].len = 4;
170 argv[1].u.integer = (int) len;
171
173 &retval, &result_len, 1, argv, 2);
174
176 {
177 PQclear(res);
178 return retval;
179 }
180 else
181 {
182 PQclear(res);
183 return -1;
184 }
185}
186
187/*
188 * lo_truncate64
189 * truncates an existing large object to the given size
190 *
191 * returns 0 upon success
192 * returns -1 upon failure
193 */
194int
196{
197 PQArgBlock argv[2];
198 PGresult *res;
199 int retval;
200 int result_len;
201
202 if (lo_initialize(conn) < 0)
203 return -1;
204
206 {
207 libpq_append_conn_error(conn, "cannot determine OID of function %s",
208 "lo_truncate64");
209 return -1;
210 }
211
212 argv[0].isint = 1;
213 argv[0].len = 4;
214 argv[0].u.integer = fd;
215
216 len = lo_hton64(len);
217 argv[1].isint = 0;
218 argv[1].len = 8;
219 argv[1].u.ptr = (int *) &len;
220
222 &retval, &result_len, 1, argv, 2);
223
225 {
226 PQclear(res);
227 return retval;
228 }
229 else
230 {
231 PQclear(res);
232 return -1;
233 }
234}
235
236/*
237 * lo_read
238 * read len bytes of the large object into buf
239 *
240 * returns the number of bytes read, or -1 on failure.
241 * the CALLER must have allocated enough space to hold the result returned
242 */
243
244int
245lo_read(PGconn *conn, int fd, char *buf, size_t len)
246{
247 PQArgBlock argv[2];
248 PGresult *res;
249 int result_len;
250
251 if (lo_initialize(conn) < 0)
252 return -1;
253
254 /*
255 * Long ago, somebody thought it'd be a good idea to declare this function
256 * as taking size_t ... but the underlying backend function only accepts a
257 * signed int32 length. So throw error if the given value overflows
258 * int32.
259 */
260 if (len > (size_t) INT_MAX)
261 {
262 libpq_append_conn_error(conn, "argument of lo_read exceeds integer range");
263 return -1;
264 }
265
266 argv[0].isint = 1;
267 argv[0].len = 4;
268 argv[0].u.integer = fd;
269
270 argv[1].isint = 1;
271 argv[1].len = 4;
272 argv[1].u.integer = (int) len;
273
275 (void *) buf, &result_len, 0, argv, 2);
277 {
278 PQclear(res);
279 return result_len;
280 }
281 else
282 {
283 PQclear(res);
284 return -1;
285 }
286}
287
288/*
289 * lo_write
290 * write len bytes of buf into the large object fd
291 *
292 * returns the number of bytes written, or -1 on failure.
293 */
294int
295lo_write(PGconn *conn, int fd, const char *buf, size_t len)
296{
297 PQArgBlock argv[2];
298 PGresult *res;
299 int result_len;
300 int retval;
301
302 if (lo_initialize(conn) < 0)
303 return -1;
304
305 /*
306 * Long ago, somebody thought it'd be a good idea to declare this function
307 * as taking size_t ... but the underlying backend function only accepts a
308 * signed int32 length. So throw error if the given value overflows
309 * int32.
310 */
311 if (len > (size_t) INT_MAX)
312 {
313 libpq_append_conn_error(conn, "argument of lo_write exceeds integer range");
314 return -1;
315 }
316
317 argv[0].isint = 1;
318 argv[0].len = 4;
319 argv[0].u.integer = fd;
320
321 argv[1].isint = 0;
322 argv[1].len = (int) len;
323 argv[1].u.ptr = (int *) unconstify(char *, buf);
324
326 &retval, &result_len, 1, argv, 2);
328 {
329 PQclear(res);
330 return retval;
331 }
332 else
333 {
334 PQclear(res);
335 return -1;
336 }
337}
338
339/*
340 * lo_lseek
341 * change the current read or write location on a large object
342 */
343int
344lo_lseek(PGconn *conn, int fd, int offset, int whence)
345{
346 PQArgBlock argv[3];
347 PGresult *res;
348 int retval;
349 int result_len;
350
351 if (lo_initialize(conn) < 0)
352 return -1;
353
354 argv[0].isint = 1;
355 argv[0].len = 4;
356 argv[0].u.integer = fd;
357
358 argv[1].isint = 1;
359 argv[1].len = 4;
360 argv[1].u.integer = offset;
361
362 argv[2].isint = 1;
363 argv[2].len = 4;
364 argv[2].u.integer = whence;
365
367 &retval, &result_len, 1, argv, 3);
369 {
370 PQclear(res);
371 return retval;
372 }
373 else
374 {
375 PQclear(res);
376 return -1;
377 }
378}
379
380/*
381 * lo_lseek64
382 * change the current read or write location on a large object
383 */
385lo_lseek64(PGconn *conn, int fd, pg_int64 offset, int whence)
386{
387 PQArgBlock argv[3];
388 PGresult *res;
389 pg_int64 retval;
390 int result_len;
391
392 if (lo_initialize(conn) < 0)
393 return -1;
394
395 if (conn->lobjfuncs->fn_lo_lseek64 == 0)
396 {
397 libpq_append_conn_error(conn, "cannot determine OID of function %s",
398 "lo_lseek64");
399 return -1;
400 }
401
402 argv[0].isint = 1;
403 argv[0].len = 4;
404 argv[0].u.integer = fd;
405
406 offset = lo_hton64(offset);
407 argv[1].isint = 0;
408 argv[1].len = 8;
409 argv[1].u.ptr = (int *) &offset;
410
411 argv[2].isint = 1;
412 argv[2].len = 4;
413 argv[2].u.integer = whence;
414
416 (void *) &retval, &result_len, 0, argv, 3);
417 if (PQresultStatus(res) == PGRES_COMMAND_OK && result_len == 8)
418 {
419 PQclear(res);
420 return lo_ntoh64(retval);
421 }
422 else
423 {
424 PQclear(res);
425 return -1;
426 }
427}
428
429/*
430 * lo_creat
431 * create a new large object
432 * the mode is ignored (once upon a time it had a use)
433 *
434 * returns the oid of the large object created or
435 * InvalidOid upon failure
436 */
437Oid
439{
440 PQArgBlock argv[1];
441 PGresult *res;
442 int retval;
443 int result_len;
444
445 if (lo_initialize(conn) < 0)
446 return InvalidOid;
447
448 argv[0].isint = 1;
449 argv[0].len = 4;
450 argv[0].u.integer = mode;
452 &retval, &result_len, 1, argv, 1);
454 {
455 PQclear(res);
456 return (Oid) retval;
457 }
458 else
459 {
460 PQclear(res);
461 return InvalidOid;
462 }
463}
464
465/*
466 * lo_create
467 * create a new large object
468 * if lobjId isn't InvalidOid, it specifies the OID to (attempt to) create
469 *
470 * returns the oid of the large object created or
471 * InvalidOid upon failure
472 */
473Oid
475{
476 PQArgBlock argv[1];
477 PGresult *res;
478 int retval;
479 int result_len;
480
481 if (lo_initialize(conn) < 0)
482 return InvalidOid;
483
484 /* Must check this on-the-fly because it's not there pre-8.1 */
485 if (conn->lobjfuncs->fn_lo_create == 0)
486 {
487 libpq_append_conn_error(conn, "cannot determine OID of function %s",
488 "lo_create");
489 return InvalidOid;
490 }
491
492 argv[0].isint = 1;
493 argv[0].len = 4;
494 argv[0].u.integer = lobjId;
496 &retval, &result_len, 1, argv, 1);
498 {
499 PQclear(res);
500 return (Oid) retval;
501 }
502 else
503 {
504 PQclear(res);
505 return InvalidOid;
506 }
507}
508
509
510/*
511 * lo_tell
512 * returns the current seek location of the large object
513 */
514int
516{
517 int retval;
518 PQArgBlock argv[1];
519 PGresult *res;
520 int result_len;
521
522 if (lo_initialize(conn) < 0)
523 return -1;
524
525 argv[0].isint = 1;
526 argv[0].len = 4;
527 argv[0].u.integer = fd;
528
530 &retval, &result_len, 1, argv, 1);
532 {
533 PQclear(res);
534 return retval;
535 }
536 else
537 {
538 PQclear(res);
539 return -1;
540 }
541}
542
543/*
544 * lo_tell64
545 * returns the current seek location of the large object
546 */
549{
550 pg_int64 retval;
551 PQArgBlock argv[1];
552 PGresult *res;
553 int result_len;
554
555 if (lo_initialize(conn) < 0)
556 return -1;
557
558 if (conn->lobjfuncs->fn_lo_tell64 == 0)
559 {
560 libpq_append_conn_error(conn, "cannot determine OID of function %s",
561 "lo_tell64");
562 return -1;
563 }
564
565 argv[0].isint = 1;
566 argv[0].len = 4;
567 argv[0].u.integer = fd;
568
570 (void *) &retval, &result_len, 0, argv, 1);
571 if (PQresultStatus(res) == PGRES_COMMAND_OK && result_len == 8)
572 {
573 PQclear(res);
574 return lo_ntoh64(retval);
575 }
576 else
577 {
578 PQclear(res);
579 return -1;
580 }
581}
582
583/*
584 * lo_unlink
585 * delete a file
586 */
587
588int
590{
591 PQArgBlock argv[1];
592 PGresult *res;
593 int result_len;
594 int retval;
595
596 if (lo_initialize(conn) < 0)
597 return -1;
598
599 argv[0].isint = 1;
600 argv[0].len = 4;
601 argv[0].u.integer = lobjId;
602
604 &retval, &result_len, 1, argv, 1);
606 {
607 PQclear(res);
608 return retval;
609 }
610 else
611 {
612 PQclear(res);
613 return -1;
614 }
615}
616
617/*
618 * lo_import -
619 * imports a file as an (inversion) large object.
620 *
621 * returns the oid of that object upon success,
622 * returns InvalidOid upon failure
623 */
624
625Oid
627{
629}
630
631/*
632 * lo_import_with_oid -
633 * imports a file as an (inversion) large object.
634 * large object id can be specified.
635 *
636 * returns the oid of that object upon success,
637 * returns InvalidOid upon failure
638 */
639
640Oid
642{
643 return lo_import_internal(conn, filename, lobjId);
644}
645
646static Oid
648{
649 int fd;
650 int nbytes,
651 tmp;
652 char buf[LO_BUFSIZE];
653 Oid lobjOid;
654 int lobj;
655 char sebuf[PG_STRERROR_R_BUFLEN];
656
657 if (conn == NULL)
658 return InvalidOid;
659
660 /* Since this is the beginning of a query cycle, reset the error state */
662
663 /*
664 * open the file to be read in
665 */
666 fd = open(filename, O_RDONLY | PG_BINARY, 0666);
667 if (fd < 0)
668 { /* error */
669 libpq_append_conn_error(conn, "could not open file \"%s\": %s",
670 filename, strerror_r(errno, sebuf, sizeof(sebuf)));
671 return InvalidOid;
672 }
673
674 /*
675 * create an inversion object
676 */
677 if (oid == InvalidOid)
678 lobjOid = lo_creat(conn, INV_READ | INV_WRITE);
679 else
680 lobjOid = lo_create(conn, oid);
681
682 if (lobjOid == InvalidOid)
683 {
684 /* we assume lo_create() already set a suitable error message */
685 (void) close(fd);
686 return InvalidOid;
687 }
688
689 lobj = lo_open(conn, lobjOid, INV_WRITE);
690 if (lobj == -1)
691 {
692 /* we assume lo_open() already set a suitable error message */
693 (void) close(fd);
694 return InvalidOid;
695 }
696
697 /*
698 * read in from the file and write to the large object
699 */
700 while ((nbytes = read(fd, buf, LO_BUFSIZE)) > 0)
701 {
702 tmp = lo_write(conn, lobj, buf, nbytes);
703 if (tmp != nbytes)
704 {
705 /*
706 * If lo_write() failed, we are now in an aborted transaction so
707 * there's no need for lo_close(); furthermore, if we tried it
708 * we'd overwrite the useful error result with a useless one. So
709 * just nail the doors shut and get out of town.
710 */
711 (void) close(fd);
712 return InvalidOid;
713 }
714 }
715
716 if (nbytes < 0)
717 {
718 /* We must do lo_close before setting the errorMessage */
719 int save_errno = errno;
720
721 (void) lo_close(conn, lobj);
722 (void) close(fd);
723 /* deliberately overwrite any error from lo_close */
725 libpq_append_conn_error(conn, "could not read from file \"%s\": %s",
726 filename,
727 strerror_r(save_errno, sebuf, sizeof(sebuf)));
728 return InvalidOid;
729 }
730
731 (void) close(fd);
732
733 if (lo_close(conn, lobj) != 0)
734 {
735 /* we assume lo_close() already set a suitable error message */
736 return InvalidOid;
737 }
738
739 return lobjOid;
740}
741
742/*
743 * lo_export -
744 * exports an (inversion) large object.
745 * returns -1 upon failure, 1 if OK
746 */
747int
748lo_export(PGconn *conn, Oid lobjId, const char *filename)
749{
750 int result = 1;
751 int fd;
752 int nbytes,
753 tmp;
754 char buf[LO_BUFSIZE];
755 int lobj;
756 char sebuf[PG_STRERROR_R_BUFLEN];
757
758 /*
759 * open the large object.
760 */
761 lobj = lo_open(conn, lobjId, INV_READ);
762 if (lobj == -1)
763 {
764 /* we assume lo_open() already set a suitable error message */
765 return -1;
766 }
767
768 /*
769 * create the file to be written to
770 */
771 fd = open(filename, O_CREAT | O_WRONLY | O_TRUNC | PG_BINARY, 0666);
772 if (fd < 0)
773 {
774 /* We must do lo_close before setting the errorMessage */
775 int save_errno = errno;
776
777 (void) lo_close(conn, lobj);
778 /* deliberately overwrite any error from lo_close */
780 libpq_append_conn_error(conn, "could not open file \"%s\": %s",
781 filename,
782 strerror_r(save_errno, sebuf, sizeof(sebuf)));
783 return -1;
784 }
785
786 /*
787 * read in from the large object and write to the file
788 */
789 while ((nbytes = lo_read(conn, lobj, buf, LO_BUFSIZE)) > 0)
790 {
791 tmp = write(fd, buf, nbytes);
792 if (tmp != nbytes)
793 {
794 /* We must do lo_close before setting the errorMessage */
795 int save_errno = errno;
796
797 (void) lo_close(conn, lobj);
798 (void) close(fd);
799 /* deliberately overwrite any error from lo_close */
801 libpq_append_conn_error(conn, "could not write to file \"%s\": %s",
802 filename,
803 strerror_r(save_errno, sebuf, sizeof(sebuf)));
804 return -1;
805 }
806 }
807
808 /*
809 * If lo_read() failed, we are now in an aborted transaction so there's no
810 * need for lo_close(); furthermore, if we tried it we'd overwrite the
811 * useful error result with a useless one. So skip lo_close() if we got a
812 * failure result.
813 */
814 if (nbytes < 0 ||
815 lo_close(conn, lobj) != 0)
816 {
817 /* assume lo_read() or lo_close() left a suitable error message */
818 result = -1;
819 }
820
821 /* if we already failed, don't overwrite that msg with a close error */
822 if (close(fd) != 0 && result >= 0)
823 {
824 libpq_append_conn_error(conn, "could not write to file \"%s\": %s",
825 filename, strerror_r(errno, sebuf, sizeof(sebuf)));
826 result = -1;
827 }
828
829 return result;
830}
831
832
833/*
834 * lo_initialize
835 *
836 * Initialize for a new large-object operation on an existing connection.
837 * Return 0 if OK, -1 on failure.
838 *
839 * If we haven't previously done so, we collect the function OIDs from
840 * pg_proc for all functions that are required for large object operations.
841 */
842static int
844{
845 PGresult *res;
846 PGlobjfuncs *lobjfuncs;
847 int n;
848 const char *query;
849 const char *fname;
850 Oid foid;
851
852 /* Nothing we can do with no connection */
853 if (conn == NULL)
854 return -1;
855
856 /* Since this is the beginning of a query cycle, reset the error state */
858
859 /* Nothing else to do if we already collected info */
860 if (conn->lobjfuncs != NULL)
861 return 0;
862
863 /*
864 * Allocate the structure to hold the function OIDs. We don't store it
865 * into the PGconn until it's successfully filled.
866 */
867 lobjfuncs = (PGlobjfuncs *) malloc(sizeof(PGlobjfuncs));
868 if (lobjfuncs == NULL)
869 {
870 libpq_append_conn_error(conn, "out of memory");
871 return -1;
872 }
873 MemSet((char *) lobjfuncs, 0, sizeof(PGlobjfuncs));
874
875 /*
876 * Execute the query to get all the functions at once. (Not all of them
877 * may exist in older server versions.)
878 */
879 query = "select proname, oid from pg_catalog.pg_proc "
880 "where proname in ("
881 "'lo_open', "
882 "'lo_close', "
883 "'lo_creat', "
884 "'lo_create', "
885 "'lo_unlink', "
886 "'lo_lseek', "
887 "'lo_lseek64', "
888 "'lo_tell', "
889 "'lo_tell64', "
890 "'lo_truncate', "
891 "'lo_truncate64', "
892 "'loread', "
893 "'lowrite') "
894 "and pronamespace = (select oid from pg_catalog.pg_namespace "
895 "where nspname = 'pg_catalog')";
896
897 res = PQexec(conn, query);
898 if (res == NULL)
899 {
900 free(lobjfuncs);
901 return -1;
902 }
903
905 {
906 free(lobjfuncs);
907 PQclear(res);
908 libpq_append_conn_error(conn, "query to initialize large object functions did not return data");
909 return -1;
910 }
911
912 /*
913 * Examine the result and put the OID's into the struct
914 */
915 for (n = 0; n < PQntuples(res); n++)
916 {
917 fname = PQgetvalue(res, n, 0);
918 foid = (Oid) atoi(PQgetvalue(res, n, 1));
919 if (strcmp(fname, "lo_open") == 0)
920 lobjfuncs->fn_lo_open = foid;
921 else if (strcmp(fname, "lo_close") == 0)
922 lobjfuncs->fn_lo_close = foid;
923 else if (strcmp(fname, "lo_creat") == 0)
924 lobjfuncs->fn_lo_creat = foid;
925 else if (strcmp(fname, "lo_create") == 0)
926 lobjfuncs->fn_lo_create = foid;
927 else if (strcmp(fname, "lo_unlink") == 0)
928 lobjfuncs->fn_lo_unlink = foid;
929 else if (strcmp(fname, "lo_lseek") == 0)
930 lobjfuncs->fn_lo_lseek = foid;
931 else if (strcmp(fname, "lo_lseek64") == 0)
932 lobjfuncs->fn_lo_lseek64 = foid;
933 else if (strcmp(fname, "lo_tell") == 0)
934 lobjfuncs->fn_lo_tell = foid;
935 else if (strcmp(fname, "lo_tell64") == 0)
936 lobjfuncs->fn_lo_tell64 = foid;
937 else if (strcmp(fname, "lo_truncate") == 0)
938 lobjfuncs->fn_lo_truncate = foid;
939 else if (strcmp(fname, "lo_truncate64") == 0)
940 lobjfuncs->fn_lo_truncate64 = foid;
941 else if (strcmp(fname, "loread") == 0)
942 lobjfuncs->fn_lo_read = foid;
943 else if (strcmp(fname, "lowrite") == 0)
944 lobjfuncs->fn_lo_write = foid;
945 }
946
947 PQclear(res);
948
949 /*
950 * Finally check that we got all required large object interface functions
951 * (ones that have been added later than the stone age are instead checked
952 * only if used)
953 */
954 if (lobjfuncs->fn_lo_open == 0)
955 {
956 libpq_append_conn_error(conn, "cannot determine OID of function %s",
957 "lo_open");
958 free(lobjfuncs);
959 return -1;
960 }
961 if (lobjfuncs->fn_lo_close == 0)
962 {
963 libpq_append_conn_error(conn, "cannot determine OID of function %s",
964 "lo_close");
965 free(lobjfuncs);
966 return -1;
967 }
968 if (lobjfuncs->fn_lo_creat == 0)
969 {
970 libpq_append_conn_error(conn, "cannot determine OID of function %s",
971 "lo_creat");
972 free(lobjfuncs);
973 return -1;
974 }
975 if (lobjfuncs->fn_lo_unlink == 0)
976 {
977 libpq_append_conn_error(conn, "cannot determine OID of function %s",
978 "lo_unlink");
979 free(lobjfuncs);
980 return -1;
981 }
982 if (lobjfuncs->fn_lo_lseek == 0)
983 {
984 libpq_append_conn_error(conn, "cannot determine OID of function %s",
985 "lo_lseek");
986 free(lobjfuncs);
987 return -1;
988 }
989 if (lobjfuncs->fn_lo_tell == 0)
990 {
991 libpq_append_conn_error(conn, "cannot determine OID of function %s",
992 "lo_tell");
993 free(lobjfuncs);
994 return -1;
995 }
996 if (lobjfuncs->fn_lo_read == 0)
997 {
998 libpq_append_conn_error(conn, "cannot determine OID of function %s",
999 "loread");
1000 free(lobjfuncs);
1001 return -1;
1002 }
1003 if (lobjfuncs->fn_lo_write == 0)
1004 {
1005 libpq_append_conn_error(conn, "cannot determine OID of function %s",
1006 "lowrite");
1007 free(lobjfuncs);
1008 return -1;
1009 }
1010
1011 /*
1012 * Put the structure into the connection control
1013 */
1014 conn->lobjfuncs = lobjfuncs;
1015 return 0;
1016}
1017
1018/*
1019 * lo_hton64
1020 * converts a 64-bit integer from host byte order to network byte order
1021 */
1022static pg_int64
1024{
1025 union
1026 {
1027 pg_int64 i64;
1028 uint32 i32[2];
1029 } swap;
1030 uint32 t;
1031
1032 /* High order half first, since we're doing MSB-first */
1033 t = (uint32) (host64 >> 32);
1034 swap.i32[0] = pg_hton32(t);
1035
1036 /* Now the low order half */
1037 t = (uint32) host64;
1038 swap.i32[1] = pg_hton32(t);
1039
1040 return swap.i64;
1041}
1042
1043/*
1044 * lo_ntoh64
1045 * converts a 64-bit integer from network byte order to host byte order
1046 */
1047static pg_int64
1049{
1050 union
1051 {
1052 pg_int64 i64;
1053 uint32 i32[2];
1054 } swap;
1055 pg_int64 result;
1056
1057 swap.i64 = net64;
1058
1059 result = (uint32) pg_ntoh32(swap.i32[0]);
1060 result <<= 32;
1061 result |= (uint32) pg_ntoh32(swap.i32[1]);
1062
1063 return result;
1064}
#define unconstify(underlying_type, expr)
Definition: c.h:1202
#define PG_BINARY
Definition: c.h:1230
uint32_t uint32
Definition: c.h:488
#define MemSet(start, val, len)
Definition: c.h:977
char * PQgetvalue(const PGresult *res, int tup_num, int field_num)
Definition: fe-exec.c:3876
ExecStatusType PQresultStatus(const PGresult *res)
Definition: fe-exec.c:3411
int PQntuples(const PGresult *res)
Definition: fe-exec.c:3481
PGresult * PQfn(PGconn *conn, int fnid, int *result_buf, int *result_len, int result_is_int, const PQArgBlock *args, int nargs)
Definition: fe-exec.c:2980
PGresult * PQexec(PGconn *conn, const char *query)
Definition: fe-exec.c:2262
static Oid lo_import_internal(PGconn *conn, const char *filename, Oid oid)
Definition: fe-lobj.c:647
int lo_tell(PGconn *conn, int fd)
Definition: fe-lobj.c:515
static pg_int64 lo_ntoh64(pg_int64 net64)
Definition: fe-lobj.c:1048
int lo_close(PGconn *conn, int fd)
Definition: fe-lobj.c:96
pg_int64 lo_tell64(PGconn *conn, int fd)
Definition: fe-lobj.c:548
#define LO_BUFSIZE
Definition: fe-lobj.c:42
static int lo_initialize(PGconn *conn)
Definition: fe-lobj.c:843
Oid lo_creat(PGconn *conn, int mode)
Definition: fe-lobj.c:438
int lo_read(PGconn *conn, int fd, char *buf, size_t len)
Definition: fe-lobj.c:245
int lo_lseek(PGconn *conn, int fd, int offset, int whence)
Definition: fe-lobj.c:344
pg_int64 lo_lseek64(PGconn *conn, int fd, pg_int64 offset, int whence)
Definition: fe-lobj.c:385
int lo_open(PGconn *conn, Oid lobjId, int mode)
Definition: fe-lobj.c:57
int lo_write(PGconn *conn, int fd, const char *buf, size_t len)
Definition: fe-lobj.c:295
int lo_truncate(PGconn *conn, int fd, size_t len)
Definition: fe-lobj.c:131
Oid lo_create(PGconn *conn, Oid lobjId)
Definition: fe-lobj.c:474
int lo_unlink(PGconn *conn, Oid lobjId)
Definition: fe-lobj.c:589
Oid lo_import(PGconn *conn, const char *filename)
Definition: fe-lobj.c:626
static pg_int64 lo_hton64(pg_int64 host64)
Definition: fe-lobj.c:1023
int lo_export(PGconn *conn, Oid lobjId, const char *filename)
Definition: fe-lobj.c:748
Oid lo_import_with_oid(PGconn *conn, const char *filename, Oid lobjId)
Definition: fe-lobj.c:641
int lo_truncate64(PGconn *conn, int fd, pg_int64 len)
Definition: fe-lobj.c:195
void libpq_append_conn_error(PGconn *conn, const char *fmt,...)
Definition: fe-misc.c:1381
#define free(a)
Definition: header.h:65
#define malloc(a)
Definition: header.h:50
#define close(a)
Definition: win32.h:12
#define write(a, b, c)
Definition: win32.h:14
#define read(a, b, c)
Definition: win32.h:13
if(TABLE==NULL||TABLE_index==NULL)
Definition: isn.c:76
@ PGRES_COMMAND_OK
Definition: libpq-fe.h:122
@ PGRES_TUPLES_OK
Definition: libpq-fe.h:125
#define INV_READ
Definition: libpq-fs.h:22
#define INV_WRITE
Definition: libpq-fs.h:21
#define pqClearConnErrorState(conn)
Definition: libpq-int.h:896
#define pg_ntoh32(x)
Definition: pg_bswap.h:125
#define pg_hton32(x)
Definition: pg_bswap.h:121
static PgChecksumMode mode
Definition: pg_checksums.c:55
const void size_t len
static char * filename
Definition: pg_dumpall.c:119
static char * buf
Definition: pg_test_fsync.c:72
#define PG_STRERROR_R_BUFLEN
Definition: port.h:257
#define strerror_r
Definition: port.h:256
#define InvalidOid
Definition: postgres_ext.h:37
unsigned int Oid
Definition: postgres_ext.h:32
int64_t pg_int64
Definition: postgres_ext.h:48
static int fd(const char *x, int i)
Definition: preproc-init.c:105
PGconn * conn
Definition: streamutil.c:53
int isint
Definition: libpq-fe.h:283
int * ptr
Definition: libpq-fe.h:286
int integer
Definition: libpq-fe.h:287
union PQArgBlock::@185 u
Oid fn_lo_tell64
Definition: libpq-int.h:296
Oid fn_lo_write
Definition: libpq-int.h:300
Oid fn_lo_creat
Definition: libpq-int.h:290
Oid fn_lo_unlink
Definition: libpq-int.h:292
Oid fn_lo_open
Definition: libpq-int.h:288
Oid fn_lo_truncate64
Definition: libpq-int.h:298
Oid fn_lo_close
Definition: libpq-int.h:289
Oid fn_lo_create
Definition: libpq-int.h:291
Oid fn_lo_truncate
Definition: libpq-int.h:297
Oid fn_lo_lseek
Definition: libpq-int.h:293
Oid fn_lo_tell
Definition: libpq-int.h:295
Oid fn_lo_lseek64
Definition: libpq-int.h:294
Oid fn_lo_read
Definition: libpq-int.h:299
PGlobjfuncs * lobjfuncs
Definition: libpq-int.h:548
ExecStatusType resultStatus
Definition: libpq-int.h:182