VirtualBox

source: vbox/trunk/src/VBox/Additions/common/VBoxService/VBoxServiceControlExec.cpp@ 33696

Last change on this file since 33696 was 33696, checked in by vboxsync, 14 years ago

Guest Control: Updates on guest path/environment resolving, ignore/skip not implemented guests when doing automatic Guest Additions update.
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 61.7 KB
Line 
1/* $Id: VBoxServiceControlExec.cpp 33696 2010-11-02 15:37:54Z vboxsync $ */
2/** @file
3 * VBoxServiceControlExec - Utility functions for process execution.
4 */
5
6/*
7 * Copyright (C) 2010 Oracle Corporation
8 *
9 * This file is part of VirtualBox Open Source Edition (OSE), as
10 * available from http://www.virtualbox.org. This file is free software;
11 * you can redistribute it and/or modify it under the terms of the GNU
12 * General Public License (GPL) as published by the Free Software
13 * Foundation, in version 2 as it comes in the "COPYING" file of the
14 * VirtualBox OSE distribution. VirtualBox OSE is distributed in the
15 * hope that it will be useful, but WITHOUT ANY WARRANTY of any kind.
16 */
17
18
19/*******************************************************************************
20* Header Files *
21*******************************************************************************/
22#include <iprt/assert.h>
23#include <iprt/crc.h>
24#include <iprt/ctype.h>
25#include <iprt/env.h>
26#include <iprt/file.h>
27#include <iprt/getopt.h>
28#include <iprt/handle.h>
29#include <iprt/mem.h>
30#include <iprt/path.h>
31#include <iprt/param.h>
32#include <iprt/pipe.h>
33#include <iprt/poll.h>
34#include <iprt/process.h>
35#include <iprt/string.h>
36#include <iprt/semaphore.h>
37#include <iprt/stream.h>
38#include <iprt/thread.h>
39#include <VBox/version.h>
40#include <VBox/VBoxGuestLib.h>
41#include <VBox/HostServices/GuestControlSvc.h>
42#include "VBoxServiceInternal.h"
43#include "VBoxServiceUtils.h"
44
45using namespace guestControl;
46
47extern RTLISTNODE g_GuestControlExecThreads;
48
49
50/**
51 * Handle an error event on standard input.
52 *
53 * @returns IPRT status code.
54 * @param hPollSet The polling set.
55 * @param fPollEvt The event mask returned by RTPollNoResume.
56 * @param phStdInW The standard input pipe handle.
57 * @param pStdInBuf The standard input buffer.
58 */
59static int VBoxServiceControlExecProcHandleStdInErrorEvent(RTPOLLSET hPollSet, uint32_t fPollEvt, PRTPIPE phStdInW,
60 PVBOXSERVICECTRLEXECPIPEBUF pStdInBuf)
61{
62 int rc = RTCritSectEnter(&pStdInBuf->CritSect);
63 if (RT_SUCCESS(rc))
64 {
65 int rc2 = RTPollSetRemove(hPollSet, VBOXSERVICECTRLPIPEID_STDIN_WRITABLE);
66 AssertRC(rc2);
67
68 rc2 = RTPipeClose(*phStdInW);
69 AssertRC(rc2);
70 *phStdInW = NIL_RTPIPE;
71
72 /* Mark the stdin buffer as dead; we're not using it anymore. */
73 pStdInBuf->fAlive = false;
74
75 rc2 = RTPollSetRemove(hPollSet, VBOXSERVICECTRLPIPEID_STDIN_ERROR);
76 AssertRC(rc2);
77
78 rc2 = RTCritSectLeave(&pStdInBuf->CritSect);
79 if (RT_SUCCESS(rc))
80 rc = rc2;
81 }
82 return rc;
83}
84
85
86/**
87 * Try write some more data to the standard input of the child.
88 *
89 * @returns IPRT status code.
90 * @retval VINF_TRY_AGAIN if there is still data left in the buffer.
91 *
92 * @param pStdInBuf The standard input buffer.
93 * @param hStdInW The standard input pipe.
94 * @param pfClose Pointer to a flag whether the pipe needs to be closed afterwards.
95 */
96static int VBoxServiceControlExecProcWriteStdIn(PVBOXSERVICECTRLEXECPIPEBUF pStdInBuf, RTPIPE hStdInW,
97 size_t *pcbWritten, bool *pfClose)
98{
99 AssertPtrReturn(pcbWritten, VERR_INVALID_PARAMETER);
100 AssertPtrReturn(pfClose, VERR_INVALID_PARAMETER);
101
102 int rc = RTCritSectEnter(&pStdInBuf->CritSect);
103 if (RT_SUCCESS(rc))
104 {
105 size_t cbToWrite = pStdInBuf->cbSize - pStdInBuf->cbOffset;
106 cbToWrite = RT_MIN(cbToWrite, _64K);
107 *pfClose = false;
108 if (cbToWrite && pStdInBuf->fAlive)
109 {
110 rc = RTPipeWrite(hStdInW, &pStdInBuf->pbData[pStdInBuf->cbOffset], cbToWrite, pcbWritten);
111 if (RT_SUCCESS(rc))
112 {
113 pStdInBuf->fNeedNotification = true;
114 if (rc == VINF_TRY_AGAIN)
115 {
116 //if (pStdInBuf->fNeedNotification)
117 }
118 else
119 {
120 pStdInBuf->cbOffset += *pcbWritten;
121 }
122
123 /* Did somebody tell us that we should come to an end,
124 * e.g. no more data coming in? */
125 if (pStdInBuf->fPendingClose)
126 {
127 /* When we wrote out all data in the buffer we
128 * can finally shutdown. */
129 if (pStdInBuf->cbSize == pStdInBuf->cbOffset)
130 {
131 *pfClose = true;
132 }
133 else if (pStdInBuf->fNeedNotification)
134 {
135 /* Still data to push out - so we need another
136 * poll round! Write something into the notification pipe. */
137 size_t cbWrittenIgnore;
138 int rc2 = RTPipeWrite(pStdInBuf->hNotificationPipeW, "i", 1, &cbWrittenIgnore);
139
140 /* Disable notification until it is set again on successful write. */
141 pStdInBuf->fNeedNotification = !RT_SUCCESS(rc2);
142 }
143 }
144 }
145 else
146 {
147 *pcbWritten = 0;
148 pStdInBuf->fAlive = pStdInBuf->fAlive;
149 }
150#ifdef DEBUG
151 VBoxServiceVerbose(1, "ControlExec: Written StdIn: cbOffset=%u, pcbWritten=%u, rc=%Rrc, cbAlloc=%u, cbSize=%u\n",
152 pStdInBuf->cbOffset, *pcbWritten, rc,
153 pStdInBuf->cbAllocated, pStdInBuf->cbSize);
154#endif
155 }
156 else
157 {
158 *pcbWritten = 0;
159 pStdInBuf->fNeedNotification = pStdInBuf->fAlive;
160 //rc = VERR_BAD_PIPE;
161 }
162 int rc2 = RTCritSectLeave(&pStdInBuf->CritSect);
163 if (RT_SUCCESS(rc))
164 rc = rc2;
165 }
166 return rc;
167}
168
169
170/**
171 * Handle an event indicating we can write to the standard input pipe of the
172 * child process.
173 *
174 * @returns IPRT status code.
175 * @param hPollSet The polling set.
176 * @param fPollEvt The event mask returned by RTPollNoResume.
177 * @param phStdInW The standard input pipe.
178 * @param pStdInBuf The standard input buffer.
179 * @param pcbWritten Where to return the number of bytes written.
180 */
181static int VBoxServiceControlExecProcHandleStdInWritableEvent(RTPOLLSET hPollSet, uint32_t fPollEvt, PRTPIPE phStdInW,
182 PVBOXSERVICECTRLEXECPIPEBUF pStdInBuf, size_t *pcbWritten)
183{
184 AssertPtrReturn(pcbWritten, VERR_INVALID_PARAMETER);
185 int rc;
186 if (!(fPollEvt & RTPOLL_EVT_ERROR))
187 {
188 bool fClose;
189 rc = VBoxServiceControlExecProcWriteStdIn(pStdInBuf, *phStdInW, pcbWritten, &fClose);
190 if (rc == VINF_TRY_AGAIN)
191 rc = VINF_SUCCESS;
192 if (RT_FAILURE(rc))
193 {
194 if ( rc == VERR_BAD_PIPE
195 || rc == VERR_BROKEN_PIPE)
196 {
197 rc = RTPollSetRemove(hPollSet, VBOXSERVICECTRLPIPEID_STDIN_WRITABLE);
198 AssertRC(rc);
199 }
200 else
201 {
202 /** @todo Do we need to do something about this error condition? */
203 AssertRC(rc);
204 }
205 }
206 else if (fClose)
207 {
208 /* If the pipe needs to be closed, do so. */
209 rc = VBoxServiceControlExecProcHandleStdInErrorEvent(hPollSet, fPollEvt, phStdInW, pStdInBuf);
210 }
211 }
212 else
213 {
214 *pcbWritten = 0;
215 rc = VBoxServiceControlExecProcHandleStdInErrorEvent(hPollSet, fPollEvt, phStdInW, pStdInBuf);
216 }
217 return rc;
218}
219
220
221/**
222 * Handle a transport event or successful pfnPollIn() call.
223 *
224 * @returns IPRT status code from client send.
225 * @retval VINF_EOF indicates ABORT command.
226 *
227 * @param hPollSet The polling set.
228 * @param fPollEvt The event mask returned by RTPollNoResume.
229 * @param idPollHnd The handle ID.
230 * @param hStdInW The standard input pipe.
231 * @param pStdInBuf The standard input buffer.
232 */
233static int VBoxServiceControlExecProcHandleTransportEvent(RTPOLLSET hPollSet, uint32_t fPollEvt, uint32_t idPollHnd,
234 PRTPIPE phStdInW, PVBOXSERVICECTRLEXECPIPEBUF pStdInBuf)
235{
236 return 0; //RTPollSetAddPipe(hPollSet, *phStdInW, RTPOLL_EVT_WRITE, 4 /*TXSEXECHNDID_STDIN_WRITABLE*/);
237}
238
239
240/**
241 * Handle pending output data or error on standard out, standard error or the
242 * test pipe.
243 *
244 * @returns IPRT status code from client send.
245 * @param pThread The thread specific data.
246 * @param hPollSet The polling set.
247 * @param fPollEvt The event mask returned by RTPollNoResume.
248 * @param phPipeR The pipe handle.
249 * @param pu32Crc The current CRC-32 of the stream. (In/Out)
250 * @param uHandleId The handle ID.
251 *
252 * @todo Put the last 4 parameters into a struct!
253 */
254static int VBoxServiceControlExecProcHandleOutputEvent(RTPOLLSET hPollSet, uint32_t fPollEvt, PRTPIPE phPipeR,
255 uint32_t uHandleId, PVBOXSERVICECTRLEXECPIPEBUF pStdOutBuf)
256{
257#ifdef DEBUG
258 VBoxServiceVerbose(4, "ControlExec: HandleOutputEvent: fPollEvt=%#x\n", fPollEvt);
259#endif
260
261 /*
262 * Try drain the pipe before acting on any errors.
263 */
264 int rc = VINF_SUCCESS;
265 size_t cbRead;
266 uint8_t abBuf[_64K];
267
268 int rc2 = RTPipeRead(*phPipeR, abBuf, sizeof(abBuf), &cbRead);
269 if (RT_SUCCESS(rc2) && cbRead)
270 {
271#if 0
272 /* Only used for "real-time" stdout/stderr data; gets sent immediately (later)! */
273 rc = VbglR3GuestCtrlExecSendOut(pThread->uClientID, pThread->uContextID,
274 pData->uPID, uHandleId, 0 /* u32Flags */,
275 abBuf, cbRead);
276 if (RT_FAILURE(rc))
277 {
278 VBoxServiceError("ControlExec: Error while sending real-time output data, rc=%Rrc, cbRead=%u, CID=%u, PID=%u\n",
279 rc, cbRead, pThread->uClientID, pData->uPID);
280 }
281 else
282 {
283#endif
284 uint32_t cbWritten;
285 rc = VBoxServiceControlExecWritePipeBuffer(pStdOutBuf, abBuf,
286 cbRead, false /* Pending close */, &cbWritten);
287 if (RT_SUCCESS(rc))
288 {
289 Assert(cbRead == cbWritten);
290 /* Make sure we go another poll round in case there was too much data
291 for the buffer to hold. */
292 fPollEvt &= RTPOLL_EVT_ERROR;
293 }
294#if 0
295 }
296#endif
297 }
298 else if (RT_FAILURE(rc2))
299 {
300 fPollEvt |= RTPOLL_EVT_ERROR;
301 AssertMsg(rc2 == VERR_BROKEN_PIPE, ("%Rrc\n", rc));
302 }
303
304 /*
305 * If an error was signalled, close reading stdout/stderr pipe.
306 */
307 if (fPollEvt & RTPOLL_EVT_ERROR)
308 {
309 rc2 = RTPollSetRemove(hPollSet, uHandleId);
310 AssertRC(rc2);
311
312 rc2 = RTPipeClose(*phPipeR);
313 AssertRC(rc2);
314 *phPipeR = NIL_RTPIPE;
315 }
316 return rc;
317}
318
319
320/**
321 * TODO
322 *
323 * @return IPRT status code.
324 * @param pThread
325 * @param hProcess
326 * @param cMillies
327 * @param hPollSet
328 * @param hStdInW
329 * @param hStdOutR
330 * @param hStdErrR
331 */
332static int VBoxServiceControlExecProcLoop(PVBOXSERVICECTRLTHREAD pThread,
333 RTPROCESS hProcess, RTMSINTERVAL cMillies, RTPOLLSET hPollSet,
334 PRTPIPE phStdInW, PRTPIPE phStdOutR, PRTPIPE phStdErrR)
335{
336 AssertPtrReturn(phStdInW, VERR_INVALID_PARAMETER);
337 AssertPtrReturn(phStdOutR, VERR_INVALID_PARAMETER);
338 AssertPtrReturn(phStdErrR, VERR_INVALID_PARAMETER);
339
340 int rc;
341 int rc2;
342 uint64_t const MsStart = RTTimeMilliTS();
343 RTPROCSTATUS ProcessStatus = { 254, RTPROCEXITREASON_ABEND };
344 bool fProcessAlive = true;
345 bool fProcessTimedOut = false;
346 uint64_t MsProcessKilled = UINT64_MAX;
347 RTMSINTERVAL const cMsPollBase = *phStdInW != NIL_RTPIPE
348 ? 100 /* Need to poll for input. */
349 : 1000; /* Need only poll for process exit and aborts. */
350 RTMSINTERVAL cMsPollCur = 0;
351
352 AssertPtr(pThread);
353 Assert(pThread->enmType == kVBoxServiceCtrlThreadDataExec);
354 PVBOXSERVICECTRLTHREADDATAEXEC pData = (PVBOXSERVICECTRLTHREADDATAEXEC)pThread->pvData;
355 AssertPtr(pData);
356
357 /* Assign PID to thread data. */
358 pData->uPID = hProcess;
359
360 /*
361 * Before entering the loop, tell the host that we've started the guest
362 * and that it's now OK to send input to the process.
363 */
364 VBoxServiceVerbose(3, "ControlExec: Process started: PID=%u, CID=%u, User=%s, PW=%s\n",
365 pData->uPID, pThread->uContextID, pData->pszUser, pData->pszPassword);
366 rc = VbglR3GuestCtrlExecReportStatus(pThread->uClientID, pThread->uContextID,
367 pData->uPID, PROC_STS_STARTED, 0 /* u32Flags */,
368 NULL /* pvData */, 0 /* cbData */);
369
370 /*
371 * Process input, output, the test pipe and client requests.
372 */
373 while ( RT_SUCCESS(rc)
374 && RT_UNLIKELY(!pThread->fShutdown))
375 {
376 /*
377 * Wait/Process all pending events.
378 */
379 uint32_t idPollHnd;
380 uint32_t fPollEvt;
381 rc2 = RTPollNoResume(hPollSet, cMsPollCur, &fPollEvt, &idPollHnd);
382 if (pThread->fShutdown)
383 continue;
384
385 cMsPollCur = 0; /* No rest until we've checked everything. */
386
387 if (RT_SUCCESS(rc2))
388 {
389#ifdef DEBUG
390 VBoxServiceVerbose(4, "ControlExec: RTPollNoResume idPollHnd=%u\n", idPollHnd);
391#endif
392 switch (idPollHnd)
393 {
394 case VBOXSERVICECTRLPIPEID_STDIN_ERROR:
395 rc = VBoxServiceControlExecProcHandleStdInErrorEvent(hPollSet, fPollEvt, phStdInW, &pData->stdIn);
396 break;
397
398 case VBOXSERVICECTRLPIPEID_STDIN_INPUT_NOTIFY:
399 {
400 /* Drain the notification pipe. */
401 uint8_t abBuf[8];
402 size_t cbIgnore;
403 RTPipeRead(pData->stdIn.hNotificationPipeR, abBuf, sizeof(abBuf), &cbIgnore);
404 }
405 /* Fall through. */
406 case VBOXSERVICECTRLPIPEID_STDIN_WRITABLE:
407 {
408 size_t cbWritten;
409 rc = VBoxServiceControlExecProcHandleStdInWritableEvent(hPollSet, fPollEvt, phStdInW,
410 &pData->stdIn, &cbWritten);
411 break;
412 }
413
414 case VBOXSERVICECTRLPIPEID_STDOUT:
415 rc = VBoxServiceControlExecProcHandleOutputEvent(hPollSet, fPollEvt, phStdOutR,
416 VBOXSERVICECTRLPIPEID_STDOUT, &pData->stdOut);
417 break;
418
419 case VBOXSERVICECTRLPIPEID_STDERR:
420 rc = VBoxServiceControlExecProcHandleOutputEvent(hPollSet, fPollEvt, phStdErrR,
421 VBOXSERVICECTRLPIPEID_STDERR, &pData->stdOut);
422 break;
423
424 default:
425 AssertMsgFailed(("idPollHnd=%u fPollEvt=%#x\n", idPollHnd, fPollEvt));
426 break;
427 }
428 if (RT_FAILURE(rc) || rc == VINF_EOF)
429 break; /* Abort command, or client dead or something. */
430 continue;
431 }
432
433 /*
434 * Check for process death.
435 */
436 if (fProcessAlive)
437 {
438 rc2 = RTProcWaitNoResume(hProcess, RTPROCWAIT_FLAGS_NOBLOCK, &ProcessStatus);
439 if (RT_SUCCESS_NP(rc2))
440 {
441 fProcessAlive = false;
442 continue;
443 }
444 if (RT_UNLIKELY(rc2 == VERR_INTERRUPTED))
445 continue;
446 if (RT_UNLIKELY(rc2 == VERR_PROCESS_NOT_FOUND))
447 {
448 fProcessAlive = false;
449 ProcessStatus.enmReason = RTPROCEXITREASON_ABEND;
450 ProcessStatus.iStatus = 255;
451 AssertFailed();
452 }
453 else
454 AssertMsg(rc2 == VERR_PROCESS_RUNNING, ("%Rrc\n", rc2));
455 }
456
457 /*
458 * If the process has terminated, we're should head out.
459 */
460 if (!fProcessAlive)
461 break;
462
463 /*
464 * Check for timed out, killing the process.
465 */
466 uint32_t cMilliesLeft = RT_INDEFINITE_WAIT;
467 if (cMillies != RT_INDEFINITE_WAIT)
468 {
469 uint64_t u64Now = RTTimeMilliTS();
470 uint64_t cMsElapsed = u64Now - MsStart;
471 if (cMsElapsed >= cMillies)
472 {
473 VBoxServiceVerbose(3, "ControlExec: Process timed out (%ums elapsed > %ums timeout), killing ...", cMsElapsed, cMillies);
474
475 fProcessTimedOut = true;
476 if ( MsProcessKilled == UINT64_MAX
477 || u64Now - MsProcessKilled > 1000)
478 {
479 if (u64Now - MsProcessKilled > 20*60*1000)
480 break; /* give up after 20 mins */
481 RTProcTerminate(hProcess);
482 MsProcessKilled = u64Now;
483 continue;
484 }
485 cMilliesLeft = 10000;
486 }
487 else
488 cMilliesLeft = cMillies - (uint32_t)cMsElapsed;
489 }
490
491 /* Reset the polling interval since we've done all pending work. */
492 cMsPollCur = cMilliesLeft >= cMsPollBase ? cMsPollBase : cMilliesLeft;
493
494 /*
495 * Need to exit?
496 */
497 if (pThread->fShutdown)
498 break;
499 }
500
501 /*
502 * Try kill the process if it's still alive at this point.
503 */
504 if (fProcessAlive)
505 {
506 if (MsProcessKilled == UINT64_MAX)
507 {
508 VBoxServiceVerbose(3, "ControlExec: Process (PID=%u) is still alive and not killed yet\n",
509 pData->uPID);
510
511 MsProcessKilled = RTTimeMilliTS();
512 RTProcTerminate(hProcess);
513 RTThreadSleep(500);
514 }
515
516 for (size_t i = 0; i < 10; i++)
517 {
518 VBoxServiceVerbose(4, "ControlExec: Kill attempt %d/10: Waiting for process (PID=%u) exit ...\n",
519 i + 1, pData->uPID);
520 rc2 = RTProcWait(hProcess, RTPROCWAIT_FLAGS_NOBLOCK, &ProcessStatus);
521 if (RT_SUCCESS(rc2))
522 {
523 VBoxServiceVerbose(4, "ControlExec: Kill attempt %d/10: Process (PID=%u) exited\n",
524 i + 1, pData->uPID);
525 fProcessAlive = false;
526 break;
527 }
528 if (i >= 5)
529 {
530 VBoxServiceVerbose(4, "ControlExec: Kill attempt %d/10: Try to terminate (PID=%u) ...\n",
531 i + 1, pData->uPID);
532 RTProcTerminate(hProcess);
533 }
534 RTThreadSleep(i >= 5 ? 2000 : 500);
535 }
536
537 if (fProcessAlive)
538 VBoxServiceVerbose(3, "ControlExec: Process (PID=%u) could not be killed\n", pData->uPID);
539 }
540
541 /*
542 * If we don't have a client problem (RT_FAILURE(rc) we'll reply to the
543 * clients exec packet now.
544 */
545 if (RT_SUCCESS(rc))
546 {
547 /* Since the process is not alive anymore, destroy its local
548 * stdin pipe buffer - it's not used anymore and can eat up quite
549 * a bit of memory. */
550 VBoxServiceControlExecDeletePipeBuffer(&pData->stdIn);
551
552 uint32_t uStatus = PROC_STS_UNDEFINED;
553 uint32_t uFlags = 0;
554
555 if ( fProcessTimedOut && !fProcessAlive && MsProcessKilled != UINT64_MAX)
556 {
557 VBoxServiceVerbose(3, "ControlExec: Process timed out and got killed\n");
558 uStatus = PROC_STS_TOK;
559 }
560 else if (fProcessTimedOut && fProcessAlive && MsProcessKilled != UINT64_MAX)
561 {
562 VBoxServiceVerbose(3, "ControlExec: Process timed out and did *not* get killed\n");
563 uStatus = PROC_STS_TOA;
564 }
565 else if (pThread->fShutdown && (fProcessAlive || MsProcessKilled != UINT64_MAX))
566 {
567 VBoxServiceVerbose(3, "ControlExec: Process got terminated because system/service is about to shutdown\n");
568 uStatus = PROC_STS_DWN; /* Service is stopping, process was killed. */
569 uFlags = pData->uFlags; /* Return handed-in execution flags back to the host. */
570 }
571 else if (fProcessAlive)
572 {
573 VBoxServiceError("ControlExec: Process is alive when it should not!\n");
574 }
575 else if (MsProcessKilled != UINT64_MAX)
576 {
577 VBoxServiceError("ControlExec: Process has been killed when it should not!\n");
578 }
579 else if (ProcessStatus.enmReason == RTPROCEXITREASON_NORMAL)
580 {
581 VBoxServiceVerbose(3, "ControlExec: Process ended with RTPROCEXITREASON_NORMAL\n");
582
583 uStatus = PROC_STS_TEN;
584 uFlags = ProcessStatus.iStatus;
585 }
586 else if (ProcessStatus.enmReason == RTPROCEXITREASON_SIGNAL)
587 {
588 VBoxServiceVerbose(3, "ControlExec: Process ended with RTPROCEXITREASON_SIGNAL\n");
589
590 uStatus = PROC_STS_TES;
591 uFlags = ProcessStatus.iStatus;
592 }
593 else if (ProcessStatus.enmReason == RTPROCEXITREASON_ABEND)
594 {
595 VBoxServiceVerbose(3, "ControlExec: Process ended with RTPROCEXITREASON_ABEND\n");
596
597 uStatus = PROC_STS_TEA;
598 uFlags = ProcessStatus.iStatus;
599 }
600 else
601 {
602 VBoxServiceError("ControlExec: Process has reached an undefined status!\n");
603 }
604
605 VBoxServiceVerbose(3, "ControlExec: Process ended: PID=%u, CID=%u, Status=%u, Flags=%u\n",
606 pData->uPID, pThread->uContextID, uStatus, uFlags);
607 rc = VbglR3GuestCtrlExecReportStatus(pThread->uClientID, pThread->uContextID,
608 pData->uPID, uStatus, uFlags,
609 NULL /* pvData */, 0 /* cbData */);
610 VBoxServiceVerbose(3, "ControlExec: Process loop ended with rc=%Rrc\n", rc);
611 }
612 else
613 VBoxServiceError("ControlExec: Process loop failed with rc=%Rrc\n", rc);
614 return rc;
615}
616
617
618/**
619 * Sets up the redirection / pipe / nothing for one of the standard handles.
620 *
621 * @returns IPRT status code. No client replies made.
622 * @param fd Which standard handle it is (0 == stdin, 1 ==
623 * stdout, 2 == stderr).
624 * @param ph The generic handle that @a pph may be set
625 * pointing to. Always set.
626 * @param pph Pointer to the RTProcCreateExec argument.
627 * Always set.
628 * @param phPipe Where to return the end of the pipe that we
629 * should service. Always set.
630 */
631static int VBoxServiceControlExecSetupPipe(int fd, PRTHANDLE ph, PRTHANDLE *pph, PRTPIPE phPipe)
632{
633 AssertPtr(ph);
634 AssertPtr(pph);
635 AssertPtr(phPipe);
636
637 ph->enmType = RTHANDLETYPE_PIPE;
638 ph->u.hPipe = NIL_RTPIPE;
639 *pph = NULL;
640 *phPipe = NIL_RTPIPE;
641
642 int rc;
643
644 /*
645 * Setup a pipe for forwarding to/from the client.
646 * The ph union struct will be filled with a pipe read/write handle
647 * to represent the "other" end to phPipe.
648 */
649 if (fd == 0) /* stdin? */
650 {
651 /* Connect a wrtie pipe specified by phPipe to stdin. */
652 rc = RTPipeCreate(&ph->u.hPipe, phPipe, RTPIPE_C_INHERIT_READ);
653 }
654 else /* stdout or stderr? */
655 {
656 /* Connect a read pipe specified by phPipe to stdout or stderr. */
657 rc = RTPipeCreate(phPipe, &ph->u.hPipe, RTPIPE_C_INHERIT_WRITE);
658 }
659 if (RT_FAILURE(rc))
660 return rc;
661 ph->enmType = RTHANDLETYPE_PIPE;
662 *pph = ph;
663
664 return rc;
665}
666
667
668/**
669 * Initializes a pipe buffer.
670 *
671 * @returns IPRT status code.
672 * @param pBuf The pipe buffer to initialize.
673 * @param fNeedNotificationPipe Whether the buffer needs a notification
674 * pipe or not.
675 */
676static int VBoxServiceControlExecInitPipeBuffer(PVBOXSERVICECTRLEXECPIPEBUF pBuf, bool fNeedNotificationPipe)
677{
678 AssertPtr(pBuf);
679
680 /** @todo Add allocation size as function parameter! */
681 pBuf->pbData = (uint8_t *)RTMemAlloc(_64K); /* Start with a 64k buffer. */
682 AssertReturn(pBuf->pbData, VERR_NO_MEMORY);
683 pBuf->cbAllocated = _64K;
684 pBuf->cbSize = 0;
685 pBuf->cbOffset = 0;
686 pBuf->fAlive = true;
687 pBuf->fPendingClose = false;
688 pBuf->fNeedNotification = fNeedNotificationPipe;
689 pBuf->hNotificationPipeW = NIL_RTPIPE;
690 pBuf->hNotificationPipeR = NIL_RTPIPE;
691
692 int rc = RTCritSectInit(&pBuf->CritSect);
693 if (RT_SUCCESS(rc) && fNeedNotificationPipe)
694 {
695 rc = RTPipeCreate(&pBuf->hNotificationPipeR, &pBuf->hNotificationPipeW, 0);
696 if (RT_FAILURE(rc))
697 RTCritSectDelete(&pBuf->CritSect);
698 }
699 return rc;
700}
701
702
703/**
704 * Deletes a pipe buffer.
705 *
706 * @param pBuf The pipe buffer.
707 */
708void VBoxServiceControlExecDeletePipeBuffer(PVBOXSERVICECTRLEXECPIPEBUF pBuf)
709{
710 AssertPtr(pBuf);
711 if (pBuf->pbData)
712 {
713 RTMemFree(pBuf->pbData);
714 pBuf->pbData = NULL;
715 pBuf->cbAllocated = 0;
716 pBuf->cbSize = 0;
717 pBuf->cbOffset = 0;
718 pBuf->fAlive = false;
719 }
720
721 RTPipeClose(pBuf->hNotificationPipeR);
722 pBuf->hNotificationPipeR = NIL_RTPIPE;
723 RTPipeClose(pBuf->hNotificationPipeW);
724 pBuf->hNotificationPipeW = NIL_RTPIPE;
725 RTCritSectDelete(&pBuf->CritSect);
726}
727
728
729/**
730 * TODO
731 *
732 * @return IPRT status code.
733 * @param pBuf
734 * @param pbBuffer
735 * @param cbBuffer
736 * @param pcbToRead
737 */
738int VBoxServiceControlExecReadPipeBufferContent(PVBOXSERVICECTRLEXECPIPEBUF pBuf,
739 uint8_t *pbBuffer, uint32_t cbBuffer, uint32_t *pcbToRead)
740{
741 AssertPtr(pBuf);
742 AssertPtr(pcbToRead);
743
744 int rc = RTCritSectEnter(&pBuf->CritSect);
745 if (RT_SUCCESS(rc))
746 {
747 Assert(pBuf->cbSize >= pBuf->cbOffset);
748 if (*pcbToRead > pBuf->cbSize - pBuf->cbOffset)
749 *pcbToRead = pBuf->cbSize - pBuf->cbOffset;
750
751 if (*pcbToRead > cbBuffer)
752 *pcbToRead = cbBuffer;
753
754 if (*pcbToRead > 0)
755 {
756 memcpy(pbBuffer, pBuf->pbData + pBuf->cbOffset, *pcbToRead);
757 pBuf->cbOffset += *pcbToRead;
758 }
759 else
760 {
761 pbBuffer = NULL;
762 *pcbToRead = 0;
763 }
764 rc = RTCritSectLeave(&pBuf->CritSect);
765 }
766 return rc;
767}
768
769
770/**
771 * TODO
772 *
773 * @return IPRT status code.
774 * @param pBuf
775 * @param pbData
776 * @param cbData
777 * @param fPendingClose
778 * @param pcbWritten
779 */
780int VBoxServiceControlExecWritePipeBuffer(PVBOXSERVICECTRLEXECPIPEBUF pBuf,
781 uint8_t *pbData, uint32_t cbData, bool fPendingClose,
782 uint32_t *pcbWritten)
783{
784 AssertPtrReturn(pBuf, VERR_INVALID_PARAMETER);
785 AssertPtrReturn(pcbWritten, VERR_INVALID_PARAMETER);
786
787 int rc;
788 if (pBuf->fAlive)
789 {
790 rc = RTCritSectEnter(&pBuf->CritSect);
791 if (RT_SUCCESS(rc))
792 {
793 /* Rewind the buffer if it's empty. */
794 size_t cbInBuf = pBuf->cbSize - pBuf->cbOffset;
795 bool const fAddToSet = cbInBuf == 0;
796 if (fAddToSet)
797 pBuf->cbSize = pBuf->cbOffset = 0;
798
799 /* Try and see if we can simply append the data. */
800 if (cbData + pBuf->cbSize <= pBuf->cbAllocated)
801 {
802 memcpy(&pBuf->pbData[pBuf->cbSize], pbData, cbData);
803 pBuf->cbSize += cbData;
804 }
805 else
806 {
807 /* Move any buffered data to the front. */
808 cbInBuf = pBuf->cbSize - pBuf->cbOffset;
809 if (cbInBuf == 0)
810 pBuf->cbSize = pBuf->cbOffset = 0;
811 else if (pBuf->cbOffset) /* Do we have something to move? */
812 {
813 memmove(pBuf->pbData, &pBuf->pbData[pBuf->cbOffset], cbInBuf);
814 pBuf->cbSize = cbInBuf;
815 pBuf->cbOffset = 0;
816 }
817
818 /* Do we need to grow the buffer? */
819 if (cbData + pBuf->cbSize > pBuf->cbAllocated)
820 {
821 size_t cbAlloc = pBuf->cbSize + cbData;
822 cbAlloc = RT_ALIGN_Z(cbAlloc, _64K);
823 void *pvNew = RTMemRealloc(pBuf->pbData, cbAlloc);
824 if (pvNew)
825 {
826 pBuf->pbData = (uint8_t *)pvNew;
827 pBuf->cbAllocated = cbAlloc;
828 }
829 else
830 rc = VERR_NO_MEMORY;
831 }
832
833 /* Finally, copy the data. */
834 if (RT_SUCCESS(rc))
835 {
836 if (cbData + pBuf->cbSize <= pBuf->cbAllocated)
837 {
838 memcpy(&pBuf->pbData[pBuf->cbSize], pbData, cbData);
839 pBuf->cbSize += cbData;
840 }
841 else
842 rc = VERR_BUFFER_OVERFLOW;
843 }
844 }
845
846 if (RT_SUCCESS(rc))
847 {
848 /* Report back written bytes. */
849 *pcbWritten = cbData;
850
851 /*
852 * Was this the final read/write to do on this buffer? The close it
853 * next time we have the chance to.
854 */
855 if (fPendingClose)
856 pBuf->fPendingClose = fPendingClose;
857
858 /*
859 * Wake up the thread servicing the process so it can feed it
860 * (if we have a notification helper pipe).
861 */
862 if (pBuf->fNeedNotification)
863 {
864 size_t cbWritten;
865 int rc2 = RTPipeWrite(pBuf->hNotificationPipeW, "i", 1, &cbWritten);
866
867 /* Disable notification until it is set again on successful write. */
868 pBuf->fNeedNotification = !RT_SUCCESS(rc2);
869 }
870 }
871 int rc2 = RTCritSectLeave(&pBuf->CritSect);
872 if (RT_SUCCESS(rc))
873 rc = rc2;
874 }
875 }
876 else
877 rc = VERR_BAD_PIPE;
878 return rc;
879}
880
881
882/**
883 * Allocates and gives back a thread data struct which then can be used by the worker thread.
884 * Needs to be freed with VBoxServiceControlExecDestroyThreadData().
885 *
886 * @return IPRT status code.
887 * @param pThread
888 * @param u32ContextID
889 * @param pszCmd
890 * @param uFlags
891 * @param pszArgs
892 * @param uNumArgs
893 * @param pszEnv
894 * @param cbEnv
895 * @param uNumEnvVars
896 * @param pszUser
897 * @param pszPassword
898 * @param uTimeLimitMS
899 */
900int VBoxServiceControlExecAllocateThreadData(PVBOXSERVICECTRLTHREAD pThread,
901 uint32_t u32ContextID,
902 const char *pszCmd, uint32_t uFlags,
903 const char *pszArgs, uint32_t uNumArgs,
904 const char *pszEnv, uint32_t cbEnv, uint32_t uNumEnvVars,
905 const char *pszUser, const char *pszPassword, uint32_t uTimeLimitMS)
906{
907 AssertPtr(pThread);
908
909 /* General stuff. */
910 pThread->Node.pPrev = NULL;
911 pThread->Node.pNext = NULL;
912
913 pThread->fShutdown = false;
914 pThread->fStarted = false;
915 pThread->fStopped = false;
916
917 pThread->uContextID = u32ContextID;
918 /* ClientID will be assigned when thread is started! */
919
920 /* Specific stuff. */
921 PVBOXSERVICECTRLTHREADDATAEXEC pData = (PVBOXSERVICECTRLTHREADDATAEXEC)RTMemAlloc(sizeof(VBOXSERVICECTRLTHREADDATAEXEC));
922 if (pData == NULL)
923 return VERR_NO_MEMORY;
924
925 pData->uPID = 0; /* Don't have a PID yet. */
926 pData->pszCmd = RTStrDup(pszCmd);
927 pData->uFlags = uFlags;
928 pData->uNumEnvVars = 0;
929 pData->uNumArgs = 0; /* Initialize in case of RTGetOptArgvFromString() is failing ... */
930
931 /* Prepare argument list. */
932 int rc = RTGetOptArgvFromString(&pData->papszArgs, (int*)&pData->uNumArgs,
933 (uNumArgs > 0) ? pszArgs : "", NULL);
934 /* Did we get the same result? */
935 Assert(uNumArgs == pData->uNumArgs);
936
937 if (RT_SUCCESS(rc))
938 {
939 /* Prepare environment list. */
940 if (uNumEnvVars)
941 {
942 pData->papszEnv = (char **)RTMemAlloc(uNumEnvVars * sizeof(char*));
943 AssertPtr(pData->papszEnv);
944 pData->uNumEnvVars = uNumEnvVars;
945
946 const char *pszCur = pszEnv;
947 uint32_t i = 0;
948 uint32_t cbLen = 0;
949 while (cbLen < cbEnv)
950 {
951 /* sanity check */
952 if (i >= uNumEnvVars)
953 {
954 rc = VERR_INVALID_PARAMETER;
955 break;
956 }
957 int cbStr = RTStrAPrintf(&pData->papszEnv[i++], "%s", pszCur);
958 if (cbStr < 0)
959 {
960 rc = VERR_NO_STR_MEMORY;
961 break;
962 }
963 pszCur += cbStr + 1; /* Skip terminating '\0' */
964 cbLen += cbStr + 1; /* Skip terminating '\0' */
965 }
966 }
967
968 pData->pszUser = RTStrDup(pszUser);
969 pData->pszPassword = RTStrDup(pszPassword);
970 pData->uTimeLimitMS = uTimeLimitMS;
971
972 /* Adjust time limit value. */
973 pData->uTimeLimitMS = ( uTimeLimitMS == UINT32_MAX
974 || uTimeLimitMS == 0)
975 ? RT_INDEFINITE_WAIT : uTimeLimitMS;
976
977 /* Init buffers. */
978 rc = VBoxServiceControlExecInitPipeBuffer(&pData->stdOut, false /*fNeedNotificationPipe*/);
979 if (RT_SUCCESS(rc))
980 {
981 rc = VBoxServiceControlExecInitPipeBuffer(&pData->stdErr, false /*fNeedNotificationPipe*/);
982 if (RT_SUCCESS(rc))
983 rc = VBoxServiceControlExecInitPipeBuffer(&pData->stdIn, true /*fNeedNotificationPipe*/);
984 }
985 }
986
987 if (RT_FAILURE(rc))
988 {
989 VBoxServiceControlExecDestroyThreadData(pData);
990 }
991 else
992 {
993 pThread->enmType = kVBoxServiceCtrlThreadDataExec;
994 pThread->pvData = pData;
995 }
996 return rc;
997}
998
999
1000/**
1001 * Frees an allocated thread data structure along with all its allocated parameters.
1002 *
1003 * @param pData Pointer to thread data to free.
1004 */
1005void VBoxServiceControlExecDestroyThreadData(PVBOXSERVICECTRLTHREADDATAEXEC pData)
1006{
1007 if (pData)
1008 {
1009 RTStrFree(pData->pszCmd);
1010 if (pData->uNumEnvVars)
1011 {
1012 for (uint32_t i = 0; i < pData->uNumEnvVars; i++)
1013 RTStrFree(pData->papszEnv[i]);
1014 RTMemFree(pData->papszEnv);
1015 }
1016 RTGetOptArgvFree(pData->papszArgs);
1017 RTStrFree(pData->pszUser);
1018 RTStrFree(pData->pszPassword);
1019
1020 VBoxServiceControlExecDeletePipeBuffer(&pData->stdOut);
1021 VBoxServiceControlExecDeletePipeBuffer(&pData->stdErr);
1022 VBoxServiceControlExecDeletePipeBuffer(&pData->stdIn);
1023
1024 RTMemFree(pData);
1025 pData = NULL;
1026 }
1027}
1028
1029
1030/** @todo Maybe we want to have an own IPRT function for that! */
1031int VBoxServiceControlExecMakeFullPath(const char *pszPath, char *pszExpanded, size_t cbExpanded)
1032{
1033 int rc = VINF_SUCCESS;
1034#ifdef RT_OS_WINDOWS
1035 if (!ExpandEnvironmentStrings(pszPath, pszExpanded, cbExpanded))
1036 rc = RTErrConvertFromWin32(GetLastError());
1037#else
1038 /* No expansion for non-Windows yet. */
1039 rc = RTStrCopy(pszExpanded, cbExpanded, pszPath);
1040#endif
1041 return rc;
1042}
1043
1044
1045int VBoxServiceControlExecResolveExecutable(const char *pszFileName, char *pszResolved, size_t cbResolved)
1046{
1047 int rc = VINF_SUCCESS;
1048
1049 /* Search the path of our executable. */
1050 char szVBoxService[RTPATH_MAX];
1051 if (RTProcGetExecutableName(szVBoxService, sizeof(szVBoxService)))
1052 {
1053 char *pszExecResolved = NULL;
1054 if ( (g_pszProgName && RTStrICmp(pszFileName, g_pszProgName) == 0)
1055 || !RTStrICmp(pszFileName, VBOXSERVICE_NAME))
1056 {
1057 /* We just want to execute VBoxService (no toolbox). */
1058 pszExecResolved = RTStrDup(szVBoxService);
1059 }
1060#ifdef VBOXSERVICE_TOOLBOX
1061 else if (RTStrStr(pszFileName, "vbox_") == pszFileName)
1062 {
1063 /* We want to use the internal toolbox (all internal
1064 * tools are starting with "vbox_" (e.g. "vbox_cat"). */
1065 pszExecResolved = RTStrDup(szVBoxService);
1066 }
1067#endif
1068 else /* Nothing to resolve, copy original. */
1069 pszExecResolved = RTStrDup(pszFileName);
1070 AssertPtr(pszExecResolved);
1071
1072 rc = VBoxServiceControlExecMakeFullPath(pszExecResolved, pszResolved, cbResolved);
1073 RTStrFree(pszExecResolved);
1074 }
1075 return rc;
1076}
1077
1078
1079#ifdef VBOXSERVICE_TOOLBOX
1080/**
1081 * Constructs the argv command line of a VBoxService program
1082 * by first appending the full path of VBoxService along with the given
1083 * tool name (e.g. "vbox_cat") + the tool's actual command line parameters.
1084 *
1085 * @return IPRT status code.
1086 * @param pszFileName File name (full path) of this process.
1087 * @param papszArgs Original argv command line from the host.
1088 * @param ppapszArgv Pointer to a pointer with the new argv command line.
1089 * Needs to be freed with RTGetOptArgvFree.
1090 */
1091int VBoxServiceControlExecPrepareArgv(const char *pszFileName,
1092 const char * const *papszArgs, char ***ppapszArgv)
1093{
1094 AssertPtrReturn(pszFileName, VERR_INVALID_PARAMETER);
1095 AssertPtrReturn(papszArgs, VERR_INVALID_PARAMETER);
1096 AssertPtrReturn(ppapszArgv, VERR_INVALID_PARAMETER);
1097
1098 char *pszArgs;
1099 int rc = RTGetOptArgvToString(&pszArgs, papszArgs,
1100 RTGETOPTARGV_CNV_QUOTE_MS_CRT); /* RTGETOPTARGV_CNV_QUOTE_BOURNE_SH */
1101 if (RT_SUCCESS(rc))
1102 {
1103 /*
1104 * Construct the new command line by appending the actual
1105 * tool name to new process' command line.
1106 */
1107 char szArgsExp[RTPATH_MAX];
1108 rc = VBoxServiceControlExecMakeFullPath(pszArgs, szArgsExp, sizeof(szArgsExp));
1109 if (RT_SUCCESS(rc))
1110 {
1111 char *pszNewArgs;
1112 if (RTStrAPrintf(&pszNewArgs, "%s %s", pszFileName, szArgsExp))
1113 {
1114 int iNumArgsIgnored;
1115 rc = RTGetOptArgvFromString(ppapszArgv, &iNumArgsIgnored,
1116 pszNewArgs, NULL /* Use standard separators. */);
1117 RTStrFree(pszNewArgs);
1118 }
1119 }
1120 RTStrFree(pszArgs);
1121 }
1122 return rc;
1123}
1124#endif
1125
1126
1127/**
1128 * TODO
1129 *
1130 * @return IPRT status code.
1131 * @param pszExec
1132 * @param papszArgs
1133 * @param hEnv
1134 * @param fFlags
1135 * @param phStdIn
1136 * @param phStdOut
1137 * @param phStdErr
1138 * @param pszAsUser
1139 * @param pszPassword
1140 * @param phProcess
1141 */
1142int VBoxServiceControlExecCreateProcess(const char *pszExec, const char * const *papszArgs, RTENV hEnv, uint32_t fFlags,
1143 PCRTHANDLE phStdIn, PCRTHANDLE phStdOut, PCRTHANDLE phStdErr, const char *pszAsUser,
1144 const char *pszPassword, PRTPROCESS phProcess)
1145{
1146 int rc = VINF_SUCCESS;
1147#ifdef RT_OS_WINDOWS
1148 /*
1149 * If sysprep should be executed do this in the context of VBoxService, which
1150 * (usually, if started by SCM) has administrator rights. Because of that a UI
1151 * won't be shown (doesn't have a desktop).
1152 */
1153 if (RTStrICmp(pszExec, "sysprep") == 0)
1154 {
1155 /* Get the predefined path of sysprep.exe (depending on Windows OS). */
1156 char szSysprepCmd[RTPATH_MAX] = "C:\\sysprep\\sysprep.exe";
1157 OSVERSIONINFOEX OSInfoEx;
1158 RT_ZERO(OSInfoEx);
1159 OSInfoEx.dwOSVersionInfoSize = sizeof(OSVERSIONINFOEX);
1160 if ( GetVersionEx((LPOSVERSIONINFO) &OSInfoEx)
1161 && OSInfoEx.dwPlatformId == VER_PLATFORM_WIN32_NT
1162 && OSInfoEx.dwMajorVersion >= 6 /* Vista or later */)
1163 {
1164 rc = RTEnvGetEx(RTENV_DEFAULT, "windir", szSysprepCmd, sizeof(szSysprepCmd), NULL);
1165 if (RT_SUCCESS(rc))
1166 rc = RTPathAppend(szSysprepCmd, sizeof(szSysprepCmd), "system32\\sysprep\\sysprep.exe");
1167 }
1168 rc = RTProcCreateEx(szSysprepCmd, papszArgs, hEnv, 0 /* fFlags */,
1169 phStdIn, phStdOut, phStdErr, NULL /* pszAsUser */,
1170 NULL /* pszPassword */, phProcess);
1171 return rc;
1172 }
1173#endif /* RT_OS_WINDOWS */
1174
1175 /*
1176 * Do the environment variables expansion on executable and arguments.
1177 */
1178 char szExecExp[RTPATH_MAX];
1179 rc = VBoxServiceControlExecResolveExecutable(pszExec, szExecExp, sizeof(szExecExp));
1180 if (RT_SUCCESS(rc))
1181 {
1182 char **papszArgsExp;
1183 rc = VBoxServiceControlExecPrepareArgv(szExecExp, papszArgs, &papszArgsExp);
1184 if (RT_SUCCESS(rc))
1185 {
1186 /* If no user name specified run with current credentials.
1187 * This is prohibited via official Main API! */
1188 if (!strlen(pszAsUser))
1189 fFlags &= ~RTPROC_FLAGS_SERVICE;
1190
1191 /* Do normal execution. */
1192 rc = RTProcCreateEx(szExecExp, papszArgsExp, hEnv, fFlags,
1193 phStdIn, phStdOut, phStdErr,
1194 strlen(pszAsUser) ? pszAsUser : NULL,
1195 strlen(pszPassword) ? pszPassword : NULL,
1196 phProcess);
1197 }
1198 RTGetOptArgvFree(papszArgsExp);
1199 }
1200 return rc;
1201}
1202
1203/**
1204 * The actual worker routine (lopp) for a started guest process.
1205 *
1206 * @return IPRT status code.
1207 * @param PVBOXSERVICECTRLTHREAD Thread data associated with a started process.
1208 */
1209DECLCALLBACK(int) VBoxServiceControlExecProcessWorker(PVBOXSERVICECTRLTHREAD pThread)
1210{
1211 AssertPtr(pThread);
1212 PVBOXSERVICECTRLTHREADDATAEXEC pData = (PVBOXSERVICECTRLTHREADDATAEXEC)pThread->pvData;
1213 AssertPtr(pData);
1214
1215 VBoxServiceVerbose(3, "ControlExec: Thread of process \"%s\" started\n", pData->pszCmd);
1216
1217 int rc = VbglR3GuestCtrlConnect(&pThread->uClientID);
1218 if (RT_FAILURE(rc))
1219 {
1220 VBoxServiceError("ControlExec: Thread failed to connect to the guest control service, aborted! Error: %Rrc\n", rc);
1221 RTThreadUserSignal(RTThreadSelf());
1222 return rc;
1223 }
1224
1225 bool fSignalled = false; /* Indicator whether we signalled the thread user event already. */
1226
1227 /*
1228 * Create the environment.
1229 */
1230 RTENV hEnv;
1231 rc = RTEnvClone(&hEnv, RTENV_DEFAULT);
1232 if (RT_SUCCESS(rc))
1233 {
1234 size_t i;
1235 for (i = 0; i < pData->uNumEnvVars && pData->papszEnv; i++)
1236 {
1237 rc = RTEnvPutEx(hEnv, pData->papszEnv[i]);
1238 if (RT_FAILURE(rc))
1239 break;
1240 }
1241 if (RT_SUCCESS(rc))
1242 {
1243 /*
1244 * Setup the redirection of the standard stuff.
1245 */
1246 /** @todo consider supporting: gcc stuff.c >file 2>&1. */
1247 RTHANDLE hStdIn;
1248 PRTHANDLE phStdIn;
1249 rc = VBoxServiceControlExecSetupPipe(0 /*STDIN_FILENO*/, &hStdIn, &phStdIn, &pData->pipeStdInW);
1250 if (RT_SUCCESS(rc))
1251 {
1252 RTHANDLE hStdOut;
1253 PRTHANDLE phStdOut;
1254 RTPIPE hStdOutR;
1255 rc = VBoxServiceControlExecSetupPipe(1 /*STDOUT_FILENO*/, &hStdOut, &phStdOut, &hStdOutR);
1256 if (RT_SUCCESS(rc))
1257 {
1258 RTHANDLE hStdErr;
1259 PRTHANDLE phStdErr;
1260 RTPIPE hStdErrR;
1261 rc = VBoxServiceControlExecSetupPipe(2 /*STDERR_FILENO*/, &hStdErr, &phStdErr, &hStdErrR);
1262 if (RT_SUCCESS(rc))
1263 {
1264 /*
1265 * Create a poll set for the pipes and let the
1266 * transport layer add stuff to it as well.
1267 */
1268 RTPOLLSET hPollSet;
1269 rc = RTPollSetCreate(&hPollSet);
1270 if (RT_SUCCESS(rc))
1271 {
1272 rc = RTPollSetAddPipe(hPollSet, pData->pipeStdInW, RTPOLL_EVT_ERROR, VBOXSERVICECTRLPIPEID_STDIN_ERROR);
1273 if (RT_SUCCESS(rc))
1274 rc = RTPollSetAddPipe(hPollSet, hStdOutR, RTPOLL_EVT_READ | RTPOLL_EVT_ERROR, VBOXSERVICECTRLPIPEID_STDOUT);
1275 if (RT_SUCCESS(rc))
1276 rc = RTPollSetAddPipe(hPollSet, hStdErrR, RTPOLL_EVT_READ | RTPOLL_EVT_ERROR, VBOXSERVICECTRLPIPEID_STDERR);
1277 if (RT_SUCCESS(rc))
1278 rc = RTPollSetAddPipe(hPollSet, pData->pipeStdInW, RTPOLL_EVT_WRITE, VBOXSERVICECTRLPIPEID_STDIN_WRITABLE);
1279 if (RT_SUCCESS(rc))
1280 rc = RTPollSetAddPipe(hPollSet, pData->stdIn.hNotificationPipeR, RTPOLL_EVT_READ, VBOXSERVICECTRLPIPEID_STDIN_INPUT_NOTIFY);
1281 if (RT_SUCCESS(rc))
1282 {
1283 RTPROCESS hProcess;
1284 rc = VBoxServiceControlExecCreateProcess(pData->pszCmd, pData->papszArgs, hEnv, RTPROC_FLAGS_SERVICE,
1285 phStdIn, phStdOut, phStdErr,
1286 pData->pszUser, pData->pszPassword,
1287 &hProcess);
1288
1289 /*
1290 * Tell the control thread that it can continue
1291 * spawning services. This needs to be done after the new
1292 * process has been started because otherwise signal handling
1293 * on (Open) Solaris does not work correctly (see #5068).
1294 */
1295 int rc2 = RTThreadUserSignal(RTThreadSelf());
1296 if (RT_FAILURE(rc2))
1297 rc = rc2;
1298 fSignalled = true;
1299
1300 if (RT_SUCCESS(rc))
1301 {
1302 /*
1303 * Close the child ends of any pipes and redirected files.
1304 */
1305 rc2 = RTHandleClose(phStdIn); AssertRC(rc2);
1306 phStdIn = NULL;
1307 rc2 = RTHandleClose(phStdOut); AssertRC(rc2);
1308 phStdOut = NULL;
1309 rc2 = RTHandleClose(phStdErr); AssertRC(rc2);
1310 phStdErr = NULL;
1311
1312 /* Enter the process loop. */
1313 rc = VBoxServiceControlExecProcLoop(pThread,
1314 hProcess, pData->uTimeLimitMS, hPollSet,
1315 &pData->pipeStdInW, &hStdOutR, &hStdErrR);
1316
1317 /*
1318 * The handles that are no longer in the set have
1319 * been closed by the above call in order to prevent
1320 * the guest from getting stuck accessing them.
1321 * So, NIL the handles to avoid closing them again.
1322 */
1323 if (RT_FAILURE(RTPollSetQueryHandle(hPollSet, 0 /* stdin */, NULL)))
1324 pData->pipeStdInW = NIL_RTPIPE;
1325 if (RT_FAILURE(RTPollSetQueryHandle(hPollSet, 1 /* stdout */, NULL)))
1326 hStdOutR = NIL_RTPIPE;
1327 if (RT_FAILURE(RTPollSetQueryHandle(hPollSet, 2 /* stderr */, NULL)))
1328 hStdErrR = NIL_RTPIPE;
1329 }
1330 else /* Something went wrong; report error! */
1331 {
1332 VBoxServiceError("ControlExec: Could not start process '%s' (CID: %u)! Error: %Rrc\n",
1333 pData->pszCmd, pThread->uContextID, rc);
1334
1335 rc2 = VbglR3GuestCtrlExecReportStatus(pThread->uClientID, pThread->uContextID, pData->uPID,
1336 PROC_STS_ERROR, rc,
1337 NULL /* pvData */, 0 /* cbData */);
1338 if (RT_FAILURE(rc2))
1339 VBoxServiceError("ControlExec: Could not report process start error! Error: %Rrc (process error %Rrc)\n",
1340 rc2, rc);
1341 }
1342 }
1343 RTPollSetDestroy(hPollSet);
1344 }
1345 RTPipeClose(hStdErrR);
1346 RTHandleClose(phStdErr);
1347 }
1348 RTPipeClose(hStdOutR);
1349 RTHandleClose(phStdOut);
1350 }
1351 RTPipeClose(pData->pipeStdInW);
1352 RTHandleClose(phStdIn);
1353 }
1354 }
1355 RTEnvDestroy(hEnv);
1356 }
1357
1358 VbglR3GuestCtrlDisconnect(pThread->uClientID);
1359 VBoxServiceVerbose(3, "ControlExec: Thread of process \"%s\" (PID: %u) ended with rc=%Rrc\n",
1360 pData->pszCmd, pData->uPID, rc);
1361
1362 /*
1363 * If something went wrong signal the user event so that others don't wait
1364 * forever on this thread.
1365 */
1366 if (RT_FAILURE(rc) && !fSignalled)
1367 RTThreadUserSignal(RTThreadSelf());
1368 return rc;
1369}
1370
1371
1372/**
1373 * Finds a (formerly) started process given by its PID.
1374 *
1375 * @return PVBOXSERVICECTRLTHREAD Process structure if found, otherwise NULL.
1376 * @param uPID PID to search for.
1377 */
1378PVBOXSERVICECTRLTHREAD VBoxServiceControlExecFindProcess(uint32_t uPID)
1379{
1380 PVBOXSERVICECTRLTHREAD pNode;
1381 bool fFound = false;
1382 RTListForEach(&g_GuestControlExecThreads, pNode, VBOXSERVICECTRLTHREAD, Node)
1383 {
1384 if ( pNode->fStarted
1385 && pNode->enmType == kVBoxServiceCtrlThreadDataExec)
1386 {
1387 PVBOXSERVICECTRLTHREADDATAEXEC pData = (PVBOXSERVICECTRLTHREADDATAEXEC)pNode->pvData;
1388 if (pData && pData->uPID == uPID)
1389 {
1390 return pNode;
1391 }
1392 }
1393 }
1394 return NULL;
1395}
1396
1397
1398/**
1399 * Thread main routine for a started process.
1400 *
1401 * @return IPRT status code.
1402 * @param RTTHREAD Pointer to the thread's data.
1403 * @param void* User-supplied argument pointer.
1404 *
1405 */
1406static DECLCALLBACK(int) VBoxServiceControlExecThread(RTTHREAD ThreadSelf, void *pvUser)
1407{
1408 PVBOXSERVICECTRLTHREAD pThread = (VBOXSERVICECTRLTHREAD*)pvUser;
1409 AssertPtr(pThread);
1410 return VBoxServiceControlExecProcessWorker(pThread);
1411}
1412
1413
1414/**
1415 * TODO
1416 *
1417 * @return int
1418 * @param uContextID
1419 * @param pszCmd
1420 * @param uFlags
1421 * @param pszArgs
1422 * @param uNumArgs
1423 * @param pszEnv
1424 * @param cbEnv
1425 * @param uNumEnvVars
1426 * @param pszUser
1427 * @param pszPassword
1428 * @param uTimeLimitMS
1429 */
1430int VBoxServiceControlExecProcess(uint32_t uContextID, const char *pszCmd, uint32_t uFlags,
1431 const char *pszArgs, uint32_t uNumArgs,
1432 const char *pszEnv, uint32_t cbEnv, uint32_t uNumEnvVars,
1433 const char *pszUser, const char *pszPassword, uint32_t uTimeLimitMS)
1434{
1435 PVBOXSERVICECTRLTHREAD pThread = (PVBOXSERVICECTRLTHREAD)RTMemAlloc(sizeof(VBOXSERVICECTRLTHREAD));
1436
1437 int rc;
1438 if (pThread)
1439 {
1440 rc = VBoxServiceControlExecAllocateThreadData(pThread,
1441 uContextID,
1442 pszCmd, uFlags,
1443 pszArgs, uNumArgs,
1444 pszEnv, cbEnv, uNumEnvVars,
1445 pszUser, pszPassword,
1446 uTimeLimitMS);
1447 if (RT_SUCCESS(rc))
1448 {
1449 rc = RTThreadCreate(&pThread->Thread, VBoxServiceControlExecThread,
1450 (void *)(PVBOXSERVICECTRLTHREAD*)pThread, 0,
1451 RTTHREADTYPE_DEFAULT, RTTHREADFLAGS_WAITABLE, "Exec");
1452 if (RT_FAILURE(rc))
1453 {
1454 VBoxServiceError("ControlExec: RTThreadCreate failed, rc=%Rrc\n, pThread=%p\n",
1455 rc, pThread);
1456 }
1457 else
1458 {
1459 VBoxServiceVerbose(4, "ControlExec: Waiting for thread to initialize ...\n");
1460
1461 /* Wait for the thread to initialize. */
1462 RTThreadUserWait(pThread->Thread, 60 * 1000);
1463 if (pThread->fShutdown)
1464 {
1465 VBoxServiceError("ControlExec: Thread for process \"%s\" failed to start!\n", pszCmd);
1466 rc = VERR_GENERAL_FAILURE;
1467 }
1468 else
1469 {
1470 pThread->fStarted = true;
1471 /*rc =*/ RTListAppend(&g_GuestControlExecThreads, &pThread->Node);
1472 }
1473 }
1474
1475 if (RT_FAILURE(rc))
1476 VBoxServiceControlExecDestroyThreadData((PVBOXSERVICECTRLTHREADDATAEXEC)pThread->pvData);
1477 }
1478 if (RT_FAILURE(rc))
1479 RTMemFree(pThread);
1480 }
1481 else
1482 rc = VERR_NO_MEMORY;
1483 return rc;
1484}
1485
1486
1487/**
1488 * TODO
1489 *
1490 * @return IPRT status code.
1491 * @param u32ClientId
1492 * @param uNumParms
1493 */
1494int VBoxServiceControlExecHandleCmdStartProcess(uint32_t u32ClientId, uint32_t uNumParms)
1495{
1496 uint32_t uContextID;
1497 char szCmd[_1K];
1498 uint32_t uFlags;
1499 char szArgs[_1K];
1500 uint32_t uNumArgs;
1501 char szEnv[_64K];
1502 uint32_t cbEnv = sizeof(szEnv);
1503 uint32_t uNumEnvVars;
1504 char szUser[128];
1505 char szPassword[128];
1506 uint32_t uTimeLimitMS;
1507
1508#if 0 /* for valgrind */
1509 RT_ZERO(szCmd);
1510 RT_ZERO(szArgs);
1511 RT_ZERO(szEnv);
1512 RT_ZERO(szUser);
1513 RT_ZERO(szPassword);
1514#endif
1515
1516 if (uNumParms != 11)
1517 return VERR_INVALID_PARAMETER;
1518
1519 int rc = VbglR3GuestCtrlExecGetHostCmd(u32ClientId,
1520 uNumParms,
1521 &uContextID,
1522 /* Command */
1523 szCmd, sizeof(szCmd),
1524 /* Flags */
1525 &uFlags,
1526 /* Arguments */
1527 szArgs, sizeof(szArgs), &uNumArgs,
1528 /* Environment */
1529 szEnv, &cbEnv, &uNumEnvVars,
1530 /* Credentials */
1531 szUser, sizeof(szUser),
1532 szPassword, sizeof(szPassword),
1533 /* Timelimit */
1534 &uTimeLimitMS);
1535 if (RT_FAILURE(rc))
1536 {
1537 VBoxServiceError("ControlExec: Failed to retrieve exec start command! Error: %Rrc\n", rc);
1538 }
1539 else
1540 {
1541 rc = VBoxServiceControlExecProcess(uContextID, szCmd, uFlags, szArgs, uNumArgs,
1542 szEnv, cbEnv, uNumEnvVars,
1543 szUser, szPassword, uTimeLimitMS);
1544 }
1545
1546 VBoxServiceVerbose(3, "ControlExec: VBoxServiceControlExecHandleCmdStartProcess returned with %Rrc\n", rc);
1547 return rc;
1548}
1549
1550
1551/**
1552 * Handles input for the started process by copying the received data into its
1553 * stdin pipe.
1554 *
1555 * @returns IPRT status code.
1556 * @param u32ClientId idClient The HGCM client session ID.
1557 * @param uNumParms cParms The number of parameters the host is
1558 * offering.
1559 */
1560int VBoxServiceControlExecHandleCmdSetInput(uint32_t u32ClientId, uint32_t uNumParms)
1561{
1562 uint32_t uContextID;
1563 uint32_t uPID;
1564 uint32_t uFlags;
1565 uint8_t abBuffer[_64K];
1566 uint32_t cbSize;
1567
1568 if (uNumParms != 5)
1569 return VERR_INVALID_PARAMETER;
1570
1571 /*
1572 * Ask the host for the input data.
1573 */
1574 int rc = VbglR3GuestCtrlExecGetHostCmdInput(u32ClientId, uNumParms,
1575 &uContextID, &uPID, &uFlags,
1576 abBuffer, sizeof(abBuffer), &cbSize);
1577 if (RT_FAILURE(rc))
1578 {
1579 VBoxServiceError("ControlExec: Failed to retrieve exec input command! Error: %Rrc\n", rc);
1580 }
1581 else if ( cbSize <= 0
1582 || cbSize > sizeof(abBuffer))
1583 {
1584 VBoxServiceError("ControlExec: Input size is invalid! cbSize=%u\n", cbSize);
1585 rc = VERR_INVALID_PARAMETER;
1586 }
1587 else
1588 {
1589 /*
1590 * Resolve the PID.
1591 */
1592#ifdef DEBUG
1593 VBoxServiceVerbose(4, "ControlExec: Input (PID %u) received: cbSize=%u\n", uPID, cbSize);
1594#endif
1595 PVBOXSERVICECTRLTHREAD pNode = VBoxServiceControlExecFindProcess(uPID);
1596 if (pNode)
1597 {
1598 PVBOXSERVICECTRLTHREADDATAEXEC pData = (PVBOXSERVICECTRLTHREADDATAEXEC)pNode->pvData;
1599 AssertPtr(pData);
1600
1601 /*
1602 * Is this the last input block we need to deliver? Then let the pipe know ...
1603 */
1604 bool fPendingClose = false;
1605 if (uFlags & INPUT_FLAG_EOF)
1606 fPendingClose = true;
1607#ifdef DEBUG
1608 if (fPendingClose)
1609 VBoxServiceVerbose(4, "ControlExec: Got last input block ...\n");
1610#endif
1611 /*
1612 * Feed the data to the pipe.
1613 */
1614 uint32_t cbWritten;
1615 rc = VBoxServiceControlExecWritePipeBuffer(&pData->stdIn, abBuffer, cbSize, fPendingClose, &cbWritten);
1616#ifdef DEBUG
1617 VBoxServiceVerbose(4, "ControlExec: Written to StdIn buffer (PID %u): rc=%Rrc, uFlags=0x%x, cbAlloc=%u, cbSize=%u, cbOffset=%u\n",
1618 uPID, rc, uFlags,
1619 pData->stdIn.cbAllocated, pData->stdIn.cbSize, pData->stdIn.cbOffset);
1620#endif
1621 uint32_t uStatus = INPUT_STS_UNDEFINED;
1622 if (RT_SUCCESS(rc))
1623 {
1624 if (cbWritten) /* Did we write something? */
1625 {
1626 uStatus = INPUT_STS_WRITTEN;
1627 uFlags = 0;
1628 }
1629 }
1630 else
1631 {
1632 if (rc == VERR_BAD_PIPE)
1633 uStatus = INPUT_STS_TERMINATED;
1634 else if (rc == VERR_BUFFER_OVERFLOW)
1635 uStatus = INPUT_STS_OVERFLOW;
1636 else
1637 {
1638 uStatus = INPUT_STS_ERROR;
1639 uFlags = rc;
1640 }
1641 }
1642
1643 if (uStatus > INPUT_STS_UNDEFINED)
1644 {
1645 /* Note: Since the context ID is unique the request *has* to be completed here,
1646 * regardless whether we got data or not! Otherwise the progress object
1647 * on the host never will get completed! */
1648 rc = VbglR3GuestCtrlExecReportStatusIn(u32ClientId, uContextID, uPID,
1649 uStatus, uFlags, (uint32_t)cbWritten);
1650 }
1651 }
1652 else
1653 rc = VERR_NOT_FOUND; /* PID not found! */
1654 }
1655 VBoxServiceVerbose(3, "ControlExec: VBoxServiceControlExecHandleCmdSetInput returned with %Rrc\n", rc);
1656 return rc;
1657}
1658
1659
1660/**
1661 *
1662 *
1663 * @return IPRT status code.
1664 * @param u32ClientId
1665 * @param uNumParms
1666 */
1667int VBoxServiceControlExecHandleCmdGetOutput(uint32_t u32ClientId, uint32_t uNumParms)
1668{
1669 uint32_t uContextID;
1670 uint32_t uPID;
1671 uint32_t uHandleID;
1672 uint32_t uFlags;
1673
1674 int rc = VbglR3GuestCtrlExecGetHostCmdOutput(u32ClientId, uNumParms,
1675 &uContextID, &uPID, &uHandleID, &uFlags);
1676 if (RT_FAILURE(rc))
1677 {
1678 VBoxServiceError("ControlExec: Failed to retrieve exec output command! Error: %Rrc\n", rc);
1679 }
1680 else
1681 {
1682 PVBOXSERVICECTRLTHREAD pNode = VBoxServiceControlExecFindProcess(uPID);
1683 if (pNode)
1684 {
1685 PVBOXSERVICECTRLTHREADDATAEXEC pData = (PVBOXSERVICECTRLTHREADDATAEXEC)pNode->pvData;
1686 AssertPtr(pData);
1687
1688 const uint32_t cbSize = _4K;
1689 uint32_t cbRead = cbSize;
1690 uint8_t *pBuf = (uint8_t*)RTMemAlloc(cbSize);
1691 if (pBuf)
1692 {
1693 /** @todo Use uHandleID to distinguish between stdout/stderr! */
1694 rc = VBoxServiceControlExecReadPipeBufferContent(&pData->stdOut, pBuf, cbSize, &cbRead);
1695 if (RT_SUCCESS(rc))
1696 {
1697 /* Note: Since the context ID is unique the request *has* to be completed here,
1698 * regardless whether we got data or not! Otherwise the progress object
1699 * on the host never will get completed! */
1700 /* cbRead now contains actual size. */
1701 rc = VbglR3GuestCtrlExecSendOut(u32ClientId, uContextID, uPID, 0 /* Handle ID */, 0 /* Flags */,
1702 pBuf, cbRead);
1703 }
1704 RTMemFree(pBuf);
1705 }
1706 else
1707 rc = VERR_NO_MEMORY;
1708 }
1709 else
1710 rc = VERR_NOT_FOUND; /* PID not found! */
1711 }
1712 VBoxServiceVerbose(3, "ControlExec: VBoxServiceControlExecHandleCmdGetOutput returned with %Rrc\n", rc);
1713 return rc;
1714}
1715
Note: See TracBrowser for help on using the repository browser.

© 2024 Oracle Support Privacy / Do Not Sell My Info Terms of Use Trademark Policy Automated Access Etiquette