lan_ip_user.ec

计费部分源程序。我认为该软件极好

#include <stdio.h>
#include <string.h>
#include <sys/types.h>
$include sqlca;


void main(){

 $string g_login_id[21];
 $string g_password[11];
 $string g_zt[2];
 char g_cmd[50];
 int  re=-1;

  $database scs_internet@ONLINE;

  if  (sqlca.sqlcode<0) { 
    printf("database is error! %d\n ",sqlca.sqlcode);
    exit(-1); 
    }
  $declare cusr cursor for select login_id,password,zt from p_user_temp; 
  $open  cusr;
  while(1){
       re=-1;
       $fetch cusr into $g_login_id,$g_password,$g_zt; 
       if (sqlca.sqlcode==100) break;
       printf("get user login_id :%s  g_password :%s g_zt %s\n",g_login_id,
                     g_password,g_zt);

        
       switch (g_zt[0]){
          case '0': 
                  sprintf(g_cmd,"lan_ip_adduser %s %s informix",g_login_id,g_password);
                  
                  re=system(g_cmd);
                  break;
          case '1':
                  sprintf(g_cmd,"lan_ip_deleteuser %s ",g_login_id,g_password);
                  re=system(g_cmd);
                  break;
          case '2':
                  sprintf(g_cmd,"lan_ip_modifyuserop %s %s",g_login_id,g_password);
                  re=system(g_cmd);
                  break;

          default: break;
        }

     if (re==0){
      $update p_user_temp set zt="o" where login_id=$g_login_id;
      }
         
   }
  $close  cusr;
  $delete from p_user_temp where zt="o"; 
  $close database;
}