七、栈实现c语言符号的匹配

1、LinkList.h

#ifndef _LINKLIST_H_
#define _LINKLIST_H_


typedef void LinkList;
typedef struct _tag_LinkListNode LinkListNode;
struct _tag_LinkListNode
{
    LinkListNode* next;
};


LinkList* LinkList_Create();


void LinkList_Destroy(LinkList* list);


void LinkList_Clear(LinkList* list);


int LinkList_Length(LinkList* list);


int LinkList_Insert(LinkList* list, LinkListNode* node, int pos);


LinkListNode* LinkList_Get(LinkList* list, int pos);


LinkListNode* LinkList_Delete(LinkList* list, int pos);


#endif

2、LinkList.c

#include <stdio.h>
#include <malloc.h>
#include "LinkList.h"


typedef struct _tag_LinkList
{
    LinkListNode header;
    int length;
} TLinkList;


LinkList* LinkList_Create() // O(1)
{
    TLinkList* ret = (TLinkList*)malloc(sizeof(TLinkList));
    
    if( ret != NULL )
    {
        ret->length = 0;
        ret->header.next = NULL;
    }
    
    return ret;
}


void LinkList_Destroy(LinkList* list) // O(1)
{
    free(list);
}


void LinkList_Clear(LinkList* list) // O(1)
{
    TLinkList* sList = (TLinkList*)list;
    
    if( sList != NULL )
    {
        sList->length = 0;
        sList->header.next = NULL;
    }
}


int LinkList_Length(LinkList* list) // O(1)
{
    TLinkList* sList = (TLinkList*)list;
    int ret = -1;
    
    if( sList != NULL )
    {
        ret = sList->length;
    }
    
    return ret;
}


int LinkList_Insert(LinkList* list, LinkListNode* node, int pos) // O(n)
{ 
    TLinkList* sList = (TLinkList*)list;
    int ret = (sList != NULL) && (pos >= 0) && (node != NULL);
    int i = 0;
    
    if( ret )
    {
        LinkListNode* current = (LinkListNode*)sList;
        
        for(i=0; (i<pos) && (current->next != NULL); i++)
        {
            current = current->next;
        }
        
        node->next = current->next;
        current->next = node;
        
        sList->length++;
    }
    
    return ret;
}


LinkListNode* LinkList_Get(LinkList* list, int pos) // O(n)
{
    TLinkList* sList = (TLinkList*)list;
    LinkListNode* ret = NULL;
    int i = 0;
    
    if( (sList != NULL) && (0 <= pos) && (pos < sList->length) )
    {
        LinkListNode* current = (LinkListNode*)sList;
        
        for(i=0; i<pos; i++)
        {
            current = current->next;
        }
        
        ret = current->next;
    }
    
    return ret;
}


LinkListNode* LinkList_Delete(LinkList* list, int pos) // O(n)
{
    TLinkList* sList = (TLinkList*)list;
    LinkListNode* ret = NULL;
    int i = 0;
    
    if( (sList != NULL) && (0 <= pos) && (pos < sList->length) )
    {
        LinkListNode* current = (LinkListNode*)sList;
        
        for(i=0; i<pos; i++)
        {
            current = current->next;
        }
        
        ret = current->next;
        current->next = ret->next;
        
        sList->length--;
    }
    
    return ret;
}

3、LinkStack.h

#ifndef _LINKSTACK_H_
#define _LINKSTACK_H_


typedef void LinkStack;


LinkStack* LinkStack_Create();  //创建栈 


void LinkStack_Destroy(LinkStack* stack);  //销毁栈 
 
void LinkStack_Clear(LinkStack* stack);   //清空栈 


int LinkStack_Push(LinkStack* stack, void* item);  //进栈 


void* LinkStack_Pop(LinkStack* stack);  //出栈 


void* LinkStack_Top(LinkStack* stack);  //获取栈顶元素 


int LinkStack_Size(LinkStack* stack);  //获取栈大小 


#endif

4、LinkStack.c

#include <malloc.h>
#include "LinkStack.h"
#include "LinkList.h"


typedef struct _tag_LinkStackNode
{
    LinkListNode header;
    void* item;
} TLinkStackNode;


LinkStack* LinkStack_Create()   //创建栈 
{
    return LinkList_Create();
}


void LinkStack_Destroy(LinkStack* stack)   //销毁栈 
{
    LinkStack_Clear(stack);   
    LinkList_Destroy(stack);
}


void LinkStack_Clear(LinkStack* stack)  //清空栈 
{
    while( LinkStack_Size(stack) > 0 )   //判断栈中是否有元素，若有则执行出栈动作 
    {
        LinkStack_Pop(stack);
    }
}


int LinkStack_Push(LinkStack* stack, void* item)  //进栈 ，item为进栈元素的地址 
{
    TLinkStackNode* node = (TLinkStackNode*)malloc(sizeof(TLinkStackNode));  //动态内存分配 
    int ret = (node != NULL) && (item != NULL);
    
    if( ret )  //判断栈与压入栈的元素是否合法 
    {
        node->item = item;  
        
        ret  = LinkList_Insert(stack, (LinkListNode*)node, 0);  //压入队头 
    }
    
    if( !ret )
    {
        free(node);
    }
    
    return ret;
}


void* LinkStack_Pop(LinkStack* stack)  //出栈 
{
    TLinkStackNode* node = (TLinkStackNode*)LinkList_Delete(stack, 0);
    void* ret = NULL;
    
    if( node != NULL )
    {
        ret = node->item;
        
        free(node);
    }
    
    return ret;
}


void* LinkStack_Top(LinkStack* stack)   //获取栈顶元素 
{
    TLinkStackNode* node = (TLinkStackNode*)LinkList_Get(stack, 0);
    void* ret = NULL;
    
    if( node != NULL )
    {
        ret = node->item;
    }
    
    return ret;
}


int LinkStack_Size(LinkStack* stack)   //获取栈的大小 
{
    return LinkList_Length(stack);
}

5、main.c

#include <stdio.h>
#include <stdlib.h>
#include "LinkStack.h"


/* run this program using the console pauser or add your own getch, system("pause") or input loop */


int isLeft(char c)  //寻找左符号，找到时跳出 
{
    int ret = 0;
    
    switch(c)
    {
        case '<':
        case '(':
        case '[':
        case '{':
        case '\'':
        case '\"':
            ret = 1;
        break;
        default:
            ret = 0;
            break;
    }
    
    return ret;
}


int isRight(char c)   //寻找右符号数，找到时跳出 
{
    int ret = 0;
    
    switch(c)
    {
        case '>':
        case ')':
        case ']':
        case '}':
        case '\'':
        case '\"':
            ret = 1;
        break;
        default:
            ret = 0;
            break;
    }
    
    return ret;
}


int match(char left, char right)  //将左符号数与右符号数进行匹配 
{
    int ret = 0;
    
    switch(left)
    {
        case '<':
            ret = (right == '>');
            break;
        case '(':
            ret = (right == ')');
            break;
        case '[':
            ret = (right == ']');
            break;
        case '{':
            ret = (right == '}');
            break;
        case '\'':
            ret = (right == '\'');
            break;
        case '\"':
            ret = (right == '\"');
            break;
        default:
            ret = 0;
            break;
    }
    
    return ret;
}


int scanner(const char* code)   
{
    LinkStack* stack = LinkStack_Create();
    int ret = 0;
    int i = 0;
    
    while( code[i] != '\0' )  //开始进入扫描循环，当遇到结束符时退出 
    {
        if( isLeft(code[i]) )  
        {
            LinkStack_Push(stack, (void*)(code + i));  //获取到左符号时，执行压栈操作 
        }
        
        if( isRight(code[i]) ) //获取到有符号时，进入 
        {
            char* c = (char*)LinkStack_Pop(stack);  //出栈 
            
            if( (c == NULL) || !match(*c, code[i]) )  //当c为空且匹配不成功时，报错 
            {
                printf("%c does not match!\n", code[i]);
                ret = 0;
                break;
            }
        }
        
        i++;
    }
    
    if( (LinkStack_Size(stack) == 0) && (code[i] == '\0') )  //如果栈中的元素为0，且扫描到结束字符时，说明匹配成功了 
    {
        printf("Succeed!\n");
        ret = 1;
    }
    else
    {
        printf("Invalid code!\n");   //输入错误 
        ret = 0;
    }
    
    LinkStack_Destroy(stack);   //销毁栈表 
    
    return ret;
}


int main(int argc, char *argv[])
{
    const char* code = "#include <stdio.h> int main() { int a[5][5]; int (*p)[4]; p = a[0]; printf(\"%d\\n\", &p[3][3] - &a[3][3]); return 0; }";
    
    scanner(code);
    
return 0;
}