#include "stdio.h"
#include "math.h"
#include "malloc.h"
#define STACK_INIT_SIZE 30
#define STACKINCREMENT 10
typedef struct{
char *base;
char *top;
int stacksize;
}sqStack;
int initStack(sqStack *s)
{
/*内存中开辟一段连续空间作为栈空间,首地址赋值给s->base*/
s->base = (char *)malloc(STACK_INIT_SIZE * sizeof(char));
if(!s->base) return 0; /*分配空间失败*/
s->top = s->base; /*最开始,栈顶就是栈底*/
s->stacksize = STACK_INIT_SIZE; /*最大容量为STACK_INIT_SIZE */
return 1;
}
int Push(sqStack *s, char e){
if(s->top - s->base >= s->stacksize){
/*栈满,追加空间*/
s->base = (char *)realloc(s->base, (s->stacksize +
STACKINCREMENT)*sizeof(char));
if(!s->base) return 0; /*存储分配失败*/
s->top = s->base + s->stacksize;
s->stacksize = s->stacksize + STACKINCREMENT; /*设置栈的最大容量*/
}
*(s->top) = e; /*放入数据*/
s->top++;
return 1;
}
int Pop(sqStack *s , char *e){
if(s->top == s->base) return 0;
*e = *--(s->top);
return 1;
}
void Bi2Oct()
{
sqStack s1;
sqStack s2;
char c;
int i,sum=0;
initStack(&s1); /*创建一个栈s1,用来存放二进制字符串*/
/*输入0/1字符表示的二进制数,以#结束*/
scanf("%c",&c);
while(c!='#')
{
if(c=='0' || c=='1')
Push(&s1,c);
scanf("%c",&c);
}
initStack(&s2); /*创建一个栈s2,用来存放八进制字符串*/
while(s1.top!=s1.base)
{
for(i=0;i<3 && s1.top!=s1.base;i++)
{
Pop(&s1,&c); /*取出栈顶元素*/
sum = sum + (c-48) * pow(2,i); /*转换为八进制数*/
}
Push(&s2,sum+48) ; /*将八进制数以字符形式压入栈中*/
sum = 0;
}
while(s2.base != s2.top ){ /*输出八进制栈的内容*/
Pop(&s2,&c);
printf("%c",c);
}
}
main()
{
printf("Please input a binary number to convert to octal number\n");
Bi2Oct();
getchar();
getchar();
}