argra****@users*****
argra****@users*****
2012年 12月 28日 (金) 19:03:38 JST
Index: docs/perl/5.14.1/perlclib.pod diff -u /dev/null docs/perl/5.14.1/perlclib.pod:1.1 --- /dev/null Fri Dec 28 19:03:38 2012 +++ docs/perl/5.14.1/perlclib.pod Fri Dec 28 19:03:38 2012 @@ -0,0 +1,395 @@ + +=encoding euc-jp + +=head1 NAME + +=begin original + +perlclib - Internal replacements for standard C library functions + +=end original + +perlclib - 標準 C ライブラリ関数の内部的な代用品 + +=head1 DESCRIPTION + +=begin original + +One thing Perl porters should note is that F<perl> doesn't tend to use that +much of the C standard library internally; you'll see very little use of, +for example, the F<ctype.h> functions in there. This is because Perl +tends to reimplement or abstract standard library functions, so that we +know exactly how they're going to operate. + +=end original + +Perl porters が注意するべき事のひとつは、F<perl> は内部で C 標準ライブラリを +あまり使わないようにしていると言うことです; 例えば、F<ctype.h> 関数は +ほとんど使われていないことをに気付くでしょう。 +これは、どのような操作を使用としているかを正確に知るために、Perl は +標準ライブラリ関数を再実装したり抽象化したりしようとするからです。 + +=begin original + +This is a reference card for people who are familiar with the C library +and who want to do things the Perl way; to tell them which functions +they ought to use instead of the more normal C functions. + +=end original + +これは C ライブラリになれていて Perl 方式で何かをしたい人々のための +リファレンスカードです; より普通の C 関数の代わりに使うべき関数を示します。 + +=head2 Conventions + +(規約) + +=begin original + +In the following tables: + +=end original + +以下のテーブルで: + +=over 3 + +=item C<t> + +=begin original + +is a type. + +=end original + +は型です。 + +=item C<p> + +=begin original + +is a pointer. + +=end original + +はポインタです。 + +=item C<n> + +=begin original + +is a number. + +=end original + +は数値です。 + +=item C<s> + +=begin original + +is a string. + +=end original + +は文字列です。 + +=back + +=begin original + +C<sv>, C<av>, C<hv>, etc. represent variables of their respective types. + +=end original + +C<sv>, C<av>, C<hv> などはそれぞれ対応する型の変数です。 + +=head2 File Operations + +(ファイル操作) + +=begin original + +Instead of the F<stdio.h> functions, you should use the Perl abstraction +layer. Instead of C<FILE*> types, you need to be handling C<PerlIO*> +types. Don't forget that with the new PerlIO layered I/O abstraction +C<FILE*> types may not even be available. See also the C<perlapio> +documentation for more information about the following functions: + +=end original + +F<stdio.h> 関数の代わりに、Perl 抽象層を使うべきです。 +C<FILE*> 型の代わりに、C<PerlIO*> 型を扱う必要があります。 +新しい PerlIO 層の I/O 抽象化では C<FILE*> 型は利用できないかも知れないことを +忘れないでください。 +以下の関数に関するさらなる詳細については C<perlapio> 文書を +参照してください: + + Instead Of: Use: + + stdin PerlIO_stdin() + stdout PerlIO_stdout() + stderr PerlIO_stderr() + + fopen(fn, mode) PerlIO_open(fn, mode) + freopen(fn, mode, stream) PerlIO_reopen(fn, mode, perlio) (Deprecated) + fflush(stream) PerlIO_flush(perlio) + fclose(stream) PerlIO_close(perlio) + +=head2 File Input and Output + +(ファイル入力と出力) + + Instead Of: Use: + + fprintf(stream, fmt, ...) PerlIO_printf(perlio, fmt, ...) + + [f]getc(stream) PerlIO_getc(perlio) + [f]putc(stream, n) PerlIO_putc(perlio, n) + ungetc(n, stream) PerlIO_ungetc(perlio, n) + +=begin original + +Note that the PerlIO equivalents of C<fread> and C<fwrite> are slightly +different from their C library counterparts: + +=end original + +C<fread> と C<fwrite> の PerlIO の代用品は C ライブラリの対応物とは +少し違うことに注意してください: + + fread(p, size, n, stream) PerlIO_read(perlio, buf, numbytes) + fwrite(p, size, n, stream) PerlIO_write(perlio, buf, numbytes) + + fputs(s, stream) PerlIO_puts(perlio, s) + +=begin original + +There is no equivalent to C<fgets>; one should use C<sv_gets> instead: + +=end original + +C<fgets> の等価物はありません; 代わりに C<sv_gets> を使うべきです: + + fgets(s, n, stream) sv_gets(sv, perlio, append) + +=head2 File Positioning + +(ファイル位置) + + Instead Of: Use: + + feof(stream) PerlIO_eof(perlio) + fseek(stream, n, whence) PerlIO_seek(perlio, n, whence) + rewind(stream) PerlIO_rewind(perlio) + + fgetpos(stream, p) PerlIO_getpos(perlio, sv) + fsetpos(stream, p) PerlIO_setpos(perlio, sv) + + ferror(stream) PerlIO_error(perlio) + clearerr(stream) PerlIO_clearerr(perlio) + +=head2 Memory Management and String Handling + +(メモリ管理と文字列操作) + + Instead Of: Use: + + t* p = malloc(n) Newx(id, p, n, t) + t* p = calloc(n, s) Newxz(id, p, n, t) + p = realloc(p, n) Renew(p, n, t) + memcpy(dst, src, n) Copy(src, dst, n, t) + memmove(dst, src, n) Move(src, dst, n, t) + memcpy(dst, src, sizeof(t)) StructCopy(src, dst, t) + memset(dst, 0, n * sizeof(t)) Zero(dst, n, t) + memzero(dst, 0) Zero(dst, n, char) + free(p) Safefree(p) + + strdup(p) savepv(p) + strndup(p, n) savepvn(p, n) (Hey, strndup doesn't exist!) + + strstr(big, little) instr(big, little) + strcmp(s1, s2) strLE(s1, s2) / strEQ(s1, s2) / strGT(s1,s2) + strncmp(s1, s2, n) strnNE(s1, s2, n) / strnEQ(s1, s2, n) + +=begin original + +Notice the different order of arguments to C<Copy> and C<Move> than used +in C<memcpy> and C<memmove>. + +=end original + +C<Copy> および C<Move> の引数の順番は C<memcpy> および C<memmove> と異なる +ことに注意してください。 + +=begin original + +Most of the time, though, you'll want to be dealing with SVs internally +instead of raw C<char *> strings: + +=end original + +しかし、大抵の場合、生の C<char *> 文字列ではなく内部的に SV を +扱いたいでしょう: + + strlen(s) sv_len(sv) + strcpy(dt, src) sv_setpv(sv, s) + strncpy(dt, src, n) sv_setpvn(sv, s, n) + strcat(dt, src) sv_catpv(sv, s) + strncat(dt, src) sv_catpvn(sv, s) + sprintf(s, fmt, ...) sv_setpvf(sv, fmt, ...) + +=begin original + +Note also the existence of C<sv_catpvf> and C<sv_vcatpvfn>, combining +concatenation with formatting. + +=end original + +連結とフォーマッティングを結合した C<sv_catpvf> および C<sv_vcatpvfn> が +あることにも注意してください。 + +=begin original + +Sometimes instead of zeroing the allocated heap by using Newxz() you +should consider "poisoning" the data. This means writing a bit +pattern into it that should be illegal as pointers (and floating point +numbers), and also hopefully surprising enough as integers, so that +any code attempting to use the data without forethought will break +sooner rather than later. Poisoning can be done using the Poison() +macros, which have similar arguments to Zero(): + +=end original + +時々、Newxz() を使って割り当てられたヒープをゼロにする代わりにデータに +「毒入れ」したいかもしれません。 +これは、ポインタ(および浮動小数点数)として不正になり、できれば整数としても +十分に驚くべきビットパターンを書き込んで、考えなしにデータを使おうとする +コードが早めに壊れるようにすることです。 +毒入れは Zero() と似たような引数を持つ Poison() マクロで行えます: + + PoisonWith(dst, n, t, b) scribble memory with byte b + PoisonNew(dst, n, t) equal to PoisonWith(dst, n, t, 0xAB) + PoisonFree(dst, n, t) equal to PoisonWith(dst, n, t, 0xEF) + Poison(dst, n, t) equal to PoisonFree(dst, n, t) + +=head2 Character Class Tests + +(文字クラステスト) + +=begin original + +There are two types of character class tests that Perl implements: one +type deals in C<char>s and are thus B<not> Unicode aware (and hence +deprecated unless you B<know> you should use them) and the other type +deal in C<UV>s and know about Unicode properties. In the following +table, C<c> is a C<char>, and C<u> is a Unicode codepoint. + +=end original + +Perl が実装している文字クラステストには二つの種類があります: ひとつは +C<char> を扱い、従って Unicode は認識 B<しません> (従ってこれを使うべきと +B<分かっている> 場合でなければ非推奨です); もう一つの種類は C<UV> を扱い、 +Unicode 特性を認識します。以下の表で、C<c> は C<char>、C<u> は +Unicode 符号位置です。 + + Instead Of: Use: But better use: + + isalnum(c) isALNUM(c) isALNUM_uni(u) + isalpha(c) isALPHA(c) isALPHA_uni(u) + iscntrl(c) isCNTRL(c) isCNTRL_uni(u) + isdigit(c) isDIGIT(c) isDIGIT_uni(u) + isgraph(c) isGRAPH(c) isGRAPH_uni(u) + islower(c) isLOWER(c) isLOWER_uni(u) + isprint(c) isPRINT(c) isPRINT_uni(u) + ispunct(c) isPUNCT(c) isPUNCT_uni(u) + isspace(c) isSPACE(c) isSPACE_uni(u) + isupper(c) isUPPER(c) isUPPER_uni(u) + isxdigit(c) isXDIGIT(c) isXDIGIT_uni(u) + + tolower(c) toLOWER(c) toLOWER_uni(u) + toupper(c) toUPPER(c) toUPPER_uni(u) + +=head2 F<stdlib.h> functions + +(F<stdlib.h> 関数) + + Instead Of: Use: + + atof(s) Atof(s) + atol(s) Atol(s) + strtod(s, &p) Nothing. Just don't use it. + strtol(s, &p, n) Strtol(s, &p, n) + strtoul(s, &p, n) Strtoul(s, &p, n) + +=begin original + +Notice also the C<grok_bin>, C<grok_hex>, and C<grok_oct> functions in +F<numeric.c> for converting strings representing numbers in the respective +bases into C<NV>s. + +=end original + +それぞれの基数で数値を表現している文字列を C<NV> に変換するための +F<numeric.c> にある C<grok_bin>, C<grok_hex>, C<grok_oct> 関数にも +注目してください。 + +=begin original + +In theory C<Strtol> and C<Strtoul> may not be defined if the machine perl is +built on doesn't actually have strtol and strtoul. But as those 2 +functions are part of the 1989 ANSI C spec we suspect you'll find them +everywhere by now. + +=end original + +理論的には、perl がビルドされたマシンに実際に strtol や strtoul がない +場合、C<Strtol> と C<Strtoul> は定義されないかもしれません。 +しかしこれらの 2 関数は 1989 ANSI C 使用の一部なので、今のところどこでも +これらを見つけられると思われます。 + + int rand() double Drand01() + srand(n) { seedDrand01((Rand_seed_t)n); + PL_srand_called = TRUE; } + + exit(n) my_exit(n) + system(s) Don't. Look at pp_system or use my_popen + + getenv(s) PerlEnv_getenv(s) + setenv(s, val) my_putenv(s, val) + +=head2 Miscellaneous functions + +(さまざまな関数) + +=begin original + +You should not even B<want> to use F<setjmp.h> functions, but if you +think you do, use the C<JMPENV> stack in F<scope.h> instead. + +=end original + +F<setjmp.h> 関数を使おうと B<思う> ことすらするべきではありませんが、もし +そう考えているなら、代わりに F<scope.h> の C<JMPENV> スタックを +使ってください。 + +=begin original + +For C<signal>/C<sigaction>, use C<rsignal(signo, handler)>. + +=end original + +C<signal>/C<sigaction> については、C<rsignal(signo, handler)> を +使ってください。 + +=head1 SEE ALSO + +L<perlapi>, L<perlapio>, L<perlguts> + +=begin meta + +Translate: SHIRAKATA Kentaro <argra****@ub32*****> +Status: completed + +=end meta +