#include <stdio.h>
#define N 5
#define EMPTY -1
#define FULL  -2

int stackIO(int);

int main()
{
  int n, r;

  printf("スタックを実現するプログラム\n");
  printf("  正の整数値：入力値をスタックに格納する(Push)\n");
  printf("  負の整数値：スタックからデータを取り出す(Pop)\n");
  printf("  0：終了\n");
  while (1) {
    printf("整数値を入力 (正：格納(Push)，負：取出(Pop)，0：終了): ");
    scanf("%d", &n);
    if (n == 0) break; /* 終了 */
    r = stackIO(n); /* 格納または取出 */
    if (r > 0) printf("取出データ = %d\n", r); /* 取得データの表示 */
    else if (r == EMPTY) printf("エラー（スタックが空です）\n"); 
    else if (r == FULL ) printf("エラー（スタックが満杯です）\n"); 
    stackIO(0); /* 表示 戻り値(0)は使用しない */
  }
  return 0;
}

/* 
[引数]
正の整数: 格納，負の整数: 取出，0: 表示
[戻り値]
格納の場合) スタックが満杯: マクロ定数 FULL，それ以外: 0
取出の場合) スタックが空: マクロ定数 EMPTY，それ以外: 取り出した値
表示の場合) 0
*/
int stackIO(int x)
{
  static int stack[N]; /* データを格納する配列 */
  static int size = 0; /* データ数 */
  int i;

  if (x > 0) { /* 格納 */
    if (size == N) return FULL;
    stack[size++] = x;
  } else if (x < 0) { /* 取出 */
    if (size == 0) return EMPTY;
    return stack[--size];
  } else { /* 表示 */
    printf("size = %d [", size);
    for (i = 0; i < size; i++) printf("%d ", stack[i]);
    printf("]\n");
  }
  return 0; 
}