src/polypcore/parseaddr.c

   1 /* $Id$ */
   2
   3 /***
   4   This file is part of polypaudio.
   5
   6   polypaudio is free software; you can redistribute it and/or modify
   7   it under the terms of the GNU Lesser General Public License as
   8   published by the Free Software Foundation; either version 2.1 of the
   9   License, or (at your option) any later version.
  10
  11   polypaudio is distributed in the hope that it will be useful, but
  12   WITHOUT ANY WARRANTY; without even the implied warranty of
  13   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  14   Lesser General Public License for more details.
  15
  16   You should have received a copy of the GNU Lesser General Public
  17   License along with polypaudio; if not, write to the Free Software
  18   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
  19   USA.
  20 ***/
  21
  22 #ifdef HAVE_CONFIG_H
  23 #include <config.h>
  24 #endif
  25
  26 #include <string.h>
  27 #include <assert.h>
  28 #include <stdlib.h>
  29
  30 #include <polyp/xmalloc.h>
  31
  32 #include <polypcore/core-util.h>
  33
  34 #include "parseaddr.h"
  35
  36 /* Parse addresses in one of the following forms:
  37  *    HOSTNAME
  38  *    HOSTNAME:PORT
  39  *    [HOSTNAME]
  40  *    [HOSTNAME]:PORT
  41  *
  42  *  Return a newly allocated string of the hostname and fill in *ret_port if specified  */
  43
  44 static char *parse_host(const char *s, uint16_t *ret_port) {
  45     assert(s && ret_port);
  46     if (*s == '[') {
  47         char *e;
  48         if (!(e = strchr(s+1, ']')))
  49             return NULL;
  50
  51         if (e[1] == ':')
  52             *ret_port = atoi(e+2);
  53         else if (e[1] != 0)
  54             return NULL;
  55
  56         return pa_xstrndup(s+1, e-s-1);
  57     } else {
  58         char *e;
  59
  60         if (!(e = strrchr(s, ':')))
  61             return pa_xstrdup(s);
  62
  63         *ret_port = atoi(e+1);
  64         return pa_xstrndup(s, e-s);
  65     }
  66 }
  67
  68 int pa_parse_address(const char *name, pa_parsed_address *ret_p) {
  69     const char *p;
  70     assert(name && ret_p);
  71     memset(ret_p, 0, sizeof(pa_parsed_address));
  72     ret_p->type = PA_PARSED_ADDRESS_TCP_AUTO;
  73
  74     if (*name == '{') {
  75         char hn[256], *pfx;
  76         /* The URL starts with a host specification for detecting local connections */
  77
  78         if (!pa_get_host_name(hn, sizeof(hn)))
  79             return -1;
  80
  81         pfx = pa_sprintf_malloc("{%s}", hn);
  82         if (!pa_startswith(name, pfx)) {
  83             pa_xfree(pfx);
  84             /* Not local */
  85             return -1;
  86         }
  87
  88         p = name + strlen(pfx);
  89         pa_xfree(pfx);
  90     } else
  91         p = name;
  92
  93     if (*p == '/')
  94         ret_p->type = PA_PARSED_ADDRESS_UNIX;
  95     else if (pa_startswith(p, "unix:")) {
  96         ret_p->type = PA_PARSED_ADDRESS_UNIX;
  97         p += sizeof("unix:")-1;
  98     } else if (pa_startswith(p, "tcp:") || pa_startswith(p, "tcp4:")) {
  99         ret_p->type = PA_PARSED_ADDRESS_TCP4;
 100         p += sizeof("tcp:")-1;
 101     } else if (pa_startswith(p, "tcp6:")) {
 102         ret_p->type = PA_PARSED_ADDRESS_TCP6;
 103         p += sizeof("tcp6:")-1;
 104     }
 105
 106     if (ret_p->type == PA_PARSED_ADDRESS_UNIX)
 107         ret_p->path_or_host = pa_xstrdup(p);
 108     else
 109         if (!(ret_p->path_or_host = parse_host(p, &ret_p->port)))
 110             return -1;
 111
 112
 113     return 0;
 114 }