8 #include <netinet/in.h>
10 static char *nets[] = { "tcp", "udp", nil };
11 #define CLASS(p) ((*(uchar*)(p))>>6)
22 "tcp", "exportfs", 17007,
23 "tcp", "rexexec", 17009,
26 "tcp", "venti", 17034,
28 "tcp", "secstore", 5356,
34 parseip(char *host, u32int *pip)
41 for(i=0; i<4 && *p; i++){
42 x = strtoul(p, &p, 0);
45 if(*p != '.' && *p != 0)
74 *pip = *(u32int*)addr;
79 p9dialparse(char *addr, char **pnet, char **punix, u32int *phost, int *pport)
81 char *net, *host, *port, *e;
85 struct sockaddr_un *sockun;
89 if((host = strchr(net, '!')) == nil){
90 werrstr("malformed address");
94 if((port = strchr(host, '!')) == nil){
95 if(strcmp(net, "unix")==0 || strcmp(net, "net")==0){
97 if(strlen(host)+1 > sizeof sockun->sun_path){
98 werrstr("unix socket name too long");
107 werrstr("malformed address");
113 werrstr("malformed address (empty host)");
117 werrstr("malformed address (empty port)");
121 if(strcmp(net, "unix") == 0)
124 if(strcmp(net, "tcp")!=0 && strcmp(net, "udp")!=0 && strcmp(net, "net") != 0){
125 werrstr("bad network %s!%s!%s", net, host, port);
130 if(strcmp(host, "*") == 0)
132 else if(parseip(host, phost) == 0)
134 else if((he = gethostbyname(host)) != nil)
135 *phost = *(u32int*)(he->h_addr);
137 werrstr("unknown host %s", host);
141 /* translate network and port; should return list rather than first */
142 if(strcmp(net, "net") == 0){
143 for(i=0; nets[i]; i++){
144 if((se = getservbyname(port, nets[i])) != nil){
146 *pport = ntohs(se->s_port);
152 for(i=0; i<nelem(porttbl); i++){
153 if(strcmp(net, "net") == 0 || strcmp(porttbl[i].net, net) == 0)
154 if(strcmp(porttbl[i].service, port) == 0){
155 *pnet = porttbl[i].net;
156 *pport = porttbl[i].port;
161 if(strcmp(net, "net") == 0){
162 werrstr("unknown service net!*!%s", port);
166 if(strcmp(net, "tcp") != 0 && strcmp(net, "udp") != 0){
167 werrstr("unknown network %s", net);
172 i = strtol(port, &e, 0);
178 if((se = getservbyname(port, net)) != nil){
179 *pport = ntohs(se->s_port);
182 werrstr("unknown service %s!*!%s", net, port);