1 files changed, 93 insertions, 0 deletions
diff --git a/src/mm-port-probe-at.c b/src/mm-port-probe-at.c
new file mode 100644
index 00000000..ba9e30cc
--- /dev/null
+++ b/src/mm-port-probe-at.c
@@ -0,0 +1,93 @@
+/* -*- Mode: C; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
+/*
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details:
+ *
+ * Copyright (C) 2008 - 2009 Novell, Inc.
+ * Copyright (C) 2009 - 2011 Red Hat, Inc.
+ * Copyright (C) 2011 - 2012 Aleksander Morgado <aleksander@gnu.org>
+ * Copyright (C) 2012 Google, Inc.
+ */
+
+#define _GNU_SOURCE  /* for strcasestr */
+#include <string.h>
+
+#include <glib.h>
+
+#include <ModemManager.h>
+#include <mm-errors-types.h>
+
+#include "mm-log.h"
+#include "mm-port-probe.h"
+#include "mm-port-probe-at.h"
+#include "mm-serial-parsers.h"
+
+/* ---- AT probing ---- */
+
+gboolean
+mm_port_probe_response_processor_is_at (const gchar *command,
+                                        const gchar *response,
+                                        gboolean last_command,
+                                        const GError *error,
+                                        GVariant **result,
+                                        GError **result_error)
+{
+    if (error) {
+        mm_dbg ("Parsing AT got: '%s'", error->message);
+
+        /* Timeout errors are the only ones not fatal;
+         * they will just go on to the next command. */
+        if (g_error_matches (error,
+                             MM_SERIAL_ERROR,
+                             MM_SERIAL_ERROR_RESPONSE_TIMEOUT)) {
+            return FALSE;
+        }
+
+        /* If error is NOT known by the parser, request to abort */
+        if (!mm_serial_parser_v1_is_known_error (error)) {
+            *result_error = g_error_copy (error);
+            g_prefix_error (result_error,
+                            "Fatal error parsing AT reply. ");
+            return FALSE;
+        }
+
+        /* If the modem returned a recognizable error,
+         * it can do AT commands */
+        *result = g_variant_new_boolean (TRUE);
+        return TRUE;
+    }
+
+    /* No error reported, valid AT port! */
+    *result = g_variant_new_boolean (TRUE);
+    return TRUE;
+}
+
+/* ---- String probing ---- */
+
+gboolean
+mm_port_probe_response_processor_string (const gchar *command,
+                                         const gchar *response,
+                                         gboolean last_command,
+                                         const GError *error,
+                                         GVariant **result,
+                                         GError **result_error)
+{
+    gchar *str;
+
+    if (error)
+        /* Try with the next command, if any */
+        return FALSE;
+
+    str = g_strstrip (g_strdelimit (g_strdup (response), "\r\n", ' '));
+    *result = g_variant_new_string (str);
+    g_free (str);
+
+    return TRUE;
+}