utlsocks.c

使用Oracle 外部過程發送email, 有裝java組件的Oracle不需要.

#include <stdio.h>
#include <stdlib.h>

#include <string.h>
#include <unistd.h>
#include <oci.h>

        #include <sys/socket.h>
        #include <sys/types.h>
        #include <arpa/inet.h>
        #include <netinet/in.h>
        #include <netdb.h>
        #include <unistd.h>
        #include <sys/ioctl.h>




//Write By Gan Jian Hui
//Date : 2006-07-06
//Description :Send email by c 


int  hostconnect(const  char *hostname,  int port)
{
        int  sockfd ;
        struct hostent *host ;
        struct sockaddr_in client_addr;

        if((host=gethostbyname( hostname ))==NULL) {
                perror("gethostbyname");
                return (-1) ;
        }


        if ((sockfd = socket(AF_INET, SOCK_STREAM, 0)) == -1){
                perror("sockfd ");
                return (-2);
        }
        client_addr.sin_family=AF_INET;
        client_addr.sin_port=htons( port );
        client_addr.sin_addr = *((struct in_addr *)host->h_addr);

//        bzero(&(client_addr.sin_zero),8);
        memset(&(client_addr.sin_zero),0,8) ;
        if (connect(sockfd, (struct sockaddr *)&client_addr,           sizeof(struct sockaddr)) == -1) {
                perror("Connec Error");
                return -3 ;
        }

        return (sockfd );
}



char *recvsocket(ctx, socket,ret_i, ret_l)
OCIExtProcContext *ctx;
int    socket; 
short  *ret_i; 
short  *ret_l; 
{
	char *tmp;
	tmp = OCIExtProcAllocCallMemory(ctx, 5);  
	memset(tmp,5,'\0');
	strcpy(tmp,"this") ;
	*ret_i = (short)OCI_IND_NOTNULL; 
	*ret_l = strlen(tmp) ;

	return tmp ;		  
} 





void   socketrecv(ctx, socket,result,ret_i, ret_max)
OCIExtProcContext *ctx;
int    socket; 
char   *result ;
short  *ret_i;
//short  *ret_l;
short  *ret_max;
{
	memset(result, 0, *ret_max);
	strncpy(result,"this is test", *ret_max) ;
	*ret_i = (short)OCI_IND_NOTNULL; 
//	*ret_l = strlen(result) ;
	recv(socket, (void *)result, ret_max,0 ) ;
} 


int   socketclose(int socket)
{
	close(socket) ;
	return 0 ;
}


void  socketsend(int socket, char *msg)
{
	send(socket, msg, strlen(msg), 0) ;
}