Home | History | Annotate | Download | only in wchar
      1 /*-
      2  * Copyright (c) 1995 Alex Tatmanjants <alex (at) elvisti.kiev.ua>
      3  *		at Electronni Visti IA, Kiev, Ukraine.
      4  *			All rights reserved.
      5  *
      6  * Redistribution and use in source and binary forms, with or without
      7  * modification, are permitted provided that the following conditions
      8  * are met:
      9  * 1. Redistributions of source code must retain the above copyright
     10  *    notice, this list of conditions and the following disclaimer.
     11  * 2. Redistributions in binary form must reproduce the above copyright
     12  *    notice, this list of conditions and the following disclaimer in the
     13  *    documentation and/or other materials provided with the distribution.
     14  *
     15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND
     16  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     17  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     18  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE
     19  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     20  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     21  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     22  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     23  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     24  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     25  * SUCH DAMAGE.
     26  */
     27 
     28 #include <wchar.h>
     29 
     30 /*
     31  * Placeholder wcsxfrm() implementation. See wcscoll.c for a description of
     32  * the logic used.
     33  */
     34 size_t
     35 wcsxfrm(wchar_t * __restrict dest, const wchar_t * __restrict src, size_t len)
     36 {
     37     int prim, sec, l;
     38     size_t slen;
     39     char *mbsrc, *s, *ss;
     40 
     41     if (*src == L'\0') {
     42         if (len != 0)
     43             *dest = L'\0';
     44         return (0);
     45     }
     46 
     47     slen = wcslen(src);
     48     if (len > 0) {
     49         if (slen < len)
     50             wcscpy(dest, src);
     51         else {
     52             wcsncpy(dest, src, len - 1);
     53             dest[len - 1] = L'\0';
     54         }
     55     }
     56     return (slen);
     57 }
     58