GH-50302: [GLib][FlightRPC] Add a missing options reference for gaflight_server_listen()

`gaflight_server_listen()` may use options' auth handler later. So we
should refer the given options while the server is alive.

Author: kou

c_glib/arrow-flight-glib/server.cpp

@@ -1166,6 +1166,7 @@ G_BEGIN_DECLS
 struct GAFlightServerPrivate
 {
   gaflight::Server server;
+  GAFlightServerOptions *options;
 };
 
 G_END_DECLS
@@ -1196,6 +1197,19 @@ gaflight_server_servable_get_raw(GAFlightServable *servable)
 }
 G_BEGIN_DECLS
 
+static void
+gaflight_server_dispose(GObject *object)
+{
+  auto priv = GAFLIGHT_SERVER_GET_PRIVATE(object);
+
+  if (priv->options) {
+    g_object_unref(priv->options);
+    priv->options = nullptr;
+  }
+
+  G_OBJECT_CLASS(gaflight_server_parent_class)->dispose(object);
+}
+
 static void
 gaflight_server_finalize(GObject *object)
 {
@@ -1216,6 +1230,7 @@ static void
 gaflight_server_class_init(GAFlightServerClass *klass)
 {
   auto gobject_class = G_OBJECT_CLASS(klass);
+  gobject_class->dispose = gaflight_server_dispose;
   gobject_class->finalize = gaflight_server_finalize;
 }
 
@@ -1236,6 +1251,14 @@ gaflight_server_listen(GAFlightServer *server,
 {
   auto flight_server = gaflight_servable_get_raw(GAFLIGHT_SERVABLE(server));
   const auto flight_options = gaflight_server_options_get_raw(options);
+  auto priv = GAFLIGHT_SERVER_GET_PRIVATE(server);
+  if (priv->options != options) {
+    g_object_ref(priv->options);
+    if (priv->options) {
+      g_object_unref(priv->options);
+    }
+    priv->options = options;
+  }
   return garrow::check(error,
                        flight_server->Init(*flight_options),
                        "[flight-server][listen]");

ci/scripts/c_glib_test.sh

@@ -36,7 +36,7 @@ fi
 
 pushd "${source_dir}"
 
-ruby test/run-test.rb
+ruby test/run-test.rb -vv
 
 if [[ "$(uname -s)" == "Linux" ]]; then
   # TODO(kszucs): on osx it fails to load 'lgi.corelgilua51' despite that lgi