开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 数据库系统 > SQL Server > 查看源码
strgcr.c
资源名称：gnusql-0.7b5.1.tar.gz　[点击查看]
上传用户：dgyhgb
上传日期：2007-01-07
资源大小：676k
文件大小：10k
源码类别：

SQL Server

开发平台：

Unix_Linux

strgcr.c：源码内容
  1. /*  strgcr.c  - Storage Crash Recovery Utility
  2.  *              Kernel of GNU SQL-server. Recovery utilities    
  3.  *
  4.  *  This file is a part of GNU SQL Server
  5.  *
  6.  *  Copyright (c) 1996, 1997, Free Software Foundation, Inc
  7.  *  Developed at the Institute of System Programming
  8.  *  This file is written by  Vera Ponomarenko
  9.  *
  10.  *  This program is free software; you can redistribute it and/or modify
  11.  *  it under the terms of the GNU General Public License as published by
  12.  *  the Free Software Foundation; either version 2 of the License, or
  13.  *  (at your option) any later version.
  14.  *
  15.  *  This program is distributed in the hope that it will be useful,
  16.  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  17.  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18.  *  GNU General Public License for more details.
  19.  *
  20.  *  You should have received a copy of the GNU General Public License
  21.  *  along with this program; if not, write to the Free Software
  22.  *  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  23.  *
  24.  *  Contacts:   gss@ispras.ru
  25.  *
  26.  */
  28. /* $Id: strgcr.c,v 1.247 1997/03/31 12:24:55 kml Exp $ */
  30. #include "setup_os.h"
  31. #include "xmem.h"
  33. #include <sys/types.h>
  34. #include <sys/stat.h>
  35. #include <signal.h>
  36. #if HAVE_UNISTD_H
  37. #include <unistd.h>
  38. #endif
  39. #include <assert.h>
  40. #if HAVE_DIRENT_H
  41. # include <dirent.h>
  42. # define NAMLEN(dirent) strlen((dirent)->d_name)
  43. #else
  44. # define dirent direct
  45. # define NAMLEN(dirent) (dirent)->d_namlen
  46. # if HAVE_SYS_NDIR_H
  47. #  include <sys/ndir.h>
  48. # endif
  49. # if HAVE_SYS_DIR_H
  50. #  include <sys/dir.h>
  51. # endif
  52. # if HAVE_NDIR_H
  53. #  include <ndir.h>
  54. # endif
  55. #endif
  57. #if HAVE_FCNTL_H
  58. #include <fcntl.h>
  59. #endif
  61. #include <sys/ipc.h>
  62. #include <sys/msg.h>
  63. #include <sys/shm.h>
  65. #if HAVE_SYS_WAIT_H
  66. # include <sys/wait.h>
  67. #endif
  68. #ifndef WEXITSTATUS
  69. # define WEXITSTATUS(stat_val) ((unsigned)(stat_val) >> 8)
  70. #endif
  71. #ifndef WIFEXITED
  72. # define WIFEXITED(stat_val) (((stat_val) & 255) == 0)
  73. #endif
  75. #include "destrn.h"
  76. #include "strml.h"
  77. #include "puprcv.h"
  79. #include "fdclrcv.h"
  80. #include "f1f2decl.h"
  81. #include "admdef.h"
  82. #include "adfstr.h"
  84. /**************************************************************/
  88. #define  adfsize sizeof(struct ADF)
  90. i4_t fdcurlj;
  91. i4_t fd_lj;
  92. i4_t msqidscr, msqidl, msqidm, msqidb;
  93. pid_t pidlj, pidmj, pidbf;
  94. key_t keyscr, keylj, keymj, keybf;
  95. u2_t RJZm, RJZl, MPAGEm, MPAGEl;
  96. i4_t OPTBUFNUM, MAXNBUF, MAXTACT;
  97. key_t FSEGNUM;
  98. i4_t MAXTRANS;
  99. pid_t strcr_pid;
  101. u2_t trnum;
  102. extern CPNM curcpn;
  103. char **scptab;
  104. extern i2_t maxscan;
  105. unsigned ljmsize;
  106. u2_t S_SC_S;
  107. i4_t minidnt;
  108. struct ldesind **TAB_IFAM;
  109. i4_t TIFAM_SZ;
  112. #define ARG(num, what) argum = (i4_t)(what);            
  113.                        sprintf (args[num], "%d", argum)
  115. static void
  116. ini_pupsi (void)
  117. {
  118.   char *args[20], mch[20][20];
  119.   i4_t fdto, i;
  120.   i4_t argum;  
  122.   for (i = 0; i < 20; i++)
  123.     args[i] = mch[i];
  125. /*---------------INI MICROJ------------------------------*/
  126.   if ((pidmj = fork ())< 0)
  127.     {
  128.       perror ("fork MJ");
  129.       exit (1);
  130.     }
  131.   if (pidmj == 0)
  132.     {
  133.       args[0] = MJ;
  134.       args[1] = MJFILE;
  135.       sprintf (args[2], "%d", (i4_t)RJZm);
  136.       sprintf (args[3], "%d", (i4_t)MPAGEm);
  137.       sprintf (args[4], "%d", (i4_t)keymj);
  138.       sprintf (args[5], "%d", (i4_t)keylj);
  139.       args[6] = NULL;
  140.       execvp (*args, args);
  141.       perror ("SCR.INI: MJ doesn't exec");
  142.       exit (1);
  143.     }
  144.   MSG_INIT (msqidm, keymj, "MJ");
  145.   
  146. /*----------------INI BUFFER----------------------*/
  147.   if ((fdto = creat (SEG0, DEFAULT_ACCESS_RIGHTS)) < 0)
  148.     {
  149.       perror (SEG0);
  150.       exit (1);
  151.     }
  152.   if ((pidbf = fork ())< 0)
  153.     {
  154.       perror ("fork BUF");
  155.       exit (1);
  156.     }
  157.   if (pidbf == 0)
  158.     {
  159.       struct dirent *dir;
  160.       DIR *dp;
  161.       i4_t seg_num;
  162.       char name_BD_seg[1024];
  163.       args[0] = BUF;
  164.       args[1] = SEG0;
  165.       ARG (2, keybf);
  166.       ARG (3, keymj);
  167.       ARG (4, OPTBUFNUM);
  168.       ARG (5, MAXNBUF);
  169.       ARG (6, MAXTACT);
  170.       ARG (7, MAXTRANS);
  171.       /* the first numeric name of the shared memory segment for PUPSI */
  172.       ARG (8, FSEGNUM);
  173.       /* BD segments numbers and names */
  174.       if ((dp = opendir (DIR_SEGS)) == NULL)
  175. {
  176.   fprintf (stderr, "SCR: %s cannot openn", DIR_SEGS);
  177.   exit (1);
  178. }
  179.       dir = readdir (dp);
  180.       dir = readdir (dp);
  181.       for (i = 9; (dir = readdir (dp)) != NULL; i += 2)
  182. {
  183.   if (dir->d_ino == 0)
  184.     continue;
  185.   args[i] = dir->d_name + 3;
  186.           seg_num = atoi (args[i]);
  187.           ARG (i, seg_num);
  188.   sprintf (args[i + 1], "%s/%s", DIR_SEGS, dir->d_name);
  189.           printf ("SCR.ini_pupsi: name = %s, segnum = %dn", args[i + 1], seg_num);
  190. }
  191.       printf ("SCR.ini_pupsi: i = %dn", i);    
  192.       if (i == 9)           /* no at all segments */
  193.         {
  194.           strcpy (name_BD_seg, DIR_SEGS);
  195.           strcat (name_BD_seg, "/seg1");
  197.           ini_BD_seg (name_BD_seg, S_SC_S);
  198.           sprintf (args[9], "%d", 1);
  199.           args[10] = name_BD_seg;
  200.           i += 2;
  201.         }
  202.       closedir (dp);
  204.       sprintf (args[i], "%d", (i4_t)strcr_pid);
  205.       args[i + 1] = NULL;
  207.       execvp (*args, args);
  208.       perror ("SCR.INI: BUF doesn't exec");
  209.       exit (1);
  210.     }
  211.   MSG_INIT (msqidb, keybf, "BUF");
  212.   
  213. /*-------------OPEN/INI LOGJ--------------------------*/
  214.   if ((fd_lj = open (LJFILE, O_RDWR, 0644)) < 0)
  215.     {
  216.       ini_lj (LJFILE);
  217.       if ((fd_lj = open (LJFILE, O_RDWR, 0644)) < 0)
  218.         {      
  219.           perror ("LJ: open");
  220.           exit (1);
  221.         }
  222.     }
  223.   if ((pidlj = fork ())< 0)
  224.     {
  225.       perror ("fork LJ");
  226.       exit (1);
  227.     }
  228.   if (pidlj == 0)
  229.     {
  230.       args[0] = LJ;
  231.       sprintf (args[1], "%d", fd_lj);
  232.       sprintf (args[2], "%d", (i4_t)RJZl);
  233.       sprintf (args[3], "%d", (i4_t)MPAGEl);
  234.       sprintf (args[4], "%d", (i4_t)keylj);
  235.       sprintf (args[5], "%d", (i4_t)keybf);
  236.       sprintf (args[6], "%d", (i4_t)keyscr);      
  237.       args[7] = NULL;
  238.       execvp (*args, args);
  239.       perror ("SCR.INI: LJ doesn't exec");
  240.       exit (1);
  241.     }
  242.   MSG_INIT (msqidl, keylj, "LJ");
  243. }
  245. static int
  246. fin_pupsi (void)
  247. {
  248.   i4_t rep, repm, repb, repl, cd, i;
  249.   struct msg_buf sbuf, rbuf;
  250.   struct msqid_ds msqidds;
  252.   repl = LOGJ_FIX ();
  253.   cd = close (fdcurlj);
  255.   sbuf.mtype = FINIT;
  256.   if (msgsnd (msqidm, (void *) &sbuf, 0, 0) < 0)
  257.     {
  258.       perror ("SCR.msgsnd: MJ->FINIT");
  259.       exit (1);
  260.     }
  261.   if (msgrcv (msqidm, (void *) &rbuf, 1, ANSMJ, 0) < 0)
  262.     {
  263.       perror ("SCR.msgrcv: FINIT MJ");
  264.       exit (1);
  265.     }
  266.   repm = *rbuf.mtext;
  268.   if (msgsnd (msqidb, (void *) &sbuf, 0, 0) < 0)
  269.     {
  270.       perror ("SCR.msgsnd: BUF->FINIT");
  271.       exit (1);
  272.     }
  273.   if (msgrcv (msqidb, (void *) &rbuf, 1, ANSBUF, 0) < 0)
  274.     {
  275.       perror ("SCR.msgrcv: FINIT BUF");
  276.       exit (1);
  277.     }
  278.   repb = *rbuf.mtext;
  279.   i = msgctl (msqidl, IPC_RMID, &msqidds);
  280.   i = msgctl (msqidm, IPC_RMID, &msqidds);
  281.   i = msgctl (msqidb, IPC_RMID, &msqidds);
  283.   if (cd == 0 && repm == 0 && repb == 0 && repl == 0)
  284.     rep = 0;
  285.   else
  286.     rep = -1;
  287.   kill (pidlj, SIGKILL);
  288.   kill (pidmj, SIGKILL);
  289.   kill (pidbf, SIGKILL);
  290.   return (rep);
  291. }
  293. static void
  294. open_cur_lj (char *file_name)
  295. {
  296.   if ( (fdcurlj = open (file_name, O_RDWR, 0644)) < 0)
  297.     {
  298.       printf ("current LJ: open %s", file_name);
  299.       perror ("current LJ: open");
  300.       exit (1);
  301.     }
  302.   printf ("current LJ  %s  fdcurlj = %dn", file_name, fdcurlj);  
  303. }
  305. static key_t
  306. get_msg_key(void)   /* this function has a complete static copy in adm.c */
  307. {
  308.   static key_t k = (key_t)-2;
  309.   if (k==(key_t)-2)
  310. #if HAVE_FTOK
  311.     k = ftok(MJ, (getpid()&0xff));
  312. #else
  313.     k = FIRSTMQN;
  314. #endif
  315.   errno = 0;
  316.   for(;;)
  317.     {
  318.       if ( msgget (k, DEFAULT_ACCESS_RIGHTS) < 0 )
  319.         if (errno == ENOENT)
  320.           return k++;
  321.         else if (errno == ENOSPC)
  322.           return -1;
  323.       k++;
  324.     }
  325. }
  327. void
  328. main (void)
  329. {
  330.   struct ADBL cadlj, ladlj;
  331.   char *dname;
  332.   i4_t fdaf, segnum, n;
  333.   struct ADF p2;
  334.   DIR *dp;
  335.   struct dirent *dir;
  336.   struct msqid_ds msqidds;
  337.   char name[1024];
  339.   setbuf (stdout, NULL);
  340.   
  341.   ljmsize = size1b + size4b + 2 * size2b + 2 * size2b + size2b + size4b + 2 * size2b;
  342.   scptab = (char **) xmalloc (chpsize * maxscan);
  343.   for (n = 0; n < maxscan; n++)
  344.     scptab[n] = NULL;
  345.   trnum = CONSTTR;
  346.   strcr_pid = getpid();
  348. /*------------- Copy BD's segments ---------------*/
  350.   if ((segnum = dir_copy (DIR_REP_SEGS, DIR_SEGS)) < 0)
  351.     fprintf (stderr, "SCR: Can't copy SEGSn");
  353. /*------------OPEN AND READ ADMFILE------------------*/
  354.   if ((fdaf = open (ADMFILE, O_RDWR, 0644)) < 0)
  355.     {
  356.       ini_adm_file (ADMFILE);
  357.       if ((fdaf = open (ADMFILE, O_RDWR, 0644)) < 0)
  358.         {      
  359.           perror ("ADMFILE: open error");
  360.           exit (1);
  361.         }
  362.     }
  363.   if (read (fdaf, (char *) &p2, adfsize) != adfsize)
  364.     {
  365.       perror ("ADMFILE: read error");
  366.       exit (1);
  367.     }
  368.   minidnt = 1;
  369.   MAXTRANS = p2.maxtrans;
  370.   RJZm = p2.mjred;
  371.   RJZl = p2.ljred;
  372.   MPAGEm = p2.mjmpage;
  373.   MPAGEl = p2.ljmpage;
  374.   S_SC_S = p2.sizesc;
  375.   OPTBUFNUM = p2.optbufnum;
  376.   MAXNBUF = p2.maxnbuf;
  377.   MAXTACT = p2.maxtact;
  378.   FSEGNUM = p2.fshmsegn;
  379.   
  380.   TIFAM_SZ = 2;
  381.   TAB_IFAM = (struct ldesind **) xmalloc (TIFAM_SZ * sizeof (struct ldesind **));
  382.   TAB_IFAM[0] = NULL;
  383.   TAB_IFAM[1] = NULL;
  384.   tab_difam (1);
  385.   
  386.   keyscr  = get_msg_key();  
  387.   keylj   = get_msg_key();
  388.   keymj   = get_msg_key();
  389.   keybf   = get_msg_key();
  391.   /* Getting queue for rcvsc */
  392.   if ((msqidscr = msgget (keyscr, IPC_CREAT | DEFAULT_ACCESS_RIGHTS)) < 0)
  393.     {
  394.       perror ("SCR: Getting queue for rcvsc");
  395.       exit (1);
  396.     }  
  398. /*------------Recovery by LJ's repository------------------*/
  400.   if ((dp = opendir (DIR_REP_LJS)) == NULL)
  401.     {
  402.       fprintf (stderr, "SCR: %s cannot openn", DIR_REP_LJS);
  403.       exit (1);
  404.     }
  405.   dir = readdir (dp);
  406.   dir = readdir (dp);
  407.   while ((dir = readdir (dp)) != NULL)
  408.     {
  409.       if (dir->d_ino == 0)
  410. continue;
  411.       dname = dir->d_name;
  412.       copy (dname, DIR_REP_LJS, DIR_JOUR);
  413.       ini_pupsi ();
  414.       strcpy (name, DIR_JOUR);
  415.       strcat (name, "/");
  416.       strcat (name, dname);
  417.       open_cur_lj (name);
  418.       cadlj = frwdmtn ();
  419.       fin_pupsi ();
  420.       dubl_segs ();
  422.       if (unlink (name) < 0)
  423. {
  424.   fprintf (stderr, "SCR: %s cannot deleten", name);
  425.   exit (1);
  426. }
  427.     }
  428.   closedir (dp);
  430.   ini_pupsi ();
  431.   fdcurlj = fd_lj;
  432.   cadlj = frwdmtn ();
  433.   ladlj = bmtn_feot (fdcurlj, cadlj);
  435.   close (fdaf);
  436.   rcv_wmlj (&ladlj); /* The record about global rollback */
  437.   fin_pupsi ();
  438.   dubl_segs ();
  439.   msgctl (msqidscr, IPC_RMID, &msqidds);  
  440.   fprintf (stderr, "SCR: Storage Crash Recovery has finished successfullyn");
  441. }