Add mirror opencv chapel working.

Author: Iainmon

demos/video/style-transfer/build.sh

@@ -1,3 +1,7 @@
-/usr/bin/clang++ -std=c++20 -c -fPIC mirror.cpp -o mirror.o -I ../../../libtorch/include -I ../../../libtorch/include/torch/csrc/api/include $(pkg-config --cflags --libs opencv4) -L ../../../libtorch/lib -ltorch -ltorch_cpu -lc10 -ltorch_global_deps
+# /usr/bin/clang++ -std=c++20 -c -fPIC mirror.cpp -o mirror.o -I ../../../libtorch/include -I ../../../libtorch/include/torch/csrc/api/include $(pkg-config --cflags --libs opencv4) -L ../../../libtorch/lib -ltorch -ltorch_cpu -lc10 -ltorch_global_deps
+# /usr/bin/clang++ -shared -o libmirror.dylib mirror.o -I ../../../libtorch/include -I ../../../libtorch/include/torch/csrc/api/include $(pkg-config --cflags --libs opencv4) -L ../../../libtorch/lib -ltorch -ltorch_cpu -lc10 -ltorch_global_deps
 
-/usr/bin/clang++ -shared -o libmirror.dylib mirror.o -I ../../../libtorch/include -I ../../../libtorch/include/torch/csrc/api/include $(pkg-config --cflags --libs opencv4) -L ../../../libtorch/lib -ltorch -ltorch_cpu -lc10 -ltorch_global_deps
+# /usr/bin/clang++ -std=c++20 -c -fPIC mirror.cpp -o mirror.o $(pkg-config --cflags --libs opencv4)
+
+g++ -std=c++20 -c -fPIC mirror.cpp -o mirror.o $(pkg-config --cflags opencv4)
+chpl mirror.h mirror.o mirror.chpl --fast --print-commands --ldflags $(pkg-config --cflags --libs opencv4) -lstdc++

demos/video/style-transfer/libmirror.dylib

@@ -1,13 +1,22 @@
 
 use CTypes;
 
-require "mirror.h", "-lmirror";
+// require "mirror.h", "-lmirror";
+// require "mirror.h libmirror.a";
+// require "mirror.h";
 
-extern proc run_mirror(): void;
+// require "mirror.h", "mirror.o";
+
+// g++ -std=c++17 -O2 -fPIC -c mirror.cpp -o mirror.o $(pkg-config --cflags --libs opencv4)
+// chpl mirror.h mirror.o mirror.chpl --print-commands --ldflags $(pkg-config --cflags --libs opencv4)
+
+extern proc run_mirror(): int;
 
 
 proc main(args: [] string) {
     writeln("Hello, world!");
 
-    run_mirror();
+    var x = run_mirror();
+    writeln("x: ", x);
+    writeln("Done!");
 }

demos/video/style-transfer/mirror.chpl

@@ -1,26 +1,62 @@
+#include "mirror.h"
+
 #include <opencv2/opencv.hpp>
 #include <iostream>
-#include "mirror.h"
 
-extern "C" void run_mirror() {
-    cv::VideoCapture cap(0); // Open the default camera (0)
+// extern "C" void run_mirror() asm ("run_mirror");
+extern "C" int run_mirror(void) {
+    // cv::VideoCapture cap(0); // Open the default camera (0)
+    // if (!cap.isOpened()) {
+    //     std::cerr << "Error: Could not open camera." << std::endl;
+    // }
+
+    // cv::Mat frame;
+    // while (true) {
+    //     cap >> frame; // Capture a new frame
+    //     if (frame.empty()) {
+    //         std::cerr << "Error: Could not capture frame." << std::endl;
+    //         break;
+    //     }
+
+    //     cv::imshow("Webcam", frame); // Display the captured frame
+    //     if (cv::waitKey(30) >= 0) break; // Exit on any key press
+    // }
+
+    // cap.release(); // Release the camera
+    // cv::destroyAllWindows(); // Close all OpenCV windows
+
+    cv::VideoCapture cap(0);
     if (!cap.isOpened()) {
-        std::cerr << "Error: Could not open camera." << std::endl;
+        std::cerr << "Error: Could not open webcam" << std::endl;
+        return -1;
     }
 
     cv::Mat frame;
+    const std::string window_name = "Webcam";
+
+    // Create a window to display the video
+    cv::namedWindow(window_name, cv::WINDOW_AUTOSIZE);
+
     while (true) {
-        cap >> frame; // Capture a new frame
+        // Capture a new frame from the camera
+        cap >> frame;
         if (frame.empty()) {
-            std::cerr << "Error: Could not capture frame." << std::endl;
+            std::cerr << "Error: Blank frame grabbed" << std::endl;
             break;
         }
 
-        cv::imshow("Webcam", frame); // Display the captured frame
-        if (cv::waitKey(30) >= 0) break; // Exit on any key press
+        // Show the frame in the window
+        cv::imshow(window_name, frame);
+
+        // Wait for 30ms. Exit if any key is pressed.
+        if (cv::waitKey(30) >= 0) break;
     }
 
-    cap.release(); // Release the camera
-    cv::destroyAllWindows(); // Close all OpenCV windows
+    // Release the camera and destroy the window
+    cap.release();
+    cv::destroyAllWindows();
+
+    return 0;
+
 }
 

demos/video/style-transfer/mirror.cpp

@@ -1,15 +1,15 @@
 
-#ifndef MIRROR_H
-#define MIRROR_H
+// #ifndef MIRROR_H
+// #define MIRROR_H
 
 #ifdef __cplusplus
 extern "C" {
 #endif
 
-void run_mirror();
+int run_mirror(void);
 
 #ifdef __cplusplus
 }
 #endif
 
-#endif // MIRROR_H
+// #endif // MIRROR_H

demos/video/style-transfer/mirror.h

@@ -0,0 +1,6 @@
+#include "mirror.h"
+
+int main() {
+    run_mirror();
+    return 1;
+}