import java.util.*;
  import java.lang.*;
  import java.io.*;
  
  //////////////////////////////////////////////////////////////
  // Benutzt das C-Programm isdndial
  //////////////////////////////////////////////////////////////
  public class tempCheck
  {
    static final String CmdMeasure ="/usr/local/bin/digitemp -a -r750";
    static final String CmdInit    ="/usr/local/bin/digitemp -s/dev/ttyS1 -i";
    FileWriter F;
  
    public tempCheck()
    {
      while(true)
      {
      try
         {
           String line;
           Process p = Runtime.getRuntime().exec(CmdMeasure);
           p.waitFor();
           BufferedReader input = new BufferedReader(
                                     new InputStreamReader(
                                          p.getInputStream()));
           F=new FileWriter("/usr/local/tmp/digitempLog.txt");
           while ((line = input.readLine()) != null)
           {
              System.out.println(line);
              F.write(line+"\n");
              // Heizungsrücklauf
              if (line.indexOf("Sensor 1")!=-1)
           {
             int     idx=line.indexOf("C:");
             String   ts=line.substring(idx+2,idx+6);
             double   td=Double.parseDouble(ts);
             if (td<10.0)
             createMail("Heizung", line);
           }
              if (line.indexOf("Sensor 2")!=-1)
           {
                ...
           }
              if (line.indexOf("Sensor 3")!=-1)
           {
                ...
           }
              // Raumtemperatur
           if (line.indexOf("Sensor 0")!=-1)
           {
             int   idx=line.indexOf("C:");
             String ts=line.substring(idx+2,idx+6);
             double td=Double.parseDouble(ts);
             ...
           }
  
           }
             input.close();
             Thread.sleep(180000);
           }
             catch (Exception err)
           {
             System.out.println("Fehler: " + err.toString());
            err.printStackTrace();
           }
         }
    }
  
    void createMail(String Subject,String Data)
    {
      try
      {
       Data+="\n.\n";
       Process P=Runtime.getRuntime().exec("isdndial ...");
       P.waitFor();
       System.out.println(Data);
       Process p2 = Runtime.getRuntime().exec("mail xxxxxxxxx@yyyyyyyy -s " + Sub + "\n");
       BufferedWriter InputP2=new BufferedWriter(new OutputStreamWriter(p2.getOutputStream()));
       InputP2.write(Data);InputP2.close();
       p2.waitFor();
       // wait 180000 ms 180 sec = 3 min
       Thread.sleep(180000);
       P=Runtime.getRuntime().exec("isdnhang ...");
  
      }catch (Exception e){System.out.println(e);}
    }
  
  
    public static void main(String args[])
    {
      try
      {
        Process p = Runtime.getRuntime().exec(CmdInit);
        p.waitFor();
        System.out.println("Init complete");
      } catch (Exception e){System.out.println(e);}
      tempCheck T=new tempCheck();
    }
  }
  

   /* Kompilieren mit g++ -o lpt1OutBit lpt1OutBit.cpp                   */
   /* kopieren nach /usr/local/bin, dann s-bit setzen mit chmod als root */
  
   #include <stdio.h>
   #include <string.h>
   #include <stdlib.h>
   #include <sys/io.h>
   #include <sys/types.h>
   #include <unistd.h>
   #include <limits.h>
   #define OP_SET 1
   #define OP_RES 2
   #define OP_NEG 3
   #define PORT1 0x378
   
   /* Wandelt 1 Byte Integer in einen String mit Nullen und Einsen um (zB:0x63 -> "01100011") */
   char* crtBitStr(unsigned char x)
   {
     int i,j=0;
     static char p[7+1]="";
     for (i=0; i<8;)
     {
        if((x&1)!=0)p[i++]='1';
        else p[i++]='0';
        x>>=1;
     }
     return p;
   }
   int main(int argc, char* argv[])
   {
     unsigned int pin;
     int operation;
     int val;
     if (argc!=3)
     {
         printf("usage: lpt1OutBit op bit\n op : set | res \n bit:0..7\n");
         exit (-1);
     }
     if (strcmp(argv[1],"set")==0) operation=OP_SET; else
     if (strcmp(argv[1],"res")==0) operation=OP_RES; else
     if (strcmp(argv[1],"neg")==0) operation=OP_NEG; else
     {
        printf("usage: lpt1OutBit op bit\n op : set | res | neg \n bit:0..7\n");
        exit (-1);
     }
     if (strcmp(argv[2],"all")==0) val=0xff;
     else val=1<<atoi(argv[2]);
     /* want to be root */
     setuid(0);
     /* ioPerm ist Linux spezifisch -> man ioperm */
     ioperm(PORT1, 1, 1); // port 0x378 und die 1 folgenden freischalten
     pin = inb(PORT1); // port lesen
     ioperm(PORT1, 1, 0); // port 0x378 und die 1 folgenden sperren
     /*printf("status:%d\n",pin);*/
     {
        printf("value:%d\n",val);
        switch (operation)
        {
        case OP_SET:pin = pin | val; break; // Eintragen 1
        case OP_RES:pin = pin & (~val);break;
        }
        ioperm(PORT1, 1, 1); // port 0x378 und die 1 folgenden freischalten
        outb(pin,PORT1);
        ioperm(PORT1, 1, 0); // port 0x378 und die 1 folgenden sperren
      }
      printf("Status:%s\n", crtBitStr(pin));
      return 0;
   }