imapext-2007
diff src/osdep/os2/auths.cmd @ 0:ada5e610ab86
imap-2007e
author | yuuji@gentei.org |
---|---|
date | Mon, 14 Sep 2009 15:17:45 +0900 |
parents | |
children |
line diff
1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000 1.2 +++ b/src/osdep/os2/auths.cmd Mon Sep 14 15:17:45 2009 +0900 1.3 @@ -0,0 +1,48 @@ 1.4 +/* rexx */ 1.5 +/* ======================================================================== 1.6 + * Copyright 1988-2006 University of Washington 1.7 + * 1.8 + * Licensed under the Apache License, Version 2.0 (the "License"); 1.9 + * you may not use this file except in compliance with the License. 1.10 + * You may obtain a copy of the License at 1.11 + * 1.12 + * http://www.apache.org/licenses/LICENSE-2.0 1.13 + * 1.14 + * 1.15 + * ======================================================================== 1.16 + */ 1.17 +/* 1.18 + * Program: Authenticator Linkage Generator for OS/2 1.19 + * 1.20 + * Author: Mark Crispin 1.21 + * Networks and Distributed Computing 1.22 + * Computing & Communications 1.23 + * University of Washington 1.24 + * Administration Building, AG-44 1.25 + * Seattle, WA 98195 1.26 + * Internet: MRC@CAC.Washington.EDU 1.27 + * 1.28 + * Date: 10 June 1999 1.29 + * Last Edited: 30 August 2006 1.30 + */ 1.31 +'@echo off' 1.32 +/* Erase old authenticators list */ 1.33 +'if exist auths.c del auths.c' 1.34 +parse arg args 1.35 +n=words(args) 1.36 +a_file='auths.c' 1.37 +c_file='linkage.c' 1.38 +h_file='linkage.h' 1.39 +call stream a_file, 'C', 'open write' 1.40 +call stream c_file, 'C', 'open write' 1.41 +call stream h_file, 'C', 'open write' 1.42 +do i=1 to n 1.43 + arg=word(args,i) 1.44 + call lineout a_file, '#include "auth_'arg'.c"' 1.45 + call lineout h_file, 'extern AUTHENTICATOR auth_'arg';' 1.46 + call lineout c_file, ' auth_link (&auth_'arg'); /* link in the 'arg' authenticator */' 1.47 + end 1.48 +call stream h_file, 'C', 'close' 1.49 +call stream c_file, 'C', 'close' 1.50 +call stream a_file, 'C', 'close' 1.51 +exit 0