Memanggil Clojure dari Java menggunakan contoh sebenar (Clojure Quarkus)

Cabarannya

Hujung minggu lalu, saya memutuskan untuk meneroka lebih lanjut tentang cara Clojure boleh berinteraksi dengan ekosistem Java yang sedia ada, cabarannya mudah:

Buat rangka kerja web ringkas dalam Clojure menggunakan rangka kerja Quarkus sebagai asas.

Premis:

• The Quarkus tidak tahu apa yang akan dilaksanakan mengikut laluan, malah tidak berapa banyak laluan yang wujud.
• Saya sepatutnya boleh mencipta laluan dan pengendali menggunakan Clojure semudah mungkin:

(defn send-hello-world [] "Hello World")

(defn routes [] [{:method "GET"
                  :path "/hello" 
                  :handler send-hello-world}])

Beberapa takrifan:

• Quarkus: Quarkus ialah rangka kerja Java asli Kubernetes yang dibuat untuk mesin maya Java (JVM) dan kompilasi asli, mengoptimumkan Java khusus untuk bekas.
• Clojure: Merupakan bahasa pengaturcaraan yang dinamik dan bertujuan umum

Langkah 1: Mencipta apl Quarkus

Sangat mudah untuk memulakan aplikasi dalam Quarkus anda boleh mengikuti tutorial ini, kerana anda boleh melihat arahan terakhir anda ialah quarkus create && cd code-with-quarkus selepas itu anda boleh membuka folder code-with-quarkus dengan IDE kegemaran anda, arahan itu mencipta struktur asas aplikasi Quarkus, dan anda boleh menjalankan quarkus dev

Langkah 2: Dayakan projek untuk mengenali fail clj

Anda perlu mengkonfigurasi Quarkus untuk memasukkan fail .clj dalam folder sasaran (Folder dengan apl terkumpul anda), dan anda boleh melakukannya dengan menambahkan konfigurasi ini dalam pom.xml di dalam

<resources>
        <resource>
            <directory>/</directory>
            <includes>
                <include>*.clj</include>
            </includes>
        </resource>
    </resources>

Langkah 3: Buat fail Clojure

Seperti yang saya nyatakan sebelum ini, saya menentukan satu struktur untuk mengisytiharkan laluan saya, di lokasi folder utama yang sama. Kemudian saya mencipta folder bernama quarkus_clj dengan fail yang dipanggil teras dengan kod di bawah:

(ns quarkus-clj.core)

(defn send-hello-world [] "Hello World")

(defn routes [] [{:method "GET"
                  :path "/hello" 
                  :handler send-hello-world}])

Langkah 4: Membolehkan Quarkus mengendalikan program Clojure saya

Di sinilah keajaiban berlaku??!

Pertama sekali, anda harus memasang Clojure di dalam apl Quarkus anda; anda boleh melakukannya dengan menambahkan kebergantungan dalam pom.xml

<dependency>
      <groupId>org.clojure</groupId>
        <artifactId>clojure</artifactId>
        <version>1.11.1</version> 
</dependency>

Kini, anda boleh memadamkan fail GreetingResource.java dan ujiannya. Di tempat yang sama, cipta fail Starting.java

Saya menulis beberapa ulasan menerangkan cara ia berfungsi

@ApplicationScoped
public class Starting {
    //Setup app routes
    public void setupRouter(@Observes Router router) {
        // Load Clojure core;
        IFn require = Clojure.var("clojure.core", "require");
        // Load quarkus-clj.core namespace
        require.invoke(Clojure.read("quarkus-clj.core")); 

        // Load the route list function
        IFn routesFn = Clojure.var("quarkus-clj.core", "route");

        // Invoke the function with no parameters
        PersistentVector routesVector = (PersistentVector) routesFn.invoke();

        //For each route in routes vector 
        for (Object route : routesVector) {
            /**Get the route map, example
            {:method "GET"
             :path "/hello" 
             :handler send-hello-world}
             */
            PersistentArrayMap routeMap = (PersistentArrayMap) route;

            //Get :path value
            String path = (String) routeMap.valAt(Clojure.read(":path"));
            //Get :handler function
            IFn handlerRoute = (IFn) routeMap.valAt(Clojure.read(":handler"));
            //Get :method value
            String method = (String) routeMap.valAt(Clojure.read(":method"));
            //Create a handler to exec handler function
            Handler<RoutingContext> handlerFn = (RoutingContext context) -> {
            String result = (String) handlerRoute.invoke();  
            context.response().end(result);
        };
            //Config the route in quarkus
            router.route(HttpMethod.valueOf(method), path).handler(handlerFn);
        }
    }
}

Kini anda hanya boleh menjalankan: quarkus dev buka laluan anda yang diisytiharkan dan lihat hasilnya!

Kesimpulan

Ini ialah contoh pantas tentang cara menggunakan Clojure dalam apl Quarkus untuk mencipta laluan dinamik. Dengan hanya beberapa langkah, kami menyambungkan kedua-dua ekosistem dan menyediakan sistem penghalaan asas. Jangan ragu untuk mengembangkan asas ini dan terokai kemungkinan lain dengan Clojure dan Quarkus!

Atas ialah kandungan terperinci Memanggil Clojure dari Java menggunakan contoh sebenar (Clojure Quarkus). Untuk maklumat lanjut, sila ikut artikel berkaitan lain di laman web China PHP!