1 /* http-common.c - Common support for TLS implementations. 2 * Copyright (C) 2017 Werner Koch 3 * 4 * This file is part of GnuPG. 5 * 6 * GnuPG is free software; you can redistribute it and/or modify 7 * it under the terms of the GNU General Public License as published by 8 * the Free Software Foundation; either version 3 of the License, or 9 * (at your option) any later version. 10 * 11 * GnuPG is distributed in the hope that it will be useful, 12 * but WITHOUT ANY WARRANTY; without even the implied warranty of 13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 14 * GNU General Public License for more details. 15 * 16 * You should have received a copy of the GNU General Public License 17 * along with this program; if not, see <https://www.gnu.org/licenses/>. 18 */ 19 20 #include <config.h> 21 22 #include <stdio.h> 23 #include <stdlib.h> 24 #include <string.h> 25 26 #include "dirmngr.h" 27 #include "http-common.h" 28 29 30 /* Return a static string with the default keyserver. If NAME_ONLY is 31 * given only the name part is returned. */ 32 const char * get_default_keyserver(int name_only)33get_default_keyserver (int name_only) 34 { 35 static const char *result; 36 37 if (!name_only) 38 return DIRMNGR_DEFAULT_KEYSERVER; 39 40 if (!result) 41 { 42 /* Strip the scheme from the constant. */ 43 result = strstr (DIRMNGR_DEFAULT_KEYSERVER, "://"); 44 log_assert (result && strlen (result) > 3); 45 result += 3; 46 /* Assert that there is no port given. */ 47 log_assert (!strchr (result, ':')); 48 } 49 return result; 50 } 51