More OS X debugging.
[dcpomatic.git] / src / lib / cross.cc
1 /*
2     Copyright (C) 2012 Carl Hetherington <cth@carlh.net>
3
4     This program is free software; you can redistribute it and/or modify
5     it under the terms of the GNU General Public License as published by
6     the Free Software Foundation; either version 2 of the License, or
7     (at your option) any later version.
8
9     This program is distributed in the hope that it will be useful,
10     but WITHOUT ANY WARRANTY; without even the implied warranty of
11     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12     GNU General Public License for more details.
13
14     You should have received a copy of the GNU General Public License
15     along with this program; if not, write to the Free Software
16     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
17
18 */
19
20 #include <fstream>
21 #include <boost/algorithm/string.hpp>
22 #include "cross.h"
23 #include "compose.hpp"
24 #include "log.h"
25 #ifdef DCPOMATIC_LINUX
26 #include <unistd.h>
27 #include <mntent.h>
28 #endif
29 #ifdef DCPOMATIC_WINDOWS
30 #include <windows.h>
31 #undef DATADIR
32 #include <shlwapi.h>
33 #endif
34 #ifdef DCPOMATIC_OSX
35 #include <sys/sysctl.h>
36 #include <mach-o/dyld.h>
37 #endif
38 #include "exceptions.h"
39
40 using std::pair;
41 using std::list;
42 using std::ifstream;
43 using std::string;
44 using std::wstring;
45 using std::make_pair;
46 using boost::shared_ptr;
47
48 void
49 dcpomatic_sleep (int s)
50 {
51 #ifdef DCPOMATIC_POSIX
52         sleep (s);
53 #endif
54 #ifdef DCPOMATIC_WINDOWS
55         Sleep (s * 1000);
56 #endif
57 }
58
59 /** @return A string of CPU information (model name etc.) */
60 string
61 cpu_info ()
62 {
63         string info;
64         
65 #ifdef DCPOMATIC_LINUX
66         ifstream f ("/proc/cpuinfo");
67         while (f.good ()) {
68                 string l;
69                 getline (f, l);
70                 if (boost::algorithm::starts_with (l, "model name")) {
71                         string::size_type const c = l.find (':');
72                         if (c != string::npos) {
73                                 info = l.substr (c + 2);
74                         }
75                 }
76         }
77 #endif
78
79 #ifdef DCPOMATIC_OSX
80         char buffer[64];
81         size_t N = sizeof (buffer);
82         if (sysctlbyname ("machdep.cpu.brand_string", buffer, &N, 0, 0) == 0) {
83                 info = buffer;
84         }
85 #endif          
86
87 #ifdef DCPOMATIC_WINDOWS
88         HKEY key;
89         if (RegOpenKeyEx (HKEY_LOCAL_MACHINE, L"HARDWARE\\DESCRIPTION\\System\\CentralProcessor\\0", 0, KEY_READ, &key) != ERROR_SUCCESS) {
90                 return info;
91         }
92
93         DWORD type;
94         DWORD data;
95         if (RegQueryValueEx (key, L"ProcessorNameString", 0, &type, 0, &data) != ERROR_SUCCESS) {
96                 return info;
97         }
98
99         if (type != REG_SZ) {
100                 return info;
101         }
102
103         wstring value (data / sizeof (wchar_t), L'\0');
104         if (RegQueryValueEx (key, L"ProcessorNameString", 0, 0, reinterpret_cast<LPBYTE> (&value[0]), &data) != ERROR_SUCCESS) {
105                 RegCloseKey (key);
106                 return info;
107         }
108
109         info = string (value.begin(), value.end());
110         
111         RegCloseKey (key);
112
113 #endif  
114         
115         return info;
116 }
117
118 #ifdef DCPOMATIC_OSX
119 /** @return Path of the Contents directory in the .app */
120 boost::filesystem::path
121 app_contents ()
122 {
123         uint32_t size = 1024;
124         char buffer[size];
125         if (_NSGetExecutablePath (buffer, &size)) {
126                 throw StringError ("_NSGetExecutablePath failed");
127         }
128         
129         boost::filesystem::path path (buffer);
130         path = boost::filesystem::canonical (path);
131         std::cout << "start " << path << "\n";
132         path = path.parent_path ();
133         std::cout << "then " << path << "\n";
134         path = path.parent_path ();
135         std::cout << "and then " << path << "\n";
136         return path;
137 }
138 #endif
139
140 void
141 run_ffprobe (boost::filesystem::path content, boost::filesystem::path out, shared_ptr<Log> log)
142 {
143 #ifdef DCPOMATIC_WINDOWS
144         SECURITY_ATTRIBUTES security;
145         security.nLength = sizeof (security);
146         security.bInheritHandle = TRUE;
147         security.lpSecurityDescriptor = 0;
148
149         HANDLE child_stderr_read;
150         HANDLE child_stderr_write;
151         if (!CreatePipe (&child_stderr_read, &child_stderr_write, &security, 0)) {
152                 log->log ("ffprobe call failed (could not CreatePipe)");
153                 return;
154         }
155
156         wchar_t dir[512];
157         GetModuleFileName (GetModuleHandle (0), dir, sizeof (dir));
158         PathRemoveFileSpec (dir);
159         SetCurrentDirectory (dir);
160
161         STARTUPINFO startup_info;
162         ZeroMemory (&startup_info, sizeof (startup_info));
163         startup_info.cb = sizeof (startup_info);
164         startup_info.hStdError = child_stderr_write;
165         startup_info.dwFlags |= STARTF_USESTDHANDLES;
166
167         wchar_t command[512];
168         wcscpy (command, L"ffprobe.exe \"");
169
170         wchar_t file[512];
171         MultiByteToWideChar (CP_UTF8, 0, content.string().c_str(), -1, file, sizeof(file));
172         wcscat (command, file);
173
174         wcscat (command, L"\"");
175
176         PROCESS_INFORMATION process_info;
177         ZeroMemory (&process_info, sizeof (process_info));
178         if (!CreateProcess (0, command, 0, 0, TRUE, CREATE_NO_WINDOW, 0, 0, &startup_info, &process_info)) {
179                 log->log ("ffprobe call failed (could not CreateProcess)");
180                 return;
181         }
182
183         FILE* o = fopen (out.string().c_str(), "w");
184         if (!o) {
185                 log->log ("ffprobe call failed (could not create output file)");
186                 return;
187         }
188
189         CloseHandle (child_stderr_write);
190
191         while (1) {
192                 char buffer[512];
193                 DWORD read;
194                 if (!ReadFile(child_stderr_read, buffer, sizeof(buffer), &read, 0) || read == 0) {
195                         break;
196                 }
197                 fwrite (buffer, read, 1, o);
198         }
199
200         fclose (o);
201
202         WaitForSingleObject (process_info.hProcess, INFINITE);
203         CloseHandle (process_info.hProcess);
204         CloseHandle (process_info.hThread);
205         CloseHandle (child_stderr_read);
206 #endif
207
208 #ifdef DCPOMATIC_LINUX 
209         string ffprobe = "ffprobe \"" + content.string() + "\" 2> \"" + out.string() + "\"";
210         log->log (String::compose ("Probing with %1", ffprobe));
211         system (ffprobe.c_str ());
212 #endif
213
214 #ifdef DCPOMATIC_OSX
215         boost::filesystem::path path = app_contents();
216         path /= "MacOS";
217         path /= "ffprobe";
218         
219         string ffprobe = path.string() + " \"" + content.string() + "\" 2> \"" + out.string() + "\"";
220         log->log (String::compose ("Probing with %1", ffprobe));
221         system (ffprobe.c_str ());
222 #endif
223 }
224
225 list<pair<string, string> >
226 mount_info ()
227 {
228         list<pair<string, string> > m;
229         
230 #ifdef DCPOMATIC_LINUX
231         FILE* f = setmntent ("/etc/mtab", "r");
232         if (!f) {
233                 return m;
234         }
235         
236         while (1) {
237                 struct mntent* mnt = getmntent (f);
238                 if (!mnt) {
239                         break;
240                 }
241
242                 m.push_back (make_pair (mnt->mnt_dir, mnt->mnt_type));
243         }
244
245         endmntent (f);
246 #endif
247
248         return m;
249 }
250
251 boost::filesystem::path
252 openssl_path ()
253 {
254 #ifdef DCPOMATIC_WINDOWS
255         wchar_t dir[512];
256         GetModuleFileName (GetModuleHandle (0), dir, sizeof (dir));
257         PathRemoveFileSpec (dir);
258         
259         boost::filesystem::path path = dir;
260         path /= "openssl.exe";
261         return path;
262 #else   
263         /* We assume that it's on the path for Linux and OS X */
264         return "openssl";
265 #endif
266
267 }