Function INET_connect

src/remote/inet.cpp:862–1062

}

rem_port* INET_connect(const TEXT* name,
					   PACKET* packet,
					   USHORT flag,
					   ClumpletReader* dpb,
					   RefPtr<const Config>* config,
					   int af)
{
/**************************************
 *
 *	I N E T _ c o n n e c t
 *
 **************************************
 *
 * Functional description
 *	Establish half of a communication link.  If a connect packet is given,
 *	the connection is on behalf of a remote interface.  Otherwise the connect
 *	is for a server process.
 *
 **************************************/
#ifdef DEBUG
	{
		if (INET_trace & TRACE_operations)
		{
			fprintf(stdout, "INET_connect\n");
			fflush(stdout);
		}
		INET_start_time = inet_debug_timer();
		// CVC: I don't see the point in replacing this with fb_utils::readenv().
		const char* p = getenv("INET_force_error");
		if (p != NULL) {
			INET_force_error = atoi(p);
		}
	}
#endif

	rem_port* port = alloc_port(NULL);
	if (config)
	{
		port->port_config = *config;
	}
	REMOTE_get_timeout_params(port, dpb);

	string host;
	string protocol;

	if ((!name || !name[0]) && !packet)
	{
		name = port->getPortConfig()->getRemoteBindAddress();
	}

	if (name)
	{
		host = name;
		const FB_SIZE_T pos = host.find("/");

		if (pos != string::npos)
		{
			protocol = host.substr(pos + 1);