#!/bin/ch
/* Download the CH language environment software */
/* History: created by Harry H. Cheng, 10/30/1995 */
void dump_head() {
printf("Download CH Language Environment \n");
printf("\n");
printf("\n\n");
printf("\n");
printf("DOWNLOAD\n");
printf("CH\n");
printf("LANGUAGE\n");
printf("ENVIRONMENT\n");
printf("
\n\n");
printf("\n");
printf("
\n\n");
}
void dump_body() {
char *rhost;
string_t choption = "choption1.html";
int i;
rhost = getenv("REMOTE_HOST");
i = strlen(rhost)+1;
char RHOST[i];
for(i=0; i");
printf("here.\n");
printf("The old version is no longer supported. \n");
/*
printf("To download the old version of Ch, click \n");
printf("");
printf("here.\n");
printf("Everyone can register to download software for free.\n");
printf("Once you have registered, immediately, an email message with instructions "
"about how to download the CH language environment will be sent to you automatically.\n");
printf("Here are the\n");
printf("", choption);
printf("valid options for downloading\n");
printf(" the CH language environment and\n");
printf("");
printf(" Copyright information for the old version.\n");
*/
}
void dump_tail() {
printf("
\n");
printf("The CH Language Environment");
printf("\n");
printf("Integration Engineering Laboratory");
}
int main() {
printf("Content-type: text/html\n\n");
dump_head();
dump_body();
dump_tail();
exit(0);
}