/*-------- * Module:			lobj.c * * Description:		This module contains routines related to manipulating *					large objects. * * Classes:			none * * API functions:	none * * Comments:		See "notice.txt" for copyright and license information. *-------- */#include "lobj.h"#include "connection.h"OIDodbc_lo_creat(ConnectionClass *conn, int mode){	LO_ARG		argv[1];	Int4		retval, result_len;	argv[0].isint = 1;	argv[0].len = 4;	argv[0].u.integer = mode;	if (!CC_send_function(conn, LO_CREAT, &retval, &result_len, 1, argv, 1))		return 0;				/* invalid oid */	else		return (OID) retval;}intodbc_lo_open(ConnectionClass *conn, int lobjId, int mode){	int			fd;	int			result_len;	LO_ARG		argv[2];	argv[0].isint = 1;	argv[0].len = 4;	argv[0].u.integer = lobjId;	argv[1].isint = 1;	argv[1].len = 4;	argv[1].u.integer = mode;	if (!CC_send_function(conn, LO_OPEN, &fd, &result_len, 1, argv, 2))		return -1;	if (fd >= 0 && odbc_lo_lseek(conn, fd, 0L, SEEK_SET) < 0)		return -1;	return fd;}intodbc_lo_close(ConnectionClass *conn, int fd){	LO_ARG		argv[1];	int			retval,				result_len;	argv[0].isint = 1;	argv[0].len = 4;	argv[0].u.integer = fd;	if (!CC_send_function(conn, LO_CLOSE, &retval, &result_len, 1, argv, 1))		return -1;	else		return retval;}Int4odbc_lo_read(ConnectionClass *conn, int fd, char *buf, Int4 len){	LO_ARG		argv[2];	Int4		result_len;	argv[0].isint = 1;	argv[0].len = 4;	argv[0].u.integer = fd;	argv[1].isint = 1;	argv[1].len = 4;	argv[1].u.integer = len;	if (!CC_send_function(conn, LO_READ, (int *) buf, &result_len, 0, argv, 2))		return -1;	else		return result_len;}Int4odbc_lo_write(ConnectionClass *conn, int fd, char *buf, Int4 len){	LO_ARG		argv[2];	Int4		retval,				result_len;	if (len <= 0)		return 0;	argv[0].isint = 1;	argv[0].len = 4;	argv[0].u.integer = fd;	argv[1].isint = 0;	argv[1].len = len;	argv[1].u.ptr = (char *) buf;	if (!CC_send_function(conn, LO_WRITE, &retval, &result_len, 1, argv, 2))		return -1;	else		return retval;}Int4odbc_lo_lseek(ConnectionClass *conn, int fd, int offset, Int4 whence){	LO_ARG		argv[3];	Int4		retval,				result_len;	argv[0].isint = 1;	argv[0].len = 4;	argv[0].u.integer = fd;	argv[1].isint = 1;	argv[1].len = 4;	argv[1].u.integer = offset;	argv[2].isint = 1;	argv[2].len = 4;	argv[2].u.integer = whence;	if (!CC_send_function(conn, LO_LSEEK, &retval, &result_len, 1, argv, 3))		return -1;	else		return retval;}Int4odbc_lo_tell(ConnectionClass *conn, int fd){	LO_ARG		argv[1];	Int4		retval, result_len;	argv[0].isint = 1;	argv[0].len = 4;	argv[0].u.integer = fd;	if (!CC_send_function(conn, LO_TELL, &retval, &result_len, 1, argv, 1))		return -1;	else		return retval;}Int4odbc_lo_unlink(ConnectionClass *conn, OID lobjId){	LO_ARG		argv[1];	Int4		retval, result_len;	argv[0].isint = 1;	argv[0].len = 4;	argv[0].u.integer = lobjId;	if (!CC_send_function(conn, LO_UNLINK, &retval, &result_len, 1, argv, 1))		return -1;	else		return retval;}