#include
#include
#include
int dat_mass[100]={1,2,3,14,5,10,1,2,3,4,5,6,7};
typedef struct SP // двусвязный список
{
int data;
struct SP *next,*pred;
} sp;
// создание двусвязного списка заданной длины
sp *sp_new(int len)
{
sp* tmp;
if(len<=0) return NULL;
tmp=(sp*)malloc(sizeof(sp));
if(!tmp) return (sp*)-1;
tmp->next=NULL;
if(len<100) tmp->data=dat_mass[len-1];
else tmp->data=len;
for(len--;len;len--)
{
tmp->pred=(sp*)malloc(sizeof(sp));
if(!tmp->pred)
{
while(tmp->next)
{tmp=tmp->next;
free(tmp->pred);
}
free(dat_mass);
free(tmp);
return (sp*)-1;
}
tmp->pred->next=tmp;
tmp=tmp->pred;
if(len<100) tmp->data=dat_mass[len-1];
else tmp->data=len;
}
tmp->pred=NULL;
free(dat_mass);
return tmp;
}
// удаление двусвязного списка
sp *sp_del(sp* q)
{
if(!q) return NULL;
while(q->pred)
q=q->pred;
while(q->next)
{q=q->next;
free(q->pred);
}
free(q);
return NULL;
}
// вывод на экран двусвязного списка
void sp_print(sp *q)
{
if(q->pred) printf("not first\n");
while(q)
{
printf("%d",q->data);
if(q->next) printf(",");
q=q->next;
}
printf("\n");
}
// подсчет длины двусвязного списка
int sp_len(sp* q)
{
int a;
for(a=0;q;a++,q=q->next);
return a;
}
// поиск элемента по индексу
sp* sp_index(sp*q,int ind)
{
if(ind<0) return NULL;
for (;((ind>0)&&(q));ind--) q=q->next;
return q;
}
// поиск элемента по значению
sp *sp_val(sp* q,int val)
{while(q&&(q->data!=val)) q=q->next;
return q;
}
// удаление элемента из списка
sp *del_item(sp*q)
{sp *tmp;
if(!q) return NULL;
tmp=NULL;
if(q->next)
{q->next->pred=q->pred;
tmp=q->next;
}
if(q->pred)
{q->pred->next=q->next;
tmp=q->pred;
}
free(q);
if(!tmp) return NULL;
while(tmp->pred)
tmp=tmp->pred;
return tmp;
}
// добавление элемента в список
sp *add_item(int a,sp*q,int f)
{sp *t;
t=(sp*)malloc(sizeof(sp));
t->data=a;
if(q==0) {t->pred=t->next=NULL; return t;}
if(f==0)
{t->next=q;
t->pred=q->pred;
q->pred=t;
if(t->pred)
t->pred->next=t;
}
else
{t->pred=q;
t->next=q->next;
q->next=t;
if(t->next)
t->next->pred=t;
}
while(t->pred)
t=t->pred;
return t;
}
int main(int argc, char* argv[])
{
sp *t,*w;
int a;
setlocale(LC_ALL, "Russian");
printf("создан двусвязный список:\n");
t=sp_new(10);
sp_print(t);
a=sp_len(t);
printf("длиной: %i\n", a);
w=sp_index(t,9);
printf("элемент под индексом 9 найден и он равен %d\n",w->data);
w=sp_val(t,10);
printf("элемент со значением %d найден\n",w->data);
w=add_item(99,w,0);
printf("вставлен новый элемент равный 99 перед ранее найденным:\n");
sp_print(w);
printf("удален ранее вставленный элемент:\n");
w=sp_val(w,99);
w = del_item(w);
sp_print(w);
printf("двусвязный список удален\n");
sp_del(t);
system("pause");
return 0;
}
|