expr index [RESOLVIDO]

gugarthur
(usa Fedora)

Enviado em 16/03/2015 - 13:34h

expr index "ab" b 

expr index "áb" b 

paulo1205
(usa Ubuntu)

Enviado em 16/03/2015 - 13:54h

fdmarp
(usa Debian)

Enviado em 16/03/2015 - 14:16h

paulo1205
(usa Ubuntu)

Enviado em 16/03/2015 - 14:49h

paulo1205
(usa Ubuntu)

Enviado em 17/03/2015 - 10:05h

// index.c -- compile usando “gcc -std=c99 index.c -o index”

#include <locale.h>

#include <stdio.h>

#include <stdlib.h>

#include <string.h>

#include <wchar.h>

#include <wctype.h>



int main(int argc, char **argv){

    wchar_t *haystack, *needle, *found;

    size_t haystack_len, needle_len;



    if(argc!=3){

        fprintf(stderr, "usage: %s haystack needle\n", argv[0]);

        return 1;

    }



    // Usa variáveis de ambiente para definir locale.

    setlocale(LC_ALL, "");



    haystack_len=strlen(argv[1]);

    needle_len=strlen(argv[2]);



    haystack=calloc(1+haystack_len, sizeof *haystack);

    needle=calloc(1+needle_len, sizeof *needle);



    mbsrtowcs(haystack, (const char **)&argv[1], haystack_len, NULL);

    mbsrtowcs(needle, (const char **)&argv[2], needle_len, NULL);



    found=wcsstr(haystack, needle)-haystack;

    printf("%zd\n", found? found-haystack: -1);



    return found==NULL;

} 

gugarthur
(usa Fedora)

Enviado em 17/03/2015 - 10:14h

$expr index áb b

3

$ expr index ab b

2

 

$ expr --version

expr (GNU coreutils) 8.22

Copyright (C) 2013 Free Software Foundation, Inc.

Licença GPLv3+: GNU GPL versão 3 ou posterior <http://gnu.org/licenses/gpl.html>

Este é um software livre: você é livre para alterá-lo e redistribuí-lo.

NÃO HÁ GARANTIA, na máxima extensão permitida pela lei.



Escrito por Mike Parker, James Youngman e Paul Eggert.

 

gugarthur
(usa Fedora)

Enviado em 17/03/2015 - 10:17h

$ echo "LANG: $LANG

> LC_CTYPE: $LC_CTYPE

> LC_ALL: $LC_ALL"

LANG: pt_BR.utf8

LC_CTYPE: 

LC_ALL: 

 

gugarthur
(usa Fedora)

Enviado em 17/03/2015 - 11:08h

$ awk 'BEGIN { print index("ab", "b"); }'

2

$ awk 'BEGIN { print index("áb", "b"); }'

2

$ env LC_ALL=C awk 'BEGIN { print index("áb", "b"); }'

3