slist.h//头文件

#ifndef _SLIST_H_
#define _SLTST_H_

#include<stdio.h>
#include<stdlib.h>
#include<string.h>
#include<math.h>

typedef int SLTDataType; 
typedef struct SListNode 
{ 
    SLTDataType data;    
    struct SListNode* next;
}SListNode;

void SListInit(SListNode** pphead);
void SListDestory(SListNode** pphead);

SListNode* BuySListNode(SLTDataType x);
void SListPushFront(SListNode** pphead, SLTDataType x);
void SListPopFront(SListNode** pphead);
SListNode* SListFind(SListNode* pphead, SLTDataType x); // 在pos的后面进行插入 
void SListInsertAfter(SListNode* pos, SLTDataType x); // 在pos的前面进行插入 
void SListEraseAfter(SListNode* pos); 
void SListRemove(SListNode** pphead, SLTDataType x);
void SListRemoveAll(SListNode** pphead, SLTDataType x);
void SListPrint(SListNode* pphead);

void SListReverse(SListNode **pphead);
void SListReverse2(SListNode **pphead);

SListNode* getIntersectionNode(SListNode* headA, SListNode*headB);
SListNode *detectCycle(SListNode *head);

#endif

slist.c//源文件

#include"slist.h"

void SListInit(SListNode** pphead)//初始化
{
    *pphead = NULL;
}
void SListDestory(SListNode** pphead)
{
    if (*pphead == NULL)
    {
        return;
    }
    else
    {
        while ((*pphead)->next)
        {
            SListEraseAfter(*pphead);
        }
        free(*pphead);
        *pphead = NULL;
    }
}

SListNode* BuySListNode(SLTDataType x)
{
    SListNode* res = (SListNode *)malloc(sizeof(SListNode));
    res->data = x;
    res->next = NULL;
    return res;
}
void SListPushFront(SListNode** pphead, SLTDataType x)
{
    SListNode* tmp = BuySListNode(x);
    tmp->next = *pphead;
    *pphead = tmp;
}
void SListPopFront(SListNode** pphead)
{
    if (*pphead == NULL)
    {
        return;
    }
    /*(*pphead)->date = (*pphead)->next;*/
    SListNode* tmp = (*pphead)->next;
    free(*pphead);
    *pphead = tmp;
}
SListNode* SListFind(SListNode* pphead, SLTDataType x)//找x数据 
{
    SListNode* tmp;
    for (tmp = pphead; tmp; tmp = tmp->next)
    {
        if (tmp->data == x)
        {
            return tmp;
        }
        return NULL;
    }
}
void SListInsertAfter(SListNode* pos, SLTDataType x)//把x插到pos后面
{
    SListNode* tmp = BuySListNode(x);
    tmp->next = pos->next;
    pos->next = tmp;
}
void SListEraseAfter(SListNode* pos)//删除pos后面的数据
{
    SListNode* tmp = pos->next;
    if (tmp == NULL)
    {
        return;
    }
    pos->next = tmp->next;
    free(tmp);
}
void SListRemove(SListNode** pphead, SLTDataType x)//移除x
{
    SListNode* tmp;
    if (*pphead == NULL)
    {
        return;
    }
    if ((*pphead)->data==x)
    {
        SListPopFront(*pphead);
    }
    else
    {
        for (tmp = *pphead; tmp->next; tmp = tmp->next)
        {
            SListEraseAfter(pphead);
            return;
        }
    }
}
void SListRemoveAll(SListNode** pphead, SLTDataType x)
{
    SListNode* tmp;
    if (*pphead && (*pphead)->data == x)
    {
        SListPopFront(*pphead);
    }
    for (; tmp = *pphead; tmp&&tmp->next)
    {
        if (tmp->next == x)
        {
            SListEraseAfter(tmp);
        }
        else
        {
            tmp = tmp->next;
        }
    }
}
void SListPrint(SListNode* pphead)
{
    SListNode* cur;
    printf("pphead->");
    for (cur = pphead; cur; cur = cur->next)
    {
        printf("%d->", cur->data);
    }
    printf("NULL\n");
}
void SListReverse(SListNode **pphead)//反转链表
{
    SListNode *head = *pphead;   //此指针在每次循环中始终指向当前链表的头
    SListNode *tmp = head->next; //此指针在每次循环中始终指向要被后删头插的节点
    SListNode *oldh = *pphead;   //此指针在每次循环中始终指向原本的头结点，不会改变指向

    while (tmp) //如果tmp为空，则代表逆序结束，旧头的next已经是空的了，成为新链表的末尾
    {
        oldh->next = tmp->next; //将tmp架空，实际是后删操作的一部分
        tmp->next = head; //让tmp变成新的头，实际是头插操作的一部分 
        head = tmp; //换头
        tmp = oldh->next; //让tmp变成下次循环中待删除的节点
    }
    *pphead = head;
}
void SListReverse2(SListNode **pphead)//反转链表
{
    SListNode *pre = *pphead;   //被执行操作的前一个节点
    SListNode *cur = pre->next; //被执行操作的节点
    SListNode *next = cur;      //被执行操作的后一个节点，暂时指在cur，在循环开始的时候跳转到其后一个节点
    pre->next = NULL; //此时的头，将会是转换后的尾，这里是在设置链表尾节点
    while (next)
    {
        next = next->next; //先让next变成下一个节点，之所以不放在最后，是因为会有next为空的限制
        cur->next = pre; //让原本指着后面的指到前面来（先后转）
        pre = cur; //为了下次循环而传递数据，这里是设置下次循环的上一个节点（本次执行操作的节点将会成下次循环的上一个节点）
        cur = next; //同上（本次的下一个节点将会成为下次的被执行节点）
    }

    *pphead = pre; //循环跳出后cur和next都已经指向空了，pre才是新的头
}

//输入两个链表，找出它们的第一个公共结点
SListNode* getIntersectionNode(SListNode* headA, SListNode*headB)
{
    int lenA = 0;
    int lenB = 0;
    int gap, i;
    SListNode* cur = 0;
    SListNode * longerlist = headA;
    SListNode * shorterlist = headB;
    for (cur = 0; cur; cur = headA->next)
    {
        lenA++;
    }
    for (cur = 0; cur; cur = headB->next)
    {
        lenB++;
    }
    gap = abs(lenA - lenB);
    if (lenA > lenB)
    {
        longerlist = headA;
        shorterlist = headB;
    }
    else
    {
        longerlist = headB;
        shorterlist = headA;
    }
    for (i = 0; i < gap; i++)
    {
        longerlist=longerlist->next;
    }
    for (; longerlist&&shorterlist; longerlist = longerlist->next, shorterlist = shorterlist->next)
    {
        if (longerlist == shorterlist)
        {
            return longerlist;
        }
    }
    return NULL;
}

// 给定一个链表，返回链表开始入环的第一个节点。 如果链表无环，则返回 NULL
SListNode *detectCycle(SListNode *head)
{
    SListNode * fast = head;
    SListNode * slow = head;

    while (fast && slow && fast->next)
    {
        fast = fast->next->next;//遍历速度为2
        slow = slow->next;//遍历速度为1
        if (fast == slow)//判断两不同遍历速度的交点
        {
            break;
        }
    }

    for (; fast && fast->next; fast = fast->next, head = head->next)//交点到入环的第一个节点距离等于头节点到入环的第一个节点
    {
        if (fast == head)
        {
            return fast;
        }
    }
    return NULL;
}

main.c//测试

#include"slist.h"
#if 0 //1，选择程序段
int main()//测试
{
    SListNode *phead1;
    //SListNode *phead2;
    SListNode *tmp;
    SListNode *tmp2;
    SListInit(&phead1);
    //SListInit(&phead2);
    SListPushFront(&phead1, 8);
    tmp = phead1;
    SListPushFront(&phead1, 7);
    SListPushFront(&phead1, 6);
    SListPushFront(&phead1, 5);
    SListPushFront(&phead1, 4);
    SListPushFront(&phead1, 3);
    tmp2 = phead1;
    SListPushFront(&phead1, 2);
    SListPushFront(&phead1, 1);
    tmp->next = tmp2;
    //phead2->next = phead1->next->next;
    SListNode * ret = detectCycle(phead1);
    if (ret)
    {
        printf("%d\n", ret->data);
    }
    else
    {
        printf("NULL\n");
    }
    //SListDestory(&phead1);
    //SListDestory(&phead2);
    return 0;
}

#else
int main()//测试
{
    SListNode *phead;
    SListInit(&phead);
    SListPushFront(&phead, 1);
    SListPushFront(&phead, 2);
    SListPushFront(&phead, 3);
    SListPushFront(&phead, 4);
    SListPushFront(&phead, 5);
    SListPushFront(&phead, 6);
    SListPushFront(&phead, 7);
    SListPushFront(&phead, 8);
    SListPushFront(&phead, 9);
    //SListPopFront(&phead);
    //SListPopFront(&phead);
    /*
    SListInsertAfter(SListFind(phead, 6), 9);
    SListEraseAfter(SListFind(phead, 4));
    SListRemove(&phead, 7);
    SListPrint(phead);
    */
    //SListRemoveAll(&phead, 8);
    SListReverse2(&phead);
    SListPrint(phead);
    SListDestory(&phead);
    //SListPrint(phead);
    return 0;
}

#endif
//int main()//约瑟夫环问题，链表解决
//{
//  SListNode *phead;
//  SListNode *plast;
//  SListNode *cur;
//  int m = 11, n = 3;
//  int i;
//  SListInit(&phead);
//  SListPushFront(&phead, m);
//  plast = phead;
//  for (i = m - 1; i >= 1; i--)
//  {
//      SListPushFront(&phead, i);
//  }
//  plast->next = phead;
//  cur = plast;
//  for (; m > 1; m--)
//  {
//      for (i = 1; i < n; i++)
//      {
//          cur = cur->next;
//          printf("%d号报数字%d\n", cur->data, i);
//      }
//      printf("%d号被去掉\n", cur->next->data);
//      SListEraseAfter(cur);
//  }
//  printf("%d号最终获胜\n", cur->data);
//  free(cur);
//  return 0;
//}