Уроки программинга. Урок № 6. Машина Тьюринга и КР.

#include <stdio.h>
#include <Windows.h>
#define N 1000
#define IF(x, y) if((x))goto y
#define $(x) goto x
char s[N] = "Lorem ipsum dolor sit amet, consectetur adipiscing elit, sed Lorem ipsum dolor sit amet, consectetur adipiscing elit, sed Lorem ipsum dolor sit amet, consectetur adipiscing elit, sed ";
 
double get_time()
{
    LARGE_INTEGER t, f;
    QueryPerformanceCounter(&t);
    QueryPerformanceFrequency(&f);
    return (double)t.QuadPart / (double)f.QuadPart;
}
 
void bench(int func(char*), int count, const char* description)
{
    double start_time = get_time();
    double sum = 0;
 
    for (int i = 0; i < count; i++)
    {
        sum += func(s);
    }
 
    double time = get_time() - start_time;
 
    printf("%s: %f sum=%f\n", description, time, sum);
}
 
int calc_words_by_CoderHuligan(char* s)
{
    int nw = 0;
 
    char* p = s;
OUTWORD:
    ++p;
    IF(!*p, K);
    IF(*p == ' ' || *p == ',' || *p == '\n', OUTWORD);
    nw++;
    $(INWORD);
INWORD:
    IF(!*p, K);
    IF(*p == ' ' || *p == ',' || *p == '\n', OUTWORD);
    ++p;
    $(INWORD);
K:
 
    return nw;
}
 
int calc_words_by_TopLayer(char* s)
{
    int inWord = 0;
    int count = 0;
 
    for (char* curr = s; 1; ++curr)
    {
        switch (*curr)
        {
        case ' ':
        case ',':
        case '\n':
            inWord = 0;
            break;
        case '\0':
            return count;
        default:
            count += 1 - inWord;
            inWord = 1;
            break;
        }
    }
}
 
int calc_words_by_CR(char* s)
{
    int nw, state;
    char* p = s;
    state = 0;
    nw = 0;
    while (*p)
    {
        if (*p == ' ' || *p == '\n' || *p == '\t')
            state = 0;
        else if (state == 0)
        {
            state = 1;
            ++nw;
        }
        ++p;
    }
    return nw;
}
 
int main(void)
{
    int count = 50 * 1000 * 1000;
 
    for (int i = 0; i < 5; i++)
    {
        bench(calc_words_by_TopLayer, count, "TopLayer\t");
        bench(calc_words_by_CoderHuligan, count, "CoderHuligan\t");
        bench(calc_words_by_CR, count, "CR\t\t");
        printf("\n");
    }
}

#include <time.h>
#include <stdio.h>
#define N 255
char s[N] = "Lorem ipsum dolor sit amet, consectetur adipiscing elit, sed";
int main(void)
{
    clock_t time = clock();
 
    for (int i = 0; i < 10000000; i++)
    {
        int nw;
 
        bool prev = true;
        bool curr = true;
        char *p = s;
 
        nw = 0; 
        while(*p)
        {
            prev = curr;
            curr = (*p == ' ' || *p == ',' || *p == '\n');
            nw += prev && !curr;
            p++;
        }
    }
 
    printf("%f\n", (double)(clock() - time) / CLOCKS_PER_SEC);
    
#define IF(x, y) if((x))goto y
#define $(x) goto x
        time = clock();
        
        for (int i = 0; i < 10000000; i++)
        {
                int nw = 0;
 
                char *p = s;
            OUT:
                ++p;
                IF(!*p, K);
                IF(*p == ' ' || *p == ',' || *p == '\n', OUT);
                nw++;
                $(IN);
            IN:
                IF(!*p, K);
                IF(*p == ' ' || *p == ',' || *p == '\n', OUT);
                ++p;
                $(IN);
            K:;
        }
        printf("%f\n", (double)(clock() - time) / CLOCKS_PER_SEC);
        return 0;
}

void foo(void) 
{ 
    int nw = 0;
    int state = OUT; 
    char * p = s + strlen(s);
    while (p != s)
    {
        --p;
        if(IS_SPACE(*p)) {
            state = OUT; 
        }
        else if (state == OUT) { 
            state = IN; 
            ++nw; 
        }
    } 
    X = nw;
}