Remove some debug code.
[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         path = path.parent_path ();
132         path = path.parent_path ();
133         return path;
134 }
135 #endif
136
137 void
138 run_ffprobe (boost::filesystem::path content, boost::filesystem::path out, shared_ptr<Log> log)
139 {
140 #ifdef DCPOMATIC_WINDOWS
141         SECURITY_ATTRIBUTES security;
142         security.nLength = sizeof (security);
143         security.bInheritHandle = TRUE;
144         security.lpSecurityDescriptor = 0;
145
146         HANDLE child_stderr_read;
147         HANDLE child_stderr_write;
148         if (!CreatePipe (&child_stderr_read, &child_stderr_write, &security, 0)) {
149                 log->log ("ffprobe call failed (could not CreatePipe)");
150                 return;
151         }
152
153         wchar_t dir[512];
154         GetModuleFileName (GetModuleHandle (0), dir, sizeof (dir));
155         PathRemoveFileSpec (dir);
156         SetCurrentDirectory (dir);
157
158         STARTUPINFO startup_info;
159         ZeroMemory (&startup_info, sizeof (startup_info));
160         startup_info.cb = sizeof (startup_info);
161         startup_info.hStdError = child_stderr_write;
162         startup_info.dwFlags |= STARTF_USESTDHANDLES;
163
164         wchar_t command[512];
165         wcscpy (command, L"ffprobe.exe \"");
166
167         wchar_t file[512];
168         MultiByteToWideChar (CP_UTF8, 0, content.string().c_str(), -1, file, sizeof(file));
169         wcscat (command, file);
170
171         wcscat (command, L"\"");
172
173         PROCESS_INFORMATION process_info;
174         ZeroMemory (&process_info, sizeof (process_info));
175         if (!CreateProcess (0, command, 0, 0, TRUE, CREATE_NO_WINDOW, 0, 0, &startup_info, &process_info)) {
176                 log->log ("ffprobe call failed (could not CreateProcess)");
177                 return;
178         }
179
180         FILE* o = fopen (out.string().c_str(), "w");
181         if (!o) {
182                 log->log ("ffprobe call failed (could not create output file)");
183                 return;
184         }
185
186         CloseHandle (child_stderr_write);
187
188         while (1) {
189                 char buffer[512];
190                 DWORD read;
191                 if (!ReadFile(child_stderr_read, buffer, sizeof(buffer), &read, 0) || read == 0) {
192                         break;
193                 }
194                 fwrite (buffer, read, 1, o);
195         }
196
197         fclose (o);
198
199         WaitForSingleObject (process_info.hProcess, INFINITE);
200         CloseHandle (process_info.hProcess);
201         CloseHandle (process_info.hThread);
202         CloseHandle (child_stderr_read);
203 #endif
204
205 #ifdef DCPOMATIC_LINUX 
206         string ffprobe = "ffprobe \"" + content.string() + "\" 2> \"" + out.string() + "\"";
207         log->log (String::compose ("Probing with %1", ffprobe));
208         system (ffprobe.c_str ());
209 #endif
210
211 #ifdef DCPOMATIC_OSX
212         boost::filesystem::path path = app_contents();
213         path /= "MacOS";
214         path /= "ffprobe";
215         
216         string ffprobe = path.string() + " \"" + content.string() + "\" 2> \"" + out.string() + "\"";
217         log->log (String::compose ("Probing with %1", ffprobe));
218         system (ffprobe.c_str ());
219 #endif
220 }
221
222 list<pair<string, string> >
223 mount_info ()
224 {
225         list<pair<string, string> > m;
226         
227 #ifdef DCPOMATIC_LINUX
228         FILE* f = setmntent ("/etc/mtab", "r");
229         if (!f) {
230                 return m;
231         }
232         
233         while (1) {
234                 struct mntent* mnt = getmntent (f);
235                 if (!mnt) {
236                         break;
237                 }
238
239                 m.push_back (make_pair (mnt->mnt_dir, mnt->mnt_type));
240         }
241
242         endmntent (f);
243 #endif
244
245         return m;
246 }
247
248 boost::filesystem::path
249 openssl_path ()
250 {
251 #ifdef DCPOMATIC_WINDOWS
252         wchar_t dir[512];
253         GetModuleFileName (GetModuleHandle (0), dir, sizeof (dir));
254         PathRemoveFileSpec (dir);
255         
256         boost::filesystem::path path = dir;
257         path /= "openssl.exe";
258         return path;
259 #else   
260         /* We assume that it's on the path for Linux and OS X */
261         return "openssl";
262 #endif
263
264 }