Pasted

#include "stdio.h"
#include "stdlib.h"
#include "conio.h"
#include "iostream"
 
int charcount(const char* str, char ch)
{
    int count = 0;
 
    for(int i=0;i<strlen(str);i++)
        if(str[i] == ch)
            count++;
 
    return count;
}
 
void main(void)
{
    char str[1024], Mask[16], **ch = 0, **bck = 0, **msk, counter = 0, amount = 0, size = 0, *cc = 0, ssize = 0, yesno = 0;
point:
    system("cls");
 
    printf("Type string:\n");
    gets(str);
    printf("Type mask:\n");
    gets(Mask);
 
    if((amount = charcount(str,'_') + 1) == 0) return;
 
    ch = (char**)malloc(sizeof(char *) * amount);
    bck = (char**)malloc(sizeof(char *) * amount);
    msk = (char**)malloc(sizeof(char *) * strlen(Mask));
 
    ch[0] = strtok(str, "_");
 
    if(amount > 1)
    {
        for(int i=1;i<amount;i++)
        {
            char* cc = strtok(NULL, "_");
            if(cc != 0)
                ch[i] = cc;
        }
    }
 
    if(charcount(Mask,'*') > 0)
    {
        size = Mask[0] == '*' ? charcount(Mask, '*') : charcount(Mask, '*') + 1;
        msk[0] = strtok(Mask, "*");
 
        if(size > 1)
        {
            for(int i=1, j = (int)(bool)msk[0];i<size;i++) {
                char* cc = strtok(NULL, "*");
                if(cc != 0)
                {
                    ssize++;
                    msk[j++] = cc;
                }
            }
            ssize++;
        }
    } else
        msk[0] = Mask;
 
    for(int i=0, countToRight = 0;i < amount; i++, countToRight = 0)
    {
        for(int j=0;j<ssize;j++)
        {
            if(strstr(ch[i], msk[j]))
                countToRight++;
        }
 
        if(countToRight >= ssize)
        {
            bck[counter++] = ch[i];
        }
    }
 
    if(counter != 0)
    {
        printf("Founds: ");
        for(int i=0;i < counter;i++)
            printf("%s %c ", bck[i], i == counter - 1 ? '\n' : '|');
    } else {
        printf("It is not contains.\n");
    }
 
    free(ch);
    free(bck);
    free(msk);
 
    do 
    {
        printf("\nDo you want to try it one more time? y/n : ");
        yesno = tolower(getch());
        printf("%c", yesno);
        if(yesno == 'y')
            goto point;
    } while (yesno != 'y' && yesno != 'n');
}