esphome/esphome/components/modem/modem_component.cpp

#ifdef USE_ESP_IDF
#include "modem_component.h"
#include "helpers.h"

#include "esphome/core/log.h"
#include "esphome/core/application.h"
#include "esphome/core/defines.h"
#include "esphome/components/network/util.h"
#include "esphome/components/watchdog/watchdog.h"

#include <esp_netif.h>
#include <esp_netif_ppp.h>
#include <esp_event.h>
#include <driver/gpio.h>
#include <lwip/dns.h>

#include <cxx_include/esp_modem_dte.hpp>
#include <esp_modem_config.h>
#include <cxx_include/esp_modem_api.hpp>

#include <cstring>
#include <iostream>

#ifndef USE_MODEM_MODEL
#define USE_MODEM_MODEL "GENERIC"
#define USE_MODEM_MODEL_GENERIC
#endif

#define ESPHL_ERROR_CHECK(err, message) \
  if ((err) != ESP_OK) { \
    ESP_LOGE(TAG, message ": (%d) %s", err, esp_err_to_name(err)); \
    this->mark_failed(); \
    return; \
  }

#define ESPMODEM_ERROR_CHECK(err, message) \
  if ((err) != command_result::OK) { \
    ESP_LOGE(TAG, message ": %s", command_result_to_string(err).c_str()); \
  }

namespace esphome {
namespace modem {

using namespace esp_modem;

ModemComponent *global_modem_component = nullptr;  // NOLINT(cppcoreguidelines-avoid-non-const-global-variables)

ModemComponent::ModemComponent() {
  assert(global_modem_component == nullptr);
  global_modem_component = this;
}

void ModemComponent::dump_config() { this->dump_connect_params_(); }

float ModemComponent::get_setup_priority() const { return setup_priority::WIFI + 1; }  // just before WIFI

bool ModemComponent::can_proceed() {
  if (!this->enabled_) {
    return true;
  }
  return this->is_connected();
}

network::IPAddresses ModemComponent::get_ip_addresses() {
  network::IPAddresses addresses;
  esp_netif_ip_info_t ip;
  esp_netif_get_ip_info(this->ppp_netif_, &ip);
  addresses[0] = network::IPAddress(&ip.ip);
  return addresses;
}

std::string ModemComponent::get_use_address() const {
  // not usefull for a modem ?
  if (this->use_address_.empty()) {
    return App.get_name() + ".local";
  }
  return this->use_address_;
}

void ModemComponent::set_use_address(const std::string &use_address) { this->use_address_ = use_address; }

bool ModemComponent::is_connected() { return this->state_ == ModemComponentState::CONNECTED; }

void ModemComponent::setup() {
  ESP_LOGI(TAG, "Setting up Modem...");

  if (this->power_pin_) {
    this->power_pin_->setup();

    if (this->enabled_) {
      this->poweron_();
    }
  }

  if (this->status_pin_) {
    this->status_pin_->setup();
  }

  ESP_LOGCONFIG(TAG, "Config Modem:");
  ESP_LOGCONFIG(TAG, "  Model     : %s", USE_MODEM_MODEL);
  ESP_LOGCONFIG(TAG, "  APN       : %s", this->apn_.c_str());
  ESP_LOGCONFIG(TAG, "  PIN code  : %s", (this->pin_code_.empty()) ? "No" : "Yes (not shown)");
  ESP_LOGCONFIG(TAG, "  Tx Pin    : GPIO%u", this->tx_pin_->get_pin());
  ESP_LOGCONFIG(TAG, "  Rx Pin    : GPIO%u", this->rx_pin_->get_pin());
  ESP_LOGCONFIG(TAG, "  Power pin : %s", (this->power_pin_) ? this->power_pin_->dump_summary().c_str() : "Not defined");
  if (this->status_pin_) {
    std::string current_status = this->get_power_status() ? "ON" : "OFF";
    ESP_LOGCONFIG(TAG, "  Status pin: %s (current state %s)", this->status_pin_->dump_summary().c_str(),
                  current_status.c_str());
  } else {
    ESP_LOGCONFIG(TAG, "  Status pin: Not defined");
  }
  ESP_LOGCONFIG(TAG, "  Enabled   : %s", this->enabled_ ? "Yes" : "No");
  ESP_LOGCONFIG(TAG, "  Use CMUX  : %s", this->cmux_ ? "Yes" : "No");

  ESP_LOGV(TAG, "PPP netif setup");
  esp_err_t err;
  err = esp_netif_init();
  ESPHL_ERROR_CHECK(err, "PPP netif init error");
  err = esp_event_loop_create_default();
  ESPHL_ERROR_CHECK(err, "PPP event loop init error");

  esp_netif_config_t netif_ppp_config = ESP_NETIF_DEFAULT_PPP();

  this->ppp_netif_ = esp_netif_new(&netif_ppp_config);
  assert(this->ppp_netif_);

  if (!this->username_.empty()) {
    ESP_LOGV(TAG, "Set auth: username: %s password: %s", this->username_.c_str(), this->password_.c_str());
    ESPHL_ERROR_CHECK(esp_netif_ppp_set_auth(this->ppp_netif_, NETIF_PPP_AUTHTYPE_PAP, this->username_.c_str(),
                                             this->password_.c_str()),
                      "PPP set auth");
  }

  err = esp_event_handler_instance_register(IP_EVENT, ESP_EVENT_ANY_ID, &ModemComponent::ip_event_handler, nullptr,
                                            nullptr);
  ESPHL_ERROR_CHECK(err, "IP event handler register error");

  // if (!this->power_transition_) {
  //   this->create_dte_dce_();
  // }

  // if (this->enabled_ && !this->get_power_status()) {
  //   ESP_LOGI(TAG, "Powering up modem");
  //
  //  this->poweron_();
  //}
  // App.feed_wdt();

  ESP_LOGV(TAG, "Setup finished");
}

void ModemComponent::create_dte_dce_() {
  // destroy previous dte/dce, and recreate them.
  // destroying them seems to be the only way to have a clear state after hang up, and be able to reconnect.

  this->dte_.reset();
  this->dce.reset();

  esp_modem_dte_config_t dte_config = ESP_MODEM_DTE_DEFAULT_CONFIG();

  dte_config.uart_config.tx_io_num = this->tx_pin_->get_pin();
  dte_config.uart_config.rx_io_num = this->rx_pin_->get_pin();
  dte_config.uart_config.rx_buffer_size = this->uart_rx_buffer_size_;
  dte_config.uart_config.tx_buffer_size = this->uart_tx_buffer_size_;
  dte_config.uart_config.event_queue_size = this->uart_event_queue_size_;
  dte_config.task_stack_size = this->uart_event_task_stack_size_;
  dte_config.task_priority = this->uart_event_task_priority_;
  dte_config.dte_buffer_size = this->uart_rx_buffer_size_ / 2;

  this->dte_ = create_uart_dte(&dte_config);

  if (this->dte_->set_mode(modem_mode::COMMAND_MODE)) {
    ESP_LOGD(TAG, "dte in command mode");
  }

  esp_modem_dce_config_t dce_config = ESP_MODEM_DCE_DEFAULT_CONFIG(this->apn_.c_str());

#if defined(USE_MODEM_MODEL_GENERIC)
  this->dce = create_generic_dce(&dce_config, this->dte_, this->ppp_netif_);
#elif defined(USE_MODEM_MODEL_BG96)
  this->dce = create_BG96_dce(&dce_config, this->dte_, this->ppp_netif_);
#elif defined(USE_MODEM_MODEL_SIM800)
  this->dce = create_SIM800_dce(&dce_config, this->dte_, this->ppp_netif_);
#elif defined(USE_MODEM_MODEL_SIM7000)
  this->dce = create_SIM7000_dce(&dce_config, this->dte_, this->ppp_netif_);
#elif defined(USE_MODEM_MODEL_SIM7600)
  this->dce = create_SIM7600_dce(&dce_config, this->dte_, this->ppp_netif_);
#else
#error Modem model not known
#endif

  // flow control not fully implemented, but kept here for future work
  // if (dte_config.uart_config.flow_control == ESP_MODEM_FLOW_CONTROL_HW) {
  //   if (command_result::OK != this->dce->set_flow_control(2, 2)) {
  //     ESP_LOGE(TAG, "Failed to set the set_flow_control mode");
  //     return;
  //   }
  //   ESP_LOGD(TAG, "set_flow_control OK");
  // }

  if (this->enabled_) {
    if (!this->watchdog_)
      this->watchdog_ = std::make_shared<watchdog::WatchdogManager>(60000);

    // check modem is ready after dte and dce init.
    if (!this->modem_ready()) {
      // Try to exit CMUX_MANUAL_DATA or DATA_MODE, if any
      ESP_LOGD(TAG, "Connecting to the the modem...");

      uint32_t start_ms = millis();
      std::string result;

      auto command_mode_ = [this]() -> bool {
        ESP_LOGVV(TAG, "trying command mode");
        this->dce->set_mode(modem_mode::UNDEF);
        return this->dce->set_mode(modem_mode::COMMAND_MODE) && this->modem_ready();
      };

      auto cmux_command_mode_ = [this]() -> bool {
        ESP_LOGVV(TAG, "trying cmux command mode");
        return this->dce->set_mode(modem_mode::CMUX_MANUAL_MODE) &&
               this->dce->set_mode(modem_mode::CMUX_MANUAL_COMMAND) && this->modem_ready();
      };

      // The cmux state is supposed to be the same before the reboot. But if it has changed (new firwmare), we will try
      // to fallback to inverted cmux state.
      bool status;
      if (this->cmux_) {
        status = cmux_command_mode_() || (command_mode_() && cmux_command_mode_());
      } else {
        status = command_mode_() || (cmux_command_mode_() && command_mode_());
      }

      uint32_t elapsed_ms = millis() - start_ms;

      if (!status) {
        ESP_LOGW(TAG, "modem not responding after %" PRIu32 "ms", elapsed_ms);
        if (this->power_pin_) {
          ESP_LOGD(TAG, "Trying to power cycle the modem");
          this->poweroff_();
        }
      } else {
        ESP_LOGD(TAG, "Connected to the modem in %" PRIu32 "ms", elapsed_ms);
      }
    }

    if (this->modem_ready()) {
      this->send_init_at_();
      if (!this->prepare_sim_()) {
        // fatal error
        this->disable();
      }
    }
  }
  ESP_LOGV(TAG, "DTE and CDE created");
}

bool ModemComponent::prepare_sim_() {
  // it seems that read_pin(pin_ok) unexpectedly fail if no sim card is inserted, whithout updating the 'pin_ok'
  bool pin_ok = false;
  if (this->dce->read_pin(pin_ok) != command_result::OK) {
    this->status_set_error("Unable to read pin status. Missing SIM card?");
    return false;
  }

  if (!pin_ok) {
    if (!this->pin_code_.empty()) {
      ESP_LOGV(TAG, "Set pin code: %s", this->pin_code_.c_str());
      ESPMODEM_ERROR_CHECK(this->dce->set_pin(this->pin_code_), "Set pin code failed");
      delay(this->command_delay_);
    }
  }

  this->dce->read_pin(pin_ok);
  if (pin_ok) {
    if (this->pin_code_.empty()) {
      ESP_LOGD(TAG, "PIN not needed");
    } else {
      ESP_LOGD(TAG, "PIN unlocked");
    }
  } else {
    this->status_set_error("Invalid PIN code.");
  }
  return pin_ok;
}

void ModemComponent::send_init_at_() {
  // send initial AT commands from yaml
  for (const auto &cmd : this->init_at_commands_) {
    std::string result = this->send_at(cmd);
    if (result == "ERROR") {
      ESP_LOGE(TAG, "Error while executing 'init_at' '%s' command", cmd.c_str());
    } else {
      ESP_LOGI(TAG, "'init_at' '%s' result: %s", cmd.c_str(), result.c_str());
    }
    yield();
  }
}

bool ModemComponent::start_connect_() {
  this->connect_begin_ = millis();
  this->status_set_warning("Starting connection");

  // will be set to true on event IP_EVENT_PPP_GOT_IP
  this->got_ipv4_address_ = false;

  // esp_event_post(IP_EVENT, IP_EVENT_PPP_LOST_IP, nullptr, 0, 0);

  this->dump_dce_status_();

  if (this->cmux_) {
    ESP_LOGD(TAG, "Entering CMUX mode");
    this->dce->set_mode(modem_mode::CMUX_MANUAL_MODE);
    if (this->dce->set_mode(modem_mode::CMUX_MANUAL_DATA)) {
      ESP_LOGD(TAG, "Modem has correctly entered multiplexed command/data mode");

    } else {
      ESP_LOGE(TAG, "Unable to enter CMUX mode");
      // if (this->dce->set_mode(modem_mode::CMUX_MANUAL_COMMAND)) {
      //   ESP_LOGD(TAG, "Switched to command mode");
      // }
      this->poweroff_();
      return false;
      // ESPMODEM_ERROR_CHECK(this->dce->hang_up(), "Unable to hang up modem. Trying to continue anyway.");
      // this->status_set_error("Unable to enter CMUX mode");
    }
    assert(this->modem_ready());
  } else {
    ESP_LOGD(TAG, "Entering DATA mode");
    if (this->dce->set_mode(modem_mode::DATA_MODE)) {
      ESP_LOGD(TAG, "Modem has correctly entered data mode");
    } else {
      ESP_LOGE(TAG, "Unable to enter DATA mode");
      this->status_set_error("Unable to enter DATA mode");
      this->poweroff_();
      return false;
    }
    assert(!this->modem_ready());
  }
  return true;
}

void ModemComponent::ip_event_handler(void *arg, esp_event_base_t event_base, int32_t event_id, void *event_data) {
  ip_event_got_ip_t *event;
  const esp_netif_ip_info_t *ip_info;
  switch (event_id) {
    case IP_EVENT_PPP_GOT_IP:
      event = (ip_event_got_ip_t *) event_data;
      ip_info = &event->ip_info;
      ESP_LOGD(TAG, "[IP event] Got IP " IPSTR, IP2STR(&ip_info->ip));
      global_modem_component->got_ipv4_address_ = true;
      global_modem_component->connected_ = true;
      break;
    case IP_EVENT_PPP_LOST_IP:
      ESP_LOGD(TAG, "[IP event] Lost IP");
      global_modem_component->got_ipv4_address_ = false;
      global_modem_component->connected_ = false;
      break;
  }
}

void ModemComponent::loop() {
  static ModemComponentState last_state = this->state_;
  static uint32_t next_loop_millis = millis();
  static bool connecting = false;
  static bool disconnecting = false;
  static uint8_t network_attach_retry = 10;
  static uint8_t ip_lost_retries = 10;

  if (this->power_transition_ || (millis() < next_loop_millis)) {
    // No loop on power transition, or if some commands need some delay
    yield();
    return;
  }

  switch (this->state_) {
    case ModemComponentState::NOT_RESPONDING:
      if (this->start_) {
        if (this->modem_ready()) {
          ESP_LOGI(TAG, "Modem recovered");
          this->status_clear_warning();
          this->state_ = ModemComponentState::DISCONNECTED;
        } else {
          if (!this->get_power_status()) {
            // Modem is OFF. If poweron is needed, disconnect state will handle it.
            this->state_ = ModemComponentState::DISCONNECTED;
          } else if (this->not_responding_cb_) {
            if (!this->not_responding_cb_->is_action_running()) {
              ESP_LOGD(TAG, "Calling 'on_not_responding' callback");
              this->not_responding_cb_->trigger();
            }
          } else {
            ESP_LOGW(TAG, "Modem not responding, and no 'on_not_responding' action defined");
          }
        }
      }
      break;

    // disconnected, want to connect
    case ModemComponentState::DISCONNECTED:
      if (this->enabled_) {
        if (this->start_) {
          if (connecting) {
            if (this->connected_) {
              connecting = false;
              ESP_LOGI(TAG, "Connected via Modem");
              this->state_ = ModemComponentState::CONNECTED;

              this->dump_connect_params_();
              this->status_clear_warning();
              this->watchdog_.reset();
            } else if (millis() - this->connect_begin_ > 15000) {
              ESP_LOGW(TAG, "Connecting via Modem failed! Re-connecting...");
              // TODO: exit data/cmux without error check
              connecting = false;
            } else {
              // Wait for IP from PPP event
              next_loop_millis = millis() + 1000;  // delay for next loop
            }
          } else {
            if (is_network_attached_()) {
              network_attach_retry = 10;
              if (this->start_connect_()) {
                connecting = true;
                next_loop_millis = millis() + 1000;  // delay for next loop
                // this->state_ = ModemComponentState::CONNECTING;
              } else if (!this->modem_ready()) {
                if (this->power_pin_) {
                  this->poweron_();
                } else {
                  this->state_ = ModemComponentState::NOT_RESPONDING;
                }
              }
            } else {
              ESP_LOGD(TAG, "Waiting for the modem to be attached to a network (left retries: %" PRIu8 ")",
                       network_attach_retry);
              network_attach_retry--;
              if (network_attach_retry == 0) {
                ESP_LOGE(TAG, "modem is uanble to attach to a network");
                if (this->power_pin_) {
                  this->poweroff_();
                } else {
                  // fatal error ?
                  this->start_ = false;
                }
              }
              next_loop_millis = millis() + 1000;  // delay to retry
            }
          }
        } else {
          this->start_ = true;
        }
      } else {
        this->state_ = ModemComponentState::DISABLED;
        this->watchdog_.reset();
      }
      break;

      // case ModemComponentState::CONNECTING:
      //   if (!this->start_) {
      //     ESP_LOGI(TAG, "Stopped modem connection");
      //     this->state_ = ModemComponentState::DISCONNECTED;
      //   } else if (this->connected_) {
      //     ESP_LOGI(TAG, "Connected via Modem");
      //     this->state_ = ModemComponentState::CONNECTED// ;

      //     this->dump_connect_params_();
      //     this->status_clear_warning();
      //     this->watchdog_.reset()// ;

      //   } else if (millis() - this->connect_begin_ > 15000) {
      //     ESP_LOGW(TAG, "Connecting via Modem failed! Re-connecting...");
      //     this->state_ = ModemComponentState::DISCONNECTED;
      //   } else {
      //     // ESP_LOGD(TAG, "Connecting...");
      //     App.feed_wdt();
      //     App.get_app_state();
      //     // yield();
      //   }
      //   break;

    case ModemComponentState::CONNECTED:
      if (this->enabled_) {
        if (!this->connected_) {
          this->status_set_warning("Connection via Modem lost!");
          this->state_ = ModemComponentState::DISCONNECTED;
        }
        disconnecting = false;
      } else {
        if (this->connected_) {
          if (!disconnecting) {
            disconnecting = true;
            ip_lost_retries = 10;
            this->watchdog_ = std::make_shared<watchdog::WatchdogManager>(60000);
            ESP_LOGD(TAG, "Disconnecting...");
            this->dump_connect_params_();
            if (this->cmux_) {
              assert(this->dce->set_mode(modem_mode::CMUX_MANUAL_COMMAND));
            } else {
              // assert(this->dce->set_mode(modem_mode::COMMAND_MODE)); // OK on 7600, nok on 7670...
              this->dce->set_mode(modem_mode::COMMAND_MODE);
            }
            delay(200);  // NOLINT
            ESP_LOGD(TAG, "Hanging up connection after %.1fmin", float(this->connect_begin_) / (1000 * 60));
            ESPMODEM_ERROR_CHECK(this->dce->hang_up(),
                                 "Unable to hang up modem. Trying to continue anyway.");  // FIXME: needed ?
            this->dump_connect_params_();
          } else {
            // disconnecting
            // Waiting for IP_EVENT_PPP_LOST_IP.
            // This can take a long time, so we ckeck the IP addr, and trigger the event manualy if it's null.
            esp_netif_ip_info_t ip_info;
            esp_netif_get_ip_info(this->ppp_netif_, &ip_info);
            if (ip_info.ip.addr == 0) {
              // lost IP
              esp_event_post(IP_EVENT, IP_EVENT_PPP_LOST_IP, nullptr, 0, 0);
            }

            ESP_LOGD(TAG, "Waiting for lost IP... (retries %" PRIu8 ")", ip_lost_retries);
            ip_lost_retries--;
            if (ip_lost_retries == 0) {
              // Something goes wrong, we have still an IP
              ESP_LOGE(TAG, "No IP lost event recieved. Sending one manually");
              esp_event_post(IP_EVENT, IP_EVENT_PPP_LOST_IP, nullptr, 0, 0);
            }

            next_loop_millis = millis() + 2000;  // delay for next loop
          }
        } else {  // if (this->connected_)
          // ip lost as expected
          ESP_LOGI(TAG, "PPPoS disconnected");
          this->dump_connect_params_();
          this->state_ = ModemComponentState::DISCONNECTED;
        }
      }
      break;

      // case ModemComponentState::DISCONNECTING:
      //   if (this->start_) {
      //     if (this->connected_) {
      //       // watchdog::WatchdogManager wdt(60000);
      //       ESP_LOGD(TAG, "Going to hang up...");
      //       this->dump_connect_params_();
      //       if (this->cmux_) {
      //         assert(this->dce->set_mode(modem_mode::CMUX_MANUAL_COMMAND));
      //       } else {
      //         // assert(this->dce->set_mode(modem_mode::COMMAND_MODE)); // OK on 7600, nok on 7670...
      //         this->dce->set_mode(modem_mode::COMMAND_MODE);
      //       }
      //       delay(200);  // NOLINT
      //       ESP_LOGD(TAG, "Hanging up connection after %.1fmin", float(this->connect_begin_) / (1000 * 60));
      //       ESPMODEM_ERROR_CHECK(this->dce->hang_up(), "Unable to hang up modem. Trying to continue anyway.");
      //       this->dump_connect_params_();
      //     }
      //     this->start_ = false;
      //   } else if (!this->connected_) {
      //     // ip lost as expected
      //     this->cancel_timeout("wait_lost_ip");
      //     ESP_LOGI(TAG, "Modem disconnected");
      //     this->dump_connect_params_();
      //     this->state_ = ModemComponentState::DISCONNECTED;
      //   } else {
      //     // Waiting for IP_EVENT_PPP_LOST_IP.
      //     // This can take a long time, so we ckeck the IP addr, and trigger the event manualy if it's null.
      //     esp_netif_ip_info_t ip_info;
      //     esp_netif_get_ip_info(this->ppp_netif_, &ip_info);
      //     if (ip_info.ip.addr == 0) {
      //       // lost IP
      //       esp_event_post(IP_EVENT, IP_EVENT_PPP_LOST_IP, nullptr, 0, 0);
      //     }
      //   }
      //
      //   break;

    case ModemComponentState::DISABLED:
      if (this->enabled_) {
        this->state_ = ModemComponentState::DISCONNECTED;
      }  // else if (this->get_power_status()) {  // FIXME long time in loop because of get_power_status
         // this->poweroff_();
      //}
      next_loop_millis = millis() + 2000;  // delay for next loop
      break;
  }

  if (this->state_ != last_state) {
    ESP_LOGV(TAG, "State changed: %s -> %s", state_to_string(last_state).c_str(),
             state_to_string(this->state_).c_str());
    this->on_state_callback_.call(this->state_);

    last_state = this->state_;
  }
}

void ModemComponent::enable() {
  ESP_LOGD(TAG, "Enabling modem");
  if (this->state_ == ModemComponentState::DISABLED) {
    this->state_ = ModemComponentState::DISCONNECTED;
  }
  this->start_ = true;
  this->enabled_ = true;
}

void ModemComponent::disable() {
  ESP_LOGD(TAG, "Disabling modem");
  this->enabled_ = false;
  if (this->state_ != ModemComponentState::CONNECTED) {
    this->state_ = ModemComponentState::DISCONNECTED;
  }
}

bool ModemComponent::get_power_status() {
#ifdef USE_MODEM_STATUS
  // This code is not fully checked. The status pin seems to be flickering on Lilygo T-SIM7600
  return this->status_pin_->digital_read();
#else
  if (!this->cmux_ && this->connected_) {
    // Data mode, connected:  assume power is OK
    return true;
  }
  return this->modem_ready();
#endif
}

void ModemComponent::poweron_() {
#ifdef USE_MODEM_POWER
  if (this->power_pin_) {
    App.feed_wdt();
    ESP_LOGV(TAG, "Powering up modem with power_pin...");
    this->power_transition_ = true;
    this->power_pin_->digital_write(false);
    delay(USE_MODEM_POWER_TON);
    this->power_pin_->digital_write(true);
    // use a timout for long wait delay
    ESP_LOGD(TAG, "Will check that the modem is on in %.1fs...", float(USE_MODEM_POWER_TONUART) / 1000);
    this->set_timeout("wait_poweron", USE_MODEM_POWER_TONUART, [this]() {
      ESP_LOGD(TAG, "DTE/DCE init after poweron");
      this->create_dte_dce_();
      delay(500);  // NOLINT
      App.feed_wdt();
      if (!this->modem_ready()) {
        ESP_LOGE(TAG, "Unable to power on the modem");
      } else {
        ESP_LOGD(TAG, "Modem ready after power ON");
      }
      this->power_transition_ = false;
      yield();
    });
  }
#else
  if (this->modem_ready()) {
    ESP_LOGV(TAG, "Modem is already ON");
  } else {
    ESP_LOGW(TAG, "No 'power_pin' defined: Not able to poweron the modem");
  }
#endif  // USE_MODEM_POWER
}

void ModemComponent::poweroff_() {
#ifdef USE_MODEM_POWER
  if (this->power_pin_) {
    ESP_LOGV(TAG, "Powering off modem with power pin...");
    App.feed_wdt();
    this->power_transition_ = true;
    // watchdog::WatchdogManager wdt(60000);
    // this->power_pin_->digital_write(true);
    delay(10);
    this->power_pin_->digital_write(false);
    delay(USE_MODEM_POWER_TOFF);
    this->power_pin_->digital_write(true);

    ESP_LOGD(TAG, "Will check that the modem is off in %.1fs...", float(USE_MODEM_POWER_TOFFUART) / 1000);
    this->set_timeout("wait_poweroff", USE_MODEM_POWER_TOFFUART, [this]() {
      if (this->modem_ready()) {
        ESP_LOGE(TAG, "Unable to power off the modem");
      } else {
        ESP_LOGD(TAG, "Modem OFF");
      }

      this->power_transition_ = false;
    });
  }
#endif  // USE_MODEM_POWER
}

void ModemComponent::dump_connect_params_() {
  if (!this->connected_) {
    ESP_LOGCONFIG(TAG, "Modem connection: Not connected");
    return;
  }
  esp_netif_ip_info_t ip;
  esp_netif_get_ip_info(this->ppp_netif_, &ip);
  ESP_LOGCONFIG(TAG, "Modem connection:");
  ESP_LOGCONFIG(TAG, "  IP Address  : %s", network::IPAddress(&ip.ip).str().c_str());
  ESP_LOGCONFIG(TAG, "  Hostname    : '%s'", App.get_name().c_str());
  ESP_LOGCONFIG(TAG, "  Subnet      : %s", network::IPAddress(&ip.netmask).str().c_str());
  ESP_LOGCONFIG(TAG, "  Gateway     : %s", network::IPAddress(&ip.gw).str().c_str());

  const ip_addr_t *dns_main_ip = dns_getserver(ESP_NETIF_DNS_MAIN);
  const ip_addr_t *dns_backup_ip = dns_getserver(ESP_NETIF_DNS_BACKUP);
  const ip_addr_t *dns_fallback_ip = dns_getserver(ESP_NETIF_DNS_FALLBACK);

  ESP_LOGCONFIG(TAG, "  DNS main    : %s", network::IPAddress(dns_main_ip).str().c_str());
  ESP_LOGCONFIG(TAG, "  DNS backup  : %s", network::IPAddress(dns_backup_ip).str().c_str());
  ESP_LOGCONFIG(TAG, "  DNS fallback: %s", network::IPAddress(dns_fallback_ip).str().c_str());
}

bool ModemComponent::is_network_attached_() {
  int network_attachment_state;
  command_result err = this->dce->get_network_attachment_state(network_attachment_state);
  if (err == command_result::OK) {
    return network_attachment_state;
  } else
    return false;
}

void ModemComponent::dump_dce_status_() {
  ESP_LOGCONFIG(TAG, "Modem status:");
  int network_attachment_state;
  std::string result;
  command_result err = this->dce->get_network_attachment_state(network_attachment_state);
  if (err == command_result::OK) {
    result = network_attachment_state ? "Yes" : "No";
  } else {
    result = "command " + command_result_to_string(err);
  }
  ESP_LOGCONFIG(TAG, "  Attached to network: %s", result.c_str());

  this->dce->get_module_name(result);
  if (err != command_result::OK) {
    result = "command " + command_result_to_string(err);
  }
  ESP_LOGCONFIG(TAG, "  Module name        : %s", result.c_str());
}

std::string ModemComponent::send_at(const std::string &cmd) {
  std::string result;
  command_result status;
  ESP_LOGV(TAG, "Sending command: %s", cmd.c_str());
  status = this->dce->at(cmd, result, this->command_delay_);
  ESP_LOGV(TAG, "Result for command %s: %s (status %s)", cmd.c_str(), result.c_str(),
           command_result_to_string(status).c_str());
  if (status != esp_modem::command_result::OK) {
    result = "ERROR";
  }
  return result;
}

bool ModemComponent::get_imei(std::string &result) {
  // wrapper around this->dce->get_imei() that check that the result is valid
  // (so it can be used to check if the modem is responding correctly (a simple 'AT' cmd is sometime not enough))
  command_result status;
  status = this->dce->get_imei(result);
  bool success = true;

  if (status == command_result::OK && result.length() == 15) {
    for (char c : result) {
      if (!isdigit(static_cast<unsigned char>(c))) {
        success = false;
        break;
      }
    }
  } else {
    success = false;
  }

  if (!success) {
    result = "UNAVAILABLE";
  }
  return success;
}

bool ModemComponent::modem_ready() {
  // check if the modem is ready to answer AT commands
  std::string imei;
  return this->get_imei(imei);
}

void ModemComponent::add_on_state_callback(std::function<void(ModemComponentState)> &&callback) {
  this->on_state_callback_.add(std::move(callback));
}

}  // namespace modem
}  // namespace esphome

#endif