Archipelago » qemu

/*

 * Changes and additions relating to SLiRP are

 * Copyright (c) 1995 Danny Gasparovski.

 * Please read the file COPYRIGHT for the

 * terms and conditions of the copyright.

 */

{

	register struct ip *ip;

	int hlen;

	DEBUG_CALL("ip_input");

	DEBUG_ARG("m = %lx", (long)m);

	DEBUG_ARG("m_len = %d", m->m_len);

	ipstat.ips_total++;

	if (m->m_len < sizeof (struct ip)) {

		ipstat.ips_toosmall++;

		return;

	}

	ip = mtod(m, struct ip *);

	if (ip->ip_v != IPVERSION) {

		ipstat.ips_badvers++;

		goto bad;

	}

        /* keep ip header intact for ICMP reply

	 */

	if(cksum(m,hlen)) {

	  ipstat.ips_badsum++;

	 * (We could look in the reassembly queue to see

	 * if the packet was previously fragmented,

	 * but it's not worth the time; just let them time out.)

	 * XXX This should fail, don't fragment yet

	 */

	if (ip->ip_off &~ IP_DF) {

		ip->ip_len -= hlen;

		if (ip->ip_off & IP_MF)

		  ((struct ipasfrag *)ip)->ipf_mff |= 1;

		  ((struct ipasfrag *)ip)->ipf_mff &= ~1;

		ip->ip_off <<= 3;

	register struct ipasfrag *q;

	int hlen = ip->ip_hl << 2;

	int i, next;

	DEBUG_CALL("ip_reass");

	DEBUG_ARG("ip = %lx", (long)ip);

	DEBUG_ARG("fp = %lx", (long)fp);

	  q = (struct ipasfrag *)fp;

	  goto insert;

	}

	/*

	 * Find a segment which begins after this one does.

	 */

	  ip = (struct ipasfrag *)(m->m_ext + delta);

	}

	 * ip=(struct ipasfrag *)m->m_data; */

	ip->ip_len = next;

ip_slowtimo()

{

	register struct ipq *fp;

	DEBUG_CALL("ip_slowtimo");

	fp = (struct ipq *) ipq.next;

	if (fp == 0)

	   return;

	i = m->m_len - (sizeof (struct ip) + olen);

	memcpy(opts, opts  + olen, (unsigned)i);

	m->m_len -= olen;

	ip->ip_hl = sizeof(struct ip) >> 2;

}