|  | /* | 
|  | * Copyright 2008, The Android Open Source Project | 
|  | * | 
|  | * Licensed under the Apache License, Version 2.0 (the "License"); | 
|  | * you may not use this file except in compliance with the License. | 
|  | * You may obtain a copy of the License at | 
|  | * | 
|  | *     http://www.apache.org/licenses/LICENSE-2.0 | 
|  | * | 
|  | * Unless required by applicable law or agreed to in writing, software | 
|  | * distributed under the License is distributed on an "AS IS" BASIS, | 
|  | * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | 
|  | * See the License for the specific language governing permissions and | 
|  | * limitations under the License. | 
|  | */ | 
|  |  | 
|  | /* Utilities for managing the dhcpcd DHCP client daemon */ | 
|  |  | 
|  | #include <stdio.h> | 
|  | #include <stdlib.h> | 
|  | #include <string.h> | 
|  | #include <unistd.h> | 
|  | #include <arpa/inet.h> | 
|  | #include <netinet/in.h> | 
|  |  | 
|  | #include <cutils/properties.h> | 
|  |  | 
|  | static const char DAEMON_NAME[]        = "dhcpcd"; | 
|  | static const char DAEMON_PROP_NAME[]   = "init.svc.dhcpcd"; | 
|  | static const char HOSTNAME_PROP_NAME[] = "net.hostname"; | 
|  | static const char DHCP_PROP_NAME_PREFIX[]  = "dhcp"; | 
|  | static const char DHCP_CONFIG_PATH[]   = "/system/etc/dhcpcd/dhcpcd.conf"; | 
|  | static const int NAP_TIME = 200;   /* wait for 200ms at a time */ | 
|  | /* when polling for property values */ | 
|  | static const char DAEMON_NAME_RENEW[]  = "iprenew"; | 
|  | static char errmsg[100] = "\0"; | 
|  | /* interface length for dhcpcd daemon start (dhcpcd_<interface> as defined in init.rc file) | 
|  | * or for filling up system properties dhcpcd.<interface>.ipaddress, dhcpcd.<interface>.dns1 | 
|  | * and other properties on a successful bind | 
|  | */ | 
|  | #define MAX_INTERFACE_LENGTH 25 | 
|  |  | 
|  | /* | 
|  | * P2p interface names increase sequentially p2p-p2p0-1, p2p-p2p0-2.. after | 
|  | * group formation. This does not work well with system properties which can quickly | 
|  | * exhaust or for specifiying a dhcp start target in init which requires | 
|  | * interface to be pre-defined in init.rc file. | 
|  | * | 
|  | * This function returns a common string p2p for all p2p interfaces. | 
|  | */ | 
|  | void get_p2p_interface_replacement(const char *interface, char *p2p_interface) { | 
|  | /* Use p2p for any interface starting with p2p. */ | 
|  | if (strncmp(interface, "p2p",3) == 0) { | 
|  | strncpy(p2p_interface, "p2p", MAX_INTERFACE_LENGTH); | 
|  | } else { | 
|  | strncpy(p2p_interface, interface, MAX_INTERFACE_LENGTH); | 
|  | } | 
|  | } | 
|  |  | 
|  | /* | 
|  | * Wait for a system property to be assigned a specified value. | 
|  | * If desired_value is NULL, then just wait for the property to | 
|  | * be created with any value. maxwait is the maximum amount of | 
|  | * time in seconds to wait before giving up. | 
|  | */ | 
|  | static int wait_for_property(const char *name, const char *desired_value, int maxwait) | 
|  | { | 
|  | char value[PROPERTY_VALUE_MAX] = {'\0'}; | 
|  | int maxnaps = (maxwait * 1000) / NAP_TIME; | 
|  |  | 
|  | if (maxnaps < 1) { | 
|  | maxnaps = 1; | 
|  | } | 
|  |  | 
|  | while (maxnaps-- >= 0) { | 
|  | if (property_get(name, value, NULL)) { | 
|  | if (desired_value == NULL || | 
|  | strcmp(value, desired_value) == 0) { | 
|  | return 0; | 
|  | } | 
|  | } | 
|  | if (maxnaps >= 0) { | 
|  | usleep(NAP_TIME * 1000); | 
|  | } | 
|  | } | 
|  | return -1; /* failure */ | 
|  | } | 
|  |  | 
|  | static int fill_ip_info(const char *interface, | 
|  | char *ipaddr, | 
|  | char *gateway, | 
|  | uint32_t *prefixLength, | 
|  | char *dns[], | 
|  | char *server, | 
|  | uint32_t *lease, | 
|  | char *vendorInfo, | 
|  | char *domain, | 
|  | char *mtu) | 
|  | { | 
|  | char prop_name[PROPERTY_KEY_MAX]; | 
|  | char prop_value[PROPERTY_VALUE_MAX]; | 
|  | /* Interface name after converting p2p0-p2p0-X to p2p to reuse system properties */ | 
|  | char p2p_interface[MAX_INTERFACE_LENGTH]; | 
|  | int x; | 
|  |  | 
|  | get_p2p_interface_replacement(interface, p2p_interface); | 
|  |  | 
|  | snprintf(prop_name, sizeof(prop_name), "%s.%s.ipaddress", DHCP_PROP_NAME_PREFIX, p2p_interface); | 
|  | property_get(prop_name, ipaddr, NULL); | 
|  |  | 
|  | snprintf(prop_name, sizeof(prop_name), "%s.%s.gateway", DHCP_PROP_NAME_PREFIX, p2p_interface); | 
|  | property_get(prop_name, gateway, NULL); | 
|  |  | 
|  | snprintf(prop_name, sizeof(prop_name), "%s.%s.server", DHCP_PROP_NAME_PREFIX, p2p_interface); | 
|  | property_get(prop_name, server, NULL); | 
|  |  | 
|  | //TODO: Handle IPv6 when we change system property usage | 
|  | if (gateway[0] == '\0' || strncmp(gateway, "0.0.0.0", 7) == 0) { | 
|  | //DHCP server is our best bet as gateway | 
|  | strncpy(gateway, server, PROPERTY_VALUE_MAX); | 
|  | } | 
|  |  | 
|  | snprintf(prop_name, sizeof(prop_name), "%s.%s.mask", DHCP_PROP_NAME_PREFIX, p2p_interface); | 
|  | if (property_get(prop_name, prop_value, NULL)) { | 
|  | int p; | 
|  | // this conversion is v4 only, but this dhcp client is v4 only anyway | 
|  | in_addr_t mask = ntohl(inet_addr(prop_value)); | 
|  | // Check netmask is a valid IP address.  ntohl gives NONE response (all 1's) for | 
|  | // non 255.255.255.255 inputs.  if we get that value check if it is legit.. | 
|  | if (mask == INADDR_NONE && strcmp(prop_value, "255.255.255.255") != 0) { | 
|  | snprintf(errmsg, sizeof(errmsg), "DHCP gave invalid net mask %s", prop_value); | 
|  | return -1; | 
|  | } | 
|  | for (p = 0; p < 32; p++) { | 
|  | if (mask == 0) break; | 
|  | // check for non-contiguous netmask, e.g., 255.254.255.0 | 
|  | if ((mask & 0x80000000) == 0) { | 
|  | snprintf(errmsg, sizeof(errmsg), "DHCP gave invalid net mask %s", prop_value); | 
|  | return -1; | 
|  | } | 
|  | mask = mask << 1; | 
|  | } | 
|  | *prefixLength = p; | 
|  | } | 
|  |  | 
|  | for (x=0; dns[x] != NULL; x++) { | 
|  | snprintf(prop_name, sizeof(prop_name), "%s.%s.dns%d", DHCP_PROP_NAME_PREFIX, p2p_interface, x+1); | 
|  | property_get(prop_name, dns[x], NULL); | 
|  | } | 
|  |  | 
|  | snprintf(prop_name, sizeof(prop_name), "%s.%s.leasetime", DHCP_PROP_NAME_PREFIX, p2p_interface); | 
|  | if (property_get(prop_name, prop_value, NULL)) { | 
|  | *lease = atol(prop_value); | 
|  | } | 
|  |  | 
|  | snprintf(prop_name, sizeof(prop_name), "%s.%s.vendorInfo", DHCP_PROP_NAME_PREFIX, | 
|  | p2p_interface); | 
|  | property_get(prop_name, vendorInfo, NULL); | 
|  |  | 
|  | snprintf(prop_name, sizeof(prop_name), "%s.%s.domain", DHCP_PROP_NAME_PREFIX, | 
|  | p2p_interface); | 
|  | property_get(prop_name, domain, NULL); | 
|  |  | 
|  | snprintf(prop_name, sizeof(prop_name), "%s.%s.mtu", DHCP_PROP_NAME_PREFIX, | 
|  | p2p_interface); | 
|  | property_get(prop_name, mtu, NULL); | 
|  |  | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | /* | 
|  | * Get any available DHCP results. | 
|  | */ | 
|  | int dhcp_get_results(const char *interface, | 
|  | char *ipaddr, | 
|  | char *gateway, | 
|  | uint32_t *prefixLength, | 
|  | char *dns[], | 
|  | char *server, | 
|  | uint32_t *lease, | 
|  | char *vendorInfo, | 
|  | char *domain, | 
|  | char *mtu) | 
|  | { | 
|  | char result_prop_name[PROPERTY_KEY_MAX]; | 
|  | char prop_value[PROPERTY_VALUE_MAX]; | 
|  |  | 
|  | /* Interface name after converting p2p0-p2p0-X to p2p to reuse system properties */ | 
|  | char p2p_interface[MAX_INTERFACE_LENGTH]; | 
|  | get_p2p_interface_replacement(interface, p2p_interface); | 
|  | snprintf(result_prop_name, sizeof(result_prop_name), "%s.%s.result", | 
|  | DHCP_PROP_NAME_PREFIX, | 
|  | p2p_interface); | 
|  |  | 
|  | memset(prop_value, '\0', PROPERTY_VALUE_MAX); | 
|  | if (!property_get(result_prop_name, prop_value, NULL)) { | 
|  | snprintf(errmsg, sizeof(errmsg), "%s", "DHCP result property was not set"); | 
|  | return -1; | 
|  | } | 
|  | if (strcmp(prop_value, "ok") == 0) { | 
|  | if (fill_ip_info(interface, ipaddr, gateway, prefixLength, dns, | 
|  | server, lease, vendorInfo, domain, mtu) == -1) { | 
|  | return -1; | 
|  | } | 
|  | return 0; | 
|  | } else { | 
|  | snprintf(errmsg, sizeof(errmsg), "DHCP result was %s", prop_value); | 
|  | return -1; | 
|  | } | 
|  | } | 
|  |  | 
|  | /* | 
|  | * Start the dhcp client daemon, and wait for it to finish | 
|  | * configuring the interface. | 
|  | * | 
|  | * The device init.rc file needs a corresponding entry for this work. | 
|  | * | 
|  | * Example: | 
|  | * service dhcpcd_<interface> /system/bin/dhcpcd -ABKL -f dhcpcd.conf | 
|  | */ | 
|  | int dhcp_start(const char *interface) | 
|  | { | 
|  | char result_prop_name[PROPERTY_KEY_MAX]; | 
|  | char daemon_prop_name[PROPERTY_KEY_MAX]; | 
|  | char prop_value[PROPERTY_VALUE_MAX] = {'\0'}; | 
|  | char daemon_cmd[PROPERTY_VALUE_MAX * 2 + sizeof(DHCP_CONFIG_PATH)]; | 
|  | const char *ctrl_prop = "ctl.start"; | 
|  | const char *desired_status = "running"; | 
|  | /* Interface name after converting p2p0-p2p0-X to p2p to reuse system properties */ | 
|  | char p2p_interface[MAX_INTERFACE_LENGTH]; | 
|  |  | 
|  | get_p2p_interface_replacement(interface, p2p_interface); | 
|  |  | 
|  | snprintf(result_prop_name, sizeof(result_prop_name), "%s.%s.result", | 
|  | DHCP_PROP_NAME_PREFIX, | 
|  | p2p_interface); | 
|  |  | 
|  | snprintf(daemon_prop_name, sizeof(daemon_prop_name), "%s_%s", | 
|  | DAEMON_PROP_NAME, | 
|  | p2p_interface); | 
|  |  | 
|  | /* Erase any previous setting of the dhcp result property */ | 
|  | property_set(result_prop_name, ""); | 
|  |  | 
|  | /* Start the daemon and wait until it's ready */ | 
|  | if (property_get(HOSTNAME_PROP_NAME, prop_value, NULL) && (prop_value[0] != '\0')) | 
|  | snprintf(daemon_cmd, sizeof(daemon_cmd), "%s_%s:-f %s -h %s %s", DAEMON_NAME, | 
|  | p2p_interface, DHCP_CONFIG_PATH, prop_value, interface); | 
|  | else | 
|  | snprintf(daemon_cmd, sizeof(daemon_cmd), "%s_%s:-f %s %s", DAEMON_NAME, | 
|  | p2p_interface, DHCP_CONFIG_PATH, interface); | 
|  | memset(prop_value, '\0', PROPERTY_VALUE_MAX); | 
|  | property_set(ctrl_prop, daemon_cmd); | 
|  | if (wait_for_property(daemon_prop_name, desired_status, 10) < 0) { | 
|  | snprintf(errmsg, sizeof(errmsg), "%s", "Timed out waiting for dhcpcd to start"); | 
|  | return -1; | 
|  | } | 
|  |  | 
|  | /* Wait for the daemon to return a result */ | 
|  | if (wait_for_property(result_prop_name, NULL, 30) < 0) { | 
|  | snprintf(errmsg, sizeof(errmsg), "%s", "Timed out waiting for DHCP to finish"); | 
|  | return -1; | 
|  | } | 
|  |  | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | /** | 
|  | * Stop the DHCP client daemon. | 
|  | */ | 
|  | int dhcp_stop(const char *interface) | 
|  | { | 
|  | char result_prop_name[PROPERTY_KEY_MAX]; | 
|  | char daemon_prop_name[PROPERTY_KEY_MAX]; | 
|  | char daemon_cmd[PROPERTY_VALUE_MAX * 2]; | 
|  | const char *ctrl_prop = "ctl.stop"; | 
|  | const char *desired_status = "stopped"; | 
|  |  | 
|  | char p2p_interface[MAX_INTERFACE_LENGTH]; | 
|  |  | 
|  | get_p2p_interface_replacement(interface, p2p_interface); | 
|  |  | 
|  | snprintf(result_prop_name, sizeof(result_prop_name), "%s.%s.result", | 
|  | DHCP_PROP_NAME_PREFIX, | 
|  | p2p_interface); | 
|  |  | 
|  | snprintf(daemon_prop_name, sizeof(daemon_prop_name), "%s_%s", | 
|  | DAEMON_PROP_NAME, | 
|  | p2p_interface); | 
|  |  | 
|  | snprintf(daemon_cmd, sizeof(daemon_cmd), "%s_%s", DAEMON_NAME, p2p_interface); | 
|  |  | 
|  | /* Stop the daemon and wait until it's reported to be stopped */ | 
|  | property_set(ctrl_prop, daemon_cmd); | 
|  | if (wait_for_property(daemon_prop_name, desired_status, 5) < 0) { | 
|  | return -1; | 
|  | } | 
|  | property_set(result_prop_name, "failed"); | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | /** | 
|  | * Release the current DHCP client lease. | 
|  | */ | 
|  | int dhcp_release_lease(const char *interface) | 
|  | { | 
|  | char daemon_prop_name[PROPERTY_KEY_MAX]; | 
|  | char daemon_cmd[PROPERTY_VALUE_MAX * 2]; | 
|  | const char *ctrl_prop = "ctl.stop"; | 
|  | const char *desired_status = "stopped"; | 
|  |  | 
|  | char p2p_interface[MAX_INTERFACE_LENGTH]; | 
|  |  | 
|  | get_p2p_interface_replacement(interface, p2p_interface); | 
|  |  | 
|  | snprintf(daemon_prop_name, sizeof(daemon_prop_name), "%s_%s", | 
|  | DAEMON_PROP_NAME, | 
|  | p2p_interface); | 
|  |  | 
|  | snprintf(daemon_cmd, sizeof(daemon_cmd), "%s_%s", DAEMON_NAME, p2p_interface); | 
|  |  | 
|  | /* Stop the daemon and wait until it's reported to be stopped */ | 
|  | property_set(ctrl_prop, daemon_cmd); | 
|  | if (wait_for_property(daemon_prop_name, desired_status, 5) < 0) { | 
|  | return -1; | 
|  | } | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | char *dhcp_get_errmsg() { | 
|  | return errmsg; | 
|  | } | 
|  |  | 
|  | /** | 
|  | * The device init.rc file needs a corresponding entry. | 
|  | * | 
|  | * Example: | 
|  | * service iprenew_<interface> /system/bin/dhcpcd -n | 
|  | * | 
|  | */ | 
|  | int dhcp_start_renew(const char *interface) | 
|  | { | 
|  | char result_prop_name[PROPERTY_KEY_MAX]; | 
|  | char prop_value[PROPERTY_VALUE_MAX] = {'\0'}; | 
|  | char daemon_cmd[PROPERTY_VALUE_MAX * 2]; | 
|  | const char *ctrl_prop = "ctl.start"; | 
|  |  | 
|  | char p2p_interface[MAX_INTERFACE_LENGTH]; | 
|  |  | 
|  | get_p2p_interface_replacement(interface, p2p_interface); | 
|  |  | 
|  | snprintf(result_prop_name, sizeof(result_prop_name), "%s.%s.result", | 
|  | DHCP_PROP_NAME_PREFIX, | 
|  | p2p_interface); | 
|  |  | 
|  | /* Erase any previous setting of the dhcp result property */ | 
|  | property_set(result_prop_name, ""); | 
|  |  | 
|  | /* Start the renew daemon and wait until it's ready */ | 
|  | snprintf(daemon_cmd, sizeof(daemon_cmd), "%s_%s:%s", DAEMON_NAME_RENEW, | 
|  | p2p_interface, interface); | 
|  | memset(prop_value, '\0', PROPERTY_VALUE_MAX); | 
|  | property_set(ctrl_prop, daemon_cmd); | 
|  |  | 
|  | /* Wait for the daemon to return a result */ | 
|  | if (wait_for_property(result_prop_name, NULL, 30) < 0) { | 
|  | snprintf(errmsg, sizeof(errmsg), "%s", "Timed out waiting for DHCP Renew to finish"); | 
|  | return -1; | 
|  | } | 
|  |  | 
|  | return 0; | 
|  | } |