Illumination » coding

Simple Script dengan Newlisp (2)

Maulana — Fri, 27 Feb 2009 04:11:41 +0000

Dalam postingan sebelumnya saya mencoba untuk membuat file atau directory dan juga meng-copy file, sekarang saya akan mencoba membaca suatu file. Dalam newlisp ada fungsi yang dapat digunakan untuk membuka file, yaitu

(open file-source "read")

untuk membaca file tersebut bisa menggunakan beberapa fungsi seperti read-file, read-buffer, read-char atau read-line, misalkan

(read-line input-file)

sedangkan untuk menulis suatu file juga bisa menggunakan fungsi-fungsi built-in yang disediakan seperti write-file, write-buffer, write-char atau write-line, misalkan

(write-line out-file "Hello World!")

Kita dapat membuat fungsi baru berdasarkan fungsi-fungsi tersebut untuk membuka file, membaca file tersebut kemudian menuliskan content dari file ke newlisp shell

(define (read-file-source file-source) ((set 'in-file (open file-source "read")) (while (read-line in-file) (write-line)) (close in-file)))

Setelah mencoba menggunakan fungsi-fungsi operasi file dan fungsi copy file yang telah dibuat pada postingan sebelumnya, maka akhirnya saya dapat membuat script file yang saya inginkan untuk meng-copy file-file yang ada atau didaftarkan pada suatu file

(define (copy-file-from-text-file file-text home-path dest-path) (begin (set 'in-file (open file-text "read")) (while (set 'line-read (read-line in-file)) (begin (set 'src (append home-path line-read)) (set 'dest (append dest-path line-read)) (my-copy-file src dest))) (close in-file)))

Hehehe sederhana sekali yah, memang seharusnya suatu scripting language seperti newlisp dapat digunakan dengan mudah dan sederhana mungkin tetapi tetap powerfull untuk membantu programmer menyelesaikan task-task nya.

Simple Script dengan Newlisp (1)

Maulana — Mon, 23 Feb 2009 11:13:46 +0000

Karena untuk mengupdate aplikasi java web mulai menggunakan sistem patch yaitu dengan melakukan copy file class-class baru atau fix update tidak seperti sebelumnya yaitu selalu deploy ulang aplikasinya, mulai deh kerepotan menyiapkan file-file tersebut. Permasalahannya adalah struktur direktori aplikasi web java ditambah lagi dengan struktur package-nya java sendiri terlihat cukup ribet apalagi jika harus meng-copy satu persatu file-file yang mesti dipersiapkan buat di patch ke aplikasinya.
Mulai deh mempertimbangkan buat membuat script sederhana untuk menyiapkan file-file patch tersebut, dan saya memutuskan untuk membuatnya dengan newlisp. Ada beberapa alasan mengapa saya akhirnya memutuskan menggunakan newlisp, pertama newlisp merupakan lisp/scheme-like programming language, kedua newlisp surprisingly small ketika diinstall hanya membutuhkan kurang lebih 2Mb (coba bandingkan dengan perl, python atau ruby), ketiga fungsinya lumayan lengkap dan cukup buat membantu menyelesaikan task tersebut, keempat sudah bisa GUI programming dengan memanfaatkan runtime java JRE 1.5 keatas.
Sebenernya ingin juga menulis tentang lisp dan dialectnya termasuk scheme, tetapi mungkin dilain posting aja kali yah. Focus ke newlisp lagi, kalau melihat syntax lisp/scheme-like language sepertinya terlihat aneh dan bikin sakit kepala karena kebanyakan parenthesesnya, tapi kalau sudah sering mencoba akan mulai terbiasa. Newlisp tidak seperti common lisp dimana construct programnya lebih dekat dengan scheme dan lebih simple bahkan lebih simple dari scheme sekalipun. Seperti juga lisp dan scheme, newlisp juga memiliki interaktif shell atau biasa disebut dengan REPL (read, eval, print, loop).
Balik ke script yang ingin saya buat, idenya sederhana saja yaitu copy file-file yang sudah saya daftarkan pada sebuah file. Oke langkah pertama saya membutuhkan fungsi untuk copy file, di newlisp ada fungsi yang bisa digunakan untuk copy file, yaitu

(copy-file file-src file-dest)

fungsi tersebut bisa digunakan tetapi jika file-dest terdapat path direktori pada file tujuan maka fungsi tersebut tidak bisa menghandle-nya. Berarti saya membutuhkan fungsi untuk mengambil direktori kemudian membuat direktori tersebut

(parse "path/to/a/file.txt" "/") akan me-return list ("path" "to" "a" "file.txt")

sedangkan untuk membuat direktori dari list nama direktori tersebut

(dotimes (i (- (length list-dest) 1)) (if (directory? (list-dest i)) (change-dir (list-dest i)) (begin (make-dir (list-dest i)) (change-dir (list-dest i)))))

nah berarti saya sudah bisa membuat sebuah fungsi untuk copy file dengan direktorinya

(define (my-copy-file src dest) (begin (set 'working-dir (real-path)) (set 'src-file (read-file src)) (set 'list-dest (parse dest "/")) (dotimes (i (- (length list-dest) 1)) (if (directory? (list-dest i)) (change-dir (list-dest i)) (begin (make-dir (list-dest i)) (change-dir (list-dest i))))) (write-file (last list-dest) src-file) (change-dir working-dir)))

dan saya dapat memanggilnya dengan

(my-copy-file "file.txt" "path/to/a/file.txt")

jika folder path/to/a/ belum ada maka akan di-create oleh fungsi tersebut.

to be continued…

Spring, Annotation, Transaction

Maulana — Sat, 21 Feb 2009 16:48:20 +0000

Dapet masalah lagi dengan spring framework, jadi ceritanya mau membuat modul baru di aplikasi java web yang didevelop dengan spring tetapi dengan menggunakan spring 2.5 annotation sedangkan aplikasi yang ada belum sepenuhnya menggunakan annotation. Ketika sudah jadi dan jalan modul barunya ternyata pas mengakses aplikasi yang telah ada sebelumnya malah muncul error yang intinya tidak menemukan request handlernya, padahal sebelumnya tidak pernah terjadi seperti ini. Dugaan sementara adalah karena saya menambahkan bean DefaultAnnotationHandlerMapping dan AnnotationMethodHandlerAdapter serta context:component-scan untuk mendapatkan semua bean yg menggunakan annotation seperti @Controller, @Repository dan juga @Service sedangkan sebelumnya semua bean controller, service dan dao di definisikan di servlet dispatcher dan application context xml file-nya.

Setelah mencari solusi di internet, saya coba untuk mengubah konfigurasi xml nya dan akhirnya menemukan bahwa bean AnnotationMethodHandlerAdapter menyebabkan aplikasi tersebut tidak berjalan dengan baik. Apabila bean tersebut di remove maka untuk menampilkan hasil di view akan berjalan dengan baik dan aplikasi sebelumnya juga dapat berjalan tetapi untuk create dan edit akan menyebabkan error karena bean tersebut dibutuhkan untuk @RequestMapping annotation. Sampai sekarang solusi yg tepat masih belum ditemukan, saya akhirnya mencoba membuat servlet dispatcher yg baru dengan servlet-mapping yg berbeda khusus untuk menangani aplikasi yang dibuat dengan memanfaatkan feature annotation-nya spring dan it works!.

Masalah lainnya yang muncul adalah permasalahan transaction, ternyata konfigurasi bean transaction yang ada sebelumnya tiba-tiba saja membuat error ketika save atau update yang error stack-nya menyatakan untuk me-remove readOnly dari definisi transaction-nya atau mengganti FlushMode.NEVER/MANUAL menjadi FlushMode.COMMIT/AUTO. Tapi sayangnya ngga ada setting-an readOnly sama FlushMode di defini bean transaction-nya, balik lagi cari solusi di internet ternyata ada yg mirip dengan permasalahan saya tersebut, solusinya adalah mengubah urutan definisi bean-nya menjadi Security stuff, Transaction stuff kemudian baru bean-bean lainnya. Pas saya cek kembali konfigurasi xml nya sepertinya sih ngga ada masalah, dugaan saya adalah saya belum me-remove konfigurasi dan bean-bean terkait dengan annotation padahal untuk aplikasi spring annotation sudah dipindahkan ke dispatcher servlet yang baru akhirnya setelah dihilangkan aplikasinya bisa berjalan kembali.

Alhamdulillah, walaupun banyak permasalahan yang dihadapi akan tetapi sampai saat ini saya masih diberikan jalan keluarnya, baru sadar juga aplikasi tersebut sudah cukup kompleks saja dijalankan di laptop sudah terasa banget apalagi kalau tiba-tiba saja muncul bug-bug baru >.< agak susah membereskannya.