xref: /llvm-project/lldb/tools/lldb-server/lldb-gdbserver.cpp (revision dd647e3e608ed0b2bac7c588d5859b80ef4a5976)
1 //===-- lldb-gdbserver.cpp --------------------------------------*- C++ -*-===//
2 //
3 // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4 // See https://llvm.org/LICENSE.txt for license information.
5 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6 //
7 //===----------------------------------------------------------------------===//
8 
9 #include <cerrno>
10 #include <cstdint>
11 #include <cstdio>
12 #include <cstdlib>
13 #include <cstring>
14 
15 #ifndef _WIN32
16 #include <csignal>
17 #include <unistd.h>
18 #endif
19 
20 #include "LLDBServerUtilities.h"
21 #include "Plugins/Process/gdb-remote/GDBRemoteCommunicationServerLLGS.h"
22 #include "Plugins/Process/gdb-remote/ProcessGDBRemoteLog.h"
23 #include "lldb/Host/Config.h"
24 #include "lldb/Host/ConnectionFileDescriptor.h"
25 #include "lldb/Host/FileSystem.h"
26 #include "lldb/Host/Pipe.h"
27 #include "lldb/Host/common/NativeProcessProtocol.h"
28 #include "lldb/Host/common/TCPSocket.h"
29 #include "lldb/Target/Process.h"
30 #include "lldb/Utility/LLDBLog.h"
31 #include "lldb/Utility/Status.h"
32 #include "llvm/ADT/StringRef.h"
33 #include "llvm/Option/ArgList.h"
34 #include "llvm/Option/OptTable.h"
35 #include "llvm/Option/Option.h"
36 #include "llvm/Support/Errno.h"
37 #include "llvm/Support/Error.h"
38 #include "llvm/Support/WithColor.h"
39 
40 #if defined(__linux__)
41 #include "Plugins/Process/Linux/NativeProcessLinux.h"
42 #elif defined(__FreeBSD__)
43 #include "Plugins/Process/FreeBSD/NativeProcessFreeBSD.h"
44 #elif defined(__NetBSD__)
45 #include "Plugins/Process/NetBSD/NativeProcessNetBSD.h"
46 #elif defined(_WIN32)
47 #include "Plugins/Process/Windows/Common/NativeProcessWindows.h"
48 #endif
49 
50 #ifndef LLGS_PROGRAM_NAME
51 #define LLGS_PROGRAM_NAME "lldb-server"
52 #endif
53 
54 #ifndef LLGS_VERSION_STR
55 #define LLGS_VERSION_STR "local_build"
56 #endif
57 
58 using namespace llvm;
59 using namespace lldb;
60 using namespace lldb_private;
61 using namespace lldb_private::lldb_server;
62 using namespace lldb_private::process_gdb_remote;
63 
64 namespace {
65 #if defined(__linux__)
66 typedef process_linux::NativeProcessLinux::Manager NativeProcessManager;
67 #elif defined(__FreeBSD__)
68 typedef process_freebsd::NativeProcessFreeBSD::Manager NativeProcessManager;
69 #elif defined(__NetBSD__)
70 typedef process_netbsd::NativeProcessNetBSD::Manager NativeProcessManager;
71 #elif defined(_WIN32)
72 typedef NativeProcessWindows::Manager NativeProcessManager;
73 #else
74 // Dummy implementation to make sure the code compiles
75 class NativeProcessManager : public NativeProcessProtocol::Manager {
76 public:
77   NativeProcessManager(MainLoop &mainloop)
78       : NativeProcessProtocol::Manager(mainloop) {}
79 
80   llvm::Expected<std::unique_ptr<NativeProcessProtocol>>
81   Launch(ProcessLaunchInfo &launch_info,
82          NativeProcessProtocol::NativeDelegate &native_delegate) override {
83     llvm_unreachable("Not implemented");
84   }
85   llvm::Expected<std::unique_ptr<NativeProcessProtocol>>
86   Attach(lldb::pid_t pid,
87          NativeProcessProtocol::NativeDelegate &native_delegate) override {
88     llvm_unreachable("Not implemented");
89   }
90 };
91 #endif
92 }
93 
94 #ifndef _WIN32
95 // Watch for signals
96 static int g_sighup_received_count = 0;
97 
98 static void sighup_handler(MainLoopBase &mainloop) {
99   ++g_sighup_received_count;
100 
101   Log *log = GetLog(LLDBLog::Process);
102   LLDB_LOGF(log, "lldb-server:%s swallowing SIGHUP (receive count=%d)",
103             __FUNCTION__, g_sighup_received_count);
104 
105   if (g_sighup_received_count >= 2)
106     mainloop.RequestTermination();
107 }
108 #endif // #ifndef _WIN32
109 
110 void handle_attach_to_pid(GDBRemoteCommunicationServerLLGS &gdb_server,
111                           lldb::pid_t pid) {
112   Status error = gdb_server.AttachToProcess(pid);
113   if (error.Fail()) {
114     fprintf(stderr, "error: failed to attach to pid %" PRIu64 ": %s\n", pid,
115             error.AsCString());
116     exit(1);
117   }
118 }
119 
120 void handle_attach_to_process_name(GDBRemoteCommunicationServerLLGS &gdb_server,
121                                    const std::string &process_name) {
122   // FIXME implement.
123 }
124 
125 void handle_attach(GDBRemoteCommunicationServerLLGS &gdb_server,
126                    const std::string &attach_target) {
127   assert(!attach_target.empty() && "attach_target cannot be empty");
128 
129   // First check if the attach_target is convertible to a long. If so, we'll use
130   // it as a pid.
131   char *end_p = nullptr;
132   const long int pid = strtol(attach_target.c_str(), &end_p, 10);
133 
134   // We'll call it a match if the entire argument is consumed.
135   if (end_p &&
136       static_cast<size_t>(end_p - attach_target.c_str()) ==
137           attach_target.size())
138     handle_attach_to_pid(gdb_server, static_cast<lldb::pid_t>(pid));
139   else
140     handle_attach_to_process_name(gdb_server, attach_target);
141 }
142 
143 void handle_launch(GDBRemoteCommunicationServerLLGS &gdb_server,
144                    llvm::ArrayRef<llvm::StringRef> Arguments) {
145   ProcessLaunchInfo info;
146   info.GetFlags().Set(eLaunchFlagStopAtEntry | eLaunchFlagDebug |
147                       eLaunchFlagDisableASLR);
148   info.SetArguments(Args(Arguments), true);
149 
150   llvm::SmallString<64> cwd;
151   if (std::error_code ec = llvm::sys::fs::current_path(cwd)) {
152     llvm::errs() << "Error getting current directory: " << ec.message() << "\n";
153     exit(1);
154   }
155   FileSpec cwd_spec(cwd);
156   FileSystem::Instance().Resolve(cwd_spec);
157   info.SetWorkingDirectory(cwd_spec);
158   info.GetEnvironment() = Host::GetEnvironment();
159 
160   gdb_server.SetLaunchInfo(info);
161 
162   Status error = gdb_server.LaunchProcess();
163   if (error.Fail()) {
164     llvm::errs() << llvm::formatv("error: failed to launch '{0}': {1}\n",
165                                   Arguments[0], error);
166     exit(1);
167   }
168 }
169 
170 Status writeSocketIdToPipe(Pipe &port_pipe, llvm::StringRef socket_id) {
171   size_t bytes_written = 0;
172   // Write the port number as a C string with the NULL terminator.
173   return port_pipe.Write(socket_id.data(), socket_id.size() + 1, bytes_written);
174 }
175 
176 Status writeSocketIdToPipe(const char *const named_pipe_path,
177                            llvm::StringRef socket_id) {
178   Pipe port_name_pipe;
179   // Wait for 10 seconds for pipe to be opened.
180   auto error = port_name_pipe.OpenAsWriterWithTimeout(named_pipe_path, false,
181                                                       std::chrono::seconds{10});
182   if (error.Fail())
183     return error;
184   return writeSocketIdToPipe(port_name_pipe, socket_id);
185 }
186 
187 Status writeSocketIdToPipe(lldb::pipe_t unnamed_pipe,
188                            llvm::StringRef socket_id) {
189   Pipe port_pipe{LLDB_INVALID_PIPE, unnamed_pipe};
190   return writeSocketIdToPipe(port_pipe, socket_id);
191 }
192 
193 void ConnectToRemote(MainLoop &mainloop,
194                      GDBRemoteCommunicationServerLLGS &gdb_server,
195                      bool reverse_connect, llvm::StringRef host_and_port,
196                      const char *const progname, const char *const subcommand,
197                      const char *const named_pipe_path, pipe_t unnamed_pipe,
198                      shared_fd_t connection_fd) {
199   Status error;
200 
201   std::unique_ptr<Connection> connection_up;
202   std::string url;
203 
204   if (connection_fd != SharedSocket::kInvalidFD) {
205 #ifdef _WIN32
206     NativeSocket sockfd;
207     error = SharedSocket::GetNativeSocket(connection_fd, sockfd);
208     if (error.Fail()) {
209       llvm::errs() << llvm::formatv("error: GetNativeSocket failed: {0}\n",
210                                     error.AsCString());
211       exit(-1);
212     }
213     connection_up = std::unique_ptr<Connection>(new ConnectionFileDescriptor(
214         new TCPSocket(sockfd, /*should_close=*/true)));
215 #else
216     url = llvm::formatv("fd://{0}", connection_fd).str();
217 
218     // Create the connection.
219     ::fcntl(connection_fd, F_SETFD, FD_CLOEXEC);
220 #endif
221   } else if (!host_and_port.empty()) {
222     llvm::Expected<std::string> url_exp =
223         LLGSArgToURL(host_and_port, reverse_connect);
224     if (!url_exp) {
225       llvm::errs() << llvm::formatv("error: invalid host:port or URL '{0}': "
226                                     "{1}\n",
227                                     host_and_port,
228                                     llvm::toString(url_exp.takeError()));
229       exit(-1);
230     }
231 
232     url = std::move(url_exp.get());
233   }
234 
235   if (!url.empty()) {
236     // Create the connection or server.
237     std::unique_ptr<ConnectionFileDescriptor> conn_fd_up{
238         new ConnectionFileDescriptor};
239     auto connection_result = conn_fd_up->Connect(
240         url,
241         [named_pipe_path, unnamed_pipe](llvm::StringRef socket_id) {
242           // If we have a named pipe to write the socket id back to, do that
243           // now.
244           if (named_pipe_path && named_pipe_path[0]) {
245             Status error = writeSocketIdToPipe(named_pipe_path, socket_id);
246             if (error.Fail())
247               llvm::errs() << llvm::formatv(
248                   "failed to write to the named pipe '{0}': {1}\n",
249                   named_pipe_path, error.AsCString());
250           }
251           // If we have an unnamed pipe to write the socket id back to, do
252           // that now.
253           else if (unnamed_pipe != LLDB_INVALID_PIPE) {
254             Status error = writeSocketIdToPipe(unnamed_pipe, socket_id);
255             if (error.Fail())
256               llvm::errs() << llvm::formatv(
257                   "failed to write to the unnamed pipe: {0}\n", error);
258           }
259         },
260         &error);
261 
262     if (error.Fail()) {
263       llvm::errs() << llvm::formatv(
264           "error: failed to connect to client at '{0}': {1}\n", url, error);
265       exit(-1);
266     }
267     if (connection_result != eConnectionStatusSuccess) {
268       llvm::errs() << llvm::formatv(
269           "error: failed to connect to client at '{0}' "
270           "(connection status: {1})\n",
271           url, static_cast<int>(connection_result));
272       exit(-1);
273     }
274     connection_up = std::move(conn_fd_up);
275   }
276   error = gdb_server.InitializeConnection(std::move(connection_up));
277   if (error.Fail()) {
278     llvm::errs() << llvm::formatv("failed to initialize connection\n", error);
279     exit(-1);
280   }
281   llvm::outs() << "Connection established.\n";
282 }
283 
284 namespace {
285 using namespace llvm::opt;
286 
287 enum ID {
288   OPT_INVALID = 0, // This is not an option ID.
289 #define OPTION(...) LLVM_MAKE_OPT_ID(__VA_ARGS__),
290 #include "LLGSOptions.inc"
291 #undef OPTION
292 };
293 
294 #define OPTTABLE_STR_TABLE_CODE
295 #include "LLGSOptions.inc"
296 #undef OPTTABLE_STR_TABLE_CODE
297 
298 #define OPTTABLE_PREFIXES_TABLE_CODE
299 #include "LLGSOptions.inc"
300 #undef OPTTABLE_PREFIXES_TABLE_CODE
301 
302 static constexpr opt::OptTable::Info InfoTable[] = {
303 #define OPTION(...) LLVM_CONSTRUCT_OPT_INFO(__VA_ARGS__),
304 #include "LLGSOptions.inc"
305 #undef OPTION
306 };
307 
308 class LLGSOptTable : public opt::GenericOptTable {
309 public:
310   LLGSOptTable()
311       : opt::GenericOptTable(OptionStrTable, OptionPrefixesTable, InfoTable) {}
312 
313   void PrintHelp(llvm::StringRef Name) {
314     std::string Usage =
315         (Name + " [options] [[host]:port] [[--] program args...]").str();
316     OptTable::printHelp(llvm::outs(), Usage.c_str(), "lldb-server");
317     llvm::outs() << R"(
318 DESCRIPTION
319   lldb-server connects to the LLDB client, which drives the debugging session.
320   If no connection options are given, the [host]:port argument must be present
321   and will denote the address that lldb-server will listen on. [host] defaults
322   to "localhost" if empty. Port can be zero, in which case the port number will
323   be chosen dynamically and written to destinations given by --named-pipe and
324   --pipe arguments.
325 
326   If no target is selected at startup, lldb-server can be directed by the LLDB
327   client to launch or attach to a process.
328 
329 )";
330   }
331 };
332 } // namespace
333 
334 int main_gdbserver(int argc, char *argv[]) {
335   Status error;
336   MainLoop mainloop;
337 #ifndef _WIN32
338   // Setup signal handlers first thing.
339   signal(SIGPIPE, SIG_IGN);
340   MainLoop::SignalHandleUP sighup_handle =
341       mainloop.RegisterSignal(SIGHUP, sighup_handler, error);
342 #endif
343 
344   const char *progname = argv[0];
345   const char *subcommand = argv[1];
346   std::string attach_target;
347   std::string named_pipe_path;
348   std::string log_file;
349   StringRef
350       log_channels; // e.g. "lldb process threads:gdb-remote default:linux all"
351   lldb::pipe_t unnamed_pipe = LLDB_INVALID_PIPE;
352   bool reverse_connect = false;
353   shared_fd_t connection_fd = SharedSocket::kInvalidFD;
354 
355   // ProcessLaunchInfo launch_info;
356   ProcessAttachInfo attach_info;
357 
358   LLGSOptTable Opts;
359   llvm::BumpPtrAllocator Alloc;
360   llvm::StringSaver Saver(Alloc);
361   bool HasError = false;
362   opt::InputArgList Args = Opts.parseArgs(argc - 1, argv + 1, OPT_UNKNOWN,
363                                           Saver, [&](llvm::StringRef Msg) {
364                                             WithColor::error() << Msg << "\n";
365                                             HasError = true;
366                                           });
367   std::string Name =
368       (llvm::sys::path::filename(argv[0]) + " g[dbserver]").str();
369   std::string HelpText =
370       "Use '" + Name + " --help' for a complete list of options.\n";
371   if (HasError) {
372     llvm::errs() << HelpText;
373     return 1;
374   }
375 
376   if (Args.hasArg(OPT_help)) {
377     Opts.PrintHelp(Name);
378     return 0;
379   }
380 
381 #ifndef _WIN32
382   if (Args.hasArg(OPT_setsid)) {
383     // Put llgs into a new session. Terminals group processes
384     // into sessions and when a special terminal key sequences
385     // (like control+c) are typed they can cause signals to go out to
386     // all processes in a session. Using this --setsid (-S) option
387     // will cause debugserver to run in its own sessions and be free
388     // from such issues.
389     //
390     // This is useful when llgs is spawned from a command
391     // line application that uses llgs to do the debugging,
392     // yet that application doesn't want llgs receiving the
393     // signals sent to the session (i.e. dying when anyone hits ^C).
394     {
395       const ::pid_t new_sid = setsid();
396       if (new_sid == -1) {
397         WithColor::warning()
398             << llvm::formatv("failed to set new session id for {0} ({1})\n",
399                              LLGS_PROGRAM_NAME, llvm::sys::StrError());
400       }
401     }
402   }
403 #endif
404 
405   log_file = Args.getLastArgValue(OPT_log_file).str();
406   log_channels = Args.getLastArgValue(OPT_log_channels);
407   named_pipe_path = Args.getLastArgValue(OPT_named_pipe).str();
408   reverse_connect = Args.hasArg(OPT_reverse_connect);
409   attach_target = Args.getLastArgValue(OPT_attach).str();
410   if (Args.hasArg(OPT_pipe)) {
411     uint64_t Arg;
412     if (!llvm::to_integer(Args.getLastArgValue(OPT_pipe), Arg)) {
413       WithColor::error() << "invalid '--pipe' argument\n" << HelpText;
414       return 1;
415     }
416     unnamed_pipe = (pipe_t)Arg;
417   }
418   if (Args.hasArg(OPT_fd)) {
419     int64_t fd;
420     if (!llvm::to_integer(Args.getLastArgValue(OPT_fd), fd)) {
421       WithColor::error() << "invalid '--fd' argument\n" << HelpText;
422       return 1;
423     }
424     connection_fd = (shared_fd_t)fd;
425   }
426 
427   if (!LLDBServerUtilities::SetupLogging(
428           log_file, log_channels,
429           LLDB_LOG_OPTION_PREPEND_TIMESTAMP |
430               LLDB_LOG_OPTION_PREPEND_FILE_FUNCTION))
431     return -1;
432 
433   std::vector<llvm::StringRef> Inputs;
434   for (opt::Arg *Arg : Args.filtered(OPT_INPUT))
435     Inputs.push_back(Arg->getValue());
436   if (opt::Arg *Arg = Args.getLastArg(OPT_REM)) {
437     for (const char *Val : Arg->getValues())
438       Inputs.push_back(Val);
439   }
440   if (Inputs.empty() && connection_fd == SharedSocket::kInvalidFD) {
441     WithColor::error() << "no connection arguments\n" << HelpText;
442     return 1;
443   }
444 
445   NativeProcessManager manager(mainloop);
446   GDBRemoteCommunicationServerLLGS gdb_server(mainloop, manager);
447 
448   llvm::StringRef host_and_port;
449   if (!Inputs.empty() && connection_fd == SharedSocket::kInvalidFD) {
450     host_and_port = Inputs.front();
451     Inputs.erase(Inputs.begin());
452   }
453 
454   // Any arguments left over are for the program that we need to launch. If
455   // there
456   // are no arguments, then the GDB server will start up and wait for an 'A'
457   // packet
458   // to launch a program, or a vAttach packet to attach to an existing process,
459   // unless
460   // explicitly asked to attach with the --attach={pid|program_name} form.
461   if (!attach_target.empty())
462     handle_attach(gdb_server, attach_target);
463   else if (!Inputs.empty())
464     handle_launch(gdb_server, Inputs);
465 
466   // Print version info.
467   printf("%s-%s\n", LLGS_PROGRAM_NAME, LLGS_VERSION_STR);
468 
469   ConnectToRemote(mainloop, gdb_server, reverse_connect, host_and_port,
470                   progname, subcommand, named_pipe_path.c_str(),
471                   unnamed_pipe, connection_fd);
472 
473   if (!gdb_server.IsConnected()) {
474     fprintf(stderr, "no connection information provided, unable to run\n");
475     return 1;
476   }
477 
478   Status ret = mainloop.Run();
479   if (ret.Fail()) {
480     fprintf(stderr, "lldb-server terminating due to error: %s\n",
481             ret.AsCString());
482     return 1;
483   }
484   fprintf(stderr, "lldb-server exiting...\n");
485 
486   return 0;
487 }
488