blob: b75723c44a98c8c188d0074618bd718fab4e9f4d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
|
/***************************************************************************
* Copyright (C) 2006 by Andras Mantia *
* [email protected] *
* *
* 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. *
* *
***************************************************************************/
#include "setuphelper.h"
#include "blockingkprocess.h"
#include "driver.h"
#include <kdebug.h>
#include "ktempfile.h" /* defines [function] KTempDir */
#include "kstandarddirs.h" /* defines [function] locateLocal */
#include "tqdir.h" /* defines TQDir */
#include <stdio.h>
namespace SetupHelper {
TQString getGccIncludePath(bool *ok)
{
*ok = true;
TQString processStdout;
BlockingKProcess proc;
proc << "gcc" ;
proc << "-print-file-name=include" ;
if ( !proc.start(KProcess::NotifyOnExit, KProcess::Stdout) ) {
kdWarning(9007) << "Couldn't start gcc" << endl;
*ok = false;
return TQString();
}
processStdout = proc.stdOut();
return processStdout;
}
TQString getVerboseGccIncludePath(bool *ok)
{
*ok = false;
///Create temp file
KTempFile tempFile(locateLocal("tmp", "tdevelop_temp"), ".cpp");
tempFile.setAutoDelete(true);
if( tempFile.status() != 0 )
return TQString();//Failed to create temp file
TQString path = tempFile.name();
TQFileInfo pathInfo( path );
char fileText[] = "//This source-file is empty";
fwrite(fileText, strlen(fileText), 1, tempFile.fstream() );
tempFile.close();
BlockingKProcess proc;
proc.setUseShell(true);
proc.setWorkingDirectory(pathInfo.dir(true).path());
proc << "gcc -v " + pathInfo.fileName() + " 2>&1";
if ( !proc.start(KProcess::NotifyOnExit, KProcess::Stdout) ) {
kdWarning(9007) << "Couldn't start gcc" << endl;
*ok = false;
return TQString();
}
*ok = true;
return proc.stdOut();
}
TQStringList getGccMacros(bool *ok)
{
*ok = true;
TQString processStdout;
BlockingKProcess proc;
proc << "gcc";
proc << "-E";
proc << "-dM";
proc << "-ansi" ;
proc << "-";
if ( !proc.start(KProcess::NotifyOnExit, KProcess::Stdout) ) {
kdWarning(9007) << "Couldn't start gcc" << endl;
*ok = false;
return TQStringList();
}
proc.closeStdin();
processStdout = proc.stdOut();
TQStringList lines = TQStringList::split('\n', processStdout);
return lines;
}
}
|
