From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Park SungMin Newsgroups: gmane.lisp.guile.user Subject: filename(CJK utf8) problem on OSX. Date: Mon, 28 Mar 2016 10:21:46 +0900 Message-ID: NNTP-Posting-Host: plane.gmane.org Mime-Version: 1.0 (Mac OS X Mail 9.2 \(3112\)) Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable X-Trace: ger.gmane.org 1459128146 7214 80.91.229.3 (28 Mar 2016 01:22:26 GMT) X-Complaints-To: usenet@ger.gmane.org NNTP-Posting-Date: Mon, 28 Mar 2016 01:22:26 +0000 (UTC) To: guile-user@gnu.org Original-X-From: guile-user-bounces+guile-user=m.gmane.org@gnu.org Mon Mar 28 03:22:18 2016 Return-path: Envelope-to: guile-user@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by plane.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1akLsl-0004q7-SR for guile-user@m.gmane.org; Mon, 28 Mar 2016 03:22:16 +0200 Original-Received: from localhost ([::1]:38799 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1akLsk-0008DZ-Ta for guile-user@m.gmane.org; Sun, 27 Mar 2016 21:22:14 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:58126) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1akLsa-0008DC-4j for guile-user@gnu.org; Sun, 27 Mar 2016 21:22:04 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1akLsV-0007m5-4z for guile-user@gnu.org; Sun, 27 Mar 2016 21:22:04 -0400 Original-Received: from pv33p04im-asmtp002.me.com ([17.143.181.11]:41885) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1akLsU-0007lP-SQ for guile-user@gnu.org; Sun, 27 Mar 2016 21:21:59 -0400 Original-Received: from [192.168.0.5] (unknown [110.11.250.108]) by pv33p04im-asmtp002.me.com (Oracle Communications Messaging Server 7.0.5.36.0 64bit (built Sep 8 2015)) with ESMTPSA id <0O4Q00H1Y6GBMA10@pv33p04im-asmtp002.me.com> for guile-user@gnu.org; Mon, 28 Mar 2016 01:21:50 +0000 (GMT) X-Proofpoint-Virus-Version: vendor=fsecure engine=2.50.10432:,, definitions=2016-03-28_03:,, signatures=0 X-Proofpoint-Spam-Details: rule=notspam policy=default score=0 spamscore=0 clxscore=1015 suspectscore=1 malwarescore=0 phishscore=0 adultscore=0 bulkscore=0 classifier=spam adjust=0 reason=mlx scancount=1 engine=8.0.1-1510270003 definitions=main-1603280019 X-Mailer: Apple Mail (2.3112) X-detected-operating-system: by eggs.gnu.org: GNU/Linux 3.x X-Received-From: 17.143.181.11 X-BeenThere: guile-user@gnu.org X-Mailman-Version: 2.1.14 Precedence: list List-Id: General Guile related discussions List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guile-user-bounces+guile-user=m.gmane.org@gnu.org Original-Sender: guile-user-bounces+guile-user=m.gmane.org@gnu.org Xref: news.gmane.org gmane.lisp.guile.user:12500 Archived-At: follow code=E2=80=A6.. I just test openfile(CJK filename). "open-file" and "call-with-input-file" are raise error. so I test use = low C(Posix) API, then run ok! I don=E2=80=99t know is it bug? or option problem? =20 (use-modules (rnrs io ports) (rnrs bytevectors) (system foreign) (ice-9 rdelim)) (fluid-set! %default-port-encoding "utf-8") (set-port-encoding! (current-output-port) "utf-8") (set-port-encoding! (current-input-port) "utf-8") (define filename "/Users/byul/Desktop/=EC=82=AC=EC=A7=84.gif") (define my-open-file (lambda (filename) (let* ((fd ((pointer->procedure int (dynamic-func "open" (dynamic-link)) (list '* int)) (bytevector->pointer (string->utf8 filename)) O_RDONLY))) (when (=3D fd -1) (throw 'can't-find-file)) (fdes->inport fd)))) (define port (my-open-file filename)) (get-bytevector-n port 10) ;; OK. I get bytevector. ;;but=E2=80=A6. (file-exists? filename) ;; #f (open-file filename "r") ; ERROR: In procedure open-file: No such file = or directory: "/Users/byul/Desktop/=EC=82=AC=EC=A7=84.gif"