操作系统的完整代码——编写YCOS应用程序

1. 计算圆周率源代码pi2.cpp

#define YCORG -1          //该设置使编译器生成头部为YCEXE结构的可执行文件
#include "ycio.cpp"       //提供前缀为ycio_的函数和C/C++标准函数

char *calc_pi()
{
    int b_time = clock();
    #define  PI_LEN   40 * 7 * 5
    static char pbuf[PI_LEN];
    int *f = new int[PI_LEN + 1];
    if(!f)
      {
        printf("new error!\n");
        return nullptr;
      }

    int a=10000,b=0,c=PI_LEN,d,e=0,g,kk=0;
    for(; b-c; )  f[b++] = a/5;

    for(; d=0, g=c*2; c -= 14,
                      sprintf(&pbuf[kk],"%.4d",e + d/a),
                      kk ? 0 : (memmove(&pbuf[2],&pbuf[1],3),pbuf[1]='.',kk=1),
                      kk += 4,
                      e = d % a)
          for(b=c; d+=f[b]*a, f[b]=d%--g,d/=g--,--b; d*=b);

    delete f;
    sprintf(&pbuf[kk], "\n%d 位\ntime: %d ",kk-1, clock() - b_time);
    return pbuf;
}

void main(int argc,char *argv[],char *envp[])
{
    char *pp0 = (char*)malloc(1);  char *pp1 = (char*)malloc(2);
    char *pp2 = (char*)malloc(3);  char *pp3 = (char*)malloc(4);
    char *pp4 = (char*)malloc(1024*1024*25);
    for(int ii=0; ii<argc; ii++)   printf("\n%s   ",argv[ii]);  printf("\n");
    for(int ii=0; envp[ii]; ii++)  printf("\n%s   ",envp[ii]);  printf("\n");
    printf("\n\t\t%x   ",pp0);    printf("%x   ",pp1);
    printf("%x    ",pp2);     printf("%x   ",pp3);  printf("%x\n",pp4);
    printf(calc_pi());
}

                            C/C++代码文件 pi2.cpp
    在YCOS提示符下，键入pi2后，按回车执行。

2. 计算e的一万位源代码exp0.cpp

#define YCORG -1
#include "ycio.cpp"

void calc_exp(char pbuf[])
{
    #define NUMBER_BASE  100000
    #define NUMBER_WIDTH   2001
    int b_time = clock();

    int *aResult = new int[(NUMBER_WIDTH+1) * 2];
    if(!aResult)
      {
        pbuf[0] = 0;
        return;
      }
    memset(aResult,0,(NUMBER_WIDTH+1) * sizeof(int) * 2);
    int *aWork = &aResult[NUMBER_WIDTH+1];

    int ii,bb,kk=0,iStatus;
    aResult[0] = aWork[0] = NUMBER_WIDTH;
    aResult[1] = aWork[1] = 1;

    #define  ILIMIT  3300
    for(ii=1; ii<ILIMIT; ii++)
      {
        iStatus = kk = 0;
        for(int jj=1; jj<=aWork[0]; jj++)
          {
            if(kk > 0)      bb = aWork[jj] + (kk * NUMBER_BASE);
            else            bb = aWork[jj];
            aWork[jj] = bb / ii;
            kk = bb % ii;
            if(aWork[jj])   iStatus = 1;
          }
        if(!iStatus)     break;

        kk = 0;
        for(int jj=aWork[0]; jj>0; jj--)
          {
            bb = aWork[jj] + aResult[jj] + kk;
            kk = 0;
            while(bb >= NUMBER_BASE)
              {
                bb -= NUMBER_BASE;
                kk += 1;
              }
            aResult[jj] = bb;
          }
      }

    sprintf(pbuf, "e = %1.1d.", aResult[1]);
    kk = strlen(pbuf);
    for(ii=2; ii<NUMBER_WIDTH; ii++)
      {
        sprintf(&pbuf[kk], "%5.5d ",aResult[ii]);
        kk += 6;
        if(!(ii % 10))
          {
            sprintf(&pbuf[kk++],"\n");
            if(!(ii % 200))      sprintf(&pbuf[kk++],"\n");
          }
      }

    sprintf(&pbuf[kk], "kk=%d   time: %d ",kk,clock() - b_time);
    delete aResult;
}

void main(int argc,void **argv)
{
char pbuf[15000];
calc_exp(pbuf);
printf(pbuf);
}

                        C/C++代码文件 exp0.cpp
    在YCOS提示符下，键入exp0后，按回车执行。在boch计算机模拟环境下，本程序运行
时间较长。

3. 其它应用程序

    下面列出几个在YCOS下运行的应用程序。

#define YCORG -1
#include "ycio.cpp"
void main()
{
   for(int ii=0; ;ii++)
     {
       char dbuf[8192];
       int kk = snprintf(dbuf,sizeof(dbuf),"aaa---=%d  %d",
                                ycio_get_current_process(),ii);
       ycio_write(dbuf,kk,80 * 0 + 60);
       Sleep(10000);
     }
}

                        C/C++代码文件 pro0.cpp

#define YCORG -1
#include "ycio.cpp"
void main()
{
   for(int ii=0; ;ii++)
     {
       char dbuf[8192];
       int kk = snprintf(dbuf,sizeof(dbuf),"bbb---=%d  %d",
                                        ycio_get_current_process(),ii);
       ycio_write(dbuf,kk,80 * 1 + 60);
       Sleep(5000);
     }
}

                        C/C++代码文件 pro1.cpp

#define YCORG -1
#include "ycio.cpp"
void main()
{
   for(int ii=0; ;ii++)
     {
       char dbuf[8192];
       int kk = snprintf(dbuf,sizeof(dbuf),"ccc---=%d  %d",
                                        ycio_get_current_process(),ii);
       ycio_write(dbuf,kk,80 * 2 + 60);
       Sleep(2500);
     }
}

                        C/C++代码文件 pro2.cpp

#define YCORG -1
#include "ycio.cpp"

int main(int argc,char *argv[],char *envp[])
{
    printf("\n%d\n",0x7fffffff);
    printf("%d\n",0x3fffffff);
    printf("%p\n",0x2018);

    printf("%l\n",0x7fffffffffffffff);
    printf("%l\n",-0x7fffffffffffffff-1);

    printf("%lu\n",0xffffffffffffffff);
    printf("%u\n",0xffffffff);
      printf("qqwweerr %16s\n","123456");
      printf("%%%% %16s\n","123456");
      printf("%K %16s\n","123456");
      printf("aa %16s\n","123456");
      printf("a %16s\n","123456");

    printf("%d\n",argc);
    for(int ii=0; ii<argc; ii++)   printf("\n%s   ",argv[ii]);
    for(int ii=0; envp[ii]; ii++)  printf("\n%s   ",envp[ii]);
    printf("\n\n");

    unsigned int aa = 0xc11220ab;
    int ii = aa >> 22;
    int jj = (aa >> 12) & 0x3ff;
    unsigned int *pgDir = (unsigned int*)PageDir_POS;
    unsigned int *pgTable = (unsigned int*)(pgDir[ii] & ~0xfff);
    unsigned int rr = (pgTable[jj] & ~0xfff) + (aa & 0xfff);

    int attr =  pgTable[jj] & 0xfff;
    printf("line     address aa = %p  was changed to\n",aa);
    printf("physical address rr = %p  %x\n",rr,attr);
    return 0;
}

                        C/C++代码文件 ex0.cpp