From mboxrd@z Thu Jan  1 00:00:00 1970
Path: news.gmane.org!not-for-mail
From: Eli Zaretskii <eliz@gnu.org>
Newsgroups: gmane.lisp.guile.user
Subject: Re: filename(CJK utf8) problem on OSX.
Date: Mon, 28 Mar 2016 18:07:42 +0300
Message-ID: <83vb46y729.fsf@gnu.org>
References: <D96207EF-D334-4742-90BF-0A48CC64A4A4@icloud.com>
Reply-To: Eli Zaretskii <eliz@gnu.org>
NNTP-Posting-Host: plane.gmane.org
Mime-Version: 1.0
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: 8bit
X-Trace: ger.gmane.org 1459177712 19196 80.91.229.3 (28 Mar 2016 15:08:32 GMT)
X-Complaints-To: usenet@ger.gmane.org
NNTP-Posting-Date: Mon, 28 Mar 2016 15:08:32 +0000 (UTC)
Cc: guile-user@gnu.org
To: Park SungMin <byulparan_eng@icloud.com>
Original-X-From: guile-user-bounces+guile-user=m.gmane.org@gnu.org Mon Mar 28 17:08:23 2016
Return-path: <guile-user-bounces+guile-user=m.gmane.org@gnu.org>
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 <guile-user-bounces+guile-user=m.gmane.org@gnu.org>)
	id 1akYmD-0001wo-0Z
	for guile-user@m.gmane.org; Mon, 28 Mar 2016 17:08:21 +0200
Original-Received: from localhost ([::1]:41246 helo=lists.gnu.org)
	by lists.gnu.org with esmtp (Exim 4.71)
	(envelope-from <guile-user-bounces+guile-user=m.gmane.org@gnu.org>)
	id 1akYmB-00056n-NG
	for guile-user@m.gmane.org; Mon, 28 Mar 2016 11:08:19 -0400
Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:40923)
	by lists.gnu.org with esmtp (Exim 4.71)
	(envelope-from <eliz@gnu.org>) id 1akYm0-00055c-29
	for guile-user@gnu.org; Mon, 28 Mar 2016 11:08:11 -0400
Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
	(envelope-from <eliz@gnu.org>) id 1akYlu-0001dt-Eu
	for guile-user@gnu.org; Mon, 28 Mar 2016 11:08:08 -0400
Original-Received: from fencepost.gnu.org ([2001:4830:134:3::e]:55818)
	by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from <eliz@gnu.org>)
	id 1akYlu-0001dp-Bx; Mon, 28 Mar 2016 11:08:02 -0400
Original-Received: from 84.94.185.246.cable.012.net.il ([84.94.185.246]:4691
	helo=home-c4e4a596f7)
	by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_128_CBC_SHA1:128)
	(Exim 4.82) (envelope-from <eliz@gnu.org>)
	id 1akYlt-0000SX-7G; Mon, 28 Mar 2016 11:08:01 -0400
In-reply-to: <D96207EF-D334-4742-90BF-0A48CC64A4A4@icloud.com> (message from
	Park SungMin on Mon, 28 Mar 2016 10:21:46 +0900)
X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic]
X-Received-From: 2001:4830:134:3::e
X-BeenThere: guile-user@gnu.org
X-Mailman-Version: 2.1.14
Precedence: list
List-Id: General Guile related discussions <guile-user.gnu.org>
List-Unsubscribe: <https://lists.gnu.org/mailman/options/guile-user>,
	<mailto:guile-user-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/archive/html/guile-user>
List-Post: <mailto:guile-user@gnu.org>
List-Help: <mailto:guile-user-request@gnu.org?subject=help>
List-Subscribe: <https://lists.gnu.org/mailman/listinfo/guile-user>,
	<mailto:guile-user-request@gnu.org?subject=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:12508
Archived-At: <http://permalink.gmane.org/gmane.lisp.guile.user/12508>

> From: Park SungMin <byulparan_eng@icloud.com>
> Date: Mon, 28 Mar 2016 10:21:46 +0900
> 
> (define filename "/Users/byul/Desktop/사진.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 (= 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….
> (file-exists? filename) ;; #f
> (open-file filename "r") ; ERROR: In procedure open-file: No such file or directory: "/Users/byul/Desktop/사진.gif"

Isn't this because OS X filesystems store file names in decomposed
form?