[apple/xnu.git] / bsd / kern / socket_info.c

/*
 * Copyright (c) 2005-2006 Apple Computer, Inc. All rights reserved.
 *
 * @APPLE_OSREFERENCE_LICENSE_HEADER_START@
 * 
 * This file contains Original Code and/or Modifications of Original Code
 * as defined in and that are subject to the Apple Public Source License
 * Version 2.0 (the 'License'). You may not use this file except in
 * compliance with the License. The rights granted to you under the License
 * may not be used to create, or enable the creation or redistribution of,
 * unlawful or unlicensed copies of an Apple operating system, or to
 * circumvent, violate, or enable the circumvention or violation of, any
 * terms of an Apple operating system software license agreement.
 * 
 * Please obtain a copy of the License at
 * http://www.opensource.apple.com/apsl/ and read it before using this file.
 * 
 * The Original Code and all software distributed under the License are
 * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
 * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
 * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
 * Please see the License for the specific language governing rights and
 * limitations under the License.
 * 
 * @APPLE_OSREFERENCE_LICENSE_HEADER_END@
 */

#include <sys/types.h>
#include <sys/kernel_types.h>
#include <sys/errno.h>
#include <sys/kernel.h>
#include <sys/file_internal.h>
#include <sys/stat.h>
#include <sys/select.h>
#include <sys/pipe.h>
#include <sys/proc_info.h>
#include <sys/domain.h>
#include <sys/protosw.h>
#include <sys/domain.h>
#include <sys/socketvar.h>
#include <sys/unpcb.h>
#include <sys/sys_domain.h>
#include <sys/kern_event.h>
#include <net/ndrv_var.h>
#include <netinet/in_pcb.h>
#include <netinet/tcp_var.h>
#include <string.h>

static void fill_sockbuf_info(struct sockbuf *sb, struct sockbuf_info *sbi);
static void fill_common_sockinfo(struct socket *so, struct socket_info *si);

static void
fill_sockbuf_info(struct sockbuf *sb, struct sockbuf_info *sbi)
{
	sbi->sbi_cc = sb->sb_cc;
	sbi->sbi_hiwat = sb->sb_hiwat;
	sbi->sbi_mbcnt = sb->sb_mbcnt;
	sbi->sbi_mbmax = sb->sb_mbmax;
	sbi->sbi_lowat = sb->sb_lowat;
	sbi->sbi_flags = sb->sb_flags;
	sbi->sbi_timeo = (u_int32_t)(sb->sb_timeo.tv_sec * hz) + sb->sb_timeo.tv_usec / tick;
	if (sbi->sbi_timeo == 0 && sb->sb_timeo.tv_usec != 0)
		sbi->sbi_timeo = 1;
}

static void
fill_common_sockinfo(struct socket *so, struct socket_info *si)
{
	si->soi_so = (u_int64_t)((uintptr_t)so);
	si->soi_type = so->so_type;
	si->soi_options = so->so_options;
	si->soi_linger = so->so_linger;
	si->soi_state = so->so_state;
	si->soi_pcb = (u_int64_t)((uintptr_t)so->so_pcb);
	if (so->so_proto) {
		si->soi_protocol = so->so_proto->pr_protocol;
		if (so->so_proto->pr_domain)
			si->soi_family = so->so_proto->pr_domain->dom_family;
		else
			si->soi_family = 0;
	} else
		si->soi_protocol = si->soi_family = 0;
	si->soi_qlen = so->so_qlen;
	si->soi_incqlen = so->so_incqlen;
	si->soi_qlimit = so->so_qlimit;
	si->soi_timeo = so->so_timeo;
	si->soi_error = so->so_error;
	si->soi_oobmark = so->so_oobmark;
	fill_sockbuf_info(&so->so_snd, &si->soi_snd);
	fill_sockbuf_info(&so->so_rcv, &si->soi_rcv);
	
}

errno_t
fill_socketinfo(struct socket *so, struct socket_info *si)
{
	errno_t error = 0;
	int family;
	short type;
	short protocol;
		
	socket_lock(so, 0);

	si->soi_kind = SOCKINFO_GENERIC;

	fill_common_sockinfo(so, si);

	if (so->so_pcb == 0 || so->so_proto == 0 || so->so_proto->pr_domain == 0)
		goto out;

	/* The kind of socket is determined by the triplet {family, type, protocol} */
	family = so->so_proto->pr_domain->dom_family;
	type =  so->so_proto->pr_type;
	protocol =  so->so_proto->pr_protocol;
	switch (family) {
		case AF_INET: 
		case AF_INET6: {
			struct in_sockinfo *insi = &si->soi_proto.pri_in;
			struct inpcb *inp = (struct inpcb *)so->so_pcb;
			
			si->soi_kind = SOCKINFO_IN;
			
			insi->insi_fport = inp->inp_fport;
			insi->insi_lport = inp->inp_lport;
			insi->insi_gencnt = inp->inp_gencnt;
			insi->insi_flags = inp->inp_flags;
			insi->insi_vflag = inp->inp_vflag;
			insi->insi_ip_ttl = inp->inp_ip_ttl;
			insi->insi_faddr.ina_6 = inp->inp_dependfaddr.inp6_foreign;
			insi->insi_laddr.ina_6 = inp->inp_dependladdr.inp6_local;
			insi->insi_v4.in4_tos = inp->inp_depend4.inp4_ip_tos;
			insi->insi_v6.in6_hlim = inp->inp_depend6.inp6_hlim;
			insi->insi_v6.in6_cksum = inp->inp_depend6.inp6_cksum;
			insi->insi_v6.in6_ifindex = inp->inp_depend6.inp6_ifindex;
			insi->insi_v6.in6_hops = inp->inp_depend6.inp6_hops;

			if (type == SOCK_STREAM && (protocol == 0 || protocol == IPPROTO_TCP) && inp->inp_ppcb != 0) {
				struct tcp_sockinfo *tcpsi = &si->soi_proto.pri_tcp;
				struct tcpcb *tp= (struct tcpcb *)inp->inp_ppcb;
				
				si->soi_kind = SOCKINFO_TCP;

				tcpsi->tcpsi_state = tp->t_state;
				tcpsi->tcpsi_timer[TCPT_REXMT] = tp->t_timer[TCPT_REXMT];
				tcpsi->tcpsi_timer[TCPT_PERSIST] = tp->t_timer[TCPT_PERSIST];
				tcpsi->tcpsi_timer[TCPT_KEEP] = tp->t_timer[TCPT_KEEP];
				tcpsi->tcpsi_timer[TCPT_2MSL] = tp->t_timer[TCPT_2MSL];
				tcpsi->tcpsi_mss = tp->t_maxseg;
				tcpsi->tcpsi_flags = tp->t_flags;
				tcpsi->tcpsi_tp = (u_int64_t)((uintptr_t)tp);
			}
			break;
		}
		case AF_UNIX: {
			struct unpcb *unp = (struct unpcb *)so->so_pcb;
			struct un_sockinfo *unsi = &si->soi_proto.pri_un;
			
			si->soi_kind = SOCKINFO_UN;
			
			unsi->unsi_conn_pcb = (uint64_t)((uintptr_t)unp->unp_conn);
			if (unp->unp_conn)
				unsi->unsi_conn_so = (uint64_t)((uintptr_t)unp->unp_conn->unp_socket);
				
			
			if (unp->unp_addr) {
				size_t	addrlen = unp->unp_addr->sun_len;
				
				if (addrlen > SOCK_MAXADDRLEN)
					addrlen = SOCK_MAXADDRLEN;
				bcopy(unp->unp_addr, &unsi->unsi_addr, addrlen);
			}
			if (unp->unp_conn && unp->unp_conn->unp_addr) {
				size_t	addrlen = unp->unp_conn->unp_addr->sun_len;
				
				if (addrlen > SOCK_MAXADDRLEN)
					addrlen = SOCK_MAXADDRLEN;
				bcopy(unp->unp_conn->unp_addr, &unsi->unsi_caddr, addrlen);
			}
			break;
		}
		case AF_NDRV: {
			struct ndrv_cb *ndrv_cb = (struct ndrv_cb *)so->so_pcb;
			struct ndrv_info *ndrvsi = &si->soi_proto.pri_ndrv;

			si->soi_kind = SOCKINFO_NDRV;

			/* TDB lock ifnet ???? */
			if (ndrv_cb->nd_if != 0) {
				struct ifnet *ifp = ndrv_cb->nd_if;
				
				ndrvsi->ndrvsi_if_family = ifp->if_family;
				ndrvsi->ndrvsi_if_unit = ifp->if_unit;
				strlcpy(ndrvsi->ndrvsi_if_name, ifp->if_name, IFNAMSIZ);
			}

			break;
		}
		case AF_SYSTEM:
			if (so->so_proto->pr_protocol == SYSPROTO_EVENT) {
				struct kern_event_pcb *ev_pcb = (struct kern_event_pcb *)so->so_pcb;
				struct kern_event_info *kesi = &si->soi_proto.pri_kern_event;
				
				si->soi_kind = SOCKINFO_KERN_EVENT;
				
				kesi->kesi_vendor_code_filter = ev_pcb->vendor_code_filter;
				kesi->kesi_class_filter = ev_pcb->class_filter;
				kesi->kesi_subclass_filter = ev_pcb->subclass_filter;
				
			} else if (so->so_proto->pr_protocol == SYSPROTO_CONTROL) {
				struct ctl_cb *kcb = (struct ctl_cb *)so->so_pcb;
				struct kern_ctl_info *kcsi = &si->soi_proto.pri_kern_ctl;
				struct kctl *kctl = kcb->kctl;
				
				
				si->soi_kind = SOCKINFO_KERN_CTL;
				
				if (kctl == 0)
					break;
				kcsi->kcsi_id = kctl->id;
				kcsi->kcsi_reg_unit = kctl->id;
				kcsi->kcsi_flags = kctl->flags;
				kcsi->kcsi_recvbufsize = kctl->recvbufsize;
				kcsi->kcsi_sendbufsize = kctl->sendbufsize;
				kcsi->kcsi_unit = kcb->unit;
				strlcpy(kcsi->kcsi_name, kctl->name, MAX_KCTL_NAME);
			}
			break;

		case AF_APPLETALK:
			break;
			
		case AF_ROUTE:
			break;

		case AF_PPP:
			break;
		
		default:
			break;
	}
out:	
	socket_unlock(so, 0);
	
	return error;
}
Commit	Line	Data
0c530ab8	1	/*
2d21ac55	2	* Copyright (c) 2005-2006 Apple Computer, Inc. All rights reserved.
0c530ab8	3	*
2d21ac55 A	4	* @APPLE_OSREFERENCE_LICENSE_HEADER_START@
	5	*
	6	* This file contains Original Code and/or Modifications of Original Code
	7	* as defined in and that are subject to the Apple Public Source License
	8	* Version 2.0 (the 'License'). You may not use this file except in
	9	* compliance with the License. The rights granted to you under the License
	10	* may not be used to create, or enable the creation or redistribution of,
	11	* unlawful or unlicensed copies of an Apple operating system, or to
	12	* circumvent, violate, or enable the circumvention or violation of, any
	13	* terms of an Apple operating system software license agreement.
	14	*
	15	* Please obtain a copy of the License at
	16	* http://www.opensource.apple.com/apsl/ and read it before using this file.
	17	*
	18	* The Original Code and all software distributed under the License are
	19	* distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
0c530ab8 A	20	* EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
0c530ab8 A	21	* INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
2d21ac55 A	22	* FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
	23	* Please see the License for the specific language governing rights and
	24	* limitations under the License.
	25	*
	26	* @APPLE_OSREFERENCE_LICENSE_HEADER_END@
0c530ab8 A	27	*/
	28
	29	#include <sys/types.h>
	30	#include <sys/kernel_types.h>
	31	#include <sys/errno.h>
	32	#include <sys/kernel.h>
	33	#include <sys/file_internal.h>
	34	#include <sys/stat.h>
	35	#include <sys/select.h>
	36	#include <sys/pipe.h>
	37	#include <sys/proc_info.h>
	38	#include <sys/domain.h>
	39	#include <sys/protosw.h>
	40	#include <sys/domain.h>
	41	#include <sys/socketvar.h>
	42	#include <sys/unpcb.h>
	43	#include <sys/sys_domain.h>
	44	#include <sys/kern_event.h>
	45	#include <net/ndrv_var.h>
	46	#include <netinet/in_pcb.h>
	47	#include <netinet/tcp_var.h>
	48	#include <string.h>
	49
	50	static void fill_sockbuf_info(struct sockbuf sb, struct sockbuf_info sbi);
	51	static void fill_common_sockinfo(struct socket so, struct socket_info si);
	52
	53	static void
	54	fill_sockbuf_info(struct sockbuf sb, struct sockbuf_info sbi)
	55	{
	56	sbi->sbi_cc = sb->sb_cc;
	57	sbi->sbi_hiwat = sb->sb_hiwat;
	58	sbi->sbi_mbcnt = sb->sb_mbcnt;
	59	sbi->sbi_mbmax = sb->sb_mbmax;
	60	sbi->sbi_lowat = sb->sb_lowat;
	61	sbi->sbi_flags = sb->sb_flags;
b0d623f7	62	sbi->sbi_timeo = (u_int32_t)(sb->sb_timeo.tv_sec * hz) + sb->sb_timeo.tv_usec / tick;
0c530ab8 A	63	if (sbi->sbi_timeo == 0 && sb->sb_timeo.tv_usec != 0)
	64	sbi->sbi_timeo = 1;
	65	}
	66
	67	static void
	68	fill_common_sockinfo(struct socket so, struct socket_info si)
	69	{
	70	si->soi_so = (u_int64_t)((uintptr_t)so);
	71	si->soi_type = so->so_type;
	72	si->soi_options = so->so_options;
	73	si->soi_linger = so->so_linger;
	74	si->soi_state = so->so_state;
	75	si->soi_pcb = (u_int64_t)((uintptr_t)so->so_pcb);
	76	if (so->so_proto) {
	77	si->soi_protocol = so->so_proto->pr_protocol;
	78	if (so->so_proto->pr_domain)
	79	si->soi_family = so->so_proto->pr_domain->dom_family;
	80	else
	81	si->soi_family = 0;
	82	} else
	83	si->soi_protocol = si->soi_family = 0;
	84	si->soi_qlen = so->so_qlen;
	85	si->soi_incqlen = so->so_incqlen;
	86	si->soi_qlimit = so->so_qlimit;
	87	si->soi_timeo = so->so_timeo;
	88	si->soi_error = so->so_error;
	89	si->soi_oobmark = so->so_oobmark;
	90	fill_sockbuf_info(&so->so_snd, &si->soi_snd);
	91	fill_sockbuf_info(&so->so_rcv, &si->soi_rcv);
	92
	93	}
	94
	95	errno_t
	96	fill_socketinfo(struct socket so, struct socket_info si)
	97	{
	98	errno_t error = 0;
	99	int family;
	100	short type;
	101	short protocol;
	102
	103	socket_lock(so, 0);
	104
	105	si->soi_kind = SOCKINFO_GENERIC;
	106
	107	fill_common_sockinfo(so, si);
	108
	109	if (so->so_pcb == 0 \|\| so->so_proto == 0 \|\| so->so_proto->pr_domain == 0)
	110	goto out;
	111
	112	/* The kind of socket is determined by the triplet {family, type, protocol} */
	113	family = so->so_proto->pr_domain->dom_family;
	114	type = so->so_proto->pr_type;
	115	protocol = so->so_proto->pr_protocol;
	116	switch (family) {
	117	case AF_INET:
	118	case AF_INET6: {
	119	struct in_sockinfo *insi = &si->soi_proto.pri_in;
	120	struct inpcb inp = (struct inpcb )so->so_pcb;
	121
	122	si->soi_kind = SOCKINFO_IN;
	123
	124	insi->insi_fport = inp->inp_fport;
	125	insi->insi_lport = inp->inp_lport;
	126	insi->insi_gencnt = inp->inp_gencnt;
127	insi->insi_flags = inp->inp_flags;
128	insi->insi_vflag = inp->inp_vflag;
129	insi->insi_ip_ttl = inp->inp_ip_ttl;
130	insi->insi_faddr.ina_6 = inp->inp_dependfaddr.inp6_foreign;
131	insi->insi_laddr.ina_6 = inp->inp_dependladdr.inp6_local;
132	insi->insi_v4.in4_tos = inp->inp_depend4.inp4_ip_tos;
133	insi->insi_v6.in6_hlim = inp->inp_depend6.inp6_hlim;
134	insi->insi_v6.in6_cksum = inp->inp_depend6.inp6_cksum;
b0d623f7	135	insi->insi_v6.in6_ifindex = inp->inp_depend6.inp6_ifindex;
0c530ab8 A	136	insi->insi_v6.in6_hops = inp->inp_depend6.inp6_hops;
	137
	138	if (type == SOCK_STREAM && (protocol == 0 \|\| protocol == IPPROTO_TCP) && inp->inp_ppcb != 0) {
	139	struct tcp_sockinfo *tcpsi = &si->soi_proto.pri_tcp;
	140	struct tcpcb tp= (struct tcpcb )inp->inp_ppcb;
	141
	142	si->soi_kind = SOCKINFO_TCP;
	143
	144	tcpsi->tcpsi_state = tp->t_state;
	145	tcpsi->tcpsi_timer[TCPT_REXMT] = tp->t_timer[TCPT_REXMT];
	146	tcpsi->tcpsi_timer[TCPT_PERSIST] = tp->t_timer[TCPT_PERSIST];
	147	tcpsi->tcpsi_timer[TCPT_KEEP] = tp->t_timer[TCPT_KEEP];
	148	tcpsi->tcpsi_timer[TCPT_2MSL] = tp->t_timer[TCPT_2MSL];
	149	tcpsi->tcpsi_mss = tp->t_maxseg;
	150	tcpsi->tcpsi_flags = tp->t_flags;
	151	tcpsi->tcpsi_tp = (u_int64_t)((uintptr_t)tp);
	152	}
	153	break;
	154	}
	155	case AF_UNIX: {
	156	struct unpcb unp = (struct unpcb )so->so_pcb;
	157	struct un_sockinfo *unsi = &si->soi_proto.pri_un;
	158
	159	si->soi_kind = SOCKINFO_UN;
	160
	161	unsi->unsi_conn_pcb = (uint64_t)((uintptr_t)unp->unp_conn);
	162	if (unp->unp_conn)
	163	unsi->unsi_conn_so = (uint64_t)((uintptr_t)unp->unp_conn->unp_socket);
	164
	165
	166	if (unp->unp_addr) {
	167	size_t addrlen = unp->unp_addr->sun_len;
	168
	169	if (addrlen > SOCK_MAXADDRLEN)
	170	addrlen = SOCK_MAXADDRLEN;
	171	bcopy(unp->unp_addr, &unsi->unsi_addr, addrlen);
	172	}
	173	if (unp->unp_conn && unp->unp_conn->unp_addr) {
	174	size_t addrlen = unp->unp_conn->unp_addr->sun_len;
	175
	176	if (addrlen > SOCK_MAXADDRLEN)
	177	addrlen = SOCK_MAXADDRLEN;
	178	bcopy(unp->unp_conn->unp_addr, &unsi->unsi_caddr, addrlen);
	179	}
	180	break;
	181	}
	182	case AF_NDRV: {
	183	struct ndrv_cb ndrv_cb = (struct ndrv_cb )so->so_pcb;
	184	struct ndrv_info *ndrvsi = &si->soi_proto.pri_ndrv;
	185
	186	si->soi_kind = SOCKINFO_NDRV;
	187
	188	/* TDB lock ifnet ???? */
	189	if (ndrv_cb->nd_if != 0) {
	190	struct ifnet *ifp = ndrv_cb->nd_if;
	191
	192	ndrvsi->ndrvsi_if_family = ifp->if_family;
	193	ndrvsi->ndrvsi_if_unit = ifp->if_unit;
2d21ac55	194	strlcpy(ndrvsi->ndrvsi_if_name, ifp->if_name, IFNAMSIZ);
0c530ab8 A	195	}
	196
	197	break;
	198	}
	199	case AF_SYSTEM:
	200	if (so->so_proto->pr_protocol == SYSPROTO_EVENT) {
	201	struct kern_event_pcb ev_pcb = (struct kern_event_pcb )so->so_pcb;
	202	struct kern_event_info *kesi = &si->soi_proto.pri_kern_event;
	203
	204	si->soi_kind = SOCKINFO_KERN_EVENT;
	205
	206	kesi->kesi_vendor_code_filter = ev_pcb->vendor_code_filter;
	207	kesi->kesi_class_filter = ev_pcb->class_filter;
	208	kesi->kesi_subclass_filter = ev_pcb->subclass_filter;
	209
	210	} else if (so->so_proto->pr_protocol == SYSPROTO_CONTROL) {
	211	struct ctl_cb kcb = (struct ctl_cb )so->so_pcb;
	212	struct kern_ctl_info *kcsi = &si->soi_proto.pri_kern_ctl;
	213	struct kctl *kctl = kcb->kctl;
	214
	215
	216	si->soi_kind = SOCKINFO_KERN_CTL;
	217
	218	if (kctl == 0)
	219	break;
	220	kcsi->kcsi_id = kctl->id;
	221	kcsi->kcsi_reg_unit = kctl->id;
	222	kcsi->kcsi_flags = kctl->flags;
	223	kcsi->kcsi_recvbufsize = kctl->recvbufsize;
	224	kcsi->kcsi_sendbufsize = kctl->sendbufsize;
	225	kcsi->kcsi_unit = kcb->unit;
2d21ac55	226	strlcpy(kcsi->kcsi_name, kctl->name, MAX_KCTL_NAME);
0c530ab8 A	227	}
	228	break;
	229
	230	case AF_APPLETALK:
	231	break;
	232
	233	case AF_ROUTE:
	234	break;
	235
	236	case AF_PPP:
	237	break;
	238
	239	default:
	240	break;
	241	}
	242	out:
	243	socket_unlock(so, 0);
	244
	245	return error;
	246	}
	247