1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
3 * This file is part of the LibreOffice project.
5 * This Source Code Form is subject to the terms of the Mozilla Public
6 * License, v. 2.0. If a copy of the MPL was not distributed with this
7 * file, You can obtain one at http://mozilla.org/MPL/2.0/.
9 * This file incorporates work covered by the following license notice:
11 * Licensed to the Apache Software Foundation (ASF) under one or more
12 * contributor license agreements. See the NOTICE file distributed
13 * with this work for additional information regarding copyright
14 * ownership. The ASF licenses this file to you under the Apache
15 * License, Version 2.0 (the "License"); you may not use this file
16 * except in compliance with the License. You may obtain a copy of
17 * the License at http://www.apache.org/licenses/LICENSE-2.0 .
20 #if ( defined WNT ) // Windows
23 # define WIN32_LEAN_AND_MEAN
38 # include <crt_externs.h>
39 # define environ (*_NSGetEnviron())
41 extern char** environ
;
46 # define SLEEP(t) (Sleep((t)*1000))
48 # define SLEEP(t) (sleep((t)))
51 void wait_for_seconds(char* time
)
58 void w_to_a(LPCTSTR _strW
, LPSTR strA
, DWORD size
)
60 LPCWSTR strW
= reinterpret_cast<LPCWSTR
>(_strW
);
61 WideCharToMultiByte(CP_ACP
, 0, strW
, -1, strA
, size
, NULL
, NULL
);
64 void dump_env(char* file_path
)
66 LPTSTR env
= reinterpret_cast<LPTSTR
>(
67 GetEnvironmentStrings());
70 std::ofstream
file(file_path
);
73 while (size_t l
= _tcslen(reinterpret_cast<wchar_t*>(p
)))
75 w_to_a(p
, buffer
, sizeof(buffer
));
76 file
<< buffer
<< '\0';
79 FreeEnvironmentStrings(env
);
82 void dump_env(char* file_path
)
84 std::ofstream
file(file_path
);
85 for (int i
= 0; NULL
!= environ
[i
]; ++i
)
86 file
<< environ
[i
] << '\0';
90 int main(int argc
, char* argv
[])
94 if (0 == strcmp("-join", argv
[1]))
96 // coverity[tainted_data] - this is a build-time only test tool
97 wait_for_seconds(argv
[2]);
99 else if (0 == strcmp("-env", argv
[1]))
106 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */