From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Delivered-To: caml-list@yquem.inria.fr Received: from concorde.inria.fr (concorde.inria.fr [192.93.2.39]) by yquem.inria.fr (Postfix) with ESMTP id 13BE2BB91 for ; Sat, 29 Jan 2005 13:00:13 +0100 (CET) Received: from pauillac.inria.fr (pauillac.inria.fr [128.93.11.35]) by concorde.inria.fr (8.13.0/8.13.0) with ESMTP id j0TC0CZh004792 for ; Sat, 29 Jan 2005 13:00:12 +0100 Received: from concorde.inria.fr (concorde.inria.fr [192.93.2.39]) by pauillac.inria.fr (8.7.6/8.7.3) with ESMTP id NAA29271 for ; Sat, 29 Jan 2005 13:00:12 +0100 (MET) Received: from furbychan.cocan.org (furbychan.cocan.org [80.68.91.176]) by concorde.inria.fr (8.13.0/8.13.0) with ESMTP id j0TC0B2N004783 (version=TLSv1/SSLv3 cipher=EDH-RSA-DES-CBC3-SHA bits=168 verify=NO) for ; Sat, 29 Jan 2005 13:00:12 +0100 Received: from rich by furbychan.cocan.org with local (Exim 3.35 #1 (Debian)) id 1CurGs-000210-00 for ; Sat, 29 Jan 2005 12:00:10 +0000 Date: Sat, 29 Jan 2005 12:00:10 +0000 To: caml-list@inria.fr Subject: Copying strings which may contain NUL chars Message-ID: <20050129120009.GA7721@furbychan.cocan.org> Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Disposition: inline User-Agent: Mutt/1.3.28i From: Richard Jones X-Miltered: at concorde with ID 41FB7ACC.000 by Joe's j-chkmail (http://j-chkmail.ensmp.fr)! X-Miltered: at concorde with ID 41FB7ACB.000 by Joe's j-chkmail (http://j-chkmail.ensmp.fr)! X-Spam: no; 0.00; camlprim:01 camlparam:01 val:01 char:01 alloc:01 memcpy:01 val:01 camlreturn:01 notepad:01 strings:01 caml:02 caml:02 len:02 len:02 string:03 X-Spam-Checker-Version: SpamAssassin 3.0.0 (2004-09-13) on yquem.inria.fr X-Spam-Status: No, score=0.0 required=5.0 tests=none autolearn=disabled version=3.0.0 X-Spam-Level: Is this code safe? hv_iterkey returns a string and a length, but the string may contain ASCII NUL characters, and hence I cannot use caml_copy_string directly. Rich. CAMLprim value perl4caml_hv_iterkey (value hev) { CAMLparam1 (hev); CAMLlocal1 (strv); HE *he = He_val (hev); I32 len; char *str = hv_iterkey (he, &len); strv = caml_alloc_string (len); memcpy (String_val (strv), str, len); CAMLreturn (strv); } -- Richard Jones, CTO Merjis Ltd. Merjis - web marketing and technology - http://merjis.com Team Notepad - intranets and extranets for business - http://team-notepad.com