Return to batch.c CVS log

Up to [local] / OpenXM_contrib2 / asir2018 / builtin

Annotation of OpenXM_contrib2/asir2018/builtin/batch.c, Revision 1.1

1.1     ! noro        1: /*
        !             2:  * Copyright (c) 1994-2000 FUJITSU LABORATORIES LIMITED
        !             3:  * All rights reserved.
        !             4:  *
        !             5:  * FUJITSU LABORATORIES LIMITED ("FLL") hereby grants you a limited,
        !             6:  * non-exclusive and royalty-free license to use, copy, modify and
        !             7:  * redistribute, solely for non-commercial and non-profit purposes, the
        !             8:  * computer program, "Risa/Asir" ("SOFTWARE"), subject to the terms and
        !             9:  * conditions of this Agreement. For the avoidance of doubt, you acquire
        !            10:  * only a limited right to use the SOFTWARE hereunder, and FLL or any
        !            11:  * third party developer retains all rights, including but not limited to
        !            12:  * copyrights, in and to the SOFTWARE.
        !            13:  *
        !            14:  * (1) FLL does not grant you a license in any way for commercial
        !            15:  * purposes. You may use the SOFTWARE only for non-commercial and
        !            16:  * non-profit purposes only, such as academic, research and internal
        !            17:  * business use.
        !            18:  * (2) The SOFTWARE is protected by the Copyright Law of Japan and
        !            19:  * international copyright treaties. If you make copies of the SOFTWARE,
        !            20:  * with or without modification, as permitted hereunder, you shall affix
        !            21:  * to all such copies of the SOFTWARE the above copyright notice.
        !            22:  * (3) An explicit reference to this SOFTWARE and its copyright owner
        !            23:  * shall be made on your publication or presentation in any form of the
        !            24:  * results obtained by use of the SOFTWARE.
        !            25:  * (4) In the event that you modify the SOFTWARE, you shall notify FLL by
        !            26:  * e-mail at risa-admin@sec.flab.fujitsu.co.jp of the detailed specification
        !            27:  * for such modification or the source code of the modified part of the
        !            28:  * SOFTWARE.
        !            29:  *
        !            30:  * THE SOFTWARE IS PROVIDED AS IS WITHOUT ANY WARRANTY OF ANY KIND. FLL
        !            31:  * MAKES ABSOLUTELY NO WARRANTIES, EXPRESSED, IMPLIED OR STATUTORY, AND
        !            32:  * EXPRESSLY DISCLAIMS ANY IMPLIED WARRANTY OF MERCHANTABILITY, FITNESS
        !            33:  * FOR A PARTICULAR PURPOSE OR NONINFRINGEMENT OF THIRD PARTIES'
        !            34:  * RIGHTS. NO FLL DEALER, AGENT, EMPLOYEES IS AUTHORIZED TO MAKE ANY
        !            35:  * MODIFICATIONS, EXTENSIONS, OR ADDITIONS TO THIS WARRANTY.
        !            36:  * UNDER NO CIRCUMSTANCES AND UNDER NO LEGAL THEORY, TORT, CONTRACT,
        !            37:  * OR OTHERWISE, SHALL FLL BE LIABLE TO YOU OR ANY OTHER PERSON FOR ANY
        !            38:  * DIRECT, INDIRECT, SPECIAL, INCIDENTAL, PUNITIVE OR CONSEQUENTIAL
        !            39:  * DAMAGES OF ANY CHARACTER, INCLUDING, WITHOUT LIMITATION, DAMAGES
        !            40:  * ARISING OUT OF OR RELATING TO THE SOFTWARE OR THIS AGREEMENT, DAMAGES
        !            41:  * FOR LOSS OF GOODWILL, WORK STOPPAGE, OR LOSS OF DATA, OR FOR ANY
        !            42:  * DAMAGES, EVEN IF FLL SHALL HAVE BEEN INFORMED OF THE POSSIBILITY OF
        !            43:  * SUCH DAMAGES, OR FOR ANY CLAIM BY ANY OTHER PARTY. EVEN IF A PART
        !            44:  * OF THE SOFTWARE HAS BEEN DEVELOPED BY A THIRD PARTY, THE THIRD PARTY
        !            45:  * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,
        !            46:  * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.
        !            47:  *
        !            48:  * $OpenXM$
        !            49: */
        !            50: #if !defined(VISUAL) && !defined(__MINGW32__)
        !            51:
        !            52: #include <stdio.h>
        !            53: #include <stdlib.h>
        !            54:
        !            55: int exec_file(char *bindir,char *fname) {
        !            56:        char command[BUFSIZ*5];
        !            57:        int status;
        !            58:
        !            59:        sprintf(command,"%s/asir -f %s",bindir,fname);
        !            60:        status = system(command);
        !            61:        return status;
        !            62: }
        !            63:
        !            64: #else
        !            65:
        !            66: #include <windows.h>
        !            67: #include <stdlib.h>
        !            68: #include <stdio.h>
        !            69: #include <io.h>
        !            70: #include <fcntl.h>
        !            71: #include <process.h>
        !            72:
        !            73: static void read_until_eof();
        !            74:
        !            75: static HANDLE hRead,hWrite,hNotify,hNotify_Ack,hIntr,hIntr_Ack,hKill,hProc;
        !            76:
        !            77: int exec_file(char *bindir,char *fname) {
        !            78:        char *av[BUFSIZ];
        !            79:        char AsirExe[BUFSIZ];
        !            80:        DWORD mypid;
        !            81:        HANDLE hR0,hW0,hR1,hW1;
        !            82:        SECURITY_ATTRIBUTES SecurityAttributes;
        !            83:        char remread[10],remwrite[10];
        !            84:        char notify[100],notify_ack[100],intr[100],intr_ack[100],kill[100];
        !            85:        void _setargv();
        !            86:
        !            87:        mypid = GetCurrentProcessId();
        !            88:        sprintf(notify,"asir_notify_%d",mypid);
        !            89:        sprintf(notify_ack,"asir_ack_%d",mypid);
        !            90:        sprintf(intr,"asir_intr_%d",mypid);
        !            91:        sprintf(intr_ack,"asir_intr_ack_%d",mypid);
        !            92:        sprintf(kill,"asir_kill_%d",mypid);
        !            93:        hNotify = CreateEvent(NULL,TRUE,FALSE,notify);
        !            94:        hNotify_Ack = CreateEvent(NULL,TRUE,FALSE,notify_ack);
        !            95:        hIntr = CreateEvent(NULL,TRUE,FALSE,intr);
        !            96:        hIntr_Ack = CreateEvent(NULL,TRUE,FALSE,intr_ack);
        !            97:        hKill = CreateEvent(NULL,TRUE,FALSE,kill);
        !            98:
        !            99:     SecurityAttributes.nLength = sizeof(SecurityAttributes);
        !           100:     SecurityAttributes.lpSecurityDescriptor = NULL;
        !           101:     SecurityAttributes.bInheritHandle = TRUE;
        !           102:     CreatePipe(&hR0, &hW0, &SecurityAttributes, 65536);
        !           103:     CreatePipe(&hR1, &hW1, &SecurityAttributes, 65536);
        !           104:
        !           105:        hRead = hR0;
        !           106:        hWrite = hW1;
        !           107:        sprintf(remread,"%d",(DWORD)hR1);
        !           108:        sprintf(remwrite,"%d",(DWORD)hW0);
        !           109:
        !           110:        sprintf(AsirExe,"%s\\engine.exe",bindir);
        !           111: #if _MSC_VER < 1910
        !           112:        _setargv();
        !           113: #endif
        !           114:        av[0] = "asir";
        !           115:        av[1] = remread;
        !           116:        av[2] = remwrite;
        !           117:        av[3] = notify;
        !           118:        av[4] = notify_ack;
        !           119:        av[5] = intr;
        !           120:        av[6] = intr_ack;
        !           121:        av[7] = kill;
        !           122:        av[8] = "-norc";
        !           123:        av[9] = "-f";
        !           124:        av[10] = fname;
        !           125:        av[11] = NULL;
        !           126:        hProc = (HANDLE)_spawnv(_P_NOWAIT,AsirExe,av);
        !           127:        if ( hProc == (HANDLE)-1 ) {
        !           128:                fprintf(stderr,"%s がありません",AsirExe);
        !           129:                return 0;
        !           130:        }
        !           131:        read_until_eof();
        !           132:        return 1;
        !           133: }
        !           134:
        !           135: int doing_batch = 0;
        !           136: static char insert_buf[BUFSIZ*10];
        !           137: static int insert_buf_len = 0;
        !           138:
        !           139: static void read_until_eof()
        !           140: {
        !           141:        DWORD len;
        !           142:        unsigned int cmdsize,cmd,size;
        !           143:
        !           144:        doing_batch = 1;
        !           145:        while ( 1 ) {
        !           146:                WaitForSingleObject(hNotify,(DWORD)-1);
        !           147:                ResetEvent(hNotify);
        !           148:                SetEvent(hNotify_Ack);
        !           149:                ReadFile(hRead,&cmdsize,sizeof(unsigned int),&len,NULL);
        !           150:                cmd = cmdsize>>16;
        !           151:                size = cmdsize&0xffff;
        !           152:                if ( !cmd ) {
        !           153:                        doing_batch = 0;
        !           154:                        return;
        !           155:                } else if ( size )
        !           156:                        ReadFile(hRead,insert_buf,size,&len,NULL);
        !           157:        }
        !           158: }
        !           159:
        !           160: void send_intr() {
        !           161:        PulseEvent(hIntr);
        !           162: }
        !           163:
        !           164: void terminate_batch() {
        !           165:        TerminateProcess(hProc,0);
        !           166: }
        !           167: #endif /* VISUAL */