A small patch to keep postgres working on the latest BeOS.

Cyril VELTER

1 files changed, 45 insertions, 1 deletions

diff --git a/src/backend/port/beos/support.c b/src/backend/port/beos/support.c
index bc5264e5490..936c151e864 100644
--- a/src/backend/port/beos/support.c
+++ b/src/backend/port/beos/support.c
@@ -115,6 +115,22 @@ beos_dl_open(char *filename)
 	}
 }
 
+void
+beos_dl_sym(image_id im,char* symname,void** fptr)
+{
+	/* Send command '3' (get symbol) to the support server */
+	write_port(beos_dl_port_in, 3, symname, strlen(symname) + 1);
+	write_port(beos_dl_port_in, im, NULL,0);
+
+	/* Read sym address */
+	read_port(beos_dl_port_out, (int32*)(fptr), NULL, 0);
+
+	if (fptr==NULL)
+	{
+		elog(NOTICE, "loading symbol '%s' failed ", symname);
+	}
+}
+
 status_t
 beos_dl_close(image_id im)
 {
@@ -164,12 +180,13 @@ beos_startup(int argc, char **argv)
 			 * server
 			 */
 			read_port(port_in, &opcode, datas, 4000);
-
+			
 			switch (opcode)
 			{
 					image_id	addon;
 					image_info	info_im;
 					area_info	info_ar;
+					void  *     fpt;
 
 					/* Load Add-On */
 				case 1:
@@ -208,6 +225,33 @@ beos_startup(int argc, char **argv)
 					write_port(port_out, unload_add_on(*((int *) (datas))), NULL, 0);
 					break;
 					/* Cleanup and exit */
+				case 3:
+					
+					/* read image Id on the input port */
+					read_port(port_in, &addon,NULL,0);
+
+					/* Loading symbol */
+					fpt=NULL;
+					
+			
+				if (get_image_symbol(addon, datas, B_SYMBOL_TYPE_TEXT, &fpt) == B_OK);
+					{
+
+						/*
+						 * Sometime the loader return B_OK for an inexistant function
+						 * with an invalid address !!! Check that the return address
+						 * is in the image range
+			 			*/
+
+						get_image_info(addon, &info_im);
+						if ((fpt < info_im.text) ||(fpt >= (info_im.text +info_im.text_size)))
+							fpt=NULL;
+					}
+
+					/* Send back fptr of data segment */
+					write_port(port_out, (int32)(fpt),NULL,0);
+					break;
+								
 				default:
 					/* Free system resources */
 					delete_port(port_in);